Boa tarde, Estou com mais uma duvida. Estou començando agora com progress para o EMS da DataSul. Criei uma "Window CadastroSimples", criei um "Custom Viewer com AutoField" e inserir na Window e por ultimo um "Custom SmartQuery". Esta funcionando perfeitamente, meu cadastro inclui normalmente, o cadastro esta funcionando. Agora a minha duvida, como coloco as validações quando o usuario clicar em "Confirmar Alterações"? Não so validações, mas qualquer tipo de codigo, gostaria de saber "a onde" eu coloco, nas Triggers? Nas procedures da view? a onde? Vi que tem uma Trigger "Choose" do "mi-salvar" com o seguinte codigo: DO: RUN pi-salvar IN h_p-cadsim. END. alterei para: DO: /*RUN pi-salvar IN h_p-cadsim.*/ MESSAGE "ok". END. Porem não funcionou, o cadastro continuou salvando normal. Percebi que não seria aqui. Onde é?
Olá, Você deve efetuar a validação para procedure PI-VALIDATE da VIEWER, em alguns casos já utilizei também na procedure LOCAL-ASSIGN-RECORD. Lá tem o exemplo de como fazer. T+
Hum, mas supondo que não quero somente validação, quero que ao clicar em salvar primeiro seja executado um bloco de codigo que podem ter desde vslidações ate alteração nos valores para salvar, tabelas, salvar em arquivo, etc, depis ele continua a execução normal
Se você olhar nesta viewer na procedure local-assign-record, ela explica que você não pode gravar nenhum campo na tabela antes de salvar, e também indica onde deve ser feito para gravar valores que não estiverem na viewer. Dai você também pode fazer qualquer coisa, criando novas procedures na viewer, ou até chamar outros programas