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    ALPBSP2    ALPBSWRD    ALPBUTL    ALPBUTL1
ALPBUTL2    ALPBUTL3    AUDIT LOG    DRUG    MED LOG DATE/TIME    ORDER NUMBER    ^ALPB(53.7    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