| GENERAL DESCRIPTION |
NAME: PXVIMM IMM DETAILED TAG: IMMRPC
ROUTINE: PXVRPC4 RETURN VALUE TYPE: GLOBAL ARRAY
WORD WRAP ON: TRUE
DESCRIPTION:
Returns a detailed Immunization record INPUT PARAMETER: PXIMM
PARAMETER TYPE: LITERAL
REQUIRED: YES SEQUENCE NUMBER: 1
DESCRIPTION:
Pointer to #9999999.14 (Required) INPUT PARAMETER: PXDATE
PARAMETER TYPE: LITERAL
REQUIRED: NO SEQUENCE NUMBER: 2
DESCRIPTION:
Immunization status and Codes will be based off this date
(Optional; Defaults to NOW) INPUT PARAMETER: PXLOC PARAMETER
TYPE: LITERAL
REQUIRED: NO SEQUENCE NUMBER: 3
DESCRIPTION:
Used to determine Institution, when filtering Lot and Defaults (Optional).
Possible values are:
"I:X": Institution (#4) IEN #X
"V:X": Visit (#9000010) IEN #X
"L:X": Hopital Location (#44) IEN #X
If PXLOC is not passed in OR could not make determination based off input,
then default to DUZ(2), and if DUZ(2) is not defined, default to Default
Institution.
RETURN PARAMETER DESCRIPTION:
^TMP("PXVIMMRPC",$J,0)
1: 1 - Immunization was found. The "1" node will be returned, but the
other nodes are optional.
-1 - Immunization was not found; no other nodes will be returned
^TMP("PXVIMMRPC",$J,1)
Note: Status (in the 5th piece) is determined as follows:
- If PXDATE is today, the status is based off the Inactive Flag
(#.07)
- If PXDATE is different than today, we will look when an update was
last made to the Immunization file (based off the Audits). If there
have not been any changes since PXDATE, we will get the status
based off the Inactive Flag, otherwise, we will get the status for
that date by calling GETSTAT^XTID.
1: "IMM"
2: #9999999.14 IEN
3: Name (#.01)
4: CVX Code (#.03)
5: Status (1: Active; 0: Inactive)
6: Selectable for Historic (#8803)
7: Mnemonic (#8801)
8: Acronym (#8802)
9: Max # In Series (#.05)
10: Combination Immunization (Y/N) (#.2)
11: Reading Required (#.51)
12: Series Required (calculated)
^TMP("PXVIMMRPC",$J,x)
1: "VIS"
2: #920 IEN
3: Name (#920,#.01)
4: Edition Date (#920,#.02)
5: Edition Status (#920,#.03)
6: Language (#920, #.04)
7: 2D Bar Code (#100)
8: VIS URL (#101)
^TMP("PXVIMMRPC",$J,x)
1: "CDC"
2: CDC Product Name (#9999999.145, #.01)
^TMP("PXVIMMRPC",$J,x)
1: "GROUP"
2: Vaccine Group Name (#9999999.147, #.01)
^TMP("PXVIMMRPC",$J,x)
1: "SYNONYM"
2: Synonym (#9999999.141, #.01)
^TMP("PXVIMMRPC",$J,x)
Note: Only active codes (based off PXDATE) are returned.
1: "CS"
2: Coding System (#9999999.143, #.01)
3: Code (#9999999.1431,#.01)
4: Variable pointer. e.g., IEN;ICPT(
5: Short Description
^TMP("PXVIMMRPC",$J,x)
Note: Only active lots for the given division are returned.
Also, the Expiration date must be >= PXDATE
1: "LOT"
2: #9999999.41 IEN
3: Lot Number (#9999999.41, #.01)
4: Manufacturer (#9999999.04, #.01)
5: Expiration Date (#9999999.41, #.09)
6: Doses Unused (#9999999.41, #.12)
7: Low Supply Alert (#9999999.41, #.15)
8: NDC Code (#9999999.41, #.18)
^TMP("PXVIMMRPC",$J,x)
Note: Only active contraindications are returned
1: "CONTRA"
2: #920.4 variable pointer: IEN;PXV(920.4,
3: Name (#920.4, #.01)
4: Status (1:Active, 0:Inactive)
5: Code|Coding System (#920.4, #.02 and .05)
6: NIP004 (#920.4, #.04)
7: Contraindication/Precaution (#920.4, #.06)
8: Allergy-Related (1:Yes, 0:No)
9: Default Warn Until Date ("Forever" means it should be forever)
^TMP("PXVIMMRPC",$J,x)
1: "DEF"
2: Default Route (#920.051, #1302)
3: Default Site (#920.051, #1303)
4: Default Dose (#920.051, #1312)
5: Default Dose Units (#920.051, #1313)
6: Default Dose Units (external format) (#920.051, #1313)
7: Default Non-Standard Dose Units (#920.051, #1314)
^TMP("PXVIMMRPC",$J,x)
1: "DEFC"
2: Default Comments (#920.051, #81101)
|
