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 |  Marked Items  | All
Print Page as PDF
Routine: ECXUTL1

Package: DSS Extracts

Routine: ECXUTL1


Information

ECXUTL1 ;ALB/GTS - Utilities for DSS Extracts ;4/4/19 15:09

Source Information

Source file <ECXUTL1.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Kernel 4 (,HOME)^%ZIS  ($$DT,$$FMADD)^XLFDT  $$UP^XLFSTR  $$VERSION^XPDUTL  
VA FileMan 2 $$GET1^DIQ  ^DIR  
DSS Extracts 1 $$ECXYM^ECXUTL  
MailMan 1 ^XMD  

Caller Graph

Caller Graph Total: 57

Package Total Caller Graph
DSS Extracts 57 ECX3049  ECXAADM  ECXADM  ECXAECQ  ECXAECS  ECXALAB  ECXALAR  ECXAMOV  
ECXAPHA  ECXAPRO  ECXAPRO2  ECXARAD  ECXASUR  ECXATRT  ECXBSC  ECXCBFK  
ECXCPRO  ECXDEFIN  ECXDIVIV  ECXDRUG1  ECXEC  ECXECMDI  ECXFEKEY  ECXFELOC  
ECXINDIV  ECXLARA  ECXLARPT  ECXLBBC  ECXLOG  ECXLPRO  ECXNCL  ECXOBSUR  
ECXPCT  ECXPHAA  ECXPLBB  ECXPROCT  ECXPROMR  ECXPROUI  ECXRACPT  ECXSARAD  
ECXSARXS  ECXSASUR  ECXSCLD1  ECXSCRP  ECXSCX3  ECXSCXN  ECXSCXN1  ECXTAUTO  
ECXTLOCL  ECXTPR  ECXTRAC  ECXTRANS  ECXUCBOC  ECXUEC  ECXUPRO  ECXUSUR  
ECXWRD  

Entry Points

Name Comments DBIA/ICR reference
CYFY(ECXFMDT) ;** Return the calandar and fiscal years for a FM date
FISCAL(DATE)
DTRNG() ;** Prompt the user for a date range
STRIP(ECXFIELD,ECXLGTH,ECXPOS) ;* Strip blanks from a padded field
PAD(ECXVAL,ECXLGTH,ECXFB,ECXCHAR) ;* Pad the value passed in with ECXCHAR
BLDXREF(START,END) ;Build temporary xref from EDIS LOG file #230 API added in patch 136
EDIS(ECXDFN,ECD,ECETYPE,ECXVISIT,ECXSTOP) ;Find emergency room disposition, if it exists, and translate it to a value for DSS. API added with patch 136
TRANS(DISP) ;Translate disposition to set of codes. API added in patch 136
ERR ;Send email when scheduling system reports an error. API added in patch 136
EXPORT() ;Function indicates if report output is going to a device or to the screen in exportable format - API added in patch 144
EXPDISP ;Displays report in exportable format. API added in patch 144
REPORTFY(NAME) ;Function added in patch 144, determines which version of the report to run
SAMPLE ;;API^ROUTINE

External References

Name Field # of Occurrence
^%ZIS EXPDISP+15
HOME^%ZIS EXPDISP+20
$$GET1^DIQ BLDXREF+5, EDIS+7, EDIS+10, EDIS+11, TRANS+2
^DIR DTRNG+8, DTRNG+19, EXPORT+5, EXPDISP+19, REPORTFY+13
$$ECXYM^ECXUTL FISCAL+6
$$DT^XLFDT FISCAL+5
$$FMADD^XLFDT BLDXREF+2, BLDXREF+3, EDIS+5, EDIS+6
$$UP^XLFSTR TRANS+2
^XMD ERR+12
$$VERSION^XPDUTL EDIS+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: DTRNG+6
Function Call: WRITE
  • Prompt: !
  • Line Location: EXPORT+2
Function Call: WRITE
  • Prompt: !!,"Gathering data for export..."
  • Line Location: EXPORT+7
Function Call: WRITE
  • Prompt: !,"No data found for this report."
  • Line Location: EXPDISP+2
Function Call: WRITE
  • Prompt: !!,"To ensure all data is captured during the export:"
  • Line Location: EXPDISP+4
Function Call: WRITE
  • Prompt: !!,"1. In reflections, change the row margin by clicking on one of the change margin",!," icons with a value of 225 or higher if you have them."
  • Line Location: EXPDISP+5
Function Call: WRITE
  • Prompt: !," You may also set the margin manually by clicking on appearance, expanded",!," terminal settings (arrow in lower right corner), set up display settings."
  • Line Location: EXPDISP+6
Function Call: WRITE
  • Prompt: !," Scroll to the bottom and change the number of characters per row to 225"
  • Line Location: EXPDISP+7
Function Call: WRITE
  • Prompt: !," or higher. Click 'OK' to save your change."
  • Line Location: EXPDISP+8
Function Call: WRITE
  • Prompt: !,"2. Click on 'capture setup' or 'tools, logging (arrow in lower right corner)'",!," depending on your setup. Ensure the logging settings form only has 'to disk'",!," selected and enter"
  • Line Location: EXPDISP+9
Function Call: WRITE
  • Prompt: " the path and filename where the output should be stored."
  • Line Location: EXPDISP+10
Function Call: WRITE
  • Prompt: !,"3. Click 'start capture' or 'start logging', depending on your interface."
  • Line Location: EXPDISP+11
Function Call: WRITE
  • Prompt: !,"4. The DEVICE input for the columns should also contain a large enough",!," parameter (e.g. 225). The DEVICE prompt is defaulted to 0;225;99999 for you.",!," You may change it if need be."
  • Line Location: EXPDISP+12
Function Call: WRITE
  • Prompt: !,"Example: DEVICE: 0;225;99999 *Where 0 is your screen, 225 is the margin width",!?17,"and 99999 is the screen length."
  • Line Location: EXPDISP+13
Function Call: WRITE
  • Prompt: !!,"NOTE: In order for all number fields, such as SSN and Feeder Key, to be",!,"displayed correctly in the spreadsheet, these fields must be formatted as Text",!,"when importing the data into the spreadsheet.",!
  • Line Location: EXPDISP+14
Function Call: WRITE
  • Prompt: !,^TMP($J,"ECXPORT",I)
  • Line Location: EXPDISP+16
Function Call: WRITE
  • Prompt: !!,"Click 'stop capture' or 'tools, stop logging' to end logging..."
  • Line Location: EXPDISP+17
Function Call: WRITE
  • Prompt: !,"...Then, pull your export text file into your spreadsheet.",!
  • Line Location: EXPDISP+18
Function Call: WRITE
  • Prompt: !
  • Line Location: REPORTFY+8
Routine Call
  • %ZIS
  • Line Location:
    • EXPDISP+15
Routine Call
  • %ZIS
  • Line Location:
    • EXPDISP+20
Routine Call
  • DIR
  • Line Location:
    • DTRNG+8
    • DTRNG+19
    • EXPORT+5
    • EXPDISP+19
    • REPORTFY+13

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^EDP(230 - [#230] GET1^DIQ
^EDPB(233.1 - [#233.1] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^EDP(230 - [#230] BLDXREF+4, BLDXREF+5, EDIS+9, EDIS+10
^TMP($J BLDXREF+5*, EDIS+7, ERR+2, ERR+9, EXPDISP+2, EXPDISP+16

Label References

Name Line Occurrences
$$CYFY DTRNG+14
$$TRANS EDIS+14

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT DTRNG+10!, DTRNG+22!
%ZIS EXPDISP+1~, EXPDISP+15*
%ZIS("B" EXPDISP+15*
CNT ERR+1~, ERR+7*, ERR+8*, ERR+9*, ERR+10*
CODE TRANS+1~, TRANS+2*, TRANS+3
DATE FISCAL~, FISCAL+5*, FISCAL+6*, FISCAL+7, FISCAL+8, EDIS+1~, EDIS+7*
DIR DTRNG+8!, DTRNG+22!, EXPORT+1~, EXPDISP+1~, REPORTFY+6~
DIR("?" DTRNG+7*, DTRNG+18*, EXPORT+3*, REPORTFY+10*, REPORTFY+11*, REPORTFY+12*
DIR("A" DTRNG+6*, DTRNG+17*, EXPORT+4*, EXPDISP+19*, REPORTFY+9*
DIR("B" EXPORT+4*, REPORTFY+9*
DIR(0 DTRNG+6*, DTRNG+16*, EXPORT+4*, EXPDISP+19*, REPORTFY+9*
DIROUT EXPORT+1~, REPORTFY+6~
DIRUT DTRNG+9, DTRNG+10!, DTRNG+21, DTRNG+22!, EXPORT+1~, EXPORT+6, EXPDISP+1~, REPORTFY+6~
DISP EDIS+1~, EDIS+4, EDIS+7*, EDIS+11*, EDIS+12, EDIS+13, EDIS+14, TRANS~, TRANS+2
DSP TRANS+1~, TRANS+2*, TRANS+4, TRANS+5, TRANS+6, TRANS+7, TRANS+8, TRANS+9
DT DTRNG+15
DTOUT DTRNG+10!, DTRNG+22!, EXPORT+1~, EXPDISP+1~, REPORTFY+6~
DUOUT DTRNG+10!, DTRNG+22!, EXPORT+1~, EXPDISP+1~, REPORTFY+6~
DUZ ERR+3
ECD EDIS~, EDIS+5, EDIS+6, EDIS+10
ECETYPE EDIS~, EDIS+3, EDIS+4, EDIS+8
>> ECGRP ERR+4
ECXBEG DTRNG+2~, DTRNG+9*, DTRNG+13, DTRNG+14, DTRNG+16, DTRNG+21
ECXCHAR PAD~, PAD+11, PAD+14, PAD+15
ECXDFN EDIS~, EDIS+7, EDIS+10
ECXEND DTRNG+2~, DTRNG+20*, DTRNG+21
ECXFB PAD~, PAD+11, PAD+14, PAD+15
ECXFIELD STRIP~, STRIP+16, STRIP+17*, STRIP+21, STRIP+22*, STRIP+25
ECXFMDT CYFY~, CYFY+10*, CYFY+11, CYFY+12, CYFY+13
ECXLGTH STRIP~, STRIP+11, STRIP+22, STRIP+24, PAD~, PAD+11, PAD+12, PAD+13
ECXLPCT PAD+10~, PAD+13*
ECXPOS STRIP~, STRIP+11, STRIP+12, STRIP+15, STRIP+20
ECXPVAL STRIP+10~, STRIP+11*, STRIP+12*, STRIP+16, STRIP+17, STRIP+18*, STRIP+19, STRIP+22, STRIP+23*, STRIP+24
ECXRNG DTRNG+2~, DTRNG+3*, DTRNG+21*, DTRNG+23
ECXSTOP EDIS~, EDIS+3, EDIS+8
ECXVAL PAD~, PAD+11, PAD+12*, PAD+14*, PAD+15*, PAD+16*, PAD+17
ECXVAR PAD+10~, PAD+12*, PAD+13
ECXVISIT EDIS~, EDIS+9
END BLDXREF~, BLDXREF+3
ENDRNG DTRNG+2~, DTRNG+14*, DTRNG+15*, DTRNG+16
ENDT BLDXREF+1~, BLDXREF+3*, BLDXREF+4, EDIS+1~, EDIS+6*, EDIS+7
I ERR+1~, ERR+9*, EXPDISP+1~, EXPDISP+16*
IEN BLDXREF+1~, BLDXREF+5*, EDIS+1~, EDIS+9*, EDIS+10*!, EDIS+11
NAME REPORTFY~
PIEN BLDXREF+1~, BLDXREF+5*
POP EXPDISP+1~, EXPDISP+15
QVAL STRIP+10~, STRIP+13*, STRIP+14, STRIP+16*, STRIP+19*, STRIP+21*, STRIP+24*
SITE BLDXREF+1~, BLDXREF+4*, BLDXREF+5
START BLDXREF~, BLDXREF+2
STDT BLDXREF+1~, BLDXREF+2*, BLDXREF+4, EDIS+1~, EDIS+5*, EDIS+7
TEXT ERR+1~
TEXT( ERR+7*, ERR+8*, ERR+9*, ERR+10*
TIME BLDXREF+1~, BLDXREF+4*, BLDXREF+5
VAL EXPORT+1~, EXPORT+6*, EXPORT+7, EXPORT+8
X CYFY+8~, CYFY+9*, CYFY+14*, CYFY+15, EXPORT+1~, EXPDISP+1~, REPORTFY+6~
XMDUZ ERR+1~, ERR+5*
XMSUB ERR+1~, ERR+6*
XMTEXT ERR+1~, ERR+11*
XMY ERR+1~
XMY( ERR+3*
XMY("G.DSS-" ERR+4*
XMZ ERR+1~
Y CYFY+8~, CYFY+12*, CYFY+13, CYFY+14, DTRNG+9, DTRNG+10!, DTRNG+20, DTRNG+22!, EXPORT+1~, EXPORT+6
EXPDISP+1~, REPORTFY+6~, REPORTFY+14, REPORTFY+15
Y2 CYFY+8~, CYFY+12*, CYFY+13*, CYFY+14
YEAR FISCAL+4~, FISCAL+7*, FISCAL+8*, FISCAL+9

Marked Items

Name Field # of Occurrence
$T(@NAME REPORTFY+7, REPORTFY+15
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 |  Marked Items  | All