$op = $input->param('op') // q{};
$frameworkcode = &GetFrameworkCode($biblionumber)
if ( $biblionumber and not( defined $frameworkcode ) and $op ne 'cud-addbiblio' );
$frameworkcode //= '';
my $userflags =
$frameworkcode eq 'FA'
-