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 |  Local Variables  | All
Print Page as PDF
Routine: LRSRVR8

Package: Lab Service

Routine: LRSRVR8


Information

LRSRVR8 ; DALOI/JMC - LAB DATA SERVER - Utilities ;03/22/11 15:23

Source Information

Source file <LRSRVR8.m>

Call Graph

Call Graph

Call Graph Total: 20

Package Total Call Graph
Kernel 8 ^%ZISC  ($$DEFDIR,$$FTG,$$LIST,$$MV,$$PWD)^%ZISH  ^%ZTLOAD  $$HTFM^XLFDT  ($$TRIM,$$UP)^XLFSTR  SETUP^XQALERT  ($$IEN,$$NAME,$$WHAT)^XUAF4  $$HANDLE^XUSRB4  
VA FileMan 7 EN^DDIOL  ^DIC  WAIT^DICD  UPDATE^DIE  ^DIK  $$VFILE^DILFD  ^DIR  
Lab Service 2 TASKMAP^LRSRVR5  $$SELECT^LRUTIL  
MailMan 2 ENT^XMPG  $$GOTLOCAL^XMXAPIG  
Toolkit 1 ($$GET,EN)^XPAR  

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

Package Total Caller Graph
Automated Lab Instruments 1 LA7S LOAD MAPPING SCT  
Lab Service 1 LRSRVR9B  

Entry Points

Name Comments DBIA/ICR reference
LOAD ; Load mapping file into VistA as file server for distribution to other sites.
LOADSCT ; Load SCT mapping file into VistA and apply mapping.
; Called by option LA7S LOAD MAPPING SCT to load and apply mapping directly at the site.
TASKSCT ; Processing applying SCT mappings to local site.
SEND ; Send file to LRLABSERVER at specified site.
IMPORT(LRTYPE) ;
; Call with LRTYPE = type of data (1=LOINC, 2=SNOMED, 3=LOINC Database)
BUILD ; Load Records into file
PARSELN ; Parse record from TMP global for LOINC mapping
PARSELND ; Parse record from TMP global for LOINC Databsae loading
PARSESCT ; Parse record from TMP global for SCT mapping
FILE ; File the data in file
BLDMSG ; Build and send message for a specific site.
PURGE ; Purge related entries from file #95.4 for this site.
GETFILE ; Select the file to process
LOADFILE ; Load selected file into TMP global.
BUILDMAP ; Build map of field names related to field # in record
BUILDMLN ; Build map of field names related to field # in record for LOINC database file
TYPE(LRFUNC) ; Ask what code set
; Call with function to perform: 1-load mapping file, 2-transport mapping to site
BUILDMSG ; Build the MailMan PackMan message
INIT ; Initialize variables used by process.
CKSCTHDR ; Check the header of the file to determine if it's
; - the right type of file
; - the record format
CKLNDBHR ; Check the header of the file to determine if it's
; - the right type of file
; - the record format

External References

Name Field # of Occurrence
^%ZISC LOADSCT+70
$$DEFDIR^%ZISH GETFILE+15
$$FTG^%ZISH LOADFILE+12
$$LIST^%ZISH GETFILE+22
$$MV^%ZISH LOADFILE+24
$$PWD^%ZISH GETFILE+6
^%ZTLOAD LOADSCT+70
EN^DDIOL IMPORT+10, FILE+21, BLDMSG+16, BLDMSG+37, BUILDMSG+21
^DIC BLDMSG+12
WAIT^DICD IMPORT+13, BLDMSG+23, PURGE+6, LOADFILE+10
UPDATE^DIE FILE+15
^DIK PURGE+10
$$VFILE^DILFD IMPORT+9
^DIR LOADSCT+11, LOADSCT+22, LOADSCT+41, LOADSCT+46, LOADSCT+62, SEND+14, SEND+25, SEND+31, GETFILE+13, GETFILE+30
, TYPE+9
TASKMAP^LRSRVR5 TASKSCT+3
$$SELECT^LRUTIL SEND+8
$$HTFM^XLFDT BUILD+8
$$TRIM^XLFSTR CKLNDBHR+11
$$UP^XLFSTR CKSCTHDR+11, CKSCTHDR+14, CKSCTHDR+17, CKLNDBHR+14
ENT^XMPG BUILDMSG+12
$$GOTLOCAL^XMXAPIG LOADSCT+51, INIT+6
$$GET^XPAR SEND+18, BLDMSG+26, GETFILE+7, GETFILE+20, LOADFILE+22
EN^XPAR GETFILE+18
SETUP^XQALERT LOADSCT+56, LOADFILE+18, LOADFILE+30
$$IEN^XUAF4 PARSESCT+7
$$NAME^XUAF4 SEND+40
$$WHAT^XUAF4 BLDMSG+7
$$HANDLE^XUSRB4 BLDMSG+45

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Request "_$S($G(ZTSK):"queued - Task #"_ZTSK,1:"NOT queued")
  • Line Location: LOADSCT+71
Function Call: WRITE
  • Prompt: !
  • Line Location: SEND+19
Function Call: WRITE
  • Prompt: !,"Processing file data and storing in file #",LRFILE
  • Line Location: IMPORT+13
Function Call: WRITE
  • Prompt: !
  • Line Location: BUILD+7
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $X>(IOM-1)
  • Line Location: BUILD+13
Function Call: WRITE
  • Prompt: "."
  • Line Location: BUILD+13
Function Call: WRITE
  • Prompt: !,"Records added: ",LRCNT
  • Line Location: BUILD+32
Function Call: WRITE
  • Prompt: !!,"For ",LRSITE(LRSITE)
  • Line Location: BLDMSG+10
Function Call: WRITE
  • Prompt: !,"Processing facility ",LRSITE(LRSITE),!,"Collecting records to build into mail message "
  • Line Location: BLDMSG+24
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $X>(IOM-1)
  • Line Location: BLDMSG+31
Function Call: WRITE
  • Prompt: "."
  • Line Location: BLDMSG+31
Function Call: WRITE
  • Prompt: !,"Building records into mail message"
  • Line Location: BLDMSG+39
Function Call: WRITE
  • Prompt: !,"Number of records transported: "_LRCNT
  • Line Location: BLDMSG+50
Function Call: WRITE
  • Prompt: !,"MailMan Message ID's: "
  • Line Location: BLDMSG+51
Function Call: WRITE
  • Prompt: ?23,LRI,!
  • Line Location: BLDMSG+53
Function Call: WRITE
  • Prompt: !,"Purging related entries from file #",LRFILE
  • Line Location: PURGE+5
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $X>(IOM-1)
  • Line Location: PURGE+11
Function Call: WRITE
  • Prompt: "."
  • Line Location: PURGE+11
Function Call: WRITE
  • Prompt: !,"Invalid directory syntax",!
  • Line Location: GETFILE+16
Function Call: WRITE
  • Prompt: !,"Using filespec ",LRFSPEC
  • Line Location: GETFILE+21
Function Call: WRITE
  • Prompt: !,"No "_$S(LRFSPEC="":"",1:LRFSPEC_" ")_"files found in directory ",PWD,!
  • Line Location: GETFILE+23
Function Call: WRITE
  • Prompt: !,"Directory: "_PWD
  • Line Location: LOADFILE+7
Function Call: WRITE
  • Prompt: !,"File.....: "_LRFILE
  • Line Location: LOADFILE+8
Function Call: WRITE
  • Prompt: !,"Loading file into TMP global"
  • Line Location: LOADFILE+9
Function Call: WRITE
  • Prompt: !!,*7,"File failed to load into TMP global",!!
  • Line Location: LOADFILE+14
Function Call: WRITE
  • Prompt: !!,*7,"Failed to move file from directory "_PWD_" to directory "_LRBACKUPDIR,!!
  • Line Location: LOADFILE+26
Routine Call
  • DIC
  • Line Location:
    • BLDMSG+12
Routine Call
  • DIE
  • Line Location:
    • FILE+15
Routine Call
  • DIR
  • Line Location:
    • LOADSCT+11
    • LOADSCT+22
    • LOADSCT+41
    • LOADSCT+46
    • LOADSCT+62
    • SEND+14
    • SEND+25
    • SEND+31
    • GETFILE+13
    • GETFILE+30
    • TYPE+9

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(4 - [#4] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAHM( SEND+39, FILE+27*, FILE+28*, FILE+29*, BLDMSG+28, BLDMSG+29, BLDMSG+33, PURGE+9
^LAHM(95.4 - [#95.4] LOADSCT+8, LOADSCT+16, LOADSCT+38, FILE+7, FILE+32
^TMP("XMP" BUILDMSG+6!, BUILDMSG+7*
^TMP($J LOAD+3!, LOAD+16, LOADSCT+4!, LOADSCT+33, IMPORT+16!, BUILD+12, BUILD+15, BUILD+26, BLDMSG+18!, BLDMSG+33*
BLDMSG+34*, BLDMSG+36, BLDMSG+41, BLDMSG+42!, BLDMSG+43*, BLDMSG+46*, BLDMSG+55!, GETFILE+5!, LOADFILE+12

Label References

Name Line Occurrences
BLDMSG SEND+41, SEND+45
BUILD IMPORT+14
BUILDMAP BUILD+23
BUILDMLN BUILD+29
BUILDMSG BLDMSG+47
CKLNDBHR BUILD+28
CKSCTHDR BUILD+22
FILE BUILD+19, BUILD+24, BUILD+30
GETFILE LOAD+9, LOADSCT+29
IMPORT LOAD+16, LOADSCT+35
LOADFILE LOAD+13, LOADSCT+32
PARSELN BUILD+19
PARSELND BUILD+30
PARSESCT BUILD+24
PURGE BLDMSG+57
TASKSCT LOADSCT+74
TYPE LOAD+5, SEND+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DA PURGE+10*
DIC SEND+1~, SEND+6!, SEND+7*, SEND+8, BLDMSG+9~, BLDMSG+12*, TYPE+3~
DIC("A" BLDMSG+12*
DIC("B" BLDMSG+11*
DIC("S" SEND+7*
DIC(0 SEND+7*, BLDMSG+12*
DIK PURGE+1~, PURGE+8*
DIR LOADSCT+3~, LOADSCT+9!, LOADSCT+17!, LOADSCT+39!, LOADSCT+43!, LOADSCT+57!, SEND+1~, SEND+12!, SEND+20!, SEND+29!
GETFILE+1~, GETFILE+27!, TYPE+3~
DIR("?" GETFILE+29*
DIR("A" LOADSCT+10*, LOADSCT+40*, LOADSCT+45*, LOADSCT+59*, LOADSCT+60*, LOADSCT+61*, SEND+13*, SEND+22*, SEND+23*, SEND+24*
SEND+30*, GETFILE+11*, GETFILE+28*, TYPE+8*
DIR("B" LOADSCT+20*, LOADSCT+45*, SEND+13*, SEND+21*, SEND+30*, GETFILE+11*, GETFILE+28*
DIR(0 LOADSCT+10*, LOADSCT+20*, LOADSCT+40*, LOADSCT+44*, LOADSCT+58*, SEND+13*, SEND+21*, SEND+30*, GETFILE+11*, GETFILE+28*
, TYPE+8*
DIROUT LOADSCT+3~, LOADSCT+9!, LOADSCT+17!, LOADSCT+39!, LOADSCT+43!, LOADSCT+57!, GETFILE+1~
DIRUT LOADSCT+3~, LOADSCT+9!, LOADSCT+17!, LOADSCT+39!, LOADSCT+43!, LOADSCT+57!, SEND+1~, SEND+15, SEND+26, SEND+32
GETFILE+1~, GETFILE+12, GETFILE+14, GETFILE+17, GETFILE+31, TYPE+3~, TYPE+10
DTOUT LOADSCT+3~, LOADSCT+9!, LOADSCT+17!, LOADSCT+39!, LOADSCT+43!, LOADSCT+57!, SEND+1~, GETFILE+1~, TYPE+3~
DUOUT LOADSCT+3~, LOADSCT+9!, LOADSCT+17!, LOADSCT+39!, LOADSCT+43!, LOADSCT+57!, SEND+1~, GETFILE+1~, TYPE+3~
DUZ LOADFILE+17, LOADFILE+29
FILE GETFILE+1~, GETFILE+25*, GETFILE+26*
FILESPEC GETFILE+1~
FILESPEC( GETFILE+21*
I BUILDMAP+1~, BUILDMAP+16*, BUILDMLN+1~, BUILDMLN+10*, BUILDMLN+11*, BUILDMLN+16*
IOM BUILD+13, BLDMSG+31, PURGE+11
LRACTION LOADSCT+3~, LOADSCT+7*, LOADSCT+23*, LOADSCT+24*, LOADSCT+26, LOADSCT+28
LRASKDOM SEND+1~, SEND+27*, BLDMSG+8
LRBACKUPDIR LOADFILE+2~, LOADFILE+22*, LOADFILE+23, LOADFILE+24, LOADFILE+26, LOADFILE+27
LRCNT SEND+1~, BUILD+2~, BUILD+10*, BUILD+32, FILE+22*, BLDMSG+25*, BLDMSG+30*, BLDMSG+31, BLDMSG+32, BLDMSG+50
PURGE+1~, PURGE+8*, PURGE+10*, PURGE+11
LRDOMAIN BLDMSG+2~, BLDMSG+7*, BLDMSG+11, BLDMSG+13*, BLDMSG+14*, BLDMSG+15, BUILDMSG+9, BUILDMSG+19
LREND BUILD+2~, BUILD+10*, BUILD+12, BUILD+18*, BUILD+22, CKSCTHDR+8*, CKSCTHDR+11*, CKSCTHDR+14*, CKSCTHDR+17*, CKLNDBHR+14*
LRENDMSG BLDMSG+2~, BLDMSG+40*, BLDMSG+44*, BUILDMSG+10
LRERR FILE+2~, FILE+16
LRERR("DIERR" FILE+20
LRFDA FILE+2~
LRFDA(1 FILE+10*, FILE+11*, FILE+12*, FILE+13*, FILE+14*
LRFILE LOAD+2~, LOAD+10, LOADSCT+3~, LOADSCT+30, SEND+1~, SEND+35*, SEND+39, IMPORT+3~, IMPORT+8*, IMPORT+9
, IMPORT+10, IMPORT+13, FILE+10, FILE+11, FILE+12, FILE+13, FILE+14, FILE+27, FILE+28, FILE+29
BLDMSG+28, BLDMSG+29, BLDMSG+33, PURGE+5, PURGE+9, GETFILE+5!, GETFILE+9*, GETFILE+32*, LOADFILE+8, LOADFILE+12
LOADFILE+15, LOADFILE+24, LOADFILE+27
LRFILE( GETFILE+26
LRFILE("" GETFILE+23
LRFLD BUILD+2~, BUILD+14!
LRFLD( PARSELND+13*, PARSESCT+8*, FILE+26, FILE+27, FILE+29
LRFLD(10000 PARSELND+16*, PARSESCT+11*
LRFLD(10001 PARSELND+17*
LRFSPEC GETFILE+1~, GETFILE+20*, GETFILE+21, GETFILE+23
LRFUNC TYPE~, TYPE+8
LRHDL BLDMSG+2~, BLDMSG+46*, BUILDMSG+7
LRHELP GETFILE+1~, GETFILE+29
LRHELP( GETFILE+26*
LRI SEND+1~, BUILD+2~, BUILD+10*, BUILD+12*, BUILD+13, BUILD+15, BUILD+17, BUILD+21, BUILD+26, PARSELND+4~
PARSELND+6*, PARSELND+7*, PARSELND+13*, PARSESCT+2~, PARSESCT+8*, FILE+2~, FILE+25*, FILE+26*, FILE+27, FILE+28
FILE+29, BLDMSG+25*, BLDMSG+28*, BLDMSG+29, BLDMSG+33, BLDMSG+34, BLDMSG+40*, BLDMSG+41*, BLDMSG+43, BLDMSG+44
BLDMSG+46, BLDMSG+52*, BLDMSG+53*, PURGE+1~, PURGE+8*, PURGE+9*, PURGE+10, BUILDMSG+2~
LRID BUILD+2~, PARSELND+9*, PARSESCT+6*, PARSESCT+7, FILE+10, FILE+19
LRIEN FILE+2~
LRIEN(1 FILE+27, FILE+28, FILE+29
LRLAST PARSELND+4~, PARSELND+11*, PARSELND+12*, PARSELND+13, BUILDMAP+1~, BUILDMAP+14*, BUILDMAP+15*, BUILDMAP+16, BUILDMLN+1~, BUILDMLN+14*
BUILDMLN+15*, BUILDMLN+16
LRLNDBSTART BUILD+2~, BUILD+11*, BUILD+27, BUILD+29, CKLNDBHR+14*
LRLOINCVERSION BUILD+2~, BUILD+11*, PARSELND+17, CKLNDBHR+11*
LRMAILGROUP LOAD+2~, LOADSCT+3~, LOADSCT+50*, LOADSCT+51, LOADSCT+53*, LOADSCT+55, INIT+4*, INIT+6*
LRMAILGROUPXQA LOAD+2~, LOADFILE+16, LOADFILE+28, INIT+4*, INIT+6*
LRMAP IMPORT+3~, BUILDMAP+5!, BUILDMLN+5!
LRMAP( PARSELND+13, PARSESCT+8, BUILDMAP+16*, BUILDMLN+16*
LRMAP(10000 PARSELND+16, PARSESCT+11, BUILDMAP+18*, BUILDMLN+18*
LRMAP(10001 PARSELND+17, BUILDMLN+19*
LRMAPPINGFILE LOAD+2~, LOADSCT+3~, PARSELND+16, PARSESCT+11, GETFILE+32*
LRMAXREC BLDMSG+2~, BLDMSG+26*, BLDMSG+27*, BLDMSG+32
LRMSG BLDMSG+2~, BLDMSG+25*, BLDMSG+32*, BLDMSG+33, BLDMSG+34, BLDMSG+44
LRNOW BUILD+2~, BUILD+8*, FILE+14
LRNUM GETFILE+1~, GETFILE+25*, GETFILE+26*, GETFILE+28
LRNUM( GETFILE+26*, GETFILE+32
LRNUM(0 GETFILE+28
LRPURGE SEND+1~, SEND+16*, BLDMSG+57
LRQUIT BUILD+2~, BUILD+10*, CKSCTHDR+8*, CKSCTHDR+11*, CKSCTHDR+14*, CKSCTHDR+17*, CKLNDBHR+14*
LRRECORDFORMAT LOAD+2~, LOADSCT+3~, CKSCTHDR+8*, CKSCTHDR+11*, CKSCTHDR+14*, CKSCTHDR+17*
LRSITE SEND+1~, SEND+6!, SEND+8, SEND+10*, SEND+37, SEND+38*, SEND+39*, SEND+40, SEND+44*, SEND+45*
BUILD+2~, PARSELND+9*, PARSESCT+7*, FILE+11, BLDMSG+7, BLDMSG+10, BLDMSG+24, BLDMSG+28, PURGE+9
LRSITE( SEND+40*, SEND+45, BLDMSG+10, BLDMSG+24
LRTYPE LOAD+2~, LOAD+6, LOAD+16, LOADSCT+3~, LOADSCT+7*, LOADSCT+35, LOADSCT+55, SEND+1~, SEND+4, IMPORT~
, IMPORT+12, TYPE+10*, TYPE+11*, BUILDMSG+9
LRTYPE(0 LOADSCT+7*, LOADSCT+54, IMPORT+12*, BUILD+11, BUILD+16, BUILD+20, BUILD+25, FILE+12, BLDMSG+29, BLDMSG+45
, TYPE+11*
LRX BUILD+2~, BUILD+14!, BUILD+15*, BUILD+18, BUILD+26*, PARSELND+7*, PARSELND+8*, PARSELND+9, PARSELND+11, PARSELND+12
PARSELND+13, PARSESCT+6, PARSESCT+8, BUILDMAP+14, BUILDMAP+15, BUILDMAP+16, BUILDMLN+11*, BUILDMLN+12*, BUILDMLN+14, BUILDMLN+15
BUILDMLN+16, CKSCTHDR+11, CKSCTHDR+14, CKSCTHDR+17, CKLNDBHR+8*, CKLNDBHR+11, CKLNDBHR+14
LRX( PARSELND+7, BUILDMLN+11
LRXMZ BLDMSG+2~
LRXMZ( BLDMSG+53, BUILDMSG+17*
LRY FILE+2~, FILE+18!, FILE+21, BUILDMAP+1~, BUILDMAP+16*, BUILDMLN+1~, BUILDMLN+16*, CKSCTHDR+6~, CKSCTHDR+10*, CKSCTHDR+11
CKSCTHDR+13*, CKSCTHDR+14, CKSCTHDR+16*, CKSCTHDR+17, CKLNDBHR+6~, CKLNDBHR+10*, CKLNDBHR+11, CKLNDBHR+13*, CKLNDBHR+14
LRY(1 FILE+19*
LRY(2 FILE+20*
MSG BUILDMSG+2~, BUILDMSG+15*, BUILDMSG+21
MSG(1 BUILDMSG+18*, BUILDMSG+20*
MSG(2 BUILDMSG+19*, BUILDMSG+20*
PWD LOAD+2~, LOADSCT+3~, GETFILE+6*, GETFILE+8*, GETFILE+11, GETFILE+12, GETFILE+15*, GETFILE+16, GETFILE+18, GETFILE+22
GETFILE+23, LOADFILE+7, LOADFILE+12, LOADFILE+24, LOADFILE+26
X LOADSCT+3~, SEND+1~, SEND+8*, SEND+9, SEND+10, SEND+18*, SEND+21, BLDMSG+9~, BLDMSG+45*, BLDMSG+46
GETFILE+1~, GETFILE+7*, GETFILE+8, TYPE+3~, BUILDMSG+2~
XMDUN BUILDMSG+2~, BUILDMSG+11*
XMDUZ BUILDMSG+2~, BUILDMSG+11*
XMMG BUILDMSG+2~, BUILDMSG+20
XMSUB BUILDMSG+2~, BUILDMSG+9*
XMTEXT BUILDMSG+2~, BUILDMSG+9*, BUILDMSG+10*
XMY BUILDMSG+2~
XMY("S.LRLABSERVER@" BUILDMSG+9*
XMZ BUILDMSG+2~, BUILDMSG+16, BUILDMSG+17, BUILDMSG+18
XQA LOADSCT+52~
XQA( LOADFILE+16*, LOADFILE+17*, LOADFILE+28*, LOADFILE+29*
XQA("G." LOADSCT+55*
XQADATA LOADSCT+52~
XQAID LOADSCT+52~, LOADSCT+55*
XQAMSG LOADSCT+52~, LOADSCT+54*, LOADFILE+15*, LOADFILE+27*
XQAROU LOADSCT+52~
Y LOADSCT+3~, LOADSCT+23, LOADSCT+24, LOADSCT+47, LOADSCT+65, SEND+1~, SEND+16, SEND+27, SEND+33, BLDMSG+9~
BLDMSG+13, BLDMSG+14, GETFILE+1~, GETFILE+15, GETFILE+22*, GETFILE+32, LOADFILE+12*, LOADFILE+13, LOADFILE+24*, LOADFILE+25
, TYPE+3~, TYPE+11, BUILDMSG+2~
ZTDESC LOADSCT+66~, LOADSCT+67*
ZTDTH LOADSCT+66~
ZTIO LOADSCT+66~, LOADSCT+69*
>> ZTQUEUED IMPORT+10, IMPORT+13, BUILD+7, BUILD+13, BUILD+32, FILE+17, BLDMSG+16, BLDMSG+22, BLDMSG+37, BLDMSG+39
BLDMSG+49, PURGE+6, PURGE+11, LOADFILE+6, LOADFILE+14, LOADFILE+26
ZTRTN LOADSCT+66~, LOADSCT+67*
ZTSAVE LOADSCT+66~
ZTSAVE("LRMAILGROUP" LOADSCT+68*
ZTSAVE("LRTYPE*" LOADSCT+68*
ZTSK LOADSCT+66~, LOADSCT+71
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 |  Local Variables  | All