× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



Alright Dr. Smith!

I have two questions:

1. How is it different (as far as level checking) from Mark's code?
2. How do you make the pgm fail with a level check error?

Normally I use an external ds for my hostds.

Phil


>
>
> >You could also do this:
> >
> >D  hostDS    ds
> >D     sitnbr      1
> >D     xxxx        5
> >--etc--
> >D  nullDS    ds
> >D     field1      5i 0
> >D     field2      5i 0
> >--etc--
> >
> >C/exec sql
> >C+ fetch c1 into :hostDS :nullDS
> >C/end-exec
>
>
> Danger Will Robinson!
>
> Note that the above code will fail if the database format changes, but the
> program is not recompiled, and NOT with a level check. The level
> checking is
> obviated by this code and using a structure that is fixed by some previous
> point in time as the record layout can lead to headaches.
>
> Unless you are prepared to ALWAYS recompile ALL programs that use a file
> when the database changes, this method is not the recommended way of
> accessing data with SQL. It is convienient, but not a healthy way of using
> SQL.
>
> ===========================================================
> R. Bruce Hoffman, Jr.
>  -- IBM Certified Specialist - AS/400 Administrator
>  -- IBM Certified Specialist - RPG IV Developer
>
> "America is the land that fought for freedom and then
>   began passing laws to get rid of it."
>
>      - Alfred E. Neuman
>
>
>
> _______________________________________________
> This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
> To post a message email: RPG400-L@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
> or email: RPG400-L-request@midrange.com
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
>


_________________________________________________________
Do You Yahoo!?
Get your free @yahoo.com address at http://mail.yahoo.com



As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.