Re: Work with Spooled Files

"MIDRANGE-L" <midrange-l-bounces@xxxxxxxxxxxx> wrote on 10/13/2016
10:05:51 AM:

This sounds like possibly an ongoing project, though. I know the

hardest

thing for most is the requisition process and that's a big factor for
most. But at the prices I offer ($280 a year) hopefully it would be

pretty

easy to get approval for...

I did notice your approval of the free use of your software as a
one-off. I thought it was commendable. But, yes, this is for a process
that will run every month and twice at year-end and needs to be able to
handle upwards of 600 or more spooled files each time for automatic
download to the network for archival storage and for sending to outside
auditors.

As for acquisition of 3rd-party software, it often isn't the cost
that gets in the way. There is a whole justification process here where
you have to prove you really need it -- and that other projects need it,
too. Since the spooled file information can be output to yet another
spooled file, copied to a flat database file, and parsed then they would
probably tell me to do it that way.

It is not that they don't like utilities or 3rd-party tools. We
have several 3rd-party tools. I have also created many utilities for them
and they really like most of these from a reusable code standpoint. They
just often don't like me taking the time to write them and would often
prefer that I use old-school methods, which can mostly be copied from
existing processes and reused as one-offs with a little tweaking.

Well, I don't like duplicated code or jumping through old-school
code hoops to get what I need. I like API's and adding functionality to
either CL or RPG. I like the command interface and I like service
procedures, too, which I've written hundreds of those here, too. Even
simple things like the following are very valuable to me.

Would you rather see this in code?

if pString > *blanks
and %check('0123456789':pString) = *zero;
// do something
endif;

Or this? (which I consider to be self-documenting)

if CrsApp_isDigits(pString);
// do something
endif;

Sincerely,

Dave Clark
--
int.ext: 91078
direct: (937) 531-6378
home: (937) 751-3300

Winsupply Group Services
3110 Kettering Boulevard
Dayton, Ohio 45439 USA
(937) 294-5331




************************************************************
*********************************
This email message and any attachments is for use only by the named
addressee(s) and may contain confidential, privileged and/or proprietary
information. If you have received this message in error, please
immediately notify the sender and delete and destroy the message and all
copies. All unauthorized direct or indirect use or disclosure of this
message is strictly prohibited. No right to confidentiality or privilege
is waived or lost by any error in transmission.
************************************************************
*********************************
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.