F85ABCVLD - Permite validação customizada do banco na orden de pago (Peru)

Descrição

O ponto de entrada F85ABCVLD permite que sejam feitas validações customizadas do banco selecionado para efetuar a orden de pago, somente para ambientes localizados para o Peru.

Observações

Exemplos

#include "protheus.ch"

User Function F85ABCVLD()
Local aParam := aClone(ParamIxb)
Local cMsg := ""
Local lRet := .F.

If aParam[3] == 1

                cMsg := "Opção selecionada: Cheque suelto" + CRLF

                cMsg += "Banco informado: " + aParam[2] + CRLF

                cMsg += "Permite uso do banco selecionado?"

ElseIf aParam[3] == 2

                cMsg := "Opção selecionada: Debito diferido" + CRLF

                cMsg += "Banco informado: " + aParam[2] + CRLF

                cMsg += "Permite uso do banco selecionado?"

Else

                cMsg := "Opção selecionada: Debito inmediato" + CRLF

                cMsg += "Banco informado: " + aParam[2] + CRLF

                cMsg += "Opção de pagamento selecionada: " + aParam[1] + CRLF

                cMsg += "Permite uso do banco selecionado?"

EndIf

Return lRet

Preview

Veja também

Idioma

Espanhol

Versões

Microsiga_Protheus10 e

Microsiga_Protheus11

Sistemas Operacionais Suportados

Todos

Compatível com as Bases de Dados

Todas

Updates

Parâmetros

ParamIxb - array contendo a seguinte estrutura
Estrutura de ParamIxb
1 - Tipo informado quando o pagamento for do tipo Debito Inmediato: TF ou EF
2 - Código do banco informado através da consulta F3
3 - Opção de pagamento selecionada: 1 - Cheque suelto; 2 - Debito diferido; 3 - Debito inmediato

Retorno

lRet - Variável lógica com o resultado da validação customizada.

Eventos de chamada do Ponto de Entrada

Variáveis

Programa Fonte

FINA085A.PRW