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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: LRARNPX1

Package: Lab Service

Routine: LRARNPX1


Information

LRARNPX1 ;SLC/MRH/FHS/JB0 - NEW PERSON CONVERSION FOR ^LAR("Z" ; 1/23/93

Source Information

Source file <LRARNPX1.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Kernel 2 ^%ZISC  ^%ZTLOAD  
Lab Service 1 (EXCEPT,HEAD)^LRARNPX0  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Lab Service 1 LRARNPX  

Entry Points

Name Comments DBIA/ICR reference
PROV(LRFLD,X1,LRSB) ;
; X1 = Pointer value of data that pointed to FILE 16
; LRFLD = field number or if in a subfile subfile number,field number
; quits with the new value pointer from file 200 or logs an exception
; in ^XTMP("LR52","global root",LRJOB #,subscript 1,LRZD0,field number)
; =error and quits with the old value concantenated with "ERR"
; LRSB is an array that carries all subscripts from the file in
; which the conversion is being done.
NOP ;
POINT(LRFLD,Y,LRNAM,LRSB) ;
; LRFLD - documented at line tag PROV
; Y = value from data the should be entry in ^VA(200,Y))
; LRNAM is the externalization of the person/provider pointer from 16
; LRSB is an array with subscript identifiers LRSB(0) first level
; LRSB(1) second level ....
OUT ;
REENT ; re-entry for reque if LRIO is busy from above
1 ;
WRITE ;
11 ;
WRIT1 ;
REQUE ; reque task to print out exceptions

External References

Name Field # of Occurrence
^%ZISC REENT+5
^%ZTLOAD REQUE+4
EXCEPT^LRARNPX0 POINT+7, POINT+8, POINT+9
HEAD^LRARNPX0 REENT+2, 11+5, WRIT1+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?(IOM-$L("**** none found ****"))\2,"**** NONE FOUND ****"
  • Line Location: REENT+3
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: REENT+5
Function Call: WRITE
  • Prompt: !!!,"The value ("_+LRVL_") """_$P(LRVL,U,2)_""",",!,"in field "_LRTIT_", could not be repointed.",!,"This occured in: ",LRD0
  • Line Location: 11+6
Function Call: WRITE
  • Prompt: !!!,"The value ("_+LRVL_") """_$P(LRVL,U,2)_""",",!,"in field "_LRTIT_", could not be repointed.",!,"This occured in: ",LRD0,!,"The "_LRSF_": subfile of """,LRSB,"""",?54,"entry: "_LRD1
  • Line Location: WRIT1+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LR - [#63] REENT+4, WRITE+7, WRITE+8, WRITE+9, WRITE+10, WRITE+11, WRITE+12, WRITE+13, WRITE+14
^VA(200 - [#200] PROV+10, PROV+12
^XTMP("LR52" POINT+7*, POINT+8*, POINT+9*, REENT+3, REENT+4, WRITE+1, WRITE+2, WRITE+3, WRITE+4, 11+1
11+2

Label References

Name Line Occurrences
1 REENT+4
11 1+1
NOP PROV+11, PROV+12
POINT PROV+11, PROV+12
REQUE OUT+1
WRIT1 WRITE+8, WRITE+9, WRITE+10, WRITE+11, WRITE+12, WRITE+13, WRITE+14

Naked Globals

Name Field # of Occurrence
^( 11+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
I REQUE+1~, REQUE+3*
IOF REENT+5
IOM REENT+3
IOSL 11+5, WRIT1+1
LRAC REENT+6!
LRD0 REENT+4*, REENT+6!, WRITE+1, WRITE+2, WRITE+3, WRITE+4, WRITE+7, WRITE+8, WRITE+9, WRITE+10
WRITE+11, WRITE+12, WRITE+13, WRITE+14, 11+1, 11+2, 11+6, WRIT1+2
LRD0(0 REENT+4*, WRITE+7*
LRD1 REENT+6!, WRITE+2*, WRITE+3, WRITE+4, WRITE+9, WRITE+10, WRITE+11, WRITE+12, WRITE+13, WRITE+14
WRIT1+2
LRD1(0 WRITE+8*, WRITE+9*, WRITE+10*, WRITE+11*, WRITE+12*, WRITE+13*, WRITE+14*
LRFILE POINT+7, POINT+8, POINT+9, REENT+2, REENT+3, REENT+4, REENT+6!, WRITE+1, WRITE+2, WRITE+3
WRITE+4, WRITE+6, 11+1, 11+2, 11+4, 11+5, WRIT1+1
LRFLD PROV~, PROV+11, PROV+12, POINT~, POINT+7, POINT+8, POINT+9, REENT+6!, WRITE+3*, WRITE+4
WRITE+5, WRITE+6, 11+2*, 11+3, 11+4
LRIO OUT+1, REENT+7!, REQUE+2
LRJOB POINT+7, POINT+8, POINT+9, REENT+3, REENT+4, REENT+6!, WRITE+1, WRITE+2, WRITE+3, WRITE+4
11+1, 11+2, REQUE+2
LRNAM PROV+8~, PROV+10*, PROV+11*, PROV+12, POINT~, POINT+7, POINT+8, POINT+9, REENT+7!
LRSB PROV~, PROV+11, PROV+12, POINT~, REENT+4*, REENT+6!, 1+1, WRITE+1, WRITE+2, WRITE+3
WRITE+4, WRITE+8, WRITE+9, WRITE+10, WRITE+11, WRITE+12, WRITE+13, WRITE+14, 11+1, 11+2
WRIT1+2
LRSB(0 POINT+7, POINT+8, POINT+9
LRSB(1 POINT+9
LRSF REENT+6!, WRITE+8*, WRITE+9*, WRITE+10*, WRITE+11*, WRITE+12*, WRITE+13*, WRITE+14*, WRIT1+2
LRST REENT+6!
LRTI REENT+6!
LRTIT REENT+6!, WRITE+5*, WRITE+6*, 11+3*, 11+4*, 11+6, WRIT1+2
LRVL REENT+6!, WRITE+4*, 11+2*, 11+6, WRIT1+2
LRZD0 POINT+7, POINT+8, POINT+9, REENT+7!
LRZD1 POINT+7, POINT+8, POINT+9, REENT+7!
LRZD2 POINT+8, POINT+9, REENT+7!
U PROV+10, POINT+7, POINT+8, POINT+9, WRITE+5, WRITE+6, 11+3, 11+4, 11+6, WRIT1+2
X PROV+8~, PROV+9*, PROV+10, PROV+11, PROV+12, REENT+7!
X1 PROV~, PROV+9, NOP+1, REENT+7!
Y PROV+8~, PROV+12*, PROV+13, POINT~, POINT+7, POINT+8, POINT+9, REENT+7!
ZTDESC REENT+7!, REQUE+2*
ZTDTH REENT+7!, REQUE+2*
ZTIO REENT+7!, REQUE+2*
ZTRTN REENT+7!, REQUE+2*
ZTSAVE REENT+7!
ZTSAVE( REQUE+3*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All