quinta-feira, 16 de julho de 2015

[WD Mobile 20] Trabalhar com JSON

http://forum.pcsoft.fr/pt-BR/pcsoft.br.windev/361-mobile-20-trabalhar-com-json/read.awp


//Criar uma Structure de acordo a estrutura que vimos anteriormente
//Atenção esta declaração tem que ser feito no Global Declaration da Window, logo abaixo de PROCEDURE MyWindow() ou no Codigo inicial do projeto

STJsonPresets is structure
nIdPresets is int
nIdFilial is int
sDescricao is string
END

//Feito isso adicione o resultado que obtivestes de um Webservice ou GET a nossa Structure
//Este codigo fiz em um Botão

sResultado is string
sResultado = ws.getPresets(0) //no meu caso estou recuperando todos os registros
arrPresets is array of STJsonPresets //Criamos um array em base a nossa estrutura
Deserialize(arrPresets ,sResultado,psdJSON) //fazemos uso da função Deserialize
//Agora teremos um array carregado com o resultado
Info(arrPresets [1].sDescricao)









Exemplo de Email de Mauricio










CaminhoAnexo is string
MySession is EmailPOP3Session

MySession..ServerAddress = "pop.dominio.com.br"
MySession..Name = "nome@dominio.com.br"
MySession..Password = "senha"
MySession..Port = 110

Trace("Vai iniciar a sessão")

Conectou is boolean = EmailStartSession(MySession)

IF Conectou THEN
 Texto is string = ""
 Trace("Lendo emails")

 EmailProgressBar(PROGBAR_Email)
 arrMessage is array of Emails
 arrMessage = EmailGetAll(MySession)

 // Browse the array of messages with a FOR EACH loop
 FOR EACH AMessage OF MySession 
  IF AMessage..HTML <> ""
     Texto = AMessage..HTML
     ELSE
        Texto = AMessage..Message       
  END
 
  ControleHtml..Value = Texto
  Trace("Assunto: " + AMessage..Subject,"Data: " + AMessage..ReceiveDate,"Message ID: " + AMessage..MessageID,
       "Anexos: " + AMessage.Attach..Occurrence)
        
  IF AMessage.Attach..Occurrence > 0  
   FOR I= 1 TO AMessage.Attach..Occurrence
    CaminhoAnexo = "C:\LEVAR\ANEXO\" + AMessage..ReceiveDate +"_"+ AMessage..Attach[I]..Name
    //info(CaminhoAnexo)
    EmailSaveAttachment(AMessage..Attach[I],CaminhoAnexo)  
   END
  END
 END
ELSE
   Info(ErrorInfo(errFullDetails))
END
EmailProgressBar("")
EmailCloseSession(MySession)
[10:33:26] Mauricio Zúccolo - TID Software: É só colar esse código num botão duma window e tá funcionando
[10:34:02] Mauricio Zúccolo - TID Software: Ele lê os e-mails, e salva os anexos na pasta definida
[10:34:29] Mauricio Zúccolo - TID Software: Dá pra pegar data de envio, assunto, ID, etc
[10:34:34] Mauricio Zúccolo - TID Software: Muito legal...





Windev - Status 5 - 10/... Flexdocs








VIDEO - WINDEV - STATUS 5 - FLEXDOCS - 10/...

 




BLOG - FLEXDOCS - 1/...

 BLOG - FLEXDOCS - 2/... REGISTRAR

BLOG - FLEXDOCS - 3 /... IMPORTAR DLL 

BLOG - FLEXDOCS - 4/... - INSTANCIAR FLEXDOCS

BLOG - FLEXDOCS - 5/... - CERTIFICADO 

BLOG - FLEXDOCS - 6/... STATUS

BLOG - FLEXDOCS - 7/... - STATUS 2 CERTIFICADO

BLOG - FLEXDOCS - 8/... - STATUS 3

BLOG - FLEXDOCS - 9/... STATUS 4 

BLOG - FLEXDOCS - 10/... STATUS 5

BLOG - FLEXDOCS - 11/ STATUS 6 - 

BLOG - FLEXDOCS - 12/STATUS 7-FINAL

BLOG - FLEXDOCS - 13/CONSULTA CADASTRO

BLOG - FLEXDOCS - 14/.. Cria Chave Nfe

BLOG - FLEXDOCS - 15/... - IDE

BLOG - FLEXDOCS - 16/... - EMITENTE

BLOG - FLEXDOCS - 17/... - DESTINATARIO

BLOG - FLEXDOCS - 18/... - DESTINATARIO LOCAL ENTREGA

BLOG - FLEXDOCS - 19/... - DETALHE PRODUTO/A

BLOG - FLEXDOCS - 20/... DETALHE ICM

BLOG - FLEXDOCS - 21/... IMPOSTOS RESTANTES

Windev - Curso Iniciante - 22/... - Operadores -



VIDEO - CURSO INICIANTE - 22- OPERADORES

 













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

Sécuriser l'accès à vos fonctions WLangage grâce aux énumérations et combinaisons de WINDEV

https://www.youtube.com/watch?v=HXcXnE35Nto




































Query - Criar uma para ahcar um dado

Query - Criar uma para ahcar um dado

QRY_PROCURA_FORNECEDOR.Param_idempresa=duplicata_pagar.id_empresa
                        QRY_PROCURA_FORNECEDOR.Param_idempresaFornecedor=duplicata_pagar.id_fornecedor
                        HExecuteQuery(QRY_PROCURA_FORNECEDOR)
                        FOR EACH QRY_PROCURA_FORNECEDOR
                            duplicata_pagar.id_fornecedor=QRY_PROCURA_FORNECEDOR.IdFornecedor
                        END


exemplos query

exemplos query


Teste

Teste
teste