• 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

    …

    Read more
  • Convert J.D. Edwards Dates to Other Formats

    September 6, 2002 Timothy Prickett Morgan

    Hey, Howard:

    I want to convert a J.D. Edwards date, (CYYDDD where C represents the century, YY represents the year, and DDD represents the day of the year) to a more readable format, (like YYYY-MM-DD). I can do this in Crystal Reports, but is there a way to do it in SQL?

    — Domenic

    This is a good one, Domenic, as I first thought it was impossible, but on further reading of the IBM documentation, I found a little known use for the DATE function. I found that DATE can take a variety of arguments. As I was reading the

    …

    Read more
  • Edit with Parentheses in Query/400, Take Two

    September 6, 2002 Timothy Prickett Morgan

    Hey, Ted:

    I read your response to the question posted in the August 28 issue of Midrange Guru, and since I don’t work much with negative numbers, I changed data to try your solution. I think I found something, but I don’t know why or how it works..

    I changed the Describe Numeric Field Editing display, as follows: I changed the Replace leading zeroes field with a Y and changed the Replace with field with a 3 (Floating currency symbol). Here’s an example:

    Describe Numeric Field Editing                      
                                                                                 
     Field . . . . . . :   JEAMT                                                 
                                                                                 
     Type choices, 
    …

    Read more

Content archive

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

Recent Posts

  • AI Is Coming for ERP. How Will IBM i Respond?
  • The Power And Storage Price Wiggling Continues – Again
  • LaserVault Adds Multi-Path Support To ViTL
  • As I See It: Spacing Out
  • IBM i PTF Guide, Volume 27, Numbers 34, 35, And 36
  • The Power11 Transistor Count Discrepancies Explained – Sort Of
  • Is Your IBM i HA/DR Actually Tested – Or Just Installed?
  • Big Blue Delivers IBM i Customer Requests In ACS Update
  • New DbToo SDK Hooks RPG And Db2 For i To External Services
  • IBM i PTF Guide, Volume 27, Number 33

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