My Profile
Active Members
TodayLast 7 Days
more...
Awards & Gifts
Online Exams
Fresher Jobs
Our fresher job section is exclusively for fresh graduates! Find jobs for freshers in major Indian
cities including Bangalore, Chennai, Hyderabad, Pune or Kochi
Resources
Find educational articles, blogs, discussion threads and other resources.
Colleges
Find details about any college in India or search for courses.
|
Project to Compute the Marks and the Grades in ABAP
Posted Date:
Total Responses: 0
Posted By: VELU S Member Level: Gold Points/Cash: 4
|
*&---------------------------------------------------------------------*
*& Report ZPROGRAM12_2
*&
*&---------------------------------------------------------------------*
*&
*&Date : 25/11/2008
*&---------------------------------------------------------------------*
REPORT ZPROGRAM12_2.
types mark(3) type n.
parameter: F_name(10) type c obligatory default 'VELU',
L_name(10) type c obligatory default 'Shanmugam',
Marks1(3) type n default 10, " Data Types
marks2 like marks1 default 20, " Data Objects
marks3 type Mark default 30. " user defined data types
data: g_total(4) type n,
g_avg(3) type p decimals 2,
FN(10) type c,
v_date type d.
constants school(20) type c value 'St Anthony School'. "Constants
v_date = sy-datum.
FN = 'Velu'.
write :'T-Code: ', sy-tcode.
write : 'MR.',f_name,' ',l_name left-justified.
write : / 'School Name=',school.
skip 2.
write : / 'Score Card as on ', v_date,sy-uzeit.
write : / 'Approved by ',sy-uname.
skip.
write : 'Science=',marks1.
write : / 'Maths=',marks2.
write : / 'English=',marks3.
g_total = marks1 + marks2 + marks3.
g_avg = g_total / 3.
* Local Messages.
if marks1 LE 60.
message 'Science:You have to Try hard to get good Marks' type 'I'.
endif.
if marks2 LE 60.
message 'Maths:You have to Try hard to get good Marks' type 'I'.
endif.
if marks3 LE 60.
message 'English:You have to Try hard to get good Marks' type 'I'.
endif.
skip 3.
uline.
* Global Messages.
write : 'The Average=',g_avg color 5.
if g_avg between 1 and 40.
write : / 'Result = FAIL' color 4.
message I100(Zvelu).
elseif g_avg between 41 and 60.
write : / 'Result = JUST PASS' color 6 .
message s101(zvelu).
elseif g_avg between 60 and 75.
write : / 'Result = First Class' color 2.
message s102(zvelu).
elseif g_avg between 75 and 100.
write : / 'Result = Destination..... Great Marks' color 5.
endif.
uline.
|
Project Feedbacks
|
| Author: Bhakti Savla | Member Level: Gold | Revenue Score:  | Hi,
Thanks for posting this report program. It works fine in SE38 transaction.
Regards,
Bhakti
|
|
|
| Post Feedback |
|
|
You must Sign In to post a feedback.
|
|
|
|
|
Advertise Here
|