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

Package: Registration

Routine: DGPMBSP5


Information

DGPMBSP5 ;ALB/LM - BSR PRINT, CONT.; 13 JUNE 90

Source Information

Source file <DGPMBSP5.m>

Entry Points

Name Comments DBIA/ICR reference
A
Q
WADC

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: A+4
Function Call: WRITE
  • Prompt: ?131,""
  • Condition for execution: $Y<131
  • Line Location: A+4
Function Call: WRITE
  • Prompt: $C(13)
  • Line Location: A+4
Function Call: WRITE
  • Prompt: !
  • Condition for execution: UL["-"
  • Line Location: A+4
Function Call: WRITE
  • Prompt: UL
  • Line Location: A+4
Function Call: WRITE
  • Prompt: !?0,"|",?(RM-$L(X)\2),X,?130,"|"
  • Line Location: A+5
Function Call: WRITE
  • Prompt: ?131,""
  • Condition for execution: $Y<131
  • Line Location: A+6
Function Call: WRITE
  • Prompt: $C(13)
  • Line Location: A+6
Function Call: WRITE
  • Prompt: !
  • Condition for execution: UL["-"
  • Line Location: A+6
Function Call: WRITE
  • Prompt: UL
  • Line Location: A+6
Function Call: WRITE
  • Prompt: !?0,"|",?57,"|",?67,"Cumulative FYTD",?93,"||",?103,"Cumulative MONTH",?130,"|"
  • Line Location: A+7
Function Call: WRITE
  • Prompt: ?131,""
  • Condition for execution: $Y<131
  • Line Location: A+8
Function Call: WRITE
  • Prompt: $C(13)
  • Line Location: A+8
Function Call: WRITE
  • Prompt: !
  • Condition for execution: UL["-"
  • Line Location: A+8
Function Call: WRITE
  • Prompt: UL
  • Line Location: A+8
Function Call: WRITE
  • Prompt: !?0,"|","DIVISION",?57,"|",?61,"Hospital|",?77,"NHCU|",?89,"Dom.||",?98,"Hospital|",?114,"NHCU|",?126,"Dom.|"
  • Line Location: A+9
Function Call: WRITE
  • Prompt: ?131,""
  • Condition for execution: $Y<131
  • Line Location: A+10
Function Call: WRITE
  • Prompt: $C(13)
  • Line Location: A+10
Function Call: WRITE
  • Prompt: !
  • Condition for execution: UL["-"
  • Line Location: A+10
Function Call: WRITE
  • Prompt: UL
  • Line Location: A+10
Function Call: WRITE
  • Prompt: !?0,"|",$E($P(X,"^"),1,30),?49,"Planned |",$J(+$P(X1,"^",4),11,1),"|",$J(+$P(X1,"^",2),11,1),"|",$J(+$P(X1,"^",10),11,1),"||",$J(+$P(X1,"^",3),11,1),"|",$J(+$P(X1,"^",11),11,1),"|",$J(+$P(X1,"^",12),11,1),"|"
  • Line Location: WADC+0
Function Call: WRITE
  • Prompt: !?0,"|",?50,"ACTUAL |"
  • Line Location: WADC+3
Function Call: WRITE
  • Prompt: $J(X,11,1),"|"
  • Line Location: WADC+4
Function Call: WRITE
  • Prompt: "|"
  • Line Location: WADC+5
Function Call: WRITE
  • Prompt: $J(X,11,1),"|"
  • Line Location: WADC+5
Function Call: WRITE
  • Prompt: ?131,""
  • Condition for execution: $Y<131
  • Line Location: WADC+6
Function Call: WRITE
  • Prompt: $C(13)
  • Line Location: WADC+6
Function Call: WRITE
  • Prompt: !
  • Condition for execution: UL["-"
  • Line Location: WADC+6
Function Call: WRITE
  • Prompt: UL
  • Line Location: WADC+6
Info |  Source |  Entry Points |  Interaction Calls