There is also a QS36SBR file for subroutines, but I don't recall exactly what that was used for.
Rich
________________________________
On 8/7/2025 9:42 AM, Rich Loeber wrote:
If memory serves me correctly, the compiled DFU program was stored in a file named QS36LOD. The other S36EE files are QS36SRC for program source including the RPG file description file and QS36PRC which stores the OCL scripts.
Rich Loeber
Kisco Systems LLC
https://www.kisco.com
On 8/6/2025 2:32 PM, Jim Franz wrote:
(i love help text - i did this with STRS36 command (on a system not
defaulted to S36, but S36 is loaded), ENTER (the procedure) and F1 for
help (might be cursor sensitive to top of screen)
*see page 4*
HELP FOR ENTER PROCEDURE Page 1 of 5
DESCRIPTION
The ENTER procedure allows you to create a data file using the data
file
utility (DFU). File definitions are used to define the format of the
records in the file.
KEYS YOU CAN USE ON ENTER PROCEDURE DISPLAY
F3 = Exit help
F16 = Display the main menu
F18 = Display your initial menu
Home = Display your sign-on menu
HELP FOR ENTER PROCEDURE Page 2 of 5
Name of file to be created . . . . . . . . . . . . . . . . . .
The file name can be from 1 to 8 alphameric characters. The first
character must be alphabetic (A through Z, #, @, $) and it must not
contain
blanks, commas, or quotes ('). It also must not be ALL, SYSTEM, NEW or
DIR.
Name of file on disk, if different . . . . . . . . . . . . . .
This refers to the name of the file on disk if it is different from the
name of the file to be created. It is an optional parameter. If this
parameter is not provided, then the name of the file on disk will be
the same as the name of the file to be created. This parameter is also
referred to as FILE LABEL.
HELP FOR ENTER PROCEDURE Page 3 of 5
Name of DFU program . . . . . . . . . . . . . . . . . . . . . .
Name of the program description to be used to process the file. If the
program does not exist in the library, DFU starts the setup procedures
to
create the program. If the program does exist in the library, DFU runs
it.
To change an existing DFU program, leave this name blank and specify
the
name of the program to be changed in the DFU specification source
member
parameter. This is an optional parameter. If both the DFU program name
and
the DFU specification source member name are not provided, DFU starts
the
setup procedures to create a temporary program.
Number of records to be in file . . . . . . . . . . . 1-8000000
Maximum number of records you want to enter in the file. You can
enter
any number from 1 through 8,000,000.
HELP FOR ENTER PROCEDURE Page 4 of 5
Name of library . . . . . . . . . . . . . . . . . . . . . . . .
All library members associated with the DFU job are looked for, or
stored,
in this library. If no name is specified, the current library is
assumed.
*Name of file definition source member . . . . . . . . . . . . . *
* DFU uses the file definition information in this source member to create
the DFU program. It could be a set of RPG II F- and
I-specifications or a complete RPG II program. This source member
must already exist. *
*I my memory is correct, needs to be a QS36SRC source file and source
type RPG36, in a library in users or jobs library list *
Name of DFU specification source member . . . . . . . . . . . .
To change an existing DFU program, specify the name of the DFU program
in
this parameter. Leave the DFU program name parameter blank. Otherwise,
this
parameter is ignored.
HELP FOR ENTER PROCEDURE Page 5 of 5
Name of display source member, if to be saved . . . . . . . . .
This parameter is not valid. If you enter a value, an error message
is issued.
Jim Franz
On Wed, Aug 6, 2025 at 12:51 PM Jim Franz <franz9000@xxxxxxxxx><mailto:franz9000@xxxxxxxxx><mailto:franz9000@xxxxxxxxx><mailto:franz9000@xxxxxxxxx> wrote:
not always qs36f - the QS36ENV in #LIBRARY can be used to override
I've reached out to an active 36 pgmr for more info but my first guess is
that for source member - its the library list...
QS36F or another lib is the library of files (tables)
Jim Franz
Display Library
Library . . . . . . : #LIBRARY Number of objects . : 92
Type . . . . . . . . : PROD Library ASP number . : 1
Create authority . . : *SYSVAL Library ASP device . : *SYSBAS
Library ASP group . : *SYSBAS
Type options, press Enter.
5=Display full attributes 8=Display service attributes
Opt Object Type Attribute Size Text
Z4 *FILE PRTF 8192
QS36ENV *S36 49152
On Wed, Aug 6, 2025 at 12:46 PM Eric Lehti via MIDRANGE-L <
midrange-l@xxxxxxxxxxxxxxxxxx<mailto:midrange-l@xxxxxxxxxxxxxxxxxx><mailto:midrange-l@xxxxxxxxxxxxxxxxxx><mailto:midrange-l@xxxxxxxxxxxxxxxxxx>> wrote:
Oops, 1992 was 33 years ago, not 38 years ago.
Eric Lehti still retired. Doing Math in my head carries no guarantee of
accuracy
On Aug 6, 2025, at 11:38, Eric Lehti via MIDRANGE-L <
midrange-l@xxxxxxxxxxxxxxxxxx<mailto:midrange-l@xxxxxxxxxxxxxxxxxx><mailto:midrange-l@xxxxxxxxxxxxxxxxxx><mailto:midrange-l@xxxxxxxxxxxxxxxxxx>> wrote:
Doug, can you find that named “file definition source member” in one of
your production source files?
I doubt that it would be in a Q* file, but I not a reliable resource as I
last worked in the System/36 environment some 38 years ago in 1992-1993.
I do not remember the S/36 equivalent of IBMi library list of libraries
Eric Lehti - retired but not tired
On Aug 6, 2025, at 11:22, DEnglander--- via MIDRANGE-L <
midrange-l@xxxxxxxxxxxxxxxxxx<mailto:midrange-l@xxxxxxxxxxxxxxxxxx><mailto:midrange-l@xxxxxxxxxxxxxxxxxx><mailto:midrange-l@xxxxxxxxxxxxxxxxxx>> wrote:
I have an OCL that I am researching. It uses the ENTER command to allow
the user to enter data for processing using the remaining steps in the
OCL.
One of the parameters of the ENTER command is "Name of file definition
source member". In the OCL, there is a value here. How do I know what
Library DFU is looking in to get the source member? Is there a specific
Q*
file that would contain it? Would DFU use an existing program source of
the same name [which also uses this user entered file] to retrieve the F
and I specs for the file?
The Enter command is using the name in this parameter of an old RPGIII
program that I am trying to retire, but I don't want to retire it if this
OCL references it via the Enter command. The OCL still is used
occasionally.
I looked in the IBM S/36 Environment Reference manual, but it does not
seem to tell you where the Source member is located.
Any ideas?
Thank you,
Doug
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list
To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx<mailto:MIDRANGE-L@xxxxxxxxxxxxxxxxxx><mailto:MIDRANGE-L@xxxxxxxxxxxxxxxxxx><mailto:MIDRANGE-L@xxxxxxxxxxxxxxxxxx>
To subscribe, unsubscribe, or change list options,
visit:
https://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx<mailto:MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx><mailto:MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx><mailto:MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx>
Before posting, please take a moment to review the archives
at
https://archive.midrange.com/midrange-l.
Please contact support@xxxxxxxxxxxxxxxxxxxx<mailto:support@xxxxxxxxxxxxxxxxxxxx><mailto:support@xxxxxxxxxxxxxxxxxxxx><mailto:support@xxxxxxxxxxxxxxxxxxxx> for any subscription related
questions.
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list
To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx<mailto:MIDRANGE-L@xxxxxxxxxxxxxxxxxx><mailto:MIDRANGE-L@xxxxxxxxxxxxxxxxxx><mailto:MIDRANGE-L@xxxxxxxxxxxxxxxxxx>
To subscribe, unsubscribe, or change list options,
visit:
https://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx<mailto:MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx><mailto:MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx><mailto:MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx>
Before posting, please take a moment to review the archives
at
https://archive.midrange.com/midrange-l.
Please contact support@xxxxxxxxxxxxxxxxxxxx<mailto:support@xxxxxxxxxxxxxxxxxxxx><mailto:support@xxxxxxxxxxxxxxxxxxxx><mailto:support@xxxxxxxxxxxxxxxxxxxx> for any subscription related
questions.
midrange.com
