Histórico da Página
...
Este ponto de entrada é executado no momento da exclusão das notas fiscais de saída na rotina de Limpeza Mensal, para permitir ou não a exclusão dos documentos processados.
03. SINTAXE
MA580F2V(F2_FILIAL, F2_CLIENTE, F2_LOJA, F2_DOC, F2_SERIE, F2_TIPO, F2_ESPECIE) --> lDeleta
04. PARÂMETROS
| Nome | Tipo | Descrição |
PARAMIXB[1] | Caractere | Filial |
PARAMIXB[2] | Caractere | Cliente |
PARAMIXB[3] | Caractere | Loja |
PARAMIXB[4] | Caractere | Número |
PARAMIXB[5] | Caractere | Série |
PARAMIXB[6] | Caractere | Tipo |
PARAMIXB[7] | Caractere | Espécie |
...
Retorno | Tipo | Descrição | Obrigatório |
|---|---|---|---|
lDeleta | Lógico | Indica se o registro processado será excluído, sendo: | Sim |
06. EXEMPLO
...
| Bloco de código |
|---|
...
|
...
|
...
| ||
#INCLUDE |
...
'PROTHEUS.CH' |
...
#INCLUDE "FWMVCDEF.CH" |
...
//*************************************************************** |
...
//Ponto de entrada MA580F2V antes de deletar o documento de saída |
...
//#Par01 |
...
- F2_FILIAL do registro posicionado |
...
//#Par02 |
...
- F2_CLIENTE do registro posicionado |
...
//#Par03 |
...
- F2_LOJA do registro posicionado |
...
//#Par04 |
...
- F2_DOC do registro posicionado |
...
//#Par05 |
...
- F2_SERIE do registro posicionado |
...
//#Par06 |
...
- F2_TIPO do registro posicionado |
...
//#Par07 |
...
- F2_ESPECIE do registro posicionado |
...
//*Return |
...
- Informa se deleta o registro .T. ou não .F. |
...
//*************************************************************** |
...
User Function MA580F2V() |
...
Local cFilSF2 := PARAMIXB[1] |
...
Local cCliSF2 := PARAMIXB[2] |
...
Local cLojSF2 := PARAMIXB[3] |
...
Local cDocSF2 := PARAMIXB[4] |
...
Local cSerSF2 := PARAMIXB[5] |
...
Local cTipSF2 := PARAMIXB[6] |
...
Local cEspSF2 := PARAMIXB[7] |
...
Local lDeleta := .T.
If cCliSF2 == "FAT001" .And. cTipSF2 == "D"
lDeleta := .F.
EndIf
Return lDeleta |
| Templatedocumentos |
|---|
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas