Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Coding JCLs using GRANDLIST NUMBERS

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> IBM Tools
View previous topic :: :: View next topic  
Author Message
sghosh_sl

New User


Joined: 28 Jul 2005
Posts: 7
Location: india

PostPosted: Wed Sep 21, 2005 7:49 pm    Post subject: Coding JCLs using GRANDLIST NUMBERS
Reply with quote

Hi,
Any body can provide me some documents / tutorials describing how to code JCLs with GRANDLIST numbers or OPC variables.

Thanks
Suman
Back to top
View user's profile Send private message

MGIndaco

Active User


Joined: 10 Mar 2005
Posts: 432
Location: Milan, Italy

PostPosted: Wed Sep 21, 2005 8:37 pm    Post subject:
Reply with quote

Hi Suman, for your request of Operations Planning and Control(OPC)
send me a PM and I will give you the Quick Reference pdf.

To your need of GRANDLIST I think that I can't understan well your request. I hope in other members.
Back to top
View user's profile Send private message
kumar4567

New User


Joined: 11 Apr 2008
Posts: 2
Location: India

PostPosted: Thu Apr 17, 2008 10:47 am    Post subject:
Reply with quote

Hi,
Please find the LIST OF GRANDLIST NUMBERS AND THEIR DESCRIPTIONS

• The 1st column indicates the Grandlist number.
• The 2nd column indicates if it is Reserved (R) or Manual (M), Reserved entries are for everyone’s use and Manual entries are specific to one project only.
• The 3rd column is a description of the format of the value.
• The 4th column indicates what Holiday Calendar the Grandlist Value uses for its calculations. N1 & C1 are based on the RISC holiday calendar HOLDAYBK. If it is blank then holidays are not used for the calculation of the value.
• The 5th column is a description of what the value is.


Most commonly used

0050 R YYMMDD%% C1 PRIOR WORKDAY (CANADA)
0051 R YYMMDD%% C1 NEXT WORKDAY (CANADA)
0052 R YYMMDD%% C1 2ND PRIOR WORKDAY (CANADA)
0053 R YYMMDD%% C1 3RD PRIOR WORKDAY (CANADA)
0054 R YYWWDD%% C1 PRIOR ISSUE CYCLE- FRIDAY WEEKS (CANADA)
0055 R YYWWDD%% C1 CURRENT ISSUE CYCLE- FRIDAY WEEKS (CANADA)
0056 R YYMMDD%% C1 4TH PRIOR WORKDAY (CANADA)
0057 R YYMMDD%% C1 5TH PRIOR WORKDAY (CANADA)
0058 R YYMMDD%% C1 6TH PRIOR WORKDAY (CANADA)
0066 R YYMMDD%% -- CURRENT DAY
0067 R YYMMDD%% N1 PRIOR WORKDAY (N1)
0068 R YYMMDD%% N1 NEXT WORKDAY (N1)
0069 R YYMMDD%% N1 2ND PRIOR WORKDAY (N1)
0095 R MMDDYY%% -- LAST FRIDAY OF THE MONTH (PROJ.L0641)
0100 R YYMMDD%% N1 1ST WORKDAY OF CURRENT WEEK (N1)
0104 R YYMMDD%% N1 LAST WORKDAY OF CURRENT WEEK (N1)
0109 R YYMMDD%% N1 LAST WORKDAY OF PRIOR WEEK (N1)
0161 R YYMMDD%% N1 LAST WORKDAY 2 WEEKS PRIOR (N1)
0162 R YYMMDD%% C1 LAST WORKDAY 2 WEEKS PRIOR (CANADA)
0163 R YYMMDD%% C1 LAST WORKDAY 3 WEEKS PRIOR (CANADA)
0164 R YYMMDD%% C1 LAST WORKDAY 4 WEEKS PRIOR (CANADA)
0165 R YYMMDD%% C1 LAST WORKDAY 5 WEEKS PRIOR (CANADA)
0200 R YYMMDD%% -- MONDAY DATE OF CURRENT WEEK
0201 R YYMMDD%% -- TUESDAY DATE OF CURRENT WEEK
0202 R YYMMDD%% -- WEDNESDAY DATE OF CURRENT WEEK
0203 R YYMMDD%% -- THURSDAY DATE OF CURRENT WEEK
0204 R YYMMDD%% -- FRIDAY DATE OF CURRENT WEEK
0205 R YYMMDD%% -- SATURDAY DATE OF CURRENT WEEK
0211 R YYMMDD%% -- FRIDAY DATE OF PRIOR WEEK
0304 R YYMMDD%% -- 5TH/LAST FRIDAY OF CURRENT MONTH
0309 R YYMMDD%% -- 5TH/LAST FRIDAY OF PRIOR MONTH
0393 R MMDDYY%% -- LAST CALENDAR DAY OF PRIOR MONTH
0409 R YY0101%% -- 1ST CALENDAR DATE OF CURRENT YEAR
0411 R YY0101%% -- 1ST CALENDAR DATE OF NEXT YEAR
0424 R YYMMDD%% -- LAST CALENDAR DATE IN CURRENT YEAR
0427 R YYMMDD%% -- LAST CALENDAR DATE OF PRIOR YEAR
0504 R YYMMDD%% -- LAST CALENDAR DAY OF PRIOR QUARTER
0608 R YYMMDD%% -- LAST CALENDAR DATE OF CURRENT MONTH
0628 R YYMMDD%% C1 LAST WORKDAY OF PRIOR MONTH (CANADA)
0629 R YYMMDD%% C1 1ST WORKDAY OF PRIOR MONTH (CANADA)
0800 R YYMMDD%% N1 LAST WORKDAY OF CURRENT YEAR (N1)
0809 R YYMMDD%% N1 LAST WORKDAY OF PRIOR YEAR
0978 R CCYYMMDD -- LAST CALENDAR DAY OF CURRENT MONTH
0981 R YY1231%% -- LAST CALENDAR DATE OF 2 YEARS PRIOR
1040 R YYMM01%% -- 1ST CALENDAR DATE OF NEXT MONTH
1047 R MMDDCCYY N1 LAST WORKDAY OF THE PRIOR YEAR
1839 R MMDDYY%% -- 1ST CALENDAR DAY OF CURRENT MONTH
1967 R CYYMMDD% -- TWO WEEK PRIOR SATURDAY DATE



0000 R YYMMDD%% -- CURRENT DAY (YYMMDD)
0001 R YMMDD%%% -- CURRENT DAY (YMMDD)
0002 R DD%%%%%% -- CURRENT DAY OF THE MONTH
0003 R YYMMDD%% -- 11TH PRIOR LLLLLL DATE (CPF M-F)
0004 R MM%%%%%% -- MM=CURRENT MONTH
0005 R YYMMDD%% -- 14TH PRIOR LLLLLL DATE (CPF M-F)
0006 R YYMMDD%% C1 1ST WORKDAY OF MONTH 3 MONTHS PRIOR
0007 R YYMMDD%% N1 01=1ST WD OF CURR YR;06=1ST WD AFTER 4TH FRI OF JUNE
0008 R NE%%%%%% -- NE ON 3RD FRIDAY OF MAY,ELSE LT
0009 R DD%%%%%% -- 1ST 2 LETTERS OF CALENDAR DAY (E.I. MONDAY=MO)
0010 R DD%%%%%% N1 PRIOR WORKDAY
0011 R EQ%%%%%% -- EQ EXCEPT MARCH,JUNE,SEPT, & OCT. THEN GT
0012 R DD%%%%%% N1 LAST WORKDAY OF PRIOR QUARTER
0013 R YY%%%%%% -- YEAR OF PRIOR QUARTER
0014 R EQ%%%%%% -- EQ EXPT 3RD FRI OF MONTH EXPT DEC ON 2ND FRI THEN NE
0015 R DUMMY,%% -- DUMMY EXPT 3RD FRI OF MONTH EXPT DEC THEN 2ND FRI
0016 R 2%%%%%%% C1 1 ON 1ST WD OF WK;8 ON LT WD OF WK; ELSE 2
0017 R YYMMDD%% C1 NEXT-TO-LAST WORKDAY OF 3RD PRIOR MONTH
0018 R DUMMY,%% -- DUMMY EXPT DEC 11 THRU AND INCLUDING DEC 31
0019 R EQ%%%%%% -- EQ EXCT 1ST CAL DAY & MONDAYS,1ST & 2ND MON DEC DATES THEN GT
0020 R YYMMDD%% N1 1ST WORKDAY OF WEEK 6 WEEKS PRIOR
0021 R MMDDYY%% N1 CURRENT DAY PLUS 2 WORKDAYS
0022 R MMDDYY%% N1 CURRENT DAY PLUS 3 WORKDAYS
0023 R YYMMDD%% C1 CURRENT DAY PLUS 2 WORKDAYS
0024 R YYMMDD%% -- THURS IN WK OF 2ND FRI PRIOR MONTH
0025 R YYMMDD%% -- NEXT CALENDAR DAY (YYMMDD)
0026 R YYMMDD%% -- MON=2ND PR MONDAY;TUE-FRI=PRIOR MONDAY
0027 R YYMMDD%% -- MON-WED=CURRENT FRIDAY;TH-FR=NEXT FRIDAY
0028 R YYMMDD%% N1 1ST WD AFTER 2ND FRI OF PRIOR MONTH
0029 R YYMMDD%% C1 4TH LAST WORKDAY OF MONTH
0030 R YYMMDD%% N1 1WD=MON OF 2 WK PR;2WD-5WD=MON OF PR WK
0031 R YYMMDD%% -- MON-WED=MON OF 2WK PR ;TH-FR=MON OF PR WK
0032 R YYMMDD%% N1 1ST WORKDAY OF WEEK 2 WEEKS PRIOR
0033 R YYMM0D%% C1 5TH PRIOR ISSUE CYCLE (3402)
0034 R YYMM0D%% C1 11TH PRIOR ISSUE CYCLE (3402)
0035 R YYWW%%%% -- 4TH PRIOR WIRE WEEK (BASED ON ENTRY 0270)
0036 R CCYYMM%% -- 4 DIGITS CUR YR & 2 DIGITS OF 3RD PRIOR MONTH
0037 R YYMM00%% -- YR & MO OF 4TH PRIOR LLLLLL DATE (CPF)(M-F)
0038 R YYMMDD%% -- 4TH PRIOR LLLLLL DATE (CPF)(M-F)
0039 R YYMMDD%% -- 5TH PRIOR LLLLLL DATE (CPF)(M-F)
0040 R YYMMDD%% -- 8TH PRIOR LLLLLL DATE (CPF)(M-F)
0041 R YYMMDD%% -- 10TH PRIOR LLLLLL DATE (CPF)(M-F)
0042 R MMDDYY%% C1 CURRENT TUESDAY(IF HOL NEXT WD)
0043 R YYMMDD%% -- 1ST MONDAY OF CURRENT MONTH
0044 R YYMMDD%% -- 2ND MONDAY OF CURRENT MONTH
0045 R YYMMDD%% -- 3RD MONDAY OF CURRENT MONTH
0046 R YYMMDD%% -- 4TH MONDAY OF CURRENT MONTH
0047 R YYMMDD%% -- 5TH MONDAY OF CURRENT MONTH(IF NO 5TH MONDAY 000000)
0048 R YYMMDD%% N1 CURRENT DAY PLUS 2 WORKDAYS
0049 R YYMMDD%% N1 CURRENT DAY PLUS 3 WORKDAYS
0050 R YYMMDD%% C1 PRIOR WORKDAY (CANADA)
0051 R YYMMDD%% C1 NEXT WORKDAY (CANADA)
0052 R YYMMDD%% C1 2ND PRIOR WORKDAY (CANADA)
0053 R YYMMDD%% C1 3RD PRIOR WORKDAY (CANADA)
0054 R YYWWDD%% C1 PRIOR ISSUE CYCLE- FRIDAY WEEKS (CANADA)
0055 R YYWWDD%% C1 CURRENT ISSUE CYCLE- FRIDAY WEEKS (CANADA)
0056 R YYMMDD%% C1 4TH PRIOR WORKDAY (CANADA)
0057 R YYMMDD%% C1 5TH PRIOR WORKDAY (CANADA)
0058 R YYMMDD%% C1 6TH PRIOR WORKDAY (CANADA)
0059 R YYWWDD%% N1 CURRENT ISSUE CYCLE- FRIDAY WEEKS (N1)
0060 R YYWWDD%% N1 PRIOR ISSUE CYCLE- FRIDAY WEEKS (N1)
0061 R YYWWDD%% C1 2ND PRIOR ISSUE CYCLE-FRIDAY WEEKS (CANADA)
0062 R WW%%%%%% -- WK NUM. OF 3RD PRIOR WEEK (1ST FULL CAL WK OF JAN=01)
0063 R 100%%%%% C1 100 ON 1ST & LST WD OF MONTH ELSE 60
0064 R YY1231%% -- 1ST MON OF YR=2 YRS PRIOR 1231;ELSE PRIOR YR 1231
0065 R MMDD%%%% -- MONTH AND DAY OF CURRENT DAY
0066 R YYMMDD%% -- CURRENT DAY
0067 R YYMMDD%% N1 PRIOR WORKDAY (N1)
0068 R YYMMDD%% N1 NEXT WORKDAY (N1)
0069 R YYMMDD%% N1 2ND PRIOR WORKDAY (N1)
0070 R YYMMDD%% N1 3RD PRIOR WORKDAY (N1)
0071 R YYMMDD%% N1 5TH PRIOR WORKDAY (N1)
0072 R YYMMDD%% N1 10TH PRIOR WORKDAY (N1)
0073 R YYMMDD%% N1 15TH PRIOR WORKDAY (N1)
0074 R YYMMDD%% N1 20TH PRIOR WORKDAY (N1)
0075 R YYMMDD%% N1 30TH PRIOR WORKDAY (N1)
0076 R YYMMDD%% -- CURRENT CWCWCW DATE (CPF BILLING PERIOD)(M-F)
0077 R YYMMDD%% -- CURRENT BABABA DATE (CPF BILLING PERIOD)(M-F)
0078 R YYMMDD%% -- CURRENT BPBPBP DATE (CPF BILLING PERIOD)(M-F)
0079 R YYMMDD%% -- PRIOR WED/FRI CYCLE-
0080 R YYMMDD%% N1 2ND PRIOR WD OR LAST WD 3 WKS PRIOR (1ST WD/WK) (N1)
0081 R YYWW0D%% N1 2ND PRIOR ISSUE CYCLE (34.1)
0082 R YYWWD%%% N1 CURRENT ISSUE WK OF YR AND DAY OF WEEK(34.1)
0083 R YYWWD1%% C1 CURRENT MECH. ISSUE CYCLE WHERE D=DAY NUM.
0084 R YYMMDD%% N1 NEXT TO LAST WD OF CURRENT WEEK
0085 R YYWW0D%% N1 3RD PRIOR ISSUE CYCLE
0086 R YYMMDD%% N1 NEXT-TO-LAST WD 2ND PRIOR WK
0087 R YYMMDD%% N1 4TH PRIOR WORKDAY
0088 R YYMMDD%% N1 CURRENT DATE EXPT LT WD=CURRENT AUAUNN(F-T)
0089 R YYMMDD%% -- 3RD PRIOR LLLLLL DATE (CPF)(M-F)
0090 X %%%%%%%% -- ***** AVAILABLE FOR FUTURE USE *****
0091 R YYMMDD%% C1 1WD OF WK=1WD OF 2PWK;2WD OF WK=2WD OF 2PWK
0092 R MMDD%%%% N1 MONTH AND DAY OF NEXT WORKDAY
0093 R YYMMDD%% -- MON-THURS=CURRENT FRI.; FRIDAY=NEXT FRIDAY
0094 R YYMMDD%% N1 1ST CALENDAR DATE OF QUART./QTR=1-4-6-9
0095 R MMDDYY%% -- LAST FRIDAY OF THE MONTH (PROJ.L0641)
0096 R MMDDYY%% C1 LAST WD OF 2ND WEEK OF CURRENT MONTH
0097 R YYMMDD%% N1 2ND WORKDAY OF CURRENT MONTH
0098 R YYMMDD%% N1 2ND WORKDAY OF FOLLOWING MONTH
0099 R YYMMDD%% C1 1ST MONDAY OF CUR MONTH (IF MON HOL THEN NWD)
0100 R YYMMDD%% N1 1ST WORKDAY OF CURRENT WEEK (N1)
0101 R YYMMDD%% N1 2ND WORKDAY OF CURRENT WEEK (N1)
0102 R YYMMDD%% N1 3RD WORKDAY OF CURRENT WEEK (N1)
0103 R YYMMDD%% N1 4TH WORKDAY OF CURRENT WEEK (N1)
0104 R YYMMDD%% N1 LAST WORKDAY OF CURRENT WEEK (N1)
0105 R YYMMDD%% N1 1ST WORKDAY OF PRIOR WEEK (N1)
0106 R YYMMDD%% N1 2ND WORKDAY OF PRIOR WEEK (N1)
0107 R YYMMDD%% N1 3RD WORKDAY OF PRIOR WEEK (N1)
0108 R YYMMDD%% N1 4TH WORKDAY OF PRIOR WEEK (N1)
0109 R YYMMDD%% N1 LAST WORKDAY OF PRIOR WEEK (N1)
0110 R YYMMDD%% N1 1ST WORKDAY OF NEXT WEEK (N1)
0111 R YYMMDD%% N1 2ND WORKDAY OF NEXT WEEK (N1)
0112 R YYMMDD%% N1 3RD WORKDAY OF NEXT WEEK (N1)
0113 R YYMMDD%% N1 4TH WORKDAY OF NEXT WEEK (N1)
0114 R YYMMDD%% N1 LAST WORKDAY OF NEXT WEEK (N1)
0115 R YYMMDD%% N1 LAST WORKDAY 2 WEEKS PRIOR-6.2 REWRITE (N1)
0116 R YYWW01%% -- CURRENT WEEK, DAY '01' (CANADIAN ISSUE CYCLE)
0117 R YYWW02%% -- CURRENT WEEK, DAY '02' (CANADIAN ISSUE CYCLE)
0118 R YYWW03%% -- CURRENT WEEK, DAY '03' (CANADIAN ISSUE CYCLE)
0119 R YYMMDD%% N1 LAST WORK DAY 3 WEEKS PRIOR (N1)
0120 R YYMMDD%% -- CURRENT DATE MINUS 5 WEEKS
0121 R YYMMDD%% -- CURRENT DATE MINUS 9 WEEKS
0122 R YYMMDD%% -- CURRENT DATE MINUS 13 WEEKS
0123 R YYMMDD%% N1 CURRENT DATE MINUS 5 WEEKS/NEXT WORKDAY (N1)
0124 R YYMMDD%% N1 CURRENT DATE MINUS 9 WEEKS/NEXT WORKDAY (N1)
0125 R YYMMDD%% C1 1ST WORKDAY OF CURRENT WEEK (CANADA)
0126 R YYMMDD%% C1 LAST WORKDAY OF CURRENT WEEK (CANADA)
0127 R YYMMDD%% C1 LAST WORKDAY OF PRIOR WEEK (CANADA)
0128 R YYMMDD%% C1 NEXT-TO-LAST WORKDAY OF PRIOR WEEK (CANADA)
0129 R YYWWDD%% C1 LAST ISSUE CYCLE OF PRIOR WEEK (CANADA)
0130 R YYMMDD%% C1 14 DAYS PRIOR TO 1ST WORKDAY/CURRENT WEEK (CANADA)
0131 R YYMMDD%% C1 14 DAYS PRIOR TO 2ND WORKDAY/CURRENT WEEK (CANADA)
0132 R YYMMDD%% C1 14 DAYS PRIOR TO 3RD WORKDAY/CURRENT WEEK (CANADA)
0133 R YYMMDD%% C1 14 DAYS PRIOR TO 4TH WORKDAY/CURRENT WEEK (CANADA)
0134 R YYMMDD%% C1 14 DAYS PRIOR TO LAST WORKDAY/CURRENT WEEK (CANADA)
0135 R YYMMDD%% C1 21 DAYS PRIOR TO LAST WORKDAY/CURRENT WEEK (CANADA)
0136 R YYMMDD%% C1 3RD PRIOR WEDNESDAY MINUS 1 WORKDAY
0137 R YYMMDD%% C1 2ND WORKDAY OF CURRENT WEEK (CANADA)
0138 R YYMMDD%% C1 2ND WORKDAY OF PRIOR WEEK (CANADA)
0139 R YYMMDD%% C1 1ST WORKDAY OF PRIOR WEEK (CANADA)
0140 R YYMMDD%% C1 1ST WORKDAY OF NEXT WEEK (CANADA)
0141 R YYMMDD%% C1 3RD WORKDAY OF CURRENT WEEK (CANADA)
0142 R YYMMDD%% C1 4TH WORKDAY OF CURRENT WEEK (CANADA)
0143 R YYMMDD%% C1 3RD WORKDAY OF PRIOR WEEK
0144 R YYMMDD%% -- CURRENT DATE MINUS 1 WEEK
0145 R YYMMDD%% C1 1ST WORKDAY 2 WEEKS PRIOR
0146 R YYMMDD%% N1 NEXT-TO-LAST WORKDAY OF 4 WEEKS PRIOR
0147 R YYMMDD%% C1 12TH PRIOR WORKDAY
0148 R YYMMDD%% C1 10TH PRIOR WORKDAY
0149 M YYMM00%% -- CURRENT YR AND MONTH (CANADA)
0150 M YYMM%%%% -- CURRENT YR AND MONTH -1 MONTH (CANADA)
0151 M YYMM00MN -- CUR YR PRIOR MO EXPT JAN THEN SPACES(CAN)
0152 R CCYY%%%% -- CUR YR IN DEC. PRIOR YEAR 01-11
0153 M YYMM%%%% -- CUR YR AND MONTH -6 MONTHS (CANADA)
0154 M YYMM00%% -- CUR YR AND MONTH -1 MONTH (CANADA)
0155 M DUMMY,%% -- DUMMY EXPT 1ST MON OF 2ND MO AF QUAR(CANADA
0156 R CYYMMDD% N1 LAST WORKDAY 2ND PRIOR MONTH
0157 R JJJ%%%%% -- 1ST DAY OF PRIOR MONTH IN JULIAN FORMAT
0158 R YYWW%%%% -- ISSUE WEEK OF 4 WEEKS PRIOR (3401)
0159 R W%%%%%%% -- WEEK OF MONTH CALCULATED FROM A FRIDAY DATE
0160 R CYYMMDD% -- CENTURY + 1ST CALENDER DAY OF MONTH
0161 R YYMMDD%% N1 LAST WORKDAY 2 WEEKS PRIOR (N1)
0162 R YYMMDD%% C1 LAST WORKDAY 2 WEEKS PRIOR (CANADA)
0163 R YYMMDD%% C1 LAST WORKDAY 3 WEEKS PRIOR (CANADA)
0164 R YYMMDD%% C1 LAST WORKDAY 4 WEEKS PRIOR (CANADA)
0165 R YYMMDD%% C1 LAST WORKDAY 5 WEEKS PRIOR (CANADA)
0166 R YYMMDD%% C1 LAST WORKDAY 6 WEEKS PRIOR (CANADA)
0167 R YYMMDD%% C1 LAST WORKDAY 7 WEEKS PRIOR (CANADA)
0168 R YYMMDD%% N1 NEXT-TO-LAST WORKDAY PRIOR WEEK (N1)
0169 R YYMMDD%% C1 LAST WD OF NEXT WEEK
0170 R YYMMDD%% N1 TRANSACTION CLOSEOUT DAY 3 WKS PRIOR(CPF B.P.)(F-TH)
0171 R YYMMDD%% C1 3RD LAST WORKING DAY OF WEEK
0172 R YYMMDD%% C1 3RD LAST WORKING DAY OF 2 WEEKS PRIOR
0173 R YYMMDD%% C1 3RD LAST WORKING DAY OF 3 WEEKS PRIOR
0174 R YYMMDD%% C1 1ST WORKDAY OF 3 WEEKS PRIOR
0175 R YYMMDD%% C1 2ND WORKDAY OF 3 WEEKS PRIOR
0176 R YYMMDD%% C1 3RD WORKDAY OF 3 WEEKS PRIOR
0177 R YYMMDD%% C1 4TH WORKDAY OF 3 WEEKS PRIOR
0178 R YYMMDD%% N1 LAST WORKDAY OF WEEK 4 WEEKS PRIOR
0179 R YYMMDD%% N1 LAST WORKDAY OF WEEK 5 WEEKS PRIOR
0180 R YYMMDD%% N1 PRIOR WEEK FEEDBACK DAY(F-TH)
0181 R YYMMDDB0 N1 1ST WD=8 0'S;LT WD=PRIOR WD BL;OR PRIOR WD B0
0182 R YYMMDD%% C1 15TH PRIOR WORKDAY
0183 R YYMMDD%% C1 1ST WD OF 5 WEEKS PRIOR (C1)
0184 R YYMMDD%% C1 1ST WD OF 4 WEEKS PRIOR
0185 R YYMMDD%% C1 1ST WD OF 6 WEEKS PRIOR
0186 R YYMMDD%% C1 1ST WD OF 7 WEEKS PRIOR
0187 R YYMMDD%% C1 1ST WD OF 8 WEEKS PRIOR
0188 R YYMMDD%% C1 1ST WD OF 9 WEEKS PRIOR
0189 R YYMMDD%% C1 1ST WD OF 10 WEEKS PRIOR
0190 R YYMMDD%% C1 1ST WD OF 11 WEEKS PRIOR
0191 R YYMMDD%% C1 1ST WD OF 12 WEEKS PRIOR
0192 R YYMMDD%% C1 1ST WD OF 13 WEEKS PRIOR
0193 R YYWW0D%% C1 3RD PRIOR ISSUE CYCLE (3401)
0194 R YYWW0D%% C1 6TH PRIOR ISSUE CYCLE (3401)
0195 R YYWW0D%% C1 7TH PRIOR ISSUE CYCLE (3401)
0196 R YYWW0D%% C1 20TH PRIOR ISSUE CYCLE (3401)
0197 R YYWWD0%% C1 CURRENT ISSUE WK OF YR & WD OF WK (3401)
0198 R YYMMDD%% N1 LAST WORKING DAY OF 15 WEEKS PRIOR
0199 R YYMMDD%% N1 NEXT-TO-LAST WORKDAY OF WK 17 WEEKS PRIOR
0200 R YYMMDD%% -- MONDAY DATE OF CURRENT WEEK
0201 R YYMMDD%% -- TUESDAY DATE OF CURRENT WEEK
0202 R YYMMDD%% -- WEDNESDAY DATE OF CURRENT WEEK
0203 R YYMMDD%% -- THURSDAY DATE OF CURRENT WEEK
0204 R YYMMDD%% -- FRIDAY DATE OF CURRENT WEEK
0205 R YYMMDD%% -- SATURDAY DATE OF CURRENT WEEK
0206 R YYMMDD%% -- SUNDAY DATE OF CURRENT WEEK
0207 R YYMMDD%% -- MONDAY DATE OF PRIOR WEEK
0208 R YYMMDD%% -- TUESDAY DATE OF PRIOR WEEK
0209 R YYMMDD%% -- WEDNESDAY DATE OF PRIOR WEEK
0210 R YYMMDD%% -- THURSDAY DATE OF PRIOR WEEK
0211 R YYMMDD%% -- FRIDAY DATE OF PRIOR WEEK
0212 R YYMMDD%% -- SATURDAY DATE OF PRIOR WEEK
0213 R YYMMDD%% -- SUNDAY DATE OF PRIOR WEEK
0214 R YYMMDD%% -- MONDAY DATE OF NEXT WEEK
0215 R YYMMDD%% -- TUESDAY DATE OF NEXT WEEK
0216 R YYMMDD%% -- WEDNESDAY DATE OF NEXT WEEK
0217 R YYMMDD%% -- THURSDAY DATE OF NEXT WEEK
0218 R YYMMDD%% -- FRIDAY DATE OF NEXT WEEK
0219 R YYMMDD%% -- SATURDAY DATE OF NEXT WEEK
0220 R YYMMDD%% -- SUNDAY DATE OF NEXT WEEK
0221 R YYMMDD%% -- FRIDAY DATE OF 02 WEEKS PRIOR
0222 R YYMMDD%% -- FRIDAY DATE OF 03 WEEKS PRIOR
0223 R YYMMDD%% -- FRIDAY DATE OF 04 WEEKS PRIOR
0224 R YYMMDD%% -- FRIDAY DATE OF 05 WEEKS PRIOR
0225 R YYMMDD%% -- FRIDAY DATE OF 06 WEEKS PRIOR
0226 R YYMMDD%% -- FRIDAY DATE OF 07 WEEKS PRIOR
0227 R YYMMDD%% -- FRIDAY DATE OF 08 WEEKS PRIOR
0228 R YYMMDD%% -- FRIDAY DATE OF 09 WEEKS PRIOR
0229 R YYMMDD%% -- FRIDAY DATE OF 10 WEEKS PRIOR
0230 R YYMMDD%% -- FRIDAY DATE OF 11 WEEKS PRIOR
0231 R YYMMDD%% -- FRIDAY DATE OF 12 WEEKS PRIOR
0232 R YYMMDD%% -- FRIDAY DATE OF 13 WEEKS PRIOR
0233 R YYMMDD%% -- FRIDAY DATE OF 14 WEEKS PRIOR
0234 R YYMMDD%% -- FRIDAY DATE OF 15 WEEKS PRIOR
0235 R YYMMDD%% -- FRIDAY DATE OF 16 WEEKS PRIOR
0236 R YYMMDD%% -- FRIDAY DATE OF 17 WEEKS PRIOR
0237 R YYMMDD%% -- CURRENT FRIDAY DATE PLUS 02 WEEKS
0238 R YYWW00%% N1 YYWW00-2ND PRIOR MONDAY (YY-1 WHEN WW>50) (N1)
0239 R YYMMDD%% -- CURRENT MONDAY DATE PLUS 2 WEEKS
0240 R YYMMDD%% -- CURRENT MONDAY DATE MINUS 2 WEEKS
0241 R YYWW%%%% -- CURRENT FRIDAY WEEK-3401 (YYWW)
0242 R YYWW%%%% -- NEXT FRIDAY WEEK-3401 (YYWW)
0243 R YYWW%%%% -- PRIOR FRIDAY WEEK-3401 (YYWW)
0244 R YYWW%%%% -- 2ND PRIOR FRIDAY WEEK-3401 (YYWW)
0245 R YYMMDD%% -- CURRENT FRIDAY PLUS 3 WEEKS (YYMMDD)
0246 R YYMMDD%% N1 PRIOR WEDNESDAY- HOLIDAY/PRIOR TUESDAY (N1)
0247 R YYMMDD%% N1 CURRENT TUESDAY- HOLIDAY/NEXT WORKDAY (N1)
0248 R YYMMW%%% -- YYMMW/WEEK-OF-MONTH (2ND PRIOR MONDAY,MONDAY WEEKS)
0249 R YYMMDD%% -- CURRENT SASASA DATE (CPF BILLING PERIOD)(M-F)
0250 R YYMMDD%% -- CURRENT SBSBSB DATE (CPF BILLING PERIOD)(M-F)
0251 R YYMMDD%% -- CURRENT SCSCSC DATE (CPF BILLING PERIOD)(M-F)
0252 R YYMMWW%% -- CURRENT AUAUNN DATE (CPF BILLING PERIOD)(M-F)
0253 R YYMMWW%% -- CURRENT AQAQNN DATE (CPF BILLING PERIOD)(M-F)
0254 R WW%%%%%% -- CURRENT WW DATE (CPF BILLING PERIOD)(M-F)
0255 R YYMMDD%% -- CURRENT AFAFAF DATE (CPF BILLING PERIOD)(M-F)
0256 R YYMMDD%% N1 CURRENT FEEDBACK DATE (CPF BILLING PERIOD)(F-TH)
0257 R YYMMDD%% N1 NEXT FEEDBACK DATE (CPF BILLING PERIOD)(F-TH)
0258 R YYMMDD%% C1 CURRENT TUESDAY- HOLIDAY/NEXT WORKDAY (CANADA)
0259 R YYMMDD%% C1 PRIOR TUESDAY- HOLIDAY/NEXT WORKDAY (CANADA)
0260 R YYMMDD%% -- 6TH PRIOR LLLLLL DATE (CPF BILLING PERIOD)(M-F)
0261 R YYMMDD%% -- 7TH PRIOR LLLLLL DATE (CPF BILLING PERIOD)(M-F)
0262 R YYMMDD%% -- CURRENT FR EXPT 3RD FR OF DEC THEN PRIOR FR
0263 R YYMMDD%% -- 17TH PRIOR LLLLLL DATE(CPF BILLING PERIOD)(M-F)
0264 R YYMMDD%% -- CURRENT DATE MINUS 2 WEEKS
0265 R YYMMDD%% N1 1ST THRU 4TH WD=PRIOR FR;LT WD=CURRENT FR
0266 R YYMMWW%% -- CURRENT AQAQNN + 1 WK (NEXT REPORT WK (CPF)(M-F)
0267 R YYMMDD%% N1 1ST THRU 4TH WD=LT WD OF PR WK;LT WD=LT WD CUR
0268 R NN%%%%%% -- CURRENT NN DATE (CPF BILLING PERIOD)(M-F)
0269 R PP%%%%%% -- CURRENT PP DATE (CPF BILLING PERIOD)(M-F)
0270 R YYWW00%% -- CURRENT WIRE WK(6.2 N1)(BASED ON 1ST WORKING MON OF YR)
0271 R YYWW00%% -- PRIOR WIRE WK(6.2 N1)(BASED ON 1ST WORKING MON OF YR)
0272 R YYWW00%% -- SAME AS 0270 EXPT LAST WIRE WK OF YR=YY+1,0000
0273 R YYMMDD%% -- CURRENT TTTTTT DATE (CPF BILLING PERIOD)(M-F)
0274 R YYMMDD%% -- TUESDAY DATE OF 2 WEEKS PRIOR
0275 R YYMMDD%% -- TUESDAY DATE OF 3 WEEKS PRIOR
0276 R YYMMDD%% -- MONDAY DATE 3 WEEKS PRIOR
0277 R YYMMDD%% -- MONDAY DATE 4 WEEKS PRIOR
0278 R YYMMDD%% -- MONDAY DATE 5 WEEKS PRIOR
0279 R YYMMDD%% -- MONDAY DATE 6 WEEKS PRIOR
0280 R YYMMDD%% -- MONDAY DATE 7 WEEKS PRIOR
0281 R YYMMDD%% -- MONDAY DATE 8 WEEKS PRIOR
0282 R YYMMDD%% -- MONDAY DATE 9 WEEKS PRIOR
0283 R YYMMDD%% -- MONDAY DATE 10 WEEKS PRIOR
0284 R W%%%%%%% -- PRIOR WK NUM. OF MO(1-5) BASED ON MONDAY DATE
0285 R YYMMDD%% -- MON-WED=CURRENT MONDAY; THUR-FRI=NEXT MONDAY
0286 R YYMMWW%% -- PRIOR ASASJJ (CPF)(M-F)
0287 R YYMMDD%% -- WEDNESDAY DATE OF 2 WEEKS PRIOR
0288 R YYMMDD%% -- WEDNESDAY DATE OF 3 WEEKS PRIOR
0289 R YYMMDD%% -- WEDNESDAY DATE OF 4 WEEKS PRIOR
0290 R YYMMDD%% -- CURRENT FRI EXCEPT LAST FRI OF MO=LAST CAL DATE OF MO
0291 R YYWW00%% -- 3RD PRIOR WIRE WEEK (BASED ON ENTRY 0270)
0292 R YYWW00%% -- 8TH PRIOR WIRE WEEK (BASED ON ENTRY 0270)
0293 R YYMMDD%% -- 10TH PRIOR WEDNESDAY
0294 R YYMMDD%% C1 2ND PRIOR TUES IF HOLIDAY NEXT WD
0295 R YYMMDD%% -- MON-THURS = PR FRIDAY;FRIDAY = CURRENT FRIDAY
0296 R YYWW00%% -- 2ND PRIOR WIREWEEK (6.2 N1)
0297 R YYMMDD%% C1 2ND WD OF 4 WEEKS PRIOR
0298 R YYMMDD%% -- 2ND PRIOR LLLLLL DATE (CPFBP)(M-F)
0299 R YYWW%%%% -- 3RD PRIOR ISSUE WK (3401)
0300 R YYMMDD%% -- 1ST FRIDAY OF CURRENT MONTH
0301 R YYMMDD%% -- 2ND FRIDAY OF CURRENT MONTH
0302 R YYMMDD%% -- 3RD FRIDAY OF CURRENT MONTH
0303 R YYMMDD%% -- 4TH FRIDAY OF CURRENT MONTH
0304 R YYMMDD%% -- 5TH/LAST FRIDAY OF CURRENT MONTH
0305 R YYMMDD%% -- 1ST FRIDAY OF PRIOR MONTH
0306 R YYMMDD%% -- 2ND FRIDAY OF PRIOR MONTH
0307 R YYMMDD%% -- 3RD FRIDAY OF PRIOR MONTH
0308 R YYMMDD%% -- 4TH FRIDAY OF PRIOR MONTH
0309 R YYMMDD%% -- 5TH/LAST FRIDAY OF PRIOR MONTH
0310 R YYMMDD%% -- 1ST FRIDAY OF NEXT MONTH
0311 R YYMMDD%% -- 2ND FRIDAY OF NEXT MONTH
0312 R YYMMDD%% -- 3RD FRIDAY OF NEXT MONTH
0313 R YYMMDD%% -- 4TH FRIDAY OF NEXT MONTH
0314 R YYMMDD%% -- 5TH/LAST FRIDAY OF NEXT MONTH
0315 R YYMMDD%% -- NEXT-TO-LAST FRIDAY OF PRIOR MONTH
0316 R YYMMDD%% -- FRIDAY DATE PRECEEDING 5TH OF PRIOR MONTH
0317 R YYM1M2%% -- YY0104 (JAN-APR) OR YY0512 (MAY-DEC)
0318 R YYM1M2%% -- YY-1,0512 (JAN-APR) OR YY0104 (MAY-DEC)
0319 R YYM1M2%% -- YY-1,0104 (JAN-APR) OR YY-1,0512 (MAY-DEC)
0320 R YYMMDD%% -- YY-1,MMDD (JAN-NOV) OR YYMMDD (DEC)
0321 R YYMMDD%% -- 3RD FRIDAY OF TWO MONTHS PRIOR
0322 R YY%%%%%% -- YY (JAN-OCT) OR YY+1 (NOV-DEC)
0323 R YYMMDD%% C1 LAST WORKDAY-WEEK OF 4TH FRIDAY PRIOR MONTH (CANADA)
0324 R YYMM00%% -- YYMM02 (APR,JUNE,SEPT) OR YYMM00
0325 R YYMMDD%% -- 2ND FRIDAY 3 MONTHS PRIOR
0326 R YYMMDD%% -- LAST FRIDAY 2 MONTHS PRIOR
0327 R YYMMDD%% -- 2ND FRIDAY 2 MONTHS PRIOR
0328 R YYMMDD%% -- SPECIAL FRIDAY DATE (08.01)(HACE)(HBDCA MABEL)
0329 R YYMMDD%% -- SPECIAL FRIDAY DATE (08.01)(HACA)(HBGAB)
0330 R YYMMDD%% N1 THURSDAY DATE OF CURR WEEK,IF HOL THEN NWD
0331 R YYMMDD%% -- FR DATE PRIOR TO 18TH CAL DAY OF PRIOR MO
0332 R YYMMDD%% -- CURRENT DDDDDD (CPF BILLING PERIOD)(M-F)
0333 R YYMMDD%% -- CURRENT AIAIAI (CPF BILLING PERIOD)
0334 R YYMMDD%% -- 1ST FRIDAY 3 MONTHS PRIOR
0335 R YYMMDD%% -- 1ST FRIDAY 6 MONTHS PRIOR
0336 R YYMMDD%% -- 3RD FR OF PRIOR MO EXPT JAN THEN YY0101
0337 R YYMMDD%% -- 1ST FRIDAY OF MONTH 2 MONTHS PRIOR
0338 R YYMMDD%% -- LAST CALENDAR DATE OF 3 MONTHS PRIOR
0339 R YYMMDD%% -- LAST CALENDAR DATE OF 4 MONTHS PRIOR
0340 R YYMMDD%% -- LAST CALENDAR DATE OF 15 MONTHS PRIOR
0341 R YYMMDD%% C1 NEXT TO LAST WORKING FRIDAY OF PRIOR MO
0342 R YYMMDD%% -- 3RD FRIDAY OF 3 MONTHS PRIOR
0343 R YYMMDD%% -- LAST MON 2ND PRIOR MONTH
0344 R YYMMDD%% -- LAST WED OR FRI OF PRIOR MO WHICHEVER IS LAST
0345 R YYMMDD%% -- 4TH FRIDAY OF 2 MONTHS PRIOR
0346 R LE%%%%%% C1 LE EXCEPT THURSDAY(IF HOLIDAY PRIOR WD) ELSE GT
0347 R 1 N1 1(+7SPACES)EXPT 2ND WD AFTER 3RD MON OF MO,THEN 2(+7SPACES
0348 R DUMMY,%% -- DUMMY EXCEPT 3RD MONDAY OF MONTH
0349 R EQ%%%%%% -- EQ EXCEPT 1ST FRI. IN FEB. THEN NE
0350 R DUMMY,%% -- DUMMY EXCEPT 2ND & 3RD FRI. IN JAN.
0351 R DUMMY,%% -- DUMMY EXCEPT 1ST FRI. IN FEB.
0352 R YYMMDD%% -- 1ST FRI. IN FEB. OF PRIOR YEAR
0353 R HDEDA000 -- HDEDA000 EXCEPT 2ND FRI. IN JAN. THEN TRANS35L
0354 R CYYMMDD% -- CENTURY & LAS CALENDAR DATE IN DEC. OF PRIOR YEAR
0355 R YYMMDD%% -- LAST FRIDAY OF 3 MONTHS PRIOR
0356 R YYMMDD%% -- 2ND FRIDAY PRIOR TO LAST FRIDAY OF PRIOR MONTH
0357 R YYMMDD%% -- 2ND FRIDAY PRIOR TO LAST FRIDAY OF 2 MONTHS PRIOR
0358 R YYMMDD%% -- 2ND FRIDAY PRIOR TO LAST FRIDAY OF 3 MONTHS PRIOR
0359 R YYMMDD%% -- FRIDAY DATE BETWEEN 12-18 OF CURRENT MONTH
0360 R EQ%%%%%% N1 EQ ON THURS ELSE NE (IF THUR A HOLIDAY THEN PRIOR WD)
0361 R NE%%%%%% N1 NE ON THURS ELSE EQ (IF THUR A HOLIDAY THEN PRIOR WD)
0362 R NE%%%%%% -- NE ON 2ND FRIDAY ELSE EQ
0363 R W N1 "W" ON THUR IF HDAY THEN PR WORKDAY ELSE "D"
0364 R DD%%%%%% -- DD=FRIDAY DATE BETWEEN 12-18 OF CURRENT MO
0365 R YYMMDD%% -- 3RD SATURDAY OF CURRENT MONTH
0366 R YYMMDD%% -- 3RD SATURDAY OF 2 MONTHS PRIOR
0367 R YYMMDD%% -- 3RD SATURDAY OF 3 MONTHS PRIOR
0368 R YYMMDD%% -- 3RD MONDAY OF NEXT MONTH
0369 R MMDDYY%% -- CUR YR MO + 1 MON, CONSTANT 01,CUR YEAR
0370 R YYMM01%% -- YYPM01 WHEN CURRENT DAY < 22 ELSE YYMM01
0371 R YYMMDD%% -- 4TH FRIDAY OF 3 MONTHS PRIOR
0372 R YYMMDD%% -- 4TH FRIDAY OF 8 MONTHS PRIOR
0373 R YYMMDD%% -- 3RD SATURDAY OF PRIOR MONTH
0374 R YYMMDD%% -- 3RD MONDAY DATE OF PRIOR MONTH
0375 R YYMMDD%% -- 1ST MONDAY DATE OF PRIOR MONTH
0376 R YYMMDD%% -- LAST MONDAY DATE OF PRIOR MONTH
0377 R YYMMDD%% N1 3 WD AFTER THE 3RD SATURDAY OF MO
0378 R YYMMDD%% -- 1ST MON AFTER 1ST FR 2 MONTHS PRIOR
0379 R YYMMDD%% -- 1ST MON AFTER 1ST FR 3 MONTHS PRIOR
0380 R YYMM01%% -- CURRENT YR & MO OF 3 MONTHS PRIOR
0381 R YYMM01%% -- CURRENT MONTH OF 6 YEARS PRIOR
0382 R YYMMDD%% -- 3RD FRIDAY OF MONTH 15 MONTHS PRIOR
0383 R YYMMDD%% -- 3RD FRIDAY OF MONTH 12 MONTHS PRIOR
0384 R YYMMDD%% -- TUESDAY PRIOR TO LAST FRIDAY OF PRIOR MONTH
0385 R YYMMDD%% -- TUESDAY PRIOR TO LAST FRIDAY OF 2ND PRIOR MONTH
0386 R YY01WW%% -- YR & 3RD PRIOR NN(CPF M-F) MONTH CONSTANT 01
0387 R CYYMMDD% N1 5TH PRIOR WORK DAY
0388 R YYMMDD%% N1 JUNE & JULY=4TH FR OF JUNE;DEC=LT WD OF DEC
0389 R YYMM%%%% -- 03=PR YR 09;06=YR 04;09=YR 06
0390 R MM%%%%%% -- PRIOR MONTH
0391 R YYMMDD%% -- LAST WED OF FRI OF MO(WHICHEVER IS LAST)OF 2 MO PR
0392 R YYMMDD%% -- 2ND WEDNESDAY OF MONTH 12 MONTHS PRIOR
0393 R MMDDYY%% -- LAST CALENDAR DAY OF PRIOR MONTH
0394 R YYMM00M% -- CURRENT YR & MO 00M EXPT DEC THEN CURRENT YR 1231A
0395 R YYMM00%% -- CURRENT YR & MO 00 EXPT DEC THEN CURRENT YR 1231
0396 R YYMMDD%% -- 1ST FRIDAY OF MONTH FIVE MONTHS PRIOR
0397 R YYMMDD%% -- 1ST FRIDAY OF MONTH ELEVEN MONTHS PRIOR
0398 R YYMM%%%% -- CURRENT YR & MO MINUS 6 YEARS
0399 R YY%%%%%% -- FEB-DEC YY=CURRENT YR MINUS 1;JAN YY=CURRENT YR MINUS 2
0400 R YYMMYYMM -- CURRENT DAY- PROJECT 20 (YYMMYYMM)
0401 R YYMMDD%% -- 1ST FRIDAY HALF-YEAR SCHEDULE
0402 R YYMMDD%% -- NEXT-TO-LAST FRIDAY OF PRIOR YEAR
0403 R YYMMDD%% -- LAST FRIDAY OF PRIOR YEAR
0404 R YYMM01%% -- YEAR AND MONTH OF CURRENT DATE (YYMM01)
0405 R YYMMDD%% -- NEXT-TO-LAST FRIDAY OF CURRENT YEAR
0406 R YYMMDD%% -- LAST FRIDAY OF CURRENT YEAR
0407 R YYMMDD%% -- 1ST FRIDAY OF CURRENT YEAR
0408 R YYMMDD%% -- 2ND FRIDAY OF CURRENT YEAR
0409 R YY0101%% -- 1ST CALENDAR DATE OF CURRENT YEAR
0410 R YY%%%%%% -- NEXT YEAR (YY ONLY)
0411 R YY0101%% -- 1ST CALENDAR DATE OF NEXT YEAR
0412 R YYMMDD%% -- 2ND FRIDAY IN AUGUST (PAYROLL DATE)
0413 R YYMMDD%% -- 2ND FRIDAY IN DECEMBER (PAYROLL DATE)
0414 R YYMMDD%% -- 1ST FRIDAY IN MARCH (PAYROLL DATE)
0415 R YYMMDD%% -- LAST FRIDAY IN OCTOBER (PAYROLL DATE)
0416 R YYMMDD%% -- LAST FRIDAY IN FEBRUARY (PAYROLL DATE)
0417 R YYMMDD%% -- LAST FRIDAY HALF-YEAR SCHEDULE
0418 R YYMMDD%% -- LAST FRIDAY IN NOVEMBER (PAYROLL DATE)
0419 R YYMMDD%% -- 2ND FRIDAY IN JANUARY (NEXT YEAR PAYROLL DATE)
0420 R YYMM15%% -- CURRENT YEAR AND MONTH (YYMM15)
0421 R YYMM15%% -- CURRENT YEAR AND MONTH MINUS 1 MONTH (YYMM15)
0422 R YYMM15%% -- CURRENT YEAR AND MONTH PLUS 1 MONTH (YYMM15)
0423 R YYMMDD%% -- LAST THURSDAY OF PRIOR YEAR
0424 R YYMMDD%% -- LAST CALENDAR DATE IN CURRENT YEAR
0425 R YYMMDD%% -- 3RD WEDNESDAY IN DECEMBER
0426 R YYMMDD%% -- 3RD WEDNESDAY IN JANUARY
0427 R YYMMDD%% -- LAST CALENDAR DATE OF PRIOR YEAR
0428 R YYMMDD%% -- LAST CALENDAR DATE OF NOVEMBER OF PRIOR YEAR
0429 R YYMMDD%% -- PRIOR FRIDAY (1ST MON/JAN OR 2ND MON/JULY)
0430 R YYMM00%% -- CURRENT YEAR AND MONTH PLUS 1 MONTH (YYMM00)
0431 R YYMM00%% -- CURRENT YEAR AND MONTH (YYMM00)
0432 R YYMM00%% -- CURRENT YEAR AND MONTH MINUS 1 MONTH (YYMM00)
0433 R YYMM%%%% -- CURRENT YEAR AND MONTH MINUS 1 MONTH (YYMM)
0434 R YYMMDD%% -- CURRENT YEAR AND MONTH MINUS 1 MONTH (YYMMDD)
0435 R YYMM01%% -- CURRENT YEAR AND MONTH PLUS 1 MONTH (YYMM01)
0436 R YYMM01%% -- CURRENT YEAR AND MONTH MINUS 2 MONTHS (YYMM01)
0437 R YYMMDD%% -- 3RD MONDAY IN NOVEMBER 2 YEARS PRIOR
0438 R YYMMDD%% -- 1ST CALENDAR DATE OF 2 YEARS PRIOR
0439 R YYMM31%% -- CURRENT YEAR AND MONTH MINUS 1 MONTH (YYMM31)
0440 R YYMM31%% -- CURRENT YEAR AND MONTH MINUS 2 MONTHS (YYMM31)
0441 R YYMMDD%% -- 3RD FRIDAY OF CURRENT YEAR
0442 R YYMM00%% -- CURRENT YEAR AND MONTH MINUS 2 MONTHS (YYMM00)
0443 R YYMM15%% -- CURRENT YEAR AND MONTH MINUS 3 MONTHS (YYMM15)
0444 R YYMMDD%% -- CURRENT YEAR AND MONTH MINUS 2 MONTHS (YYMMDD)
0445 R YYMMDD%% -- CURRENT YEAR AND MONTH MINUS 26 MONTHS (YYMMDD)
0446 R YYMMDD%% -- LAST SATURDAY IN CURRENT YEAR
0447 R YYMM01%% -- CURRENT YEAR AND MONTH MINUS 1 MONTH (YYMM01)
0448 R YYM1M2%% -- YY0512 (JAN-APR) OR YY+1,0104 (MAY-DEC)
0449 R YYMMDD%% -- 1ST SAT FOLLOWING 3RD FRIDAY OF DEC OF PRIOR YEAR
0450 R YYMMDD%% -- 3RD FRIDAY OF DECEMBER OF PRIOR YEAR
0451 R YYMMDD%% -- LAST FRIDAY OF DECEMBER 2 YEARS PRIOR
0452 R YYMMDD%% -- YY-1,0301 (1ST FRI JAN) OR YY0101
0453 R YYMM01%% -- YYMM01 (DAY < 7) OR YYMM+1,01
0454 R YYMMDD%% -- 3RD FRIDAY OF JUNE OF CURRENT YEAR
0455 R YYMMDD%% -- 3RD FRIDAY OF NOVEMBER OF PRIOR YEAR
0456 R YYMMDD%% -- 3RD FRI OF DEC-TWO YEARS PRIOR
0457 R YYMMDD%% -- 4TH FRIDAY OF DEC PRIOR YEAR
0458 R YYMMDD%% -- 3RD FRIDAY OF JAN PRIOR YEAR
0459 R YYMMDD%% -- 2ND FRIDAY IN JAN OF PRIOR YEAR
0460 R YYMMDD%% -- FRI DATE OF 1ST LLLLLL FOR JAN.(M-F)
0461 R YYMMDD%% -- 03= LAST FRI OF 09; 09=LAST FRIDAY OF 03
0462 R YYMMDD%% -- 3RD FRIDAY OF OCTOBER OF PRIOR YEAR
0463 R YYMMDD%% -- LT FR OF PYR OR IF JAN 01 IS A FR USE YY0101
0464 R YYMMDD%% -- 2ND FRIDAY OF FEBRUARY OF PRIOR YEAR
0465 R YYMMDD%% -- LT FRI OF YR(FRI JAN 1ST & OR 2ND = LAST FRI OF DEC
0466 R YYMM%%%% -- CURRENT YEAR & MONTH MINUS 13 MONTHS
0467 R YYMMDD%% -- 3RD FRIDAY OF NOVEMBER 2 YEARS PRIOR
0468 R YYMMDD%% -- 1ST FRIDAY OF JANUARY OF PRIOR YEAR
0469 R YYMMYYMM -- JUNE=YY & MO OF 01 & 06;DEC=YY & MO OF 07 & 12
0470 R YYMMDD%% -- 1ST MONDAY OF JANUARY OF NEXT YEAR
0471 R YYMMDD%% -- 1ST MONDAY DATE OF CURRENT YEAR
0472 R YYMM%%%% -- CURRENT YEAR AND MONTH MINUS 5 MONTHS
0473 R YYMM%%%% -- CURRENT YR & MONTH MINUS 7 MONTHS
0474 R YYMM%%%% -- CURRENT YEAR AND MONTH MINUS 6 MONTHS
0475 R YY%%%%%% -- CURRENT YEAR (YY)
0476 R YY%%%%%% -- PRIOR YEAR (YY)
0477 R YYMM%%%% -- CURRENT YEAR AND MONTH (YYMM)
0478 R YYMM%%%% -- CURRENT YEAR AND MONTH MINUS 1 MONTH (YYMM)
0479 R YYMM%%%% -- CURRENT YEAR AND MONTH MINUS 2 MONTHS (YYMM)
0480 R YYMM%%%% -- CURRENT YEAR AND MONTH MINUS 3 MONTHS (YYMM)
0481 R YYMM%%%% -- CURRENT YEAR AND MONTH MINUS 4 MONTHS (YYMM)
0482 R YYMM%%%% -- CURRENT YEAR AND MONTH PLUS 1 MONTH (YYMM)
0483 R YYMM%%%% -- YYMM (DAY > 24) OR YYMM-1
0484 R YY%%%%%% -- YY ONLY- CURRENT YEAR (DEC)/PRIOR YEAR (JAN-NOV)
0485 R YY%%%%%% -- YY ONLY- CURRENT YEAR (JAN-APR)/NEXT YEAR (MAY-DEC)
0486 R YYMM%%%% -- YYMM ONLY- CURRENT MONTH (DAY > 17) OR PRIOR MONTH
0487 R YY%%%%%% -- YY=YEAR OF TWO YEARS PRIOR
0488 R YY%%%%%% -- YY ONLY- CURRENT YEAR(JAN-NOV); YY+1(DEC)
0489 R CCYYMM%% -- 4 DIGIT YEAR AND 2 DIGITS OF PRIOR MO.
0490 R CCYYMM%% -- 4 DIGIT YEAR AND 2 DIGITS OF 2ND PRIOR MO
0491 R YYMMDD%% -- LAST FRIDAY OF YEAR 10 YEAR PRIOR(05 NY)
0492 R YYMMDD%% -- 4TH FRIDAY 12 MONTHS PRIOR
0493 R YYMMDD%% -- LAST CALENDAY DATE OF YR 10 YR PRIOR
0494 R YYMMDD%% -- LAST CALENDAR DAY OF MONTH 12 MONTHS PRIOR
0495 R YY%%%%%% -- YY= YEAR OF 3 YEARS PRIOR
0496 R YY%%%%%% -- YY= YEAR OF 4 YEARS PRIOR
0497 R YYMMDD%% -- CURRENT MONDAY MINUS ONE YEAR
0498 R YYMM%%%% -- CURRENT YEAR AND MONTH MINUS 5 YEARS
0499 R YY%%%%%% -- YEAR OF FIVE YEARS PRIOR
0500 R YYMMDD%% -- LAST FRIDAY OF QUARTER
0501 R YYMMDD%% -- FIRST FRIDAY OF QUARTER
0502 R YYMMDD%% -- 2ND FRIDAY OF QUARTER
0503 R YYMMDD%% -- 3RD FRIDAY OF QUARTER
0504 R YYMMDD%% -- LAST CALENDAR DAY OF PRIOR QUARTER
0505 R YYMM02%% -- YEAR AND MONTH PRIOR TO 1ST MONTH OF QUARTER
0506 R YYMMDD%% -- LAST CALENDAR DAY OF QUARTER
0507 R YYMMDD%% -- LAST CALENDAR DATE OF 2ND PRIOR QUARTER
0508 R YYMMDD%% -- LAST MONDAY OF PRIOR QUARTER
0509 R YYMMDD%% -- LAST FRIDAY OF PRIOR QUARTER
0510 R YYMMDD%% -- 2ND FRIDAY OF PRIOR QUARTER
0511 R YYMMDD%% -- FRI DATE OF WK OF LAST MON IN PRIOR QUARTER
0512 R YYMMDD%% -- FRI DATE OF WK OF LT MON OF 3RD PRIOR QUARTER
0513 R YYMMDD%% -- LT FR OF 03=LT FR OF 09;06=03;09=06
0514 R YYMMDD%% -- LAST FRI OF 1ST MO OF QUARTER 10 YEARS PRIOR(05 NY)
0515 R YYMMDD%% -- LAST MONDAY OF QUARTER
0516 R YYMMDD%% -- 1ST CALENDAR DATE OF QUARTER
0517 R YYMMDD%% -- 3RD FRIDAY OF 2ND MONTH OF PRIOR QUARTER
0518 R YYMMDD%% -- LAST MONDAY OF CURRENT YEAR
0519 R DUMMY,%% N1 DUMMY EXPT 4TH WD FOLLOW 1ST FRI OR LWD OF MONTH
0520 R YY%%%%%% -- CURRENT YEAR PLUS 2 YEARS
0521 R YYMMDD%% -- 2ND MONDAY OF MONTH 2 MONTH S PRIOR
0522 R MM01YY%% -- CURRENT MONTH, CONSTANT 01, CURRENT YEAR
0523 R DUMMY,%% -- DUMMY EXCEPT LAST MONDAY OF DECEMBER
0524 R DUMMY,%% -- DUMMY EXCEPT LAST MONDAY OF JUNE
0525 R DUMMY,%% -- DUMMY EXCEPT 2ND MON OF JAN.,APRIL,JULY,OCT.,NOV.
0526 R DUMMY,%% -- DUMMY EXCEPT LAST MON OF MARCH,JUNE,SEPT, DEC.
0527 R DUMMY,%% C1 DUMMY IF FRI OF PR WK IS LAST WD OF PRIOR MONTH
0528 R DUMMY,%% C1 DUMMY IF THU OF PR WK IS LAST WD OF PRIOR MONTH
0529 R DUMMY,%% C1 DUMMY IF WED OF PR WK IS LAST WD OF PRIOR MONTH
0530 R DUMMY,%% C1 DUMMY IF TUE OF PR WK IS LAST WD OF PRIOR MONTH
0531 R DUMMY,%% C1 DUMMY IF MON OF PR WK IS LAST WD OF PRIOR MONTH
0532 R LE%%%%%% N1 LE EXCEPT THURSDAY(IF HOLIDAY PRIOR WD) THEN GT
0533 R 8625%%%% -- 8625 EXCEPT DECEMBER THEN 8101
0534 R C%%%%%%% -- C EXCEPT DECEMBER THEN N
0535 R YYMMDDWN N1 SPACES EXPT WHEN LT WD OF MO IS NOT FRIDAY THEN LT WD PR WK
0536 R LE%%%%%% N1 LE EXCEPT LAST WORKDAY OF 1ST WEEK OF MONTH THEN GT PF M-F)
0537 R LE%%%%%% -- LE EXCEPT LAST FRIDAY OF QUARTER THEN NE
0538 R M%%%%%%% -- M EXCEPT JUNE THEN A
0539 R DUMMY,%% C1 DUMMY EXPT THURSDAY(IF HOLIDAY PRIOR WD)
0540 R DUMMY,%% C1 DUMMY EXCEPT THURSDAY(IF HOLIDAY NEXT WD)
0541 R DUMMY,%% N1 DUMMY EXPT LT WD OF WK & NEXT-TO-LAST WD OF MONTH
0542 R R%%%%%%% -- R EXCEPT JANUARY THEN A
0543 R EQ%%%%%% -- EQ EXPT MARCH,JUNE,OCT & DEC THEN GT
0544 R MN%%%%%% -- MN EXCEPT DECEMBER THEN AN
0545 R YYMM00MN -- CURRENT YR & MO 00MN EXPT JANUARY THEN 8 ZEROS
0546 R GE%%%%%% -- GE EXPT JAN,APRIL,JULY,OCT & NOV THEN GT
0547 R 8101%%%% -- 8101 INA JANUARY ELSE 8204
0548 R UAHJA000 -- UAHJA000 IN JANUARY ELSE UBBBA000
0549 R 8622%%%% -- 8622 IN DECEMBER ELSE 8203
0550 R DUMMY,%% -- DUMMY ON 2ND THURSDAY OF MONTH
0551 R DUMMY,%% C1 DUMMY EXCEPT 2ND WD AFTER 4TH FRIDAY OF MONTH
0552 R YYMMDD%% -- 3RD FRI OF 7 MO PRIOR IN JAN;ELSE 3RD FRI 5 MO PRIOR
0553 R LY DEC -- IN DECEMBER=LY 3 SPS DEC;IN JUNE=N 4SPS JUN
0554 R JU -- IN DECEMBER=JU;IN JUNE=JA
0555 R YYMMDDDC C1 8 SPACES EXPT 5WD OF WK THEN 5WD(YYMMDD)DC
0556 R YYMMDDDC C1 8 SPACES EXPT 4WD OF WK THEN 4WD(YYMMDD)DC
0557 R YYMMDDDC C1 8 SPACES EXPT 3WD OF WK THEN 3WD(YYMMDD)DC
0558 R UENOA000 -- UENOA000 EXCEPT JANUARY THEN 00000000
0559 R UCBSF000 -- UCBSF000 EXCEPT DECEMBER THEN UVBDA000
0560 R EQ%%%%%% -- EQ EXCEPT MARCH, JUNE, & SEPTEMBER THEN GT
0561 R 1 C1 1 7 SPACES EXPT 1ST WD OF DEC THEN 1 6 SPACES 1
0562 R C1 8 SPACES EXPT 1ST WD OF MONTH THEN 1 7 SPACES
0563 R GCANA000 -- GCANA000 EXCEPT JUNE THEN GCAZA000
0564 R 180%%%%% -- 180 EXCEPT DECEMBER THEN 365
0565 R EQ%%%%%% -- EQ EXCEPT DECEMBER THEN GT
0566 M DUMMY,%% -- I/P FOR C.O.M FILE CDBLMOOO TO FOOTSTEPS (CAN)
0567 R YYYYMMDD -- CURRENT WEDNESDAY PLUS TWO WEEKS
0568 R MICRODAY N1 MICRODAY ON 1ST WD OF MONTH ELSE SPACES
0569 R EQ%%%%%% -- EQ EXCEPT SEPTEMBER THEN NE
0570 R UYNBA000 -- UYNBA000 EXCEPT DECEMBER THEN UYNAA000
0571 R UAAHA000 -- UAAHA000 EXCEPT DECEMBER THEN UYMWA000
0572 R UAAIA000 -- UAAIA000 EXCEPT DECEMBER THEN UYMXA000
0573 R 8101%%%% -- 8101 EXPT JANUARY & DECEMBER THEN 8625
0574 R UAAEA000 -- JANUARY=UYPAA000;DECEMBER=UYMUA000;ESLE UAAEA000
0575 R UAPBA000 -- UAPBA000 EXPT 2ND MON OF YR THEN UAPBB000
0576 R UAPBB000 -- 1ST MON OF YR=UAPBB000;LT MON OF YR=UAPBA000;ELSE SPACES
0577 R YY1231%% -- 1ST MON OF YR=PR YR 1231;ELSE CURRENT YR 1231
0578 R UAOFA000 -- UAOFA000 EXCEPT JANUARY THEN UAHCA000
0579 R YYMM00%% -- CURRENT YR CUR MO 00 EXPT JAN THEN PR YR PR MO 00
0580 R YYMM00%% -- CURRENT YR PRIOR MO 00 EXPT JAN THEN PR YR 1300
0581 R UYKIA000 -- UYKIA000 EXCEPT JANUARY THEN UYLKA000
0582 R DUMMY,%% C1 DUMMY ON LT WD OF MONTH
0583 R YYMM00MN -- CURRENT YR PRIOR MO 00MN EXPT JANUARY THEN SPACES
0584 R GT%%%%%% -- GT EXCEPT JUNE THEN EQ
0585 R DUMMY,%% -- DUMMY EXCEPT JUNE
0586 R EQ%%%%%% -- EQ EXCEPT JUNE THEN GT
0587 R DUMMY,%% -- DUMMY EXCEPT JANUARY AND DECEMBER
0588 R EQ%%%%%% -- EQ EXCEPT JANUARY AND DECEMBER THEN GT
0589 R DUMMY,%% -- DUMMY IN SEPTEMBER
0590 R GT%%%%%% -- GT EXCEPT SEPTEMBER THEN EQ
0591 R EQ%%%%%% -- EQ EXCEPT JUNE,SEPT.,& DECEMBER THEN GT
0592 R DUMMY,%% -- DUMMY EXCEPT JUNE AND OCTOBER
0593 R EQ%%%%%% -- EQ EXPT JUNE AND OCTOBER THEN GT
0594 R DUMMY,%% N1 DUMMY ON NEXT-TO-LAST WD OF WK AFTER 3RD FRI OF MO
0595 R DUMMY,%% C1 DUMMY EXPT 1WD AFTER NEXT TO LAST FRIDAY OF MO
0596 R XZZABMON -- XZZABMON EXPT LAST MONTH OF QUARTER THEN XZZABMRG
0597 R M%%%%%%% -- M EXPT LAST MONTH OF QUARTER THEN Q
0598 R DUMMY,%% -- DUMMY EXCEPT LAST MONTH OF QUARTER
0599 R EQ%%%%%% -- EQ EXCEPT LAST MONTH OF QUARTER THEN GT
0600 R YYMMDD%% N1 LAST WORKDAY PRIOR MONTH (N1)
0601 R YYMMDD%% -- LAST CALENDAR DATE OF PRIOR MONTH
0602 R YYMMDD%% -- LAST CALENDAR DATE OF 2 MONTHS PRIOR
0603 R YYMMDD%% N1 3RD WORKDAY AFTER 1ST FRIDAY IN MONTH (N1)
0604 R YYMMDD%% N1 1ST WORKDAY AFTER 3RD FRIDAY IN MONTH (N1)
0605 R YYMMDD%% N1 4TH WORKDAY AFTER 1ST FRIDAY IN MONTH (N1)
0606 R YYMMDD%% N1 LAST WORKDAY IN CURRENT MONTH (N1)
0607 R YYMMDD%% N1 3 WORKDAY PRIOR/LAST WORKDAY CURRENT MONTH (N1)
0608 R YYMMDD%% -- LAST CALENDAR DATE OF CURRENT MONTH
0609 R YYMMDD%% N1 4TH WORKDAY AFTER 1ST FRIDAY PRIOR MONTH (N1)
0610 R YYMMDD%% N1 3RD WORKDAY AFTER 1ST FRIDAY PRIOR MONTH (N1)
0611 R YYMMDD%% N1 LAST WORKDAY/1ST WEEK PRIOR MONTH-6.2 (N1)
0612 R YYMMDD%% N1 LAST WORK DAY 2 MONTHS PRIOR (N1)
0613 R YYMMDD%% N1 LAST WORKDAY 2ND WEEK 2 MONTHS PRIOR-6.2 (N1)
0614 R YYMMDD%% N1 LAST WORKDAY 1ST WEEK CURRENT MONTH-6.2 (N1)
0615 R YYMMDD%% N1 3RD WORKDAY AFTER 1ST FRI 2 MONTHS PRIOR (N1)
0616 R YYMMDD%% N1 3RD WORKDAY PRIOR LAST WORKDAY 3 MOS PRIOR (N1)
0617 R YYMMDD%% C1 LAST WORKDAY OF 13TH PRIOR MONTH
0618 R YYMMDD%% N1 LAST WD OF LAST FULL WEEK 2 MONTHS PRIOR (N1)
0619 R YYMM%%%% -- YYMM OF CURRENT LLLLLL DATE (CPF BILLING PERIOD)(M-F)
0620 R YYMMDD%% N1 MOST RECENT LAST WD OF 2ND WK OF MONTH
0621 R YYMMDD%% N1 3RD PWD EXPT 2ND THURS OF MO THEN 4TH PWD
0622 R YYMMDD%% N1 3RD PWD EXPT 2ND THURS OF MO + 4 WD THEN 4TH PWD
0623 R YYMMDD%% N1 1ST WD AFTER 3RD FRIDAY OF PRIOR MONTH
0624 R YYMMDD%% C1 3WD AFTER 1ST 6.2 REWRITE OF 6 MONTHS PRIOR
0625 R YYMMDD%% C1 LAST WORKDAY CURRENT MONTH (CANADA)
0626 R YYMMDD%% C1 1ST WORKDAY AFTER 4TH FRIDAY CURRENT MONTH (CANADA)
0627 R YYMMDD%% C1 4TH WORKDAY OF CURRENT MONTH (CANADA)
0628 R YYMMDD%% C1 LAST WORKDAY OF PRIOR MONTH (CANADA)
0629 R YYMMDD%% C1 1ST WORKDAY OF PRIOR MONTH (CANADA)
0630 R YYMMDD%% C1 4TH WORKDAY AFTER 1ST FRIDAY IN MONTH (CANADA)
0631 R YYMMDD%% C1 3RD WORKDAY AFTER 1ST FRIDAY IN PRIOR MONTH (CANADA)
0632 R YYMMDD%% C1 LAST WD OF 1ST WEEK OF 2 MO PRIOR
0633 R YYMMDD%% C1 LAST WD OF 4TH WEEK OF 2 MO PRIOR
0634 R YYMMDD%% C1 LAST WORKDAY 2ND WEEK 2 MONTHS PRIOR-6.2 (C1)
0635 R YYMMDD%% N1 1ST WD OF MO 6 MO PRIOR
0636 R YYMMDD%% C1 LAST WD OF 4TH WEEK OF CURRENT MO
0637 R YYMMDD%% C1 LAST WD OF LAST WK OF 2 MO PRIOR
0638 R YYMMDD%% C1 LT WD OF 3RD WK OF PRIOR MO
0639 R YYMMDD%% N1 1ST WD AFTER LAST FRIDAY OF CURRENT MONTH
0640 R YYMMDD%% N1 1ST WD AFTER LAST FRIDAY OF PRIOR MONTH
0641 R YYMMDD%% N1 1ST WD AFTER LAST FRIDAY OF MO 3 MONTHS PRIOR
0642 R YYMMDD%% C1 1ST 6.2 REWRITE OF PRIOR MONTH
0643 R YYMMDD%% C1 LAST WD OF 2 MONTHS PRIOR
0644 R YYMMDD%% C1 LAST WD OF 3 MONTHS PRIOR
0645 R YYMMDD%% C1 1ST WD AFTER 4TH FR OF PRIOR MONTH
0646 R YYMMDD%% C1 3RD 6.2 REWRITE OF CURRENT MONTH
0647 R YYMMDD%% C1 3RD 6.2 REWRITE OF PRIOR MONTH
0648 R YYMMDD%% N1 1ST WORKDAY OF PRIOR MONTH
0649 R YYMMDD%% C1 1ST WD AFTER 3RD 6.2 REWRITE OF MO OF 2ND PR MO
0650 R YYMMDD%% N1 3WD AFTR 1FR,1WD AFTR 3FR,3WD PR TO LT WD OF MO
0651 R YYMMDD%% N1 LAST WORKING DAY OF 3 MONTHS PRIOR
0652 R LE%%%%%% C1 LE EXCEPT TUESDAY (OR NWD) THEN NE
0653 R YYMMDD%% N1 1WD OF WK ALSO WHEN WK CONTAINS 2MO THEN 1WD OF MO
0654 R YY0101%% -- 1ST CAL DT OF YR EXPT JAN,THEN 1ST CAL DT PRIO MONTH
0655 R YYMMDD%% C1 35TH PRIOR WORKDAY
0656 R 6000,500 N1 6000,500 ON THU IF HDAY THEN PR WKDAY ELSE 0500,100 CH)
0657 R YYMMDD%% C1 3RD WD AFTER 1ST 6.2 REWRITE OF PRIOR MONTH
0658 R YYMMDD%% C1 3RD WD AFTER 1ST 6.2 REWRITE OF 2 MONTHS PRIOR
0659 R YYMMDD%% C1 3RD WD AFTER 1ST 6.2 REWRITE OF 3 MONTHS PRIOR
0660 R YYMMDD%% C1 1ST 6.2 REWRITE AFTER 27TH OF MONTH
0661 R YYMMDD%% C1 4TH WD AFTER 1ST 6.2 REWRITE OF 2ND PRIOR MO
0662 R YYMMDD%% N1 4TH WD AFTER 1ST FR 2 MONTHS PRIOR
0663 R YYMMDD%% N1 4TH WD AFTER 1ST FR 3 MONTHS PRIOR
0664 R YYMMDD%% N1 3RD WD BEFORE LT WD OF MO 2 MONTHS PRIOR
0665 R YYMMDD%% C1 4TH WD AFTER 1ST 6.2 REWRITE OF PRIOR MONTH
0666 R YYMMDD%% N1 LAST WORKDAY OF MONTH 7 MONTHS PRIOR
0667 R YYMMDD%% C1 1ST MON OF PRIOR MONTH (IF HOL NEXT WD)
0668 R YYMMDD%% N1 LAST WD OF MONTH 6 MONTHS PRIOR
0669 R YYMMDD%% N1 LAST WD OF MONTH 6 MONTHS PRIOR
0670 R YYMMDD%% N1 1ST WD AFTER LAST MONDAY OF MO 2 MONTHS PRIOR
0671 R YYMMDD%% -- FRIDAY DATE IN WK OF LAST MONDAY OF PRIOR MONTH
0672 R YYMMDD%% N1 6TH PRIOR THURSDAY (IF HOLIDAY PRIOR WORKDAY)
0673 R YYMMDD%% N1 DELETE PLUG FOR ADGTA000 FEEDS S0104MHP
0674 R YYMMDD%% N1 1ST WORKDAY OF MONTH 2 MONTHS PRIOR
0675 R YYMMDD%% N1 LAST MONDAY OF MO(OR NWD) + 1WD OF 2 MONTHS PRIOR
0676 R YYMMDD%% N1 1ST WD AFTER NEXT-TO-LAST THURS(OR NWD) OF 2 MONTHS PRIOR
0677 R YYMMDD%% N1 LST WD OF MNTH 12 MNTHS PRIOR, EXC DEC THEN 24 MNTHS PRIOR
0678 R YYMMDD%% N1 MONDAY 5 WEEKS PRIOR (IF HOLIDAY NEXT WD)
0679 R YYMMDD%% N1 1ST FR AFTER 11TH CAL DAY OF MO 3 MO PR & LT WD OF MO 3 MO PR
0680 R YYMMDD%% N1 NEXT-TO-LAST THURS(OR NWD) OF PRIOR MONTH
0681 R YYMMDD%% N1 NEXT-TO-LAST THURS(OR NWD) OF 2 MONTHS PRIOR
0682 R YYMMDD%% N1 NEXT-TO-LAST THURS(OR NWD) OF 3 MONTHS PRIOR
0683 R YYMMDD%% N1 LAST MONDAY (OR NWD) OF 3 MONTHS PRIOR
0684 R YYMMDD%% N1 LAST MONDAY (OR NWD) OF 2 MONTHS PRIOR
0685 R GE%%%%%% -- GE EXCEPT LAST MONDAY OF JUNE THEN GT
0686 R GE%%%%%% -- GE EXCEPT 2ND MONDAY OF JAN,APR,JULY,OCT,NOV. THEN GT
0687 R GE%%%%%% -- GE EXCEPT 2ND MONDAY OF JAN,APR,JULY,OCT. THEN GT
0688 R GE%%%%%% -- GE EXCEPT LAST MONDAY OF MAR,JUNE,SEPT,DEC. THEN GT
0689 R GE%%%%%% -- GE EXCEPT LAST MONDAY OF MAR,JUNE,SEPT. THEN GT
0690 R GE%%%%%% -- GE EXCEPT 2ND MONDAY OF JANUARY THEN GT
0691 R GE%%%%%% -- GE EXCEPT 3RD MONDAY OF JULY THEN GT
0692 R GE%%%%%% -- GE EXCEPT 2ND MONDAY OF JANUARY AND APRIL THEN GT
0693 R GT%%%%%% -- GT EXCEPT LAST MONDAY OF JUNE AND DECEMBER THEN GE
0694 R GE%%%%%% -- GE EXCEPT LAST MONDAY OF JUNE AND DECEMBER THEN GT
0695 R YYMM00%% -- PRIOR CYCLE (MONTHS 03,06,09,10,11,12)EI:DEC=811100,MARCH=801
0696 R DUMMY,%% C1 DUMMY EXCEPT 1ST WD AFTER 4TH FRIDAY OF MONTH
0697 R YYMMDD%% N1 5TH WORKDAY OF CURRENT MONTH
0698 R LE%%%%%% N1 LE EXCEPT 1ST WORKDAY OF WEEK THEN LT
0699 R EQ%%%%%% -- EQ EXCEPT MAY THEN GT
0700 R YYMMDD%% N1 1ST WORKDAY OF QUARTER (N1)
0701 R YYMMDD%% N1 LAST WORKDAY OF QUARTER (N1)
0702 R YYMMDD%% C1 LAST WORKDAY PRIOR QUARTER (CANADA)
0703 R YYMMDD%% C1 LT WD OF LT FULL WK OF CURRENT QRTR(F3MQ)
0704 R YYMMDD%% C1 LT WD OF LT FULL WK OF PRIOR QRTR(F3MQ)
0705 R YYMMDD%% N1 LAST WORKING DAY OF PRIOR QUARTER
0706 R YYMMDD%% N1 LT WD OF LT WK OF PRIOR QUARTER
0707 R YYMMDD%% C1 LAST WORKDAY OF CURRENT QUARTER
0708 R YYMMDD%% C1 LAST WORKDAY OF CURRENT QUARTER MINUS 1 WD
0709 R YYMMDD%% C1 LAST WORKDAY OF 2ND PRIOR QUARTER
0710 R EVEN%%%% C1 'EVEN' ON 1ST WD OF WEEK ELSE 'ONLY'
0711 R DUMMY,%% C1 DUMMY EXPT LT 6.2 REWRITE CYCLE OF CURRENT QRTR
0712 R YYMMDD%% C1 LAST 6.2 REWRITE CYCLE OF PRIOR QRTR
0713 R YYMM01%% -- YEAR & MONTH OF 3RD MONTH OF PRIOR QUARTER
0714 R YYMM01%% -- YEAR & MONTH OF CURRENT MONTH 1 YEAR PRIOR
0715 R YY01WW%% -- YY 01 & LT NN OF CURRENT QUARTER (IE.13,26,39,52)
0716 R YYMMDD%% N1 LAST WORKING DAY OF 3RD PRIOR QUARTER
0717 R YYMMDD%% C1 2ND LAST WORKDAY OF PRIOR QUARTER
0718 R 1%%%%%%% N1 1 EXPT THUR(PWD)AFTER 1ST 6.2 REWRITE OF MO. THEN 0
0719 R 1%%%%%%% N1 1 EXPT THUR(PWD)AFTER 2ND 6.2 REWRITE OF MO. THEN 0
0720 R EQ%%%%%% -- EQ EXCEPT JUNE,SEPT,OCT & DEC THEN GE
0721 R 8101%%%% -- 8101 IN JANUARY ELSE 8202
0722 R 000000%% N1 ON 3WD OF WK = 2WD OF WK ELSE 000000
0723 R 5%%%%%%% -- 5 IF THERE ARE 5 MONDAYS IN MONTH ELSE 4
0724 R FIRST -- FIRST ON 1ST WED OF JAN,1ST & LST MON DEC ELSE 8 SPCS
0725 R AAIYMMAA -- AAIYMMAA EXCEPT DECEMBER THEN YMXYMMAA
0726 R GE%%%%%% -- GE EXCEPT LAST MONDAY OF DECEMBER THEN GT
0727 R YYMMDDWN -- PR MONDAY DATE WN EXPT 1ST MON OF JAN. THEN SPACES
0728 R UDABA000 -- UDABA000 EXPT 1ST MON OF JANUARY THEN SPACES
0729 R EQ%%%%%% -- EQ EXCEPT JANUARY THRU JUNE THEN GT
0730 R DUMMY,%% -- DUMMY IN MARCH
0731 R EQ%%%%%% -- EQ EXPT MARCH,JUNE,SEPT,OCT,NOV,&DEC THEN GT
0732 R UARCB000 -- UARCB000 EXPT MARCH,JUNE, & SEPT THEN UAREA000
0733 R M%%%%%% N1 SPACE M ON LT WD OF WK & LT WD OF MO ELSE 2 SPACES
0734 R EQ%%%%%% -- EQ EXPT 1ST FRIDAY OF QUARTER THEN GT
0735 R DUMMY,%% -- DUMMY EXPT MARCH,JUNE, & SEPTEMBER
0736 R DUMMY,%% -- DUMMY EXPT JUNE,SEPTEMBER,& DECEMBER
0737 R DUMMY,%% -- DUMMY IN NOVEMBER AND DECEMBER
0738 R LE%%%%%% C1 LE EXCEPT 1ST WD OF WK THEN GT
0739 R GT%%%%%% C1 GT EXCEPT 1ST WD OF WK THEN LE
0740 R UCFAA000 -- UCFAA000 EXCEPT JANUARY THEN 8 SPACES
0741 R UCBOD000 -- UCBOD000 EXCEPT DECEMBER THEN UVBCM000
0742 R GE%%%%%% -- GE EXCEPT 2ND MONDAY IN JULY THEN GT
0743 R UDFQA000 -- UDFQA000 EXPT 1ST MON OF YR THEN UDCPD000
0744 R UAAFB000 -- UAAFB000 EXPT DECEMBER & JANUARY THEN UASGA000
0745 R GT%%%%%% -- GT EXCEPT NOVEMBER &DECEMBER THEN EQ
0746 R H N1 H ON LAST WD OF WK ELSE SPACE
0747 R UACFA000 -- UACFA000 EXCEPT FEBRUARY THEN UACEA000
0748 R YYMMDD1C C1 YYMMDD CONSTANT 1C EXCEPT 1ST WD OF WK THEN 8 SPS
0749 R 8205%%%% -- 8205 EXCEPT DECEMBER THEN 8625
0750 R 8101%%%% -- 8101 EXCEPT MARCH,JUNE, & SEPT. THEN 8625
0751 R UEANA000 -- UEANA000 EXCEPT DECEMBER THEN UYIZB000
0752 R XDAFA000 -- XDAFA000 EXCEPT DECEMBER THEN UVCZC000
0753 R DUMMY,%% -- DUMMY EXCEPT WHEN THERE ARE 5 FRIDAYS IN MONTH
0754 R DUMMY,%% N1 DUMMY EXPT 1ST WD OF WK & 1ST WD OF MO
0755 R EQ%%%%%% -- EQ EXCEPT MARCH,JUNE,SEPT., & DEC. THEN GT
0756 R YYMMDD00 -- PR WED OR FR EXPT 1ST WED OR FR OF MO(WHEVER 1ST)THEN 8 SPS
0757 R EQ%%%%%% -- EQ EXPT LT WED OR FR OF MO(WHEVER LT) THEN GT
0758 R 00000000 C1 8 ZEROS EXPT 3RD WD OF WK THEN YYMMDDWC(3WD MINUS 1WD)
0759 R 1 -- 1 EXCEPT JUNE & DECEMBER THEN 2
0760 R UYSGA000 -- UYSGA000 EXCEPT DECEMBER THEN UAVHA000
0761 R UYSAA000 -- UYSAA000 EXCEPT DECEMBER THEN UAVNA000
0762 R MN%%%%%% -- MN EXCEPT JUNE THEN RN
0763 R 0600%%%% -- 0600 EXCEPT DECEMBER THEN 1200
0764 R 0600%%%% -- 0600 EXCEPT DECEMBER THEN 1300
0765 R YYMM00%% -- CURRENT MONTH EXCEPT DECEMBER THEN YY1300
0766 R YY1231AN -- CURRENT YR 1231AN IN DECEMBER ELSE 8 SPACES
0767 R UYIZB000 -- UYIZB000 IN DECEMBER ELSE 8 SPACES
0768 R GE%%%%%% -- GE EXCEPT JUNE THEN NE
0769 R UCBSF000 -- UCBSF000 EXCEPT JANUARY THEN UCBSF100
0770 R GE%%%%%% -- GE EXCEPT DECEMBER THEN NE
0771 R YYMM00MN -- PRIOR MONTH EXCEPT JANUARY THEN 8 SPACES
0772 R UBAGA000 -- UBAGA000 EXCEPT JANUARY THEN 8 SPACES
0773 R YYPM00MN -- PR MONTH EXCEPT JANUARY THEN PR YR 1100MN
0774 R UBJEB000 -- UBJEB000 EXCEPT JANUARY THEN UAHFB000
0775 R %%%%%%% C1 SPACE EXCEPT LAST WD OF WK THEN L
0776 R DUMMY,%% -- DUMMY ON 1ST WED OR FRI OF MONTH (WHICHEVER IS FIRST)
0777 R EQ%%%%%% -- EQ EXCEPT JUNE & DECEMBER THEN GT
0778 R DELETE%% -- DELETE EXCEPT JUNE,SEPT., & DEC. THEN KEEP
0779 R DUMMY,%% -- DUMMY IN JUNE
0780 R EQ%%%%%% -- EQ ON 1ST FULL CAL. WK OF JANUARY ELSE GT
0781 R UAOFA000 -- UAOFA000 EXCEPT JANUARY THEN UJBCA000
0782 R M%%%%%%% -- M EXCEPT JANUARY THEN A
0783 R UDNTA000 -- UDNTA000 EXCEPT FEBRUARY THEN UDNSB000
0784 R DUMMY,%% C1 DUMMY EXPT 1ST WD AFTER 2ND FRIDAY OF MO
0785 R DUMMY,%% -- DUMMY EXCEPT QUARTERLY INPUT TO FGAH1
0786 R DUMMY,%% -- DUMMY IN FEBRUARY
0787 R 000000%% N1 6 0'S EXPT 1ST FR OF MO(OR NWD) AFTER 1ST MON THEN CUR DAY
0788 R 00%%%%%% N1 00 EXPT 3RD WD OF WK THEN WN
0789 R DUMMY,%% N1 DUMMY EXPT 1ST WD OF WK & 3WD AFTER 4TH FR OF MO
0790 R 11000001 -- 11000001 IN FEB;00100110 IN MAY;00011000 IN AUG
0791 R L%%%%%%% C1 L EXPT ON LAST WORKING FRIDAY OF MONTH THEN T
0792 R GT%%%%%% C1 GT ON TUE(WED IF TUE IS HOL) ELSE LE
0793 R LE%%%%%% C1 LE ON TUE (WED IF TUE HOL) ELSE GT
0794 R W%%%%%%% -- W IN FEBRUARY; S IN MAY;T IN AUGUST
0795 R Q%%%%%%% -- Q IN FEBRUARY;R IN MAY;U IN AUGUST
0796 R X%%%%%%% -- X IN FEBRUARY;V IN MAY
0797 R 7%%%%%%% -- 7 IN FEBRUARY;3 IN MAY;5 IN AUGUST
0798 R 1%%%%%%% -- 1 IN FEBRUARY;2 IN MAY;4 IN AUGUST
0799 R 8%%%%%%% -- 8 IN FEBRUARY;6 IN MAY
0800 R YYMMDD%% N1 LAST WORKDAY OF CURRENT YEAR (N1)
0801 R YYMMDD%% N1 LAST WORKDAY IN NOVEMBER (N1)
0802 R YYMMDD%% N1 1ST WORKDAY IN DECEMBER 2 YEARS PRIOR (N1)
0803 R YYMMDD%% N1 LAST 6.2 REWRITE OF PRIOR YEAR
0804 R YYMMDD%% N1 01-06=LT WD OF PR YR;07-12=4TH FR (OR PR WD) OF JUNE
0805 R YYMMDD%% C1 01-06=LT WD OF PR YR;07-12=4TH FR (OR PR WD) OF JUNE
0806 X %%%%%%%% -- ***** AVAILABLE FOR FUTURE USE *****
0807 R YYMMDD%% N1 01-06=SAT PR TO LT WD OF PR YR;07-12=SAT PR TO 4FR OF PR JUNE
0808 R YY%%%%%% -- 01-06=2ND PR YR;07-12=PR YR
0809 R YYMMDD%% N1 LAST WORKDAY OF PRIOR YEAR
0810 R DUMMY,%% N1 DUMMY EXPT 1ST WORKDAY OF YEAR
0811 R YYMMDD%% -- 1ST MONDAY DATE IN DECEMBER OF PRIOR YEAR
0812 R YYMMDD%% N1 LAST WD OF YR 3 YEARS PRIOR
0813 R 000000%% N1 2ND WD AFTER 4TH FR OF MO=PR WD; ELSE 6 0'S
0814 R DUMMY,%% C1 DUMMY EXCEPT 1ST MONDAY OF MONTH (IF HOLIDAY NEXT WD)
0815 R LT%%%%%% N1 LT ON LAST WD OF WK & NEXT-TO-LT WD OF MONTH ELSE LE
0816 R GT%%%%%% -- GT EXCEPT DECEMBER THEN EQ
0817 R LT%%%%%% N1 LT ON FIRST WORKDAY OF MONTH ELSE LE
0818 R LT%%%%%% N1 LT ON LAST WD OF WK & 1ST WD OF MO ELSE LE
0819 R LT%%%%%% N1 LT ON LAST WD OF WK & LAST WD OF MO ELSE LE
0820 R YYMMDD1C C1 PRIOR WD EXPT 1ST WD OF WK THEN 8 SPACES
0821 R DUMMY,%% -- DUMMY EXCEPT 2ND MONDAY IN JULY
0822 R YYMM00MN -- CURRENT YR PR MO 00MN EXPT JANUARY THEN 8 ZEROS
0823 R EQ%%%%%% -- EQ EXCEPT SEPTEMBER AND DECEMBER THEN GT
0824 R ZZZZZZZZ -- 8 Z'S EXPT JANUARY THEN PR YR 1200MN
0825 R DUMMY,%% -- DUMMY ON 1ST MONDAY OF JANUARY
0826 R DUMMY,%% -- DUMMY EXCEPT 3RD MONDAY IN JULY
0827 R DUMMY,%% -- DUMMY EXCEPT 3RD MONDAY IN JANUARY
0828 R YYMMDDWN -- CURRENT MONDAY WN EXPT 3RD MONDAY OF JAN THEN 8 ZEROS
0829 R YYMMDD%% N1 MONDAY DATE OF 25 WEEKS PRIOR
0830 R YYMMDD%% N1 8TH WD PRIOR TO LWD OF CURRENT MONTH
0831 R YYMMDD%% N1 TUE AFTER 1ST FR OF JANUARY OF PRIOR YEAR
0832 R YYMMDD%% N1 LAST WORKDAY OF 2ND PRIOR YEAR
0833 R YYMMDD%% N1 3RD WORKDAY AFTER 1ST FR 3 MONTHS PRIOR
0834 R DUMMY,%% -- DUMMY EXPT 3RD FRI OF MONTH & 1ST FRI OF JAN
0835 R YYMMDD%% -- CURR FRI DATE EXPT SAT THEN NEXT FRI DATE
0836 R YYMMDD%% -- 1ST CA DY OF PRI MTH IN FEB ELS 1ST CA DY OF 2ND PR MONTH
0837 R 1%%%%%%% -- CENTURY INDICATIOR
0838 R CYYMMDD% -- CENTURY + 1ST CALENDER DAY OF PRIOR MONTH
0839 R DUMMY,%% N1 DUMMY EXPT PROJ 41 SEPT & DEC MONTHLY CYCLES (SCR)
0840 M W%%%%%%% -- # OF WEEKS IN ACCTING PERIOD
0841 R DUMMY,%% N1 DUMMY EXPT FOR PROJ 41 MONTHLY CYCLES (SCR)
0842 R GT%%%%%% -- GT ON LAST LLLLLL DATE ELSE LE (CPF)(M-F)
0843 R GT%%%%%% -- GT EXPT ON LAST LLLLLL DATE THEN LE (CPF M-F)
0844 R DUMMY,%% -- DUMMY ON 1ST LLLLLL DATE (CPF)(M-F)
0845 R YY1231%% -- LST CALDAY OF 12=LST FRI OF 06;LST FR OF 06=PRYR1231
0846 R YYMM01%% -- CURRENT YEAR & MONTH PLUS 2 MONTHS
0847 R LE%%%%%% C1 LE EXPT 1ST WD OF MONTH THEN GT
0848 R GT%%%%%% C1 GT EXPT 1ST WD OF MONTH THEN LE
0849 R LE%%%%%% C1 LE EXPT 3RD WD AFTER 4TH FRI OF MO THEN GT
0850 R GT%%%%%% C1 GT EXPT 3RD WD AFTER 4TH FRI OF MO THEN LE
0851 R 0 DELETE C1 0 DELETE EXPT LT FR OF MO(IF HOL PR FR) THEN 8 SPS
0852 R LE%%%%%% C1 LE EXPT LT FR OF MO(IF HOL PR FR) THEN GT
0853 R GT%%%%%% C1 GT EXPT LAST FR OF MO(IF HOL PR FR) THEN LE
0854 R DUMMY,%% C1 DUMMY EXPT LAST FR OF MO(IF HOL PR FR)
0855 R YYMMDD%% C1 1ST 6.2 REWRITE AFTER 27TH OF PRIOR MONTH
0856 R YYMMDD%% C1 1ST 6.2 REWRITE AFTER 27TH OF 2ND PRIOR MONTH
0857 R 1 C1 1 & 7 SPACES EXCEPT 1ST WD OF WK THEN 0 & 7 SPACES
0858 R YYMMDDWN -- PRIOR MONDAY WN EXPT 2ND MON OF JAN THEN 8 ZEROS
0859 R YYMMDD%% -- 2ND MONDAY OF JANUARY
0860 R GE%%%%%% -- GE EXPT 1ST MON OF JAN,APRIL,JULY,OCT,NOV THEN GT
0861 R GE%%%%%% -- GE EXPT 1ST MONDAY OF JULY THEN GT
0862 R GE%%%%%% -- GE EXPT 1ST MON OF JAN,APRIL,JULY,OCT THEN GT
0863 R YY0101%% -- YY0101 EXCEPT JUNE THEN YY0301
0864 R ADAYA000 N1 ADAYA000 EXPT 1ST FRI OF JAN THEN 100(IF HOL 2ND FRI)
0865 R YYMMDD%% -- 1ST MONDAY,6 MONTHS PRIOR
0866 R DUMMY,%% N1 DUMMY ON 3RD WD OF WK(IF THURS&FRI HOL THEN 2ND WD)
0867 R DUMMY,%% N1 DUMMY EXCEPT THE LAST WORKDAY OF EACH QUARTER
0868 R DUMMY,%% N1 DUMMY ON THE LAST WORKDAY OF EACH QUARTER
0869 R D%%%%%%% N1 D EXPT 1ST WD OF WEEK FOLL 1ST 6.2 REWRITE THEN M
0870 R M%%%%%%% C1 'M' ON 1ST WD OF WEEK; OTHERWISE 'D'
0871 R CYYMMDD% -- LAST DAY OF 2ND PRIOR MONTH
0872 R CYYMMDD% -- LAST DAY OF 3RD PRIOR MONTH
0873 R DUMMY,%% -- DUMMY ON 4TH FRI OF MONTH & 2ND FRI IN JAN
0874 R DUMMY,%% N1 DUMMY EXCEPT 1ST WD AFTER 1ST 6.2 REWRITE OF MO
0875 R DUMMY,%% -- DUMMY EXPT WED PRIOR TO LAST FRI OF MONTH
0876 R %%%%% N1 SPACES EXCEPT LT WD OF WK THEN 2 SPACES F
0877 R EQ%%%%%% -- EQ EXCEPT 3RD FRI OF JANUARY THEN NE
0878 R DUMMY,%% N1 DUMMY ON 3RD WD OF WEEK
0879 R US N1 6 SPS US EXPT WHEN NXT MON DATE IS A HOL THEN H 5SPS US
0880 R DUMMY,%% N1 DUMMY EXPT 2ND WD AFTER 3RD MONDAY OF MONTH
0881 R EQ%%%%%% -- EQ EXCEPT 1ST FRIDAY OF JANUARY THEN NE
0882 R EQ%%%%%% -- EQ EXCEPT 3RD FRIDAY OF MAY THEN NE
0883 R EQ%%%%%% -- EQ EXCEPT 3RD FRIDAY DECEMBER & JUNE THEN NE
0884 R DELETE%% N1 DELETE EXPT LAST WD OF MO THEN KEEP
0885 R DELETE%% N1 DELETE EXPT 3RD WD AFTER 1ST FR THEN KEEP
0886 R EQ%%%%%% N1 EQ EXCEPT 2ND WORKDAY OF WEEK THEN GT
0887 R EQ%%%%%% N1 EQ EXCEPT 4TH WD AFTER 1ST FR THEN GT
0888 R P 2 C1 1WD MO=P 6 SPS 2;4WD AFTR 1ST 6.2 REWRITE=6 SPS M2;OR 7 SPS 2
0889 R 0%%%%%%% N1 0 EXPT ON LAST WORKDAY OF WEEK THEN 1
0890 R DUMMY,%% C1 DUMMY EXPT LAST 6.2 REWRITE OF MONTH
0891 R DUMMY,%% N1 DUMMY EXPT LAST 6.2 REWRITE OF MONTH
0892 R DUMMY,%% -- DUMMY EXPT LAST FRIDAY OF MO(FRI JAN 1ST=LAST FRIDAY DEC)
0893 R DUMMY,%% -- DUMMY EXCEPT AUGUST
0894 R DUMMY,%% -- DUMMY EXCEPT FEBRUARY
0895 R DUMMY,%% -- DUMMY ON FRIDAY
0896 R 00000000 -- JAN=UYLIA000,DEC=UYKVA000, ELSE 00000000
0897 R EQ%%%%%% -- EQ EXCEPT MARCH THEN GT
0898 R CCYYMM%% -- 4 DIGITS CURRENT YEAR 2 DIGITS CURRENT MONTH
0899 R DUMMY,%% -- DUMMY EXCEPT FRI. THEN SPACES
0900 R MMDDCCYY C1 LAST WORKDAY OF CURRENT WEEK (OSCARS) CCYY=CURR YR.
0901 X %%%%%%%% -- ***** AVAILABLE FOR FUTURE USE *****
0902 X %%%%%%%% -- ***** AVAILABLE FOR FUTURE USE *****
0903 X %%%%%%%% -- ***** AVAILABLE FOR FUTURE USE *****
0904 X %%%%%%%% -- ***** AVAILABLE FOR FUTURE USE *****
0905 X %%%%%%%% -- ***** AVAILABLE FOR FUTURE USE *****
0906 R YYMMDD%% N1 PRIOR THURSDAY IF HOLIDAY-PRIOR WEDNESDAY
0907 R YYMMDD%% -- LAST FRIDAY OF 6 MONTHS PRIOR
0908 M YYMMDD%% -- PENSIONS EFT RUN DATE
0909 R CYYMMDD% N1 2ND PRIOR WD WITH CENTURY
0910 R DD%%%%%% C1 CURRENT DAY + 1 WORKDAY
0911 R YYMMDD%% C1 2ND WORKDAY OF 3 MONTHS PRIOR
0912 R DUMMY,%% N1 DUMMY EXPT THURS.,MON.,& 1ST WD OF MONTH
0913 M DUMMY,%% -- DUMMY EXPT DATES IN SKEDFILE CL
0914 R 732%%%%% -- 732 FOR MONTHS 2-11,3000 FOR DEC. & JAN.
0915 R CYY0101% -- 1ST CALENDAR DATE OF THE CURRENT YEAR
0916 M DUMMY,%% -- DUMMY FOR AFFED000
0917 R CYYMMDD% N1 PRIOR WD WITH CENTURY
0918 R E0824EHM -- E0824EHM EXCEPT JAN. THEN E0824EHN
0919 R YYMMDD%% N1 1ST WORKDAY OF CURRENT YEAR
0920 R YY01WW%% -- WK NUM OF 7TH PRIOR WK OF YR (MONDAY)
0921 R YYMMDD%% C1 1ST WORKDAY OF QUARTER (JAN APR JUL OCT)
0922 M YYMMDD%% -- PROJ 7280 CHECK-O-MATIC CROSSING DATES (CANADA)
0923 R CCYYMMDD N1 LAST WORKDAY OF NEXT MONTH
0924 R DUMMY,%% C1 DUMMY EXCPT 1ST WD OF YEAR THEN NULL
0925 R YYMMDD%% -- CURRENT LLLLLL DATE (01-NY)(M-F)(CPF BILLING PERIOD)
0926 R YYMMDD%% -- PRIOR LLLLLL DATE (01-NY)(M-F) (CPF BILLING PERIOD)
0927 R MMYY%%%% -- CURRENT MONTH MINUS THREE MONTHS AND YEAR
0928 R YYMMDD%% C1 THURS. DATE OF 3 WKS PRIOR,IF HOL THEN PRIOR WD
0929 R YYMMDD%% C1 8TH PRIOR WORKDAY
0930 R YYMMDD%% C1 2ND 6.2 REWRITE OF MONTH(CANADA)
0931 R LE%%%%%% C1 LE EXCEPT ON THE FIRST 6.2 REWRITE THEN NE(CANADA)
0932 R MMYY%%%% -- CURRENT MONTH MINUS ONE MONTH AND CURRENT YEAR
0933 R DUMMY,%% -- DUMMY EXCEPT JANUARY AND JULY (PENSIONS)
0934 R DUMMY,%% -- DUMMY EXPT 1ST MON OF JAN,APRIL,JULY,OCT,NOV
0935 R EQ%%%%%% -- EQ EXCEPT JAN,APR AND OCT THEN GT
0936 M DUMMY,%% -- DUMMY EXPT CONSIGNMENT DAY FOR C-O-M (CANADA)
0937 M YYMMDD%% -- PARAMETER A FOR CDBKA000 (CANADA)
0938 R YYMMDD%% C1 30TH PRIOR WORKDAY
0939 M YYMMDD%% -- NEXT BANK DEPOSIT DAY (CANADA)
0940 M YYMMDDNU -- PARAMETER 9 NEXT BANK DEPOSIT DAY & CONS. NUM.(CA)
0941 R DUMMY,%% N1 DUMMY EXCEPT LAST WORKDAY OF YEAR
0942 R DUMMY,%% -- DUMMY EXCEPT JANUARY AND JUNE
0943 R DUMMY,%% -- DUMMY EXPT 1ST MONDAY OF JULY
0944 R LT%%%%%% N1 LT FIRST 10 WORKING DAYS OF MONTH;ELSE LE
0945 R YYMMDD%% -- MON,TUE=FRI DT OF PR WK;WED,TH,FR=FRI DT OF CURR WK
0946 R YYMMDD%% -- MON,TUE=FRI DT OF CURR WK;WED,TH FRI=FRI DT OF NXT WK
0947 R CCYYMMDD N1 NEXT WORKDAY
0948 M YYMMDD%% -- PENSIONS EFT CYCLE
0949 R CCYYMMDD N1 1ST WORKDAY OF NEXT MONTH
0950 R YYMM%%%% -- CALDAY 1-15=CUR YR&MO MIN 1 MO;CALDAY 16-31=CUR YR&MO
0951 M YYWW%%%% -- WEEK OF YEAR FOR FADC (1601)(CANADA)
0952 R YYMMDD%% N1 LAST THUR OF CURRENT MONTH-HOL=PRIOR WD
0953 R YYMMDD%% N1 5TH WORKDAY BEFORE THE END OF PRIOR MONTH
0954 R DUMMY,%% -- DUMMY IN APRIL
0955 R YYMMDD%% N1 6TH WORKDAY OF CURRENT MONTH
0956 R DUMMY,%% -- DUMMY EXPT 4TH MON&FRI OF MONTH,JAN 2ND&4TH FRI
0957 R YYMMDD%% N1 2 WORKDAYS PRIOR TO LAST WORKDAY OF WEEK
0958 R YYMMDD%% N1 2WDS PR TO LST WD OF WK 4 WKS PRIOR
0959 R YYMMDD%% N1 6TH WD OF PRIOR MONTH
0960 M DUMMY,%% -- DUMMY EXPT WK OF 2ND MON OF ACCOUNTING MONTH
0961 R %%%%%%%% -- DUMMY, JAN MAR MAY JULY SEPT NOV
0962 R YYMMDD%% C1 PRIOR WD;ON TUE(NWD IF TUE HOL) SPACES
0963 R ADAMAA00 C1 ADAMAA00 EXCEPT ON TUE(NWD IF TUE HOL) THEN SPACES
0964 R YYMMDD%% -- FIRST MONDAY OF NEXT MONTH
0965 R GT%%%%%% -- GT EXPT JANUARY THEN LE
0966 R LE%%%%%% -- LE EXPT JANUARY THEN GT
0967 R EQ%%%%%% N1 EQ EXCEPT LAST WORKDAY OF YEAR THEN LT
0968 R DUMMY,%% N1 DUMMY ON 2ND WORKDAY OF MONTH
0969 R LE%%%%%% -- LE EXCEPT MARCH,JUNE,SEPTEMBER AND DECEMBER THEN GT
0970 R MMDDYY%% -- 1ST CAL DAY 11 MOS PRIOR TO THE CURRENT DATE MO(GRN)
0971 R YYMMDD%% C1 1ST WORKDAY OF CURRENT MONTH
0972 M YYMMDD%% -- PROJ 0151 BILL DATES
0973 M YYMMDD%% -- PROJECT 0151 CHECKDAY
0974 R YYMMDD%% C1 CURRENT DAY XCPT LWD OF MONTH THEN LST CAL DAY
0975 M LE%%%%%% -- LE EXPT EVERYOTHER MONDAY THEN NE
0976 R YYMMDD%% -- 3RD THURSDAY OF THE MONTH
0977 R CCYYMM01 -- 1ST CALENDAR DAY OF 20TH PRIOR MONTH
0978 R CCYYMMDD -- LAST CALENDAR DAY OF CURRENT MONTH
0979 R MMDDYY%% C1 1ST WORKDAY OF CURRENT MONTH
0980 R YY0101%% -- 1ST CALENDAR DATE OF PRIOR YEAR
0981 R YY1231%% -- LAST CALENDAR DATE OF 2 YEARS PRIOR
0982 R YYMMDD%% N1 13TH WORKDAY OF THE CURRENT MONTH
0983 R YYMM%%%% -- CURRENT YR AND MONTH MINUS 4 YEARS
0984 R DUMMY,%% N1 DUMMY ON SECOND LWD OF WK
0985 R NE%%%%%% C1 NE EXPT ON 1ST WD OF MONTH THEN LE
0986 R YYJJJ%%% -- CURR DAY IN YR AND JULIAN DATE FORMAT MINUS 3 DAYS
0987 X %%%%%%%% -- ***** AVAILABLE FOR FUTURE USE *****
0988 R YYMMDD%% -- FRIDAY DATE OF 26 WEEKS PRIOR (SCR)
0989 R YYJJJ%%% -- CURR DAY IN YR AND JULIAN DATE FORMAT PLUS 1 DAY
0990 R CCYY%%%% -- 4 DIGITS PRIOR YEAR (EX 1986)
0991 R LE%%%%%% C1 LE EXCEPT WEDNESDAY (IF HOLIDAY PRIOR WD THEN GT)
0992 R AMBCA000 N1 AMBCA000 EXPT 2ND WD FOLL 3RD MON OF MO;THEN AMBCA100
0993 R HO%%%%%% N1 HO IF W-TH-FR HOL ELSE MO TU WE TH FR
0994 R LE%%%%%% C1 LE XCPT 2WD OF DEC THRU 1WD BETW 1-15&1-21 THEN GT
0995 R CBRD%%%% C1 CBRD XCPT 1WD OF WK OR LWD OF MO THEN CBRA
0996 R AFLFA000 -- AFLFA000 EXPT 2ND LLLLLL DATE OF MONTH THEN AFLFB000
0997 R 2%%%%%%% -- '2' EXCEPT MARCH THEN '4'
0998 R EQ%%%%%% N1 EQ EXCEPT LAST WORKDAY OF MONTH THEN GT
0999 R 0120%%%% -- '0120' EXPT 1ST FRIDAY OF JANUARY THEN '1900'
1000 R YYMMWW%% -- ARARPP- PRIOR REPORT WEEK (N1)(C1)(M-F) (CPFBP)
1001 R YYMMWW%% -- ASASJJ- 2ND PRIOR REPORT WEEK (N1)(C1)(M-F) (CPFBP)
1002 R YYMM%%%% -- YR&MO OF PRI MO ON 1ST&2ND FRI;CUR YR&MO ON OTHER FRI
1003 R YYMMWW%% -- 4TH PRIOR AQAQNN DATE (CPF) (M-F)
1004 R DUMMY,%% -- DUMMY EXCEPT TUES. WED. AND THURS.
1005 R YYMMWW%% -- 5TH PRIOR AQAQNN DATE (CPF) (M-F)
1006 R YYMMWW%% -- 7TH PRIOR AQAQNN DATE (CPF) (M-F)
1007 R YYMMWW%% -- 8TH PRIOR AQAQNN DATE (CPF) (M-F)
1008 R YYMMWW%% -- 10TH PRIOR AQAQNN DATE (CPF) (M-F)
1009 R YYMMWW%% -- 14TH PRIOR AQAQNN DATE (CPF) (M-F)
1010 R YYMMDD%% N1 YY0101/1ST WORKDAY-YEAR OR PRIOR WORKDAY (N1)
1011 X %%%%%%%% -- ***** AVAILABLE FOR FUTURE USE *****
1012 R DUMMY,%% -- DUMMY EXCEPT TUESDAY AND WEDNESDAY
1013 M YYMMDD%% -- PROJECT 0151 SCHEDULED DATES
1014 M 5%%%%%%% -- 5 FOR ALWAYS CANADA ONLY
1015 M YYMMDD%% -- PRIOR 'M' CYCLEDATE FCHUA SCH.(CANADA)
1016 M MM%%%%%% -- RUN THURSDAY AFTER PRIOR INTERVAL
1017 R YYMMDD%% -- 66 CALENDAR DAYS IN FUTURE
1018 R CCYYMMDD -- LAST CALENDAR DAY OF 3RD PRIOR MONTH
1019 R YYMMDD%% N1 TUESDAY OF THE 3RD PRIOR WEEK (HOL=NWD)
1020 R YYMMDD%% -- WEDNESDAY = PRIOR WEDNESDAY;FRIDAY = PRIOR FRIDAY
1021 R DUMMY,%% -- DUMMY EXCEPT APRIL,JULY,OCTOBER AND JANUARY
1022 R YYMM%%%% -- CURRENT YR AND MONTH MINUS 3 YEARS
1023 R MMDDYY%% -- CURRENT FRI MINUS 5 CALANDER DAYS
1024 R MMDDYY%% -- CURRENT FRI PLUS 3 CALENDAR DAYS
1025 R DUMMY,%% -- DUMMY IN MARCH,JUNE,SEPTEMBER AND DECEMBER
1026 R DUMMY,%% -- DUMMY ON THE 1ST THURSDAY IN JANUARY
1027 R DUMMY,%% -- DUMMY EXCEPT 1ST THURSDAY IN JANUARY
1028 R YYJJJ%%% -- 395 DAYS PRIOR IN JULIAN
1029 M DUMMY,%% -- DUMMY EXCEPT BANK DEPOSIT DAY (CANADA)
1030 R DUMMY,%% -- DUMMY ON 1ST FRIDAY OF NOVEMBER;OTHERWISE %NULL%%%
1031 R EQ%%%%%% -- EQ EXCEPT 2ND FRI IN JAN. THEN NE
1032 R CYYMMDD% -- 1ST CALENDAR DAY OF PRIOR QUARTER
1033 M YYMMDD%% -- LAST XQAE CYCLE OF PRIOR MO (SCRANTON)
1034 R LE%%%%%% -- LE ON 1ST FRIDAY OF NOVEMBER;OTHERWISE 'GT'
1035 M DUMMY,%% -- DUMMY ON 1ST CYCLE OF PHI ACTUARIAL MO (SCRANTON)
1036 R YYMMDD%% N1 LWD 2WKS PR X LWD NOT=LWD 2 WK PR THEN LWD PR MONTH
1037 R YY%%%%%% -- YEAR OF 2ND PRIOR MONTH
1038 R YYMMDD%% C1 LWD OF CUR YR. EX LWD OF CURR YR THEN LWD OF NEXT YR
1039 R MMDDYY%% C1 CURRENT DAY
1040 R YYMM01%% -- 1ST CALENDAR DATE OF NEXT MONTH
1041 M DUMMY,%% -- DUMMY EXPT 1 WK PRIOR TO 'A' IN FCHUA SCH
1042 R CYYMMDD% -- LAST CALENDAR DAY OF PRIOR QUARTER
1043 X %%%%%%%% -- ***** AVAILABLE FOR FUTURE USE *****
1044 R GT%%%%%% C1 GT EXCEPT WEDNESDAY (IF HOLIDAY PRIOR WD) THEN LE
1045 M YYMMDD%% -- LT WKLY CYCLE OF PHI ACCT MO(PROJ 38 SCRANTON)
1046 R DUMMY,%% N1 DUMMY EX NXT TO LWD OF WK FOL 2ND & LST FRI OF MO
1047 R MMDDCCYY N1 LAST WORKDAY OF THE PRIOR YEAR
1048 R YYMM%%%% -- CURRENT YEAR AND MONTH MINUS 18 MONTHS
1049 X %%%%%%%% -- ***** AVAILABLE FOR FUTURE USE *****
1050 R DUMMY,%% C1 DUMMY EXCEPT 2ND WD OF JAN,APR,JUL AND OCT
1051 R DUMMY,%% C1 DUMMY EXCEPT 2ND WD OF JANUARY AND JULY
1052 R %%%%% N1 3 SPCS XCPT 1ST WD OF 2ND WK OF 2,5,8&11 THEN LST
1053 R YYMMDD%% N1 10 WORKDAYS PRIOR TO 1ST WORKDAY OF NEXT QRTR
1054 R YYMMDD%% N1 55 WORKDAYS AFTER 1ST WORKDAY OF NEXT QRTR
1055 R YYMMDD%% N1 CURRENT DATE PLUS TEN WORKDAYS
1056 R YYMMDD%% N1 CURRENT DATE PLUS 25 WORKDAYS
1057 R YYMMDD%% N1 1ST WORKDAY OF NEXT QRTR
1058 R YYMMDD%% N1 CURRENT DATE PLUS 15 WORKDAYS
1059 R YYMM%%%% -- CURRENT YEAR AND MONTH MINUS 8 MONTHS
1060 R YYMM01%% -- CURRENT YEAR AND MONTH MINUS 6 MONTHS
1061 R DUMMY,%% -- DUMMY EXCEPT SEPTEMBER
1062 R YYMMDD%% N1 5TH WORKDAY 2 MONTHS PRIOR
1063 R YYJJJ%%% -- CURR DAY IN YEAR AND JULIAN DATE FORMAT
1064 R 0060%%%% N1 0060 EXCEPT LAST WD OF MONTH THEN 0365(RETPD-GRN)
1065 R 00000000 -- YY1200AN CURR YR 1200AN IN DEC, JAN -1YR ELSE 00000000
1066 R YYMMDD%% N1 FIRST WORKDAY OF MONTH (PROJ 7430-SCR)
1067 R YYMMDD%% C1 2ND WKDAY OF THE LAST FULL WEEK OF PRIOR MONTH
1068 R YYMMDD%% N1 60TH PRIOR WORKDAY
1069 R -- 8 SPS EXCEPT MON AFTER 1ST FRI OF JAN THEN 63INTERR
1070 R DUMMY,%% C1 DUMMY EXPT 2WD AFTER 3RD 6.2 REWRITE OF MO
1071 R NE%%%%%% -- NE ON THE 3RD FRIDAY OF MAY ELSE LE
1072 R EQ%%%%%% -- EQ EXCEPT JULY THEN GT
1073 R EQ%%%%%% -- EQ EXCEPT JANUARY THEN GT
1074 R DUMMY,%% -- DUMMY EXPT WHEN THERE ARE 5 FRIDAYS IN PRIOR MO
1075 R GE%%%%%% -- GE EXCEPT JAN,APRIL,JULY AND OCT THEN GT
1076 R YY0101%% -- 1ST CALDAY OF CUR YR EXPT LST FR OF YR THEN NEXT YR
1077 R YYMMDD%% -- FRIDAY DATE OF 52 WEEKS PRIOR
1078 R YY1231%% -- CURR YR 1231 EXPT 2ND MON OF JAN THEN PRIOR YR 1231
1079 R YYMMDD%% N1 1=1ST WD OF CUR YR;6=4TH FRI+1WD;12=1ST WD OF NEXT YR
1080 X %%%%%%%% -- ***** AVAILABLE FOR FUTURE USE *****
1081 X %%%%%%%% -- ***** AVAILABLE FOR FUTURE USE *****
1082 X %%%%%%%% -- ***** AVAILABLE FOR FUTURE USE *****
1083 X %%%%%%%% -- ***** AVAILABLE FOR FUTURE USE *****
1084 R LE%%%%%% -- LE IN MARCH,JUNE,SEPTEMBER AND DECEMBER ELSE GT
1085 R 0802%%%% -- 0802 EXCEPT JANUARY OF EVEN YEARS THEN 0804
Back to top
View user's profile Send private message
kumar4567

New User


Joined: 11 Apr 2008
Posts: 2
Location: India

PostPosted: Thu Apr 17, 2008 10:53 am    Post subject:
Reply with quote

Hi,

Sorry the remaining half of the variables got truncated. I am attaching a zip file containing necessary documents for GRANDLIST variables.

Thanks,
kumar
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> IBM Tools All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Incorrect output when trying to add n... monica1 PL/I & Assembler 10 Fri Jan 13, 2017 5:02 pm
No new posts Row-Numbers of distinct rows? Auryn DB2 1 Thu Oct 20, 2016 4:38 pm
No new posts comparing comp-3 and unpacked numbers juares castro COBOL Programming 3 Mon May 30, 2016 6:46 pm
No new posts Sort Trick for numbers pshongal DFSORT/ICETOOL 4 Tue Mar 22, 2016 1:33 pm
No new posts Display the exponential numbers in no... bipinpeter CLIST & REXX 4 Tue Jan 19, 2016 6:28 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us