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 |  Fields |  External References |  Global Variables Directly Accessed |  Local Variables  | All
Print Page as PDF
Global: ^ALPB(53.7

Package: Barcode Medication Administration

Global: ^ALPB(53.7


Information

FileMan FileNo FileMan Filename Package
53.7 BCMA BACKUP DATA Barcode Medication Administration

Description

Directly Accessed By Routines, Total: 24

Package Total Routines
Barcode Medication Administration 24 ADDITIVE    ALLERGIES    ALPBBK    ALPBELOG    ALPBHL1    ALPBHL1U    ALPBOP    ALPBPALL
ALPBPCLN    ALPBPPAT    ALPBPWRD    ALPBSP1    ALPBUTL    ^ALPB(53.7    ALPBSP2    ALPBSWRD
ALPBUTL1    ALPBUTL2    ALPBUTL3    AUDIT LOG    DRUG    MED LOG DATE/TIME    ORDER NUMBER    SOLUTION

Accessed By FileMan Db Calls, Total: 4

Package Total Routines
Barcode Medication Administration 4 ALPB8    ALPBHL1    ALPBOP    ALPBUTL    

Fields, Total: 10

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

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X
  • LAST EDITED:  JAN 07, 2003
  • HELP-PROMPT:  Answer must be 3-30 characters in length.
  • CROSS-REFERENCE:  53.7^B
    1)= S ^ALPB(53.7,"B",$E(X,1,30),DA)=""
    2)= K ^ALPB(53.7,"B",$E(X,1,30),DA)
  • RECORD INDEXES:  AW (#252)
1 PATIENT SSN 0;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>12!($L(X)<9) X
  • LAST EDITED:  JAN 07, 2003
  • HELP-PROMPT:  Answer must be 9-12 characters in length.
  • DESCRIPTION:  This field contains the patient's social security number. The expected format is a 9-digit number. However, the field is free text and will accommodate a social security number passed with dashes and/or a 'P' appended
    that designates a pseudo-SSN.
  • CROSS-REFERENCE:  53.7^BS^MUMPS
    1)= S ^ALPB(53.7,"BS",$E(X,6,9),DA)=""
    2)= K ^ALPB(53.7,"BS",$E(X,6,9),DA)
    This cross references the record by last 4 digits of social security number.
  • CROSS-REFERENCE:  53.7^BS5^MUMPS
    1)= S ^ALPB(53.7,"BS5",$E($P(^ALPB(53.7,DA,0),"^",1))_$E(X,6,9),DA)=""
    2)= K ^ALPB(53.7,"BS5",$E($P(^ALPB(53.7,DA,0),"^",1))_$E(X,6,9),DA)
    This cross references the record by first letter of last name+last four digits of the social security number.
  • CROSS-REFERENCE:  53.7^SSN
    1)= S ^ALPB(53.7,"SSN",$E(X,1,30),DA)=""
    2)= K ^ALPB(53.7,"SSN",$E(X,1,30),DA)
    This cross references the record by the patient's full social security number.
2 PATIENT DOB 0;3 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAR 20, 2003
  • DESCRIPTION:  
    This field contains the patient's date of birth.
3 PATIENT SEX 0;4 SET
  • 'M' FOR M;
  • 'F' FOR F;

  • LAST EDITED:  JAN 06, 2003
  • DESCRIPTION:  
    This field contains the patient's gender: F for Female, M for Male
4 WARD 0;5 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>10!($L(X)<1) X
  • LAST EDITED:  JAN 07, 2003
  • HELP-PROMPT:  Answer must be 1-10 characters in length.
  • DESCRIPTION:  
    This field contains the most recent ward on which the patient resides. This field is updated by the VistA server after patient movement events.
  • RECORD INDEXES:  AW (#252)
5 ROOM 0;6 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>10!($L(X)<1) X
  • LAST EDITED:  JAN 06, 2003
  • HELP-PROMPT:  Answer must be 1-10 characters in length.
  • DESCRIPTION:  
    This field contains the most recent room in which the patient resides. It is updated, along with ward, by the VistA server whenever patient movement events occur.
6 BED 0;7 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>10!($L(X)<1) X
  • LAST EDITED:  JAN 06, 2003
  • HELP-PROMPT:  Answer must be 1-10 characters in length.
  • DESCRIPTION:  
    This field contains the most recent bed assignment for this patient. This field is updated, along with ward and/or room, by the VistA server whenever a patient movement event occurs.
7 RECORD LAST UPDATED 0;8 DATE

  • INPUT TRANSFORM:  S %DT="ESTX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 06, 2003
  • DESCRIPTION:  
    This field contains the date (and optionally the time) that this patient's BCMA Backup System record was updated by the processing of an HL7 message.
8 ALLERGIES 1;0 Multiple #53.701 53.701
9 ORDER NUMBER 2;0 Multiple #53.702 53.702

External References

Name Field # of Occurrence
^%DT 2+1, 7+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ALPB(53.7 - [#53.7] IXAWSL+1*, IXAWKL+1!, IXAWKEIC+1!, .01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K), 1(XREF 2S), 1(XREF 2K), 1(XREF 3S)
, 1(XREF 3K)

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT 2+1*, 7+1*
>> DA IXAWSL+1, IXAWKL+1, .01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K), 1(XREF 2S), 1(XREF 2K), 1(XREF 3S), 1(XREF 3K)
X .01+1!, .01(XREF 1S), .01(XREF 1K), 1+1!, 1(XREF 1S), 1(XREF 1K), 1(XREF 2S), 1(XREF 2K), 1(XREF 3S), 1(XREF 3K)
, 2+1*!, 4+1!, 5+1!, 6+1!, 7+1*!
X(1 IXAWSL+1, IXAWKL+1
X(2 IXAWSL+1, IXAWKL+1
>> Y 2+1, 7+1
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Fields |  External References |  Global Variables Directly Accessed |  Local Variables  | All