Linha Microsiga Protheus

Árvore de páginas

A650AVALC - Avaliação de Crédito do Cliente

Linha de Produto:

Protheus

Segmento:

Manufatura

Módulo:

SIGAPCP - Planejamento e Controle da Produção

Parâmetro(s):

 Nome Tipo Descrição Default Obrigatório Referência 
 lRet Array of Record Recebe um valor lógico com o resultado da avaliação de crédito feita pelo sistema: (Se receber .T., CRÉDITO OK ; Se receber .F., CRÉDITO COM PROBLEMA.)   X   

Idiomas:

Espanhol, Inglês

País(es):

Todos

Banco(s) de Dados:

Todos

Sistema(s) Operacional(is):

Todos

Ponto de Entrada

Descrição:

Após a validação pelo sistema, o ponto de entrada 'A650AVALC' é acionado e permite validar a avaliação de crédito do cliente quando utiliza esta opção na geração de OP por vendas.

Localização:Function A650Comp() - Responsável por efetuar comparação dos saldos com o limite em moeda forte, retornando .T. ou .F. (.T.-> Aprovado / .F.-> Reprovado)

Programa Fonte:

MATA650.PRX

Sintaxe:

A650AVALC - Avaliação de Crédito do Cliente ( < lRet> ) --> lRet

Retorno:

lRet(logico)

Deve retornar se o crédito está OK (.T.) ou não (.F.)

Observações:

 

 

Exemplo:

User Function A650AVALCLocal lRet :=PARAMIXB[1]If  !lRet .And. SA1->(Found()) .And. SA1->A1_COD=='000001'    lRet := .T.EndIf

Return lRet