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

Package: Lab Service

Routine: LRVRAP4


Information

LRVRAP4 ;DALOI/STAFF - LAB AP INTERFACE ;06/19/13 11:48

Source Information

Source file <LRVRAP4.m>

Call Graph

Call Graph

Call Graph Total: 15

Package Total Call Graph
Lab Service 8 ACCCOMP^LRAPRES  MAIN^LRAPRES1  UPDATE^LRPXRM  EDIT^LRRPLU  ROLLUPPL^LRRPLUA  SETRL^LRVERA  (LEDI,ZAP)^LRVR0  PT^LRX  
VA FileMan 4 (FILE,UPDATE,WP)^DIE  ^DIR  ^DIWP  ^DIWW  
Kernel 3 (,HOME)^%ZIS  ^%ZTLOAD  ($$FMTE,$$NOW)^XLFDT  

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 LRVR0  

Entry Points

Name Comments DBIA/ICR reference
DISPLAY ; Display AP results
DQ ;
EXIT ;
HDG ;
DATA ;
PRTSR ; Print Supplemental Report
ACCEPT ; Ask if want to accept results
STORE ;
; First, some setup stuff
COMMENT ;
SRPT ; SUPPLEMENTARY REPORT
PURG ; Ask if the entry should be purged from ^LAH(
PAUSE ; Check for end of page

External References

Name Field # of Occurrence
^%ZIS DISPLAY+3
HOME^%ZIS DISPLAY+4, DISPLAY+7
^%ZTLOAD DISPLAY+7
FILE^DIE STORE+18
UPDATE^DIE COMMENT+10, SRPT+11
WP^DIE STORE+24, SRPT+12
^DIR ACCEPT+5, PURG+5, PAUSE+4
^DIWP DATA+13, PRTSR+6
^DIWW DATA+14, PRTSR+7
ACCCOMP^LRAPRES STORE+36
MAIN^LRAPRES1 STORE+37
UPDATE^LRPXRM STORE+40
EDIT^LRRPLU STORE+30
ROLLUPPL^LRRPLUA STORE+27
SETRL^LRVERA STORE+33
LEDI^LRVR0 STORE+43
ZAP^LRVR0 STORE+43, PURG+7
PT^LRX DQ+5
$$FMTE^XLFDT HDG+3, HDG+5
$$NOW^XLFDT STORE+14, SRPT+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Abort- Not an AP accession"
  • Line Location: DISPLAY+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DQ+4
Function Call: WRITE
  • Prompt: !,"Accession #: ",$G(LRACC)," UID: ",$G(LRUID)
  • Line Location: HDG+2
Function Call: WRITE
  • Prompt: !,"Name: ",$G(PNM)," SSN: ",$G(SSN)," DOB: ",$$FMTE^XLFDT($G(DOB),"1M")," Age: ",$G(AGE(2))
  • Line Location: HDG+3
Function Call: WRITE
  • Prompt: ?(IOM-10),"PAGE: ",LRPAGE
  • Line Location: HDG+4
Function Call: WRITE
  • Prompt: !,"Collection Date: ",$$FMTE^XLFDT($G(LRCDT))
  • Line Location: HDG+5
Function Call: WRITE
  • Prompt: !,LRLINE
  • Line Location: HDG+7
Function Call: WRITE
  • Prompt: !,LRLINE,!,FLDNM
  • Line Location: DATA+6
Function Call: WRITE
  • Prompt: !!
  • Line Location: STORE+30
Function Call: WRITE
  • Prompt: !
  • Line Location: PURG+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PAUSE+5
Routine Call
  • %ZIS
  • Line Location:
    • DISPLAY+3
Routine Call
  • %ZIS
  • Line Location:
    • DISPLAY+4
    • DISPLAY+7
Routine Call
  • DIE
  • Line Location:
    • STORE+18
Routine Call
  • DIE
  • Line Location:
    • COMMENT+10
    • SRPT+11
Routine Call
  • DIE
  • Line Location:
    • STORE+24
    • SRPT+12
Routine Call
  • DIR
  • Line Location:
    • ACCEPT+5
    • PURG+5
    • PAUSE+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAH( DATA+2, DATA+12, DATA+13, PRTSR+3, PRTSR+5, PRTSR+6, STORE+20, COMMENT+6, SRPT+6
^LR - [#63] STORE+35
^TMP("LRPL" STORE+27
^UTILITY($J DATA+7!

Label References

Name Line Occurrences
ACCEPT DQ+8
COMMENT STORE+22
DATA DQ+6
HDG DQ+6, PAUSE+5
PAUSE DATA+15, PRTSR+8
PRTSR DATA+10
PURG ACCEPT+7
SRPT STORE+23

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %ZIS DISPLAY+3*
>> AGE(2 HDG+3
CFILE COMMENT+1~, COMMENT+3*, COMMENT+4*, COMMENT+5*, COMMENT+9
DIC STORE+3~
DIC(0 STORE+5*
DIR ACCEPT+1~, PURG+2~, PAUSE+2~
DIR("?" ACCEPT+3*, ACCEPT+4*, PURG+4*
DIR("A" ACCEPT+2*, PURG+3*
DIR("B" ACCEPT+2*, PURG+4*
DIR(0 ACCEPT+2*, PURG+3*, PAUSE+3*
DIROUT ACCEPT+1~, PURG+2~, PAUSE+2~
DIRUT ACCEPT+1~, ACCEPT+6, PURG+2~, PURG+6, PAUSE+2~
>> DIWF DATA+8*
>> DIWL DATA+8*, DATA+9*
>> DIWR DATA+8*, DATA+9*
>> DOB HDG+3
DTOUT ACCEPT+1~, PURG+2~, PAUSE+2~
DUOUT ACCEPT+1~, PURG+2~, PAUSE+2~
DUZ STORE+17
DUZ(2 STORE+33
FDA STORE+13~, COMMENT+7!, SRPT+7!
FDA(1 STORE+15*, STORE+16*, STORE+17*, SRPT+9*, SRPT+10*
FDA(2 COMMENT+9*
FIELD STORE+3~, STORE+21*, STORE+24, SRPT+3*, SRPT+4*, SRPT+5*, SRPT+12
FILE STORE+3~, STORE+8*, STORE+9*, STORE+10*, STORE+15, STORE+16, STORE+17, STORE+24, STORE+34
FLDNM DATA+1~, DATA+3*, DATA+4*, DATA+5*, DATA+6
FLDS STORE+13~
IEN STORE+13~, STORE+14*, STORE+15, STORE+16, STORE+17, COMMENT+7!, COMMENT+8*, COMMENT+9, SRPT+7!, SRPT+8*
, SRPT+9, SRPT+10
IEN(1 SRPT+12
IO DQ+1
IO("Q" DISPLAY+5, DISPLAY+7!
IOF DQ+4, PAUSE+5
IOM DQ+3, HDG+4, DATA+8, DATA+9
IOSL PAUSE+1, PAUSE+5
IOST PAUSE+1
LINE DATA+1~, DATA+11*, DATA+12*, DATA+13, PRTSR+1~, PRTSR+4*, PRTSR+5*, PRTSR+6
LRA STORE+3~, STORE+35*
LRAC STORE+3~, STORE+34*, STORE+37
>> LRACC HDG+2, STORE+34
>> LRCDT HDG+5
LRDATE STORE+13~, STORE+14*, STORE+15, STORE+16
>> LRDFN DQ+5, STORE+14, STORE+24, STORE+27, STORE+30, STORE+33, STORE+35, STORE+37, STORE+40, COMMENT+8
, SRPT+8, SRPT+12
>> LREND DQ+3*, DATA+2, DATA+12, DATA+15, PRTSR+3, PRTSR+5, PRTSR+8, PAUSE+1, PAUSE+4*
LRERR STORE+13~, COMMENT+7!, SRPT+7!
LRERR2 SRPT+7!
LRI DQ+2~, DATA+1~, DATA+2*, DATA+3, DATA+4, DATA+5, DATA+9, DATA+10, DATA+12, DATA+13
, PRTSR+3, PRTSR+5, PRTSR+6, STORE+3~, STORE+14*, STORE+20*, STORE+21, STORE+22, STORE+23, STORE+34*
, STORE+37, COMMENT+6, SRPT+6
>> LRIDT STORE+14, STORE+24, STORE+27, STORE+30, STORE+33, STORE+34, STORE+35, STORE+40, COMMENT+8, SRPT+8
, SRPT+12
>> LRISQN DATA+2, DATA+12, DATA+13, PRTSR+3, PRTSR+5, PRTSR+6, STORE+20, COMMENT+6, SRPT+6
LRISQN2 PRTSR+1~, PRTSR+2*, PRTSR+3*, PRTSR+5, PRTSR+6, COMMENT+1~, COMMENT+2*, COMMENT+6*, SRPT+1~, SRPT+2*
, SRPT+6*
LRLINE DQ+2~, DQ+3*, HDG+7, DATA+6, COMMENT+6*, COMMENT+9
>> LRLL DATA+2, DATA+12, DATA+13, PRTSR+3, PRTSR+5, PRTSR+6, STORE+20, COMMENT+6, SRPT+6
>> LRNOP ACCEPT+6*, PURG+6*
LRP STORE+3~, STORE+34*, STORE+37
LRPAGE DQ+2~, DQ+3*, HDG+4, HDG+6*
LRSF STORE+3~, STORE+34*, STORE+37
>> LRSS DISPLAY+2, DATA+2, DATA+5, DATA+12, DATA+13, PRTSR+3, PRTSR+5, PRTSR+6, STORE+8, STORE+9
, STORE+10, STORE+20, STORE+27, STORE+30, STORE+33, STORE+35, STORE+37, STORE+40, COMMENT+3, COMMENT+4
, COMMENT+5, COMMENT+6, SRPT+3, SRPT+4, SRPT+5, SRPT+6
>> LRUID HDG+2
>> PNM HDG+3, STORE+34
>> POP DISPLAY+4
SRFILE SRPT+1~, SRPT+3*, SRPT+4*, SRPT+5*, SRPT+9, SRPT+10, SRPT+12
>> SSN HDG+3
X DATA+13*, PRTSR+6*, ACCEPT+1~, PURG+2~, PAUSE+2~
Y ACCEPT+1~, ACCEPT+7, PURG+2~, PURG+7, PAUSE+2~, PAUSE+4
>> ZTDESC DISPLAY+6*
>> ZTQUEUED DQ+7
>> ZTREQ DQ+7*
>> ZTRTN DISPLAY+6*
>> ZTSAVE("LR*" DISPLAY+6*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All