Function VSAM149: Evaluate *CENTRAL_DATETIME on a Tier

LANSA

Function VSAM149: Evaluate *CENTRAL_DATETIME on a Tier
Name: VSAM149

Description: The following RDML function is used to evaluate system variable *CENTRAL_DATETIME on a tier.

Special Note: You should check this function into your iSeries development environment and compile it after creating and compiling it in your Visual LANSA environment.

FUNCTION OPTIONS(*HEAVYUSAGE *DIRECT *MLOPTIMIZE);
CHANGE FIELD(#SYSVAR$AV) TO(*CENTRAL_DATETIME);
EXCHANGE FIELDS(#SYSVAR$AV);
RETURN;