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: |
| ||||||||||||
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