The following then occurs:

1. Since there are no error indicators coded in PRC2, PRC2 cannot hand function check, and so it is unhandled.

2.Since it is a function check, an inquiry message is issued describ nating condition.

3. Depending

on the response to the inquiry message, PRC2 may be ter

and

the

exception percolated to PRC1 (response is 'C') or processing

tinue

in

PRC2 (response is 'G').

Optimization Considerations

While running a *FULL optimized program, the optimizer may keep frequent values in machine registers and restore them to storage only at prede during normal program processing. Exception handling may break this normal essing and consequently program variables contained in registers may not returned to their assigned storage locations.

Specifically, variables

may

not

contain their current values if an exce

and you recover from

it

using

one of:

¹ *PSSR error subroutine

¹ INFSR error subroutine

¹User-defined exception handler

¹

The

Go

('G')

option

from

an

inquiry

message.

 

 

 

¹

The

Retry

('R')

option

from

an

inquiry

message.

 

 

ILE

RPG

automatically

 

defines indicators

such that

they contain

their c

even with

full

optimization.

To ensure that the content of fields or d

contain

 

their

correct

(current) values, specify the NOOPT keyword on th

priate

 

Definition

specification.

 

 

 

 

 

 

For

more

 

information

on

the

NOOPT

keyword,ILE

RPGsee for

AS/400 Reference.

 

For

more

 

information

on

optimization,

see

“Changing

the

Optimization

Level”

page

87.

 

 

 

 

 

 

 

 

 

 

 

 

 

Using RPG-Specific Handlers

ILE RPG provides three ways for you to enable HLL-specific handlers a recover from the exception:

1. error indicators or 'E' operation code extender

2.INFSR error subroutine

3.*PSSR error subroutine.

You can obtain more information about the error which occurred by

co

appropriate data

structures and querying the relevant

data structure

If

you

are using

the 'E'

extender instead

of

error

indicators, the

and

file

error information

can be obtained

by

using

the %STATUS and

%ERR

built-in-functions.

226 ILE RPG for AS/400 Programmer's Guide

Page 249 Page 251
Page 250
Image 250
IBM AS/400 Optimization Considerations, Using RPG-Specific Handlers, For More Information Optimization See Changing Level
Page 249 Page 251

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