Les bureaux de credit du nord wrote:
>
> How can I invoke a command file from SPL and then use the SPL code and
> compile as a program. In other words.
>
> Say command file is:  DOIT
> SPL program file is : SPLRUN
>

Jean,
I assume that you only have the CM version of SPL, so you can't call
HPCICOMMAND. Some clever poster will probably come up with a better
solution, but you could try the following. Your program will need PH
capability, and as far as I know you won't be able to suppress the
echoing of the command name or the 'END OF PROGRAM' message.
HTH, Mike.

MPE/iX:print splruns
begin

array cmdimage(0:39);
byte array cmd(*)=cmdimage;
integer cmderror, parmnum;

intrinsic command, quit;

move cmd:=("RUN CI.PUB.SYS;INFO='DOIT';PARM=3",%15);
command(cmdimage, cmderror, parmnum);
if cmderror <> 0 then
   quit(cmderror);

end.
MPE/iX:print doit
showvar hpd@
MPE/iX:spl splruns,,$null

 PRIMARY DB STORAGE=%004;   SECONDARY DB STORAGE=%00050
 NO. ERRORS=0000;           NO. WARNINGS=0000
 PROCESSOR TIME=0:00:00;    ELAPSED TIME=0:00:00

END OF COMPILE
MPE/iX:prep $oldpass,splrun;cap=ia,ph

END OF PREPARE
MPE/iX:run splrun


MPE/iX:DOIT
HPDATE = 9
HPDATEF = FRI, JUL  9, 1999
HPDAY = 6
HPDTCPORTID =
HPDUPLICATIVE = TRUE


END OF PROGRAM
MPE/iX:

This communication is for informational purposes only.  It is not intended as
an offer or solicitation for the purchase or sale of any financial instrument
or as an official confirmation of any transaction, unless specifically agreed
otherwise. All market prices, data and other information are not warranted as
to completeness or accuracy and is subject to change without notice. Any
comments or statements made herein do not necessarily reflect those of
J.P. Morgan & Co. Incorporated, its subsidiaries and affiliates.