RE: Default for command without default value?

["Bale, Dan" <D.Bale@xxxxxxxxxxxxx>]

Title: RE: Default for command without default value?

Well, if you searched on RTVCMDSRC, you should have found it by now.  If not, try:
http://www.news400.com/sharewarefiles/rtvcmd.zip
RTVCMDSRC retrieves source from AS/400 commands, both IBM and user-defined. Works on V2R3 and up (including RISC). Source code included. Author: Dave McKenzie.
Submitted: 30 Oct 1996
Cels Enterprises?  Lemme guess...  Movie cels? 

Dan Bale
IT - AS/400
Handleman Company
248-362-4400  Ext. 4952
D.Bale@Handleman.com
  Quiquid latine dictum sit altum viditur.
  (Whatever is said in Latin seems profound.)

-------------------------- Original Message --------------------------

-----Original Message-----
From:   JIM LANGSTON [SMTP:JLANGSTON@CELSINC.COM]
Sent:   Monday, July 30, 2001 4:44 PM
To:     MIDRANGE-L@midrange.com
Subject:        RE: Default for command without default value?

Ahh, that sounds like a plan.  If I could retrieve the CMD source for the
CRTRPGPGM it would be a simple matter for me to edit it and add a default
for OPTION.  Any clue as to what this home grown command might be called?
I'll search for RTVCMDSRC and see if anything pops up.

(Aye, found a new job here at Cels Enterprises, Inc.  So far I like it).

Regards,

Jim Langston
Programmer/Analyst
Cels Enterprises, Inc.




-----Original Message-----
From: owner-midrange-l@midrange.com [mailto:owner-midrange-l@midrange.com]On
Behalf Of Bale, Dan
Sent: Monday, July 30, 2001 9:44 AM
To: MIDRANGE-L@midrange.com
Subject: RE: Default for command without default value?




Jim, (new email address?  Guess you found that new job, eh?)
I b*tched and moaned about CRTRPGPGM OPTION parameter before as well.
To answer your question directly, there is a freeware app out there
somewhere (News400?) that allows you to retrieve the source from a command
object.  Then you could modify it as you wished.
Dan Bale
IT - AS/400
Handleman Company
248-362-4400  Ext. 4952
D.Bale@Handleman.com
  Quiquid latine dictum sit altum viditur.
  (Whatever is said in Latin seems profound.)
-------------------------- Original Message --------------------------
-----Original Message-----
From:   JIM LANGSTON [SMTP:JLANGSTON@CELSINC.COM]
Sent:   Monday, July 30, 2001 12:25 PM
To:     MIDRANGE-L
Subject:        Default for command without default value?
Hi,
I tried to add a default value to the CRTRPGPGM command for the OPTION
parameter for *SRCDBG to always compile with debug information.  Error came
back that OPTION didn't have a default parameter, so I could't change it.
Makes sense, but begs the question, how do I add a default value to a
command parameter without a current default parameter?
I would guess I would have to recompile the command, which I can't find for
the system commands, so would have have to create my own command and set all
the defaults I wanted and stick it higher in my library list not to mess
with the system command.  Seems like a bit of a headache getting all the
parameters right though.
Is there an easier way?  If not, I will probably create a CL interface that
calls CRTRPGPGM with the default values I want and create a CRTRPGPGM
pointing to my CL, which I know the subset parameters of.
Regards,
Jim Langston
Programmer/Analyst
Cels Enterprises, Inc.