A practical scenario in using the jBASE ETL is feeding your bank’s accounting/ALM system with data from the T24 accounting tables on a daily basis.
Typically, you will want to extract the data from distribution (archived) files rather than the actual accounting tables. For example, instead of running the following:
td24 -server 10.10.59.42 -user INPUTT -pass 123456 -file FBNK.STMT.ENTRY -with "BOOKING.DATE EQ '20120109'"
You would use the distribution file instead:
td24 -server 10.10.59.42 -user INPUTT -pass 123456 -file FBNK.STMT.ENTRY.DIST01 -with "BOOKING.DATE EQ '20120109'"
Here is an ONLINE example of extracted data for the FBNK.CATEG.ENTRY table.
Other notable distribution files are the other 2 accounting tables as well as FBNK.FUNDS.TRANSFER$HIS. You would extract from their distribution files in a similar way:
td24 -server 10.10.59.42 -user INPUTT -pass 123456 -file FBNK.CATEG.ENT.DIST01 -with "BOOKING.DATE EQ '20120109'" td24 -server 10.10.59.42 -user INPUTT -pass 123456 -file FBNK.RE.CON.DIST01 -with "BOOKING.DATE EQ '20120109'" td24 -server 10.10.59.42 -user INPUTT -pass 123456 -file FBNK.FUNDS.TRANSFER$HIS.PART1 -with "PROCESSING.DATE EQ '20120109'"
To automate the extraction processing, simply create a script and have it run daily after the COB. Here’s an example in Wndows jscript:
var today = new Date();
var y= today.getFullYear();
var m = today.getMonth()+1;
var m1 = (m < 10 ? "0" : "") + m;
var d = today.getDate();
var d1 = (d < 10 ? "0" : "") + d;
var iso_date = (y + m1 + d1);
WScript.Echo("td24 -server 10.10.59.42 -user INPUTT -pass 123456 -file FBNK.STMT.ENTRY.DIST" + m1 + " -with \"BOOKING.DATE EQ '" + iso_date + "'\"");
WScript.Echo("td24 -server 10.10.59.42 -user INPUTT -pass 123456 -file FBNK.CATEG.ENT.DIST" + m1 + " -with \"BOOKING.DATE EQ '" + iso_date + "'\"");
WScript.Echo("td24 -server 10.10.59.42 -user INPUTT -pass 123456 -file FBNK.RE.CON.DIST" + m1 + " -with \"BOOKING.DATE EQ '" + iso_date + "'\"");
WScript.Echo("td24 -server 10.10.59.42 -user INPUTT -pass 123456 -file FBNK.FUNDS.TRANSFER$HIS.PART" + m + " -with \"PROCESSING.DATE EQ '" + iso_date + "'\"");
Simple, not a lot of hassle, and plain productive.


