Ponto-de-Entrada: TMF05LOK - Validações GetDados dos Itens do Agendamento
| Versões: | Microsiga Protheus 8.11 , Microsiga Protheus 10 |
| Compatível Países: | Todos |
| Sistemas Operacionais: | Todos |
| Compatível às Bases de Dados: | Todos |
| Idiomas: | Espanhol , Inglês |
Descrição:
Este Ponto de Entrada, localizado no TMSAF05 (Agendamento), permite ao usuário efetuar validações na getdados dos itens do agendamento.
Eventos
Programa Fonte
TMSAF05.PRW
Sintaxe
TMF05LOK - Validações GetDados dos Itens do Agendamento ( [ nOpcao ] ) --> lRet
Parâmetros:
| Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
| nOpcao | Array of Record |
Retorno
-
lRet(logico)
- Caso o Retorno seja (.F.) não é permitido incluir novas linhas na Getdados, se o retorno for (.T) é permitido a inclusão de novas linhas.
Observações
Exemplos
User Function TMF05LOK() Local nOpcao := PARAMIXB[1] //opcao do aRotinaLocal lRet := .T.If nOpcao == 1 MsgAlert('Inclusao de mais um item de agendamento')Endif If GDFieldGet('DF1_CLIREM',n) == '000001' MsgAlert('Não é permitido incluir item de agendamento para este Cliente Remetente') lRet := .F.EndifIf GDFieldGet('DF2_CODEMB',n) == 'CX ' MsgAlert('Não é permitido embalagem caixa na cubagem deste produto, verifique') lRet := .F.EndifReturn lRet