PSOHDFN |
Input |
The parameter is the Internal Entry Number from the
PATIENT file (#2). It is required.
|
~TMP |
Output |
^TMP("PSONVA",$J,DFN,0)=Total entries returned, or
-1^Error code
^TMP("PSONVA",$J,DFN,D0,0)=2977;50^CAPTOPRIL 25MG TABS^^^^^^ACTIVE^10778
Where:
piece 1 = Internal Entry number;File Number. If the order has an
entry from the DRUG (#50) File, that will display. If the order does
not have an entry frm the DRUG (#50) File, the the entry from the
PHARMACY ORDERABLE ITEM (#50.7) File will display.
piece 2 = If the order has an entry from the DRUG (#50) File, this
will be the .01 field from the DRUG (#50) File. If the order does
not have an entry frm the DRUG (#50) File, this will be the entry from
the PHARMACY ORDERABLE ITEM (#50.7) File, concatenated with the .01
field from the DOSAGE FORM (#50.606) File.
piece 8 = DISCONTINUED if the entry has a date in the DISCONTINUED DATE
(#6) field, and the date is not a future date. Otherwise, ACTIVE will
be returned.
piece 9 = ORDER NUMBER, which is the pointer to the ORDER (#100) File.
^TMP("PSONVA",$J,DFN,D0,"CLINIC",0)=# of CLINIC entries
^TMP("PSONVA",$J,DFN,D0,"CLINIC",1,0)=22^OUTPATIENT LAB
Where if defined, data node will be:
piece 1 = Internal Entry Number from the HOSPITAL LOCATION (#44) File.
piece 2 = The NAME (.01) Field from the HOSPITAL LOCATION (#44) File.
^TMP("PSONVA",$J,DFN,D0,"DTDISC",0)=# of DISCONTINUED DATE entries
^TMP("PSONVA",$J,DFN,D0,"DTDISC",1,0)=3060103^JAN 3,2006
Where if defined, data node will be:
piece 1 = Internal format of DISCONTINUED DATE (#6) Field.
piece 2 = External format of DISCONTINUED DATE (#6) Field.
^TMP("PSONVA",$J,DFN,D0,"DTDOCU",0)=# of DOCUMENTED DATE entries
^TMP("PSONVA",$J,DFN,D0,"DTDOCU",1,0)=3051230.094043^DEC 30,2005@09:40:43
Where if defined, data node will be:
piece 1 = Internal format of DOCUMENTED DATE (#11) Field.
piece 2 = External format of DOCUMENTED DATE (#11) Field.
^TMP("PSONVA",$J,DFN,D0,"DTSTRT",0)=# of START DATE entries
^TMP("PSONVA",$J,DFN,D0,"DTSTRT",1,0)=3051229^DEC 29,2005
Where if defined, data node will be:
piece 1 = Internal format of START DATE (#8) Field.
piece 2 = External format of START DATE (#8) Field.
^TMP("PSONVA",$J,DFN,D0,"ORDIEN",0)=# of ORDER NUMBER entries
^TMP("PSONVA",$J,DFN,D0,"ORDIEN",1,0)=10778
Where if defined, data node will be:
piece 1 = ORDER NUMBER (#7) Field, which is the pointer to the ORDER
(#100) File.
^TMP("PSONVA",$J,DFN,D0,"SCHED",0)=# of SCHEDULE entries
^TMP("PSONVA",$J,DFN,D0,"SCHED",1,0)=Schedule
Where if defined, data node will be:
piece 1 = Entry from the SCHEDULE (#4) Field.
^TMP("PSONVA",$J,DFN,D0,"SIG",0)=# of SIG entries
^TMP("PSONVA",$J,DFN,D0,"SIG",1,0)=25MG BY MOUTH
Where if defined, data node will be:
piece 1 = SIG, which is comprised of a concatenation of the DOSAGE
(#2) Field, the MEDICATION ROUTE (#3) Field, and the SCHEDULE (#4)
Field.
^TMP("PSONVA",$J,DFN,D0,"STATUS",0)=# of STATUS entries
^TMP("PSONVA",$J,DFN,D0,"STATUS",1,0)=DISCONTINUED
Where if defined, data node will be:
piece 1 = DISCONTINUED if the entry has data in the
DISCONTINUED DATE (#6) field, and the date is not a future date.
Otherwise, ACTIVE will be returned.
^TMP("PSONVA",$J,DFN,D0,"USRDOCU",0)=# of DOCUMENTED BY entries
^TMP("PSONVA",$J,DFN,D0,"USRDOCU",1,0)=12345^CPRSprovider
Where if defined, data node will be:
piece 1 = NEW PERSON (#200) File pointer from the DOCUMENTED BY (#12)
Field.
piece 2 = NAME (#.01) Field from the NEW PERSON (#200) File.
^TMP("PSONVA",$J,DFN,D0,"WP-CMMNT",0)=# of COMMENTS lines
^TMP("PSONVA",$J,DFN,D0,"WP-CMMNT",1,0)=Patient already taking medication.
Where if defined, data node will be:
data from the COMMENTS (#55.514) Subfile
^TMP("PSONVA",$J,DFN,D0,"WP-DSCLMR",0)=# of DISCLAIMER lines
^TMP("PSONVA",$J,DFN,D0,"WP-DSCLMR",D1,0)=Patient wants to buy from Non-VA
pharmacy.
Where if defined, data node will be:
data from the DISCLAIMER (#55.052) Subfile
^TMP("PSONVA",$J,DFN,D0,"WP-OCNAR",0)=# of ORDER CHECK NARRATIVES lines
^TMP("PSONVA",$J,DFN,D0,"WP-OCNAR",D1,0)=CRITICAL drug-drug interaction:
AMINOPHYLLINE & CIMETIDINE (AMINOPHYLLINE TAB 100MG TAKE ONE TABLET BY BY
MOUTH EVERY MORNING THIS IS ONLY A TEST [ACTIVE])^12345
Where if defined, data node will be:
piece 1 = The narrative of the order check for the Non-VA Medication
order from the ORDER CHECK NARRATIVE (#.01) Field.
piece 2 = NEW PERSON (#200) File pointer of the provider responsible
for overriding the order check, from the OVERRIDING PROVIDER (#1)
Field.
^TMP("PSONVA",$J,DFN,D0,"WP-OCNAR",D1,"WP-OVRDRSN",0)=# of OVERRIDING REASON
lines ^TMP("PSONVA",$J,DFN,D0,"WP-OCNAR",D1,"WP-OVRDRSN",D2,0)=Patient
understands instructions.
Where if defined, data node will be:
data from the OVERRIDING REASON (#55.O511) Subfile
|