IBDF2D1 ;ALB/CJM - ENCOUNTER FORM - PRINT SELECTION LIST (cont'd) ;NOV 16,1992
Source file <IBDF2D1.m>
| Package | Total | Call Graph | 
|---|---|---|
| Automated Information Collection System | 2 | ($$X,$$Y,DECREASE)^IBDF2D (DRWSTR,DRWVLINE)^IBDFU | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| CNVRTHT(HPLINES,LINES) | ;changes HPLINES=number of handprint lines into LINES=print lines on the page | |
| GETCOL(COL) | ;finds next column | |
| DRWCOL(COL) | ;draws one column of the selection list except for its contents and rows | |
| CNVRTLEN(HPWIDTH,WIDTH) | ;changes HPWIDTH=width in terms of handprint characters into width in terms of columns(machine print characters) | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| >> ALL | DRWCOL+2, DRWCOL+3, DRWCOL+6, DRWCOL+18 | 
| >> BOX | GETCOL+12, GETCOL+23, GETCOL+24, GETCOL+25, DRWCOL+2, DRWCOL+3, DRWCOL+26 | 
| COL | GETCOL~, GETCOL+7*, GETCOL+9, GETCOL+10*, GETCOL+11, GETCOL+12, GETCOL+13, GETCOL+14, GETCOL+15, GETCOL+16 , GETCOL+18, GETCOL+19, GETCOL+20, GETCOL+21, GETCOL+22, GETCOL+24*, DRWCOL~, DRWCOL+6, DRWCOL+18 | 
| COL("H" | GETCOL+9*, GETCOL+20*, GETCOL+22*, GETCOL+25*, GETCOL+26, DRWCOL+2, DRWCOL+3 | 
| COL("NEXTROW" | GETCOL+26* | 
| COL("ROWSLEFT" | GETCOL+26*, DRWCOL+6, DRWCOL+18 | 
| COL("X" | GETCOL+9*, GETCOL+17*, GETCOL+18*, GETCOL+23*, GETCOL+24, DRWCOL+2, DRWCOL+3 | 
| COL("Y" | GETCOL+9*, GETCOL+12*, GETCOL+14*, GETCOL+25 | 
| COLWIDTH | CNVRTLEN+3~, CNVRTLEN+5*, CNVRTLEN+6*, CNVRTLEN+7*, CNVRTLEN+8 | 
| >> CWIDTH | GETCOL+17, GETCOL+24, DRWCOL+3, DRWCOL+12, DRWCOL+26, DRWCOL+28 | 
| HPLINES | CNVRTHT~, CNVRTHT+2 | 
| HPWIDTH | CNVRTLEN~, CNVRTLEN+8 | 
| I | DRWCOL+1~, DRWCOL+32* | 
| >> IBBLK("H" | GETCOL+20, GETCOL+25 | 
| >> IBBLK("HDR" | GETCOL+12 | 
| >> IBBLK("W" | GETCOL+24, DRWCOL+3, DRWCOL+26 | 
| >> IBFORM("WIDTH" | DRWCOL+9, DRWCOL+10, DRWCOL+21, DRWCOL+22, CNVRTLEN+5, CNVRTLEN+6 | 
| >> IBLIST("CHDR" | DRWCOL+18, DRWCOL+28 | 
| >> IBLIST("DHDR" | DRWCOL+7*, DRWCOL+9*, DRWCOL+10*, DRWCOL+14, DRWCOL+15 | 
| >> IBLIST("DSCHDR" | DRWCOL+19*, DRWCOL+21*, DRWCOL+22*, DRWCOL+27*, DRWCOL+28, DRWCOL+31*, DRWCOL+32 | 
| >> IBLIST("H" | GETCOL+9, GETCOL+19, GETCOL+22 | 
| >> IBLIST("HDR" | DRWCOL+6, DRWCOL+14, DRWCOL+15 | 
| >> IBLIST("NUMCOL" | GETCOL+10 | 
| >> IBLIST("SC0" | DRWCOL+32 | 
| >> IBLIST("SCHDR" | DRWCOL+32 | 
| >> IBLIST("SCOS" | DRWCOL+32 | 
| >> IBLIST("SCTYPE" | DRWCOL+32 | 
| >> IBLIST("SEP" | GETCOL+17 | 
| >> IBLIST("SEP1" | DRWCOL+26 | 
| >> IBLIST("ULSLCTNS" | DRWCOL+26, DRWCOL+27 | 
| >> IBLIST("X" | GETCOL+9, GETCOL+15, GETCOL+18 | 
| >> IBLIST("Y" | GETCOL+9, GETCOL+11, GETCOL+14 | 
| >> LINE | GETCOL+23, GETCOL+24, DRWCOL+2, DRWCOL+3, DRWCOL+12, DRWCOL+13, DRWCOL+15, DRWCOL+26, DRWCOL+28 | 
| LINES | CNVRTHT~, CNVRTHT+2* | 
| >> NEEDUPR | GETCOL+8* | 
| OFFSET | DRWCOL+1~, DRWCOL+13*, DRWCOL+14*, DRWCOL+15 | 
| WIDTH | DRWCOL+1~, DRWCOL+12*, DRWCOL+14, DRWCOL+15, CNVRTLEN~, CNVRTLEN+8* |