Thema:

Kommentar:
: Hallo : ich moechte fuer einen Client Daten in bereitstellen. Das soll ueber die Stored Procedure geschehen. : Um moeglichst performant zu sein, will ich keine Tabelle benuetzen. : Ist es moeglich, dass ich die generierten Daten einfach in die Linkage des Client-Program's stelle? : Bisher habe ich folgenden Ansatz: : Calling Program Client: : Data Division. : Working-Storage Section. : EXEC SQL INCLUDE SQLCA END-EXEC. : 01 PROG PIC X(10) VALUE "SPSAMPLE". : 01 SPSAMPLE. : 10 PARM-STRUCT. : 49 PARM-LEN PIC S9(4) USAGE COMP. : 49 PARM-DATA PIC X(16050). : Linkage Section. : Procedure Division. : Display "Howdy, I the client is running". : Move 5 To Parm-Len. : Move "xxxxx" To Parm-Data. : * Call stored procedure using SQLDA : EXEC SQL CALL :prog (:parm-struct) END-EXEC. : Display PARM-LEN. : Display PARM-DATA. : Display PARM-STRUCT. : Display SqlCode. : Display SqlCa. : Display "Server Procedure Complete.". : * Disconnect from Remote Database. : EXEC SQL CONNECT RESET END-EXEC. : stop run. : exit. : und hier die Stored Procedure: : Data Division. : Working-Storage Section. : EXEC SQL INCLUDE SQLCA END-EXEC. : 01 Curr-Time Pic X(26) Value ' '. : LINKAGE SECTION. : 01 PARM-STRUCT. : 49 PARM-LEN PIC S9(4) USAGE COMP. : 49 PARM-DATA PIC X(16050). : Procedure Division USING PARM-STRUCT. : Exec Sql Set :Curr-Time = Current Timestamp End-Exec : MOVE 12 TO PARM-LEN. : MOVE 'I was called' TO PARM-DATA. : Error-Exit. : goback. : : Nach meinem Verstaendnis muesste nun im Calling-Program in Par-Data 'I was called' stehen. : Dem ist aber nicht so. : Kann mir jemand weiter helfen warum nicht?! : Vielen Dank fuer jede Info. : Gruss : Antoinette

Optionale Link URL:   
Link Titel:                  
Optionale Image URL: