Recent content by Adam5

I don't like the usage of the stack. Therefore I think, I'll use the "parse source" to get the name of the running exec, and pass that as a argumtent to the called procedure. Thank's a lot![smile]

Hello, I need to find out which REXX-procedure calls the aktual REXX-procedure. For example REXX-procedure TEST1 calls TEST2: REXX-procedure TEST1: /* REXX */ call TEST2 REXX-procedure TEST2: /* REXX */ whocallsme = ????? say 'I was called from ' whocallsme The result should be: I was...

Hello, in thread277-1421324 I've described how zu trap the ouput from LDAPSRCH-tool. A few weeks ago, I had to change the coding, because I was not able to read LDAP-entries with umlaute ("ä", "ö") and other diacritic letters ("á", "é"). I got "Not printable" - Attributes. I had to use the...

Hi, I found the REXX XML parser from Andrew Armstrong on sourceforge.net: http://sourceforge.net/projects/rexxxmlparser/ From the link above you can download the zip-file and look into it, because it is in ASCII. Beatifull! It seems to be sophisticated! I think I will love it :-) Adam

Hi mikrom, I downloaded the xmlparse.vmarc - Archive. But I don't know how to get it on the z/OS. What is an vmarc-Archive? Thanks Adam

Hi kevinpink, can you please post the link to the PARSEXML exec on IBM's website, because I can't find it... :-( Thanks

Hello, does anybody has an example how I can use the character conversion service CUNLCNV in REXX? I have a stem in CCSID IBM-1141 an want to convert the content of the stem into CCSID IBM-1047. The Unicode Services for character conversion is described here...

Hello, I've found a solution how to pipe the output of LDAPSRCH into a file[smile]. I had this idea, after I saw a JCL in HLQ.SGLDSAMP - library. It works like piping stdout & stderr in USS. Here ist my REXX-code: 'FREE F(DSOUT)'...

Hello, in the JCL SYSPRINT is allocated like: //SYSPRINT DD DSN=TXXXXXA.FTP.OUTPUT,DISP=SHR This file already exists: Organization . . . : PS Record format . . . : VB Record length . . . : 1028 Here is the code how I'm allocating SYSPRINT dynamically within REXX: "FREE F(SYSPRINT)"...

Hello, I want to make an LDAP-search with the REXX-EXEC LDAPSRCH. This z/OS utility can be used to get attributes of LDAP-entries. It can be found on HLQ.SGLDEXEC(LDAPSRCH) and is documented in "IBM Tivoli Directory Server Client Programming for z/OS"...

Hello, now I've got my COBOL-SP to be called from my REXX-script, and it works! I had to initialize my REXX-variables and use indicator-variables. The hint above was quite good :-) Here ist my REXX-script: /*REXX*/...

Hello, my coding from above works fine with "normal SQL-statemtents" like SELECT, INSERT or UPDATE. Only when I want to call a SP with CALL I'm getting SQLCODE -084 at the prepare-statement: "EXECSQL PREPARE s1 FROM :sqlstmt" Maybe I should make a post in the REXX-board :-( I'm wondering if...

Hello Marc, I've found the example in the Redbook, but I'm wondering, because there is no CALL-Statement. It opens a cursor, and fetches the results out of the result set made by the SP. The example below does not fit with my SP, because it does not return a result set. I want to have an...

Hello, the stored procedure run's under the WLM of DB2 V8. My REXX-environment is z/OS 1.6. First I tryed following: filenam = './pub/viwas/extra.zip' abtime = '2005-05-25-14.34.00.493273' SQLQUERY = "CALL MYSCHEMA.MYSTP(file, "!!, "abtime, "...

Hello, I've developed a stored procedure in COBOL, and have tested it with the IBM stored procedure builder. It works fine. Now I want to call the stored procedure from a REXX-script. Whenever I try to call it I'm getting an SQLCODE -084 (UNACCEPTABLE SQL STATEMENT). The example from DB2...