Routine: VADPT2

Information

VADPT2 ;ALB/MJK - ESTABLISH PATIENT VARIABLES ; 3/23/88 9:13 PM ; [10/20/95 4:02pm]

Source file <VADPT2.m>

Name	Comments	DBIA/ICR reference
5	; -- INP call
DONE
IB	;In-Bed status ; input: VAINDT = internal date of requested info ; VAMV = starting IFN ; VAMV0 = 0th of VAMV
IBQ
CHK	; -- check if mvt exists and if 'while asih' type d/c ; if VAMV returned undefined then continue $Oing
CHKQ
ADM	; -- send back adm ifn for dfn on vaindt or now	ICR #325 Status: Active Usage: Controlled Subscription