terça-feira, 4 de agosto de 2015

Windev - Uninfe/Unimake - 2/... - Criando Wdl - Nfe












Windev - Uninfe/Unimake - 2/... Criando wdl - nfe





Blog - Uninfe - 1/... Como Instalar
Blog - Uninfe - 2/... - Criando wdl nfe
Blog - Uninfe - 3/... - Linkando Wdl Nota 
Blog - Xml - 4/... Xml Cabecalho
Blog - Xml - 5/... Tag Nfe
Blog - Xml - 6/... Tag InfNfe
Blog - Xml - 7/... - Tag Ide - uf
Blog - Xml - 8/... Tag Ide - Pegar Data e Hora Emissão
Blog - Xml - 9 / ... Tag Ide - Finalizar Grupo de Tag 
Blog - Xml - 10 / ... - Tag Emit - Inicio
Blog - Xml - 11 / ... - Tag emit - Emitente Final
Blog - Xml - 12/... - Tag Dest - Destinatario
Blog - Xml - 13/... - Tag - det nItem=1 - Inicio
Blog - Xml - 14/... - Tag - det Prod
Blog - Xml - 15/... - Tag - Imposto  
Blog - Xml - 16/... - Tag Final
Blog - Xml - 17/... - Gerar Xml e Enviar Pasta Validado
Blog - Xml - 18/... - Pegar retorno Xml Validado 
Blog - Xml - 19/... Calculo Digito - Modulo 11 Nfe
Blog - Xml - 20/... Achar a Posicao do Erro Nfe
Blog - Xml - 21/... Transmitir e Pegar Retorno
Blog - Xml - 22/... Imprimir Nfc-e Com Daruma
Blog - Xml - 23/... - Monitorar Pasta Uninfe de Retorno

Windev - Curso - 38/... - ListBox



Video - Curso - 38/... ListBox








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

DATA FERIADO




DATA FERIADO


Windev Sql /3.. - MONTHS_BETWEEN is used to find out the number of months between two specified dates.












Video Windev Sql/3... - Months _Between



MONTHS_BETWEEN 
 is used to find out the number of months between two specified dates.

MONTHS_BETWEEN 
é usado para descobrir o número de meses entre duas datas especificadas

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

select
data_emissao,data_vencimento,
MONTHS_BETWEEN(data_emissao,data_vencimento) as diferenca,
* from duplicata_pagar






Blog - Curso Sql/1 ... Select/Update -> NVL
Blog - Curso Sql/2... - Select Last_Day() - Ultimo dia Do Mes
Blog - Curso Sql/3... - Months_BetWeen
Blog - Curso Sq/4 ... - SysDate - Hora e Data Atual
Blog - Curso Sq/5 ... - Decode
Blog - Curso Sql/6... - Select Instr
Blog - Curso Sql/7... - Select Instr - Procura posicao 
Blog - Curso Sql/8 - Select count 
Blog - Curso Sql/9 - Select Max,Min,Count,Avg
Blog - Curso Sql/10 - Modifica Strings-Minuscula/Maiscula
Blog - Curso Sql/11 - Tamanho Campo - Len
Blog - Curso Sq/12 - Select - Pegar Dia/mes/Ano 
Blog - Curso Sql/13 - Select Betwen /2/ - Intervalo Data
Blog - Curso Sql/14 -  ALTER TABLE veiculo ADD foto BLOB
Blog - Curso Sql/15 - Dropt Table - Eliminar Uma Tabela Dentro WinDev 
Blog - Curso Sql/16 - Like - Pesquisar Cidade combox 
Blog - Curso Sql/17 - Select - Wl.ExtractString  

Webdev - Sobre o WAS e SqlConnectWs Conexão Remota Mobile com Servidor SQL



Webdev - Sobre o WAS e SqlConnectWs Conexão Remota Mobile com Servidor SQL

http://forum.pcsoft.fr/fr-FR/pcsoft.br.windev/392-webdev-sobre-was-sqlconnectws-conexao-remota-mobile-com/read.awp









WX - Buscando endereços



http://forum.pcsoft.fr/fr-FR/pcsoft.br.windev/393-buscando-enderecos/read.awp


Procedure ValidaEnderecoLogradouros(Endereco, RemoveRuaSN, OE)

OE = OE

ok is boolean = False

Pedaco, sAbreviada, sPrimeiroNome, EnderecoValido is string = ""

X, QTDESPACO, TOTAL, POS, LETRAS, REGISTROS, UltimoEspaco is int = 0

Endereco = Upper(NoSpace(Endereco))

//RETIRA AS PALAVRAS
IF RemoveRuaSN = "S" THEN
Endereco = Replace(Endereco,"RUA","")
Endereco = Replace(Endereco,"AVENIDA","")
Endereco = Replace(Endereco,"TRAVESSA","")
Endereco = Replace(Endereco,"R.","")
Endereco = Replace(Endereco,"AV.","")
Endereco = Replace(Endereco,"TV.","")
Endereco = NoSpace(Endereco)
END

SqlExecute is string = [
Select des_lograd, des_lograd_navega_mapa, des_mnemon_lograd, * from dbo.ACT263_LOGRADOURO
where 
des_lograd_navega_mapa like '%@ParteEndereco_1@%'
]

IF Endereco <> "" THEN

//Acerta o SQL
X = 1
QTDESPACO = StringCount(Endereco," ") - 1
IF QTDESPACO > 1
LOOP (QTDESPACO)
X+=1
SqlExecute += " and des_lograd_navega_mapa like '%@ParteEndereco_"+X+"@%'"
END
END

//Busca pedaços
X = 0
TOTAL = 0
POS = 0
LETRAS = 0
UltimoEspaco = 1 
TOTAL = Length(Endereco)
LOOP (TOTAL)

POS+=1

IF Endereco[[POS]] = " " THEN 
X += 1
Pedaco = NoSpace(Middle(Endereco,UltimoEspaco,POS-UltimoEspaco))
SqlExecute = Replace(SqlExecute,"@ParteEndereco_"+X+"@",Pedaco,WholeWord)
UltimoEspaco = POS 
sAbreviada += Middle(Pedaco,1,1)
IF sPrimeiroNome = "" THEN
sPrimeiroNome = Pedaco
END
END

END
//Sql montada com as palavras

//TENTATIVAS
dsQrySql is Data Source

REGISTROS = 0

ok = HExecuteSQLQuery(dsQrySql,ConnNativa,hQueryWithoutCorrection,SqlExecute)

FOR EACH dsQrySql
REGISTROS += 1
END

IF REGISTROS = 0 THEN

Info("Nao achou na primeira tentativa")

REGISTROS = 0

SqlExecute = [
Select des_lograd, des_lograd_navega_mapa, des_mnemon_lograd, * from dbo.ACT263_LOGRADOURO
WHERE des_mnemon_lograd like '%@Abreviado@%'
]

SqlExecute = Replace(SqlExecute,"@Abreviado@",sAbreviada)

ok = HExecuteSQLQuery(dsQrySql,ConnNativa,hQueryWithoutCorrection,SqlExecute)

FOR EACH dsQrySql
REGISTROS += 1
END


IF REGISTROS = 0 THEN
Info("Nao achou na segunda")

//Busca Pelo primeiro nome
REGISTROS = 0

SqlExecute = [
Select des_lograd, des_lograd_navega_mapa, des_mnemon_lograd, * from dbo.ACT263_LOGRADOURO
WHERE des_lograd_navega_mapa like '%@PrimeiroNome@%'
]

SqlExecute = Replace(SqlExecute,"@PrimeiroNome@",sPrimeiroNome)

ok = HExecuteSQLQuery(dsQrySql,ConnNativa,hQueryWithoutCorrection,SqlExecute)

FOR EACH dsQrySql
REGISTROS += 1
END

IF REGISTROS = 0 THEN
Info("Nao achou na terceira tentativa")
//Solicita para digitar novo endereço pois em 3 tentativas nao achou nada parecido
ELSE IF REGISTROS = 1
Info("Achou apenas 1 na terceira tentativa")
FOR EACH dsQrySql
Info(dsQrySql.des_lograd,dsQrySql.des_lograd_navega_mapa,dsQrySql.des_mnemon_lograd)
EnderecoValido = dsQrySql.des_lograd_navega_mapa
END
ELSE IF REGISTROS > 2
Info("Achou varios na terceira tentativa")
FOR EACH dsQrySql
Info(dsQrySql.des_lograd,dsQrySql.des_lograd_navega_mapa,dsQrySql.des_mnemon_lograd)
//Adiciona numa lista as opções encontradas
END
END

ELSE IF REGISTROS = 1
Info("Achou apenas 1 na segunda tentativa")
FOR EACH dsQrySql
Info(dsQrySql.des_lograd,dsQrySql.des_lograd_navega_mapa,dsQrySql.des_mnemon_lograd)
EnderecoValido = dsQrySql.des_lograd_navega_mapa
END
ELSE IF REGISTROS > 2
Info("Achou varios na segunda tentativa")
FOR EACH dsQrySql
Info(dsQrySql.des_lograd,dsQrySql.des_lograd_navega_mapa,dsQrySql.des_mnemon_lograd)
//Adiciona numa lista as opções encontradas
END
END

ELSE IF REGISTROS = 1
Info("Achou apenas 1 na primeira tentativa")
FOR EACH dsQrySql
Info(dsQrySql.des_lograd, dsQrySql.des_lograd_navega_mapa,dsQrySql.des_mnemon_lograd)
EnderecoValido = dsQrySql.des_lograd_navega_mapa
END
ELSE IF REGISTROS > 2
Info("Achou varios na primeira tentativa")
FOR EACH dsQrySql
Info(dsQrySql.des_lograd, dsQrySql.des_lograd_navega_mapa,dsQrySql.des_mnemon_lograd)
//Adiciona numa lista as opções encontradas
END
END


END


Info(SqlExecute)

RESULT(EnderecoValido)

Teste

Teste
teste