| Linha de Produto: | Microsiga Protheus® |
|---|---|
| Segmento: | Backoffice |
| Módulo: | Financeiro |
| Idiomas | Português |
| Função: | FINA710 - Novo Gestor Financeiro Portal do Cliente |
O ponto de entrada NGFBXBOL permite download dos boletos personalizados através do Novo Gestor Financeiro e Portal do cliente.
Este P.E. informa ao cliente qual o registro da tabela SEA (Títulos Enviados ao Banco – Borderô) está posicionado (RECNO). Será enviado também o endereço e nome do boleto gerado por nossa aplicação se existir boleto gerado no sistema, não existindo boleto a variável será enviado vazia.
Será enviado também o nome do arquivo que será baixado, se o arquivo não existir em nossa aplicação o nome será composto pela chave do título (Prefixo + Numero + Parcela + Tipo), nome esse que poderá ser alterado na personalização.
Todos os arquivos gerados por nossa aplicação serão gravados na pasta SPOOL (RootPath).
A geração do boleto personalizado ficará sob responsabilidade do cliente.
O retorno aguardado por este P.E. deve ser Array, sendo:
aArray[1][1] – Caminho e nome do arquivo que será baixado.
aArray[1][2] – Nome do arquivo que apresentado no momento da baixa.
Todas as tabelas que forem usadas por esse P.E. deverão ter sua área guardada e restaurada ao final da execução.
Nome | Tipo | Descrição |
PARAMIXB[1][1][1] | Numérico | RECNO da tabela SEA |
| PARAMIXB[1][1][2] | Logico | Se .T. arquivo gerado por nossa aplicação. Se .F. Arquivo não gerado e variável nome será composto pela chave do título (Prefixo + Numero + Parcela + Tipo). |
| PARAMIXB[2] | Caracter | Arquivo gerado "\spool\NOMEDOARQUIVO.pdf" |
| PARAMIXB[3] | Caracter | Nome do arquivo gerado por nossa aplicação ou chave do título "Prefixo + Numero + Parcela + Tipo.pdf" |
aArray – Array
cNomeArq := "\spool\NOMEDOARQUIVO.PDF" - Caminho e nome do arquivo que será baixado.
cNomeBx := "NOMEDOARQUIVO.PDF" - Nome para o arquivo personalizado pelo cliente.
#INCLUDE "Totvs.ch"
/*/{Protheus.doc} NGFBXBOL
Permite o download do boleto em PDF dos boletos personalizados através do Novo Gestor Financeiro e Portal do cliente.
@owner TOTVS
@version P12
@since 09/06/2022
/*/
User Function NGFBXBOL()
Local aAreaSEA As Array
Local aRet As Array
Local nRecSEA As Numeric
Local lArqGer As Logical
Local cNomeArq As Character
Local cNomeBx As Character
aAreaSEA := GetArea('SEA')
aRet := {}
nRecSEA := PARAMIXB[1][1][1] // RECNO da tabela SEA
lArqGer := PARAMIXB[1][1][2] // Se .T. arquivo gerado por nossa aplicação. Se .F. Variavel nome do arquivo estará vazia.
cNomeArq := PARAMIXB[2] // Arquivo gerado "\spool\NOMEDOARQUIVO.pdf"
cNomeBx := PARAMIXB[3] // Chave do título (Prefixo + Numero + Parcela + Tipo.pdf" DbSelectArea("SEA")
SEA->(DbGoTo(nRecSEA))
If !lArqGer
cNomeArq := "Personalizado pelo cliente"
Endif
// Processo de download do arquivo - Lógica conforme necessidade do cliente
// ...
// cNomeArq := "\spool\NOMEDOARQUIVO.PDF" - Caminho e nome do arquivo que será baixado.
// cNomeBx := "NOMEDOARQUIVO" - Nome para o arquivo personalizado pelo cliente.
// ....
Aadd(aRet, {cNomeArq, cNomeBx} )
RestArea(aAreaSEA)
Return aRet |