Histórico da Página
...
Informações | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
User Function
Local nDataIni :=
Local nValor := 0 Local nQtd := 0 Local nDtFimMes := Day(dDataBase) Local cCompetAnt := "" Local nMesAnt := 0 Local nAnoAnt := 0 Local oModel := FwModelActive()If
dDataIniCtr
dDataFimCtr
nDataIni
nDtFimMes :=
nMes :=
nAno :=
cCodTFJ
nValor :=
nQtd :=
cCompetAnt :=
cCodTFF
Else dDataIniCtr :=
dDataFimCtr
nDataIni
nDtFimMes :=
nMes :=
nAno :=
cCodTFJ
nValor :=
nQtd :=
cCompetAnt := At740GtPer() cCodTFF :=
nMesAnt
nAnoAnt
If
cCompetAnt :=
Else cCompetAnt :=
EndIf EndIf If
cCompet :=
Else cCompet :=
EndIf If
nValor
Else nValor :=
EndIf //Arredonda o valor nValor := nValor * nQtd nValor :=
//Atualiza o cronograma
User Function
//Só será executado para contratos recorrentes e não será executado para item extra If lIsRecorrente .And. !lIsItenExtra .AND.
lRet :=
EndIf Return lRet
A função Condição() é criada para garantir que o gatilho não vai ser executado para contratos não recorrentes e itens extras Se a condição criada for positiva, o gatilho será chamado e o calculo será feito. Com isso ao ser informado uma data de inicio do contrato(TFF_PERINI), o calculo será feito conforme o dia e o valor(TFF_PRCVEN). |
...