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 |  Found Entries |  All
Print Page as PDF
Global: ^PS(52.51

Package: Outpatient Pharmacy

Global: ^PS(52.51


Information

FileMan FileNo FileMan Filename Package
52.51 PHARMACY EXTERNAL INTERFACE Outpatient Pharmacy

Description

Directly Accessed By Routines, Total: 10

Package Total Routines
Outpatient Pharmacy 9 PSOEXBCH    PSOEXREF    PSOEXRST    PSOHLDIS    PSOHLDS    PSOHLSG    PSOHLSG4    PSORELDT
PSOUTLA1    
IHS Electronic Health Record 1 BEHORXRT    

Accessed By FileMan Db Calls, Total: 6

Package Total Routines
Outpatient Pharmacy 5 PSOHLDS    PSOHLSG    PSOHLSG4    PSONDCV    PSORELDT    
IHS Electronic Health Record 1 BEHORXRT    

Pointer To FileMan Files, Total: 4

Package Total FileMan Files
Outpatient Pharmacy 2 OUTPATIENT SITE(#59)[15]    PRESCRIPTION(#52)[.01]    
Kernel 1 NEW PERSON(#200)[4]    
Registration 1 VA PATIENT(#2)[2]    

Fields, Total: 15

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

  • LAST EDITED:  FEB 06, 1997
  • DESCRIPTION:  
    This field is the pointer to the Prescription file.
  • CROSS-REFERENCE:  52.51^B
    1)= S ^PS(52.51,"B",$E(X,1,30),DA)=""
    2)= K ^PS(52.51,"B",$E(X,1,30),DA)
2 PATIENT 0;2 POINTER TO VA PATIENT FILE (#2)
************************REQUIRED FIELD************************
VA PATIENT(#2)

  • LAST EDITED:  FEB 06, 1997
  • DESCRIPTION:  
    This field is the pointer to the Patient file.
3 TRANSMISSION DATE/TIME 0;3 DATE

  • INPUT TRANSFORM:  S %DT="EST" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAR 07, 1997
  • DESCRIPTION:  
    This is the Date/Time of the transmission to the External Interface.
  • CROSS-REFERENCE:  52.51^AS^MUMPS
    1)= D SDATE^PSOEXREF
    2)= D KDATE^PSOEXREF
    This cross reference is used to update the AS batch cross reference.  It sets the global ^PS(52.51,"AS",Transmission date/time,Division, Person,DA)="".
  • CROSS-REFERENCE:  52.51^AC1
    1)= S ^PS(52.51,"AC1",$E(X,1,30),DA)=""
    2)= K ^PS(52.51,"AC1",$E(X,1,30),DA)
4 PERSON 0;4 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  MAR 07, 1997
  • DESCRIPTION:  
    This is the pointer to File 200.
  • CROSS-REFERENCE:  52.51^AS2^MUMPS
    1)= D SPER^PSOEXREF
    2)= D KPER^PSOEXREF
    This is used to keep the AS batch cross reference up to date.  It sets the global ^PS(52.51,"AS",Transmission date/time,Division, Person,DA)="".
5 REPRINT 0;5 SET
  • '1' FOR REPRINT;

  • LAST EDITED:  FEB 06, 1997
  • DESCRIPTION:  
    This indicates whether the label was a Reprint.
6 SITE PARAMETER 0;6 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  FEB 13, 1997
  • HELP-PROMPT:  Answer must be 1-30 characters in length.
  • DESCRIPTION:  
    Stores external interface site parameter.
7 DISPENSE DEVICE 0;7 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  FEB 13, 1997
  • HELP-PROMPT:  Answer must be 1-30 characters in length.
  • DESCRIPTION:  
    This is the name of the External Interface device.
8 FILL TYPE 0;8 SET
  • 'F' FOR REGULAR FILL;
  • 'P' FOR PARTIAL FILL;

  • LAST EDITED:  FEB 06, 1997
  • DESCRIPTION:  
    This indicates whether the Fill was a regular or partial fill.
9 FILL NUMBER 0;9 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  FEB 06, 1997
  • HELP-PROMPT:  Type a Number between 0 and 99, 0 Decimal Digits
  • DESCRIPTION:  
    This indicates which fill was being printed.
10 MESSAGE SERVER ID 1;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  MAR 07, 1997
  • HELP-PROMPT:  Answer must be 1-30 characters in length.
  • DESCRIPTION:  
    This is the Message Server ID of the Transmission.
  • CROSS-REFERENCE:  52.51^AM^MUMPS
    1)= D SMES^PSOEXREF
    2)= D KMES^PSOEXREF
    This maintains the Message Server ID/Division cross reference.  It sets the global ^PS(52.51,"AM",Message Server ID,Division,DA)="".
11 CLIENT SERVER ID 1;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  FEB 13, 1997
  • HELP-PROMPT:  Answer must be 1-30 characters in length.
  • DESCRIPTION:  
    This is the Client Server ID of the Transmission.
12 ERROR CODE 1;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  FEB 06, 1997
  • HELP-PROMPT:  Answer must be 1-30 characters in length.
  • DESCRIPTION:  
    This is the Error Code for an Unsuccessful Transmission.
13 COMMENTS 1;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>50!($L(X)<1) X
  • LAST EDITED:  FEB 06, 1997
  • HELP-PROMPT:  Answer must be 1-50 characters in length.
  • DESCRIPTION:  
    These are Comments for a Transmission.
14 TRANSMISSION STATUS 0;10 SET
  • '1' FOR PROCESSING;
  • '2' FOR PROCESSED;
  • '3' FOR PROCESS FAILED;
  • '4' FOR RESUBMISSION;

  • LAST EDITED:  FEB 10, 1997
  • DESCRIPTION:  
    This is the Status of the Transmission.
15 DIVISION 0;11 POINTER TO OUTPATIENT SITE FILE (#59) OUTPATIENT SITE(#59)

  • LAST EDITED:  MAR 07, 1997
  • DESCRIPTION:  
    This is the Division where the label information was submitted.
  • CROSS-REFERENCE:  52.51^AS1^MUMPS
    1)= D SDIV^PSOEXREF
    2)= D KDIV^PSOEXREF
    This is used to keep the AS batch cross reference up to date.  It sets the global ^PS(52.51,"AS",Transmission date/time,Division, Person,DA)="".
  • CROSS-REFERENCE:  52.51^AM1^MUMPS
    1)= D SDIVM^PSOEXREF
    2)= D KDIVM^PSOEXREF
    This maintains the Message Server ID/Division cross reference.  It sets the global ^PS(52.51,"AM",Message Server ID,Division,DA)="".
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  Found Entries |  All