Compiler Listings

 

Source

Section

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

The

 

source

section

shows records that comprise the ILE

RPG

source

sp

 

 

 

 

 

tions. The root source member

 

records are always shown. If OPTION(*EXP

 

 

 

 

 

also specified, then the source section shows records generated from

 

 

 

 

 

 

described files, and marks them with a

'='

in

the

column

beside

the

 

 

 

 

 

 

These

records

are

 

not

shown

if

*NOEXPDDS is

specified.

If

OPTION(*SHOWCP

 

 

 

 

 

is

specified,

 

then

 

it also shows the records from /COPY members speci

 

 

 

 

 

source, and marks them with a

'+' in the column beside the line number

 

 

 

 

 

records

are

not

shown

if

*NOSHOWCPY

is

specified.

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

The

 

source

section

also

shows

 

the conditional compilation process. All lin

 

 

 

 

 

/IF,

 

/ELSEIF,

 

/ELSE

and

 

/ENDIF

directives

and

source

lines

selected

by

th

 

 

 

 

 

groups

are

printed

and given a listing line number. If OPTION(*SHOWSKP) is

 

 

 

 

 

ified,

it

shows

all

 

statements

that

have

been

excluded

by

the

/IF,

 

 

 

 

 

 

/ELSE

 

directives,

and

 

marks

them

with

a

'-------

'

in

the

 

column

beside

the

 

 

 

 

 

 

ment.

 

Line

numbers

in

 

the listing are not incremented for excluded lines

 

 

 

 

 

skipped

statements

are

printed

exactly as specified, but are not int

 

 

 

 

 

way.

 

For

example,

an

excluded

statement

with

an

/EJECT

directive

does

 

 

 

 

 

 

a page break. Similarly, /SPACE, /TITLE, /COPY and

 

/EOF

compiler directives

a

 

 

 

 

 

ignored

if

they

are

encountered

 

in

excluded

 

lines.

These

statements

a

 

 

 

 

 

if

the

default

OPTION(*NOSHOWSKP)

is

specified;

 

instead

a

message

is

pr

 

 

 

 

 

giving

the

 

number

of

 

lines

excluded.

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

The

 

source

section

identifies

any

syntax

errors

 

in

 

the

source,

and

i

 

 

 

 

 

field

table,

 

when

appropriate.

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

If

OPTION(*NOSRCSTMT)

is

specified,

 

line

numbers

 

are

printed

sequentially

 

 

 

 

 

the

 

left

 

side

of

 

the

listing

to reflect the compiled source line num

 

 

 

 

and

 

SEU

sequence

numbers

are

printed

on

the

 

right

 

side

of

the

listi

 

 

 

 

the

 

source

members

 

and

records

 

respectively.

For

example,

Figure 215

 

 

 

 

 

section

of

 

the

listing with

a

/COPY

 

statement

 

in line 35. In the root

 

 

 

 

the

 

next

line

 

is

a

DOWEQ

operation.

 

In

the

 

listing,

however,

the DOWE

 

 

 

 

is on line 39. The

 

three

intervening

 

lines

shown

in

the listing

are

fro

 

 

 

 

source

member.

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Line

<---------------------

Source Specifications

----------------------------------------------

 

 

 

 

 

 

 

 

 

 

 

><----

Comments

----

> Src Seq

 

 

 

 

 

 

 

Number ....

1....+....

2....

+<-------- 26 - 35 -------->....

4....

+....

5....

+....

6....

+....

7....

+....

8....

+....

9....

+...

10 Id

Number

 

 

 

 

 

 

 

 

34 C

 

 

MOVE

 

 

 

 

 

 

 

'123'

 

 

BI_FLD1

 

 

 

 

 

 

 

 

 

 

 

 

 

 

001500

 

 

 

 

 

 

 

 

35 C/COPY MYCPY

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

971104

 

001600

 

 

 

 

 

 

 

 

 

*--------------------------------------------------------------------------------------------

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

*

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

* RPG member name

. . . . . :

MYCPY

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

*

 

 

 

 

 

 

5

 

 

 

 

 

 

 

 

 

 

* External name .

. . . .

.

:

RPGGUIDE/QRPGLESRC(MYCPY)

 

 

 

 

 

 

 

 

 

*

 

 

 

 

 

 

5

 

 

 

 

 

 

 

 

 

 

* Last change . .

. . . .

.

:

98/07/24

16:20:04

 

 

 

 

 

 

 

 

 

 

 

 

*

 

 

 

 

 

 

5

 

 

 

 

 

 

 

 

 

 

* Text 'description' . . .

.

: Text on copy member

 

 

 

 

 

 

 

 

 

 

 

*

 

 

 

 

 

 

5

 

 

 

 

 

 

 

 

 

 

*--------------------------------------------------------------------------------------------

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

*

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

36+C

Blue(1)

DSPLY

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

5000100

 

 

 

 

 

 

 

 

37+C

Green(4)

DSPLY

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

5000200

 

 

 

 

 

 

 

 

38+C

Red(2)

DSPLY

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

5000300

 

 

 

 

 

 

 

 

39 C

*in20

 

doweq

 

 

 

 

 

 

 

*OFF

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

001700

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Figure

215.

Sample Section of the Listing with OPTION(*NOSRCSTMT)

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

If

OPTION(*SRCSTMT)

is

 

specified, sequence numbers are printed on the l

 

 

 

 

of

 

the

listing

to

reflect

the

SEU

sequence

 

numbers.

Statement

numbers

 

 

 

 

 

on

the

right

side

 

of the listing. The statement number information is

 

 

 

 

 

source

ID

 

and

SEU

 

sequence

 

number information. For example, Figure 216

 

 

 

 

 

page 427

shows

a section

of

 

the

listing

that

has

a

/COPY

statement

wi

 

 

 

 

number

001600.

 

The

next

line

in

the root

source

member

is

the

same

as

426 ILE RPG for AS/400 Programmer's Guide

Page 450
Image 450
IBM AS/400 manual Section, Endif, Eject

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.