The original piece of this code did not take much time to develop. But it took me more than six months to post it to the board :).
After I worked on it initially, I never went back to it. My users are happy with it. They have asked for improvements which were part of my initial design scope. Never got around to coding that stuff. Hopefully there are enthusiasts amongst you who will finish the project.
Things to do:
- Add Type-3 report support
- Create output file in native excel format. To get specs on Excel and other spreadsheet/database program file formats go to www.wotsit.org
Code:
|******************************************************************************
|* zusfwexcel 0 VRC B50C b dev
|* Title : BaanXL
|* Author : Vamsi Potluru
|* Co-Author : Praveen Ambekar
|* Date : 2001-12-17 [17:17]
|******************************************************************************
|* License :
|* Copyright 2001 by Vamsi Potluru
|*
|* All Rights Reserved
|*
|* Permission to use, copy, modify, and distribute this software and its
|* documentation for any purpose and without fee is hereby granted,
|* provided that the above copyright notice appear in all copies and that
|* both that copyright notice and this permission notice appear in
|* supporting documentation.
|*
|* Vamsi Potluru DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS
|* SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY
|* AND FITNESS, IN NO EVENT SHALL Vamsi Potluru BE LIABLE FOR ANY
|* SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
|* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS,
|* WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
|* TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE
|* OR PERFORMANCE OF THIS SOFTWARE.
|******************************************************************************
long ret | general return variable
extern domain tcmcs.str215 input.file | input file - created by Baan
extern domain tcmcs.str215 argument
function main()
{
input.file = creat.tmp.file$(bse.tmp.dir$())
argument = argv$(3)
wait.and.activate("ttstpconv", argv$(1), input.file, "ASCII", argv$(4))
start.session(MODAL,"zusfw1400m000","","")
ret = seq.unlink(input.file)
}
|*********************************** end of script ****************************
I have a user manual for this one at work. Expect it when I post it :)
I have posted the user manual below. 19th July, 2002 8:35 AM PDT