//pag;l1;c1;l2;c2;desc;borda;preget;posget;preinc;posinc
 1; 6; 0;19;79;Inclusao de Duplicatas;;;;;
:SKEL
VARIAVEL m_cr_tip_dup:='CB'
VARIAVEL m_CR_NUM_PED:='NN'+lTrim(Str(_brd->bNossoNum,20))
VARIAVEL m_CR_DT_EMIS:=if(_brd->RET_DTOCOR<s_datual, _brd->RET_DTOCOR, s_datual)
VARIAVEL m_CR_DT_venc:=_brd->RET_DTVENC
VARIAVEL m_CR_DT_LQD:=_brd->RET_DTCRED
VARIAVEL m_CR_VALOR:=_brd->RET_VALOR
VARIAVEL m_CR_VAL_LQD:=_Brd->Ret_Valor+_Brd->Ret_Encarg
VARIAVEL m_bnossonum := _brd->bNossoNum
VARIAVEL m_sx_conta := _SxCxa->sx_conta
VARIAVEL m_cr_tip_dup:='CB'
VARIAVEL m_CR_ZONA:='CB'
VARIAVEL m_cr_obs:='CobCNAB '+wcCrNome
// 1;10; 2;Numero Cheque/Doc:;N; 6;CR_NUM_DOC;999999;;;
// 1;11; 2;Data Cheque/Doc..:;D; 8;CR_DT_DOC;;;;
:TFIE
//pag;l;c;desc;tipo;tam;campo;pict;when;valid;dbname;objcons;chave?;seek?;le;ce;cexib;pictexib
 1; 2; 2;Cli.RetCob.:;P;30;wcCrNome;@S30;.f.;
 1; 3; 2;Cod.Cliente:;N; 6;CR_COD_CLI;99999;;chk_lastkey(5).or.psq_brow;sccrcli;psccrcli;N;N; 3;22;cr_nome;@s30;
 1; 5; 2;Data Emissao :;D; 8;CR_DT_EMIS;;;m_CR_DT_EMIS<=m_cr_dt_venc;
 1; 6; 2;Valor Emissao:;N;10;CR_VALOR;9999999.99;;m_cr_valor>0;
 
 1; 9; 2;Valor Liquid.:;N;10;CR_VAL_LQD;9999999.99;;m_CR_VAL_LQD>0;

 1;11; 2;Observacao..:;C;30;CR_OBS;@S30;;;;

 1; 5;52;Titulo.....:;C;10;CR_NUM_PED;@S10;;
 1; 6;52;Conta Cred.:;N; 3;sx_conta;999;.f.;
 1; 7;52;Data Vencto:;D; 8;CR_DT_VENC;;.f.;
 1; 8;52;Data Liquid:;D; 8;CR_DT_LQD;;.F.;
 1; 9;52;Nosso Numer:;N;12;bNossoNum;999999999999;.f.;;;
 1;10;52;Tipo Docto.:;C;2;cr_tip_dup;XX;.F.;
 1;11;38;Tipo Lancto:;C; 2;CR_ZONA;xx;.f.;
 1;12;38;Situacao...:;C; 1;CR_SITUAC;x;;Chk_LastKey(5).or.psq_brow;si_sitdp;psisitdp;N;N;
 1;13;38;Portador...:;C; 2;CR_LOCAL;xx;;Chk_LastKey(5).or.psq_brow;si_banco;psibanco;N;N;