• What is the lifecycle of RPG/400 and CL/400?

    In an interview, interviewer asked me this question: Can anybody tell me what is RPG and CL lifecycle in a real-time scenario?

    Ben Rubenstein11,050 pointsBadges:
  • Check each RPG/400 program in batch job

    I have a few programs to submit in batch but I need to check each program sucessfully then I need to call another program.

    Askt265 pointsBadges:
  • How to validate the subfile field in RPG/400 subfile

    I need to validate the subfile field in subfile. For example: user entering the data in subfile; if user enters wrong data in subfile field then i need to show error to user. How do I resolve this?

    Askt265 pointsBadges:
  • Unable to send messages to message subfile in RPGILE program

    I am not able to send the messages to message subfile. I am able to compile my rpgile program sucessfully... please find below displayfile and rpgile code for your reference so please advice. Display file:A R MSGRCD SFL A*%%TS SD 20090407 073131 KSS991U REL-V4R4M0 5769-PW1 A SFLMSGRCD(24) A MSGKEY...

    Askt265 pointsBadges:
  • RPGILE XOP560 error message CEE9901

    I have a rpgile (XOP560) program as below. It compiled sucessfully and while calling the program it is displaying on the screen but once I come out of the screen using f3 I am getting error as below. Message ID . . . . . . : CEE9901 Severity . . . . . . . : 30 Message type . . . . . : Escape Date...

    Askt265 pointsBadges:
  • Change date format in RPGILE

    Can you advise me how to change date format from mmddyyyy to yyyymmdd in rpgile?

    Askt265 pointsBadges:
  • RPG/400 xodstsf

    Below program write a records to xodstsf in two times.... I am not sure what I am missing... can you advise? FWDRPIK CF E WORKSTN FXODSTSF O E DISK FTFL01 UF E K DISK DORDINV S 15A D*ORD S 8A C* *IN03 DOWEQ *OFF C DOW *IN03=*OFF C EXFMT PKSCR C PKLBL CHAIN TFOOD00 C* *IN25 IFEQ *OFF C IF...

    Askt265 pointsBadges:
  • Access a OPNQRYF file using keys

    Is it possible to access a file created by opnqryf in an RPG/400 program using keys? I have defined the KEYFLD parameter but the RPG doesn't find the records when using READE or CHAIN.

    Marg5 pointsBadges:
  • OPNQRYF query not working to filter pfdiv records

    I have 4-fileds on Display File like frdiv(zoned),todiv(zoned),frpr(char),topr(char). All the fields are of size 2 only. I am using a "OPNQRYF" to filter the records from a Physical file (pfdiv), it contains 1,25,000 records . Through this openqryf all the selected records I will copy to a file...

    Khadar90 pointsBadges:
  • RPG/400 filename length

    I have a physical file name with length of 10. I need to declare the same file in RPG/400 but here accepting only 8 length. Any way to overcome this?

    Askt265 pointsBadges:
  • How to release lock on a record in RPG/400

    What type of opcodes should I use to release the lock on a record?

    Ben Rubenstein11,050 pointsBadges:
  • Migrate application from UNISYS to AS/400

    How can we migrate an application currently running on the UNISYS platform to AS/400 platform. A major portion of the source application is in COBOL and uses the DMS-II database. This has been migrated to COBOL and RPG on AS/400 using the DB2/400 database.

    126170 pointsBadges:
  • Pass parameter RPG/400

    Hi, is there any solution to pass numeric parameter to the RPG program from the command line?

    I6195 pointsBadges:
  • Chain With KLIST

    Hi all, I have two files F1 anf F2. F1 is Having a Unique key. But F2 is having a Composite key. I need to perform CHAIN operation with unique key K1 of F1 on both the files. For that i did defined a KLIST for F2 at the RPG level to perform chain with KLIST. Now my question is how to pass the value...

    Sai4AS4001,420 pointsBadges:
  • Use SETLL to read set of records

    Hi I have a set of records whose key has duplicates. Can SETLL be used to read these set of records? I need this to be done as part of a loop.

    Flint20 pointsBadges:
  • Equivalent commands to SETLL

    Hi, I'm venkat. I've got a small question.Can anybody clarify this question please? Are there any equivalent commands to SETLL*LOVAL in CL?

    itanswers0 pointsBadges:
  • DSPF: Declare in display file

    I have a field in the display file of length 13 Characters long. The first 4 characters contains the year, followed by a hyphen, Next 2 characters contain the location(alphanumeric) followed by hyphen Last 5 characters contains numeric. How do I declare in the display file. When I enter a value in...

    Deepz30 pointsBadges:
  • AS/400 unit testing for a module

    Hi, I'm Giri. I'm doing a project. In this project, there are 8 modules is there. I have developed one module. For example 'EMPLOYEE TASKS'. I have completed this module. But now I want to test (Unit Testing). How can I do that? What type of error should I want to check? Please clarify this for me....

    Repaire45 pointsBadges:
  • RPG/400 alphanumeric field

    How to validate a alphanumeric field that is of length 20 but should not allow values less than 12?

    itanswers0 pointsBadges:
  • Need a code in RPG/400

    As a part of training in RPG I have created a PF with two fields barcode and vendor. I have created a screen with the same fields. Now I need a code in RPG/400 that will open the screen and when values are entered it should get populated in the file.

    itanswers0 pointsBadges:

Forgot Password

No problem! Submit your e-mail address below. We'll send you an e-mail containing your password.

Your password has been sent to:

To follow this tag...

There was an error processing your information. Please try again later.

Thanks! We'll email you when relevant content is added and updated.

Following