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

Package: Inpatient Medications

Routine: PSIVWCR1


Information

PSIVWCR1 ;BIR/PR-PRINT WARD COST REPORT ;16 DEC 97 / 1:40 PM

Source Information

Source file <PSIVWCR1.m>

Entry Points

Name Comments DBIA/ICR reference
P
P1 ;
P2
T ;Print grand total
F ;
K

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?1,Z
  • Line Location: P1+1
Function Call: WRITE
  • Prompt: !,?2,$E(AL,1,36),?38,$J($P(G3,U,3),10,2)_" "_C,?57,$J($P(G3,U,6),10,2)
  • Line Location: P2+1
Function Call: WRITE
  • Prompt: ?78,$J($P(G3,U,5),7,2),?96,$J($P(G3,U,7),7,2),?114,"$",$J($P(G3,U,4),17,2)
  • Line Location: P2+1
Function Call: WRITE
  • Prompt: !,?117,"==============="
  • Line Location: T+1
Function Call: WRITE
  • Prompt: !,?17,"GRAND TOTAL:",?114,"$",$J(TC,17,2)
  • Line Location: T+2
Info |  Source |  Entry Points |  Interaction Calls