Replace raw with jpeg!
Hi,
I'm shooting mostly raw, and managing my images in lightroom, rate and tag them with the appropriate keywords and develop if necessary.
But the RAW files are taking huge space, is there a way to replace some of raw files (say all photos with <5 stars) to automatically convert to jpg and store in the same folder, with all the tags intact.
Please let me know how to do this.
Regards
Sajid
> Needs?? Well, a handful of folks have spoken for it, but I would hardly call it a need.
How many posts should be here, a million?
> I would be wary of deleting RAW files. If space is a concern then why not shoot jpeg to start with.
A jpeg converted in Lightroom is not the same as shot in-camera. And, when I shoot, I don't know what my next shot will be - a 2-star or 5-star shot.
> Check out the LR2.0beta. It has a function in the export section where you have it automatically reimport exported files.
If this functionality has been created in LR2 to address the issue raised in this post, then it's a plain hack. To export pictures just to immediately reimport them... and to take care to delete the originalas... Huh.
Similar Messages
-
Understanding Camera RAW with JPEGs
I usually work on the design end, hence I rarely work (professionally) with files straight-from-camera. I get the stuff after the photographers are done with it.
However, that is slightly changing and so I have a question about the Camera Raw plugin in Photoshop. In particular, processing JPEG images with it.
If I understand correctly, it does not actually modify the JPEG image itself, but merely saves the correction information as metadata in the JPEG file, which is then re-constructed when the JPEG is re-opened.
This would (assuming I understand it properly) make it a "safe" way of tweaking JPEGs as unlike most JPEG operations, no resave/quality-loss is occurring. Only the metadata is changing.
Am I correct or have I horribly misunderstood this process?I can appreciate that - my own plug-ins all do their work in linear space as well for the advantages thereof. However, it's not as if one can't get good results with the normal Photoshop tools, which for some reason seem to be out of favor... One can convert to a linear profile to work on it in Photoshop proper, for example (though one has to craft or find a linear profile to use for that, as none is provided by Adobe). I do my astroimage processing that way.
I might change my workflow to involve Camera Raw where JPEGs are concerned IF Camera Raw could be set to write its metadata back to a sidecar file or the central database instead of rewriting the JPEG file. I understand that it is not rewriting the actual image data, but I just don't want it writing back to my JPEGs at all.
-Noel -
Replace movie with Jpeg at end
Hello,
I have a simple flash movie on a webpage.
At the the end of the movie, I would like the player to disappear and be replaced by an image.
As an example, imagine clicking play and watching a movie about Disney, then when the movie ends the player is replaced by an image which is a coupon to use at Disney.
Any ideas or direction would be greatly appreciated.
Thank you for your time,
Timeither place the image and link in flash or use getURL() or navigateToURL() to link to an html page with your image/link.
-
Batch automated replacement of RAW to JPEG in iPhoto
Hey.
I've been shooting with my camera for about a year and always did RAW just to have the option in the edit to make adjustments. Its time to trim back this monstrously large iPhoto library, so I was looking to find an automator to convert most of my RAW files to High JPEGs. With a few exceptions this is really fine for what I'm doing with the files. I have found a program that does exactly what I want, but only works with Aperture. See the link below:
http://www.apertureexpert.com/applescripts/
Has anyone created something like this for iPhoto? I realize that I can batch export, than re-import, than track down ALL the raw files and delete them. This is time consuming and upon being re-imported I will have to once again divide up the photos into events, name the events, etc and the new converted JPEGS will be spread across an already large library of existing photos. Annoying to say the least.
I know I'm not the first to run into this problem, and I can find solutions for Aperture, Photoshop, and a few other but nothings for iPhoto.
Please send along any advice.
Thanks a bunchThere isn't one, I'm afraid.
It's also difficult to see how it might work as the Original file in the Library is a Raw and you're trying to replace it with a jpeg. The Library won't recognise the jpeg as the original as it will have a different file name (the suffix).
So, one way or another, you're going to be doing this export/process/import/trash the original/ routine. You may be able to automate parts of it with Automator or Applescript.
Regards
TD -
Help with managing RAW and jpeg images and installing iphoto 9
Greetings: Fist, let me make the neophyte apology and plea - I'm sorry, I should have come here first; I didn't and now I need your help.
I have just purchased a macbook pro (still in its box) with updated software for my older imac os x. I have a number of Canon related photo editing programs (that came with my 40D digital SLR) and Adobe photo elements 6 for mac on the imac. Following some erroneous advice I have made a complete mess of the pictures folder's content by trying to delete images directly from that folder (there are now 6000+ images in the folder, many of which are duplicates(?). Most of the images are not tagged or labeled and some have been organized in/by iphoto (I corrupted the iphoto's library structure very early on by disrupting and editing its images - which might explain why iphoto had a difficult time 'finding' and displaying some of my photos). The picture folder now holds jpegs, smallRAW images (a Canon 40D photo format) and various duplicates of the orignal images - (some of the duplicates don't display as images, but as jpeg logos, which, when opened contain duplicate image or are completely black) The first time I downloaded RAW images into iphoto 6 the RAW data displayed as a black image. When shooting in smallRAW on the Canon 40D, the camera produces a jpeg image for 'easy viewing and editing in the camera' but it looks as though iphoto 6 made duplicates of the jpeg and the RAW data and stored them in different locals in the picture file. In an attempt to get the number of images down, I have been trying to delete them from the picture folder. (My daughters both download images rather indiscriminately in hopes of 'editing them on the computer' which inevitably does not happen) and there is a lot of experimental bracketing of images - shooting raw and different Camera formats etc., all of which need to be cleaned up before I proceed.
Sometime in the not-too-distant future I would like to have iphoto 9 running on my imac with a clean library of images and a seamless way of downloading, editing and storing images (including the RAW data).
The macbook pro is for my highschool-aged daughter, who will run iphoto 9 but not have any RAW image data on her system. She would like to copy some of the old iMac's images to put into her own iPhoto 9 library (probably using a disk, email or on-line photo service - ideally, I would like to be able to copy and remove a number of those images from my HD and give them to her for the macbook)
A few questions and queries: Can I 'dis-able' iphoto 6, while I delete images (RAW and jpeg) from the picture file? (and is this even a good idea).
Once I have edited the # of images down to a reasonable size, should I re-launch iphoto 6, rebuild the iphoto library and then update to iphoto 9 or skip v6 and rebuild with v9?
And now for the 'how stupid is this guy question' - I really had planned to purchase an external backup; but between new the macbook, car repairs and braces it has never come to fruition. So, I have never properly backed up my images. What is the bare-bones, least expensive method for me to do this? I'd even consider burning everything to disks if that works. I can't afford the $ to purchase a new external hard drive right now (really). Budget is set aside mid-November for one though.
I've been looking through some other discussion boards and it looks like I'm not the only one having RAW image issues. I know that shooting smallRAW with the companion jpeg is probably not helping things but I take my camera equipment on extended canoe trips - and we like the ease of on-the-spot editing with this format.
Thanks in advance for your help - MarkTerence, Is the picture folder the primary source for the images or does that data reside somewhere else?
If you gathered them there, then yes.
I really don't want to have to go through 14,000 images looking for the pictures that I want to keep (or is that my only option?).
Only you can decide what you want to keep.
Why does the computer keep making copies of the images and filing them under date and events?
That's how iPhoto works. It's not a problem usually, only you did go in there and make a problem, and now we are trying to fix it.
You advise not to muck around in the picture file via preview,
No I don't. I advise not to much around in the iPhoto Library Folder.
but if I download images through a program other than iPhotos - image capture or adobe aren't I doing that anyway?
Adobe what? Adobe is a software manufacturer who make many excellent applications, you need to be more precise. And no, if you import photos with Image Capture or “adobe” no you are not interfering with the iPhoto Library Folder.
Can you edit a base image file somewhere and remove it from the HD without iphoto making a copy of it and storing it somewhere else?
This is stunningly easy. Don't use iPhoto. Use an image editor.
I want to look the negatives, decide which ones I want and throw the rest away. Can that be done or am I way off course?
Yes, and iPhoto (or similar apps) make this really easy.
Hook up your camera. Import the pics to iPhoto. Go through the imported pics. Trash the ones you don't want. Then process the ones you do. But you must learn how to use iPhoto to do this successfully
To trash: put the pic in the iPhoto trash and empty it. This removes the file from iPhoto and the Hard Disk.
Process it: If you want to use another editor: You can set Photoshop (or any image editor) as an external editor in iPhoto. (Preferences -> General -> Edit Photo: Choose from the Drop Down Menu.) This way, when you double click a pic to edit in iPhoto it will open automatically in Photoshop or your Image Editor, and when you save it it's sent back to iPhoto automatically. This is the only way that edits made in another application will be displayed in iPhoto.
Regards
TD -
Has anyone experienced problems with downloading Nikon D800 files to the iPad3 using the camer connector kit? I have tried .RAW and JPEG (of various sizes) on both SD and CF cards, but the iPad doesn't recognise the files.
I have seen various forums discussing Lightroom and PSE updates that are required to process .NEF files but I can't find anything on the iPad/camera connector issue.
I dont have any problem if I put the SD card straight into the SD slot in my iMac and Aperture will process the files fine, but I would really like to be able to download and view files on the move on the iPad.
Any advice appreciated?
PS - saw something that suggested the iPad had a maximum file size of 16mb for photos, not sure if this is correct, but I have tried smaller JPEG files and they still aren't recognised.If your camera supports both PTP and Mass Storage Device modes, it may be necessary to use both modes to import all media content.
If some files do not import as expected using one mode, try switching to the other mode and importing again.
Note: Some cameras may refer to PTP as Pictbridge or PTP/Pictbridge. -
I have Sony camera DSC-HX400V which does not have raw program. Pls explain what can I do with lightroom 5 with jpeg only
Arieh Gertler
[email protected]You can do just about anything with a JPEG image that you can with a raw image. The advantage of working with raw is that it is possible to work with more extremes in exposure. More highlights and shadows can be recovered in a raw image, but there is a lot that can be done with JPEG images as well. All of the library functions and keywording and all the other features of Lightroom can be used on JPEG images just as easily as they can be used on raw images.
Having said all that, you might be more comfortable using Photoshop Elements. Both programs have trial versions that you can use for 30 days to decide which one or whether both will work for you. It would probably be to your advantage to try them out and decide for yourself. -
How do I convert Raw to Jpeg with Elements 9?
I just installed Elements 9. I set my camera Panasonic G2 to Raw and Standard and could not find the Raw with Elements open, I could only find them in the DCIM folder and send them to My Documents. There has to be an easier way.
My other question, after I made some adjustments in Raw, I wanted to convert and save them in Jpeg to do further adjustments in PSE. There doesn't seem be to be this option to do that. I have Silkypix, which works fine, but would prefer to do everything with the same software.Raw was the main reason I bought PSE 9.Camera Raw Files ~
http://help.adobe.com/en_US/photoshopelements/using/WS9675D47A-589F-428c-8FDB-7F20096EE811 _WIN.html
File > Save for Web dialogue ~
http://help.adobe.com/en_US/photoshopelements/using/WSCC0C7B37-3AD2-43ca-9BF0-677BFC551D97 _WIN.html
Nancy O.
Alt-Web Design & Publishing
Web | Graphics | Print | Media Specialists
http://alt-web.com/
http://twitter.com/altweb -
When using Camera raw with PS12 after editing, I cannot save my file in JPEG, only DNG
When using Camera RAW after editing photo I can only save file as DNG, I want to save as JPEG. HOW??
THANKS LLOYDBARBARA,Yes, you are so right, I was deceived by the eve button, Just tried it and it WORKS GREAT-Thanks for the help.
THANKS AGAIN AND HAVE A GOOD DAY Lloyd
From: Barbara B. <[email protected]>
To: Lloyd Bennett <[email protected]>
Sent: Tuesday, January 13, 2015 11:46 AM
Subject: When using Camera raw with PS12 after editing, I cannot save my file in JPEG, only DNG
When using Camera raw with PS12 after editing, I cannot save my file in JPEG, only DNG
created by Barbara B. in Photoshop Elements - View the full discussionYou are being deceived by the Save button, like most people. That button is not the Save As button, really, but a link to the DNG converter. To save your raw file in an image format, click the Open button instead and then save in the format of your choice in the editor. If the reply above answers your question, please take a moment to mark this answer as correct by visiting: https://forums.adobe.com/message/7092207#7092207 and clicking ‘Correct’ below the answer Replies to this message go to everyone subscribed to this thread, not directly to the person who posted the message. To post a reply, either reply to this email or visit the message page: Please note that the Adobe Forums do not accept email attachments. If you want to embed an image in your message please visit the thread in the forum and click the camera icon: https://forums.adobe.com/message/7092207#7092207 To unsubscribe from this thread, please visit the message page at , click "Following" at the top right, & "Stop Following" Start a new discussion in Photoshop Elements by email or at Adobe Community For more information about maintaining your forum email notifications please go to https://forums.adobe.com/thread/1516624. -
Importing Raw Jpeg Pairs with Jpeg as Master
I give....I imported raw and jpeg as pairs since aperture updated for the D7000. I see the J on the badge. I assume they are stacked. I see where i can change the master to the raw file by right clicking. However, can't i just navigate to the raw file for adjustments or do I have to switch the master? I have looked at the manual. I have a book on aperture, I searched the board. I gotta be missing something really basic! Please help this stupid newbie. Is it better to import both as masters in the future? What do people prefer? tx
Message was edited by: Sheryl KingstoneHi Sheryl,
No, you aren't missing anything really basic. The RAW and JPG aren't really stacked. They are associated together in a different way that is only applicable for pulling JPG and RAW versions of the same photo out of your camera together.
If you can answer the following question, it might help the other users (and mybe you) help you.
Why is it a problem to have your RAW be the master?
With your hesitation to switch the master to the RAW, you imply to me that you would like Aperture to work with your JPG files, but at the same time it your question implies that you would like you want to work on your RAW file.
In my own preference, I struggled with what to start out with, RAW or JPG. I came to the conclusion that I didn't want to spend the time comparing RAW and JPG from my camera and deciding what to do. I no longer capture RAW+JPG in my camera.
Basically, post-processing the RAW file through Aperture gives you lots more information to work with, as the creation of a JPG in your camera throws out lots of colors and pixels. So, I had to balance things, why would I choose to take a "throwaway snapshot" with RAW if I knew it probably wouldn't be worth post-processing? For instance, all the pictures of my niece at the dinnertable in really bad light. I can't do anything worthwhile in post-processing with the sharp shadows, and the 5 different and ugly light sources, and the fact that she only looked at the camera once. Yeah, I can make it a little better, but not enough that it's worth post-processing to me. So, for those pictures, I just let my camera do the work and use the most basic, point-and-shoot settings most of the time. My camera produces JPG-only in the basic settings.
On the other hand, for those sunsets, gardens, forests, streams, vistas, etc, I probably would like to do a little post-processing if my exposure wasn't right to begin with. I decided that I would just let Aperture decode the RAW file for me and forget about the JPGs entirely. When I'm using my camera in manual mode (or one of the quasi-manual modes) I shoot in RAW only. Yes, my camera will do a better job rendering a JPG than Aperture will, but Aperture's very good and I figure I wouldn't be looking at the JPG from the camera if I'm doing other post-processing in Aperture.
That being said, there are many other opinions and othe reasons to choose one way or the other.
Hope that eas clear enough. I had lots of ideas to write about.
hope this helps,
nathan -
How do I download Raw Images in Iphoto. I usually use Jpeg. I want to start doing raw. Will there be a converersion problem. I plan to buy a 8 meg card today I have been using a 2 meg card.
Thank you,FYI
Processing Raw in iPhoto
When you import a Raw to iPhoto it automatically makes a jpeg Preview of the shot. Why? Because you can't do anything with Raw - can't print it, share it online, use it in other apps etc. So to allow you to use the file immediately the Preview is available.
You can, however, also process the Raw in iPhoto simply by editing it. The Raw processing engine in iPhoto the same one used in Aperture, but with less fine control. (Think of the differences between Word and TextEdit, iMovie and Final Cut). The output from the processing then replaces the preview. You can choose to save your output as either jpeg or tiff in the iPhoto Preferences.
When you are processing Raw in iPhoto you will see the Raw badge on the bottom of the iPhoto Window
Uploaded with plasq's Skitch!
Note: After you have processed a Raw, subsequent edits to the photo are carried out on the processed jpeg (or tiff) not the Raw. If you want to go back to the original then you need to use the Photos -> Reprocess Raw command.
Processing Raw in a 3rd Party Application
You can also process your Raw with a 3rd Party app like ACR or Photoshop. But iPhoto does not handle this gracefully and it's a bit of a kludge.
First off set your preferred app as an external editor in iPhoto:
You can set Photoshop (or any image editor) as an external editor in iPhoto. (Preferences -> General -> Edit Photo: Choose from the Drop Down Menu.) This way, when you double click a pic to edit in iPhoto it will open automatically in Photoshop or your Image Editor, and when you save it it's sent back to iPhoto automatically. This is the only way that edits made in another application will be displayed in iPhoto.
Note that iPhoto sends a copy+ of the file to Photoshop, so when you save be sure to use the Save command, not Save As... If you use Save As then you're creating a new file and iPhoto has no way of knowing about this new file. iPhoto is preserving your original anyway.
Next: In the iPhoto Preferences -> Advanced, elect to use Raw with your External editor:
Uploaded with plasq's Skitch!
Now when you go to edit the Raw it will be sent to your external editor.
Now for the kludge:
You cannot save a Raw. The work you do must be output to a new file, in a new format (jepg, tiff, whatever). However, as the External Editor is making this new file iPhoto has no knowledge of its existence. Therefore you *must save it to the desktop and then import it back to iPhoto as a new file*.
This means that you will have your Original Raw and the processed version in iPhoto but they will not be recognised as version and original. iPhoto will see them as two separate shots.
Regards
TD -
Required replace BSEG with BSAK BSIK BSIS BSAS for report performance
Hi Experts
i m optimizing a report in which data is extracting from BSEG , 5 time so i reduses the performance of report
so i want replace BSEG with BSAK BSIK BSIS BSAS for the same data what I am getting now . this is report of Purchase of item. code is here.
REPORT zmm_pur_reg_kanhe LINE-SIZE 1023.
*& Des :Purchase Tax Register Report for KANHE
*& Created on :12-07-07
*& Suggested by:Paresh Saini(MM)
*& Changes By: Lailu Philip
*& Changed On: 24.09.2007
*& Changes: New columns for G/L Code Description,VAT Amt,VAT Perc,CST Perc
*& ,SHCESS Amounts,WCT G/L Acc., WCT Amt,Tax Code
*& for Purchase Order,WCT tax code & Percentage.
*& Request No: S6DK921577
Data Declaration
*& changes: by Vincy on 12.01.2007
*& changes: display purchase order with vendor type zpsr(get_zpsr)
*& Request No: S6DK930821
TABLES:ekbe, lfa1, faglflexa.",j_1iexcdtl,lfa1,bkpf,bseg.
TYPE-POOLS: slis. "ALV Declarations
DATA: fieldcatalog TYPE slis_t_fieldcat_alv WITH HEADER LINE,
gd_layout TYPE slis_layout_alv,
gd_repid LIKE sy-repid.
DATA: it_sortcat TYPE slis_sortinfo_alv OCCURS 1,
col_pos LIKE fieldcatalog-col_pos .
TYPES :BEGIN OF wa1_ekbe,
belnr TYPE ekbe-belnr,
budat TYPE ekbe-budat,
menge TYPE ekbe-menge,
matnr TYPE ekbe-matnr,
ebelp TYPE j_1iexcdtl-ritem1,
ebeln TYPE ekbe-ebeln,
gjahr TYPE ekbe-gjahr,
lfbnr TYPE ekbe-lfbnr,
lfpos TYPE ekbe-lfpos,
bldat TYPE ekbe-bldat,
REEWR TYPE REEWR,
END OF wa1_ekbe.
TYPES :BEGIN OF wa2_ekbe,
belnr TYPE ekbe-belnr,
budat TYPE ekbe-budat,
menge TYPE ekbe-menge,
ebelp TYPE ekbe-ebelp,
ebeln TYPE ekbe-ebeln,
gjahr TYPE ekbe-gjahr,
lfbnr TYPE ekbe-lfbnr,
lfpos TYPE ekbe-lfpos,
bldat TYPE ekbe-bldat,
REEWR TYPE REEWR,
awkey(20) TYPE c,
MATNR TYPE MATNR,
MWSKZ TYPE EKBE-MWSKZ,
END OF wa2_ekbe.
TYPES :BEGIN OF wa1_j_1iexcdtl,
exnum TYPE j_1iexcdtl-exnum,
exdat TYPE j_1iexcdtl-exdat,
lifnr TYPE j_1iexcdtl-lifnr,
matnr TYPE j_1iexcdtl-matnr ,
maktx TYPE j_1iexcdtl-maktx ,
capind TYPE j_1iexcdtl-capind,
exbas TYPE j_1iexcdtl-exbas,
exbed TYPE j_1iexcdtl-exbed,
ecs TYPE j_1iexcdtl-ecs,
werks TYPE j_1iexcdtl-werks,
ritem1 TYPE j_1iexcdtl-ritem1,
rdoc1 TYPE j_1iexcdtl-rdoc1,
docyr TYPE j_1iexcdtl-docyr,
bedinv type J_1IBEDINV,
ecsinv type J_1IECSINV,
EXADDINV1 type J_1IEXADDINV1,
exaddtax1 TYPE j_1iexcdtl-exaddtax1,
rdoc2 TYPE j_1iexcdtl-rdoc2,
ritem2 TYPE j_1iexcdtl-ritem2,
menge TYPE j_1iexcdtl-menge,
ADDED FOR RUDRAPUR ON 08.03.2008 BY ASHOK.CH
*ENDED ON 08.02.2008
END OF wa1_j_1iexcdtl.
TYPES :BEGIN OF wa1_lfa1,
name1 TYPE lfa1-name1,
ktokk TYPE lfa1-ktokk,
werks TYPE lfa1-werks,
lifnr TYPE lfa1-lifnr,
END OF wa1_lfa1.
TYPES :BEGIN OF wa1_ekexclf,
belnr TYPE ekbe-belnr,
budat TYPE ekbe-budat,
menge TYPE ekbe-menge,
ebelp TYPE ekbe-ebelp,
ebeln TYPE ekbe-ebeln,
gjahr TYPE ekbe-gjahr,
awkey(20) TYPE c,
exnum TYPE j_1iexcdtl-exnum,
exdat TYPE j_1iexcdtl-exdat,
lifnr TYPE j_1iexcdtl-lifnr,
matnr TYPE j_1iexcdtl-matnr ,
maktx TYPE j_1iexcdtl-maktx ,
capind TYPE j_1iexcdtl-capind,
exbas TYPE j_1iexcdtl-exbas,
exbed TYPE j_1iexcdtl-exbed,
ecs TYPE j_1iexcdtl-ecs,
werks TYPE j_1iexcdtl-werks,
ritem1 TYPE j_1iexcdtl-ritem1,
rdoc1 TYPE j_1iexcdtl-rdoc1,
docyr TYPE j_1iexcdtl-docyr,
name1 TYPE lfa1-name1,
ktokk TYPE lfa1-ktokk,
exaddtax1 TYPE j_1iexcdtl-exaddtax1,
added for rudrapur on 08.03.2008 by ASHOK.CH
bedinv type J_1IBEDINV,
ecsinv type J_1IECSINV,
EXADDINV1 type J_1IEXADDINV1,
END OF MODIFICATION ON 08.02.2008
END OF wa1_ekexclf.
TYPES :BEGIN OF wa1_bkpf,
bukrs TYPE bkpf-bukrs,
belnr TYPE bkpf-belnr,
gjahr TYPE bkpf-gjahr,
budat TYPE bkpf-budat,
tcode TYPE bkpf-tcode,
awkey TYPE bkpf-awkey,
END OF wa1_bkpf.
TYPES :BEGIN OF wa1_bseg,
bukrs TYPE bseg-bukrs,
belnr TYPE bseg-belnr,
gjahr TYPE bseg-gjahr,
buzei TYPE bseg-buzei,
bschl TYPE bseg-bschl,
fwbas TYPE bseg-fwbas ,
pswbt TYPE bseg-pswbt,
hkont TYPE bseg-hkont,
wrbtr TYPE bseg-wrbtr,
ktosl TYPE bseg-ktosl,
koart TYPE bseg-koart,
shkzg TYPE bseg-shkzg,
mwskz TYPE bseg-mwskz,
qsskz TYPE bsis-qsskz,
dmbtr TYPE bseg-dmbtr,
lifnr TYPE bseg-lifnr,
matnr TYPE bseg-matnr,
flag TYPE C,
flag_21 TYPE C,
END OF wa1_bseg.
TYPES :BEGIN OF wa1_tax,
belnr TYPE bseg-belnr,
fi_docno TYPE bseg-belnr,
gjahr TYPE bseg-gjahr,
bukrs TYPE bseg-bukrs,
awkey TYPE bkpf-awkey,
fwbas TYPE bseg-fwbas ,
cst_amt TYPE bseg-pswbt,
vat_amt TYPE bseg-pswbt,
shcess_amt TYPE bseg-pswbt,
gl_accnt TYPE bseg-hkont,
gl_desc TYPE skat-txt50,
wctglacc TYPE bseg-hkont,
wctamt TYPE bseg-dmbtr,
taxcode TYPE t059z-wt_withcd,
taxperc TYPE t059z-qsatz,
total_value TYPE bseg-wrbtr,
set_off TYPE bseg-wrbtr,
cond_type TYPE konv-kschl,
description(20) TYPE c,
service_tax TYPE bseg-wrbtr,
service_ecess TYPE bseg-wrbtr,
service_shcess TYPE bseg-wrbtr, "vincy on 31.01.08
ebelp TYPE ekbe-ebelp, " on 15.04.08
flag TYPE c,
mwskz TYPE bseg-mwskz,
END OF wa1_tax.
DATA:BEGIN OF itab_skat,
saknr TYPE skat-saknr,
spras TYPE skat-spras,
txt50 TYPE skat-txt50,
END OF itab_skat.
DATA: iskat LIKE itab_skat OCCURS 0,
wa_skat LIKE itab_skat.
DATA : BEGIN OF zbsis OCCURS 0,
bukrs TYPE bsis-bukrs,
hkont TYPE bsis-hkont,
augdt TYPE bsis-augdt,
augbl TYPE bsis-augbl,
zuonr TYPE bsis-zuonr,
gjahr TYPE bsis-gjahr,
belnr TYPE bsis-belnr,
buzei TYPE bsis-buzei,
budat TYPE bsis-budat,
qsskz TYPE bsis-qsskz,
END OF zbsis.
DATA: BEGIN OF zt059z OCCURS 0,
land1 TYPE t059z-land1,
witht TYPE t059z-witht,
wt_withcd TYPE t059z-wt_withcd,
qscod TYPE t059z-qscod,
qsatz TYPE t059z-qsatz,
hkont TYPE bsis-hkont,
belnr TYPE bsis-belnr,
END OF zt059z.
DATA: BEGIN OF it_faglflexa OCCURS 0, "added by vincy
ryear TYPE faglflexa-ryear,
docnr TYPE faglflexa-docnr,
rldnr TYPE faglflexa-rldnr,
rbukrs TYPE faglflexa-rbukrs,
docln TYPE faglflexa-docln,
prctr TYPE faglflexa-prctr,
END OF it_faglflexa.
Final Table***
TYPES :BEGIN OF wa1_final,
belnr TYPE ekbe-belnr,
fi_docno TYPE bseg-belnr,
budat TYPE ekbe-budat,
menge TYPE ekbe-menge,
rate TYPE konv-kbetr,
ebelp TYPE ekbe-ebelp,
ebeln TYPE ekbe-ebeln,
mwskz TYPE bseg-mwskz,
gjahr TYPE ekbe-gjahr,
awkey(20) TYPE c,
exnum TYPE j_1iexcdtl-exnum,
exdat TYPE j_1iexcdtl-exdat,
lifnr TYPE j_1iexcdtl-lifnr,
matnr TYPE j_1iexcdtl-matnr ,
maktx TYPE j_1iexcdtl-maktx ,
capind TYPE string,
exbas TYPE j_1iexcdtl-exbas,
exbed TYPE j_1iexcdtl-exbed,
ecs TYPE j_1iexcdtl-ecs,
werks TYPE j_1iexcdtl-werks,
ritem1 TYPE j_1iexcdtl-ritem1,
rdoc1 TYPE j_1iexcdtl-rdoc1,
docyr TYPE j_1iexcdtl-docyr,
name1 TYPE lfa1-name1,
ktokk TYPE lfa1-ktokk,
fwbas TYPE bseg-fwbas ,
vat_per TYPE konv-kbetr,
vat_amt TYPE bseg-pswbt,
cst_per TYPE konv-kbetr,
cst_amt TYPE bseg-pswbt,
shcess_amt TYPE bseg-pswbt,
gl_accnt TYPE bseg-hkont,
gl_desc TYPE skat-txt50,
wctglacc TYPE bseg-hkont,
wctamt TYPE bseg-dmbtr,
taxcode TYPE t059z-wt_withcd,
taxperc TYPE t059z-qsatz,
total_value TYPE bseg-wrbtr,
total_value1 TYPE bseg-wrbtr,
excise_tax TYPE bseg-wrbtr,
excise TYPE bseg-wrbtr,
set_off TYPE bseg-wrbtr,
inventorised TYPE konv-kawrt,
cond_type TYPE konv-kschl,
cond_type2 TYPE konv-kschl,
description(20) TYPE c,
service_tax TYPE bseg-wrbtr,
service_ecess TYPE bseg-wrbtr,
service_shcess TYPE bseg-wrbtr, "vincy on 31.01.08
END OF wa1_final.
DATA :it2_ekbe TYPE TABLE OF wa1_ekbe WITH HEADER LINE,
it_ekbe TYPE TABLE OF wa1_ekbe WITH HEADER LINE,
it1_ekbe TYPE TABLE OF wa2_ekbe WITH HEADER LINE WITH KEY ebelp ebeln,
it_j_1iexcdtl TYPE TABLE OF wa1_j_1iexcdtl WITH HEADER LINE WITH KEY rdoc1 ritem1,
it_lfa1 TYPE TABLE OF wa1_lfa1 WITH HEADER LINE WITH KEY lifnr,
it_lfa2 TYPE TABLE OF wa1_lfa1 WITH HEADER LINE WITH KEY lifnr,
it_bkpf TYPE TABLE OF wa1_bkpf WITH HEADER LINE,
it_bseg TYPE TABLE OF wa1_bseg WITH HEADER LINE WITH KEY
bukrs belnr gjahr ktosl shkzg koart,
it1_bseg TYPE TABLE OF wa1_bseg WITH HEADER LINE WITH KEY
bukrs belnr gjahr ktosl shkzg koart,
it_tax TYPE TABLE OF wa1_tax WITH HEADER LINE WITH KEY awkey ,
it_ekexclf TYPE TABLE OF wa1_ekexclf WITH HEADER LINE,
it_final TYPE TABLE OF wa1_final WITH HEADER LINE,
it_final1 TYPE TABLE OF wa1_final WITH HEADER LINE, "vincy
wa_ekbe TYPE wa1_ekbe,
wa1_ekbe TYPE wa2_ekbe,
wa_j_1iexcdtl TYPE wa1_j_1iexcdtl,
wa_lfa1 TYPE wa1_lfa1,
wa_lfa2 TYPE wa1_lfa1,
wa_bkpf TYPE wa1_bkpf,
wa_bseg TYPE wa1_bseg,
wa_tax TYPE wa1_tax,
wa_ekexclf TYPE wa1_ekexclf,
PLANT TYPE WERKS_D,
wa_final TYPE wa1_final.
DATA: it_konv TYPE konv OCCURS 0 WITH HEADER LINE ,
wa_konv TYPE konv,
invent TYPE p DECIMALS 4,
invent1 TYPE konv-kawrt.
DATA:d1 TYPE konv-kposn,
d2 TYPE ekbe-ebelp.
DATA: v_belnr TYPE ekbe-belnr,
v_gjahr TYPE ekbe-gjahr,
v_awkey(20) TYPE c,
idx TYPE sy-tabix.
**********by vincy on 12.01.07***********
DATA: BEGIN OF it_ekko OCCURS 0,
ebeln LIKE ekko-ebeln,
bukrs LIKE ekko-bukrs,
bsart LIKE ekko-bsart,
lifnr LIKE ekko-lifnr,
belnr LIKE ekbe-belnr,
END OF it_ekko.
DATA: BEGIN OF it_ekpo OCCURS 0,
ebeln LIKE ekpo-ebeln,
ebelp LIKE ekpo-ebelp,
txz01 LIKE ekpo-txz01,
END OF it_ekpo.
DATA: BEGIN OF it_lfa1v OCCURS 0,
lifnr LIKE lfa1-lifnr,
name1 LIKE lfa1-name1,
END OF it_lfa1v.
DATA: BEGIN OF s_prctr OCCURS 0,
low LIKE faglflexa-prctr,
END OF s_prctr.
DATA: it_bsegv TYPE TABLE OF wa1_bseg WITH HEADER LINE.
DATA: it_konv1 LIKE konv OCCURS 0 WITH HEADER LINE.
DATA:cnt TYPE i,
awkey1(250).
DATA: LIFNR TYPE LIFNR,
NAME TYPE NAME1_GP,
MTART TYPE MARA-MTART,
MAKTX TYPE MAKTX,
TAX_TOT TYPE KWERT.
***********end of changes by vincy ************
Selection Screen
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
SELECT-OPTIONS: s_werks1 FOR ekbe-werks,
s_budat1 FOR ekbe-budat,
s_fiscal FOR ekbe-gjahr,
s_lifnr FOR lfa1-lifnr.
SELECTION-SCREEN END OF BLOCK b1.
**"changes being by nahid on 16.04.2008
PARAMETERS : excel AS CHECKBOX DEFAULT 'X'.
PARAMETERS: infile LIKE rlgrap-filename.
DATA : zfile TYPE string.
**"changes ended by nahid on 16.04.2008
AT SELECTION-SCREEN.
IF s_werks1 IS INITIAL.
MESSAGE 'Please Enter Plant details' TYPE 'E'.
ENDIF.
IF s_budat1 IS INITIAL.
MESSAGE 'Please Enter Posting date' TYPE 'E'.
ENDIF.
IF s_fiscal IS INITIAL.
MESSAGE 'Please Enter Fiscal Year' TYPE 'E'.
ENDIF.
*start change by nahid on 16.4.08
AT SELECTION-SCREEN ON VALUE-REQUEST FOR infile.
CALL FUNCTION 'KD_GET_FILENAME_ON_F4'
CHANGING
file_name = infile
EXCEPTIONS
mask_too_long = 1
OTHERS = 2.
zfile = infile.
*end change by nahid on 16.4.08
START-OF-SELECTION.
plant = s_werks1-low.
MODIFIED FOR RUDRAPUR BY ASHOK.CH ON 13.03.2008
IF PLANT NE 'RD01'.
PERFORM get_data.
PERFORM get_zpsr. "vincy
ENDIF.
IF PLANT EQ 'RD01'.
PERFORM get_data1.
ENDIF.
*END OF MODIFICATION ON 13.03.2008
PERFORM build_fieldcatalog.
PERFORM build_layout.
PERFORM display_alv_report.
*start chng by nahid on 16.4.08
IF excel = 'X'.
IF NOT infile IS INITIAL.
PERFORM excel_data.
ELSE.
MESSAGE e000(0) WITH 'Please Enter the File Path'.
ENDIF.
ENDIF.
*end by nahid on 16.4.08
*& Form get_data
FORM get_data .
SELECT belnr budat menge matnr ebelp ebeln gjahr lfbnr lfpos bldat REEWR FROM ekbe INTO
TABLE it_ekbe
WHERE werks IN s_werks1 AND
(bewtp EQ 'Q' OR bewtp EQ 'N') AND
bewtp IN ('Q' , 'N') AND "added N by vincy on 6.07.2008
budat IN s_budat1 AND
gjahr IN s_fiscal .
IF sy-subrc = 0. "for 1st ekbe
IF it_ekbe[] IS NOT INITIAL.
SELECT exnum exdat lifnr matnr maktx capind exbas exbed ecs werks
ritem1 rdoc1 docyr bedinv ecsinv EXADDINV1 exaddtax1 rdoc2 ritem2 menge
FROM j_1iexcdtl INTO TABLE it_j_1iexcdtl FOR ALL ENTRIES IN it_ekbe
WHERE rdoc1 = it_ekbe-ebeln
AND ritem1 = it_ekbe-ebelp AND
lifnr IN s_lifnr.
ENDIF.
IF it_j_1iexcdtl[] IS NOT INITIAL.
SELECT name1 ktokk werks lifnr FROM lfa1 INTO
TABLE it_lfa1 FOR ALL ENTRIES IN it_j_1iexcdtl
WHERE lifnr = it_j_1iexcdtl-lifnr.
ENDIF.
LOOP AT it_ekbe INTO wa_ekbe.
wa1_ekbe-belnr = wa_ekbe-belnr.
wa1_ekbe-budat = wa_ekbe-budat.
wa1_ekbe-menge = wa_ekbe-menge.
wa1_ekbe-ebelp = wa_ekbe-ebelp.
wa1_ekbe-ebeln = wa_ekbe-ebeln.
wa1_ekbe-gjahr = wa_ekbe-gjahr.
wa1_ekbe-matnr = wa_ekbe-matnr.
wa1_ekbe-lfbnr = wa_ekbe-lfbnr.
wa1_ekbe-lfpos = wa_ekbe-lfpos.
wa1_ekbe-bldat = wa_ekbe-bldat.
v_belnr = wa_ekbe-belnr.
v_gjahr = wa_ekbe-gjahr.
CONCATENATE v_belnr v_gjahr INTO v_awkey.
wa1_ekbe-awkey = v_awkey.
APPEND wa1_ekbe TO it1_ekbe.
CLEAR :wa_ekbe.
ENDLOOP.
************changes by vincy on 29.05.08 for 'FB08' and 'FB60'**************
LOOP AT s_werks1.
IF s_werks1-low = 'KN01'.
s_prctr-low = 'MUKNHSTM'.
ELSEIF
s_werks1-low = 'NS01'.
s_prctr-low = 'MUNSKSTM'.
ELSEIF
s_werks1-low = 'RD01'.
s_prctr-low = 'MURDPSTM'.
ENDIF.
APPEND s_prctr.
ENDLOOP.
SELECT bukrs belnr gjahr budat tcode awkey FROM bkpf INTO TABLE it_bkpf
WHERE bukrs = 'MU51' AND
gjahr IN s_fiscal AND
budat IN s_budat1 AND
( tcode = 'FB60' OR tcode = 'FB08' ).
IF it_bkpf[] IS NOT INITIAL.
SELECT ryear docnr rldnr rbukrs docln prctr FROM faglflexa INTO TABLE it_faglflexa
FOR ALL ENTRIES IN it_bkpf WHERE rbukrs = 'MU51' AND
ryear = it_bkpf-gjahr AND
docnr = it_bkpf-belnr.
ENDIF.
LOOP AT it_faglflexa.
READ TABLE s_prctr WITH KEY low = it_faglflexa-prctr.
IF sy-subrc <> 0.
DELETE it_faglflexa.
ENDIF.
CLEAR: it_faglflexa, s_prctr.
ENDLOOP.
**************************end of change*************************************
IF it1_ekbe[] IS NOT INITIAL.
SELECT bukrs belnr gjahr budat tcode awkey FROM bkpf APPENDING
TABLE it_bkpf FOR ALL ENTRIES IN it1_ekbe
WHERE bukrs = 'MU51' AND
gjahr IN s_fiscal AND
awkey = it1_ekbe-awkey.
ENDIF.
IF sy-subrc = 0. "bkpf
IF it_bkpf[] IS NOT INITIAL.
SELECT bukrs belnr gjahr buzei bschl fwbas pswbt hkont wrbtr ktosl koart shkzg mwskz qsskz dmbtr lifnr matnr
FROM bseg INTO TABLE it1_bseg FOR ALL ENTRIES IN it_bkpf
WHERE belnr = it_bkpf-belnr AND
gjahr = it_bkpf-gjahr AND
bukrs = it_bkpf-bukrs AND
( bschl = '21' ) AND
lifnr IN s_lifnr. "added 21 for miro cancelation
IF it1_bseg[] IS NOT INITIAL.
SELECT bukrs belnr gjahr buzei bschl fwbas pswbt hkont wrbtr ktosl koart shkzg mwskz qsskz dmbtr lifnr matnr
FROM bseg INTO TABLE it_bseg FOR ALL ENTRIES IN it1_bseg
WHERE belnr = it1_bseg-belnr AND
gjahr = it1_bseg-gjahr AND "changed it_bkpf to it1_bseg
bukrs = it1_bseg-bukrs .
LOOP AT it_bseg.
it_bseg-wrbtr = it_bseg-wrbtr * -1.
it_bseg-fwbas = it_bseg-fwbas * -1.
it_bseg-pswbt = it_bseg-pswbt * -1.
it_bseg-flag_21 = 'X'.
MODIFY it_bseg.
CLEAR it_bseg.
ENDLOOP.
SELECT name1 ktokk werks lifnr FROM lfa1 INTO
TABLE it_lfa2 FOR ALL ENTRIES IN it1_bseg
WHERE lifnr = it1_bseg-lifnr.
ENDIF.
REFRESH it1_bseg.
SELECT bukrs belnr gjahr buzei bschl fwbas pswbt hkont wrbtr ktosl koart shkzg mwskz qsskz dmbtr lifnr matnr
FROM bseg INTO TABLE it1_bseg FOR ALL ENTRIES IN it_bkpf
WHERE belnr = it_bkpf-belnr AND
gjahr = it_bkpf-gjahr AND
bukrs = it_bkpf-bukrs AND
( bschl = '31' ) AND "added bschl and lifnr by vincy
lifnr IN s_lifnr.
IF it1_bseg[] IS NOT INITIAL.
SELECT name1 ktokk werks lifnr FROM lfa1 APPENDING
TABLE it_lfa2 FOR ALL ENTRIES IN it1_bseg
WHERE lifnr = it1_bseg-lifnr.
SELECT bukrs belnr gjahr buzei bschl fwbas pswbt hkont wrbtr ktosl koart shkzg mwskz qsskz dmbtr lifnr matnr
FROM bseg APPENDING TABLE it_bseg FOR ALL ENTRIES IN it1_bseg
WHERE belnr = it1_bseg-belnr AND
gjahr = it1_bseg-gjahr AND "changed it_bkpf to it1_bseg
bukrs = it1_bseg-bukrs AND
bschl <> '35'. "added bschl to avoid vendor paymnt
ENDIF.
SELECT bukrs belnr gjahr buzei bschl fwbas pswbt hkont wrbtr ktosl koart shkzg mwskz qsskz dmbtr lifnr
FROM bseg APPENDING CORRESPONDING FIELDS OF TABLE it_bseg
FOR ALL ENTRIES IN it_bkpf
WHERE belnr = it_bkpf-belnr AND
gjahr = it_bkpf-gjahr AND
lifnr IN s_lifnr AND
bukrs = it_bkpf-bukrs AND qsskz IN ('WI', 'WJ').
ENDIF.
ENDIF.
SORT it_bseg BY belnr buzei.
IF NOT it_bseg[] IS INITIAL.
SELECT saknr spras txt50 FROM skat
INTO TABLE iskat
FOR ALL ENTRIES IN it_bseg
WHERE saknr = it_bseg-hkont AND spras = 'EN'.
SELECT bukrs hkont augdt augbl zuonr gjahr belnr buzei budat qsskz FROM bsis
INTO TABLE zbsis
FOR ALL ENTRIES IN it_bseg
WHERE bukrs = 'MU51' AND hkont = it_bseg-hkont
AND belnr = it_bseg-belnr AND gjahr = s_fiscal
AND budat IN s_budat1.
ENDIF.
LOOP AT it_bseg.
READ TABLE zbsis WITH KEY hkont = it_bseg-hkont.
IF sy-subrc = 0.
it_bseg-qsskz = zbsis-qsskz.
MODIFY it_bseg.
ENDIF.
CLEAR: it_bseg,zbsis.
ENDLOOP.
LOOP AT zt059z.
LOOP AT it_bseg WHERE qsskz = zt059z-wt_withcd.
zt059z-hkont = it_bseg-hkont.
zt059z-belnr = it_bseg-belnr.
MODIFY zt059z.
CLEAR: it_bseg,zt059z.
ENDLOOP.
ENDLOOP.
CLEAR: wa_bkpf.
*******Filling Wa.
LOOP AT it_bkpf INTO wa_bkpf. "changes by vincy on 14.04.2008
LOOP AT it1_ekbe INTO wa1_ekbe .
READ TABLE it_bkpf INTO wa_bkpf
WITH KEY awkey = wa1_ekbe-awkey.
wa_tax-belnr = wa_bkpf-belnr.
wa_tax-gjahr = wa_bkpf-gjahr.
wa_tax-bukrs = wa_bkpf-bukrs.
wa_tax-awkey = wa_bkpf-awkey.
wa_tax-ebelp = wa1_ekbe-ebelp.
CLEAR: wa_bseg,wa_skat.
READ TABLE it_bseg WITH KEY bukrs = wa_bkpf-bukrs
belnr = wa_bkpf-belnr
gjahr = wa_bkpf-gjahr INTO wa_bseg.
IF sy-subrc = 0.
wa_tax-fi_docno = wa_bseg-belnr.
wa_tax-mwskz = wa_bseg-mwskz.
CLEAR: wa_bseg.
READ TABLE it_bseg WITH KEY bukrs = wa_bkpf-bukrs
belnr = wa_bkpf-belnr
gjahr = wa_bkpf-gjahr
flag = ''
ktosl = 'JP4' INTO wa_bseg.
IF sy-subrc = 0.
wa_bseg-flag = 'X'.
MODIFY it_bseg INDEX sy-tabix FROM wa_bseg.
wa_tax-gl_accnt = wa_bseg-hkont.
READ TABLE iskat INTO wa_skat WITH KEY saknr = wa_bseg-hkont.
IF sy-subrc = 0.
wa_tax-gl_desc = wa_skat-txt50.
ENDIF.
wa_tax-set_off = wa_bseg-wrbtr.
wa_tax-fwbas = wa_bseg-fwbas.
wa_tax-cst_amt = wa_bseg-pswbt.
wa_tax-description = 'CST CG Sett off'.
wa_tax-cond_type = 'JVCS'.
ENDIF.
READ TABLE it_bseg WITH KEY bukrs = wa_bkpf-bukrs
belnr = wa_bkpf-belnr
gjahr = wa_bkpf-gjahr
flag = ''
ktosl = 'VS1' INTO wa_bseg.
IF sy-subrc = 0.
wa_bseg-flag = 'X'.
MODIFY it_bseg INDEX sy-tabix FROM wa_bseg.
wa_tax-fwbas = wa_bseg-fwbas.
ENDIF.
READ TABLE it_bseg WITH KEY bukrs = wa_bkpf-bukrs
belnr = wa_bkpf-belnr
gjahr = wa_bkpf-gjahr
flag = ''
ktosl = 'JP7' INTO wa_bseg.
IF sy-subrc = 0.
wa_bseg-flag = 'X'.
MODIFY it_bseg INDEX sy-tabix FROM wa_bseg.
wa_tax-gl_accnt = wa_bseg-hkont.
READ TABLE iskat INTO wa_skat WITH KEY saknr = wa_bseg-hkont.
IF sy-subrc = 0.
wa_tax-gl_desc = wa_skat-txt50.
ENDIF.
wa_tax-set_off = wa_bseg-wrbtr.
wa_tax-fwbas = wa_bseg-fwbas.
wa_tax-vat_amt = wa_bseg-pswbt.
wa_tax-description = 'VAT CG Sett off'.
wa_tax-cond_type = 'JVCD'.
ENDIF.
CLEAR wa_bseg.
READ TABLE it_bseg WITH KEY bukrs = wa_bkpf-bukrs
belnr = wa_bkpf-belnr
gjahr = wa_bkpf-gjahr
flag = ''
ktosl = 'JP5' INTO wa_bseg.
READ TABLE it_bseg WITH KEY bukrs = wa_bkpf-bukrs
belnr = wa_bkpf-belnr
gjahr = wa_bkpf-gjahr
hkont = '0002868001' INTO wa_bseg. "vat changed for V0 tax code
IF sy-subrc = 0.
wa_bseg-flag = 'X'.
MODIFY it_bseg INDEX sy-tabix FROM wa_bseg.
wa_tax-gl_accnt = wa_bseg-hkont.
READ TABLE iskat INTO wa_skat WITH KEY saknr = wa_bseg-hkont.
IF sy-subrc = 0.
wa_tax-gl_desc = wa_skat-txt50.
ENDIF.
wa_tax-vat_amt = wa_bseg-pswbt.
wa_tax-set_off = wa_bseg-wrbtr.
wa_tax-cond_type = 'JVRD'.
wa_tax-fwbas = wa_bseg-fwbas.
wa_tax-description = 'VAT RM Set off'.
ENDIF.
CLEAR: wa_bseg,wa_skat.
READ TABLE it_bseg WITH KEY bukrs = wa_bkpf-bukrs
belnr = wa_bkpf-belnr
gjahr = wa_bkpf-gjahr
shkzg = 'H'
koart = 'K'
INTO wa_bseg.
IF sy-subrc = 0.
wa_tax-total_value = wa_bseg-wrbtr.
ENDIF.
START OF MODIFICATION BY ASHOK.CH ON 08.02.2008
service_tax
CLEAR wa_bseg.
READ TABLE it_bseg WITH KEY bukrs = wa_bkpf-bukrs
belnr = wa_bkpf-belnr
gjahr = wa_bkpf-gjahr
flag = ''
ktosl = 'VS8' INTO wa_bseg.
IF sy-subrc = 0.
wa_bseg-flag = 'X'.
MODIFY it_bseg INDEX sy-tabix FROM wa_bseg.
wa_tax-gl_accnt = wa_bseg-hkont.
READ TABLE iskat INTO wa_skat WITH KEY saknr = wa_bseg-hkont.
IF sy-subrc = 0.
wa_tax-gl_desc = wa_skat-txt50.
ENDIF.
wa_tax-service_tax = wa_bseg-wrbtr.
wa_tax-description = 'Service Tax'.
wa_tax-cond_type = 'JSRT'.
ENDIF.
service_ecess
CLEAR: wa_bseg,wa_skat.
READ TABLE it_bseg WITH KEY bukrs = wa_bkpf-bukrs
belnr = wa_bkpf-belnr
gjahr = wa_bkpf-gjahr
flag = ''
ktosl = 'VS9' INTO wa_bseg.
IF sy-subrc = 0.
wa_bseg-flag = 'X'.
MODIFY it_bseg INDEX sy-tabix FROM wa_bseg.
wa_tax-service_ecess = wa_bseg-wrbtr.
ENDIF.
**********changes by vincy on 31.01.08*********************
service_shcess
CLEAR: wa_bseg.
READ TABLE it_bseg WITH KEY bukrs = wa_bkpf-bukrs
belnr = wa_bkpf-belnr
gjahr = wa_bkpf-gjahr
flag = ''
ktosl = 'VSE' INTO wa_bseg.
IF sy-subrc = 0.
wa_bseg-flag = 'X'.
MODIFY it_bseg INDEX sy-tabix FROM wa_bseg.
wa_tax-service_shcess = wa_bseg-wrbtr.
ENDIF.
*************************end of changes***********************
END OF MODIFICATION ON 08.02.2008
APPEND wa_tax TO it_tax.
ENDIF.
CLEAR :wa_tax,wa_bseg,wa_bkpf,wa_skat.
ENDLOOP.
CLEAR wa1_ekbe.
LOOP AT it1_ekbe INTO wa1_ekbe.
READ TABLE it_j_1iexcdtl INTO wa_j_1iexcdtl
WITH KEY rdoc1 = wa1_ekbe-ebeln
ritem1 = wa1_ekbe-ebelp.
*New query added by Nilesh
READ TABLE it_j_1iexcdtl INTO wa_j_1iexcdtl
WITH KEY rdoc1 = wa1_ekbe-lfbnr
ritem2 = wa1_ekbe-lfpos.
READ TABLE it_bkpf INTO wa_bkpf
WITH KEY awkey = wa1_ekbe-awkey.
IF sy-subrc = 0.
READ TABLE it_bseg WITH KEY bukrs = wa_bkpf-bukrs
belnr = wa_bkpf-belnr
gjahr = wa_bkpf-gjahr.
IF sy-subrc = 0.
wa_ekexclf-belnr = wa1_ekbe-belnr.
wa_ekexclf-budat = wa1_ekbe-budat.
wa_ekexclf-menge = wa1_ekbe-menge.
wa_ekexclf-ebelp = wa1_ekbe-ebelp.
wa_ekexclf-ebeln = wa1_ekbe-ebeln.
wa_ekexclf-gjahr = wa1_ekbe-gjahr.
wa_ekexclf-awkey = wa1_ekbe-awkey.
wa_ekexclf-lifnr = it_bseg-lifnr.
wa_ekexclf-matnr = it_bseg-matnr .
READ TABLE it_j_1iexcdtl INTO wa_j_1iexcdtl "for records for which either rdoc1 or matnr
WITH KEY rdoc2 = wa1_ekbe-lfbnr "not maintained in ekbe by vincy on 16.06.08
menge = wa1_ekbe-menge.
IF sy-subrc <> 0 .
READ TABLE it_j_1iexcdtl INTO wa_j_1iexcdtl
WITH KEY rdoc1 = wa1_ekbe-ebeln
exdat = wa1_ekbe-bldat
matnr = wa1_ekbe-matnr
menge = wa1_ekbe-menge.
ENDIF.
READ TABLE it_j_1iexcdtl INTO wa_j_1iexcdtl
WITH KEY rdoc1 = wa1_ekbe-ebeln
ritem1 = wa1_ekbe-ebelp.
IF sy-subrc = 0.
wa_ekexclf-belnr = wa1_ekbe-belnr.
wa_ekexclf-budat = wa1_ekbe-budat.
wa_ekexclf-menge = wa1_ekbe-menge.
wa_ekexclf-ebelp = wa1_ekbe-ebelp.
wa_ekexclf-ebeln = wa1_ekbe-ebeln.
wa_ekexclf-gjahr = wa1_ekbe-gjahr.
wa_ekexclf-awkey = wa1_ekbe-awkey.
wa_ekexclf-exnum = wa_j_1iexcdtl-exnum.
wa_ekexclf-exdat = wa_j_1iexcdtl-exdat.
wa_ekexclf-lifnr = wa_j_1iexcdtl-lifnr.
wa_ekexclf-matnr = wa_j_1iexcdtl-matnr .
wa_ekexclf-maktx = wa_j_1iexcdtl-maktx .
wa_ekexclf-capind = wa_j_1iexcdtl-capind.
wa_ekexclf-exbas = wa_j_1iexcdtl-exbas.
wa_ekexclf-exbed = wa_j_1iexcdtl-exbed.
wa_ekexclf-ecs = wa_j_1iexcdtl-ecs.
wa_ekexclf-werks = wa_j_1iexcdtl-werks.
wa_ekexclf-ritem1 = wa_j_1iexcdtl-ritem1.
wa_ekexclf-rdoc1 = wa_j_1iexcdtl-rdoc1.
wa_ekexclf-docyr = wa_j_1iexcdtl-docyr.
wa_ekexclf-exaddtax1 = wa_j_1iexcdtl-exaddtax1.
IF it_bseg-flag_21 = 'X'.
wa_ekexclf-exbas = wa_ekexclf-exbas * -1.
ENDIF.
MODIFIED BY ASHOK.CH ON 08.03.2008
IF wa_j_1iexcdtl-WERKS NE 'RD01' .
wa_ekexclf-exbed = wa_j_1iexcdtl-exbed.
wa_ekexclf-ecs = wa_j_1iexcdtl-ecs.
wa_ekexclf-exaddtax1 = wa_j_1iexcdtl-exaddtax1.
IF it_bseg-flag_21 = 'X'.
wa_ekexclf-exbed = wa_ekexclf-exbed * -1.
wa_ekexclf-ecs = wa_ekexclf-ecs * -1.
wa_ekexclf-exaddtax1 = wa_ekexclf-exaddtax1 * -1.
ENDIF.
ELSE.
wa_ekexclf-exbed = wa_j_1iexcdtl-BEDINV.
wa_ekexclf-ecs = wa_j_1iexcdtl-ecsINV.
wa_ekexclf-exaddtax1 = wa_j_1iexcdtl-exaddINV1.
ENDIF.
END IF MODIFICATION ON 08.03.2008
APPEND wa_ekexclf TO it_ekexclf.
CLEAR :wa_lfa1,wa_j_1iexcdtl,wa1_ekbe.
ENDIF.
READ TABLE it_lfa2 INTO wa_lfa2
WITH KEY lifnr = wa_ekexclf-lifnr.
IF sy-subrc = 0.
wa_ekexclf-name1 = wa_lfa2-name1.
wa_ekexclf-ktokk = wa_lfa2-ktokk.
ENDIF.
APPEND wa_ekexclf TO it_ekexclf.
ENDIF.
ENDIF.
CLEAR :wa_lfa1,wa_j_1iexcdtl,wa1_ekbe,wa_lfa2,wa_ekexclf.
ENDLOOP.
CLEAR wa_ekexclf.
LOOP AT it_ekexclf INTO wa_ekexclf.
wa_final-belnr = wa_ekexclf-belnr.
wa_final-budat = wa_ekexclf-budat.
wa_final-menge = wa_ekexclf-menge.
wa_final-ebelp = wa_ekexclf-ebelp.
wa_final-ebeln = wa_ekexclf-ebeln.
wa_final-gjahr = wa_ekexclf-gjahr.
wa_final-awkey = wa_ekexclf-awkey.
wa_final-exnum = wa_ekexclf-exnum.
wa_final-exdat = wa_ekexclf-exdat.
wa_final-lifnr = wa_ekexclf-lifnr.
wa_final-matnr = wa_ekexclf-matnr .
wa_final-maktx = wa_ekexclf-maktx .
wa_final-shcess_amt = wa_ekexclf-exaddtax1.
IF wa_ekexclf-capind = 'C'.
wa_final-capind = 'Consumables'.
ENDIF.
IF wa_ekexclf-capind = 'A'.
wa_final-capind = 'Assets'.
ENDIF.
IF wa_ekexclf-capind = 'T'.
wa_final-capind = 'Tools'.
ENDIF.
IF wa_ekexclf-capind = ''.
wa_final-capind = 'Raw Material'.
ENDIF.
IF wa_ekexclf-capind = 'N'.
wa_final-capind = 'Non Cenvatable'.
ENDIF.
IF wa_ekexclf-capind NE 'C' AND wa_ekexclf-capind NE 'A' AND
wa_ekexclf-capind NE '' AND wa_ekexclf-capind NE 'N'.
wa_final-capind = wa_ekexclf-capind.
ENDIF.
wa_final-exbas = wa_ekexclf-exbas.
wa_final-exbed = wa_ekexclf-exbed.
wa_final-ecs = wa_ekexclf-ecs.
wa_final-werks = wa_ekexclf-werks.
wa_final-ritem1 = wa_ekexclf-ritem1.
wa_final-rdoc1 = wa_ekexclf-rdoc1.
wa_final-docyr = wa_ekexclf-docyr.
wa_final-name1 = wa_ekexclf-name1.
wa_final-ktokk = wa_ekexclf-ktokk.
wa_final-excise = wa_final-exbas + wa_final-exbed + wa_final-ecs + wa_final-shcess_amt.
CLEAR :wa_tax.Hi ,
I think you are using the redundant selects to fetch the data from BSEG.
First select all the data into an internal table based on bkpf.
Now you can distribute the data into whatever tables you want using the loop,read-binary search and append statements..
Loop at it_bseg.
read it_bseg where
xxxxx
xxxxx
binary search.
append wa to it2_bseg.
endloop
This avoid several database fetches..
Thank you.. -
Hi, I'm a fairly new Aperture user and have just started storing my photos on an external hard drive. An error message appeared when I was relocating originals of a project. It stopped relocating at one image, saying that the jpeg file did not exist. I found the raw file name under the new project folder that I was relocating it to, but it's jpeg pair did not move. The file names look identical except one ends in .JPG and the other as .NEF. I tried to combine originals, but I got the same error message and when I looked at the files the raw now had (1) attached to it, whereas the jped didn't. The Aperture window started to close unexpectedly many times. I tried Repair Permissions and Repair Database and that seemed to stop Aperture from closing unexpectedly, but the raw and jpeg pair are still in separate folders. How can I get them paired up again or does it matter? I'm using Mac OS X and Aperture version 3.4.5.
Thanks,
sophieIf you don't take care when choosing the location for referenced images, you can create some problems for yourself.
From an operational perspective 'Managed' images means Aperture will take care of the image file storage for you, 'Referenced' means you will take care of it yourself.
There are a number of things that may have happened but this is what I think is most likely:
If you shoot a lot of photos with the same brand of camera, eventually you'll end up with duplicate file names, for example two different files called DSC_1234.NEF. If you attempt to store these in the same folder yourself, worse case scenario is you may inadvertently overwite one of the files. If you use Aperture to relocate, you'll get one of the files with a new name of DSC_1234 (1).NEF.
So your first step is to figure out what these files really are. Are they duplicates, or are they different files with the same name, and do they each have a matching .JPG
Aperture has the tools to fix up the problem, but you need to confirm what the problem is first.
If you don't have many of the (1) files, it may be worth continuing your 'relocate' to subfolders - making sure your subfolder hierarchy doesn't cause duplicate names to be stored together. Then when everything else is stored correctly, address the problem images by moving them to where they should be, with the right name and the JPG/NEF pairs together.
You can then search for missing files in Aperture and use the 'Locate Referenced Images' to reconnect them with Aperture.
Andy -
I have processed my raw and jpeg files on my iPad using Snapseed . What format are they saved in on the iPad and how do I transfer them back to my pc where I use photoshop elements. Can I use just an ordinary flaws drive with the USB adaptor? Thanks any help would be appreciated.
LynneThe camera connection kit can only be used to import photo/video files form a camera, SD card or USB flash drive. You can't import other types of files. You can't export any type of files using the camera connection kit.
Importing Personal Photos and videos from your iOS device to your computer.
http://support.apple.com/kb/HT4083
Cheers, Tom -
Best practice for photo format: RAW+PSD+JPEG?
What is the best practice in maintaining format of files while editing?
I shoot in RAW and import into PS CS5. After editing, it allows me to save as various formats, including PSD and JPEG. PS says that if you want to re-edit the file, you should save as PSD as all the layers are maintained as-is. Hence I'd prefer to save as .PSD. However, in most cases, the end objective is to share the image with others and JPEG is the most suitable format. Does this mean, that for each image, its important to save it in 3 formats viz RAW, PSD and JPEG? Wont this increase the total space occupied tremendously? Is this how most professionals do it? Pls advice.Thanks everyone for this continued discussion in my absence over two weeks. Going through it i realize its helpful stuff. During this period, i downloaded Aperture trial and have learnt it (there's actually not much learning, its so incredibly intuitive and simple, but incredibly powerful. Since I used iphoto in the past, it just makes it easier.
I have also started editing my pics to put them up on my photo site. And over past 10 days, here is the workflow I have developed.
-Download RAW files onto my laptop using Canon s/w into a folder where i categorize and maintain all my images
-Import them into Aperture, but letting the photos reside in the folder structure i defined (rather than have Aperture use its own structure)
-Complete editing of all required images in Aperture (and this takes care of 80-90% of my pics)
-From within Aperture open in PS CS5 those images that require editing that cannot be done in Aperture
-Edit in CS5 and do 'Save', this brings them back to Aperture
-Now I have two versions of these images in Aperture - the original RAW and the new .PSD
-Select the images that I need to put up on my site and export them to a new folder from where i upload them
I would be keen to know if someone else follows a more efficient or robust workflow than this, would be happy to incorporate it.
There are still a couple questions I have:
1 - Related to PS CS5: Why do files opened in CS5 jump up in terms of their file size. Any RAW or JPEG file originally btn 2-10 MB shows up as minimum 27 MB in CS. The moment you do some edits and/or add layers, it reaches 50-150MB. This is ridiculous. I am sure I am doing something wrong. Or is this how CS5 works with everyone.
2 - After editing a file in CS by launching it from Aperture, I now end up with two versions in Aperture, the original file and the new .PSD file (which is usually 100MB+). I tried exporting the .PSD file to a folder to upload it on my site, and wasnt sure what format and size it would end up with. I got it as a JPEG file within reasonable filesize limits. Is this how Aperture works? Does Aperture allow you options of which format you want to save the file in?
Maybe you are looking for
-
Instead of trigger with ADO - once again
since everyone seems to ignore my last 2 posts, i thoght of tring one more time. before i give up the use of instead of updates and redesign the system, which really sux. i dont understand why i can get a response from the oracle team.. do i have to
-
[PLEASE HELP!] Converting Flash (fla) to Animated Gif (gif) becomes pixelated!!!!
Hey guys, Wondering if anyone can urgently help me please. I've got a FLA file making an animated banner. When I export it as an animated GIF, the background (which originally is a solid color) has either dots or crosses making up the color. I've tri
-
HT1918 How to remove my credit card from my App Store Account?
How I remove my credit card from my Apps Store Account?? I want to avoid unwanted purcharses from my nephew.... Someone can help me? I know it's possible to "upgrade" one account adding credit card, I can not find a way to remove it.
-
We would like to add and capture the value of a new field(Expiry date) into a table on Attachments page in Projects. Navigation to Page: Projects(responsibility) -> Search for a project using Search Projects-> Select/Open a project -> Goto Attachment
-
Oracle BPM / SOA Suite and Big and Complex Scenarios
Hi people, I have worked for a company that in the past chose Oracle BPM (ALBPM at the time) and one of the big problems that the company had was in relation about big processes and complex scenarios. This company is for the e-commerce area and our p