Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR  | All
Print Page as PDF
Global: ^PSRX

Package: Outpatient Pharmacy

Global: ^PSRX


Information

FileMan FileNo FileMan Filename Package
52 PRESCRIPTION Outpatient Pharmacy

Description

Accessed By FileMan Db Calls, Total: 236

Package Total Routines
Outpatient Pharmacy 187 PSO160P1    PSO480P    PSO5241    PSO52API    PSO52CLR    PSO583PI    PSO744PI    PSO7P289
PSOARCDE    PSOARCF4    PSOARCS2    PSOARCSV    PSOASAP    PSOASAP0    PSOATRFC    PSOATRFV
PSOBAIR2    PSOBBC    PSOBING1    PSOBORP3    PSOBPSR1    PSOBPSU1    PSOBPSU2    PSOBPSU4
PSOBPSUT    PSOCIDC9    PSOCLADD    PSOCLO1    PSOCMOP    PSOCMOPB    PSOCMOPC    PSOCMOPR
PSOCMOPT    PSOCPA    PSOCPB    PSOCPC    PSOCPD    PSOCPF1    PSOCPTRH    PSOCPTRI
PSOCPVW    PSOCSRL    PSODAWUT    PSODIAG    PSODIR2    PSODIR4    PSODISP    PSODISP1
PSODLKP    PSODOSUT    PSODRG    PSOERHL0    PSOERSE2    PSOERUT    PSOERUT2    PSOERUT3
PSOERUT4    PSOERUT5    PSOERUT6    PSOERX1F    PSOERX1G    PSOERXA6    PSOERXO1    PSOERXOF
PSOERXU3    PSOERXU6    PSOERXU7    PSOERXUT    PSOERXUX    PSOERXX1    PSOERXX4    PSOEXDT
PSOFDAMG    PSOFDAUT    PSOFIXDT    PSOHLD    PSOHLDA    PSOHLDIS    PSOHLDS1    PSOHLDS4
PSOHLNE2    PSOHLNE3    PSOHLNE4    PSOHLSN2    PSOLBL    PSOLBLN    PSOLLLH    PSOLLLI
PSOLMPAT    PSOMPHRC    PSON52    PSONDCUT    PSONDCV    PSONEW    PSONRXN    PSOORAL2
PSOORCPY    PSOORED6    PSOORED7    PSOOREDT    PSOORFI1    PSOORNE2    PSOORUT1    PSOORUT2
PSOOTMRX    PSOPFSU0    PSOPFSU1    PSOPI136    PSOPMP0    PSOPMP1    PSOPRK    PSOPRKA
PSOPROD1    PSOPROD2    PSOPXRM1    PSOPXRMI    PSOQUAP2    PSOR52    PSOREF    PSOREJP0
PSOREJP1    PSOREJP2    PSOREJP3    PSOREJP4    PSOREJU1    PSOREJU2    PSOREJU3    PSOREJU4
PSOREJUT    PSORENW    PSORENW0    PSORENW4    PSORESK    PSORESUS    PSORLLLI    PSORLST2
PSORN52A    PSORN52C    PSORN52D    PSORREF    PSORREF0    PSORRPA1    PSORWRAP    PSORXDL
PSORXED    PSORXED1    PSORXEDT    PSORXL1    PSORXPA1    PSORXPR1    PSORXRP1    PSORXRP2
PSORXVW    PSORXVW1    PSORXVW2    PSOSPML2    PSOSPML4    PSOSPML5    PSOSPML6    PSOSPML7
PSOSPML8    PSOSPMU1    PSOSPMU2    PSOSPMU3    PSOSPMUT    PSOSPMV    PSOSUCHG    PSOSULB2
PSOSULBL    PSOSULOG    PSOSUPAT    PSOSUPOE    PSOSUPRX    PSOTALK    PSOTEXP1    PSOTPRP1
PSOTRI    PSOUTIL    PSOUTL    PSOUTLA1    PSOUTLA2    PSOVDF2    PSOVDF3    PSOVER
PSOVER1    PSOVER2    PSOVEXR1    
CMOP 11 PSXBLD    PSXBPSMS    PSXBPSRP    PSXBPSUT    PSXEDIT    PSXERR    PSXMISC1    PSXNEW
PSXRPPL2    PSXRTRAN    PSXVND    
E Claims Management Engine 9 BPSOPR3    BPSOSIY    BPSPRRX7    BPSRPC02    BPSRPT1    BPSRPT6    BPSSCRL1    BPSUTIL
BPSVRX3    
Integrated Billing 6 IBJTEP    IBJTPE    IBNCPBB    IBNCPDPE    IBNCPRR    IBOHLS1    
Mental Health 6 YSCLHLGT    YSCLHLOP    YSCLHLPR    YSCLSRV3    YSCLTEST    YSCLTST6    
Controlled Substances 4 PSDDSOR1    PSDNMWE    PSDOPTX    PSDSUBOX    
DSS Extracts 3 ECXAPHA    ECXCBFK    ECXOPRX    
Pharmacy Benefits Management 2 PSUOP2    PSUOP3    
Virtual Patient Record 2 VPREHL7    VPRSDAP    
Adverse Reaction Tracking 1 GMRA66PI    
My HealtheVet 1 MHVPRNA    
National Health Information Network 1 NHINVPSO    
Order Entry Results Reporting 1 ORAREN    
Patient Assessment Documentation 1 NUPAOBJ    
Patient Data Exchange 1 VAQDBIP2    

Pointed To By FileMan Files, Total: 28

Package Total FileMan Files
Outpatient Pharmacy 12 DUE ANSWER SHEET(#50.0731)[3]    PATIENT NOTIFICATION (Rx READY)(#52.11)[#52.1112(.01)]    RX VERIFY(#52.4)[.01, 3]    PHARMACY TELEPHONE REFILLS(#52.444)[.01]    ERX HOLDING QUEUE(#52.49)[.13]    RX SUSPENSE(#52.5)[.01]    PHARMACY EXTERNAL INTERFACE(#52.51)[.01]    CLOZAPINE PRESCRIPTION OVERRIDES(#52.52)[1]    PSO AUDIT LOG(#52.87)[1]    PHARMACY PRINTED QUEUE(#52.9)[#52.9002(.01)]    PHARMACY ARCHIVE(#52.8)[.01]    PRESCRIPTION(#52)[39.4, 39.5, 45.1, 45.2]    
E Claims Management Engine 4 BPS REQUESTS(#9002313.77)[1.13]    BPS CLAIMS(#9002313.02)[#9002313.0201(.05)]    BPS TRANSACTION(#9002313.59)[1.11]    BPS LOG OF TRANSACTIONS(#9002313.57)[1.11]    
Integrated Billing 3 IB BILL/CLAIMS PRESCRIPTION REFILL(#362.4)[.05]    IB NCPDP EVENT LOG(#366.14)[#366.141(.201), #366.141(.212)]    CLAIMS TRACKING(#356)[.08]    
Auto Replenishment Ward Stock 2 SPMP STATE PARAMETERS(#58.41)[14]    SPMP EXPORT BATCH(#58.42)[#58.42001(.01)]    
CMOP 2 CMOP RX QUEUE(#550.1)[#550.1101(.01)]    CMOP TRANSMISSION(#550.2)[#550.215(.01)]    
Drug Accountability 2 DRUG ACCOUNTABILITY STATS(#58.8)[#58.800118(18)]    DRUG ACCOUNTABILITY TRANSACTION(#58.81)[60]    
Order Entry Results Reporting 2 ORDER CHECK INSTANCES(#100.05)[#100.07(.01)]    ORDER DEA ARCHIVE INFO(#101.52)[1]    
Pharmacy Data Management 1 PHARMACY PATIENT(#55)[#55.03(.01)]    

Pointer To FileMan Files, Total: 16

Package Total FileMan Files
Integrated Billing 4 INTEGRATED BILLING ACTION(#350)[106, #52.07(13), #52.1(9)]
IB COPAY TRANSACTIONS(#354.71)[106.6, #52.07(14), #52.1(9.1)]
PFSS ACCOUNT(#375)[125, #52.07(26), #52.1(21)]
IB ACTION TYPE(#350.1)[105]    
Outpatient Pharmacy 3 RX PATIENT STATUS(#53)[3]    OUTPATIENT SITE(#59)[20, #52.07(12), #52.1(8), #52.2(.09)]    PRESCRIPTION(#52)[39.4, 39.5, 45.1, 45.2]    
National Drug File 2 DRUG UNITS(#50.607)[#52.0113(2)]    MEDICATION ROUTES(#51.2)[#52.0113(6), #52.037(.01)]    
Pharmacy Data Management 2 PHARMACY ORDERABLE ITEM(#50.7)[39.2]    DRUG(#50)[6]    
CMOP 1 CMOP TRANSMISSION(#550.2)[#52.01(.01)]    
DRG Grouper 1 ICD DIAGNOSIS(#80)[#52.052311(.01)]    
Kernel 1 NEW PERSON(#200)[4, 16, 23, 38, 38.1, 38.2, 84, 104, 109, #52.0107(2), #52.032(3), #52.07(8), #52.07(10), #52.07(19), #52.07(24), #52.07(25), #52.07(30), #52.1(4), #52.1(6), #52.1(15), #52.1(19), #52.1(20), #52.1(84), #52.2(.05), #52.2(.07), #52.2(6), #52.2(10), #52.2(11), #52.25(4), #52.25(11), #52.2551(1), #52.3(.03)]    
Registration 1 PATIENT(#2)[2]    
Scheduling 1 HOSPITAL LOCATION(#44)[5]    

Fields, Total: 132

Field # Name Loc Type Details
.01 RX # 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>11!($L(X)<1) X
  • LAST EDITED:  NOV 26, 1990
  • HELP-PROMPT:  TYPE A WHOLE NUMBER BETWEEN 1 AND 999999999
  • DESCRIPTION:  
    This is the prescription number.
  • EXECUTABLE HELP:  D RXHLP^PSOHELP4
  • DELETE TEST:  1,0)= I 1 D EN^DDIOL("DELETE THROUGH PACKAGE ONLY!","","$C(7),!?5")
    52,0)= S X1=$S($D(^PSRX(D0,2)):$P(^(2),"^",6),1:0) S:'X1 RX0=^(0),J=D0 D ^PSOEXDT:'X1 I DT'>$P(^(2),U,6),$O(^PSRX(DA,1,0)) D EN^DDIOL("CANNOT DELETE PRESCRIPTIONS WITH REFILLS.","","$C(7),!?5")
  • GROUP:  PSO
  • CROSS-REFERENCE:  52^B
    1)= S ^PSRX("B",$E(X,1,30),DA)=""
    2)= K ^PSRX("B",$E(X,1,30),DA)
1 ISSUE DATE 0;13 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  D CID^PSOUTL S X=Y K:Y<1 X
  • OUTPUT TRANSFORM:  NOT EXECUTABLE!! -- SPECIFIER NEEDS AN "O"!
  • LAST EDITED:  APR 25, 2003
  • DESCRIPTION:  
    Date when doctor wrote prescription.
  • TECHNICAL DESCR:  
    (Required) Date.
  • EXECUTABLE HELP:  D CIDH^PSOUTL
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  52^AC
    1)= S ^PSRX("AC",$E(X,1,30),DA)=""
    2)= K ^PSRX("AC",$E(X,1,30),DA)
    3)= Do Not Delete!
    This xref is used to index file by Issue Date.
  • FIELD INDEX:  APKI (#250) MUMPS IR SORTING ONLY
    Short Descr: This indexes the issue date.
    Description: This cross-reference is used only to index digitally signed CPRS placed orders by the issue date. It is primarily used to generate digitally signed prescriptions in the Digitally Signed Orders Report, which is made
    available in the Controlled Substance package, as part of the PKI project.
    Set Logic: I +$P($G(^PSRX(DA,"PKI")),"^")=1 S ^PSRX("APKI",$E(X,1,30),DA)=""
    Kill Logic: K ^PSRX("APKI",$E(X,1,30),DA)
    Whole Kill: K ^PSRX("APKI")
    X(1): ISSUE DATE (52,1) (Subscr 1) (Len 30) (forwards)
2 PATIENT 0;2 POINTER TO PATIENT FILE (#2)
************************REQUIRED FIELD************************
PATIENT(#2)

  • INPUT TRANSFORM:  I $D(X) D PAT^PSOHELP
  • LAST EDITED:  MAY 15, 2002
  • DESCRIPTION:  
    The patient receiving treatment.
  • TECHNICAL DESCR:  
    (Required) Pointer to Patient File (#2)
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  52^C^MUMPS
    1)= S:$P($G(^PSRX(DA,0)),"^",11)="W"&($P($G(^(2)),"^",2))&('$P($G(^(2)),"^",13))&('$P($G(^(2)),"^",15))&(+$G(^("IB"))) ^PSRX("ACP",X,$P(^PSRX(DA,2),"^",2),0,DA)=""
    2)= K:$P($G(^PSRX(DA,0)),"^",11)="W"&($P($G(^(2)),"^",2))&('$P($G(^(2)),"^",13))&('$P($G(^(2)),"^",15))&(+$G(^("IB"))) ^PSRX("ACP",X,$P(^PSRX(DA,2),"^",2),0,DA)
    3)= Do Not Delete!
    This cross reference is used to index copay fills that have not been billed through the IB package. It sets the global ^PSRX("ACP",Patient,Fill Date,0,DA)="".
  • CROSS-REFERENCE:  52^ACP1^MUMPS
    1)= I +$G(^PSRX(DA,"IB")) F RFN=0:0 S RFN=$O(^PSRX(DA,1,RFN)) Q:'RFN S:$P($G(^PSRX(DA,1,RFN,0)),"^")&($P($G(^(0)),"^",2)="W")&('$P($G(^(0)),"^",16))&('$P($G(^(0)),"^",18))&('$G(^("IB"))) ^PSRX("ACP",X,$P(^PSRX(DA,1,RFN,0)
    ,"^"),RFN,DA)=""
    2)= I +$G(^PSRX(DA,"IB")) F RFN=0:0 S RFN=$O(^PSRX(DA,1,RFN)) Q:'RFN K:$P($G(^PSRX(DA,1,RFN,0)),"^")&('$P($G(^(0)),"^",16))&('$P($G(^(0)),"^",18))&($G(^("IB"))) ^PSRX("ACP",X,$P(^PSRX(DA,1,RFN,0),"^"),RFN,DA)
    3)= Do Not Delete!
    This xref is used to index copay refills that have not been billed through the IB package. It sets the global ^PSRX("ACP",Patient,Refill Date,Refill number,DA)="".
  • CROSS-REFERENCE:  52^APSOD^MUMPS
    1)= S:$G(PSODEATH) ^PSRX("APSOD",X,DA)=""
    2)= K:$G(PSODEATH) ^PSRX("APSOD",X,DA)
    3)= Do not delete.
    This xref will be set only when a Rx is discontinued because a date of death was entered. This xref will be set by the APSOD xref of the Date of death field in file #2. ^PSRX("APSOD",patient pointer,da) Set by routine
    PSOCAN3.
3 PATIENT STATUS 0;3 POINTER TO RX PATIENT STATUS FILE (#53)
************************REQUIRED FIELD************************
RX PATIENT STATUS(#53)

  • INPUT TRANSFORM:  D:$D(X) STATDAY^PSOUTLA
  • LAST EDITED:  AUG 25, 1994
  • DESCRIPTION:  
    This field is used to show the status of the patient at the time the medication was filled.
  • TECHNICAL DESCR:  
    Pointer to RX Patient Status File (#53).
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
4 PROVIDER 0;4 POINTER TO NEW PERSON FILE (#200)
************************REQUIRED FIELD************************
NEW PERSON(#200)

  • INPUT TRANSFORM:  S DIC("S")="S X(1)=$G(^(""PS"")) I +X(1),$S('$P(X(1),""^"",4):1,1:$P(X(1),""^"",4)'
  • LAST EDITED:  APR 05, 1996
  • HELP-PROMPT:  Enter the name of a Provider.
  • DESCRIPTION:  
    Doctor who wrote the prescription.
  • TECHNICAL DESCR:  
    (Required) Pointer to New Person File (#200)
  • SCREEN:  S DIC("S")="S X(1)=$G(^(""PS"")) I +X(1),$S('$P(X(1),""^"",4):1,1:$P(X(1),""^"",4)'
  • EXPLANATION:  Only valid providers are to be selected.
    UNEDITABLE
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
5 CLINIC 0;5 POINTER TO HOSPITAL LOCATION FILE (#44) HOSPITAL LOCATION(#44)

  • INPUT TRANSFORM:  S DIC("S")="I '$P($G(^(""SL"")),""^"",5)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JUN 29, 2001
  • DESCRIPTION:  
    Clinic where treatment was given and prescription was written.
  • TECHNICAL DESCR:  
    Pointer to Hospital Location File (#44)
  • SCREEN:  S DIC("S")="I '$P($G(^(""SL"")),""^"",5)"
  • EXPLANATION:  Only primary clinics are allowed.
  • EXECUTABLE HELP:  S DIC=44,DIC(0)="M",DIC("S")="I '$P($G(^(""SL"")),""^"",5)" D ^DIC
6 DRUG 0;6 POINTER TO DRUG FILE (#50)
************************REQUIRED FIELD************************
DRUG(#50)

  • INPUT TRANSFORM:  S DIC("S")="I $S('$D(^PSDRUG(Y,""I"")):1,'^(""I""):1,DT'>^(""I""):1,1:0),$S('$D(^PSDRUG(Y,2)):1,$P(^(2),""^"",3)'[""O"":0,1:1)" I $D(X) D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X I $D(X) D INP526^PSOFUNC
  • LAST EDITED:  SEP 28, 1998
  • DESCRIPTION:  
    The actual medication.
  • TECHNICAL DESCR:  
    (Required) Pointer to Drug File (#50)
  • SCREEN:  S DIC("S")="I $S('$D(^PSDRUG(Y,""I"")):1,'^(""I""):1,DT'>^(""I""):1,1:0),$S('$D(^PSDRUG(Y,2)):1,$P(^(2),""^"",3)'[""O"":0,1:1)"
  • EXPLANATION:  inactive drugs and those not marked for outpatient are not allowed
  • GROUP:  PS
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  52^ADL1^MUMPS
    1)= I X,$P(^PSRX(DA,2),"^",2) S ^PSRX("ADL",$P(^PSRX(DA,2),"^",2),X,DA)=""
    2)= I X,$P(^PSRX(DA,2),"^",2) K ^PSRX("ADL",$P(^PSRX(DA,2),"^",2),X,DA)
    3)= Please do not delete.
    This xref will be used to index Rxs by filldate and drug pointer. This xref will be used to find Rxs with drug whose price have changed in the Drug file (#50) and needs updating in this file.
    Cross reference will look like the following:
    ^PSRX("ADL",FILLDATE,DRUG POINTER,DA)=""
  • CROSS-REFERENCE:  52^AF^MUMPS
    1)= S:'$D(PSOPAR) PSOPAR=$S($D(^PS(59,$O(^PS(59,0)),1)):^(1),1:"") S P(7)=$P(^PSRX(DA,0),U,8),P(5)=$P(^PSRX(DA,0),U,6),P(2)=$P(^(0),U,3) D MAX^PSOHELP K P(2),P(7),P(5) S:$P(^PSRX(DA,0),U,9)="" $P(^(0),U,9)=MAX K MIN,MAX,RE
    F
    2)= Q
    3)= Do not delete.
    Determines maximum number of refill allowed. It sets piece 9 of ^PSRX(DA,0)= maximum number of refills allowed.
6.5 TRADE NAME TN;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>32!($L(X)<1)!'(X'?1." ")!(X?1N.N) X
  • LAST EDITED:  JUL 06, 1988
  • HELP-PROMPT:  ANSWER MUST BE 1-32 CHARACTERS IN LENGTH, MUST NOT BE BLANK, AND CONTAIN AT LEAST ONE NON-NUMERIC CHARACTER.
  • DESCRIPTION:  
    Free Text that, if it exists, will replace the DRUG name on the RX label.
7 QTY 0;7 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:(+X'>0)!(+X>99999999)!(X'?.8N.1".".2N)!($L(X)>11) X D:$D(X) QTY^PSOHELP
  • LAST EDITED:  NOV 30, 2007
  • DESCRIPTION:  
    This field is used to show the amount of medication that was dispensed.
  • TECHNICAL DESCR:  This field allows numeric entries only, both for CMOP prescriptions and non-CMOP prescriptions. It requires a number between .01 and 99999999, with a maximum of 2 fractional decimal places.
    NOTE: QTY values that were on file prior to patch PSO*7*29 (released 2/17/00) may contain alpha characters.
  • EXECUTABLE HELP:  D HELP^PSOHELP
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
8 DAYS SUPPLY 0;8 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>365)!(X<1)!(X?.E1"."1N.N) X D:$G(X) DAYS^PSOHELP1
  • LAST EDITED:  MAR 18, 2015
  • HELP-PROMPT:  Type a Number between 1 and 365, 0 Decimal Digits
  • DESCRIPTION:  Enter a whole number between 1 and 365. The maximum upper limit is 365, but may be lower based on the maximum specified for the drug in this prescription. The maximum value for the drug can be found in the DRUG file (#50)
    or the VA PRODUCT file (#50.68) for drugs matched to NDF.
  • TECHNICAL DESCR:  
    Numeric.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • FIELD INDEX:  ACRO (#461) MUMPS IR ACTION
    Short Descr: Clinical Reminders index.
    Description: This cross-reference builds two indexes, one for finding all patients with a particular drug and one for finding all the drugs a patient has. The indexes are stored in the Clinical Reminders index global as:
    ^PXRMINDX(52,"IP",DRUG,DFN,START DATE,STOP DATE,DAS)
    ^PXRMINDX(52,"PI",DFN,DRUG,START DATE,STOP DATE,DAS) respectively. START DATE is the RELEASE DATE and STOP DATE is calculated by adding the DAYS SUPPLY to the RELEASE DATE. For all the details, see the Clinical Reminders
    Index Technical Guide/Programmer's Manual.
    Set Logic: D SKIDX^PSOPXRMU(.X,.DA,"O","S")
    Kill Logic: D SKIDX^PSOPXRMU(.X,.DA,"O","K")
    Whole Kill: Q
    X(1): DAYS SUPPLY (52,8) (Subscr 1) (forwards)
    X(2): RELEASED DATE/TIME (52,31) (Subscr 2) (forwards)
9 # OF REFILLS 0;9 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  D REF^PSOHELP
  • LAST EDITED:  AUG 16, 1994
  • HELP-PROMPT:  Enter number of refills for this RX, if refillable.
  • DESCRIPTION:  
    The number of refills allowed per prescription.
  • TECHNICAL DESCR:  
    (Required) Number.
  • EXECUTABLE HELP:  S EXH=1 D MAX^PSOHELP K EXH
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
10 SIG SIG;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>200!($L(X)<1) X D:$D(X) SIG^PSOHELP D:$D(X) EN^DDIOL(" ("_$E(INS1,2,9999999)_")")
  • LAST EDITED:  AUG 22, 2001
  • HELP-PROMPT:  Enter medication instructions for this prescription.
  • DESCRIPTION:  
    Enter the medication instruction for this prescription. Entries should be no longer than 200 total characters, including spaces, with no one set of characters longer than 32 characters in length.
  • EXECUTABLE HELP:  S DIC=51,DIC(0)="Q",DIC("S")="I $P(^(0),""^"",4)<2" D ^DIC S DIC=52 K DIC("S")
    UNEDITABLE
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
10.1 OERR SIG SIG;2 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  FEB 27, 1995
  • DESCRIPTION:  
    This field is used to determined if the original medication instructions was accepted. This field for all Rxs entered prior v7 will be null or no. This field is uneditable.
  • TECHNICAL DESCR:  
    set of codes.
    UNEDITABLE
10.2 SIG1 SIG1;0 Multiple #52.04 52.04
10.3 ORDER CONVERTED 0;19 SET
  • '1' FOR ORDER CONVERTED;
  • '2' FOR EXPIRATION TO CPRS;

  • LAST EDITED:  AUG 04, 1997
  • HELP-PROMPT:  This field is set automatically at conversion and order expiration.
  • DESCRIPTION:  
    This field is used to indicate V7 order conversion complete to OERR. It's also used to indicate the updating of CPRS on expiration of the order.
10.6 COPIES 0;18 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  AUG 20, 1994
  • HELP-PROMPT:  Type a Number between 1 and 99, 0 Decimal Digits
  • DESCRIPTION:  
    The number of copies made of the label for the prescription.
  • TECHNICAL DESCR:  
    Number.
11 MAIL/WINDOW/PARK 0;11 SET
************************REQUIRED FIELD************************
  • 'M' FOR MAIL;
  • 'W' FOR WINDOW;
  • 'P' FOR PARK;

  • LAST EDITED:  APR 21, 2022
  • HELP-PROMPT:  Select MAIL or WINDOW to indicate how the medication will be dispensed to the patient. To update the medication profile, but not dispense the medication until the patient requests it, select PARK.
  • DESCRIPTION:  
    This field contains 'M' if the fill is to be mailed to the patient and 'W' if the fill is to be picked up at the pharmacy window and 'P' if the fill is on hold until requested.
  • TECHNICAL DESCR:  
    Set 'M' for Mail, 'W' for Window, 'P' for Park.
  • CROSS-REFERENCE:  52^ACP3^MUMPS
    1)= S:X="W"&($P(^PSRX(DA,0),"^",2))&($P($G(^(2)),"^",2))&('$P($G(^(2)),"^",13))&('$P($G(^(2)),"^",15))&(+$G(^("IB"))) ^PSRX("ACP",$P(^PSRX(DA,0),"^",2),$P(^(2),"^",2),0,DA)=""
    2)= K:X="W"&($P(^PSRX(DA,0),"^",2))&($P($G(^(2)),"^",2))&('$P($G(^(2)),"^",13))&('$P($G(^(2)),"^",15))&(+$G(^("IB"))) ^PSRX("ACP",$P(^PSRX(DA,0),"^",2),$P(^(2),"^",2),0,DA)
    3)= Do not Delete!
    This cross reference is used to update the ACP xref if the routing should changed. It sets the global ^PSRX("ACP",Patient,Fill Date,0,DA)="".
12 REMARKS 3;7 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>75!($L(X)<1) X
  • LAST EDITED:  JUL 22, 1997
  • HELP-PROMPT:  ANSWER MUST BE 1-75 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    Any additional comments.
  • TECHNICAL DESCR:  
    Free Text.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
14 ADMINISTERED IN CLINIC 0;15 SET
  • '1' FOR YES;

  • LAST EDITED:  JAN 16, 2013
  • HELP-PROMPT:  Indicate if the fill was administered in clinic.
  • DESCRIPTION:  
    This indicates if the medication was administered in a clinic instead of being dispensed to the patient.
16 ENTERED BY 0;16 POINTER TO NEW PERSON FILE (#200)
************************REQUIRED FIELD************************
NEW PERSON(#200)

  • LAST EDITED:  FEB 15, 1995
  • HELP-PROMPT:  Enter the name of the person who requested the medication.
  • DESCRIPTION:  
    This field will show who requested the rx.
  • TECHNICAL DESCR:  
    Pointer to New Person file (#200).
  • GROUP:  PS
17 UNIT PRICE OF DRUG 0;17 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>999999)!(X<0)!(X?.E1"."5N.N) X
  • LAST EDITED:  APR 23, 2020
  • HELP-PROMPT:  Type a Number between 0 and 999999, 4 Decimal Digits
  • DESCRIPTION:  
    Price per dispense unit.
  • TECHNICAL DESCR:  This is the price per dispense unit (per ML/MG etc.) that is calculated when entering the price per order unit, e.g. Price per order unit (bottle) =$0.49, dispense unit is ML & the bottle has 1000ML. Price per dispense
    unit = $(0.49/1000) = $0.00049 = $0.0005 (rounded to the 4th decimal).
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
20 DIVISION 2;9 POINTER TO OUTPATIENT SITE FILE (#59)
************************REQUIRED FIELD************************
OUTPATIENT SITE(#59)

  • LAST EDITED:  MAY 15, 1995
  • DESCRIPTION:  
    Tells which Outpatient Pharmacy Division filled the prescription.
  • TECHNICAL DESCR:  
    Pointer to Pharmacy Site File (#59)
  • CROSS-REFERENCE:  52^AP^MUMPS
    1)= D SAS^PSOSUTL
    2)= D KAS^PSOSUTL
    This is used to maintain the AS x-ref in Suspense. It sets piece 6 of ^PS(52.5,DA,0)=Division. For a non-CMOP prescription, it can also set the global ^PS(52.5,"AS",Print Date,Printed By,Division,Sequence,DA)="". For a
    CMOP prescription it can set the global ^PS(52.5,"APR",Print Date,Printed By,Division,Sequence,DA)="". For a CMOP prescription division edit it can set the global ^PS(52.5,"CMP",Cmop Activity,Rx CMOP
    Type,Division,Suspense Date,DFN,DA)="".
21 LOGIN DATE 2;1 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="ETXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 14, 1993
  • DESCRIPTION:  
    The date the prescription was entered.
  • TECHNICAL DESCR:  
    (Required) Date/Time.
22 FILL DATE 2;2 DATE

  • INPUT TRANSFORM:  D FLDTINTR^PSOUTLA("O")
  • LAST EDITED:  OCT 16, 2017
  • HELP-PROMPT:  Enter the fill date for the prescription.
  • DESCRIPTION:  
    The date the prescription was filled.
  • TECHNICAL DESCR:  
    Date.
  • EXECUTABLE HELP:  D FLDTHELP^PSOUTLA("O")
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  52^AD^MUMPS
    1)= S ^PSRX("AD",X,DA,0)=""
    2)= K ^PSRX("AD",X,DA,0)
    This cross reference lists the fill date and the internal entry number. It sets the global ^PSRX("AD",Fill Date,DA,0)="".
  • CROSS-REFERENCE:  52^AE^MUMPS
    1)= I '$O(^PSRX(DA,1,0)) S $P(^PSRX(DA,3),"^")=X
    2)= Q
    This xref is used to update last dispense date field (#101). It sets piece 1 of ^PSRX(DA,3)=Fill date.
  • CROSS-REFERENCE:  52^ACP^MUMPS
    1)= S:$P($G(^PSRX(DA,0)),"^",2)&($P($G(^(0)),"^",11)="W")&('$P($G(^(2)),"^",13))&('$P($G(^(2)),"^",15))&(+$G(^("IB"))) ^PSRX("ACP",$P(^PSRX(DA,0),"^",2),X,0,DA)=""
    2)= K:$P($G(^PSRX(DA,0)),"^",2)&($P($G(^(0)),"^",11)="W")&('$P($G(^(2)),"^",13))&('$P($G(^(2)),"^",15))&('+$G(^("IB"))) ^PSRX("ACP",$P(^PSRX(DA,0),"^",2),X,0,DA)
    3)= Do Not Delete!
    This cross reference is used to index copay fills that have not been billed through the IB package. It sets the global ^PSRX("ACP",Patient,Fill Date,0,DA)="".
  • CROSS-REFERENCE:  52^AR^MUMPS
    1)= D SUSFDS^PSOUTLA
    2)= D SUSFDK^PSOUTLA
    This cross reference is used to the the suspense date up to date if the Rx is in suspense. It sets piece 2 of ^PS(52.5,DA,0)=Fill Date, sets ^PS(52.5,"C",Fill Date,DA)="", and ^PS(52.5,"AC",Patient,Fill Date,DA)="".
  • CROSS-REFERENCE:  52^ADL^MUMPS
    1)= I X,$P(^PSRX(DA,0),"^",6) S ^PSRX("ADL",X,$P(^PSRX(DA,0),"^",6),DA)=""
    2)= I X,$P(^PSRX(DA,0),"^",6) K ^PSRX("ADL",X,$P(^PSRX(DA,0),"^",6),DA)
    3)= Please do not delete.
    This xref will be used to index Rxs by filldate and drug pointer. This xref will be used to find Rxs with drug whose price have changed in the Drug file (#50) and needs updating in this file.
    Cross reference will look like the following:
    ^PSRX("ADL",FILLDATE,DRUG POINTER,DA)=""
23 PHARMACIST 2;3 POINTER TO NEW PERSON FILE (#200)
************************REQUIRED FIELD************************
NEW PERSON(#200)

  • INPUT TRANSFORM:  S DIC("S")="I $D(^XUSEC(""PSORPH"",Y))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JAN 26, 1993
  • DESCRIPTION:  
    This field is used to identify the pharmacist that filled the medication request.
  • TECHNICAL DESCR:  
    (Required) Pointer to New Person File (#200).
  • SCREEN:  S DIC("S")="I $D(^XUSEC(""PSORPH"",Y))"
  • EXPLANATION:  Only select a user with a pharmacist's key.
24 LOT # 2;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>55!($L(X)<1) X
  • LAST EDITED:  JUN 02, 2004
  • HELP-PROMPT:  Answer must be 1-55 characters in length.
  • DESCRIPTION:  
    The vendor code for this product. It is required to be on the label if the medication is sent to a nursing home.
  • TECHNICAL DESCR:  
    Free Text.
25 DISPENSED DATE 2;5 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  OCT 30, 1992
  • HELP-PROMPT:  Enter date medication was dispensed.
  • DESCRIPTION:  
    This field will be used to show the actual date the medication was dispensed.
  • TECHNICAL DESCR:  
    date.
26 EXPIRATION DATE 2;6 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  AUG 10, 1995
  • HELP-PROMPT:  This date is the date on which the prescription is no longer fillable.
  • DESCRIPTION:  
    The date the medication expires. This is required to be put on the labels of medication sent to a nursing home.
  • TECHNICAL DESCR:  
    Date.
  • CROSS-REFERENCE:  52^AG
    1)= S ^PSRX("AG",$E(X,1,30),DA)=""
    2)= K ^PSRX("AG",$E(X,1,30),DA)
    3)= DO NOT DELETE !
    This cross refrence is used to index the file by the Expiration Date of the RX.
  • CROSS-REFERENCE:  52^AI^MUMPS
    1)= S:$P($G(^PSRX(DA,"STA")),"^")'=12 ^PS(55,$P($G(^PSRX(DA,0)),"^",2),"P","A",X,DA)=""
    2)= K:$P($G(^PSRX(DA,"STA")),"^")'=12 ^PS(55,$P($G(^PSRX(DA,0)),"^",2),"P","A",X,DA)
    3)= DO NOT DELETE !
    This xref is used to keep the pharmacy patient file "P","A" xref in sync with the expiration date. It sets the global ^PS(55,Patient,"P","A",Expiration Date,DA)="".
26.1 CANCEL DATE 3;5 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X K:$P(^(0),"^",15)'=12 X
  • LAST EDITED:  AUG 10, 1995
  • HELP-PROMPT:  Enter the date this medication is no longer active for dispensing.
  • DESCRIPTION:  
    This date is used to indicate when the medication was cancelled.
  • TECHNICAL DESCR:  
    Date. This field will only accept input if the status is cancelled.
  • GROUP:  PSO
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  52^AK^MUMPS
    1)= I $P($G(^PSRX(DA,"STA")),"^")=12 S ^PS(55,+$P(^PSRX(DA,0),"^",2),"P","A",X,DA)="" K ^PS(55,+$P(^PSRX(DA,0),"^",2),"P","A",$P($G(^PSRX(DA,2)),"^",6),DA)
    2)= S ^PS(55,$P(^PSRX(DA,0),"^",2),"P","A",$P(^PSRX(DA,2),"^",6),DA)="" K ^PS(55,$P(^PSRX(DA,0),"^",2),"P","A",X,DA)
    3)= DO NOT DELETE !
    This xref is used to update the "P","A" xref in file 55 when prescriptions are cancelled, or the cancel date is edited using fileman. It sets the global ^PS(55,Patient,"P","A",Cancel Date,DA)="".
27 NDC 2;7 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>13!($L(X)<5) X
  • LAST EDITED:  APR 14, 1992
  • HELP-PROMPT:  Answer must be 5-13 characters in length.
  • DESCRIPTION:  
    This field is used for the National Drug Code.
28 MANUFACTURER 2;8 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>50!($L(X)<5) X
  • LAST EDITED:  APR 14, 1992
  • HELP-PROMPT:  Answer must be 5-50 characters in length.
  • DESCRIPTION:  
    This field is used to enter the manufacturer of the drug issued.
29 DRUG EXPIRATION DATE 2;11 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  FEB 05, 2004
  • HELP-PROMPT:  Enter date the medication expires in the package/bottle from the manufacturer.
  • DESCRIPTION:  
    This date is used to show the expiration date of the medication. The date reflects the manufacturer's expiration date, not the date the Rx can no longer be filled.
  • TECHNICAL DESCR:  
    date
  • GROUP:  PSO
30 GENERIC PROVIDER 2;12 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>35!($L(X)<3) X
  • LAST EDITED:  APR 14, 1992
  • HELP-PROMPT:  Answer must be 3-35 characters in length.
  • DESCRIPTION:  
    This field is used to to show a generic provider. A generic provider is a provider of care to the patient outside of the VA.
  • TECHNICAL DESCR:  
    FREE TEXT.
31 RELEASED DATE/TIME 2;13 DATE

  • INPUT TRANSFORM:  S %DT="ESTX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  AUG 03, 1993
  • HELP-PROMPT:  Enter the date/time the medication was released.
  • DESCRIPTION:  This field is used to show the actual date and time the medication was released for inventory purposes and copay billing if applicable.
  • TECHNICAL DESCR:  
    date.
  • CROSS-REFERENCE:  52^AL^MUMPS
    1)= S ^PSRX("AL",X,DA,0)=""
    2)= K ^PSRX("AL",X,DA,0)
    3)= This xref should not be deleted. It is used by the Drug Accountability software(v2).
    This xref creates a 'AL' index for the release date. It sets the global ^PSRX("AL",Released Date/Time,DA,0)="".
  • CROSS-REFERENCE:  52^ACP2^MUMPS
    1)= K:$P(^PSRX(DA,0),"^",2)&($P($G(^(2)),"^",2))&('$P($G(^(2)),"^",15))&($G(^("IB"))) ^PSRX("ACP",$P(^PSRX(DA,0),"^",2),$P(^(2),"^",2),0,DA)
    2)= S:$P(^PSRX(DA,0),"^",2)&($P(^(0),"^",11)="W")&($P($G(^(2)),"^",2))&('$P($G(^(2)),"^",15))&(+$G(^("IB"))) ^PSRX("ACP",$P(^PSRX(DA,0),"^",2),$P(^(2),"^",2),0,DA)=""
    3)= Do Not Delete!
    This cross reference is used to remove the 'ACP' xref once a Rx is released. It can set the global ^PSRX("ACP",Patient,Fill Date,0,DA)="".
  • FIELD INDEX:  ACRO (#461) MUMPS IR ACTION
    Short Descr: Clinical Reminders index.
    Description: This cross-reference builds two indexes, one for finding all patients with a particular drug and one for finding all the drugs a patient has. The indexes are stored in the Clinical Reminders index global as:
    ^PXRMINDX(52,"IP",DRUG,DFN,START DATE,STOP DATE,DAS)
    ^PXRMINDX(52,"PI",DFN,DRUG,START DATE,STOP DATE,DAS) respectively. START DATE is the RELEASE DATE and STOP DATE is calculated by adding the DAYS SUPPLY to the RELEASE DATE. For all the details, see the Clinical Reminders
    Index Technical Guide/Programmer's Manual.
    Set Logic: D SKIDX^PSOPXRMU(.X,.DA,"O","S")
    Kill Logic: D SKIDX^PSOPXRMU(.X,.DA,"O","K")
    Whole Kill: Q
    X(1): DAYS SUPPLY (52,8) (Subscr 1) (forwards)
    X(2): RELEASED DATE/TIME (52,31) (Subscr 2) (forwards)
32 LABEL DATE/TIME L;0 DATE Multiple #52.032 52.032

  • LAST EDITED:  MAR 05, 1992
  • DESCRIPTION:  
    This sub-file is used to indicate when labels are printed for this prescription.
32.1 RETURNED TO STOCK 2;15 DATE

  • INPUT TRANSFORM:  S %DT="ESTX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JUL 08, 1993
  • HELP-PROMPT:  Enter date/time when and if medication was returned to inventory due to not being picked up or mailed to the patient.
  • DESCRIPTION:  
    This field is used to show when and if the medication was returned to stock because the patient did not pick up the meds or it was not mailed.
  • CROSS-REFERENCE:  52^AJ^MUMPS
    1)= S ^PSRX("AJ",X,DA,0)=""
    2)= K ^PSRX("AJ",X,DA,0)
    3)= This xref should not be deleted. It is used by the Drug Accountability software (v2).
    The xref creates a 'AJ' index for the returned to stock date. It sets the global ^PSRX("AJ",Return to Stock,DA,0)="".
32.2 REPRINT 2;14 SET
  • '1' FOR REPRINTED;

  • LAST EDITED:  NOV 23, 1994
  • HELP-PROMPT:  Not set directly by Fileman
  • DESCRIPTION:  
    This field is used to determined if the original fill was reprinted after being returned to stock. If fill was returned to stock and reprinted this fill will be re-released.
  • TECHNICAL DESCR:  
    set of codes.
32.3 BINGO WAIT TIME 2;16 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  FEB 27, 1997
  • HELP-PROMPT:  Type a Number between 1 and 9999, 0 Decimal Digits
  • DESCRIPTION:  
    This field reflects, in minutes, the total wait time for bingo board purposes.
32.4 ACTIVE DUTY OVERRIDE 2;17 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  AUG 27, 2020
  • HELP-PROMPT:  Enter YES or NO for Active Duty Override on the Rx original fill.
  • DESCRIPTION:  
    The field is used to store Active Duty Override if it exists for the Rx original fill.
33 SEVERITY DRI;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1)!('$G(PSODI)) X
  • LAST EDITED:  APR 05, 1993
  • HELP-PROMPT:  Answer must be 1-30 characters in length.
  • DESCRIPTION:  This field is used to store the significant drug interactions encountered by technicians during new/renew order entry. The data will be stored in the form of a string, i.e., 23,43,201. Each number will represent the
    drug/drug interaction found in file #56. Data is not added directly by FileMan.
  • TECHNICAL DESCR:  
    free text.
  • GROUP:  PSO
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
34 AFFECTED MEDICATION DRI;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>120!($L(X)<1)!('$G(PSODI)) X
  • LAST EDITED:  APR 05, 1993
  • HELP-PROMPT:  Answer must be 1-120 characters in length.
  • DESCRIPTION:  
    This field is used to store the active medication pointer values that is considered to be drug interactions.
  • TECHNICAL DESCR:  
    free text
  • GROUP:  PSO
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
34.1 DRUG ALLERGY INDICATION 3;6 SET
  • '1' FOR YES;

  • LAST EDITED:  DEC 13, 1995
  • HELP-PROMPT:  This data is not entered directly with FileMan.
  • DESCRIPTION:  
    This field is used to indicate if a drug allergy event occured.
34.11 DRUG ALLERGY INGREDIENTS DAI;0 Multiple #52.03 52.03

  • DESCRIPTION:  
    This sub-file is used to store drug ingredients of a possible drug allergy and/or an adverse reaction to the medication dispensed in a Rx.
  • TECHNICAL DESCR:  
    sub-file/multiple
35 METHOD OF PICK-UP MP;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>60!($L(X)<2) X
  • LAST EDITED:  OCT 22, 1984
  • HELP-PROMPT:  ANSWER MUST BE 2-60 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    Enter any special instructions that should appear on mailing address portion of the label, specifing where, or when the RX(s) should be picked up.
36 ARCHIVED ARC;1 SET
  • '1' FOR ARCHIVED;

  • LAST EDITED:  AUG 28, 1997
  • HELP-PROMPT:  This field should only be set if the Rx has been archived in Pharmacy.
  • DESCRIPTION:  This field is used to indicate if the Rx has been archived. Once the Rx is marked to be archived and then actually saved to the archived device should this field be populated. This will later be used to determine if the
    Rx can be purged.
37 MEDICATION ROUTES MEDR;0 POINTER Multiple #52.037 52.037

  • DESCRIPTION:  
    This subfile contains possible medication routes from OERR, from the Medication Instructions (SIG) or both.
  • TECHNICAL DESCR:  
    pointer
  • GROUP:  PSO
37.1 SCHEDULES SCH;0 Multiple #52.038 52.038

  • DESCRIPTION:  
    This sub-file contains possible schedules from OERR, Medication Instructions or both.
  • TECHNICAL DESCR:  
    free text.
38 FINISHING PERSON OR1;5 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  AUG 18, 1997
  • HELP-PROMPT:  Data not entered directly with FM.
  • DESCRIPTION:  
    This field is used to indicate the person who finished the order in Pharmacy.
  • TECHNICAL DESCR:  
    poniter.
38.1 FILLING PERSON OR1;6 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  FEB 05, 2004
  • HELP-PROMPT:  Data not entered directly with FM.
  • DESCRIPTION:  
    The name of the pharmacist who scanned the barcode before filling the medication request.
  • TECHNICAL DESCR:  
    pointer
38.2 CHECKING PHARMACIST OR1;7 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  FEB 05, 2004
  • HELP-PROMPT:  Data not entered directly with FM.
  • DESCRIPTION:  
    The name of the pharmacist that checked the medication request.
  • TECHNICAL DESCR:  
    pointer
38.3 FINISH DATE/TIME OR1;8 DATE

  • INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:X<1 X
  • LAST EDITED:  FEB 05, 2007
  • HELP-PROMPT:  (No range limit on date)
  • DESCRIPTION:  
    Date/time prescription is finished.
  • TECHNICAL DESCR:  
    Date/time prescription is finished.
  • CROSS-REFERENCE:  52^AFDT
    1)= S ^PSRX("AFDT",$E(X,1,30),DA)=""
    2)= K ^PSRX("AFDT",$E(X,1,30),DA)
39 PROVIDER COMMENTS PRC;0 WORD-PROCESSING #52.039

  • DESCRIPTION:  
    This field stores any provider comments that are passed to Pharmacy from CPRS.
  • LAST EDITED:  MAY 30, 1995
39.1 PHARMACY INSTRUCTIONS PI;0 WORD-PROCESSING #52.02

  • DESCRIPTION:  
    This field contains Pharmacy Instructions passed to Pharmacy from CPRS.
  • LAST EDITED:  MAY 30, 1995
39.2 PHARMACY ORDERABLE ITEM OR1;1 POINTER TO PHARMACY ORDERABLE ITEM FILE (#50.7) PHARMACY ORDERABLE ITEM(#50.7)

  • LAST EDITED:  MAY 15, 1995
  • HELP-PROMPT:  This data should not be entered by using File Manager.
  • DESCRIPTION:  This is the Pharmacy Orderable Item associated with the drug. This data should not be entered by using File Manager. If the Rx does not have a Pharmacy Orderable Item entered check the drug for the RX. If the drug is
    missing an orderable item match the drug not the Rx. Only matching the Rx will cause problems when renewing the Rx.
  • TECHNICAL DESCR:  
    pointer.
39.3 PLACER ORDER # OR1;2 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  APR 17, 1996
  • HELP-PROMPT:  Type a Number between 1 and 9999999999, 0 Decimal Digits
  • DESCRIPTION:  
    This is the CPRS entry number for this order.
  • CROSS-REFERENCE:  52^APL
    1)= S ^PSRX("APL",$E(X,1,30),DA)=""
    2)= K ^PSRX("APL",$E(X,1,30),DA)
    3)= Do Not Delete!
    This xref is used to index the Rx by oerr's placer number. this is the pointer to oerr's orders file.
39.4 PREVIOUS ORDER # OR1;3 POINTER TO PRESCRIPTION FILE (#52) PRESCRIPTION(#52)

  • LAST EDITED:  JUL 28, 1996
  • DESCRIPTION:  
    This field is used to indicate rx number renewed from
  • CROSS-REFERENCE:  52^AO
    1)= S ^PSRX("AO",$E(X,1,30),DA)=""
    2)= K ^PSRX("AO",$E(X,1,30),DA)
    3)= Do not delete
39.5 FORWARD ORDER # OR1;4 POINTER TO PRESCRIPTION FILE (#52) PRESCRIPTION(#52)

  • LAST EDITED:  JUL 28, 1996
  • DESCRIPTION:  
    This field is used to stored the pointer to the rx that was renewed.
  • CROSS-REFERENCE:  52^AQ
    1)= S ^PSRX("AQ",$E(X,1,30),DA)=""
    2)= K ^PSRX("AQ",$E(X,1,30),DA)
    3)= do not delete.
40 ACTIVITY LOG A;0 DATE Multiple #52.3 52.3

  • LAST EDITED:  MAR 24, 1993
  • DESCRIPTION:  
    Activity Log.
  • TECHNICAL DESCR:  
    Date. Multiple #52.3 (Add new entry without asking).
    WRITE AUTHORITY: ^
41 WAS THE PATIENT COUNSELED PC;1 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  MAY 02, 1995
  • HELP-PROMPT:  If patient was counseled about this Rx enter Yes.
  • DESCRIPTION:  
    This field indicates whether or not the patient received counseling about the prescription.
42 WAS COUNSELING UNDERSTOOD PC;2 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  MAY 02, 1995
  • HELP-PROMPT:  If patient understood counseling received enter 'Yes'.
  • DESCRIPTION:  
    This field indicates whether or not the patient understood the counseling on the prescription, if the patient was counseled.
45.1 TITRATION DOSE RX TIT;1 POINTER TO PRESCRIPTION FILE (#52) PRESCRIPTION(#52)

  • LAST EDITED:  SEP 12, 2012
  • HELP-PROMPT:  Enter the corresponding titration dose prescription number.
  • DESCRIPTION:  
    This is the Titration Dose Rx from which the corresponding Maintenance Dose Rx originated.
45.2 MAINTENANCE DOSE RX TIT;2 POINTER TO PRESCRIPTION FILE (#52) PRESCRIPTION(#52)

  • LAST EDITED:  SEP 12, 2012
  • HELP-PROMPT:  Enter the corresponding maintenance dose prescription.
  • DESCRIPTION:  
    This is the Maintenance Dose Rx that was created from the corresponding Titration Dose Rx.
45.3 TITRATION RX FLAG TIT;3 SET
  • '1' FOR YES;

  • LAST EDITED:  SEP 12, 2012
  • HELP-PROMPT:  Indicate if the prescription is a Titration Dose Prescription.
  • DESCRIPTION:  
    This flag indicates whether the prescription is being dispensed as a Titration Dose. It is intended to identify a Titration Dose Rx without a corresponding Maintenance Dose Rx.
52 REFILL 1;0 DATE Multiple #52.1 52.1

  • OUTPUT TRANSFORM:  NOT EXECUTABLE!! -- SPECIFIER NEEDS AN "O"!
  • LAST EDITED:  MAY 26, 2017
  • DESCRIPTION:  
    This is the date the prescription is refilled.
  • TECHNICAL DESCR:  
    Date Multiple #52.1 (Add new entry without asking).
    SOURCE OF DATA: VAF 10-2577
52.25 REJECT INFO REJ;0 Multiple #52.25 52.25
60 PARTIAL DATE P;0 DATE Multiple #52.2 52.2

  • DESCRIPTION:  
    This sub-file is used to store data on partial prescriptions filled.
  • TECHNICAL DESCR:  
    DATE.
70 RETURN TO STOCK LOG RTS;0 DATE Multiple #52.07 52.07

  • DESCRIPTION:  
    This sub-file contains a record for each fill returned to stock for the prescription.
  • TECHNICAL DESCR:  This sub-file was created with the intent of capturing ALL the fields from a prescription fill when they are returned to stock. The reason was because the entire fill record (Refills and Partial fills) gets deleted when
    the fill is returned to stock. Because we are required to report to the states on a regular basis information about controlled substance prescription fills dispense and returned to stock. By preserving the record before it
    gets deleted we are able to later transmit it to the states.
81 DAW CODE EPH;1 FREE TEXT

  • INPUT TRANSFORM:  D INPUT^PSSDAWUT
  • LAST EDITED:  JUN 27, 2005
  • DESCRIPTION:  
    Dispensed As Written code. This information is used for electronic claim transmission to third party payers (insurance companies).
  • EXECUTABLE HELP:  D HLP^PSSDAWUT
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
82 RE-TRANSMIT FLAG EPH;2 SET
  • '1' FOR YES;

  • LAST EDITED:  OCT 19, 2005
  • DESCRIPTION:  
    This field is used to indicate that a claim should be electronically re-transmitted to the 3rd party insurance. It will be primarily used by CMOP and local mail prescriptions.
83 DATE NDC VALIDATED EPH;3 DATE

  • INPUT TRANSFORM:  S %DT="ETX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 18, 2008
  • HELP-PROMPT:  Enter the date and time that the prescription was validated.
  • DESCRIPTION:  
    This field contains the date and time that the NDC was validated prior to release of the prescription fill.
  • TECHNICAL DESCR:  
    This field is set by the NDC Validation [PSO NDC VALIDATE] option when the NDC on the prescription matches the NDC on the stock bottle.
    UNEDITABLE
84 NDC VALIDATED BY EPH;4 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  DEC 03, 2007
  • HELP-PROMPT:  Enter the User's ID who validated the NDC.
  • DESCRIPTION:  
    This field will contain the user ID of the person who validated the NDC prior to release of the prescription fill.
  • TECHNICAL DESCR:  
    This field is set by the NDC Validation [PSO NDC VALIDATE] option when the NDC on the prescription matches the NDC on the stock bottle.
    UNEDITABLE
85 BILLING ELIGIBILITY INDICATOR EPH;5 SET
  • 'T' FOR TRICARE;
  • 'V' FOR VETERAN;
  • 'C' FOR CHAMPVA;

  • LAST EDITED:  AUG 03, 2011
  • HELP-PROMPT:  Enter T for TRICARE , V for VETERAN, or C for CHAMPVA.
  • DESCRIPTION:  
    This field is set when a prescription is third party insurance billable and will contain T for TRICARE, V for VETERAN or C for CHAMPVA.
  • TECHNICAL DESCR:  
    This field contains the billing eligibility flag passed from ECME upon submission of a claim for the fill.
86 EPHARMACY SUSPENSE HOLD DATE EPH;6 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:X<1 X
  • LAST EDITED:  MAY 07, 2008
  • HELP-PROMPT:  Enter the date the prescription can be removed from suspense hold.
  • DESCRIPTION:  
    This field is defined when a host reject error is received as a result of an ePharmacy claims submission. The prescription fill will be held on suspense until the next day.
  • TECHNICAL DESCR:  This field is defined with a date/time of 24 hours from the date/time the original RX was rejected with either a M6, M8, NN, or 99 host reject error code. This allows the software to resubmit a claim the following day to
    attempt a successful acceptance.
94 BYPASS 3/4 DAY SUPPLY LOGIC 9;2 SET (BOOLEAN Data Type)
  • The setting of this field allows the user to indicate that the normal 3/4 day supply logic should be bypassed when this prescription is sent to CMOP.

  • LAST EDITED:  OCT 29, 2020
  • HELP-PROMPT:  Enter 'Yes' if you wish the system to bypass the 3/4 day supply logic during the processing of CMOP prescriptions.
  • DESCRIPTION:  
    The setting of this field allows the user to indicate that the normal 3/4 day supply logic should be bypassed when this prescription is sent to CMOP.
99 HOLD REASON H;1 SET
************************REQUIRED FIELD************************
  • '1' FOR INSUFFICIENT QTY IN STOCK;
  • '2' FOR DRUG-DRUG INTERACTION;
  • '4' FOR PROVIDER TO BE CONTACTED;
  • '6' FOR ADVERSE DRUG REACTION;
  • '7' FOR BAD ADDRESS;
  • '8' FOR PER PATIENT REQUEST;
  • '9' FOR CONSULT/PRIOR APPROVAL NEEDED;
  • '98' FOR OTHER/TECH (NON-CLINICAL);
  • '99' FOR OTHER/RPH (CLINICAL);

  • LAST EDITED:  MAY 31, 2012
  • HELP-PROMPT:  Enter reason medication is placed in a 'Hold' status.
  • DESCRIPTION:  
    This field tells why the prescription was put on hold.
  • TECHNICAL DESCR:  
    Enter reason medication is being placed in a 'Hold' status.
  • CROSS-REFERENCE:  52^AH
    1)= S ^PSRX("AH",$E(X,1,30),DA)=""
    2)= K ^PSRX("AH",$E(X,1,30),DA)
99.1 HOLD COMMENTS H;2 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>100!($L(X)<10) X
  • LAST EDITED:  MAY 06, 1992
  • HELP-PROMPT:  Enter brief comments on why medication was placed on 'Hold'. Answer must be 10-100 characters in length.
  • DESCRIPTION:  
    This field is used to enter brief comments on why the medication was placed on 'Hold' status.
  • TECHNICAL DESCR:  
    Free text.
  • GROUP:  PSO
99.2 HOLD DATE H;3 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAY 13, 1992
  • HELP-PROMPT:  Enter date that medication was placed in a 'Hold' status.
  • DESCRIPTION:  
    This field is used to indicate the date that a prescription was placed on hold.
100 STATUS STA;1 SET
************************REQUIRED FIELD************************
  • '0' FOR ACTIVE;
  • '1' FOR NON-VERIFIED;
  • '2' FOR REFILL;
  • '3' FOR HOLD;
  • '4' FOR DRUG INTERACTIONS;
  • '5' FOR SUSPENDED;
  • '10' FOR DONE;
  • '11' FOR EXPIRED;
  • '12' FOR DISCONTINUED;
  • '13' FOR DELETED;
  • '14' FOR DISCONTINUED BY PROVIDER;
  • '15' FOR DISCONTINUED (EDIT);
  • '16' FOR PROVIDER HOLD;

  • LAST EDITED:  NOV 04, 1997
  • DESCRIPTION:  
    This field represents the current status of the prescription.
  • TECHNICAL DESCR:  
    set of codes.
100.1 DISCONTINUE TYPE 7;1 SET
  • '1' FOR HOSPITAL ADMISSION;
  • '2' FOR EDITED BY PROVIDER;

  • LAST EDITED:  MAY 10, 2007
  • HELP-PROMPT:  Data should not be entered directly with FileMan.
  • DESCRIPTION:  
    This field is used to distinguish what type of external discontinue action occurred.
  • TECHNICAL DESCR:  
    set of codes.
100.2 MAIL EXEMPTION 7;2 SET
  • '0' FOR REGULAR MAIL;
  • '1' FOR CERTIFIED MAIL;
  • '2' FOR DO NOT MAIL;
  • '3' FOR LOCAL - REGULAR;
  • '4' FOR LOCAL - CERTIFIED;

  • LAST EDITED:  APR 26, 2024
  • HELP-PROMPT:  Choose the Mail Exemption for patient's Rx.
  • DESCRIPTION:  This field is used to: A) Determine whether this patient's Rx is to be sent to the CMOP, or retained for local distribution. If 2-4 are selected, this Rx will not be transmitted to the CMOP. B) Select what the mail
    priority is. The CMOP choices are limited to (0) REGULAR and (1) CERTIFIED. Local mail may be designated (3) LOCAL - REGULAR or (4) LOCAL - CERTIFIED. The 'DO NOT MAIL' code (2) may be used to ensure that the patient's Rx
    is not mailed.
101 LAST DISPENSED DATE 3;1 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAR 05, 1992
  • HELP-PROMPT:  Enter date that he presciption was last filled.
  • DESCRIPTION:  
    This field contains the last fill date.
  • TECHNICAL DESCR:  
    Date.
102 NEXT POSSIBLE FILL 3;2 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  NOV 20, 1992
  • DESCRIPTION:  
    This field contains the next possible fill date.
  • TECHNICAL DESCR:  
    Date.
102.1 PRIOR FILL DATE 3;4 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 25, 1993
  • HELP-PROMPT:  Data is not entered through file manager.
  • DESCRIPTION:  
    This field is used to indicate the last date the prescription was filled. The dates in this field will be the date of the last renew from a previous rx, and any subsequent fills.
  • TECHNICAL DESCR:  
    date.
  • GROUP:  PSO
102.2 PENDING NEXT POSSIBLE FILLDATE 3;8 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  DEC 27, 1996
  • DESCRIPTION:  
    This field is to contain the next possible filldate if the Rx was discontinued prior to the original label printing. If the Rx is reinstated this date will be restored to field 102 (next possbile filldate).
103 NEW DRUG DRG;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  SEP 14, 1985
  • HELP-PROMPT:  ANSWER MUST BE 1-30 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    This field is used to enter a new drug.
104 VERIFYING PHARMACIST 2;10 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • INPUT TRANSFORM:  S DIC("S")="I $D(^XUSEC(""PSORPH"",Y))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JAN 26, 1993
  • HELP-PROMPT:  Enter name of pharmacist that is verifing the prescription.
  • DESCRIPTION:  
    This field is used to show the pharmacist that verified the prescription
  • SCREEN:  S DIC("S")="I $D(^XUSEC(""PSORPH"",Y))"
  • EXPLANATION:  Only valid verifying pharmacist are to be selected.
    UNEDITABLE
105 COPAY TRANSACTION TYPE IB;1 POINTER TO IB ACTION TYPE FILE (#350.1) IB ACTION TYPE(#350.1)

  • LAST EDITED:  APR 17, 1991
  • DESCRIPTION:  
    This field contains the internal entry number of the pointer to the IB Action Type file (#350.1).
    DELETE AUTHORITY: ^
    WRITE AUTHORITY: ^
    UNEDITABLE
106 IB NUMBER IB;2 POINTER TO INTEGRATED BILLING ACTION FILE (#350) INTEGRATED BILLING ACTION(#350)

  • LAST EDITED:  APR 17, 1991
  • DESCRIPTION:  
    This field contains the internal entry number of the pointer to the Integrated Billing Action file (#350).
    DELETE AUTHORITY: ^
    WRITE AUTHORITY: ^
    UNEDITABLE
106.5 COPAY TYPE AUDIT IB;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>1!($L(X)<1) X
  • LAST EDITED:  DEC 11, 1996
  • HELP-PROMPT:  Answer must be 1 character in length.
  • DESCRIPTION:  
    This field serves as an audit of the original copay status. It is not changed or reset if the orignal status is changed.
    UNEDITABLE
106.6 COPAY EXCEEDING CAP IB;4 POINTER TO IB COPAY TRANSACTIONS FILE (#354.71) IB COPAY TRANSACTIONS(#354.71)

  • LAST EDITED:  SEP 04, 2001
  • HELP-PROMPT:  This field contains the internal entry number of the pointer to the IB COPAY TRANSACTIONS FILE (#354.71)
  • DESCRIPTION:  
    This field contains the internal entry number of the pointer to the IB COPAY TRANSACTIONS file (#354.71). There will only be data in this field if this Rx's copay exceeded the annual copay cap.
  • TECHNICAL DESCR:  
    This field contains the internal entry number of the pointer to the IB COPAY TRANSACTIONS file (#354.71). There will only be data in this field if this Rx's copay exceeded the annual copay cap.
107 COPAY ACTIVITY LOG COPAY;0 DATE Multiple #52.0107 52.0107

  • LAST EDITED:  JUL 16, 2001
108 DELETION COMMENTS D;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>100!($L(X)<5) X
  • LAST EDITED:  NOV 15, 1990
  • HELP-PROMPT:  Answer must be 5-100 characters in length.
  • DESCRIPTION:  
    This field is used to enter comments on why a prescription was marked as deleted.
  • TECHNICAL DESCR:  
    required.
109 COSIGNING PHYSICIAN 3;3 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • INPUT TRANSFORM:  S DIC("S")="I $D(^(""PS"")),$P(^(""PS""),""^""),'$P(^(""PS""),""^"",7),$S('$P(^(""PS""),""^"",4):1,1:$P(^(""PS""),""^"",4)'
  • LAST EDITED:  MAR 23, 1993
  • DESCRIPTION:  
    This field identifies the cosigning physician for prescriptions written by a provider for whom a counter signature is required, for example a nurse practitioner.
  • TECHNICAL DESCR:  
    pointer
  • SCREEN:  S DIC("S")="I $D(^(""PS"")),$P(^(""PS""),""^""),'$P(^(""PS""),""^"",7),$S('$P(^(""PS""),""^"",4):1,1:$P(^(""PS""),""^"",4)'
  • EXPLANATION:  Select an active provider who does not require a cosigner.
  • CROSS-REFERENCE:  52^ANCO^MUMPS
    1)= K ^PSRX("ANCO",DA)
    2)= I $D(^VA(200,+$P(^PSRX(DA,0),"^",4),"PS")),$P(^("PS"),"^",7) S ^PSRX("ANCO",DA)=""
    3)= Do not delete.
    This cross reference lists the internal record number if the physician requires a cosigning physician. It sets the global ^PSRX("ANCO",DA)="".
110 TYPE OF RX TYPE;1 NUMBER

  • INPUT TRANSFORM:  K X
  • LAST EDITED:  JUN 10, 1992
  • HELP-PROMPT:  Data is not entered directly with FileMan.
  • DESCRIPTION:  
    This field is used to indicate if the rx dispensed is a partial or normal process rx. If partial medication was dispensed this will be equal to the entry number else the field will be equal to zero.
  • TECHNICAL DESCR:  
    number
  • GROUP:  pso
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
111 POE RX POE;1 SET
  • '1' FOR YES;

  • LAST EDITED:  MAY 06, 2000
  • HELP-PROMPT:  This field will be set for all prescriptions, this includes prescriptions entered before installation of PSO*7*46.
  • DESCRIPTION:  This field shall be set whenever a new/renew prescription is entered after the Pharmacy Ordering Enhancements software for Outpatient Pharmacy has been installed. This field will set to 1 for all pre-POE Rxs during the
    install of PSO*7*46.
  • TECHNICAL DESCR:  
    set of codes.
112 ORIGINAL QTY 3;9 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99999999)!(X<.01)!(X?.E1"."3N.N) X
  • LAST EDITED:  MAY 06, 2000
  • HELP-PROMPT:  This field allows numeric entries only, both for CMOP Rxs and non-CMOP Rxs. It requires a number between .01 and 99999999, a maximum of 2 fractional decimals.
  • DESCRIPTION:  
    This field will hold the quantity that was filled for the original fill of the Rx.
  • TECHNICAL DESCR:  
    numeric.
113 MEDICATION INSTRUCTIONS 6;0 Multiple #52.0113 52.0113

  • LAST EDITED:  MAY 06, 2000
  • DESCRIPTION:  
    This sub-file will contain the dispense units per dosage ordered, dosage ordered, units, noun, duration and conjunction fields.
  • TECHNICAL DESCR:  
    sub-file.
114 PATIENT INSTRUCTIONS INS;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>240!($L(X)<1) X
  • LAST EDITED:  MAY 11, 2000
  • HELP-PROMPT:  Enter patient instructions. Answer must be 1-240 characters in length.
  • DESCRIPTION:  
    The text in this field shall be used for the Patient Instructions in the Outpatient Pharmacy package when entering orders, if the Dispense Drug selected is matched to a Pharmacy Orderable Item with patient instructions.
  • TECHNICAL DESCR:  
    free text.
114.1 OTHER PATIENT INSTRUCTIONS INSS;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>245!($L(X)<1) X
  • LAST EDITED:  OCT 09, 2002
  • HELP-PROMPT:  Enter Other Patient Instructions. Answer must be 1-245 characters in length.
  • DESCRIPTION:  
    This field will be used to store the Other Language Patient Instructions when added.
  • TECHNICAL DESCR:  
    free text.
  • GROUP:  PSO
115 EXPANDED PATIENT INSTRUCTIONS INS1;0 WORD-PROCESSING #52.0115

  • LAST EDITED:  FEB 08, 2001
  • DESCRIPTION:  
    This field will store the expanded patient instructions that are stored in the patient instruction field (#114) or the expanded patient instructions from CPRS.
  • TECHNICAL DESCR:  
    wp
116 SERVICE CONNECTED IBQ;1 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  AUG 14, 2001
  • HELP-PROMPT:  Enter 'Yes' if this prescription is for a Service Connected condition.
  • DESCRIPTION:  During Outpatient Pharmacy order entry, a pharmacist may be asked if the medication being prescribed is for a service connected condition. This field will store the pharmacist's response to this question. The value in this
    field will be used to evaluate whether or not a copay should be applied to the prescription. This value will also be used as a default should this question be raised again during the life of the prescription when a
    prescription fill is being released, or as the default for the question upon renewal of the prescription through CPRS or Outpatient Pharmacy.
117 MILITARY SEXUAL TRAUMA IBQ;2 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  AUG 14, 2001
  • HELP-PROMPT:  Enter 'Yes' if this prescription is being used for treatment of Military Sexual Trauma.
  • DESCRIPTION:  During Outpatient Pharmacy order entry, if a veteran has been identified as having been treated for Military Sexual Trauma, the pharmacist may be asked to identify whether or not the medication prescribed is being used to
    treat a condition related to Military Sexual Trauma. This field will store the pharmacist's response to this question. The value in this field will be used to evaluate whether or not a copay should be applied to the
    prescription. This value will also be used as a default should this question be raised again during the life of the prescription when a prescription fill is being released, or as the default for the question upon renewal
    of the prescription through CPRS or Outpatient Pharmacy.
118 AGENT ORANGE EXPOSURE IBQ;3 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  OCT 23, 2001
  • HELP-PROMPT:  Enter 'Yes' if this prescription is being used for treatment of Vietnam-Era herbicide exposure.
  • DESCRIPTION:  During Outpatient Pharmacy order entry, if a veteran has been identified as having been exposed to Agent Orange during Vietnam service, the pharmacist may be asked to identify whether or not the medication prescribed is
    being used to treat a condition due to this exposure. This field will store the pharmacist's response to this question. The value in this field will be used to evaluate whether or not a copay should be applied to the
    prescription. This value will also be used as a default should this question be raised again during the life of the prescription when a prescription fill is being released, or as the default for the question upon renewal
    of the prescription through CPRS or Outpatient Pharmacy.
119 IONIZING RADIATION EXPOSURE IBQ;4 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  OCT 23, 2001
  • HELP-PROMPT:  Enter 'Yes' if this prescription is being used to treat a condition due to ionizing radiation exposure during military service.
  • DESCRIPTION:  During Outpatient Pharmacy order entry, if a veteran has been identified as having been exposed to ionizing radiation during military service, the pharmacist may be asked to identify whether or not the medication
    prescribed is being used to treat a condition due to this exposure. This field will store the pharmacist's response to this question. The value in this field will be used to evaluate whether or not a copay should be
    applied to the prescription. This value will also be used as a default should this question be raised again during the life of the prescription when a prescription fill is being released, or as the default for the question
    upon renewal of the prescription through CPRS or Outpatient Pharmacy.
120 SOUTHWEST ASIA CONDITIONS IBQ;5 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  JUN 27, 2006
  • HELP-PROMPT:  Enter 'Yes' if this prescription is being used to treat a condition related to service in Southwest Asia.
  • DESCRIPTION:  During Outpatient Pharmacy order entry, if a veteran has been identified as having been exposed to Southwest Asia Conditions (formerly referred to as Environmental Contaminants), the pharmacist may be asked to identify
    whether or not the medication prescribed is being used to treat a condition due to this exposure. This field will store the pharmacist's response to this question. The value in this field will be used to evaluate whether
    or not a copay should be applied to the prescription. This value will also be used as a default should this question be raised again during the life of the prescription when a prescription fill is being released, or as
    the default for the question upon renewal of the prescription through CPRS or Outpatient Pharmacy.
120.01 DDSTATUS DDSTA;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>10!($L(X)<1) X
  • LAST EDITED:  MAY 13, 2002
  • HELP-PROMPT:  Answer must be 1-10 characters in length.
  • DESCRIPTION:  
    This field will hold the status of the prescription at the time a date of death was entered.
  • TECHNICAL DESCR:  
    free text.
120.02 DATE OF DEATH HISTORY DDSTA;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>235!($L(X)<1) X
  • LAST EDITED:  MAY 13, 2002
  • HELP-PROMPT:  Answer must be 1-235 characters in length.
  • DESCRIPTION:  This field will be used to take a snapshot of the Rx at the time it was discontinued due to a date of death being entered for the patient. This data will be used to restore the Rx to the state before the date of death was
    entered.
  • TECHNICAL DESCR:  
    free text.
121 HEAD AND/OR NECK CANCER IBQ;6 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  OCT 23, 2001
  • HELP-PROMPT:  Enter 'Yes' if this prescription is being used to treat Head and/or Neck Cancer due to nose or throat radium treatments while in the military.
  • DESCRIPTION:  During Outpatient Pharmacy order entry, if a veteran has been identified as having been treated for Head and/or Neck Cancer due to nose or throat radium treatments while in the military, the pharmacist may be asked to
    identify whether or not the medication prescribed is being used to treat this condition. This field will store the pharmacist's response to this question. The value in this field will be used to evaluate whether or not a
    copay should be applied to the prescription. This value will also be used as a default should this question be raised again during the life of the prescription when a prescription fill is being released, or as the default
    for the question upon renewal of the prescription through CPRS or Outpatient Pharmacy.
122 COMBAT VETERAN IBQ;7 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  DEC 11, 2003
  • HELP-PROMPT:  Enter 'Yes' if this prescription is being used to treat a condition related to Combat Services.
  • DESCRIPTION:  During Outpatient Pharmacy order entry, a pharmacist may be asked if the medication being prescribed is for a condition related to Combat Services while in the military. This field will store the pharmacist's response to
    this question. The value in this field will be used to evaluate whether or not a copay should be applied to the prescription. This value will also be used as a default should this question be raised again during the life
    of the prescription.
122.01 PROJ 112/SHAD IBQ;8 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  JAN 17, 2006
  • HELP-PROMPT:  Enter 'Yes' if this prescription is being used to treat a condition related to PROJ 112/SHAD
  • DESCRIPTION:  During Outpatient Pharmacy order entry, a pharmacist may be asked if the medication being prescribed is for a condition related to PROJ 112/SHAD while in the military. This field will store the pharmacist's response to
    this question. The value in this field will be used to evaluate whether or not a copay should be applied to the prescription. This value will also be used as a default should this question be raised again during the life
    of the prescription.
123 EXTERNAL PLACER ORDER NUMBER EXT;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  AUG 05, 2002
  • HELP-PROMPT:  Answer must be 1-30 characters in length.
  • DESCRIPTION:  
    This field represents the external system order number of this order. This field will only be populated if this order was originally received from an external system into Vista.
    UNEDITABLE
  • RECORD INDEXES:  D (#175)
124 EXTERNAL APPLICATION EXT;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>60!($L(X)<1) X
  • LAST EDITED:  AUG 05, 2002
  • HELP-PROMPT:  Answer must be 1-60 characters in length.
  • DESCRIPTION:  
    This field represents the name of the external system from where the external order was received.
    UNEDITABLE
  • RECORD INDEXES:  D (#175)
125 PFSS ACCOUNT REFERENCE PFS;1 POINTER TO PFSS ACCOUNT FILE (#375) PFSS ACCOUNT(#375)

  • INPUT TRANSFORM:  K:+X'=X!(X>9999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  AUG 12, 2005
  • DESCRIPTION:  
    This is a reference number to an external medical billing system Account Number for the purposes of uniquely identifying prescription charges for 1st or 3rd party billing.
  • TECHNICAL DESCR:  This field was introduced as part of the Patient Financial Services System (PFSS) project to implement a new COTS billing system. It requires that every prescription fill passed to the external billing system to attach a
    unique account/visit number. The IBB API GETACCT^IBBAPI provides this data and is stored during prescription order creation as part of the data.
    DELETE AUTHORITY: ^
    WRITE AUTHORITY: ^
    UNEDITABLE
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
126 PFSS CHARGE ID PFS;2 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99999999)!(X<90000000)!(X?.E1"."1.N) X
  • LAST EDITED:  MAY 18, 2005
  • HELP-PROMPT:  Type a number between 90000000 and 99999999, 0 Decimal Digits
  • DESCRIPTION:  
    This is another unique identifier required when prescription charge messages are passed to the external billing system.
  • TECHNICAL DESCR:  This field was introduced as part of the Patient Financial Services System (PFSS) project to implement a new COTS billing system. It requires that every prescription charge transaction passed to the external billing system
    to attach a unique charge identifier. The IBB API GETCHGID^IBBAPI provides this data.
    DELETE AUTHORITY: ^
    WRITE AUTHORITY: ^
127 LAST DISPENSED DATE HOLDER 3;10 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JUL 13, 2006
  • DESCRIPTION:  
    This field is a holder for the last dispensed date.
128 INDICATION FOR USE IND;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>40!($L(X)<3) X
    MAXIMUM LENGTH: 40
  • LAST EDITED:  JUL 09, 2020
  • HELP-PROMPT:  Enter the Indication For Use. Answer must be 3-40 characters in length.
  • DESCRIPTION:  
    This field contains the Indication For Use that is chosen when the medication is ordered.
129 INDICATION FOR USE FLAG IND;2 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  FEB 10, 2020
  • HELP-PROMPT:  Enter 1 to include the indication for use in the SIG, 0 to not include.
  • DESCRIPTION:  
    This field will indicate whether to include the Indication For Use in the SIG or not. 1 - to include in the SIG, 0 - not to include.
130 OTHER INDICATION FOR USE IND;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>40!($L(X)<3) X
    MAXIMUM LENGTH: 40
  • LAST EDITED:  NOV 25, 2019
  • HELP-PROMPT:  Enter the Other Language Indication For Use. Answer must be 3-40 characters in length.
  • DESCRIPTION:  
    This field contains the Other Language Indication For Use that is chosen when the medication is ordered.
201 TPB RX TPB;1 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  DEC 16, 2003
  • HELP-PROMPT:  Enter 'Yes' is this prescription is part of the Transitional Pharmacy Benefit project.
  • DESCRIPTION:  
    If this field is set to 'Yes', that indicates that this prescription has been created as part of the Transitional Pharmacy Benefit project. This field is controlled by the software.
301 CLOZAPINE DOSAGE (MG/DAY) SAND;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>3000)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  AUG 16, 1991
  • HELP-PROMPT:  Type a Number between 0 and 3000, 0 Decimal Digits
  • DESCRIPTION:  
    This is the total daily dosage of clozapine if this prescription is for the drug clozapine. This is used only for clozapine.
302 WBC RESULTS SAND;2 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99999)!(X<0)!(X?.E1"."4.N) X
  • LAST EDITED:  JUL 18, 2006
  • HELP-PROMPT:  Type a number between 0 and 99999, 3 Decimal Digits
  • DESCRIPTION:  
    This is the results of the WBC test which was used to authorize the clozapine prescription. This will exist only for clozapine prescriptions.
  • TECHNICAL DESCR:  
    This is provided by the Mental Health API $$CL^YSCLTST2(DFN) patch YS*5.01*90 as Mental Health monitor the Clozapine patient.
303 DATE OF WBC TEST SAND;3 DATE

  • INPUT TRANSFORM:  S %DT="ETX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  SEP 01, 1992
  • DESCRIPTION:  
    This is the date of the WBC test which authorized the clozapine prescription. It is used only for clozapine prescriptions.
304 ANC RESULTS SAND;4 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99999)!(X<0)!(X?.E1"."4.N) X
  • LAST EDITED:  JUL 18, 2006
  • HELP-PROMPT:  Type a number between 0 and 99999, 3 Decimal Digits
  • DESCRIPTION:  
    This is the results of the ANC test that was used to authorize the clozapine prescription. This will exist only for clozapine prescriptions.
  • TECHNICAL DESCR:  
    This is provided by the Mental Health API $$CL^YSCLTST2(DFN) patch YS*5.01*90 as Mental Health monitor the Clozapine patient.
310 SIGNATURE STATUS PKI;1 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  AUG 09, 2002
  • HELP-PROMPT:  Data not entered directly with file manager.
  • DESCRIPTION:  
    Digital Signature status indicator.
  • TECHNICAL DESCR:  
    This field will be used to indicate the digital signature status of an order. A value of '1' will indicate that the original order was digitally signed.
311 BACKDOOR SIGNATURE STATUS PKI;2 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  SEP 18, 2012
  • HELP-PROMPT:  Was the order entered via backdoor?
  • DESCRIPTION:  
    This field indicates whether a controlled substance order, schedule (I-V), was not digitally signed but entered via backdoor.
312 ERX SIGNATURE STATUS PKI;3 SET (BOOLEAN Data Type)
  • eRx Digital Signature status indicator.

  • LAST EDITED:  OCT 25, 2021
  • HELP-PROMPT:  Indicate whether the eRx was digitally signed or not.
  • DESCRIPTION:  
    eRx Digital Signature status indicator.
  • TECHNICAL DESCR:  
    This field will be used to indicate whether the eRx prescription was digitally signed or not.
400 CMOP EVENT 4;0 POINTER Multiple #52.01 52.01

  • LAST EDITED:  JUN 16, 1994
  • TECHNICAL DESCR:  
    Pointer to the CMOP Transmission file #550.2.
401 LOT/EXP 5;0 Multiple #52.0401 52.0401
725 NATIONAL DATA UTILITY CLEANUP NDUC;0 DATE Multiple #52.0725 52.0725

  • DESCRIPTION:  This NATIONAL DATA UTILITY CLEANUP multiple is defined to store modifications to a prescription for Dosage and SIG as a result of a background clean-up utility. It can be used by other projects in the future.
    For its first use, Outpatient Pharmacy patch PSO*7*433 and Computerized Patient Record System (CPRS) Patch OR*3*378 addresses reported problems where the Drug Name and/or the date in VA FileMan format can mistakenly appear
    in the Dosage and Sig fields of an entry in PRESCRIPTION file (#52). The NATIONAL DATA UTILITY CLEANUP fields will only be defined when corrections to the Dosage and Sig fields are completed or attempted. For those
    prescriptions where a correction was unsuccessful, an error or comment will be stored in COMMENTS field (#5).
  • TECHNICAL DESCR:  In Pharmacy the invalid data will first be removed from the appropriate Dosage fields, and after that the Sig will be rebuilt. The old and new values will be stored in the associated fields within NATIONAL DATA UTILITY
    CLEANUP fields.
52311 ICD DIAGNOSIS ICD;0 POINTER Multiple #52.052311 52.052311

  • LAST EDITED:  APR 01, 2004
521011 HOSPITAL COVERAGE BOOLEAN COMPUTED

  • MUMPS CODE:  S X=$S('$D(^PSRX(D0,0)):0,$P(^PSRX(D0,0),"^",2)="":0,$D(^DPT($P(^PSRX(D0,0),"^",2),4)):$P(^(4),"^",5),1:0)
  • ALGORITHM:  S X=$S('$D(^PSRX(D0,0)):0,$P(^PSRX(D0,0),"^",2)="":0,$D(^DPT($P(^PSRX(D0,0),"^",2),4)):$P(^(4),"^",5),1:0)
  • LAST EDITED:  JUN 09, 1990
  • DESCRIPTION:  
    This field is used to compute hospital coverage from MAS.
521012 PARK PARK;1 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  MAR 10, 2015
  • HELP-PROMPT:  Enter YES if prescription is to be parked until requested.
  • DESCRIPTION:  
    This field indicates whether the prescription is to be parked until requested.
  • CROSS-REFERENCE:  52^APARK
    1)= S ^PSRX("APARK",$E(X,1,30),DA)=""
    2)= K ^PSRX("APARK",$E(X,1,30),DA)
    This cross reference stores the IENs of prescriptions that have been parked. It is used to produce the Active/Park Prescriptions report.

ICR, Total: 4

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #2678
  • Clinical Information Resource Network
    		•  RELEASED DATE/TIME (31).
    Access: Direct Global Read & w/Fileman

    SIG1 (.01).
    Access: Direct Global Read & w/Fileman

    REFILL (52).
    Access: Direct Global Read & w/Fileman

    REFILL DATE (.01).
    Access: Direct Global Read & w/Fileman

    QTY (1).
    Access: Direct Global Read & w/Fileman

    RETURNED TO STOCK (14).
    Access: Direct Global Read & w/Fileman

    PARTIAL DATE (.01).
    Access: Direct Global Read & w/Fileman

    QTY (.04).
    Access: Direct Global Read & w/Fileman

    RETURNED TO STOCK (5).
    Access: Direct Global Read & w/Fileman

    REASON (.02).
    Access: Direct Global Read & w/Fileman

    COMMENT (.05).
    Access: Direct Global Read & w/Fileman
    ICR #2905
  • Text Integration Utility
    		•  DRUG (6).
    Access: Direct Global Read & w/Fileman

    PHARMACY ORDERABLE ITEM (39.2).
    Access: Direct Global Read & w/Fileman
    ICR #6149
  • VA Point of Service
  • Order Entry Results Reporting
    		•  RX # (.01).
    Access: Read w/Fileman

    # OF REFILLS (9).
    Access: Read w/Fileman

    PLACER ORDER # (39.3).
    Access: Read w/Fileman

    PREVIOUS ORDER # (39.4).
    Access: Read w/Fileman

    FORWARD ORDER # (39.5).
    Access: Read w/Fileman

    STATUS (100).
    Access: Read w/Fileman

    REMARKS (12).
    Access: Read w/Fileman

    NDC (27).
    Access: Read w/Fileman

    RELEASED DATE/TIME (31).
    Access: Read w/Fileman
    ICR #6907
  • Integrated Billing
    		•  DAYS SUPPLY (8).
    Access: Read w/Fileman

    RELEASED DATE/TIME (31).
    Access: Read w/Fileman

    RELEASED DATE/TIME (17).
    Access: Read w/Fileman
    Info |  Desc |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR  | All