O ponto de entrada NGFEMBOL permite o envio de e-mail dos títulos personalizados através do Novo Gestor Financeiro e Portal do cliente. Este recurso 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.
Parâmetros
Os parâmetros utilizados pelo NGFEMBOL são:
- PARAMIXB[1][1][1]: RECNO da tabela SEA
- PARAMIXB[1][1][2]: Se .T. arquivo gerado por nossa aplicação. Se .F. Arquivo não gerado e variável nome do arquivo estará vazia.
- PARAMIXB[2]: Arquivo gerado "\spool\NOMEDOARQUIVO.pdf"
Retorno
O retorno aguardado por este ponto de entrada deve ser lógico, sendo:
- .T. (Verdadeiro) – Gravaremos em base para controle que o envio do e-mail ocorreu com sucesso.
- .F. (Falso) – Gravaremos em base para controle que houve erro no envio do e-mail.
Exemplo de Utilização
Abaixo segue um exemplo de como utilizar o NGFEMBOL:
#INCLUDE "Totvs.ch"
/*/{Protheus.doc} NGFEMBOL
Permite envio de e-mail dos títulos personalizados através do Novo Gestor Financeiro e Portal do cliente.
@owner TOTVS
@version P12
@since 09/06/2022
/*/
User Function NGFEMBOL()
Local aAreaSEA As Array
Local lRet As Logical
Local nRecSEA As Numeric
Local lArqGer As Logical
Local cNomeArq As Character
aAreaSEA := GetArea('SEA')
lRet := .T.
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"
DbSelectArea("SEA")
SEA->(DbGoTo(nRecSEA))
If !lArqGer
cNomeArq := "Personalizado pelo cliente"
Endif
// Processo de envio e/ou geração do arquivo - Lógica conforme necessidade do cliente
// ...
RestArea(aAreaSEA)
Return lRet
Referências adicionais
Para mais informações sobre o NGFEMBOL e como utilizá-lo, consulte a documentação oficial do Protheus.