VistA Analysis » VistA Reference » RPCs » ORWPT16 DEMOG

ORWPT16 DEMOG

Properties

Property Value
Label DEMOG
MUMPS Implementation ORWPT16
Return Type SINGLE VALUE

MUMPS Method Description

Property Value
Method DEMOG^ORWPT16
Method Comment procedure
Input Parameters DFN
First Comment 
 Return common patient demographic info
 NAME^SEX^DOB^SSN^WARDID^WARDNAME^RMBED^ADMITTIME^DIED ;^SC%^ELIGTYPE
Code 
 S X=^DPT(DFN,0),VAL=$P(X,U,1,3)_U_$P(X,U,9)_U_U_$G(^(.1))_U_$G(^(.101))
 S X=$P(VAL,U,6) I $L(X) S $P(VAL,U,5)=$O(^SC("B",X,0))
 S X=$G(^DPT(DFN,.105)) I X S $P(VAL,U,8)=$P(^DGPM(X,0),U,1)
 I $L($P($G(^DPT(DFN,.35)),U,1)) S $P(VAL,U,9)=$P(^(.35),U,1)

CPRS

File Type Description
NOT OSEHRA CPRS  


Document generated on August 31st 2022, 2:55:43 pm