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