Ponto-de-Entrada: CHKRDZREL - Verificação de Relacionamento
Versões: | Microsiga Protheus 10 |
Compatível Países: | Todos |
Sistemas Operacionais: | Todos |
Compatível às Bases de Dados: | Todos |
Descrição:
O ponto de entrada tem como objetivo realizar vericação do relacionamento das tabelas RD0 e RDZ.
Eventos
Na tela de manutenção, ao clicar no botão Relaciona e, também, na validação do campo Centro de Custo.
Programa Fonte
APDA020.PRX
Sintaxe
CHKRDZREL - Verificação de Relacionamento ( [ Param1 ], [ Param2 ] ) --> Param1
Parâmetros:
Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
Param1 | Caracter | Indica se é a 1ª ou 2ª chamada. | |||||||||||||||
Param2 | Array of Record | Indica se foi feita alteração na Tabela. |
Retorno
-
Param1(logico)
- Indica se foi feita alteração na Tabela.
Observações
O Ponto de Entrada deverá retornar .T. se alterou a tabela SRA ou .F., caso contrário.
Param1 -> Terá o conteúdo "INIT" quando executado na 1ª vez e o conteúdo "END" quando executado pela 2ª vez .
Param2 -> É enviado apenas na segunda chamada para verificar se houve alteração
Exemplos
#INCLUDE 'PROTHEUS.CH'User Function ChkRdzRel()Local cType := Paramixb[1]Local lChanged If cType == "INIT"// Operacoes da 1a chamada.// Alert("Passou pelo PE ChkRdzRel-INIT")ElseIf cType == "END" lChanged := Paramixb[2]// Operacoes da 2a chamada.// Alert("Passou pelo PE ChkRdzRel-END")EndIfIf ( lChanged == Nil, lChanged := .T., )Return ( lChanged )
Variáveis
Nome | Tipo | Escopo | Pode Alterar | descrição | ||||||||||
Array of Record | Global | Não |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas