//pag;l1;c1;l2;c2;desc;borda;preget;posget;preinc;posinc
 1; 4; 4;22;77;;;;;;
:SKEL
comando antes m_TIPO:=if(empty(m_TIPO,'NFE',m_TIPO)
variavel zbValidaTipo := (m_TIPO$"NF NFe NFP CTe ECF" .or. (Alert("Os tipos validos sao NF NFe NFP CTe ECF"),.f.) )
:TFIE
//pag;l;c;desc;tipo;tam;campo;pict;when;valid;dbname;objcons;chave?;seek?;le;ce;cexib;pictexib
 1; 2; 2;Numero NFe:;N;10;FNUM;9999999999;(m_FNUM:=zwFnum,zwFnum=0);;
 1; 3; 2;Serie  NFe:;C; 3;FSERIE;xxx;(m_FSERIE:=zwFSERIE,zwFnum=0);;
 1; 4; 2;Modelo NFe:;C; 2;FMODELO;xx;(m_FMODELO:=zwFMODELO,zwFnum=0);;

 1; 6; 2;Tipo Doc  Referenciado:;C; 3;TIPO;xxx;;eVal(zbValidaTipo);;;N;; 0; 0;;;

 1; 8; 2;Chave NFE Referenciada:;C;44;REFNFE;@S44;;;;;N;; 0; 0;;;

 1;10;2;CNPJ/CPF Emissor:;C;14;CNPJCPF;@S14;;;;;N;; 0; 0;;;
 1;11;2;UF do Emissor...:;C; 2;CUF;xx;;;;;N;; 0; 0;;;
 1;12;2;Ano e Mes   AAMM:;C; 4;AAMM;xxxx;;;;;N;; 0; 0;;;
 1;13;2;Modelo da NF.Ref:;C; 2;MODELO;xx;;;;;N;; 0; 0;;;
 1;14;2;Serie da  NF.Ref:;C; 2;SERIE;xx;;;;;N;; 0; 0;;;
 1;15;2;Numero da NF.Ref:;C;10;NNF;@S10;;;;;N;; 0; 0;;;
 1;16;2;Insc.Estadual...:;C;14;IE;@S14;;;;;N;; 0; 0;;;

 1;10;44;Modelo Doc do ECF:;C; 2;MODECF;xx;;;;;N;; 0; 0;;;
 1;11;44;Numero do Ecf....:;C; 3;NECF;xxx;;;;;N;; 0; 0;;;
 1;12;44;Numero COO no ECF:;C; 7;NCOO;@S7;;;;;N;; 0; 0;;;
 