Hi Friends,
Need your urgent help in below issue.
I wrote a routine in infopackage extraction tab for checking the files on server and if file file contain _001(filetype) in filename then i am checking that filetype in one of table that contains all the file type like 001,002,003,004 etc. and then loading that file in BW systen.
here is the code.
TYPES: BEGIN OF TY_FILENAME,
/BIC/ZIRLFILTY TYPE /BIC/OIZIRLFILTY,
CURRENCY TYPE /BI0/OICURRENCY,
/BIC/ZIRLGROUP TYPE /BIC/OIZIRLGROUP,
END OF TY_FILENAME.
DATA: P_DIR TYPE C LENGTH 30 VALUE '/PSMEG/TEMP/',
FILE_TABLE TYPE STANDARD TABLE OF SDOKPATH,
WA_TABLE TYPE SDOKPATH,
L_FILENAME TYPE RSFILENM,
L_FILE(4) TYPE c,
T_FILE(40) TYPE C.
DATA: GV_NAME TYPE STRING,
GV_EXT TYPE STRING,
GV_LEN TYPE I.
DATA: IT_FILENAME TYPE STANDARD TABLE OF TY_FILENAME,
GWA_FILENAME TYPE TY_FILENAME.
SELECT /BIC/ZIRLFILTY CURRENCY /BIC/ZIRLGROUP
FROM /BIC/PZIRLFILTY INTO TABLE IT_FILENAME
WHERE /BIC/ZIRLGROUP = 'CARS'
AND CURRENCY = 'USD'
AND OBJVERS = 'A'.
BREAK-POINT.
CALL FUNCTION 'RZL_READ_DIR'
EXPORTING
* FROMLINE = 0
NAME = P_DIR
* NRLINES = 50
* SRVNAME = ' '
TABLES
FILE_TBL = FILE_TABLE
EXCEPTIONS
ARGUMENT_ERROR = 1
NOT_FOUND = 2
SEND_ERROR = 3
SYSTEM_FAILURE = 4
OTHERS = 5.
*BREAK-POINT.
**
LOOP AT FILE_TABLE INTO WA_TABLE
WHERE PATHNAME CS 'CARS'.
SPLIT WA_TABLE-PATHNAME AT '.' INTO GV_NAME
GV_EXT.
GV_LEN = STRLEN( GV_NAME ).
GV_LEN = GV_LEN - 3.
l_file = GV_NAME+GV_LEN(3).
READ TABLE IT_FILENAME INTO GWA_FILENAME
WITH KEY /BIC/ZIRLFILTY = l_file.
IF SY-SUBRC = 0.
CONCATENATE P_DIR GV_NAME '.' GV_EXT+0(3) INTO L_FILENAME.
ENDIF.
P_FILENAME = L_FILENAME.
ENDLOOP.
CLEAR: GV_LEN,
GV_NAME,
GV_EXT.
whiel triggering the infopackage it showing an error "error occured in data selection", if i comment the select statement in the code then it goes properly at breakpoint locatioin, but when select statement is uncommented it directly through above error.
Please help me if anyone worked on infopackage routine and used select statement over there.
Regards,
Om Ambulker