IBDF7 ;ALB/CJM - ENCOUNTER FORM - BUILD FORM(ADDING TOOLKIT BLKS) ; 08-JAN-1993
Source file <IBDF7.m>
| Package | Total | Caller Graph | 
|---|---|---|
| Automated Information Collection System | 1 | IBDF13 | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| HELP | ; -- help code | |
| IDXBLKS | ; sets up list of toolkit blocks for list processor | |
| INIT | ;entry code to list | |
| DISPLAY(BLOCK,ID,TKORDER) | ;adds one toolkit block to the list array | |
| ADD | ;create a new block by copying a toolkit block | |
| EXIT | ; -- exit code | |
| SELECT | ; | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Routine Call | 
 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^IBE(357.1 - [#357.1] | IDXBLKS+4, IDXBLKS+5, DISPLAY+4 | 
| Name | Line Occurrences | 
|---|---|
| $$DISPLAY | IDXBLKS+7 | 
| IDXBLKS | INIT+2 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| BLKLIST | ADD+1~, INIT+1*, EXIT+1, IDXBLKS+2, IDXBLKS+7 | 
| BLOCK | IDXBLKS+1~, IDXBLKS+4*, IDXBLKS+5, IDXBLKS+7, DISPLAY~, DISPLAY+4 | 
| BOT | ADD+1~, ADD+10, ADD+11 | 
| CHOICE | SELECT+1~, SELECT+3* | 
| DESCR | DISPLAY+1~, DISPLAY+5*, DISPLAY+8 | 
| IBBG | ADD+1~, ADD+2*, ADD+5, ADD+7 | 
| >> IBFASTXT | ADD+4 | 
| >> IBFORM | ADD+7 | 
| IBLFT | ADD+1~, ADD+2*, ADD+7 | 
| >> IBTKBLK | DISPLAY+7 | 
| ID | DISPLAY~, DISPLAY+3 | 
| NAME | DISPLAY+1~, DISPLAY+5*, DISPLAY+6 | 
| NEWBLOCK | ADD+1~, ADD+7*, ADD+8, ADD+10 | 
| NODE | DISPLAY+1~, DISPLAY+4*, DISPLAY+5 | 
| OLDBLOCK | ADD+1~, ADD+2*, ADD+6, ADD+7, SELECT+3* | 
| RET | DISPLAY+1~, DISPLAY+3*, DISPLAY+6*, DISPLAY+7*, DISPLAY+8*, DISPLAY+9 | 
| TK | IDXBLKS+1~, IDXBLKS+4*, IDXBLKS+7 | 
| TKORDER | DISPLAY~, DISPLAY+7 | 
| TOP | ADD+1~, ADD+10, ADD+11 | 
| >> VALMAR | SELECT+3 | 
| >> VALMBCK | ADD+2*, ADD+9* | 
| >> VALMBG | ADD+2, ADD+5* | 
| >> VALMCNT | IDXBLKS+3*, IDXBLKS+6*, IDXBLKS+7, IDXBLKS+8 | 
| >> VALMLFT | ADD+2 | 
| >> VALMY("" | SELECT+3 | 
| >> X | HELP+1* | 
| >> XQORNOD(0 | SELECT+2 |