Routine: ECXNUT

Information

ECXNUT ;ALB/JRC Nutrition DSS Extract ; 10/31/08 1:57pm

Source file <ECXNUT.m>

Name	Comments	DBIA/ICR reference
BEG	;entry point from option
START	; start package specific extract
GET	;gather extract data
PAT(ECXDFN)	;get/set patient data ; INPUT - ECXDFN = patient ien (DFN) ; OUTPUT - ECPAT array: ; ECPAT("SSN") ; ECPAT("NAME") ; returns 0 or 1 in ECXERR - 0=successful ; 1=error condition
FILE	;file the n&fs extract record
SETUP	;Set required input for ECXTRAC.