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 |  All
Print Page as PDF
Global: ^BOP(90355.2

Package: IHS Omnicell Pyxis Interface

Global: ^BOP(90355.2


Information

FileMan FileNo FileMan Filename Package
90355.2 BOP RECEIVE DRUG IHS Omnicell Pyxis Interface

Description

Directly Accessed By Routines, Total: 2

Package Total Routines
IHS Omnicell Pyxis Interface 2 BOPROC    BOPSD    

Accessed By FileMan Db Calls, Total: 1

Package Total Routines
IHS Omnicell Pyxis Interface 1 BOPSD    

Pointer To FileMan Files, Total: 4

Package Total FileMan Files
IHS Omnicell Pyxis Interface 1 BOP QUEUE(#90355.1)[.09]    
IHS Patient 1 PATIENT(#9000001)[.02]    
Kernel 1 NEW PERSON(#200)[.06]    
Pharmacy Data Management 1 DRUG(#50)[.01]    

Fields, Total: 10

Field # Name Loc Type Details
.01 DRUG NAME 0;1 POINTER TO DRUG FILE (#50)
************************REQUIRED FIELD************************
DRUG(#50)

  • LAST EDITED:  MAR 06, 2006
  • HELP-PROMPT:  
  • AUDIT:  YES, ALWAYS
    DELETE AUTHORITY: #
    WRITE AUTHORITY:  #
    READ AUTHORITY:   #
  • CROSS-REFERENCE:  90355.2^B
    1)= S ^BOP(90355.2,"B",$E(X,1,30),DA)=""
    2)= K ^BOP(90355.2,"B",$E(X,1,30),DA)
.02 PATIENT 0;2 POINTER TO PATIENT FILE (#9000001) PATIENT(#9000001)

  • LAST EDITED:  JUL 24, 2006
  • CROSS-REFERENCE:  90355.2^C
    1)= S ^BOP(90355.2,"C",$E(X,1,30),DA)=""
    2)= K ^BOP(90355.2,"C",$E(X,1,30),DA)
.03 DATE VENDED 0;3 DATE

  • INPUT TRANSFORM:  S %DT="EST" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  SEP 08, 1998
.04 ORDER NUMBER 0;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>15!($L(X)<1) X
  • LAST EDITED:  SEP 08, 1998
  • HELP-PROMPT:  Answer must be 1-15 characters in length.
.05 QUANTITY VENDED 0;5 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99999)!(X<-99999)!(X?.E1"."1N.N) X
  • LAST EDITED:  AUG 29, 2006
  • HELP-PROMPT:  Type a Number between -99999 and 99999, 0 Decimal Digits
.06 ORDERED BY 0;6 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  SEP 08, 1998
.07 ORDER TYPE 0;7 SET
  • 'P' FOR PPK;
  • 'O' FOR OBS;
  • 'S' FOR STARTER DOSE;
  • 'N' FOR NORMAL ORDER;

  • LAST EDITED:  MAR 08, 2006
  • CROSS-REFERENCE:  90355.2^AT^MUMPS
    1)= I X?1"S".E N BOPNOD,BOPDFN,BOPDRG S BOPNOD=^BOP(90355.2,DA,0),BOPDFN=$P(BOPNOD,U,2),BOPDRG=+BOPNOD I BOPDRG,BOPDFN S ^BOP(90355.2,"AT",BOPDFN,BOPDRG,DA)=""
    2)= N BOPNOD,BOPDFN,BOPDRG S BOPNOD=^BOP(90355.2,DA,0),BOPDRG=+BOPNOD,BOPDFN=$P(BOPNOD,U,2) I BOPDRG,BOPDFN K ^BOP(90355.2,"AT",BOPDFN,BOPDRG,DA)
.08 BILLING STATUS 0;8 SET
  • 'R' FOR READY FOR BILLING;
  • 'B' FOR BILLED;

  • LAST EDITED:  JUL 25, 2006
.09 QUEUE # 0;9 POINTER TO BOP QUEUE FILE (#90355.1) BOP QUEUE(#90355.1)

  • LAST EDITED:  SEP 04, 2006
.1 DISPENSING DEVICE NAME 0;10 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>20!($L(X)<1) X
  • LAST EDITED:  MAR 06, 2006
  • HELP-PROMPT:  Answer must be 1-20 characters in length
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  All