[RESOLVIDO] cqapi001.i

Pessoal , alguem tem o fonte cqapi001.i , include da definicao da tabela ficha-cq

Att.

Segue, fiz ela baseado no .r da cqapi001 .

Abraço.

def temp-table tt-ficha NO-UNDO
field cod-depos like ficha-cq.cod-depos
field cod-estabel like ficha-cq.cod-estabel
field it-codigo like ficha-cq.it-codigo
field cod-localiz like ficha-cq.cod-localiz
field lote like ficha-cq.lote
field nr-ficha like ficha-cq.nr-ficha
field nr-ord-produ like ficha-cq.nr-ord-produ
field op-seq like ficha-cq.op-seq
field nr-ordem like ficha-cq.nr-ordem
field nro-docto like ficha-cq.nro-docto
field origem like ficha-cq.origem
field qt-original like ficha-cq.qt-original
field ct-destino like ficha-cq.ct-destino
field sc-destino like ficha-cq.sc-destino
field serie-docto like ficha-cq.serie-docto
field cod-emitente like ficha-cq.cod-emitente
field nat-operacao like ficha-cq.nat-operacao
field parcela like ficha-cq.parcela
field baixa-estoq like ficha-cq.baixa-estoq
field inspecionado like ficha-cq.inspecionado
field liberada like ficha-cq.liberada
field estado like ficha-cq.estado
field qt-aprovada like ficha-cq.qt-aprovada
field narrativa like ficha-cq.narrativa
FIELD per-ppm LIKE ficha-cq.per-ppm
FIELD cod-refer LIKE saldo-estoq.cod-refer
FIELD char-1 LIKE ficha-cq.char-1
FIELD char-2 LIKE ficha-cq.char-2
FIELD dec-1 LIKE ficha-cq.dec-1
FIELD dec-2 LIKE ficha-cq.dec-2
FIELD int-1 LIKE ficha-cq.int-1
FIELD int-2 LIKE ficha-cq.int-2
FIELD log-1 LIKE ficha-cq.log-1
FIELD log-2 LIKE ficha-cq.log-2
FIELD data-1 LIKE ficha-cq.data-1
FIELD data-2 LIKE ficha-cq.data-2.

Obrigado @jaozi_nho funcionou !