DBIA2376 ICR (2376)

Name

Value

NUMBER

2376

IA #

2376

DATE CREATED

1998/04/30

CUSTODIAL PACKAGE

INPATIENT MEDICATIONS

CUSTODIAL ISC

Birmingham

USAGE

Private

TYPE

Routine

DBIC APPROVAL STATUS

APPROVED

ROUTINE

PSJORUT2

NAME

DBIA2376

GENERAL DESCRIPTION

These entry points build drug information for patient's
orders entered in the Inpatient Medications package.  The data returned is
used in order checks in Computerized Patient Record System.

STATUS

Active

DURATION

Till Otherwise Agreed

PSJORUT2

COMPONENT/ENTRY POINT

COMPONENT DESCRIPTION

VARIABLES

ENCHK

This entry point returns drug information for a
specific patient's current orders in the Inpatient Medications package.

VARIABLES	TYPE	VARIABLES DESCRIPTION
DFN	Input	Patient internal entry number.
PSJINX	Input	Index number so duplicate drugs will be returned.
PSGOCHK	Input	Set to 1 if check should include dispense drugs in ^PS(53.45.
PSIVOCHK	Input	Set to 1 if check should include entries in DRG array.
TMP($J,'ORDERS',PSJINX)	Output	^TMP($J,"ORDERS",PSJINX)= VA CLASSIFICATION^NATIONAL DRUG FILE ENTRY_"A"_PSNDF VA PRODUCT NAME ENTRY^DISPENSE DRUG NAME^ORDER NUMBER IN OR(100^INPATIENT MEDS ORDER NUMBER_";I"

DDRUG

This entry point returns drug information for a
single drug when it is chosen for an order.  This is specifically used in IV
orders to check against the other additives or solutions entered during a
single order entry.

VARIABLES	TYPE	VARIABLES DESCRIPTION
DDRUG	Input	Dispense drug internal entry number.
PSJINX	Input	Index number so duplicate drugs will be returned.
PSJORIEN	Input	Internal entry number for order in ^OR(100.
COD	Input	Order number in Inpatient Meds. number_"P" if order is in ^PS(53.1. number_"U" if order is in ^PS(55.
TMP($J,'ORDERS',PSJINX)	Output	^TMP($J,"ORDERS",PSJINX)= VA CLASSIFICATION^NATIONAL DRUG FILE ENTRY_"A"_PSNDF VA PRODUCT NAME ENTRY^DISPENSE DRUG NAME^ORDER NUMBER IN OR(100^INPATIENT MEDS ORDER NUMBER_IPOROP IPOROP-Set to ";O" if piece 2 of DDRUG array is "PSO". Set to ";N" if piece 2 of DDRUG array is "PSH". Defaults to an ";I".

SUBSCRIBING PACKAGE

SUBSCRIBING PACKAGE	ISC
OUTPATIENT PHARMACY	Birmingham