segunda-feira, 12 de abril de 2021

DICAS 3305 - WINDEV WEBDEV MOBILE - Como salvar e pegar email e senha - Perguntas e Repostas - 47



https://youtu.be/mwuEwhuyW-k



Bom Dia Boa Tarde Boa Noite

Mande um email pedido para receber todas notificaçoes dos videos 


Seja Membro do Canal

Esse Video vai estrear as 06:00 do dia 13/04/2021 

DICAS 3305 - WINDEV WEBDEV MOBILE - Como salvar e pegar email e senha  - Perguntas e Repostas - 47

https://windevdesenvolvimento.blogspot.com/2021/04/dicas-3305-windev-webdev-mobile-como.html


Pergunta:


   Como abrir um aplicativo,digitar o email/senha 
e quando sair do aplicativo e entrar de novo
vir ja o email e senha 

============== ler configuracao


SAI_Email=INIRead("configuracao","email","","erpmm.ini")
SAI_Mot_de_passe=INIRead("configuracao","emails","","erpmm.ini")

============== Gravar configuracao


INIWrite("configuracao","email",SAI_Email,"erpmm.ini")
INIWrite("configuracao","emails",SAI_Mot_de_passe,"erpmm.ini")


============== INDICE PERGUNTAS E RESPOSTA



========= INDICE MOBILE




PlayList WebDev tutorial Amarildo Webdev
Playlist Windev Tutorial Amarildo Windev
PlayList Windev Mobile 
Amarildo
Donwloads Windev
Windev
WxSolucoes
Matos Informatica
Repositorio Windev
Inscricao Evento Pcsof
Site forum Google 
Video sobre 3 Mil Videos Windev 
Video sobre Alfaserver servidor 





ErpMatos - TgsSistemas
skype:amarildo.matos.informatica
email: amarildo.matos@gmail.com
whats: 51984197742
Youtube: Amarildo Matos
http://www.amarildomatos.com.br
https://groups.google.com/forum/#!forum/amarildowindev

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
http://windevdesenvolvimento.blogspot.com.br/2017/07/menu-blog.html






Postado por às Nenhum comentário:
Marcadores: ,

domingo, 11 de abril de 2021

DICAS 3304 - WINDEV WEBDEV MOBILE - Acessar site e ver windev em ingles - Perguntas e Repostas - 46




https://youtu.be/cj5lEYjYhts




Bom Dia Boa Tarde Boa Noite

Mande um email pedido para receber todas notificaçoes dos videos 


Seja Membro do Canal

Esse Video vai estrear as 07:30 do dia 12/04/2021 

DICAS 3304 - WINDEV WEBDEV MOBILE - Acessar site e ver windev em ingles - Perguntas e Repostas - 46


assuntos 

Pergunta 1 
     Pessoal a versão 26 já tem em inglês? 
 Baixei instalei mas está tudo em francês. 
 Tem como passar para inglês?

Pergunta 2
     Acessar Site de dentro do Sistema 

--------------------------------------------


1a 
// abrir uma Pagina 
ShellExecute("http://www.amarildomatos.com.br/")

----------------------------------------

2a- 


// abrir uma Pagina 
HTM_NoName1="http://www.amarildomatos.com.br/"

----------------------

Pergunta 3
     Hfsql Control Center em Ingles



============== INDICE PERGUNTAS E RESPOSTA



PlayList WebDev tutorial Amarildo Webdev
Playlist Windev Tutorial Amarildo Windev
PlayList Windev Mobile 
Amarildo
Donwloads Windev
Windev
WxSolucoes
Matos Informatica
Repositorio Windev
Inscricao Evento Pcsof
Site forum Google 
Video sobre 3 Mil Videos Windev 
Video sobre Alfaserver servidor 





ErpMatos - TgsSistemas
skype:amarildo.matos.informatica
email: amarildo.matos@gmail.com
whats: 51984197742
Youtube: Amarildo Matos
http://www.amarildomatos.com.br
https://groups.google.com/forum/#!forum/amarildowindev

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
http://windevdesenvolvimento.blogspot.com.br/2017/07/menu-blog.html









Postado por às Nenhum comentário:
Marcadores: , , ,

quinta-feira, 8 de abril de 2021

DICAS 3303 - WINDEV WEBDEV MOBILE - Mostrar Tela Duplicada - NOVIDADE VERSAO 26 - AULA 37


https://youtu.be/UZQX8hUA_8s



Bom Dia Boa Tarde Boa Noite

Mande um email pedido para receber todas notificaçoes dos videos 


Seja Membro do Canal


Esse Video vai estrear as 06:00 do dia 09/04/2021 

DICAS 3303 - WINDEV WEBDEV MOBILE - Mostrar Tela Duplicada -  NOVIDADE VERSAO 26 - AULA 37


assuntos 

vou incluir um windows , como 2 planos
e vou dividir os dois planos para olhar na mesma tela 
vou mostrar como alterar um plano no lado esquerdo 
e alterar outro plano no lado direito
vou mostrar alterar tela no lado esquerdo
e codigo no lado direito






-------------------------- INDICIES NOVIDADES VERSAO 26





PlayList WebDev tutorial Amarildo Webdev
Playlist Windev Tutorial Amarildo Windev
PlayList Windev Mobile 
Amarildo
Donwloads Windev
Windev
WxSolucoes
Matos Informatica
Repositorio Windev
Inscricao Evento Pcsof
Site forum Google 
Video sobre 3 Mil Videos Windev 
Video sobre Alfaserver servidor 





ErpMatos - TgsSistemas
skype:amarildo.matos.informatica
email: amarildo.matos@gmail.com
whats: 51984197742
Youtube: Amarildo Matos
http://www.amarildomatos.com.br
https://groups.google.com/forum/#!forum/amarildowindev

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
http://windevdesenvolvimento.blogspot.com.br/2017/07/menu-blog.html




Postado por às Nenhum comentário:
Marcadores:

quarta-feira, 7 de abril de 2021

DICAS 3302 - WINDEV WEBDEV MOBILE - InvalidInputDetect - NOVIDADE VERSAO 26 - AULA 36









https://youtu.be/t_YFnE4-U90





Bom Dia Boa Tarde Boa Noite

Mande um email pedido para receber todas notificaçoes dos videos 


Seja Membro do Canal

Esse Video vai estrear as 10:00 do dia 08/04/2021 

DICAS 3302 - WINDEV WEBDEV MOBILE - InvalidInputDetect - NOVIDADE VERSAO 26 - AULA 36


assuntos 


InvalidInputDetect 
Vamos criar uma Window chamada - Digitacao de Campos 
vamos criar 3 campos, Nome , email, endereco
o Nome e email, vamos fazer ser obrigatorios 
vamos usar o comando InvalidInputDetect 
vou ensintar a colocar uma cor diferente quando nao digita 


-----------  codigo
// Gravar 

IF InvalidInputDetect() THEN
    arrQuantidade_obrigatorios is array of Champ=InvalidInputListControl()
    ToastDisplay("numeros campos obrigatorios, nao preenchidos [%CR%][%arrQuantidade_obrigatorios..Count%]")
    ReturnToCapture(arrQuantidade_obrigatorios[1])
    
END
Close(WIN_Digitacao_Campos)



-------------------------- INDICIES NOVIDADES VERSAO 26



PlayList WebDev tutorial Amarildo Webdev
Playlist Windev Tutorial Amarildo Windev
PlayList Windev Mobile 
Amarildo
Donwloads Windev
Windev
WxSolucoes
Matos Informatica
Repositorio Windev
Inscricao Evento Pcsof
Site forum Google 
Video sobre 3 Mil Videos Windev 
Video sobre Alfaserver servidor 





ErpMatos - TgsSistemas
skype:amarildo.matos.informatica
email: amarildo.matos@gmail.com
whats: 51984197742
Youtube: Amarildo Matos
http://www.amarildomatos.com.br
https://groups.google.com/forum/#!forum/amarildowindev

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
http://windevdesenvolvimento.blogspot.com.br/2017/07/menu-blog.html



Postado por às Nenhum comentário:
Marcadores:

terça-feira, 6 de abril de 2021

DICAS 3301 - WINDEV WEBDEV MOBILE - Elgin - COMO FOI FEITO PARA COPIAR PEDIDO DE UMA EMPRESA PARA OUTRA - PERGUNTAS_E_RESPOSTAS_45



https://youtu.be/ZZydC-IZmNo





Bom Dia Boa Tarde Boa Noite

Mande um email pedido para receber todas notificaçoes dos videos 


Seja Membro do Canal

Esse Video vai estrear as 06:00 do dia 08/04/2021 


DICAS 3301 - WINDEV WEBDEV MOBILE - Elgin - COMO FOI FEITO PARA COPIAR PEDIDO DE UMA EMPRESA PARA OUTRA - PERGUNTAS_E_RESPOSTAS_45


assuntos 


Vou Mostrar como eu Fiz no ErpMatos para copiar um pedido de uma empresa para outra 
No caso dupliquei o pedido 
Ensinando,como se faz , botao direito do botao 

==================codigo

// Duplicar pedido para a mesma empresa

IF TableSelect(TABLE_pedido)=-1 THEN 
RETURN
END
id_empresa_pedido_duplicar is int=TABLE_pedido.COL_IdEmpresaPedido
id_pedido_duplicar is int=TABLE_pedido.COL_id_pedido
IF id_pedido_duplicar>0 THEN
IF YesNo("Deseja duplicar o pedido"+id_empresa_pedido_duplicar) THEN
duplica_dados(id_pedido_duplicar,TABLE_pedido.COL_IdEmpresa)
END
END

====================== Codigo

// duplicar pedido com outro codigo da empresa


IF TableSelect(TABLE_pedido)=-1 THEN 
 RETURN
END
id_empresa_pedido_duplicar is int = TABLE_pedido.COL_IdEmpresaPedido
id_pedido_duplicar is int = TABLE_pedido.COL_id_pedido
IF id_pedido_duplicar>0 THEN
IF YesNo("Deseja duplicar o pedido"+id_empresa_pedido_duplicar) THEN
numero_empresa is int=0
 Input("Codigo da empresa que sera levado o pedido",numero_empresa)
 IF numero_empresa>0 THEN
 duplica_dados(id_pedido_duplicar,numero_empresa)
 END
 END
END

=================== Codigo

PROCEDURE duplica_dados(recebe_id_pedido,recebe_id_empresa_gerar)

HReadSeekFirst(pedido,id_pedido,recebe_id_pedido)
IF HFound(pedido) THEN
dados is Data Source
sql is string=[
SELECT
max(pedido.id_empresa_pedido) as ultimo
from 
pedido
where 
pedido.id_empresa=#id_empresa#
]
    sql=Replace(sql,"#id_empresa#",recebe_id_empresa_gerar)
    HExecuteSQLQuery(dados,hQueryDefault,sql)
    proximo is int=dados.ultimo+1
    // Modificando Dados do pedido 
    pedido.id_empresa_pedido=proximo
    pedido.id_empresa=recebe_id_empresa_gerar
    pedido.data_emissao=DateSys()
    pedido.faturado=False 
    pedido.data_entregue=""
    HAdd(pedido)
    // pedido ja duplicado
    //itens do pedido 
    numero_novo_id_pedido is int=pedido.id_pedido
    itenspedido is array of 0 int 
    //Vamos ler as id do pedido iten do pedido que sera copiado e colocar no array
    
    FOR EACH pedido_iten where "pedido_iten.id_pedido="+recebe_id_pedido
    itenspedido.AddLine(pedido_iten.id_pedido_iten)
    END
    ArraySort(itenspedido)
    FOR x=1 TO ArrayCount(itenspedido)
        HReadSeekFirst(pedido_iten,id_pedido_iten,itenspedido[x])
        IF HFound(pedido_iten) THEN
        // estou com pedido iten na memoria 
        pedido_iten.Id_pedido=numero_novo_id_pedido
        pedido_iten.quantidade_entrega=0
        pedido_iten.quantidade_saldo=pedido_iten.quantidade
        HAdd(pedido_iten)
        END
    END    
    InfoWithTimeout(1000,"o Numero do novo pedido:"+proximo)
    
END


============== INDICE PERGUNTAS E RESPOSTA



PlayList WebDev tutorial Amarildo Webdev
Playlist Windev Tutorial Amarildo Windev
PlayList Windev Mobile 
Amarildo
Donwloads Windev
Windev
WxSolucoes
Matos Informatica
Repositorio Windev
Inscricao Evento Pcsof
Site forum Google 
Video sobre 3 Mil Videos Windev 
Video sobre Alfaserver servidor 





ErpMatos - TgsSistemas
skype:amarildo.matos.informatica
email: amarildo.matos@gmail.com
whats: 51984197742
Youtube: Amarildo Matos
http://www.amarildomatos.com.br
https://groups.google.com/forum/#!forum/amarildowindev

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
http://windevdesenvolvimento.blogspot.com.br/2017/07/menu-blog.html







Postado por às Nenhum comentário:
Marcadores:
Assinar: Postagens (Atom)

Teste

Teste
teste