Re: Embedded SQL problem

["Simon Coulter" <shc@xxxxxxxxxxxxxxxxx>]

Hello Jon,

You wrote:
>Anybody got any ideas?

The problem is with one or more of the other fields in the host data
structure.  I say that because I took your excerpt and make it compile by
doing little more than adding the COBOL overhead...

       IDENTIFICATION DIVISION.
       PROGRAM-ID. JON.
       ENVIRONMENT DIVISION.
       CONFIGURATION SECTION.
       SOURCE-COMPUTER. IBM-AS400.
       OBJECT-COMPUTER. IBM-AS400.
       DATA DIVISION.
       WORKING-STORAGE SECTION.
           EXEC SQL
               INCLUDE SQLCA
           END-EXEC.
       01 VendorRecordWS.
          05 VendR.
          10 VENDORID              PIC X(6).
          10 VENDORNAME            PIC X(30).
          10 ADDRESSLINE1          PIC X(30).
       PROCEDURE DIVISION.
       MAIN SECTION.
      *    Write VendorRecord
           Exec SQL
                Insert into VendP
                Values( :VendR)
           End-exec.
           STOP RUN.
           EXIT.

Regards,
Simon Coulter.
--------------------------------------------------------------------
   FlyByNight Software         AS/400 Technical Specialists
   http://www.flybynight.com.au/

   Phone: +61 3 9419 0175   Mobile: +61 0411 091 400        /"\
   Fax:   +61 3 9419 0175   mailto: shc@flybynight.com.au   \ /
                                                             X
                 ASCII Ribbon campaign against HTML E-Mail  / \
--------------------------------------------------------------------