TIUFC ; SLC/MAM - LM Template C (Create DDEF) INIT, Action NEXT LEVEL ;4/28/97 21:46
Source file <TIUFC.m>
Package | Total | Call Graph |
---|---|---|
Text Integration Utility | 7 | INIT^TIUFH (COLLAPSE,EXPAND1)^TIUFH1 ($$CENTER,$$VMSG,SETUP)^TIUFL $$HASITEMS^TIUFLF1 $$MISSITEM^TIUFLF4 PARSE^TIUFLLM PAUSE^TIUFXHLX |
Registration | 2 | (EN,SHOW)^VALM (CLEAN,CNTRL)^VALM10 |
VA Fileman | 1 | ^DIR |
Package | Total | Caller Graph |
---|---|---|
Text Integration Utility | 1 | TIUFC CREATE DDEFS MGR |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ; -- main entry point for LM Template TIUFC CREATE DDEF
; Requires TIUFWHO, set in options TIUFC CREATE DDEFS MGR/NATL ; TIUFCBEG is used to set message bar msgs: ; TIUFCBEG = 1 if done EN, no more, not even Start Over. ; 0 if Selected any action ; C in TIUFCDA,TIUFDITM,TIUFCNM,TIUFCTYP,TIUFCTDA,TIUFCLPS stands for |
|
CEXPAND1 | ; Set selected Next Level item of current branch into LM array (i.e. expands current branch to include next level. DOESN'T Update INFO.
|
|
HDR | ; -- header code
|
|
POSTSEL | ||
NEXT | ; TEMPLATE C Action Next Level: Navigate hierarchy.
; Called by Protocol TIUFC ACTION NEXT LEVEL ; Requires TIUFI,TIUFCNM,TIUFCDA,TIUFCITM |
|
HEADER | ; Header field of Protocol TIUFC ACTION MENU.
|
|
INIT | ; -- init variables and list array
|
|
EXIT | ; -- exit code
|
|
ENX | ||
NEXTX | ||
INITX |
Name | Field # of Occurrence |
---|---|
^DIR | NEXT+17 |
INIT^TIUFH | INIT+1 |
COLLAPSE^TIUFH1 | POSTSEL+8 |
EXPAND1^TIUFH1 | POSTSEL+17 |
$$CENTER^TIUFL | HDR+1 |
$$VMSG^TIUFL | HEADER+4 |
SETUP^TIUFL | EN+9 |
$$HASITEMS^TIUFLF1 | HEADER+6, INIT+3 |
$$MISSITEM^TIUFLF4 | POSTSEL+15 |
PARSE^TIUFLLM | POSTSEL+7, POSTSEL+14 |
PAUSE^TIUFXHLX | NEXT+9, NEXT+10, POSTSEL+4, POSTSEL+16 |
EN^VALM | EN+11 |
SHOW^VALM | HEADER+5 |
CLEAN^VALM10 | EXIT+2 |
CNTRL^VALM10 | POSTSEL+12, POSTSEL+13 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^TIU(8925.1 - [#8925.1] | POSTSEL+3 |
^TMP("TIUF" | INIT+2, POSTSEL+12, POSTSEL+13, EXIT+1! |
^TMP("TIUF1" | POSTSEL+2, CEXPAND1+2*, CEXPAND1+4*, EXIT+1! |
^TMP("TIUF1IDX" | NEXT+6, NEXT+7, NEXT+11, POSTSEL+1, CEXPAND1+3*, CEXPAND1+5*, CEXPAND1+6*, EXIT+1! |
^TMP("TIUFB" | EXIT+1! |
^TMP("TIUFBIDX" | EXIT+1! |
Name | Line Occurrences |
---|---|
CEXPAND1 | POSTSEL+11 |
ENX | EN+9 |
INITX | INIT+1, INIT+7 |
NEXTX | NEXT+9, NEXT+10, NEXT+17, POSTSEL+4, POSTSEL+16, POSTSEL+21 |
POSTSEL | NEXT+11 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
BEG | NEXT+3~, NEXT+8*, NEXT+11, NEXT+13, NEXT+16, NEXT+17 |
CREATEDA | EN+7~ |
CREATENM | EN+7~ |
DEFAULT | HEADER+1~, HEADER+7*, HEADER+8 |
DIR | NEXT+3~, NEXT+17! |
DIR("?" | NEXT+14*, NEXT+15*, NEXT+16* |
DIR("A" | NEXT+17* |
DIR(0 | NEXT+13* |
DIROUT | NEXT+4~ |
DIRUT | NEXT+4~ |
DTOUT | EN+9, INIT+1, INITX, NEXT+4~, NEXTX |
END | NEXT+3~, NEXT+8*, NEXT+11, NEXT+13, NEXT+16, NEXT+17 |
IFILEDA | NEXT+4~, POSTSEL+15*, POSTSEL+16 |
IINFO | NEXT+3~, POSTSEL+1*, POSTSEL+14, POSTSEL+15, POSTSEL+17, POSTSEL+20, CEXPAND1+1, CEXPAND1+3* |
IINFO("XPDLCNT" | POSTSEL+18 |
ILINE | NEXT+4~, POSTSEL+2*, CEXPAND1+1*, CEXPAND1+2 |
INFO | NEXT+3~, NEXT+7*, POSTSEL+7, POSTSEL+8, POSTSEL+10, POSTSEL+19, CEXPAND1+6 |
IOELALL | EXIT+1! |
>> IOINHI | POSTSEL+13 |
>> IOINORM | POSTSEL+12, POSTSEL+13 |
LINENO | NEXT+3~, NEXT+6*, NEXT+7, NEXT+8, POSTSEL+10*, POSTSEL+12, POSTSEL+13, CEXPAND1+1, CEXPAND1+2, CEXPAND1+3 , CEXPAND1+4, CEXPAND1+5 |
MISSITEM | NEXT+4~, POSTSEL+15*, POSTSEL+16 |
NMWIDTH | NEXT+3~ |
NODE0 | NEXT+3~, POSTSEL+3*, POSTSEL+5 |
TIUF | EN+7~ |
TIUFCBEG | EN+7~, EN+10*, HEADER+2* |
TIUFCDA | EN+7~, HEADER+6, INIT+2*, INIT+3, NEXT+6, POSTSEL+1*, POSTSEL+3, CEXPAND1+5 |
TIUFCITM | EN+7~, HEADER+6*, HEADER+7, INIT+3*, NEXT+10, NEXT+17, POSTSEL+20* |
TIUFCLPS | EN+7~, EN+8*, POSTSEL+8*, POSTSEL+11* |
TIUFCMSG | EN+7~, INIT+4!, POSTSEL+6! |
TIUFCMSG(1 | INIT+6*, POSTSEL+21*, POSTSEL+22* |
TIUFCMSG(2 | INIT+7*, INIT+8*, POSTSEL+21*, POSTSEL+23*, POSTSEL+24* |
TIUFCMSG(3 | POSTSEL+21*, POSTSEL+24* |
TIUFCNM | EN+7~, INIT+3*, NEXT+14, NEXT+16, NEXT+17, POSTSEL+5*, POSTSEL+21, POSTSEL+22, POSTSEL+24 |
TIUFCONE | EN+7~, HEADER+2, HEADER+3* |
TIUFCTDA | EN+7~, POSTSEL+1* |
TIUFCTYP | EN+7~, HEADER+7, INIT+3*, NEXT+9, POSTSEL+3*, POSTSEL+4, POSTSEL+21, POSTSEL+22 |
TIUFLFT | EN+7~ |
TIUFPRIV | EN+9~ |
TIUFTMPL | EN+7~, EN+8* |
TIUFVCN1 | EN+7~ |
>> TIUFWHO | EN+11 |
TIUFXNOD | EN+7~, NEXT+4~, NEXT+5*, NEXT+11 |
TIUFY | NEXT+3~, NEXT+11*, NEXT+12!, NEXT+17*, POSTSEL+1, POSTSEL+2 |
U | NEXT+7, NEXT+11, POSTSEL+1, POSTSEL+3, POSTSEL+5, POSTSEL+15, POSTSEL+20, CEXPAND1+3, CEXPAND1+6 |
>> VALM("LINES" | HEADER+8, INIT+7, INIT+8, POSTSEL+24 |
>> VALMBCK | NEXT+5*, POSTSEL*, POSTSEL+16*, NEXTX* |
>> VALMBG | HEADER+8, INIT+5*, POSTSEL+19* |
>> VALMCNT | HEADER+8, INIT+7, INIT+8, POSTSEL+8*, POSTSEL+11*, POSTSEL+18*, POSTSEL+24 |
>> VALMHDR(1 | HDR+1* |
>> VALMQUIT | EN+9*, INITX* |
>> VALMSG | HEADER+4* |
X | NEXT+3~, NEXT+17! |
XFLG | NEXT+4~ |
XPDLCNT | NEXT+3~, NEXT+7*, NEXT+8, POSTSEL+8 |
XQORM | EN+7~ |
XQORM("B" | HEADER+8* |
>> XQORNOD(0 | NEXT+5 |
Y | NEXT+3~, NEXT+17! |