IBM RPG400

Specifies the definition of query fields that are

mapped or derived from other fields. MAPFLD is generally

not needed if the field names specified on other parameters

are simple field names that exist in only one of the file,

member, and record format elements specified for the File

specifications (FILE) parameter.

Up to 50 mapped field definitions can be specified.

From a CL program you can do a RTVJOBA command, if the job

type value is 0 then batch job, if 1 then interactive job.

Can take a WRKSMBJOB and see the value in TYPe field. If

*INT then it is interactive, If *BCH,then batch job.

let us assume we have some duplicate records in sample table

and we can identify duplicates with eid.

The the query looks like this.

Select * from sample

where eid=any

(select eid from sample having count(eid)>1 group by eid);

Note: This should be used SQl .. but i never tried in as400

when ever it is necessary means i use following sql

statement in as400 .......

select * from sample where eid=111

it displays all duplicate records related to 111

bind by copy: here module will static

bind by reference: here module will be dynamic.

Write a CL program in which u have to submit the 'A' job

after completion you can write code for 'B' and after 'C'

Based on RRN number we can retrieve the first 10 records

or otherwise copy the first 10 records using CPYF command

and you can use RUNQRY for new created file

Using SQL, we can set second field value as '0'

Record level Identifier gives the information about the

specific record format in the file. This can be used to

make sure that the record format of the file is same at

present as it was when the program was compiled.This will

protect the program from going into error due to changes

made to the record format after the compilation of the

program.The system tells the program, when it tries to open

the file, that a significant change occurred to the

definition of the file since the last time the program was

compiled.

format of variable, length of variable should be date and sep(-/).should be define

extra key "A"

May be you have define you file as output mode

SQL statment is error in embeded sql, then SQL code will

give the negative value.

@CN is an array and @CN,002 represents the 2nd element of

that array

There is no comparision between DO and ITER as DO statement

is an looping statement and ITER is an branching statement

like LEAVE.

When I use ITER with some condition inside a DO-ENDDO loop,

when that condition occouerd, ITER transfered the control

to ENDDO not out of the loop like LEAVE ie it just skip the

excecution of statements between ITER and ENDDO.

In one statement we can say that ITER in RPGLE is same as

CONTINUE in C.

This can be done using the Key Field.

KEY1(NAME FIELD) SETLL FILENAME

KEY1(NAME FILED) READE FILENAME

we have to create multiple threads in the job. when we

submit the job ,multiple threads will run parallelly. so it

will take very less time to complete the job. This is the

best way I believe.

the length of the signature is 16 bit like g2g4h5v3f3v4546k

system will genaret the uniqe file identifier for every

file.system identifies file thourh that identifier.supose u

can call a file throuh an other program but u do any

change after that file identifier will change.u got error

on that time level check error cause u r file identifier

was changed.

MDT is a internal indicator.It is used when we are using

SFLNXTCHG in SFL.MDT indicator default in on mode.

breifly when we are using readc for read changed

records.MDT is internally on for every record .If retreive

the record once MDT is going to be off.for that purpose we

used SFLNXTCHG keyword to seton.

Basically we know 3 type of identifier

1. is numeric which we denotes pic 9(2) like.

2. is alphabetic which we denotes pic A(2) like.

3. is alphanumeric identifier which we denotes pic x(2)like

There is no PEP parameter for CRTSRVPGM command so question

is invalid.

Use EXTFILE on F Specs