[ic] Database

[Ed LaFrance]

At 07:46 PM 03/02/2001 +0100, you wrote:
>Hi Mike,
>
>thanks for the help, however we cant seem to get the output into a scratch 
>field [cross_file]
>are we totally mistaken or are we overseeing something ?
>
>
>[set cross_file][perl tables=`join " ", @{$Config->{ProductFiles}}`]
>             # This is not general, only for flypage
>             my $key = q{[item-code]};
>
>             for(@{$Config->{ProductFiles}}) {
>                     return $_ if $Db{$_}->record_exists($key);
>             }
>             return "NONE";
>     [/perl][/set]
>
>if we scratch the cross_file we actually get the perl code back ?? 
>[scratch cross_file]

Use [seti cross_file][/seti] instead - the "i" is for "interpolate".

- Ed L.