Código de Barras de Arrecadação

IdentificaOSegmento ==> 5
CodigoCedente ==> 12345
CodigoSacado ==> 56789
Vencimento ==> 12/12/2010
ValorTitulo ==> 12345,67
CodigoMoeda ==> 9
CodigoBarras ==> 85600000123456700012345201012120000000056789
LinhaDigitavel ==> 85600000123-5 45670001234-1 52010121200-6 00000056789-1
Arrec_LinhaDigitavel ==> 85600000123-5 45670001234-1 52010121200-6 00000056789-1
Arrec_CodigoBarras ==> 85600000123456700012345201012120000000056789

<%
/*
================================
modCodBarArrecadacao
---
Modelo de utilização de Cálculos Bancários do KankeiPS
Código de Barras de Arrecadação
---
Aldinei - 19/10/2010
Kankei Software e Consultoria - Todos os direitos reservados
================================
*/
%>

Código de Barras de Arrecadação

<%
var row = CreateObject('Bloqueto');
row('IdentificaOSegmento') = 5;
row('CodigoCedente') = '12345';
row('CodigoSacado') = '56789';
row('Vencimento') = DateSerial(2010, 12, 12);
row('ValorTitulo') = 12345.67;

row.CalcularCamposBanco();

WriteFields(row);

function WriteFields(row) {
    for (var e = new Enumerator(row.getBDFRow().Properties);!e.atEnd();e.moveNext()) {
        var item = e.item();
        WriteText(item);
        WriteText(' ==> ');
        WriteText(row(item));
        WriteLine();
    }
}
%>