Routine: IBINI09T

Information

IBINI09T ; ; 21-MAR-1994

Source file <IBINI09T.m>

Name	Comments	DBIA/ICR reference
Q

Name	Line Occurrences
Function Call: WRITE	Prompt: " ",Y,@("$E("_DIC_"%I,0),0)") Line Location: Q+32
Function Call: WRITE	Prompt: " ",$S($P(^(0),U,5)>2:"Outpatient",1:"Inpatient") Line Location: Q+36
Function Call: WRITE	Prompt: " ",Y,@("$E("_DIC_"%I,0),0)") Line Location: Q+38

Name	Field # of Occurrence
$T(Q+I	IBINI09T+2
$T(Q+I+1	IBINI09T+2