× 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.



Make sure that there no group items below VR1.
It should look like below:

01 VENDR1.
03 VR1.
    05 X  PIC XX.
    05 Y PIC S9(3).
     .
     .
     .
    05 Z PIC XXXX.
Now you should be safe to use
Exec Sql
    Insert Into VendSmall Values(:VR1)
End-Exec.

Sachin.
----- Original Message -----
From: "Jon Paris" <Jon.Paris@Partner400.com>
To: <cobol400-l@midrange.com>
Sent: Wednesday, July 31, 2002 8:27 AM
Subject: RE: Problems with Insert in Embedded SQL


>
>
> > Try using
> >
> >            Exec SQL
> >                  Insert into VendSmall
> >                  Values(:VR1.VNID, :VR1.VNNAME)
> >            End-Exec.
> >
>
> Thanks Sachin - I know this works but it is not the point - I _should_ be
> able to use a structure to avoid having to laboriously spell out (with the
> strong possibility of errors being introduced) every single darned field
in
> a 50+ field file!  The version I listed was as I stated at the time just a
> subset of the real code.
>
> Jon Paris
>
> _______________________________________________
> This is the COBOL Programming on the iSeries/AS400 (COBOL400-L) mailing
list
> To post a message email: COBOL400-L@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/cgi-bin/listinfo/cobol400-l
> or email: COBOL400-L-request@midrange.com
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/cobol400-l.
>


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.