Routine: IBDF18E1

Information

IBDF18E1 ;ALB/CJM - ENCOUNTER FORM - PCE DEVICE INTERFACE utilities ;04-OCT-94

Source file <IBDF18E1.m>

Name	Comments	DBIA/ICR reference
GETPI(PI,QLFR,TYPE)	; -- returns information about the package interface ; needed to map data to PCE DEVICE INTERFACE
GETPIQ
SETTEMP	; -- sets values for the field into TEMP() ; values are merged for fields that consist of a collection
MODTEMP	;-- Set up TEMP(SUB,$P(FID,"("),+ITEM, "MODIFIER array ; the CPT Modifier information is stored in the selection file(357.3)