Histórico da Página
...
O ponto de entrada FA150CBR foi disponibilizado para que a geração do código de barras de títulos do Banco Itaú (341) possa ser alterada durante sua gravação.
Ele será executado durante a geração do arquivo de remessa CNAB.
...
Informações | ||||||||
---|---|---|---|---|---|---|---|---|
| ||||||||
Parâmetros:ParamIXB[1] - CodBarras
|
03. EXEMPLO DE UTILIZAÇÃO
...
Bloco de código | ||||||
---|---|---|---|---|---|---|
| ||||||
#INCLUDE "Protheus.CH" User Function FA150CBR() Local cCodBar := ParamIXB Local cCodAux := "'' Local cAux := "'' Local cNosNum := "'' Local nSeqCdBr := 2 Local nFor := 0 Local nTot := 0 cNosNum := "1" + Right(Alltrim(NossoNum()), 7)) // Customização do NossoNum cCodBar := Left(cCodBar ,22) + cNosNum + Right(cCodBar, 14) //Gerar novo DAC MOD11 cCodAux := Substring(cCodBar, 1, 4) + Substring(cCodBar, 6, 39) nSeqCdBr := 2 For nFor := 1 To 43 If nSeqCdBr > 9 nSeqCdBr := 2 Endif cAux := StrZero((nSeqCdBr * Val(Left(Right(cCodAux, nFor), 1))), 2) nTot += Val(cAux) nSeqCdBr += 1 Next nTot := nTot % 11 nTot := If(nTot == 0 .Or. nTot == 1 .Or. nTot == 10 .Or. nTot == 11, 1, 11 - nTot) cCodBar := Left(cCodAux, 4) + Str(nTot, 1) + Right(cCodAux, 39) Return cCodBar |
04. DEMAIS INFORMAÇÕES
...
Templatedocumentos |
---|
HTML |
---|
<style> div.theme-default .ia-splitter #main { margin-left: 0px; } .ia-fixed-sidebar, .ia-splitter-left { display: none; } #main { padding-left: 10px; padding-right: 10px; overflow-x: hidden; } .aui-header-primary .aui-nav, .aui-page-panel { margin-left: 0px !important; } .aui-header-primary .aui-nav { margin-left: 0px !important; } </style> |
...
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas