Ver Mensaje Individual
  #4  
Viejo 21/04/08, 16:48:20
Avatar de Edd_401
Edd_401 Edd_401 is offline
Senior Member
 
Fecha de Ingreso: may 2007
Mensajes: 119
gracias marina y david por su ayuda....


MARINA, DE HECHO ESO ES LO QUE HICE.... A AHI ES DONDE ALMACENO LAS FECHAS............ ES SOLO QUE MI VALIDACION ESTABA MAL...........


YA LO RESOLVI, SOLO ERA CUESTION DE MATEMATICAS..........



IF NOT S_FKDAT-LOW IS INITIAL.
IF NOT S_FKDAT-HIGH IS INITIAL.

SELECT *
INTO TABLE TI_ZRET004
FROM ZRET004
WHERE BUKRS_LOW IN S_BUKRS AND
VKORG_LOW IN S_GSBER AND
WERKS_LOW IN S_WERKS AND
( ( ( FECHA_LOW <= S_FKDAT-LOW AND FECHA_HIGH >= S_FKDAT-LOW ) AND
( FECHA_LOW <= S_FKDAT-HIGH AND FECHA_HIGH >= S_FKDAT-HIGH ) )
OR
( ( FECHA_LOW IN S_FKDAT ) OR
( FECHA_HIGH IN S_FKDAT ) ) ).

IF SY-SUBRC = 0.
MESSAGE ID '00' TYPE 'E' NUMBER 208 WITH TEXT-100.
ENDIF.

ENDIF.
ENDIF.

IF NOT S_FKDAT-LOW IS INITIAL.
IF S_FKDAT-HIGH IS INITIAL.

SELECT *
INTO TABLE TI_ZRET004
FROM ZRET004
WHERE BUKRS_LOW IN S_BUKRS AND
VKORG_LOW IN S_GSBER AND
WERKS_LOW IN S_WERKS AND

( ( ( FECHA_LOW <= S_FKDAT-LOW AND FECHA_HIGH >= S_FKDAT-LOW )
)
OR
( ( FECHA_LOW IN S_FKDAT ) ) ).

IF SY-SUBRC = 0.
MESSAGE ID '00' TYPE 'E' NUMBER 208 WITH TEXT-100.
ENDIF.

ENDIF.
ENDIF.



CREE DOS SUBRUTINAS, UNA CUANDO TRAIGO UN RANGO DE FCEHAS----------
DE XXXX----A------XXXXX


Y OTRA CUANDO SOLO TRAIGO UNA SOLA FECHA........





QUE LES PARECE:.......



SALUDOS


Y NUEVAMENTE MUCHAS GRACIAS..
Responder Con Cita