Filter
Top Products
Stepping Through the Program Object
| Scalar Fields RPG Definition
| > EVAL String 6A INZ('ABCDEF')
| STRING = 'ABCDEF'
| > EVAL Packed1D0 5P 2 INZ(-93.4)
| PACKED1D0 = -093.40
| > EVAL ZonedD3D2 3S 2 INZ(-3.21)
| ZONEDD3D2 = -3.21
| > EVAL Bin4D3 4B 3 INZ(-4.321)
| BIN4D3 = -4.321
| > EVAL Int3 3I 0 INZ(-128)
| INT3 = -128
| > EVAL Int5 5I 0 INZ(-2046)
| INT5 = -2046
| > EVAL Int10 10I 0 INZ(-31904)
| INT10 = -31904
| > EVAL Int20 20I 0 INZ(-463972)
| INT20 = -463972
| > EVAL Unsigned3 3U 0 INZ(128)
| UNSIGNED3 = 128
| > EVAL Unsigned5 5U 0 INZ(2046)
| UNSIGNED5 = 2046
| > EVAL Unsigned10 10U 0 INZ(31904)
| UNSIGNED10 = 31904
| > EVAL Unsigned20 20U 0 INZ(463972)
| UNSIGNED20 = 463972
| > EVAL DBCSString 3G INZ(G' BBCCDD ')
| DBCSSTRING = '"BBCCDD"'
| > EVAL NullPtr * INZ(*NULL)
| NULLPTR = SYP:*NULL
| Based Fields
| > EVAL String 6A INZ('ABCDEF')
| STRING = 'ABCDEF'
| > EVAL BasePtr * INZ(%ADDR(String))
| BASEPTR = SPP:C01947001218
| > EVAL BaseString 6A BASED(BasePtr)
| BASESTRING = 'ABCDEF'
| Date, Time, Timestamp Fields
| > EVAL BigDate D INZ(D'9999-12-31')
| BIGDATE = '9999-12-31'
| > EVAL BigTime T INZ(T'12.00.00')
| BIGTIME = '12.00.00'
| > EVAL BigTstamp Z INZ(Z'9999-12-31-12.00.00.000000
| BIGTSTAMP = '9999-12-31-12.00.00.000000'
Figure 97. Sample EVAL commands based on Module DBGEX
Unexpected Results when Evaluating Variables
If you are surprised at the value of variables while debugging, check if any of the
following is true:
Your module is optimized. If the module is optimized, the debugger may not
show the most current value of a variable. Also if you change a variable using
the debugger, the effects of your change may not be reflected in the way the
program runs.
Some input fields are not being read from the file. Normally, input fields that are
not used in the program are not affected by an input operation. If you specify
the DEBUG keyword on your control specification, all input fields will be read in.
Chapter 11. Debugging Programs 201