...
| Linha Línea de Produtoproducto: | Microsiga Protheus® |
|---|---|
Segmento: | Backoffice |
Módulo: | Financeiro Financiero |
| Função Función: | FINA050 - Contas a Pagar Cuentas por pagar |
...
La finalidad del punto
...
A finalidade do ponto de entrada FA050INC é es permitir validações de usuário na inclusão do Contas a Pagar validaciones de usuario en la inclusión del Cuentas por pagar (FINA050), localizado no TudoOK da rotinaubicado en TudoOK de la rutina.
| Aviso |
|---|
Em casos onde o Ponto de Entrada é chamado via ExecAuto e retornando En casos donde el Punto de entrada se activa vía ExecAuto y devolviendo .F. (falso), a variável lMsErroAuto deve ser alterada no Ponto de Entrada para la variable lMsErroAuto debe modificarse en el Punto de entrada a .T. (verdadeiroverdadero). Pois Pues en caso contráriocontrario, causará impacto em integrações e chamadas de ExecAuto onde o processo foi interrompido pelo retorno en integraciones y activaciones de ExecAuto donde el proceso fue interrumpido por la devolución .F. (falso) do Ponto de Entrada e del Punto de entrada y constando lMsErroAuto também también como .F. (falso, ou seja, sem erroses decir, sin errores). |
...
Não No se aplica.
...
Tipo | DescriçãoDescripción |
Lógico | .T. - valida a inclusão e continua o processola inclusión y continua el proceso; .F. interrompe o processo interrumpe el proceso. |
...
...
| Bloco de código | ||||
|---|---|---|---|---|
| ||||
#include 'totvs.ch'
/*/{Protheus.doc} FA050INC()
ALa finalidadefinalidad dodel pontopunto de entrada FA050INC ées permitir validaçõesvalidaciones de usuáriousuario
en nala inclusãoinclusión dodel ContasCuentas apor Pagarpagar (FINA050), localizadoubicado noen TudoOK dade la rotinarutina.
@return lRet - lógico, .T. valida ala inclusãoinclusión ey continua oel processoproceso,
en caso contráriocontrario .F. e interrompeinterrumpe oel processoproceso.
/*/
User Function FA050INC() as logical
Local lRet := .F. as logical
// ValidaçõesValidaciones de usuáriousuario
If !(lRet)
// MensagemMensaje de Help para esclaresceraclarar oel motivo de interromperinterrumpir ala inclusãoinclusión
Help( ,, 'Help',, "InclusãoInclusión Interrompidainterrumpida.", 1, 0 )
// AlterandoModificando lMsErroAuto paracomo .T. (verdadeiroverdadero), debido devidoa aoslos casos de integraçõesintegraciones ouo ExecAuto
lMsErroAuto := .T.
EndIf
Return lRet |
...