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

Package: Lab Service

Routine: LRSCTF


Information

LRSCTF ;DAL01/JMC - STORE STS MAPPING IN PARENT FILE ;02/08/12 15:25

Source Information

Source file <LRSCTF.m>

Call Graph

Call Graph

Call Graph Total: 12

Package Total Call Graph
Kernel 4 ($$FMTE,$$HTFM,$$NOW)^XLFDT  ($$CJ,$$TRIM,$$UP)^XLFSTR  BMES^XPDUTL  $$NS^XUAF4  
Lab Service 4 $$BLDERTX^LRERT  $$CODE^LRSCT  $$NOTIFY^LRSCTF1  PURGE^LRSRVR5  
VA FileMan 4 $$FIND1^DIC  DT^DICRW  $$GET1^DID  (FILE,UPDATE,WP)^DIE  

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 LRSRVR5  

Entry Points

Name Comments DBIA/ICR reference
LD(LRINST,LROVER) ; Load STS mapping into SCT encoded files
; Call with LRINST = #4 IEN
; LROVER<opt> Its a do-over
GET954 ; Search cross reference of institution entries
LDPARS ;
; Parse the data
LEX ; Validate SCT code, get concept and term
; Only check those SCT codes if STS has mapped the term to SCT
LDCK ; Check target file to determine if mapping is correct
LDERR(LRERR) ;
; Populate error message text file ^XTMP("LRSCT-ERR"
; Send STS alert if needed.
BMES(MSG) ; Display message on screen and if during KIDS install store with install
LDFILE ; Update target file
RETRIEVE ; Retrieve mapping data from file #95.4
LD954 ;
; Update transport file with status
SCTUPD ; Update SCT STATUS DATE multiple

External References

Name Field # of Occurrence
$$FIND1^DIC LEX+27
DT^DICRW LD+10
$$GET1^DID LDPARS+8
FILE^DIE LDFILE+23, LD954+9
UPDATE^DIE SCTUPD+17
WP^DIE SCTUPD+42
$$BLDERTX^LRERT LDERR+19
$$CODE^LRSCT LEX+15
$$NOTIFY^LRSCTF1 LDERR+25
PURGE^LRSRVR5 LD+33
$$FMTE^XLFDT LD+22
$$HTFM^XLFDT LD+16, LD+22
$$NOW^XLFDT LD+22
$$CJ^XLFSTR BMES+4
$$TRIM^XLFSTR LDCK+8
$$UP^XLFSTR LEX+26, LEX+29, LEX+33, LDCK+9
BMES^XPDUTL BMES+4
$$NS^XUAF4 LD+14

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: LD+26
Function Call: WRITE
  • Prompt: !,MSG
  • Line Location: BMES+5
Routine Call
  • DIC
  • Line Location:
    • LEX+27
Routine Call
  • DIE
  • Line Location:
    • LDFILE+23
    • LD954+9
Routine Call
  • DIE
  • Line Location:
    • SCTUPD+17
Routine Call
  • DIE
  • Line Location:
    • SCTUPD+42

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^LAB(64.061 - [#64.061] FIND1^DIC

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB( LEX+10, LDFILE+7, LDFILE+32
^LAHM(95.4 - [#95.4] LD+24, GET954+5, GET954+9, GET954+14, GET954+22, LDERR+10, RETRIEVE+30, RETRIEVE+31, RETRIEVE+34
^XTMP( LD+21!, LD+22*, LD+27*, LDERR+8, LDERR+9*, LDERR+10*, LDERR+11*, LDERR+27*, LDERR+32*

Label References

Name Line Occurrences
BMES LD+18, LD+26, LDPARS+10, LDPARS+11, LDPARS+12, LDERR+7, LDERR+28, LDERR+31
GET954 LD+29
LD954 LEX+13, LEX+23, LDCK+15, LDFILE+34
LDCK LEX+35
LDERR LEX+12, LEX+23, LDCK+13, LDFILE+25
LDFILE LDCK+18
LDPARS GET954+18
LEX GET954+19
RETRIEVE LDPARS+16
SCTUPD LDCK+14, LDFILE+30

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CNT LD+5~
DATA LDERR+6~, LDERR+19, LDERR+20
>> DILOCKTM GET954+5, LDFILE+7
DIQUIET LD+5~, LD+8*
DT LD+22, LEX+15
DUZ SCTUPD+12
DUZ("AG" GET954+17
ERCNT LDERR+6~, LDERR+8*, LDERR+9, LDERR+10, LDERR+11, LDERR+27, LDERR+32
EXCDATA LDERR+6~, LDERR+25
EXCDATA("RD" LDERR+16*
EXCDATA("SA" LDERR+20*
EXCDATA("TNUM" LDERR+26
EXCDATA("TXT" LDERR+23*
I LD+5~, LEX+31~, LEX+32*, LEX+33*, LDERR+6~, LDERR+15*, LDERR+16*
IOM BMES+4
LRABORT LD+4~, LD+16*, LD+30, GET954+6*
LRCNT LD+4~, GET954+8*, GET954+10*, GET954+11, GET954+12, SCTUPD+25~, SCTUPD+26*, SCTUPD+27*, SCTUPD+28, SCTUPD+31~
, SCTUPD+32*, SCTUPD+33*, SCTUPD+34, SCTUPD+37~, SCTUPD+38*, SCTUPD+39*, SCTUPD+40
>> LRDUZ SCTUPD+12
LRERR LEX+5~, LDERR~, LDERR+7, LDERR+9, LDERR+23, LDFILE+4~, LDFILE+27, LD954+5~, SCTUPD+4~
LRERR(1 LDFILE+24, LDFILE+26
LRFDA LD+4~, LDFILE+4~, LD954+5~, SCTUPD+4~
LRFDA(1 LDFILE+20*, LDFILE+21*, LDFILE+22*
LRFDA(2 LD954+6*, LD954+7*, LD954+8*, SCTUPD+10*, SCTUPD+11*, SCTUPD+12*, SCTUPD+15*
LRFIELDLABEL RETRIEVE+23~
LRFIELDLABEL( RETRIEVE+27*, RETRIEVE+33*
LRFIELDLABEL(4 RETRIEVE+39, RETRIEVE+46
LRFIELDLABEL(5 RETRIEVE+40, RETRIEVE+47
LRFIELDLABEL(6 RETRIEVE+41, RETRIEVE+48
LRFIELDLABEL(7 RETRIEVE+42
LRFIEN LD+4~, LDPARS+14!, LDPARS+15*, LDPARS+29, LEX+10, LEX+12, LDERR+19, LDERR+25, LDFILE+7, LDFILE+20
, LDFILE+21, LDFILE+22, LDFILE+32, SCTUPD+10, SCTUPD+11, SCTUPD+12, SCTUPD+15, SCTUPD+42
LRFIEN(2 SCTUPD+42
LRFILE LD+4~, LDPARS+7*, LDPARS+8, LDPARS+9, LDPARS+11, LDPARS+13, LDPARS+29, LEX+10, LEX+12, LDERR+19
, LDERR+25, LDFILE+7, LDFILE+20, LDFILE+21, LDFILE+22, LDFILE+32, SCTUPD+6
LRFLD LD+4~, RETRIEVE+25!
LRFLD( LDERR+16, RETRIEVE+27*, RETRIEVE+34*
LRFLD(1 LDERR+11, RETRIEVE+26*
LRFLD(10000 SCTUPD+36, SCTUPD+40
LRFLD(2 LDPARS+18, LDERR+11
LRFLD(3 LDPARS+21, LDPARS+22, LDERR+11
LRFLD(4 LDPARS+27, LDERR+11, LDFILE+17, SCTUPD+20
LRFLD(5 LDPARS+26, LDERR+11, LDFILE+16
LRFLD(6 SCTUPD+21
LRFLD(7 SCTUPD+15
LRFMERTS LDFILE+4~, LDFILE+10*
LRFMERTS("STS" LDFILE+11*, LDFILE+12*
LRFNAME LDPARS+5~, LDPARS+8*, LDPARS+11
LRFS LEX+5~, LEX+8*, LEX+19*, LDCK+12*, LDERR+9, LDFILE+27*, LD954+6, LD954+7
LRHIER LD+4~, LEX+26*, LEX+27
LRHIERX LD+4~, LEX+7*, LEX+27*, LDFILE+22
LRI LD+4~, RETRIEVE+25!, RETRIEVE+27*, RETRIEVE+29*, RETRIEVE+30*, RETRIEVE+31, RETRIEVE+34
LRIEN LD+4~, GET954+8*, GET954+9*, GET954+14, LDERR+9, LDERR+10, RETRIEVE+30, RETRIEVE+31, RETRIEVE+34, LD954+6
, LD954+7, LD954+8
LRINST LD~, LD+12, LD+14, LD+24
LRINST(1 LD+14*, LD+25
LRINST(2 LD+14*, GET954+17
LRJ LD+4~, RETRIEVE+25!, RETRIEVE+32*, RETRIEVE+33, RETRIEVE+34
LRMAPERR LDCK+4~, LDCK+6*, LDCK+9*, LDCK+11, LDCK+13, LDFILE+4~, LDFILE+26*, SCTUPD+30, SCTUPD+34
LRMSG LDPARS+5~
LRNODE LD+4~, GET954+13!
LRNODE(0 GET954+14*, GET954+15, GET954+16, GET954+17, LDPARS+7, LDPARS+15, RETRIEVE+26
LRNOW LD+4~, LD+16*, LD954+8, SCTUPD+10
LROK LD+4~, GET954+19, LDPARS+6*, LDPARS+29*
LROVER LD~, LD+15*, LD+18, LD+22, GET954+16
LRQUIET LD+4~, LD+8*
LRRECORDFORMAT LD+4~, LDPARS+26, LDPARS+27, LDFILE+16, LDFILE+17, RETRIEVE+38*, RETRIEVE+45*, RETRIEVE+50*, SCTUPD+15, SCTUPD+20
, SCTUPD+21
LRSCT LD+4~, LDPARS+25*, LDPARS+26*, LDPARS+27*, LEX+15, LEX+18, LEX+21, LEX+25, LDERR+25, LDFILE+20
LRSFILE LD+4~, GET954+8*, LDPARS+9, LDPARS+13*
LRSN LD+4~, LDPARS+21*, LDPARS+22*, LDCK+6
LRSTATUS LD+4~, LEX+6!, LEX+7*, LEX+22*, LEX+23*, LEX+28*, LEX+29*, LEX+30, LEX+33*, LDFILE+15
, LDFILE+16*, LDFILE+17*, LDFILE+21, SCTUPD+11
LRSTATUS("ERR" LEX+19*, LEX+22, SCTUPD+24, SCTUPD+28
LRSTR LD+4~
LRSTRF LD+4~, LEX+5~, LEX+10*, LEX+11, LDCK+6, LDCK+8
LRSTRF("SCT" LEX+10*
LRSUBFILE LDFILE+4~, SCTUPD+4~, SCTUPD+6*, SCTUPD+7, SCTUPD+10, SCTUPD+11, SCTUPD+12, SCTUPD+15, SCTUPD+42
LRTX LD+4~, LDCK+8*, LDCK+9
LRTXT LD+4~
LRTXTY LD+4~, LDPARS+18*, LDPARS+29, LEX+29, LEX+33, LDCK+9, LDERR+25
LRWP SCTUPD+4~, SCTUPD+42
LRWP( SCTUPD+27*, SCTUPD+28*, SCTUPD+33*, SCTUPD+34*, SCTUPD+39*, SCTUPD+40*
LRWP("" SCTUPD+26, SCTUPD+32, SCTUPD+38
LRWP(1 SCTUPD+20*, SCTUPD+21*
LRX LD+4~, LEX+5~, LEX+8*, LEX+15*, LEX+18, LEX+19, LEX+25, LDERR+6~, LDFILE+4~, RETRIEVE+23~
, RETRIEVE+31*, RETRIEVE+32, RETRIEVE+33
LRY LD+4~, LEX+5~
LRY("P" LEX+29
LRY("S" LEX+30, LEX+33
LRY(0 LEX+26
LRZ LEX+20~, LEX+21*, LEX+22
MSG BMES~, BMES+4, BMES+5
TMPNM LD+5~, LD+20*, LD+21, LD+22, LD+27, LDERR+8, LDERR+9, LDERR+10, LDERR+11, LDERR+27
, LDERR+32
TNUM LDERR+6~, LDERR+26*, LDERR+27
U LD+22, LDPARS+7, LDPARS+15, LEX+26, LDERR+9
X LD+5~, LD+14*, LD+25*, LD+26, LD+27, LDERR+6~, LDERR+19*, LDERR+25*, LDERR+28, LDERR+29
, LDERR+30*, LDERR+31, LDERR+32
>> XPDA BMES+4
Y LD+5~
>> ZTQUEUED GET954+12, BMES+5
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