User Function LJTelaRec( aRet, cMV_LJRECEB, cRecCart, cRecCPF, cRecCont, lOcioso, aTitulo )
/* Aqui fica a tratativa no desenvolvimento da tela customizada de recebimento de títulos. */
/* aRet é parâmetro de referência e será utilizado para a baixa do título. Deverá ser alimentada na seguinte estrutura: */
aRet := { <valor do título>,; {; {; /* Primeiro título */ TIT_SELE,; //01-Posicao lógica (.T. marca o título para baixa, .F. não marca o título para baixa) TIT_PREF,; //02-Prefixo do titulo, carácter. TIT_NUME,; //03-Titulo, carácter. TIT_PARC,; //04-Parcela, carácter. TIT_VREA,; //05-Vencimento real, data. TIT_VALO,; //06-Valor, numérico. TIT_MULT,; //07-Multa, numérico. TIT_JURO,; //08-Juros, numérico. TIT_DESC,; //09-Desconto, numérico. TIT_RECE,; //10-Recebimento, numérico. TIT_TIPO,; //11-Tipo, carácter. TIT_CONT,; //12-Contrato, carácter. TIT_CLIE,; //13-Cliente, carácter. TIT_LOJA,; //14-Loja, carácter. TIT_FILI,; //15-Filial, carácter. TIT_RECN,; //16-Recno - número da posição do registro da tabela SE1, numérico. TIT_ACRS,; //17-Acrescimo financeiro, numérico. TIT_CACR,; //18-Posicao logica, lógico. TIT_ABAT,; //19-Abatimentos, numérico. TIT_VENC,; //20-Vencimento original, data. TIT_LOCK,; //21-Cod de uso do Registro, carácter. TIT_MOED,; //22-Codigo da moeda do titulo, numérico. TIT_INTE,; //23-Interes (Juros) - Posicao reservada, numérico. TIT_DTBX,; //24-Dt. da baixa, data. TIT_SALD,; //25-Saldo do titulo, numérico. TIT_VLIQ; //26-Valor Liquido, numérico. }; {; /* Segundo título */ }; {; /* Terceiro título */ }; ... }; }//aRet é parâmetro de referência e será utilizado para a baixa do título Return .F. //* Não irá abrir a tela padrão e irá direto para a tela de pagamentos da confirmação do orçamento da Venda Assistida */ | 