Using the CRTBNDRPG Command

Figure 31 on page 60 shows the screen which appears after entering above command.

 

 

 

 

 

 

 

 

‡

 

Display Module

Source

—

 

 

 

 

 

 

Program:

EMPRPT

Library:

MYLIB

Module:

EMPRPT

1*==============================================================*

2 * MODULE NAME: EMPRPT

3

*

RELATED FILES:

EMPMST

(PHYSICAL FILE)

4

*

 

QSYSPRT

(PRINTER FILE)

5* DESCRIPTION: This program prints employee information

6

*

from the file EMPMST.

7*==============================================================*

8

FQSYSPRT

O

F

80

 

PRINTER

 

 

 

 

9

FEMPMST

IP

E

 

 

K DISK

 

 

 

 

10

 

 

 

 

 

 

 

 

 

 

 

11

D TYPE

 

 

S

 

8A

 

 

 

 

12

D EMPTYPE

 

 

PR

 

8A

 

 

 

 

13

D

CODE

 

 

 

 

1A

 

 

 

 

14

 

 

 

 

 

 

 

 

 

 

 

15

IEMPREC

 

01

 

 

 

 

More...

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Debug . . .

 

_________________________________________________________________

 

 

_______________________________________________________________________________

 

 

 

F3=End program

F6=Add/Clear breakpoint

F10=Step

F11=Display variable

 

 

ˆ F12=Resume

 

F17=Watch variable

F18=Work with watch

F24=More keys

˜

 

 

 

 

 

 

 

Figure 31.

Display Module Source display for EMPRPT

 

 

 

 

From this screen (the Display Module Source display) you can enter commands to display or change field values and set breakpoints to c program flow while debugging.

For more information on debugging see Chapter 11, “Debugging Programs” on page 163.

Creating a Program with Static

Binding

 

 

 

 

 

 

 

 

 

 

In this example you create

a

program

COMPUTE

using

CRTBNDRPG

to

which

y

bind a service program at program-creation time.

 

 

 

 

 

 

Assume that you want to bind the program COMPUTE to

services

which

you

purchased

to

perform advanced

mathematical computations.

The

binding

dir

to which

you

must bind your

source is

called

MATH.

This

directory

cont

name of a service program that contains the various

procedures

that

ma

services.

 

 

 

 

 

 

 

 

 

 

 

 

To create the object, type:

CRTBNDRPG PGM(MYLIB/COMPUTE)

DFTACTGRP(*NO) ACTGRP(GRP1) BNDDIR(MATH)

The source will

be

bound

to

the

service

program

specified in

the

bi

MATH at program-creation time. This means that calls

to the procedures

i

service program

will

take

less

time

than if

they

were dynamic

calls.

 

When the program is called, it will run in the named activation group G default value ACTGRP parameter on CRTBNDRPG is QILE. However, it is recom mended that you run your application as a unique group to ensure that ated resources are fully protected.

60 ILE RPG for AS/400 Programmer's Guide

Page 83 Page 85
Page 84
Image 84
IBM AS/400 manual Binding, Creating a Program with Static, This example you create Program, Display Module Source, More
Page 83 Page 85

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