Laserfiche WebLink
$database crdss; <br />$declare usercursor cursor for <br /> select fname, lname, org, address1, address2, city, state, zip, email, phone, fax, modem, usertype, <br />entered, updated <br /> into $fname, $lname, $org, $address1, $address2, $city, $state, $zip, $email, $phone, $fax, <br />$modem, $usertype, $entered, $updated <br /> from customer; <br />$open usercursor; <br />printf( "Accessing CRDSS User information.\n\n"); <br />for (;;) <br /> { <br /> $fetch usercursor; <br /> if (sqlca.sqlcode != 0) break; <br /> printf("%s %s %s %s %s %s %s %s %s %s %s %s %s %s %s\n",fname, <br />lname,org,address1,address2,city,state,zip,email,phone,fax,modem,usertype,entered,updated); <br /> } <br />$close usercursor; <br />printf("\nProgram Over.\n"); <br />} <br />5 <br />A275 05.10.94 1.05-7 Malers, Rohlfs <br />