Ponto de Entrada

Descrição:

Este Ponto de Entrada é utilizado para permitir ao usuário evitar a execução da funcionalidade VFE (Venda fora do Estado), não gerando assim os Pedidos de Venda correspondentes. Se o retorno for .F., o processo será executado sem VFE, ou seja,será criado apenas 1 Pedido de Venda de Transferência.

Observações:

Este Ponto de Entrada é utilizado somente para a funcionalidade VFE (Venda fora do Estado).

Eventos:

Lj7Pedido()

If lCentroDL

lExistVfe := .F. //Verifica se cenario contempla VFE
lValidVfe := .T. //PE para validar se executa VFE

If ExistBlock("LJ7096")

lValidVfe := ExecBlock("LJ7096",.F., .F., {aArquivos, aLojas})

EndIf

EndIf

Programa Fonte:

LOJA701C

Parâmetros:

Tipo Descrição
ExpA1 Array contendo as informacoes do Orcamento {SL1, SL2 e SL4}
ExpN2 Array com as lojas que podem ser feitas as reservas

Retorno:

Lógico

 

Exemplo:

#Include 'Protheus.ch'

User Function LJ7096()

Local aOrcamento := aClone(PARAMIXB[1]) //Array contendo as informacoes do Orcamento {SL1, SL2 e SL4}
Local aLojas := aClone(PARAMIXB[2]) //Array com as lojas que podem ser feitas as reservas
Local lRet := .F.

//Desenvolvimento da validação

Return lRet