quarta-feira, 30 de agosto de 2017

AULA 1251 WINDEV DICAS 42 CNPJ VALIDO

























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



_CNPJ is string=EDT_cnpj

_Peso      is 2-byte unsigned int

_Resto     is 1-byte int

_Digito    is 1-byte int

_Peso  = _peso_calculo(_CNPJ[[1 TO 4]],2) + _peso_calculo(_CNPJ[[5 TO 12]],2)

                  // calculo do 1o digito verificador (posição 13)

_Resto = modulo(_Peso,11)

IF _Resto < 2 THEN

_Digito = 0

ELSE

_Digito = 11 - _Resto

END

_Peso  = _peso_calculo(_CNPJ[[1 TO 5]],2) + _peso_calculo(_CNPJ[[6 TO 13]],2)  // calculo do segundo 2 verificador (posição 14)

_Resto = modulo(_Peso,11)

IF _Resto < 2 THEN

_Digito = 0

ELSE

_Digito = 11 - _Resto

END

IF Asc(_CNPJ[[14]])-48 <> _Digito THEN

Info("CALCULO ERRADO")

ELSE

Info("CALCULO CERTO")

END



INTERNAL PROCEDURE _peso_calculo(pNro is string, _MenorPeso is int)

_Tam is int  = Length(pNro)

_Peso_1 is 2-byte unsigned int = 0

FOR i=1 TO _Tam

  _Peso_1 = _Peso_1 + (Asc(pNro[[i]]) -48)  * (_Tam-i+_MenorPeso)

END



RESULT _Peso_1



END
















Backup e Restore Projeto Windev - 001
Dicionario e Supecontrole - 002
Cd - CdEject CdList - Abre e Lista CD - 003
Dicionario e SuperControle - 004
Cnpj - Formatar com Pontos Barra Ifen - 005
Controlfindhighlight - Pesquizar Palavras entre edts - 006
Som - Emitir - Beep - 007
Valor Minimo e Maximo - MinValue / MaxValue - Dicas - 008
Vazio - Empty - Ver se combox,tabela,ou etc Esta Vazio - 009 - Dicas
Pdf - Ler Pdf com Active X - 010
Baixar Titulos Contas Receber - Dica - 011
Saldo Anterior Caixa - Como Calcular - Dica - 012
Anos - Mostrar Anos Pagamentos Recebimentos - Dica - 013
Mes Por Extenso - MonthNumberInAlpha - Dicas - 014
Clone Tabela - Meses com Varios Anos - Dicas - 015
Tecla Atalho - Control + Alt + Espaco - WinDev - dicas - 016/...
ControleCreate - Criar bloco Notas - Notes - WinDev - Dicas - 017/...
Alt - Static - Apertando Alt em Cima Static - Altera borda - Windev - Dicas 018/...
Guardar Valor - WinDev - Dicas 019/...
Pegar Quantidade/Valor/Codigo Cupom - WinDev - Dicas- 020
Consultar Alterar cliente e Procurar - WinDev - Dicas - 021Código - Consultar alterar Cliente e Procurar - WinDev dicas - 022
Grupos - Colocar Grupo e Deixar visivel ou Não - WinDev Dicas 023
Historio Erp 1/... - Analise- Segurança - WinDev Dicas 024
Historio Erp 2/... - Telas Iniciais - WinDev Dicas 025
Historio Erp 3/... - Analise- Alterações - WinDev Dicas 026
Historico Erp 4/Final - Empresa - Gravar Historioco - WinDev Dicas 027
Estilo Mudar Quando Chegar F2 - WinDev Dicas 028
Ajuda - Como Fazer String - WinDev Dicas 029 - Aula 1134
Cor do Campo - Quando Der Foco - Dicas 030 - Aula 1135
Tab trocar por enter - Dicas 031/... - Aula 1136
Save As - Copiar Windows Reports Dicas 032/... Aula 1161
EXE E WDL, NUM MESMO PROJETO - DICAS 033 / AULA 1183
InfoWithTimeout - DICAS 034 / AULA 1186
PLANOS - TREINAMENTO - DICAS 035 / AULA 1220
FONTES - ALTERAR EDT / STC -> DICAS 036 / AULA 1221
HINT - TEXTO EDIÇÃO QUANDO VAZIO - DICAS 037
F2 E CTRL F2 - DICAS 038 - AULA 1239
COMO NAO TRANCAR BANCOS GAS TECN - DICAS 039 AULA 1241











terça-feira, 29 de agosto de 2017

AULA 1250 WINDEV STRING MINUSCULA para MAISCULA 042











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




Blog - WinDev - Curso String - 001/... - Zeros direita - Rigth
Blog - WinDev - Curso String - 002 - Retirar texto Bloco String
Blog - WinDev - Curso String - 003 - Tamanho das Strings - Length
Blog - WinDev - Curso String - 004 - Transformar String Base 654 Em pdf
Blog - WinDev - Curso String - 005 - Retirar Texto do Lado Esquerdo e Direito
Blog - WinDev - Curso String - 006 - Complet - Completar Strings - Remessa Banco
Blog - WinDev - Curso String - 007 - Contains - Contem
Blog - WinDev - Curso String - 008 - Tirar pontos Cnpj - Replace
Blog - WinDev - Curso String - 009 - String - Placa - LLL9999
Blog - WinDev - Curso String - 010 - StringBuild
Blog - WinDev - Curso String - 011 - StringFormat
Blog - WinDev - Curso String - 012 - StringIncrement
Blog - WinDev - Curso String - 013 - Tirando Enter Observação
Blog - WinDev - curso String - 014 - Rtf - Colorir String
Blog - WinDev - Curso String - 015 - Multilinhas Strings
Blog - WinDev - Curso String - 016 - Numeracao Campo Dim
Blog - WinDev - Curso String - 017 - Numeracao - Juntar Numeracao e Pares
Blog - WinDev - Curso String - 018 - RTF - Posicionar e Colorir
Blog - WinDev - Curso String - 019 - Array guadar e ler codigo/nome - Associative Array
Blog - WinDev - Curso String - 020 - Array - Ver Se Existe -: ..exists
Blog - WinDev - Curso String - 021 - Campo - Posicionar Campo no Final - Cursor - Setfocus
Blog - WinDev - Curso String - 022 - Cep Formatar
Blog - WinDev - Curso String - 023 - Rtf Somar Quantas Linhas
Blog - WinDev - Curso String - 024 - ExtracLine - Extrair Linha
Blog - WinDev - Curso String - 025 - Contains - Ver se Tem dentro String
Blog - WinDev - Curso String - 026 - NoSpace - Elimina Espacos
Blog - WinDev - Curso String - 027 - Lower - Minusculo
Blog - WinDev - Curso String - 028 - Replace - Substituir
Blog - WinDev - Curso String - 029 - Upper - Maiuscula
Blog - WinDev - Curso String - 030 - Middle
Blog - WinDev - Curso String - 031 - NoSpace
Blog - WinDev - Curso String - 032 - RepeatString
ChaîneDécoupe - Blog - WinDev - Curso String - 033 - Extrai String com Separador
Blog - WinDev - Curso String - 034 - NoCharacter
Blog - WinDev - Curso String - 035 - StringCount - Quantos tem na pesquisa
Caixa - Fazer uma Caixa - String 036/...
For Each - Separar texto com Cr - WinDev String 037/...
RETIRAR TEXTO - WINDEV STRING 038 - AULA 1226
PROCURAR TEXTO - POSITION - WINDEV STRING 039 - AULA 1227
ACENTUAÇÃO XML - StringToUTF8 - WINDEV STRING 040 - AULA 1228
EXTRAIR TEXTO - WINDEV STRING 041 - AULA 1246
MINUSCULA POR MAISUSCULA - UPPER - WINDEV STRING 042 AULA 1250
TIRA ESPACOS ENTRE PALAVRAS - STRING 043 - AULA 1263













Roque Cliente Ferragem - Cadastro Manifestacao



TESTETESTETESTETESSETETSETSETSETEST

WINDEV - 09:00 - PROGRAMACAO - CTE/NFE/MDFE



TESTETESTETESTETESSETETSETSETSETEST

segunda-feira, 28 de agosto de 2017

AULA 1249 WINDEV TABELA 073 SELECIONAR VARIAS LINHAS






































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/...
Titulos e SubTitulos - Manualmente - Tabela - 047/...
Bloquear ou Liberar Lupa/mover Coluna Tabela - Windev Tabela - 048/...
TableEnableFilter - Tabela Diversos Filtros e ordem - WinDev Tabela - 049/...
Ordem Crescente/Decrescente - WinDev Tabela - 050/...
TableDisableFilter - WinDev Tabela 051/...
Conversão - Trocar Codigo Empresa das Duplicatas - WinDev Tabela 052/...
Ler Tabela,pegar Descricao,colocar String - WinDev Aula 1105 - 053/...
Cores na Tabela, Pintar Colunas,ou todas com exemplos - WinDev Tabelas 054
Tabela Nome Titulo Coluna,Imagen,Negrito WinDev Tabela 055
Totalizadores - F4 - Fundo Imagen Janela - Windev Tabela 056
Percorrer Tabela - Primeiro/ultimo/proximo/Anterior - Windev Tabela 057
Totalizadores Tabela Modificar Propriedades - WinDev Tabela 058
QUERY TABELA ANO MES QUERY - WINDEV TABELA 059 - AULA 1137
Tabela Ano Mes Visual - WINDEV TABELA 060 - AULA 1138
Tabela Ano Mes Visual / Codigos - WINDEV TABELA 061 - AULA 1139
Tabela Ano mes Visual Codigo Varios - WINDEV TABELA 062 - AULA 1141
Tabela Minimo Maximo - NOVIDADE 22 - WINDEV TABELA 063 - AULA 1188
FOR EACH ON - WINDEV TABELA 064 - AULA 1197
TitleColor - TABLE - WINDEV TABELA 065 - AULA 1121
BORDA NA TABLE - WINDEV TABLE 066 - AULA 1205
CELULA DESTACAR TABLE - WINDEV TABLE 067 - AULA 1206
XML - TABLETOXML - TABLE 068 - AULA 1207
ZOOM NA TABELA- TABLE - 069 - AULA 1218
HFILTER TABELA - TABELA 070 - AULA 1219
COLORIR TABELA - TABLE 071 - AULA 1232







Teste

Teste
teste