Online File

How to use this page

---

Rick Aster: Professional SAS Programming Secrets: Contents

Chapter 7
Program 7k
Editing a text file

---

*
  Professional SAS Programming Secrets
  Program 7k
  Editing a text file
*;

data _null_;
   length client_name $ 40;
   retain client_name "&CLIENT.";
   infile original;
   file copy;
   input record $char80.;
   put _infile_ @;
   c = index(record, 'Prepared for:');
   if c then put @c +14 client_name $char40. @;
   put;
run;