Using

a

Compiler

Listing

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Line

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

Source Specifications ----------------------------------------------

 

 

><----

Comments

----> Src Seq

 

Number

....

1....+....

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

....4....+....5....+....6....+

....7....+....

8....+....

9....+

...10 Id Number

 

33

C********************************************************************

 

 

 

002000

 

34

C*

MAINLINE

 

 

*

 

 

 

002100

 

35

C********************************************************************

 

 

 

002200

 

36

C

 

WRITE

 

FOOT1

 

 

 

 

002300

 

37

C

 

WRITE

 

HEAD

 

 

 

 

002400

 

38

C

 

EXFMT

 

PROMPT

 

 

 

 

002500

 

39

C*

 

 

 

 

 

 

 

 

002600

 

40

C

 

DOW

 

NOT *IN03

 

 

 

 

002700

 

41

C

CSTKEY

SETLL

CMLREC2

 

----20

 

 

002800

 

42

C

 

IF

 

*IN20

 

 

 

 

002900

 

43

C

 

MOVE

'1'

*IN61

 

 

 

003000

 

44

C

 

ELSE

 

 

 

 

 

003100

 

45

C

 

EXSR

SFLPRC

 

 

 

 

003200

 

46

C

 

END

 

 

 

 

 

 

003300

 

47

C

 

IF

 

NOT *IN03

 

 

 

 

003400

 

48

C

 

IF

*IN04

 

 

 

 

003500

 

49

C

 

IF

*IN61

 

 

 

 

003600

 

50

C

 

WRITE

FOOT1

 

 

 

 

003700

 

51

C

 

WRITE

HEAD

 

 

 

 

003800

 

52

C

 

ENDIF

 

 

 

 

 

003900

 

53

C

 

EXFMT

PROMPT

 

 

 

 

004000

 

54

C

 

ENDIF

 

 

 

 

 

004100

 

55

C

 

ENDIF

 

 

 

 

 

004200

 

56

C

 

ENDDO

 

 

 

 

 

 

004300

 

57

C*

 

 

 

 

 

 

 

 

004500

 

58

C

 

SETON

 

 

 

LR----

 

 

004600

 

 

 

 

 

 

 

 

Figure

33. Sample Source Part of the Listing with Indentation

 

 

 

 

 

Correcting

Compilation

Errors

 

 

 

 

 

 

 

 

 

 

The

main sections of

a compiler

listing

that

are

useful for fixing comp

 

 

 

are:

 

 

 

 

 

 

 

¹The source section

¹ The Additional Messages section

¹ The /COPY table section

¹The various summary sections.

In-line diagnostic messages, which are found in the source section, poi which the compiler can flag immediately. Other errors are flagged aft

information

is

received during

compilation. The

messages

which

 

flag

thes

are

in

the

source

section

and

Additional

Messages

section.

 

 

 

 

To aid

you

in correcting any compilation errors,

you

may

want

to

includ

second-level message text in the listing —

especially if you are new

this,

specify

OPTION(*SECLVL)

on

either

create

command.

This

will

add

sec

level text to the messages listed in the

message

summary.

 

 

 

 

Finally,

keep

in

mind

that

a

compiler

listing

is a record of your progr

if you encounter any errors

 

when testing

your

program,

you

can

use th

check that the source is coded the way

you

intended

it

to

be. Par

besides

the

source

statements,

which you

may

want

 

to

check

 

include:

¹Match field table

If you are using the RPG cycle with match fields, then you can check that all your match fields are the correct lengths, and in t tions.

¹Output-buffer positions

66 ILE RPG for AS/400 Programmer's Guide

Page 89 Page 91
Page 90
Image 90
IBM AS/400 manual Errors, Listing, Either Create, This Will Add Sec Level text to the messages listed Message
Page 89 Page 91

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