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 |  Interaction Calls
Print Page as PDF
Routine: PSIVWL

Package: Inpatient Medications

Routine: PSIVWL


Information

PSIVWL ;BIR/RGY,PR - COMPILE AND PRT WARD LIST ;13 MAR 97 / 10:18 AM

Source Information

Source file <PSIVWL.m>

Entry Points

Name Comments DBIA/ICR reference
DEQ ;
Q
SETP
MAN1
MAN2
MAN3 ;I P(4)=""!(P(4)'=PSIVT) S NOFLG=1 D NOW^%DTC S PSIVRUN=$E(%,1,12) K %,%I,%H D HDR^PSIVWL1 W !!,"****NO DATA FOUND FOR THIS REPORT!***" Q
QUE
ENP3 ;
QSP
CHK
ENP4
ENT ;PSIVMIN=# of min. to add or sub, PSIVSD=date to add or sub from in FM format -- Answer ret. in 'Y'
  • ICR #2154
    • Status: Active
    • Usage: Private

    Interaction Calls

    Name Line Occurrences
    Function Call: READ
    • Variable: X
    • Timeout: DTIME
    • Line Location: PSIVWL+6
    Function Call: WRITE
    • Prompt: @IOF
    • Condition for execution: $Y
    • Line Location: DEQ+2
    Function Call: WRITE
    • Prompt: !!,"**** WARNING --- WARD LIST NOT RUN, LABEL RUN IN PROGRESS ****"
    • Line Location: DEQ+2
    Function Call: WRITE
    • Prompt: !!,"****NO DATA FOUND FOR THIS REPORT!***"
    • Line Location: MAN3+0
    Info |  Source |  Entry Points |  Interaction Calls