...
| Linha Línea de Produtoproducto: | Microsiga Protheus® |
|---|---|
Segmento: | Serviços Servicios |
Módulo: | Financeiro Financiero |
| Rotina Rutina: | FINA080 - Baixa a Pagar ManualBaja por pagar manual |
...
Ponto Punto de entrada para validar o el banco, agencia e conta no momento da digitação na tela de baixas a y cuenta en el momento de la digitación en la pantalla de bajas por pagar manual.
Executado através da rotina FINA080 nas operações Se ejecuta por medio de la rutina FINA080 en las operaciones de:
- 4: Baixa Baja manual; ou o
- 5: Baixa em Baja en lote.
Objetivo: Complementar as validações já existentes no momento da digitação do las validaciones existentes en el momento de la digitación del banco
03. PARÂMETROSPARÁMETROS
Nombre | Tipo | DescriçãoDescripción | |
PARAMIXB[1] | CaracterCarácter | Código | do del banco. |
PARAMIXB[2] | CaracterCarácter | Agencia. | |
PARAMIXB[3] | CaracterCarácter | Número | da contade la cuenta. |
...
Tipo | DescriçãoDescripción | |
Lógico | Determina | se a operação irá prosseguirsi la operación proseguirá. |
...
...
| Bloco de código | ||||
|---|---|---|---|---|
| ||||
#INCLUDE "TOTVS.CH" USER FUNCTION F080KCO() as Logical Local cBanco := ParamIXB[1] as Character// Codigo dodel banco Local cAgencia := ParamIXB[2] as Character // Número Numerode dala agencia Local cNumConta := ParamIXB[3] as Character // NumeroNúmero de dala contacuenta Local lRet := .T. as Logical lRet := FWAlertYesNo("Permite oel banco: " + AllTrim(cBanco),"PontoPunto de de entrada F080KCO") Return lRet |
...