VPSMRAR7 ;DALOI/KML,WOIFO/BT - Cont. Update of VPS MRAR PDO file ;1/15/15 15:30
Source file <VPSMRAR7.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SUB57(PTIEN,DTIEN,FLD,DIEFLAG,DATA,REQFLDS) | ; file the ALLERGY REACTIONS multiple (853.57)
; INPUTS ; PTIEN : Patient DFN for 853.5 entry ; DTIEN : transaction date/time ien for 853.51 sub-entry ; FLD : Field # where the data will be filed ; DIEFLAG : Filing Type (I = Internal, E = External) ; DATA : composite string assigned to a subscript in the local array passed in by Vecna for the specific field ; REQFLDS : Array of required fields by fieldname and entry number ; OUTPUT ; success : RESULT = Field Name^IENS^Field Value^1 ; failed : RESULT = Field Name^IENS^Field Value^99^error text describing why data did not get filed |
|
| CHKREACT(REQFLDS,DATA) | ;Check required Allergy Reaction fields
; INPUTS ; REQFLDS : Array of required fields by fieldname and entry number ; DATA : Field Name^IENS^Field Value ; ; OUTPUT ; success : RESULT = Field Name^IENS^Field Value^1 ; failed : RESULT = Field Name^IENS^Field Value^99^error text describing why data did not get filed |
