IBDFM1 ;ALB/CJM - Compiling bubbles and hand print fields;3/1/93
Source file <IBDFM1.m>
| Package | Total | Call Graph | 
|---|---|---|
| Automated Information Collection System | 3 | $$FORMTYPE^IBDF18D UNCMPL^IBDF19 INPUT^IBDFU91 | 
| VA Fileman | 2 | FILE^DICN IX1^DIK | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| DISP(DIS) | ; -- display narrative :: piece | |
| TRACKBBL(FID,COUNT,QLFR,PI,DISPLAY,VALUE) | ; | |
| CMPBBL | ;save compiled bubbles for the block | |
| CMPHAND | ;save compiled hand print fields for the block | |
| DISPQ | ||
| DRWBBL(ROW,COL,PI,VALUE,FNAME,FID,ALLOWED,DISPLAY,HDR,QLFR,DYN,CNT,SUBHDR,QTY,ND2,SLCTN) | ; | |
| DRWHAND(ROW,COL,WIDTH,PI,LINES,FID,FNAME,HDR,QLFR,ITEM,PRINT,READ,TYPEDATA) | ;creates hand print field | |
| NEWTABLE(IBFORM) | ;creates a new FORM DEFINITION table | 
| FileNo | Call Tags | 
|---|---|
| ^IBD(357.96 - [#357.96] | Classic Fileman Calls | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^DD(357.96 | TRACKBBL+22 | 
| ^IBD(357.95 - [#357.95] | DRWBBL+25, DRWBBL+36*, DRWBBL+37*, DRWBBL+41*, NEWTABLE+6*, NEWTABLE+7*, NEWTABLE+9*, NEWTABLE+10*, DRWHAND+26, DRWHAND+37* | 
| ^IBE(357 - [#357] | NEWTABLE+5, NEWTABLE+8*, NEWTABLE+9 | 
| ^IBE(357.1 - [#357.1] | CMPBBL+2*, CMPBBL+3*, CMPBBL+4*, CMPHAND+2* | 
| Name | Line Occurrences | 
|---|---|
| $$DISP | TRACKBBL+15 | 
| $$NEWTABLE | DRWBBL+26, DRWHAND+27 | 
| CMPBBL | DRWBBL+12 | 
| CMPHAND | DRWHAND+11 | 
| DISPQ | DISP+3, DISP+4, DISP+5 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| ALLOWED | DRWBBL~, DRWBBL+36, CMPBBL+2 | 
| BUBBLE | DRWBBL+3~, DRWBBL+32*, DRWBBL+33, DRWBBL+34, DRWBBL+36, DRWBBL+37, DRWBBL+41, DRWBBL+42 | 
| CNT | DRWBBL~, DRWBBL+6*, DRWBBL+36, NEWTABLE+2~, NEWTABLE+9*, NEWTABLE+10, CMPBBL+2, DRWHAND+21~*, DRWHAND+22 | 
| COL | DRWBBL~, DRWBBL+18*, DRWBBL+21, DRWBBL+36, CMPBBL+2, CMPHAND+2, DRWHAND~, DRWHAND+6, DRWHAND+17*, DRWHAND+22 , DRWHAND+37 | 
| COUNT | TRACKBBL~, TRACKBBL+18 | 
| D0 | DRWBBL+30!, DRWHAND+32! | 
| DA | DRWBBL+31!, DRWBBL+42!*, DRWHAND+33!, DRWHAND+38!*, TRACKBBL+25! | 
| DA(1 | DRWBBL+30*, DRWBBL+42*, DRWHAND+32*, DRWHAND+38*, TRACKBBL+23* | 
| DD | DRWBBL+30!, DRWHAND+32!, TRACKBBL+25! | 
| DIC | DRWBBL+30!*, DRWBBL+31!, DRWHAND+32!*, DRWHAND+33!, TRACKBBL+20*, TRACKBBL+25! | 
| DIC("DR" | TRACKBBL+24* | 
| DIC("P" | TRACKBBL+22* | 
| DIC(0 | DRWBBL+30*, DRWHAND+32*, TRACKBBL+21* | 
| DIE | DRWBBL+31!, DRWHAND+33! | 
| DIK | DRWBBL+42!*, DRWHAND+38!* | 
| DINUM | DRWBBL+30!, DRWHAND+32! | 
| DIS | DISP~, DISP+2*, DISP+3, DISP+4, DISP+5*, DISP+7, DISP+10*, DISP+13*, DISP+16*, DISP+19* , DISP+22*, DISP+25*, DISPQ*, DISPQ+1 | 
| DISPLAY | DRWBBL~, DRWBBL+4*, DRWBBL+5*, DRWBBL+36, CMPBBL+2, TRACKBBL~, TRACKBBL+15* | 
| DLAYGO | TRACKBBL+19*, TRACKBBL+25! | 
| DO | TRACKBBL+25! | 
| DT | NEWTABLE+7 | 
| DYN | DRWBBL~, DRWBBL+6*, DRWBBL+36, CMPBBL+2 | 
| FID | DRWBBL~, DRWBBL+36, CMPBBL+2, CMPHAND+2, DRWHAND~, DRWHAND+22, DRWHAND+37, TRACKBBL~ | 
| FNAME | DRWBBL~, DRWBBL+36, CMPBBL+2, CMPHAND+2, DRWHAND~, DRWHAND+22, DRWHAND+37 | 
| HANDPRNT | DRWHAND+7~, DRWHAND+34*, DRWHAND+35, DRWHAND+36, DRWHAND+37, DRWHAND+38 | 
| HDR | DRWBBL~, DRWBBL+4*, DRWBBL+36, CMPBBL+2, CMPHAND+2, DRWHAND~, DRWHAND+8*, DRWHAND+22, DRWHAND+37 | 
| I | DISP+1~, DISP+7* | 
| >> IBARRAY("BUBBLES" | DRWBBL+21 | 
| >> IBARRAY("HAND_PRINT" | DRWHAND+21, DRWHAND+22 | 
| >> IBBLK | CMPBBL+2, CMPBBL+3, CMPBBL+4, CMPHAND+2 | 
| >> IBBLK("X" | DRWBBL+18, DRWHAND+17 | 
| >> IBBLK("Y" | DRWBBL+18, DRWHAND+17 | 
| >> IBDEVICE("LISTMAN" | DRWBBL+15, DRWHAND+14 | 
| IBFORM | DRWBBL+26, DRWBBL+27, DRWBBL+33, NEWTABLE~, NEWTABLE+5, NEWTABLE+7, NEWTABLE+8, NEWTABLE+9, DRWHAND+27, DRWHAND+29 , DRWHAND+35 | 
| IBFORM("COMPILED" | DRWBBL+24, DRWHAND+25 | 
| IBFORM("TOOLKIT" | DRWBBL+21, DRWHAND+20 | 
| IBFORM("TYPE" | DRWBBL+25, DRWBBL+26*, DRWBBL+27, DRWBBL+30, DRWBBL+36, DRWBBL+37, DRWBBL+41, DRWBBL+42, NEWTABLE+3*, NEWTABLE+4 , NEWTABLE+6, NEWTABLE+7, NEWTABLE+8, NEWTABLE+9, NEWTABLE+10, NEWTABLE+11, DRWHAND+26, DRWHAND+27*, DRWHAND+29, DRWHAND+32 , DRWHAND+37, DRWHAND+38 | 
| IBJ | DRWBBL+40~* | 
| >> IBPFID | TRACKBBL+23 | 
| >> IBPRINT("COMPILING_BLOCKS" | DRWBBL+12, DRWHAND+11 | 
| >> IBPRINT("WRITE_IF_COMPILING" | DRWBBL+12, DRWHAND+11 | 
| IBVAL | DRWBBL+40~* | 
| >> IBWRTCNT("B" | CMPBBL+1*, CMPBBL+2, CMPBBL+3, CMPBBL+4 | 
| >> IBWRTCNT("H" | CMPHAND+1*, CMPHAND+2 | 
| ITEM | CMPHAND+2, DRWHAND~, DRWHAND+4*, DRWHAND+22, DRWHAND+37 | 
| J | DISP+1~, DISP+13* | 
| LINES | CMPHAND+2, DRWHAND~, DRWHAND+22, DRWHAND+37 | 
| ND2 | DRWBBL~, DRWBBL+38, DRWBBL+40*, DRWBBL+41, CMPBBL+4 | 
| NODE | NEWTABLE+2~, NEWTABLE+5*, NEWTABLE+6, NEWTABLE+9*, DRWHAND+1~, DRWHAND+2* | 
| PI | DRWBBL~, DRWBBL+9, DRWBBL+35, DRWBBL+36, DRWBBL+40, CMPBBL+2, CMPHAND+2, DRWHAND~, DRWHAND+22, DRWHAND+37 , TRACKBBL~, TRACKBBL+17 | 
| CMPHAND+2, DRWHAND~, DRWHAND+4*, DRWHAND+22, DRWHAND+37 | |
| QLFR | DRWBBL~, DRWBBL+36, CMPBBL+2, CMPHAND+2, DRWHAND~, DRWHAND+22, DRWHAND+37, TRACKBBL~ | 
| QTY | DRWBBL~, DRWBBL+36, CMPBBL+2 | 
| READ | CMPHAND+2, DRWHAND~, DRWHAND+4*, DRWHAND+22, DRWHAND+37 | 
| >> REPRINT | TRACKBBL+4 | 
| ROW | DRWBBL~, DRWBBL+18*, DRWBBL+21, DRWBBL+30, DRWBBL+36, CMPBBL+2, CMPHAND+2, DRWHAND~, DRWHAND+6, DRWHAND+17* , DRWHAND+22, DRWHAND+32, DRWHAND+37 | 
| SLCTN | DRWBBL~, DRWBBL+36, CMPBBL+2 | 
| SUB | NEWTABLE+2~, NEWTABLE+9* | 
| SUBHDR | DRWBBL~, DRWBBL+37, CMPBBL+3 | 
| TYPEDATA | CMPHAND+2, DRWHAND~, DRWHAND+4*, DRWHAND+22, DRWHAND+37 | 
| VALUE | DRWBBL~, DRWBBL+9*, DRWBBL+35*, DRWBBL+36, CMPBBL+2, TRACKBBL~, TRACKBBL+17* | 
| WIDTH | CMPHAND+2, DRWHAND~, DRWHAND+22, DRWHAND+37 | 
| >> X | DRWBBL+30*, DRWHAND+32*, TRACKBBL+18* | 
| >> Y | DRWBBL+32, DRWHAND+34 |