Select the objects that you wish to see in the downloaded PDF
K:+X'=X!(X>21)!(X<1)!(X?.E1"."1.N) X S:$G(X) DINUM=X
JAN 24, 2002
Enter the Exempt Day number for this care
This is the number (count) for this exempt day.
XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
351.811^B
1)= S ^IBA(351.81,DA(1),1,"B",$E(X,1,30),DA)=""
2)= K ^IBA(351.81,DA(1),1,"B",$E(X,1,30),DA)
S %DT="EX" D ^%DT S X=Y K:X<1 X
FEB 22, 2002
Enter a date this exemption was used on.
This is the date the exemption number was used on.
351.811^AC
1)= S ^IBA(351.81,DA(1),1,"AC",$E(X,1,30),DA)=""
2)= K ^IBA(351.81,DA(1),1,"AC",$E(X,1,30),DA)
Used to sort the dates in date order.