Perguntas Implementar Emissão Boleto Apos NFE, e CNAB a receber dos boletos pagos.

Brother estou enviando estes fontes mas vc precisa saber de programação para entender e ajustar a sua realidade ok.

Impressão Boleto Banco do Brasil e Bradesco



Rotina para impressão de danfe e logo após conforme configuração de campo customizado na condição de pagamentos vai e imprime o boleto.



Cnab a Receber banco do brasil:

/*ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ
±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±
±±ÉÍÍÍÍÍÍÍÍÍÍÑÍÍÍÍÍÍÍÍÍÍÍÍËÍÍÍÍÍÍÍÑÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍËÍÍÍÍÍÍÑÍÍÍÍÍÍÍÍÍÍ»±±
±±ÌÍÍÍÍÍÍÍÍÍÍØÍÍÍÍÍÍÍÍÍÍÍÍÊÍÍÍÍÍÍÍÏÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÊÍÍÍÍÍÍÏÍÍÍÍÍÍÍÍÍ͹±±
±±ºDescricao ³ Grava o parametro novo na tabela padrao SX6. º±±
±±ÈÍÍÍÍÍÍÍÍÍÍÏÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ±±
±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±
ßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßß*/
//aPARAM := {NEWPARAM,'C','DESCR','DESC1','DESC2',_cConteudo}
//If !ExisteSX6(aParam[1])
// U_SaveMv(aPARAM,'')
//EndIf
User Function SAVEMV(aPar,cInd)

If !SX6->(dbSeek(SM0->M0_CODFIL+aPar[1]+cInd)) .AND. !SX6->(dbSeek(' '+aPar[1]+cInd))
RECLOCK('SX6',.T.)
SX6->X6_FIL := xFilial('SX6')
SX6->X6_VAR := aPar[1]
SX6->X6_TIPO := aPar[2]
SX6->X6_DESCRIC := aPar[3]
SX6->X6_DSCSPA := aPar[3]
SX6->X6_DSCENG := aPar[3]
SX6->X6_DESC1 := aPar[4]
SX6->X6_DSCSPA1 := aPar[4]
SX6->X6_DSCENG1 := aPar[4]
SX6->X6_DESC2 := aPar[5]+cInd
SX6->X6_DSCSPA2 := aPar[5]+cInd
SX6->X6_DSCENG2 := aPar[5]+cInd
SX6->X6_CONTEUD := aPar[6]
SX6->X6_CONTSPA := aPar[6]
SX6->X6_CONTENG := aPar[6]
SX6->X6_PROPRI := 'S'
SX6->X6_PYME := 'S'
SX6->X6_VALID := ''
SX6->X6_INIT := ''
SX6->X6_DEFPOR := ''
SX6->X6_DEFSPA := ''
SX6->X6_DEFENG := ''
SX6->(MSUNLOCK())
EndIf

Return