Reader Feedback and Insights: Printing Leading Zeros in Query/400, Another Look

June 12, 2002 Timothy Prickett Morgan

Hey, Ted:

In response to your “Odds and Ends” article in the May 31 Midrange Guru, OS/400 Edition, specifically the tip that discusses Printing Leading Zeros in Query/400, Another Look, there’s another way to ‘skin a cat.’

Use an edit word with an extra zero at the beginning of the field. For example, to edit a Social Security number, I use edit word 0nnn-nn-nnnn. It works just fine unless you need to print this field starting at print position 1.

— Rich

Sponsored By ADVANCED SYSTEMS CONCEPTS

SEQUEL meets all your iSeries and AS/400 data access

String Parameters of Various Lengths, Take Two

June 12, 2002 Timothy Prickett Morgan

Dear Readers:

Several people have written to point out errors in my solution to the reader who wanted to make an RPG subprocedure accept character parameters of any size. I need to correct the code that I provided in that issue of Midrange Guru, OS/400 Edition. (I plan to explore this topic more and to present the ideas of my respondents in the near future, so watch for more information in a future edition of Midrange Guru.)

Here is the original question”

“I have an RPG IV subprocedure that I call from several different programs. I use

Build SQL to Define Your Existing Files, Revisited

June 12, 2002 Timothy Prickett Morgan

Hey, Ted:

In the June 5 issue of Midrange Guru, OS/400 Edition, you explained how to use the QSQGNDDL API to generate SQL to create SQL Data Definition Language (SQL DDL) for existing objects. I’m writing to mention that you can do the same thing without any programming through Operations Navigator (OpsNav).

— John Valance

Thanks for bringing it up, John.
Here are the steps:

When you open the connection to the iSeries machine, you’ll see a Database option in the navigation pane. When you click on Database, the tasks panel (across the bottom of the window) will be