Ponto-de-Entrada: BLQCOB - Efetua a impressão do bloqueto bancário
| Abrangências: | Advanced Protheus 6.09 , Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Microsiga Protheus 10 |
| Versões: | Todas |
| Compatível Países: | Todos |
| Sistemas Operacionais: | Todos |
| Compatível às Bases de Dados: | Todos |
Descrição:
O ponto de entrada está localizado na impressão do bloqueto bancário, para que possa ser efetuada a impressão do Bloqueto bancário.
Eventos
Function IMPBLQRDM()
FG_SEEK("SD2","SF2->F2_DOC+SF2->F2_SERIE",3,.F.)
FG_SEEK("SC5","SD2->D2_PEDIDO",1,.F.)
FG_SEEK("SA6","SC5->C5_BANCO",1,.F.)
cObs1 := Substr(SA6->A6_MENSAGE,001,40)
cObs2 := Substr(SA6->A6_MENSAGE,041,40)
cObs3 := Substr(SA6->A6_MENSAGE,081,40)
cPrefixo := SF2->F2_PREFIXO
If ExistBlock("BLQCOB")
ExecBlock("BLQCOB",.f.,.f.,{SF2->F2_DUPL,,,,cPrefixo,"1",cObs1,cObs2,cObs3,SC5->C5_BANCO})
else
Help(1," ","NOWINDOWS",,STR0014,4,1) //O Nome do RDMAKE padrao é BLQCOB
Endif
Return
Programa Fonte
OFIOR390, BLQCOB
Sintaxe
BLQCOB - Efetua a impressão do bloqueto bancário ( [ SF2->F2_DUPL ], [ cPrefixo ], [ cObs1 ], [ cObs2 ], [ cObs3 ], [ SC5->C5_BANCO ] )
Parâmetros:
| Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
| SF2->F2_DUPL | Caracter | ||||||||||||||||
| cPrefixo | Array of Record | Prefixo do titulo. | |||||||||||||||
| cObs1 | Array of Record | Observacao | |||||||||||||||
| cObs2 | Array of Record | Observacao | |||||||||||||||
| cObs3 | Array of Record | Observacao | |||||||||||||||
| SC5->C5_BANCO | Array of Record | Banco referente ao titulo. |
Retorno
-
()
Exemplos
/*ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜܱ±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±ÚÄÄÄÄÄÄÄÄÄÄÂÄÄÄÄÄÄÄÄÄÄÂÄÄÄÄÄÄÄÂÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÂÄÄÄÄÄÄÂÄÄÄÄÄÄÄÄÄÄ¿±±±±³Fun‡„o ³ BLQCOB ³ Autor ³ Rafael Goncalves ³ Data ³ 06/10/09 ³±±±±ÃÄÄÄÄÄÄÄÄÄÄÅÄÄÄÄÄÄÄÄÄÄÁÄÄÄÄÄÄÄÁÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÁÄÄÄÄÄÄÁÄÄÄÄÄÄÄÄÄÄ´±±±±³Descri‡„o ³ Ponto de entrada que permite a impressao dos boletos ³±±±±ÃÄÄÄÄÄÄÄÄÄÄÅÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´±±±±³Sintaxe ³ ³±±±±ÃÄÄÄÄÄÄÄÄÄÄÅÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´±±±±³Uso ³ ³±±±±ÀÄÄÄÄÄÄÄÄÄÄÁÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±ßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßß*/User Function BLQCOB()MsgAlert("O Ponto de Entrada 'IMPBLQRDM' foi executado!","Sucesso!")Return
Variáveis
| Nome | Tipo | Escopo | Pode Alterar | descrição | ||||||||||
| Array of Record | Global | Não |