STANDARD DATA DICTIONARY #53.69 -- BCMA REPORT REQUEST FILE                                                       3/24/25    PAGE 1
STORED IN ^PSB(53.69,  (913 ENTRIES)   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                                    (VERSION 3.0)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
Contains all report requests generated by users of the BCMA system.  This file may be purged as needed by VA Fileman.  


              DD ACCESS: @
              WR ACCESS: @
             DEL ACCESS: @
           LAYGO ACCESS: @
           AUDIT ACCESS: @

CROSS
REFERENCED BY: REQUEST NUMBER(B)



53.69,.01     REQUEST NUMBER         0;1 FREE TEXT (Required)

              Request Number   
              INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3) X
              LAST EDITED:      JAN 12, 1999 
              HELP-PROMPT:      Answer must be 3-30 characters in length. 
              DESCRIPTION:
                                Unique identifier for the report request.  

              CROSS-REFERENCE:  53.69^B 
                                1)= S ^PSB(53.69,"B",$E(X,1,30),DA)=""
                                2)= K ^PSB(53.69,"B",$E(X,1,30),DA)


53.69,.02     DATE/TIME ENTERED      0;2 DATE

              Date/Time Entered   
              INPUT TRANSFORM:  S %DT="ETXR" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      MAR 13, 1999 
              DESCRIPTION:
                                Automatically stuffed at record creation with a value of NOW.  


53.69,.03     ENTERED BY             0;3 POINTER TO NEW PERSON FILE (#200)

              Entered By   
              LAST EDITED:      MAR 13, 1999 
              DESCRIPTION:
                                Automatically stuffed at record creation time with the current value for DUZ.  


53.69,.04     DIVISION               0;4 POINTER TO INSTITUTION FILE (#4)

              Division   
              LAST EDITED:      MAR 13, 1999 
              DESCRIPTION:
                                Automatically stuffed at record creation time with the current value for DUZ(2).  


53.69,.05     TYPE OF REQUEST        0;5 FREE TEXT

              Type of Request   
              INPUT TRANSFORM:  K:$L(X)>2!($L(X)<2)!'(X'?1P.E) X
              LAST EDITED:      NOV 05, 2008 
              HELP-PROMPT:      Answer must be 2 characters in length 
              DESCRIPTION:      Automatically stuffed at record creation with the type of report that is being requested.  Used to
                                drive the report later on by appending the internal code to "DQ^PSBO"_type for the routine
                                reference to run.  (i.e.  ML for med log would call DQ^PSBOML to generate the report.) Report types
                                DL = Due List 
                                             MH = Medication Admin History (MAH) 
                                             ML = Med Log 
                                             MM = Missed Medications 
                                             PE = PRN Effectiveness List 
                                             PM = Patient Medication History 
                                             WA = Ward Administration Times 
                                             MV = Medication Variance Log 
                                             BL = Bar Code Label 
                                             MD = Missing Dose Follow-up 
                                             AL = Allergy Report 
                                             PI = Patient Inquiry 
                                             DO = Display Order 
                                             VT = Vitals Cumulative 
                                             PF = Patient Record Flag 
                                             XA = Unknown Action Status Report 
                                             CE = BCMA Coversheet Expired Orders Report 
                                             CI = BCMA Coversheet IV Overview Report 
                                             CM = BCMA Coversheet Medication Overview Report 
                                             CP = BCMA Coversheet PRN Overview Report 
                                             IV = BCMA IV Bag Status Report 
                                             MT = BCMA Medication Therapy Report 
                                             BZ = Barcode Label Print 
                                             SF = Unable to Scan (Detailed) 
                                             ST = Unable to Scan (Summary) 


53.69,.06     OUTPUT DEVICE          0;6 POINTER TO DEVICE FILE (#3.5)

              Output DEVICE   
              LAST EDITED:      MAR 17, 1999 
              DESCRIPTION:      Pointer to the device file the user has selected.  
                                 
                                NOTE: A device containing 'BROWSER' will be sent directly to the device, all other devices will be
                                submitted to Taskman.  


53.69,.07     DEQUEUE TIME           0;7 DATE

              Queue to Run At   
              INPUT TRANSFORM:  S %DT="ETXR" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      MAR 13, 1999 
              DESCRIPTION:
                                Date/time the user would like the report to print.  


53.69,.08     ZTSK                   0;8 FREE TEXT

              Task Number   
              INPUT TRANSFORM:  K:$L(X)>20!($L(X)<1) X
              LAST EDITED:      MAR 13, 1999 
              HELP-PROMPT:      Answer must be 1-20 characters in length. 
              DESCRIPTION:
                                Automatically stuffed when the print job starts for later tracking and trouble shooting.  


53.69,.09     ORDER/ORDERABLE ITEM NUMBER 0;9 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>15!($L(X)<1) X
              LAST EDITED:      SEP 19, 2001 
              HELP-PROMPT:      Answer must be 1-15 characters in length 
              DESCRIPTION:      This field will contain either the Inpatient Medications order number for the "Display Order"
                                request from the GUI or the orderable item number for a "Med History" request.  

              TECHNICAL DESCR:
                                 


53.69,.11     SORT BY                .1;1 SET

              Sort by Pt or Ward   
                                'P' FOR Patient; 
                                'W' FOR Ward; 
                                'C' FOR Clinic; 
              LAST EDITED:      SEP 07, 2012 
              DESCRIPTION:
                                Determines the type of report (W:An entire ward P:An individual patient) 


53.69,.12     PATIENT                .1;2 POINTER TO PATIENT FILE (#2)

              Patient   
              LAST EDITED:      JUL 01, 1999 
              DESCRIPTION:
                                Pointer to the patient file with the selected patient for a Patient specific report.  


53.69,.121    PATIENT SSN (C)         ;  COMPUTED

              MUMPS CODE:       X ^DD(53.69,.121,9.2) S Y(53.69,.121,101)=$S($D(^DPT(D0,0)):^(0),1:"") S X=$P(Y(53.69,.121,101),U,9
                                ) S D0=Y(53.69,.121,80)
                                9.2 = S Y(53.69,.121,80)=$S($D(D0):D0,1:""),Y(53.69,.121,1)=$S($D(^PSB(53.69,D0,.1)):^(.1),1:""),D0
                                =$P(Y(53.69,.121,1),U,2) S:'$D(^DPT(+D0,0)) D0=-1
              ALGORITHM:        #.12:#.09
              DESCRIPTION:
                                Computed field to easily display Patients SSN.  


53.69,.122    PATIENT WARD LOCATION (C)  ;  COMPUTED

              MUMPS CODE:       X ^DD(53.69,.122,9.2) S Y(53.69,.122,101)=$S($D(^DPT(D0,.1)):^(.1),1:"") S X=$E(Y(53.69,.122,101),1
                                ,30) S D0=Y(53.69,.122,80)
                                9.2 = S Y(53.69,.122,80)=$S($D(D0):D0,1:""),Y(53.69,.122,1)=$S($D(^PSB(53.69,D0,.1)):^(.1),1:""),D0
                                =$P(Y(53.69,.122,1),U,2) S:'$D(^DPT(+D0,0)) D0=-1
              ALGORITHM:        #.12:#.1
              DESCRIPTION:
                                Computed field to easily display Patients Ward Location.  


53.69,.13     WARD                   .1;3 POINTER TO NURS LOCATION FILE (#211.4)

              Ward   
              INPUT TRANSFORM:  S DIC("S")="I $P($G(^NURSF(211.4,+Y,1)),U,1)=""A""" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X
              LAST EDITED:      OCT 09, 2003 
              DESCRIPTION:
                                Pointer to the NURS LOCATION file for reports to be generated by ward instead of patient.  

              SCREEN:           S DIC("S")="I $P($G(^NURSF(211.4,+Y,1)),U,1)=""A"""
              EXPLANATION:      Only active Nurse Location Entries Allowed

53.69,.14     TEAM                   .1;4 FREE TEXT

              Team   
              INPUT TRANSFORM:  K:$L(X)>1!($L(X)<1) X
              LAST EDITED:      JAN 12, 1999 
              HELP-PROMPT:      Answer must be 1 character in length. 
              DESCRIPTION:
                                Not used at this time.  Future plans are to incorporate a medication team.  


53.69,.15     SORT BY PATIENT OR BED .1;5 SET

              Sort by Pt or Room-Bed   
                                'P' FOR Patient; 
                                'B' FOR Room-Bed; 
              LAST EDITED:      MAR 21, 1999 
              DESCRIPTION:
                                Ward based reports are asked to sort either by patient name or room bed locations.  


53.69,.16     START DATE             .1;6 DATE

              Report Start Date   
              INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      JAN 18, 2002 
              DESCRIPTION:      Fileman Date that the selected report is to start generating from.  No time is allowed in this
                                field.  

              NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


53.69,.17     START TIME             .1;7 NUMBER

              Report Start Time   
              INPUT TRANSFORM:  D TIMEIN^PSBUTL
              OUTPUT TRANSFORM: S Y=$$TIMEOUT^PSBUTL(Y)
              LAST EDITED:      JAN 12, 1999 
              HELP-PROMPT:      Enter in the starting time (i.e. 8A or 0800). 
              DESCRIPTION:      Contains the decimal portion of an internal fileman date/time to specify the time that the report
                                is to generate from.  

              NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


53.69,.18     STOP DATE              .1;8 DATE

              Report Stop Date   
              INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      JAN 18, 2002 
              DESCRIPTION:
                                Fileman Date that the selected report is to stop generating.  No time is allowed in this field.  

              NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


53.69,.19     STOP TIME              .1;9 NUMBER

              Report Stop Time   
              INPUT TRANSFORM:  D TIMEIN^PSBUTL
              OUTPUT TRANSFORM: S Y=$$TIMEOUT^PSBUTL(Y)
              LAST EDITED:      JAN 12, 1999 
              HELP-PROMPT:      Enter in the stop time (i.e. 8A or 0800). 
              DESCRIPTION:      Contains the decimal portion of an internal fileman date/time to specify the time that the report
                                is to generate to.  

              NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


53.69,.21     [DL] INCLUDE CONTINUOUS MEDS .2;1 SET

              Include Continuous Meds   
                                '0' FOR No; 
                                '1' FOR Yes; 
              LAST EDITED:      JAN 26, 1999 
              DESCRIPTION:
                                Yes/No question for the Due List to include continuous medications or not.  


53.69,.22     [DL] INCLUDE PRN MEDS  .2;2 SET

              Include PRN Meds   
                                '0' FOR No; 
                                '1' FOR Yes; 
              LAST EDITED:      JAN 26, 1999 
              HELP-PROMPT:        
              DESCRIPTION:
                                Yes/No question for the Due List to include PRN medications or not.  


53.69,.23     [DL] INCLUDE ON-CALL MEDS .2;3 SET

              Include On-Call Meds   
                                '0' FOR No; 
                                '1' FOR Yes; 
              LAST EDITED:      JAN 26, 1999 
              HELP-PROMPT:        
              DESCRIPTION:
                                Yes/No question for the Due List to include On-Call medications or not.  


53.69,.24     [DL] INCLUDE ONE-TIME MEDS .2;4 SET

              Include One-Time Meds   
                                '0' FOR No; 
                                '1' FOR Yes; 
              LAST EDITED:      JAN 26, 1999 
              HELP-PROMPT:        
              DESCRIPTION:
                                Yes/No question for the Due List to include One Time medications or not.  


53.69,.25     [DL] INCLUDE BLANKS    .2;5 SET

              Include Order Blanks   
                                '0' FOR No; 
                                '1' FOR Yes; 
              LAST EDITED:      MAR 17, 1999 
              HELP-PROMPT:        
              DESCRIPTION:
                                Yes/No question for the Due List to include blank addendums for newly ordered meds or not.  


53.69,.26     [DL] INLCUDE IV MEDS   .2;6 SET

                                '0' FOR No; 
                                '1' FOR Yes; 
              LAST EDITED:      MAR 17, 1999 
              DESCRIPTION:
                                Yes/No question for the Due List to include IV medications or not.  


53.69,.27     [DL] INCLUDE UNIT DOSE MEDS .2;7 SET

                                '0' FOR No; 
                                '1' FOR Yes; 
              LAST EDITED:      MAR 17, 1999 
              HELP-PROMPT:        
              DESCRIPTION:
                                Yes/No question for the Due List to include Unit Dose medications or not.  


53.69,.28     [ML] INCLUDE COMMENTS  .2;8 SET

                                '1' FOR Yes; 
                                '0' FOR No; 
              LAST EDITED:      MAR 31, 1999 
              DESCRIPTION:      When printing the medication log, comments can be included for each med pass if this question is
                                answered Yes.  


53.69,.29     [ML] INCLUDE AUDITS    .2;9 SET

                                '1' FOR YES; 
                                '0' FOR NO; 
              LAST EDITED:      MAR 31, 1999 
              HELP-PROMPT:        
              DESCRIPTION:      When printing the medication log, audits can be included for each med pass if this question is
                                answered Yes.  


53.69,.31     [BL] DRUG              .3;1 FREE TEXT

              Drug   
              INPUT TRANSFORM:  D INPTR^PSBOBL
              OUTPUT TRANSFORM: S Y=$P(Y,"~",1)
              LAST EDITED:      NOV 01, 2002 
              HELP-PROMPT:      Answer must be 1-40 characters in length. 
              DESCRIPTION:
                                Stores the Name and IEN of the selected drug to print a bar code label for.  

              NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


53.69,.32     [BL] LOT NUMBER        .3;2 FREE TEXT

              Lot Number   
              INPUT TRANSFORM:  K:$L(X)>25!($L(X)<1) X
              LAST EDITED:      JUN 09, 2005 
              HELP-PROMPT:      Answer must be 1-25 characters in length. 
              DESCRIPTION:
                                Contains the lot number of the drug to print a bar code label for.  


53.69,.33     [BL] EXPIRATION DATE   .3;3 DATE

              Expiration Date   
              INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      MAR 18, 1999 
              DESCRIPTION:
                                Contains the exp date of the drug to print a bar code label for.  


53.69,.34     [BL] MANUFACTURER      .3;4 FREE TEXT

              Manufacturer   
              INPUT TRANSFORM:  K:$L(X)>10!($L(X)<1) X
              LAST EDITED:      JUN 09, 2005 
              HELP-PROMPT:      Answer must be 1-10 characters in length. 
              DESCRIPTION:
                                Contains the manufacturer of the drug to print a bar code label for.  


53.69,.35     [BL] QUANTITY          .3;5 NUMBER

              Quantity   
              INPUT TRANSFORM:  K:+X'=X!(X>9999)!(X<.25)!(X?.E1"."3N.N) X
              LAST EDITED:      MAR 18, 1999 
              HELP-PROMPT:      Type a Number between .25 and 9999, 2 Decimal Digits 
              DESCRIPTION:
                                Contains the quantity of the drug to print a bar code label for.  


53.69,.36     [BL] FILLED BY         .3;6 FREE TEXT

              Filled By   
              INPUT TRANSFORM:  K:$L(X)>5!($L(X)<2) X
              LAST EDITED:      MAR 26, 1999 
              HELP-PROMPT:      Answer must be 2-5 characters in length. 
              DESCRIPTION:
                                Contains the initials of the pharmacists filling the meds for this label.  


53.69,.37     [BL] CHECKED BY        .3;7 FREE TEXT

              Checked By   
              INPUT TRANSFORM:  K:$L(X)>5!($L(X)<2) X
              LAST EDITED:      MAR 18, 1999 
              HELP-PROMPT:      Answer must be 2-5 characters in length. 
              DESCRIPTION:
                                Contains the initials of the pharmacists checking the meds for this label.  


53.69,.38     [BL] NUMBER OF LABELS  .3;8 NUMBER

              Number of Labels   
              INPUT TRANSFORM:  K:+X'=X!(X>9999)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      MAR 18, 1999 
              HELP-PROMPT:      Type a Number between 1 and 9999, 0 Decimal Digits 
              DESCRIPTION:
                                Contains the number of labels the user is requesting to be printed.  


53.69,.39     [BL] DOSAGE            .3;9 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>22!($L(X)<1) X
              LAST EDITED:      APR 17, 2006 
              HELP-PROMPT:      Answer must be 1-22 characters in length. 
              DESCRIPTION:
                                Free text dosage to print on each label.  


53.69,.41     [DL] INCLUDE FUTURE ORDERS .4;1 SET

                                '0' FOR No; 
                                '1' FOR Yes; 
              LAST EDITED:      NOV 29, 2001 
              DESCRIPTION:
                                Yes/No question for the Due List to include future orders or not.  


53.69,.51     [SF] SORT BY FIELD     .5;1 SET

                                '1' FOR PATIENT'S NAME; 
                                '2' FOR EVENT Dt/Tm (ascending); 
                                '3' FOR LOCATION WARD/RmBd; 
                                '4' FOR TYPE; 
                                '5' FOR DRUG ITEM (ID); 
                                '6' FOR USER'S NAME; 
                                '7' FOR REASON UNABLE TO SCAN; 
                                '-2' FOR EVENT Dt/Tm (descending); 
              LAST EDITED:      JUL 18, 2006 
              HELP-PROMPT:      Enter the column to sort the Unable to Scan report by. 
              DESCRIPTION:      This field is designated for Unable to Scan (detailed) report sorting purposes.  The number in this
                                field will determine which "column" is determining the actual order an Unable to Scan (detail)
                                report entry is listed.  


53.69,.52     PSBPST                 .5;2 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>6!($L(X)<1) X
              LAST EDITED:      JUL 21, 2008 
              HELP-PROMPT:      The Sort Option Header text passed from the BCMA GUI by the RPC PSBO. 
              DESCRIPTION:
                                This field specifies the Sort Option Header text to print on the Unable to Scan Detail report.  


53.69,.61     CRITERIA               1;1 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>250!($L(X)<1) X
              LAST EDITED:      JUL 17, 2007 
              HELP-PROMPT:      Answer must be 1-250 characters in length 
              DESCRIPTION:
                                (Free Text)  Custom "flags" and "parameters" to support processing of the requested report.  


53.69,1       INPUT LIST             2;0 Multiple #53.692

              DESCRIPTION:
                                (Multiple)  List of custom data items to be used when processing the requested report.  


53.692,.01      INPUT LIST             0;1 FREE TEXT (Multiply asked)

                INPUT TRANSFORM:  K:$L(X)>90!($L(X)<1) X
                LAST EDITED:      JUL 17, 2007 
                HELP-PROMPT:      Answer must be 1-90 characters in length. 
                CROSS-REFERENCE:  53.692^B 
                                  1)= S ^PSB(53.69,DA(1),2,"B",$E(X,1,30),DA)=""
                                  2)= K ^PSB(53.69,DA(1),2,"B",$E(X,1,30),DA)




53.69,2       PSBTR                  3;1 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>10!($L(X)<1) X
              LAST EDITED:      APR 14, 2008 
              HELP-PROMPT:      This entry specifies which sub headers to print on the report.  It is passed to the RPC. 
              DESCRIPTION:
                                This field defines what sub-headers will be printed on the report.  It is passed by the RPC.  


53.69,3       INCLUDE SPECIAL INSTRUCTIONS 4;1 SET

              Include Special Instructions/Other Print Info   
                                '0' FOR No; 
                                '1' FOR Yes; 
              LAST EDITED:      JAN 23, 2012 
              HELP-PROMPT:      Should special instructions/other print info be included on the report? 
              DESCRIPTION:      Special Instructions/Other Print Info can be included on the report by answering Yes.  Answer No,
                                to exclude it from the report.  


53.69,4       ORDERS TYPE MODE C/I   4;2 SET

                                'C' FOR Clinic orders; 
                                'I' FOR Inpatient orders; 
              LAST EDITED:      AUG 24, 2012 
              HELP-PROMPT:      Enter "C" to include only Clinic Orders or "I" to include only Inpatient orders on the report. 
              DESCRIPTION:      This field is an indicator for running the report in either Clinic order mode or in Inpatient
                                medication order mode.  If this field is not set, the report is run in Inpatient order mode.  


53.69,5       CLINIC TO PRINT        4;3 POINTER TO HOSPITAL LOCATION FILE (#44)

              INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,3)=""C""" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X
              LAST EDITED:      JAN 24, 2013 
              HELP-PROMPT:      Enter a Clinic location. 
              DESCRIPTION:      This is the clinic whose name is printed on the Missing Dose Report from the PSB PHARMACY menu
                                option.         

              TECHNICAL DESCR:  This field uses an Input transform to filter only entries that have TYPE field (#2) equal to "C",
                                in the HOSPITAL LOCATION file (#44). 

              SCREEN:           S DIC("S")="I $P(^(0),U,3)=""C"""
              EXPLANATION:      Allows only Clinics.


      FILES POINTED TO                      FIELDS

DEVICE (#3.5)                     OUTPUT DEVICE (#.06)

HOSPITAL LOCATION (#44)           CLINIC TO PRINT (#5)

INSTITUTION (#4)                  DIVISION (#.04)

NEW PERSON (#200)                 ENTERED BY (#.03)

NURS LOCATION (#211.4)            WARD (#.13)

PATIENT (#2)                      PATIENT (#.12)



INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):
PSBO BL                       MAR 18, 1999@15:36  USER #0
  PSBO HDR                      DD #53.69
  PSBO FTR                      DD #53.69
  PSBO BL                       DD #53.69

PSBO BZ                       MAR 18, 1999@15:36  USER #0
  PSBO HDRBZ                    DD #53.69
  PSBO FTRBZ                    DD #53.69
  PSBO BLBZ                     DD #53.69

PSBO DL                       MAR 13, 1999@11:44  USER #0
  PSBO HDR                      DD #53.69
  PSBO DL                       DD #53.69
  PSBO FTR                      DD #53.69
  PSBO PT OR WARD               DD #53.69
  PSBO DATE DL                  DD #53.69

PSBO MD                       MAR 18, 1999@16:18  USER #0
  PSBO HDR                      DD #53.69
  PSBO FTR                      DD #53.69
  PSBO MD                       DD #53.69
  PSBO WARD                     DD #53.69
  PSBO CLINIC                   DD #53.69

PSBO MH                       MAR 13, 1999@20:33  USER #0
  PSBO HDR                      DD #53.69
  PSBO FTR                      DD #53.69
  PSBO MH                       DD #53.69
  PSBO PT OR WARD               DD #53.69

PSBO ML                       MAR 13, 1999@18:58  USER #0
  PSBO HDR                      DD #53.69
  PSBO FTR                      DD #53.69
  PSBO DATES                    DD #53.69
  PSBO PT OR WARD               DD #53.69
  PSBO ML                       DD #53.69

PSBO MM                       MAR 13, 1999@19:07  USER #0
  PSBO HDR                      DD #53.69
  PSBO FTR                      DD #53.69
  PSBO MM                       DD #53.69
  PSBO PT OR WARD               DD #53.69

PSBO MV                       MAR 13, 1999@23:20  USER #0
  PSBO HDR                      DD #53.69
  PSBO FTR                      DD #53.69
  PSBO MV                       DD #53.69
  PSBO PT OR WARD               DD #53.69

PSBO PE                       MAR 13, 1999@19:24  USER #0
  PSBO HDR                      DD #53.69
  PSBO FTR                      DD #53.69
  PSBO PE                       DD #53.69
  PSBO PT OR WARD               DD #53.69

PSBO WA                       MAR 13, 1999@12:10  USER #0
  PSBO HDR                      DD #53.69
  PSBO FTR                      DD #53.69
  PSBO WA                       DD #53.69
  PSBO PT OR WARD               DD #53.69

PSBO XA                       MAR 13, 1999@11:44  USER #0
  PSBO XHDR                     DD #53.69
  PSBO XFTR                     DD #53.69
  PSBO XDATE XA                 DD #53.69