Routine: IBDFN8

Customize PDF page

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

Information

IBDFN8 ;ALB/CJM - ENCOUNTER FORM - PCE GDI INPUT TRANSFORMS ;08/10/95

Source Information

Source file <IBDFN8.m>

Call Graph

Call Graph Total: 2

Package	Total	Call Graph
CPT HCPCS Codes	1	$$CPT^ICPTCOD
DRG Grouper	1	$$ICDDATA^ICDXCODE

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 2

Package	Total	Caller Graph
Automated Information Collection System	2	^IBE(357.6 ^IBE(359.1

Entry Points

Name	Comments	DBIA/ICR reference
INPUTCPT(X)	;changes X,a CPT code, into its ien
INPUTICD(ICD)	;changes X, an ICD-9 code, into its ien
INPICD10(ICD)	;changes X, an ICD-10 code, into its ien
UPP(X)	; -- convert lower case to upper case (especially when in codes above)

External References

Name	Field # of Occurrence
$$ICDDATA^ICDXCODE	INPUTICD+10, INPICD10+6
$$CPT^ICPTCOD	INPUTCPT+8

Label References

Name	Line Occurrences
$$UPP	INPUTCPT+6

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DT	INPUTICD+10, INPICD10+6
IBDCODE	INPUTICD+8~, INPUTICD+10, INPUTICD+11, INPICD10+4~, INPICD10+6, INPICD10+7
IBDSTAT	INPUTICD+8~, INPUTICD+11, INPICD10+4~, INPICD10+7
ICD	INPUTICD~, INPUTICD+9, INPUTICD+10, INPICD10~, INPICD10+5, INPICD10+6
U	INPUTCPT+10, INPUTICD+10, INPUTICD+11, INPICD10+6, INPICD10+7
X	INPUTCPT~, INPUTCPT+6, INPUTCPT+8, INPUTCPT+9!, INPUTCPT+10!, INPUTICD+9!, INPUTICD+10!, INPUTICD+11!, INPICD10+5!, INPICD10+6! , INPICD10+7!, UPP~, UPP+1