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

Package: Automated Lab Instruments

Routine: LA7SRPT4


Information

LA7SRPT4 ;DALOI/JDB - SCT OVERRIDE REPORT ;03/07/12 09:38

Source Information

Source file <LA7SRPT4.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Kernel 5 HOME^%ZIS  ^%ZISC  ENDR^%ZISS  ($$FMTE,$$NOW)^XLFDT  ($$REPEAT,$$TRIM)^XLFSTR  
Automated Lab Instruments 2 (GETFLDS,WRAP)^LA7SRPT1  HDR^LA7SRPT4  
Lab Service 2 $$GETPREF^LRSCT  ($$QUE,$$SELECT,MORE,NP)^LRUTIL  

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 2 LA7SRPT  LA7SRPT4  

Entry Points

Name Comments DBIA/ICR reference
EN ;
; Prompts for #62.48 entry, device, then branches
MAIN(R6248) ;
; Setup variables, branch, print footer, perform cleanup.
; Expects LASEL array from EN (used with VAUTOMA) to pick
; multiple #62.48s (passed in sym tbl for queuing)
LOOP(STOP,SEL) ;
; Inputs
; STOP : <byref> see Outputs below
; SEL : <byref> Array of #62.48s to display
; Outputs
; STOP : Tracks if user has stopped display
SCTOVER(R6248,STOP) ;
; Displays SCT override info for a MSG CFG (#62.48)
; Inputs
; R6248 : #62.48 IEN
; STOP : <byref> see Outputs below
; Outputs
; STOP : Tracks if user has stopped display
HDR ;
; Header
; Expects PGDATA array
; private method
FTR ;
NP(STOP) ;
; Convenience method
BLDTMP(FILE,IN) ;
; Builds ^TMP($J,TMPNM,FILE,.01,IEN)=SCT Code
; private method
; Inputs
; FILE : File # (61, 62)
; IN :<byref> data array IN(IEN)=SCT Code
UL(I) ;
; Underline On/Off
; private method
; Inputs
; I I=1 turns on underline I=0 turns off underline

External References

Name Field # of Occurrence
HOME^%ZIS EN+27
^%ZISC MAIN+29
ENDR^%ZISS SCTOVER+18
GETFLDS^LA7SRPT1 SCTOVER+20, SCTOVER+37, BLDTMP+13
WRAP^LA7SRPT1 SCTOVER+169
HDR^LA7SRPT4 MAIN+16
$$GETPREF^LRSCT SCTOVER+166
$$QUE^LRUTIL EN+24
$$SELECT^LRUTIL EN+17
MORE^LRUTIL MAIN+28
NP^LRUTIL NP+2
$$FMTE^XLFDT HDR+15
$$NOW^XLFDT MAIN+11, HDR+7
$$REPEAT^XLFSTR HDR+18
$$TRIM^XLFSTR SCTOVER+146, SCTOVER+162

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !," No SCT Overrides on file."
  • Line Location: EN+12
Function Call: WRITE
  • Prompt: !
  • Line Location: MAIN+25
Function Call: WRITE
  • Prompt: !
  • Line Location: LOOP+16
Function Call: WRITE
  • Prompt: !
  • Line Location: LOOP+16
Function Call: WRITE
  • Prompt: !,"Message Configuration: ",DATA(.01,"E")
  • Line Location: SCTOVER+22
Function Call: WRITE
  • Prompt: !?5,"No SCT Overrides on file."
  • Line Location: SCTOVER+26
Function Call: WRITE
  • Prompt: !
  • Line Location: SCTOVER+30
Function Call: WRITE
  • Prompt: !?2
  • Line Location: SCTOVER+81
Function Call: WRITE
  • Prompt: "Specimen [Topography file #61]"
  • Line Location: SCTOVER+82
Function Call: WRITE
  • Prompt: ?2+DISP(1)+2,"VA SCT",?2+DISP(1)+2+18+2,"Non-VA SCT"
  • Line Location: SCTOVER+85
Function Call: WRITE
  • Prompt: !?2,NM
  • Line Location: SCTOVER+105
Function Call: WRITE
  • Prompt: ?2+DISP(1)+2,SCT,?2+DISP(1)+2+18+2,SCTOVR
  • Line Location: SCTOVER+106
Function Call: WRITE
  • Prompt: !
  • Line Location: SCTOVER+112
Function Call: WRITE
  • Prompt: !?2
  • Line Location: SCTOVER+114
Function Call: WRITE
  • Prompt: "Sample [Collection Sample file #62]"
  • Line Location: SCTOVER+116
Function Call: WRITE
  • Prompt: ?2+DISP(1)+2,"VA SCT",?2+DISP(1)+2+18+2,"Non-VA SCT"
  • Line Location: SCTOVER+119
Function Call: WRITE
  • Prompt: !?2,NM
  • Line Location: SCTOVER+138
Function Call: WRITE
  • Prompt: ?2+DISP(1)+2,SCT,?2+DISP(1)+2+18+2,SCTOVR
  • Line Location: SCTOVER+139
Function Call: WRITE
  • Prompt: !
  • Line Location: SCTOVER+151
Function Call: WRITE
  • Prompt: !?POS
  • Line Location: SCTOVER+154
Function Call: WRITE
  • Prompt: "SCT Code"
  • Line Location: SCTOVER+156
Function Call: WRITE
  • Prompt: ?POS,"SCT Preferred Term"
  • Line Location: SCTOVER+158
Function Call: WRITE
  • Prompt: !?POS,SCT1
  • Line Location: SCTOVER+165
Function Call: WRITE
  • Prompt: ?POS
  • Line Location: SCTOVER+168
Function Call: WRITE
  • Prompt: !,"MESSAGE CONFIGURATION SCT OVERRIDES "
  • Line Location: HDR+14
Function Call: WRITE
  • Prompt: ?IOM-$L(STR)-2,STR
  • Line Location: HDR+17
Function Call: WRITE
  • Prompt: !,$$REPEAT^XLFSTR("=",IOM)
  • Line Location: HDR+18
Routine Call
  • %ZIS
  • Line Location:
    • EN+27

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAHM(62.48 - [#62.48] EN+8, EN+9, LOOP+12, LOOP+16, SCTOVER+24, SCTOVER+34
^TMP($J SCTOVER+50!, SCTOVER+53, SCTOVER+112, SCTOVER+174!, BLDTMP+17*

Label References

Name Line Occurrences
BLDTMP SCTOVER+51, SCTOVER+52
LOOP MAIN+18
MAIN EN+26
NP LOOP+15, LOOP+16, LOOP+17, SCTOVER+21, SCTOVER+23, SCTOVER+25, SCTOVER+27, SCTOVER+29, SCTOVER+31, SCTOVER+80
, SCTOVER+87, SCTOVER+104, SCTOVER+107, SCTOVER+112, SCTOVER+113, SCTOVER+121, SCTOVER+137, SCTOVER+140, SCTOVER+150, SCTOVER+152
, SCTOVER+163, SCTOVER+170
SCTOVER MAIN+17, LOOP+14
UL SCTOVER+81, SCTOVER+86, SCTOVER+115, SCTOVER+120, SCTOVER+155, SCTOVER+159, SCTOVER+175

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS SCTOVER+17~
BM MAIN+23~, MAIN+24*, MAIN+25
D62482 SCTOVER+7~, SCTOVER+35!, SCTOVER+37, SCTOVER+38
D62482( SCTOVER+40, SCTOVER+46
DATA SCTOVER+8~, SCTOVER+20, BLDTMP+6~, BLDTMP+12!, BLDTMP+13, BLDTMP+14
DATA( SCTOVER+22, BLDTMP+15
DATA(20 BLDTMP+16
DIC EN+2~, EN+15*, EN+17, EN+18!
DIC("S" EN+16*
DIERR SCTOVER+9~
>> DISP(1 SCTOVER+83*, SCTOVER+84*, SCTOVER+85, SCTOVER+102*, SCTOVER+103*, SCTOVER+106, SCTOVER+117*, SCTOVER+118*, SCTOVER+119, SCTOVER+135*
, SCTOVER+136*, SCTOVER+139
DTOUT EN+2~, EN+21
DUOUT EN+2~, EN+21
F01 BLDTMP+6~, BLDTMP+15*, BLDTMP+17
F20 BLDTMP+6~, BLDTMP+16*, BLDTMP+17
FILE BLDTMP~, BLDTMP+7*, BLDTMP+13, BLDTMP+17
FLDS BLDTMP+6~, BLDTMP+9*, BLDTMP+13
FSIZE SCTOVER+8~
FSIZE(1 SCTOVER+57*, SCTOVER+58*, SCTOVER+66*, SCTOVER+75*, SCTOVER+83, SCTOVER+102, SCTOVER+117, SCTOVER+135
FSIZE(2 SCTOVER+59*, SCTOVER+148*, SCTOVER+157, SCTOVER+167
HASSCT EN+2~, EN+3*, EN+4, EN+8, EN+10*, EN+11
I MAIN+23~, MAIN+25*, SCTOVER+8~, SCTOVER+65*, SCTOVER+66, SCTOVER+74*, SCTOVER+75, SCTOVER+147*, SCTOVER+148, UL~
, UL+6, UL+7
IN BLDTMP~
IN( BLDTMP+11
IO MAIN+9
IOM SCTOVER+11, HDR+17, HDR+18
IOSL MAIN+25
IOST MAIN+22, MAIN+28
IOUOFF SCTOVER+10~, UL+5, UL+6
IOUON SCTOVER+10~, UL+5, UL+7
LAFLDS SCTOVER+9~, SCTOVER+32*, SCTOVER+37
LAIEN SCTOVER+9~, SCTOVER+36*, SCTOVER+37
LASEL EN+2~, EN+17, MAIN+18
>> LRSEL EN+23
MSIZE SCTOVER+8~
MSIZE(1 SCTOVER+11*, SCTOVER+84, SCTOVER+99, SCTOVER+100, SCTOVER+103, SCTOVER+118, SCTOVER+132, SCTOVER+133, SCTOVER+136
NM SCTOVER+8~, SCTOVER+62*, SCTOVER+65, SCTOVER+71*, SCTOVER+74, SCTOVER+92*, SCTOVER+99, SCTOVER+100*, SCTOVER+101*, SCTOVER+105
, SCTOVER+125*, SCTOVER+132, SCTOVER+133*, SCTOVER+134*, SCTOVER+138
NODE LOOP+6~, LOOP+8*, LOOP+10*, LOOP+11, SCTOVER+8~, SCTOVER+60*, SCTOVER+61*, SCTOVER+62, SCTOVER+63, SCTOVER+69*
, SCTOVER+70*, SCTOVER+71, SCTOVER+72, SCTOVER+78*, SCTOVER+79, SCTOVER+90*, SCTOVER+91*, SCTOVER+92, SCTOVER+93, SCTOVER+94
, SCTOVER+110*, SCTOVER+111, SCTOVER+124*, SCTOVER+125, SCTOVER+126, SCTOVER+127
PGDATA MAIN+7~, SCTOVER+169, NP+2
PGDATA("BM" MAIN+13*, MAIN+24
PGDATA("FTR" MAIN+15*, MAIN+21, MAIN+26
PGDATA("HDR" MAIN+14*
PGDATA("PGNUM" MAIN+12*, HDR+9, HDR+12*
PGDATA("RPTDT" MAIN+11*, HDR+5, HDR+8*
PGDATA("WFTR" MAIN+20
PGNUM HDR+4~, HDR+9*, HDR+10, HDR+11*, HDR+12, HDR+16
POP EN+2~, SCTOVER+9~
POS SCTOVER+8~, SCTOVER+153*, SCTOVER+154, SCTOVER+157*, SCTOVER+158, SCTOVER+164*, SCTOVER+165, SCTOVER+167*, SCTOVER+168, SCTOVER+169
QUE EN+2~, EN+24*, EN+25
R61 SCTOVER+7~, SCTOVER+39*, SCTOVER+42*, SCTOVER+45, SCTOVER+47
R62 SCTOVER+7~, SCTOVER+39*, SCTOVER+44*, SCTOVER+45, SCTOVER+48
R6248 EN+2~, EN+6~, EN+7*, EN+8*, EN+9, EN+14*, EN+22, EN+26, MAIN~, MAIN+8*
, MAIN+17, MAIN+18, LOOP+6~, LOOP+11*, LOOP+12, LOOP+13, LOOP+14, LOOP+16, SCTOVER~, SCTOVER+12*
, SCTOVER+20, SCTOVER+24, SCTOVER+34, SCTOVER+36
R62482 SCTOVER+7~, SCTOVER+33*, SCTOVER+34*, SCTOVER+36
REC SCTOVER+8~, SCTOVER+63*, SCTOVER+64, SCTOVER+72*, SCTOVER+73, SCTOVER+93*, SCTOVER+96, SCTOVER+98, SCTOVER+126*, SCTOVER+129
, SCTOVER+131, BLDTMP+6~, BLDTMP+10*, BLDTMP+11*, BLDTMP+13, BLDTMP+17
RPTDT HDR+4~, HDR+5*, HDR+6, HDR+7*, HDR+8, HDR+15
RTN EN+2~, EN+22*, EN+24
SAMPS SCTOVER+7~, SCTOVER+52
SAMPS( SCTOVER+48*, SCTOVER+129
SCT SCTOVER+7~, SCTOVER+94*, SCTOVER+95, SCTOVER+106, SCTOVER+127*, SCTOVER+128, SCTOVER+139, SCTOVER+144*, SCTOVER+145*, SCTOVER+146
, SCTOVER+160*, SCTOVER+161*, SCTOVER+162
SCT1 SCTOVER+7~, SCTOVER+162*, SCTOVER+165, SCTOVER+166
SCTCODES SCTOVER+7~, SCTOVER+143
SCTCODES( SCTOVER+145, SCTOVER+161
SCTCODES(" " SCTOVER+95*, SCTOVER+97*, SCTOVER+128*, SCTOVER+130*
SCTOVR SCTOVER+7~, SCTOVER+96*, SCTOVER+97, SCTOVER+106, SCTOVER+129*, SCTOVER+130, SCTOVER+139
SEL LOOP~, LOOP+13
SEL( LOOP+13
SPECS SCTOVER+7~, SCTOVER+51
SPECS( SCTOVER+47*, SCTOVER+96
STOP MAIN+7~, MAIN+10*, MAIN+17, MAIN+18, MAIN+20, MAIN+28, LOOP~, LOOP+10, LOOP+14, LOOP+15
, LOOP+16, LOOP+17, SCTOVER~, SCTOVER+13*, SCTOVER+21, SCTOVER+23, SCTOVER+25, SCTOVER+27, SCTOVER+29, SCTOVER+31
, SCTOVER+80, SCTOVER+87, SCTOVER+91, SCTOVER+104, SCTOVER+107, SCTOVER+112, SCTOVER+113, SCTOVER+121, SCTOVER+124, SCTOVER+137
, SCTOVER+140, SCTOVER+143, SCTOVER+145, SCTOVER+150, SCTOVER+152, SCTOVER+161, SCTOVER+163, SCTOVER+169, SCTOVER+170, SCTOVER+171
, NP~, NP+2
STR HDR+4~, HDR+15*, HDR+16*, HDR+17
TMPNM SCTOVER+7~, SCTOVER+14*, SCTOVER+50, SCTOVER+53, SCTOVER+61, SCTOVER+70, SCTOVER+91, SCTOVER+112, SCTOVER+124, SCTOVER+174
, BLDTMP+6~, BLDTMP+8*, BLDTMP+17
X EN+2~, EN+17*, EN+20, SCTOVER+8~, SCTOVER+15*, SCTOVER+40*, SCTOVER+41, SCTOVER+42, SCTOVER+43, SCTOVER+44
, SCTOVER+46*, SCTOVER+47, SCTOVER+48, SCTOVER+64*, SCTOVER+65, SCTOVER+73*, SCTOVER+74, SCTOVER+98*, SCTOVER+99, SCTOVER+100
, SCTOVER+101, SCTOVER+131*, SCTOVER+132, SCTOVER+133, SCTOVER+134, SCTOVER+146*, SCTOVER+147, SCTOVER+166*, SCTOVER+169
Y EN+2~
>> ZTQUEUED MAIN+27
>> ZTREQ MAIN+27*
ZTSAVE EN+2~, EN+24
ZTSAVE("LASEL" EN+23*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All