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: LRIPRE1

Package: Lab Service

Routine: LRIPRE1


Information

LRIPRE1 ;SLC/AM/DALISC/FHS - WKLD (CAP) CODE LIST REPORT PRE INSTALL/INIT 5.2 ;1/16/91 15:34 ;

Source Information

Source file <LRIPRE1.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA Fileman 3 YN^DICN  EN^DIQ  EN^DIU2  
Kernel 2 ^%ZIS  ^%ZISC  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Lab Service 1 LRIPRE  

Entry Points

Name Comments DBIA/ICR reference
PRE
LAM
EN ;
ERR
PRNT ;
LRO ;
HLP
QUE ;
CLEAN ;I $G(LRVR)>5.11 D ^LRIPRE2
PCC ;

External References

Name Field # of Occurrence
^%ZIS EN+5
^%ZISC QUE+5, CLEAN+1
YN^DICN EN+3
EN^DIQ QUE+2
EN^DIU2 LAM+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?10," I see you already have a list of CAP codes ",!,"from LABORATORY TEST file. ",!!,"Would you like another"
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: !!?5,"I will produce a list of CAP codes in your file LABORATORY TEST (#60) "
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: @IOF,!!?10,"Alphabetical Listing of All CAP [WKLD] Codes In Use",!
  • Line Location: QUE+2
Function Call: WRITE
  • Prompt: !!?10,"Purging Obsolete CAP CODES from ^LAB(60)",!
  • Line Location: LRO+2
Function Call: WRITE
  • Prompt: !?10,"Also checking for broken pointers to ^DD(63.04, ",!
  • Line Location: LRO+3
Function Call: WRITE
  • Prompt: !
  • Line Location: LRO+4
Function Call: WRITE
  • Prompt: !,"Removing bad Data Name pointer for lab test ",$P(^(0),U)
  • Line Location: LRO+7
Function Call: WRITE
  • Prompt: !?10,"Purging the CAP CODE file:",!
  • Line Location: LAM+0
Function Call: WRITE
  • Prompt: !?25,"^LAM( HAS BEEN PURGED ",!!
  • Line Location: LAM+3
Function Call: WRITE
  • Prompt: @IOF,!!!,?23,"LIST OF CAP [WKLD] CODES",?65,"Pg ",LRPG,!!,"TEST",?15,"CAP Code",?50,"Cap Number",!
  • Line Location: PRNT+3
Function Call: WRITE
  • Prompt: !,$P(^LAB(60,LRTS,0),U),!
  • Line Location: PRNT+5
Function Call: WRITE
  • Prompt: ?10,$S($D(^LAM(LRCC,0))#2:$P(^LAM(LRCC,0),U,1),1:""),?50,$P(LRX,U,2),?73,$S($P(LRX,U,3)=1:"DEF",1:""),!
  • Line Location: PCC+2
Function Call: WRITE
  • Prompt: !!,"During the installation process of V5.2, your CAP entries in the Laboratory Test file will be deleted.",!," A record maybe useful when setting up the files for V 5.2 "
  • Line Location: HLP+0
Function Call: WRITE
  • Prompt: !?10,$C(7)," Error in CAP Code pointer "_LRCC,!
  • Line Location: ERR+0
Routine Call
  • %ZIS
  • Line Location:
    • EN+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^LAM - [#64] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(63.04 LRO+7
^DD(64 LAM+2
^LAB(60 - [#60] EN+3, QUE+1, LRO+4, LRO+5, LRO+6!, LRO+7!, LRO+8!, PRNT+1, PRNT+2, PRNT+4
, PRNT+5, PRNT+6, PCC+1
^LAM - [#64] LAM+1!, PCC+1, PCC+2
^LAM(0 LAM+1, LAM+2*
^XTMP($J EN+5!, QUE+2, QUE+3!, PCC+1*, CLEAN+1!

Label References

Name Line Occurrences
CLEAN EN+2, QUE+4, PRE
EN EN+3
ERR PCC+1
HLP EN+3
PCC PRNT+6
PRE EN+3, EN+5
PRNT QUE+1

Naked Globals

Name Field # of Occurrence
^( QUE+2, LRO+6, LRO+8
^(0 LRO+5*, LRO+7*, LRO+8*, PCC+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% EN+3*, CLEAN+1!
%ZIS EN+5!*, CLEAN+1!
%ZIS("A" EN+5*
>> A LRO+7*
DA QUE+2*, CLEAN+1!
DIC QUE+2*, CLEAN+1!
>> DIFQ EN+1
DIU LAM+2*!
DIU(0 LAM+2*
DR QUE+2*, CLEAN+1!
I QUE+2*, LRO+4*, LRO+5, LRO+6, LRO+7, LRO+8, LAM+1*, CLEAN+1!
IO EN+5
IOF QUE+2, QUE+5, PRNT+3
IOSL PCC+2
IOST QUE+5
>> J LRO+8*
LRCC PCC+1*, PCC+2, ERR, CLEAN+1!
LRDD LRO+1~, LRO+6*, LRO+7
LRHED QUE+1*, PRNT+3*, PCC+2*, CLEAN+1!
LRI CLEAN+1!
LRJ PRNT+4*, PRNT+6*, PCC+1, CLEAN+1!
LRK PRNT+6*, CLEAN+1!
>> LRNAM QUE+1*
>> LRPG QUE+1*, PRNT+3*
LRSAVE LAM+1*, LAM+2!
LRTS QUE+1*, PRNT+1, PRNT+2, PRNT+4, PRNT+5, PRNT+6, PCC+1, CLEAN+1!
>> LRVR EN+2, QUE+4, PRE
LRX PCC+1*, PCC+2, CLEAN+1!
>> POP EN+5
U LRO+5, LRO+7, LRO+8, LAM+1, PRNT+2, PRNT+5, PCC+1, PCC+2
>> ZTQUEUED QUE+5
>> ZTREQ QUE+5*
ZTSK CLEAN+1!
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