Re: Re-creating a spool-file using USERSPACE -- RPG400-L

× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.

Logic update suggestion, as likely resolution from what I recall, is included inline to the original message below.

Regards, Chuck

DMarien@xxxxxxxxxxxx wrote:

We currently re-create spoolfiles using the following
logic and APIs (using chgsplf op cpysplf doesn't offer
sufficient functionality in our case) :
CrtUsrSpc : Create user space in QTEMP. Call 'QUSCRTUS' CrtSplFil : Create spooled file 2. Call 'QSPCRTSP' OpnSplFil : Open spooled file 1. Call 'QSPOPNSP'

call QSPOPNSP /* to get total number of buffers */
startwithbuffer=1
Do while startWithBuffer<=totalbuffers

GetSplFil : Get data spooled file 1. Call 'QSPGETSP' PutSplFil : Put data in spooled file 2. Call 'QSPPUTSP'

startwithbuffer=+buffersjustprocessed
endDo

CloSplFil : Close spooled file 1 & 2. Call 'QSPCLOSP' DltUsrSpc : Delete user space in QTEMP. Call 'QUSDLTUS'
However, we are facing the following problem :
some spoolfiles are larger than 16 MB and since the APIs
are using userspaces, the re-created spoolfile only
contains the first 16MB (hence the resulting spoolfile is incomplete). Is there an alternative for using the
userspace API's or a way to make userspaces
larger than 16 MB ??? All tips are welcome.... .

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.