Einzelnen Beitrag anzeigen

Benutzerbild von Andidreas
Andidreas

Registriert seit: 27. Okt 2005
1.110 Beiträge
 
Delphi 10.1 Berlin Enterprise
 
#1

SQL im ILE/RPG (Free)

  Alt 22. Jun 2006, 06:43
hi,

so ich weiss das des hier ein delphi forum is...

aber ich hätte denoch eine frage zur ILE/RPG programmierung im freien format auf der AS/400, vielleicht gibts hier ja nochmal ein paar leute die auch das können


also ich hab folgendes problem:

ich erstell mir grad ein einfaches simples ile/rpg programm im freien format in dem ich bisl mit sql rum spielen kann, bloss ich hab jetzt da ein kleines problem beim absetzen meines sql befehls

im spalten gebundenen rpg geht das so:

Code:
C/Exec SQL                                  
C+ Select Count(*) Into :AnzPak From POKPLNOX
C/End-Exec
also der sql befehl wird halt in meiner c bestimmung abgesetzt....


wie geht das im freien format
da hab ich ja nicht wirklich ne c bestimmung

ich habs mal so probiert:

Code:
  /Free
   ....
   ....
   ....
  /Exec SQL                                                
   +Select CaWk, CaKMon, CaKnr, CaKkz, CaKtnr, CaKttp, CaInh
   +Into  :AWk, :AKmon, :AKnr, :AKkz, :AKtnr, :AKtyp, :AInh
   + from caexwag                                          
   +Where CaWk  = EAWk,                                  
   +And   CaKMon = EAKMon,                                
   +And   CaKNr = EAKNr,                                
   +And   CaKtNr = EAKtnr                                
  /End-Exec
   ....
   ....
   ....
  /End-Free
und wie solls anders sein ich krieg beim kompelieren nen fehler
der da lautet:
004300 Anweisung für das Umwandlungsprogramm nicht erkannt; die Anweisung wird ignoriert.

hat jemand vielleicht ne idee wie ich das im freien format hinkrieg????
Ein Programmierer Programmiert durchschnittlich 15 Code Zeilen pro Tag
Wir sind hier doch nicht bei SAP!!!

Aber wir habens bald
  Mit Zitat antworten Zitat