//pag;l1;c1;l2;c2;desc;borda;preget;posget;preinc;posinc
 1; 7; 1;19;79;Avarias de Mercadorias;;preget_mov();;posinc_mov("A");
:TFIE
//pag;l;c;desc;tipo;tam;campo;pict;when;valid;dbname;objcons;chave?;seek?;le;ce;cexib;pictexib
 1; 2; 2;Produto.......:;N; 5;PCOD;99999;;when_pcod(@m_pcod) .and. psq_brow;se_prod;PSEPROD;N;S; 0; 0;;;
 1; 3; 2;Data..........:;D; 8;MDATA;;gmov_e(.f.,0,9,35,14,77);;;;N;; 0; 0;;;
 1; 5; 2;Quantidade....:;N; 7;MQUANT;9999999;;lastkey()=5 .or. quant_ok(m_mquant);;;N;; 0; 0;;;
 1; 6; 2;Valor.........:;N;14;MVALOR;999999999.99;gmov_e(m_mquant,2);;;;N;; 0; 0;;;
 1; 8; 2;Motivo........:;N; 2;mcd;99;;lastkey()=5 .or. psq_brow;se_motav;PSEMOTAV;N;N; 8;30;descricao;@s35;
 1; 9; 2;Numero do Lote:;C;10;PLOTE;@!10;;.not.empty(m_PLOTE);;;
 1;10; 2;Data de Vencto:;D;10;data_venc;;;
