VistA Analysis » VistA Reference » RPCs » ORWDAL32 DEF

ORWDAL32 DEF

Returns default values and list sets for Allergy ordering dialog.

Properties

Property	Value
Label	DEF
MUMPS Implementation	ORWDAL32
Return Type	ARRAY

MUMPS Method Description

Property Value

Method DEF^ORWDAL32

Method Comment Get dialog data for allergies

Code

Property	Value
Method	DEF^ORWDAL32
Method Comment	Get dialog data for allergies
Code	`N ILST,I,X S ILST=0 S LST($$NXT)="~Allergy Types" D ALLGYTYP S LST($$NXT)="~Reactions" D ALLGYTYP S LST($$NXT)="~Nature of Reaction" D NATREACT S LST($$NXT)="~Top Ten" D TOPTEN S LST($$NXT)="~Observ/Hist" D OBSHIST S LST($$NXT)="~Severity" D SEVERITY`

 N ILST,I,X S ILST=0
 S LST($$NXT)="~Allergy Types" D ALLGYTYP
 S LST($$NXT)="~Reactions" D ALLGYTYP
 S LST($$NXT)="~Nature of Reaction" D NATREACT
 S LST($$NXT)="~Top Ten" D TOPTEN
 S LST($$NXT)="~Observ/Hist" D OBSHIST
 S LST($$NXT)="~Severity" D SEVERITY

CPRS

File Type	Description
Pascal File	Orders/rODAllergy.pas

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