sexta-feira, 17 de fevereiro de 2017

Aula 1068 - Windev - Comandos 13/... - Procedure - Duas Maneiras de Mandar Informacao









Video no Youtube Se Gostou clique aqui para dar joinha


http://doc.windev.com/en-US/?1000018907


// Procedure - Duas Maneiras de Mandar Informacao

PROCEDURE rotina_teste(d_recebe_data is Date="", ...
                       s_recebe_texto is string="")
Info(d_recebe_data)
Info(s_recebe_texto)

//Chama Procedure
//d_manda_data is date=EDT_Date
//s_manda_texto is string=EDT_Text1
//
//rotina_teste(d_manda_data,s_manda_texto)

rotina_teste.d_recebe_data=EDT_Date
rotina_teste.s_recebe_texto=EDT_Text1
rotina_teste()
//Em vez de Mandar os parametros, dentro de uma linha
//mandei os parametros individual







Windev Curso Comandos/1 ... Condição - If
Windev Curso Comandos/2 ... Condição - Switch
Windev Curso Comandos/3 ... Loop
Windev Curso Comandos/4 ... WHILE
Windev Curso Comandos/5 ... For
Windev Curso Comandos/6 ... For Tabelas
Windev Curso Comandos/7 ... For String 
Windev Curso Comandos/8 ... For Table
Windev Curso Comandos/9 ... Stop 
Windev Curso Comandos/10 ... BrowserRunApp
Windev Curso Comandos/10 ... With
Windev Curso Comandos/11 ... Executecode
Procedure - Duas Maneiras - Comandos 12/...
PROCEDURES 2 MANEIRAS MANDAR INFORMACOES - COMANDOS 013 / AULA 1068
ARREDONDAMENTO - COMANDOS 014 / AULA 1193

















quinta-feira, 16 de fevereiro de 2017

Aula 1067 - Windev - Xml 9/... - Ler um Xml de Nota Fiscal Eletronica









Video no Youtube Se Gostou clique aqui para dar joinha





//Ler um Xml de Nota Fiscal Eletronica
//Pegar Numero da Nota e data emissao
//Pegar dados dos Itens dos Produtos

//Ler Xml, Colocar dados e Preencher tabela com Produtos
xml_nfe is a xmlDocument = XMLOpen (edT_xml,fromString)
Trace("Operacao:"+xml_nfe.NFe.infNFe.natOp) //Mostrar na Tela natOp
Trace("Emitente:"+xml_nfe.NFe.infNFe.emit.xNome)
Trace("infnfe Id:"+xml_nfe.NFe.infNFe..Attribut[1])
Trace("infnfe Versao:"+xml_nfe.NFe.infNFe..Attribut[2])
SAI_NumeroNota=xml_nfe.NFe.infNFe.ide.nNF
_data_string is string=xml_nfe.NFe.infNFe.ide.dhEmi
_data is Date=""
_data..Year=_data_string[[1 TO 4]]
_data..Month=_data_string[[6 TO 7]]
_data..Day=_data_string[[9 TO 10]]
SAI_data_emissao=_data
TableDeleteAll(TABLE_itens_nota) // Limpa Tabela
det is xmlNode
FOR EACH det OF xml_nfe.NFe.infNFe on det
    Trace("ocor"+det..Occurrence) // Quantos itens tem
    Trace("nItem"+det..Attribut[1]) // Mostrar o que tem nItem
    Trace("Imposto vTotTrib:"+det.imposto.vTotTrib)
    Trace("Produto:"+det.prod.xProd)
    TableAddLine(TABLE_itens_nota) // Adicionando a tabela
    n_ocorrencia is int= TABLE_itens_nota..Occurrence //vou ter o numero atual linha tabela
    TABLE_itens_nota.COL_Iten[n_ocorrencia]=det..Attribut[1]
    TABLE_itens_nota.COL_Produto[n_ocorrencia]=det.prod.xProd
    TABLE_itens_nota.COL_Valor_Tributo[n_ocorrencia]=det.imposto.vTotTrib   
END



WinDev - Xml - 001/... Criar um Xml
WinDev - Xml - 002/... Ler Xml Aula 1/...
WinDev - Xml - 003/... Ler Xml Aula 2/...
WinDev - Xml - 004/... Ler Xml Aula 3
WinDev - Xml - 005/... XmlRead - Retirar Tag
WinDev - Xml - 006/... Sefaz Gratuito-Ler Xml Cliente/Gravar
WinDev - Xml - 007/... Utf8ToString
Ler Xml e Colocar Tabela - WinDev - Xml - 008/...
Ler Xml Nfe - WinDev - Xml 009
LER ITENS XML - DOCZIP MANIFESTACAO - XML 010 - AULA 1187


















quarta-feira, 15 de fevereiro de 2017

Aula 1066 - Windev - Sql 20/... - Limit









Video no Youtube Se Gostou clique aqui para dar joinha



http://doc.windev.com/en-US/?2034005&name=SQL_functions_Editor#NOTE2_LIMIT
http://doc.windev.com/en-US/?2034005&name=SQL_functions_Editor




Blog - Curso Sql/1 ... NVL - Select/Update -> NVL
Blog - Curso Sql/2... - Data - Ultimo Dia do mes - Select Last_Day() - Ultimo dia Do Mes
Blog - Curso Sql/3... - Data Mes - Months_BetWeen
Blog - Curso Sq/4 ... - Data e Hora Atual - SysDate - Hora e Data Atual
Blog - Curso Sq/5 ... - Decode
Blog - Curso Sql/6... - Posicao - Select Instr
Blog - Curso Sql/7... - Posicao - Select Instr - Procura posicao 
Blog - Curso Sql/8... - Count - Select count 
Blog - Curso Sql/9... - Maximo - Select Max,Min,Count,Avg
Blog - Curso Sql/10... - Strings - Modifica Strings-Minuscula/Maiscula
Blog - Curso Sql/11... - Tamanho Campo - Len
Blog - Curso Sql/12... - Data - Select - Pegar Dia/mes/Ano 
Blog - Curso Sql/13... - Data - Select Betwen /2/ - Intervalo Data
Blog - Curso Sql/14... - Foto -  ALTER TABLE veiculo ADD foto BLOB
Blog - Curso Sql/15... - Elimina Tabela - Dropt Table - Eliminar Uma Tabela Dentro WinDev 
Blog - Curso Sql/16... - Procurar - Like - Pesquisar Cidade combox 
Blog - Curso Sql/17... - String - Select - Wl.ExtractString 
Blog - Curso Sql/18... - Cnpj - fazer Queue - Ver se Existe Cnpj/Cpf
Blog - Curso Sql/19... - Colorir as Linhas Sql
Limit - Limitar Informações - Curso Sql/20 ... - Limit
SqlCode - Ver Conteudo da Qry - Sql / 021




// Mostra Dados como Limite de Informações
// Vou determinar qual maximo de informaçoes vou mostrar
// e colocar numa tabela

QRY_notas_ler.parametro_limite=EDT_limite
FileToMemoryTable(TABLE_notas,QRY_notas_ler)

--Qry Notas Ler com Limite
SELECT
nota_fiscal.id_empresa_nota_fiscal AS NumeroNota,
nota_fiscal.data_emissao AS Emissao
FROM
nota_fiscal
WHERE
nota_fiscal.id_empresa=1
AND
nota_fiscal.nfe_situacao_xml=0
AND
nota_fiscal.id_empresa_tipo_nota=2
ORDER BY
nota_fiscal.id_empresa_nota_fiscal DESC
LIMIT {parametro_limite}

// Mostra Dados como Limite de Informações

QRY_notas_ler.parametro_limite=EDT_limite
FileToMemoryTable(TABLE_notas,QRY_notas_ler)





















terça-feira, 14 de fevereiro de 2017

Aula 1065 - Windev - Tabela 045/... - FileToMemoryTable









Video no Youtube Se Gostou clique aqui para dar joinha



http://doc.windev.com/en-US/?3074005&name=FileToMemoryTable




// Nessa aula, vou criar uma tabela com colunas da Query
// com FileToMemoryTable vamos preencher tabela com a query


FileToMemoryTable(TABLE_clientes,QRY_cliente_ler)






WinDev - Tabela - 001/... Ancorar Tabela e coluna
WinDev - Tabela - 002/... Esconder ou Mostrar Coluna Tabela 
WinDev - Tabela - 003/... Mudar Cor e Fundo da Coluna da Tabela 
WinDev - Tabela - 004/... Mudar Largura e Fonte da Coluna da Tabela 
WinDev - Tabela - 005/... Coluna de valor Deixar em Branco 
WinDev - Tabela - 006/... Alterar Nome,Cor,Cor de Fundo da Coluna da Tabela 
WinDev - Tabela - 007/... Alterar ordem das Colunas por Programacao
WinDev - Tabela - 008/... TableSeek Pesquizar se Existe
WinDev - Tabela - 009/... TableSelectPlus - Seleciona Iten tabela
WinDev - Tabela - 010/... TableSort - Classifica Coluna
WinDev - Tabela - 011/... Zoom
WinDev - Tabela - 012/... for Each Row Of - Percorrer
WinDev - Tabela - 013/... Selecionar Varias Linhas
WinDev - Tabela - 014/... Balao - Tabela ToolTip
WinDev - Tabela - 015/... Coluna Contrainer
WinDev - Tabela - 016/... Sum - Como Mudar Nome
WinDev - Tabela - 017/... TableInfoXY - Saber Nome,Posição e Linha da Coluna 
WinDev - Tabela - 018/... Guardar e Recuperar Posição Tabela
WinDev - Tabela - 019/... TableInputsearch
WinDev - Tabela - 020/... Descobrir Posição cliente Novo
WinDev - Tabela - 021/... Saber quantos e nome das Colunas
WinDev - Tabela - 022/... Tableselect - Selecionar varias linhas tabela e Ler
WinDev - Tabela - 023/... BuildBrowsingTable - Cria Tabela Manual
WinDev - Tabela - 024/... Somar Valor Tabela Automatico ou Manual - rowtotal
WinDev - Tabela - 025/... Eventos no cabecalho da Tabela
WinDev - Tabela - 026/... Tabela - Break - Totalizadores
WinDev - Tabela - 027/... Tabela - Colorir Linha
WinDev - Tabela - 028/... Double click Na seleção Item
WinDev - Tabela - 029/... Tabela - Descrição, Em Varias Linhas Coluna Tabela
WinDev - Tabela - 030/... Tabela - Fazer titulos com colunas
WinDev - Tabela - 031/... Tabela - Sql - Query - Agrupar Datas Nas Notas
WinDev - Tabela - 032/... Pintando Tabela
WinDev - Tabela - 033/... FOR EACH / WHERE / on / Ordem
WinDev - Tabela - 034/... Filter 
WinDev - Tabela - 035/... HFilter
WinDev - Tabela - 036/... Ultimo Registro - TableSelectPlus
WinDev - Tabela - 037/... Desabilitar Edição Tabela
WinDev - Tabela - 038/... Pesquisa - TableEnableFilter
Blog - WinDev - Relatorio - 039/... Copias - IParameter - Icopies
WinDev - Tabela - 040/... Cor Negativo Coluna Saldo
WinDev - Tabela - 041/... - Criar Tabela via programação
Borda - TAbela - 042/... - Novidade Windev22
..VisibleInExportAndPrint - Colunas Nao Levar Exportar e Imprimir - WinDev - Tabela - 043
BuildBrowsingTable - Monta Tabelas Automaticamente - WinDev - Tabelas - 044
FileToMemoryTable - Monta Tabela Query - WinDev - Tabela - 045
Titulos e SubTitulos - Tabela - 046/...





















segunda-feira, 13 de fevereiro de 2017

Aula 1064 - Windev - Tabela 044/... - BuildBrowsingTable









Video no Youtube Se Gostou clique aqui para dar joinha



http://doc.windev.com/en-US/?3074002&name=BuildBrowsingTable



WinDev - Tabela - 001/... Ancorar Tabela e coluna
WinDev - Tabela - 002/... Esconder ou Mostrar Coluna Tabela 
WinDev - Tabela - 003/... Mudar Cor e Fundo da Coluna da Tabela 
WinDev - Tabela - 004/... Mudar Largura e Fonte da Coluna da Tabela 
WinDev - Tabela - 005/... Coluna de valor Deixar em Branco 
WinDev - Tabela - 006/... Alterar Nome,Cor,Cor de Fundo da Coluna da Tabela 
WinDev - Tabela - 007/... Alterar ordem das Colunas por Programacao
WinDev - Tabela - 008/... TableSeek Pesquizar se Existe
WinDev - Tabela - 009/... TableSelectPlus - Seleciona Iten tabela
WinDev - Tabela - 010/... TableSort - Classifica Coluna
WinDev - Tabela - 011/... Zoom
WinDev - Tabela - 012/... for Each Row Of - Percorrer
WinDev - Tabela - 013/... Selecionar Varias Linhas
WinDev - Tabela - 014/... Balao - Tabela ToolTip
WinDev - Tabela - 015/... Coluna Contrainer
WinDev - Tabela - 016/... Sum - Como Mudar Nome
WinDev - Tabela - 017/... TableInfoXY - Saber Nome,Posição e Linha da Coluna 
WinDev - Tabela - 018/... Guardar e Recuperar Posição Tabela
WinDev - Tabela - 019/... TableInputsearch
WinDev - Tabela - 020/... Descobrir Posição cliente Novo
WinDev - Tabela - 021/... Saber quantos e nome das Colunas
WinDev - Tabela - 022/... Tableselect - Selecionar varias linhas tabela e Ler
WinDev - Tabela - 023/... BuildBrowsingTable - Cria Tabela Manual
WinDev - Tabela - 024/... Somar Valor Tabela Automatico ou Manual - rowtotal
WinDev - Tabela - 025/... Eventos no cabecalho da Tabela
WinDev - Tabela - 026/... Tabela - Break - Totalizadores
WinDev - Tabela - 027/... Tabela - Colorir Linha
WinDev - Tabela - 028/... Double click Na seleção Item
WinDev - Tabela - 029/... Tabela - Descrição, Em Varias Linhas Coluna Tabela
WinDev - Tabela - 030/... Tabela - Fazer titulos com colunas
WinDev - Tabela - 031/... Tabela - Sql - Query - Agrupar Datas Nas Notas
WinDev - Tabela - 032/... Pintando Tabela
WinDev - Tabela - 033/... FOR EACH / WHERE / on / Ordem
WinDev - Tabela - 034/... Filter 
WinDev - Tabela - 035/... HFilter
WinDev - Tabela - 036/... Ultimo Registro - TableSelectPlus
WinDev - Tabela - 037/... Desabilitar Edição Tabela
WinDev - Tabela - 038/... Pesquisa - TableEnableFilter
Blog - WinDev - Relatorio - 039/... Copias - IParameter - Icopies
WinDev - Tabela - 040/... Cor Negativo Coluna Saldo
WinDev - Tabela - 041/... - Criar Tabela via programação
Borda - TAbela - 042/... - Novidade Windev22
..VisibleInExportAndPrint - Colunas Nao Levar Exportar e Imprimir - WinDev - Tabela - 043
BuildBrowsingTable - Monta Tabelas Automaticamente - WinDev - Tabelas - 044
FileToMemoryTable - Monta Tabela Query - WinDev - Tabela - 045




Nessa aula vou mostrar como criar uma tabela com uma coluna
e com comando BuildBrowsingTable , fazer com
que ele coloque as colunas corretas e as preenchas

//Qry_Cliente_ler
SELECT
    cliente.razao_social_nome AS nome,
    cliente.id_cliente AS Id,
    cliente.telefone AS telefone
FROM
    cliente

//Qry_Material_Ler
SELECT
material.id_empresa_material AS id_material,
material.nome AS nome,
material.preco_venda AS preco_venda
FROM
material

//

BuildBrowsingTable(TABLE_diversos, caixa_conta, ...
    taWithAutoId+taFillTable+taInputAutoId+taItemCaption+taByLogicalOrder)
//

BuildBrowsingTable(TABLE_diversos, QRY_cliente_ler,...
  taWithAutoId+taFillTable+taInputAutoId+taItemCaption+taByLogicalOrder)

//

BuildBrowsingTable(TABLE_diversos, QRY_material_ler, taWithAutoId+taFillTable+taInputAutoId+taItemCaption+taByLogicalOrder)





























Teste

Teste
teste