| Linha de Produto: | Microsiga Protheus® |
|---|---|
| Segmento: | Backoffice |
| Módulo: | Financeiro |
| Função: | FINA040 - Contas a Receber |
| Observações: | Em casos onde o Ponto de Entrada é chamado via ExecAuto e retornando .F. (falso), a variável lMsErroAuto deve ser alterada no Ponto de Entrada para .T. (verdadeiro). Pois caso contrário causará impacto em integrações e chamadas de ExecAuto onde o processo foi interrompido pelo retorno .F. (falso) do Ponto de Entrada e constando lMsErroAuto também como .F. (falso, ou seja, sem erros). |
A finalidade do ponto de entrada FA040INCé permitir validações de usuário na inclusão do Contas a Receber (FINA040), localizado no TudoOK da rotina.
Não há
Nome | Tipo | Descrição |
lRet | Lógico | .T. valida a inclusão e continua o processo, caso contrário .F. e interrompe o processo. |
#include 'totvs.ch'
/*/{Protheus.doc} FA040INC()
A finalidade do ponto de entrada FA040INCé permitir validações de usuário
na inclusão do Contas a Receber (FINA040), localizado no TudoOK da rotina.
@return lRet - lógico, .T. valida a inclusão e continua o processo,
caso contrário .F. e interrompe o processo.
/*/
User Function FA040INC()
Local lRet := .T.
// Validações de usuário
If M->E1_CLIENTE ='000001' .And. M->E1_LOJA='01' .And. M->E1_VALOR > 5000
// Mensagem de Help para esclarecer o motivo de interromper a inclusão
Help( ,, 'ALERTA',, "Valor não liberado para este cliente", 1, 0 )
lRet := .F.
// Alterando lMsErroAuto para .T. (verdadeiro), devido aos casos de integrações ou ExecAuto
lMsErroAuto := .T.
EndIf
Return lRet |
<style>
div.theme-default .ia-splitter #main {
margin-left: 0px;
}
.ia-fixed-sidebar, .ia-splitter-left {
display: none;
}
#main {
padding-left: 10px;
padding-right: 10px;
overflow-x: hidden;
}
.aui-header-primary .aui-nav, .aui-page-panel {
margin-left: 0px !important;
}
.aui-header-primary .aui-nav {
margin-left: 0px !important;
}
</style>
|