• The Four Hundred
  • Subscribe
  • Media Kit
  • Contributors
  • About Us
  • Contact
Menu
  • The Four Hundred
  • Subscribe
  • Media Kit
  • Contributors
  • About Us
  • Contact
  • Guru: How To Cancel A Bad SQL Update

    May 15, 2017 Ted Holt

    In Three Ways To Manage Unmatched Data I wrote about the use of the RAISE_ERROR function to force a SELECT statement to cancel when unmatched data is considered a fatal error. Another good use of RAISE_ERROR is to force an UPDATE statement to cancel when an invalid condition occurs.

    To illustrate, imagine that you and I work in a factory. All factories have inventory. The people we serve purchase some inventory items and manufacture others. Our job is to write a program that will allow certain people to zero out the inventory balance for certain types of purchased items.

    The users will enter a series of item numbers into a database table (physical file) named ItemBal3. Our program is to set the quantity on hand to zero, but only for type 3 and type 4 items. Our program contains this UPDATE statement:

    update items as i
       set i.QtyOnHand = 0
     where i.type in ('3','4')
       and i.itemnumber in (select item from ItemBal3);
    
    
    If the users enter the ID numbers of items that are of other types, the program ignores those items.

    Let’s take it a step further. Suppose that the presence of some other type of item in ItemBal3 is an error that cannot be overlooked. In such a case, we can make the UPDATE cancel itself, like this:

    update items as i                                            
       set i.QtyOnHand =                                                  
              case when i.type in ('3','4') then 0                      
                   else raise_error ('97905',                           
                             'Non-purchased items cannot be zeroed') end
     where i.itemnumber in (select item from ItemBal3)

    Notice that the item type is no longer tested in the WHERE clause, but in the SET. If the database manager attempts to modify a type-3 or type-4 item, the case expression returns zero, which is assigned to the QtyOnHand column.

    But if the database manager attempts to modify an item of another type, the system calls the RAISE_ERROR function, which cancels the UPDATE and returns SQL state 97905 to the caller. If the program is running under commitment control, the database manager rolls back any items that were changed before the invalid item was encountered. I can illustrate with an example.

    Here is the item master table:

    Item number Description Type Quantity on hand
    A-1 3-inch Doodle 1 20
    A-3 5cm Spinkler 2 20
    A-7 #7 Hoozit 3 20
    B-1 Widget, size 8 4 20
    B-2 #12 Skyhook 5 20
    F-3 4-inch Floozle 6 20

    Here is ITEMBAL3.

    Item
    A-7
    B-1
    F-3

    If the system updates the items in the order in which they are listed, the quantity on hand for A-7 and B-1 changes from 20 to zero. But when it tries to update F-3, RAISE_ERROR cancels the UPDATE statement. Under commitment control, the quantity on hand reverts to 20. Without commitment control, A-7 and B-1 have a zero balance after the canceled UPDATE.

    Under commitment control, database integrity is preserved. You can find the problem, fix it, and restart the program.

    Without commitment control, you don’t know what you have. Good luck.

    RELATED STORY

    Three Ways To Manage Unmatched Data

    Share this:

    • Reddit
    • Facebook
    • LinkedIn
    • Twitter
    • Email

    Tags: Tags: FHG, Four Hundred Guru, SQL

    Sponsored by
    WorksRight Software

    Do you need area code information?
    Do you need ZIP Code information?
    Do you need ZIP+4 information?
    Do you need city name information?
    Do you need county information?
    Do you need a nearest dealer locator system?

    We can HELP! We have affordable AS/400 software and data to do all of the above. Whether you need a simple city name retrieval system or a sophisticated CASS postal coding system, we have it for you!

    The ZIP/CITY system is based on 5-digit ZIP Codes. You can retrieve city names, state names, county names, area codes, time zones, latitude, longitude, and more just by knowing the ZIP Code. We supply information on all the latest area code changes. A nearest dealer locator function is also included. ZIP/CITY includes software, data, monthly updates, and unlimited support. The cost is $495 per year.

    PER/ZIP4 is a sophisticated CASS certified postal coding system for assigning ZIP Codes, ZIP+4, carrier route, and delivery point codes. PER/ZIP4 also provides county names and FIPS codes. PER/ZIP4 can be used interactively, in batch, and with callable programs. PER/ZIP4 includes software, data, monthly updates, and unlimited support. The cost is $3,900 for the first year, and $1,950 for renewal.

    Just call us and we’ll arrange for 30 days FREE use of either ZIP/CITY or PER/ZIP4.

    WorksRight Software, Inc.
    Phone: 601-856-8337
    Fax: 601-856-9432
    Email: software@worksright.com
    Website: www.worksright.com

    Share this:

    • Reddit
    • Facebook
    • LinkedIn
    • Twitter
    • Email

    COMMON Looking Youthful In 2017 HelpSystems Tackles IBM i Password Woes

    Leave a Reply Cancel reply

TFH Volume: 27 Issue: 33

This Issue Sponsored By

  • Profound Logic Software
  • Remain Software
  • ASNA
  • Linoma Software
  • Manta Technologies

Table of Contents

  • Open Source On IBM i: Let It Grow
  • HelpSystems Tackles IBM i Password Woes
  • Guru: How To Cancel A Bad SQL Update
  • COMMON Looking Youthful In 2017
  • The Five Things Clouds Need To Deliver For IBM i

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