Select * from sun_t_attm_temp_posm1d002

##</code><code>##

BEGIN
  Par_Reports_Pos.SUN_PRC_AT_I_POSM1D002(?, ?);
END;

##</code><code>##

my $retCode;
my $retMsg;
$sth->bind_param_inout(1, \$retCode, 100);
$sth->bind_param_inout(2, \$retMsg, 100);