/* Copyright(c) 1995 by SAS Institute Inc., Cary, NC USA */

/* Set up the computed variable with the contact's full  */
/* name.                                                 */
init:
   customer = lname || ', ' || fname;
   return;