Title: parameter list list

I'm confused about a parameter passing technique I'm trying to use and would appreciate some insight please:

I've written a command to FTP a list of objects via a savefile.
The command accepts a list of objects that need to be packaged into the savefile, and then somewhere in the CPP it does a SAVOBJ and afterwards it does an FTP via a script.

I allow up to 50 object names (of 10 bytes each) to be passed in to the command, so I have a parameter declaration of -

When I do a test shot with debug, I can see the value of &OBJECT as:

0002C3C3 F8F6F6C3 D3404040 C3C3F8F6   - ..CC866CL   CC86       
 F7C3D340 4040D9C9 E2C3F5F0 F0404040   - 7CL   RISC500

I can see the list count of 2 and the names of the 2 objects in the list.

I thought I'd be clever and pass the list of object names to the SAVOBJ command by extracting bytes 3 to 22 from &OBJECT into &OBJLST and using that value as -

SAVOBJ     OBJ(&OBJLST) LIB(&FRMLIB) DEV(*SAVF) ...................    

This works when I have only one object in the parameter list, but when I have more than one parameter it doesn't.

When I look at the value through debug immediately before the SAVOBJ command is executed I see:

 EVAL &OBJLST                                                             
 &OBJLST =                                                                
      1   'CC866CL   CC867CL                                           '  
     61   '                                                            '  
    121   '                                                            '

The error message I get is:


Both objects exist in the library I'm trying to save from.

Should I be extracting the program names individually from the input list and then declaring them as individual parameters in the SAVOBJ?  This would be a little more difficult.

I'm at a bit of a loss to work out how to string the object names to pass to the SAVOBJ.
Any ideas?

Thank In Advance

This thread ...


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

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