[RESOLVIDO] CRIAR NOVO REGISTRO EM TEMP-TABLE HANDLE (QUERY)

Pessoal,

Estou incluindo tag MED (informações do lote do item) no XML da NFe, devido não gerar no standard do Datasul.

Para isto estou utilizando a EPC no programa AXSEP017, porém, tenho necessidade de criar registros na temp-table ttMed, que está vazia.

Tenho a handle da temp-table conforme parte da lógica na EPC abaixo:

for each tt-epc no-lock
where tt-epc.cod-event = p-ind-event
and tt-epc.cod-parameter = "ttMed":u /***** Informacoes de lotes dos Itens da NF *****/:

assign h-ttTrab = widget-handle(tt-epc.val-parameter)
hquerybuffer = h-ttTrab:default-buffer-handle.

if valid-handle(hquerybuffer) then do:

create query h-query.

h-query:set-buffers(hquerybuffer).
h-query:query-prepare('for each ' + h-ttTrab:name + ' no-lock').
h-query:query-open().

find it-nota-fisc no-lock
where rowid(it-nota-fisc) = rw-it-nota-fisc-xml NO-ERROR.

IF AVAIL it-nota-fisc THEN

for each fat-ser-lote of it-nota-fisc no-lock:

????? COMANDO PARA CRIAR REGISTRO NA QUERY ???????????

assign h-cod-estabel = hquerybuffer:buffer-field('CodEstabelNF') no-error.
assign h-cod-estabel:buffer-value = it-nota-fisc.cod-estabel.

assign h-serie = hquerybuffer:buffer-field('SerieNF') no-error.
assign h-serie:buffer-value = it-nota-fisc.serie.

assign h-nr-nota-fis = hquerybuffer:buffer-field('NrNotaFisNF') no-error.
assign h-nr-nota-fis:buffer-value = it-nota-fisc.nr-nota-fis.

assign h-it-codigo = hquerybuffer:buffer-field('ItCodigoNF') no-error.
assign h-it-codigo:buffer-value = it-nota-fisc.it-codigo.

assign h-nr-seq-fat = hquerybuffer:buffer-field('NrSeqFatNF') no-error.
assign h-nr-seq-fat:buffer-value = STRING(it-nota-fisc.nr-seq-fat).

assign h-nr-serlote = hquerybuffer:buffer-field('nLote') no-error.
assign h-nr-serlote:buffer-value = fat-ser-lote.nr-serlote.

END.

ASSIGN rw-it-nota-fisc-xml = ?.

end.

end.

Valeu Eduardo, funcionou direitinho.

Abraços.