Mensajes

A ti tambien te envio pm con eso??? a mi me envio un PM con eso y luego otro PM preguntandome si yo era travesti. 

En fin

Lo se     es costumbre ya personal mia... asi como dar uso de fprintf en C cuando puedo perfectamente dar uso de printf.

Pero... se accepta la sugerencia    para el chico que pregunto digo, porque la costumbre no creo que se me quite 

[SUBSTR((TO_CHAR(FECHA, 'DD/MM/YY')), 4, 2)]

Bueno en el caso que expuse, utilize SUBSTR por la siguiente razon:

Código (sql) [Seleccionar] Expandir


(TO_CHAR(FECHA, 'DD/MM/YY'))


Eso bien sabes retorna la fecha como '00/00/0000' en vez de '00-MES-00'

Y utilizo SUBSTR para que empieze a contarme en el caracter numero 4 hacia la derecha, y me cuente solo 2 posiciones.. 4 y 5 que corresponde al mes. Fijate:

25/02/2009

Donde:

25 : Es el dia del mes, corresponde a 2 caracteres que son caracter 1 = 2 y caracter 2 = 5

/ : Barra de separacion de la fecha corresponde al caracter numero 3

02 : Mes correspondiente del año, donde el 0 = 4 caracter y el 2 = 5 caracter.

Como solo requiero en mi caso, el mes del año del que se habla, solo tomo 2 caracteres a partir del 4 caracter leido   (Por eso uso SUBSTR)

Código (sql) [Seleccionar] Expandir


SUBSTR((TO_CHAR(FECHA, 'DD/MM/YY')), 4, 2) = a;


El resultado final de SUBSTR((TO_CHAR(FECHA, 'DD/MM/YY')), 4, 2)  es 02 que corresponde a Febrero, = a  'a' es una variable que contiene un valor entero, en tu caso puedes sustituir a 'a' por un numero entero del mes, en este caso si coloco en su lugar 02 y existen registros en la tabla del mes FEBRERO se contaran todos y se retornara al finalize que para el mes 2 (FEBRERO) existen X cantidad de registros...

Un saludo  

Querras captar el retorno de carro o valor null o tecla 'Enter' como ultimo caracter de la frase introducida no?  

Código (perl) [Seleccionar] Expandir



print("Escribe una contraseña :: ");
my $pass = <STDIN>;
chomp($pass);

 if ( $pass eq "hola" ) {

    print STDOUT "Es correcto\n";

 } else {

    print STDOUT "Es Incorrecto\n";

 }



Haz la prueba... observa y prueba :

Código (perl) [Seleccionar] Expandir



print("Escribe una contraseña :: ");
my $pass = <STDIN>;

  if ( $pass eq "hola\n" ) {

     print STDOUT "Es correcto\n";

  } else {

     print STDOUT "Es Incorrecto\n";

  }



El retorno de carro o tecla Enter tiene el valor '\n'

Saludos 

Pues puro SQL

Código (sql) [Seleccionar] Expandir



SELECT COUNT(SALARIO) INTO SUMA FROM EJEMPLO WHERE FECHA > '31-DEC-08' AND SUBSTR((TO_CHAR(FECHA, 'DD/MM/YY')), 4, 2) = a;



Si te inclinas por crear un procedimiento con lo siguiente como contenido... podria servirte    Donde la fecha puede pasar como parametro.

Código (sql) [Seleccionar] Expandir



SQL> select * from ejemplo;

FECHA        SALARIO
--------- ----------
20-JAN-09      23000
15-JAN-09      14000
28-FEB-09      20000
15-FEB-08      20000
13-JAN-08      25000
27-DEC-09      20000
16-DEC-09      25000
10-DEC-09      18000

8 rows selected.

SQL> DECLARE
  2  SUMA INTEGER;
  3  BEGIN
  4  FOR a IN 0..12
  5  LOOP
  6  SELECT COUNT(SALARIO) INTO SUMA FROM EJEMPLO WHERE FECHA > '31-DEC-08' AND SUBSTR((TO_CHAR(FECHA, 'DD/MM/YY')), 4, 2) = a;
  7  DBMS_OUTPUT.PUT_LINE('El mes :: '||a||' Tiene '||suma||' Registros');
  8  END LOOP;
  9  END;
10  /
El mes :: 0 Tiene 0 Registros
El mes :: 1 Tiene 2 Registros
El mes :: 2 Tiene 1 Registros
El mes :: 3 Tiene 0 Registros
El mes :: 4 Tiene 0 Registros
El mes :: 5 Tiene 0 Registros
El mes :: 6 Tiene 0 Registros
El mes :: 7 Tiene 0 Registros
El mes :: 8 Tiene 0 Registros
El mes :: 9 Tiene 0 Registros
El mes :: 10 Tiene 0 Registros
El mes :: 11 Tiene 0 Registros
El mes :: 12 Tiene 3 Registros

PL/SQL procedure successfully completed.



Tenia tiempo que no tocaba PL/SQL

Parece que no soy la unica  

No entiendo bien tu peticion tampoco...

Es algo como saber cuantos registros existen por cada mes en los 12 meses???? y imprimir algo como:

ENERO: 200 registros
FEBRERO: 300 registros
MARZO: 150 registros

ect....

Y eso de total de registros por 2 fechas? Seria como:

ENERO + FEBRERO : 500 registros...

Si tu peticion es mas o menos eso.. probablemente tenga que apoyarme en el uso de un poquito de PL y cursores    o a lo mejor no, dependera de tu explicacion de que requieres...

La DB es Oracle verdad?

De nada 

[SELECT EMPRESA.CIFNIF, CABALBARAN.CLIENTE, CLIENTES.NOMBRE, DETALBARAN.IDALBARAN, CABALBARAN.FECHA, SUM(DETALBARAN.CANTIDAD*DETALBARAN.PRECIO) AS "TOTAL_BRUTO",SUM((DETALBARAN.CANTIDAD*DETALBARAN.PRECIO)*DETALBARAN.DESCUENTO/100) AS "TOTAL_DESCUENTO"FROM EMPRESA, CLIENTES, DETALBARAN, CABALBARAN WHERE CABALBARAN.CLIENTE =16 AND CABALBARAN.FECHA BETWEEN '13/01/10' AND '15/01/10' AND CABALBARAN.IDALBARAN=DETALBARAN.IDALBARAN AND CLIENTES.IDCLIENTE = CABALBARAN.CLIENTE AND CABALBARAN.IDALBARAN=DETALBARAN.IDALBARAN AND CLIENTES.IDCLIENTE=CABALBARAN.CLIENTEGROUP BY (EMPRESA.CIFNIF, CABALBARAN.CLIENTE, CLIENTES.NOMBRE, DETALBARAN.IDALBARAN, CABALBARAN.FECHA )]

SELECT
     EMPRESA.CIFNIF,
     CABALBARAN.CLIENTE,
     CLIENTES.NOMBRE,
     DETALBARAN.IDALBARAN,
     CABALBARAN.FECHA,
     SUM(DETALBARAN.CANTIDAD*DETALBARAN.PRECIO) AS "TOTAL_BRUTO",
SUM((DETALBARAN.CANTIDAD*DETALBARAN.PRECIO)*DETALBARAN.DESCUENTO/100)  AS "TOTAL_DESCUENTO"

FROM
     EMPRESA,
     CLIENTES,
     DETALBARAN,
     CABALBARAN

WHERE
    CABALBARAN.CLIENTE =16
    AND CABALBARAN.FECHA BETWEEN '13/01/10' AND '15/01/10'
    AND CABALBARAN.IDALBARAN=DETALBARAN.IDALBARAN
    AND CLIENTES.IDCLIENTE = CABALBARAN.CLIENTE
    AND CABALBARAN.IDALBARAN=DETALBARAN.IDALBARAN
    AND CLIENTES.IDCLIENTE=CABALBARAN.CLIENTE
GROUP BY (EMPRESA.CIFNIF,  CABALBARAN.CLIENTE, CLIENTES.NOMBRE, DETALBARAN.IDALBARAN, CABALBARAN.FECHA )

Dependera tus necesidades... pero al menos al partir de la 5.0.1 es mejor porque puedes tener procedimientos, crons adentro del motor, funciones, etc. Pero dependera si vas o no a dar uso de esto... al menos me consta que para MySQL 5.4.x, Oracle se empeno en mejorar sobremanera y optimizar los motores InnoDB para las consultas JOINS y Subconsultas.


Por cierto, te convendria crear un procedimiento y guardar la consulta ante expuesta, asi solo te basta con llamar el procedimiento para ver que FK tiene cual tabla:

Código (sql) [Seleccionar] Expandir



delimiter /

CREATE PROCEDURE procedimiento(IN tabla CHAR(30))
BEGIN

SELECT FK.TABLE_NAME AS 'Nombre Tabla',
   CU.COLUMN_NAME AS 'Columna Llave Foranea',
   PK.TABLE_NAME AS 'Tabla Llave Primaria',
   PT.COLUMN_NAME AS 'Columna Llave Primaria',
   C.CONSTRAINT_NAME AS 'Entidad Relación'
FROM INFORMATION_SCHEMA.REFERENTIAL_CONSTRAINTS C
  INNER JOIN INFORMATION_SCHEMA.TABLE_CONSTRAINTS FK
    ON C.CONSTRAINT_NAME = FK.CONSTRAINT_NAME
  INNER JOIN INFORMATION_SCHEMA.TABLE_CONSTRAINTS PK
    ON C.UNIQUE_CONSTRAINT_NAME = PK.CONSTRAINT_NAME
  INNER JOIN INFORMATION_SCHEMA.KEY_COLUMN_USAGE CU
ON C.CONSTRAINT_NAME = CU.CONSTRAINT_NAME
  INNER JOIN( SELECT TC.TABLE_NAME, CU.COLUMN_NAME FROM INFORMATION_SCHEMA.TABLE_CONSTRAINTS TC
INNER JOIN INFORMATION_SCHEMA.KEY_COLUMN_USAGE CU
   ON TC.CONSTRAINT_NAME = CU.CONSTRAINT_NAME
WHERE TC.CONSTRAINT_TYPE = 'PRIMARY KEY'
  ) PT
    ON PT.TABLE_NAME = PK.TABLE_NAME
  WHERE PK.TABLE_NAME = tabla

);
/

delimiter ;


Mas o menos algo asi... quisiera acomodartelo para ver si funciona pero ando en el trabajo    luego cada vez que quieras ver las Fk de una tabla.. llamas el procedimiento pasandole como parametro el nombre de la tabla que quieres ver.

CALL procedimiento(tu_tabla);