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

Package: Registration

Routine: DGPTODF1


Information

DGPTODF1 ;ALB/MTC - PTF DRG FREQUENCY REPORT ; 4/8/14 9:32am

Source Information

Source file <DGPTODF1.m>

Entry Points

Name Comments DBIA/ICR reference
START
QUIT
MCT
ST
BS
BT
BT1
ST1
INIT
TINIT
MI
CON
MCON
TDOL
PRINT
TOT
TOT1
STOT
MT
LAST
PP

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: START+0
Function Call: WRITE
  • Prompt: !?10,$J(D2,3),$J($P(D3,U,3),5),$J($P(D3,U,4),6),$J($P(D3,U,5),6),$J($P(D3,U,6),9),$J($P(D3,U,7),7),$J($P(D3,U,10),9),$J(D1,16),$J(+D3,11),$J(+D3/D1,12,2)
  • Line Location: PRINT+1
Function Call: WRITE
  • Prompt: $J(X,18)
  • Line Location: PRINT+1
Function Call: WRITE
  • Prompt: $J(X,18)
  • Line Location: PRINT+1
Function Call: WRITE
  • Prompt: !
  • Line Location: TOT+0
Function Call: WRITE
  • Prompt: $S(DGFLAG["Serv":"-",1:"=")
  • Line Location: TOT+0
Function Call: WRITE
  • Prompt: !?10,"Total for ",DGFLAG,?46,$J(C2,9),$J(C1,16),$J(C3,11),$J(C3/C1,12,2)
  • Line Location: TOT1+0
Function Call: WRITE
  • Prompt: $J(X,18)
  • Line Location: TOT1+0
Function Call: WRITE
  • Prompt: $J(X,18)
  • Line Location: TOT1+0
Function Call: WRITE
  • Prompt: $J(X,18)
  • Line Location: TOT1+0
Function Call: WRITE
  • Prompt: !
  • Line Location: PP+0
Function Call: WRITE
  • Prompt: !!?62,"-",P,"-"
  • Line Location: PP+0
Info |  Source |  Entry Points |  Interaction Calls