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 |