All pastes #957100 Raw Edit

CaseNoFunca

public php v1 · immutable
#957100 ·published 2008-03-25 19:44 UTC
rendered paste body
<?php$dsn = "JM2000";$usuario = "";$clave = "";$cid=odbc_connect($dsn, $usuario, $clave);if (!$cid){	exit("<strong>Ha ocurrido un error tratando de conectarse con el origen de datos. Comunicarse con Sistemas</strong>");}	//$mesactual=date("m");$mesactual="02";$sql="Select * from custinvoice";$consulta=odbc_exec($cid,$sql)or die(exit("Error en odbc_exec"));while (odbc_fetch_row($consulta)){	$fecha=odbc_result($consulta,46);	if (substr($fecha,5,2) == $mesactual){		$tipoventa=odbc_result($consulta,124);		echo "Tipo de venta: $tipoventa<br>";		switch ($tipoventa) {			case "PLATA":				$PLATA += odbc_result($consulta,80);				echo "$PLATA<br>";				break;			case "ARTESANIA":				$ARTESANIA += odbc_result($consulta,80);				break;			case "ORO":				$ORO += odbc_result($consulta,80);				break;		}		$TOTAL += odbc_result($consulta,80);	}}echo "Plata $PLATA<br>";echo "Artesania $ARTESANIA<br>";echo "Oro $ORO<br>";echo "Total del mes actual: $TOTAL<br>";?>