ABAP Chapter 6
Message
Debugging
File Transfer
Type Group
Message in ABAP
User Messages
If user has entered inconsistent values,you
output a dialog message with MESSAGE
statement
Dialog
messages
report
ztest. are stored in table T100
(Transaction
: SE91)
.
AT SELECTION-SCREEN.
message e000(38) with ---- --- --- ---.
Message Type
Syntax
Message [ A<nnn> ](message class) with <field1> <field2>
E, W, I, S
Messages Type - A(Abend)
Message A000(38)...
Program Start
Selection
Screen
A Message
Exit
Messages Type - E(Error)
Message E000(38) ...
Program Start
Selection
Screen
New input
Require
E Message
Messages Type - W(Warning)
Message W000(38)...
Program Start
Selection
Screen
W Message
Enter
List
New input
possible
Messages Type - I(Information)
Message I000(38)...
Program Start
Selection
Screen
I Message
Enter
List
Messages Type - S(Success)
Message S000(38)...
Program Start
Selection
Screen
List
(Next Screen)
Dynamic Message
Report ztest1.
Parameters today like sy-datum.
At selection-screen.
if today <> sy-datum.
message e000(38) with Please enter tod
endif.
Start-of-selection.
Write: / Today is :, today.
Debugging
Debugging Mode
Debugging Mode : Internal Table
Debugging Mode : Internal Table
Debugging Mode : Watchpoint
Watchpoint : SAP ECC 6.0
How to Set Debugging Mode
If you want to test
transaction,enter /h in the command
field,press ENTER and execute the
transaction
Set breakpoints in the program
Utilities->Breakpoints->Set
Uses BREAK-POINT statement
ABAP Practice
File Transfer
File Transfer (Application Server)
There are 3 steps for file transfer
Open File
Read/Write File
Close File
File Transfer
* Prepare Internal Table
Data all_customers like customers occurs 0 w
Data msg_txt(50).
Parameters filename(128) default customersd
Start-of-selection.
Select * from customers into table all_custo
File Transfer
* Opening a file
Open dataset filename for output in text
encoding default message msg_txt.
If sy-subrc <> 0.
Write: File cannot be opened .Reason :
else.
File Transfer
* Transferring data to a file
Loop at all_customers.
Transfer all_customers to
Endloop.
* Closing a file
Close dataset filename.
Endif.
filename.
Transaction : AL11
File Transfer (Appending Data)
* Opening a file
Open dataset filename for appending
encoding default message msg_tx
If sy-subrc <> 0.
Write: File cannot be opened .Reason
else.
...
Reading Data from OS File
* Reading data from a file
Parameters filename(128) default customersdata.txt lower
Data msg_txt(50).
Data all_customers like customers occurs 0 with header
Start-of-selection.
Open dataset filename for input in text mode
encoding default message msg_txt.
If sy-subrc <> 0.
Write: File cannot be opened .Reason :,msg_txt.
else.
Reading Data from OS File
Do.
Read dataset filename into all_customers.
if sy-subrc <> 0.
Exit.
endif.
Append all_customers.
Enddo.
Close dataset filename.
Endif.
Deleting OS File
Parameters filename(128) default customersd
START-OF-SELECTION.
Delete dataset filename.
If sy-subrc = 0.
write: / Delete OK.
Endif.
Working with File on Presentation
Server
Download Data to PC
* Download data from PC
parameters filename like rlgrap-filename
default c:\customers.txt.
Data all_customers like customers occurs 0
with he
START-OF-SELECTION.
Select * from customers into table all_custo
Download Data to PC
CALL FUNCTION DOWNLOAD
Exporting
filename = filename
Tables
data_tab = all_customers
Exceptions
file_open_error = 1
others
= 5.
Download Data to PC
Case sy-subrc.
When 1.
Write: Error when file opened.
When 2.
Write: Error during data transfer.
When 0.
Write: / Data Download Finish.
Endcase.
Upload Data from PC
* Upload data to PC
parameters filename like rlgrap-filename
default c:\customers.txt.
Data all_customers like customers occurs
START-OF-SELECTION.
Upload Data from PC
CALL FUNCTION UPLOAD
Exporting
filename = filename
Tables
data_tab = all_customers
Exceptions
file_open_error = 1
others
= 5.
Upload Data from PC
Case sy-subrc.
When 1.
Write: Error when file opened.
When 2.
Write: Error during data transfer.
When 0.
Insert customers from table all_customers.
Endcase.
Upload/Download Data in Background
Call function WS_DOWNLOAD
Exporting
filename = filename
and
...
Call function WS_UPLOAD
Exporting
filename = filename
...
Type Group : SE11
Type Group
ABAP Program
Exercise IV
Exercise III : User Master
usr02-trdat
usr02-bname
adcp-tel_number
Exercise IV : Drill-Down
Report
