Routine: TIUMOBJ

Information

TIUMOBJ ;XAN/AJB - MEDICATION OBJECT ;Aug 02, 2024@13:51:30

Source file <TIUMOBJ.m>

Name	Comments	DBIA/ICR reference
LIST(DFN,TARGET,A,D,M,O,SC,SU)	; ; validate target, default to OUTPUT if needed
EX
CLASS(MED,DFN)	;
MEDCLASS(NAME,IEN)	;
OUTPUT(TARGET,MEDS,OCL,P)	;
ADDMED(TARGET,OCL,P,COL,CNT,INDEX,XSTR)	;
ADD(TARGET,DATA)	;
NODE(OCL,IDX,NODES)	;
SETSTR(S,V,X,L)	;
TITLE(TARGET,P,SHOW)	;
UP(X)