Perguntas Impressao Boleto Caixa (BOLCAX)

Pessoal, bom dia!

Baixei um programa (BOLCAX.PRW) impressão de boleto do banco Caixa Econômica Federal do site "MasterAdvpl", fiz algumas alterações de acordo a necessidade da empresa, porém estou com dificuldade em acertar o código de barra no fonte.

Alguém poderia me auxiliar neste detalhe, no caso o banco validou o boleto e retorno com o seguinte erro:

Representação Numérica Digitada: 10490000010000343368733687000001660090000100000
Data do vencimento: 21/03/2014
CÓDIGO DO CEDENTE = 4336.833.68700000-4
Nosso Número = 0000000003-5
Valor do título: R$ 1.000,00
Valor de entrada: 10490000010000343368733687000001660090000100000 Tamanho: 47
====================================================
BARRA INVÁLIDA. NÃO SERÁ ACEITA.

Neste caso será que não da para chumbar o código cedente direto no programa, segue abaixo linha para montagem do código de barra:

// banco+moeda+(nosso numero,1,5)
cCampo:=SE1->E1_PORTADO+if(SE1->E1_MOEDA==1,'9','0')+SUBS(cBarra,19,5)
Digito()
cLinha:=cLinha+SE1->E1_PORTADO+If(SE1->E1_MOEDA==1,'9','0')+Subs(cBarra,19,1)+"."+Subs(cBarra,20,4)+Str(nDigito,1)+Space(2)

Em anexo envio o fonte no qual estamos trabalhando.

Agradeço desde já pelo apoio.

Luiz, bom dia!

Primeiramente muito obrigado pela orientação, a respeito do EE_CODEMP já havia preenchido o código do convenio neste campo.

Na verdade o que ocorre é a (barra) no rodapé do boleto o banco esta dizendo que está invalido, pois, não esta puxando o código cedente da linha digitavel.

Representação Numérica Digitada: 10490000010000343368733687000001660090000100000

Segue o arquivo compactado para melhor entendimento.

Muito obrigado pelo apoio.

Luiz Alberto,

Muito obrigado pela orientação, agradeço de coração pelo apoio! irei comparar os fontes afim de encontrar uma solução..

Cara pode contar comigo também em relação ao Protheus...

Bom final de semana.. e tudo de bom!

Abraço,