my $quotedCID = $dbh->quote($companyid);
$sqlstatement2 =qq~
                      SELECT rowid, NamaBarang      
                         FROM barangan
                        WHERE CompanyID = '$quotedCID'
                     ORDER by rowid ASC ~;