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

Package: Registration

Routine: DGPMBSP6


Information

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

Source Information

Source file <DGPMBSP6.m>

Entry Points

Name Comments DBIA/ICR reference
A
1
Q
2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: A+5
Function Call: WRITE
  • Prompt: ?131,""
  • Condition for execution: $Y<131
  • Line Location: A+5
Function Call: WRITE
  • Prompt: $C(13)
  • Line Location: A+5
Function Call: WRITE
  • Prompt: !
  • Condition for execution: UL["-"
  • Line Location: A+5
Function Call: WRITE
  • Prompt: UL
  • Line Location: A+5
Function Call: WRITE
  • Prompt: !?0,"|",?X1,X,?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,"|",?26,"|",?40,"| Interward",?54,"|Interservice",?68,"|",?82,"| Interward",?96,"|Interservice",?110,"|",?117,"Patient",?130,"|"
  • Line Location: A+9
Function Call: WRITE
  • Prompt: !?0,"|",?26,"| Admissions",?40,"| Gains",?54,"| Gains",?68,"| Discharges",?82,"| Losses",?96,"| Losses",?110,"| Days",?130,"|"
  • Line Location: A+10
Function Call: WRITE
  • Prompt: ?131,""
  • Condition for execution: $Y<131
  • Line Location: A+11
Function Call: WRITE
  • Prompt: $C(13)
  • Line Location: A+11
Function Call: WRITE
  • Prompt: !
  • Condition for execution: UL["-"
  • Line Location: A+11
Function Call: WRITE
  • Prompt: UL
  • Line Location: A+11
Function Call: WRITE
  • Prompt: !?0,"|",?26,"|"
  • Line Location: A+12
Function Call: WRITE
  • Prompt: ?131,""
  • Condition for execution: $Y<131
  • Line Location: A+15
Function Call: WRITE
  • Prompt: $C(13)
  • Line Location: A+15
Function Call: WRITE
  • Prompt: !
  • Condition for execution: UL["-"
  • Line Location: A+15
Function Call: WRITE
  • Prompt: UL
  • Line Location: A+15
Function Call: WRITE
  • Prompt: ?131,""
  • Condition for execution: $Y<131
  • Line Location: 1+1
Function Call: WRITE
  • Prompt: $C(13)
  • Line Location: 1+1
Function Call: WRITE
  • Prompt: !
  • Condition for execution: UL["-"
  • Line Location: 1+1
Function Call: WRITE
  • Prompt: UL
  • Line Location: 1+1
Function Call: WRITE
  • Prompt: !?0,"|",$E(Z,1,23),?26,"|"
  • Line Location: 2+1
Function Call: WRITE
  • Prompt: $J(+$P(X,"^",K),X1),"|"
  • Line Location: 2+1
Info |  Source |  Entry Points |  Interaction Calls