...
FWGridProcess():Activate (oDlg) -->
Parâmetros
Nome | Tipo | Descrição | Obrigatório | Referencia |
---|---|---|---|---|
oDlg | Objeto | Container da interface gráfica | X |
FWGridProcess() :DeActivate () -->
FWGridProcess() :SetMeters (nQtde<nQtde>) -->
Nome | Tipo | Descrição | Obrigatório | Referencia |
---|---|---|---|---|
nQtde | Numérico | Informe a quantidade de réguas de processamento que a rotina necessitada | X |
Nome | Tipo | Descrição | Obrigatório | Referencia |
---|---|---|---|---|
nMax | Numérico | Informe a quantidade máxima de interações do meter | X | |
nMeter | Numérico | Informe o numero de referência do meter | ||
cMsg | Caracter | Informe a mensagem de referência do meter |
Exemplo de uso de Grid
User Function testeba()
RpcSetEnv("99","01")
__cInterNet := Nil
oGrid:=FWGridProcess():New("MATA330","teste","teste do processamento",{|lEnd| u_testeba1(oGrid,@lEnd)},"MTA330","u_testeba2")
oGrid:SetMeters(2)
oGrid:SetThreadGrid(5)
oGrid:Activate()
If oGrid:IsFinished()
alert("fim")
Else
alert("fim com erro")
EndIf
...