This is version 1 2 3 4 . It is not the current version, and thus it cannot be edited.

Back to current versionRestore this version

DATE - Convert to a Date Convert Operand 2 into a date formatted as specified in Operand 3, store result in Operand 1 Statement: Create the new date from the day and month of the hire date and the year of the seniority date (a character string that has been built).

Line	CMD	OT	Operand 1	OPER	OT	Operand2	OT	Operand3	If Goto	Else GoTo

00010 LET V DAY DAY DB EEM.HIRE_DATE 00020 00020 LET V MONTH MTH DB EEM.HIRE_DATE 00030 00030 LET V YEAR YRS DB EEM.SENIORITY_DATE 00040 00040 LET V ALPHA DATE EQ V DAY A - 00050 00050 LET V ALPHA DATE EQ V ALPHA DATE V MONTH 00060 00060 LET V ALPHA DATE EQ V ALPHA DATE A - 00070 00070 LET V ALPHA DATE EQ V ALPHA DATE V YEAR 00100 00100 LET V NEW DATE DATE V ALPHA DATE A DD-MON-YYYY 99999 99999 EXIT 99999