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 |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: PXICLN27

Package: PCE Patient Care Encounter

Routine: PXICLN27


Information

PXICLN27 ;ISL/dee - Cleanup providers, routine for PX*1.0*27 ;3/26/97

Source Information

Source file <PXICLN27.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Kernel 3 ^%ZTLOAD  (BMES,MES)^XPDUTL  $$GET^XUA4A72  
PCE Patient Care Encounter 3 $$DATA2PCE^PXAPI  $$SOURCE^PXAPIUTL  $$PKG2IEN^VSIT  
List Manager 1 $$FDTTM^VALM1  
MailMan 1 ^XMD  
VA FileMan 1 FILE^DIE  

Entry Points

Name Comments DBIA/ICR reference
TASKED ;
CLEANUP ;
QUE ; Queue job to cleanup Lab Providers.
ENV
REPORT ;Send mail messge of what was done.
MAIL ;Send mail messge that job is done.

External References

Name Field # of Occurrence
^%ZTLOAD QUE+8
FILE^DIE CLEANUP+80
$$DATA2PCE^PXAPI CLEANUP+108
$$SOURCE^PXAPIUTL CLEANUP+16
$$FDTTM^VALM1 CLEANUP+49, CLEANUP+67, CLEANUP+90, CLEANUP+100
$$PKG2IEN^VSIT CLEANUP+15, CLEANUP+17
^XMD MAIL+10, REPORT+14
BMES^XPDUTL QUE+2, QUE+10
MES^XPDUTL QUE+9, QUE+10
$$GET^XUA4A72 ENV+13, ENV+14, CLEANUP+38

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"It looks like the cleanup routine in PCE patch PX*1.0*9 did not finish."
  • Line Location: ENV+4
Function Call: WRITE
  • Prompt: !,"The cleanup in patch 9 needs to be restarted so that it can finish."
  • Line Location: ENV+5
Function Call: WRITE
  • Prompt: !,"To restart, enter D QUE^PXICLN9 from the programmers prompt."
  • Line Location: ENV+6
Function Call: WRITE
  • Prompt: !!,"The default Lab provider that was added in Lab patch LR*5.2*158"
  • Line Location: ENV+10
Function Call: WRITE
  • Prompt: !,"has not been set up. This provider must be setup before installing"
  • Line Location: ENV+11
Function Call: WRITE
  • Prompt: !,"this patch."
  • Line Location: ENV+12
Function Call: WRITE
  • Prompt: !!,"The default Lab provider that was added in Lab patch LR*5.2*158"
  • Line Location: ENV+18
Function Call: WRITE
  • Prompt: !,"is not a valid provider. Either they have been terminated or"
  • Line Location: ENV+19
Function Call: WRITE
  • Prompt: !,"they do not have a valid person class from 10/1/96 through now."
  • Line Location: ENV+20
Routine Call
  • DIE
  • Line Location:
    • CLEANUP+80

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNVCPT - [#9000010.18] CLEANUP+76
^AUPNVCPT("AD" CLEANUP+75
^AUPNVPRV - [#9000010.06] CLEANUP+37, CLEANUP+40, CLEANUP+53, CLEANUP+54, CLEANUP+71, CLEANUP+72, CLEANUP+94, CLEANUP+95
^AUPNVPRV("AD" CLEANUP+36
^AUPNVSIT - [#9000010] ENV+2, CLEANUP+47, CLEANUP+65, CLEANUP+88, CLEANUP+98
^AUPNVSIT("B" CLEANUP+30, CLEANUP+32
^DIC(150.9 - [#150.9] MAIL+8
^DPT - [#2] CLEANUP+49, CLEANUP+67, CLEANUP+90, CLEANUP+100
^LAB(69.9 - [#69.9] ENV+7, CLEANUP+20
^PX(815 - [#815] ENV+1, CLEANUP+24, CLEANUP+111*
^TMP("PXTEXT" REPORT+5*, REPORT+6*, REPORT+7*, REPORT+8*, REPORT+9*, REPORT+10*, REPORT+11*, REPORT+12*, REPORT+15!, CLEANUP+11!
, CLEANUP+49*, CLEANUP+51*, CLEANUP+67*, CLEANUP+69*, CLEANUP+90*, CLEANUP+92*, CLEANUP+100*, CLEANUP+102*
^VA(200 - [#200] ENV+15, CLEANUP+21, CLEANUP+39, CLEANUP+51, CLEANUP+69, CLEANUP+92, CLEANUP+102
^VSIT(150.2 - [#150.2] MAIL+8

Label References

Name Line Occurrences
CLEANUP TASKED+1
MAIL TASKED+2
REPORT CLEANUP+109, CLEANUP+112

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DT ENV+13
DUZ QUE+7, MAIL+2, REPORT+2
PXACTIVE ENV~, ENV+15*, ENV+16, CLEANUP+4~, CLEANUP+39*, CLEANUP+42, CLEANUP+43
PXI CLEANUP+4~, CLEANUP+33!, CLEANUP+104
PXI("PROVIDER" CLEANUP+46*, CLEANUP+59*, CLEANUP+60*, CLEANUP+63*, CLEANUP+64*, CLEANUP+87*
PXICOUNT CLEANUP+1~, CLEANUP+34*, CLEANUP+45*, CLEANUP+46, CLEANUP+58*, CLEANUP+59, CLEANUP+60, CLEANUP+62*, CLEANUP+63, CLEANUP+64
, CLEANUP+86*, CLEANUP+87
PXICPT CLEANUP+5~, CLEANUP+74*, CLEANUP+75*, CLEANUP+76, CLEANUP+78
PXICPTC CLEANUP+5~, CLEANUP+78*, CLEANUP+79
PXIDIERR CLEANUP+5~, CLEANUP+77!
PXIFDA CLEANUP+5~, CLEANUP+77!
PXIFDA( CLEANUP+79*
PXILRNAM CLEANUP+2~, CLEANUP+21*, CLEANUP+69
PXIMSG CLEANUP+6~, CLEANUP+10*, CLEANUP+48*, CLEANUP+49, CLEANUP+50*, CLEANUP+51, CLEANUP+66*, CLEANUP+67, CLEANUP+68*, CLEANUP+69
, CLEANUP+89*, CLEANUP+90, CLEANUP+91*, CLEANUP+92, CLEANUP+99*, CLEANUP+100, CLEANUP+101*, CLEANUP+102, CLEANUP+109*, CLEANUP+112
PXIPART REPORT+3*, REPORT+4, CLEANUP+6~, CLEANUP+9*
PXIPAT9 ENV~, ENV+1*, ENV+2
PXIPC CLEANUP+3~, CLEANUP+38*, CLEANUP+43, CLEANUP+84
PXIPC1 ENV~, ENV+13*, ENV+16
PXIPC2 ENV~, ENV+14*, ENV+16
PXIPKG CLEANUP+4~, CLEANUP+33!, CLEANUP+52, CLEANUP+53*, CLEANUP+70, CLEANUP+71*, CLEANUP+93, CLEANUP+94*, CLEANUP+106*, CLEANUP+108
PXIPKGLR CLEANUP+2~, CLEANUP+15*, CLEANUP+40
PXIPKGPX CLEANUP+3~, CLEANUP+17*, CLEANUP+106
PXIPRV CLEANUP+1~, CLEANUP+35*, CLEANUP+36*, CLEANUP+37, CLEANUP+40, CLEANUP+53, CLEANUP+54, CLEANUP+71, CLEANUP+72, CLEANUP+94
, CLEANUP+95
PXIPRV0 CLEANUP+4~, CLEANUP+37*, CLEANUP+38, CLEANUP+39, CLEANUP+42, CLEANUP+43, CLEANUP+46, CLEANUP+51, CLEANUP+59, CLEANUP+69
, CLEANUP+76, CLEANUP+83, CLEANUP+87, CLEANUP+92, CLEANUP+102
PXIPRVLR ENV~, ENV+7*, ENV+8, ENV+13, ENV+14, ENV+15, CLEANUP+2~, CLEANUP+20*, CLEANUP+21, CLEANUP+63
, CLEANUP+79
PXISOR CLEANUP+4~, CLEANUP+33!, CLEANUP+54*, CLEANUP+72*, CLEANUP+95*, CLEANUP+107*, CLEANUP+108
PXISORLR CLEANUP+2~
PXISORPX CLEANUP+3~, CLEANUP+16*, CLEANUP+107
PXIVSIT CLEANUP+1~, CLEANUP+31*, CLEANUP+32*, CLEANUP+36, CLEANUP+47, CLEANUP+49, CLEANUP+65, CLEANUP+67, CLEANUP+75, CLEANUP+88
, CLEANUP+90, CLEANUP+98, CLEANUP+100, CLEANUP+108
PXIVSIT0 CLEANUP+6~, CLEANUP+47*, CLEANUP+49, CLEANUP+65*, CLEANUP+67, CLEANUP+88*, CLEANUP+90, CLEANUP+98*, CLEANUP+100
PXIVSTDT CLEANUP+1~, CLEANUP+24*, CLEANUP+30*, CLEANUP+32, CLEANUP+38, CLEANUP+42, CLEANUP+43, CLEANUP+111
PXTEXT MAIL+1~
PXTEXT(1 MAIL+5*
PXTEXT(2 MAIL+6*
PXTEXT(3 MAIL+7*
PXTEXT(4 MAIL+8*
XMSUB MAIL+1~, MAIL+4*, REPORT+1~, REPORT+4*
XMTEXT MAIL+1~, MAIL+9*, REPORT+1~, REPORT+13*
XMY MAIL+1~, REPORT+1~
XMY( MAIL+2*, REPORT+2*
>> XPDABORT ENV+3*, ENV+9*, ENV+17*
ZTCPU QUE+1~
ZTDESC QUE+1~, QUE+5*
ZTDTH QUE+1~, QUE+6*
ZTIO QUE+1~, QUE+4*
>> ZTQUEUED MAIL+6, REPORT+6
ZTRTN QUE+1~, QUE+3*
ZTSAVE QUE+1~
ZTSAVE("DUZ" QUE+7*
ZTSAVE("DUZ(" QUE+7*
ZTSK QUE+1~, QUE+9, QUE+10
ZTUCI QUE+1~
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All