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 |