IT Answers » AS/400 Parameters

CL400 parameters

Srfnhmd1 — Thu, 29 Sep 2011 14:03:08 +0000

hi, i would like to know how to copy a physical file and its corresponding logical file from one library to another by and these four paramaters &filnam,&fromlib,&tolib,&status should be used ?

Hold parameter in batch job

Batchjob — Mon, 29 Aug 2011 04:32:23 +0000

why should we give the hold paramater (*yes) in a batch job? please let me the what is a a batch job?

SELECT with LIMIT in AS/400

junioras400 — Mon, 13 Jun 2011 18:40:34 +0000

Hi all,

On my AS400, I need to select the first 90 records from one file and insert them into another file, but all the time i got all records in my result file. Is there any way to use the parameter LIMIT with my SQL SELECT

INSERT INTO LIB1/FILE1 (FILE1) SELECT DISTINCT (substring(FILE1, 1, 100)) FROM FILE1 WHERE FILE1 like ‘%xxxx%’

thank you

AS400 Triggers

JenniferK — Fri, 27 May 2011 19:58:48 +0000

I have some triggers set up on our AS400. A record gets written to a physical file each time one of the triggered files has an add, update or delete performed against it.

The problem is that we have a few batch programs that do not write to the trigger file when run (and update and addes are being done via writes and rewrites). The online programs invoke a trigger record, but these specific batch programs do not (writing to the same triggered files). Both programs are doing basic COBOL writes and rewrites

What am I doing wrong? Do I need to set a specific parameter within the batch program?

OVRDBF without any parameters specified

WaheedAnsari — Fri, 27 May 2011 09:54:41 +0000

Can we specify an overide statement without actually specifying any parameters to be overridden.

In one of the exisiting codes (in a CL)I saw a line as follows:

OVRDBF File(ZFT00981) ToFile(ZFT00981)

No parameters were specified. The file name is exactly same.

The program is being used since ages. Hence I know this will not result in any runtime error.

But will this command have any affect on the file access or any affect in the program?

I think it will not have any affect. I think it will not make any difference anywhere even if we remove this line.

Please comment.

Can CL Programming language can have level check error

chakramdhar — Fri, 06 May 2011 17:19:27 +0000

hi friends in CL Program is it possible that we can get Leve Check Parameter…

RPG Net pgm with dataq

INOSOFT — Fri, 25 Mar 2011 19:27:08 +0000

Hi. I need some help with net pgm. This is my stuff:

1- ADDPJE SBSD(LIBINO/INOSBS) PGM(LIBINO/TST44R)

2- TST44R read a InoDtaq

3- In WrkActJob I can view the INOSBS with TST44R 3 times (default)

4- I have a pgm TST43R that write a LIBINO/INODTAQ. I run it.

5- I run TST44R and in WorkActJob its appears only twice.
When I run TST44R twice, its disapper from INOSBS.

MY QUESTION: how I can do to not disappear (like NEP pgm)

This is TST44R source:

ddqname s 10A INZ(‘INODTAQ’)

ddqlib s 10A INZ(‘LIBINO’)

ddqsndlen s 5 0 INZ(14)

ddqlen s 5 0
ddqsnddata s 50a

dParm1 s Like(dqdata)

ddqdata s 50a
ddqwait s 5 0

Eval dqwait=-1

call ‘QRCVDTAQ’

parm dqname

parm dqlib

parm dqlen

parm dqdata

parm dqwait

Eval Parm1=%Trim(dqdata)

c/Exec sql
C+ INSERT INTO QGPL/TSTPF (NAME) VALUES(:Parm1)
c/End-exec

Return

Problems with DB2 program

Golf2 — Wed, 26 Jan 2011 03:49:36 +0000

I have a COBOL program that calls a db2 stored proc program. I get corrupted o/p records when reading the input file from CARTRIDGE. The same records, when copied to DASD, come out fine. Same code, JCL, etc. WTH! Is there a parameter that I need to pass to the system with PGM=IKJEFT01 to solve this?

Call a program and send parameters in WRKJOBSCDE

Jaymz69 — Fri, 14 Jan 2011 15:52:35 +0000

I want to schedule a job to run. It needs to call the program and send 20 parameters. Is this a good way to do through Job Schedular on the AS400?

Hide AS/400 Parameter

22917 — Sun, 09 Jan 2011 07:34:06 +0000

How can we hide the parameter from user view and pass with some default value.