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

Package: Automated Lab Instruments

Routine: LA7VPFL


Information

LA7VPFL ;DALOI/PDL - Lab Mapping Data Verification ;03/07/12 16:04

Source Information

Source file <LA7VPFL.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Kernel 4 HOME^%ZIS  ^%ZISC  ($$FMTE,$$NOW)^XLFDT  ($$CJ,$$REPEAT)^XLFSTR  
VA FileMan 3 FIELD^DID  GETS^DIQ  ^DIR  
Lab Service 1 ($$QUE,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: 1

Package Total Caller Graph
Automated Lab Instruments 1 LA7VPFL  

Entry Points

Name Comments DBIA/ICR reference
START ;
MAIN(LABORT) ;
; Prompts for subscript and type of report then queues or displays.
; Inputs
; LABORT: <byref> See Outputs
; Outputs
; LABORT: User wants to abort (1=abort)
SHOW(SS,RPT,LABORT) ;
; Branches to the appropriate report subroutine.
; Inputs
; SS: LR subscript (MI,SP,CY)
; RPT: Which report 1=errors 2=correct
; LABORT: <byref> See Outputs
; Outputs
; LABORT: User wants to abort 1=abort
RPT1(LASS,LABORT) ;
; "Mapping Error" report
; Inputs
; LASS: Subscript (ie "MI","SP","CY")
; LABORT: <byref> See Outputs
; Outputs
; LABORT: User wants to abort (1=abort)
RPT2(LASS,LABORT) ;
; "Mapping Okay" report
; Inputs
; LASS: Subscript (ie "MI","SP","CY")
; LABORT: <byref> See Outputs
; Outputs
; LABORT: User wants to abort (1=abort)
HDR1 ;
; Generate header used with "Error" report
HDR2 ;
; Generate header used with "Correct" report
NP ;
; Convenience method

External References

Name Field # of Occurrence
HOME^%ZIS MAIN+24
^%ZISC SHOW+17
FIELD^DID RPT2+52, RPT2+59
GETS^DIQ RPT2+35
^DIR MAIN+10, MAIN+15
$$QUE^LRUTIL MAIN+21
NP^LRUTIL NP+2
$$FMTE^XLFDT HDR1+6, HDR2+6
$$NOW^XLFDT RPT1+12, RPT2+12
$$CJ^XLFSTR RPT1+50, RPT2+67
$$REPEAT^XLFSTR HDR1+10, HDR2+10

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"[",R60,"] ",TEST
  • Line Location: RPT1+29
Function Call: WRITE
  • Prompt: ?35," Not Mapped to File #64"
  • Line Location: RPT1+30
Function Call: WRITE
  • Prompt: !,"[",R60,"] ",TEST
  • Line Location: RPT1+36
Function Call: WRITE
  • Prompt: !,?35," No Workload Code"
  • Line Location: RPT1+37
Function Call: WRITE
  • Prompt: !,"[",R60,"] ",TEST
  • Line Location: RPT1+43
Function Call: WRITE
  • Prompt: !,?15,"is mapped to: ",PROC," [",WKLD,"]"
  • Line Location: RPT1+45
Function Call: WRITE
  • Prompt: !,?37,"Not Linked to File #64.061"
  • Line Location: RPT1+47
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("< < < End of report > > >",IOM),!
  • Line Location: RPT1+50
Function Call: WRITE
  • Prompt: !,"[",R60,"] ",TEST
  • Line Location: RPT2+40
Function Call: WRITE
  • Prompt: !,?3,"Mapped to: ",X," [",WKLD,"]"
  • Line Location: RPT2+42
Function Call: WRITE
  • Prompt: !,?5,"Linked to: ",LEC," [",R64061,"]"
  • Line Location: RPT2+44
Function Call: WRITE
  • Prompt: !,?7,"Lab Data: ",SECT," [",FIELD,"]"
  • Line Location: RPT2+62
Function Call: WRITE
  • Prompt: !,?9,"SCT Top Concept: ",$G(D64061(63.3,"E"))," [",$G(D64061(63.3,"I")),"]"
  • Line Location: RPT2+64
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("< < < End of report > > >",IOM),!
  • Line Location: RPT2+67
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR1+4
Function Call: WRITE
  • Prompt: !,"Laboratory Tests for "_LASS_" with mapping errors"
  • Line Location: HDR1+5
Function Call: WRITE
  • Prompt: ?IOM-$L(X),X
  • Line Location: HDR1+7
Function Call: WRITE
  • Prompt: !?IOM-$L(X),X
  • Line Location: HDR1+9
Function Call: WRITE
  • Prompt: !,$$REPEAT^XLFSTR("=",IOM)
  • Line Location: HDR1+10
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR2+4
Function Call: WRITE
  • Prompt: !,"Laboratory Tests for "_LASS_" mapped correctly"
  • Line Location: HDR2+5
Function Call: WRITE
  • Prompt: ?IOM-$L(X),X
  • Line Location: HDR2+7
Function Call: WRITE
  • Prompt: !?IOM-$L(X),X
  • Line Location: HDR2+9
Function Call: WRITE
  • Prompt: !,$$REPEAT^XLFSTR("=",IOM)
  • Line Location: HDR2+10
Routine Call
  • %ZIS
  • Line Location:
    • MAIN+24
Routine Call
  • DIR
  • Line Location:
    • MAIN+10
    • MAIN+15

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^LR - [#63] FIELD^DID
^LAB(64.061 - [#64.061] GETS^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(60 - [#60] RPT1+21, RPT1+24, RPT2+20, RPT2+23
^LAB(64.061 - [#64.061] RPT2+33
^LAM - [#64] RPT1+32, RPT1+40, RPT2+26, RPT2+30, RPT2+38

Label References

Name Line Occurrences
HDR1 RPT1+14
HDR2 RPT2+14
MAIN START+3
NP RPT1+28, RPT1+36, RPT1+37, RPT1+43, RPT1+44, RPT1+46, RPT2+41, RPT2+43, RPT2+45, RPT2+63
, RPT2+65
RPT1 SHOW+14
RPT2 SHOW+15
SHOW MAIN+23

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
D64061 RPT1+9~, RPT2+9~, RPT2+36*
D64061( RPT2+46, RPT2+47, RPT2+64
DATA RPT1+8~, RPT1+21*, RPT1+22, RPT1+24*, RPT1+25, RPT1+32*, RPT1+33, RPT1+34, RPT1+40*, RPT1+41
, RPT2+8~, RPT2+20*, RPT2+21, RPT2+23*, RPT2+24, RPT2+26*, RPT2+27, RPT2+30*, RPT2+31, RPT2+33*
, RPT2+34
DIERR RPT1+8~, RPT2+8~, RPT2+50!, RPT2+56!
DIR MAIN+7~, MAIN+13!
DIR("A" MAIN+9*
DIR(0 MAIN+8*, MAIN+14*
DIRUT MAIN+7~, MAIN+11, MAIN+16
FIELD RPT1+9~, RPT2+9~, RPT2+47*, RPT2+48*, RPT2+57, RPT2+58*, RPT2+59, RPT2+60*, RPT2+62
FILE RPT1+9~, RPT2+9~, RPT2+46*, RPT2+49, RPT2+54, RPT2+59
IO SHOW+12
IOF HDR1+4, HDR2+4
IOM RPT1+50, RPT2+67, HDR1+7, HDR1+9, HDR1+10, HDR2+7, HDR2+9, HDR2+10
IOST HDR1+4, HDR2+4
LABORT START+1~, START+2*, START+3, MAIN~, MAIN+11*, MAIN+16*, MAIN+23, SHOW~, SHOW+11*, SHOW+14
, SHOW+15, RPT1~, RPT1+11*, RPT1+16, RPT1+28, RPT1+36, RPT1+37, RPT1+43, RPT1+44, RPT1+46
, RPT2~, RPT2+11*, RPT2+16, RPT2+41, RPT2+43, RPT2+45, RPT2+63, RPT2+65, NP+2
LADATA RPT1+8~, RPT2+8~, RPT2+37!, RPT2+50!, RPT2+56!
LADATA( RPT2+36
LADATA("LABEL" RPT2+53, RPT2+60
LAMSG RPT1+8~, RPT2+8~, RPT2+50!, RPT2+53, RPT2+60
LANOW RPT1+8~, RPT1+12*, RPT2+8~, RPT2+12*, HDR1+6, HDR2+6
LAPGDATA RPT1+8~, RPT2+8~, NP+2
LAPGDATA("HDR" RPT1+13*, RPT2+13*
LAPGDATA("PGNUM" HDR1+3, HDR2+3
LAPGNUM RPT1+8~, RPT2+8~
LASS RPT1~, RPT1+10*, RPT1+23, RPT2~, RPT2+10*, RPT2+22, HDR1+5, HDR2+5
LEC RPT1+9~, RPT2+9~, RPT2+34*, RPT2+44
LRMSG RPT2+56!
NODE RPT1+8~, RPT1+15*, RPT1+16*, RPT1+17, RPT1+19, RPT1+20, RPT2+8~, RPT2+15*, RPT2+16*, RPT2+17
, RPT2+18, RPT2+19
PGNUM HDR1+2~, HDR1+3*, HDR1+4, HDR1+8, HDR2+2~, HDR2+3*, HDR2+4, HDR2+8
POP MAIN+7~
PROC RPT1+9~, RPT1+33*, RPT1+45
R60 RPT1+9~, RPT1+19*, RPT1+21, RPT1+24, RPT1+29, RPT1+36, RPT1+43, RPT2+9~, RPT2+18*, RPT2+20
, RPT2+23, RPT2+40
R64 RPT1+9~, RPT1+25*, RPT1+26, RPT1+32, RPT1+40, RPT2+9~, RPT2+24*, RPT2+25, RPT2+26, RPT2+30
, RPT2+38
R64061 RPT1+9~, RPT1+41*, RPT1+42, RPT2+9~, RPT2+31*, RPT2+32, RPT2+33, RPT2+35, RPT2+36, RPT2+44
RPT MAIN+7~, MAIN+17*, MAIN+18*, MAIN+19*, MAIN+20, MAIN+23, SHOW~, SHOW+10*, SHOW+13, SHOW+14
, SHOW+15
RTN MAIN+7~, MAIN+20*, MAIN+21
SECT RPT1+9~, RPT2+9~, RPT2+49*, RPT2+51, RPT2+52, RPT2+53*, RPT2+54*, RPT2+62
SS MAIN+7~, MAIN+12*, MAIN+20, MAIN+23, SHOW~, SHOW+9*, SHOW+14, SHOW+15
TASK MAIN+7~, MAIN+21*, MAIN+22
TEST RPT1+9~, RPT1+20*, RPT1+29, RPT1+36, RPT1+43, RPT2+9~, RPT2+19*, RPT2+40
U RPT1+22, RPT1+25, RPT1+33, RPT1+34, RPT1+41, RPT2+21, RPT2+24, RPT2+27, RPT2+31, RPT2+34
, RPT2+39
WKLD RPT1+9~, RPT1+34*, RPT1+35, RPT1+39, RPT1+45, RPT2+9~, RPT2+27*, RPT2+28, RPT2+29, RPT2+42
WTEST RPT1+9~, RPT1+18*, RPT1+27*, RPT1+36*, RPT1+43*
X MAIN+7~, RPT1+8~, RPT1+22*, RPT1+23, RPT2+8~, RPT2+21*, RPT2+22, RPT2+38*, RPT2+39*, RPT2+42
, RPT2+57*, HDR1+2~, HDR1+6*, HDR1+7, HDR1+8*, HDR1+9, HDR2+2~, HDR2+6*, HDR2+7, HDR2+8*
HDR2+9
Y MAIN+7~, MAIN+12, MAIN+18, MAIN+19, RPT1+8~, RPT2+8~
>> ZTQUEUED SHOW+16
>> ZTREQ SHOW+16*
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