...
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>) -->
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 |
FWGridProcess() :SetIncMeter (<nMeter>,<cMsg>) -->
Nome | Tipo | Descrição | Obrigatório | Referencia |
---|---|---|---|---|
nMeter | Numérico | Informe o numero de referência do meter | ||
cMsg | Caracter | Informe a mensagem de referência do meter |
FWGridProcess() :SetAfterExecute (<bParam>) -->
Nome | Tipo | Descrição | Obrigatório | Referencia |
---|---|---|---|---|
bParam | Bloco | Bloco de código a ser executado no termino do execute | X |
FWGridProcess() :SaveLog (<cMsg>) -->
Nome | Tipo | Descrição | Obrigatório | Referencia |
---|---|---|---|---|
cMsg | Caracter | Informe a mensagem que deverá ser gravada no log |
FWGridProcess() :GetLastLog() -->
Return clogcLog
FWGridProcess() :SetNoParam() -->
FWGridProcess() :SetMaxThreadGrid(<nMax>) -->
Nome | Tipo | Descrição | Obrigatório | Referencia |
---|---|---|---|---|
nMax | Numérico | Numero de threads | X |
FWGridProcess() :SetThreadGrid(<nThread>) -->
Nome | Tipo | Descrição | Obrigatório | Referencia |
---|---|---|---|---|
nThread | Numérico | Numero de threads | X |
FWGridProcess() :CallExecute(<xParm0>,<xParm1>,<xParm2>,<xParm3>,<xParm4>,<xParm5>,<xParm6>,<xParm7>,<xParm8>,<xParm9>) -->
Nome | Tipo | Descrição | Obrigatório | Referencia |
---|---|---|---|---|
xParm0 | Numérico, Caracter, Array, Data | Parâmetro que será repassada para a rotina de grid | ||
xParm1 | Numérico, Caracter, Array, Data | Parâmetro que será repassada para a rotina de grid | ||
xParm2 | Numérico, Caracter, Array, Data | Parâmetro que será repassada para a rotina de grid | ||
xParm3 | Numérico, Caracter, Array, Data | Parâmetro que será repassada para a rotina de grid | ||
xParm4 | Numérico, Caracter, Array, Data | Parâmetro que será repassada para a rotina de grid | ||
xParm5 | Numérico, Caracter, Array, Data | Parâmetro que será repassada para a rotina de grid | ||
xParm6 | Numérico, Caracter, Array, Data | Parâmetro que será repassada para a rotina de grid | ||
xParm7 | Numérico, Caracter, Array, Data | Parâmetro que será repassada para a rotina de grid | ||
xParm8 | Numérico, Caracter, Array, Data | Parâmetro que será repassada para a rotina de grid | ||
xParm9 | Numérico, Caracter, Array, Data | Parâmetro que será repassada para a rotina de grid |
Retrun lEnd
Indica que a rotina foi interrompida pelo usuário
FWGridProcess() :Execute() -->
FWGridProcess() :StopExecute() -->
FWGridProcess() :IsFinished() -->
Return lRetorno
Indica que o processamento foi terminado
FWGridProcess() :SetAbort(<lAbort>) -->
Nome | Tipo | Descrição | Obrigatório | Referencia |
---|---|---|---|---|
lAbort | Lógico | Informe um valor lógico para indicar se a rotina pode ser abortada | X |
Return lAbort
StopExecute
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
...