CLP

cpyfrmimpf

I have a file in my ifs that I need to copy to a physical file using the CPYFRMIMPF command. The file on the IFS is delimited with the ~ and I would like for each stream of data prior to the ~ to be a record in my physical file. I have tried many combinations of RCDDLM and FLDDLM having the ~ and...

Source Modified User

Hi All, If 4 users works on in same library in one source file, How could we know which user has modified a source? Thanks Reddy

Port Parameter on FTP command

I am trying to upload a file from our server to iSeries via FTP. Since we already use the default port (21) for another location on the server we have to use another one that is defined. When I run the command on the command line, it works perfectly. It uses the correct port. But when I run the...

AS400

hi, i want to know about the answers of these questions.. 1.) If any data has been deleted from the PF then how can we recover that and what are the limitiations for that. 2.) If in run time user want to choose the Access Path of a PF then how can it be possible.

Converting from System 36 to iSeries V5R4

I've been landed with a project to convert a System 36 system to iSeries 520 with OS V5.4. I have never worked on a System 36 and do not know where to start. Have looked for some documentation in Red Books but could'nt find anything. Does anyone have something I can use - something like the...

CPYTOIMPF and DB2 Field Names

I have created an outfile from a series of iSeries queries and have successfully copied it to a CSV file on a Windows server share. However, the field names don't import with the CSV file. Is there a way to import the field names as column headers in the CSV using the CPYTOIMPF command or another...

Data Q

I need to check whether there are any data found in a data Q. Is there any way to do that? Appreciate if you can provide sample executable codes for me to test it on. Thanks...

Retrive Field Value from Database File in CL

My first attempt at reading a database file in CL. Have the following: DCLF FILE(*LIBL/DVACKWLV) RCDFMT(SCWACK) OPNID(WRK) DCL VAR(&WRK_SCADTE) TYPE(*DEC) LEN(6) DCL VAR(&FILEDATE) TYPE(*CHAR) LEN(6) RCVF OPNID(WRK) MONMSG CPF0864 EXEC(DO) /* End of file */...

Tracking Changes to Files

Requirement:- To track any changes to Two files A and B and write fields of A and B to an output file C. A is related to B (A.Employee = B.Employee) Could you please suggest a good approach for this? I am currently using the approach of journalling. 1. Both A and B are journalled. 2. If Any...

Question on LoadAll Subfile.

Hi, How to load more than 9999 records in the case of loadall subfile??? And i don't want delete previously loaded records. Thanks, Rama Krishna

Compiling under V5R3 for V5R4 usage

Dear, I'm trying to modify a small CL to comply with new functionalities of V5R4. This CL is used mainly to send datas when the iSeries is on Restricted State, so I've to restart the TCP. Before I was using the command STRTCP STRSVR(*NO) STRIFC(*NO) but with the V5R4, I have to use this command...

Help in CL and RPG

Hi, I can execute a CL command in an RPG pgm by calling 'QCMDEXC'. But there are certain CL commands that i cannot execute using 'QCMDEXE', what are they? Thanks in Advance Rama krishna

In RPG program

Hi, In RPG program i declared files. One for reading and another for Updating. Both the files are in different Library lists. How do i achieve this???? Thanks in Advance Rama krishna

Error in a Group of Called Programs

Hi, I have a CL program, it calls 10 other programs i.e. pgmA, pgmB, pgmC.......so on...10 programs. While running the CL program error occurred in pgmC. I rectified that error. After rectification once again I will run the CL Program. Now my execution must start from pgmC. How do i do this??? ...

Impact analysis

Hi, The user requested me to change the field length from 25 to 30 char. I want to do impact analysis on this. How do i proceed?? Thanks, Rama Krishna

Calling RPG program without Parameters

1) I have an RPG PGM 'A' which call's another RPG PGM 'B'. PGM 'B' accepts 3 parameters. But i need to call PGM 'B' without passing parameters. How to achieve this??? 2) I have an RPG PGM 'A' which call's another RPG PGM 'B'. PGM 'B' doesnot accept parameters. But i need to call PGM 'B' with...

Service Program, Activation Group

Hi Everybody, Could anyone from this group help in understanding the Importance of....Service Program, Binding Directory and Activation Group's with ssome practical Example. Thanks, Rama Krishna

Parsing parameters for a Command to be run In a CL

I need to allow a user to enter a command at the command line followed by the &Library/File, or just the &Filename. (if they are going to rely on their library list). EX: SHOWME &LIBRARY/FILE or SHOWME &FILE My CMD is running the true IBM Command under the covers so the user does not need to...

How to reset the password??

Hi, How to reset the password through a CL program. The user has forgotten his password, even ADMIN doesn't know the password. Thanks, Rama krishna

V5R3 to V5R4

my operating system was just upgraded from V5R3 to V5R4. All my cobol programs are compiled with *none commitment control and a target release of V5R3M0. However after upgrading the operating system while executing the programs -913 errors are being encountered. The same programs are getting...