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

Package: Lab Service

Routine: LRLNCST


Information

LRLNCST ;DALOI/FHS-LIST OF LOINC DEPRECIATED CODES ; 5/14/07 12:56pm

Source Information

Source file <LRLNCST.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Kernel 4 ^%ZIS  ^%ZISC  ^%ZTLOAD  $$CJ^XLFSTR  
VA FileMan 2 GETS^DIQ  ^DIR  

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 LR LOINC STATUS PRINT  

Entry Points

Name Comments DBIA/ICR reference
EN ;
DEVICE ;
LOAD ;
LST ;Print list of deprecated code
LNK ;Provide list of mapped deprecated LOINC codes
LK64 ;Start looking for NLT linked fields.
RESULT ;Look up result NLT codes
ORDER ;Look up NLT order codes
DEF(LRNLT,FLD) ;Check LOINC default code
CHK(LRP,FLD) ;Check for valid node
MSG(MSG) ;Print
LNC(LRNLT,LRFLD) ;Check for LOINC in suffixed NLT codes
SPEC(LRNLT,LRFLD) ;Check specimen time aspect LOINC
DISP ;
PLN ;
END ;
HDR ;

External References

Name Field # of Occurrence
^%ZIS DEVICE+2
^%ZISC END+3
^%ZTLOAD LOAD+5
GETS^DIQ LST+6
^DIR EN+7
$$CJ^XLFSTR MSG+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$S($G(ZTSK):"Tasked to "_ION_" "_ZTSK,1:"Not Tasked")
  • Line Location: LOAD+6
Function Call: WRITE
  • Prompt: !,$G(LRANS(95.3,LRLNC_",",.01,"E"))," ",$E($G(LRANS(95.3,LRLNC_",",80,"E")),1,60)
  • Line Location: LST+8
Function Call: WRITE
  • Prompt: !,"Test Name: ",LR60NM
  • Line Location: DEF+6
Function Call: WRITE
  • Prompt: !,$S(FLD=1:"RESULT NLT Code LOINC Default ",1:"ORDER NLT Code LOINC Default ")
  • Line Location: DEF+7
Function Call: WRITE
  • Prompt: !,"NLT Code: ",LRNLTNM
  • Line Location: DEF+8
Function Call: WRITE
  • Prompt: !,LRDEF_"-"_$P(^LAB(95.3,LRDEF,0),U,15)_" "_$G(^LAB(95.3,LRDEF,80)),!
  • Line Location: DEF+9
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR(MSG,IOM)
  • Line Location: MSG+1
Function Call: WRITE
  • Prompt: !,"Test Name: ",LR60NM
  • Line Location: DISP+3
Function Call: WRITE
  • Prompt: !,"NLT Code: ",$P($G(^LAM(LRNLT,0)),U)," ",$P(^(0),U,2)
  • Line Location: DISP+4
Function Call: WRITE
  • Prompt: !," ("_LRSPEC_") "_LRSPECN
  • Line Location: DISP+5
Function Call: WRITE
  • Prompt: !,"LOINC Code: ",LRTASPN_" ["_LRLNC_"-"_$P(^LAB(95.3,LRLNC,0),U,15)_"]"
  • Line Location: DISP+6
Function Call: WRITE
  • Prompt: !,"LOINC Name: ",$G(^LAB(95.3,LRLNC,80))
  • Line Location: DISP+7
Function Call: WRITE
  • Prompt: !,LRPLN,!
  • Line Location: PLN+2
Function Call: WRITE
  • Prompt: !
  • Line Location: END+1
Function Call: WRITE
  • Prompt: @IOF,LRHDR," Page: ",LRPG,!
  • Line Location: HDR+2
Routine Call
  • %ZIS
  • Line Location:
    • DEVICE+2
Routine Call
  • DIR
  • Line Location:
    • EN+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^LAB(95.3 - [#95.3] GETS^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(60 - [#60] LNK+5, LNK+6, LNK+7, LK64+1
^LAB(61 - [#61] SPEC+2
^LAB(64.061 - [#64.061] SPEC+4
^LAB(95.3 - [#95.3] LST+4, DEF+3, DEF+9, SPEC+6, DISP+6, DISP+7
^LAM - [#64] DEF+1, DEF+2, CHK+1, CHK+6, LNC+3, SPEC+1, SPEC+3, SPEC+5, DISP+4

Label References

Name Line Occurrences
CHK RESULT+2, ORDER+2
DEF ORDER+3, LNC+7
DISP SPEC+6
END EN+7, DEVICE+2, DEVICE+3, DEVICE+4, DEVICE+5, LST+10, LNK+10
HDR LST+3, LST+9, LNK+3, DEF+4, DISP+1, PLN+1
LK64 LNK+9
LNC RESULT+3
LNK DEVICE+4
LOAD DEVICE+3
LST DEVICE+5
MSG CHK+5
ORDER LK64+2
PLN DEF+5, CHK+2, DISP+2
RESULT LK64+3
SPEC LNC+8

Naked Globals

Name Field # of Occurrence
^(0 DEF+2, CHK+6, DISP+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS EN+1!, DEVICE+1*
%ZIS("A" DEVICE+1*
%ZIS("B" DEVICE+1*
DIR EN+2!, END+5!
DIR("?" EN+4*, EN+5*, EN+6*
DIR(0 EN+3*
DIRUT EN+7, END+4!
ERR LST+5!, LST+7, END+4!
FLD DEF~, DEF+7, CHK~, CHK+4
IO DEVICE+3, LOAD+4
IO(0 DEVICE+3
IOF END+2, HDR+2
IOM MSG+1
ION LOAD+6
IOSL LST+9, DEF+4, DISP+1, PLN+1
IOST END+2
LR60NM LNK+8*, DEF+6, DISP+3, END+5!
LR64 LK64+1*, END+4!
LRANS EN+2!, EN+8*, DEVICE+4, DEVICE+5, LOAD+2, LST+5!, END+5!
LRANS( LST+8
LRCC CHK+6*, LNC+2!, LNC+3*, LNC+4, LNC+5, END+5!
LRDEF DEF+1*, DEF+3, DEF+9, END+5!
LRFLD RESULT+1*, RESULT+2, RESULT+3, ORDER+1*, ORDER+2, ORDER+3, LNC~, LNC+1*, LNC+7, SPEC~
END+5!
LRHDR LST+2*, LNK+3*, END+5!, HDR+2
LRIEN LNK+2*, LNK+6*, LNK+7, LNK+8, LK64+1, CHK+4, END+5!
LRINLT LNC+7*, LNC+8, END+5!
LRIO EN+1!
LRLNC LST+3*, LST+4*, LST+6, LST+8, SPEC+5*, SPEC+6, DISP+6, DISP+7, END+6!
LRMSG CHK+4*, CHK+5, END+4!
LRNLT DEF~, DEF+1, DEF+2, LNC~, LNC+3, SPEC~, SPEC+1, SPEC+3, SPEC+5, DISP+4
LRNLTNM DEF+2*, DEF+8, END+5!
LRNM LNK+2*, LNK+5*, LNK+6, LNK+7, LNK+8, CHK+4, END+4!
LRNODE CHK+6*, END+4!
LRNOP RESULT+2, ORDER+2, CHK+1*, CHK+5*, LNC+2!, LNC+3, LNC+6*
LRNOPE END+4!
LRONLT LK64+1*, LK64+2, ORDER+2, ORDER+3, END+5!
LRP CHK~, CHK+1, CHK+6
LRPG LST+3*, LNK+2*, END+5!, HDR+1*, HDR+2
LRPLINE LNK+2*, LNK+8*, DEF+5, CHK+2, DISP+2, PLN+3*, END+5!
LRPLN LNK+4*, PLN+2, END+6!
LRQ LNC+2!, LNC+5*, END+6!
LRQB LNC+2!, LNC+4*, LNC+6, END+6!
LRRNLT LK64+1*, LK64+3, RESULT+2, RESULT+3, END+6!
LRSPEC SPEC+1*, SPEC+2, SPEC+3, SPEC+5, DISP+5, END+4!
LRSPECN SPEC+2*, DISP+5, END+6!
LRTASP SPEC+3*, SPEC+4, SPEC+5, END+6!
LRTASPN SPEC+4*, DISP+6, END+6!
LRTXT CHK+3*, CHK+4, END+4!
MSG MSG~, MSG+1
NODE LNC+2!, LNC+5*, LNC+6*, LNC+7, END+6!
POP DEVICE+2, END+6!
U LK64+1, DEF+2, DEF+9, CHK+6, LNC+3, SPEC+2, SPEC+4, DISP+4, DISP+6
X END+6!
Y EN+2!, EN+7, EN+8, END+6!
ZTDESC LOAD+1~, LOAD+3*
ZTDTH LOAD+1~, LOAD+3*
ZTIO LOAD+1~, LOAD+4*
>> ZTQUEUED LST+1, LNK+1
>> ZTREQ LST+1*, LNK+1*
ZTRTN LOAD+1~, LOAD+2*
ZTSK LOAD+6, END+4!
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