• 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

  • With Power11, Power Systems “Go To Eleven”
  • With Subscription Price, IBM i P20 And P30 Tiers Get Bigger Bundles
  • Izzi Buys CNX, Eyes Valence Port To System Z
  • IBM i Shops “Attacking” Security Concerns, Study Shows
  • IBM i PTF Guide, Volume 27, Number 26
  • Liam Allan Shares What’s Coming Next With Code For IBM i
  • From Stable To Scalable: Visual LANSA 16 Powers IBM i Growth – Launching July 8
  • VS Code Will Be The Heart Of The Modern IBM i Platform
  • The AS/400: A 37-Year-Old Dog That Loves To Learn New Tricks
  • IBM i PTF Guide, Volume 27, Number 25

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