Select the objects that you wish to see in the downloaded PDF
AUG 15, 1997
Enter the pointer to the EC Procedure Reason file (#720.4).
This field contains the pointer to the procedure reason associated with the event code screen.
This field is populated when a procedure reason is added to an event code screen.
720.5^B
1)= S ^ECL("B",$E(X,1,30),DA)=""
2)= K ^ECL("B",$E(X,1,30),DA)
720.5^AC^MUMPS
1)= D SAC^ECDUTL
2)= D KAC^ECDUTL
3)= DO NOT DELETE
This cross reference is used to sort by procedure reason and event code screen and is defined as follows:
^ECL("AC",procedure reason IEN, event code screen IEN, DA)
JUN 25, 1997
Enter the pointer to the Event Code Screen file (#720.3).
720.5^AD^MUMPS
1)= S ^ECL("AD",+X,+$P($G(^ECL(DA,0)),"^"),DA)=""
2)= K ^ECL("AD",+X,+$P($G(^ECL(DA,0)),"^"),DA)
This cross reference is used to sort by event code screen and procedure reason and is defined as follows:
^ECL("AD",event code screen IEN,procedure reason IEN,DA)