Linha de Produto: | Protheus | ||||||||||||||||||||||||||
Segmento: | Manufatura | ||||||||||||||||||||||||||
Módulo: | SIGAPCP - Planejamento e Controle da Produção | ||||||||||||||||||||||||||
Parâmetro(s): |
| ||||||||||||||||||||||||||
Idiomas: | Espanhol, Inglês | ||||||||||||||||||||||||||
País(es): | Todos | ||||||||||||||||||||||||||
Banco(s) de Dados: | Todos | ||||||||||||||||||||||||||
Sistema(s) Operacional(is): | Todos |
| 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
