PROPAGANDA LIVE PEDROSAO E AULA DAS 20 HORAS AMARILDO

---

PROPAGANDA LIVE PEDROSAO E AULA DAS 20 HORAS AMARILDO

Link para a apresentação de hoje GED parte 2
início 17:00 hrs
final 18:00 hrs
abertura da sala  16:45

Amarildo autorizada a retransmissão pelos seus canais. Muito obrigado a todos.

ASSUNTOS 1. acrescentando as colunas no relatorio financeiro 2. Ajustando o tamamho das colunas 3. Mostrando que F4 , leva a configuracao para outros campos 4. Adicionar na tabela data de emissao0 5. Adicionar na tabela Juros e Multa 6. Adicionar dias em atrazo 7. adicionar observacao 8. Executando a pagina e mostrando o relatorio https://windevdesenvolvimento.blogspot.com/2020/06/dicas-2955-webdev-erp-web-matos-aula.html

https://youtu.be/cXUMn5inPOk

---

---

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

---

DICAS 2930 - AO VIVO YOUTUBE - PEDROSAO PALESTRA WEBDEV

---

DICAS 2930 - AO VIVO YOUTUBE - PEDROSAO PALESTRA WEBDEV

---

---

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

---

CURSO: USANDO REPORTS AND QUERIES. - Com Pedrosao

---

---

---

---

CURSO: USANDO REPORTS AND QUERIES.
No dia 05 de fevereiro de 2016 iniciamos o nosso primeiro curso do ano de 2016 "USANDO REPORTS AND QUERIES", onde abordaremos o uso deste importante recurso da Linguagem Windev. Serão 6 horas aulas, distribuídas ao longo de 3 sextas feiras no horário das 17 às 19. Acompanha material didático em vídeo e em pdf.
Acesse o site www.pedrosoinformatica.com.br, área cursos e faça a sua inscrição.
Maiores informações, envie um email para:
magic.pedroso@gmail.com.

---

APOSTILA FREE DE WINDEV

---

---

---

Forum Geswind - Windev

---

http://www.pedrosoinformatica.com.br/windev/apwindev1.pdf

---

http://www.pedrosoinformatica.com.br/windev/apwindev2.pdf

---

http://www.pedrosoinformatica.com.br/

---

Pedrosão
Fomos os primeiros a desenvolver uma documentação em português para o Windev quando trabalhávamos na empresa TOPSIDE INFORMATICA, no Rio Grande do sul.

Abaixo os links para download destas apostias. Embora sejam da versão 7, servem como ponto de partida para quem está começando.

http://www.pedrosoinformatica.com.br/windev/apwindev1.pdf

e 

http://www.pedrosoinformatica.com.br/windev/apwindev2.pdf

---

---

---

ALIASES NO WINDEV

---

---

---

ALIASES NO WINDEV

---

HAlias

            Cria um aliás lógico para um arquivo de dados (ou consulta), ou cancela todos os aliases existentes. Um aliás também pode ser cancelado pela sentença HCancelAlias, da Wlanguage.
            Para quem não lembra mais, permite que você trabalhe em arquivos de dados físicos diferentes, mas com a mesma descrição lógica. Para todos os arquivos de dados, por exemplo, a descrição do arquivo é realizada na Análise (ou dicionário de dados, se preferirem), e HAlias, é usado para criar uma cópia lógica desse arquivo.
            A partir da versão 17 do WinDev, esta função também está disponível para aplicações Ipad e Iphone.

Exemplo de uso

Pedidos2000 is Data Source
// Cria um alias para o arquivo “Pedidos”
IF HAlias(Pedidos, Pedidos2000) = True THEN
// Agora "Pedidos2000" pode ser usado pelo processo.
// Ele se comporta da mesma maneira que o arquivo "Pedidos" descrito na
// Análise
// Nome do arquivo físico associado: Pedidos2000.
HCreationIfNotFound(Pedidos2000)
END

Sintaxe

<Result> = HAlias(<Nome Lógico> [, <Nome do Aliás>])

---

<Result>: Boolean

• True Se o aliás foi criado,

---

http://www.pedrosoinformatica.com.br/

---

---

---

Comando para verificar se há conexão com a internet

---

Comando para verificar se há conexão com a internet

---

Muitas vezes, antes de enviarmos um comando que faça acesso a Internet, é conveniente verificar se a conexão está ativa, para não exibir uma mensagem "pouco amigável" para  o usuário. O código abaixo faz esta verificação:
ResConnection = InternetConnected()
IF ResConnection = True THEN
//Executa a sua rotina
ELSE
Info("Não existe conexão com a Internet. O programa não pode continuar")
END

---

http://www.pedrosoinformatica.com.br/

---

---

Foruns > Windev > HTTPREQUEST EM CONSULTAS COMPLEXAS

---

Foruns > Windev > HTTPREQUEST EM CONSULTAS COMPLEXAS

---

Dependendo da consulta a ser executada, pode funcionar corretamente no navegador, mas retornar um resultado errado com a função HTTPRequest da WLanguage. Normalmente isso ocorre devido à uma má codificação da requisição, e o servidor WEB não tem como explorar adequadamente o recurso. Neste caso é necessário codificar adequadamente a consulta com a função URLEncode da WLanguage e em seguida passar a sequência codificada para a função HTTPRequest.

sminhaconsulta is string = "http://..."

//codifica a consulta via URLEncode

//substitui os espaços por %20, por exemplo

sminhaconsulta = URLEncode(sminhaconsulta)

//executa a consulta codificada

HTTPRequest(sminhaconsulta)

---

http://www.pedrosoinformatica.com.br/

---

---

Foruns > Windev > IMPRIMIR DIRETAMENTE PARA UM IP OU PORTA

---

Foruns > Windev > IMPRIMIR DIRETAMENTE PARA UM IP OU PORTA

---

Muitas vezes precisamos enviar comandos diretamente a uma impressora (exemplo Impressoras PCL) e mais anda para um determinado endereço e porta.

Veja o exemplo abaixo:

/ / Imprime diretamente para a impressora

/ / No endereço: 192.168.15

/ / Na porta da rede: 9100

iDestination (iPCL, "192.168.15:9100")

//Imprime "alo" no canto superior esquerdo da página

iPrint (iYPos (10) iXPos + (10) + "Alo")

iEndPrinting()

---

http://www.pedrosoinformatica.com.br/

---

---

Foruns > Windev > CORES DIFERENTES EM COLUNAS

---

Foruns > Windev > CORES DIFERENTES EM COLUNAS

---

Para fazer estes tratamentos, utilizamos os comandos g*.

Exemplo

TABLE_LOG_GRANDE_USUARIO.COL_CEP..Caption = gPen(LightRed) + "CEP"

//Faz com que o título CEP apareça em vermelho.

Para atribuir cores ao conteúdo de uma determinada coluna

// Fonte em azul

TABLE_LOG_GRANDE_USUARIO.COL_CEP..Color = iLightBlue

// Fundo em verde

TABLE_LOG_GRANDE_USUARIO.COL_CEP..BrushColor = iLightGreen

---

http://www.pedrosoinformatica.com.br/

---

---

Imagens - Testar se Tem

---

Foruns > Windev > Imagens

---

Se o seu controle de imagem não estiver ligado a um campo memo (de imagem), você pode testar da seguinte forma:

campo_de_imagem..value = ""

// Se você precisar testar a sua altura

y is a image // define a variável y com o tipo imagem

y = IMG_CLI // campo de imagem da tabela de clientes

Trace(y.Height) // => -1

---

http://www.pedrosoinformatica.com.br/

---

---

---

Função Httpgetresult()

---

Forum Geswind - Windev

---

// Retorna o código HTML da página "www.windev.com" 
ResStart = HTTPRequest("http://www.windev.com")
IF ResStart = True THEN
Info("O código HTML é: " + HTTPGetResult())
END

---

// Exemplo de processamento de um erro retornado pelo servidor web

url is string 
HTTP_Res is string
HTTPError is string
Url = "http://www.amazon.fr/s/ref=nb_ss?__mk_fr_FR=AMAZON&url" + ...
"=search-alias=aps&field-keywords=2746049805"

// Envia uma solicitação para o servidor da Amazon
IF HTTPRequest(Url) THEN
// Solicitação enviada, a url é válida
HTTP_Res = HTTPGetResult()
IF Length(HTTP_Res) = 0 THEN
// Erro do servidor web, 
// os detalhes do erro estão no cabeçalho da página
HTTPError = HTTPGetResult(httpHeader)
Error(HTTPError)
END
END

---

http://www.pedrosoinformatica.com.br/

---

---

---

Como destacar determinadas células da minha tabela?

---

Forum Geswind - Windev

---

Considere:

VAL_soma_das_vendas

// como sendo o nome da célula

TCD_venda_cliente  

// como sendo o nome da tabela dinâmica

COL_NomeCliente

// como sendo o nome do cliente
COL_Data_Ano

// como sendo o perído

// Claro que você deverá estar manipulando a tabela por células e não por linhas.

No evento DisplayCell desua tabela entre um código semelhante a:

IF TCD_Venda_Cliente.VAL_soma_das_vendas > 200 THEN

    TCD_Venda_Cliente.VAL_soma_das_vemdas .. Color = RGB (45, 255, 0)

END

IF TCD_Venda_Cliente.VAL_soma_das_vemdas <100 THEN

    TCD_Venda_Cliente.VAL_soma_das_vemdas .. Color = RGB (254, 0, 29)

END

---

http://www.pedrosoinformatica.com.br/

---