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 |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: LRCAPPH3

Package: Lab Service

Routine: LRCAPPH3


Information

LRCAPPH3 ;DALOI/FHS/PC - CHECK CPT CODE AND FILE POINTERS ; 5/1/99

Source Information

Source file <LRCAPPH3.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA Fileman 4 ^%DT  ^DIC  ^DIK  GETS^DIQ  
Kernel 2 ^%ZISC  ($$FMTE,$$NOW)^XLFDT  
DRG Grouper 1 $$CPT^ICPTCOD  
MailMan 1 ^XMD  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Lab Service 1 LRCAPPH4  

Entry Points

Name Comments DBIA/ICR reference
AA
LAM ;Look for inactive Codes and broken pointers.
CK ;
EN ;
END ;Called from LRCAPPH4
MSG2(MSGTYPE) ;
MAIL2 ;Send message to G.LMI local mail group
LAB ;Look for inactive Codes in ^LAB
EN0 ;Entry point for scan 64, scan 60, and mail reports to G.LMI
MSG ;
IACPT(LRBETST,LRBECDT,LRSPEC) ; Get inactive specimen CPT
ACTIVE ;Print only WKLD CODES that have associated test assigned
MAIL ;Send message to G.LMI local mail group
TST
MSGSET(SUB,TXT) ;SUB=subscript - TXT = array containing the message

External References

Name Field # of Occurrence
^%DT EN+3, EN+6
^%ZISC END+6
^DIC CK+12
^DIK LAM+9
GETS^DIQ IACPT+3
$$CPT^ICPTCOD LAB+16, LAB+19, IACPT+9, CK+6
$$FMTE^XLFDT EN+6, MSG+19, MAIL+8, MAIL2+4
$$NOW^XLFDT EN+4, EN+5, MAIL+8, MAIL2+4
^XMD MAIL+10, MAIL2+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+1
Routine Call
  • DIC
  • Line Location:
    • CK+12

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
60.01 GETS^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(60 - [#60] LAB+2, LAB+4, LAB+6, LAB+13
^LAM - [#64] LAM+3, LAM+4, LAM+5, LAM+6, LAM+7!, LAM+10, MSG+2, MSG+8, MSG+17, MSG+18
, TST+1, TST+4
^TMP( MSGSET+2, MSGSET+4*, MSGSET+5*
^TMP("LRCAPPH" EN+1!, EN+4*, END+5!, CK+7*, MSG+3, MAIL+1, MAIL+4*, MAIL+5*, MAIL+7*, MSG2+3
^TMP("LRCAPPH60" EN+5*, END+5!, MAIL2+2, MAIL2+3*

Label References

Name Line Occurrences
CK LAM+10
EN EN0+2
EN0 ACTIVE+2
IACPT LAB+8
MAIL EN0+3
MAIL2 EN0+4
MSG CK+9, CK+13, CK+14
MSG2 LAB+12, LAB+16, LAB+19
MSGSET AA+20, LAB+20, MSG+11, MSG+21
TST MSG+7, MSG+16

Naked Globals

Name Field # of Occurrence
^( TST+4
^(0 MSG+8*, MSG+17*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT EN+3!*, EN+6!*, EN+7!
A IACPT+1~, IACPT+4*, IACPT+5, IACPT+6
ARR IACPT+1~
ARR( IACPT+6*, IACPT+7, IACPT+8
DA LAM+8~, LAM+9*, END+2!
DA(1 LAM+9*
DEFAULT LAB+1~, LAB+13*, LAB+17, LAB+19
DIC END+2!, CK+2!, CK+10*
DIC("S" CK+11*
DIC(0 CK+10*
DIE LAM+8~, END+2!
DIK LAM+8~, LAM+9*, END+2!
DR LAM+8~, END+2!
DT LAB+8
DUZ MAIL+2~, MAIL2+1~
HCPCS LAB+1~, LAB+13*, LAB+14, LAB+16
I END+2!, CK+3*, MSGSET+1~, MSGSET+3*, MSGSET+4
IOF END+1
IOST END+1
LRAAN AA+2~, AA+3*, AA+4*, AA+5
LRACT LAM+4, END+3!, ACTIVE+2*, CK+1
LRBEAR60 IACPT+1~
LRBEAR60( IACPT+4, IACPT+5, IACPT+6
LRBEAX IACPT+1~, IACPT+8*, IACPT+9*, IACPT+10
LRBECDT IACPT~, IACPT+7, IACPT+9
LRBECPT LAB+1~, LAB+7!, IACPT+2*
LRBECPT( LAB+9, LAB+10, IACPT+10*
LRBEIEN IACPT+1~, IACPT+2*, IACPT+3
LRBETST IACPT~, IACPT+2, IACPT+10
>> LRC MAIL+6*, MAIL+7
LRCE AA+2~, AA+5*, AA+7
LRCMT END+3!, MSG+3*, MSG+4*, MSG+6, MSG+9*, MSG+10*, MSG+14*, MSG+15, MSG+19*, MSG+20*
, MAIL+3*, MAIL+4, MAIL+5*, MAIL+7*, TST+3*, TST+6*, TST+7, MSGSET+2*, MSGSET+4*, MSGSET+5
, MSG2+3*, MSG2+4*, MSG2+5*, MSG2+6, MAIL2+3*
LRI LAM+2~, LAM+3*, LAM+4, LAM+5, LAM+6, LAM+7, LAM+9, LAM+10, IACPT+2*, END+3!
, MSG+2, MSG+4, MSG+8, MSG+17, MSG+18, TST+1, TST+4
LRII LAM+2~, LAM+5*, LAM+6, LAM+7, LAM+9, LAM+10, END+3!, MSG+8, MSG+17, MSG+18
LRINADT EN+6*, END+3!, MSG+9
LRINADTX EN+7*, END+3!, MSG+8, MSG+17
LRJ LAB+1~, LAB+2*, LAB+4, LAB+6, LAB+8, LAB+9, LAB+10, LAB+13, MSG2+4
LRMSG LAB+20, END+3!, CK+2!, MSG+1!, MSG+11, MSG+21, MSG2+2!
LRMSG( MSG+4*, MSG+6*, MSG+9*, MSG+10*, MSG+14*, MSG+15*, MSG+19*, MSG+20*, TST+3*, TST+7*
, MSG2+3*, MSG2+4*, MSG2+6*
LRN LAB+1~, LAB+4*, END+3!, MSG+2*, MSG+4, MSG2+4
LRPGDT EN+3*, END+3!
LRSEP EN+1!, END+3!
LRSEP(1 EN+1*, AA+20, MSG+10
LRSEP(2 EN+2*, MSG+20
LRSPEC LAB+1~, LAB+6*, LAB+8, LAB+11, IACPT~, IACPT+2
LRT TST+2!, TST+4*
LRTST END+3!, TST+4*, TST+5, TST+6*, TST+7
LRTXT AA+2~, AA+6!, AA+7*, AA+9, AA+11, AA+13, AA+15, AA+18, AA+20, END+4!
LRTXT(1 AA+9*, AA+11*, AA+13*, AA+15*, AA+18*, AA+20
LRTXT(10 AA+20*
LRTXT(2 AA+16*, AA+19*
LRX AA+2~, AA+5*, AA+8, AA+10, AA+12, AA+14, AA+17, LAM+10!*, END+3!, CK+1
, CK+3
LRX( CK+3*
LRX(1 CK+5, CK+10
LRX(2 CK+4, CK+11, MSG+6, MSG+15
LRX(4 CK+6, CK+14
LRXDT LAM+2~, MSG+13~, MSG+18*, MSG+19
LRY LAM+2~
MSGFLAG LAB+1~, LAB+3*, LAB+20, MSG2+1, MSG2+6*
MSGTYPE LAB+1~, LAB+11*, LAB+12, LAB+15*, LAB+16, LAB+18*, LAB+19, MSG2~, MSG2+6
SUB MSGSET~, MSGSET+2, MSGSET+4, MSGSET+5
TXT MSGSET~
TXT( MSGSET+3, MSGSET+4
U EN+4, EN+5, LAM+7, LAB+4, LAB+5, LAB+13, LAB+16, LAB+19, IACPT+10, CK+1
, CK+3, CK+6, CK+8, CK+10, MSG+3, MSG+4, MSG+8, MSG+12, MSG+14, MSG+17
, MSG+18, TST+7, MSGSET+2, MSGSET+5, MSG2+3, MSG2+4
X EN+3*, EN+6*, LAB+4*, LAB+5, LAB+10*, LAB+13*, LAB+16*, LAB+19*, IACPT+1~, IACPT+7*
, IACPT+8, END+4!, CK+2!, CK+5*, CK+6, CK+7, CK+10*, MSG+6, TST+2~, TST+5*
, TST+7, MSG2+6
XMDUZ MAIL+2~, MAIL2+1~
XMSUB END+4!, MAIL+2~, MAIL+8*, MAIL2+1~, MAIL2+4*
XMTEXT END+4!, MAIL+2~, MAIL+9*, MAIL2+1~, MAIL2+5*
>> XMY("G.LMI" MAIL+9*, MAIL2+5*
Y EN+3, EN+4, EN+5, EN+6, EN+7, LAB+1~, LAB+16*, LAB+19*, END+4!, CK+2!
, CK+6*, CK+8, CK+13, MSG+5
Y(0 CK+8*, MSG+12, MSG+14
>> ZTQUEUED LAM+3, LAM+6
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All