Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Interaction Calls |  Local Variables
Print Page as PDF
Routine: DENTA5

Package: Dental

Routine: DENTA5


Information

DENTA5 ;ISC2/SAW,HAG-FEE BASIS SERVICE REPORT OPTION ; 10/27/88 10:09 AM ;

Source Information

Source file <DENTA5.m>

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,?(80-$L(Z1)/2),Z1,!,?(80-$L(Z3)/2),Z3
  • Line Location: DENTA5+3
Function Call: WRITE
  • Prompt: !!,"TOTAL APPLICATIONS RECEIVED",?33,":",$J($P(Y(0),U,2),4)
  • Line Location: DENTA5+4
Function Call: WRITE
  • Prompt: ?45,"FEE CASES COMP CLASS I",?71,":",$J($P(Y(0),U,14),5)
  • Line Location: DENTA5+4
Function Call: WRITE
  • Prompt: !,"CLASS II APPLICATIONS RECEIVED",?33,":",$J($P(Y(0),U,3),4)
  • Line Location: DENTA5+5
Function Call: WRITE
  • Prompt: ?45,"FEE CASES COMP CLASS II",?71,":",$J($P(Y(0),U,15),5)
  • Line Location: DENTA5+5
Function Call: WRITE
  • Prompt: !,"TOT APP DETERM ELIG FOR EXAM",?33,":",$J($P(Y(0),U,4),4)
  • Line Location: DENTA5+6
Function Call: WRITE
  • Prompt: ?45,"FEE CASES COMP CLASS IIA",?71,":",$J($P(Y(0),U,16),5)
  • Line Location: DENTA5+6
Function Call: WRITE
  • Prompt: !,"TOT APP PEND DETERM OF ELIG EXAM",?33,":",$J($P(Y(0),U,5),4)
  • Line Location: DENTA5+7
Function Call: WRITE
  • Prompt: ?45,"FEE CASES COMP CLASS IIB",?71,":",$J($P(Y(0),U,17),5)
  • Line Location: DENTA5+7
Function Call: WRITE
  • Prompt: !,"TOTAL EXAM AUTH TO BE DONE BY VA",?33,":",$J($P(Y(0),U,6),4)
  • Line Location: DENTA5+8
Function Call: WRITE
  • Prompt: ?45,"FEE CASES COMP CLASS IIC",?71,":",$J($P(Y(0),U,18),5)
  • Line Location: DENTA5+8
Function Call: WRITE
  • Prompt: !,"TOTAL FEE AUTHORIZED EXAMS",?33,":",$J($P(Y(0),U,7),4)
  • Line Location: DENTA5+9
Function Call: WRITE
  • Prompt: ?45,"FEE CASES COMP CLASS III",?71,":",$J($P(Y(0),U,19),5)
  • Line Location: DENTA5+9
Function Call: WRITE
  • Prompt: !,"TOT FEE EXAMS PENDING COMPLETION",?33,":",$J($P(Y(0),U,8),4)
  • Line Location: DENTA5+10
Function Call: WRITE
  • Prompt: ?45,"FEE CASES COMP CLASS IV",?71,":",$J($P(Y(0),U,20),5)
  • Line Location: DENTA5+10
Function Call: WRITE
  • Prompt: !,"TOTAL FEE EXAMS COMPLETED",?33,":",$J($P(Y(0),U,9),4)
  • Line Location: DENTA5+11
Function Call: WRITE
  • Prompt: ?45,"FEE CASES COMP CLASS V",?71,":",$J($P(Y(0),U,21),5)
  • Line Location: DENTA5+11
Function Call: WRITE
  • Prompt: !,"TOT FEE TREAT PEND AUTHORIZATION",?33,":",$J($P(Y(0),U,10),4)
  • Line Location: DENTA5+12
Function Call: WRITE
  • Prompt: ?45,"FEE CASES COMP CLASS VI",?71,":",$J($P(Y(0),U,22),5)
  • Line Location: DENTA5+12
Function Call: WRITE
  • Prompt: !,"TOTAL FEE TREATMENT AUTHORIZED",?33,":",$J($P(Y(0),U,11),4)
  • Line Location: DENTA5+13
Function Call: WRITE
  • Prompt: ?45,"FEE AVG COST ALL CLASSES",?71,":",$J($P(Y(0),U,27),5)
  • Line Location: DENTA5+13
Function Call: WRITE
  • Prompt: !,"TOT FEE TREATMENT PEND COMPLETION",?33,":",$J($P(Y(0),U,12),4)
  • Line Location: DENTA5+14
Function Call: WRITE
  • Prompt: !,"TOTAL FEE TREATMENT COMPLETED",?33,":",$J($P(Y(0),U,13),4)
  • Line Location: DENTA5+15

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
D DENTA5+16!
>> DENTSTA DENTA5+2
>> DENTY0 DENTA5+2
DIC DENTA5+16!
I DENTA5+16!
IOF DENTA5+3
L DENTA5+16!
P DENTA5+16!
U DENTA5+4, DENTA5+5, DENTA5+6, DENTA5+7, DENTA5+8, DENTA5+9, DENTA5+10, DENTA5+11, DENTA5+12, DENTA5+13
, DENTA5+14, DENTA5+15
V DENTA5+16!
>> Y(0 DENTA5+2*, DENTA5+4, DENTA5+5, DENTA5+6, DENTA5+7, DENTA5+8, DENTA5+9, DENTA5+10, DENTA5+11, DENTA5+12
, DENTA5+13, DENTA5+14, DENTA5+15
>> Z1 DENTA5+2*, DENTA5+3
>> Z3 DENTA5+2*, DENTA5+3
Info |  Source |  Interaction Calls |  Local Variables