Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: ECXTRANS

Package: DSS Extracts

Routine: ECXTRANS


Information

ECXTRANS ;ALB/GTS,JAP,BIR/DMA-Extract from Local Editing Files and Transmit ;3/29/17 15:15

Source Information

Source file <ECXTRANS.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;entry point
AGAIN
START
SEND(ECXXMZ) ;send individual messages
SENDLOC ; send message to mail group 'DSS-ECGRP'
CLEAN ;clean-up
PAUSE ;pause screen
FODMN(DOMAIN)

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Your user setup will only allow you to transmit extracts from the"
  • Line Location: EN+14
Function Call: WRITE
  • Prompt: !,"following divisions:",!
  • Line Location: EN+15
Function Call: WRITE
  • Prompt: !," ",$G(ECXDIC(4,DA,.01,"I"))
  • Line Location: EN+19
Function Call: WRITE
  • Prompt: !!,"If you can't select an extract, it is probably from another division.",!
  • Line Location: EN+20
Function Call: WRITE
  • Prompt: !!
  • Line Location: AGAIN+6
Function Call: WRITE
  • Prompt: !!,ECXDIQ(727,ECDA,6,"E")_" Extract (#"_ECDA_")",?42,"Records: ",ECXDIQ(727,ECDA,5,"E")
  • Line Location: AGAIN+21
Function Call: WRITE
  • Prompt: !,"Generated on: ",ECXDIQ(727,ECDA,1,"E"),?42,"Start date: ",ECXDIQ(727,ECDA,3,"E")
  • Line Location: AGAIN+22
Function Call: WRITE
  • Prompt: !,"Division: ",$E(ECXDIQ(727,ECDA,15,"E"),1,26),?42,"End date: ",ECXDIQ(727,ECDA,4,"E")
  • Line Location: AGAIN+23
Function Call: WRITE
  • Prompt: !!,"The data was extracted using "_X_"fiscal year "_$E(ECXDIQ(727,ECDA,14,"I"),1,4)_" logic."
  • Line Location: AGAIN+25
Function Call: WRITE
  • Prompt: !!,"MailMan transmission of the "_ECXDIQ(727,ECDA,2,"E")_" extract is set to a"
  • Line Location: AGAIN+26
Function Call: WRITE
  • Prompt: !,"limit of 131,000 bytes per message. Each extract record ends with a ^~."
  • Line Location: AGAIN+27
Function Call: WRITE
  • Prompt: !!
  • Line Location: AGAIN+79
Function Call: WRITE
  • Prompt: !
  • Line Location: PAUSE+3
Function Call: WRITE
  • Prompt: !
  • Line Location: PAUSE+4
Function Call: WRITE
  • Prompt: !!
  • Line Location: PAUSE+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(4 - [#4] Classic Fileman Calls
^ECX(727 - [#727] Classic Fileman Calls,  FIELD^DID
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call