@Input_DDName VARCHAR(250) 
AS SELECT DISTINCT JCLJob.JobName, JCLStep.StepName, JCLPgm.PgmName, JCLDD.DDName, JCLDDRef.DDID, JCLPhysicalDataSet.DataSetName, JCLStep.OrdinalNumInJob, pa1.AliasName AS ProgramName
FROM JCLDD INNER JOIN JCLJob INNER JOIN
      JCLStep ON JCLJob.JobID = JCLStep.JobID ON JCLDD.StepID = JCLStep.StepID INNER JOIN
      JCLPhysicalDataSet INNER JOIN 
      JCLDDRef ON JCLPhysicalDataSet.DataSetID = JCLDDRef.DataSetID ON JCLDD.DDID = JCLDDRef.DDID INNER JOIN
      JCLPgm ON JCLStep.CalledPgmID = JCLPgm.PgmID INNER JOIN
      #ds_param_temp ON JCLPhysicalDataSet.DataSetID=#ds_param_temp.dsid AND JCLDDRef.MemberName=#ds_param_temp.dsmembername
      LEFT JOIN ProgramAliases pa ON pa.AliasName = JCLPgm.PgmName 
      LEFT JOIN ProgramAliases pa1 ON pa1.ProgramId = pa.ProgramId and pa1.AliasType = 0
WHERE  (JCLStep.CalledPgmID > 0) 
    AND (JCLDD.DDName=@Input_DDName)
ORDER BY JCLJob.JobName, JCLStep.OrdinalNumInJob
