• The Four Hundred
  • Subscribe
  • Media Kit
  • Contributors
  • About Us
  • Contact
Menu
  • The Four Hundred
  • Subscribe
  • Media Kit
  • Contributors
  • About Us
  • Contact
  • 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, press Enter.                                                  
                                                                                 
     Decimal point . . . . . . . .   1      1=.  2=,  3=:  4=$      5=None
     Thousands separator . . . . .   2      1=.  2=,  3='  4=Blank  5=None
     Show negative sign  . . . . .   Y      Y=Yes, N=No
       Left negative sign  . . . .   (
       Right negative sign . . . .   )
     Show currency symbol  . . . .   N      Y=Yes, N=No
       Left currency symbol  . . .   $
       Right currency symbol . . .
     Print zero value  . . . . . .   Y      Y=Yes, N=No
     Replace leading zeros . . . .   Y      Y=Yes, N=No
       Replace with  . . . . . . .   3      1=Blanks
                                            2=Asterisks
                                            3=Floating currency symbol
       Single leading zero . . . .   N      Y=Yes, N=No
                                                                                 
     F3=Exit       F5=Report         F10=Process/previous    F12=Cancel    
     F13=Layout    F16=Remove edit   F18=Files
    

    I expected to see something like (   $1), but I saw (1) for a field that had a negative number. I hope this helps. See if you can test it and break it.

    — Doug

    It works, Doug. I had no idea it would do this. The reason it didn’t print (   $1) was because Show currency symbol is N. If you change it to Y, the currency symbol prints and the left parenthesis still floats.

    Thanks for sharing your discovery with us.

    — Ted

    Sponsored By
    COMMON

    REGISTER FOR COMMON IN DENVER, OCT. 13-17

    Get the IT training you need by attending COMMON Users Group’s Fall 2002 IT Education Conference & Expo, October 13-17 in Denver. Early Bird registration is $1,150 until September 4.

    Choose from over 720 sessions and labs covering a wide range of industry topics. Also receive training from J.D. Edwards, MAPICS, and other vendors.

    Don’t miss out! Go to www.common.org

    Share this:

    • Reddit
    • Facebook
    • LinkedIn
    • Twitter
    • Email

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

    Sponsored by
    Manta Technologies

    The Leader in IBM i Education!
    Need training on anything i?
    Manta is all you need.

    130 courses and competency exams on:
    · IBM i operations
    · System Management and Security
    · IBM i Programming Tools
    · Programming in RPG, COBOL, CL, Java
    · Web Development

    SQL, DB2, QueryProduct features:
    · Runs in every popular browser
    · Available 24/7/365
    · Free Student Reference Guides
    · Free Student Administration
    · Concurrent User License
    · Built-In IBM i Simulator

    You can download our 200-page catalog and take sample sessions at MantaTech.com

    Share this:

    • Reddit
    • Facebook
    • LinkedIn
    • Twitter
    • Email

    Parameterized RUNSQLSTM with Two or More Substitutions Reader Feedback and Insights: Security Flaws

    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

    • 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
    • Meet The Next Gen Of IBMers Helping To Build IBM i
    • Looks Like IBM Is Building A Linux-Like PASE For IBM i After All
    • Will Independent IBM i Clouds Survive PowerVS?
    • Now, IBM Is Jacking Up Hardware Maintenance Prices
    • IBM i PTF Guide, Volume 27, Number 24

    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