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 |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: DENTAR1

Package: Dental

Routine: DENTAR1


Information

DENTAR1 ;ISC2/SAW,HAG-RELEASE DENTAL TREATMENT DATA SERVICE REPORTS FOR TRANSMISSION TO AUSTIN ;1/26/98 13:54 ;

Source Information

Source file <DENTAR1.m>

Call Graph

Call Graph

Call Graph Total: 14

Package Total Call Graph
Dental 6 ^DENTAR11  ^DENTAR12  ^DENTAR13  ^DENTAR14  NOREV^DENTAR16  Q4^DENTQ  
VA FileMan 5 ^%DT  %XY^%RCR  ^DIC  YN^DICN  DT^DICRW  
Kernel 2 ^%ZIS  $$VERSION^XPDUTL  
MailMan 1 ^XMD  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 11

Package Total Caller Graph
Dental 11 DENTAR11  DENTAR12  DENTAR13  DENTAR14  DENTARA  DENTTREAT RELEASE  DENTTREATCLINIC RELEASE  DENTTREATNOREV RELEASE  
DENTTREATPROV RELEASE  DENTTREATSIT RELEASE  DENTTREATSITPROV RELEASE  

Entry Points

Name Comments DBIA/ICR reference
IN
PR
RE
PROV
SITPROV
CLINIC
SIT
NOREV
DATE
D1
ASK
A
EN1
M
W
CLOSE
EXIT
EXIT1
OPT ;;REVIEW TREATMENT DATA SERVICE REPORTS;OPTION;DENTAR1

External References

Name Field # of Occurrence
^%DT D1+1, D1+2
%XY^%RCR EN1+3
^%ZIS PR
^DENTAR11 PROV
^DENTAR12 SITPROV
^DENTAR13 CLINIC
^DENTAR14 SIT
NOREV^DENTAR16 NOREV
Q4^DENTQ A
^DIC REDATE+1
YN^DICN A
DT^DICRW DENTAR1+2
^XMD EN1+2
$$VERSION^XPDUTL DENTAR1+2, PR+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,$P(O,S,3),":",!,$$VERSION^XPDUTL("DENT")," ",$P($T(+1),S,1),!!,$P(O,S,4),"S:",!
  • Line Location: PR+2
Function Call: WRITE
  • Prompt: !,?K,J,". ",$P(^DOPT($P(O,S,5),J,0),U,1)
  • Line Location: PR+3
Function Call: WRITE
  • Prompt: !
  • Line Location: RE+0
Function Call: WRITE
  • Prompt: !!
  • Line Location: DATE+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: DATE+0
Function Call: WRITE
  • Prompt: I
  • Line Location: DATE+1
Function Call: WRITE
  • Prompt: S
  • Line Location: DATE+2
Function Call: WRITE
  • Prompt: !!,"Enter the starting and ending dates for the Treatment Data entries that",!,"you wish to review/release",!
  • Line Location: D1+0
Function Call: WRITE
  • Prompt: *7,!!,"End Date before Start Date?"
  • Line Location: D1+3
Function Call: WRITE
  • Prompt: !,"Nothing released",*7
  • Line Location: A+0
Function Call: WRITE
  • Prompt: !,"Report released for transmission to Austin"
  • Line Location: M+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
Routine Call
  • DIC
  • Line Location:
    • RE
    • DATE+1
Routine Call
  • %ZIS
  • Line Location:
    • PR

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DENT(225 - [#225] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZIS("C" CLOSE
^%ZTSK - [#14.4] EXIT1!
^DD("DD" D1+1, D1+2
^DENT(221 - [#221] M*!
^DENT(225 - [#225] DATEDATE+2, EN1+1
^DOPT( DENTAR1+2, DENTAR1+3!, DENTAR1+4*, DENTAR1+5*, PR+3
^UTILITY("DENTV" EN1+3, EN1+4*
^UTILITY($J DATE!, EN1*, EN1+3, M, EXIT1!

Label References

Name Line Occurrences
@( INPR+1, RE
A A
ASK PROVSITPROVCLINICSITNOREV
CLOSE ASKASK+1, AM+2
D1 D1+3
DATE PROVSITPROVCLINICSITNOREV
EXIT REPROVSITPROVCLINICSITNOREV
IN DENTAR1+2
M EN1+3
OPT RE
PR RE
RE RE
W DATEDATE+1, DATE+2

Naked Globals

Name Field # of Occurrence
^( DATEM
^("DENTV" EN1+3
^(0 EN1+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% A*, EXIT!
%DT D1+1*, D1+2*, EXIT!
%DT("A" D1+1*!, D1+2*!
>> %O DENTAR1+2*
%X EN1+3*, EXIT!
%Y EN1+3*, EXIT!
A EXIT!
DENTA EN1+1*, EN1+2, EN1+3, EXIT!
DENTC ASKASK+1, EN1, EXIT!
DENTED D1+2*, D1+3, EXIT!
DENTF EXIT!
DENTF1 ASK, EXIT!
DENTSD D1+1*, D1+3, EXIT!
>> DENTSTA DATE+1, DATE+2*, DATE+3*, EN1+1
DENTV DENTAR1+2*, DENTAR1+5, EXIT!
DIC RE*!, DATE+1*, EXIT!
DIC("A" RE*, DATE+1*!
DIC("B" DATE+1*!
DIC(0 RE*, DATE+1*
DT DENTAR1+2, M
DUZ EN1+2, M
H1 D1+1*, EXIT!
H2 D1+2*, EXIT!
H5 EN1+2, EXIT!
I DENTAR1+4*, DENTAR1+5!, EN1+3*, EXIT!
IO ASK+1
>> IO(0 ASK+1
IOF PR
IOP PR*!
IOST PR
J PR+3*, RE!, EN1+3*, EXIT!
K DENTAR1+5*!, PR+3*, EN1+3*, EN1+4, EXIT!
N EN1+3*, EXIT!
O DENTAR1+2*, DENTAR1+3, DENTAR1+4, DENTAR1+5, IN, PR*, PR+1, PR+2, PR+3, RE!
, EXIT!
Q EN1EN1+2, EN1+3, EXIT!
Q1 EN1+2*, EN1+3*, EN1+4, EXIT!
S DENTAR1+2*, DENTAR1+3, DENTAR1+4, DENTAR1+5, IN, PR*, PR+1, PR+2, PR+3, RE
, EXIT!
U DENTAR1+2*, DENTAR1+5, PR+3, RE, DATE*, DATE+2
X DENTAR1+5!, RE, M*, EXIT!
X1 M*, EXIT!
XMDUZ EN1+2*, EXIT!
XMSUB EN1+2*, EXIT!
XMTEXT EN1+2*, EXIT!
XMY EXIT!
XMY( EN1+2*
XMY("XXX@Q-DAS.DOMAIN.EXT" EN1+2*
Y REPROVSITPROVCLINICSITNOREVDATE+1, DATE+2*, D1+1, D1+2
, EXIT!
Z1 DATE*, DATE+2*, EXIT!
Z2 DATE*, DATE+2, EXIT!
Z3 DATE*, DATE+1, DATE+2*, EN1+2, M, EXIT!
Z5 DATE*, EXIT!
>> ZTSK ASKEXIT1

Marked Items

Name Field # of Occurrence
$T( PR+2
$T(@(1) DENTAR1+2, PR
$T(@(1)+I DENTAR1+4
$T(OPT RE
$T(OPT+Y RE
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All