Árvore de páginas

Ponto de Entrada

Descrição:

Ponto de Entrada na rotina de Verba da SCANIA, executado no final da Deleção da Verba

Localização:

Atualizações \ Mov Oficina \ Verba (SCANIA)

Eventos:

...

If ExistBlock("OA330DEL")

ExecBlock("OA330DEL",.f.,.f.,{ cTp , nReg , ni })

EndIf

...

Programa Fonte:

OFIOA330.PRW

Função:

FS_DELVERBA()

Parâmetros:
NomeTipoDescrição

cTp

Caracter

Tipo ( 1 = Tela Inicial / 2 = Tela Solicitação )

nReg

Numérico

Nro do registro do VAK

ni

Numérico

Linha posicionada no vetor aSolVAK

Retorno:


Não há.

Exemplo:

Include totvs.ch


// Ponto de Entrada a rotina de Verba do Cliente, executado no final da Deleção da Verba.

User Function OA330DEL()

Local cTp := ParamIXB[1] // Tipo ( 1 = Tela Inicial / 2 = Tela Solicitação )

Local nReg := ParamIXB[2] // Nro do registro do VAK

Local ni := ParamIXB[3] // Linha posicionada no vetor aSolVAK


MsgInfo("Ponto de entrada OA330DEL executado com sucesso!")


Return