01. DADOS GERAIS
| Produto: | | Solucoes_totvs_parceirosexptotvs |
|---|
|
|
|---|
| Linha de Produto: | |
|---|
| Segmento: | |
|---|
| Módulo: | | Modulos_totvs_manufatura |
|---|
| ModulosTOTVSManufatura | TOTVS Manufatura (Linha Protheus) - Planejamento e controle da produção (SIGAPCP) |
|---|
|
| Modulos_totvs_prestadores_de_servicos |
|---|
|
|---|
| Função: | MATA650 - Cadastro de Ordem de Produção |
|---|
| País: | Brasil |
|---|
02. 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 está 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) |
|---|
| Parâmetros | . | Nome | Tipo | Descrição | Obrigatório |
|---|
| lRet | Array | 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.) | Sim |
. |
|---|
| Retorno | . | Nome | Tipo | Obrigatório | Descrição | Valores |
|---|
| lRet | LógicoSim | Deve retornar se o crédito está OK (.T.) ou não (.F.) | .T. - Aprovado .F. - Reprovado |
. |
|---|
| Observação |
|
|---|
...
| Bloco de código |
|---|
| firstline | 1 |
|---|
| title | Exemplo |
|---|
| linenumbers | true |
|---|
|
#INCLUDE 'TOTVS.CH'
#INCLUDE 'PROTHEUS.CH'
User Function A650AVALCLocalA650AVALC()
Local lRet := PARAMIXB[1]
If !lRet .And. SA1->(Found()) .And. SA1->A1_COD == '000001'
lRet := .T.
EndIf
Return lRet |
...
