/*-------------------------------------------------------------
  Passes Commands in TCMD to OS
  TSPF is number corresponding to REXX interpreter (See XDETREXX)
  -------------------------------------------------------------*/
XOSCMD: PROCEDURE
  PARSE ARG TSPF, TCMD
  IF (TSPF = 0 | TSPF = 3) THEN ADDRESS COMMAND TCMD      /*DOSREXX/Personal REXX*/
  IF (TSPF = 4 | TSPF = 5) THEN ADDRESS DOS TCMD          /*SPFPC4/SPFPRO - Delete if using OOREXX*/
  IF (TSPF = 1 | TSPF = 2 | TSPF = 6) THEN TCMD           /*OOREXX/REXXIBM/R4*/
RETURN