Help for this page

Select Code to Download


  1. or download this
    
    my $transref_chksql= <<~ 'SQLSTR';
...
        if ($actionsw{$transseqchk->{transchk}}->{cmd}){
        &{$actionsw{$transseqchk->{transchk}}->{cmd}};
        }
  2. or download this
            my %transseqchk;
    my $transref_chksql= <<~ 'SQLSTR';
...
        if ($transseqchk->{transchk}->{cmd}){
        &{$transseqchk->{transchk}->{cmd}};
        }