Stepping Through the Program Object

3DIM(3) CTDATA Compile-time data: **

> EVAL TableA

** Show value at

aaa

TABLEA = 'aaa'

current

index

bbb

 

 

 

ccc

> EVAL TableA(1)

** Specify

index 1

**

TABLEA(1) = 'aaa'

 

 

 

> EVAL TableA(2)

** Specify

index 2

**

TABLEA(2) = 'bbb'

 

 

 

>EVAL _QRNU_TABI_TableA ** Display value of current index ** _QRNU_TABI_TABLEA = 1

>EVAL TableA(1..3) ** Specify the whole table ** TABLEA(1) = 'aaa'

TABLEA(2) = 'bbb' TABLEA(3) = 'ccc'

>EVAL TableA=%INDEX(3) ** Change current index to 3 **

>EVAL TableA TABLEA = 'ccc'

Figure 99. Sample EVAL commands for a Table

Displaying Data Structures

You display the contents of a data structure or its subfields as standalone field. You simply use the data structure name after EVAL entire contents, or the subfield name to see a subset.

When displaying a multiple-occurrence data structure, an EVAL on the d ture name will show the subfields using the current index. To specif occurrence, specify the index in parentheses following the data stru example, to display the contents of the second occurrence of DS1,

EVAL DS1(2)

Similarly, to view the contents of a particular occurrence of a subf notation.

To determine the value of the current index, enter the following com

EVAL _QRNU_DSI_name

wherename represents the data structure name in question.

If a subfield is defined as an of the overlay subfield, you can occurrence, and the index notation

An alternative way of displaying a following notation:

EVAL subfield-name(occurrence-index,array-index)

array overlay of another subfield use the %INDEX built-in function to to specify the array.

subfield which is an array overla

where the variablesubfield-nameis the name of the subfield you wish to

occurrence-indexis the

number of the array occurrencearrayto-indexdisplay, an

is the number of

the

element to

display.

Figure 100

on page

204

shows some

examples of using EVAL with the the

structures

defined in

DBGEX.

 

Chapter 11. Debugging Programs203

Page 226 Page 228
Page 227
Image 227
IBM AS/400 manual Displaying Data Structures, Eval DS12
Page 226 Page 228

AS/400 specifications

The IBM AS/400, now known as the IBM iSeries, is a midrange computer system that has been a cornerstone of enterprise computing since its introduction in 1988. Designed to provide a robust platform for business applications, the AS/400 is celebrated for its reliability, scalability, and integrated database capabilities.

One of the key features of the AS/400 is its Integrated Operating Environment, which blends hardware and software resources seamlessly. This integration allows businesses to execute diverse workloads, ranging from traditional applications to modern web-based services, all on a single platform. The operating system, OS/400 (now IBM i), offers a rich set of APIs and tools for developers, simplifying application development and management.

Another standout characteristic of the AS/400 is its built-in database, DB2 for i. This powerful relational database management system allows for efficient data handling and provides advanced features such as support for SQL, XML, and JSON, making it easier for businesses to manage their data and integrate it with other systems. The database's tight integration with the operating system enables high performance and security.

In terms of scalability, the AS/400 can accommodate small businesses as well as large enterprises, with the ability to support hundreds of users simultaneously. Its architecture allows for easy upgrades in hardware, meaning that organizations can scale their systems without replacing the entire infrastructure.

Security is another critical attribute of the AS/400. With a sophisticated security model, it offers built-in user authentication, access control, encryption, and auditing capabilities to protect data and applications from unauthorized access.

The AS/400 also supports multiple programming languages, including RPG, COBOL, Java, and PHP, giving organizations the flexibility to choose the development tools that best fit their needs. This diversity helps maintain legacy applications while also developing new ones that leverage modern technologies.

Moreover, the platform supports both traditional green-screen interfaces and modern graphical user interfaces, allowing organizations to transition smoothly into contemporary user experience paradigms.

Overall, the IBM AS/400 stands out as a resilient, flexible, and secure computing platform that enables organizations to effectively manage their business operations, streamline processes, and adapt to changing market demands. Its unique combination of integrated features and capabilities ensures that it remains relevant in today's fast-paced technology landscape.
Top Page Image Contents