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

Package: DSS Extracts

Routine: ECXPROEL


Information

ECXPROEL ;ALB/DAN - Print Prosthetics Extract Edit Log; 11/2/06 8:54am ;4/5/16 12:53

Source Information

Source file <ECXPROEL.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA FileMan 3 ^%DT  EN1^DIP  ^DIR  
Kernel 1 ($$FMTE,$$HTE)^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
DSS Extracts 1 ECX PRO EXT EDIT LOG  

Entry Points

Name Comments DBIA/ICR reference
EN ;entry point from option
GETSORT ;Prompt for sorting order for report
PRINT ;Print report using fileman EN1^DIP for IVP
EXTNOI ;Extract Number
RPTHDR ;report header
DTRNG ;report date range
DTREP

External References

Name Field # of Occurrence
^%DT DTREP, DTREP+3
EN1^DIP PRINT+11
^DIR GETSORT+4, PRINT+14
$$FMTE^XLFDT DTREP+2, DTREP+9
$$HTE^XLFDT RPTHDR+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This option prints a log of the changes made to the Prosthetics"
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: !,"Extracts.",!
  • Line Location: EN+6
Function Call: WRITE
  • Prompt: !!,"** REPORT REQUIRES 132 COLUMNS TO PRINT CORRECTLY **"
  • Line Location: EN+10
Function Call: WRITE
  • Prompt: $P($G(^ECX(ECXFIL,+X,0)),"^",3)
  • Line Location: EXTNOI+1
Function Call: WRITE
  • Prompt: "PROSTHETICS EXTRACT EDIT LOG",?115,"Page ",PG,!
  • Line Location: RPTHDR+3
Function Call: WRITE
  • Prompt: "Printed on ",$$HTE^XLFDT($H)," for ",ECSD," to ",ECED,!
  • Line Location: RPTHDR+4
Function Call: WRITE
  • Prompt: "USER NAME",?24,"DATE/TIME CHANGED",?46,"SEQUENCE #",?61
  • Line Location: RPTHDR+5
Function Call: WRITE
  • Prompt: "EXTRACT #",?73,"FIELD NAME",?89,"OLD VALUE",?109,"NEW VALUE",!
  • Line Location: RPTHDR+6
Function Call: WRITE
  • Prompt: LN,!
  • Line Location: RPTHDR+7
Routine Call
  • DIR
  • Line Location:
    • GETSORT+4
    • PRINT+14

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIA - [#1.1] PRINT+12
^ECX( EXTNOI+1

Label References

Name Line Occurrences
DTREP DTREP+5, DTREP+7
DTRNG EN+11
GETSORT EN+9
PRINT EN+12

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT DTRNG+1~, DTREP*, DTREP+3*
%DT("A" DTREP*, DTREP+3*
%DT(0 DTREP*, DTREP+3*
BY PRINT+1~, PRINT+8*, PRINT+10*
DHD PRINT+1~, PRINT+6*
DIA PRINT+1~
DIC PRINT+1~, PRINT+3*
DIOBEG PRINT+1~, PRINT+3*
DIR GETSORT+1~, PRINT+1~
DIR("A" GETSORT+3*
DIR("B" GETSORT+3*
DIR(0 GETSORT+2*, PRINT+14*
DIRUT GETSORT+1~, GETSORT+5
ECDT DTRNG+1~, DTREP+2*, DTREP+5, DTREP+7
ECED EN+2~, PRINT+8, PRINT+10, RPTHDR+4, DTREP+9*
ECSD EN+2~, PRINT+8, PRINT+10, RPTHDR+4, DTREP+2*
ECXFIL PRINT+1~, PRINT+2*, PRINT+3, PRINT+12, EXTNOI+1
ECXFLG PRINT+1~, PRINT+2*, PRINT+12, RPTHDR+2*
FLDS PRINT+1~, PRINT+4*, PRINT+5*
FR PRINT+1~, PRINT+8*, PRINT+10*
IOST PRINT+14
L PRINT+1~, PRINT+3*
LN RPTHDR+1~, RPTHDR+7*
PG PRINT+1~, RPTHDR+2*, RPTHDR+3
QFLG EN+2~, EN+4*, EN+9, EN+11, GETSORT+5*, DTREP+1*, DTREP+4*
SORT EN+2~, GETSORT+6*, PRINT+7, PRINT+9
TO PRINT+1~, PRINT+8*, PRINT+10*
X GETSORT+1~, EXTNOI+1, DTRNG+1~
Y GETSORT+1~, GETSORT+6, DTRNG+1~, DTREP+1, DTREP+2, DTREP+4, DTREP+5, DTREP+7, DTREP+9
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All