× Linguagem de Programação ADVPL

Perguntas ROTINA COM CONTROLE DE STATUS - BOTÃO ENCERRAR

Mais
11 anos 10 meses atrás #9588 por lalberto
Olha a Ordem

1 - Pesquisar
2 - Visualizar
3 - Incluir
4 - Alterar
5 - Excluir

o Número 2 refere-se a visualizar, é o parâmetro passado para a rotina para que os campos não sejam editados ok.

Abraços.

E Coloca uma foto sua ai pra gente te conhecer melhor, e seja bem vindo ao MasterAdvpl e claro, divulgue aos amigos, clientes, fornecedores, papagaio, cachorro, gato etc etc

:woohoo: :woohoo: :woohoo: :woohoo: :lol:

Luiz Alberto Vieira Alves
Proprietário
55 (12) 9 8256-5905 (Vivo)
www.3lsystems.com.br
www.masteradvpl.com.br

Por favor Acessar ou Registrar para participar da conversa.

Mais
11 anos 10 meses atrás #9592 por alexpeixe
Valeu mesmo.

Sim vou colocar mais tarde a foto. Estou divulgando sim, mais um irá se cadastrar daqui a pouco.


Aproveitando sua boa vontade...rsrs agora como faço para não deixar alterar a rotina após ter sido finalizada? Tipo se o usuário clicar no botão "Alterar" e dar a mensagem se o Status for = 2(finalizado)

Por favor Acessar ou Registrar para participar da conversa.

Mais
11 anos 10 meses atrás #9602 por lalberto
Brother eu precisaria que vc anexa-se o fonte aqui no topico para que eu pudesse analisa-lo, se puder, compacta ele e adiciona no topico que vejo pra vc ok.

Abraços

Luiz Alberto Vieira Alves
Proprietário
55 (12) 9 8256-5905 (Vivo)
www.3lsystems.com.br
www.masteradvpl.com.br

Por favor Acessar ou Registrar para participar da conversa.

Mais
11 anos 10 meses atrás #9603 por lalberto
Ah e boa vontade vou ter sempre viu rsrs o site é meu kkkk é esse é o intuito do site, ajudar a galera e espero contar com sua ajuda futura para o pessoal que está iniciando.

Abraços.

Luiz Alberto Vieira Alves
Proprietário
55 (12) 9 8256-5905 (Vivo)
www.3lsystems.com.br
www.masteradvpl.com.br

Por favor Acessar ou Registrar para participar da conversa.

Mais
11 anos 10 meses atrás #9604 por kanaamlrr
Você precisaria mudar seu aRotina de:

Private aRotina := { {"Pesquisar","AxPesqui",0,1} ,;
{"Visualizar","AxVisual",0,2} ,;
{"Incluir","AxInclui",0,3} ,;
{"Alterar","AxAltera",0,4} ,;
{"Excluir","AxDeleta",0,5} ,;
{"Encerra","U_Encerra",0,6} ,;
{"Legenda","U_Legenda",0,7} }


para:

Private aRotina := { {"Pesquisar","AxPesqui",0,1} ,;
{"Visualizar","AxVisual",0,2} ,;
{"Incluir","AxInclui",0,3} ,;
{"Alterar","U_SUAFUNCAO",0,4} ,;
{"Excluir","AxDeleta",0,5} ,;
{"Encerra","U_Encerra",0,6} ,;
{"Legenda","U_Legenda",0,7} }


E na sua função realizar o seguinte tratamento:

User Function SUAFUNCAO()

If SZ1->Z1_STATUS=='2'//finalizado
   MsgAlert("Processo finalizado!")
   Return
Else
   AxAltera("SZ1",SZ1->(Recno()),4)
EndIf



Return
Acho que isso já resolve

Por favor Acessar ou Registrar para participar da conversa.

Mais
11 anos 10 meses atrás - 11 anos 10 meses atrás #9606 por Alessandro Villar
Luiz / Kanaãm,
desculpa a demora para responder, acabei tendo outras tarefas tive que deixar meio de lado essa, então tentei utilizar os trechos que me passou mais acho que devo estar fazendo errado, eu vou anexar as 2 rotinas que desenvolvi, dai quando puder dar uma verificada. só que eu não posso mudar o aRotina muito porque tem customização de botões, esse padrao foi o Luiz quem me passou eu utilizo ele atraves do ponto de entrada ACD10M que ele me passou também. Os botões Impressao, Finalizar,Consulta de Logs, Itens Conferido, Legenda, foram eu quem criou as rotinas para chamar atraves desse botoes entendeu,o botao Legenda eu criei a rotina que acabei conseguindo mudar a legenda escolher a cor e mudar a descrição isso na rotina LEGENDA, e o ACD10M eu fiz da maneira que está em anexo, o que eu não estou conseguindo fazer é quando eu clico no botao finalizar que é uma rotina que customizei para finalizar a ordem de separação eu gostaria que em seguida ele atualizasse o Status mudando de cor a bolinha vermelho, amarelo etc.. só que do geito que eu fiz ele não está trazendo no campo as bolinhas da legenda fica a coluna vazia, não sei se está dando para entender rsrs..
Anexos:
Ultima edição: 11 anos 10 meses atrás por Alessandro Villar.

Por favor Acessar ou Registrar para participar da conversa.

Tempo para a criação da página:0.101 segundos
Joomla templates by a4joomla