Windev19 Postgres Acesso Nativo

Windev19 Postgres Acesso Nativo

http://www.pcsoft.fr/st/telec/modules-communs-19/postgresql.htm

WindevMobile Ios

WindevMobile Ios

Processo de candidatura de publicação na AppStore - Publicação Procedimento de aplicativo na AppStore - iOS - Windev Móvel - iTunes Connect - Apple Developer

http://forum.pcsoft.fr/fr-FR/pcsoft.us.windevmobile/795-application-publishing-procedure-appstore-procedimento-publicacao-aplicativo-appstore-1072/read.awp

WindevMobile bluetooth Status

WindevMobile bluetooth Status

Assistir Video Windev Mobile - Bluetooth status

WindevMobile Tutorial PcSoft

WindevMobile Tutorial PcSoft

http://www.windev.com/windevmobile/index.html

Android Instalar

Android Instalar

Dica Pedrosao-adt-bundle-windows-x86-20140321 - http://dl.google.com/android/adt/22.6.2/adt-bundle-windows-x86-20140321.zip
http://skotandroidplanet.blogspot.com.br/2014/05/android-app-development-requirement.html

http://help.windev.com/?9000042

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

Kit de Desenvolvimento Android http://developer.android.com/sdk/index.html


http://www.loiane.com/2014/02/preparando-o-ambiente-para-desenvolver-em-android/
https://www.youtube.com/watch?v=cnkXZ1WXdqk&feature=youtu.be

Windows Server 2008 Traduzindo Portugues

Windows Server 2008 Traduzindo Portugues

Link Fonte

http://social.technet.microsoft.com/wiki/contents/articles/3861.instalando-language-pack-no-windows-server-2008-r2-pt-br.aspx

WebDev Relacao Site

WebDev Relacao Site

=================================================================
PROCEDURE site_mostra_relacao(sSeleciona is string)

gsSQL = [
    select
    sites_uteis.id_empresa_site as sit_id_empresa_site,
    sites_uteis.titulo as sit_titulo,
    sites_uteis.titulo_link as sit_titulo_link,
    sites_uteis.grupo as sit_grupo
    from
    sites_uteis
    where
    sites_uteis.id_empresa=%1
    %2
]
nMostra is int
sFiltro is string
sFiltro = ""
gsSQL = StringBuild(gsSQL,gnEmpresaCodigo,sFiltro)
TableDeleteAll(TABLE_Sites_uteis)
IF HExecuteSQLQuery(gdsQry,hQueryDefault,gsSQL) THEN
    HReadFirst(gdsQry)
    WHILE NOT HOut()
        nMostra=1
        IF sSeleciona="Todos" THEN
        ELSE           
            IF gdsQry.sit_grupo=sSeleciona THEN
            ELSE
                nMostra=0   
            END
        END
        IF nMostra=1 THEN
            TableAddLine(TABLE_Sites_uteis,gdsQry.sit_id_empresa_site,gdsQry.sit_titulo,gdsQry.sit_titulo_link,gdsQry.sit_grupo)
        END
        HReadNext(gdsQry)
    END
    HFreeQuery(gdsQry)     
END
TableDisplay(TABLE_Sites_uteis)
=========================================================
PROCEDURE site_combox_site()
ListDeleteAll(COMBO_Seleciona)
gsSQL = [
    SELECT DISTINCT
    sites_uteis.grupo as sit_grupo
    FROM
    sites_uteis
    where
    sites_uteis.id_empresa=%1
]
ListAdd(COMBO_Seleciona,"Todos Grupos"+TAB+gLink("Todos"))       
gsSQL = StringBuild(gsSQL,gnEmpresaCodigo)
IF HExecuteSQLQuery(gdsQry,hQueryDefault,gsSQL) THEN
    HReadFirst(gdsQry)
    WHILE NOT HOut()
        ListAdd(COMBO_Seleciona,gdsQry.sit_grupo+TAB+gLink(gdsQry.sit_grupo))       
        HReadNext(gdsQry)
    END
    HFreeQuery(gdsQry)     
END
==========================================================
// Inclui novo SITE
HReset(sites_uteis)
// Va para pagina de inclusao de SITE
PageDisplay(PAGE_site_formulario)
//mostra os site
sSeleciona is string = COMBO_Seleciona..StoredValue
site_mostra_relacao(sSeleciona)

===========================================================
//verifica se esta selecionado um site
IF TableSelect(TABLE_Sites_uteis)=-1 THEN RETURN
//ler o arquivo de site, pois fiz a tabela via programação
HReadSeek(sites_uteis,sites_uteis.chave_empresa_site,[gnEmpresaCodigo,TABLE_Sites_uteis.COL_Id_empresa_site])
//entra no formulario de alteracao
PageDisplay(PAGE_site_formulario)
sSeleciona is string = COMBO_Seleciona..StoredValue
//mostra os sites
site_mostra_relacao(sSeleciona)

============================================================
 //VERIFICA SE ESTA SELECIONADO UM SITE
IF TableSelect(TABLE_Sites_uteis)=-1 THEN RETURN
//LER O SITE, POIS A TABELA FOI FEITO POR PROGRAMACAO
HReadSeek(sites_uteis,sites_uteis.chave_empresa_site,[gnEmpresaCodigo,TABLE_Sites_uteis.COL_Id_empresa_site])
//FAZ PERGUNTA SE DESEJA EXCLUIR
IF HFound(sites_uteis) THEN
    IF YesNo("Tem Certeza de que deseja excluir o Site?") THEN
        //EXCLUI O SITE
        HDelete(sites_uteis)
        sSeleciona is string = COMBO_Seleciona..StoredValue
        //MOSTRA OS SITES
        site_mostra_relacao(sSeleciona)
    END
END
//IF YesNo("Tem Certeza de que deseja excluir o Técnico?" + CR + "CONFIRME") THEN
============================================================
//Imprime Em pdf
// Generate a unique PDF file name

AFile is string 
AFile = fWebDir() + "\" + DateSys() + TimeSys() + ".pdf"
// Configure the destination of the print
iDestination(iPDF, AFile)
// Print the RPT_InvoicePDF report
iPrintReport(RPT_sites_uteis)
// Send the file to the browser
FileDisplay(AFile, "application/pdf")
// Delete the file
fDelete(AFile)

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

WebDev Menu Allinhar

WebDev Menu Allinhar

Webdev Callback Tempo em Tempo

Webdev Callback Tempo em Tempo

WebDev Link

Webdev Link

ShellExecute(TABLE_Sites_uteis.COL_Titulo_link)

Windev Link Pagina

Windev Link Pagina

ShellExecute(TABLE_sites_uteis.COL_Titulo_link)

Webdev Download

Webdev Download

WebDev Conexao

WebDev Conexao