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

Package: VA Fileman

Routine: DICN1


Information

DICN1 ;SFISC/GFT,TKW,SEA/TOAD-PROCESS DIC("DR") ;10:54 AM 9 Feb 2001 [ 04/02/2003 8:23 AM ]

Source Information

Source file <DICN1.m>

Call Graph

Call Graph Total: 11

Package Total Call Graph
VA Fileman 11 STORLIST^%RCR  CLRMSG^DDS  LIST^DDSU  REFRESH^DDSUTL  $$EZBLD^DIALOG  A^DIC  Q^DIC2  INCR^DICN0  
^DIE  ^DIK  $$INTEG^DIKK  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
VA Fileman 2 DICN  DICN0  

Entry Points

Name Comments DBIA/ICR reference
A
D
H
IHSGL(X) ;----- CHECK GL NODE OF TOP LEVEL FILE FOR DUZ(2)
CKID
RCR ;
ASKP001 ; ask user to confirm new record's .001 field value
; NEW^DICN
Q
BAD
W
N ; test X as an IEN (apply input transform and numeric restrictions)
; USR^DICN, ASKP001
ZAP

External References

Name Field # of Occurrence
STORLIST^%RCR DICN1+34, W+2
CLRMSG^DDS RCR+4, RCR+9
LIST^DDSU W+1, ZAP+5, ASKP001+35, ASKP001+54
REFRESH^DDSUTL RCR+10
$$EZBLD^DIALOG A+9
A^DIC BAD+1
Q^DIC2 BAD
INCR^DICN0 ASKP001+55
^DIE RCR+7
^DIK ZAP+7
$$INTEG^DIKK A+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !," ",$$EZBLD^DIALOG(741)
  • Line Location: A+9
Function Call: READ
  • Timeout: $S($D(DTIME):DTIME,1:300)
  • Variable: Y
  • Line Location: ASKP001+33
Function Call: WRITE
  • Prompt: !,DST
  • Line Location: ASKP001+33
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: ASKP001+33
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: ASKP001+45
Routine Call
  • DDS
  • Line Location:
    • RCR+4
    • RCR+9
Routine Call
  • DIE
  • Line Location:
    • RCR+7
Routine Call
  • DIALOG
  • Line Location:
    • A+9
Routine Call
  • DIC
  • Line Location:
    • BAD+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( DICN1+29, CKID, CKID+1, ASKP001+7, ASKP001+25, ASKP001+26, ASKP001+50, IHSGL+14, N+3
^DD("KEY" - [#.31] DICN1+24, DICN1+25, DICN1+31
^DD("SITE" ASKP001+20
^DIC - [#1] IHSGL+15
^DIC(3 - [#3] ASKP001+18
^VA(200 - [#200] ASKP001+18

Label References

Name Line Occurrences
$$IHSGL A+6
BAD DICN1+10
CKID DICN1+26, DICN1+29
H W, W+1, ZAP+5, ASKP001+35, ASKP001+54
N ASKP001+27, ASKP001+42
W DICN1+10
ZAP D

Naked Globals

Name Field # of Occurrence
^("UP" IHSGL+14
^(0 CKID+1, W, N+3
^(1 ASKP001+18, ASKP001+19, ASKP001+20
^(3 ASKP001+50
^(4 ASKP001+52, ASKP001+54
^(9 CKID+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% DICN1+10~*, DICN1+24, DICN1+28, DICN1+29, CKID, CKID+1*!, RCR+6!*, ASKP001+20*, ASKP001+26*, ASKP001+27*
, ASKP001+35!
%RCR DICN1+7!, DICN1+34*, W+2*
%RCR( DICN1+8*
%RCR("DIE(""NO^"")" RCR+2*
>> %Y ASKP001+26*, ASKP001+27*
A1 W*, W+1*, H!, H+5!, ZAP+5*, ASKP001+35*, ASKP001+54*
>> D BAD
>> DA DICN1+10, DICN1+35, BAD*, A, A+6
>> DD DICN1+11*, DICN1+13*, DICN1+14*, DICN1+15*, DICN1+18*, DICN1+19*, DICN1+20*, DICN1+21*, DICN1+22*, DICN1+31
, DICN1+33*, CKID+3, CKID+4*, RCR+1
>> DDH H*
>> DDH( H*
>> DDH("ID" ASKP001+54*
>> DDS W, W+1, H, RCR+4, RCR+8, ZAP+5, ASKP001+32, ASKP001+46, ASKP001+51
DE RCR+1!
DG RCR+1!
DIADD RCR+1!
DIC RCR+1!, D, ASKP001+16, ASKP001+43, N+4
DIC("DR" DICN1+22, DICN1+28
DIC("W" A+8
DIC(0 DICN1+15, DICN1+20, DICN1+23, DICN1+32, RCR+1, D, ASKP001+5
DICRS DICN1+7!
DIDA DICN1+7!
>> DIE RCR+1*, A+6, ZAP, D*
>> DIE("NO^" RCR+2, RCR+3*, RCR+4!
>> DIE("W" RCR+1*, RCR+4!
DIENS RCR+5~, A+6
>> DIENTRY ASKP001+16
DIFILEI RCR+5~, A+6
>> DIK ZAP*, ZAP+5
DINDEX RCR+5~
>> DINO01 DICN1+12
>> DINUM N+3
DIOPER RCR+5~, RCR+6*
DISAV0 RCR+1~*, RCR+5~, A+9, ZAP+5, D~*
DISUBVAL RCR+6~*
DISUBVAL( DICN1+14, DICN1+16!, DICN1+17, DICN1+19
DITOP IHSGL+10~, IHSGL+13*, IHSGL+14*, IHSGL+15
DIVAL RCR+5~
DIY ASKP001+19*, ASKP001+27, ASKP001+35~, ASKP001+54~
DO DICN1+9, BAD+1!, RCR+1!, ASKP001+6, ASKP001+25, ASKP001+55, N+3
DO(1 BAD
DO(2 DICN1+14, DICN1+15, DICN1+16, DICN1+17, DICN1+19, DICN1+21, DICN1+24, DICN1+25, DICN1+29, DICN1+31
, CKID, CKID+1, ASKP001+50
DO(3 ASKP001+16, ASKP001+17*
DQ RCR+1!
DR RCR+1!*, RCR+4
>> DS(0 BAD+1*
DST W*, W+1*, H!, H+5!, ZAP+5*, ZAP+7!, ASKP001+25*, ASKP001+28*, ASKP001+33!, ASKP001+35*
, ASKP001+50*, ASKP001+52!
DTIME ASKP001+33
>> DTOUT A+8, A+10, ASKP001+33*, ASKP001+35
>> DUOUT A+10*
DUZ ASKP001+18
DUZ(0 CKID, CKID+1
>> DZ DICN1+9*, RCR+1
I DICN1+11~, DICN1+14*, DICN1+17*, DICN1+18, DICN1+19, DICN1+21, DICN1+24*, DICN1+25, DICN1+32~*, DICN1+33
IOSL RCR+9
J DICN1+11~, DICN1+24*, DICN1+25
U DICN1+9, DICN1+25, DICN1+26, CKID+1, W, ZAP+5, ASKP001+6, ASKP001+18, ASKP001+19, ASKP001+25
, ASKP001+26, ASKP001+33, ASKP001+35, ASKP001+39, ASKP001+55, N+3
X DICN1+11~, DICN1+25*, DICN1+26, RCR+3~, A+6*, A+8, A+9, ASKP001+19*, ASKP001+20*, ASKP001+26*
, ASKP001+27*, ASKP001+28, ASKP001+42*, ASKP001+43!, ASKP001+55*, IHSGL~, IHSGL+12, IHSGL+13, N+4, N+5!
Y DICN1+7!, DICN1+8*, DICN1+10*, DICN1+11~, DICN1+26*, DICN1+29*, DICN1+35*, BAD!*, BAD+1*, CKID
, CKID+1, CKID+2, CKID+3, CKID+4, A+8, A+10, ASKP001+5*, ASKP001+6*, ASKP001+7*, ASKP001+16*
, ASKP001+25, ASKP001+26, ASKP001+33*, ASKP001+35*, ASKP001+39*, ASKP001+40*, ASKP001+41, ASKP001+42*, ASKP001+43*, ASKP001+56*
, IHSGL+10~, IHSGL+11*, IHSGL+15*, IHSGL+16
Y(0 A*, A+6*, ZAP+7*
>> ZTQUEUED H+5
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All