I would write a cl pgm then call the cl.

Parameters

CALL        'ORD685B',W0INTR,W7PLST,W7SLST 

W0INTR = A/1
W7PLST = A/256  (data structure)
W7SLST = A/256  (data structure) 

Sub fileds for W7PLST:
W7ACT       P   2,0             1     2  Action Code      
W7FLR1      A   254             3   256  Filler           

Sub fields for W7SLST:
XLCOMP      P   2,0             1     2  Lower Company          
XUCOMP      P   2,0             3     4  Upper Company          
XLCUST      P   6,0             5     8  Lower Customer         
XUCUST      P   6,0             9    12  Upper Customer         
W8LDTE      P   8,0            13    17  Lower Request Date     
W8UDTE      P   8,0            18    22  Upper Request Date     
XLHORD      P   6,0            23    26  Lower Order Number     
XUHORD      P   6,0            27    30  Upper Order Number     
W7FLR2      A   226            31   256  Filler                 

Values
W0INTR = 'I'
W7PLST = *BLANKS
W7SLST:
        XLCOMP = 0         
        XUCOMP = 99         
        XLCUST = 0         
        XUCUST = 999999         
        W8LDTE = 0     
        W8UDTE = 99999999     
        XLHORD = 0     
        XUHORD = 999999     
        W7FLR2 = *blanks                 

Feel free to call me if you need more help.
Good luck,

Sonny Kim
Cone Mills LLC, Information Service
804 Green Valley Road, Suite 300
Greensboro, NC 27408
Tel: 336.379.6120  Fax: 336.335.1765


-----Original Message-----
From: Lat - Sandy Sever [mailto:sandys@xxxxxxxxx]
Sent: Wednesday, July 07, 2004 12:00 PM
To: bpcs-l@xxxxxxxxxxxx
Subject: ** Schedule Order Hold Report to Print...**



Hello,

We would like to automatically print the
Order Hold Report every night using IBM's
job scheduler.

I added a job to the scheduler and tested,
but receive and error message when calling the
program ORD685B or ORD685D:
Error message CPF4101 appeared during OPEN (C S D F). 

I then changed and added parameters in the job
scheduler, but still
am receiving errors, see below:

 Command to run . . . . . . . . .   CALL PGM(B61O/ORD685D) PARM('00 99
000000 99
9999 000000 999999 000000 999999 0')  

                                                                        
Then I tried from the command line:
 

 Program  . . . . . . . . . . . . > ORD685D       Name

   Library  . . . . . . . . . . . >   B61O        Name, *LIBL, *CURLIB

 Parameters . . . . . . . . . . . > '00 99 000000 999999 000000 999999
000000 99
9999 0'      
  
 

 Message . . . . :   Parameters passed on CALL do not match those required.

 Cause . . . . . :   The parameters passed on the CALL command do not match
the 
   parameters required by program ORD685D in library B61O. Correct program
not  
   found or correct parameters not passed. The number of parameters or the
type 
   of parameters passed on the CALL command must match those expected by the

   program called.


 
What do I have to do to get this report to run (using the defaults) in the
job scheduler?

Defaults:
                                                    
  Type desired selection criteria, press Enter.     
                                                    
                                                    
 Company                        To  99              
 Customer Number                To  999999          
 Request Date          0/00/00  To  99/99/99        
 Order Number                   To  999999          
                                                    
                                              
                                                    
 Run Time Parameter  1  (0=Interactive 1=Batch)    
                                                    

Any suggestions, will get greatly appreciated...

Thanks,
Sandy                                          
                

_______________________________________________
This is the SSA's BPCS ERP System (BPCS-L) mailing list
To post a message email: BPCS-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/bpcs-l
or email: BPCS-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/bpcs-l.

This thread ...


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

This mailing list archive is Copyright 1997-2020 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].