//-----------------------------------------------------------------------------
// Calls Rexx interpreter passing name of SPF REXX macro and parms
// FORMAT:  SPF  H3 PHP substr           H3 is H3.SPF   You do not append .SPF
//-----------------------------------------------------------------------------
void spf(void) {
  char *td;
  char *trexx = "h:\\u\\b\\rexx.bat";
  char *tcmd;
  char *msg;
  char *tspf="h:\\u\\spfpc40\\macros\\";
  int   i;
  //--- Get name of SPF Macro ---
  strcat(tspf,argv[1]);
  //--- Get Parms ---
  i = 2;
  while (i < argc) {
    strcat(msg,StrCompose(" ",argv[i]));
    ++i;
  }// while
  // --- Build System Command
  tcmd = strcompose("system ",trexx," ",tspf,".spf"," ",msg);
//  MSG(tcmd);
  spfservice("cmd",tcmd);
}//spf