Select the objects that you wish to see in the downloaded PDF
S X=$$UP^XLFSTR(X) K:$L(X)>72!($L(X)<2)!'(X'?1P.E) X
SEP 12, 1994
Answer must be 2-72 characters in length.
This field contains the service's reason for attending this program/class.
FREE TEXT (2-72)
W !,"You may enter a reason for giving this class.",!
1,0)= I 1 D EN^DDIOL("FILE IS POINTED TO - NO DELETION ALLOWED")
XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
1)= S ^PRSE(452.6,"B",$E(X,1,72),DA)=""
2)= K ^PRSE(452.6,"B",$E(X,1,72),DA)
Main index of file entries by reason for training name.