DICAS 2102 - WINDEV WEBDEV MOBILE - DATA 28 - TimeToString

---

---

---

ErpMatos - TgsSistemas

skype:amarildo.matos.informatica

email: amarildo.matos@gmail.com

whats: 51984197742

Youtube: Amarildo Matos

http://www.amarildomatos.com.br

---

https://youtu.be/qzkqFp0OzkI

---

ErpMatos - TgsSistemas
skype:amarildo.matos.informatica
email: amarildo.matos@gmail.com
whats: 51984197742
Youtube: Amarildo Matos
http://www.amarildomatos.com.br

www.windev.com
https://www.pcsoft.fr/webinaires.htm?p=forumpcs
https://forum.pcsoft.fr/fr-FR/pcsoft.br.windev/page/1.awp
https://www.windev.com/windev/WD-Express.htm
https://www.windev.com/windevmobile/WM-Express.htm
https://groups.google.com/forum/#!forum/amarildowindev
http://windevdesenvolvimento.blogspot.com.br/2017/07/menu-blog.html

https://windevdesenvolvimento.blogspot.com/2019/05/dicas-2102-windev-webdev-mobile-data-28.html

https://help.windev.com/en-US/?3027023&name=TimeToString



=====================================================

BOM DIA,SEJA BEM VINDOS A MAIS UMA VIDEO AULA. ESSA AULA ESTA SENDO GRAVADA NO DIA 07 05 2019. DICA 2102.
VOU MOSTRAR COMO APARECER A HORA EM HH MM.

DICAS 2102 - WINDEV WEBDEV MOBILE - DATA 28 - TimeToString

==========================

// BTN_FORMATAR_HORA

STC_MOSTRA_HORA_FORMATADO=TimeToString(Now(),"A Hora é HH MM")

---

---

Blog - WinDev - Curso Datas - 001/... - Diferença entre Datas - Duração
Blog - WinDev - Curso Datas - 002/... - Data - Função Dia da Semana - DateToDay
Blog - WinDev - Curso Datas - 003/... - Transformar Data Texto em Data Date
Blog - WinDev - Curso Datas - 004/... - Transformar Data Date em Texto
Blog - WinDev - Curso Datas - 005/... - Date em Texto - "2016-02-15T12:10:00-3:00" - DateToString
Blog - WinDev - Curso Datas - 006/... - Diferença entre Datas - DateDifference
Blog - WinDev - Curso Datas - 007/... - Saber o Ultimo Dia do Mes - LastDaOfMonth
Blog - WinDev - Curso Datas - 008/... - Mostra idade - Age
Blog - WinDev - Curso Datas - 009/... - Mes e Ano Corrente - CurrentMonth/CurrentYear
Blog - WinDev - Curso Datas - 010/... - Texto em Data - DateToString
Blog - WinDev - Curso Datas - 011/... - Inteiro Para Data - IntegerToDate
Blog - WinDev - Curso Datas - 012/... - Pegar Hora - Now
Blog - WinDev - Curso Datas - 013/... - Texto Para Data - StringtoDate
Blog - WinDev - Curso Datas - 014/... - Diferença Tempo - TimeDifference
Hoje -Data Hoje - DateSys() - Blog - WinDev - Curso Datas - 015/... 
Dia Mes Ano - Separar da Data - WinDev Data 016/...
TIMER - COM HORA - DATA 017 - AULA 1265

DIFERENCA ENTRE DATAS - AGE - DATAS 018 - AULA 1266
DATETOSTRING - AULA 1330 WINDEV DATA 019 

SEPARAR DIA MES E ANO - DICAS 1772 - PUBLICA - WINDEV 23 - DATAS 020 - 

DATETOSTRING - DATA FORMADO DD/MM/AAAA - 1793 - PUBLICA - WINDEV 23 -21
LastDayOfMonth - ULTIMO DIA DO MES - 1883 - PUBLICA - WINDEV_23 - DATA 22 - 

MONTH - ALTERAR MES - DICAS 1930 - PUBLICA - WINDEV - DATAS 23 - 
DateToDay - PEGAR DIA SEMANA - DICAS 1933 - PUBLICA - WINDEV - DATAS 24 - 

DICAS 1986 - WINDEV - DATA 25 - DateDifference - DIFERENCA ENTRE DATAS
DICAS 2089 - WINDEV MOBILE - DATA 26 - TODAY - DATA HOJE
WINDEV MOBILE - DICAS 2091 - WINDEV - DATA 27 - DATETOSTRING
DICAS 2102 - WINDEV WEBDEV MOBILE - DATA 28 - TimeToString
DICAS 2106 - WINDEV WEBDEV MOBILE - DATA 29 - StringToDuration - DateTimeDifference

---

---

---

---

---

Curso WinDev - Datas - 005 - Transformar Data Date em Texto - DateToString-"2016-02-15T12:10:00-3:00"

---

---

---

Video youtube

---

Blog - WinDev - Curso Datas - 001/... - Diferença entre Datas - Duração
Blog - WinDev - Curso Datas - 002/... - Data - Função Dia da Semana 
Blog - WinDev - Curso Datas - 003/... - Transformar Data Texto em Data Date
Blog - WinDev - Curso Datas - 004/... - Transformar Data Date em Texto
Blog - WinDev - Curso Datas - 005/... - Date em Texto - "2016-02-15T12:10:00-3:00"
Blog - WinDev - Curso Datas - 006/... - Diferença entre Datas - DateDifference
Blog - WinDev - Curso Datas - 007/... - Saber o Ultimo Dia do Mes - LastDaOfMonth
Blog - WinDev - Curso Datas - 008/... - Mostra idade - Age
Blog - WinDev - Curso Datas - 009/... - Mes e Ano Corrente - CurrentMonth/CurrentYear
Blog - WinDev - Curso Datas - 010/... - Texto em Data - DateToString
Blog - WinDev - Curso Datas - 011/... - Inteiro Para Data - IntegerToDate
Blog - WinDev - Curso Datas - 012/... - Pegar Hora - Now
Blog - WinDev - Curso Datas - 013/... - Texto Para Data - StringtoDate

---

http://doc.windev.com/en-US/?3027025&name=datetostring_function

http://doc.pcsoft.fr/fr-FR/?3027025&name=dateverschaine_fonction 

---

Nessa aula vou mostrar outra forma de transformar date em texto, dica do Angelo Reis

In this lecture I will show another way to turn date text, Angelo Reis hint

Dans cette conférence, je vais vous montrer une autre façon de tourner la date texte, Angelo Reis soupçon 

---

SAI_dataTexto=DateToString(SAI_dataDate,"DD/MM/YYYY")+"T"+TimeToString(Now(),"hh:mm:ss")+"-03:00"

//-"2016-02-15T12:10:00-3:00"

---

---

---

Windev - Data e hora

---

VIDEO - SOBRE DATA HORA

Windev - Curso Iniciante - 21/... - Hora - Separar Hora/Min/Seg

---

VIDEO - WINDEV CURSO INICIANTE 21-HORA

---

---

---

Blog - Curso Iniciante /1/... - Inicio
Blog - Curso Iniciante /2/... - Menu
Blog - Curso Iniciante /3/... Campos  
Blog - Curso Iniciante /4/... - Duvida/Style
Blog - Curso Iniciante /5/... - Menu
Blog - Curso Iniciante /6/... - Menu 2
Blog - Curso Iniciante /7/... - If / ShellExecute  
Blog - Curso Iniciante /8/... - ReturntoCapture 
Blog - Curso Iniciante /9/... - Info
Blog - Curso Iniciante /10/.. - DateSys - Now
Blog - Curso Iniciante /11/... - Criando Analise Agenda 
Blog - Curso Iniciante /12/... - Menu , Agenda
Blog - curso Iniciante /13/... - HreadSeek  
Blog - curso Iniciante /14/... - For Each - Percorrer Tabela 
Blog - Curso Iniciante /15/... - Query Consultas
Blog - Curso Iniciante /16/... - Tabela Relatorio
Blog - Curso Iniciante /17/... - Relatorio Criando 
Blog - Curso Iniciante /18/... - Relatorio Manual 
Blog - Curso Iniciante /19/.. - Menu Popup
Blog - Curso Iniciante /20/... - Data - Separar dia mes e ano
Blog - Curso Iniciante /21/... - Time - Separar hora/min/seg 
Blog - Curso Iniciante /22/... - Operadores
Blog - Curso Iniciante /23/... - String Igualdade 
Blog - Curso Iniciante /24/... - Switch / Case
Blog - Curso Iniciante /25/... - LOOP 
Blog - Curso Iniciante /26/... - FOR
Blog - Curso /27/... - Extern 
Blog - Curso /28/... - My 
Blog - Curso /29/... Procedures
Blog - Curso /30/... HSave  .. - Inclui Um Registro
Blog - Curso /31/... - Hsave - Altera um Registro
Blog - Curso /32/... - HDelete - Exclui Registro(s)
Blog - Curso /33/... - Relatorio
Blog - Curso /34/... - Dialog 
Blog - Curso /35/... - Input
blog - Curso /36/... - Combox 
Blog - Curso /37/... Combox Tabela 
Blog - Curso /38/... List Box
Blog - Curso /39/... - Analise Agenda/Ligacoes
Blog - Curso /40/... - Rad - Tabela Relacionada Agenda/Ligações
Blog - Curso /41/... - Tabela Relacionada Manual
Blog - Curso /42/... - Dica Tela/Code Separado
Blog - Curso /43/... - Mapa /1..
Blog - Curso /44/... - Mapa /2.. Imprime
Blog - Curso /45/... - Fechar Programa - EndPrograma()
Blog - Curso /46/... - Camera Habilita/Desabilita 
Blog - Curso /47/... - Tabela e Formulario - Configurar Cnpj
Blog - Curso /48/... - Camera - Tirar Uma Foto e Gravar Imagem
Blog - Curso /49/... - Reports e Queies - Instalacao
Blog - Curso /50/... Reports e Queies - Relatorio - Como Gerar 
Blog - Curso /51/... Pedidos/Orcamento 1/... Analise
Blog - Curso /52/... Pedidos/Orcamento 2/.. Analise Windev
Blog - Curso /53/... Pedidos/Orcamento 3/... Relacionamento
Blog - Curso /54/... Pedidos Orcamento 4/... Rad
Blog - Curso /55/... Pegar Quantidade e Codigo - Separador * 
Blog - Curso /56/... Pegar Retorno de Uma Tabela e colocar Campo 
Blog - Curso /57/... Xml - Ler Conteudo Tags e Importar Pedido
Blog - Curso /58/... Ini - Ler e Gravar 
Blog - Curso /59/... Pedidos Orcamento 5/... Inicio Digitacao Pedido
Blog - Curso /60/... Pedidos Orcamento 6/... Digitando Iten Pedido
Blog - Curso /61/... Pedidos orcamento 7/... Gravando Pedido e Itens   
Blog - Curso /62/... Pedido Orcamento 8/... Consulta cliente   
Blog - Curso /63/... Tabela - Ancorar Coluna
Blog - Curso /64/... Tabela - Esconder ou Mostrar Coluna 
Blog - Curso /65/... RSS 
Blog - Curso /66/... Pedido Orcamento 9/... Consulta Material
Blog - Curso /67/... Tabelas, Control F Pesquisa Toda Tabela /Contenha/Cor Fundo
Blog - Curso /68/... Pedidos Orcamento 10/... Planos - Condições Pagamento 
Blog - Curso /69/... - Calculadora dentro do Campo Valor 
Blog - Curso /70/... Mapa - Itinerario
Blog - Curso /71/... Tabela - Alterar Nome Coluna
Blog - Curso /72/... Botal Fazer Menu popup 
Blog - Curso /73/... Debug - Como Usar
Blog - Curso /74/... Tabela Alinhar Coluna Lado Esquerdo 
Blog - Curso /75/... Pedidos Orcamento 11/... Quantidade /Mascara/Mudar
Blog - Curso /76/... YesNo - Pergunta Se Deseja Eliminar 
Blog - Curso /77/... Select - Case - Query
Blog - Curso /78/... Pedido/Orcamento 12/... - Analise Cond.Pagto
Blog - Curso /79/... Campos - Como Alterar configuracao via Codigo
Blog - Curso /80/... Pedido/Orcamento 13/... - Tabela,Gerar Condicoes/Parcelas
Blog - Curso /81/... Configuracao Trocar Exe para Wdl ou outro 
Blog - Curso /82/... Utilitarios - PopUp - Aumento Precos Materiais 
Blog - Curso /82/... TableEnableFilter - Digita Nome e Filtra 
Blog - Curso /83/... TableEnableFilter - Digita Nome e Filtra 
Blog - Curso /84/... Dica Copiar Colar Texto Ou Imagen Pdf
Blog - Curso /85/... SElect Como Usar Wizard 
Blog - Curso /86/... Radio - Colocar tudo Mesma Linha
Blog - Curso /87/... Procedure - Melhoria Versao20 - Parametros
Blog - Curso /88/... Style - Tabela Como Alterar
Blog - Curso /89/... Style - Tab Como Alterar
Blog - Curso /90/... Pedido/Orcamento 14/... - Style - Mudando Botao Procura
Blog - Curso /91/... - Pedido/Orcamento 15/... - Pedido - Totalizar Colunas Tabela
Blog - Curso /92/... Backup - Hyperfile 
Blog - Curso /93/... Debug - STOP 
Blog - Curso /94/... Tabela - Alterar Cor da Coluna - Texto
Blog - Curso /95/... Select Max - Pegar o Numero Proxima Nota 
Blog - Curso /96/... Tabela Divisao de Muitas Colunas 
Blog - Curso /97/... Analise - Configurar Campo para Vir Automatico Combox 
Blog - Curso /98/... Tabela - Double click - Entrar direto Alteração do Cliente 
Blog - Curso /99/... Tabela MultiSeleção
Blog - Curso/100/... Tabela - TableMoveLine - Move Linha Baixou ou Cima
Blog - Curso/101/... TableAjust - Ajustar Tabela com Colunas
Blog - Curso/102/... TableSort - Ordem nas Colunas

HORA - NOW

HORA - NOW

EDT_HORA = Now()

[WX] Trabalhando com datas, horas, verificando diferenças entre elas e somando minutos

http://forum.pcsoft.fr/pt-BR/pcsoft.br.windev/149-trabalhando-com-datas-horas-verificando-diferencas-entre-elas/read.awp

adrianoboller #1

Membro registado 761 mensagems Publicado em março, 04 2015 - 10:50 PM ############################################################### Trabalhando com datas, horas, verificando diferenças entre elas e somando minutos ############################################################### Procedure ws_verifica_hora_servidor(DataHoraMobile) Q is int = 0 ok, DataHoraValida, OkConn is boolean = False Resultado is string= "" dsQryDataHora is Data Source DataHoraServidor is string = "" OkConn = HOpenConnection(ConnNativa) //Valida intervalo valido DataHoraServidorMaior, DataHoraServidorMenor, DataHoraMobileCompara is DateTime //Data e Hora do Servidor IF OkConn = True AND DataHoraMobile <> "" AND DataHoraMobile <> Null THEN //Ex.: 20150304154034447 ok = HExecuteSQLQuery(dsQryDataHora, ConnNativa, hQueryWithoutCorrection,"Select CURRENT_TIMESTAMP as datahoraatual") IF ok = True THEN FOR EACH dsQryDataHora DataHoraServidor = dsQryDataHora.datahoraatual END END //Tamanho padrao IF Length(DataHoraMobile) < 17 THEN Q = 17 - Length(DataHoraMobile) DataHoraMobile = DataHoraMobile + RepeatString("0", Q) END IF Length(DataHoraServidor) < 17 THEN Q = 17 - Length(DataHoraServidor) DataHoraServidor = DataHoraServidor + RepeatString("0", Q) END //Ex.: 20150304154034000 // 12345678901234567 DataHoraServidorMaior..Year = Middle(DataHoraServidor,01,04) DataHoraServidorMaior..Month = Middle(DataHoraServidor,05,02) DataHoraServidorMaior..Day = Middle(DataHoraServidor,07,02) DataHoraServidorMaior..Hour = Middle(DataHoraServidor,09,02) DataHoraServidorMaior..Minute = Middle(DataHoraServidor,11,02) DataHoraServidorMaior..Minute += 30 //+30 min //Ex.: 20150304154034000 // 12345678901234567 DataHoraServidorMenor..Year = Middle(DataHoraServidor,01,04) DataHoraServidorMenor..Month = Middle(DataHoraServidor,05,02) DataHoraServidorMenor..Day = Middle(DataHoraServidor,07,02) DataHoraServidorMenor..Hour = Middle(DataHoraServidor,09,02) DataHoraServidorMenor..Minute = Middle(DataHoraServidor,11,02) DataHoraServidorMenor..Minute -= 30 //-30 min //Ex.: 20150304154034000 // 12345678901234567 DataHoraMobileCompara..Year = Middle(DataHoraMobile,01,04) DataHoraMobileCompara..Month = Middle(DataHoraMobile,05,02) DataHoraMobileCompara..Day = Middle(DataHoraMobile,07,02) DataHoraMobileCompara..Hour = Middle(DataHoraMobile,09,02) DataHoraMobileCompara..Minute = Middle(DataHoraMobile,11,02) // 20150304154034447 >= 20150304161034447 20150304154034447 <= 20150304151034447 IF Val(DataHoraMobileCompara) >= Val(DataHoraServidorMaior) OR Val(DataHoraMobileCompara) <= Val(DataHoraServidorMenor) THEN DataHoraValida = False ELSE DataHoraValida = True END END Resultado += "<Xml><Retorno>" Resultado += "<AbriuConnexao>" + OkConn + "</AbriuConnexao>" Resultado += "<DataHoraServidor>" + DataHoraServidor + "</DataHoraServidor>" Resultado += "<DataHoraValida>" + DataHoraValida + "</DataHoraValida>" IF OkConn = True Resultado += ws_conexao_sucesso("Tabelas") ELSE Resultado += ws_conexao_falha("Tabelas") END OkConn = HCloseConnection(ConnNativa) Resultado += "<FechouConnexao>" + OkConn + "</FechouConnexao>" Resultado += "</Retorno></Xml>" RESULT(Resultado)

SINCRONIZA HORARIO COM A HORA DO SERVIDOR

//Example Synchronizes TIME with SERVER TIME
//SINCRONIZA HORARIO COM A HORA DO SERVIDOR

PathFile is string = fCurrentDir(fCurrentDrive()) +"\Nagyro.ini"
IF CBOX_Sincronizar..Value = True THEN
Sincronizar = "S"
ok is boolean = INIWrite("Nagyro", "Sincronizar", Sincronizar , PathFile)
IF ErrorOccurred = True AND Sincronizar = "" THEN
Error()
END
ELSE
Sincronizar = "N"
ok is boolean = INIWrite("Nagyro", "Sincronizar", Sincronizar , PathFile)
IF ErrorOccurred = True AND Sincronizar = "" THEN
Error()
END
END

IF Sincronizar = "S" THEN
ExeRun("NET TIME \\192.168.1.180 /SET /YES",exeIconize,exeDontWait)
END

HORA - PEGAR HORA,MINUTOS,SEGUNDOS

HORA - PEGAR HORA,MINUTOS,SEGUNDOS

//EDT_HORA = NOW()
tHORA_ATUAL is Time
tHORA_ATUAL=EDT_HORA
EDT_RESULTADO = tHORA_ATUAL..Hour + " HORAS "
EDT_RESULTADO = EDT_RESULTADO + tHORA_ATUAL..Minute + " MINUTOS "
EDT_RESULTADO = EDT_RESULTADO + tHORA_ATUAL..Second + " SEGUNDOS "