Histórico da Página
...
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