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

Package: Engineering

Routine: ENTIRRH1


Information

ENTIRRH1 ;WOIFO/LKG - Print hand receipt (Continued) ;3/4/08 15:02

Source Information

Source file <ENTIRRH1.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
Kernel 6 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  ($$DT,$$FMTE,$$NOW)^XLFDT  $$CMP^XUSESIG1  DE^XUSHSHP  
VA FileMan 3 ^DIC  ($$GET1,GETS)^DIQ  ^DIR  
Engineering 1 HDR1^ENTIRRH  

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
Engineering 1 ENTIRRH  

Entry Points

Name Comments DBIA/ICR reference
HDR1 ;Logic to print report heading
ITST2 ;IT personnel entry point for printing signed hand receipts
USER ;User entry point for printing signed hand receipts
IN2 ;
PRT
EX2
DATES() ;Signature Dates for User

External References

Name Field # of Occurrence
^%ZIS ITST2+6, USER+4
HOME^%ZIS ITST2+7, USER+5
^%ZISC EX2
^%ZTLOAD ITST2+7, USER+5
^DIC ITST2+3
$$GET1^DIQ PRT+2, PRT+3, PRT+26, PRT+27, PRT+33
GETS^DIQ PRT+11
^DIR USER+1, PRT+41, DATES+13, DATES+15, DATES+19
HDR1^ENTIRRH HDR1+1
$$DT^XLFDT DATES+1
$$FMTE^XLFDT PRT+2, PRT+19, DATES+5, DATES+9, DATES+18
$$NOW^XLFDT PRT+2
$$CMP^XUSESIG1 PRT+5
DE^XUSHSHP PRT+19

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"You have no IT assignments, either active or ended."
  • Line Location: USER+1
Function Call: WRITE
  • Prompt: !!!,"Hand receipt v",$P($G(^ENG(6916.2,ENVR,0)),U)," text is corrupted.",!?5," - Please contact EPS AEMS/MERS support"
  • Line Location: PRT+5
Function Call: WRITE
  • Prompt: !,ENNBR,?11,$E(ENMFGN,1,20),?35,ENMODEL,?65,ENSERNBR
  • Line Location: PRT+14
Function Call: WRITE
  • Prompt: !?4,"Signed: ",ENSIGNDT,?35,"Signature: /ES/",$G(ENSIG)
  • Line Location: PRT+24
Function Call: WRITE
  • Prompt: !,?4,"Signed: "_$S(ENRDA1>0:$$GET1^DIQ(6916.31,ENRDA1_","_ENRDA_",",.01),1:$$GET1^DIQ(6916.3,ENRDA_",",4))
  • Line Location: PRT+26
Function Call: WRITE
  • Prompt: ?35,"Certified by: "_$S(ENRDA1>0:$$GET1^DIQ(6916.31,ENRDA1_","_ENRDA_",",3),1:$$GET1^DIQ(6916.3,ENRDA_",",6))
  • Line Location: PRT+27
Function Call: WRITE
  • Prompt: !?19,"** Hand Receipt Text Altered **"
  • Line Location: PRT+29
Function Call: WRITE
  • Prompt: !?19,"** Assigned Equipment Altered **"
  • Line Location: PRT+30
Function Call: WRITE
  • Prompt: !?19,"** Assigned Person Altered **"
  • Line Location: PRT+31
Function Call: WRITE
  • Prompt: !?19,"** Date Signed Altered **"
  • Line Location: PRT+32
Function Call: WRITE
  • Prompt: !?4,"Current Status: ",$$GET1^DIQ(6916.3,ENI_",",20),?35,"Date: ",$$GET1^DIQ(6916.3,ENI_",",21)
  • Line Location: PRT+33
Function Call: WRITE
  • Prompt: !!
  • Line Location: PRT+36
Function Call: WRITE
  • Prompt: !,$G(^ENG(6916.2,ENVR,1,ENI,0))
  • Line Location: PRT+39
Function Call: WRITE
  • Prompt: @IOF,?5,"Signature Dates"
  • Line Location: DATES+10
Function Call: WRITE
  • Prompt: !?5,$P(^TMP($J,"ENITRRH","DATES",ENI),U)
  • Line Location: DATES+14
Function Call: WRITE
  • Prompt: !?3,"* No Signed Assignments *"
  • Line Location: DATES+15
Function Call: WRITE
  • Prompt: !
  • Line Location: DATES+16
Routine Call
  • %ZIS
  • Line Location:
    • ITST2+6
    • USER+4
Routine Call
  • %ZIS
  • Line Location:
    • ITST2+7
    • USER+5
Routine Call
  • DIC
  • Line Location:
    • ITST2+3
Routine Call
  • DIR
  • Line Location:
    • USER+1
    • PRT+41
    • DATES+13
    • DATES+15
    • DATES+19

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GET1^DIQ
^DIC(6910 - [#6910] GET1^DIQ
^ENG(6914 - [#6914] GETS^DIQ
^ENG(6916.3 - [#6916.3] GET1^DIQ
6916.31 GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(6910 - [#6910] PRT+3
^ENG(6916.2 - [#6916.2] PRT+5, PRT+20, PRT+37, PRT+39
^ENG(6916.3 - [#6916.3] USER+1, IN2+3, IN2+4, IN2+7, IN2+8, IN2+10, PRT+17, PRT+22, PRT+23, DATES+3
, DATES+4, DATES+7, DATES+8
^TMP($J IN2+5*, IN2+11*, IN2+13, PRT+7, PRT+9, PRT+15, EX2+1!, DATES+1!, DATES+5*, DATES+9*
, DATES+12, DATES+14, DATES+18, DATES+20!

Label References

Name Line Occurrences
$$DATES ITST2+5, USER+3
EX2 IN2+14
HDR1 PRT+4, PRT+13, PRT+24, PRT+25, PRT+29, PRT+30, PRT+31, PRT+32, PRT+33, PRT+35
, PRT+38
IN2 ITST2+8, USER+6
PRT IN2+13

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %ZIS ITST2+6*, USER+4*
DIC ITST2+2~*
DIC("S" ITST2+2*
DIC(0 ITST2+2*
DIR USER+1!, IN2+1~, PRT+41!, DATES+13!, DATES+15!, DATES+17!, DATES+19!
DIR("?" DATES+17*
DIR("A" DATES+17*
DIR("B" DATES+18*
DIR(0 USER+1*, PRT+41*, DATES+13*, DATES+15*, DATES+17*
DIROUT IN2+1~, DATES+1~, DATES+16!, DATES+19
DIRUT IN2+1~, PRT+4, PRT+7, PRT+9, PRT+13, PRT+24, PRT+25, PRT+29, PRT+30, PRT+31
, PRT+32, PRT+33, PRT+34, PRT+35, PRT+37, PRT+38, PRT+40, DATES+1~, DATES+12, DATES+13
, DATES+16!, DATES+19
DT DATES+1*, DATES+17
DTOUT ITST2+2~, ITST2+3, IN2+1~, DATES+1~, DATES+16!
DUOUT ITST2+2~, ITST2+3, IN2+1~, DATES+1~, DATES+16!
DUZ USER+1, USER+2
ENCNT DATES+1~, DATES+11*, DATES+14*, DATES+15, DATES+18
END PRT+1~, PRT+10~
END(6914 PRT+12
ENDA ITST2+1~, ITST2+4*, USER+2~*, IN2+3, PRT+2, EX2+1!, DATES+3
ENDAC PRT+1~, PRT+11*, PRT+12
ENDATE ITST2+1~, ITST2+5*, USER+2~, USER+3*, IN2+5, IN2+9, EX2+1!, DATES+1~*, DATES+20*, DATES+21
ENEQPT PRT+1~*, PRT+34*
ENERR PRT+1~, PRT+10~, PRT+16!
ENERR1 PRT+10~, PRT+20*, PRT+29
ENERR2 PRT+10~, PRT+21*, PRT+30
ENERR3 PRT+10~, PRT+22*, PRT+31
ENERR4 PRT+10~, PRT+23*, PRT+32
ENI IN2+1~, IN2+2*, IN2+3*, IN2+4, IN2+5, IN2+7, IN2+8, IN2+10, IN2+11, IN2+12*
, IN2+13*, PRT+1~, PRT+8*, PRT+9*, PRT+15, PRT+33, PRT+37*, PRT+39, DATES+1~, DATES+2*
, DATES+3*, DATES+4, DATES+7, DATES+8, DATES+11*, DATES+12*, DATES+14
ENJ IN2+1~, IN2+6*, IN2+7*, IN2+8, IN2+11, DATES+1~, DATES+6*, DATES+7*, DATES+8
ENL IN2+1~, DATES+1~, DATES+10*, DATES+13*, DATES+14*
ENL( IN2+5*, IN2+11*
ENLNCNT PRT+1~, PRT+13, PRT+14*, PRT+24*, PRT+25, PRT+28*, PRT+29*, PRT+30*, PRT+31*, PRT+32*
, PRT+33*, PRT+35, PRT+36*, PRT+38, PRT+39*
ENMFGN PRT+1~, PRT+12*, PRT+14
ENMODEL PRT+1~, PRT+12*, PRT+14
ENNAME PRT+1~, PRT+2*
ENNBR IN2+1~, IN2+5*, IN2+10*, IN2+11, PRT+1~, PRT+6*, PRT+7*, PRT+9, PRT+11, PRT+14
, PRT+15, PRT+21
ENNOW PRT+1~, PRT+2*
ENPG PRT+1~*
ENRDA PRT+1~, PRT+15*, PRT+17, PRT+19, PRT+22, PRT+23, PRT+26, PRT+27
ENRDA1 PRT+1~, PRT+15*, PRT+17, PRT+23, PRT+26, PRT+27
ENSERNBR PRT+1~, PRT+12*, PRT+14
ENSIG PRT+1~, PRT+16!, PRT+19*, PRT+24
ENSIGNDT PRT+1~, PRT+16!, PRT+19*, PRT+24, PRT+25
ENSTN PRT+1~, PRT+3*
ENV IN2+1~, IN2+5*, IN2+10*, IN2+11, PRT+1~, PRT+6*, PRT+7, PRT+9, PRT+15
ENVR IN2+1~, IN2+13*, PRT+5, PRT+6, PRT+20, PRT+37, PRT+39
ENX IN2+1~, IN2+4*, IN2+5, IN2+8*, IN2+9, IN2+10, PRT+1~, DATES+1~, DATES+4*, DATES+5
, DATES+8*, DATES+9
IO PRT
IO("Q" ITST2+7!, USER+5!
IOF DATES+10
IOSL PRT+13, PRT+24, PRT+25, PRT+29, PRT+30, PRT+31, PRT+32, PRT+33, PRT+35, PRT+38
, DATES+13
IOST PRT+41
POP ITST2+6!, USER+4!
U IN2+5, IN2+9, IN2+10, PRT+5, PRT+15, PRT+19, PRT+20, PRT+21, PRT+22, PRT+23
, DATES+4, DATES+8, DATES+14
X PRT+1~, PRT+17*, PRT+18, PRT+19, PRT+20, PRT+21, PRT+22, PRT+23, DATES+1~
X1 PRT+10~, PRT+19*
X2 PRT+10~, PRT+19*
Y ITST2+3, ITST2+4, PRT+1~, DATES+1~, DATES+19*, DATES+20
>> ZTDESC ITST2+7*, USER+5*
>> ZTQUEUED EX2
>> ZTREQ EX2*
>> ZTRTN ITST2+7*, USER+5*
>> ZTSAVE("ENDA" ITST2+7*, USER+5*
>> ZTSAVE("ENDATE" ITST2+7*, USER+5*
ZTSK ITST2+7!, USER+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