search results

Devel(UP) Your Skills

Saturday, April 25, 2015

STRDBG change mode from 80 * 24 to 132 * 27

AS400:

Normally STRDBG starts in 80x24 mode. You can change this mode to 132x27 mode with the
following environment variable:

AddEnvVar EnvVar('ILE_DEBUGGER_1') +
Value('ALLOW_WIDE_SCREEN') +
Level(*Job) Replace(*Yes)

To go back to 80x24 mode, you use:

RmvEnvVar EnvVar('ILE_DEBUGGER_1') Level(*Job)

Create two CLLE-programs, eg. DBGWIDE and ENDWIDE. Add an extra statement

MonMsg CPFA981

to the ENDWIDE - to prevent at dump, if DBGWIDE has not been initiated.

Wrap these two CLLE's into two commands with the same names, place them in QGPL
and your *On/*Off the two debug-modes.

The information originated from Karl Hanson of IBM, Rochester who works/worked on the
debuggers for IBM.

!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
Created command IPDBGSIZE in release 4.0 to allow you to easily switch from 80 wide to 132 and back.
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

Country calling code