Print Page as PDF
RETURN ACTIVE ORDERS TO BCMA ICR (2828)

RETURN ACTIVE ORDERS TO BCMA    ICR (2828)

Name Value
NUMBER 2828
IA # 2828
DATE CREATED 1999/05/25
CUSTODIAL PACKAGE INPATIENT MEDICATIONS
CUSTODIAL ISC Birmingham
USAGE Private
TYPE Routine
DBIC APPROVAL STATUS APPROVED
ROUTINE PSJBCMA
NAME RETURN ACTIVE ORDERS TO BCMA
GENERAL DESCRIPTION
The entry point EN^PSJBCMA is provided by Inpatient
Medications package to return patient active orders to Bar Code Med Admin to
be used in administering medications at patient's bedside.
STATUS Active
KEYWORDS PSJBCMA
DURATION Till Otherwise Agreed
ID PSJBCMA
COMPONENT/ENTRY POINT
COMPONENT/ENTRY POINT COMPONENT DESCRIPTION VARIABLES
EN
OUTPUT DEFINITION

^TMP("PSJ",$J,Index,0) = DFN ^ ON (Order number from Inpatient Medications V.
5.0 package)^ ON_V/U/P ^ PREVIOUS ORDER ^ FOLLOWING ORDER ^ IV TYPE ^
INTERMITTENT SYRINGE ^ CHEMOTHERAPY TYPE ^ ORDERS FILE ENTRY

^TMP("PSJ",$J,Index,1) = MED ROUTE expansion ^ SCHEDULE TYPE CONVERSION ^
SCHEDULE ^ START DATE ^ STOP DATE ^ ADMIN TIMES ^ STATUS ^ NOT TO BE GIVEN
FLAG ^ Original SCHEDULE TYPE ^ Auto Cancel/DC flag

^TMP("PSJ",$J,Index,1,0) = PROMPT FOR INJECTION SITE IN BCMA^MED ROUTE name ^
DSPLY ON IVP/IVPB TAB IN BCMA

^TMP("PSJ",$J,Index,2) = DOSAGE ORDERED ^ INFUSION RATE ^ SELF MED ^ HOSPITAL
SUPPLIED SELF MED

^TMP("PSJ",$J,Index,3) = ORDERABLE ITEM [P] ^ ORDERABLE ITEM NAME_" "_DOSAGE
FORM ^ DOSAGE FORM

^TMP("PSJ",$J,Index,4) = SPECIAL INSTRUCTONS (U/D) or OTHER PRINT INFO (IV)

^TMP("PSJ",$J,Index,5) = NOTIFICATION ^ FLAGGED [S] ^PHARMACY/CPRS ^ FLAG
COMMENTS
Notificaton will be a 1, if the order should trigger a stat/now
notification.  It will be 0 if no notification
should be done.  Piece 3 will contain PHARMACY if the flag was initiated by
Pharmacy or CPRS if it was initiated by CPRS.

^TMP("PSJ",$J,Index,700,0) = Number of DISPENSE DRUG return (exists only if
order is a Unit Dose order)

^TMP("PSJ",$J,Index,700,Index,0) = DISPENSE DRUG [P] ^ DISPENSE DRUG NAME ^
UNITS PER DOSE [N] ^ INACTIVE DATE

^TMP("PSJ",$J,Index,850,0) = Number of additive(s) return (exists only if IV
order)

^TMP("PSJ",$J,Index,850,D0,0) = ADDITIVE [P] ^ ADDITIVE NAME ^ STRENGTH ^
BOTTLE ^^ ORDERABLE ITEM [P] ^ ORDERABLE ITEM NAME_" "_DOSAGE FORM ^ DOSAGE
FORM

^TMP("PSJ",$J,Index,950,0) = Number of solution(s) return (exists only if IV
order)

^TMP("PSJ",$J,Index,950,D0,0) = SOLUTION [P] ^ SOLUTION NAME ^ VOLUME ^ PRINT
NAME {2} [F] ^^ ORDERABLE ITEM [P] ^ ORDERABLE ITEM NAME_" "_DOSAGE FORM ^
DOSAGE FORM

Unique ID# is the Bar Code Identification Number for this label.  Format:
DFN_"V"_Seq, where Seq is a sequential number.

^TMP(PTMP,$J,Index,800,Unique ID#,0) = Number of additives(s) return (exists
only if order is an IV order)

^TMP(PTMP,$J,Index,800,Unique ID#,Index) = ADDITIVE[P] ^ ADDITIVE NAME ^
STRENGTH [F] ^ BOTTLE

^TMP(PTMP,$J,Index,900,Unique ID#,0) = Number of solution(s) return (exists
only if order is an IV order)

^TMP(PTMP,$J,Index,900,Unique ID#,Index) = SOLUTION[P] ^ SOLUTION NAME ^
VOLUME


NOTE:

- ^TMP("PSJ",J,1,0) = -1 will be returned if no active orders are found.
VARIABLES TYPE VARIABLES DESCRIPTION
DFN Input
Patient Internal File Number (required).
BDT Input
Data used to start searching for order stop after
this date (optional). If BDT is not included, NOW is used as the time to start
searching for active orders.
OTDATE Input
Include One-Time orders from this date (optional). If
OTDATE="" 30 days from today is used. If OTDATE is not included, 30 days from
the current date is used.
SUBSCRIBING PACKAGE BAR CODE MED ADMIN
MAIL MESSAGE 35681806