Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Details |  All
Print Page as PDF
Sub-Field: 53.51

Package: Inpatient Medications

PICK LIST(#53.5)-->53.51

Sub-Field: 53.51


Information

Parent File Name Number Package
PICK LIST(#53.5) PATIENT 53.51 Inpatient Medications

Details

Field # Name Loc Type Details
.01 PATIENT 0;1 POINTER TO PHARMACY PATIENT FILE (#2)
************************REQUIRED FIELD************************
VA PATIENT(#2)

  • INPUT TRANSFORM:  S DINUM=X
  • LAST EDITED:  MAY 24, 1994
  • DESCRIPTION:  
    This is the patient for which the medications are to be dispensed for.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  53.51^B
    1)= S ^PS(53.5,DA(1),1,"B",$E(X,1,30),DA)=""
    2)= K ^PS(53.5,DA(1),1,"B",$E(X,1,30),DA)
    Regular 'B' index of PATIENT sub-field.
  • CROSS-REFERENCE:  53.5^AC2^MUMPS
    1)= D EN5351^PSGPLXR(DA(1),DA,"S","AC")
    2)= D EN5351^PSGPLXR(DA(1),DA,"K","AC","PT",X)
    Cross-reference by:  Pick List Number, Administering Team, Patient Ward, Patient Room/Bed, Patient Name^DFN, Schedule Type, Primary Drug^IEN, Dispense Drug^IEN.  Used for printing the Pick List and sending to the ATC
    dispensing machine by patient.
  • CROSS-REFERENCE:  53.5^AU2^MUMPS
    1)= D EN5351^PSGPLXR(DA(1),DA,"S","AU")
    2)= D EN5351^PSGPLXR(DA(1),DA,"K","AU")
    Cross-reference by:  Pick List Number, Administering Team, Patient Ward, Patient Room/Bed, Patient Name^DFN, Schedule Type, Primary Drug^IEN, Dispense Drug^IEN.  Used to identify items that were updated since the Pick
    List was run or last updated, for printing.
.02 ADMINISTERING TEAM 0;2 FREE TEXT

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  MAY 24, 1994
  • HELP-PROMPT:  Answer must be 1-30 characters in length.
  • DESCRIPTION:  
    This is the administering team for the room-bed the patient is assigned.
  • CROSS-REFERENCE:  53.5^AC3^MUMPS
    1)= D EN5351^PSGPLXR(DA(1),DA,"S","AC")
    2)= D EN5351^PSGPLXR(DA(1),DA,"K","AC","AT",X)
    Cross-reference by:  Pick List Number, Administering Team, Patient Ward, Patient Room/Bed, Patient Name^DFN, Schedule Type, Primary Drug^IEN, Dispense Drug^IEN.  Used for printing the Pick List and sending to the ATC
    dispensing machine by patient.
  • CROSS-REFERENCE:  53.5^AU3^MUMPS
    1)= D EN5351^PSGPLXR(DA(1),DA,"S","AU")
    2)= D EN5351^PSGPLXR(DA(1),DA,"K","AU")
    Cross-reference by:  Pick List Number, Administering Team, Patient Ward, Patient Room/Bed, Patient Name^DFN, Schedule Type, Primary Drug^IEN, Dispense Drug^IEN.  Used to identify items that were updated since the Pick
    List was run or last updated, for printing.
.03 WARD 0;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<2) X
  • LAST EDITED:  MAY 24, 1994
  • HELP-PROMPT:  Answer must be 2-30 characters in length.
  • DESCRIPTION:  
    This is the patient's ward location at the time the pick list is run.
  • GROUP:  PSJ
  • CROSS-REFERENCE:  53.5^AC4^MUMPS
    1)= D EN5351^PSGPLXR(DA(1),DA,"S","AC")
    2)= D EN5351^PSGPLXR(DA(1),DA,"K","AC","WD",X)
    Cross-reference by:  Pick List Number, Administering Team, Patient Ward, Patient Room/Bed, Patient Name^DFN, Schedule Type, Primary Drug^IEN, Dispense Drug^IEN.  Used for printing the Pick List and sending to the ATC
    dispensing machine by patient.
  • CROSS-REFERENCE:  53.5^AU4^MUMPS
    1)= D EN5351^PSGPLXR(DA(1),DA,"S","AU")
    2)= D EN5351^PSGPLXR(DA(1),DA,"K","AU")
    Cross-reference by:  Pick List Number, Administering Team, Patient Ward, Patient Room/Bed, Patient Name^DFN, Schedule Type, Primary Drug^IEN, Dispense Drug^IEN.  Used to identify items that were updated since the Pick
    List was run or last updated, for printing.
.04 ROOM-BED 0;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>15!($L(X)<3) X
  • LAST EDITED:  MAY 24, 1994
  • HELP-PROMPT:  Answer must be 3-15 characters in length.
  • DESCRIPTION:  
    This is the room-bed where the patient is currently assigned.
  • GROUP:  PSJ
  • CROSS-REFERENCE:  53.5^AC5^MUMPS
    1)= D EN5351^PSGPLXR(DA(1),DA,"S","AC")
    2)= D EN5351^PSGPLXR(DA(1),DA,"K","AC","RB",X)
    Cross-reference by:  Pick List Number, Administering Team, Patient Ward, Patient Room/Bed, Patient Name^DFN, Schedule Type, Primary Drug^IEN, Dispense Drug^IEN.  Used for printing the Pick List and sending to the ATC
    dispensing machine by patient.
  • CROSS-REFERENCE:  53.5^AU5^MUMPS
    1)= D EN5351^PSGPLXR(DA(1),DA,"S","AU")
    2)= D EN5351^PSGPLXR(DA(1),DA,"K","AU")
    Cross-reference by:  Pick List Number, Administering Team, Patient Ward, Patient Room/Bed, Patient Name^DFN, Schedule Type, Primary Drug^IEN, Dispense Drug^IEN.  Used to identify items that were updated since the Pick
    List was run or last updated, for printing.
.05 UPDATE 0;5 SET
  • '1' FOR PATIENT HAS BEEN UPDATED;

  • LAST EDITED:  DEC 14, 1993
  • HELP-PROMPT:  "1" if patient is on an updated Pick List.
  • DESCRIPTION:  
    This is an internal flag to identify patients who appeared on the most recent update of the Pick List.
  • CROSS-REFERENCE:  53.51^AU^MUMPS
    1)= D EN5351^PSGPLXR(DA(1),DA,"S","AU")
    2)= D EN5351^PSGPLXR(DA(1),DA,"K","AU")
    Cross-reference by:  Pick List Number, Administering Team, Patient Ward, Patient Room/Bed, Patient Name^DFN, Schedule Type, Primary Drug^IEN, Dispense Drug^IEN.  Used to identify items that were updated since the Pick
    List was run or last updated, for printing.
1 ORDER 1;0 Multiple #53.52 53.52

  • DESCRIPTION:  
    This contains the order-specific information for the patient.
Info |  Details |  All