Re: Question: Major Differences Between COBOL/400 and ILECOBOL -- COBOL400-L

you can do imbedded SQL from both COBOL/400 and from ILE COBOL.

Yes, you must use the INTO in embedded SQL. That's not COBOL, that's just
SQL. The interactive SQL is doing dynamic calls and looking at the returned
descriptor and then formating those fields for output appropriately. If you
really want to do this in your COBOL program, you have to use the SQLDA area
also. It is *not* trivial.

The major thing you have to understand in ILE COBOL, is the ILE environment
and activation groups. Overrides and call levels and run units all function
differently in ILE activation groups. If all you do is call a COBOL program
directly and it performs no calls, then the subject can be moot.
Otherwise.... learn ILE environment first.

IIRC the intrinsic functions are not available in COBOL/400. It's been so
long since I've used that dialect.


===========================================================
R. Bruce Hoffman, Jr.
 -- IBM Certified Specialist - iSeries Administrator
 -- IBM Certified Specialist - RPG IV Developer

"When I die, I want to die like my grandmother who died peacefully
  in her sleep. Not screaming like all the passengers in her car."

    - Author Unknown

----- Original Message ----- 
From: "Jim Essinger" <esinger@xxxxxxxx>
To: "COBOL Programming on the iSeries/AS400" <cobol400-l@xxxxxxxxxxxx>
Sent: Tuesday, October 07, 2003 6:52 PM
Subject: Re: Question: Major Differences Between COBOL/400 and ILECOBOL


> D,
>
> ILE COBOL is very much like OPM COBOL.  In most cases you would not see
> much difference except for a few new verbs.  I don't remember if OPM COBOL
> had access to the INTRINSIC FUNCTIONS, but I know that I use them all the
> time in ILE COBOL.  The biggest difference I can think of is that you can
> make your COBOL code more modular using the ILE, and not pay the
> performance hit in calls to a lot of smaller programs.
>
> You _can_ do more with the ILE, but you don't have to.  ILE, I believe,
> will let you do imbedded SQL, where OPM COBOL won't.
>
> Most times you can simply re-designate your source code as CBLLE and
> compile as normal.
>
> HTH,
>
> Jim Essinger
> Senior Programmer/Analyst
> Student Loan Fund of Idaho
>
>
> At 11:49 AM 10/7/2003, you wrote:
> >Hello,
> >
> >I have been attempting to code COBOL/400 , however, when I've tried to
> >find reference material I usually encounter examples of ILE COBOL instead
> >of COBOL/400.  Could you tell me what are the major differences?  Are
they
> >similar but yet different?
> >
> >I'm new to the AS400 and I'm trying to figure if I can us some ILE COBOL
> >logic/examples in my COBOL/400 Programs.  Another example,  when I invoke
> >"STRSQL" I can query by doing a "SELECT * " without having to use "INTO"
> >and yet cannot do the same thing in embedded COBOL/ 400 embedded SQL, I'm
> >just wondering why?
> >
> >  I hope you can help me iron out the differences.  My goal is to work
> > with COBOL/400 at this time, I'm just trying to reference the correct
> > form.  I appreciate any help you could give me.  Thanks.
> >
> >D Meza
> >
> >
> >
> >---------------------------------
> >Do you Yahoo!?
> >The New Yahoo! Shopping - with improved product search
> >_______________________________________________
> >This is the COBOL Programming on the iSeries/AS400 (COBOL400-L) mailing
list
> >To post a message email: COBOL400-L@xxxxxxxxxxxx
> >To subscribe, unsubscribe, or change list options,
> >visit: http://lists.midrange.com/mailman/listinfo/cobol400-l
> >or email: COBOL400-L-request@xxxxxxxxxxxx
> >Before posting, please take a moment to review the archives
> >at http://archive.midrange.com/cobol400-l.
>
> _______________________________________________
> This is the COBOL Programming on the iSeries/AS400 (COBOL400-L) mailing
list
> To post a message email: COBOL400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/cobol400-l
> or email: COBOL400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/cobol400-l.
>