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! |