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

Package: Dental

Routine: DENTAR3


Information

DENTAR3 ;ISC2/SAW,HAG-CLASS I-VI SERVICE REPORT RELEASE OPTION ; 3/13/89 10:46 AM ;

Source Information

Source file <DENTAR3.m>

Entry Points

Name Comments DBIA/ICR reference
B

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,?(80-$L(Z1)/2),Z1,!,?(80-$L(Z3)/2),Z3
  • Line Location: DENTAR3+3
Function Call: WRITE
  • Prompt: !!,?15,"TREATMENT",?32,"TREATMENT CASES",?53,"TREATMENT CASES"
  • Line Location: DENTAR3+4
Function Call: WRITE
  • Prompt: !,?12,"CASES AUTHORIZED",?31,"PENDING INITIATION",?52,"PENDING COMPLETION"
  • Line Location: DENTAR3+5
Function Call: WRITE
  • Prompt: !,"CLASS I",?18,$J($P(Y(0),U,2),3)
  • Line Location: DENTAR3+6
Function Call: WRITE
  • Prompt: ?38,$J($P(Y(0),U,3),3)
  • Line Location: DENTAR3+6
Function Call: WRITE
  • Prompt: ?38,$J($P(Y(0),U,3),3)
  • Line Location: DENTAR3+6
Function Call: WRITE
  • Prompt: !,"CLASS II",?18,$J($P(Y(0),U,5),3)
  • Line Location: DENTAR3+7
Function Call: WRITE
  • Prompt: ?38,$J($P(Y(0),U,6),3)
  • Line Location: DENTAR3+7
Function Call: WRITE
  • Prompt: ?38,$J($P(Y(0),U,6),3)
  • Line Location: DENTAR3+7
Function Call: WRITE
  • Prompt: !,"CLASS IIA",?18,$J($P(Y(0),U,8),3)
  • Line Location: DENTAR3+8
Function Call: WRITE
  • Prompt: ?38,$J($P(Y(0),U,9),3)
  • Line Location: DENTAR3+8
Function Call: WRITE
  • Prompt: ?38,$J($P(Y(0),U,9),3)
  • Line Location: DENTAR3+8
Function Call: WRITE
  • Prompt: !,"CLASS IIB",?18,$J($P(Y(0),U,11),3)
  • Line Location: DENTAR3+9
Function Call: WRITE
  • Prompt: ?38,$J($P(Y(0),U,12),3)
  • Line Location: DENTAR3+9
Function Call: WRITE
  • Prompt: ?38,$J($P(Y(0),U,12),3)
  • Line Location: DENTAR3+9
Function Call: WRITE
  • Prompt: !,"CLASS IIC",?18,$J($P(Y(0),U,14),3)
  • Line Location: DENTAR3+10
Function Call: WRITE
  • Prompt: ?38,$J($P(Y(0),U,15),3)
  • Line Location: DENTAR3+10
Function Call: WRITE
  • Prompt: ?38,$J($P(Y(0),U,15),3)
  • Line Location: DENTAR3+10
Function Call: WRITE
  • Prompt: !,"CLASS III",?18,$J($P(Y(0),U,17),3)
  • Line Location: DENTAR3+11
Function Call: WRITE
  • Prompt: ?38,$J($P(Y(0),U,18),3)
  • Line Location: DENTAR3+11
Function Call: WRITE
  • Prompt: ?38,$J($P(Y(0),U,18),3)
  • Line Location: DENTAR3+11
Function Call: WRITE
  • Prompt: !,"CLASS IV",?18,$J($P(Y(0),U,20),3)
  • Line Location: DENTAR3+12
Function Call: WRITE
  • Prompt: ?38,$J($P(Y(0),U,21),3)
  • Line Location: DENTAR3+12
Function Call: WRITE
  • Prompt: ?38,$J($P(Y(0),U,21),3)
  • Line Location: DENTAR3+12
Function Call: WRITE
  • Prompt: !,"CLASS V",?18,$J($P(Y(0),U,23),3)
  • Line Location: DENTAR3+13
Function Call: WRITE
  • Prompt: ?38,$J($P(Y(0),U,24),3)
  • Line Location: DENTAR3+13
Function Call: WRITE
  • Prompt: ?38,$J($P(Y(0),U,24),3)
  • Line Location: DENTAR3+13
Function Call: WRITE
  • Prompt: !,"CLASS VI",?18,$J($P(Y(0),U,26),3)
  • Line Location: DENTAR3+14
Function Call: WRITE
  • Prompt: ?38,$J($P(Y(0),U,27),3)
  • Line Location: DENTAR3+14
Function Call: WRITE
  • Prompt: ?38,$J($P(Y(0),U,27),3)
  • Line Location: DENTAR3+14
Function Call: WRITE
  • Prompt: !!,?5,"TOTALS",?17,$J(T(1),4),?37,$J(T(2),4),?58,$J(T(3),4)
  • Line Location: DENTAR3+15
Info |  Source |  Entry Points |  Interaction Calls