Buscar este blog

miércoles, 26 de febrero de 2014

Poner el progress



Poner el progress por ejemplo en un job:

static void Job879(Args _args)
{
    #avifiles

    SysOperationProgress    sOP;

    ERCustTv    ERCustTv;
    ERSalesLine ERSalesLine;
    County      County;
    Numberof    cont;
    ;

    sOP = new sysoperationprogress(1);
    sOP.setAnimation(#aviupdate);
    sOP.setTotal(100000,1);


    while select CountyId from County
    {
    while select * from ERCustTv
        index hint Countyidx
            where ERCustTv.CountyId == County.CountyId &&
                  ERCustTv.LastSales == NoYes::Yes
                  exists join ERSalesLine
                    index hint Phoneidx
                        where ERSalesLine.Phone == ERCustTv.Phone &&
                              ERSalesLine.AmountMST >= 50
                  {
                    cont++;
                    sOP.setText(strFmt("Clientes %1 ", cont));
                    sOP.setCount(cont);
                  }
    }
    info(int2str(cont));

}

No hay comentarios:

Publicar un comentario