Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: DENTCPM1

Package: Dental

Routine: DENTCPM1


Information

DENTCPM1 ;Wash/HCD,JED-Dental CPM Help Processing ; 11/6/87 3:36 PM ;

Source Information

Source file <DENTCPM1.m>

Call Graph

Call Graph

Call Graph Total: 1

Package Total Call Graph
VA FileMan 1 YN^DICN  

Entry Points

Name Comments DBIA/ICR reference
HLP4
HLP6
HLP6A
HLP6B
HLP8
HLP8A
HLP10
HLP12
HLP14
HLP16
H
DEAPPT
DERD
Q

External References

Name Field # of Occurrence
YN^DICN HLP6AHLP6B

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,?10,"A. Zero to two teeth",!,?10,"B. Three to five teeth",!,?10,"C. Six teeth or more"
  • Line Location: HLP4+0
Function Call: WRITE
  • Prompt: !!,?10,"A. Heavy calculus",!,?10,"B. Nominal calculus"
  • Line Location: HLP4+2
Function Call: WRITE
  • Prompt: !!,?10,"A. Less than six teeth",!,?10,"B. Six teeth or more"
  • Line Location: HLP6+0
Function Call: WRITE
  • Prompt: !!,?10,"Is there a moderate, severe or acute periodontal condition"
  • Line Location: HLP6A+0
Function Call: WRITE
  • Prompt: !!,?10,"A. Patient's Age 40 to 60 years old",!,?10,"B. Patient's age under 40 years old"
  • Line Location: HLP6A+1
Function Call: WRITE
  • Prompt: !!,?10,"Are there:",!!,?10,"A. Three or more sextants to receive C&B",!,?10,"B. Less than three sextants to receive C&B"
  • Line Location: HLP6A+3
Function Call: WRITE
  • Prompt: !!,?10,"Is Gingivitis present"
  • Line Location: HLP6B+0
Function Call: WRITE
  • Prompt: !!,?10,"Enter the number (from 1 to 8) of anterior and",!,?10,"bicuspids to receive ENDODONTIC treatment"
  • Line Location: HLP8+0
Function Call: WRITE
  • Prompt: *7
  • Line Location: HLP8+1
Function Call: WRITE
  • Prompt: !!,?10,"Enter the number (from 1 to 12) of molars to receive ENDO treatment"
  • Line Location: HLP8A+0
Function Call: WRITE
  • Prompt: *7
  • Line Location: HLP8A+1
Function Call: WRITE
  • Prompt: !!,?10,"Enter the number (from 1 to 6) of sextants to receive RESTORATIONS"
  • Line Location: HLP10+0
Function Call: WRITE
  • Prompt: *7
  • Line Location: HLP10+1
Function Call: WRITE
  • Prompt: !!,?10,"A. Extractions",!,?10,"B. Other Procedures",!,?10,"C. Extractions and other"
  • Line Location: HLP12+0
Function Call: WRITE
  • Prompt: !!,?10,"A. 1 to 6 teeth to be extracted",!,?10,"B. 6 or more teeth to be extracted"
  • Line Location: HLP12+2
Function Call: WRITE
  • Prompt: !!,?10,"Enter the number (from 1 to 6) of sextants to receive C&B"
  • Line Location: HLP14+0
Function Call: WRITE
  • Prompt: *7
  • Line Location: HLP14+1
Function Call: WRITE
  • Prompt: !!,?10,"The patient is in need of:",!,?10,"A. A new removable prosthetic",!,?10,"B. A rebased prosthetic",!,?10,"C. No removable prosthetic"
  • Line Location: HLP16+0
Function Call: WRITE
  • Prompt: !!,?10,"Answering the following question will calculate the",!,?10,"number of appointments necessary for this category."
  • Line Location: H+0
Function Call: WRITE
  • Prompt: !!,"With the information provided, ",DENTAPT," appointment"_$S(DENTAPT=1:" was",1:"s were")," calculated to be necessary.",!
  • Line Location: DEAPPT+0
Function Call: WRITE
  • Prompt: "This value has been entered.",!
  • Condition for execution: DENTAPT
  • Line Location: DEAPPT+0
Function Call: READ
  • Timeout: DTIME
  • Line Location: DERD+0
Function Call: WRITE
  • Prompt: *7
  • Line Location: DERD+1
Function Call: WRITE
  • Prompt: !,?10,"Select ",B," or press return to exit this set of questions."
  • Line Location: Q+0

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DENT(220 - [#220] DEAPPT+1*

Label References

Name Line Occurrences
DEAPPT HLP4+3, HLP6+1, HLP6AHLP6A+2, HLP6A+4, HLP6BHLP8A+2, HLP10+2, HLP12+1, HLP12+2
HLP12+3, HLP14+2, HLP16+2
DERD HLP4HLP4+2, HLP6HLP6A+1, HLP6A+3, HLP8HLP8AHLP10HLP12HLP12+2
HLP14HLP16DERDDERD+1
H HLP4HLP6HLP8HLP10HLP12HLP14HLP16
HLP10 HLP10+1
HLP12 HLP12+1, HLP12+4
HLP14 HLP14+1
HLP16 HLP16+1
HLP4 HLP4+3
HLP6 HLP6A
HLP6A HLP6A
HLP6B HLP6B
HLP8 HLP8+1
HLP8A HLP8A+1
Q DERDDERD+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% HLP6A*, HLP6B*, DEAPPT+1!
A HLP8+2*, HLP8A+2, HLP12+2*, HLP12+3, DEAPPT+1!
B HLP4*, HLP4+2*, HLP6*, HLP6A+1*, HLP6A+3*, HLP12*, HLP12+2*, HLP16*, DERD+1, DERD+2!
Q
>> D0 DEAPPT+1
>> DA DEAPPT+1
>> DE( DEAPPT+1*
DENTAPT HLP4+1*, HLP4+2*, HLP4+3, HLP6+1*, HLP6A*, HLP6A+2*, HLP6A+4*, HLP6B*, HLP8A+2*, HLP10+2*
HLP12+1*, HLP12+2*, HLP12+3*, HLP14+2*, HLP16+1*, DEAPPTDEAPPT+1!, DERD*
DENTS HLP4+3*, HLP6+1*, HLP6A*, HLP6A+2*, HLP6A+4*, HLP6B*, HLP8A+2*, HLP10+2*, HLP12+1*, HLP12+2*
HLP12+3*, HLP14+2*, HLP16+2*, DEAPPT+1!
>> DQ DEAPPT+1
DTIME DERD
X HLP4HLP4+1, HLP4+2, HLP6HLP6+1, HLP6AHLP6A+1, HLP6A+2, HLP6A+3, HLP6A+4
HLP8HLP8+1, HLP8+2, HLP8AHLP8A+1, HLP8A+2, HLP10HLP10+1, HLP10+2, HLP12
HLP12+1, HLP12+2, HLP12+3, HLP14HLP14+1, HLP14+2, HLP16HLP16+1, DEAPPT+1!, DERD*
DERD+1
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All