PRS8HD ;HISC/MGD-DECOMPOSITION, DETERMINE HOLIDAYS ;12/17/2008
Source file <PRS8HD.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ;--- entry point
; pass PRS8D as date you want in VA FileMan format ; - where only year, i.e., 92 is passed, the first day is presumed ; pass PRS8D(0) containing a holiday code if specific one wanted ; if neither PRS8D or PRS8D(0) passed DT is assumed and all ; holidays for next year are returned |
|
PASS | ;--- come back here for a second pass if necessary
|
|
END | ;--- That's all folks
|
|
SET | ;--- set nodes
|
|
H | ;--- Actual Holidays
; PIECE1 PIECE2 PIECE3 PIECE4 PIECE5 PIECE6 ; actual month exact day 0=exact holiday how ; holiday day-of-week 1=1st wk code deter- ; 2=last wk mined ; - pc3 and 4 are used in concert 3=3rd wk ; 4=2nd wk,5=4th wk |
|
EHOL | ;
|
|
EHOLDC | ;
|