Creating a Module Object

Table 6 (Page 2

of

2).

CRTRPGMOD Parameters and Their Default Values Grouped by Function

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

DEFINE(*NONE)

 

Specifies

condition

names

that

are

defined

before

the

co

 

 

 

 

 

 

 

begins

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

PRFDTA(*NOCOL)

 

Specifies

the

program

profiling

data

attribute

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Compiler

Listing

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

OUTPUT(*PRINT)

 

Determines if there is a compiler listing

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

INDENT(*NONE)

 

Determines

if

indentation should show in listing, and

identif

 

 

 

 

 

 

 

acter

for

marking

it

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

OPTION(*XREF

*NOSECLVL

*SHOWCPY

 

 

Specifies

the

contents

of

compiler

listing

 

 

 

 

 

 

*EXPDDS *EXT

*NOSHOWSKP

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

*NOSRCSTMT

)

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Data

Conversion

Options

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

CVTOPT(*NONE)

 

Specifies

how

various

data

types

from

externally

describe

 

 

 

 

 

 

 

are

handled

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

ALWNULL(*NO)

 

Determines

if

the

module

will

accept

values

from

null-capable

 

 

 

 

 

 

 

fields

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

FIXNBR(*NONE)

 

Determines

which decimal

data

that

is

not

valid

is

to

be

 

 

 

 

 

 

 

the

compiler

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Run-Time

Considerations

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

SRTSEQ(*HEX)

 

Specifies the sort sequence table to be used

 

 

 

 

 

 

 

 

 

 

 

 

OPTION(*DEBUGIO)

 

*DEBUGIO/*NODEBUGIO, determines if breakpoints are gener-

 

 

 

 

 

 

 

 

ated for input and output specifications

 

 

 

 

 

 

 

 

 

 

 

 

 

LANGID(*JOBRUN)

 

Used with SRTSEQ to specify the language identifier for s

 

 

 

 

 

 

 

sequence

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

TRUNCNBR(*YES)

 

Specifies

action to take when numeric overflow occurs for

 

 

 

 

 

 

 

packed-decimal, zoned-decimal, and binary fields in fixed f

 

 

 

 

 

 

 

operations.

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

When

requested,

the

 

CRTRPGMOD

command

creates a compiler listing which

 

 

for

the

most

part identical

to

the

listing

that

 

is

produced

by

the

 

 

command.

(The

listing

created

by

CRTRPGMOD will

never

have a

binding

s

 

 

For

information

on

using

the compiler

listing, see “Using a Compiler List

 

 

page 63.

A sample

compiler

listing

is

provided

in

 

Appendix D,

“Compiler L

 

 

on

page 423.

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Creating a NOMAIN Module

In this example you create an NOMAIN module object TRANSSVC using the CRTRPGMOD command and its default settings. TRANSSVC contains prototyped procedures that perform transaction services for procedures in other source for TRANSSVC shown in Figure 36 on page 76. The prototypes for t cedures in TRANSSVC are stored in a /COPY member, as shown in Figure 3 page 78.

1. To create a module object, type:

CRTRPGMOD MODULE(MYLIB/TRANSSVC) SRCFILE(MYLIB/QRPGLESRC)

The module will be created in the library MYLIB with the name s command, TRANSSVC. The source for the module is the source member TRANSSVC in file QRPGLESRC in the library MYLIB.

Chapter 7. Creating a Program with the CRTRPGMOD and CRTPGM Commands75

Page 99
Image 99
IBM AS/400 manual Creating a Nomain Module, Requested, Creates a compiler listing which

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.