Focal Point Banner
Community Center Education Summit Technical Support User Groups
Let's Get Social!

Facebook Twitter LinkedIn YouTube
Focal Point    Focal Point Forums  Hop To Forum Categories  iWay Software Product Forum on Focal Point    Uploading excel files and archiving them with datetimestamp
Go
New
Search
Notify
Tools
Reply
  
Uploading excel files and archiving them with datetimestamp
 Login/Join
 
Member
posted
L.S.

We have several excel-files which we receive on a monthly basis.

We have built a flow to upload the data in theses files to a SQL-table in our DWH using DataMigrator.
We have also built a postprocessing procedure to move the uploaded excelfile to an archive-folder
and add a datetime-stamp to the filename.

The postprocessing produre has the following code:
-SET &STAP1= STRIP(19, &DATEHYYMDS, '/', 'A17');
-SET &STAP2= STRIP(17, &STAP1, ':', 'A15');
-SET &STAP3= STRIP(15, &STAP2, ' ', 'A14');
-SET &STEMPEL = &STAP3 || '.';
 
COPY d:\extern\tbl_kostensoort_wf01.xls d:\extern\Backup_WKR\tbl_kostensoort_wf01_&STEMPEL.xls
DEL  d:\extern\tbl_kostensoort_wf01.xls


I wonder:

A. Is there a way using less programmingcode to get the current datetime in an amper variable in a numeric format?

B. Is there a way to move the excelfile without the DOS-codes COPY en DEL?

Kind regards,
Martijn Zwarts


WebFOCUS 7.7
Windows, All Outputs
 
Posts: 5 | Registered: September 11, 2012Reply With QuoteReport This Post
Virtuoso
posted Hide Post
-SET &T = '_' || &YYMD || '_' || EDIT(HHMMSS('A8'),'99$99$99');
 APP COPYF BASEAPP ATEST EXCEL BASEAPP ATEST&T EXCEL
 APP DELETEF BASEAPP ATSET EXCEL
-RUN  


"There is no limit to what you can achieve ... if you don’t care who gets the credit." Roger Abbott
 
Posts: 1096 | Location: Toronto, Ontario | Registered: May 26, 2004Reply With QuoteReport This Post
  Powered by Social Strata  
 

Focal Point    Focal Point Forums  Hop To Forum Categories  iWay Software Product Forum on Focal Point    Uploading excel files and archiving them with datetimestamp

Copyright © 1996-2018 Information Builders, leaders in enterprise business intelligence.