Not able to generate the absence quota WITHOUT Time Evaluation
Hi ALL,
When i try to generate the absences quota for employees without time evaluation using program RPTQTA00, I am not able to generate it.
And i am getting "E You have not selected any generation rules".
Kindly if any one come across this issue please throw some light and do a favour.
thanks all
Hi,
Pls check the follwing tables if u have made correct assignments
v_t559l
v_554s
v_556c
Check Quoma Feature
Check what status u selected in IT7
Check if ur using correct Schema
If ur Using RPTQTA00 then use No Generation,and if ur using PT60/RPTIME00 change it to Increase.
Check if u have maintained correct quota groupings.
Revert back if its not solved
Regards
Similar Messages
-
Absence Quota In Time Evaluation
Hi,
I am working on Absences,i done the configaration part for abxebnce quota and i excute the report RPTQTA00.Its working fine for all Absence QTs.
But while i am running the PT60 its displaying only one Absence QT. I need to see the all the Absences QTs for that Ee.
Can U any body help me Hw to See the all Abs. QTs of that Ee.
Thanks In Advance
SwarupaHi
Executing RPTQTA00 and Time Evaluation are two different concept of Quota Generation. You have to executed RPTQTA00 before than Time Evaluation for Ee then you can see all the Absence quotas via time evaluation.
Once you execute time evaluation you can do the following :
click any of the date then click Manage Time Account > Quota > ABWKONTI.
In ABWKONTI you will see those quotas, which you generated via RPTQTA00 (but depends upon the Selection rule you've customized in V_T559L) and the till date Quota Generation for those Absences for which you put the button on Increase.
e.g., Ee DOJ 01.01.2008, you run RPTQTA00 on 01.01.2008 and CL and SL gets generated as follows :
CL Quota - 01.01.2008 to 31.12.2008
SL Quota - 01.01.2008 to 31.12.2008
After this you are executing Time Evaluation and you client execute time evaluation on daily basis. so when you run time evaluation on 01.01.2008 system will check the increase button in customization of Time Evaluation and credited the Quota depending upon the customization u've did in V_T559L (like you want to accrue Ee quota on a daily basis or calendar year.) so system reflects everyday quota for such absences in the log you can view these daily generated quotas in various sections of Time Evaluation.
hope it suffice
Regards
Pradeep -
How to Update Absence Quota with Time Evaluation
Dear Friends,
I would like to know how do we update absence quota within time evaluation. Currently i'm using UPDTQAXX, it works but when i search this forum everybody was using this simple code:
HRS=something
ADDDBxxxx
and the quota is updated. I just dont get it, with adddb its only update the daily balance table, how does that enable us to updated the 2006 infotype? Many ThanksADDDBxxxx adds the value of the number of hours field to the specified time type in the table of day balances (TES), it does not update the quota.
You can use function QUOTA to accrue absence entitlements periodically based on this customizing: Personnel Time Management>Time Data Recording and Administration>Managing Time
Accounts Using Attendance/Absence Quotas>Calculating Absence Entitlements>Rules for
Generating Absence Quotas>Define Generation Rules for Quota Selection.
You can use a time type to prorate that accrual -
Hi ALL,
I have a problem in transaction CV02N. Actually i am an ABAPER, but i need some help of PP Guys.
The requirement is as follows:-
The client says that they have uploaded a '.PS' file into the transaction cv02n.Here in the first screen they give doc, doc type,doc part, doc version. when clicked on enter it take us to second screen , where they enter the '.PS' file path under 'originals' , in the tab 'document data'. Later they goto transaction CO01 and release an order at the operation level and save it.
Then it generates a spool. Now if we goto SP01 and check the spool with the number generated during saving CO01. We will be getting the scripts and the '.PS' file separately in a different spool in the production system in 4.6. But in my new upgraded system(6.0), i am not able to view the '.PS' file in the output spool.It seems to me that, it is not getting generated. Pls suggest me, as it is a very urgent issue. Need to close it by today at 1.00pm.
Regards,
Manasa.Sdear friend,
there would be several reasons for that.
first, check out your Output Device (your user in SU01) - goto to tab Defaults and look at Spool Control.
did you tick the 'output immediately' checkbox?
Fix it if nessesary. Just in case run SPAD to check out your device.
second, check out the 'output' config for Document Management (because you use t-code CV02N).
also make sure that relevant output condition exists.
third, ask someone to do the same - another user with another output device. does he/she have the same problem?
and the last, try to find out the functional guy or documentation.
also ask your basis guy regarding the lost transports or any other issues...
do not worry, life is good.
good luck! -
IN PT60 I am not able to find the absece quota
HI
I have configured absece quoata and I tried to run the PT60. its showing successfull personnel number but I am not able to seethe quota in log.
pls suggest on this.
Regards
SureshHI
thanks for quick replay
If quota not at all generated means then how should report will get. even i have checked here also. but there is not data.
I have done whole configuration i have checked everything is right as per me. but i dont where i made mistake i have not been getting quota in log.
I am using TM04 schema, i hv not done any changes to schema.
thisi have been testing in 4.6c.
pls suggest
Regards
Suresh -
How to change generation date of absence quota with Time Evaluation methos
Hi all,
IS there any way to change generation date when TIme Evulation generate absence quota?
Currently system will use last day of month as generation date, Validity and Duduction period set correctly.
Base entitlement relate with Monthly,
Accrual period setting in selection rule is Month
Example: system generation absence quota in PT60 with 1 day Normal Leave Entry date 31.06.2011
Valid from 01.06.2011 to 31.12.2012 ; Deduction from 01.06.2011 to 29.02.2012 (extras 2 month)
Can we change ENtry date to 28.06.2011 , because in the last day of month they did not yet have quota but they need it for advance (approver from his/her Manager) ...
Thanks,
R1VHi,
The best way i think is to have negative deductions for the quota.
This time as it is on 28 you want to push it to 2 days earlier and later if there is another person with a day as 25, you need to again change the generation date isnt it.
Instead, if you have the negative deductions, you need not worry about the generation date.
Hope this helps.
Cheers,
LG -
Not able to generate UCCX Historical Report of one agent
Dear All,
I am not able to generate the UCCX Historical report of the agent as the Historical reports of the agent is generating upto the Feburary 2013 but we are not able to view the Historical Report of March 2013 and onwards, the realtime reports are generating and the agent name is added to the Active Directory only once, help is required in this regard.
Best Regards,
Durraze KhanRajesh,
Put a breakpoint and try to debug the report step by step.
You will findout the reason very easily.
Whenever you have a select and are trying to append into an internal table, keep checking your internal table if it is been populated with the correct records.
This way, you will findout the cause and can correct is accordingly.
Thanks,
Suresh Ganti -
Not able to generate "Audit Log Tampering report"
Hi,
I am not able to generate the Audit Log tampering report in version 8.0 of Sun Identity Manager. I am encountering the following message when I am trying to generate the report.
"Tamper-resistant logging is disabled. Unable to verify the integrity of the audit logs." I did not find any option to set the tamper-resistant logging feature in version 8.0 of Sun Idm.
In version 6 there is an option to set the tamper resistant audit log box by "Enabling tamper-resistant audit logs box" ( Please refer: http://docs.sun.com/source/819-4483/auditing.html)
The generated report (in version 6) did not show any data inspite of me deleting a row in the audit log.
I hope you can help me with this problem. Thanks in advance
Regards,
Sharon1) It shouldnt matter, but try
destype=file (FILE small case)
2) In builder, in property pallette see if you have given any "initial value" for these parameters (especially desname, destype etc) ?
3) Do not give "batch=yes" in command line and try
Thanks
Ratheesh -
Not able to see the generated chart image
I'm using Oracle 6i Reports and Oracle 9i dtabase to generate a report with graphs embedded. I'm able to view the tables populated with exact values but cannot see the graph. The chart image and html generated are placed correctly in the directory pointed to cahedir, but yet I'm not able to see the image. Can you tell me how to congifure the Html output from the server. The server is introducing a base tag pointing to a different location. Can I change the location.
HI
It is still not showing image. Messsage coming is "Right Click Here to Download Pictures. To help protect your privacy. Outlook prevented automatic download to this picture from the internet."
Thanks & Regards,
Ravi Grover -
I am not able to access the internet without wi-fi after updated to iOS 7.0.4. Please help!
Hello sweetracy,
The following article can help restore and stabilize your cellular data connection.
iPhone: Troubleshooting a cellular data connection
http://support.apple.com/kb/TS3780
Cheers,
Allen -
Hi is it possible to see the photos on laptop from iphone without installing itune software. I am connection my iphone with laptop but not able to see the phots pls guide me how to do that?
You can import pics taken with the iphone to your computer withour itunes. Itunes has nothing to do with importing pics taken with the iphone.
-
I has a problem and I am not able to solve that when I use sound effect it is showed only headphone even I did not installing the headphone I has a problem and I am not able to solve that I am. Not able to hear the sound without headphone please help guys
Sounds to me like a hardware issue or maybe something is stuck in the headphone jack. When you plug in headphones, the jack in the iPad is switched to play only through the headphones and not the iPad's speakers. Sounds like either the jack is faulty or there is something stuck in the headphone jack. Get a flashlight & look inside the jack for anything that looks like it doesn't belong in there.
Regardless, I'd take it in to an Apple Store if you have one nearby to have it checked.
EDIT: "Ocean20" had an excellent suggestion above. While doing that, you may also want to rotate/twist the plug in the jack back & forth a few times as well. Dirty contacts can often times be cleared by doing this. -
Can generate the TKPROF file without the SQL is not running completed ?
Dear all:
I want to generate the TKPROF file from the trace file, Can generate the TKPROF file without the SQL is not running completed ? Is it the TKPROF file can be used? because the report is too large. My environment is ORACLE 11.5.9
Regards
TerryWhen you can wait for completion, then that's the easiest route.
When you can't wait, you'll have to use a different method. I suggest to watch the v$ views for what your session is doing. Views like v$session, v$session_wait, v$sess_io and the views starting with v$sql. Also worth mentioning is Tanel Poder's site, which contains some very useful scripts for diagnosing performance problems this way: http://tech.e2sn.com/.
Regards,
Rob. -
Not Able to Generate Out of the Report by adding the new 2 fields
Hi,
I'm Very new to ABAP. I have created one report. after 2 new fields added they are EKNAM and EKGRP.
The Thing is the remaining fields are displaying in the output. The Newly added fields are not displaying the out. I was able to add this 2 fields in the head of the report. But issue is not able to get the data on these 2 fields.
Please see the below program and any one please help me out to display the data in this report for the fields eknam and ekgrp.
TABLES: eban,
lfa1,
ekko,
t024,
v_username.
DATA: BEGIN OF i_req_items OCCURS 10,
ernam LIKE eban-ernam, "Created by
lifnr LIKE eban-lifnr, "Desired vendor
ebeln LIKE eban-ebeln, "PO Number
ebelp LIKE eban-ebelp, "PO Item
eknam LIKE t024-eknam, "Pur.Grp Name
ekgrp LIKE t024-ekgrp, "Pur.Grp Number
flief LIKE eban-flief, "Fixed vendor
name1 LIKE lfa1-name1, "Vendor name
badat LIKE eban-badat, "Creation date
erdat LIKE eban-erdat, "Change date
banfn LIKE eban-banfn, "Requisition no.
bnfpo LIKE eban-bnfpo, "Req. item no.
bsart LIKE eban-bsart, "Document type
knttp LIKE eban-knttp, "Acct.assgmt category
txz01 LIKE eban-txz01, "PO item description
menge LIKE eban-menge, "Quantity
preis LIKE eban-preis, "Price
peinh LIKE eban-peinh, "Price unit
value(14) TYPE p DECIMALS 2, "Item Value
END OF i_req_items.
DATA: BEGIN OF i_reqs OCCURS 10,
ernam LIKE eban-ernam, "Created by
persn LIKE usr21-persnumber, "Person number
uname LIKE adrp-name_text, "User name
lifnr LIKE eban-lifnr, "Vendor
name1 LIKE lfa1-name1, "Vendor name
badat LIKE eban-badat, "Creation date
banfn LIKE eban-banfn, "Requisition no.
bnfpo LIKE eban-bnfpo, "Req. item no.
bsart LIKE eban-bsart, "Document type
knttp LIKE eban-knttp, "Acct.assgmt category
txz01 LIKE eban-txz01, "PO item description
eknam like t024-eknam, "Purchase Grp Name
ekgrp like t024-ekgrp, "Purchase Grp Number
value(14) TYPE p DECIMALS 2, "Item Value
END OF i_reqs.
DATA: BEGIN OF i_req_keys OCCURS 0,
ernam LIKE eban-ernam, "Created by
lifnr LIKE eban-lifnr, "Desired vendor
erdat LIKE eban-erdat, "Create or Change date
banfn LIKE eban-banfn, "Requisition no.
bnfpo LIKE eban-bnfpo, "Req. item no.
eknam like t024-eknam, "Purchase Grp Name
ekgrp like t024-ekgrp, "Purchase Grp number
END OF i_req_keys.
DATA: BEGIN OF i_req_keeper OCCURS 0,
ernam LIKE eban-ernam, "Created by
lifnr LIKE eban-lifnr, "Desired vendor
banfn LIKE eban-banfn, "Requisition no
END OF i_req_keeper.
DATA: wa_reqitems LIKE i_req_items.
DATA: BEGIN OF i_export OCCURS 10,
record(150) TYPE c,
END OF i_export.
CONSTANTS
CONSTANTS:
c_doccat LIKE eban-bstyp VALUE 'B',
c_creind LIKE eban-estkz VALUE 'R',
c_delflag LIKE eban-loekz VALUE 'L',
c_write(5) TYPE c VALUE 'WRITE',
c_slash(1) TYPE c VALUE '/',
*start ESPZC U8DK900439
c_delimiter TYPE x VALUE '09',
c_delimiter TYPE c VALUE cl_abap_char_utilities=>horizontal_tab,
*end ESPZC U8DK900439
c_sc(1) TYPE c VALUE ';',
c_x(1) TYPE c VALUE 'X',
c_usd(1) TYPE c VALUE '2',
c_export LIKE authb-filename VALUE '/BAY2/UBEM_SPLIT_REQS'.
WORKING VARIABLES
DATA: w_report_id LIKE syst-repid,
w_sttime LIKE syst-uzeit,
w_rpt_pagno LIKE syst-pagno,
w_rc LIKE sy-subrc,
w_datelow LIKE eban-badat,
w_datehigh LIKE eban-badat,
w_export LIKE c_export,
w_records TYPE i,
w_message(50) TYPE c.
TYPES number TYPE i.
SELECTION SCREEN / PARAMETERS
SELECTION-SCREEN BEGIN OF BLOCK org WITH FRAME TITLE text-001.
PARAMETERS: p_purorg LIKE eban-ekorg OBLIGATORY DEFAULT 'US02'.
SELECT-OPTIONS: s_doctyp FOR eban-bsart,
s_date FOR eban-badat.
PARAMETERS: p_timper(2) TYPE n.
SELECTION-SCREEN: COMMENT 37(37) text-002.
SELECTION-SCREEN END OF BLOCK org.
SELECTION-SCREEN BEGIN OF BLOCK outp WITH FRAME TITLE text-003.
PARAMETERS: p_onlin RADIOBUTTON GROUP outp DEFAULT 'X',
p_servr RADIOBUTTON GROUP outp.
SELECTION-SCREEN END OF BLOCK outp.
AT SELECTION SCREEN
AT SELECTION-SCREEN.
IF p_servr = c_x.
CLEAR w_rc.
PERFORM authority_check_dataset USING w_export
CHANGING w_rc.
IF w_rc <> 0.
MESSAGE e532 WITH text-006 w_export.
ENDIF.
CLEAR w_rc.
PERFORM verify_unix_path_and_file CHANGING w_rc.
IF w_rc <> 0.
MESSAGE e531 WITH w_message.
ENDIF.
ENDIF.
INITIALIZATION EVENT
INITIALIZATION.
PERFORM get_filename.
MOVE syst-uzeit TO w_sttime.
MOVE syst-repid TO w_report_id.
CLEAR: w_rpt_pagno.
START-OF-SELECTION.
PERFORM get_data.
IF p_onlin = c_x.
IF w_records GT 0.
PERFORM print_report_header.
PERFORM write_report.
ELSE.
MESSAGE i531 WITH text-007.
ENDIF.
ELSEIF p_servr = c_x.
PERFORM write_export.
ENDIF.
END-OF-SELECTION.
---- F O R M R O U T I N E S -
*& FORM get_filename
FORM get_filename.
CALL FUNCTION 'FILE_GET_NAME'
EXPORTING
logical_filename = c_export
IMPORTING
file_name = w_export
EXCEPTIONS
file_not_found = 1
OTHERS = 2.
IF sy-subrc <> 0.
ENDIF.
ENDFORM. " get_filename
FORM authority_check_dataset
FORM authority_check_dataset USING p_filename
CHANGING p_rc.
CALL FUNCTION 'AUTHORITY_CHECK_DATASET'
EXPORTING
activity = c_write
filename = p_filename
EXCEPTIONS
no_authority = 1
activity_unknown = 2
OTHERS = 3.
p_rc = sy-subrc.
ENDFORM. "authority_check_dataset
FORM verify_unix_path_and_file
FORM verify_unix_path_and_file CHANGING p_rc.
*start ESPZC U8DK900439
OPEN DATASET w_export FOR OUTPUT IN TEXT MODE
MESSAGE w_message.
OPEN DATASET w_export FOR OUTPUT IN TEXT MODE ENCODING DEFAULT
MESSAGE w_message.
*end ESPZC U8DK900439
p_rc = sy-subrc.
ENDFORM. "verify_unix_path_and_file
FORM get_data
FORM get_data.
CLEAR w_datelow.
CLEAR w_datehigh.
w_datelow = s_date-low - p_timper.
w_datehigh = s_date-high + p_timper.
w_datehigh = s_date-high.
SELECT ernam lifnr ebeln ebelp flief badat erdat banfn bnfpo bsart
knttp menge preis peinh txz01
FROM eban
INTO CORRESPONDING FIELDS OF TABLE i_req_items
WHERE bstyp = c_doccat
AND estkz = c_creind
AND knttp <> space
AND bsart IN s_doctyp
AND loekz <> c_delflag
AND ekorg EQ p_purorg
AND ( ( badat BETWEEN w_datelow and w_datehigh ) OR
( erdat BETWEEN w_datelow AND w_datehigh ) ).
AND erdat BETWEEN w_datelow AND w_datehigh.
IF sy-subrc = 0.
LOOP AT i_req_items.
IF i_req_items-lifnr IS INITIAL.
IF NOT i_req_items-flief IS INITIAL.
MOVE i_req_items-flief TO i_req_items-lifnr.
MODIFY i_req_items.
ENDIF.
IF NOT i_req_items-ebeln IS INITIAL.
SELECT lifnr FROM ekko
INTO i_req_items-lifnr
WHERE ebeln = i_req_items-ebeln.
ENDSELECT.
MODIFY i_req_items.
ENDIF.
ENDIF.
IF i_req_items-erdat GT i_req_items-badat.
MOVE i_req_items-erdat TO i_req_items-badat.
MODIFY i_req_items.
ENDIF.
ENDLOOP.
PERFORM weed_out_unique_records.
PERFORM apply_time_period.
SORT i_req_items BY ernam lifnr banfn bnfpo.
LOOP AT i_req_items.
i_req_items-value = ( i_req_items-menge *
( i_req_items-preis / i_req_items-peinh ) ).
MODIFY i_req_items.
ENDLOOP.
Getting vendor name from table LFA1 -
CLEAR i_req_items.
LOOP AT i_req_items.
SELECT SINGLE name1 FROM lfa1
INTO i_req_items-name1
WHERE lifnr = i_req_items-lifnr.
MODIFY i_req_items.
ENDLOOP.
LOOP AT i_req_items.
MOVE-CORRESPONDING i_req_items TO i_reqs.
Getting user name from view v_username -
SELECT SINGLE name_text
FROM v_username INTO i_reqs-uname
WHERE bname = i_reqs-ernam.
APPEND i_reqs.
ENDLOOP.
ENDIF.
DESCRIBE TABLE i_reqs LINES w_records.
ENDFORM. "Get_data
FORM print_report_header
FORM print_report_header.
ADD 1 TO w_rpt_pagno.
CALL FUNCTION '/BAY2/UBEXBH_BAYER_HEADR_FUN'
EXPORTING
f_jobname = text-020
f_business_group = text-021
f_report_title = text-022
f_repid = w_report_id
f_sysid = syst-sysid
f_linsz = syst-linsz
f_pagno = w_rpt_pagno
f_mandt = syst-mandt
f_datum = syst-datum
f_uzeit = w_sttime.
FORMAT COLOR COL_HEADING.
WRITE: /1 text-010, "Created by CWID & user name
29 text-011, "Vendor #
38 text-012, "Vendor Name
69 text-013, "Req Number
79 text-014, "/Item
87 text-015, "Created On
98 text-017, "A (AcctAssgmtCat)
100(14) text-019 RIGHT-JUSTIFIED, "Item Value
116(30) text-018, "Item Description
148 text-030, "Pur.Grp Name
170 text-031. "Pur.Grp Number
FORMAT COLOR OFF.
ULINE.
ENDFORM. "print_report_header
*& Form WRITE_REPORT
FORM write_report.
LOOP AT i_reqs.
WRITE: /1 i_reqs-ernam,
9(18) i_reqs-uname,
29 i_reqs-lifnr,
38(30) i_reqs-name1,
69 i_reqs-banfn,
79 c_slash,
80 i_reqs-bnfpo,
87 i_reqs-badat,
98 i_reqs-knttp,
100(14) i_reqs-value CURRENCY c_usd,
116(30) i_reqs-txz01,
145 i_reqs-eknam,
160 i_reqs-ekgrp.
ENDLOOP.
ENDFORM. "write_report
*& Form WRITE_EXPORT
FORM write_export.
DATA: l_value(14) TYPE c,
l_bsart(100) TYPE c,
l_uname(7) TYPE c,
l_records(5) TYPE c,
l_header(150) TYPE c,
l_params(150) TYPE c,
i_char TYPE i.
LOOP AT i_reqs.
CLEAR l_value.
CLEAR l_uname.
l_value = i_reqs-value.
l_uname = sy-uname.
CONCATENATE: i_reqs-uname
i_reqs-ernam
i_reqs-lifnr
i_reqs-name1
i_reqs-banfn
i_reqs-bnfpo
i_reqs-badat
i_reqs-knttp
l_value
i_reqs-txz01 INTO i_export
SEPARATED BY c_delimiter.
APPEND i_export.
ENDLOOP.
CONCATENATE: text-008 "Created By Name
text-009 "CWID
text-011 "Vendor No
text-012 "Vendor Name
text-013 "Req Number
text-023 "Item
text-015 "Created On
text-017 "A
text-019 "Item Value
text-018 "Item Description
text-030 "Purchase Grp name
text-031 "Purchase Grp number
INTO l_header SEPARATED BY c_delimiter.
INSERT l_header INTO i_export INDEX 1.
IF sy-batch IS INITIAL.
MOVE sy-uname TO l_uname.
ELSE.
MOVE text-024 TO l_uname.
ENDIF.
PERFORM collect_bsart CHANGING l_bsart
i_char.
l_records = w_records.
CONCATENATE: sy-sysid
p_purorg
l_bsart(i_char)
s_date-low
s_date-high
p_timper
l_uname
sy-datum
l_records INTO l_params
SEPARATED BY c_delimiter.
INSERT l_params INTO i_export INDEX 1.
LOOP AT i_export.
CONDENSE i_export NO-GAPS.
TRANSFER i_export TO w_export.
ENDLOOP.
CLOSE DATASET w_export.
MESSAGE s533 WITH text-028 w_export text-029.
ENDFORM. "write_export
*& FORM collect_bsart
FORM collect_bsart CHANGING p_bsart
p_char.
CLEAR p_bsart.
LOOP AT s_doctyp.
IF sy-tabix = 1.
p_bsart = s_doctyp-low.
ELSE.
CONCATENATE: p_bsart c_sc s_doctyp-low INTO p_bsart.
ENDIF.
ENDLOOP.
CONDENSE p_bsart NO-GAPS.
p_char = strlen( p_bsart ).
ENDFORM. "collect_bsart
*& Form WEED_OUT_UNIQUE_RECORDS
FORM weed_out_unique_records.
DATA: i_l_req_items LIKE i_req_items OCCURS 0 WITH HEADER LINE.
DATA: i_l_req_final_items LIKE i_req_items OCCURS 0 WITH HEADER LINE.
DATA: l_count TYPE i,
l_sy_tabix LIKE sy-tabix,
l_banfn LIKE eban-banfn.
REFRESH i_l_req_items.
REFRESH i_l_req_final_items.
CLEAR l_banfn.
i_l_req_items[] = i_req_items[].
i_l_req_final_items[] = i_req_items[].
SORT i_req_items BY ernam lifnr.
SORT i_l_req_items BY ernam lifnr.
SORT i_l_req_final_items BY ernam lifnr.
LOOP AT i_l_req_items.
l_banfn = i_l_req_items-banfn.
CLEAR l_count.
LOOP AT i_req_items
WHERE ernam = i_l_req_items-ernam
AND lifnr = i_l_req_items-lifnr.
IF i_req_items-banfn <> l_banfn.
ADD +1 TO l_count.
ENDIF.
ENDLOOP.
IF NOT ( l_count > 0 ).
LOOP AT i_l_req_final_items
WHERE ernam = i_l_req_items-ernam
AND lifnr = i_l_req_items-lifnr.
DELETE i_l_req_final_items.
ENDLOOP.
ENDIF.
ENDLOOP.
REFRESH i_req_items.
i_req_items[] = i_l_req_final_items[].
ENDFORM. " WEED_OUT_UNIQUE_RECORDS
*& Form APPLY_TIME_PERIOD
FORM apply_time_period.
DATA: l_i_req_keys LIKE i_req_keys.
DATA: l_days_diff TYPE p,
l_no_of_key_recs TYPE i,
l_next_item LIKE sy-tabix,
l_finished_with_keys TYPE c VALUE 'N',
l_add_line TYPE c VALUE 'N',
l_count TYPE i,
l_req_ernam LIKE eban-ernam,
l_req_lifnr LIKE lfa1-lifnr,
l_req_banfn LIKE eban-banfn,
l_save_tabix like sy-tabix.
REFRESH: i_req_keys, i_req_keeper.
LOOP AT i_req_items.
MOVE-CORRESPONDING i_req_items TO
i_req_keys.
IF i_req_items-erdat IS INITIAL.
i_req_keys-erdat = i_req_items-badat.
ENDIF.
APPEND i_req_keys.
ENDLOOP.
SORT i_req_keys BY ernam lifnr erdat.
CLEAR l_no_of_key_recs.
DESCRIBE TABLE i_req_keys LINES l_no_of_key_recs.
LOOP AT i_req_keys.
IF l_add_line = 'Y'.
MOVE-CORRESPONDING i_req_keys
TO i_req_keeper.
APPEND i_req_keeper.
l_add_line = 'N'.
ENDIF.
IF l_finished_with_keys = 'Y'.
EXIT.
ENDIF.
CLEAR l_next_item.
l_save_tabix = sy-tabix.
COMPUTE l_next_item = sy-tabix + 1.
IF l_next_item = l_no_of_key_recs.
l_finished_with_keys = 'Y'.
ENDIF.
clear: l_i_req_keys.
READ TABLE i_req_keys INDEX l_next_item
INTO l_i_req_keys.
sy-tabix = l_save_tabix.
CLEAR l_days_diff.
l_days_diff = l_i_req_keys-erdat -
i_req_keys-erdat.
IF l_i_req_keys-ernam =
i_req_keys-ernam AND
l_i_req_keys-lifnr =
i_req_keys-lifnr AND
l_i_req_keys-banfn <>
i_req_keys-banfn AND
l_days_diff <= p_timper.
MOVE-CORRESPONDING i_req_keys
TO i_req_keeper.
APPEND i_req_keeper.
l_add_line = 'Y'.
ENDIF.
ENDLOOP.
DELETE ADJACENT DUPLICATES FROM i_req_keeper
COMPARING ALL FIELDS.
SORT i_req_keeper BY ernam lifnr banfn.
LOOP AT i_req_items.
CLEAR l_count.
CLEAR: l_req_ernam,
l_req_lifnr,
l_req_banfn.
l_req_ernam = i_req_items-ernam.
l_req_lifnr = i_req_items-lifnr.
l_req_banfn = i_req_items-banfn.
LOOP AT i_req_keeper
WHERE ernam = i_req_items-ernam
AND lifnr = i_req_items-lifnr
AND banfn = i_req_items-banfn.
ADD +1 TO l_count.
ENDLOOP.
IF NOT ( l_count > 0 ).
LOOP AT i_req_items
WHERE ernam = l_req_ernam
AND lifnr = l_req_lifnr
AND banfn = l_req_banfn.
DELETE i_req_items.
ENDLOOP.
ENDIF.
ENDLOOP.
ENDFORM. " APPLY_TIME_PERIODRajesh,
Put a breakpoint and try to debug the report step by step.
You will findout the reason very easily.
Whenever you have a select and are trying to append into an internal table, keep checking your internal table if it is been populated with the correct records.
This way, you will findout the cause and can correct is accordingly.
Thanks,
Suresh Ganti -
Absence Quota Change ( Without Time Evaluation )-Change in Holiday Calendar
Hi Experts, We have scenario where we need to change the holiday calendar. Add additional holiday. This can be done through SCAL and after that we can generate work schedule through PT01 for the month where the holiday is added. We are not using time evaluation. Our time manangement status is 0 in IT0007. The input I require is how to correct the absence quotas of employees for which they have applied leave for the period where the new given holiday is created. Please advise. Thanks in advance. Regards, IFF
Hi,
Standard SAP provides TCode PT_UPD00 for this purpose. It calls program RPTUPD00 which creates a batch input session for revaluating absence and attendance records. You can use this program to resave all the leaves which overlap the given date which is now a public holiday.
I hope this information is helpful for you and resolves your query.
Thanks and regards,
Vivek Barnwal
Maybe you are looking for
-
ITunes keeps corrupting itself?
Well, I've been having this problem for quite a while, and I really would like to get it fixed. Just about every time I plug my iPhone into my Mac, iTunes will not recognize it. I have to perform the steps at http://support.apple.com/kb/HT1747 , and
-
Regarding MSExchange Active Manager perfmon counter for exchange server 2010 sp1
Hi Instance for MSExchange Active Manager perfmon counter is not created on Exchange Server 2010 SP1 but for MSExchange Active Manager Client and MSExchange Active Manager Server instances are created. Will any can tell me why i am not getting any i
-
Will Photoshop CS6 offer a student teacher edition immediately on release?
Just wondering if CS6 will come out with an extended 64 bit version for students and teachers right away.
-
Difference among Oracle versions.
hi, Can anyone hv idea on precise difference among Oracle versions (7,8,8i,9i,10g). Both feature wise and architecture wise. Pls give me any links,pdfs, etc... Rgds, Rup
-
I have a USB drive that doesn't want to eject. It get the error that it is in use and can't be ejected. Yet, nothing is using it. I'm trying to eject through Finder. Any ideas how to resolve this?