VM180ANT Ponto de entrada executado através da tela de Faturamento Direto para permitir avançar ou não o processo de Geração de NF/Títulos

Descrição:

Ponto de entrada executado através da tela de Faturamento Direto, opção de geração de NF/Tiitulos. Após clicar no botão <Gerar NF/Titulos> abre uma tela para informar os dados para geração da Nota. Nessa tela o Ponto de Entrada é acionado em alguns pontos e conforme o seu retorno (True ou False ) permite avançar ou não o processo.

Ele recebe um parâmetro de entrada que determina onde está sendo chamado, conforme descrito abaixo:

0- Ao passar pelo campo Gerar: ( ) NF e Titulos

( ) Somente Titulos

1- Ao passar pelo campo Cliente

2- Ao passar pelo campo Vendedor

3- Ao passar pelo campo Natureza

4- Ao passar pelo campo Serviço/ Produto

6- Ao passar pelo campo Mens Padrao

5- Ao passar pelo Botão Confirmar

Para validar o processo no final, ao clicar no botão <Confirmar> deverá condicionar ao parâmetro de entrada com valor igual a 5.

No exemplo do PE a rotina está validando ao clicar no botão <Confirmar>, condicionado ao parâmetro de entrada igual a 5.

Eventos:

EndIf

oNFTit16:Refresh()

EndCase

// Ponto de Entrada antes da Geração de Nota e Titulo

// Dependendo do retorno impedirá a sequência do processo

if ExistBlock("VM180ANT")

if ! ExecBlock("VM180ANT",.f.,.f.,{nTp})

lRet := .f.

Endif

Endif

Return lRet

Função:

VM180VTELA()