NEWSboard Internet-Museum für das Schwarze Brett der AS/400

      Re: enbeded SQL


      [ Follow Ups ] [ Neuen Beitrag verfassen! ] [ Schwarzes Brett ] [ FAQ ]

      Posted ByDanke und neue Frage on October 07, 1999 at 17:02:18:

      In Reply to: Re: enbeded SQL posted byVolker Schlüter on October 06, 1999 at 11:36:34:

      : : Wie schreibe ich SQL-Code in eine RPG III-Source ??????

      : : Kann mir jemand schnell helfen ???????

      : : Ich Bedanke mich jetzt schon für die Beantwortung der Frage.

      : Nun ungefär so....

      : C/EXEC SQL
      : C+ INSERT INTO DATENLIB/OAS_LINKHEAD (LINKCODE, CMPCODE, DOCCODE,
      : C+ DOCNUM, POSTED, YR, PERIOD, CURDOC, DOCDATE, AUTHUSER, DESCR,
      : C+ ORIGCMPCODE, ORIGDOCCODE, ORIGDOCNUM) VALUES(:vhLINKCODE,
      : C+ :vhCMPCODE, :vhDOCCODE, :vhDOCNUM, :vhPOSTED, :vhYR:YR_I,
      : C+ :vhPERIOD:PERIOD_I, :vhCURDOC:CURDOC_I, :vhDOCDATE:DOCDATE_I,
      : C+ :vhAUTHUSER:AUTHUSER_I, :vhDESCR:DESCR_Ihead,
      : C+ :vhORIGCMPCOD:ORIGCMPCODE_I, :vhORIGDOCCOD:ORIGDOCCODE_I,
      : C+ :vhORIGDOCNUM:ORIGDOCNUM_I)
      : C/END-EXEC

      : Hierzu ist aber auf jeden Fall die URL http://www.redbooks.ibm.com zu empfehlen.

      : Bei verteilter DB2 fängt es dann richtig an Spaß zu machen!

      : Gruß V.Schlüter

      Vielen Dank für die Ausführungen.

      Habe kleines Testprogramm geschrieben, aber nach der Umwandlung der Source und Aufruf durch einen CALL tut sich nichts.

      Programm :

      C MOVE 'TEST' TEST 10
      C/EXEC SQL
      C+ INSERT INTO TEST (DDM001) VALUES(:TEST)
      C/END-EXEC
      C MOVE *ON *INLR




      Follow Ups



      Neuen Beitrag verfassen!

      Name:
      E-Mail:

      Subject:

      Comments: