Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Local Variables  | All
Print Page as PDF
Global: ^PS(52.4

Package: Outpatient Pharmacy

Global: ^PS(52.4


Information

FileMan FileNo FileMan Filename Package
52.4 RX VERIFY Outpatient Pharmacy

Description

Directly Accessed By Routines, Total: 37

Package Total Routines
Outpatient Pharmacy 37 PSOAUTOC    PSOCAN2    PSOCAN3    PSOCMOP    PSODGDG2    PSODGDGP    PSOFIXVR    PSOFIXVS
PSOHCSUM    PSOHLDC    PSOHLDS3    PSOHLEXP    PSOHLNE2    PSOHLSG3    PSOLBL    PSOLBLD
PSOLLL8    PSOLLLI    PSOMAUEX    PSOORDER    PSOORED1    PSOORUTL    PSOPKIV1    PSORXDL
PSORXED    PSORXL1    PSORXPR    PSORXRP1    PSORXRP2    PSORXRPT    PSOUTL    PSOVCNT
PSOVER    PSOVER1    PSOVRPT    SORT GROUP    ^PS(52.4    

Accessed By FileMan Db Calls, Total: 23

Package Total Routines
Outpatient Pharmacy 23 PSOARCDE    PSOARCS2    PSOAUTOC    PSOCAN2    PSOCAN3    PSODGDG1    PSODGDG2    PSODGDGI
PSODGDGP    PSOFIXVS    PSOHLDC    PSOHLEXP    PSOHLNE2    PSOMAUEX    PSOORED1    PSOORUTL
PSOPKIV1    PSORXDL    PSOUTL    PSOVER    PSOVER1    PSOVER2    PSOVRPT    

Pointer To FileMan Files, Total: 3

Package Total FileMan Files
Kernel 1 NEW PERSON(#200)[2]    
Outpatient Pharmacy 1 PRESCRIPTION(#52)[.01, 3]    
Registration 1 PATIENT(#2)[1]    

Fields, Total: 11

Field # Name Loc Type Details
.01 RX# 0;1 POINTER TO PRESCRIPTION FILE (#52)
************************REQUIRED FIELD************************
PRESCRIPTION(#52)

  • INPUT TRANSFORM:  S DINUM=X Q
  • LAST EDITED:  JUN 12, 1992
  • HELP-PROMPT:  Prescription number of Non-Verified script
  • DESCRIPTION:  
    This refers back to the prescription number within the PRESCRIPTION file.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  52.4^B
    1)= S ^PS(52.4,"B",$E(X,1,30),DA)=""
    2)= K ^PS(52.4,"B",$E(X,1,30),DA)
    3)= Do not delete.
    This cross reference lists the Rx# then interal entry number.
  • RECORD INDEXES:  DW (#897)
1 PATIENT NAME 0;2 POINTER TO PATIENT FILE (#2) PATIENT(#2)

  • LAST EDITED:  MAR 11, 1993
  • HELP-PROMPT:  Enter name of patient.
  • DESCRIPTION:  
    This field is used to store the patient's name.
  • TECHNICAL DESCR:  
    pointer.
  • CROSS-REFERENCE:  52.4^C
    1)= S ^PS(52.4,"C",$E(X,1,30),DA)=""
    2)= K ^PS(52.4,"C",$E(X,1,30),DA)
2 CLERK 0;3 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  JUN 29, 1992
  • DESCRIPTION:  
    Respond by entering the name of the clerk who entered the prescription.
  • CROSS-REFERENCE:  52.4^D
    1)= S ^PS(52.4,"D",$E(X,1,30),DA)=""
    2)= K ^PS(52.4,"D",$E(X,1,30),DA)
3 RENEWED FROM RX# 0;4 POINTER TO PRESCRIPTION FILE (#52) PRESCRIPTION(#52)

  • HELP-PROMPT:  Enter the prescription number FROM which the prescription was renewed.
  • DESCRIPTION:  
    This field is used to enter the Rx number from which the Rx was renewed.
4 LOGIN DATE 0;5 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  APR 18, 1986
  • DESCRIPTION:  
    This field is used to enter the date when the data was entered.
  • CROSS-REFERENCE:  52.4^LD
    1)= S ^PS(52.4,"LD",$E(X,1,30),DA)=""
    2)= K ^PS(52.4,"LD",$E(X,1,30),DA)
5 PSORXD0 0;6 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>35!($L(X)<1) X
  • LAST EDITED:  OCT 21, 1986
  • HELP-PROMPT:  ANSWER MUST BE 1-35 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    This field is currently not in use.
    UNEDITABLE
6 PSORXEXP 0;7 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>12!($L(X)<1) X
  • LAST EDITED:  OCT 21, 1986
  • HELP-PROMPT:  ANSWER MUST BE 1-12 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    This field is currently not in use.
    UNEDITABLE
7 DRUG INTERACTION 0;8 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • INPUT TRANSFORM:  K:'$G(PSODI) X
  • LAST EDITED:  JUN 29, 1992
  • HELP-PROMPT:  Data not entered directly with file manager.
  • DESCRIPTION:  
    This field will be used to indicate if a drug/drug interaction was encountered from new order entry or editing of a drug in an active Rx.
  • TECHNICAL DESCR:  
    set of codes.
  • GROUP:  PSO
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  52.4^ADI^MUMPS
    1)= S:X=1 ^PS(52.4,"ADI",DA,X)=""
    2)= K:X=1 ^PS(52.4,"ADI",DA,X)
    3)= do not delete!!
    This cross reference is to be use to index medication that has drug/drug interactions. It sets the global ^PS(52.4,"ADI",DA,Drug Interaction)="".
7.1 SEVERITY 0;9 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1)!('$G(PSODI)) X
  • LAST EDITED:  JUN 29, 1992
  • HELP-PROMPT:  Answer must be 1-30 characters in length.
  • DESCRIPTION:  This field is used to store the pointer values of the interactions encountered. Data is stored in the form of a string, i.e., 23,43,56. Each number will represent the drug/drug interaction found in file #56. Data is not
    added directly with file manager.
  • TECHNICAL DESCR:  
    free text.
  • GROUP:  PSO
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
7.2 AFFECTED MEDICATION 0;10 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>120!($L(X)<1)!('$G(PSODI)) X
  • LAST EDITED:  JUN 29, 1992
  • HELP-PROMPT:  Answer must be 1-120 characters in length.
  • DESCRIPTION:  
    This field is used to store the active medication pointer numbers that are considered to be a drug interaction.
  • TECHNICAL DESCR:  
    free text.
  • GROUP:  PSO
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
8 DOSE WARNING 1;1 SET
  • '0' FOR UNKNOWN;
  • '1' FOR DAILY DOSE RANGE;
  • '2' FOR MAX SINGLE DOSE;
  • '3' FOR MAX SINGLE DOSE & DAILY DOSE RANGE;
  • '4' FOR DOSAGE EXCEEDS MAX SINGLE DOSE;

  • LAST EDITED:  SEP 13, 2012
  • HELP-PROMPT:  Enter 4 FOR DOSAGE EXCEEDS MAX SINGLE DOSE.
  • DESCRIPTION:  This field is used to indicate when a dose warning has been received, and it will be denoted by the appropriate set of codes value. This value is defined automatically upon order entry completion of technician entered
    orders.
  • TECHNICAL DESCR:  
    For MOCHA 2.0, only 4 for DOSAGE EXCEEDS MAX SINGLE DOSE will be used.
  • RECORD INDEXES:  DW (#897)

External References

Name Field # of Occurrence
^%DT 4+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(52.4 - [#52.4] IXDWSL+1*, IXDWKL+1!, IXDWKEIC+1!, .01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K), 2(XREF 1S), 2(XREF 1K), 4(XREF 1S)
, 4(XREF 1K), 7(XREF 1S), 7(XREF 1K)

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT 4+1*
>> DA IXDWSL+1, IXDWKL+1, .01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K), 2(XREF 1S), 2(XREF 1K), 4(XREF 1S), 4(XREF 1K)
, 7(XREF 1S), 7(XREF 1K)
>> DINUM .01+1*
>> PSODI 7.1+1, 7.2+1
X .01+1, .01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K), 2(XREF 1S), 2(XREF 1K), 4+1*!, 4(XREF 1S), 4(XREF 1K)
, 5+1!, 6+1!, 7(XREF 1S), 7(XREF 1K), 7.1+1!, 7.2+1!
X(1 IXDWSL+1, IXDWKL+1
X(2 IXDWSL+1, IXDWKL+1
>> Y 4+1
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Local Variables  | All