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 |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: DENTA4

Package: Dental

Routine: DENTA4


Information

DENTA4 ;ISC2/SAW-PERSONNEL SERVICE REPORT OPTION ;9/11/89 15:52 ;

Source Information

Source file <DENTA4.m>

Entry Points

Name Comments DBIA/ICR reference
T
P

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"One moment please while I total your non clinical time entries"
  • Line Location: DENTA4+2
Function Call: WRITE
  • Prompt: @IOF,?(80-$L(Z1)/2),Z1,!,?(80-$L(Z3)/2),Z3
  • Line Location: P+1
Function Call: WRITE
  • Prompt: !,?15,"(All values are in days except Consultant Visits)"
  • Line Location: P+2
Function Call: WRITE
  • Prompt: !!,?37,"NON CLINICAL TIME",!,?16,"DAYS WORKED",?30,"RESEARCH EDUCATION FEE ADMIN",?65,"CLINICAL TIME",!,?16,"___________",?30,"________ _________ ___ _____",?65,"_____________"
  • Line Location: P+3
Function Call: WRITE
  • Prompt: !,"DENTISTS",?20,$J(A(1),3)
  • Line Location: P+6
Function Call: WRITE
  • Prompt: ?32,$J(A(2),3)
  • Line Location: P+6
Function Call: WRITE
  • Prompt: ?32,$J(A(2),3)
  • Line Location: P+6
Function Call: WRITE
  • Prompt: ?51,$J(A(4),3)
  • Line Location: P+7
Function Call: WRITE
  • Prompt: ?57,$J(A(5),3)
  • Line Location: P+7
Function Call: WRITE
  • Prompt: ?57,$J(A(5),3)
  • Line Location: P+7
Function Call: WRITE
  • Prompt: !,"RESIDENTS",?20,$J(A(1),3)
  • Line Location: P+9
Function Call: WRITE
  • Prompt: ?32,$J(A(2),3)
  • Line Location: P+9
Function Call: WRITE
  • Prompt: ?32,$J(A(2),3)
  • Line Location: P+9
Function Call: WRITE
  • Prompt: ?32,$J(A(2),3)
  • Line Location: P+9
Function Call: WRITE
  • Prompt: !,"HYGIENISTS",?20,$J(A(1),3)
  • Line Location: P+11
Function Call: WRITE
  • Prompt: ?32,$J(A(2),3)
  • Line Location: P+11
Function Call: WRITE
  • Prompt: ?32,$J(A(2),3)
  • Line Location: P+11
Function Call: WRITE
  • Prompt: ?32,$J(A(2),3)
  • Line Location: P+11
Function Call: WRITE
  • Prompt: !,"EFDAs",?20,$J(A(1),3)
  • Line Location: P+13
Function Call: WRITE
  • Prompt: ?32,$J(A(2),3)
  • Line Location: P+13
Function Call: WRITE
  • Prompt: ?32,$J(A(2),3)
  • Line Location: P+13
Function Call: WRITE
  • Prompt: ?32,$J(A(2),3)
  • Line Location: P+13
Function Call: WRITE
  • Prompt: !,"ASSISTANTS",?20,$J(A(1),3)
  • Line Location: P+14
Function Call: WRITE
  • Prompt: !,"LAB TECHS",?20,$J(A(1),3)
  • Line Location: P+15
Function Call: WRITE
  • Prompt: !,"ADMIN/CLER",?20,$J(A(1),3)
  • Line Location: P+16
Function Call: WRITE
  • Prompt: !,"ALL OTHERS",?32,$J(A(2),3)
  • Line Location: P+18
Function Call: WRITE
  • Prompt: ?43,$J(A(3),3)
  • Line Location: P+18
Function Call: WRITE
  • Prompt: !!,?5,"TOTALS",?19,$J(T(1),4),?31,$J(T(2),4),?42,$J(T(3),4),?50,$J(T(4),4),?56,$J(T(5),4),?68,$J(T(6),4)
  • Line Location: P+19
Function Call: WRITE
  • Prompt: !!,"CONSULTANTS VISITS: ",$J($P(Y(0),U,9),3)
  • Line Location: P+20
Function Call: WRITE
  • Prompt: *7,!!,"ERROR!!! Clinical time values cannot be negative.",!
  • Line Location: P+21

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DENT(226 - [#226] DENTA4+3, T

Label References

Name Line Occurrences
P DENTA4+4
T DENTA4+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
A P+22!
A(1 P+5*, P+6, P+7, P+8*, P+9, P+10*, P+11, P+12*, P+13, P+14*
P+15*, P+16*
A(2 P+5*, P+6, P+8*, P+9, P+10*, P+11, P+12*, P+13, P+17*, P+18
A(3 P+5*, P+6, P+8*, P+9, P+10*, P+11, P+12*, P+13, P+17*, P+18
A(4 P+5*, P+7
A(5 P+5*, P+7
A(6 P+5*, P+7, P+8*, P+9, P+10*, P+11, P+12*, P+13
A1 DENTA4+3*, P+22!
A2 DENTA4+3*, P+22!
A3 DENTA4+3*, TP+22!
A4 T*, T+1, P+22!
A5 T+1*, P+22!
D P+22!
DENTF P+7*, P+9*, P+11*, P+13*, P+21, P+22!
>> DENTSTA DENTA4+3, P
>> DENTY0 DENTA4+3
G P+22!
G( T*, T+1*, P+4*
G(1 P+5
G(3 P+8
G(4 P+12
G(5 P+10
G(6 P+17
I DENTA4+3*, P*, P+4*, P+22!
IO DENTA4+2
IO(0 DENTA4+2
IOF P+1
J DENTA4+3*, P+22!
L P+22!
P P+22!
T P+22!
T( P*
T(1 P+6*, P+9*, P+11*, P+13*, P+14*, P+15*, P+16*, P+19
T(2 P+6*, P+9*, P+11*, P+13*, P+18*, P+19
T(3 P+6*, P+9*, P+11*, P+13*, P+18*, P+19
T(4 P+7*, P+19
T(5 P+7*, P+19
T(6 P+7*, P+9*, P+11*, P+13*, P+19
U DENTA4+3, TT+1, P+5, P+8, P+10, P+12, P+14, P+15, P+16
P+17, P+20
V P+22!
X T*, T+1, P+22!
>> Y(0 DENTA4+3*, P+5, P+8, P+10, P+12, P+14, P+15, P+16, P+20
>> Z1 P*, P+1
>> Z3 P*, P+1
>> ZTSK DENTA4+2
Info |  Source |  Entry Points |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All