Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points
Print Page as PDF
Routine: PSJORP2

Package: Inpatient Medications

Routine: PSJORP2


Information

PSJORP2 ;BIR/JCH-CALCULATE FIRST DOSE FOR OE/RR 3.0 ; 4/12/10 8:59am

Source Information

Source file <PSJORP2.m>

Entry Points

Name Comments DBIA/ICR reference
ENQ(PSGP,INFO) ; start
; INFO (piece 1) = START DATE/TIME
; INFO (piece 2) = STOP DATE/TIME
; INFO (piece 3) = SCHEDULE
; INFO (piece 4) = SCHEDULE TYPE
; INFO (piece 5) = ORDERABLE ITEM
; INFO (piece 6) = ADMIN TIMES
OS(PSGP,PSGST) ; order record set
DTS(SCHEDULE) ;
PRT(PSGTS) ; order info
FIRST ; find expected first dose
LAST ; find expected last dose
TS(X) ;
LASTAT(PSGP,INFO) ;
Info |  Source |  Entry Points