Prev
Next
Forums S3 Customization/Development

Scripts within cobol

Sort:
You are not authorized to post a reply.
Author
Messages
Sam Simpson
Veteran Member
Posts: 239
Veteran Member
6/12/2007 1:26 PM
    We are in the process of testing 803 in an AIX environment.
    We are having a lot of issues but one particular cobol program that has been working in solaris it seems does not work in AIX. Here's the situation: We have a cobol program that has a call to a simple ksh script as the last statement. The cobol routines is working fine except the called script is not working at all(this is a simple rename and move). However, when you call the script thru LID it is working as it should.

    Is there any unix difference between the two platform? Any idea why this script is not working? Any help would be appreciated.
    John Henley
    Senior Member
    Posts: 3348
    Senior Member
    6/12/2007 10:53 PM
      Since the problem is that the script isn't executing at all, I'd guess that it has something to do with the shell that is assigned to the user running the job, or environment variables aren't set up correctly for that user. One other thing to look at is Environment security and laua's "can user exit to shell' privilege....
      Thanks for using the LawsonGuru.com forums!
      John
      Sam Simpson
      Veteran Member
      Posts: 239
      Veteran Member
      6/13/2007 1:44 PM
        John thanks for your reply. I have to do analysis the whole day only to find out the simple answer to my problem. I compared all cobol pgms that has call to scripts and I found out that this one particular one has an initialization statement to the the working storage before being used by the call command. i.,e.

        INITIALIZE COMMAND-STRING.

        STRING "XFILE_rename.ksh B"
        DELIMITED BY SIZE
        INTO COMMAND-STRING.

        CALL "SYSTEM" USING COMMAND-STRING.

        Once I remove the initialize statement, the script rans successfully. Still, I'm wondering why in solaris the initialization works but not in AIX. The initialization is just a 100 bytes
        blank characters plus a 1 byte null character (x"00"). It looks like the null character becomes into something than null.

        Thanks.
        John Henley
        Senior Member
        Posts: 3348
        Senior Member
        6/13/2007 9:15 PM
          This is how I define it in working storage:

          02 WS-CMD-SCRIPT.
          05 FILLER PIC X(06) VALUE "sh -c ".
          05 FILLER PIC X(01) VALUE x"22".
          05 FILLER PIC X(25) VALUE
          "$GENDIR/custom/script.sh ".
          05 FILLER PIC X(01) VALUE x"22".
          05 FILLER PIC X(01) VALUE x"00".
          Thanks for using the LawsonGuru.com forums!
          John
          You are not authorized to post a reply.