I can compile just fine. The problem is I think, one of our JOBDs points to
a routing entry that does a SBMJOB in S/38 mode.

Francis Lapeyre
IS Dept. Programmer/Analyst
Stewart Enterprises, Inc.
E-mail: flapeyre@xxxxxxxx 


-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of fbocch2595@xxxxxxx
Sent: Friday, June 9, 2006 1:14 PM
To: midrange-l@xxxxxxxxxxxx
Subject: Re: V5R3, SBMJOB, and CPD0050

The issue is not able to compile?  Strpdm then access a mbr and F18 and
check the jobd since that's what has resolved this for me, in the past.
 
   
 
-----Original Message-----
From: Lapeyre, Francis <FLAPEYRE@xxxxxxxx>
To: 'Midrange Systems Technical Discussion' <midrange-l@xxxxxxxxxxxx>
Sent: Fri, 9 Jun 2006 12:56:55 -0500 
Subject: RE: V5R3, SBMJOB, and CPD0050


Rob:

QBATCH routing data looks the same as yours:

 
Start 
 Opt    Seq Nbr    Program       Library       Compare Value
Pos  
           15      QCMD          QSYS          'QIGC'
1   
          300      QCMD          QSYS          'QS36EVOKE'
1   
          700      QCL           QSYS          'QCMD38'
1   
         9999      QCMD          QSYS          *ANY

 

Francis Lapeyre
IS Dept. Programmer/Analyst
Stewart Enterprises, Inc.
E-mail: flapeyre@xxxxxxxx 


-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of rob@xxxxxxxxx
Sent: Friday, June 9, 2006 12:06 PM
To: Midrange Systems Technical Discussion
Subject: Re: V5R3, SBMJOB, and CPD0050

Peter is right.  In the S/38 your call would be CALL PGM(mylib.mypgm) {or 
is that CALL PGM(mypgm.mylib)} not CALL PGM(MYLIB/MYPGM).
Do a DSPJOBD of the submitting job.  You need to look at 
Routing data . . . . . . . . . . . . . . . . . . :   QCMDB
Judging by your joblog I already see RTGDTA(QCMDB) in there.  And QCMDB is 
the default in job description QBATCH.  So that's probably right.  Now, 
where the rub lies, is if you do a 
DSPSBSD QBATCH
7. Routing entries
I have on our system
                                                                  Start
Seq Nbr    Program       Library       Compare Value               Pos 
   15      QCMD          QSYS          'QIGC'                       1 
  300      QCMD          QSYS          'QS36EVOKE'                  1 
  700      QCL           QSYS          'QCMD38'                     1 
 9999      QCMD          QSYS          *ANY 

Either someone changed 9999 from QCMD to QCL, or someone added a different 
routing entry to take QCMDB and use program QCL.

Rob Berendt

As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.