Ponto-de-Entrada: PL627BOK - Cabeçalho do Lote de Cobrança
| Versões: | Todas |
| Compatível Países: | Todos |
| Sistemas Operacionais: | Todos |
| Compatível às Bases de Dados: | Todos |
| Idiomas: | Espanhol , Inglês |
Descrição:
O ponto de entrada PL627BOK permite a validação das informações do cabeçalho do Lote de Cobrança, sendo chamado na validação, ao selecionar a opção “OK” do Lote de Cobrança.
Eventos
PL627BOK (<ParamIXB[1]>, <ParamIXB[2]>) --> lRet
Programa Fonte
PLSA627.PRW
Sintaxe
PL627BOK - Cabeçalho do Lote de Cobrança ( < ParamIXB[1]> , < ParamIXB[2]> ) --> lRet
Parâmetros:
| Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
| ParamIXB[1] | Lógico | Campos obrigatórios validações OK? | lRet | X | |||||||||||||
| ParamIXB[2] | Numérico | nOpc – Opção selecionada no menu | 3 = Incluir | X |
Retorno
-
lRet(logico)
- Se a validação usuário estiver Ok
Exemplos
User Function PL627BOK()Local lRet := ParamIXb[1]Local nOpc := ParamIXb[2]Local cMesEmis := "" Local cAnoEmis := ""If nOpc = 3 .And. lRet .And. !Empty(M->BDC_DTEMIS) cMesEmis := StrZero(Month(M->BDC_DTEMIS),2) cAnoEmis := Str(Year(M->BDC_DTEMIS),4) If cAnoEmis+cMesEmis <> M->(BDC_ANOINI+BDC_MESINI) MsgStop("Parametrização incorreta na data de Emissão!") lRet := .F. Endif EndifReturn lRet