Custom Function Module for the New Process Codes

I want to distribute the custom table data . For that i have written the program using MASTER_IDOC_DISTRIBUTE. I have created the custom message & idoc types along with their assignments.
I got struck up at the process code. I have to assign the function module for that process code. Can anyone kindly help me in writting the code at that function module ?

Hi Friends,
My requirement is , i need to transfer the table records. For that i have created the Message/Idoc Types and also created the Partner profile and the Distribution model view .....all alll i have done.
My doubt is , in the we20, at the outbound parameters , i can give the Message/Idoc types that i have created. Ok thats fine
But at the inbound parameters, i have to give the inbound process code. So i have created the Inbound process code. As we know that for every process code a function module is attached, now i have to create the function module which posts the records in receiver side.
so 1. Does the Function module need to be RFC Enabled ?
2. Do we need to create Object type in SWO1 once i
create and release the function module ?

Similar Messages

How to create a custom function module with the records in SAP R/3?

Hi All,
How to create a custom function module with the records in SAP R/3? Using RFC Adapter I have to fetch the custom function module records.
Regards
Sara

Hi
goto se37...here u need to create a function group... then u need to create a function module. inside assign import/export parameters. assign tables/exceptions. activate the same. now write ur code within the function module
http://help.sap.com/saphelp_nw04/helpdata/en/9f/db98fc35c111d1829f0000e829fbfe/content.htm
Look at the below SAP HELP links, These links will show you the way to create a Function Module
http://help.sap.com/saphelp_nw04/helpdata/en/26/64f623fa8911d386e70000e82011b8/content.htm
http://help.sap.com/saphelp_nw04/helpdata/en/9f/db98fc35c111d1829f0000e829fbfe/content.htm

Function modules for the following

Hi,
I want to know the function modules for the following purposes.
1) Check whether a date is valid or not
2) Calculate the no of days between two dates.
Expecting an early response.
Thanks n Regards,
Amit

Hi,
PARAMETERS: p_list LIKE t009b-bumon AS LISTBOX
 VISIBLE LENGTH 11 OBLIGATORY ,
 p_list1 LIKE t009b-bdatj OBLIGATORY.
SELECTION-SCREEN POSITION POS_HIGH.
PARAMETERS: p_list2 LIKE t009b-bumon AS LISTBOX
 VISIBLE LENGTH 11 OBLIGATORY,
 p_list3 LIKE t009b-bdatj OBLIGATORY.
Calling Function Module for calculating no of days between the
selected period
 CALL FUNCTION 'NUMBER_OF_DAYS_PER_MONTH_GET'
 EXPORTING
 par_month = p_list
 par_year = p_list1
 IMPORTING
 par_days = ws_n_days.
 CALL FUNCTION 'NUMBER_OF_DAYS_PER_MONTH_GET'
 EXPORTING
 par_month = p_list2
 par_year = p_list3
 IMPORTING
 par_days = ws_n_days1.
For Concatenating the month and year into the date format
 CONCATENATE p_list1 p_list ws_i INTO ws_c_date1.
 CONCATENATE p_list3 p_list2 ws_n_days1 INTO ws_c_date2.
date = ws_c_date1 - ws_c_date2.
In the above sample code the selection screen has month and year as input.
Also check this link
http://www.sapdevelopment.co.uk/tips/date/datehome.htm
Check FM
RP_CALC_DATE_IN_INTERVAL Add/subtract years/months/days from a date
SD_DATETIME_DIFFERENCE Give the difference in Days and Time for 2 dates
Also for checking valid date:
U can specify the date field as
Select-options: s_date like likp-date(similar to ur requirement)
This itself ceck for the valid date no seperate validation needed.
Thanks & Regards,
Judith.

Any BAPI/Function Module for adding new record with dates in PA0027

Hi all,
I am tryig to find is there any BAPI/Function module for updating new record with Start Date and End date for specified Personal Number in PA0027 Table.
In PA0027 table i will be passing start date and end date for selected personal number, it needs to add new record with this details in the table checking the condition that this start date and end dates should not be between any of of start date and end dates for the specified personal number.
thanks for ur time.
Murali

Hi Raj/Suresh thanks for ur answers.
but i am having a problem,i gave this values.
INFTY -
 0027
NUMBER -
 00000010
SUBTYPE -
 010
OBJECTID
LOCKINDICATOR
VALIDITYEND -
 03/12/2006
VALIDITYBEGIN -
 03/01/2006
RECORDNUMBER -
 000
RECORD -
 P0027
OPERATION -
 CHK
TCLAS -
 A
DIALOG_MODE -
 0
NOCOMMIT -
 Y
VIEW_IDENTIFIER
SECONDARY_RECORD
i am getting short dump saying that
The source field is too short.
The current program, "SAPLHRMM", tried to assign a field to a field symbo
However, the field is shorter than the type of the field symbol, which
is not allowed.
The statement in question is in the form ASSIGN f TO <fs> CASTING or
ASSIGN f TO <fs> with a field symbol that was created using the
STRUCTURE addition.
I tried operation - Chage,Create (same thing for all inputs)
is this correct funtion moduel for my requirment?
what ever i am passing the start and end dates this should check in the table records with this personal number and if this start date and end dates are not between of any start and end dates then it should add new record with this dates.
Thanks for ur time.
Murali.

Function module for the Inbound Delivery

Dear ABAPers,
        I have created the Inbound Delivery in VL01N Transaction.I want to create the Post goods issue for the Delivery number.What is the Function module for the Post goods issue for the Delivery number and what all the Parameter needs to be passed.
Thanks & Regards,
Ashok.

Hi,
Try this code...
PARAMETERS: p_vbeln LIKE likp-vbeln OBLIGATORY.
DATA:    l_vbkok_wa   TYPE vbkok,
         l_i_prott    TYPE STANDARD TABLE OF prott,
         l_pgi_status TYPE xfeld,
         c_check      TYPE c VALUE 'X'.
l_vbkok_wa-vbeln_vl = p_vbeln.
l_vbkok_wa-vbtyp_vl = 'T'.
l_vbkok_wa-wabuc    = c_check.
Do PGI
CALL FUNCTION 'WS_DELIVERY_UPDATE'
EXPORTING
    vbkok_wa                  = l_vbkok_wa
    commit                    = c_check
    delivery                  = l_vbkok_wa-vbeln_vl
IMPORTING
    ef_error_in_goods_issue_0 = l_pgi_status
TABLES
    prot                      = l_i_prott.
IF l_pgi_status IS NOT INITIAL.
WRITE:/ 'PGI Failure : ', p_vbeln.
ELSE.
WRITE:/ 'PGI Success : ', p_vbeln.
CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
    EXPORTING
      wait = c_check.
ENDIF.
Regards
Meenakshi

How to set the column order of a sealed column in a custom Content Type for the new item form NewDocSet.aspx?

Dear SharePoint Developers,
Please help.
I need to know How to set the column order of a sealed column in a custom Content Type for the new item form NewDocSet.aspx?
I think this is a "sealed column", whatever that is, which is shown in SPD 2013 as a column of content type "document, folder, MyCustomContentType".
I know when I set the column order in my custom Content Type settings page, it is correct.
But, when I load the NewDocSet.aspx page, the column order that I set in the settings page is NOT used for this "sealed column" which is bad.
Can you help?
Please advise.
Thanks.
Mark Kamoski
-- Mark Kamoski

Hi,
According to your post, my understanding is that you want to set the column order of a sealed column in a custom Content Type for the new item form NewDocSet.aspx.
Per my knowledge, if you have Content Type management enabled for the list or library (if you see a list of content type with the option to add more), the display order of columns is set for each content type.
Drill down into one of them and you'll see the option under the list of columns for that content type.
To apply the column order in the NewDocSet.aspx page, you need to:
Select Site Settings, under Site Collection Administration, click Content type publishing. In the Refresh All Published
Content Types section, choose Refresh all published content types on next
update.
Run two timer jobs(Content Type Hub, Content Type Subscriber) in central admin(Central Administration--> Monitoring--> Review timer jobs).
More information:
http://sharepoint.stackexchange.com/questions/95028/content-types-not-refreshing-on-sp-online
Best Regards,
Linda Li
Linda Li
TechNet Community Support

Function module for the transcation CS02(i.e) BOM

Hi All,
I want the function module for the transction CS02.
Actually I need the details of BOM for any material.
Please help....Its a urgent requirement.
Thanks in advance

Hi,
You can also try with MGW1_CHANGE_BOM and CS_CL_S_BOM_CHANGE
Regards,
Ram
Message was edited by:
Ram Mohan Naidu Thammineni

Rfc enabled function module for the updating the database table

Hi,
I need one rfc enabled function module for the updating the database table from the legacy system.currently i am using the rfc_read_table to read the database table.similarly i need for the update.

Hi
I believe you need to create one by yourself
Max

ALE custom function module for IDOC_INPUT_COSTCENTER

We are setting up an ALE to update cost centers in our HCM system from our ECC system. In conjunction with the cost center update I need to convert the company code (it's not straight-forward enough to use a conversion rule) so I have created a custom copy of IDOC_INPUT_COSTCENTER and included my conversion logic there.
I have done all of the necessary configuration steps associated with the custom function module; created message type ZCOSMAS, process code ZCOSM, etc. When I execute BD16 it is passing the correct message type and process code to the HCM system but I am getting a status 51 'Function module not allowed: IDOC_INPUT_COSTCENTER'.
I must be missing some piece of configuration in my HCM system that should trigger Z_IDOC_INPUT_COSTCENTER rather than IDOC_INPUT_COSTCENTER. Can anyone tell me what I have missed?
Thanks in advance for any assistance you can provide.
Regards,
Pat
Edited by: Patricia Holland on Dec 22, 2011 2:38 PM

I thought that I had found found my problem in the model view but I was mistaken. I am still getting status 51 'Function module not allowed: IDOC_INPUT_COSTCENTER'.
It should be using Z_IDOC_INPUT_COSTCENTER.
Edited by: Patricia Holland on Dec 22, 2011 3:00 PM

BAPI Function Module for SCM APO Trans code /SAPAPO/AC42

Hi,
   Is there any BAPI Function Modules for SCM APO Tcode /SAPAPO/AC42.
   This BAPI FM should return the column values "Remaining Prod Alloc" and "Incoming Order Quantity" when we give
   below details as inputs for the Tcode /SAPAPO/AC42
        Product Allocation Group
        Product
        Allocation Procedure
        prod Alloc step
        Product Alloc Object (Characteristics of Product Alloc Group)
        Plant (Characteristics of Product Alloc Group)
        Customer Group 5 (Characteristics of Product Alloc Group)
    Reward points if helpful.
Thanks,
Mich

Hi,
You should be able to get the information using the standard BAPI (Assuming you are using SCM5.0) BAPI_APOPAL_INSERT in the transaction BAPI.
ProductAllocationAPO.DataInsert
Interface to Import Product Allocation Data Functionality
This method is used to adopt data from OLTP systems for product allocation in the global availability check.
You can do the following using the method:
Adopt new data
You can adopt new characteristics combinations or new time series. Newly created characteristics combinations have the status Active and are therefore included in the product allocation check.
Change existing data
You can overwrite existing data if you have set the interface parameter ALLOW_UPDATE. You can set the status of existing characteristics combinations to Active if you set the interface parameter UPDATE_STATUS. If the characteristics combination does not exist, the system creates it.
The product allocation quantity is overwritten for existing time series. If you also want to change the incoming orders quantity, you must set the interface parameter UPDATE_INCOMING_ORDER_QTY. If the time series does not exist, the system creates it.
Prerequisite
To be able to use this method, you must have made all the Customizing settings for product allocation. For more information, see the Implementation Guide (IMG) for SAP APO under Global Available-to-Promise -> Product Allocation.
Regards
Vinod

How could we assign customized function module to the object

Hi Experts,
How could we assign z made function module to the object type.
for instance, i have prepared one z function module and want to assign segment builder.
Please help in this regard
Thanks
Mahesh Babu

Hi Thiru,
Standard Transaction Codes, have their own Function Modules for generating Outbound/Indbound Idocs. Where these Function Modules will be configured to a particular Process Codes.
For E.g for PO's
Process code : ME10 - IDOC_OUTPUT_ORDERS - for creation
In case if its a Z Function Module, It depends on the case how you use IDOC types. either directly through Z Program or through Inbound/Outbound Process codes with respective Function modules.
Regards,
Anbalagan

A FUNCTION MODULE FOR THE HR MODULE FOR PAYROLL OF EMPLOYEES

hi,
i want some a function module or code where i need to get the payroll details like the basic pay ,hra,special allowance,medical allowance,other allowance of an employee on the monthly basis.
the data that i have on ot os not on the basis of months it contains datd of more than one month.like the baisc pay of an employee is given on a radom day basis of more than one month.
but i need to bifercatethe data on monthly basis.
waiting for the reply.
thanks and regards

Hi,
Use the fun module
RP_FILL_WAGE_TYPE_TABLE_EXT
which willget PA0008 results.
but to get the real payroll results you have to import data from clusters by writing the program. Data will be fetch from RT and CRT internal tables based on the Wage Types
see the sample code:
report zporgr0100
 line-size 252
 line-count 60(1)
 no standard page heading
 message-id zndc.
Database Tables & Infotypes
tables: pcl1, " HR Cluster1
 pcl2, " HR Cluster1
 pa0003, " Master data - Payroll Status
 cskt, " Cost Center Texts
 t528t, " Positions Texts
 t513s, " Job Titles
 pernr, " Logical PNP
 t001p, " Personnel Subarea
 t500p, " Personnel Area
 t501, " Employee Group
 t503k, " Employee Subgroup
 csks. " Cost Center
infotypes:0000,0001.
*include rpclst00.
include rpc2rx00.
include rpc2rxx0.
include rpc2cd00.
*include rpc2ps00.
*include rpc2pt00.
*include rpcfvp00.
*include rpcfdc10.
*include rpcfdc00.
include rpppxd00.
include rpppxd10.
Declaration of Internal Tables
Internal Table for Output Data
data: begin of rep_tab occurs 0,
 kostl like pa0001-kostl, " Cost Center
 pernr like pa0001-pernr, " Personal Number
 ename like pa0001-ename, " Employee Name
 ctext like cskt-ltext, " Cost Center Text
 ptext like t528t-plstx, " Position Text
 ot1 type p decimals 2, " Jan OT Amount
 ot2 type p decimals 2, " Feb OT Amount
 ot3 type p decimals 2, " Mar OT Amount
 ot4 type p decimals 2, " Apr OT Amount
 ot5 type p decimals 2, " May OT Amount
 ot6 type p decimals 2, " Jun OT Amount
 ot7 type p decimals 2, " Jul OT Amount
 ot8 type p decimals 2, " Aug OT Amount
 ot9 type p decimals 2, " Sep OT Amount
 ot10 type p decimals 2, " Oct OT Amount
 ot11 type p decimals 2, " Nov OT Amount
 ot12 type p decimals 2, " Dec OT Amount
 ott type p decimals 2, " Total OT Amount
 end of rep_tab.
Declaration of Variables
data: v_mon(2) type n, " Month
 v_no type i, " Data Lines
 v_year(4) type c, " Year
 v_date like sy-datum, " Date
 v_date1 like sy-datum, " Date
 v_seqnr like pc261-seqnr. " Sequence No.
Declaration of Constants
data: c_type like hrp1001-otype value 'S', " Object Type
 c_kokrs like cskt-kokrs value '1000', " Controlling Area
 c_date1 like sy-datum value '18000101', " Date
 c_date2 like sy-datum value '99991231', " Date
 c_x type c value 'X', " Sign
 c_mon(2) type c value '01', " Month
 c_val1(2) type c value '31', " Date
 c_val2(2) type c value '12', " Month Type
 c_val like p0041-dar01 value '01', " Date Type
 c_lgart1 like p0008-lga01 value '0722', " Wage Type
 c_lgart2 like p0008-lga01 value '0723', " Wage Type
 c_1(2) type n value '01', " Month1
 c_2(2) type n value '02', " Month2
 c_3(2) type n value '03', " Month3
 c_4(2) type n value '04', " Month4
 c_5(2) type n value '05', " Month5
 c_6(2) type n value '06', " Month6
 c_7(2) type n value '07', " Month7
 c_8(2) type n value '08', " Month8
 c_9(2) type n value '09', " Month9
 c_10(2) type n value '10', " Month10
 c_11(2) type n value '11', " Month11
 c_12(2) type n value '12'. " Month12
Selection-screen
parameters:
p_year like pc2b0-pabrj obligatory. " Payroll Year
At selection-screen
at selection-screen.
Validate the Selection Screen fields
perform validate_screen.
Start-of-Selection
start-of-selection.
Selection of Period
perform get_period.
Get PERNR from LDB
get pernr.
Get the Master data from infotype 0001
perform get_master_data.
Top-of-page
top-of-page.
Write the Report and Column Headings
perform top_of_page.
End-of-Page
end-of-page.
write /1(252) sy-uline.
End-of-Selection
end-of-selection.
Display the Output Report.
perform display_report.
Form-Routines
*& Form validate_screen
Validation of selection Screen fields
form validate_screen.
Validation of Cost Center
clear csks.
if not pnpkostl[] is initial.
 select single kostl
 into csks-kostl
 from csks
 where kostl in pnpkostl.
 if sy-subrc <> 0.
 message e999 with 'Invalid Cost Center'(003).
 endif.
endif.
Validation of Personnel Number
clear pa0003.
if not pnppernr[] is initial.
 select pernr
 from pa0003 up to 1 rows
 into pa0003-pernr
 where pernr in pnppernr.
 endselect.
 if sy-subrc <> 0.
 message e999 with 'Incorrect Personal Number Entered'(002).
 endif.
endif.
Validation of Personnel Area
clear t500p.
if not pnpwerks[] is initial.
 select persa
 from t500p up to 1 rows
 into t500p-persa
 where persa in pnpwerks.
 endselect.
 if sy-subrc <> 0.
 message e999 with 'Incorrect Personnel Area Entered'(001).
 endif.
endif.
Validation of Personnel Sub Area
clear t001p.
if not pnpbtrtl[] is initial.
 select btrtl
 from t001p up to 1 rows
 into t001p-btrtl
 where btrtl in pnpbtrtl.
 endselect.
 if sy-subrc <> 0.
 message e999 with 'Incorrect Personnel Sub Area Entered'(037).
 endif.
endif.
Validation of Employee Group
clear t501.
if not pnppersg[] is initial.
 select persg
 from t501 up to 1 rows
 into t501-persg
 where persg in pnppersg.
 endselect.
 if sy-subrc <> 0.
 message e999 with 'Incorrect Employee Group Entered'(038).
 endif.
endif.
Validation of Employee Sub Group
clear t503k.
if not pnppersk[] is initial.
 select persk
 from t503k up to 1 rows
 into t503k-persk
 where persk in pnppersk.
 endselect.
 if sy-subrc <> 0.
 message e999 with 'Incorrect Employee Sub Group Entered'(039).
 endif.
endif.
endform. "validate_screen
*& Form get_period
Get the Correct Period based on Selection screen selection
form get_period.
clear: v_year,v_mon, v_date, v_date1.
v_year = sy-datum+0(4).
v_mon = sy-datum+4(2).
if pnptimr1 = c_x. " Current Date
 pnpbegda = sy-datum.
 pnpendda = sy-datum.
elseif pnptimr2 = c_x. " Current Month
 concatenate v_year v_mon c_val into v_date.
 concatenate v_year v_mon c_val1 into v_date1.
 pnpbegda = v_date.
 pnpendda = v_date1.
elseif pnptimr3 = c_x. " Current Year
 concatenate v_year c_val c_val into v_date.
 concatenate v_year c_val2 c_val1 into v_date1.
 pnpbegda = v_date.
 pnpendda = v_date1.
elseif pnptimr4 = c_x. " Upto Today
 pnpbegda = c_date1.
 pnpendda = sy-datum.
elseif pnptimr5 = c_x. " From Today
 pnpbegda = sy-datum.
 pnpendda = c_date2.
else.
 if ( pnpbegda is initial and pnpendda is initial ).
 pnpbegda = c_date1.
 pnpendda = c_date2.
 elseif pnpbegda is initial and not pnpendda is initial.
 pnpbegda = c_date1.
 pnpendda = pnpendda.
 elseif not ( pnpbegda is initial and pnpendda is initial ).
 pnpbegda = pnpbegda.
 pnpendda = pnpendda.
 endif.
endif.
endform. "get_period
*& Form get_master_data
Get the Master Data from Database Tables PA0001,0002,0003
form get_master_data.
Get data from Respective Infotypes
rp_provide_from_last p0001 space pnpbegda pnpendda.
if p0001-kostl in pnpkostl.
 rep_tab-kostl = p0001-kostl.
 rep_tab-pernr = p0001-pernr.
 rep_tab-ename = p0001-ename.
Get the Position Text
 clear t528t-plstx.
 select single plstx into t528t-plstx from t528t
 where plans = p0001-plans and
 otype = c_type and
 sprsl = sy-langu.
 if sy-subrc = 0.
 rep_tab-ptext = t528t-plstx.
 endif.
Get the Cost Center Text
 clear cskt-ltext.
 select single ltext into cskt-ltext from cskt
 where spras = sy-langu and
 kokrs = c_kokrs and
 kostl = p0001-kostl.
 if sy-subrc = 0.
 rep_tab-ctext = cskt-ltext.
 endif.
Get the Overtime Payment Data
 perform get_ot_data.
 rep_tab-ott = rep_tab-ot1 + rep_tab-ot2 + rep_tab-ot3 +
 rep_tab-ot4 + rep_tab-ot5 + rep_tab-ot6 +
 rep_tab-ot7 + rep_tab-ot8 + rep_tab-ot9 +
 rep_tab-ot10 + rep_tab-ot11 + rep_tab-ot12.
 append rep_tab.
 clear rep_tab.
endif.
sort rep_tab by kostl pernr.
delete rep_tab where kostl = ' '.
delete rep_tab where ott = 0.
endform. "get_master_data
*& Form get_ot_data
Get the Overtime Payment Data
form get_ot_data.
cd-key = pernr-pernr.
rp-imp-c2-cd.
sort rgdir by seqnr.
To get sequence number for the payroll period
loop at rgdir where void is initial
 and reversal is initial
 and outofseq is initial
 and srtza eq 'A'.
 if rgdir-fpper+0(4) = p_year.
To consider offcycle run data
 if not rgdir-ocrsn is initial.
 v_seqnr = rgdir-seqnr.
 exit.
 endif.
 v_seqnr = rgdir-seqnr.
 endif.
 if not v_seqnr is initial.
 perform import_rx.
 endif.
 perform process_wagetypes.
endloop.
endform. "get_ot_data
include rpppxm00.
*& Form Import_rx
Import the RX data from Clusters
form import_rx.
rx-key-pernr = cd-key-pernr.
rx-key-seqno = v_seqnr.
rp-init-buffer.
rp-imp-c2-rx.
endform. " Import_rx
*& Form Process_wagetypes
Calculate the Overtime Amount based on Wage types
form process_wagetypes.
loop at rt.
 if rt-lgart = c_lgart1 or rt-lgart = c_lgart2.
 if rgdir-fpper+0(4) = p_year.
 v_mon = rgdir-fpper+4(2).
 case v_mon .
 when c_1.
 rep_tab-ot1 = rep_tab-ot1 + rt-betrg.
 when c_2.
 rep_tab-ot2 = rep_tab-ot2 + rt-betrg.
 when c_3.
 rep_tab-ot3 = rep_tab-ot3 + rt-betrg.
 when c_4.
 rep_tab-ot4 = rep_tab-ot4 + rt-betrg.
 when c_5.
 rep_tab-ot5 = rep_tab-ot5 + rt-betrg.
 when c_6.
 rep_tab-ot6 = rep_tab-ot6 + rt-betrg.
 when c_7.
 rep_tab-ot7 = rep_tab-ot7 + rt-betrg.
 when c_8.
 rep_tab-ot8 = rep_tab-ot8 + rt-betrg.
 when c_9.
 rep_tab-ot9 = rep_tab-ot9 + rt-betrg.
 when c_10.
 rep_tab-ot10 = rep_tab-ot10 + rt-betrg.
 when c_11.
 rep_tab-ot11 = rep_tab-ot11 + rt-betrg.
 when c_12.
 rep_tab-ot12 = rep_tab-ot12 + rt-betrg.
 endcase.
 endif.
 endif.
endloop.
endform. "process_wagetypes
*& Form top_of_page
Write the Report and Column Headings
form top_of_page.
format color col_heading on.
write: /1(252) 'NATIONAL DRILLING COMPANY'(010) centered,
 /1(252) 'Overtime Payments Details'(011) centered.
format color off.
if pnptimr1 = c_x. " Current Date
 write: /2 'Period From :'(036), sy-datum, 'To:'(006), sy-datum.
elseif pnptimr2 = c_x. " Current Month
 write: /2 'Period From :'(036), v_date, 'To:'(006), v_date1.
elseif pnptimr3 = c_x. " Current Year
 write: /2 'Period From :'(036), v_date, 'To:'(006), v_date1.
elseif pnptimr4 = c_x. " Upto Today
 write: /2 'Period From :'(036), c_date1, 'To:'(006), sy-datum.
elseif pnptimr5 = c_x. " From Today
 write: /2 'Period From :'(036), sy-datum, 'To:'(006), c_date2.
else.
 if ( pnpbegda is initial and pnpendda is initial ).
 write: /2 'Period From :'(036), c_date1, 'To:'(006), c_date2.
 elseif pnpbegda is initial and not pnpendda is initial.
 write: /2 'Period From :'(036), c_date1, 'To:'(006), pnpendda.
 elseif not ( pnpbegda is initial and pnpendda is initial ).
 write: /2 'Period From :'(036), pnpbegda,
 'To:'(006), pnpendda.
 endif.
endif.
write: 219 'Report Run Date:'(018), sy-datum.
if not pnpkostl[] is initial.
 if pnpkostl-high is initial.
 write: /2 'Cost Center :'(004), pnpkostl-low,
 219 'Time :'(020), sy-uzeit.
 else.
 write: /2 'Cost Center From:'(005), pnpkostl-low+7(3),
 'To:'(006), pnpkostl-high,
 219 'Time :'(020), sy-uzeit.
 endif.
else.
 write: /219 'Time :'(020), sy-uzeit.
endif.
if not pnppernr[] is initial.
 if pnppernr-high is initial.
 write: /2 'Personal Number :'(007), pnppernr-low,
 219 'User :'(021), sy-uname.
 else.
 write: /2 'Personal No.From:'(008), pnppernr-low,
 'To:'(006), pnppernr-high,
 219 'User :'(021), sy-uname.
 endif.
else.
 write: /219 'User :'(021), sy-uname.
endif.
write: /219 'Page No :'(022), sy-pagno.
format color col_heading.
write /1(252) sy-uline.
write:/1 sy-vline, 10 sy-vline,
 41 sy-vline,
 67 sy-vline, 68(167) 'Overtime Payments(Dirhams)'(013) centered,
 235 sy-vline,252 sy-vline.
format color col_heading.
write:/1 sy-vline, 2(8) 'Emp #'(019) centered,
 10 sy-vline, 11(30) 'Employee Name'(012) centered,
 41 sy-vline, 42(25) 'Position'(014) centered,
 67 sy-vline, 68(167) sy-uline,
 235 sy-vline,236(16) 'Total'(017) centered,
 252 sy-vline.
write:/1 sy-vline, 10 sy-vline,
 41 sy-vline,
 67 sy-vline, 68(13) 'JANUARY'(024) centered,
 81 sy-vline, 82(13) 'FEBRUARY'(025) centered,
 95 sy-vline, 96(13) 'MARCH'(026) centered,
 109 sy-vline,110(13) 'APRIL'(027) centered,
 123 sy-vline,124(13) 'MAY'(028) centered,
 137 sy-vline,138(13) 'JUNE'(029) centered,
 151 sy-vline,152(13) 'JULY'(030) centered,
 165 sy-vline,166(13) 'AUGUST'(031) centered,
 179 sy-vline,180(13) 'SEPTEMBER'(032) centered,
 193 sy-vline,194(13) 'OCTOBER'(033) centered,
 207 sy-vline,208(13) 'NOVEMBER'(034) centered,
 221 sy-vline,222(13) 'DECEMBER'(035) centered,
 235 sy-vline,252 sy-vline.
format color off.
write /1(252) sy-uline.
endform. "top_of_page
*& Form Display_report
Write the Report Output
form display_report.
clear v_no.
describe table rep_tab lines v_no.
if v_no = 0.
 message i999 with
 'No Data found for the entered Selection'(015).
endif.
loop at rep_tab.
 format color 3.
 at new kostl.
 read table rep_tab index sy-tabix.
 write:/1 sy-vline, 2(12) 'Cost Center:'(009),
 14(10) rep_tab-kostl,
 25(30) rep_tab-ctext,
 252 sy-vline.
 format color off.
 write /1(252) sy-uline.
 endat.
 format color col_normal.
 write: /1 sy-vline, 2(8) rep_tab-pernr,
 10 sy-vline, 11(30) rep_tab-ename,
 41 sy-vline, 42(25) rep_tab-ptext,
 67 sy-vline, 68(13) rep_tab-ot1 no-zero,
 81 sy-vline, 82(13) rep_tab-ot2 no-zero,
 95 sy-vline, 96(13) rep_tab-ot3 no-zero,
 109 sy-vline,110(13) rep_tab-ot4 no-zero,
 123 sy-vline,124(13) rep_tab-ot5 no-zero,
 137 sy-vline,138(13) rep_tab-ot6 no-zero,
 151 sy-vline,152(13) rep_tab-ot7 no-zero,
 165 sy-vline,166(13) rep_tab-ot8 no-zero,
 179 sy-vline,180(13) rep_tab-ot9 no-zero,
 193 sy-vline,194(13) rep_tab-ot10 no-zero,
 207 sy-vline,208(13) rep_tab-ot11 no-zero,
 221 sy-vline,222(13) rep_tab-ot12 no-zero,
 235 sy-vline,236(16) rep_tab-ott no-zero,
 252 sy-vline.
 at end of kostl.
 write /1(252) sy-uline.
 endat.
 format color off.
 at last.
 sum.
 format color 1.
 write: /1 sy-vline,
 10 sy-vline, 11(30) 'Total'(017) centered,
 41 sy-vline,
 67 sy-vline, 68(13) rep_tab-ot1 no-zero,
 81 sy-vline, 82(13) rep_tab-ot2 no-zero,
 95 sy-vline, 96(13) rep_tab-ot3 no-zero,
 109 sy-vline,110(13) rep_tab-ot4 no-zero,
 123 sy-vline,124(13) rep_tab-ot5 no-zero,
 137 sy-vline,138(13) rep_tab-ot6 no-zero,
 151 sy-vline,152(13) rep_tab-ot7 no-zero,
 165 sy-vline,166(13) rep_tab-ot8 no-zero,
 179 sy-vline,180(13) rep_tab-ot9 no-zero,
 193 sy-vline,194(13) rep_tab-ot10 no-zero,
 207 sy-vline,208(13) rep_tab-ot11 no-zero,
 221 sy-vline,222(13) rep_tab-ot12 no-zero,
 235 sy-vline,236(16) rep_tab-ott no-zero,
 252 sy-vline.
 write /1(252) sy-uline.
 endat.
 format color off.
endloop.
endform. "display_report
reward points if useful
regards,
Anji

Need function modules for the following...

Hello experts,
Is there an function module that I can use for:
1. get the last date for a given year
2. get the exchange rate for a given document number in a span of 5 years -
for example, I need to get the exchange rate of doc. number 0000000123
for the year 2000, 2001, 2002, 2003, 2004 and 2005(maximum of 5 years)
Help would be greatly appreciated.
Again, thank you guys and take care!

Hi,
To use CALCULATE_EXCHANGE_RATE_N, you just have to pass the required parameters like foreign amount/currency and local amount/currency, instead you can query the table TCURR for the same data, remember to convert the 'DATE' to internal format before sending it in to the fm/table, you can refer the following code, this might help,
WRITE V_date TO LV_DATUM USING EDIT MASK '__.__.____'.
     CALL FUNCTION 'CONVERSION_EXIT_INVDT_INPUT'
       EXPORTING
         INPUT         = LV_DATUM
      IMPORTING
        OUTPUT        = LV_DATUM.
Retrieve the Exchange rate from Custom table for the Exchange
        select ukurs from tcurr
        into tcurr-ukurs
        up to 1 rows
        where kurst = 'M'
        and   fcurr = komk-waerk
        and   tcurr = komk-HWAER
        and   gdatu >= LV_DATUM.
        endselect.
Rgds,

Bapi function module for the transaction VBO2 in 4.6 version

can u please tell me the how to proceed for the uploading rebate agreement data into transaction VBO2(change rebate agreement) USING the which bapi function module in 4.6c version.

I am also looking for the same requirment . could you please let me know if you find any BAPI.

BAPI/FUNCTION module for the configure varient data(MRP3 -MM02)

Hi all,
I have a requirenent to send the configure varient data(MRP3 -MM02) to another system.Please guide me how it can be created in receving system.ie please provide a function module or BAPI for the same.
Thanks.
Edited by: sanu debu on May 11, 2009 11:01 AM

I am also looking for the same requirment . could you please let me know if you find any BAPI.

Custom Function Module for the New Process Codes

Similar Messages

Maybe you are looking for