- Fórum
- Protheus/Microsiga/Totvs
- AdvPL (Advanced Protheus Language)
- Dúvidas Gerais
- Rotina para finalizar a Ordem de Separação
×
Linguagem de Programação ADVPL
Perguntas Rotina para finalizar a Ordem de Separação
- Alessandro Villar
- Autor do Tópico
- Desconectado
- Membro Especialista
-
Menos
Mais
- Postagens: 121
- Obrigados Recebidos: 0
11 anos 10 meses atrás #9386
por Alessandro Villar
Rotina para finalizar a Ordem de Separação foi criado por Alessandro Villar
Olá pessoal boa tarde,
seguinte no módulo de faturamento em Ordem de Separação em ações relacionadas com ajuda do fórum eu consegui criar um botão chamado "Finalizar", esse botão é para o usuário encerrar o processo de separação. Agora estou tentando desenvolver uma rotina mais estou com dificuldades,se alguém puder me ajudar,ou se tiver algum exemplo, vou tentar explicar de maneira mais clara o possível o que deve fazer:
Quando o usuário clicar no botão, tem que verificar se status é = 0, caso seja deverá apresentar uma mensagem em tela, caso ele confirme, o campo de data/hora de finalização(campos que criei), estejam preenchidos, avisar o usuário que o processo de separação já foi finalizado e perguntar se ele deseja sobrepor esta informação. Caso confirme tem que atualizar a data e hora (senão me engano é através do recloock que devo fazer isso), daí após a alteração apresentar a mensagem que foi finalizado com sucesso.
Espero ter conseguido explicar, se alguém tiver algum exemplo parecido já me ajudaria.
Obrigado !!!
seguinte no módulo de faturamento em Ordem de Separação em ações relacionadas com ajuda do fórum eu consegui criar um botão chamado "Finalizar", esse botão é para o usuário encerrar o processo de separação. Agora estou tentando desenvolver uma rotina mais estou com dificuldades,se alguém puder me ajudar,ou se tiver algum exemplo, vou tentar explicar de maneira mais clara o possível o que deve fazer:
Quando o usuário clicar no botão, tem que verificar se status é = 0, caso seja deverá apresentar uma mensagem em tela, caso ele confirme, o campo de data/hora de finalização(campos que criei), estejam preenchidos, avisar o usuário que o processo de separação já foi finalizado e perguntar se ele deseja sobrepor esta informação. Caso confirme tem que atualizar a data e hora (senão me engano é através do recloock que devo fazer isso), daí após a alteração apresentar a mensagem que foi finalizado com sucesso.
Espero ter conseguido explicar, se alguém tiver algum exemplo parecido já me ajudaria.
Obrigado !!!
Por favor Acessar ou Registrar para participar da conversa.
- kanaamlrr
- Desconectado
- Membro Platina
-
Menos
Mais
- Postagens: 1576
- Obrigados Recebidos: 4
11 anos 10 meses atrás #9389
por kanaamlrr
Respondido por kanaamlrr no tópico Re: Rotina para finalizar a Ordem de Separação
Acho que é mais ou menos isso que você precisa.
If STATUS == 0
If MsgNoYes("Deseja Atualizar?")
If !Empty(ZZZ->ZZZ_HORA) .AND. !Empty(ZZZ_DATA)
If MsgNoYes("processo de separação já foi finalizado"+chr(13)+chr(10)+"deseja sobrepor esta informação?")
RecLock("ZZZ",.F.)
ZZZ->ZZZ_HORA := Time()
ZZZ->ZZZ_DATA := dDataBase
EndIf
EndIf
EndIf
EndIfPor favor Acessar ou Registrar para participar da conversa.
- Alessandro Villar
- Autor do Tópico
- Desconectado
- Membro Especialista
-
Menos
Mais
- Postagens: 121
- Obrigados Recebidos: 0
11 anos 10 meses atrás #9393
por Alessandro Villar
Respondido por Alessandro Villar no tópico Re: Rotina para finalizar a Ordem de Separação
Obrigado, irei implementar aviso se deu certo.
abraço.
abraço.
Por favor Acessar ou Registrar para participar da conversa.
- Alessandro Villar
- Autor do Tópico
- Desconectado
- Membro Especialista
-
Menos
Mais
- Postagens: 121
- Obrigados Recebidos: 0
11 anos 10 meses atrás #9399
por Alessandro Villar
Respondido por Alessandro Villar no tópico Re: Rotina para finalizar a Ordem de Separação
O que esse trecho faz?
+chr(13)+chr(10)+
obrigado !!
+chr(13)+chr(10)+
obrigado !!
Por favor Acessar ou Registrar para participar da conversa.
- lalberto
-
- Desconectado
- Administrador
-
Menos
Mais
- Postagens: 3676
- Obrigados Recebidos: 6
11 anos 10 meses atrás #9400
por lalberto
Luiz Alberto Vieira Alves
Proprietário
55 (12) 9 8256-5905 (Vivo)
www.3lsystems.com.br
www.masteradvpl.com.br
Respondido por lalberto no tópico Re: Rotina para finalizar a Ordem de Separação
Alessandro isso representa um ENTER como marcação de fim de linha ok. Chr(13)
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.
- Alessandro Villar
- Autor do Tópico
- Desconectado
- Membro Especialista
-
Menos
Mais
- Postagens: 121
- Obrigados Recebidos: 0
11 anos 10 meses atrás #9402
por Alessandro Villar
Respondido por Alessandro Villar no tópico Re: Rotina para finalizar a Ordem de Separação
Ah entendi,
viu como que faço para retirar de uma rotina o validperg já coloquei ele como .F. e nada. é uma rotina de impressao eu nao quero que o usuário precise ficar preenchendo os parametros, quero que saia para impressao ja.
viu como que faço para retirar de uma rotina o validperg já coloquei ele como .F. e nada. é uma rotina de impressao eu nao quero que o usuário precise ficar preenchendo os parametros, quero que saia para impressao ja.
Por favor Acessar ou Registrar para participar da conversa.
- Fórum
- Protheus/Microsiga/Totvs
- AdvPL (Advanced Protheus Language)
- Dúvidas Gerais
- Rotina para finalizar a Ordem de Separação
Tempo para a criação da página:0.158 segundos