//pag;l1;c1;l2;c2;desc;borda;preget;posget;preinc;posinc
 1; 6; 8;17;71;Cadastro de Numero Logico;;;;;
:SKEL
VARIAVEL M_CR_DATA = IF(DAY(M_CR_DATA)=0, DATE(), M_CR_DATA)
VARIAVEL M_CR_HORA = IF(DAY(M_CR_HORA)=0, TIME(), M_CR_HORA)
:TFIE
//pag;l;c;desc;tipo;tam;campo;pict;when;valid;dbname;objcons;chave?;seek?;le;ce;cexib;pictexib
 1; 2; 4;Codigo do Cliente:;N; 6;Cr_COD_cli;999999;;PSQ_BROW;SCCRCLI;PSCCRCLI;N;N; 2;35;CR_NOME;@S30;
 1; 4; 4;Data Emissao.....:;D; 8;CR_DATA;;;;;;N;; 0; 0;;;
 1; 5; 4;Hora Emissao.....:;C; 8;CR_HORA;@S8;;;;;N;; 0; 0;;;
 1; 7; 4;Data Expiracao...:;D; 8;CR_DTEXP;;;;;;N;; 0; 0;;;
 1; 8; 4;Numero Serie.....:;C;10;CR_SERIAL;@S10;;;;;N;; 0; 0;;;
