Este Ponto de Entrada pertence à rotina de Venda para exportadores (EDCRE400). Ele deve ser utilizado para customizar a rotina de Venda para exportadores.
Programa Fonte: EDCRE400.PRW
User Function EDCRE400()
Local cParamIXB
Local aItPositivo:={}
Local aItNegativo:={}
If ValType(ParamIXB) == "A"
cParamIXB:= ParamIXB[1]
aItPositivo:=ParamIXB[2]
aItNegativo:=ParamIXB[3]
Else
cParamIXB:= ParamIXB
EndIf
Do Case
Case cParamIXB == "RE400GRVANT_EXIBEMSG"
if empty(aItNegativo)
lExibeMsg1:=.F.
endIf
EndCase
Return |
| Nome | Tipo | Descrição |
|---|---|---|
| RE400GRVANT_EXIBEMSG | Caracter | Parâmetro que permite verificar os itens com e sem saldo e alterar o valor da variável lExibeMsg1 para que o sistema exiba e bloqueie ou siga com o processamento. |
| Parâmetro | Nome | Tipo | Permite alterar | Descrição |
|---|---|---|---|---|
| RE400GRVANT_EXIBEMSG | lExibeMsg1 | lógica | Sim | se .T. e tiver itens sem saldos de importações o sistema dá a mensagem e interrompe o processamento. se .F. mesmo com itens sem saldos de importações, o sistema não dá a mensagem e segue com o processamento. |
| RE400GRVANT_EXIBEMSG | ParamIXB[2] | array | Não | Fornece um array para consulta com os itens com saldos de importações com a estrutura: [1] := SEQUENCIA DO ATO [2] := PRODUTO EXPORTAR [3] := ITEM IMPORTAR [4] := ATO CONCESSÓRIO [5] := DATA LIMITE |
| RE400GRVANT_EXIBEMSG | ParamIXB[3] | array | Não | Fornece um array para consulta com os itens sem saldos de importações com a estrutura: [1] := SEQUENCIA DO ATO [2] := PRODUTO EXPORTAR [3] := ITEM IMPORTAR [4] := ATO CONCESSÓRIO [5] := DATA LIMITE |
Não há.