| DATA(PSSIEN,PSSFT,PSSFL,PSSPK,PSSRTOI,LIST) | 
Format:
DATA^PSS50(PSSIEN,PSSFT,PSSFL,PSSPK,PSSRTOI,LIST)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSIEN | 
Input | 
PSSIEN = IEN from the DRUG file (#50) [optional]
 
 | 
PSSFT | 
Input | 
PSSFT = GENERIC NAME field of the DRUG file (#50.01). A value of  "??" may be
used) [optional]
 
 | 
PSSFL | 
Input | 
PSSFL = Inactive date. A Null value will return all
entries.  Entry of a FileMan format date (ex: 3030917) will return active
entries after this date. [optional]
 
 | 
PSSPK | 
Input | 
PSSPK = Returns the APPLICATION PACAKGES USE (ex: "IU" returns the
APPLICATION PACKAGES' USE for IV and Unit Dose [optional]
 
 | 
PSSRTOI | 
Input | 
PSSRTOI = If "1" returns only those entries matched to a Pharmacy Orderable
Item [optional]
 
 | 
LIST | 
Input | 
LIST = the array defined by the calling party [required]
 
 | 
~TMP | 
Output | 
^TMP($J,LIST,0)=Total entries returning or -1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,.01)=GENERIC NAME(50,.01)
^TMP($J,LIST,PSSIEN,2)=VA CLASSIFICATION(50,2)
^TMP($J,LIST,PSSIEN,2.1)=PHARMACY ORDERABLE ITEM(50,2.1) ^NAME(50.7,.01)^IEN
of the Dosage Form file (#50.606)^NAME(50.606,.01)
^TMP($J,LIST,PSSIEN,3)=DEA SPECIAL HDLG(50,3)
^TMP($J,LIST,PSSIEN,4)=MAXIMUM DOSE PER DAY(50,4)
^TMP($J,LIST,PSSIEN,5)=STANDARD SIG(50,5)
^TMP($J,LIST,PSSIEN,6)=FSN(50,6)
^TMP($J,LIST,PSSIEN,8)=WARNING LABEL(50,8)
^TMP($J,LIST,PSSIEN,12)=ORDER UNIT(50,12)^ABBREVIATION
(51.5,.01)^EXPANSION(51.5,.02)
^TMP($J,LIST,PSSIEN,13)=PRICE PER ORDER UNIT(50,13)
^TMP($J,LIST,PSSIEN,14.5)=DISPENSE UNIT(50,14.5)
^TMP($J,LIST,PSSIEN,15)=DISPENSE UNITS PER ORDER UNIT(50,15)
^TMP($J,LIST,PSSIEN,16)=PRICE PER DISPENSE UNIT(50,16)
^TMP($J,LIST,PSSIEN,20)=NATIONAL DRUG FILE ENTRY (50,20)^NAME (50.6,.01)
^TMP($J,LIST,PSSIEN,21)=VA PRODUCT NAME(50,21)
^TMP($J,LIST,PSSIEN,22)=PSNDF VA PRODUCT NAME ENTRY(50,22)^ NAME(50.68,.01)
^TMP($J,LIST,PSSIEN,25)=NATIONAL DRUG CLASS(50,25)^CODE
(50.605,.01)^CLASSIFICATION(50.605,1)
^TMP($J,LIST,PSSIEN,31)=NDC(50,31)
^TMP($J,LIST,PSSIEN,40)=ACTION PROFILE MESSAGE(50,40)
^TMP($J,LIST,PSSIEN,51)=LOCAL NON-FORMULARY(50,51)^ External format for the
set of codes
^TMP($J,LIST,PSSIEN,52)=VISN NON-FORMULARY(50,52)^External format for the set
of codes
^TMP($J,LIST,PSSIEN,63)=APPLICATION PACKAGES' USE(50,63)
^TMP($J,LIST,PSSIEN,64)=PRIMARY DRUG(50,64)^NAME(50.3,.01)
^TMP($J,LIST,PSSIEN,100)=INACTIVE DATE (50,100)^External format (ex: SEP
12,1999)
^TMP($J,LIST,PSSIEN,101)=MESSAGE(50,101)
^TMP($J,LIST,PSSIEN,"102)=RESTRICTION(50,102)
^TMP($J,LIST,PSSIEN,301)=AR/WS AMIS CATEGORY(50,301)^External format for the
set of codes
^TMP($J,LIST,PSSIEN,302)=AR/WS AMIS CONVERSION NUMBER (50,302)
^TMP($J,LIST,PSSIEN,400)=SERVICE CODE(50,400)
^TMP($J,LIST,PSSIEN,"FRM",0)= Total entries returning for this sub-file or
-1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,"FRM",PSS(1),2 )=FORMULARY ALTERNATIVE (50.065,2)^GENERIC
NAME (50,.01)
^TMP($J,LIST,PSSIEN,"OLD",0)=Total entries returning for this sub-file or
-1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,"OLD",PSS(1),.01)=OLD NAME(50.01,.01)
^TMP($J,LIST,PSSIEN,"OLD",PSS(1),.02)=DATE CHANGED (50.01,.02) ^External
format (ex: SEP 12,1999)
^TMP($J,LIST,PSSIEN,"SYN",0)=Total entries returning for this sub-file or
-1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,"SYN",PSS(1),.01)=SYNONYM(50.1,.01)
^TMP($J,LIST,PSSIEN,"SYN",PSS(1),1)=INTENDED USE(50.1,1)^ External format for
the set of codes
^TMP($J,LIST,PSSIEN,"SYN",PSS(1),2)=NDC CODE(50.1,2)
^TMP($J,LIST,PSSIEN,"SYN",PSS(1),403)=DISPENSE UNITS PER ORDER UNIT(50.1,403)
^TMP($J,LIST, "B",GENERIC NAME,PSSIEN)= ""
Where:
PSS(1) is the IEN of the multiple it referenced
 
 | 
 
 | 
INV(PSSIEN,PSSFT,PSSFL,PSSPK,PSSRTOI,LIST) | 
Format:
INV^PSS50(PSSIEN,PSSFT,PSSFL,PSSPK,PSSRTOI,LIST)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSIEN | 
Input | 
PSSIEN = IEN from the DRUG file (#50) [optional]
 
 | 
PSSFT | 
Input | 
PSSFT = NAME field of the DRUG file (#50.01).  A value of  "??" may be used)
[optional]
 
 | 
PSSPK | 
Input | 
PSSPK = Returns the APPLICATION PACAKGES USE (ex: "IU" returns the
APPLICATION PACKAGES' USE for IV and Unit Dose [optional]
 
 | 
PSSFL | 
Input | 
PSSFL = Inactive date. A Null value will return all
entries.  Entry of a FileMan format date (ex: 3030917) will return active
entries after this date. [optional]
 
 | 
PSSRTOI | 
Input | 
PSSRTOI = If "1" returns only those entries matched to a Pharmacy Orderable
Item [optional]
 
 | 
LIST | 
Input | 
LIST = the array defined by the calling party [required]
 
 | 
~TMP | 
Output | 
^TMP($J,LIST,0)=Total entries returning or -1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,.01)=GENERIC NAME(50,.01)
^TMP($J,LIST,PSSIEN,11)=REORDER LEVEL(50,11)
^TMP($J,LIST,PSSIEN,12)=ORDER UNIT(50,12)^ABBREVIATION
(51.5,.01)^EXPANSION(51.5,.02)
^TMP($J,LIST,PSSIEN,13)=PRICE PER ORDER UNIT(50,13)
^TMP($J,LIST,PSSIEN,14)=NORMAL AMOUNT TO ORDER (50,14)
^TMP($J,LIST,PSSIEN,14.5)=DISPENSE UNIT(50,14.5)
^TMP($J,LIST,PSSIEN,15)=DISPENSE UNITS PER ORDER UNIT(50,15)
^TMP($J,LIST,PSSIEN,16)=PRICE PER DISPENSE UNIT(50,16)
^TMP($J,LIST,PSSIEN,17)=SOURCE OF SUPPLY(50,17)
^TMP($J,LIST,PSSIEN,17.1)=EXPIRATION DATE(50,17.1)
^TMP($J,LIST,PSSIEN,50)=CURRENT INVENTORY (50,50)
^TMP($J,LIST,PSSIEN,"IFC",0)= Total entries returning for this sub-file or
-1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,"IFC",PSS(1),.01)=ITEM NUMBER (50.0441,.01)
^TMP($J,LIST,PSSIEN,"SYN",0)=Total entries returning for this sub-file or
-1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,"SYN",PSS(1),.01)=SYNONYM(50.1,.01)
^TMP($J,LIST,PSSIEN,"SYN",PSS(1),1)=INTENDED USE(50.1,1)^ External format for
the set of codes
^TMP($J,LIST,PSSIEN,"SYN",PSS(1),2)= NDC CODE (50.1,2)
^TMP($J,LIST,PSSIEN,"SYN",PSS(1),400)=VSN(50.1,400)
^TMP($J,LIST,PSSIEN,"SYN",PSS(1),401)=ORDER UNIT (50.1,401)^
ABBREVIATION(51.5,.01)^EXPANSION(51.5,.02)
^TMP($J,LIST,PSSIEN,"SYN",PSS(1),402)=PRICE PER ORDER UNIT (50.1,402)
^TMP($J,LIST,PSSIEN,"SYN",PSS(1),403)=DISPENSE UNITS PER ORDER UNIT(50.1,403)
^TMP($J,LIST,PSSIEN,"SYN",PSS(1),404)=PRICE PER DISPENSE UNIT (50.1,404)
^TMP($J,LIST,PSSIEN,"SYN",PSS(1),405)=VENDOR(50.1,405)
^TMP($J,LIST, "B",GENERIC NAME,PSSIEN)= ""
Where:
PSS(1) is the IEN of the multiple it referenced
 
 | 
 
 | 
CMOP(PSSIEN,PSSFT,PSSFL,PSSPK,PSSRTOI,LIST) | 
Format:
CMOP^PSS50(PSSIEN,PSSFT,PSSFL,PSSPK,PSSRTOI,LIST)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSIEN | 
Input | 
PSSIEN = IEN from the DRUG file (#50) [optional]
 
 | 
PSSFT | 
Input | 
PSSFT = GENERIC NAME field of the DRUG file (#50.01).  A value of  "??" may
be used) [optional]
 
 | 
PSSFL | 
Input | 
PSSFL = Inactive date. A Null value will return all
entries.  Entry of a FileMan format date (ex: 3030917) will return active
entries after this date. [optional]
 
 | 
PSSPK | 
Input | 
PSSPK = Returns the APPLICATION PACAKGES USE (ex: "IU" returns the
APPLICATION PACKAGES' USE for IV and Unit Dose [optional]
 
 | 
PSSRTOI | 
Input | 
PSSRTOI = If "1" returns only those entries matched to a Pharmacy Orderable
Item [optional]
 
 | 
LIST | 
Input | 
LIST = the array defined by the calling party [required]
 
 | 
~TMP | 
Output | 
^TMP($J,LIST,0)=Total entries returning or -1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,.01)=GENERIC NAME(50,.01)
^TMP($J,LIST,PSSIEN,28)=OP EXTERNAL DISPENSE(50,28)^ External format for the
set of codes
^TMP($J,LIST,PSSIEN,213)=CMOP DISPENSE(50,213)^External format for the set of
codes
^TMP($J,LIST,PSSIEN,215)=QUANTITY DISPENSE MESSAGE (50,215)
^TMP($J,LIST,PSSIEN,"AL",0)= Total entries returning for this sub-file or
-1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,"AL",PSS(1),.01)=ACTIVITY LOG(50.0214,.01)^External
format (ex: SEP 12,1999)
^TMP($J,LIST,PSSIEN,"AL",PSS(1),1)=REASON(50.0214,1)^External format for the
set of codes
^TMP($J,LIST,PSSIEN ,"AL",PSS(1),2)=INITIATOR OF ACTIVITY (50.0214,2) ^
NAME(200,.01)
^TMP($J,LIST,PSSIEN, "AL",PSS(1),3)=FIELD EDITED(50.0214,3)
^TMP($J,LIST,PSSIEN ,"AL",PSS(1),4)=NEW VALUE(50.0214,4)
^TMP($J,LIST,PSSIEN, "AL",PSS(1),5)=NDF UPDATE(50.0214,5)
^TMP($J,LIST, "B",GENERIC NAME,PSSIEN)= ""
Where:
PSS(1) is the IEN of entry in the ACTIVITY LOG multiple
 
 | 
 
 | 
DRG(PSSIEN,PSSFT,PSSFL,PSSPK,PSSRTOI,LIST) | 
Format:
DRG^PSS50(PSSIEN,PSSFT,PSSFL,PSSPK,PSSRTOI,LIST)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSIEN | 
Input | 
PSSIEN = IEN from the DRUG file (#50) [optional]
 
 | 
PSSFT | 
Input | 
PSSFT = GENERIC NAME field of the DRUG file (#50.01).  A value of  "??" may
be used) [optional]
 
 | 
PSSFL | 
Input | 
PSSFL = Inactive date. A Null value will return all
entries.  Entry of a FileMan format date (ex: 3030917) will return active
entries after this date. [optional]
 
 | 
PSSPK | 
Input | 
PSSPK = Returns the APPLICATION PACAKGES USE (ex: "IU" returns the
APPLICATION PACKAGES' USE for IV and Unit Dose [optional]
 
 | 
PSSRTOI | 
Input | 
PSSRTOI - If "1" returns only those entries matched to a Pharmacy Orderable
Item [optional]
 
 | 
LIST | 
Input | 
LIST = the array defined by the calling party [required]
 
 | 
~TMP | 
Output | 
^TMP($J,LIST,0)=Total entries returning or -1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,.01)=GENERIC NAME(50,.01)
^TMP($J,LIST,PSSIEN,62.01)=DAY (nD) or DOSE (nL) LIMIT(50,62.01)
^TMP($J,LIST,PSSIEN,62.02)=UNIT DOSE MED ROUTE (50,62.02)^NAME(51.2,.01)
^TMP($J,LIST,PSSIEN,62.03)=UNIT DOSE SCHEDULE TYPE(50,62.03)^External format
for the set of codes
^TMP($J,LIST,PSSIEN,62.04)=UNIT DOSE SCHEDULE(50,62.04)
^TMP($J,LIST,PSSIEN,62.05)=CORRESPONDING OUTPATIENT DRUG (50,62.05)^GENERIC
NAME(50,.01)
^TMP($J,LIST,PSSIEN,905)=CORRESPONDING INPATIENT DRUG (50,905) ^GENERIC
NAME(50,.01)
^TMP($J,LIST, "B",GENERIC NAME,PSSIEN)= ""
 
 | 
 
 | 
ATC(PSSIEN,PSSFT,PSSFL,PSSPK,LIST) | 
Format:
ATC^PSS50(PSSIEN,PSSFT,PSSFL,PSSPK,LIST)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSIEN | 
Input | 
PSSIEN = IEN from the DRUG file (#50) [optional]
 
 | 
PSSFT | 
Input | 
PSSFT = NAME field of the DRUG file (#50.01).  A value of  "??" may be used)
[optional]
 
 | 
PSSFL | 
Input | 
PSSFL = Inactive date. A Null value will return all
entries.  Entry of a FileMan format date (ex: 3030917) will return active
entries after this date. [optional]
 
 | 
PSSPK | 
Input | 
PSSPK = Returns the APPLICATION PACAKGES USE (ex: "IU" returns the
APPLICATION PACKAGES' USE for IV and Unit Dose [optional]
 
 | 
LIST | 
Input | 
LIST = the array defined by the calling party [required]
 
 | 
~TMP | 
Output | 
^TMP($J,LIST,0)=Total entries returning or -1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,.01)=GENERIC NAME(50,.01)
^TMP($J,LIST,PSSIEN,212.2)=ATC MNEMONIC(50,212.2)
^TMP($J,LIST,PSSIEN,"ATC",0)=Total entries returning for this sub-file or
-1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,"ATC",PSS(1),.01)=WARD GROUP FOR ATC CANISTER
(50.0212,.01)^ NAME(57.5,.01)
^TMP($J,LIST,PSSIEN,"ATC",PSS(1),1)=ATC CANISTER (50.0212,1)
^TMP($J,LIST,"C",GENERIC NAME,PSSIEN)=""
Where:
PSS(1) is the IEN of entry in the ATC CANISTER multiple
 
 | 
 
 | 
LAB(PSSIEN,PSSFT,PSSFL,PSSPK,PSSRTOI,LIST) | 
Format:
LAB^PSS50(PSSIEN,PSSFT,PSSFL,PSSPK,PSSRTOI,LIST)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSIEN | 
Input | 
PSSIEN = IEN from the DRUG file (#50) [optional]
 
 | 
PSSFT | 
Input | 
PSSFT = GENERIC NAME field of the DRUG file (#50.01).  A value of  "??" may
be used) [optional]
 
 | 
PSSFL | 
Input | 
PSSFL = Inactive date. A Null value will return all
entries.  Entry of a FileMan format date (ex: 3030917) will return active
entries after this date. [optional]
 
 | 
PSSRTOI | 
Input | 
PSSRTOI - If "1" returns only those entries matched to a Pharmacy Orderable
Item [optional]
 
 | 
PSSPK | 
Input | 
PSSPK = Returns the APPLICATION PACAKGES USE (ex: "IU" returns the
APPLICATION PACKAGES' USE for IV and Unit Dose [optional]
 
 | 
LIST | 
Input | 
LIST = the array defined by the calling party [required]
 
 | 
~TMP | 
Output | 
^TMP($J,LIST,0)=Total entries returning or -1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,.01)=GENERIC NAME(50,.01)
^TMP($J,LIST,PSSIEN,17.2 )=LAB TEST MONITOR(50,17.2) ^NAME(60,.01)
^TMP($J,LIST,PSSIEN,17.3)=MONITOR MAX DAYS(50,17.3)
^TMP($J,LIST,PSSIEN,17.4)=SPECIMEN TYPE(50,17.4) ^NAME(61,.01)
^TMP($J,LIST,PSSIEN,17.5)=MONITOR ROUTINE(50,17.5)
^TMP($J,LIST,PSSIEN,17.6)=LAB MONITOR MARK(50,17.6)^External format for the
set of codes
^TMP($J,LIST, "B",GENERIC NAME,PSSIEN)= ""
 
 | 
 
 | 
CLOZ(PSSIEN,PSSFT,PSSFL,PSSPK,PSSRTOI,LIST) | 
Format:
CLOZ^PSS50(PSSIEN,PSSFT,PSSFL,PSSPK,PSSRTOI,LIST)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSIEN | 
Input | 
PSSIEN = IEN from the DRUG file (#50) [optional]
 
 | 
PSSFT | 
Input | 
PSSFT = GENERIC NAME field of the DRUG file (#50.01).  A value of  "??" may
be used) [optional]
 
 | 
PSSFL | 
Input | 
PSSFL = Inactive date. A Null value will return all
entries.  Entry of a FileMan format date (ex: 3030917) will return active
entries after this date. [optional]
 
 | 
PSSPK | 
Input | 
PSSPK = Returns the APPLICATION PACAKGES USE (ex: "IU" returns the
APPLICATION PACKAGES' USE for IV and Unit Dose [optional]
 
 | 
PSSRTOI | 
Input | 
PSSRTOI - If "1" returns only those entries matched to a Pharmacy Orderable
Item [optional]
 
 | 
LIST | 
Input | 
LIST = the array defined by the calling party [required]
 
 | 
~TMP | 
Output | 
^TMP($J,LIST,0)=Total entries returning or -1^DATA NOT FOUND
^TMP($J,LIST,PSSIEN,.01)=GENERIC NAME(50,.01)
^TMP($J,LIST,PSSIEN,"CLOZ",0)=Total entries returning for this sub-file or
-1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,"CLOZ",PSS(1),.01)=LAB TEST MONITOR
(50.02,.01)^NAME(60,.01)
^TMP($J,LIST,PSSIEN, "CLOZ",PSS(1),1)=MONITOR MAX DAYS (50.02,1)
^TMP($J,LIST,PSSIEN, "CLOZ",PSS(1),2)=SPECIMEN TYPE(50.02,2) ^NAME(61,.01)
^TMP($J,LIST,PSSIEN, "CLOZ",PSS(1),3)=TYPE OF TEST(50.02,3) ^External format
for the set of codes
^TMP($J,LIST, "B",GENERIC NAME,PSSIEN)= ""
Where:
PSS(1) is the IEN of entry in the CLOZAPINE LAB TEST multiple
 
 | 
 
 | 
DOSE(PSSIEN,PSSFT,PSSFL,PSSPK,PSSRTOI,LIST) | 
Format:
DOSE^PSS50(PSSIEN,PSSFT,PSSFL,PSSPK,PSSRTOI,LIST)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSIEN | 
Input | 
PSSIEN = IEN from the DRUG file (#50) [optional]
 
 | 
PSSFT | 
Input | 
PSSFT = NAME field of the DRUG file (#50.01).  A value of  "??" may be used)
[optional]
 
 | 
PSSFL | 
Input | 
PSSFL = Inactive date. A Null value will return all
entries.  Entry of a FileMan format date (ex: 3030917) will return active
entries after this date. [optional]
 
 | 
PSSPK | 
Input | 
PSSPK = Returns the APPLICATION PACAKGES USE (ex: "IU" returns the
APPLICATION PACKAGES' USE for IV and Unit Dose [optional]
 
 | 
PSSRTOI | 
Input | 
PSSRTOI - If "1" returns only those entries matched to a Pharmacy Orderable
Item [optional]
 
 | 
LIST | 
Input | 
LIST = the array defined by the calling party [required]
 
 | 
~TMP | 
Output | 
^TMP($J,LIST,0)=Total entries returning or -1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,.01)=GENERIC NAME(50,.01)
^TMP($J,LIST,PSSIEN,901)=STRENGTH (50,901)
^TMP($J,LIST,PSSIEN,902)=UNIT(50,902)^NAME(50.607,.01)
^TMP($J,LIST,PSSIEN,"LOC",0)=Total entries returning for this sub-file or
-1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,"LOC",PSS(1),.01)=LOCAL POSSIBLE DOSAGE (50.0904,.01)
^TMP($J,LIST,PSSIEN,"LOC",PSS(1),1)=PACKAGE(50.0904,1)^External format for
the set of codes
^TMP($J,LIST,PSSIEN,"LOC",PSS(1),2)=BCMA UNITS PER DOSE (50.0904,2)
^TMP($J,LIST,PSSIEN,"LOC",PSS(1),3)=OTHER LANGUAGE DOSAGE NAME(50.0904,3)
^TMP($J,LIST,PSSIEN,"POS",0)=Total entries returning for this sub-file or
-1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,"POS",PSS(1),.01)=DISPENSE UNITS PER DOSE(50.0903,.01)
^TMP($J,LIST,PSSIEN,"POS",PSS(1),1)=DOSE(50.0903,1)
^TMP($J,LIST,PSSIEN,"POS",PSS(1),2)=PACKAGE(50.0903,2)^External format
^TMP($J,LIST,PSSIEN,"POS",PSS(1),3)=BCMA UNITS PER DOSE(50.0903,3)
^TMP($J,LIST, "B",GENERIC NAME,PSSIEN)=""
Where:
PSS(1) is the IEN of the multiple it referenced
 
 | 
 
 | 
NDF(PSSIEN,PSSFT,PSSFL,PSSPK,PSSRTOI,LIST) | 
Format:
NDF^PSS50(PSSIEN,PSSFT,PSSFL,PSSPK,PSSRTOI,LIST)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSIEN | 
Input | 
PSSIEN = IEN from the DRUG file (#50) [optional]
 
 | 
PSSFT | 
Input | 
PSSFT = NAME field of the DRUG file (#50.01).  A value of  "??" may be used)
[optional]
 
 | 
PSSFL | 
Input | 
PSSFL = Inactive date. A Null value will return all
entries.  Entry of a FileMan format date (ex: 3030917) will return active
entries after this date. [optional]
 
 | 
PSSPK | 
Input | 
PSSPK = Returns the APPLICATION PACAKGES USE (ex: "IU" returns the
APPLICATION PACKAGES' USE for IV and Unit Dose [optional]
 
 | 
PSSRTOI | 
Input | 
PSSRTOI - If "1" returns only those entries matched to a Pharmacy Orderable
Item [optional]
 
 | 
LIST | 
Input | 
LIST = the array defined by the calling party [required]
 
 | 
~TMP | 
Output | 
^TMP($J,LIST,0)=Total entries returning or -1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,.01)=GENERIC NAME(50,.01)
^TMP($J,LIST,PSSIEN,20)=NATIONAL DRUG FILE ENTRY (50,20)^NAME (50.6,.01)
^TMP($J,LIST,PSSIEN,21)=VA PRODUCT NAME(50,21)
^TMP($J,LIST,PSSIEN,22)=PSNDF VA PRODUCT NAME ENTRY(50,22) ^NAME(50.68,.01)
^TMP($J,LIST,PSSIEN,23)=PACKAGE SIZE(50,23)^NAME(50.609,.01)
^TMP($J,LIST,PSSIEN,24)=PACKAGE TYPE(50,24)^NAME(50.608,.01)
^TMP($J,LIST,PSSIEN,25)=NATIONAL DRUG CLASS(50,25)^CODE
(50.605,.01)^CLASSIFICATION(50.605,1)
^TMP($J,LIST,PSSIEN,27)=CMOP ID(50,27)
^TMP($J,LIST,PSSIEN,29)=NATIONAL FORMULARY INDICATOR (50,29)^External format
for the set of codes
^TMP($J,LIST,"B",GENERIC NAME,PSSIEN)=""
 
 | 
 
 | 
WS(PSSIEN,PSSFT,PSSFL,PSSPK, PSSRTOI,LIST) | 
Format:
WS^PSS50(PSSIEN,PSSFT,PSSFL,PSSPK,PSSRTOI,LIST)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSIEN | 
Input | 
PSSIEN = IEN from the DRUG file (#50) [optional]
 
 | 
PSSFT | 
Input | 
PSSFT = NAME field of the DRUG file (#50.01).  A value of  "??" may be used)
[optional]
 
 | 
PSSFL | 
Input | 
PSSFL = Inactive date. A Null value will return all
entries.  Entry of a FileMan format date (ex: 3030917) will return active
entries after this date. [optional]
 
 | 
PSSPK | 
Input | 
PSSPK = Returns the APPLICATION PACAKGES USE (ex: "IU" returns the
APPLICATION PACKAGES' USE for IV and Unit Dose [optional]
 
 | 
PSSRTOI | 
Input | 
PSSRTOI = If passed in a 1, returns only those entries matched to a Pharmacy
Orderable Item [optional]
 
 | 
LIST | 
Input | 
LIST = the array defined by the calling party [required]
 
 | 
~TMP | 
Output | 
^TMP($J,LIST,0)=Total entries returning or -1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,.01)=GENERIC NAME(50,.01)
^TMP($J,LIST,PSSIEN,300)=INPATIENT PHARMACY LOCATION (50,300)
^TMP($J,LIST,PSSIEN,301)=AR/WS AMIS CATEGORY(50,301)^External format for the
set of codes
^TMP($J,LIST,PSSIEN,302)=AR/WS AMIS CONVERSION NUMBER (50,302)
^TMP($J,LIST,"B",GENERIC NAME,PSSIEN)=""
 
 | 
 
 | 
ARWS(PSSIEN,PSSFT,LIST) | 
Format:
ARWS^PSS50(PSSIEN,PSSFT,LIST)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSIEN | 
Input | 
PSSIEN = IEN of entry in DRUG file (#50) [optional]
 
 | 
PSSFT | 
Input | 
PSSFT = NAME field (#.01) of the DRUG file (#50) (a value of  "??" may be
used) [optional]
 
 | 
LIST | 
Input | 
LIST = array defined by the calling application [required]
 
 | 
~TMP | 
Output | 
^TMP($J,LIST,0)=Total entries returning or -1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,.01)=GENERIC NAME(50,.01)
^TMP($J,LIST,PSSIEN,2)=VA CLASSIFICATION(50,2)
^TMP($J,LIST,PSSIEN,3)=DEA SPECIAL HDLG(50,3)
^TMP($J,LIST,PSSIEN,12)=ORDER UNIT(50,12)^ABBREVIATION
(51.5,.01)^EXPANSION(51.5,.02)
^TMP($J,LIST,PSSIEN,13)=PRICE PER ORDER UNIT(50,13)
^TMP($J,LIST,PSSIEN,14.5)=DISPENSE UNIT(50,14.5)
^TMP($J,LIST,PSSIEN,15)=DISPENSE UNITS PER ORDER UNIT(50,15)
^TMP($J,LIST,PSSIEN,16)=PRICE PER DISPENSE UNIT(50,16)
^TMP($J,LIST,PSSIEN,20)=NATIONAL DRUG FILE ENTRY (50,20)^NAME (50.6,.01)
^TMP($J,LIST,PSSIEN,21)=VA PRODUCT NAME(50,21)
^TMP($J,LIST,PSSIEN,22)=PSNDF VA PRODUCT NAME ENTRY(50,22)^ NAME(50.68,.01)
^TMP($J,LIST,PSSIEN,23)= PACKAGE SIZE (50,23)^NAME (50.609,.01)
^TMP($J,LIST,PSSIEN,25)=NATIONAL DRUG CLASS(50,25)^CODE
(50.605,.01)^CLASSIFICATION(50.605,1)
^TMP($J,LIST,PSSIEN,31)=NDC(50,31)
^TMP($J,LIST,PSSIEN,51)=LOCAL NON-FORMULARY(50,51)^ External format for the
set of codes
^TMP($J,LIST,PSSIEN,52)=VISN NON-FORMULARY(50,52)^External format for the set
of codes
^TMP($J,LIST,PSSIEN,301)=AR/WS AMIS CATEGORY(50,301)^External format for the
set of codes
^TMP($J,LIST,PSSIEN,302)=AR/WS AMIS CONVERSION NUMBER (50,302)
^TMP($J,LIST,"B",GENERIC NAME,PSSIEN)=""
 
 | 
 
 | 
CSYN(PSSIEN,PSSVAL,LIST) | 
Format:
CSYN^PSS50(PSSIEN,PSSVAL,LIST)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSIEN | 
Input | 
PSSIEN = IEN of entry in DRUG file (#50) [required]
 
 | 
PSSVAL | 
Input | 
PSSVAL = SYNONYM subfield (#.01) of the SYNONYM multiple of the DRUG file
(#50) [required]
 
 | 
LIST | 
Input | 
LIST = array defined by the calling application [required]
 
 | 
~TMP | 
Output | 
^TMP($J,LIST,0)=Total entries returning or -1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,.01)=GENERIC NAME(50,.01)
^TMP($J,LIST,PSSIEN,"SYN",0)= Total entries returning for this sub-file or
-1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,"SYN",PSS(1),.01)=SYNONYM(50.1,.01)
^TMP($J,LIST,PSSIEN,"SYN",PSS(1),403)=DISPENSE UNITS PER ORDER UNIT(50.1,403)
^TMP($J,LIST,"C",SYNONYM,PSSIEN)=""
Definition:
PSS(1) is the IEN of the SYNONYM multiple
 
 | 
 
 | 
MRTN(PSSIEN,PSSFT,PSSFL,PSSPK,PSSRTOI,LIST) | 
Format:
MRTN^PSS50(PSSIEN,PSSFT,PSSFL,PSSPK,PSSRTOI,LIST)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSIEN | 
Input | 
PSSIEN = IEN from the DRUG file (#50) [optional]
 
 | 
PSSFT | 
Input | 
PSSFT = NAME field of the DRUG file (#50.01).  A value of  "??" may be used)
[optional]
 
 | 
PSSFL | 
Input | 
PSSFL = Inactive date. A Null value will return all
entries.  Entry of a FileMan format date (ex: 3030917) will return active
entries after this date. [optional]
 
 | 
PSSPK | 
Input | 
PSSPK = Returns the APPLICATION PACAKGES USE (ex: "IU" returns the
APPLICATION PACKAGES' USE for IV and Unit Dose [optional]
 
 | 
PSSRTOI | 
Input | 
PSSRTOI = If passed in a 1, returns only those entries matched to a Pharmacy
Orderable Item [optional]
 
 | 
LIST | 
Input | 
LIST = the array defined by the calling party [required]
 
 | 
~TMP | 
Output | 
^TMP($J,LIST,0)=Total entries returning or -1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,.01)=GENERIC NAME(50,.01)
^TMP($J,LIST,PSSIEN,17.2)=LAB TEST MONITOR(50,17.2)^NAME (60,.01)
^TMP($J,LIST,PSSIEN,17.5)=MONITOR ROUTINE(50,17.5)
^TMP($J,LIST,PSSIEN,31)=NDC(50,31)
^TMP($J,LIST,"B",GENERIC NAME,PSSIEN)=""
 
 | 
 
 | 
DSPUNT(PSSIEN,PSSIEN2,LIST) | 
Format:
DSPUNT^PSS50(PSSIEN,PSSIEN2,LIST)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSIEN | 
Input | 
PSSIEN = IEN of entry in DRUG file (#50) [required]
 
 | 
PSSIEN2 | 
Input | 
PSSIEN2 = IEN of entry in SYNONYM multiple of the DRUG file (#50) [required]
 
 | 
LIST | 
Input | 
LIST = the array defined by the calling party [required]
 
 | 
~TMP | 
Output | 
^TMP($J,LIST,0)=Total entries returning or -1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,.01)=GENERIC NAME(50,.01)
^TMP($J,LIST,PSSIEN,"SYN",0)= Total entries returning for this sub-file or
-1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,PSS(1),.01)=SYNONYM(50.1,.01)
^TMP($J,LIST,PSSIEN,"SYN",PSS(1),403)=DISPENSE UNITS PER ORDER UNIT(50.1,403)
^TMP($J,LIST",C",SYNONYM,PSSIEN)=""
Definition:
PSS(1) is the IEN of the SYNONYM multiple
 
 | 
 
 | 
ZERO(PSSIEN,PSSFT,PSSFL,PSSPK,PSSRTOI,LIST) | 
Format:
ZERO^PSS50(PSSIEN,PSSFT,PSSFL,PSSPK,PSSRTOI,LIST)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSIEN | 
Input | 
PSSIEN = IEN from the DRUG file (#50) [optional]
 
 | 
PSSFT | 
Input | 
PSSFT = NAME field of the DRUG file (#50.01).  A value of  "??" may be used)
[optional]
 
 | 
PSSFL | 
Input | 
PSSFL = Inactive date. A Null value will return all
entries.  Entry of a FileMan format date (ex: 3030917) will return active
entries after this date. [optional]
 
 | 
PSSPK | 
Input | 
PSSPK = Returns the APPLICATION PACAKGES USE (ex: "IU" returns the
APPLICATION PACKAGES' USE for IV and Unit Dose [optional]
 
 | 
PSSRTOI | 
Input | 
PSSRTOI = If passed in a 1, return only those entries matched to a Pharmacy
Orderable Item [optional]
 
 | 
LIST | 
Input | 
LIST = array defined by the calling application [required]
 
 | 
~TMP | 
Output | 
^TMP($J,LIST,0)=Total entries returning or -1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,.01)=GENERIC NAME(50,.01)
^TMP($J,LIST,PSSIEN,2)=VA CLASSIFICATION(50,2)
^TMP($J,LIST,PSSIEN,3)=DEA SPECIAL HDLG(50,3)
^TMP($J,LIST,PSSIEN,4)=MAXIMUM DOSE PER DAY(50,4)
^TMP($J,LIST,PSSIEN,5)=STANDARD SIG(50,5)
^TMP($J,LIST,PSSIEN,6)=FSN(50,6)
^TMP($J,LIST,PSSIEN,8)=WARNING LABEL(50,8)
^TMP($J,LIST,PSSIEN,51)=LOCAL NON-FORMULARY(50,51)^ External format for the
set of codes
^TMP($J,LIST,PSSIEN,52)=VISN NON-FORMULARY(50,52)^External format for the set
of codes
^TMP($J,LIST,PSSIEN,101)=MESSAGE(50,101)
^TMP($J,LIST, "B",GENERIC NAME,PSSIEN)= ""
 
 | 
 
 | 
$$NOCMOP(PSSIEN,PSSFL) | 
Format:
S X=$$NOCMOP^PSS50(PSSIEN,PSSFL)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSIEN | 
Input | 
PSSIEN = IEN from the DRUG file (#50) [optional]
 
 | 
PSSFL | 
Input | 
PSSFL = verifies if ^PSDRUG(D0,3) node existed and the CMOP DISPENSE field
(#213) = 0 if PSSFL = 1
PSSFL=0 or null will check if ^PSDRUG(D0,3) node is not existed
 
 | 
$$NOCMOP | 
Output | 
X
Where X is:
0 (zero) conditions are not met
1 (one) condition is met
 
 | 
 
 | 
MSG(LIST) | 
Format:
MSG^PSS50(LIST)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
LIST | 
Input | 
LIST = array defined by the calling application
 
 | 
~TMP | 
Output | 
^TMP($J,LIST,0)=Total entries returning or -1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,.01)=GENERIC NAME(50,.01)
^TMP($J,LIST,PSSIEN,100)=INACTIVE DATE(50,100)^External format (ex: SEP
12,1999)
^TMP($J,LIST,"B",GENERIC NAME,PSSIEN)=""
 
 | 
 
 | 
IEN(LIST) | 
Format:
IEN^PSS50(LIST)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
LIST | 
Input | 
LIST = array defined by the calling application
 
 | 
~TMP | 
Output | 
^TMP($J,LIST,0)=Total entries returning or -1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,.01)=GENERIC NAME(50,.01)
^TMP($J,LIST,"AIU",GENERIC NAME,PSSIEN)=""
^TMP($J,LIST,"IU",GENERIC NAME,PSSIEN)=""
 
 | 
 
 | 
B(PSSFT,PSSFL,PSSPK,PSSRTOI,LIST) | 
Format:
B^PSS50(PSSFT,PSSFL,PSSPK,PSSRTOI,LIST)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSFT | 
Input | 
PSSFT = NAME field of the DRUG file (#50.01) A value of  "??" may be used)
[optional]
 
 | 
PSSFL | 
Input | 
PSSFL = Inactive date. A Null value will return all
entries.  Entry of a FileMan format date (ex: 3030917) will return active
entries after this date. [optional]
 
 | 
PSSPK | 
Input | 
PSSPK = Returns the APPLICATION PACAKGES USE (ex: "IU" returns the
APPLICATION PACKAGES' USE for IV and Unit Dose [optional]
 
 | 
PSSRTOI | 
Input | 
PSSRTOI = If passed in a 1, return only those entries matched to a Pharmacy
Orderable Item [optional]
 
 | 
LIST | 
Input | 
LIST = array defined by the calling application [required]
 
 | 
~TMP | 
Output | 
^TMP($J,LIST,0)=Total entries returning or -1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,.01)=GENERIC NAME(50,.01)
^TMP($J,LIST, "B",GENERIC NAME,PSSIEN)= ""
Where:
PSSIEN is IEN of entry in the DRUG file (#50)
 
 | 
 
 | 
$$SKB(PSSIEN,PSSFL) | 
Format:
S X=$$SKB^PSS50(PSSIEN,PSSFL)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSIEN | 
Input | 
PSSIEN = IEN of entry in DRUG file (#50) [required]
 
 | 
PSSFL | 
Input | 
PSSFL = Either "S" (set) or "K"  (kill) action [required]
 
 | 
$$SKB | 
Output | 
X
Where X is:
0 (zero) action unsuccessful
1 (one) action is accomplished
 
 | 
 
 | 
VAC(PSSVAL,PSSFL,PSSPK,LIST) | 
Format:
VAC^PSS50(PSSVAL,PSSFL,PSSPK,LIST)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSVAL | 
Input | 
PSSVAL = the NATIONAL DRUG CLASS field (#25) of the DRUG file (#50)
[required]
 
 | 
PSSFL | 
Input | 
PSSFL = Inactive date. A Null value will return all
entries.  Entry of a FileMan format date (ex: 3030917) will return active
entries after this date. [optional]
 
 | 
PSSPK | 
Input | 
PSSPK = Returns the APPLICATION PACAKGES USE (ex: "IU" returns the
APPLICATION PACKAGES' USE for IV and Unit Dose [optional]
 
 | 
LIST | 
Input | 
LIST - the array defined by the calling application [required]
 
 | 
~TMP | 
Output | 
^TMP($J,LIST,0)=Total entries returning or -1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,.01)=GENERIC NAME(50,.01)
^TMP($J,LIST, "VAC",GENERIC NAME,PSSIEN)= ""
Where:
PSSIEN is IEN of entry in the DRUG file (#50)
 
 | 
 
 | 
NDC(PSSVAL,PSSFL,PSSPK,LIST) | 
Format:
NDC^PSS50(PSSVAL,PSSFL,PSSPK,LIST)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSVAL | 
Input | 
PSSVAL = NDC field (#31) of the DRUG file (#50) [required]
 
 | 
PSSFL | 
Input | 
PSSFL = Inactive date. A Null value will return all
entries.  Entry of a FileMan format date (ex: 3030917) will return active
entries after this date. [optional]
 
 | 
PSSPK | 
Input | 
PSSPK = Returns the APPLICATION PACAKGES USE (ex: "IU" returns the
APPLICATION PACKAGES' USE for IV and Unit Dose [optional]
 
 | 
LIST | 
Input | 
LIST= array defined by the calling application [required]
 
 | 
~TMP | 
Output | 
^TMP($J,LIST,0)=Total entries returning or -1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,.01)=GENERIC NAME(50,.01)
^TMP($J,LIST, "NDC",GENERIC NAME,PSSIEN)= ""
Where:
PSSIEN is IEN of entry in the DRUG file (#50)
 
 | 
 
 | 
ASP(PSSVAL,PSSFL,PSSPK,LIST) | 
Format:
ASP^PSS50(PSSVAL,PSSFL,PSSPK,LIST)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSVAL | 
Input | 
PSSVAL = PHARMACY ORDERABLE ITEM field (#2.1) of the DRUG file (#50)
[required]
 
 | 
PSSFL | 
Input | 
PSSFL = Inactive date. A Null value will return all
entries.  Entry of a FileMan format date (ex: 3030917) will return active
entries after this date. [optional]
 
 | 
PSSPK | 
Input | 
PSSPK = Returns the APPLICATION PACAKGES USE (ex: "IU" returns the
APPLICATION PACKAGES' USE for IV and Unit Dose [optional]
 
 | 
LIST | 
Input | 
LIST= array defined by the calling application [required]
 
 | 
~TMP | 
Output | 
^TMP($J,LIST,0)=Total entries returning or -1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,.01)=GENERIC NAME(50,.01)
^TMP($J,LIST,"ASP",GENERIC NAME,PSSIEN)=""
Where:
PSSIEN is IEN of entry in the DRUG file (#50)
 
 | 
 
 | 
AND(PSSVAL,PSSFL,PSSPK,LIST) | 
Format:
AND^PSS50(PSSVAL,PSSFL,PSSPK,LIST)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSVAL | 
Input | 
PSSVAL = NATIONAL DRUG FILE ENTRY field (#20) of the DRUG file (#50)
[required]
 
 | 
PSSFL | 
Input | 
PSSFL = Inactive date. A Null value will return all
entries.  Entry of a FileMan format date (ex: 3030917) will return active
entries after this date. [optional]
 
 | 
PSSPK | 
Input | 
PSSPK = Returns the APPLICATION PACAKGES USE (ex: "IU" returns the
APPLICATION PACKAGES' USE for IV and Unit Dose [optional]
 
 | 
LIST | 
Input | 
LIST= array defined by the calling application [required]
 
 | 
~TMP | 
Output | 
^TMP($J,LIST,0)=Total entries returning or -1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,.01)=GENERIC NAME(50,.01)
^TMP($J,LIST,"AND",GENERIC NAME,PSSIEN)=""
Where:
PSSIEN is IEN of entry in the DRUG file (#50)
 
 | 
 
 | 
AB(PSSVAL,PSSFL,PSSPK,LIST) | 
Format:
AB^PSS50(PSSVAL,PSSFL,PSSPK,LIST)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSVAL | 
Input | 
PSSVAL = ITEM NUMBER sub-field (#.01) of the IFCAP ITEM NUMBER multiple in
the DRUG file (#50) [required]
 
 | 
PSSFL | 
Input | 
PSSFL = Inactive date. A Null value will return all
entries.  Entry of a FileMan format date (ex: 3030917) will return active
entries after this date. [optional]
 
 | 
PSSPK | 
Input | 
PSSPK = Returns the APPLICATION PACAKGES USE (ex: "IU" returns the
APPLICATION PACKAGES' USE for IV and Unit Dose [optional]
 
 | 
LIST | 
Input | 
LIST= array defined by the calling application [required]
 
 | 
~TMP | 
Output | 
^TMP($J,LIST,0)=Total entries returning or -1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,.01)= GENERIC NAME(50,.01)
^TMP($J,LIST,PSSIEN,"IFC",0)=Total entries returning for this sub-file or
-1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,"IFC",PSS(1),.01)=ITEM NUMBER(50.0441,.01)
^TMP($J,LIST,"AB",GENERIC NAME,PSSIEN)=""
Where:
PSSIEN is IEN of entry in the DRUG file (#50)
PSS(1) is the IEN of entry in the IFCAP ITEM NUMBER multiple
 
 | 
 
 | 
AP(PSSVAL,PSSFL,PSSPK,LIST) | 
Format:
AP^PSS50(PSSVAL,PSSFL,PSSPK,LIST)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSVAL | 
Input | 
PSSVAL = PRIMARY DRUG field (#64) of the DRUG file (#50) [required]
 
 | 
PSSFL | 
Input | 
PSSFL = Inactive date. A Null value will return all
entries.  Entry of a FileMan format date (ex: 3030917) will return active
entries after this date. [optional]
 
 | 
PSSPK | 
Input | 
PSSPK = Returns the APPLICATION PACAKGES USE (ex: "IU" returns the
APPLICATION PACKAGES' USE for IV and Unit Dose [optional]
 
 | 
LIST | 
Input | 
LIST = array defined by the calling application [required]
 
 | 
~TMP | 
Output | 
^TMP($J,LIST,0)=Total entries returning or -1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,.01)=GENERIC NAME(50,.01)
^TMP($J,LIST,"AP",GENERIC NAME,PSSIEN)=""
Where:
PSSIEN is IEN of entry in the DRUG file (#50)
 
 | 
 
 | 
AOC(PSSVAL,PSSFL,PSSPK,LIST) | 
Format:
AOC^PSS50(PSSVAL,PSSFL,PSSPK,LIST)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSVAL | 
Input | 
PSSVAL = VA CLASSIFICATION field (#2) of the DRUG file (#50) [required]
 
 | 
PSSFL | 
Input | 
PSSFL = Inactive date. A Null value will return all
entries.  Entry of a FileMan format date (ex: 3030917) will return active
entries after this date. [optional]
 
 | 
PSSPK | 
Input | 
PSSPK = Returns the APPLICATION PACAKGES USE (ex: "IU" returns the
APPLICATION PACKAGES' USE for IV and Unit Dose [optional]
 
 | 
LIST | 
Input | 
LIST= array defined by the calling application [required]
 
 | 
~TMP | 
Output | 
^TMP($J,LIST,0)=Total entries returning or -1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,.01)=GENERIC NAME(50,.01)
^TMP($J,LIST,"AOC",GENERIC NAME,PSSIEN)=""
Where:
PSSIEN is IEN of entry in the DRUG file (#50)
 
 | 
 
 | 
C(PSSVAL,PSSFL,PSSPK,LIST) | 
Format:
C^PSS50(PSSVAL,PSSFL,PSSPK,LIST)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSVAL | 
Input | 
PSSVAL = SYNONYM sub-field (#.01) of the SYNONYM multiple of the DRUG file
(#50).  The synonym needs to be enclosed in quotes otherwise the leading
zeroes get stripped off by the system [required]
 
 | 
PSSFL | 
Input | 
PSSFL = Inactive date. A Null value will return all
entries.  Entry of a FileMan format date (ex: 3030917) will return active
entries after this date. [optional]
 
 | 
PSSPK | 
Input | 
PSSPK = Returns the APPLICATION PACAKGES USE (ex: "IU" returns the
APPLICATION PACKAGES' USE for IV and Unit Dose [optional]
 
 | 
LIST | 
Input | 
LIST= array defined by the calling application [required]
 
 | 
~TMP | 
Output | 
^TMP($J,LIST,0)=Total entries returning or -1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,PSS(1),.01)=SYNONYM(50.1,.01)
^TMP($J,LIST,PSSIEN,PSS(1),1)=INTENDED USE(50.1,1) ^External format for the
set of codes
^TMP($J,LIST,PSSIEN,PSS(1),2)=NDC CODE(50.1,2)
^TMP($J,LIST,PSSIEN,PSS(1),400)=VSN(50.1,400)
^TMP($J,LIST,PSSIEN,PSS(1),401)=ORDER UNIT(50.1,401)^ ABBREVIATION(51.5,.01)
^TMP($J,LIST,PSSIEN,PSS(1),402)=PRICE PER ORDER UNIT (50.1,402)
^TMP($J,LIST,PSSIEN,PSS(1),403)=DISPENSE UNITS PER ORDER UNIT(50.1,403)
^TMP($J,LIST,PSSIEN,PSS(1),404)=PRICE PER DISPENSE UNIT (50.1,404)
^TMP($J,LIST,PSSIEN,PSS(1),405)=VENDOR(50.1,405)
^TMP($J,LIST,"C",GENERIC NAME,PSSIEN)=""
Where:
PSSIEN is IEN of entry in the DRUG file (#50)
PSS(1) is the IEN of entry in the SYNONYM multiple
 
 | 
 
 | 
AVSN(PSSVAL,PSSFL,PSSPK,LIST) | 
Format:
AVSN^PSS50(PSSVAL,PSSFL,PSSPK,LIST)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSVAL | 
Input | 
PSSVAL = VSN sub-field (#400) of the SYNONYM multiple of the DRUG file (#50)
[required]
 
 | 
PSSFL | 
Input | 
PSSFL = Inactive date. A Null value will return all
entries.  Entry of a FileMan format date (ex: 3030917) will return active
entries after this date. [optional]
 
 | 
PSSPK | 
Input | 
PSSPK = Returns the APPLICATION PACAKGES USE (ex: "IU" returns the
APPLICATION PACKAGES' USE for IV and Unit Dose [optional] Dose) [optional]
 
 | 
LIST | 
Input | 
LIST= array defined by the calling application [required]
 
 | 
~TMP | 
Output | 
^TMP($J,LIST,0)=Total entries returning or -1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,.01)=GENERIC NAME(50,.01)
^TMP($J,LIST,PSSIEN,"SYN",0)=Total entries returning for this sub-file or
-1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,"SYN",PSS(1),.01)=SYNONYM(50.1,.01)
^TMP($J,LIST,PSSIEN,"SYN",PSS(1),1)=INTENDED USE(50.1,1)^External format for
the set of codes
^TMP($J,LIST,PSSIEN,"SYN",PSS(1),2)=NDC CODE(50.1,2)
^TMP($J,LIST,PSSIEN,"SYN",PSS(1),400)=VSN(50.1,400)
^TMP($J,LIST,PSSIEN,"SYN",PSS(1),,401)=ORDER UNIT (50.1,401)^
ABBREVIATION(51.5,.01)
^TMP($J,LIST,PSSIEN,"SYN",PSS(1),402)=PRICE PER ORDER UNIT (50.1,402)
^TMP($J,LIST,PSSIEN,"SYN",PSS(1),403)=DISPENSE UNITS PER ORDER UNIT(50.1,403)
^TMP($J,LIST,PSSIEN,"SYN",PSS(1),404)=PRICE PER DISPENSE UNIT (50.1,404)
^TMP($J,LIST,PSSIEN,"SYN",PSS(1),405)=VENDOR(50.1,405)
^TMP($J,LIST,"AVSN",GENERIC NAME,PSSIEN)=""
Where:
PSSIEN is IEN of entry in the DRUG file (#50)
PSS(1) is the IEN of entry in the SYNONYM multiple
 
 | 
 
 | 
$$AQ(PSSIEN) | 
Format:
S X=$$AQ^PSS50(PSSIEN)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSIEN | 
Input | 
PSSIEN = IEN of the DRUG in the DRUG file (#50) [required]
 
 | 
$$AQ | 
Output | 
X
Where X is:
0 (zero) = IEN does not exist in the cross-reference
1 (one) = IEN exists in the cross-reference
 
 | 
 
 | 
$$SKAQ(PSSIEN,PSSFL) | 
Format:
S X=$$SKAQ^PSS50(PSSIEN,PSSFL)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSIEN | 
Input | 
PSSIEN = IEN of entry in DRUG file (#50) [required]
 
 | 
PSSFL | 
Input | 
PSSFL = Either "S" (set) or "K"  (kill) action [required]
 
 | 
$$SKAQ | 
Output | 
X
Where X is:
0 (zero) = action unsuccessful
1 (one)  = action accomplished
 
 | 
 
 | 
$$SKAQ1(PSSIEN) | 
Format:
S X=$$SKAQ1^PSS50(PSSIEN)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSIEN | 
Input | 
PSSIEN = IEN of entry in DRUG file (#50) [required]
 
 | 
$$SKAQ1 | 
Output | 
X
Where X is:
0 (zero) = action unsuccessful
1 (one)  = action accomplished
 
 | 
 
 | 
AQ1(PSSVAL,PSSFL,PSSPK,LIST) | 
Format:
AQ1^PSS50(PSSVAL,PSSFL,PSSPK,LIST)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSVAL | 
Input | 
PSSVAL = CMOP ID field (#27) of the DRUG file (#50) [required]
 
 | 
PSSFL | 
Input | 
PSSFL = Inactive date. A Null value will return all
entries.  Entry of a FileMan format date (ex: 3030917) will return active
entries after this date. [optional]
 
 | 
PSSPK | 
Input | 
PSSPK = Returns the APPLICATION PACAKGES USE (ex: "IU" returns the
APPLICATION PACKAGES' USE for IV and Unit Dose [optional]
 
 | 
LIST | 
Input | 
LIST= array defined by the calling application [required]
 
 | 
~TMP | 
Output | 
^TMP($J,LIST,0)=Total entries returning or -1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,.01)=GENERIC NAME(50,.01)
^TMP($J,LIST,"AQ1",GENERIC NAME,PSSIEN)=""
Where:
PSSIEN is IEN of entry in the DRUG file (#50)
 
 | 
 
 | 
OLDNM(PSSIEN,PSSVAL,PSSFL,PSSPK,LIST) | 
Format:
OLDNM^PSS50(PSSIEN,PSSVAL,PSSFL,PSSPK,LIST)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSIEN | 
Input | 
PSSIEN = IEN of entry in DRUG file (#50) [optional]
 
 | 
PSSVAL | 
Input | 
PSSVAL = NAME field (#.01) of the DRUG file (#50) (a value of  "??" may be
used) [optional]
 
 | 
PSSFL | 
Input | 
PSSFL = Inactive date. A Null value will return all
entries.  Entry of a FileMan format date (ex: 3030917) will return active
entries after this date. [optional]
 
 | 
PSSPK | 
Input | 
PSSPK = Returns the APPLICATION PACAKGES USE (ex: "IU" returns the
APPLICATION PACKAGES' USE for IV and Unit Dose [optional]
 
 | 
LIST | 
Input | 
LIST = array defined by the calling application [required]
 
 | 
~TMP | 
Output | 
^TMP($J,LIST,0)=Total entries returning or -1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,.01)=GENERIC NAME(50,.01)
^TMP($J,LIST,PSSIEN,"OLD",0)=Total entries returning for this sub-file or
-1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,"OLD",PSS(1),.01)=OLD NAME(50.01,.01)
^TMP($J,LIST,PSSIEN,"OLD",PSS(1),.02)=DATE CHANGED(50.01,.02) ^External
format (ex: SEP 12,1999)
^TMP($J,LIST,"B",GENERIC NAME,PSSIEN)=""
Where:
PSS(1) is the IEN of entry in the OLD NAME multiple
 
 | 
 
 | 
$$ADDOLDNM(PSSIEN,PSSIEN2,PSSONM,PSSDT) | 
Format:
S X=$$ADDOLDNM^PSS50(PSSIEN,PSSIEN2,PSSONM,PSSDT)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSIEN | 
Input | 
PSSIEN = IEN of entry in DRUG file (#50) [optional]
 
 | 
PSSIEN2 | 
Input | 
PSSIEN2 = IEN of entry in OLD NAME multiple of the DRUG file (#50) [required]
 
 | 
PSSONM | 
Input | 
PSSONM = OLD NAME field (#.01) of the OLD NAME multiple of the DRUG file
(#50) [optional]
 
 | 
PSSDT | 
Input | 
PSSDT = DATE CHANGED field (#2) of the OLD NAME multiple of the DRUG file
(#50) [optional]
 
 | 
$$ADDOLDNM | 
Output | 
X
Where X is:
0 (zero) = entry was unsuccessful
1 (one) = entry was added
 
 | 
 
 | 
A526(PSSIEN,LIST) | 
Format:
A526^PSS50(PSSIEN,LIST)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSIEN | 
Input | 
PSSIEN = IEN of entry in DRUG file (#50) [required]
 
 | 
LIST | 
Input | 
LIST= array defined by the calling application [required]
 
 | 
~TMP | 
Output | 
^TMP($J,LIST,0)=Total entries returning or -1^NO DATA FOUND
^TMP($J,LIST,PSSIEN2,.01)=PRINT NAME (52.6,.01)
^TMP($J,LIST,"A526",PRINT NAME,PSSIEN2)=""
Where:
PSSIEN2 is IEN of entry in IV ADDITIVE file (#52.6)
 
 | 
 
 | 
A527(PSSIEN,LIST) | 
Format:
A527^PSS50(PSSIEN,LIST)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSIEN | 
Input | 
PSSIEN = IEN of entry in DRUG file (#50) [required]
 
 | 
LIST | 
Input | 
LIST = array defined by the calling application [required]
 
 | 
~TMP | 
Output | 
^TMP($J,LIST,0)=Total entries returning or -1^NO DATA FOUND
^TMP($J,LIST,PSSIEN2,.01)=PRINT NAME (52.7,.01)
^TMP($J,LIST,"A527",PRINT NAME,PSSIEN2)=""
Where:
PSSIEN2 is IEN of entry in IV SOLUTION file (#52.7)
 
 | 
 
 | 
AIU(PSSFT,PSSPK,PSSFL,LIST) | 
Format:
AIU^PSS50(PSSFT,PSSPK,PSSFL,LIST)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSFT | 
Input | 
PSSFT = NAME field (#.01) of the DRUG file (#50) [required]
 
 | 
PSSPK | 
Input | 
PSSPK = Returns the APPLICATION PACAKGES USE (ex: "IU" returns the
APPLICATION PACKAGES' USE for IV and Unit Dose [optional]
 
 | 
PSSFL | 
Input | 
PSSPK = Returns the APPLICATION PACAKGES USE (ex: "IU" returns the
APPLICATION PACKAGES' USE for IV and Unit Dose [optional]
 
 | 
LIST | 
Input | 
LIST= array defined by the calling application [required]
 
 | 
~TMP | 
Output | 
^TMP($J,LIST,0)=Total entries returning or -1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,.01)=GENERIC NAME(50,.01)
^TMP($J,LIST,"AIU",GENERIC NAME,PSSIEN)=""
Where:
PSSIEN is IEN of entry in the DRUG file (#50)
 
 | 
 
 | 
IU(PSSFL,LIST) | 
Format:
IU^PSS50(PSSFL,LIST)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSFL | 
Input | 
PSSFL = Inactive date. A Null value will return all
entries.  Entry of a FileMan format date (ex: 3030917) will return active
entries after this date. [optional]
 
 | 
LIST | 
Input | 
LIST= array defined by the calling application [required]
 
 | 
~TMP | 
Output | 
^TMP($J,LIST,0)=Total entries returning or -1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,.01)=GENERIC NAME(50,.01)
^TMP($J,LIST,"IU",GENERIC NAME,PSSIEN)=""
Where:
PSSIEN is IEN of entry in the DRUG file (#50)
 
 | 
 
 | 
$$SKAIU(PSSIEN,PSSFL) | 
Format:
S X=$$SKAIU^PSS50(PSSIEN,PSSFL)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSIEN | 
Input | 
PSSIEN = IEN of entry in DRUG file (#50) [required]
 
 | 
PSSFL | 
Input | 
PSSFL = Either "S" (set) or "K" (kill) action [required] Note: The
APPLICATION PACKAGES' USE (50,63) must be updated prior to calling this API.
 
 | 
$$SKAIU | 
Output | 
X
Where X is:
0 (zero) = action unsuccessful
1 (one)  = action accomplished
 
 | 
 
 | 
$$SKIU(PSSIEN) | 
Format:
S X=$$SKIU^PSS50(PSSIEN)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSIEN | 
Input | 
PSSIEN = IEN of entry in DRUG file (#50) [required] Note: The APPLICATION
PACKAGES' USE (50,63) must be updated prior to calling this API.
 
 | 
$$SKIU | 
Output | 
X
Where X is:
0 (zero) = action unsuccessful
1 (one)  = action accomplished
 
 | 
 
 | 
['LOOKUP(PSSFT,PSSFL,PSSPK,PSSRTOI,PSSIFCAP,PSSCMOP,PSSD,LI', 'ST)'] | 
Format:
LOOKUP^PSS50(PSSFT,PSSFL,PSSPK,PSSRTOI,PSSIFCAP,PSSCMOP,PSSD,LIST)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSFT | 
Input | 
PSSFT = A look up value that could be the NAME field (#.01), IEN, VA PRODUCT
NAME (#21), NATIONAL DRUG CLASS (#25), or SYNONYM (#.01) multiple of the DRUG
file (#50) (a value of"??" may be used) [optional]
 
 | 
PSSFL | 
Input | 
PSSFL = Inactive date. A Null value will return all
entries.  Entry of a FileMan format date (ex: 3030917) will return active
entries after this date. [optional]
 
 | 
PSSPK | 
Input | 
PSSPK = Returns the APPLICATION PACAKGES USE (ex: "IU" returns the
APPLICATION PACKAGES' USE for IV and Unit Dose [optional]
 
 | 
PSSRTOI | 
Input | 
PSSRTOI = If "1" returns only those entries matched to a Pharmacy Orderable
Item [optional]
 
 | 
PSSIFCAP | 
Input | 
PSSIFCAP = If this flag is passed in with a 1, the API returns those drug
entries that do not have the IFCAP ITEM NUMBER (#441) multiple existed in the
DRUG file (#50) [optional]
 
 | 
PSSCMOP | 
Input | 
PSSCMOP = If this flag is passed in with a 1, the API returns those drug
entries that do not have data in the CMOP ID (#27) of the DRUG file (#50)
[optional]
 
 | 
PSSD | 
Input | 
PSSD = Multiple index lookup is performed if passed in (ex: "B", "C", "VAPN",
"VAC"). Otherwise only the "B" cross-reference is used [optional]
 
 | 
LIST | 
Input | 
LIST = array defined by the calling application
 
 | 
~TMP | 
Output | 
^TMP($J,LIST,0)=Total entries returning or -1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,.01)=GENERIC NAME(50,.01)
^TMP($J,LIST,PSSIEN,25)=NATIONAL DRUG CLASS(50,25)^CODE (50.605,.01)^
CLASSIFICATION(50.605,1))
^TMP($J,LIST,PSSIEN,100)=INACTIVE DATE(50,100)^External format
(ex: SEP 12,1999)
^TMP($J,LIST,PSSIEN,101)=MESSAGE(50,101)
^TMP($J,LIST,PSSDX,GENERIC NAME,PSSIEN)=""
Where:
PSSIEN is IEN of entry in the DRUG file (#50)
PSSDX is value passed in the PSSD. If multiple values are passed in, or the
back tick IEN lookup is used, "B" will be used.
 
 | 
 
 | 
FRMALT(PSSIEN,PSSFT,PSSFL,PSSPK,LIST) | 
Format:
FRMALT^PSS50(PSSIEN,PSSFT,PSSFL,PSSPK,LIST)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSIEN | 
Input | 
PSSIEN = IEN of entry in DRUG file (#50) [required]
 
 | 
PSSFT | 
Input | 
PSSFT = NAME field (#.01) of the DRUG file (#50) (a value of  "??" may be
used)  [optional]
 
 | 
PSSFL | 
Input | 
PSSFL = Inactive date. A Null value will return all
entries.  Entry of a FileMan format date (ex: 3030917) will return active
entries after this date. [optional]
 
 | 
PSSPK | 
Input | 
PSSPK = Returns the APPLICATION PACAKGES USE (ex: "IU" returns the
APPLICATION PACKAGES' USE for IV and Unit Dose [optional]
 
 | 
LIST | 
Input | 
LIST = array defined by the calling application
 
 | 
~TMP | 
Output | 
^TMP($J,LIST,0)=Total entries returning or -1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,.01)=GENERIC NAME(50,.01)
^TMP($J,LIST,PSSIEN,25)=NATIONAL DRUG CLASS(50,25)
^TMP($J,LIST,PSSIEN,100)=INACTIVE DATE (50,100)^External format (ex: SEP
12,1999)
^TMP($J,LIST,PSSIEN,101)=MESSAGE(50,101)
^TMP($J,LIST,PSSIEN,"FRM",0)=Total entries returning for this sub-file or
-1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,"FRM",PSS(1),2)=FORMULARY ALTERNATIVE (50.065,2)^GENERIC
NAME (50,.01)
^TMP($J,LIST,"B",GENERIC NAME,PSSIEN)=""
Where:
PSS(1) is the IEN of the FORMULARY ALTERNATIVE multiple
 
 | 
 
 | 
LABEL(PSSIEN,LIST) | 
Format:
LABEL^PSS50(PSSIEN,LIST)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSIEN | 
Input | 
PSSIEN = IEN of entry in the DRUG file (#50) [required]
 
 | 
LIST | 
Input | 
LIST = array defined by the calling application
 
 | 
~TMP | 
Output | 
^TMP($J,LIST,0)=Total entries returning or -1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,.01)=NAME(50,.01)
^TMP($J,LIST,PSSIEN,25)= NATIONAL DRUG CLASS(50,25)^CODE (50.605,.01)^
CLASSIFICATION(50.605,1)
^TMP($J,LIST,PSSIEN,51)=LOCAL NON FORMULARY(50,51)^ External format for the
set of codes
^TMP($J,LIST,PSSIEN,100)=INACTIVE DATE(50,100)^External format (ex: SEP
12,1999)
^TMP($J,LIST,PSSIEN,101)=MESSAGE(50,101)
^TMP($J,LIST,PSSIEN,102)=RESTRICTION(50,102)
^TMP($J,LIST, "B",GENERIC NAME,PSSIEN)= ""
 
 | 
 
 | 
LIST(PSSFT,PSSFL,PSSD,PSSPK,LIST) | 
Format:
LIST^PSS50(PSSFT,PSSFL,PSSD,PSSPK,LIST)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSFT | 
Input | 
PSSFT = NAME field (#.01) of the DRUG file (#50) (a value of  "??" may be
used)  [optional]
 
 | 
PSSFL | 
Input | 
PSSFL = Inactive date. A Null value will return all
entries.  Entry of a FileMan format date (ex: 3030917) will return active
entries after this date. [optional]
 
 | 
PSSD | 
Input | 
PSSD = the index used in the lookup, (ex: "B","C"-cross reference)
 
 | 
PSSPK | 
Input | 
PSSPK = Returns the APPLICATION PACAKGES USE (ex: "IU" returns the
APPLICATION PACKAGES' USE for IV and Unit Dose [optional]
 
 | 
LIST | 
Input | 
LIST = array defined by the call application [required] Note: If PSSFT =
"??", the "B" cross reference will be used and PSSD is ignored
 
 | 
~TMP | 
Output | 
^TMP($J,LIST,0)=Total entries returning or -1^NO DATA FOUND
^TMP($J,LIST,PSSIEN,.01)=GENERIC NAME(50,.01)
^TMP($J,LIST,PSSIEN,2.1)=PHARMACY ORDERABLE ITEM (50,2.1)^NAME(50.7,.01) ^IEN
of the Dosage Form file (#50.606)
^TMP($J,LIST,PSSIEN,100)=INACTIVE DATE (50,100)^External format (ex: SEP
12,1999)
^TMP($J,LIST, PSSDX,GENERIC NAME,PSSIEN)= ""
Where:
PSSDX is value passed in the PSSD.  If multiple values are passed in, "B"
will be used.
 
 | 
 
 | 
$$EDTIFCAP(PSSIEN,PSSVAL) | 
Format:
S X=$$EDTIFCAP^PSS50(PSSIEN,PSSVAL)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSIEN | 
Input | 
PSSIEN = IEN of entry in the DRUG file (#50) [required]
 
 | 
PSSVAL | 
Input | 
PSSVAL = the ITEM NUMBER subfield (#.01) of the IFCAP ITEM NUMBER multiple in
the DRUG file (#50) [required]
 
 | 
$$EDTIFCAP | 
Output | 
X
Where X is:
0 (zero) = action unsuccessful
1 (one) = action accomplished
 
 | 
 
 | 
$$FNAME(PSSFNO,PSSFILE) | 
Format:
S X=$$FNAME^PSS50(PSSFNO,PSSFILE)
 
 | 
| VARIABLES | 
TYPE | 
VARIABLES DESCRIPTION | 
 
PSSFNO | 
Input | 
PSSFNO = Field number [required]
 
 | 
PSSFILE | 
Input | 
PSSFILE = File number of the sub-files [optional]
 
 | 
$$FNAME | 
Output | 
X
Where:
X = the field name
 
 | 
 
 | 
NOCMOP | 
 | 
 |