• The Four Hundred
  • Subscribe
  • Media Kit
  • Contributors
  • About Us
  • Contact
Menu
  • The Four Hundred
  • Subscribe
  • Media Kit
  • Contributors
  • About Us
  • Contact
  • Reader Feedback and Insights: Copying Records in RPG

    September 6, 2002 Timothy Prickett Morgan

    Hey, Ted:

    I’m writing about the August 23 Midrange Guru Tech Tips regarding moving records between files with different field names. One option that I didn’t see, and the one I now prefer, with RPG IV is using the prefix keyword to rename the fields from one of the files.

    Here’s an example:

    Fpaywork   if   e           k disk
    Fpayhist   o    e             disk     prefix(pw : 2)
    
    C                   read      paywork
    C                   dow       not %eof(paywork)
    C                   write     histrec
    C                   read      paywork
    C                   enddo
    
    C                   eval      *inlr = *on
    

    — Scott

    Good idea, Scott. A few other readers suggested the same thing. That technique will work in the example I gave because the trailing portions of the field names are the same in the two files. It would not work in cases where the trailing portions of names differed.

    — Ted

    Sponsored By
    WORKSRIGHT SOFTWARE

    On June 30, 2002,
    $$$$$$$$    Postal Rates went UP!    $$$$$$$$

    On July 1, 2002,
    $$$$$    you wanted your postage bill to go down.    $$$$$

    We have the solution! CASS certify your mailing names and addresses and presort your outgoing mail and save. Our CASS certification software ensures that your address files have valid ZIP Code and address information. Our presort software ensures that you can properly prepare you mail for delivery to your Post Office.

    WorksRight Software, Inc. is the number-one source for iSeries and AS/400 CASS, presort, ZIP Code, and area code software and data.

    Visit our Web site – www.worksright.com – to learn more about our CASS and presorting software, or contact WorksRight Software, Inc., phone 601-856-8337,
    e-mail software@worksright. com .

    Share this:

    • Reddit
    • Facebook
    • LinkedIn
    • Twitter
    • Email

    Tags: Tags: mgo_rc, Volume 2, Number 68 -- September 6, 2002

    Sponsored by
    Maxava

    Maxava Partner Webinar: Keeping IBM i Resilient in a Hybrid World

    The session will examine why disaster recovery strategies often fail when tested, how IBM Power Virtual Server is being positioned within enterprise architectures, and how organizations are using PowerVS for DR, HA, and production workloads.

    Register Now

    Share this:

    • Reddit
    • Facebook
    • LinkedIn
    • Twitter
    • Email

    Parameterized RUNSQLSTM with Two or More Substitutions Convert J.D. Edwards Dates to Other Formats

    Leave a Reply Cancel reply

MGO Volume: 2 Issue: 68

This Issue Sponsored By

    Table of Contents

    • Reader Feedback and Insights: Copying Records in RPG
    • Convert J.D. Edwards Dates to Other Formats
    • Edit with Parentheses in Query/400, Take Two

    Content archive

    • The Four Hundred
    • Four Hundred Stuff
    • Four Hundred Guru

    Recent Posts

    • Brace Yourself: Another Power Systems Price Hike Coming May 1
    • Updates Announced for IBM i BRMS And SMTP Email Client
    • AI Will Be Front And Center At POWERUp 2026 Next Week
    • IBM i PTF Guide, Volume 28, Number 16
    • Spring IBM i Tech Refreshes Will Come A Bit Later This Year
    • You Are Much More Than Power Systems, And So Are We
    • Startup Seeks The “Golden Path” for IBM i Modernization
    • What Can IBM Do To Make The Future Power S1112 Mini System Compelling?
    • IBM i PTF Guide, Volume 28, Number 15
    • Bob 1.0 Users Bugged By Lack Of One Feature

    Subscribe

    To get news from IT Jungle sent to your inbox every week, subscribe to our newsletter.

    Pages

    • About Us
    • Contact
    • Contributors
    • Four Hundred Monitor
    • IBM i PTF Guide
    • Media Kit
    • Subscribe

    Search

    Copyright © 2025 IT Jungle