Routine: ORWDPS

Information

ORWDPS ; SLC/KCM - Pharmacy Calls for Windows Dialog [ 08/04/96 6:57 PM ]

Source file <ORWDPS.m>

Name	Comments	DBIA/ICR reference
REFILLS	; refills
MESSAGE	; message
INPT(OK,DFN,PRV)	; For inpatient meds, check restrictions
SCHED	; schedules
DEF(LST,INOUT)
NXT()	; -- Function returns next available index in return data array
DISPDRUG(LST,OI)	; list dispense drugs for an orderable item
OUTPT(OK,PRV)	; For outpatient meds, check restrictions
PRIOR	; priorities
PICKUP	; routing
COMMON	; get list of common meds
FRMLTN	; formulations
LOAD(LST,OI,PTYP)	; ; -- For a given orderable item, load appropriate lists & defaults
INSTRCT	; instructions
ROUTE	; routes
SCSTS	; SC for drug

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	INPT+2
^ORD(101.42 - [#101.42]	PRIOR+2
^ORD(101.43 - [#101.43]	FRMLTN+1, INSTRCT+1, MESSAGE+1, COMMON+5
^PS(51.1 - [#51.1]	SCHED+1
^TMP("PSJINS"	INSTRCT+2, ROUTE+5!
^TMP("PSJMR"	ROUTE+2, ROUTE+5!
^VA(200 - [#200]	INPT+3, INPT+4, OUTPT+2, OUTPT+3

Name	Line Occurrences
$$NXT	LOAD+3, LOAD+4, LOAD+5, LOAD+6, LOAD+7, LOAD+8, LOAD+10, LOAD+11, LOAD+12, FRMLTN+2 , INSTRCT+4, ROUTE+3, ROUTE+4, SCHED+2, PRIOR+2, PRIOR+3, PICKUP+1, PICKUP+2, SCSTS+1, REFILLS+1 , REFILLS+2, MESSAGE+1, DEF+2, COMMON+5
COMMON	DEF+2
FRMLTN	LOAD+3, DISPDRUG+1
INSTRCT	LOAD+4
MESSAGE	LOAD+8
PICKUP	LOAD+10
PRIOR	LOAD+7
REFILLS	LOAD+12
ROUTE	LOAD+5
SCHED	LOAD+6
SCSTS	LOAD+11

Name	Field # of Occurrence
^(	INSTRCT+2, ROUTE+3, SCHED+2, MESSAGE+1
^(0	INPT+3, OUTPT+2

Name	Field # of Occurrence
AUTH	INPT+1~, INPT+4, INPT+5, OUTPT+1~, OUTPT+3, OUTPT+4
CNT	LOAD+2~, ROUTE+1, ROUTE+3, ROUTE+4
DFN	INPT~, INPT+2
DT	INPT+5, OUTPT+4
I	LOAD+2~, FRMLTN+2, INSTRCT+2, ROUTE+1, ROUTE+2, ROUTE+3, SCHED+1, SCHED+2, MESSAGE+1, DEF+1~ , COMMON+3*, COMMON+4
IEN	DEF+1~, COMMON+4*, COMMON+5
ILST	LOAD+2~, DISPDRUG+1~, ROUTE+4, NXT+1, NXT+2, DEF+1~
INACT	INPT+1~, INPT+4, INPT+5, OUTPT+1~, OUTPT+3, OUTPT+4
INOUT	DEF~, COMMON+1
LST	LOAD~, DISPDRUG~, DEF~
LST(	LOAD+3, LOAD+4, LOAD+5, LOAD+6, LOAD+7, LOAD+8, LOAD+10, LOAD+11, LOAD+12, FRMLTN+2 , INSTRCT+4, ROUTE+3, ROUTE+4, SCHED+2, PRIOR+2, PRIOR+3, PICKUP+1, PICKUP+2, SCSTS+1, REFILLS+1 , REFILLS+2, MESSAGE+1, DEF+2, COMMON+5
NAME	INPT+1~, INPT+3, INPT+6, OUTPT+1~, OUTPT+2, OUTPT+5
OI	LOAD~, DISPDRUG~, FRMLTN+1, INSTRCT+1, MESSAGE+1
OK	INPT~, INPT+1, INPT+2, INPT+6, OUTPT~, OUTPT+1, OUTPT+5*
ORTMP	LOAD+2~, FRMLTN+1
ORTMP(	FRMLTN+2
PRV	INPT~, INPT+3, INPT+4, OUTPT~, OUTPT+2, OUTPT+3
PTYP	LOAD~, LOAD+9, DISPDRUG+1~*, FRMLTN+1, INSTRCT+3
TMPLST	DEF+1~, COMMON+2
TMPLST(	COMMON+3, COMMON+4
U	INSTRCT+1, INSTRCT+3, INSTRCT+4, ROUTE+3, SCHED+2, PRIOR+2, REFILLS+1, COMMON+4, COMMON+5, INPT+3 , INPT+4, OUTPT+2, OUTPT+3
X	LOAD+2~, INSTRCT+2, INSTRCT+3, INSTRCT+4, ROUTE+4, PRIOR+1, PRIOR+2, PICKUP+1, SCSTS+1, REFILLS+1* , DEF+1~, COMMON+1, COMMON+2, INPT+1~, INPT+4, OUTPT+1~, OUTPT+3*