I wrote a Basic routine to get a list in this format
Code: Select all
JobA
JobB
JobC
Code: Select all
JobA,JobB,JobC
Moderators: chulett, rschirm, roy
Code: Select all
JobA
JobB
JobC
Code: Select all
JobA,JobB,JobC
Code: Select all
Ans = ""
cmd="SELECT NAME FMT '60L' FROM DS_JOBS WHERE NAME NOT LIKE '\\%' SUPPRESS COLUMN HEADING COUNT.SUP;
Call DSExecute("UV", cmd, JobList, sysretcode)
JobCount=DCount(JobList,@FM)
For JobVal = 1 To JobCount Step 1
JobName = Field(JobList,@FM,JobVal)
Ans := Jobname : ','
Next JobVal