I got it to work like you see below. I get a lost card note in the log which I can't yet explain but I'm looking at it now. If anyone sees a cleaner solution please let me know. And thank you everyone for the input. %let folder = \\kcpublic\PUBLIC\Public\SAS\Costing Run Logs\Costing Run Logs 09-10\ ; filename indsn "&folder"; data one; infile datalines truncover; length fil2read $150; input fil2read $char150.; fil2read = cats("&folder",fil2read); infile dummy filevar = fil2read end = done; file_name = fil2read; do while(not done); input @1 intext $char100.; output; end; datalines; Empty Model Prelim Project Log.txt Empty Model Previous Project Log.txt Profman Containers to Cars Marketing Prelim Ordered List Project Log.txt Profman Containers to Cars Marketing Previous Ordered List Project Log.txt Profman Containers to Cars Prelim Ordered List Project Log.txt Profman Containers to Cars Previous Ordered List Project Log.txt Profman Output Marketing Prelim Data to SAS Prm Stg Project Log.txt Profman Output to SAS PRM STG Prelim Project Log.txt Profman Output to SAS Prm Stg Previous Project Log.txt ; run; ... View more

A complication is tht the file names have spaces in them. So for example one of them is          Empty Model Prelim   Should I enclose the names in tics (") to start with or how do I handle that? I tried surrounding the names with ticks, that didn't work. Other ideas? ... View more

I'm OK with being wrong. But I don't see how to do it. ... View more

Correct me if I'm wrong but doesn't processing stop at the end of the smallest input file? Some of mine are long some are short but they are all different sizes. ... View more

This is where I run into a problem. I think proc fastclus might be what I need to use but I don't understand the how. But you got me on the right track in my thinking and I've revised my requirments a bit.   I need to study form usage across two different time frames. The time frames are Day and Night devided by 6am and 6pm. I'll call that variable tms and make day = 1 and night = 2;   Do I then  need to convert each form into a number? Form A becomes 1, Form B becomes 2, etc. and then do the same with each role? Role A becomes 1 and Role B becomes 2 out to the 713 roles in play?   Then run; proc fastclus data = closebyformrole maxc = 713 maxiter=100 out = clus;    var tms role_num form_num; run;   This produces some output but I can't pretend I know what it all means. One part however looks intreguing to me. Across the top is the role_num 1 to 713 and down the side is 1 to 24, then each role_num has what looks like 1 or more percentages(?) in it. But maybe not because I really don't know what I'm looking at.   I know I can't expect someone to teach me about statistics here or even clustering but some tiny guidence would be greatly appreciated. Thanks. ... View more

This worked.. sort of. I thought I'd do it in a loop counting columns 1 to 13. This sounded promising until I tried it. The number of columns internal to SAS is apparently set by your columns statement not what is actually on the report. So it became 1 to 21. Using higher numbers causes all kinds of strange errors. I can't get some columns to turn red no matter what I do. In my code they are time, successful_rows, and last_rows I have no idea why. Unless it has to do with them already being set to a color in a previous compute block. But that doesn't explain why it does override the color in the first column. My compute block now looks like below: compute last_error_code;   if last_error_code gt 0 then do i = 1 to 21;   call define(i, "style/merge", "style=[background=red     font_weight=bold]");   end;   endcomp; All but three columns are now red, better but not right. Thanks for this response it did help a lot. ... View more

This does indeed seem to be what is happening. But surly SAS has a way around this. ... View more

This is exactly what I want to happen. And I'm guessing your right about something else blocking it. I've included all the code from my proc report. Thanks. ... View more

This is the full code of my 'Proc Report'. proc report data = logs3   (where = (datepart(actual_start) ge &runmonth))   style(summary)=[background=yellow]   nowd split = '*' headskip;   column workflow_name id2 id   actual_start actual_start=startmin   actual_start2   session_timestamp session_timestamp=endmax   duration time   last_duration avg_duration   successful_rows last_rows   diff_from_last_rows avg_rows   row_diff_from_avg pct_diff_from_avg  FAILED_SOURCE_ROWS   next_place last_error_code   ;   define workflow_name / display noprint;   define id2 / group noprint;   define startmin / min f=datetime16. '*Start Time';   define endmax / max f=datetime16. '*End Time';;   define id / display style = [background=lightgreen   flyover=$idname.] '';   define actual_start / order noprint;   define actual_start2 / computed  noprint f= datetime16. '*Start Time';   define session_timestamp / display noprint f= datetime16. '*End Time';   define duration / analysis  noprint f= time12.2 '*Run Time';;   define time / computed  f= time12.2 '*Run Time';   define last_duration / display f= time12.2 'Previous*Run Time';   define avg_duration / display f= time12.2 'Average*Run Time';   define successful_rows / analysis f= comma12. 'Rows*Processed';   define last_rows / analysis f= comma12. 'Rows*Last Month';   define diff_from_last_rows / analysis f= comma12. 'Diff From*Last Month';   define avg_rows / display f= comma12. 'Average*Rows';   define row_diff_from_avg / display noprint f= comma12. 'Diff From*Avg Month';   define pct_diff_from_avg   / display f= percent6.2 '% Diff of*Avg Month';   define next_place / display noprint;   define failed_source_rows  / analysis  f= comma12. 'Failed*Rows';   define last_error_code / display 'Error*Code';   break after id2 / page summarize;   * Because I want to show all values, even those equal to the ;   * previous value, I used this:                               ;   * http://support.sas.com/kb/24/322.html                      ;   compute actual_start2;   if actual_start ne . then hold = actual_start;   actual_start2 = hold;   endcomp;   compute before ;   alltime = 0;   endcomp;   compute before _page_ /   style = {just=l FONTWEIGHT=bold color=blue     backgroundcolor=palegreen};   txt = upcase(compbl(cat(workflow_name,' --> ',scan(id2,2,' '))));   if workflow_name = scan(id2,2,' ') then txt = upcase(workflow_name);   line txt $75.;   endcomp;   compute id;   if id in ('A1','C10','D1','J7','K27','L6','Q_R','U15'   'W6A','W6B') then       call define(_row_, "style",   "style=[backgroundcolor=lightgrey]");   endcomp;   compute time;   time = endmax - startmin;   call define(_col_, "style", "style=[background=lightblue   font_weight=bold]");   endcomp;   compute pct_diff_from_avg;   call define(_col_, "style", "style=[color=tlight.     font_weight=bold]");   endcomp;   compute diff_from_last_rows;   call define(_col_, "style", "style=[color=tlight.     font_weight=bold]");   endcomp;   compute successful_rows;   call define(_col_, "style", "style=[background=wheat     font_weight=bold]");   endcomp;   compute last_rows;   call define(_col_, "style", "style=[background=KHAKI     font_weight=bold]");   endcomp;   compute after _page_ /   style = {just=l FONTWEIGHT=bold color=blue     backgroundcolor=white};   txt = cat('Next Up: ',next_place);   line txt $175.;   endcomp;   compute after id2;   *call define(_row_,"style", " style = [background=yellow]");   tottime = endmax-startmin;   days  = floor((tottime)/(24*60*60));   hours  = hour(tottime);   minutes = minute(tottime);   seconds = second(tottime);   theline = compbl(cat(put(days,z2.),' days ',   put(hours,z2.),' hours ',put(minutes,z2.),' minutes ',   put(seconds,z2.),' seconds'));   alltime = alltime+tottime;   adays = floor((alltime)/(24*60*60));   ahours = hour(alltime);   aminutes = minute(alltime);   aseconds = second(alltime);   thealine = compbl(cat(put(adays,z2.),' days ',   put(ahours,z2.),' hours ',put(aminutes,z2.),' minutes ',   put(aseconds,z2.),' seconds'));   line @1 'Group Time: ' +3 theline $char75.;   line @1 'Total Time: ' +4 thealine $char75.;   endcomp;   compute last_error_code;   if last_error_code gt 0 then do;   call define(_row_, "style/merge", "style=[background=errcol.     font_weight=bold]");   end;   endcomp; run; ... View more