DT_VCM680GH_Gravação_de_históricos_de_alteração_para_campos_customizados_na_Oportunidade_de_Negócios

Ponto de Entrada

Descrição:	Este ponto de entrada possibilita a gravação de históricos de alteração para campos customizados na rotina de Oportunidade de Negócios / Interesses. Para isso, é necessário que exista o campo com o mesmo nome nas tabelas VDM (Interesses) e VDN (Históricos de Interesses).
Localização:	Atualizações / Cad C e V / Oportunid Negócios
Eventos:	If lVCM680GH // Campos do VDM a serem gravados nos Historicos aCpos := ExecBlock("VCM680GH",.f.,.f.) // Retorno do PE deve ser um Vetor ( aCpos ) // aCpos[1] = Campos do VDM a serem gravados nos Historicos das Fases do Interesse // aCpos[2] = Campos do VDM a serem gravados nos Historicos das Fases de Financiamento If ValType(aCpos) <> "A" aCpos := {} EndIf EndIf
Programa Fonte:	VEICM680
Função:	VCM680GRV
Retorno:	aRet = Vetor com os campos VDM a serem gravados nos Historicos das Fases Interesse e Fases de Financiamento Exemplo: aRet := {,} aRet[1] := {"VDM_TESTE1","VDM_TESTE2"} // Historico de Fases de Interesses aRet[2] := {"VDM_TESTE3","VDM_TESTE4","VDM_TESTE5"} // Historico de Fases de Financiamento

Exemplo:

/*

ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ

±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±

±±ÉÍÍÍÍÍÍÍÍÍÍÑÍÍÍÍÍÍÍÍÍÍËÍÍÍÍÍÍÍÑÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍËÍÍÍÍÍÍÑÍÍÍÍÍÍÍÍÍÍÍÍ»±±

±±º Programa ³ VCM680GH º Autor ³ Andre Luis Almeida º Data ³ 29/10/15 º±±

±±ÌÍÍÍÍÍÍÍÍÍÍØÍÍÍÍÍÍÍÍÍÍÊÍÍÍÍÍÍÍÏÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÊÍÍÍÍÍÍÏÍÍÍÍÍÍÍÍÍÍÍÍ¹±±

±±º Descricao³ Campos do Interesse a serem gravados nos Historicos º±±

±±ÈÍÍÍÍÍÍÍÍÍÍÏÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ¼±±

±±º º±±

±±º Observacao: Necessario existir o campo com o "mesmo nome" nas tabelas º±±

±±º VDM (Interesses) e VDN (Historicos de Interesses) º±±

±±º º±±

±±º Exemplo: VDM_TESTE1 e VDN_TESTE1 º±±

±±º VDM_TESTE2 e VDN_TESTE2 º±±

±±º º±±

±±ÈÍÍÍÍÍÍÍÍÍÍÏÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ¼±±

±±º º±±

±±º Vetor de Retorno º±±

±±º [1] Campos VDM a serem gravados nos Historicos das Fases Interesse º±±

±±º [2] Campos VDM a serem gravados nos Historicos das Fases Financiam º±±

±±º º±±

±±º Exemplo: º±±

±±º aRet := {,} º±±

±±º aRet[1] := {"VDM_TESTE1","VDM_TESTE2"} º±±

±±º aRet[2] := {"VDM_TESTE3","VDM_TESTE4","VDM_TESTE5"} º±±

±±º º±±

±±ÈÍÍÍÍÍÍÍÍÍÍÏÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ¼±±

±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±

ßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßß

*/

User Function VCM680GH()

Local aRet := {}

MsgAlert("Ponto de Entrada VCM680GH executado com sucesso!","Atenção")

Return(aRet)