• 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 Rubenstein5,765 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:
  • Can I move a data structue(along with positional-values) into a Data area of same length.

    Can I move a data structue(along with positional-values) into a Data area of same length. Can I move a data structue having positional-values exactly into the same positions of the data area. my code is as follows:- 0014.00 FCS86C00 CF E WORKSTN 0015.00 * 0016.00 I@DS001 DS 452 0017.00 I 1 256 @DTA...

    svankipu560 pointsBadges:
  • How to implement MOUBTN using RPG III/RPG400

    We are converting some code in a legacy application and, in its simplest form, want to know that a mouse has been used/clicked rather than ENTER pressed. We are not that familiar with the MOUBTN keyword, which we assume will tell us what we want, and are having trouble getting this to work. Though...

    Zack250 pointsBadges:
  • Difference between RPG400 & RPGLE?

    What is the difference between RPG400 & RPGILE?

    Titan5 pointsBadges:
  • Batch Jobs in AS/400

    Hi Group, We have an application developed in RPG/400, COBOL/400, CL/400 & ILE. There are few batch jobs that are supposed to be run at the End of the Day. The execution time for these batch jobs is very high.  What measures can be taken to reduce the down time?  Suppose we want to move few jobs...

    mvrkrishna555 pointsBadges:
  • how to explore a new AS/400 application?

    Dear esteemed AS/400 Gurus! I am faced with a new problem. I have been put on a new AS/400 application(Banking related) & am expected  to deliver results within very short time(of about 15-days). Hence I request you to let me know How to learn any new AS/400 application fast/quickly & explore it....

    svankipu560 pointsBadges:
  • Upgrading from RPG3 to RPG400

    how to upgrade rpg 3 to rpg400

    Rajasekhar151,395 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.

REGISTER or login:

Forgot Password?
By submitting you agree to receive email from TechTarget and its partners. If you reside outside of the United States, you consent to having your personal data transferred to and processed in the United States. Privacy

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

Following