Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: PXICLN9B

Package: PCE Patient Care Encounter

Routine: PXICLN9B


Information

PXICLN9B ;ISL/dee - Cleanup routine for PX*1.0*9 ;11/8/96

Source Information

Source file <PXICLN9B.m>

Call Graph

Call Graph Total: 8

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  

Entry Points

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

External References

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

Global Variables Directly Accessed

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*

Label References

Name Line Occurrences
$$RADLOC CLEANUP+62

Local Variables

Legend:

>> 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~
Info |  Source |  Call Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  All