‎2006 Nov 03 5:17 AM
hi all
i have got a error during BDC program.earlier it was running correctly and giving the output also .but 2 days back server was crashed . then after that only it is showing this kind of error so plz give it solution . what need to be done.
i will surely award all ur effort.
Unable to open file "
MLTEST\TEMP\PAYROLL.TXT".
Error text: "No such file or directory"
Error code: 2
How to correct the error
Probably the only way to eliminate the error is to correct
the program.
You may able to find an interim solution to the problem in the
SAP note system. If you have access to the SAP note system yourself,
please use the following search criteria:
"DATASET_CANT_OPEN"
"ZPAYROL2 " or "ZPAYROL2 "
"LOAD_PAYROL_DATA"
If you cannot solve the problem yourself, please send the
following documents to SAP:
1. A hard copy print describing the problem.
To obtain this, select the "Print" function on the current screen.
-
2. A suitable hardcopy prinout of the system log.
To obtain this, call the system log with Transaction SM21
and select the "Print" function to print out the relevant
part.
3. If the programs are your own programs or modified SAP programs,
supply the source code.
To do this, you can either use the "PRINT" command in the editor or
print the programs using the report RSINCL00.
4. Details regarding the conditions under which the error occurred
or which actions and input led to the error.
File attributes
MLTEST\TEMP\PAYROLL.TXT
System environment
SAP Release.............. "40B"
Application server....... "mlsapr3"
Network address.......... "172.16.65.9"
Operating system......... "Windows NT"
Release.................. "0"
Hardware type............ "PENTIUM"
Database server.......... "mlsapr3"
Database type............ "MSSQL"
Database name............ "CIS"
Database owner........... " "
Character set............ "English_United State"
SAP kernel............... "40B"
Created on............... "Dec 1 1998 01:04:45"
Created in............... "NT 4.0 1381 Service Pack 3 x86 MS VC++ 11.00?"
Database version......... "mss SQL_Server_7.00"
Patch level.............. "219"
Patch text............... " "
Supported environment....
Database................. "MSSQL 6.5.213 or higher, MSSQL 7.0.1 or higher"
SAP database version..... "40B"
Operating system......... "Windows NT 0 4"
User, transaction...
Client.............. 030
User................ "PAYROLL"
Language key........ "E"
Transaction......... "ZPRL "
Program............. "ZPAYROL2 "
Screen.............. "SAPMSSY0 0120"
Screen line......... 7
Information on where termination occurred
User, transaction...
Client.............. 030
User................ "PAYROLL"
Language key........ "E"
Transaction......... "ZPRL "
Program............. "ZPAYROL2 "
Screen.............. "SAPMSSY0 0120"
Screen line......... 7
Information on where termination occurred
The termination occurred in the ABAP/4 program "ZPAYROL2 " in
"LOAD_PAYROL_DATA".
The main program was "ZPAYROL2 ".
The termination occurred in line 132
of the source code of program "ZPAYROL2 " (when calling the editor 1320).
Source code extract
001020 PERFORM UPDATE_REC.
001030 PERFORM WRITE_REC.
001040 CLEAR REC1 .
001050
001060 AT USER-COMMAND.
001070 CASE SY-UCOMM.
001080 WHEN 'LOAD' . PERFORM LOAD_PAYROL_DATA .
001090 ENDCASE .
001100
001110 *&
001120 * *
001130 *& Form LOAD_PAYROL_DATA
001140 *&
001150 * *
001160 * text
001170 *
001180 * *
001190 * > p1 text
001200 * < p2 text
001210 *
001220 * *
001230 FORM LOAD_PAYROL_DATA.
001240 DATA : B_DATE1 LIKE SY-DATUM .
001250 OPEN DATASET B_FILE2 FOR OUTPUT IN TEXT MODE .
001260 MOVE : '0' TO BGR00-STYPE ,
001270 'payroll' TO BGR00-GROUP ,
001280 SY-MANDT TO BGR00-MANDT ,
001290 SY-UNAME TO BGR00-USNAM ,
001300 'X' TO BGR00-XKEEP,
001310 '/' TO BGR00-NODATA .
> TRANSFER BGR00 TO B_FILE2 .
001330
001340 * MOVE '/' TO ALL FIELDS .
001350 DO .
001360 B_CTR = B_CTR + 1 .
001370 ASSIGN COMPONENT B_CTR OF STRUCTURE B_BBKPF TO <FS> .
001380 IF SY-SUBRC <> 0 .
001390 EXIT .
001400 ENDIF .
‎2006 Nov 03 5:25 AM
Hi,
This is the problem due to the file inwhich u have the data.
because the file PAYROLL.TXT is not present there.
make sure that the file at the specified locatio is there.
Regards,
Sonika
‎2006 Nov 03 5:40 AM
hi sonika
u r telling that the file payroll.txt is not present there means not there in following location ie.
Unable to open file "
MLTEST\TEMP\PAYROLL.TXT".
so how to take care of this. who will do this that file will be there.if its my job as a programmer then plz let me know that how to make the file available to that location.what i have to do? or it should be done by BASIS guy.
plz help me
‎2006 Nov 03 5:51 AM
Hi Sanjeev,
U have to make sure that the required file is present there in specifried location otherwise it will give dump.
Or instead of the specific filename u can prompt for filename at selection screen by giving it as parameter using 'F4_FILENAME' FM so that user can select the file from desired location.
Regards,
Sonika
Pls rewards points if useful.
‎2006 Nov 03 6:01 AM
Hi,
I also recommend to explicitly check that no error occurs while opening the file.
for this insert a check on sy-subrc after the open dataset statement ;
and if sy-subrc <> 0, don't ececute the transfer statement
Regards,
Sonika
‎2006 Nov 03 6:08 AM
see sonika my progarm is as follows-
in the program i changed the path like this
D:/usr/sap/tmp/payrol.txt.
then after executing the program i get nthe output but while clicking on upload pushbuton it is showing error
File
mltest\temp\payrol.txt could not be open.
so i want to know that where is this mltest. after changing the path above also whyy it is looking for mltest only.plz check it.
REPORT ZPAYROLL NO STANDARD PAGE HEADING.
bdc for payroll version 2.
TABLES: BKPF,CSKS.
SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-001 .
PARAMETERS : B_FILE LIKE RLGRAP-FILENAME OBLIGATORY.
PARAMETERS: SALARY RADIOBUTTON GROUP GRP,
REIMBURS RADIOBUTTON GROUP GRP.
DATA: B_DATE LIKE SY-DATUM.
SELECTION-SCREEN END OF BLOCK B1 .
TABLES : BGR00 , BBKPF , BBSEG.
DATA : BEGIN OF B_BBKPF .
INCLUDE STRUCTURE BBKPF .
DATA : END OF B_BBKPF .
DATA: FILESIZE TYPE I.
DATA : BEGIN OF B_BBSEG .
INCLUDE STRUCTURE BBSEG.
DATA : END OF B_BBSEG .
DATA : B_FILE2(30) VALUE '
MLTEST\TEMP\PAYROLL.TXT'.
DATA : B_CTR TYPE I , B_FILESIZE TYPE I .
FIELD-SYMBOLS <FS> .
DATA: BEGIN OF REC OCCURS 0,
DOCTYPE(3),
DATE(10),
COSTCNTR(10),
ACCOUNT(15),
DCIND(3),
AMT(19),
NARRATION(50),
LOCATION(37),
END OF REC.
DATA: BEGIN OF REC1 OCCURS 0,
PCENTER(10),
LOCATION LIKE REC-LOCATION,
DOCTYPE LIKE REC-DOCTYPE,
DATE LIKE REC-DATE,
COSTCNTR LIKE REC-COSTCNTR,
ACCOUNT LIKE REC-ACCOUNT,
DCIND LIKE REC-DCIND,
AMT LIKE REC-AMT,
NARRATION LIKE REC-NARRATION,
BUSINESSAREA(14),
PKEY(4),
pcenter(10),
CCODE(2),
CURR(3),
END OF REC1.
DATA : B_TOT TYPE P DECIMALS 2 , B_TOT1 TYPE P DECIMALS 2 .
DATA: B_CTOT TYPE P DECIMALS 2, B_DTOT TYPE P DECIMALS 2.
DATA : B_ACCOUNT(10) , B_ACTOT TYPE P DECIMALS 2 .
DATA : B_ACTOT1 TYPE P DECIMALS 2 .
DATA : B_TEXT1(30) , B_TEXT2(30) .
SET PF-STATUS '100'.
DATA : B_STR1(35) , B_STR2(35) ,B_STR3(25) ,B_COUNT TYPE I VALUE 0 .
B_STR1 = B_FILE .
DO .
IF B_STR1 CA '\' .
SPLIT B_STR1 AT '\' INTO B_STR2 B_STR3 .
B_STR1 = B_STR3 .
ELSE .
EXIT .
ENDIF .
ENDDO .
CALL FUNCTION 'WS_UPLOAD'
EXPORTING
CODEPAGE = 'IBM'
FILENAME = B_FILE
FILETYPE = 'DAT'
IMPORTING
FILESIZE = FILESIZE
TABLES
DATA_TAB = REC.
B_CTR = 0.
LOOP AT REC.
DO .
B_CTR = B_CTR + 1 .
ASSIGN COMPONENT B_CTR OF STRUCTURE REC TO <FS> .
IF SY-SUBRC <> 0 .
EXIT .
ENDIF .
DO 2 TIMES.
REPLACE '"' WITH '' INTO <FS>.
ENDDO.
CONDENSE <FS> NO-GAPS.
ENDDO .
MODIFY REC.
B_CTR = 0.
ENDLOOP.
LOOP AT REC.
MOVE-CORRESPONDING REC TO REC1.
REC1-CCODE = 'ML'.
REC1-CURR = 'INR'.
write rec-amt to rec1-amt right-justified.
APPEND REC1.
ENDLOOP.
PERFORM UPDATE_REC.
PERFORM WRITE_REC.
CLEAR REC1 .
AT USER-COMMAND.
CASE SY-UCOMM.
WHEN 'LOAD' . PERFORM LOAD_PAYROL_DATA .
ENDCASE .
*&----
----
*& Form LOAD_PAYROL_DATA
*&----
----
text
*----
----
--> p1 text
<-- p2 text
*----
----
FORM LOAD_PAYROL_DATA.
DATA : B_DATE1 LIKE SY-DATUM .
OPEN DATASET B_FILE2 FOR OUTPUT IN TEXT MODE .
MOVE : '0' TO BGR00-STYPE ,
'payroll' TO BGR00-GROUP ,
SY-MANDT TO BGR00-MANDT ,
SY-UNAME TO BGR00-USNAM ,
'X' TO BGR00-XKEEP,
'/' TO BGR00-NODATA .
TRANSFER BGR00 TO B_FILE2 .
*----MOVE '/' TO ALL FIELDS .
DO .
B_CTR = B_CTR + 1 .
ASSIGN COMPONENT B_CTR OF STRUCTURE B_BBKPF TO <FS> .
IF SY-SUBRC <> 0 .
EXIT .
ENDIF .
MOVE '/' TO <FS> .
ENDDO .
B_CTR = 0 .
DO .
B_CTR = B_CTR + 1 .
ASSIGN COMPONENT B_CTR OF STRUCTURE B_BBSEG TO <FS> .
IF SY-SUBRC <> 0 .
EXIT .
ENDIF .
MOVE '/' TO <FS> .
ENDDO .
B_CTR = 0 .
MOVE-CORRESPONDING B_BBKPF TO BBKPF .
MOVE : '1' TO BBKPF-STYPE ,
'FB01' TO BBKPF-TCODE ,
'SA' TO BBKPF-BLART ,
'ML' TO BBKPF-BUKRS,
'INR' TO BBKPF-WAERS .
b_str1 to bbkpf-bktxt .
*sort rec1 by costcntr.
sort rec1 by location account costcntr.
SORT REC1 BY PCENTER ACCOUNT.
LOOP AT REC1 .
MOVE-CORRESPONDING B_BBSEG TO BBSEG .
ON CHANGE OF REC1-PCENTER.
IF SALARY = 'X'.
B_STR1 = REC1-PCENTER.
CONCATENATE 'PAYROLL' '-' B_STR1 '/' REC-DATE+4(2) '/'
REC-DATE+2(2) '/' 'SALARY' INTO B_STR1.
TRANSLATE B_STR1 TO UPPER CASE .
ELSEIF REIMBURS = 'X'.
B_STR1 = REC1-PCENTER.
CONCATENATE 'PAYROLL' '-' B_STR1 '/' REC-DATE+4(2) '/'
REC-DATE+2(2) '/' 'REIMBURSEMENT' INTO B_STR1.
TRANSLATE B_STR1 TO UPPER CASE .
ENDIF.
SELECT SINGLE * FROM BKPF WHERE BKTXT = B_STR1 .
IF SY-SUBRC = 0 .
CALL FUNCTION 'POPUP_TO_INFORM'
EXPORTING
TITEL = 'ERROR'
TXT1 = B_STR1
TXT2 = 'This file for the month is loaded'
EXCEPTIONS
OTHERS = 1.
EXIT .
ENDIF .
MOVE REC1-DATE TO B_DATE.
WRITE: B_DATE DDMMYY TO B_DATE.
MOVE: B_DATE TO BBKPF-BUDAT ,
B_DATE TO BBKPF-WWERT ,
B_DATE TO BBKPF-BLDAT ,
B_STR1 TO BBKPF-BKTXT .
TRANSFER BBKPF TO B_FILE2 .
ENDON .
PERFORM LOAD_DETAILS .
ENDLOOP .
CLOSE DATASET B_FILE2 .
*submit rfbibl00 using selection-set 'ZPAYROLVARIANT' .
*lse .
SUBMIT RFBIBL00 USING SELECTION-SET 'ZPAYROLVARIAN1'(001).
*ndif .
DELETE DATASET B_FILE2 .
ENDFORM. " LOAD_PAYROL_DATA
*&----
----
*& Form LOAD_DETAILS
*&----
----
text
*----
----
--> p1 text
<-- p2 text
*----
----
FORM LOAD_DETAILS.
MOVE : '2' TO BBSEG-STYPE ,
'BBSEG' TO BBSEG-TBNAM ,
REC1-PKEY TO BBSEG-NEWBS ,
REC1-ACCOUNT TO BBSEG-NEWKO,
REC1-AMT TO BBSEG-WRBTR,
REC1-NARRATION TO BBSEG-SGTXT,
REC1-BUSINESSAREA TO BBSEG-GSBER.
IF REC1-DOCTYPE NE 'R'.
MOVE REC1-PCENTER TO BBSEG-PRCTR.
ENDIF.
IF REC1-ACCOUNT >= '3000' AND REC1-DOCTYPE NE 'R'.
MOVE : REC1-COSTCNTR TO BBSEG-KOSTL.
ENDIF .
TRANSFER BBSEG TO B_FILE2 .
ENDFORM. " LOAD_DETAILS
&----
*& Form UPDATE_REC
&----
text
----
--> p1 text
<-- p2 text
----
FORM UPDATE_REC.
DATA: TEMP TYPE P DECIMALS 4.
DATA: ACCOUNT LIKE REC1-ACCOUNT,
IND LIKE REC1-DCIND,
FLAG(1) VALUE 'N'.
SORT REC1 BY LOCATION ACCOUNT COSTCNTR.
write:/0 'LOCATION',20 'ACCOUNT',45 'CREDIT',60 'DEBIT'.
uline : /1(65).
new-line.
LOOP AT REC1.
at new location.
write: / rec1-location under 'LOCATION'.
endat.
on change of rec1-account.
if flag ne 'Y'.
if sy-tabix <> 1.
write: account under 'ACCOUNT'.
if ind eq 'C'.
write: b_ctot under 'CREDIT' left-justified.
clear b_ctot.
elseif ind eq 'D'.
write: b_dtot under 'DEBIT' left-justified.
clear b_dtot.
endif.
new-line.
endif.
endif.
flag = 'N'.
endon.
IF REC1-DOCTYPE EQ 'S' AND REC1-DCIND EQ 'C'.
REC1-PKEY = '50'.
B_TOT = B_TOT + REC1-AMT.
B_CTOT = B_CTOT + REC1-AMT.
MOVE REC1-AMT TO TEMP.
*
ELSEIF REC1-DOCTYPE EQ 'C' AND REC1-DCIND EQ 'C'.
REC1-PKEY = '50'.
B_TOT = B_TOT + REC1-AMT.
B_CTOT = B_CTOT + REC1-AMT.
MOVE REC1-AMT TO TEMP.
*
ELSEIF REC1-DOCTYPE EQ 'R' AND REC1-DCIND EQ 'C'.
REC1-PKEY = '15'.
B_TOT = B_TOT + REC1-AMT.
B_CTOT = B_CTOT + REC1-AMT.
MOVE REC1-AMT TO TEMP.
*
ELSEIF REC1-DOCTYPE EQ 'S' AND REC1-DCIND EQ 'D'.
REC1-PKEY = '40'.
B_TOT1 = B_TOT1 + REC1-AMT.
B_DTOT = B_DTOT + REC1-AMT.
ELSEIF REC1-DOCTYPE EQ 'C' AND REC1-DCIND EQ 'D'.
REC1-PKEY = '40'.
B_TOT1 = B_TOT1 + REC1-AMT.
B_DTOT = B_DTOT + REC1-AMT.
ELSEIF REC1-DOCTYPE EQ 'R' AND REC1-DCIND EQ 'D'.
REC1-PKEY = '04'.
B_TOT1 = B_TOT1 + REC1-AMT.
B_DTOT = B_DTOT + REC1-AMT.
ENDIF.
if rec1-doctype ne 'R'.
SELECT * FROM CSKS WHERE KOSTL EQ REC1-COSTCNTR.
REC1-PCENTER = CSKS-PRCTR.
REC1-BUSINESSAREA = CSKS-GSBER.
MODIFY REC1.
ENDSELECT.
else.
select * from csks where kostl eq rec1-costcntr.
rec1-businessarea = csks-gsber.
modify rec1.
endselect.
endif.
MODIFY REC1.
MOVE REC1-ACCOUNT TO ACCOUNT.
MOVE REC1-DCIND TO IND.
AT END OF LOCATION.
IF SY-TABIX <> 1.
FLAG = 'Y'.
write: account under 'ACCOUNT'.
IF IND EQ 'C'.
write: b_ctot under 'CREDIT' left-justified.
CLEAR B_CTOT.
ELSEIF IND EQ 'D'.
write: b_dtot under 'DEBIT' left-justified.
CLEAR B_DTOT.
ENDIF.
NEW-LINE.
ENDIF.
ULINE: /1(65).
write : / b_tot under 'CREDIT' left-justified, b_tot1 under 'DEBIT'
left-justified.
IF B_TOT <> B_TOT1.
write : / 'check location', rec1-location.
SET PF-STATUS SPACE.
EXIT.
endif.
CLEAR : B_TOT, B_TOT1.
NEW-LINE.
SKIP 1.
ENDAT.
ENDLOOP.
ENDFORM. " UPDATE_REC
&----
*& Form WRITE_REC
&----
text
----
--> p1 text
<-- p2 text
----
FORM WRITE_REC.
DATA: TEMP TYPE P DECIMALS 4.
DATA: ACCOUNT LIKE REC1-ACCOUNT,
IND LIKE REC1-DCIND,
FLAG(1) VALUE 'N'.
SORT REC1 BY PCENTER ACCOUNT COSTCNTR.
WRITE:/0 'PROFIT CENTER',20 'ACCOUNT',45 'CREDIT',60 'DEBIT'.
ULINE : /1(65).
NEW-LINE.
LOOP AT REC1.
AT NEW PCENTER.
WRITE: / REC1-PCENTER UNDER 'PROFIT CENTER'.
ENDAT.
ON CHANGE OF REC1-ACCOUNT.
IF FLAG NE 'Y'.
IF SY-TABIX <> 1.
WRITE: ACCOUNT UNDER 'ACCOUNT'.
IF IND EQ 'C'.
WRITE: B_CTOT UNDER 'CREDIT' LEFT-JUSTIFIED.
CLEAR B_CTOT.
ELSEIF IND EQ 'D'.
WRITE: B_DTOT UNDER 'DEBIT' LEFT-JUSTIFIED.
CLEAR B_DTOT.
ENDIF.
NEW-LINE.
ENDIF.
ENDIF.
FLAG = 'N'.
ENDON.
IF REC1-DOCTYPE EQ 'S' AND REC1-DCIND EQ 'C'.
REC1-PKEY = '50'.
B_TOT = B_TOT + REC1-AMT.
B_CTOT = B_CTOT + REC1-AMT.
MOVE REC1-AMT TO TEMP.
ELSEIF REC1-DOCTYPE EQ 'C' AND REC1-DCIND EQ 'C'.
REC1-PKEY = '50'.
B_TOT = B_TOT + REC1-AMT.
B_CTOT = B_CTOT + REC1-AMT.
MOVE REC1-AMT TO TEMP.
ELSEIF REC1-DOCTYPE EQ 'R' AND REC1-DCIND EQ 'C'.
REC1-PKEY = '15'.
B_TOT = B_TOT + REC1-AMT.
B_CTOT = B_CTOT + REC1-AMT.
MOVE REC1-AMT TO TEMP.
ELSEIF REC1-DOCTYPE EQ 'S' AND REC1-DCIND EQ 'D'.
REC1-PKEY = '40'.
B_TOT1 = B_TOT1 + REC1-AMT.
B_DTOT = B_DTOT + REC1-AMT.
ELSEIF REC1-DOCTYPE EQ 'C' AND REC1-DCIND EQ 'D'.
REC1-PKEY = '40'.
B_TOT1 = B_TOT1 + REC1-AMT.
B_DTOT = B_DTOT + REC1-AMT.
ELSEIF REC1-DOCTYPE EQ 'R' AND REC1-DCIND EQ 'D'.
REC1-PKEY = '04'.
B_TOT1 = B_TOT1 + REC1-AMT.
B_DTOT = B_DTOT + REC1-AMT.
ENDIF.
IF REC1-DOCTYPE NE 'R'.
SELECT * FROM CSKS WHERE KOSTL EQ REC1-COSTCNTR.
REC1-PCENTER = CSKS-PRCTR.
REC1-BUSINESSAREA = CSKS-GSBER.
MODIFY REC1.
ENDSELECT.
ELSE.
SELECT * FROM CSKS WHERE KOSTL EQ REC1-COSTCNTR.
REC1-BUSINESSAREA = CSKS-GSBER.
MODIFY REC1.
ENDSELECT.
ENDIF.
MODIFY REC1.
MOVE REC1-ACCOUNT TO ACCOUNT.
MOVE REC1-DCIND TO IND.
AT END OF PCENTER.
IF SY-TABIX <> 1.
FLAG = 'Y'.
WRITE: ACCOUNT UNDER 'ACCOUNT'.
IF IND EQ 'C'.
WRITE: B_CTOT UNDER 'CREDIT' LEFT-JUSTIFIED.
CLEAR B_CTOT.
ELSEIF IND EQ 'D'.
WRITE: B_DTOT UNDER 'DEBIT' LEFT-JUSTIFIED.
CLEAR B_DTOT.
ENDIF.
NEW-LINE.
ENDIF.
ULINE: /1(65).
WRITE : / B_TOT UNDER 'CREDIT' LEFT-JUSTIFIED, B_TOT1 UNDER 'DEBIT'
LEFT-JUSTIFIED.
IF B_TOT <> B_TOT1.
WRITE : / 'check location', REC1-LOCATION.
SET PF-STATUS SPACE.
EXIT.
endif.
CLEAR : B_TOT, B_TOT1.
NEW-LINE.
SKIP 1.
ENDAT.
ENDLOOP.
ENDFORM. " WRITE_REC
‎2006 Nov 03 6:19 AM
Hi Snjeev,
make changes in the beloww path for file since u r getting error while transferring the data to the below mentioned file b_file2.
hope it will work .
DATA : BEGIN OF B_BBSEG .
INCLUDE STRUCTURE BBSEG.
DATA : END OF B_BBSEG .
DATA : B_FILE2(30) VALUE '
MLTEST\TEMP\PAYROLL.TXT'.
also make sure to have a check after the open data set.
FORM LOAD_PAYROL_DATA.
DATA : B_DATE1 LIKE SY-DATUM .
OPEN DATASET B_FILE2 FOR OUTPUT IN TEXT MODE .
Regards,
Sonika
pls rewards pts if useful.
‎2006 Nov 03 6:31 AM
after giving this path for b_file2 as u mentioned .
it is going to dump error and error it is showing that file could not be found
‎2006 Nov 03 7:14 AM
just make sure that the filename is correct.
else is fine
i think this D:/usr/sap/tmp/payrol.txt. is not a valid path. D:\usr..
do like this.
‎2006 Nov 07 5:45 AM
Hi
If ur problemis solved...close the message and rewards points if useful
‎2006 Nov 07 8:50 AM
Hi Sanjeev
To avoid the dump please make the highlighted change as below:
FORM LOAD_PAYROL_DATA.
DATA : B_DATE1 LIKE SY-DATUM .
OPEN DATASET B_FILE2 FOR OUTPUT IN TEXT MODE .
<b>if sy-subrc ne 0.
Error Message "Unable to open file B_FILE2
else.</b>
MOVE : '0' TO BGR00-STYPE ,
'payroll' TO BGR00-GROUP ,
SY-MANDT TO BGR00-MANDT ,
SY-UNAME TO BGR00-USNAM ,
'X' TO BGR00-XKEEP,
'/' TO BGR00-NODATA .
TRANSFER BGR00 TO B_FILE2 .
....
Also make sure the directory is having the right <b>permissions</b> for creating/modifying a file.
Kind Regards
Eswar
‎2006 Nov 07 11:08 AM
hi Sanjeev,
Unix systems never allow upper case commands.May be this is the reason for your scenario. So, add LOWE CASE addition in the declaration of the filename field and try.
And always make sure ur file path is in lower case.
Thanks,
VINNY
‎2006 Nov 07 11:10 AM
hi Sanjeev,
Unix systems never allow upper case commands.May be this is the reason for your scenario. So, add LOWE CASE addition in the declaration of the filename field and try.
And always make sure ur file path is in lower case.
Thanks,
VINNY