Help for this page

Select Code to Download


  1. or download this
    open (WFH1, '>', "${basePath}/QueryResult4.txt") or die "$!";
run "$SQLPLUS \@${basePath}/VoucherQuery4.sql $startdate", undef, \*WF
+H1;
  2. or download this
    ## Using run() instead of system():
use IPC::Run qw( run timeout );
run \@cmd, \$in, \$out, \$err, timeout( 10 ) or die "cat: $?"
  3. or download this
    -- input parameter
var date1 varchar2(8);
...
ORDER BY s.SERIALNUMBER,s."AT";

EXIT;