EDTPARG - Global parameter settings

After the global parameter settings have been read with IEDTGET, EDT saves the

information in the EDTPARG control block.

Creating the EDTPARG control block

The Assembler macro IEDTPARG is used to generate the EDTPARG control block.

Name	Operation	Operands
[name]	IEDTPARG	[ {  D  | C } ] [,prefix] [,VERSION= {  1  | 2 } ]

name	– Symbolic name of the first DS statement when C is specified. – DSECT name if D is specified. If name is not specified then EDTPARG is used (preceded by prefix if specified).
D C	A dummy section (DSECT) is generated. A memory section with symbolic addresses is generated (no CSECT statement).
prefix	One character with which the generated field names should start. If prefix is not specified, E is used by default.
VERSION	Selects which version of the control block is to be generated: Version 1 is used with the V16 format of the interface. Version 2 is used with the V17 format of the interface.

If the macro IEDTPARG VERSION=2 is specified then the EDTPARG control block is

generated in the following form:

           IEDTPARG D,VERSION=2
1 EDTPARG  MFPRE DNAME=EDT,MF=D
2 EDTPARG  DSECT ,
2                *,##### PREFIX=I, MACID= #####
1 *--------------- EDT UNIT NUMBER, EDTPARL VERSION NUMBER --------------
1 EPGUNITC EQU   66                  EDT UNIT NUMBER
1 EPGVERSC EQU   2                   EDTPARG VERSION NUMBER
1 *--------------- CONTROL BLOCK EDTPARL --------------------------------
1 *                       *---- CONTROL BLOCK HEADER --------------------
1 EPGFHE   DS    0XL8                GENERAL OPERAND LIST HEADER
1 EPGIFID  DS    0A                  INTERFACE IDENTIFIER
1 EPGUNIT  DC    AL2(XPGUNITC)       UNIT NUMBER
1          DS    AL1                 RESERVED
1 EPGVERS  DC    AL1(XPGVERSC)       FUNCTION INTERFACE VERSION NUMBER
1          DS    A                   RESERVED
1 *                       *---- OUTPUT FIELDS ---------------------------
1 EPGMODE  DS    CL1                 EDT-MODE (F/L/C)
1 EPG@SYM  DS    CL1                 EDT-STATEMENT-SYMBOL
1 EPGWDS1  DS    H                   SIZE OF WINDOW 1
1 EPGWDS2  DS    H                   SIZE OF WINDOW 2
1 EPGFILE1 DS    CL8                 WORKFILE IN WINDOW 1
1 EPGFILE2 DS    CL8                 WORKFILE IN WINDOW 2
1          DS    XL10                RESERVED
1 *--------------- TOTAL LENGTH OF CONTROL BLOCK ------------------------
1 EPGPARGL EQU   *-EDTPARG

Meaning of the control block fields		Length (bytes)	Format	Parameter type
				Call	Return
EPGUNIT	Unique identification of EDT.	2	X	C(M)
EPGVERS	Control block version number.	1	X	C(M)
EPGMODE	Current mode: F = F mode L = L mode C = Caller (i.e. from a statement which is processed via the IEDTGLE interface).	1	P		R
EPG@SYM	EDT statement symbol	1	P		R
EPGWDS1	Window size 1 (2..24)	2			R
EPGWDS2	Window size 2 (0.0..22)	2			R
EPGFIL1	Work file in first window ($0..$22) padded with blanks	8	P		R
EPGFIL2	Work file in second window ($0..$22) padded with blanks	8	P		R

C (M)	Call parameter	Must be supplied by the caller. This is set by the macro (when the P parameter is set) and should not be changed by the user.
R X P	Return parameter Binary format Printable	Supplied by EDT. Binary digits Printable texts (in the character set EDF03IRV).

Changes compared to the V16 format

The EPGCCSN field is no longer used (it now has the name EPLCCSN in the control block EDTPARL). When the IEDTGET (PARG) interface is called, it is no longer necessary to enter a value in the EAMPREC field in AMCB.

When EDT V17.0A is called in Unicode mode with a version 1 EDTPARG control block, the EPGCCSN field is only set to a value other than blank if the same character set has been specified for all non-empty work files.

Compatible V17 format

No restrictions.