Validação especifica da Nota Fiscal de Cliente de acordo com a regra de negócio do usuário.
| 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 |
TMA050NFC.PRW
#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
|
...
lRet := ExecBlock( 'TMA050NFC', .F., .F., { M->DTC_FILORI, cNumNFC, cSerNFC, M->DTC_CLIREM, M->DTC_LOJREM, cCodPro } )
...
<!-- 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>
|