System Definition Data Area DC@A01

For reviewing and amending the details stored in these data areas, use the System Settings facility available from the Administration menu and described in Review System Settings.

This area is formatted as follows:

From Byte

To Byte

Byte Length

Type

Dec Pos

Description

1

10

10

A

 

Name of program library

11

20

10

A

 

Name of data library

21

30

10

A

 

Partition module library (execution time)

31

40

10

A

 

Name of system owner profile

41

45

5

A

 

Name of product (LANSA)

46

48

3

S

1

LANSA Version level

49

78

30

A

 

Name of company / organization

79

88

10

A

 

Partition security officer (execution time)

89

98

10

A

 

Spare Field

 

 

 

 

 

The following six function key assignments apply to internal LANSA programs in non-SAA/CUA partitions only. In SAA/CUA partitions the SAA/CUA partition function key assignments are used.

99

100

2

S

0

EXIT/SYSTEM function key

101

102

2

S

0

MENU/CANCEL function key

103

104

2

S

0

MESSAGES function key

105

106

2

S

0

ADD function key

107

108

2

S

0

CHANGE function key

109

110

2

S

0

DELETE function key

111

111

1

A

 

Partition unique prefix (execution time)

112

141

30

A

 

Default file SIZE parameter

142

145

4

A

 

Default file LVLCHK parameter

146

146

1

A

 

Compile - source listing default (Y or N)

147

147

1

A

 

Compile - optimize compile default (Y or N)

148

148

1

A

 

Compile - decimal data error default (Y or N)

149

151

3

S

0

Default printer form width (80 - 198)

152

154

3

S

0

Default screen width is always 80 and cannot be changed.

155

157

3

S

0

Default screen length is always 24 and cannot be changed.

158

197

40

A

 

Default input attributes- alpha field

198

237

40

A

 

Default input attributes- numeric field

238

277

40

A

 

Default output attributes - alpha field

278

317

40

A

 

Default output attributes - numeric field

381

390

10

A

 

Partition default file library (execution time)

391

391

1

A

 

Default commitment control - new file definition

392

392

1

A

 

Spare Field

393

393

1

A

 

Default RDML command editor

Values:

"E"- edit by IBM's SEU or EDTSRC editors.

"U"- edit by alternate user exit editor.

other - edit by standard LANSA editor.

394

394

1

A

 

Was LANSA version number. No longer used.

Do not adjust this value.

395

396

2

A

 

Export LANSA object authority (default = "MD")

Values:

"UD"- Use authority

"MD"- Modify authority

"DD"- Delete authority

397

397

1

A

 

System uses ASPs (Auxiliary Storage Pools) other than 1 for partition module or file libraries.

Values:

"Y"- System uses ASPs (other than 1) for one or more partition libraries.

other - System does not use ASPs, or only ASP number 1 is used, for all partitions.

However, partition module or file libraries may be configured in differing ASPs. When any partition file or module library is configured into an ASP (other than ASP number 1) you must set this flag to "Y" to indicate this configuration.

400

400

1

A

 

Compile - enable debug default (Y or N)

401

401

1

A

 

Enable alternate editor user exits when editing help text and/or RDML commands.

Values:

"Y"- enable alternate editor exits.

other - do not enable alternate editor exits.

Alternative editor exits are enabled by standard user exit programs. Refer to User Exit Programs for more details.

402

411

10

A

 

Dictionary interface program name

412

414

3

A

 

Default printer form length (RPG limit)

415

417

3

A

 

Default printer form overflow line (RPG limit)

418

418

1

A

 

Default IDENT_ATR parm to include high intensity (Y or N). Ignored in SAA/CUA partitions.

419

419

1

A

 

Default IDENT_ATR parm to include reverse image (Y or N). Ignored in SAA/CUA partitions.

420

420

1

A

 

Default IDENT_ATR parm to include underline (Y or N). Ignored in SAA/CUA partitions.

421

421

1

A

 

Default STD_HEAD parameter to be used (Y or N)

422

422

1

A

 

Use execution time locking on processes (Y or N)

423

424

2

A

 

LANSA minor version level.

425

434

10

A

 

Name of "HANDS-ON" program library

436

436

1

A

 

Enable cursor location sensitivity (Y or N)

NOTE: This flag enables field prompting and field level help. Recompilation is necessary for changes to this flag to take effect.

437

438

2

A

 

IBM i being used (38/3X)

439

440

2

A

 

Execution environment if on IBM i (38/3X)

441

460

20

A

 

Hexadecimal codes for all 132 wide workstations Refer appropriate IBM manual for list of codes This is only used by the report painter to aid the user design report layouts.

461

461

1

A

 

Compile - compile process default (Y or N)

462

462

1

A

 

Enable LANSA attention key handling (Y or N)

463

463

1

A

 

Field label fill character

Recompilation is necessary for changes to this setting to take effect.

464

464

1

A

 

Field column heading underline character Recompilation is necessary for changes to this setting to take effect.

465

474

10

A

 

Hexadecimal codes for all color workstations

475

475

1

A

 

System uses function level security. Note that using function level security increases overall system resource usage. Processes (NOT functions) compiled prior to a change to this value will ignore the change and should be recompiled.

Values:

"Y"- function level security is used

other - only process level security is used

476

476

1

A

 

Automatically generate field level help text from dictionary definition and validation rules. Automatically generated help text is appended to any user defined help text that is applicable.

Values:

"Y"- automatic generation is enabled

other - automatic generation is NOT enabled

477

477

1

A

 

Controls the default enabling of the PROMPT_KEY parameter on DISPLAY, REQUEST and POP_UP RDML commands.

Values:

"Y"- prompt key is enabled unless the command specifically disables it.

other - prompt key is disabled unless the command specifically enables it.

478

479

2

A

 

Specifies the prompt function key number for any non-SAA/CUA applications in the system. If you intend to use the prompt key in any non-SAA/CUA application, this area must contain a valid function key number in the range "01" to "24". For SAA/CUA applications the prompt function key number defined at the partition level is used instead of any value defined here.

480

480

1

A

 

Controls the execution of a RCLRSC (reclaim resources) command on exit from LANSA, which closes all files opened by LANSA.

Values:

"Y"- execute RCLRSC on exit from LANSA

other - do not execute RCLRSC on exit from LANSA.

481

481

1

A

 

Controls the execution of a RPLLIBL (replace library list) command on exit from LANSA, which resets the job's library list to exactly what it was on entry to LANSA.

Values:

"Y"- execute RPLLIBL on exit from LANSA

other - do not execute RPLLIBL on exit from LANSA.

482

482

1

A

 

Indicates if pre-release 2.5 LANSA I/O modules are required. These are programs in the file library prefixed by "I@" that are only required by programs compiled prior to LANSA Release 2.5.

Values:

"N"- pre-release 2.5 I/O modules are not required.

other - pre-release 2.5 I/O modules are required.

483

483

1

A

 

This value is no longer used to determine the TGTRLS value that LANSA compiles and saves are to use.

Refer to positions 631-638 of the Extended Information Data Area DC@A07 for this information.

484

484

1

A

 

Vertical bar character to be used on reports such as RDML listings. If this value is left as blank (X'40') it defaults to ":" (X'6A'). This may not be suitable for some national language sets and should be changed.

485

485

1

A

 

Horizontal bar character to be used on reports such as RDML listings. If this value is left as blank (X'40') it defaults to "-" (X'60'). This may not be suitable for some national language sets and should be changed.

486

486

1

A

 

External Security Matching. This is set to a "Y" to indicate that LANSA database security should be reflected into IBM i object level security. This option only applies to files set up and maintained by LANSA. It does not apply to "OTHER" files. Refer to the security references in Reviewing and Changing Access to LANSA Objects for more details of this option.

487

487

1

A

 

Y allows exchange list capability in RPG / CL / COBOL etc programs so that values can be returned from LANSA to these programs (using EXCHANGE).
Values can be put on the LANSA exchange list from RPG / CL / COBOL etc programs. Refer to the EXCHANGE command in the Technical Reference Guide for more details.
Recompilation is necessary for changes to this setting to take effect.

N is the default.

488

489

2

A

 

Comparison year for determining the century to be used. Six and four character dates have their year portion compared against this value so that the correct century will be used.

490

491

2

A

 

Century to use if the year is less than or equal to the comparison year value.

492

493

2

A

 

Century to use if the year is greater than the comparison year value.

494

494

1

A

 

Decimal format for LANSA. This should relate to the IBM i system value QDECFMT. If QDECFMT = " " (blank) then the LANSA decimal format will = "." or If QDECFMT = "I" or "J" then the LANSA decimal format will = ",".

Values:

"."- LANSA decimal format is a full stop.

","- LANSA decimal format is a comma.

Other - LANSA decimal format is defaulted to a full stop.

WARNING: If the value of this field does not relate to the value of QDECFMT then UNPREDICTABLE results could occur with the use of numeric values.

495

495

1

A

 

Controls suppression of the "Process will run in interpretive mode, compiled version not usable" message. This message is displayed as a warning when a process has been selected for use, informing the user that a "new" compiled version of a Process should be created.

Values:

Y- do not display warning message.
N - display warning message is the default.

496

496

1

A

 

Indicates that end user process and function level security is disabled in this system. This setting will improve system performance, because no security checking is performed before accessing end user applications. This flag has no effect on access to process or function definition details in a development environment. This setting is appropriate for installations that use an external menu system to control and secure access to LANSA applications. Additional security checking within the LANSA application is a waste of resource and may mean "double updating" of end user access rights. The setting of this flag is interpreted dynamically by all applications that have been recompiled since the installation of program change 4.0/D3.

Values:

"Y"- process and function level security is disabled.

Other - process and function level security is enabled.

497

497

1

A

 

Indicates that end user file level security is disabled in this system. This setting will improve system performance, because no file level security checking is performed in end user applications. This flag has no effect on access to file definition details in a development environment. This setting is appropriate for installations that use the approach "if the program is accessible from your menu .... then you can access all the files the program requires". The setting of this flag is interpreted dynamically by all applications that have been recompiled since the installation of program change 4.0/D3.

Values:

"Y"- file level security is disabled.

Other - file level security is enabled.

498

498

1

A

 

Indicates whether a user defined prompt key message handler program should be called in preference to the LANSA prompt key message handler, when the prompt key function key has been selected. If this value has been set to "Y", a user defined prompt key message handler program name must be specified in the extended information data area DC@A07, please refer to the section on the 'extended information data area DC@A07' for more information.

Values:

"Y"- call user defined prompt key message handler program.

Other - call the LANSA prompt key message handler program.

499

499

1

A

 

EXCHANGE all fields from one function to another on a prompt request.

Values:

"Y"- EXCHANGE all other fields used by a function as will fit into the space left in the exchange list.

Other - Do not include all other fields used by a function in the exchange list.

500

500

1

A

 

Spare