IBDFU1B ;ALB/CJM - ENCOUNTER FORM ;NOV 16,1992
Source file <IBDFU1B.m>
| Package | Total | Call Graph | 
|---|---|---|
| Automated Information Collection System | 1 | PAUSE^IBDFU5 | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| MAXX() | ;the largest X a block element can begin at | |
| RTNDSCR(RTN) | ;RTN should be a pointer to the Package Interface file | |
| DATANAME(RTN,PIECE) | ;returns the name of the data for field=piece | |
| MINY() | ;the smallest Y a block element can begin at | |
| BLKDESCR(IBBLK) | ;parses the block record pointed to by IBBLK and puts the | |
| DORTN(IBRTN) | ;calls the rtn specified by the pkg interface if ok | |
| DATANODE(RTN,PIECE) | ;returns the node that the field=piece is on | |
| MINX() | ;the smallest X a block element can begin at | |
| DATATYPE(TYPE) | ;returns the description of the datatype=TYPE | |
| MAXY() | ;the largest Y a block element can begin at | |
| WARNING(OBJECT) | ; displays a warning | 
| Name | Field # of Occurrence | 
|---|---|
| PAUSE^IBDFU5 | WARNING+3 | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^IBE(357.1 - [#357.1] | BLKDESCR+5 | 
| ^IBE(357.6 - [#357.6] | RTNDSCR+5, RTNDSCR+23, RTNDSCR+24, RTNDSCR+36, RTNDSCR+37, RTNDSCR+48, RTNDSCR+49, RTNDSCR+59, RTNDSCR+60, DORTN+14 , DORTN+18, DATANAME+2, DATANAME+4, DATANAME+6, DATANODE+3, DATANODE+5 | 
| ^IBE(359.1 - [#359.1] | DATATYPE+5 | 
| Name | Line Occurrences | 
|---|---|
| $$DATANAME | RTNDSCR+39 | 
| $$DATANODE | RTNDSCR+39 | 
| @( | DORTN+30 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| IBARY | DORTN+3~, DORTN+8*, DORTN+9 | 
| IBBLK | BLKDESCR~, BLKDESCR+3, BLKDESCR+5 | 
| IBBLK("BOX" | BLKDESCR+11*, MINX+1, MAXX+1, MINY+1, MAXY+1 | 
| IBBLK("H" | BLKDESCR+10*, MAXY+1 | 
| IBBLK("HDISP" | BLKDESCR+13* | 
| IBBLK("HDR" | BLKDESCR+12* | 
| IBBLK("NAME" | BLKDESCR+6* | 
| IBBLK("PAGE" | BLKDESCR+15* | 
| IBBLK("S" | BLKDESCR+14* | 
| IBBLK("W" | BLKDESCR+9*, MAXX+1 | 
| IBBLK("X" | BLKDESCR+8* | 
| IBBLK("Y" | BLKDESCR+7*, BLKDESCR+15 | 
| >> IBFORM("PAGE_HT" | BLKDESCR+15 | 
| IBRTN | DORTN~, DORTN+14, DORTN+18 | 
| IBRTN("ACTION" | DORTN+7 | 
| IBRTN("AVAIL" | DORTN+11 | 
| IBRTN("DATA_LOCATION" | DORTN+8 | 
| IBRTN("ENTRY" | DORTN+29 | 
| IBRTN("EXIT" | DORTN+31 | 
| IBRTN("RTN" | DORTN+21, DORTN+24, DORTN+25, DORTN+26, DORTN+30 | 
| IEN | DATANAME+3~, DATANAME+4*, DATANAME+5, DATANAME+6, DATANODE+3*, DATANODE+4, DATANODE+5 | 
| NODE | RTNDSCR+3~, RTNDSCR+4*, RTNDSCR+5*, RTNDSCR+6, RTNDSCR+10, RTNDSCR+16, RTNDSCR+17, RTNDSCR+18, RTNDSCR+19, RTNDSCR+20 , RTNDSCR+21, RTNDSCR+22, RTNDSCR+31, RTNDSCR+32, RTNDSCR+33, RTNDSCR+34, RTNDSCR+35, RTNDSCR+40, RTNDSCR+44, RTNDSCR+45 , RTNDSCR+46, RTNDSCR+47, RTNDSCR+52, RTNDSCR+53, RTNDSCR+54, RTNDSCR+55, RTNDSCR+56, RTNDSCR+57, RTNDSCR+58, DATANAME+3~ , DATATYPE+3~, DATATYPE+4*, DATATYPE+5*, DATATYPE+6, DATATYPE+7, DATATYPE+8 | 
| NODE0 | BLKDESCR+4~, BLKDESCR+5*, BLKDESCR+6, BLKDESCR+7, BLKDESCR+8, BLKDESCR+9, BLKDESCR+10, BLKDESCR+11, BLKDESCR+12, BLKDESCR+13 , BLKDESCR+14, BLKDESCR+16 | 
| NODFN | RTNDSCR+15~, RTNDSCR+16*, RTNDSCR+26, RTNDSCR+27 | 
| OBJECT | WARNING~, WARNING+1*, WARNING+2 | 
| PIECE | DATANAME~, DATANAME+1, DATANAME+2, DATANAME+4, DATANODE~, DATANODE+1, DATANODE+2, DATANODE+3 | 
| QUIT | DORTN+3~, DORTN+4*, DORTN+14*, DORTN+15 | 
| RTN | RTNDSCR~, RTNDSCR+4*, RTNDSCR+5, RTNDSCR+23, RTNDSCR+24, RTNDSCR+36, RTNDSCR+37, RTNDSCR+39, RTNDSCR+48, RTNDSCR+49 , RTNDSCR+59, RTNDSCR+60, DATANAME~, DATANAME+1, DATANAME+2, DATANAME+4, DATANAME+6, DATANODE~, DATANODE+1, DATANODE+3 , DATANODE+5 | 
| RTN("ACTION" | RTNDSCR+6*, RTNDSCR+9, RTNDSCR+14, RTNDSCR+30, RTNDSCR+43 | 
| RTN("AVAIL" | RTNDSCR+10*, RTNDSCR+22*, RTNDSCR+34*, RTNDSCR+45*, RTNDSCR+57* | 
| RTN("CHANGES" | RTNDSCR+19*, RTNDSCR+54* | 
| RTN("DATATYPE" | RTNDSCR+20*, RTNDSCR+55* | 
| RTN("DATA_LOCATION" | RTNDSCR+26*, RTNDSCR+27*, RTNDSCR+38* | 
| RTN("DYNAMIC" | RTNDSCR+35*, RTNDSCR+58* | 
| RTN("ENTRY" | RTNDSCR+23*, RTNDSCR+36*, RTNDSCR+48*, RTNDSCR+59* | 
| RTN("EXIT" | RTNDSCR+24*, RTNDSCR+37*, RTNDSCR+49*, RTNDSCR+60* | 
| RTN("FULL" | RTNDSCR+21*, RTNDSCR+33*, RTNDSCR+56* | 
| RTN("HSMRY" | RTNDSCR+47* | 
| RTN("HSMRY?" | RTNDSCR+46* | 
| RTN("INPUT_RTN" | RTNDSCR+40* | 
| RTN("NAME" | RTNDSCR+17*, RTNDSCR+26, RTNDSCR+27, RTNDSCR+31*, RTNDSCR+38, RTNDSCR+39*, RTNDSCR+52* | 
| RTN("RTN" | RTNDSCR+18*, RTNDSCR+32*, RTNDSCR+44*, RTNDSCR+53* | 
| RTN("WIDTH" | RTNDSCR+39* | 
| TYPE | DATATYPE~, DATATYPE+5 | 
| TYPE("FORMAT" | DATATYPE+8* | 
| TYPE("MAX_INPUT" | DATATYPE+7* | 
| TYPE("SPACE" | DATATYPE+6* | 
| VARIABLE | DORTN+3~, DORTN+14*, DORTN+18*~ | 
| VARIEN | DORTN+3~, DORTN+14*, DORTN+18* | 
| Name | Field # of Occurrence | 
|---|---|
| $T(@$PIECE^2;4(6)^@$PIECE^2;4(6) | DORTN+25 | 
| $T(^@$PIECE^2;4(6) | DORTN+26 |