|
We ran into a similar issue that blew this idea up. We have a non volatile object library in which we store items like programs, display files, printer files and data files that they shouldn't change. Give the users *USE access to objects in that library. Let's call this library xxxO. Then their regular data is stored in another library. Let's call that one xxxF. Here they have *ALL. Granted this is green screen dependent but let's let that rest for now. Now would you agree that the file they are doing a CRTDUPOBJ from should be in xxxO? Remembering that it doesn't store any data, it's just there for file layout. Now when you do a CRTDUPOBJ it will fail because that stupid command requires more than *USE authority to the file, even with DUPDTA(*NO). The workaround was to save the file from QTEMP into a save file stored in xxxO. Then when you want the layout you do a RSTOBJ versus a CRTDUPOBJ. The beauty of this is that if you've a bunch of logical files then all related elements can be in the same save file. Rob Berendt ================== A smart person learns from their mistakes, but a wise person learns from OTHER peoples mistakes. Jim Langston <jlangston@celsinc. To: "'midrange-l@midrange.com'" <midrange-l@midrange.com> com> cc: Sent by: Fax to: midrange-l-admin@mi Subject: RE: How to create a jeyed file without DDS drange.com 10/23/2001 11:09 AM Please respond to midrange-l Denis, When I did this to my S36 OCLs and converted them to CLP, what I did was build the file in a data library using DDS with my keys and everything that was specified in the BLDFILE instruction. At the point in the OCL where it did the BLDFILE I would do something like: CRTDUPOBJ QS36F/AP035TMP QTEMP/AP035TMP DUPDTA(*NO) although you'll probably have to correct the syntax on that. In most cases that was all that was needed, if the OCL created and opened the file using the library list. If not, I just had to either change the hard coded library to use the library list, or change it to QTEMP as appropriate. HTH, Regards, Jim Langston From: midrange-l-admin@midrange.com [mailto:midrange-l-admin@midrange.com]On Behalf Of Denis Robitaille Sent: Tuesday, October 23, 2001 9:14 AM To: MIDRANGE-L@midrange.com Subject: How to create a jeyed file without DDS Hello all, In our effort to eliminate our S36 code, I was ask to develop a command to replace the BLDFILE instruction. This command will do some extra processing for us. My problem is the following: I have no problem creating a sequential file without a DDS source member but I do not know how to create a keyed file without a DDS source member. The CRTPF command does not offer me the option to specify a key. Any idea? Thanks Denis Robitaille Directeur services techniques Cascades Inc 819 363 5187 fax 819 363 5177 _______________________________________________ This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list To post a message email: MIDRANGE-L@midrange.com To subscribe, unsubscribe, or change list options, visit: http://lists.midrange.com/cgi-bin/listinfo/midrange-l or email: MIDRANGE-L-request@midrange.com Before posting, please take a moment to review the archives at http://archive.midrange.com/midrange-l.
As an Amazon Associate we earn from qualifying purchases.
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.