IBDFUTL1 ;ALB/MAF - Maintenance Utility cont. - 4 20 95
Source file <IBDFUTL1.m>
| Package | Total | Call Graph | 
|---|---|---|
| Automated Information Collection System | 1 | (CLINICS,ENDV,HEADER)^IBDFUTL2 | 
| DRG Grouper | 1 | $$CPT^ICPTCOD | 
| Registration | 1 | ($$LOWER,$$SETSTR)^VALM1 | 
| Package | Total | Caller Graph | 
|---|---|---|
| Automated Information Collection System | 1 | IBDFUTL2 | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| TMP | ; -- Set up TMP Array | |
| CLIN1 | ;  -- Sort Display by clinic | |
| SET | ;  -- Loop thru to see if codes are valid | |
| SETARR | ;  -- Set up Listman array | |
| SETSTR(S,V,X,L) | ; -- insert text(S) into variable(V) ; S := string ; V := destination ; X := @ col X ; L := # of chars | |
| FORM1 | ;  -- Sort Display by form | |
| GROUP1 | ;  -- Sort Display by clinic group | |
| SETARR1 | ;  -- Set up Listman array | |
| TMP1 | ; -- Set up TMP Array | |
| SET1 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^IBD(357.99 - [#357.99] | GROUP1+2, GROUP1+6, GROUP1+7 | 
| ^IBE(357 - [#357] | SETARR+12, SET+17, SET+21, FORM1+2 | 
| ^IBE(357.1 - [#357.1] | SETARR+10, SET+1, SET+17, SET+21 | 
| ^IBE(357.2 - [#357.2] | SET+2 | 
| ^IBE(357.3 - [#357.3] | SETARR1+4, SET+3, SET+4 | 
| ^IBE(357.6 - [#357.6] | SET+8, SET+20 | 
| ^IBE(357.69 - [#357.69] | SET+15 | 
| ^ICD9 - [#80] | SET+14 | 
| ^SC - [#44] | CLIN1+2, GROUP1+6 | 
| ^SD(409.95 - [#409.95] | CLIN1+6, GROUP1+10 | 
| ^TMP("CLN" | CLIN1+2*, CLIN1+3!*, CLIN1+5 | 
| ^TMP("CLN1" | CLIN1+4!, CLIN1+5*, CLIN1+6 | 
| ^TMP("CPT" | TMP+1*, TMP1+1* | 
| ^TMP("CPTIDX" | TMP+2* | 
| ^TMP("FRM1" | FORM1+3!, FORM1+4*, FORM1+5 | 
| ^TMP("GRP1" | GROUP1+2*, GROUP1+3!, GROUP1+4*, GROUP1+5 | 
| ^TMP("IBDF" | GROUP1+6*, GROUP1+7*, GROUP1+8, GROUP1+9, GROUP1+10 | 
| ^TMP("UTIL" | SET+17*, SET+21*, SET1+1, SET1+2, SET1+3, SET1+4 | 
| Name | Line Occurrences | 
|---|---|
| SET | CLIN1+7, FORM1+2, FORM1+5, GROUP1+10 | 
| SET1 | CLIN1+8, FORM1+6, GROUP1+11 | 
| SETARR | SET1+4 | 
| SETARR1 | SET1+4 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| >> IBCLN | GROUP1+6* | 
| >> IBDBLK | SET1*, SET1+2*, SET1+3, SET1+4 | 
| >> IBDCLN | CLIN1+6* | 
| >> IBDCLNM | CLIN1+6* | 
| >> IBDCNODE | CLIN1+6*, CLIN1+7, GROUP1+10* | 
| >> IBDCNT | SETARR+2*, TMP+1, SETARR1+7*, TMP1+1 | 
| >> IBDCNT1 | SETARR+1*, SETARR+4, TMP+1, TMP+2, TMP1+1 | 
| >> IBDF( | SET1+4 | 
| >> IBDFACT | SET+6, SET+18 | 
| >> IBDFBK | SET1+2* | 
| IBDFBLK | SETARR+10, SET+1*, SET+2, SET+17, SET+21, SET1*, SET1+4*, CLIN1+1~, FORM1+1~, GROUP1+1~ | 
| >> IBDFCIFN | CLIN1+6*, GROUP1+10* | 
| >> IBDFCLIN | CLIN1+3*, CLIN1+5*, CLIN1+6*, GROUP1+10* | 
| >> IBDFCLN | GROUP1+9* | 
| >> IBDFCLNM | SET+17, SET+21, GROUP1+9*, GROUP1+10 | 
| >> IBDFCODE | SET+11, SET+14, SET+15 | 
| >> IBDFGIFN | GROUP1+2*, GROUP1+4*, GROUP1+5*, GROUP1+6, GROUP1+7 | 
| >> IBDFGN | GROUP1+2*, GROUP1+5*, GROUP1+9* | 
| >> IBDFGNM | GROUP1+2*, GROUP1+5*, GROUP1+6, GROUP1+7, GROUP1+9*, GROUP1+10 | 
| >> IBDFINT | SET+2, SET+8, SET+20 | 
| >> IBDFLG | SET1* | 
| IBDFLST | SET+2*, SET+3, SET+17, SET+21, CLIN1+1~, FORM1+1~, GROUP1+1~ | 
| >> IBDFN | CLIN1+7*, GROUP1+10* | 
| >> IBDFNAME | SET+17, SET+21, SET1*, SET1+1*, SET1+2, SET1+3, SET1+4, CLIN1+6*, FORM1+2*, FORM1+5* , GROUP1+10* | 
| >> IBDFNCNG | CLIN1+4, FORM1+3, GROUP1+3 | 
| >> IBDFNM | SET1+1* | 
| >> IBDFNODE | SET+2* | 
| IBDFORM | SET+1, SET+17, SET+21, CLIN1+1~, CLIN1+7*, FORM1+1~, FORM1+2*, FORM1+4*, FORM1+5*, GROUP1+1~ , GROUP1+10* | 
| >> IBDFORM1 | SETARR+12, SET1*, SET1+4* | 
| >> IBDFRM | SET1+2*, FORM1+2*, FORM1+5* | 
| >> IBDFRNM | FORM1+2*, FORM1+5* | 
| >> IBDFSEL | SET+3*, SET+4, SET+17, SET+21, SET1+3*, SET1+4 | 
| >> IBDFTMP | SETARR+8, SETARR+14, TMP+2, SETARR1+2, SET1+4* | 
| >> IBDFVAL | SETARR+4*, SETARR+5, SETARR+6*, SETARR+7, SETARR+8*, SETARR+9, SETARR+10*, SETARR+11, SETARR+12*, SETARR+13 , SETARR+14*, SETARR1+9*, SETARR1+10 | 
| >> IBDFX | SETARR+6, TMP+2, SETARR1+5, SET+3*, SET+4, SET+7*, SET+17, SET+19*, SET+21, SET1* , SET1+1*, SET1+2, SET1+3, SET1+4 | 
| >> IBDFX1 | SET+4*, SET+5 | 
| >> IBDFX2 | SET+4*, SET+5 | 
| >> IBDFX3 | SET+4*, SET+5 | 
| >> IBDIV | GROUP1+7* | 
| >> IBDORM | SET1*, SET1+2*, SET1+3, SET1+4 | 
| IBDPRIM | SETARR1+1~, SETARR1+4*, SETARR1+5, SETARR1+9 | 
| IBDSELP | SETARR1+1~, SETARR1+2*, SETARR1+3, SETARR1+4 | 
| >> IBI | SET+5*, SET+7, SET+19 | 
| IBY | SET+11~, SET+13*, SET+14~*, SET+15~*, SET+17 | 
| >> IEN | GROUP1+6*, GROUP1+7* | 
| L | SETSTR~, SETSTR+6 | 
| S | SETSTR~, SETSTR+6 | 
| V | SETSTR~, SETSTR+6 | 
| >> VALMCNT | SETARR+2*, TMP+1, TMP+2, SETARR1+7*, TMP1+1 | 
| >> VAUTC | SETARR+14, SET+17, SET+21, CLIN1+2, CLIN1+3 | 
| >> VAUTC( | CLIN1+3 | 
| VAUTF | SET1+1, CLIN1+1~, FORM1+2, FORM1+4, FORM1+5, GROUP1+1~ | 
| VAUTF( | FORM1+4 | 
| >> VAUTG | SETARR+14, SET+17, SET+21, GROUP1+2, GROUP1+3, GROUP1+4 | 
| >> VAUTG( | GROUP1+4 | 
| >> VAUTJ( | SET+16 | 
| X | SETSTR~, SETSTR+6, SETARR+3*, SETARR+5*, SETARR+7*, SETARR+9*, SETARR+11*, SETARR+13*, SETARR+14*, TMP+1 , SETARR1+8*, SETARR1+10*, TMP1+1, SET+7*, SET+9, SET+12, SET+14, SET+15, SET+16, SET+19* , SET+21, CLIN1+2*, CLIN1+3*, CLIN1+5*, FORM1+4* | 
| XX | SET+11~, SET+12*, SET+13 | 
| >> Y | SET+21 |