VPSMR52 ;WOIFO/BT - Get the last MRAR data for a patient (Allergy Level) ;01/29/15 15:30
Source file <VPSMR52.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
ALLERGY(VPSMRAR,DFN,LASTMRAR) | ; -- retrieve Allergy level fields and store them in VPSMRAR
; INPUT ; DFN : Patient IEN ; LASTMRAR : The last MRAR Transaction IEN for the patient ; OUTPUT ; VPSMRAR: local array contains all field names/values for the last mrar |
|
ALLIND(VPSMRAR,DFN,LASTMRAR,ALRIEN,ALRNO) | ; -- retrieve Allergy Indicator level fields and store them in VPSMRAR
; INPUT ; DFN : Patient IEN ; LASTMRAR : The last MRAR Transaction IEN for the patient ; ALRIEN : Allergy IEN ; ALRNO : Allergy Entry # ; OUTPUT ; VPSMRAR : local array contains all field names/values for the last mrar |
|
ALREACT(VPSMRAR,VPSDFN,LASTMRAR,ALRIEN,ALRNO) | ; -- retrieve Allergy Reaction level fields and store them in VPSMRAR
; INPUT ; DFN : Patient IEN ; LASTMRAR : The last MRAR Transaction IEN for the patient ; ALRIEN : Allergy IEN ; OUTPUT ; VPSMRAR : local array contains all field names/values for the last mrar |
|
ADDALLER(VPSMRAR,DFN,LASTMRAR) | ; -- retrieve Additional Allergy level fields and store them in VPSMRAR
; INPUT ; DFN : Patient IEN ; LASTMRAR : The last MRAR Transaction IEN for the patient ; OUTPUT ; VPSMRAR: local array contains all field names/values for the last mrar |
FileNo | Call Tags |
---|---|
^GMR(120.8 - [#120.8] | GET1^DIQ |