PXICLN9B ;ISL/dee - Cleanup routine for PX*1.0*9 ;11/8/96
Source file <PXICLN9B.m>
Package | Total | Call Graph |
---|---|---|
PCE Patient Care Encounter | 6 | $$DELVFILE^PXAPIDEL $$SOURCE^PXAPIUTL (EN1,EVENT)^PXKMAIN ($$PKG2IEN,UPD)^VSIT $$IP^VSITCK1 $$KILL^VSITKIL |
Scheduling | 1 | EN^SDCODEL |
VA Fileman | 1 | FILE^DIE |
Name | Comments | DBIA/ICR reference |
---|---|---|
RADNUC | ;CAH/HIRMFO;for PCE data clean-up ;10/7/96 09:42
|
|
CLEANUP | ;
|
|
RADLOC(DFN,PXRADT) | ;Returns Hosp Loc of Rad/Nuc Med exam
|
Name | Field # of Occurrence |
---|---|
FILE^DIE | CLEANUP+149 |
$$DELVFILE^PXAPIDEL | CLEANUP+117 |
$$SOURCE^PXAPIUTL | CLEANUP+8, CLEANUP+9 |
EN1^PXKMAIN | CLEANUP+22, CLEANUP+123 |
EVENT^PXKMAIN | CLEANUP+24, CLEANUP+126 |
EN^SDCODEL | CLEANUP+155 |
$$PKG2IEN^VSIT | CLEANUP+10, CLEANUP+11 |
UPD^VSIT | CLEANUP+79, CLEANUP+162, CLEANUP+178, CLEANUP+191 |
$$IP^VSITCK1 | CLEANUP+176, CLEANUP+189 |
$$KILL^VSITKIL | CLEANUP+156 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^AUPNVCPT - [#9000010.18] | CLEANUP+39, CLEANUP+98, CLEANUP+102, CLEANUP+172, CLEANUP+185 |
^AUPNVCPT("AD" | CLEANUP+37 |
^AUPNVPRV - [#9000010.06] | CLEANUP+40, CLEANUP+173, CLEANUP+186 |
^AUPNVPRV("AD" | CLEANUP+38 |
^AUPNVSIT - [#9000010] | CLEANUP+36, CLEANUP+48, CLEANUP+49, CLEANUP+167, CLEANUP+168, CLEANUP+171, CLEANUP+176, CLEANUP+180, CLEANUP+181, CLEANUP+184 , CLEANUP+189 |
^AUPNVSIT("A" | CLEANUP+29 |
^DIC(40.7 - [#40.7] | CLEANUP+168, CLEANUP+181 |
^IBT(356 - [#356] | CLEANUP+145 |
^LAB(69.9 - [#69.9] | CLEANUP+15 |
^PX(815 - [#815] | CLEANUP+27, CLEANUP+32*, CLEANUP+192* |
^RA(79.1 - [#79.1] | RADLOC+21 |
^RADPT - [#70] | RADLOC+17, RADLOC+19 |
^RADPT("AVSIT" | CLEANUP+137, CLEANUP+139, CLEANUP+141 |
^SC - [#44] | RADLOC+22, RADLOC+23 |
^SCE("AVSIT" | CLEANUP+155 |
^TMP("PXICLN9" | CLEANUP+17, CLEANUP+20, CLEANUP+21!, CLEANUP+44!, CLEANUP+49*, CLEANUP+50*, CLEANUP+51*, CLEANUP+53*, CLEANUP+54*, CLEANUP+55* , CLEANUP+59*, CLEANUP+60*, CLEANUP+62, CLEANUP+65*, CLEANUP+66*, CLEANUP+72, CLEANUP+74, CLEANUP+75, CLEANUP+76, CLEANUP+81* , CLEANUP+95, CLEANUP+97, CLEANUP+98, CLEANUP+102*, CLEANUP+107*, CLEANUP+108*, CLEANUP+109*, CLEANUP+112*, CLEANUP+121, CLEANUP+122! , CLEANUP+193! |
^TMP("PXK" | CLEANUP+19!, CLEANUP+20*, CLEANUP+23!, CLEANUP+120!, CLEANUP+121*, CLEANUP+124, CLEANUP+193! |
^VSIT(150.1 - [#150.1] | CLEANUP+168, CLEANUP+181 |
^XTMP("PXICLN9" | CLEANUP+164* |
Name | Line Occurrences |
---|---|
$$RADLOC | CLEANUP+62 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DFN | RADLOC~, RADLOC+15, RADLOC+17, RADLOC+19 |
>> PXDUPCPT( | CLEANUP+101*, CLEANUP+102 |
PXICLN9 | CLEANUP+1~* |
PXICNT | CLEANUP+2~, CLEANUP+88*, CLEANUP+107, CLEANUP+108, CLEANUP+109, CLEANUP+112 |
PXICPT | CLEANUP+2~, CLEANUP+37*, CLEANUP+39, CLEANUP+43, CLEANUP+172, CLEANUP+185 |
PXIDEL | CLEANUP+3~, CLEANUP+117*, CLEANUP+152, CLEANUP+156*, CLEANUP+157, CLEANUP+164 |
PXIDIERR | CLEANUP+135~ |
PXIFDA | CLEANUP+135~, CLEANUP+149 |
PXIFDA( | CLEANUP+144* |
PXIFDA(356 | CLEANUP+148* |
PXIFILE | CLEANUP+2~, CLEANUP+85*, CLEANUP+86, CLEANUP+91, CLEANUP+107, CLEANUP+108, CLEANUP+109, CLEANUP+112 |
PXIHLOC | CLEANUP+5~, CLEANUP+62*, CLEANUP+68*, CLEANUP+72, CLEANUP+81 |
PXIHLOC(2 | CLEANUP+15*, CLEANUP+68 |
PXIIBT | CLEANUP+135~, CLEANUP+136*, CLEANUP+145*, CLEANUP+146, CLEANUP+147*, CLEANUP+148 |
PXINODE | CLEANUP+3~, CLEANUP+47*, CLEANUP+48*, CLEANUP+49, CLEANUP+50, CLEANUP+105*, CLEANUP+106*, CLEANUP+107, CLEANUP+108 |
PXINVSIT | CLEANUP+3~, CLEANUP+124*, CLEANUP+129, CLEANUP+132, CLEANUP+144, CLEANUP+148 |
PXIOE | CLEANUP+5~, CLEANUP+154*, CLEANUP+155* |
PXIPKG | CLEANUP+5~, CLEANUP+39*, CLEANUP+40*, CLEANUP+43, CLEANUP+55, CLEANUP+58, CLEANUP+91 |
PXIPKG(0 | CLEANUP+12*, CLEANUP+43 |
PXIPKG(1 | CLEANUP+10*, CLEANUP+12, CLEANUP+58 |
PXIPKG(2 | CLEANUP+11*, CLEANUP+12, CLEANUP+91 |
>> PXIPRV | CLEANUP+38*, CLEANUP+40, CLEANUP+43, CLEANUP+173, CLEANUP+186 |
PXIRA | CLEANUP+135~, CLEANUP+143*, CLEANUP+144 |
PXIRA(1 | CLEANUP+136*, CLEANUP+137*, CLEANUP+139, CLEANUP+141, CLEANUP+142, CLEANUP+143 |
PXIRA(2 | CLEANUP+138*, CLEANUP+139*, CLEANUP+141, CLEANUP+142, CLEANUP+143 |
PXIRA(3 | CLEANUP+140*, CLEANUP+141*, CLEANUP+142, CLEANUP+143 |
PXISOR | CLEANUP+5~, CLEANUP+61*, CLEANUP+67*, CLEANUP+76, CLEANUP+112 |
PXISOR(1 | CLEANUP+8*, CLEANUP+59, CLEANUP+60, CLEANUP+61 |
PXISOR(2 | CLEANUP+9*, CLEANUP+65, CLEANUP+66, CLEANUP+67 |
PXITCNT | CLEANUP+4~, CLEANUP+94*, CLEANUP+95*, CLEANUP+97, CLEANUP+98, CLEANUP+101, CLEANUP+102 |
PXITDUP | CLEANUP+4~, CLEANUP+91, CLEANUP+93*, CLEANUP+95, CLEANUP+97, CLEANUP+98*, CLEANUP+99*, CLEANUP+100 |
PXITNODE | CLEANUP+4~, CLEANUP+96*, CLEANUP+97*, CLEANUP+98 |
PXITVSIT | CLEANUP+3~ |
PXIVDT | CLEANUP+2~ |
PXIVFILE | CLEANUP+2~, CLEANUP+86*, CLEANUP+88, CLEANUP+106, CLEANUP+107 |
PXIVIEN | CLEANUP+2~, CLEANUP+87*, CLEANUP+88*, CLEANUP+98, CLEANUP+102, CLEANUP+106, CLEANUP+107 |
PXIVSIT | CLEANUP+2~, CLEANUP+27*, CLEANUP+28, CLEANUP+29*, CLEANUP+30*, CLEANUP+31*, CLEANUP+32, CLEANUP+36*, CLEANUP+37, CLEANUP+38 , CLEANUP+48, CLEANUP+49, CLEANUP+78, CLEANUP+88, CLEANUP+117, CLEANUP+129, CLEANUP+137, CLEANUP+139, CLEANUP+141, CLEANUP+145 , CLEANUP+155, CLEANUP+156, CLEANUP+161, CLEANUP+167, CLEANUP+168, CLEANUP+171, CLEANUP+176, CLEANUP+177, CLEANUP+180, CLEANUP+181 , CLEANUP+184, CLEANUP+189, CLEANUP+190, CLEANUP+192 |
>> PXIVST | CLEANUP+164 |
PXRA0 | RADLOC+14~, RADLOC+19*, RADLOC+20 |
PXRADT | RADLOC~, RADLOC+16, RADLOC+18 |
PXRADTI | RADLOC+14~, RADLOC+18*, RADLOC+19 |
PXRALOC | RADLOC+14~, RADLOC+20*, RADLOC+21 |
PXRALOC1 | RADLOC+14~, RADLOC+21*, RADLOC+22, RADLOC+23, RADLOC+24 |
PXRALOC2 | RADLOC+14~, RADLOC+23*, RADLOC+24 |
VSIT | CLEANUP+3~, CLEANUP+73!, CLEANUP+77, CLEANUP+159!, CLEANUP+170!, CLEANUP+183! |
VSIT("IEN" | CLEANUP+78*, CLEANUP+161*, CLEANUP+177*, CLEANUP+190* |
VSIT("PRI" | CLEANUP+75*, CLEANUP+160*, CLEANUP+174*, CLEANUP+187* |
VSIT("SOR" | CLEANUP+76*, CLEANUP+172*, CLEANUP+173*, CLEANUP+185*, CLEANUP+186* |
VSIT("SVC" | CLEANUP+74*, CLEANUP+175*, CLEANUP+176*, CLEANUP+188*, CLEANUP+189* |
X | RADLOC+14~ |