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: PSIVAMIS

Package: Inpatient Medications

Routine: PSIVAMIS


Information

PSIVAMIS ;BIR/CCH,PR-AMIS REPORT ;03 NOV 94 / 4:38 PM

Source Information

Source file <PSIVAMIS.m>

Entry Points

Name Comments DBIA/ICR reference
ENQ
PRTQUE
W
K
DRUG
WARD
TYPE
H
WRT2
WDTOT
COMPTE
HERE
PRTLN
CTOT
PRTLN1
IV
GETEM
SETEM

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: S
  • Line Location: PRTQUE+0
Function Call: WRITE
  • Prompt: U
  • Line Location: W+0
Function Call: WRITE
  • Prompt: !!,"IV ROOM ",$P(^PS(59.5,IV,0),U)
  • Line Location: W+1
Function Call: WRITE
  • Prompt: !!?56,"================",!?5,"*TOTAL FOR IV ROOM: ",$P(^PS(59.5,IV,0),U),?54,$J(IVTOT,18,4),!
  • Line Location: W+1
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $Y
  • Line Location: H+0
Function Call: WRITE
  • Prompt: !!!?31,"IV AMIS REPORT",?65,"Page No. ",PGCNT,!,?20,"FROM "
  • Line Location: H+0
Function Call: WRITE
  • Prompt: Y," THROUGH "
  • Line Location: H+0
Function Call: WRITE
  • Prompt: Y," THROUGH "
  • Line Location: H+0
Function Call: WRITE
  • Prompt: Y," THROUGH "
  • Line Location: H+0
Function Call: WRITE
  • Prompt: !!,?36,"TOTAL",?63,"AVERAGE",!,?5,"TYPE",?34,"DISPENSED (BAGS)",?64,"COST"
  • Line Location: H+1
Function Call: WRITE
  • Prompt: !!
  • Line Location: H+2
Function Call: WRITE
  • Prompt: "="
  • Line Location: H+2
Function Call: WRITE
  • Prompt: !,?30,"_____________",?57,"_______________"
  • Line Location: WDTOT+0
Function Call: WRITE
  • Prompt: !,?5,"TOTAL FOR WARD"
  • Line Location: WDTOT+1
Function Call: WRITE
  • Prompt: !?5
  • Line Location: PRTLN+0
Function Call: WRITE
  • Prompt: "*"
  • Condition for execution: $D(PR)
  • Line Location: PRTLN+0
Function Call: WRITE
  • Prompt: $S(TYP="P":"Piggyback",TYP="A":"Admixture",TYP="H":"Hyperal",TYP="C":"Chemotherapy",1:"Syringe")
  • Line Location: PRTLN+0
Function Call: WRITE
  • Prompt: ?35,$J(DISP,8,0),?60,$J(TUC,12,4)
  • Line Location: PRTLN1+0
Function Call: WRITE
  • Prompt: !!,PERRY
  • Line Location: IV+0
Info |  Source |  Entry Points |  Interaction Calls