$id_cuenta=$rs_asiento->Fields("idccodcu");
switch ($id_cuenta){
case "40" || "4011" || "401101":
if ($rs_asiento->Fields("scccdebe")=="x"){ $sccncarg=$igv; $sccnabon=0; $sccnafec=1;}else{ $sccncarg=0; $sccnabon=$igv; $sccnafec=0; }
break;
case "42" || "4211" || "421101":
if ($rs_asiento->Fields("scccdebe")=="x"){ $sccncarg=$subtotal; $sccnabon=0; $sccnafec=1;}else{ $sccncarg=0; $sccnabon=$subtotal; $sccnafec=0; }
break;
case "60" || "6011" || "601101":
if ($rs_asiento->Fields("scccdebe")=="x"){ $sccncarg=$scrntota; $sccnabon=0; $sccnafec=1;}else{ $sccncarg=0; $sccnabon=$scrntota; $sccnafec=0; }
break;
}