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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: DENTE3

Package: Dental

Routine: DENTE3


Information

DENTE3 ;ISC2/HAG-COMINATION OF ROUTINES ;10/24/90 13:56 ;

Source Information

Source file <DENTE3.m>

Entry Points

Name Comments DBIA/ICR reference
SRD ;RE-RELEASE A RANGE OF TREATMENT DATA
CHK
PROV ;CHECK PROVIDER STATUS
ATDEL ;DELETE SERVICE TAPE GLOBAL
DPSET ;SET STATEMENT - MUMPS X-REF FOR FIELD 2 IN FILE 221
DPKILL ;KILL STATEMENT - MUMPS X-REF ON FIELD 2 IN FILE 221
STA
W
EXIT
PAT ; DENTAL PATIENT
TOO ; TOOTH PATTERN

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Formatting: !!
  • Prompt: "Select RELEASE DATE: "
  • Variable: Y
  • Timeout: DTIME
  • Line Location: SRD+1
Function Call: WRITE
  • Prompt: !,?7,Y
  • Line Location: SRD+1
Function Call: WRITE
  • Prompt: !!,Y," station ",DENTSTA," has ",T1," treatment data entry now enabled for re-release."
  • Line Location: SRD+6
Function Call: WRITE
  • Prompt: !!
  • Line Location: PROV+1
Function Call: WRITE
  • Prompt: !
  • Line Location: PROV+1
Function Call: WRITE
  • Prompt: *7,!!,"Before deleting this global, be sure that you have used the Generate Monthly",!,"Dental SERVICE Tape option to generate a tape to be mailed to the Austin, TX DPC."
  • Line Location: ATDEL+1
Function Call: WRITE
  • Prompt: *7,!,"Nothing deleted."
  • Line Location: ATDEL+2
Function Call: WRITE
  • Prompt: !!
  • Line Location: STA+0
Function Call: WRITE
  • Prompt:
  • Condition for execution: '$D(^DENT(225,0)) F Z3=0:1:2 S Z1=$O(^(Z1)) Q:Z1'>0
  • Line Location: STA+0
Function Call: WRITE
  • Prompt: I
  • Line Location: STA+1
Function Call: WRITE
  • Prompt: W
  • Line Location: W+0
Function Call: WRITE
  • Prompt: !!,"Stations have not been entered in the Dental Site Parameter file.",!,"You must enter a station before you can use this option"
  • Line Location: W+0

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DENT(220.5 - [#220.5] Classic Fileman Calls
^DENT(225 - [#225] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call