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 ;2/11/14 13: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: 53

Package Total Caller Graph
DSS Extracts 53 ECX3049  ECXAADM  ECXADM  ECXAECQ  ECXAECS  ECXALAB  ECXALAR  ECXAMOV  
ECXAPHA  ECXAPRO  ECXAPRO2  ECXARAD  ECXASUR  ECXATRT  ECXBSC  ECXCPRO  
ECXDEFIN  ECXDIVIV  ECXDRUG1  ECXEC  ECXFEKEY  ECXFELOC  ECXLARA  ECXLARPT  
ECXLBBC  ECXLOG  ECXLPRO  ECXNCL  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+9
HOME^%ZIS EXPDISP+14
$$GET1^DIQ BLDXREF+5, EDIS+7, EDIS+10, EDIS+11, TRANS+2
^DIR DTRNG+8, DTRNG+19, EXPORT+5, EXPDISP+13, 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+3
Function Call: WRITE
  • Prompt: !!,"1. Select 'Logging...' from the File Menu. Select your file, and where to save."
  • Line Location: EXPDISP+4
Function Call: WRITE
  • Prompt: !,"2. On the Setup menu, select 'Display...',then 'screen' tab and modify 'columns'",!," setting to at least 225 characters."
  • Line Location: EXPDISP+5
Function Call: WRITE
  • Prompt: !,"3. 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+6
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+7
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+8
Function Call: WRITE
  • Prompt: !,^TMP($J,"ECXPORT",I)
  • Line Location: EXPDISP+10
Function Call: WRITE
  • Prompt: !!,"Turn off your logging..."
  • Line Location: EXPDISP+11
Function Call: WRITE
  • Prompt: !,"...Then, pull your export text file into your spreadsheet.",!
  • Line Location: EXPDISP+12
Function Call: WRITE
  • Prompt: !
  • Line Location: REPORTFY+8
Routine Call
  • %ZIS
  • Line Location:
    • EXPDISP+9
Routine Call
  • %ZIS
  • Line Location:
    • EXPDISP+14
Routine Call
  • DIR
  • Line Location:
    • DTRNG+8
    • DTRNG+19
    • EXPORT+5
    • EXPDISP+13
    • 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+10

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+9*
%ZIS("B" EXPDISP+9*
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+13*, REPORTFY+9*
DIR("B" EXPORT+4*, REPORTFY+9*
DIR(0 DTRNG+6*, DTRNG+16*, EXPORT+4*, EXPDISP+13*, 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+10*
IEN BLDXREF+1~, BLDXREF+5*, EDIS+1~, EDIS+9*, EDIS+10*!, EDIS+11
NAME REPORTFY~
PIEN BLDXREF+1~, BLDXREF+5*
POP EXPDISP+1~, EXPDISP+9
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