Mostrando postagens com marcador perguntas. Mostrar todas as postagens
Mostrando postagens com marcador perguntas. Mostrar todas as postagens

terça-feira, 23 de fevereiro de 2021

DICAS 3269 - WINDEV_MOBILE - COMO CRIAR COMBOX POR PROGRAMACAO E RECUPERAR VALOR - ANDROID - PERGUNTAS E REPOSTAS 30


https://youtu.be/t3g7SE2Ybdw



Bom Dia Boa Tarde Boa Noite

Seja Membro do Canal

Esse Video vai estrear as 19:00 do dia 23/02/2021 


DICAS 3269 - WINDEV_MOBILE - COMO CRIAR COMBOX POR PROGRAMACAO E RECUPERAR VALOR - ANDROID - PERGUNTAS E REPOSTAS 30



ASSUNTOS


MOSTRANDO O SELECT QUE SERA UTILIZADO NA COMBOX
CRIANDO A COMBOX POR PROGRAMACAO
CRIANDO O CODIGO PARA CRIAR A LISTA DE REPRESENTANTE NA COMBOX 
MOSTRAR O CODIGO DO REPRESENTANTE QUANDO SELECIONA A COMBOX 
EXECUTAR O PROGRAMA 



==================== CODIGO 
========================= SELECT UTILIZADO

SELECT
representante.id_empresa_representante AS id_representante,
representante.nome AS nome_representante,
representante.email AS email,
representante.telefone AS telefone,
representante.endereco_cidade AS cidade,
representante.endereco_uf AS uf
FROM
representante
WHERE
    representante.nome LIKE %{parametro_nome_qualquer}%
ORDER BY
representante.nome


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

PROCEDURE codigo_combox_representante()
COMBO_representante_relacao.DeleteAll()
ListAdd(COMBO_representante_relacao,"TODOS"+gLink(0))

HExecuteQuery(QRY_representante_relacao,hQueryDefault)
FOR EACH QRY_representante_relacao 
ListAdd(COMBO_representante_relacao,(QRY_representante_relacao.nome_representante)+gLink(QRY_representante_relacao.id_representante))
END

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

Info(COMBO_REPRESENTANTE..StoredValue) // AQUI O CODIGO GLINK SERA MOSTRADO- QUE SERI O CODIGO DO REPRESENTATNE

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



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



========= INDICE MOBILE



-------------------------- INDICE CURSO COMBOX


WinDev - Combox - 001/... Preencher Manualmente e Eliminar
WinDev - Combox - 002/... Selecionar Combox
WinDev - Combox - 003/... Combox Editavel
WinDev - Combox - 004/... Combox - Ordem/Sort
WinDev - Combox - 005/... Combox Glink
WinDev - Combox - 006/... Selecione Linha Automatico - custom row
WinDev - Combox - 007/... ComboOpen e ComboClose
Adiciona Combox Manualmente - Combox 008 AULA 1258

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, 21 de fevereiro de 2021

DICAS 3268 - WINDEV_MOBILE - COMO GERAR PDF E MANDAR EMAIL ANDROID - PERGUNTAS E REPOSTAS 29


Bom Dia Boa Tarde Boa Noite



https://youtu.be/PpJ0TY5w6nw



Esse Video vai estrear as XX:00 do dia 22/02/2021 

DICAS 3268 - WINDEV_MOBILE - COMO GERAR PDF E MANDAR EMAIL ANDROID - PERGUNTAS E REPOSTAS 29


ASSUNTOS

COMO GERAR PDF E MANDAR EMAIL ANDROID
ENTRANDO NA WINDOWS TRANSPORTADORA
CRIANDO BOTAO IMPRIMIR
ENTRANDO NO CODIGO BOTAO IMPRIMIR
CRIANDO UM DIRETORIO
DANDO DESTINO NA IMPRESSORA PARA PDF, E O CAMINHO MAIS O ARQUIVO
CRIANDO O RELATORIO MANUALMENTE
LENDO A QUERY TRANSPORTADORA COM SELECT 
FAZENDO OUTRA OPCAO COM COMANDOS WL COM FOR EACH 
FINALIZANDO O RELATORIO 
CHAMANDO COM SHELLEXECUTE PARA ABRIR O PDF 
MANDANDO O EMAIL COM O PDF ANEXADO 

============== CODIGO


// btn imprimir transportadora

nSTATUS is int=SysStatusStorageCard()
IF nSTATUS=sysCardAvailable THEN
sDIRETORIO is string
sDIRETORIO = SysDirStorageCard()+"/diretorio_amarildo"
IF fDirectoryExist(sDIRETORIO) THEN
ELSE
   bRetorno is boolean=fMakeDir(sDIRETORIO)
   IF bRetorno=True THEN
   ELSE
       Info(ErrorInfo(errFullDetails))
   END  
END
//imprimir relatorio
sNome_arquivo is string=sDIRETORIO+"/arquivo.pdf"
iDestination(iGenericPDF,sNome_arquivo)
iPrint("Relatorio de Transportadora")
iPrint("")
iPrint(iXPos((1)+"Codigo"+iXPos(18)+"Nome"))
iPrint("")
HExecuteQuery(QRY_transportadora_relacao,hQueryDefault)
FOR EACH QRY_transportadora_relacao 
iPrint(iXPos(1)+QRY_transportadora_relacao.id_empresa_transportadora+iXPos(18)+QRY_transportadora_relacao.razao_social)
END
// //se voce quizer usar o comando wl
//
// for EACH transportadora 
// iPrint(iXPos(1)+transportadora.id_empresa_transportadora+iXPos(18)+transportadora.razao_social)
// END

    iEndPrinting()
    ShellExecute(sNome_arquivo)
    
    // vamos mandar o email

    email.Recipient[1]="amarildo.matos@gmail.com"
    email.NbRecipient=1
    email.Subject="Assunto"
    email.Message="Minha Mensagem"
    email.Attach[1]=sNome_arquivo
    email.NbAttach=1
    EmailRunApp()
    
    // final imprimir gerar pdf e mandar email
    
ELSE
Info("nao gerou pdf")
    
END

====================
SELECT
transportadora.id_empresa_transportadora AS id_empresa_transportadora,
transportadora.razao_social AS razao_social,
transportadora.nome_fantasia AS nome_fantasia,
transportadora.telefone AS telefone,
transportadora.cnpj AS cnpj,
transportadora.id_transportadora AS id_transportadora
FROM
transportadora
WHERE 
    transportadora.razao_social LIKE %{parametro_nome_qualquer}%
ORDER BY
transportadora.razao_social

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



========= INDICE MOBILE


=============== INDICE CURSO DE RELATORIOS

Blog - WinDev - Relatorio - 001/... Configura e Filtro
Blog - WinDev - Relatorio - 002/... IParameterReport
Blog - WinDev - Relatório - 003/... Marca D´Agua
Blog - WinDev - Relatorio - 004/... Layout 
Blog - WinDev - Relatorio - 005/... Campo Vertical - Angle 
Blog - WinDev - Relatorio - 006/... Como fazer quando sai duas paginas? 
Blog - WinDev - Relatorio - 007/... Imprimir Linha Multi Line
Blog - WinDev - Relatorio - 008/... Relatorio Valor Zero deixar Branco
Blog - WinDev - Relatorio - 009/... Relatorio Alinhar Texto 
Blog - WinDev - Relatorio - 010/... Colocar Totalizador
Blog - WinDev - Relatorio - 011/... Imprime Somente os Selecionados ou Todos da Tabela 
Blog - WinDev - Relatorio - 012/... Break e totalizadores de valores
Blog - WinDev - Relatorio - 013/... Retorno de Relatorio - Result 
Blog - WinDev - Relatorio - 014/... Zerar Totalizador  
Blog - WinDev - Relatorio - 015/... Relatorio - Totalmente Manual
Blog - WinDev - Relatorio - 016/... Linha Zebrada
Blog - WinDev - Relatorio - 017/... Posicoes do Relatorio Alterar
Blog - WinDev - Relatorio - 018/... Alterar Fonte
Blog - WinDev - Relatorio - 019/... Linha Acrescentar
Blog - WinDev - Relatorio - 020/... Relatorio - Gerar Pdf
Blog - WinDev - Relatorio - 021/... Filtro
Blog - WinDev - Relatorio - 022/... Pagina Inicial/Final - Data Hora
Blog - WinDev - Relatorio - 023/... Pular Página Break - IpageEnd()
Blog - WinDev - Relatorio - 024/... Imprimir Tabela com TablePrint
Blog - WinDev - Relatorio - 025/... Relatorio Mudar Orientação
Blog - WinDev - Relatorio - 026/... Mostrar impressoras/Selecionar e Imprimir
Blog - WinDev - Relatorio - 027/... IDestination - Destino do Relatorio
Blog - WinDev - Relatorio - 028/... Iprint - Relatorio Manual
Blog - WinDev - Relatorio - 029/... Dica Tabela e print
Blog - WinDev - Relatorio - 030/... Totalizadores
Blog - WinDev - Relatorio - 031/... Caption Mudar
Blog - WinDev - Relatorio - 032/... Intervalo Bancos
Blog - WinDev - Relatorio - 033/... Manual Linha - IHLine
Blog - WinDev - Relatorio - 034/... Borda - Iborder
Blog - WinDev - Relatorio - 035/... IPageNum
Blog - WinDev - Relatorio - 036/... Numero Com Espaco
Blog - WinDev - Relatorio - 037/... Fonte Seleciona - ISelectFont -
Blog - WinDev - Relatorio - 038/... Linha Mais de 2 - Mais informacoes no Campo
Blog - WinDev - Relatorio - 039/... Copias - IParameter - Icopies
Blog - WinDev - Relatorio - 040/... Pdf - Ler e Extrair Texto
Blog - WinDev - Relatorio - 041/... Imprimir Numero 000.001.500
Blog - WinDev - Relatorio - 042/... IListPrinter - Mostra Impressoras e Lista
Relatorio Inventario com Query - Relatorio 043/...
Relatorio - Sem Template - Dica Pedrosão - Relatorio - 044
Titulo Cabecalho - Alterar - WinDev - Relatorio - 045
Totais - Colocar Totais Abaixo ultima Linha Detalhe - WinDev - Relatorio - 046
Relatorio String Angulo 90% - WinDev - Relatorio - 047/...
Links Pagina e Email no Relatorio - WinDev - Relatorio - 048
PREVIEW TRADUZIR - WINDEV - RELATORIO - 049 - AULA 1211
TABELA E RELATORIO - COMO FAZER - RELATORIO 050 - AULA 1223
MANUAL - RELATORIO TOTALMENTE MANUAL - WINDEV RELATORIO 051 - AULA 1224
MEMORIA RELATORIO - AULA 1257 relatorio 052 tabela memoria
TOTAL BREAK - DICAS 1711 - PUBLICA - WINDEV RELATORIO 053 
GERAR PDF - DICAS 1889 - PUBLICA - WINDEV_23 - RELATORIO 54 - 
DICA 2150 - HANGOUT AO VIVO 10 06 2019 AS 19:00 - MOSTRAR CONSULTORIA COm joao sobre relatorios de como criar
DICAS 2151 WINDEV WEBDEV MOBILE RELATORIOS 59 CONSULTORIA JOAO 08062019
DICAS 2152 WINDEV WEBDEV MOBILE RELATORIOS 60 TOTAL RELATORIO
DICAS 2193 WINDEV WEBDEV MOBILE RELATORIO 61 IPREVIEW iMiniPreview
DICAS 2597 - WINDEV WEBDEV MOBILE - Relatorio 62 - Como eu Fiz Danf no Windev.
AO VIVO FACEBOOK - 2882 20:00 - 06/05/2020 - RELATORIOS COM TABELAS WINDEV
2885 RELATORIO SQL WINDEV TRASMITIDO FACEBOOK ERPAMARILDO
DICA 2912 PREVIEW PORTUGUES WINDEV


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: , , , ,

sexta-feira, 19 de fevereiro de 2021

DICAS 3267 - WINDEV_MOBILE - COMO FAZER UMA PESQUISA EM QUE VOU DIGITANDO E APARECENDO O CLIENTE NO LOOPER - PERGUNTAS E REPOSTAS 28



https://youtu.be/n0jx62p7c-Q




Bom Dia Boa Tarde Boa Noite

Seja Membro do Canal

Esse Video vai estrear as XX:00 do dia 19/02/2021 

DICAS 3267 - WINDEV_MOBILE - COMO FAZER UMA PESQUISA EM QUE VOU DIGITANDO E APARECENDO O CLIENTE NO LOOPER - PERGUNTAS E REPOSTAS 28


ASSUNTOS

-----------------------
SELECT
cliente.razao_social_nome AS nome_cliente,
cliente.cnpj_cpf AS cnpj_cpf,
cliente.id_empresa_cliente AS id_empresa_cliente,
cliente.endereco_cidade AS cidade,
cliente.endereco_uf AS uf
FROM
cliente
WHERE
cliente.tabela_cliente={param_tabela_cliente}
AND
cliente.tabela_fornecedor={param_tabela_fornecedor}
AND
cliente.id_empresa_representante={parametro_id_empresa_representante}
AND
cliente.razao_social_nome LIKE %{parametro_nome_qualquer}%
ORDER BY
cliente.razao_social_nome
-------------

//WHENEVER MODIFYING EDT PROCURA
loop_atualiza_cliente()

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

//BTN LIMPAR
EDT_PROCURA=""
loop_atualiza_cliente()

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

PROCEDURE loop_atualiza_cliente()

QRY_clientes_relacao.param_tabela_cliente = True
QRY_clientes_relacao.param_tabela_fornecedor = False
QRY_clientes_relacao.parametro_id_empresa_representante = Null
QRY_clientes_relacao.parametro_nome_qualquer=EDT_PROCURA

LOOP_cliente.DeleteAll()

HExecuteQuery(QRY_clientes_relacao,hQueryDefault)
FOR EACH QRY_clientes_relacao 
nNOCORRENCIA is int=LOOP_cliente.AddLine()
LOOP_cliente[nNOCORRENCIA].ATT_01_razao_Social = QRY_clientes_relacao.nome_cliente
LOOP_cliente[nNOCORRENCIA].ATT_02_cidade = QRY_clientes_relacao.cidade
LOOP_cliente[nNOCORRENCIA].ATT_03_uf = QRY_clientes_relacao.uf
END

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

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



========= INDICE MOBILE


============== INDICE LOOPER


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, 18 de fevereiro de 2021

DICAS 3266 - WEBDEV - UNIR MAIS DE UM CAMPO SELECT E COLCOAR COMBOX - PERGUNTAS E REPOSTAS 27





Bom Dia Boa Tarde Boa Noite

Seja Membro do Canal

Esse Video vai estrear as 12:00 do dia 18/02/2021 

DICAS 3266 - WEBDEV - UNIR MAIS DE UM CAMPO SELECT E COLCOAR COMBOX - PERGUNTAS E REPOSTAS 27



ASSUNTOS

MINHA PERGUNTA É SE POSSO UNIR MAIS DE UM CAMPO NO SELECT E COLOCAR COMBOX
ADICIONANDO NO SQL A JUNÇAO DE DOIS CAMPOS , NOME E CNPJ
ADICIONANDO O CODIGO PARA FILTRAR SOMENTE O CNPJ
MOSTRANDO O SQL MANIFESTACAO
ADICIONANDO TODOS NO COMBOX CLIENTE
MARCANDO LOAD IN MEMORY PARA APARECER TODOS OS CLIENTES

================== codigos usados.. - 

SELECT
cliente.tabela_cliente AS tabela_cliente,
cliente.tabela_fornecedor AS tabela_fornecedor,
cliente.razao_social_nome AS nome_cliente,
cliente.nome_fantasia AS nome_fantasia,
cliente.cnpj_cpf AS cnpj_cpf,
cliente.inscricao_estadual AS inscricao_estadual,
cliente.telefone AS telefone,
cliente.data_ultima_venda AS data_Venda,
cliente.endereco_cidade AS cidade,
cliente.endereco_uf AS estado,
cliente.endereco_cmun AS codigo_municipio,
cliente.data_cadastro AS data_cadastro,
cliente.situacao_cliente AS situacao_cliente,
cliente.situacao_fornecedor AS situacao_fornecedor,
cliente.id_centro_custo AS centro_custo,
cliente.id_empresa_representante AS id_empresa_representante,
cliente.email AS email,
cliente.id_empresa_cliente AS id_empresa_cliente,
cliente.id_cliente AS id_cliente,
cliente.razao_social_nome+' - '+cliente.cnpj_cpf AS nome_cnpj
FROM 
cliente 
WHERE 
cliente.tabela_cliente={param_tabela_cliente}
AND
cliente.tabela_fornecedor={param_tabela_fornecedor}
AND
cliente.id_empresa_representante={parametro_id_empresa_representante}
ORDER BY cliente.razao_social_nome

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

SELECT
nota_fiscal_manifestacao_mdfe.nsu AS nsu,
nota_fiscal_manifestacao_mdfe.numero_nota_fiscal AS nota_numero,
nota_fiscal_manifestacao_mdfe.demi AS demi,
nota_fiscal_manifestacao_mdfe.vnf AS vnf,
nota_fiscal_manifestacao_mdfe.cnpj AS cnpj,
nota_fiscal_manifestacao_mdfe.xnome AS xnome,
nota_fiscal_manifestacao_mdfe.descricao_csitconf AS descricao_csitconf,
nota_fiscal_manifestacao_mdfe.csitnfe_descricao AS nota_csitnfe_descricao,
nota_fiscal_manifestacao_mdfe.ciencia AS nota_ciencia,
nota_fiscal_manifestacao_mdfe.confirmado AS nota_confirmado,
nota_fiscal_manifestacao_mdfe.xml_baixado AS xml_baixado,
nota_fiscal_manifestacao_mdfe.nota_transferido AS nota_transferido,
nota_fiscal_manifestacao_mdfe.id_empresa AS id_empresa,
nota_fiscal_manifestacao_mdfe.id_manifestacao_notas AS id_manifestacao_notas,
nota_fiscal_manifestacao_mdfe.chnfe AS chnfe,
nota_fiscal_manifestacao_mdfe.ie AS ie,
nota_fiscal_manifestacao_mdfe.tpnf AS tpnf,
nota_fiscal_manifestacao_mdfe.digval AS digval,
nota_fiscal_manifestacao_mdfe.dhrecbto AS dhrecbto,
nota_fiscal_manifestacao_mdfe.csitnfe AS csitnfe,
nota_fiscal_manifestacao_mdfe.csitconf AS csitconf,
nota_fiscal_manifestacao_mdfe.ciencia_nprot AS ciencia_protocolo,
nota_fiscal_manifestacao_mdfe.Confirmacao_nprot AS confirmacao_protocolo,
nota_fiscal_manifestacao_mdfe.desconhecimento_nprot AS desconhecimento_protocolo,
nota_fiscal_manifestacao_mdfe.nota_id_notafiscal AS nota_id,
nota_fiscal_manifestacao_mdfe.data_importacao_arquivo AS nota_data_importacao,
nota_fiscal_manifestacao_mdfe.ciencia_cstat AS ciencia_cstat,
nota_fiscal_manifestacao_mdfe.ciencia_motivo AS nota_ciencia_motivo,
nota_fiscal_manifestacao_mdfe.Confirmacao_cstat AS nota_Confirmacao_cstat,
nota_fiscal_manifestacao_mdfe.Confirmacao_motivo AS nota_Confirmacao_motivo,
nota_fiscal_manifestacao_mdfe.xml_arquivo AS xml_arquivo,
nota_fiscal_manifestacao_mdfe.resumo_id_manifestacao AS nota_resumo_id,
nota_fiscal_manifestacao_mdfe.protocolo_sNProt AS nota_protocolo,
nota_fiscal_manifestacao_mdfe.Observacao_diversas AS obs_Div,
nota_fiscal_manifestacao_mdfe.doczip AS doc_zip,
nota_fiscal_manifestacao_mdfe.schema AS schema,
nota_fiscal_manifestacao_mdfe.baixar_xml_nsu AS baixar_xml_nsu
FROM
nota_fiscal_manifestacao_mdfe
WHERE
nota_fiscal_manifestacao_mdfe.demi={parametro_data}
AND
nota_fiscal_manifestacao_mdfe.schema={parametro_schema}
AND
nota_fiscal_manifestacao_mdfe.id_empresa={parametro_empresa}
AND
    LEFT(nota_fiscal_manifestacao_mdfe.demi,6) IN ({parametro_lista_mes_ano})
    AND
    nota_fiscal_manifestacao_mdfe.xml_baixado={parametro_xml_baixado}
    AND 
    nota_fiscal_manifestacao_mdfe.cnpj={parametro_cnpj}
ORDER BY
nota_fiscal_manifestacao_mdfe.demi DESC

-----------------
// initializing of combo_clientes_relacao
combox_inicializa_cliente()
----------------
// whenever modified of combo_clientes_relacao

ExecuteProcess(ZONE_NoName3.BTN_ATUALIZA_TABELA,trtClick)
-----------------
PROCEDURE combox_inicializa_cliente()


QRY_clientes_relacao.param_tabela_cliente = False
QRY_clientes_relacao.param_tabela_fornecedor = True
QRY_clientes_relacao.parametro_id_empresa_representante = Null
--------

//BOTAO ATUALIZA TABELA

TableDisplay(TABLE_manifestacao_Relacao,taInit)

----------

// initializing of table_manifestacao_relacao // server
inicializa_tabela_manifestacao()

------

PROCEDURE inicializa_tabela_manifestacao()


QRY_manifestacao_Relacao.parametro_data = Null
QRY_manifestacao_Relacao.parametro_schema = Null
QRY_manifestacao_Relacao.parametro_empresa = gn_empresa_codigo_selecionada
QRY_manifestacao_Relacao.parametro_xml_baixado=Null
QRY_manifestacao_Relacao.parametro_cnpj=Null

IF COMBO_ANO_MESES..StoredValue=-1 OR COMBO_ANO_MESES..StoredValue="" OR COMBO_ANO_MESES..StoredValue="Hoje" THEN
QRY_manifestacao_Relacao.parametro_data=EDT_Data 
ELSE
IF COMBO_ANO_MESES..StoredValue="Todos" THEN
ELSE 
sANO_MES is string=COMBO_ANO_MESES..StoredValue[4 TO 7]+COMBO_ANO_MESES..StoredValue[1 TO 2]
QRY_manifestacao_Relacao.parametro_lista_mes_ano=sANO_MES
END
END

IF COMBO_xml_baixado=-1 OR COMBO_xml_baixado="" OR COMBO_xml_baixado=1 THEN
ELSE
IF COMBO_xml_baixado=2 THEN // nao baixado
QRY_manifestacao_Relacao.parametro_xml_baixado=False
ELSE IF COMBO_xml_baixado=3
QRY_manifestacao_Relacao.parametro_xml_baixado=True
END
END

IF COMBO_clientes_relacao=-1 OR COMBO_clientes_relacao="" OR COMBO_clientes_relacao=0 THEN
ELSE
HReadSeekFirst(cliente,id_empresa_cliente,COMBO_clientes_relacao)
QRY_manifestacao_Relacao.parametro_cnpj=cliente.cnpj_cpf
END



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


-------------------------- INDICE CURSO COMBOX


WinDev - Combox - 001/... Preencher Manualmente e Eliminar
WinDev - Combox - 002/... Selecionar Combox
WinDev - Combox - 003/... Combox Editavel
WinDev - Combox - 004/... Combox - Ordem/Sort
WinDev - Combox - 005/... Combox Glink
WinDev - Combox - 006/... Selecione Linha Automatico - custom row
WinDev - Combox - 007/... ComboOpen e ComboClose
Adiciona Combox Manualmente - Combox 008 AULA 1258

---------------- INDICE WEBDEV

DICAS 3067 -WEBDEV TUTORIAL 1-Licao 1.1-14-09-2020 11hrs-DESCUBRA WEBDEV
DICAS 3068 -WEBDEV TUTORIAL 1-Licao 1.2-14-09-2020 15hrs-Web development and WEBDEV - PARTE A
DICAS 3069 -WEBDEV TUTORIAL 3-Licao 1.2-14-09-2020 16hrs-Web development and WEBDEV - PARTE B


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