Topic
  • 3 replies
  • Latest Post - ‏2011-09-13T23:34:19Z by bbalk
FTDS
FTDS
9 Posts

Pinned topic Personal PLI

‏2011-09-08T05:35:10Z |
 Getting error message IBM0204I when trying to run TEST2.exe. Command line is 
"TEST2.exe set dd:input=f:\ntape\x9511.jun". Declare statement is
"dcl (input) file record;" Open statement is "open file(input);"
What am I missing?
Updated on 2011-09-13T23:34:19Z at 2011-09-13T23:34:19Z by bbalk
  • bbalk
    bbalk
    3 Posts

    Re: Personal PLI

    ‏2011-09-08T22:04:00Z  
    Hi FTDS,
    You have all the parts, just need them in the right order.
    Your code is OK.
    You first need to do the 'set dd:input=f:\ntape\x9511.jun' command to set the dd:input environment variable.
    Then you can run your 'TEST2.exe' on the same command line.
    That should do it.
  • FTDS
    FTDS
    9 Posts

    Re: Personal PLI

    ‏2011-09-10T07:00:27Z  
    • bbalk
    • ‏2011-09-08T22:04:00Z
    Hi FTDS,
    You have all the parts, just need them in the right order.
    Your code is OK.
    You first need to do the 'set dd:input=f:\ntape\x9511.jun' command to set the dd:input environment variable.
    Then you can run your 'TEST2.exe' on the same command line.
    That should do it.
     Thank you bbalk. I ran it with the changes you suggested and got no error messages but no other
    indication that the job ran. The only output is sysprint so my print statements are obviously wrong. My
    1st print statement is:
      PUT EDIT('STOP - DATA OUT OF SORT - LAST REC READ IS ')(SKIP(2),A)
          (INDATA.CNTDST,' ',INDATA.LAST78) (SKIP(1),A,A,A);
     
    I tried replacing PUT EDIT with Display but that didn't work. Any ideas? 
    The 4th line of the program is DCL SYSPRINT FILE PRINT. No other reference to SYSPRINT OR
    PRINT. 

     
  • bbalk
    bbalk
    3 Posts

    Re: Personal PLI

    ‏2011-09-13T23:34:19Z  
    • FTDS
    • ‏2011-09-10T07:00:27Z
     Thank you bbalk. I ran it with the changes you suggested and got no error messages but no other
    indication that the job ran. The only output is sysprint so my print statements are obviously wrong. My
    1st print statement is:
      PUT EDIT('STOP - DATA OUT OF SORT - LAST REC READ IS ')(SKIP(2),A)
          (INDATA.CNTDST,' ',INDATA.LAST78) (SKIP(1),A,A,A);
     
    I tried replacing PUT EDIT with Display but that didn't work. Any ideas? 
    The 4th line of the program is DCL SYSPRINT FILE PRINT. No other reference to SYSPRINT OR
    PRINT. 

     
     Could you pls send my your source and a short description of what your program is trying to do?
    balk@us.ibm.com