Routine: LRSPSICD

Package	Total	Call Graph
Lab Service	3	^LRSPSICP (B,K,L,S,SSN,XR)^LRU (BEG,END)^LRUTL
VA Fileman	2	^%DTC ^DIC
DRG Grouper	1	$$ICDDX^ICDEX

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF,!?20,LRO(68)," SEARCH BY ICD9CM CODE" Line Location: LRSPSICD+3
Function Call: WRITE	Prompt: @IOF,!?20,LRO(68)," SEARCH BY ICDCM CODE" Line Location: LRSPSICD+4
Function Call: WRITE	Prompt: ! Line Location: ASK+4
Routine Call	DIC Line Location: ASK

Name	Line Occurrences (* Changed, ! Killed)
^DIC - [#1]	PRT
^LR - [#63]	QUE+2, L, I, TO, TO+1, PRT
^TMP($J	QUE!, QUE+1, QUE+3!, PRT+6

Name	Field # of Occurrence
^(0	PRT
^(3	TO

Information