Histórico da Página
CONTEÚDO
- Descrição
- Parâmetros
- Programa Fonte
- Exemplo
- Exemplo da chamada
01. Descrição
Validação especifica da Nota Fiscal de Cliente de acordo com a regra de negócio do usuário.
- Em que ponto será chamado:
- TMSA050TudOK - Consistência Geral da rotina.
- Na rotina de validação geral da Nota Fiscal de Cliente a ser incluída ou alterada.
- TMSA050NF - Validação geral e da existência da Série e da Nota Fiscal.
- Na rotina de verificação da existência da Nota Fiscal de Cliente na base de dados, chamada pela rotina de Geração de Cobrança de Serviço Adicional (TMSA853).
- TMSA050TudOK - Consistência Geral da rotina.
02. Parâmetros
Nome | Tipo | Descrição | Default | Obrigatório | Referencia |
---|---|---|---|---|---|
PARAMIXB[1] | Caractere | Filial de Origem (DTC_FILORI) | M->DTC_FILORI | x | |
PARAMIXB[2] | Caractere | Número da Nota Fiscal do Cliente | GDFieldGet( 'DTC_NUMNFC', n ) | x | |
PARAMIXB[3] | Caractere | Número de Série da Nota Fiscal do Cliente | GDFieldGet( 'DTC_SERNFC', n ) | x | |
PARAMIXB[4] | Caractere | Código do Cliente | M->DTC_CLIREM | x | |
PARAMIXB[5] | Caractere | Loja do Cliente | M->DTC_LOJREM | x | |
PARAMIXB[6] | Caractere | Código do Produto | GdFieldGet( 'DTC_CODPRO', n ) | x |
03. Programa Fonte
TMA050NFC.PRW
Exemplo:
Bloco de código | ||||||
---|---|---|---|---|---|---|
| ||||||
#INCLUDE "PROTHEUS.CH" //-------------------------------------------------- /*/{Protheus.doc} TMA050NFC() Realiza validações especifica da Nota Fiscal de Cliente de acordo com a regra de negócio do usuário. @since 08/02/2021 @version 1.0 /*/ //--------------------------------------------------- User Function TMA050NFC() Local lRet := .T. Local l050TdOk := FwIsInCallStack("TMSA050TudOK") Local lTMS50NF := FwIsInCallStack("TMSA050NF") Local cFilOri := PARAMIXB[1] Local cNumNFC := PARAMIXB[2] Local cSerNFC := PARAMIXB[3] Local cCodCli := PARAMIXB[4] Local cLojCli := PARAMIXB[5] Local cCodPro := PARAMIXB[6] If //Validações Especificas do Usuário lRet := .F. EndIf Return lRet |
04. Exemplo da chamada
...
lRet := ExecBlock( 'TMA050NFC', .F., .F., { M->DTC_FILORI, cNumNFC, cSerNFC, M->DTC_CLIREM, M->DTC_LOJREM, cCodPro } )
...
HTML |
---|
<!-- esconder o menu --> <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> |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas