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

Package: VA FileMan

Routine: DICATTDM


Information

DICATTDM ;SFISC/GFT - SUBSCRIPT AND PIECE-POSITION FOR STORAGE OF SINGLE-VALUED DATA IN SCREENMAN ;23JUN2017

Source Information

Source file <DICATTDM.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA FileMan 3 (HLP,UNED)^DDSUTL  $$GET^DDSVALF  ($$ESTORE,MAX)^DICATT1  

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: 1

Package Total Caller Graph
VA FileMan 1 DICATTDE  

Entry Points

Name Comments DBIA/ICR reference
SUBDEF ;EXECUTABLE DEFAULT for FIELD 16 (SUBSCRIPT)
NXT
PIECDEF ;
P(Y) ;given SUBSCRIPT Y, return PIECE prompt
PC
SUBHELP ;
CHKSUB(X,DISHORT) ;used as INPUT TRANSFORM for Fields 16 (SUBSCRIPT) & 76 (MUL SUBSCRIPT) X is the subscript name. DISHORT says 'don't go beyond 250'
MAX(L,Y) ;given L=length of new data, Y=subscript name
CHKPIEC(P) ;
USED
PIECHELP ;
POST ;POST-ACTION of Page 3
H(%)
G(I)

External References

Name Field # of Occurrence
HLP^DDSUTL SUBHELP+7, PIECHELP+8, H+1
UNED^DDSUTL SUBHELP+1
$$GET^DDSVALF CHKSUB+2, G
$$ESTORE^DICATT1 PC+1, CHKSUB+5, PIECHELP+4
MAX^DICATT1 MAX+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( SUBDEF+1, NXT+1, PCSUBHELP+6, CHKSUB+3, USEDPIECHELP+5, PIECHELP+7
^DD("STRING_LIMIT" CHKSUB+8

Label References

Name Line Occurrences
$$CHKPIEC POST+2
$$CHKSUB SUBDEF+2
$$G PIECDEF+2, CHKPIEC+2, PIECHELP+2, POST+2
$$MAX CHKSUB+8
$$P PIECDEF+2
H POST+2
PC PC
PIECDEF CHKPIEC+4
USED CHKPIEC+3, CHKPIEC+4

Naked Globals

Name Field # of Occurrence
^( NXT+1, CHKSUB+4, USEDPIECHELP+7
^(0 CHKSUB+5, USED+1
^(99999 PC+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% P+1~, P+2*, PC*, PC+1*, PC+2*, PC+3, POST+1~, POST+2*!, H~, H+1
%( H*
%("" H
%(1 POST+2*
A MAX+1~, MAX+2*
>> DDSBR POST+2*
>> DICATT2N PIECDEF+1, PC+1, SUBHELP+1, CHKSUB+5, PIECHELP+4
>> DICATTA SUBDEF+1, NXT+1, PCSUBHELP+6, CHKSUB+3, MAX+2, USEDPIECHELP+5, PIECHELP+7
>> DICATTF MAX+2
>> DICATTLN PC+1, CHKSUB+7, CHKSUB+8, CHKPIEC+3
DISHORT CHKSUB~, CHKSUB+8
DP MAX+1~, MAX+2*
G PIECHELP+1~, PIECHELP+2*, PIECHELP+5, PIECHELP+7
I G~
L MAX~
M CHKSUB+1~, CHKSUB+2*, CHKSUB+3, CHKSUB+8*
N MAX+1~, CHKPIEC+1~, CHKPIEC+3*
P P+1~, P+2*, PC*, PC+1, CHKPIEC~, CHKPIEC+3, CHKPIEC+4, USEDUSED+1, PIECHELP+1~
PIECHELP+7*
S CHKPIEC+1~, CHKPIEC+2*, USED
T SUBHELP+2~, SUBHELP+5*, SUBHELP+6*, MAX+1~, MAX+3, PIECHELP+1~, PIECHELP+3*, PIECHELP+4, PIECHELP+5, PIECHELP+6*
PIECHELP+7*
U USED
W MAX+1~
X P+1~, P+2*, PC*, SUBHELP+2~, SUBHELP+7, CHKSUB~, CHKSUB+3, CHKSUB+4, CHKSUB+6, CHKSUB+8
PIECHELP+1~, PIECHELP+8
X( SUBHELP+6*, PIECHELP+7*
X(1 SUBHELP+3*, PIECHELP+3*, PIECHELP+4*, PIECHELP+5*, PIECHELP+6*
X(2 SUBHELP+4*, PIECHELP+6*
Y SUBDEF+1*, SUBDEF+2, NXT*, NXT+1*, PIECDEF+1*, PIECDEF+2*, P~, PCSUBHELP+1*, SUBHELP+2~
SUBHELP+5*, SUBHELP+6*, MAX~, CHKPIEC+4~, PIECHELP+1~, PIECHELP+6*, PIECHELP+7*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All