Need func/tech specification with report program

hi experts
i am a fresher.please help me.i am waiting for ur reply
can anyone send sample funftional and technical specification with report program for SD and MM modules.
in any format
please send now to this my mail id
my mail id is: [email protected] (or)
[email protected]
thanks in advance.

please send any one now
i need very urgent
dont avoid pls
i am waiting

Similar Messages

Select-option length specification (in report program, not module pool)

Dear forumers,
Is there a way to properly customize the length of a select-option in a report program?
Currently, the select-option S_ADMAIL is shown in the selection screen at a length of 18 characters. No matter what I've coded, this length does not change. The requirement states for the length to be shown at 40 characters long:-
Admin Email (type STRING showing up to 40 char on screen)
How may I fix the select-option's visible length to 40 characters?
DATA: v_admail TYPE string.   " Tried with TYPE CHAR40 too
SELECT-OPTIONS: s_admail FOR (v_admail) NO INTERVALS VISIBLE LENGTH 40.
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
    IF screen-name CS 'S_ADMAIL'.
      screen-length = 40.
      MODIFY SCREEN.
    ENDIF.
ENDLOOP.
Perhaps there is an FM that can accomplish this (but I'm not sure what it is)? Please do help. Thanks a lot.

Dear Tan,
Tables : makt.
select-options maknr for makt-maktx.
now go to the screen painter of your program in change mode and move the Help buttons first to the Right each. now *increasethe length of the Matnr Field length so that they are equal to 40 Char. in your program you have handle the length now if you want to restrict to 18 otherwise it will be ok*
if they don't fit you need incease the Size of the Screen Visible area both in the Screen Painter as well as in the
Screen Attributes
You also get an Information Message just ignore that.
Just open your program in SE80 if you can't go to the screen painter in SE38. the other way just keep this program in Display mode and execute then take F1 help , take Technical Information and double click on the Screen number now go to the Screen Layout and go to Change mode here.
Hope this is Very Clear to you.
I just did it
Cheers
Ram
Edited by: Ramchander Krishnamraju on Oct 27, 2009 10:39 AM
Edited by: Ramchander Krishnamraju on Oct 27, 2009 10:46 AM

I am new to Mac. I am thinking of getting a MacBook Air. My most pressing need is to work with photography programs so screen size, resolution, software capability are important to me. Is a 15 inch screen coming out this spring?

I am new to Mac. I am considering getting and airbook. My most pressing need is to use for photography, so software program capability, display, resolution, are all important. Is an Airbook the best choice and is there a 15 inch screen coming out in the spring as I had heard rumor of?

You might enjoy this review, which specifically compares it to the MacBook Pro:
http://www.macstories.net/reviews/13-inch-macbook-air-review/
Since you will be working with photography, performance and display resolution will be equally important.
As for future models, no one knows. We find out the moment they become available for purchase, and not one moment before. That is also the same moment speculation on the next model begins. In any event we can't engage in that here; it's contrary to the terms of use.

Need Database Schema diagram with reports names

Dear Experts,
I need retail and petroleum industry database schema diagram with different report requirements.
If u have Plz do share. I want to develop some reports as per requirements.
If u have any sample dummy schema Plz do share, I will be much thankful to u. This is for fresher interview, I need to attain this week end.
Regards,
Mahesh.

i dont think its possible with original exp/imp....and also not possible with data pump (10g and up)....but not sure on data pump....data pump has capability of restarting a job..but didnt heard about appending (atleast not that i heard).
only way i can think of...create triggers on every table when DML happens and insert the new data into new tables...and then exp those new tables and import the new tables...thats the only way i can think of...again just my 2 cent....

Need a little help with a program...

hi,
I have an assignment for class where we have to write a recursive program using a method that calculates Hermite Polynimials.
the math-like definition looks like this:
Hn(x)=
n<=0 : 1
n==1: 2x
n>=2 : 2xH(n-1)(x)-2(n-1)H(n-2)x
(but the H(2-1) and H(n-2) are subscripts...)
well, the program is supposed to accept arguments for n and x from the command line.
but I'm having problems..
here's the code that I have:
class HermitePoly
public int Herm( int N, int X )
if ( N<=0 )
return 1;
else if ( N==1 )
return 2*X;
else
return (2*X)*Herm(N-1)*(X) - (2*(N - 1)*Herm(N-2)*(X));
public static void main ( String[] args)
int argument = Integer.parseInt( args[0] );
HermitePoly f = new HermitePoly();
int result = f.Herm( argument, argument);
System.out.println("Herm(" + argument + ") is " + result );
the errors that it's giving me say:
HermitePoly.java:12: Herm(int, int) in HermitePoly cannot be applied to (int) return(2*X)*Herm*(N-1)*(X)- (2*(N-1)*Herm(N-2)*(X));
both errors say the same thing, but the first one, the pointer points to the first Herm() call, and in the second error, it points to the second Herm() call in the equation. I know what it means, but I don't know how to fix it.
any help would be greatly appreciated!!

Parentheses are your friend
return ((2*X)*(Herm(N-1, X)*(X)) - (2*(N-1)*(Herm(N-2, X)*(X))Also, you need to pass X back into your Herm function again, since it takes two parameters.

Hello, need a little help with this program

i have this program and i cant see whats wrong with it. but when i run it the error "Exception in thread 'main' java.lang.NoSuchMethodError: main"
anyone know what wrong?
class Assignment2
 public final
 void main( String[] argv )
 Script sc = new Script ("Assignment2.txt");
 KeyboardReader kb = new KeyboardReader();
 System.out.println( "Enter Time In 24hr Mode (use -999 to quit) : " );
 int time = kb.getInt();
 if (time == -999) { System.out.println( "EXIT" );}
 System.out.println( "" );
 System.out.println( "Enter The Distance Of The Call (use -999 to quit) : " );
 int distance = kb.getInt();
 if (distance == -999) { System.out.println( "EXIT" );}
 System.out.println( "" );
 System.out.println( "Enter Length Of Call In Minutes (use -999 to quit) : " );
 double length = kb.getDouble();
 if (length == -999) {System.out.println( "EXIT" );}
 System.out.println( "" );
 Calculation (time, distance, length);
 }// end main
public void Calculation (int time, int distance, double length)
 while (time != -999 || distance != -999 || length != -999)
 if (700 <= time && time <= 1900 && distance <= 100)
 System.out.println( "Cost of call is $0.60 per minute" );
 double cost = 0.60 * length;
 System.out.println( "That call will cost $ " + cost );
 if (700 <= time && time <= 1900 && distance > 100)
 System.out.println( "Cost of call is $1.10 per minute" );
 double cost = 1.10 * length;
 System.out.println( "That call will cost $ " + cost );
 if (700 <= time && time <= 1900 && distance > 100)
 System.out.println( "Cost of call is $1.10 per minute" );
 double cost = 1.10 * length;
 System.out.println( "That call will cost $ " + cost );
 System.out.println( "EXIT" );
}//end calculation
}//end class
//----------------------------------------------------------------------------------------------------

i have this program and i cant see whats wrong with
it. but when i run it the error "Exception in thread
'main' java.lang.NoSuchMethodError: main"
anyone know what wrong?When you get exceptions you also get a stack trace pointing you at the exact line where the exception occured in your code.

VIM: need for VIM specific reports

Hello Experts,
My need is to create a report from a cross of two existant reports: VIM_ANALYTICS and REMINDER (Transaction /OPT/VIM_ANALYTICS and /OPT/REMINDER).
- Is there a point in the customizing where we can create VIM customer reports ? I mean with assistant by selecting the fields, the columns like queries?
- Do you have any idea to achieve this? I need necessarily a specific development (Z program)? or can i just enhance or use some user exit in one report to include it by the other fields report?
Thank you in advance for your help,
Amal

Hello,
Now instead of manually generating these reportsBy manually to you mean you don't want to have to go to a website?
If you want emails you would use a combination of the APEX views to get your data
Home>Utilities>Application Express Views
The APEX email functionality to create the message and send it
http://download.oracle.com/docs/cd/B28359_01/appdev.111/b32258/api.htm#CHDDHBGI
and
dbms job to run the the job at a specific time or interval.
http://download.oracle.com/docs/cd/B19306_01/appdev.102/b14258/d_job.htm
Regards,
Carl
blog : http://carlback.blogspot.com/
apex examples : http://apex.oracle.com/pls/otn/f?p=11933:5

Differance between module pool & report programming

hi can any 1 tell me what is a big difference between module pool & report programs why is the need of module pool if we can do all the things with report program, please tell me technically how it behave
Please search for available information before posting
Edited by: kishan P on Sep 6, 2010 11:22 AM

Hi, Ashwinv
Welcome to SCN
Please Search Before Posting any More
Please read "The Forum Rules of Engagement" before posting! HOT NEWS!!
Thanks and Regards,
Faisal

Calling Webdynpro application from report program

Hi All,
I am working with report program which displays ALV grid and if i select a row and click the button in application toolbar it should navigate to webdynpro application.
This webdynpro application should get loaded with the datas that i ve selected in the ALV output.
for eg., in alv display
select carrid connid
X        10      10
           20      20
Webdynpro Application
carrid   10
connid 10
Kindly help me in acheving this.

Hi,
SET/GET parameters wont work in WD Envoirment, because WDA programs are executed in browser and that doesnt has a connection to SAP GUI.
You may use the shared memory to transfer work area from the report program, and import the work area agin in the WDA in the WDDOINIT method of the controller where you want to set the fields.
data: send type string.
send = 'enter file name here'.
export send TO shared memory indx(XY) id 'wda'.
CALL FUNCTION 'CALL_BROWSER'
EXPORTING
   URL                          = 'http://SSR11S07.8000/sap/bc/webdynpro/sap/ztest_wda1 '.
And in the WDDOINIT method of the controller, you may import the variable.
data receive type string.
import send = receive from shared memory indx(xy) id 'wda'.
Then you may use the method set_attribute to set the value to respective UI element on the screen.
Regards,
Runal

Fetch Report Program names for a given Package

Hi,
I need to fetch all the report program names for a given pakage. I tired TADIR table but couldnt fetch report details alone..
thanks,
sri
Moderator message: very basic, please do more own research before asking, e.g. look at a few TADIR entries of different object types, also discover the repository information system.
Edited by: Thomas Zloch on Feb 23, 2011 2:56 PM

Dan is right to be cautious, i've seen this cause problems.
It's not very difficult to make the chnages in BCS, and if you have a lot of them/frequent changes, you can always use create an upload method
and then make all future changes by .txt file

Calling report program to my workflow method

hi friends
I have writen the logic to find the email id for travel admin now i want to call this REPORT program to my workflow method. How can i do that. I know how to do that in function module but i want to try with report program. How to get the import and export parameter in the report program. I know there is some thing called memory id export but i dont no how to do that. Can any one show with sample code.
Regards
vijay

Hi Vijay,
You can make use of the following sample code.
BEGIN_METHOD ' ' CHANGING CONTAINER.
export itab to memory id 'PQR'.
submit zMM_R_BUDJETDISP AND RETURN."exporting list to memory and return.
END_METHOD.
In your program you can use
import itab from memory ID 'PQR'.
Here Itab is a internal table.
Similarly you can define single data elements as well.
you can use this syntax to import, export parameters.
let me know if you have any queries.
Regards,
Raj

I need help with this program ( Calculating Pi using random numbers)

hi
please understand that I am not trying to ask anymore to do this hw for me. I am new to java and working on the assignment. below is the specification of this program:
Calculate PI using Random Numbers
In geometry the ratio of the circumference of a circle to its diameter is known as �. The value of � can be estimated from an infinite series of the form:
� / 4 = 1 - (1/3) + (1/5) - (1/7) + (1/9) - (1/11) + ...
There is another novel approach to calculate �. Imagine that you have a dart board that is 2 units square. It inscribes a circle of unit radius. The center of the circle coincides with the center of the square. Now imagine that you throw darts at that dart board randomly. Then the ratio of the number of darts that fall within the circle to the total number of darts thrown is the same as the ratio of the area of the circle to the area of the square dart board. The area of a circle with unit radius is just � square unit. The area of the dart board is 4 square units. The ratio of the area of the circle to the area of the square is � / 4.
To simuluate the throwing of darts we will use a random number generator. The Math class has a random() method that can be used. This method returns random numbers between 0.0 (inclusive) to 1.0 (exclusive). There is an even better random number generator that is provided the Random class. We will first create a Random object called randomGen. This random number generator needs a seed to get started. We will read the time from the System clock and use that as our seed.
Random randomGen = new Random ( System.currentTimeMillis() );
Imagine that the square dart board has a coordinate system attached to it. The upper right corner has coordinates ( 1.0, 1.0) and the lower left corner has coordinates ( -1.0, -1.0 ). It has sides that are 2 units long and its center (as well as the center of the inscribed circle) is at the origin.
A random point inside the dart board can be specified by its x and y coordinates. These values are generated using the random number generator. There is a method nextDouble() that will return a double between 0.0 (inclusive) and 1.0 (exclusive). But we need random numbers between -1.0 and +1.0. The way we achieve that is:
double xPos = (randomGen.nextDouble()) * 2 - 1.0;
double yPos = (randomGen.nextDouble()) * 2 - 1.0;
To determine if a point is inside the circle its distance from the center of the circle must be less than the radius of the circle. The distance of a point with coordinates ( xPos, yPos ) from the center is Math.sqrt ( xPos * xPos + yPos * yPos ). The radius of the circle is 1 unit.
The class that you will be writing will be called CalculatePI. It will have the following structure:
import java.util.*;
public class CalculatePI
public static boolean isInside ( double xPos, double yPos )
public static double computePI ( int numThrows )
public static void main ( String[] args )
In your method main() you want to experiment and see if the accuracy of PI increases with the number of throws on the dartboard. You will compare your result with the value given by Math.PI. The quantity Difference in the output is your calculated value of PI minus Math.PI. Use the following number of throws to run your experiment - 100, 1000, 10,000, and 100,000. You will call the method computePI() with these numbers as input parameters. Your output will be of the following form:
Computation of PI using Random Numbers
Number of throws = 100, Computed PI = ..., Difference = ...
Number of throws = 1000, Computed PI = ..., Difference = ...
Number of throws = 10000, Computed PI = ..., Difference = ...
Number of throws = 100000, Computed PI = ..., Difference = ...
* Difference = Computed PI - Math.PI
In the method computePI() you will simulate the throw of a dart by generating random numbers for the x and y coordinates. You will call the method isInside() to determine if the point is inside the circle or not. This you will do as many times as specified by the number of throws. You will keep a count of the number of times a dart landed inside the circle. That figure divided by the total number of throws is the ratio � / 4. The method computePI() will return the computed value of PI.
and below is what i have so far:
import java.util.*;
public class CalculatePI
public static boolean isInside ( double xPos, double yPos )
 double distance = Math.sqrt( xPos * xPos + yPos * yPos );
public static double computePI ( int numThrows )
 Random randomGen = new Random ( System.currentTimeMillis() );
 double xPos = (randomGen.nextDouble()) * 2 - 1.0;
 double yPos = (randomGen.nextDouble()) * 2 - 1.0;
 int hits = 0;
 int darts = 0;
 int i = 0;
 int areaSquare = 4 ;
 while (i <= numThrows)
 if (distance< 1)
 hits = hits + 1;
 if (distance <= areaSquare)
 darts = darts + 1;
 double PI = 4 * ( hits / darts );
 i = i+1;
public static void main ( String[] args )
 Scanner sc = new Scanner (System.in);
 System.out.print ("Enter number of throws:");
 int numThrows = sc.nextInt();
 double Difference = PI - Math.PI;
 System.out.println ("Number of throws = " + numThrows + ", Computed PI = " + PI + ", Difference = " + difference );
}when I tried to compile it says "cannot find variable 'distance' " in the while loop. but i thought i already declare that variable in the above method. Please give me some ideas to solve this problem and please check my program to see if there is any other mistakes.
Thanks a lot.

You've declared a local variable, distance, in the method isInside(). The scope of this variable is limited to the method in which it is declared. There is no declaration for distance in computePI() and that is why the compiler gives you an error.
I won't check your entire program but I did notice that isInside() is declared to be a boolean method but doesn't return anything, let alone a boolean value. In fact, it doesn't even compute a boolean value.

Need example report program using PNPCE LDB in SAP HR

Need example report program using PNPCE LDB in SAP HR.
and how to create a report category in sap hr for using it as cutomised selection screen.

Hi,
Go through the following links, i hope it will help you.....
/people/alvaro.tejadagalindo/blog/2006/02/19/how-to-deal-with-hr-payroll-reports
http://sap.ittoolbox.com/groups/technical-functional/sap-r3-dev/893908#
A sample prog with LDB PNP
*& Report ZH_REPT_PAYMENT *
report zh_rept_payment line-size 80 no standard page
heading.
tables: pernr, " Standard Selections for HR Master Data Reporting
pcl1, " HR Cluster 1
pcl2, " HR Cluster 2
pa0009,
PA9001,
PA9006,
pa0002,
pc260 , " Cluster Directory for Payroll Results
bnka .
Infotypes
infotypes: 0001. " Organizational Assignment
Declaration of Internal Tables
data : bnka1 like bnka occurs 0 with header line .
data: begin of t_int_rep occurs 100,
bankl like pc209-bankl, " Bank Number
zlsch like pc209-zlsch, " Payment method
pernr like pernr-pernr, " Employee Number
ename like pernr-ename, " Employee Name
bankn like pc209-bankn, " Bank Account Number
betrg like pc209-betrg, " Amount to be transfered
zweck like pa0009-zweck, " Purpose
end of t_int_rep.
data: begin of int_rep occurs 100,
bankl like pc209-bankl, " Bank Number
zlsch like pc209-zlsch, " Payment method
pernr like pernr-pernr, " Employee Number
ename like pernr-ename, " Employee Name
bankn like pc209-bankn, " Bank Account Number
betrg like pc209-betrg, " Amount to be transfered
zweck like pa0009-zweck, " Purpose
begda like pa0009-begda, "Begin date
end of int_rep.
Declaration of Data Variables
data: ws_betrg like pc209-betrg, " BT Amount
w_val like spell occurs 0 with header line,
int_rep1(6), " TYPE I, " Employee Number
cnt type i value 0, " Counter
calcmolga like t500l-molga value '40', " Country Grouping
v_id(15),
calc_currency like t001-waers value 'INR'. " Currency
data : ctr type i,
dt_merge like pa0009-begda.
data: ws_totemp(6) type c,
ws_totamt(20) type c,
r_mth(9) type c,
ws_fpbeg(6) type c,
ws_fpend(6) type c,
ws_mthyr(6) type c,
ws_mthyr_r(14) type c,
r_mth_t(3) type c,
ws_amt(8) type c,
ws_bankl(14) type c,
ws_date(6) type c,
amount_word(500),
total_page type i,
pages type i,
remain type i.
data begin of i_spell.
include structure spell .
data end of i_spell .
data : c_molga type t500l-molga value '40',
c_banks type bnka-banks value 'IN'.
Standard Includes
include rpc2cd09. "Cluster CD data definition
include pc2rxin0.
include rpc2rx09.
include rpppxd00. " Data Definition buffer PCL1/PCL2
include rpppxd10. " Common Part buffer PCL1/PCL2
include rpppxm00. " Buffer Handling RoutinePCL1/PCL2
include zrpc2rox2. " Data Definition POCLSTERS (not J,K,U)
Selection Screen
selection-screen begin of block b1 with frame title text-001.
parameter: pa_mth(2) type c default sy-datum+4(2) obligatory,
pa_year(4) type c default sy-datum(4) obligatory,
p_bankl like pc209-bankl, " Bank Number
p_zlsch like pc209-zlsch. " Payment method
selection-screen end of block b1.
save_calc_currency = calc_currency.
count_top = 0.
get_pernr_flag = 0.
Top-Of-Page
top-of-page.
perform convert_month using pa_mth(2) r_mth.
ws_mthyr_r = r_mth.
concatenate ws_mthyr_r pa_year into ws_mthyr_r separated by space.
SKIP 5.
skip 1.
skip 4.
if int_rep-bankl eq ' '.
if int_rep-zlsch eq 'C' or int_rep-zlsch eq 'E' or
int_rep-zlsch eq ' '.
write: /1(85) 'CHEQUE PAYMENT STATEMENT'(047) centered.
elseif int_rep-zlsch eq 'L'.
write: /1(85) 'DEMAND DRAFT STATEMENT'(047) centered.
endif.
else.
write: /1(85) 'BANK TRANSFER STATEMENT'(002) centered.
endif.
skip.
write: /34 ws_mthyr_r,
62 'Page :'(008),69(2) sy-pagno intensified off,
' Of ',78(2) pages intensified off.
clear pages.
read table bnka1 with key bankl = int_rep-bankl .
if sy-subrc = 0.
if int_rep-zlsch eq 'T'.
write:/03(10) 'Bank Name : ', bnka1-banka.
write:/03(10) 'Branch : ', bnka1-brnch.
write:/03(10) 'Address : ', bnka1-stras.
endif.
endif.
skip.
write:/1(80) sy-uline.
write: /1 sy-vline, 2(5) 'Sl.No'(002),
7 sy-vline, 8(8) 'Emp.No.'(003),
16 sy-vline,17(35) 'Employee Name'(004).
*--added for Demand Draft
if ( int_rep-zlsch = 'l' or int_rep-zlsch = 'L' ).
write : 47 sy-vline, 48(15) 'Payable at'(005).
else.
write : 47 sy-vline,48(15) 'Account No.'(005).
endif.
write: 63 sy-vline,64(16) 'Amount'(006),
80 sy-vline.
write:/1(80) sy-uline.
end-of-page.
write:/1(80) sy-uline.
write:/2 'Printed on ', sy-datum.
Start-of-selection.
start-of-selection.
*perform h_headr.
ctr = 0.
set margin 5.
call function 'RP_GET_CURRENCY'
exporting
molga = calcmolga
importing
waers = calc_currency
exceptions
others.
if sy-subrc ne 0.
calc_currency = 'DEM'.
calc_currency = save_calc_currency.
endif.
get pernr.
cd-key-pernr = pernr-pernr.
perform import_cluster.
get_pernr_flag = 1.
check : ocd-version-molga eq calcmolga.
The table 'tabpernr' is filled with the personnel numbers
and is used after selection is finished.
move-corresponding pernr to tabpernr.
append tabpernr.
The table 'tab_rgdir' is filled
loop at rgdir.
rx-key-pernr = pernr-pernr.
unpack rgdir-seqnr to rx-key-seqno.
perform int_tab. "fill tab_rgdir
perform import_bt.
perform validate.
endloop.
End of Selection
end-of-selection.
*perform h_headr.
perform convert_date_a using pa_mth r_mth_t.
sort int_rep by bankl zlsch pernr betrg descending.
delete adjacent duplicates from int_rep
comparing bankl zlsch pernr .
sort int_rep by bankl zlsch bankn . "PERNR.
loop at int_rep.
at new bankl.
select single * into bnka1 from bnka
where banks = c_banks and
bankl = int_rep-bankl .
append bnka1.
clear bnka1.
endat.
endloop.
for Demand Draft - purpose added
loop at int_rep.
concatenate pa_year(4) pa_mth(2) '01' into dt_merge.
select single * "zweck into int_rep-zweck
from pa0009 where
pernr = int_rep-pernr and
bankl = int_rep-bankl and
zlsch = int_rep-zlsch
and begda <= dt_merge and
endda >= dt_merge .
if sy-subrc = 0.
int_rep-zweck = pa0009-zweck.
modify int_rep.
endif.
endloop.
*-for DD and Chq sorted by PAyable at and EMPNO wise
if p_zlsch = 'T' .
sort int_rep by bankl zlsch bankn . "PERNR.
else. "added for "payable at" for DD/Chq
else.
sort int_rep by zweck pernr . "PERNR.
endif.
*delete adjacent duplicates from int_rep.
t_int_rep] = int_rep[.
loop at int_rep.
*-for page of page no.
total_page = 0.
loop at t_int_rep where bankl = int_rep-bankl
and zlsch = int_rep-zlsch.
total_page = total_page + 1.
endloop.
pages = total_page div 25.
remain = total_page mod 25.
comment bcoz its adding one extra page no.
done as on 29/11/2004
if remain > 0.
pages = pages + 1.
endif.
**-end
at new bankl.
ctr = 0 .
new-page.
endat.
at new zlsch.
ctr = 0 .
new-page.
endat.
clear v_id.
select single natio
into pa0002-natio
from pa0002
where pernr eq int_rep-pernr.
*-testing......for soma
if ctr > 24.
ctr = 0 .
write:/1(80) sy-uline.
new-page .
endif.
ctr = ctr + 1 .
cnt = cnt + 1.
pack int_rep-pernr to int_rep1.
write:/1 sy-vline, 2(3) cnt intensified off,
7 sy-vline, 9(6) int_rep1 intensified off,
16 sy-vline,17(35) int_rep-ename intensified off .
if ( int_rep-zlsch = 'l' or int_rep-zlsch = 'L' ).
write : 47 sy-vline,48(15) int_rep-zweck intensified off.
else.
write:
47 sy-vline,48(15) int_rep-bankn intensified off .
endif.
write: 63 sy-vline,64(16) int_rep-betrg
intensified off currency 'INR',
80 sy-vline.
ws_betrg = ws_betrg + int_rep-betrg.
*-testing......for soma
skip.
write :
/1 sy-vline, 7 sy-vline ,16 sy-vline ,47 sy-vline,63 sy-vline,80
sy-vline .
*-end testing......for soma
at end of zlsch.
if int_rep-bankl = ' '.
call function 'HR_IN_CHG_INR_WRDS'
exporting
amt_in_num = ws_betrg
importing
amt_in_words = amount_word
EXCEPTIONS
DATA_TYPE_MISMATCH = 1
OTHERS = 2
w_val-word = amount_word.
concatenate 'INR.' w_val-word into w_val-word
separated by space.
write:/1(80) sy-uline.
write: /1 sy-vline, 7 'Total transfer:'(009),
64(16) ws_betrg intensified off currency 'INR',
80 sy-vline.
write:/1(80) sy-uline.
write: /1 sy-vline, 3 w_val-word+0(76) intensified off,
80 sy-vline.
write :/1 sy-vline, 10 w_val-word+76(70) intensified off,
80 sy-vline.
write:/1(80) sy-uline.
clear: ws_betrg,cnt.
skip 2.
write: /2 'Prepared by :'(010), '_______________'(013),
45 'Checked by :'(011),'_______________'(013).
skip 2.
write: /2 'Printed On ', sy-datum,
45 'Approved by :'(012),'_______________'(013).
clear sy-pagno.
endif.
endat.
at end of bankl.
if int_rep-bankl ' '.
call function 'HR_IN_CHG_INR_WRDS'
exporting
amt_in_num = ws_betrg
importing
amt_in_words = amount_word
EXCEPTIONS
DATA_TYPE_MISMATCH = 1
OTHERS = 2
w_val-word = amount_word.
concatenate 'INR.' w_val-word into w_val-word
separated by space.
write:/1(80) sy-uline.
write: /1 sy-vline, 7 'Total transfer:'(009),
64(16) ws_betrg intensified off currency 'INR',
80 sy-vline.
write:/1(80) sy-uline.
write: /1 sy-vline, 3 w_val-word+0(76) intensified off,
80 sy-vline.
write :/1 sy-vline, 10 w_val-word+76(70) intensified off,
80 sy-vline.
write:/1(80) sy-uline.
clear: ws_betrg,cnt.
skip 2.
write: /2 'Prepared by :'(010), '_______________'(013),
45 'Checked by :'(011),'_______________'(013).
skip 2.
write: /2 'Printed on ', sy-datum,
45 'Approved by :'(012),'_______________'(013).
clear sy-pagno.
NEW-PAGE.
endif.
endat.
endloop.
End of Page
end-of-page.
write: /2 'Prepared by :'(010), '_______________',
45 'Checked by :'(011),'_______________'.
*& Form IMPORT_CLUSTER
Importing Data from Cluster *
form import_cluster.
sy-subrc = 0.
rp-imp-c2-cd.
if sy-subrc eq 0.
if cd-version-number ne ocd-version-number.
endif.
endif. " SY-SUBRC EQ 0
endform. " IMPORT_CLUSTER
*& Form INT_TAB
Filling internal table tab_rgdir form int_tab.
*Fill internal table tab_rgdir.
move-corresponding rgdir to tab_rgdir.
tab_rgdir-pernr = pernr-pernr.
append tab_rgdir.
endform. " INT_TAB
*& Form IMPORT_bt
Import Values from Bank Transactions Table (BT) form import_bt.
rp-init-buffer.
RP-IMP-C2-RX.
rp-imp-c2-in.
if rp-imp-in-subrc eq 0.
if in-version-number ne oin-version-number.
write: / 'Schlüssel des Clusters RX:'(015),
rx-key-pernr, rx-key-seqno.
write: / 'The imported version of the cluster'(016), 'RX',
'is not current'(017).
write: / 'Imported version :'(018),
oin-version-number.
write: / 'Current version of cluster :'(019),
in-version-number.
stop.
else.
sy-subrc = 0.
endif.
else.
sy-subrc = 8.
write: /
'Inconsistencies between cluster directory and directory for'(020).
write: /
'No payroll results found for data in cluster directory'(021).
write : /
'Please contact hotline to solve the current problem'(022).
endif.
ws_fpbeg(2) = versc-fpbeg+4(2).
ws_fpbeg+2(4) = versc-fpbeg(4).
ws_fpend(2) = versc-fpend+4(2).
ws_fpend+2(4) = versc-fpend(4).
ws_mthyr(2) = pa_mth.
ws_mthyr+2(4) = pa_year.
check ws_mthyr = ws_fpbeg.
check ws_mthyr = ws_fpend.
loop at bt. "from pc209
int_rep-pernr = pernr-pernr.
int_rep-ename = pernr-ename.
int_rep-bankl = bt-bankl.
int_rep-bankn = bt-bankn.
int_rep-betrg = bt-betrg.
int_rep-zlsch = bt-zlsch.
append int_rep.
endloop.
IF P_BANKL ' ' AND P_ZLSCH ' '.
DELETE INT_REP WHERE BANKL P_BANKL.
ELSEIF P_BANKL = ' ' AND P_ZLSCH ' '.
DELETE INT_REP WHERE ZLSCH P_ZLSCH.
ELSEIF P_BANKL ' ' AND P_ZLSCH = ' '.
DELETE INT_REP WHERE BANKL P_BANKL.
ENDIF.
endform. " IMPORT_BT
*& Form CONVERT_MONTH
Fetching Month Text form convert_month using mth t_mth.
case mth.
when '01'.
t_mth = 'January'(023).
when '02'.
t_mth = 'February'(024).
when '03'.
t_mth = 'March'(025).
when '04'.
t_mth = 'April'(026).
when '05'.
t_mth = 'May'(027).
when '06'.
t_mth = 'June'(028).
when '07'.
t_mth = 'July'(029).
when '08'.
t_mth = 'August'(030).
when '09'.
t_mth = 'September'(031).
when '10'.
t_mth = 'October'(032).
when '11'.
t_mth = 'November'(033).
when '12'.
t_mth = 'December'(034).
endcase.
endform. " CONVERT_MONTH
*& Form CONVERT_DATE_A
Fetching Month Text * form convert_date_a using mth_t t_mth_t.
case mth_t.
when '01'.
t_mth_t = 'Jan.'(035).
when '02'.
t_mth_t = 'Feb.'(036).
when '03'.
t_mth_t = 'Mar.'(037).
when '04'.
t_mth_t = 'Apr.'(038).
when '05'.
t_mth_t = 'May.'(039).
when '06'.
t_mth_t = 'Jun.'(040).
when '07'.
t_mth_t = 'Jul.'(041).
when '08'.
t_mth_t = 'Aug.'(042).
when '09'.
t_mth_t = 'Sep.'(043).
when '10'.
t_mth_t = 'Oct.'(044).
when '11'.
t_mth_t = 'Nov.'(045).
when '12'.
t_mth_t = 'Dec.'(046).
endcase.
endform. " CONVERT_DATE_A
*& Form VALIDATE
text
--> p1 text
<-- p2 text form validate .
if p_bankl <> ' ' and p_zlsch ' '.
delete int_rep where bankl p_bankl.
elseif p_bankl = ' ' and p_zlsch ' '.
delete int_rep where zlsch p_zlsch.
elseif p_bankl ' ' and p_zlsch = ' '.
delete int_rep where bankl p_bankl.
endif.
endform. " VALIDATE
check this weblog.....
/people/dj.adams/blog/2003/11/13/food-for-thought-ldbs-and-abap-objects
Also , check the following link too.
http://www.datamanagementgroup.com/Resources/Articles/Article_1005_2.asp
Regards,
Harish

How to keep the field open for input with error message in report program

Hi,
Need a help in solving the below issue.
"How to keep the field open for input with error message in report program"
Regards,
C.Shasiraj.

Hi...
you have to use the event:
AT SELECTION-SCREEN ON <FIELD> EVENT.
u have to give an error message in this event.
Consider the following Example:
PARAMETERS : NUMBER TYPE I.
AT SELECTION-SCREEN ON NUMBER.
IF NUMBER = 10.
MESSAGE 'Number vakue is 10' TYPE 'E'.
ENDIF.
START-OF-SELECTION.
WRITE NUMBER.

in this if u give the value of number = 10, it will not proceed further, if u give some other value other than 10 you will proceed further...
Execute this program once u will understand....
also Consider the following links :
Regarding events:
http://help.sap.com/saphelp_erp2005vp/helpdata/en/79/34a237d9b511d1950e0000e8353423/frameset.htm
http://help.sap.com/saphelp_erp2005vp/helpdata/en/79/34a23ad9b511d1950e0000e8353423/frameset.htm
Regarding messages:
http://help.sap.com/saphelp_erp2005vp/helpdata/en/c5/aa575426ad11d2954d0000e8353423/frameset.htm
http://help.sap.com/saphelp_erp2005vp/helpdata/en/c5/aa575426ad11d2954d0000e8353423/frameset.htm
This is very useful.......
Reward points if useful....
Suresh....

I need Functional Specification in Reports and Scripts to Practice

hi
i am practicing ABAP,
I need Functional Specification in Reports and Scripts to Practice
please any one give me.
thanks in advance.
bye

I am not sure what you are requesting will be of any help for you, as functional/technical specifications are specific for each implementation and might be dependent on the configuration on that system.
If you are on IDES try to look through the sample programs provided by SAP and see if you can implement your own version of the those.
hith
Sunil Achyut

Need func/tech specification with report program

Similar Messages

Maybe you are looking for