Linha Microsiga Protheus

Árvore de páginas

Ponto de entrada "FIN087NAT" que permite gatilhar a modalidade do cliente informado na realização de um recibo.

Características do Requisito

Linha de Produto:

Microsiga Protheus

Segmento:

Serviços

Módulo:

SIGAFIN - Financeiro

Rotina:

Rotina

Nome Técnico

FINA078A

Geração de Recibos

Ponto de Entrada:

FIN087NAT

Chamados Relacionados

TUVO55

País(es):

Todos

Banco(s) de Dados:

Todos

Tabelas Utilizadas:

SA1 - Clientes

Sistema(s) Operacional(is):

Todos

Descrição

O ponto de entrada "FIN087NAT"  permite ao usuário gatilhar o campo Modalidade ao informar o Cliente na geração de um recibo na rotina FINA087A.

 

Ponto de Entrada

Descrição:

Criado o ponto de entrada "FIN087NAT" que permite gatilhar a modalidade do cliente informado na realização de um recibo.

Localização:

Atualizações >> Contas por Cobrar >> Cobranças Diversas

Eventos:

Local lFin087Nat  := ExistBlock("FIN087NAT")

Programa Fonte:

FINA087A.PRW

Função:

F087aValCli() - Validação de Clientes Bloqueados

Retorno:

Nome

Tipo

Descrição

Obrigatório

cNaturezaCaractereRetorna a natureza informada no cadastro do ClienteNão

 

Exemplo:

#Include 'Protheus.ch'

User Function FIN087NAT()

Local cCliente := paramixb[1]
Local cLoja := paramixb[2]
Local cNatureza := ""

Local aArea:= GetArea()

If SA1->(DbSeek(xFilial("SA1")+cCliente+cLoja))
cNatureza := SA1->A1_NATUREZ
cLoja := SA1->A1_LOJA
EndIf

RestArea(aArea)

Return cNatureza