Histórico da Página

Ponto de Entrada

Descrição:

Ponto de Entrada para realizar operações na exclusão de despesas/receitas. Executado após a exclusão do lançamento, dentro da transação.

Localização:

Atualizações / Mov. Atendimento / Despesas/receitas

Eventos:

If aColsDR[nCont,len(aColsDR[nCont])]

If wProcura

RecLock("VVD",.F.,.T.)

DbDelete()

MsUnlock()

WriteSx2("VVD")

EndIf

If ExistBlock("VM040DEL")

ExecBlock("VM040DEL",.f.,.f., { aHeadDR,aColsDR } )

EndIf

Else

Programa Fonte:

VEIVM040.PRW

Função:

FS_GRVVM040()

Parâmetros:

Nome	Tipo	Descrição
aHeadDesp	Matriz	aHeader dos campos em uso da tabela VVD.
aColsDesp	Matriz	aCols contendo as informaçoes dos campos em uso da tabela VVD.

Retorno:

Não há.

Exemplo:

Include totvs.ch

User Function VM040DEL()

Local aHeadDR := ParamIxb[1] // Cabeçalho Despesas/Receitas

Local aColsDR := ParamIxb[2] // Itens Despesas/Receitas

//MsgInfo("Ponto de entrada VM040DEL executado com sucesso!")

Return