Ponto-de-Entrada: VERTPGCC - Análise de Crédito do Cliente
| Abrangências: | Microsiga Protheus 10 , Microsiga Protheus 11 |
| Versões: | Microsiga Protheus 10 , Microsiga Protheus 11 |
| Compatível Países: | Todos |
| Sistemas Operacionais: | Todos |
| Compatível às Bases de Dados: | Todos |
| Idiomas: | Português (Brasil) |
Descrição:
Ponto de Entrada localizado nas rotinas Requisição de Peças (OFIOM020) e Requisição de Serviços (OFIOM030), que verifica se é feita analisa de credito do cliente selecionado como Faturar Para.
Eventos
User Function VERTPGCC()
Local cOrigCham := ParamIXB[1]
Local lRetorno := .T.
If cOrigCham == "OFIOM020"
MsgInfo("Ponto de Entrada chamado pela Requisicao de Peças")
ElseIf cOrigCham == "OFIOM030"
MsgInfo("Ponto de Entrada chamado pela Requisicao de Serviços")
EndIf
Return lRetorno
Programa Fonte
OFIOM020.PRW e OFIOM030.PRW
Sintaxe
VERTPGCC - Análise de Crédito do Cliente ( [ ] ) --> lRetorno
Parâmetros:
| Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
| Array of Record |
Retorno
-
lRetorno(logico)
- indica se é feita análise de crédito do cliente informado no campo de faturar para.
Observações
If ExistBlock("VERTPGCC")
lVerTpgCC := ExecBlock("VERTPGCC",.f.,.f.,{"OFIOM020"})
Endif
Variáveis
| Nome | Tipo | Escopo | Pode Alterar | descrição | ||||||||||
| Array of Record | Global | Não |