Routine: APCUOKCK

Select the objects that you wish to see in the downloaded PDF

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: ERR+0
Function Call: READ	Prompt: KW Formatting: "KEYWORD TO LOOK FOR: " Timeout: KW="" Variable: ! Q Line Location: ERR+1
Function Call: WRITE	Prompt: "Bye.",! Line Location: ERR+2
Function Call: WRITE	Prompt: *7,"-- NOT FOUND.",! Line Location: KCHECK+1
Function Call: WRITE	Prompt: "MAIN ENTRY (",ME,"): ",$P(^ICD9(ME,0),"^",1)," ",$P(^(0),"^",3),! Line Location: ME+0
Function Call: WRITE	Prompt: ?20,^(1),! Line Location: ME+1
Function Call: WRITE	Prompt: " SUBENTRY (",SE,"): ",^ICD9(ME,9999999.21,SE,0),! Line Location: SE+0