DGFYD (131) FUNCTION (.5)
Name
Value
NAME
DGFYD
MUMPS CODE
S X1=X,X2=$E(X1,1,3)_"1001" S:+$E(X1,4,5)<10 X2=X2-10000 D D^%DTC S X=X+1
EXPLANATION
FISCAL DAY
DATE-VALUED
NO
