TIUPS169 ; SLC/MAM - After installing TIU*1*169 ; 7/27/2004
Source file <TIUPS169.m>
Package | Total | Caller Graph |
---|---|---|
Text Integration Utility | 1 | TIU169 DDEFS, C&P WORKSHEETS |
Name | Comments | DBIA/ICR reference |
---|---|---|
MAINX | ; Exit
; -- Leave latest error arrays ^TMP("DIERR",$J) & TIUIERR around until ; now in case modules are run separately for debugging: |
|
BEGIN | ; Create DDEFS
|
|
FILE(NUM,TIUDA) | ; File fields for new DDEF TIUDA
; Files ALL FIELDS set in "FILEDATA" nodes of ^TMP: ; ^TMP("TIU169",$J,"FILEDATA",NUM,Field#) |
|
CREATE(NUM) | ; Create new DDEF entry
|
|
PARENT(NUM) | ; Return IEN of parent new DDEF should be added to
|
|
MAIN | ; Create DDEFS for C&P
|
|
PARENTX |
Name | Field # of Occurrence |
---|---|
^%ZIS | BEGIN+52 |
HOME^%ZIS | BEGIN+59 |
^%ZISC | BEGIN+60 |
^%ZTLOAD | BEGIN+57 |
^DIC | CREATE+5 |
^DIE | BEGIN+43 |
FILE^DIE | FILE+7 |
$$ADDITEM^TIU169D | MAIN+29 |
DELETE^TIU169D | MAIN+25, MAIN+28, MAIN+30, MAIN+32 |
FILEITEM^TIU169D | MAIN+31 |
PRINT^TIU169D | MAINX+7 |
SETDATA^TIU169D | MAIN+9 |
$$DESGNATE^TIUEN169 | BEGIN+24 |
LISTDUPS^TIUEN169 | BEGIN+21, BEGIN+27, BEGIN+38 |
SETBASIC^TIUEN169 | BEGIN+14 |
TIUDUPS^TIUEN169 | BEGIN+20, BEGIN+26 |
$$READ^TIUU | BEGIN+30, BEGIN+34, BEGIN+39 |
$$FMADD^XLFDT | BEGIN+7 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^TIU(8925.1 - [#8925.1] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^TIU(8925.1 - [#8925.1] | PARENTX |
^TMP("DIERR" | MAINX+3!, FILE+4!, FILE+8 |
^TMP("TIU169" | MAIN+53, MAINX+8!, PARENT+5, PARENT+9, FILE+6, CREATE+3, CREATE+4 |
^TMP("TIU169ERR" | MAIN+2!, MAIN+21, MAIN+25, MAIN+28, MAIN+30, MAIN+32, MAIN+38, MAIN+45, MAIN+46, MAINX+8! , PARENTX+1*, FILE+8*, CREATE+6* |
^TMP("TIU169MSG" | MAIN+2!, MAIN+5*, MAIN+6*, MAIN+39*, MAIN+43*, MAIN+44*, MAIN+53*, MAIN+54*, MAIN+55*, MAIN+56* , MAIN+57*, MAINX+5*, MAINX+6*, MAINX+8! |
^USR(8930 - [#8930] | BEGIN+11 |
^XTMP("TIU169" | BEGIN+7*, BEGIN+9, BEGIN+17, BEGIN+18, BEGIN+23, BEGIN+44*, BEGIN+48, BEGIN+49*, BEGIN+50*, MAIN+16 , MAIN+34*, MAIN+40*, MAIN+42!, PARENT+12 |
Name | Line Occurrences |
---|---|
$$CREATE | MAIN+18 |
$$PARENT | MAIN+27 |
FILE | MAIN+24 |
MAIN | BEGIN+60 |
MAINX | MAIN+38 |
PARENTX | PARENT+7 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
%ZIS | BEGIN+52~* |
ALLFLG | BEGIN+46~*, BEGIN+48*, BEGIN+50 |
DA | BEGIN+43~*, CREATE+1~ |
DCNAME | BEGIN+43~* |
DESDC | BEGIN+1~, BEGIN+18*, BEGIN+20, BEGIN+24*, BEGIN+25, BEGIN+26, BEGIN+29, BEGIN+33, BEGIN+34, BEGIN+37 , BEGIN+39, BEGIN+42, BEGIN+43, BEGIN+44 |
DIC | CREATE+1~, CREATE+2* |
DIC("S" | CREATE+4* |
DIC(0 | CREATE+3* |
DIE | BEGIN+43~* |
DLAYGO | CREATE+1~, CREATE+2* |
DR | BEGIN+43~* |
DT | BEGIN+7 |
FDA | FILE+3~ |
FDA( | FILE+6* |
IO | BEGIN+60 |
IO("Q" | BEGIN+54! |
IOP | BEGIN+52! |
ITEMDA | MAIN+13~, MAIN+29*, MAIN+31, MAIN+32 |
NUM | BEGIN+46~, BEGIN+47*, BEGIN+48, BEGIN+49, MAIN+11~, MAIN+12*, MAIN+16, MAIN+18, MAIN+21, MAIN+24 , MAIN+25, MAIN+27, MAIN+28, MAIN+29, MAIN+30, MAIN+31, MAIN+32, MAIN+34, MAIN+37~*, MAIN+38 , MAIN+45*, MAIN+46, MAIN+53, PARENT~, PARENT+5, PARENT+9, PARENTX+1, FILE~, FILE+6, FILE+8 , CREATE~, CREATE+3, CREATE+4, CREATE+6 |
NUMBER | MAIN+42~* |
PIEN | MAIN+13~, MAIN+27*, MAIN+29, MAIN+31, MAIN+32, PARENT+1~, PARENT+5*, PARENT+7, PARENT+12*, PARENTX , PARENTX+2 |
PNUM | PARENT+1~, PARENT+9*, PARENT+12 |
POP | BEGIN+53! |
PROB | MAIN+46~*, MAIN+48*, MAIN+49*, MAIN+50*, MAIN+51*, MAIN+52*, MAIN+54 |
TIUDA | MAIN+13~, MAIN+22*, MAIN+24, MAIN+25, MAIN+28, MAIN+29, MAIN+30, MAIN+32, MAIN+34, FILE~ , FILE+6 |
TIUDUPS | BEGIN+1~, BEGIN+20, BEGIN+21, BEGIN+26, BEGIN+27, BEGIN+38 |
TIUDUPS("INDC" | BEGIN+33, BEGIN+37, BEGIN+48, BEGIN+49 |
TIUDUPS("NOTINDC" | BEGIN+21, BEGIN+27 |
TIUFPRIV | FILE+3~, FILE+5* |
TIUIEN | MAIN+13~, MAIN+16* |
TIUIERR | MAINX+3! |
TIUQUIT | BEGIN+1~, BEGIN+17, BEGIN+21*, BEGIN+23, BEGIN+25*, BEGIN+27*, BEGIN+29, BEGIN+31*, BEGIN+33, BEGIN+35* , BEGIN+37, BEGIN+40* |
TIUSTTS | MAIN+1~ |
TIUY | BEGIN+1~, BEGIN+30*, BEGIN+31, BEGIN+34*, BEGIN+35, BEGIN+39*, BEGIN+40 |
TMPCNT | MAIN+1~, MAIN+4*, MAIN+5*, MAIN+6*, MAIN+39*, MAIN+43*, MAIN+44*, MAIN+53*, MAIN+54*, MAIN+55* , MAIN+56*, MAIN+57*, MAINX+5*, MAINX+6* |
U | BEGIN+7, BEGIN+34, BEGIN+39, CREATE+6 |
X | BEGIN+43~, CREATE+1~, CREATE+3* |
Y | BEGIN+43~, CREATE+1~, CREATE+6, CREATE+7 |
YDDEF | MAIN+13~, MAIN+18*, MAIN+22 |
ZTDESC | BEGIN+56*, BEGIN+58! |
ZTDTH | BEGIN+58! |
ZTIO | BEGIN+58! |
ZTRTN | BEGIN+55*, BEGIN+58! |
ZTSAVE | BEGIN+58! |
ZTSK | BEGIN+57, BEGIN+58! |