CTBVldSld - Valida si los saldos básicos se actualizarán en la grabación de asientos contabless.

Se creó el punto de entrada CTBVldSld que valida si los saldos básicos se actualizarán en la grabación de la rutina Asientos contables automáticos.

User Function CTBVldSld()

Local lRet := .F.
Local _lAtSldCT7 := paramixb[1]
Local _lAtSldCT3 := paramixb[2]
Local _lAtSldCT4 := paramixb[3]
Local _lAtSldCTI := paramixb[4]

//Personalizaciones del cliente

Alert ("Punto de entrada ejecutado")

If (_lAtSldCT7 .or. _lAtSldCT3 .or. _lAtSldCT4 .or. _lAtSldCTI)
lRet := .T.
EndIf

Return lRet

Portugués(Brasil)

Versiones_Anteriores

Todos

Todas

_lAtSldCT7, _lAtSldCT3, _lAtSldCT4, _lAtSldCTI

lRet

_lAtSldBase := IIf(GetMv("MV_ATUSAL")== "S",.T.,.F.)

If _lAtSldBase .and. lVldSld
lRetSld := ExecBlock("CTBVldSld",.F.,.F., {_lAtSldCT7, _lAtSldCT3, _lAtSldCT4, _lAtSldCTI})
If lRetSld
 _lAtSldBase := .F.
EndIf
EndIf

Local lVldSld := ExistBlock("CTBVldSld")
Local lRetSld := .F.

CTBXATU.PRW