PC SOFT

FORUMS PROFESSIONNELS
WINDEV, WEBDEV et WINDEV Mobile

Accueil  |  Messages récents  | Connexion  |   | Français  FR
Accueil → WINDEV 25 → [ VIDEOS AULAS AMARILDO MATOS ]
[ VIDEOS AULAS AMARILDO MATOS ]
Débuté par amarildo, 30 juin 2017 04:20 - 15 réponses
#1
Membre enregistré
535 messages
Popularité : +14 (14 votes)
Posté le 30 juin 2017 - 04:20
AULA 1192

Nessa aula de hoje
vou mostrar como descompactar uma string,
que veio no xml da manifestação da nota
do sefaz.
Para Resolver essa questão quero agradecer ao Willian Fernando,
que muito me ajudou nisso


EDT_auditoria="H4sIAAAAAAAEAIWRWU+DQBCA/4rh1cDOwrJYMt0XW2IvbKwa7RuFbSHhCmxLf75bqJrGByeTzJFvjp3FRrZhIO/ORV62/rlNxkaqVO0T0nWd1TlW1RyIDUDJx2q5iVNZRMYPnP0Pm1nZqqiMpXF3kk0bVWODWgDXHjf1ddWoKN9nbRzlVlburV1Dyr00BMapXlEwh3rAbY96Dx4HLZSB62oDfQDAe89xbeoiGWrwMVzPxW0Nkj6J57AqpAjewsls9bycIBkSOJsKph/h2SOHIdERJum0yIQN1DOBmzZ/pczXCswExwfdcABQ1WEgKJLe4ukSULAuwMXHJDu8R7ko5+y4XSxy9rS1F3QmE+UGu2Pc1fefY91qgPTMFxnvVPV3LHV+x14ZLNdNpQTtT6SFcz6iGhjSGG8ydbmGXu3bRTJ8vPgCEFZ3ZQECAAA="
bufAbc is Buffer=EDT_auditoria
bufAaa is Buffer = Uncrypt(bufAbc,"",compressNone,encodeBASE64)
EDT_descompactar=Uncompress(bufAaa)


Nessa aula de hoje
vou mostrar como descompactar uma string,
que veio no xml da manifestação da nota
do sefaz.
Para Resolver essa questão quero agradecer ao Willian Fernando,
que muito me ajudou nisso

Agradecimentos ao willlian que me ajudou na dica ai..
https://forum.pcsoft.fr/pt-BR/pcsoft.br.windev/2491-descompactar-uma-string-que-veio-xml-manifestacao/read.awp



https://doc.windev.com/en-US/…

https://doc.windev.com/en-US/…

https://forum.pcsoft.fr/pt-BR/pcsoft.br.windev/2491-descompactar-uma-string-que-veio-xml-manifestacao/read.awp

http://windevdesenvolvimento.blogspot.com.br/2017/06/aula-1192-windev-xml-11-descompactar.html

Message modifié, 30 juin 2017 - 04:23
#2
Membre enregistré
535 messages
Popularité : +14 (14 votes)
Posté le 01 juillet 2017 - 03:18
AULA 1193 WinDev Comandos 014 Round Arredondamento

EDT_RESULTADO=EDT_a*EDT_b
EDT_RESULTADO1=Round(EDT_a*EDT_b,2)



https://doc.windev.com/en-US/search2.awp…

http://windevdesenvolvimento.blogspot.com.br/2017/06/aula-1193-windev-comandos-014-round.html

#3
Membre enregistré
535 messages
Popularité : +14 (14 votes)
Posté le 02 juillet 2017 - 01:18
AULA 1194 Comandos 15 / Maior VAlor / Max 


Nessa aula de hoje

Vou mostrar como retornar o Maior Valor

EDT_RESULTADO= Max(EDT_a,EDT_b)

// ELE VAI RETORNAR O MAIOR VALOR ENTRE OS DOIS
// HE WILL RETURN THE GREATEST VALUE BETWEEN THE TWO
// Él va a devolver el mayor valor en los dos.


https://doc.windev.com/…

http://windevdesenvolvimento.blogspot.com.br/2017/07/aula-1194-comandos-15-maior-valor-max.html

#4
Membre enregistré
535 messages
Popularité : +14 (14 votes)
Posté le 02 juillet 2017 - 12:53
AULA 1195 Comandos 16 / Menor VAlor / Min

Nessa aula de hoje

Vou mostrar como retornar o Menor Valor

EDT_RESULTADO= Min(EDT_a,EDT_b)

// ELE VAI RETORNAR O MENOR VALOR ENTRE OS DOIS
// IT WILL RETURN THE LOWER VALUE BETWEEN THE TWO
// ÉL VA A RETORNAR EL MENOR VALOR ENTRE LOS DOS


https://doc.pcsoft.fr/fr-FR/?3050004&name=min_fonction

http://windevdesenvolvimento.blogspot.com.br/2017/07/aula-1195-comandos-16-menor-valor-min.html

#5
Membre enregistré
535 messages
Popularité : +14 (14 votes)
Posté le 04 juillet 2017 - 01:36
AULA 1196 Comandos 17 / RoundDown


EDT_RESULTADO=EDT_a*EDT_b
EDT_RESULTADO1=Round(EDT_a*EDT_b,2)

EDT_RESULTADO2=RoundDown(EDT_a*EDT_b,2)

EDT_resultado_texto="sem round ["+EDT_RESULTADO+CR
EDT_resultado_texto+="Round ["+EDT_RESULTADO1+CR
EDT_resultado_texto+="RoundDown ["+EDT_RESULTADO2+CR




http://doc.windev.com/en-US/…

http://windevdesenvolvimento.blogspot.com.br/2017/07/aula-1196-comandos-17-rounddown.html

#6
Membre enregistré
535 messages
Popularité : +14 (14 votes)
Posté le 05 juillet 2017 - 22:02
AULA 1197 WinDev 064 Tabela FOR EACH ON 

BOM DIA
NA AULA DE HOJE VOU MOSTRAR FOR EACH On

Procedure duplica_nota_003_item(_id_numero_nota,_id_numero_nota_anterior)

FOR EACH nota_fiscal_iten WHERE "nota_fiscal_iten.Id_nota_fiscal="+_id_numero_nota_anterior on nota_fiscal_iten.sequencia_digitacao FromBeginning
nota_fiscal_iten.Id_nota_fiscal=_id_numero_nota
HAdd(nota_fiscal_iten)
END


https://doc.pcsoft.fr/fr-FR/?1510013&name=FOR_ALL

http://windevdesenvolvimento.blogspot.com.br/2017/07/aula-1197-windev-064-tabela-for-each-on.html

#7
Membre enregistré
535 messages
Popularité : +14 (14 votes)
Posté le 05 juillet 2017 - 23:32
AULA 1198 WinDev 02 BUTTON - Botão Ir Automatico
Na aula de hoje vou mostrar como ir para um botao automaticamente
ExecuteProcess

ExecuteProcess(BTN_BOTAO2,trtClick)

// ESTOU FAZENDO ELE IR DIRETO PARA OUTRO BOTAO, E EXECUTAR, COMO SE FOSSE UM CLICK
// I AM MAKING IT DIRECT TO ANOTHER BOTTLE, AND PERFORMING, LIKE IT WAS A CLICK
// HACIENDO EL IR DIRECTO A OTRO BOTA, Y EJECUTAR, COMO SE FUE UN CLICK



https://doc.windev.com/en-US/…

http://windevdesenvolvimento.blogspot.com.br/2017/07/aula-1198-windev-02-button-botao-ir.html

#8
Membre enregistré
535 messages
Popularité : +14 (14 votes)
Posté le 08 juillet 2017 - 02:10
BOM DIA 
VAMOS CONTINUAR CURSO ERP, COM CADASTRO DE USUARIOS
AULA 1200 WinDev Curso Erp 040 Usuarios

HFilter(usuario,Usuario_grupoID,usuario_grupo.usuario_grupoID)

// COM HFILTER ESTAMOS FILTRANDO OS USUARIOS SOMENTE DE 1 GRUPO
// WITH HFILTER WE ARE FILTERING USERS ONLY FROM 1 GROUP
// CON HFILTER ESTAMOS FILTRANDO LOS USUARIOS SOLAMENTE DE 1 GRUPO


TableDisplay(TABLE_usuario,taInit)

// ESTAMOS ATUALIZANDO A TABELA
// WE ARE UPDATING THE TABLE
// ESTAMOS ACTUALIZANDO LA TABLA




https://doc.windev.com/en-US/…

http://windevdesenvolvimento.blogspot.com.br/2017/07/aula-1200-windev-curso-erp-040-usuarios.html

#9
Membre enregistré
535 messages
Popularité : +14 (14 votes)
Posté le 08 juillet 2017 - 16:05
AULA 1201 WinDev Tabela 065 TitleColor
BOM DIA

Na aula de hoje vamos mudar a cor do Titulo da Tabela

OOD MORNING

In today's class we will change the color of the Table Title

BUEN DÍA

En la clase de hoy vamos a cambiar el color del Titulo de la Tabla

TABLE_descricao.COL_Descricao..TitleColor=LightBlue

// OU OR
//TABLE_descricao..TitleColor=LightBlue

//.Title Color é usado para:
//Modifique a cor do texto PARA o título da coluna A (OU TODAS as colunas) encontradas
// em um controle de tabela.

//.TitleColor is used to:
//modify the text color for the title of a column (or all columns) found
// in a Table control.

//.Title Color se utiliza para:
//Modifique el color del texto PARA el título de una columna (O TODAS las columnas)
// encontrada EN Un control de tabla.


https://doc.windev.com/…

http://windevdesenvolvimento.blogspot.com.br/2017/07/aula-1201-windev-tabela-065-titlecolor.html

#10
Membre enregistré
535 messages
Popularité : +14 (14 votes)
Posté le 08 juillet 2017 - 19:17
AULA 1202 WINDEV CURSO ERP 041 USUARIO

BOM DIA

Na aula de hoje vamos CONTINUAR A PARTE DO CADASTRO
DE USUARIOS E GRUPO DE USUARIOS

GOOD MORNING

In today's class we are going to CONTINUE PART OF THE REGISTRATION
OF USERS AND USERS GROUP

BUEN DÍA

En la clase de hoy vamos a CONTINUAR LA PARTE DEL REGISTRO
DE USUARIOS Y GRUPO DE USUARIOS



http://windevdesenvolvimento.blogspot.com.br/2017/07/aula-1202-windev-curso-erp-041-usuario.html

#11
Membre enregistré
535 messages
Popularité : +14 (14 votes)
Posté le 09 juillet 2017 - 14:01
AULA 1205 WINDEV 066 TABLE BORDER

BOM DIA

NA AULA DE HOJE VAMOS VER COMO COLOCAR
BORDA NA TABELA

GOOD MORNING

IN THE CLASS OF TODAY WE WILL SEE HOW TO PLACE
EDGE IN THE TABLE

BUEN DÍA

EN LA AULA DE HOY VAMOS VER COMO COLOCAR
BORDA EN LA TABLA

_borda is Border
_borda..Color = LightBrown
_borda..Thickness = 5

// Definir as características da borda
// Define the border characteristics
// Definir las características del borde

TABLE_descricao..Border=_borda

// ESTOU COLOCANDO A BORDA NA TABELA
// I'M LAYING THE EDGE IN THE TABLE
// ESTOY COLOCANDO EL BORDE EN LA TABLA

EDT_Texto..Border=_borda

// TEM ALGUNS OUTROS CONTROLES QUE TAMBEM PODEMOS USAR
// YOU HAVE SOME OTHER CONTROLS THAT WE CAN ALSO USE
// ALGUNOS OTROS CONTROLES QUE TAMBIEN PUEDEN USAR



https://doc.windev.com/en-US/…

http://windevdesenvolvimento.blogspot.com.br/2017/07/aula-1205-windev-066-table-border.html

#12
Membre enregistré
535 messages
Popularité : +14 (14 votes)
Posté le 12 juillet 2017 - 00:31
AULA 1207 WinDev Tabela 068 TableToXml

BOM DIA

NA AULA DE HOJE VOU MOSTRAR COMO É
FACIL GERAR XML DE UMA TABELA

sFile is string

// Opens the file picker
sFile = fSelect("", "", "Select a file...", "xml" + TAB + "*.xml", "*.xml", fselCreate + fselExist)


IF sFile <> "" THEN TableToXML(TABLE_descricao, sFile, taNoTitle)




https://doc.windev.com/en-US/…

http://windevdesenvolvimento.blogspot.com.br/2017/07/aula-1207-windev-tabela-068-tabletoxml.html

#13
Membre enregistré
535 messages
Popularité : +14 (14 votes)
Posté le 12 juillet 2017 - 17:12
AULA 1208 WinDev Barra Progresso 01 Barra Progresso

NA AULA DE HOJE VOU MOSTRAR BARRA DE PROGRESSO

PROGBAR_Progress_bar..MaxValue=1978000
// ESTOU DANDO UM VALOR MAXIMO PARA A BARRA DE PROGRESSO
// I'M GIVING MAXIMUM VALUE FOR THE PROGRESS BAR
// ESTOY DANDO UN VALOR MAXIMO PARA LA BARRA DE PROGRESO
PROGBAR_Progress_bar..MinValue=0
// ESTOU DANDO UM VALOR MINIMO PARA A BARRA DE PROGRESSO
// I'M GIVING MINIMUM VALUE FOR THE PROGRESS BAR
// ESTOY DANDO UN VALOR MAXIMO PARA LA BARRA DE PROGRESO
FOR X = PROGBAR_Progress_bar..MinValue _TO_ PROGBAR_Progress_bar..MaxValue
// ESTOU FAZENDO UM FOR ONDE VAI PERCORRER DO MINIMO ATE O MÁXIMIO
// I AM MAKING A WHERE YOU WILL PERCORRIVE FROM THE MINIMUM TO THE MAXIMUM
// ESTOY HACIENDO UNO DE DONDE VA PERCORIR DEL MINIMO ATE EL MÁXIMO
PROGBAR_Progress_bar=X
// ESTOU ATUALIZANDO A BARRA DE PROGRESSO
// I'M UPDATING THE PROGRESS BAR
// ESTOY ACTUALIZANDO LA BARRA DE PROGRESO

IF X>1878000 THEN
BREAK
END

// AQUI FIZ UM EXEMPLO QUE POSSO SAIR DO FOR A QUALQUER MOMENTO QUE EU DESEJAR
// HERE IS AN EXAMPLE THAT I CAN EXIT FROM FOR ANY TIME I WISH
// AQUÍ HICE UN EJEMPLO QUE PUEDO SALIR DEL FOR A CUALQUIER MOMENTO QUE DESEO

END


https://doc.windev.com/en-US/…

http://windevdesenvolvimento.blogspot.com.br/2017/07/aula-1208-windev-barra-progresso-01.html


#14
Membre enregistré
535 messages
Popularité : +14 (14 votes)
Posté le 14 juillet 2017 - 00:08
AULA 1209 WinDev BARRA PROGRESSO 02 
BOA NOITE

NA AULA DE HOJE, VOU MOSTRAR COMO 
APARECER O PERCENTUAL NA BARRA DE PROGRESSO
SIMPLES, MAS UTIL


PROGBAR_Progress_bar..MaxValue=178000
PROGBAR_Progress_bar..MinValue=0
FOR X = PROGBAR_Progress_bar..MinValue _TO_ PROGBAR_Progress_bar..MaxValue
PROGBAR_Progress_bar=X
END


https://doc.pcsoft.fr/fr-FR/?1013156&name=the_progress_bar_control

http://windevdesenvolvimento.blogspot.com.br/2017/07/aula-1209-windev-barra-progresso-02.html

#15
Membre enregistré
535 messages
Popularité : +14 (14 votes)
Posté le 15 juillet 2017 - 04:00
AULA 1210 WINDEV CURSO ERP 042 TIRAR FOTO 

BOA NOITE

NA AULA DE HOJE , VOU CONTINUAR CURSO ERP, E MOSTRAR
COMO SE TIRA UMA FOTO

Trace("Aguarde..Tirando Foto")
b_salvar_imagen is boolean = VideoCapture(CAM_FOTO,"imagentemp.jpeg",viPictureCapture,2)
IF b_salvar_imagen=True THEN
IMG_Foto="imagentemp.jpeg"
ELSE
Error(ErrorInfo())
END
TraceEnd()



https://doc.windev.com/en-US/…

http://windevdesenvolvimento.blogspot.com.br/2017/07/aula-1210-windev-curso-erp-042-tirar.html

#16
Membre enregistré
535 messages
Popularité : +14 (14 votes)
Posté le 15 juillet 2017 - 17:48
AULA 1211 WINDEV CURSO RELATORIO  049 PREVIEW RELATORIO 
BOM DIA..
HOJE VAMOS VER PREVIEW DO RELATORIO - TRADUZIR




http://help.windev.com/…

http://windevdesenvolvimento.blogspot.com.br/2017/07/aula-1211-windev-curso-relatorio-049.html

→ Revenir à WINDEV 25