Agenda - Windev/Webdev/Windev Mobile Parte 9 Looper

Assistir Video Windev Mobile - Agenda: Looper 9

---

---

---

---

amarildo@matosinformatica.com.br

---

=======================================================================
Vou Mostrar como Fazer Break no Looper. Eu estava assistindo a aula
do Pedrosao aula 13,quando viu e achei interessante.
 http://189.113.6.131/w_pedroso
=======================================================================
Ir na descricao do Looper

ir em Content

e no lado do break clique no verde

escolha o campo , e passe para o lado direito

Crie um combox por grupo, onde vamos decidir
se queremos ou nao o break

Na minha rotina acrescentei , perguntando se é por grupo ou nao
se for por grupo, habilita os break e faco por ordem de grupo
caso contrario desabilito os break
// Por Grupo
IF CBOX_por_grupo=0 THEN
    BRK_BreakFooter1..Visible=False
    BRK_BreakHeader1..Visible=False
ELSE
    BRK_BreakFooter1..Visible=True
    BRK_BreakHeader1..Visible=True
    sFiltro = sFiltro + " order by agenda.grupo"       
END
// Por Grupo
====================================== FONTE ===============

PROCEDURE agenda_looper(sGrupo is string)
gsSQL = [
    SELECT
    agenda.nome as age_nome,
    agenda.telefone as age_telefone,
    agenda.grupo as age_grupo
    from
    agenda
    %1
]
sFiltro is string
IF sGrupo="Todos" THEN
ELSE
    IF sGrupo<>"" THEN
        sFiltro = " where agenda.grupo='"+sGrupo+"'"
    END
END
// Por Grupo
IF CBOX_por_grupo=0 THEN
    BRK_BreakFooter1..Visible=False
    BRK_BreakHeader1..Visible=False
ELSE
    BRK_BreakFooter1..Visible=True
    BRK_BreakHeader1..Visible=True
    sFiltro = sFiltro + " order by agenda.grupo"       
END
// Por Gruop
gsSQL = StringBuild(gsSQL,sFiltro)

LooperDeleteAll(LOOP_Sq_agenda)
IF HExecuteSQLQuery(gdsQry,hQueryDefault,gsSQL) THEN
    HReadFirst(gdsQry)
    WHILE NOT HOut()
        LooperAddLine(LOOP_Sq_agenda,gdsQry.age_nome,gdsQry.age_telefone,gdsQry.age_grupo)
        HReadNext(gdsQry)
    END
    HFreeQuery(gdsQry)    
END
=======================================================================
Blogs Referente Agenda Curso
http://windevdesenvolvimento.blogspot.com.br/2015/01/agenda-windevwebdevwibdevmobile-parte-1_14.html
http://windevdesenvolvimento.blogspot.com.br/2015/01/agenda-windevwebdevwibdevmobile-parte-2.html
http://windevdesenvolvimento.blogspot.com.br/2015/01/agenda-windevwebdevwibdevmobile-parte-3.html
http://windevdesenvolvimento.blogspot.com.br/2015/01/agenda-windevwebdevwibdevmobile-parte-4.html
http://windevdesenvolvimento.blogspot.com.br/2015/01/agenda-windevwebdevwibdevmobile-parte-5_59.html
http://windevdesenvolvimento.blogspot.com.br/2015/01/agenda-windevwebdevwibdevmobile-parte-6.html
http://windevdesenvolvimento.blogspot.com.br/2015/01/agenda-windevwebdevwibdevmobile-parte-7.html
http://windevdesenvolvimento.blogspot.com.br/2015/01/agenda-windevwebdevwindev-mobile-parte_20.html
=======================================================================