";
print "| Código | ";
print "Denominación | ";
print "Banco | ";
print "Tipo de Cuenta | ";
print "Cuenta Contable | ";
print "Denominación Cta. Contable | ";
print "Apertura | ";
print "
";
if($ls_operacion=="BUSCAR")
{
$ls_sql="SELECT a.ctaban as ctaban,a.dencta as dencta,a.sc_cuenta as sc_cuenta,d.denominacion as denominacion,a.codban as codban,c.nomban as nomban,a.codtipcta as codtipcta,b.nomtipcta as nomtipcta,a.fecapr as fecapr,a.feccie as feccie,a.estact as estact ".
" FROM scb_ctabanco a,scb_tipocuenta b,scb_banco c,scg_cuentas d ".
" WHERE a.codemp='".$ls_codemp."' AND a.codtipcta=b.codtipcta AND a.codban=c.codban AND a.codban like '%".$ls_codigo."%' AND a.ctaban like '".$ls_ctaban."' ".
" AND (a.sc_cuenta=d.sc_cuenta AND a.codemp=d.codemp)";
$rs_cta=$SQL->select($ls_sql);
//$data=$rs_cta;
if($rs_cta===false)
{
$msg->message("No se han creado Comprobantes de Retención");
}
else
{
if($row=$SQL->fetch_row($rs_cta))
{
$data=$SQL->obtener_datos($rs_cta);
$arrcols=array_keys($data);
$totcol=count($arrcols);
$ds->data=$data;
$totrow=$ds->getRowCount("ctaban");
for($z=1;$z<=$totrow;$z++)
{
print "