Fleet Managment - Fuel consumption & Mileage in MCIZ
Hi,
In MCIZ, the output shows only the following
1. Fuel Volume (Fuel consumption )
2. Miles /km (Distance Travelled)
3. Consump Dist (Fuel consumption per 100 km)
4.Costs per Route
5.Total actual costs
I want the following also.
Mileage
Miles per Litre
Km per Litre
Fuel Consumption
Litres/ km
Litres / mile
Litres per 100 mile
Can i add these in the standard report MCIZ ? If yes, how it can be done?
Thanks
Alagesan,
Some of them are already there.
MCI1_GET_FIGURE_IAFUELDIST
MCI1_GET_FIGURE_IAFUELDIST_US
MCI1_GET_FIGURE_IAFUELTIME
MCI1_GET_FIGURE_IAFUELTIME_US
MCI1_GET_FIGURE_IAKOSIST
MCI1_GET_FIGURE_IAMASSDIST
MCI1_GET_FIGURE_IAMASSDIST_US
MCI1_GET_FIGURE_IAMASSTIME
MCI1_GET_FIGURE_IAMASSTIME_US
MCI1_GET_FIGURE_IATTLCDIST
MCI1_GET_FIGURE_IATTLCDIST_US
MCI1_GET_FIGURE_IATTLCOPTM
You just need to a ssign them.
For others ,You can copy the existing ones and just change as appropriate.
Regards
Narasimhan
Similar Messages
-
Vehicle total consumption and cost report - Fleet Management
Dear All,
I have created a Fleet object having multiple fuels i.e. Gasoline and CNG and entered transactional data using IFCU transaction. My client need to know how much Gasoline and CNG was consumed for the Fleet Object and cost incurred for the fuel consumption. In MCIZ report it shows the total fuel consumption counter reading for the vehicle regardless of different fuel types.
Is there any standard report to view the said information?
Thanks & Regards,
Saif Ali MominThe following method may work for you
Divide the distance by the litres used to get the km/litre
Convert the km/litre to L/100 km i.e. divide 100 by km per litre
Convert km/litre to miles per gallon i.e. multiply km/litre by 2.825
Fuel conversion formula table
To convert Formula to use
km per litre to litres per 100 km divide 100 by km per litre
km per litre to miles per gallon multiply km per litre by 2.825
litres per 100km to miles per gallon divide 282.5 by litres per 100km
miles per gallon to litres per 100km divide 282.5 by miles per gallon
litres per 100km to km per litre divide 100 by litres per 100 km
miles per gallon to km per litre multiply miles per gallon by 0.354
km to miles multiply km by .62137
miles to km multiply miles by 1.6093
gallons to litres multiply gallons by 4.546
litres to gallons multiply litres by .21997
Hope this of help
Jim -
Standard Structure Not Updating (S114) Fleet Management
Hi...
We are implmenting the Fleet Management . I did the following configuration setting
1) Created view profile and assign with fleet object type.
2) Define the Consuamable type, Engine Type .
3) Setting done for unit of measurement for monitoring of consumption.
4) Dfined special measuring position for fleet objects.
5) Defined calculation method for fleet consumption methods.
6) Created gas station locatin.
7) Setting done for consumption relevent counter reading update.
After that I have created fleet as a equipment. After that I am posting the fuel in IFCU transaction. Now I am facing one problem that distance data is updating in MCIZ transaction but Fuel Volume data is not updating in the MCIZ report. In the PMIS stting, the key figure "IAMENFLVOL" reference indicator is "A" (Key Figure to be updated).
Can anybody help me to solve this problem
Thanks in advance.
Regards
PramodHi,
Check this link:
[Fleet Management|http://www.nd-solutions.com/pdfs/white_EAM/EAM_ConfiguringFleetMgt.pdf]
This link has all the steps with screen shots.
Also check SAP Note: 563832.
Hopefully this will resolve your issue.
Thanks,
Amit.
Edited by: Amit Saxena on Oct 23, 2008 10:12 PM -
Re: Fleet management in Plant Maintenance
Hi Guru's
Here i have an issue reg the configuration screens in PM
In SAP-SPRO---Plant maintenance and Costumer Services, I am not able to find the Screens required for configuration for FLEET MANAGEMENT i e.,
1) Set List Processing for Fleet management objects.
2) Set reference object screen for Vehicles.
3) Consumption Relevant Counter reading Update.
These are mandatory for capturing the cost of the fuel into reports of Vehicle analysis report.
Please any one can Send me whether we need go for any Patches or to update any notes.
Present i am using ECC-6 EHP-5
Please reply back ,it is very urgent.
Regards
KumarI hope, for the below points there is no separate configuration.
1) Set List Processing for Fleet management objects.
2) Set reference object screen for Vehicles.
For 3) Consumption Relevant Counter reading Update.
IMG => PM & CS => Information systems for PM & CS => Configure Measurement document update
I hope, this is common for all the versions. Please check. -
Dear Experts,
1)-Can any one tell me the Fleet Management concept in SAP PM?
Beacause till now I understand it is basically use for vehicle management.We can tracking the data by creating Measuring Counters & Measuring Documents & according to that we can find out fuel consumption etc. & also doing Maintenance.
But My doubt is that we can achive this from normal process also by creating equipment through IE01.
2)- Through IE31 Two Extra Tabs are coming.Is only for that we are using Fleet Management in SAP.
If you experts having any PPT or Blueprint please let me know.
Please help.
Thanks
VishalCheck this link from SAP help
[Fleet management|http://help.sap.com/saphelp_470/helpdata/en/e3/0aeb1802e211d39eeb0000e8323350/content.htm] -
Hi all,
How can i display the average daily fuel consumption,average distance covered per day and mileage of the vehicle?is there any t code for the same?
regards,
Ebinhi,
first of all you have to create equipment by t-code ie31.
create gas station, assign component togas station, plant & storage location.
then
make two counter for every equipment . one will be for consumption & second will be run hour.
then use t-code ifcu.
regards,
santosh -
How do I calculate fuel consumption?
Hello
As a long-time newbie to Numbers 2.1, I came across a long-term problem I haven't been able to solve:
How do I calculate the fuel-consumption of my car based on refuel-amount and mileage indicator?
I think I should do as follow:
purchased_fuel / (recent_mileage - previous_mileage), but I don't find a clue to do an automated (recent_mileage - previous_mileage) in Numbers!
Any help?
Thanks!Here is a table that perfroms the math to compute MPG (Miles Per Gallon):
D3=(C3-C2)/B3
this means in cell D3 type (or paste from this post) "=(C3-C2)/B3" without the double quotes
to "expand" the formula, more properly known as fill then formula, select the cell D3, grab (click and hold) the little circle at the bottom-right of the cell and drag down as shown. One comment I have is that my car has a an odometer and two trip counters (A and B). I use "B" to keep track of mileage since the last fillup so rather than typing Odometer readings in I type the trip mileage.
In this case you would change the name of column C and the formula would be:
D3=C3/B3 -
Message "Enter Batch" in Fuel Consumption-Measurement Transaction (IFCU)
Dear Expert,
Lately I activate EA-PLM ECC extention in my sandbox to simulate IFCU transaction for entry Fuel Consumption. After all config is being done, in IFCU transaction there still problem, It rise a pop-up to "Enter Batch" when saving this transaction. Indeed We are using Batch Management for our Fuel material, but where we can input this batch parameter in IFCU transaction ?
Please advice...Thank UI don't think batch managed materials are supported for this transaction.You may have to develop your own transaction by copying the same and adding the batch information. All you may have to do is pass the batch number to the Goods movement BAPI BAPI_GOODSMVT_CREATE in the program.
Regards
Narasimhan -
System requirements of Fleet Management System
Hi,
What are the system requirements to activate the Fleet Management System? Will it also need another license?Hi,
which Szenario are you planning to implement? In regards to licensing I would recommend to contact your SAP sales contact.
Best regards,
Claudia -
Operation wise fuel consumption details.
Dears,
How can we get the operation wise raw material consumption details. For example in an order I am having 5 operations. Each operation requires some fuel consumption. Fuel is my BOM component. I need to issue the quantity of fuel for each operation. Again in the report also... I need the details of fuel consumption operation wise. How can we divide the total quantity of fuel to different routing operations. one way is I can maintain different line items in BOM. Is there any other way of doing it? How can get it in report?
Regards,
Surya.Hi,
I don't think so that there is such report which will give you operation wise consumption but you can make that fuel consumption as a activity type in ur standard value key and make some std value to put it in the routing, then if you go for operation wise confirmation then in that screen you will be able to put the consumption details in it.
you can take a report of that also in COOIS.
order wise consumption you can get from order report itself
reward poits if you find it useful. -
Fuel Consumption Report Modification - 2
Hi Experts
I am working on fuel consumption modification. can anyone help me how to get max and min value for this program
I am getting one row correct with equipment no is enter but when I enter the range of equipment no it is taking long time and the result is repeating for each row
please correct my report
Thnaks in advanced
Piroz
REPORT Z_FUEL2 LINE-SIZE 232 LINE-COUNT 75
NO STANDARD PAGE HEADING.
TABLES : equi,
equz,
imptt,
imrg,
eqkt,
iloa.
TYPES: BEGIN OF ty_equi," occurs 0,
equnr type equi-equnr,
END OF ty_equi.
TYPES: BEGIN of ty_eqkt," occurs 0,
equnr type eqkt-equnr,
eqktx type eqkt-eqktx,
END OF ty_eqkt.
TYPES: BEGIN of ty_iloa ,"occurs 0,
iloan type iloa-iloan,
eqfnr type iloa-eqfnr,
END OF ty_iloa.
TYPES: BEGIN of ty_imptt," occurs 0,
mpobj type imptt-mpobj,
END of ty_imptt.
TYPES: BEGIN of ty_imrg ,"occurs 0,
idate type imrg-idate,
recdv type imrg-recdv,
recdu type imrg-recdu,
END of ty_imrg.
TYPES: BEGIN OF ty_data ,
equnr type equnr, " Euipment no
eqktx type eqkt-eqktx, " Equipment Text
eqfnr type iloa-eqfnr, " Equipment Sort field
idate type imrg-idate, " Measuring Date
recdu type imrg-recdu, " Unit of measuring ='KM','L','H'
recdv type imrg-recdv, " Counter reading data
END OF ty_data.
TYPES: BEGIN OF ty_final,
equnr type equnr, " Equipment no
eqktx type eqkt-eqktx, " Equipment Text
eqfnr type iloa-eqfnr, " Equipment Sort field
min_date type imrg-idate, " Min Date
min_km type imrg-recdv, " Max Km
max_date type imrg-idate, " Max Date
max_km type imrg-recdv, " Min km
t_max_min_km type i, " Total min_km-max_km
min_hr type imrg-recdv, " Max hr
max_hr type imrg-recdv, " Min hr
t_max_min_hr type i, " Total min_hr-max_hr
min_lit type imrg-recdv, " Max lit
max_lit type imrg-recdv, " Min lit
t_max_min_lit type i, " Total min_lit-max_lit
T_fuel_con type p decimals 2, " Total_hrs / t_max_min_hr
T_km_l type p decimals 2, " km / L
lit_per_hr type i , " fuel comsumed / t_max_min_hr
END OF ty_final.
DATA: i_equi TYPE TABLE OF ty_equi, "internal table
wa_equi TYPE ty_equi, " work area
i_eqkt TYPE TABLE OF ty_eqkt, "internal table
wa_eqkt TYPE ty_eqkt, " work area
i_iloa TYPE TABLE of ty_iloa, "internal table
wa_iloa TYPE ty_iloa, " work area
i_imptt TYPE TABLE of ty_imptt, "internal table
wa_imptt TYPE ty_imptt,
i_imrg TYPE TABLE of ty_imrg, "internal table
wa_imrg TYPE ty_imrg,
i_data TYPE TABLE OF ty_data, "internal table
wa_data TYPE ty_data, " work area
i_final TYPE TABLE OF ty_final, " internal table
wa_final TYPE ty_final. " work area
DATA : max_date type date ,
min_date type date,
max_km TYPE p DECIMALS 2,
min_km TYPE p DECIMALS 2,
max_hr TYPE p DECIMALS 2,
min_hr TYPE p DECIMALS 2,
max_lit TYPE p DECIMALS 2,
min_lit TYPE p DECIMALS 2,
t_max_min_km TYPE p DECIMALS 2,
t_max_min_hr TYPE p DECIMALS 2,
t_max_min_lit TYPE p DECIMALS 2.
SELECTION-SCREEN BEGIN OF BLOCK blk WITH FRAME.
SELECTION-SCREEN BEGIN OF BLOCK blk1 WITH FRAME TITLE text-001.
SELECT-OPTIONS: p_equnr FOR equi-equnr, "no-extension no intervals,
p_idate FOR imrg-idate. "NO-EXTENSION NO INTERVALS OBLIGATORY,
" p_recdu FOR imrg-recdu." NO-EXTENSION NO INTERVALS ."default 'M3'" OBLIGATORY.
SELECTION-SCREEN END OF BLOCK blk1.
SELECTION-SCREEN BEGIN OF BLOCK blk2 WITH FRAME TITLE text-002.
SELECTION-SCREEN END OF BLOCK blk2.
SELECTION-SCREEN END OF BLOCK blk.
TOP-OF-PAGE.
FORMAT INTENSIFIED ON.
WRITE:/1(40) ' INVESTMENT LIMITED '.
WRITE:/50(40) ' FUEL CONSUMPTION REPORT ' CENTERED ,
2 'Page', sy-pagno.
FORMAT INTENSIFIED OFF.
WRITE:/50(40) '----
' CENTERED .
FORMAT INTENSIFIED ON.
WRITE:/2 sy-datum COLOR 3, sy-uzeit .
"WRITE:/1 S903-SPMON ."p_yearf.
ULINE.
"CENTERED.
write: /2 'Date From :'.
write: /2 'Equipment No :'.
write: /2 'Unit :'.
SKIP.
ULINE.
WRITE:/1 sy-vline,
2 'EQUIP NO', 10 sy-vline,
11 'NAME', 40 sy-vline,
41 'SORT', 60 sy-vline,
61 'MIN DATE', 74 sy-vline,
75 'MIN KM', 87 sy-vline,
88 'MAX DATE', 100 sy-vline,
101 'MAX KM' , 113 sy-vline,
114 'TOTAL KM', 126 sy-vline COLOR 2,
127 'MIN HR', 139 sy-vline,
140 'MAX HR', 152 sy-vline,
153 'TOTAL HR' , 167 sy-vline COLOR 2,
168 'MIN LIT', 180 sy-vline,
181 'MAX LIT', 193 sy-vline,
194 'FUEL CON', 206 sy-vline COLOR 2,
207 'KM L', 219 sy-vline,
220 'LIT PER HR', 232 sy-vline.
FORMAT COLOR 3 ON.
ULINE.
END-OF-PAGE.
START-OF-SELECTION.
select a~equnr d~eqktx f~eqfnr e~idate e~recdu e~recdv
into corresponding fields of table i_data
from equi AS a
inner join equz as b
on a~equnr = b~equnr
inner join iloa as f
on b~iloan = f~iloan
inner join imptt as c
on a~objnr = c~mpobj
inner join eqkt as d
on a~equnr = d~equnr
inner join imrg as e
on e~point = c~point
where a~equnr in p_equnr
and
e~idate in p_idate and
e~recdu in ('KM','L','H').
"e~recdu in p_recdu.
equi
*select equnr from equi into table i_equi
*for all entries in I_DATA
**where objnr = i_equnr-mpobj.
*where equnr = i_data-equnr.
*endselect.
eqkt
*select equnr eqktx into table I_eqkt
*from eqkt
*FOR ALL ENTRIES IN I_DATA
*where equnr = i_data-Equnr.
*endselect.
iloa
*select eqfnr into table I_iloa
*from equz
*FOR ALL ENTRIES IN I_DATA
*on equziloan = iloailoan
*where iloan = i_data-iloan .
*endselect.
imrg
*select idate recdv recdu into table I_imrg
*from imrg
*FOR ALL ENTRIES IN I_DATA
*where imrg~objnr = i_date-mpobj.
*endselect.
loop at i_data into wa_data.
CLEAR: wa_final.
READ TABLE i_final into wa_final
with key equnr = wa_data-equnr.
if sy-subrc EQ 0.
PERFORM prepare_get_equi.
PERFORM prepare_get_eqkt.
PERFORM prepare_get_iloa.
PERFORM prepare_get_imptt.
PERFORM prepare_get_imrg.
PERFORM prepare_final_rec USING'M'. " Modify Existing Record
ElSE.
PERFORM prepare_final_rec USING'A'. " Append New Record.
ENDIF.
ENDLOOP.
LOOP AT i_final into wa_final.
SORT i_final by equnr descending.
at new equnr.
read table i_final into wa_final index sy-tabix.
WRITE:/1 sy-vline,
2 wa_final-equnr , 10 sy-vline,
11 wa_final-eqktx , 40 sy-vline,
41 wa_final-eqfnr , 60 sy-vline,
61 wa_final-min_date , 74 sy-vline,
75 wa_final-min_km EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 87 sy-vline,
88 wa_final-max_date EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 100 sy-vline,
101 wa_final-max_km EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 113 sy-vline,
114 wa_final-t_max_min_km EXPONENT 0 DECIMALS 2 color 3 LEFT-JUSTIFIED , 126 sy-vline COLOR 2,
127 wa_final-min_hr EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 139 sy-vline,
140 wa_final-max_hr EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 152 sy-vline,
153 wa_final-t_max_min_hr EXPONENT 0 DECIMALS 2 color 3 LEFT-JUSTIFIED , 167 sy-vline COLOR 2,
168 wa_final-min_lit EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 180 sy-vline,
181 wa_final-max_lit EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 193 sy-vline,
*194 wa_final-t_max_min_lit EXPONENT 0 DECIMALS 2 color 3 LEFT-JUSTIFIED , 206 sy-vline COLOR 2,
194 wa_final-T_fuel_con EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 206 sy-vline,
207 wa_final-t_km_l EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 219 sy-vline,
220 wa_final-lit_per_hr EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 232 sy-vline.
*168 wa_final-min_lit EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 180 sy-vline,
*194 wa_final-t_max_min_lit EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 206 sy-vline COLOR 2,
*207 wa_final-fuel_con EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 219 sy-vline,
*220 wa_final-km_l EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 232 sy-vline,
*233 wa_final-lit_per_hr EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 246 sy-vline.
*207 wa_final-T_fuel_con EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 219 sy-vline,
*220 wa_final-t_km_l EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 232 sy-vline,
*233 wa_final-lit_per_hr EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 246 sy-vline.
uline.
"endat.
*at end of equnr.
read table i_final into wa_final index sy-tabix.
WRITE:/1 sy-vline,
*2 wa_final-equnr , 10 sy-vline,
*11 wa_final-eqktx , 40 sy-vline,
*41 wa_final-eqfnr , 60 sy-vline,
*88 wa_final-max_date EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 100 sy-vline,
*101 wa_final-max_km EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 113 sy-vline,
*140 wa_final-max_hr EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 152 sy-vline.
**181 wa_final-max_lit EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 193 sy-vline.
*114 wa_final-t_max_min_km EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 126 sy-vline COLOR 2,
*140 wa_final-max_hr EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 152 sy-vline.
*153 wa_final-t_max_min_hr EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 167 sy-vline COLOR 2,
*181 wa_final-max_lit EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 193 sy-vline,
*194 wa_final-t_max_min_lit EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 206 sy-vline COLOR 2,
*207 wa_final-fuel_con EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 219 sy-vline,
*220 wa_final-km_l EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 232 sy-vline,
*233 wa_final-lit_per_hr EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 246 sy-vline.
uline .
WRITE:/1 sy-vline,
*2 wa_final-equnr , 10 sy-vline,
*11 wa_final-eqktx , 40 sy-vline,
*41 wa_final-eqfnr , 60 sy-vline,
*61 wa_final-min_date , 74 sy-vline,
*75 wa_final-min_km EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 87 sy-vline,
*88 wa_final-max_date EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 100 sy-vline,
*101 wa_final-max_km EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 113 sy-vline,
*114 wa_final-t_max_min_km EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 126 sy-vline COLOR 2,
*127 wa_final-min_hr EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 139 sy-vline,
*140 wa_final-max_hr EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 152 sy-vline,
*153 wa_final-t_max_min_hr EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 167 sy-vline COLOR 2,
*168 wa_final-min_lit EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 180 sy-vline,
*181 wa_final-max_lit EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 193 sy-vline,
*194 wa_final-t_max_min_lit EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 206 sy-vline COLOR 2,
*207 wa_final-fuel_con EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 219 sy-vline,
*220 wa_final-km_l EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 232 sy-vline,
*233 wa_final-lit_per_hr EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 246 sy-vline.
*ULINE.
endloop.
FORM prepare_final_rec USING p_mode TYPE char1.
KM
select MAX( eidate ) Min( eidate ) MAX( erecdv ) MIN( erecdv )
into corresponding fields of (wa_final-max_date,wa_final-min_date, wa_final-max_km , wa_final-min_km)
from equi AS a
inner join equz as b
on aequnr = bequnr
inner join iloa as f
on biloan = filoan
inner join imptt as c
on aobjnr = cmpobj
inner join eqkt as d
on aequnr = dequnr
inner join imrg as e
on epoint = cpoint
where a~equnr in p_equnr
and
e~idate in p_idate and
e~recdu = 'KM' .
"group by aequnr deqktx feqfnr eidate erecdu erecdv.
"endselect.
HOUR
select MAX( eidate ) Min( eidate ) MAX( erecdv ) MIN( erecdv )
into corresponding fields of (wa_final-max_date, wa_final-min_date, wa_final-max_hr, wa_final-min_hr)
from equi AS a
inner join equz as b
on aequnr = bequnr
inner join iloa as f
on biloan = filoan
inner join imptt as c
on aobjnr = cmpobj
inner join eqkt as d
on aequnr = dequnr
inner join imrg as e
on epoint = cpoint
where a~equnr in p_equnr
and
e~idate in p_idate and
e~recdu = 'H'.
"group by aequnr deqktx feqfnr eidate erecdu erecdv.
"endselect.
LIT
select MAX( eidate ) Min( eidate ) MAX( erecdv ) MIN( erecdv ) SUM( e~recdv )
into (wa_final-max_date,wa_final-min_date, wa_final-max_lit, wa_final-min_lit , wa_final-t_max_min_lit )
from equi AS a
inner join equz as b
on aequnr = bequnr
inner join iloa as f
on biloan = filoan
inner join imptt as c
on aobjnr = cmpobj
inner join eqkt as d
on aequnr = dequnr
inner join imrg as e
on epoint = cpoint
where a~equnr in p_equnr
and
e~idate in p_idate and
e~recdu = 'L' .
"group by aequnr deqktx feqfnr eidate erecdu erecdv.
"endselect.
wa_final-max_date = wa_final-max_date + wa_data-idate .
wa_final-min_date = wa_final-min_date + wa_data-idate .
wa_final-max_km = wa_final-max_km + wa_data-recdv.
wa_final-min_km = wa_final-min_km + wa_data-recdv.
wa_final-max_hR = wa_final-max_hr + wa_data-recdv.
wa_final-min_hR = wa_final-min_hr + wa_data-recdv.
wa_final-max_lit = wa_final-max_lit + wa_data-recdv.
wa_final-t_max_min_km = ( wa_final-max_km - wa_final-min_km ).
wa_final-t_max_min_hr = ( wa_final-max_hr - wa_final-min_hr ).
"wa_final-t_max_min_lit = ( wa_final-max_lit - wa_final-min_lit ).
wa_final-t_fuel_con = wa_final-t_max_min_lit.
wa_final-t_km_l = wa_final-t_max_min_km / wa_final-t_max_min_lit.
wa_final-lit_per_hr = wa_final-t_max_min_lit / wa_final-t_max_min_hr . " fuel comsumed / t_max_min_hr
IF p_mode = 'A'.
wa_final-equnr = wa_data-equnr.
wa_final-eqktx = wa_data-eqktx.
wa_final-eqfnr = wa_data-eqfnr.
APPEND wa_final TO i_final.
ELSE.
MODIFY i_final FROM wa_final
TRANSPORTING
max_date
min_date
max_km
min_km
max_hr
min_hr
max_lit
min_lit
t_max_min_km
t_max_min_hr
where equnr = wa_data-equnr.
ENDIF.
"endselect.
ENDFORM. " PREPARE_FINAL_RECHi Ankit,
If your quantity depends on your material movement type, then you can create a condition in Calculated Keyfig / Formula.
That means as per your situation if the material movement type is 101 then quantity is incoming(+) and if the material movement type is 120 then outgoing(-).This can be done if the material movement type is fixed.
Correct the logic if it is not right.
Rgs,
I.R.K -
Fuel Consumption Report Modification - 21
Hi Experts
I am working on fuel consumption modification. can anyone help me how to get max and min value for this program
I am getting one row correct with equipment no is enter but when I enter the range of equipment no it is taking long time and the result is repeating for each row
please correct my report
Thnaks in advanced
Piroz
REPORT Z_ESLP_FUEL2 LINE-SIZE 250 LINE-COUNT 75
NO STANDARD PAGE HEADING.
TABLES : equi,
equz,
imptt,
imrg,
eqkt,
iloa.
TYPES: BEGIN OF ty_equi," occurs 0,
equnr type equi-equnr,
END OF ty_equi.
TYPES: BEGIN of ty_eqkt," occurs 0,
equnr type eqkt-equnr,
eqktx type eqkt-eqktx,
END OF ty_eqkt.
TYPES: BEGIN of ty_iloa ,"occurs 0,
iloan type iloa-iloan,
eqfnr type iloa-eqfnr,
END OF ty_iloa.
TYPES: BEGIN of ty_imptt," occurs 0,
mpobj type imptt-mpobj,
END of ty_imptt.
TYPES: BEGIN of ty_imrg ,"occurs 0,
idate type imrg-idate,
recdv type imrg-recdv,
recdu type imrg-recdu,
END of ty_imrg.
TYPES: BEGIN OF ty_data ,
equnr type equnr, " Euipment no
eqktx type eqkt-eqktx, " Equipment Text
eqfnr type iloa-eqfnr, " Equipment Sort field
idate type imrg-idate, " Measuring Date
recdu type imrg-recdu, " Unit of measuring ='KM','L','H'
recdv type imrg-recdv, " Counter reading data
END OF ty_data.
TYPES: BEGIN OF ty_final,
equnr type equnr, " Equipment no
eqktx type eqkt-eqktx, " Equipment Text
eqfnr type iloa-eqfnr, " Equipment Sort field
min_date type imrg-idate, " Min Date
min_km type imrg-recdv, " Max Km
max_km type imrg-recdv, " Min km
t_max_min_km type i, " Total min_km-max_km
max_date type imrg-idate, " Max Date
min_hr type imrg-recdv, " Max hr
max_hr type imrg-recdv, " Min hr
t_max_min_hr type i, " Total min_hr-max_hr
min_lit type imrg-recdv, " Max lit
max_lit type imrg-recdv, " Min lit
t_max_min_lit type i, " Total min_lit-max_lit
fuel_con type p decimals 2, " Total_hrs / t_max_min_hr
km_l type p decimals 2, " km / L
lit_per_hr type i , " fuel comsumed / t_max_min_hr
END OF ty_final.
DATA: i_equi TYPE TABLE OF ty_equi, "internal table
wa_equi TYPE ty_equi, " work area
i_eqkt TYPE TABLE OF ty_eqkt, "internal table
wa_eqkt TYPE ty_eqkt, " work area
i_iloa TYPE TABLE of ty_iloa, "internal table
wa_iloa TYPE ty_iloa, " work area
i_imptt TYPE TABLE of ty_imptt, "internal table
wa_imptt TYPE ty_imptt,
i_imrg TYPE TABLE of ty_imrg, "internal table
wa_imrg TYPE ty_imrg,
i_data TYPE TABLE OF ty_data, "internal table
wa_data TYPE ty_data, " work area
i_final TYPE TABLE OF ty_final, " internal table
wa_final TYPE ty_final. " work area
DATA : max_date type date ,
min_date type date,
max_km TYPE p DECIMALS 2,
min_km TYPE p DECIMALS 2,
max_hr TYPE p DECIMALS 2,
min_hr TYPE p DECIMALS 2,
max_lit TYPE p DECIMALS 2,
min_lit TYPE p DECIMALS 2,
t_max_min_km TYPE p DECIMALS 2,
t_max_min_hr TYPE p DECIMALS 2,
t_max_min_lit TYPE p DECIMALS 2.
SELECTION-SCREEN BEGIN OF BLOCK blk WITH FRAME.
SELECTION-SCREEN BEGIN OF BLOCK blk1 WITH FRAME TITLE text-001.
SELECT-OPTIONS: p_equnr FOR equi-equnr, "no-extension no intervals,
p_idate FOR imrg-idate. "NO-EXTENSION NO INTERVALS OBLIGATORY,
" p_recdu FOR imrg-recdu." NO-EXTENSION NO INTERVALS ."default 'M3'" OBLIGATORY.
SELECTION-SCREEN END OF BLOCK blk1.
SELECTION-SCREEN BEGIN OF BLOCK blk2 WITH FRAME TITLE text-002.
SELECTION-SCREEN END OF BLOCK blk2.
SELECTION-SCREEN END OF BLOCK blk.
TOP-OF-PAGE.
FORMAT INTENSIFIED ON.
WRITE:/1(40) ' INVESTMENT LIMITED '.
WRITE:/50(40) ' FUEL CONSUMPTION REPORT ' CENTERED ,
2 'Page', sy-pagno.
FORMAT INTENSIFIED OFF.
WRITE:/50(40) '----
' CENTERED .
FORMAT INTENSIFIED ON.
WRITE:/2 sy-datum COLOR 3, sy-uzeit .
"WRITE:/1 S903-SPMON ."p_yearf.
ULINE.
"CENTERED.
write: /2 'Date From :'.
write: /2 'Equipment No :'.
write: /2 'Unit :'.
SKIP.
ULINE.
WRITE:/1 sy-vline,
2 'EQUIP NO', 10 sy-vline,
11 'NAME', 40 sy-vline,
41 'SORT', 60 sy-vline,
61 'MIN DATE', 74 sy-vline,
75 'MIN KM', 87 sy-vline,
88 'MAX DATE', 100 sy-vline,
101 'MAX KM' , 113 sy-vline,
114 'TOTAL MAX-MIN', 126 sy-vline,
127 'MIN HR', 139 sy-vline,
140 'MAX HR', 152 sy-vline,
153 'TOTAL MAX-MIN' , 167 sy-vline,
168 'MIN LIT', 180 sy-vline,
181 'MAX LIT', 193 sy-vline,
194 'TOTAL LIT', 206 sy-vline,
207 'FUEL CON', 219 sy-vline,
220 'KM L', 232 sy-vline,
233 'LIT PER KM', 246 sy-vline.
FORMAT COLOR 3 ON.
ULINE.
END-OF-PAGE.
START-OF-SELECTION.
select a~equnr d~eqktx f~eqfnr e~idate e~recdu e~recdv
into corresponding fields of table i_data
from equi AS a
inner join equz as b
on a~equnr = b~equnr
inner join iloa as f
on b~iloan = f~iloan
inner join imptt as c
on a~objnr = c~mpobj
inner join eqkt as d
on a~equnr = d~equnr
inner join imrg as e
on e~point = c~point
where a~equnr in p_equnr
and
e~idate in p_idate and
e~recdu in ('KM','L','H').
"e~recdu in p_recdu.
equi
*select equnr from equi into table i_equi
*for all entries in I_DATA
**where objnr = i_equnr-mpobj.
*where equnr = i_data-equnr.
*endselect.
eqkt
*select equnr eqktx into table I_eqkt
*from eqkt
*FOR ALL ENTRIES IN I_DATA
*where equnr = i_data-Equnr.
*endselect.
iloa
*select eqfnr into table I_iloa
*from equz
*FOR ALL ENTRIES IN I_DATA
*on equziloan = iloailoan
*where iloan = i_data-iloan .
*endselect.
imrg
*select idate recdv recdu into table I_imrg
*from imrg
*FOR ALL ENTRIES IN I_DATA
*where imrg~objnr = i_date-mpobj.
*endselect.
loop at i_data into wa_data.
CLEAR: wa_final.
READ TABLE i_final into wa_final
with key equnr = wa_data-equnr.
if sy-subrc EQ 0.
PERFORM prepare_get_equi.
PERFORM prepare_get_eqkt.
PERFORM prepare_get_iloa.
PERFORM prepare_get_imptt.
PERFORM prepare_get_imrg.
PERFORM prepare_final_rec USING'M'. " Modify Existing Record
ElSE.
PERFORM prepare_final_rec USING'A'. " Append New Record.
ENDIF.
ENDLOOP.
LOOP AT i_final into wa_final.
SORT i_final by equnr descending.
at new equnr.
read table i_final into wa_final index sy-tabix.
WRITE:/1 sy-vline,
2 wa_final-equnr , 10 sy-vline,
11 wa_final-eqktx , 40 sy-vline,
41 wa_final-eqfnr , 60 sy-vline,
61 wa_final-min_date , 74 sy-vline,
75 wa_final-min_km EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 87 sy-vline,
88 wa_final-max_date EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 100 sy-vline,
101 wa_final-max_km EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 113 sy-vline,
114 wa_final-t_max_min_km EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 126 sy-vline COLOR 2,
127 wa_final-min_hr EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 139 sy-vline,
140 wa_final-max_hr EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 152 sy-vline,
168 wa_final-min_lit EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 180 sy-vline,
181 wa_final-max_lit EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 193 sy-vline,
194 wa_final-t_max_min_lit EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 206 sy-vline COLOR 2.
*168 wa_final-min_lit EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 180 sy-vline,
*194 wa_final-t_max_min_lit EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 206 sy-vline COLOR 2,
*207 wa_final-fuel_con EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 219 sy-vline,
*220 wa_final-km_l EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 232 sy-vline,
*233 wa_final-lit_per_hr EXPONENT 0 DECIMALS 2 LEFT-JUSTIFIED , 246 sy-vline.
uline.
uline .
endloop.
FORM prepare_final_rec USING p_mode TYPE char1.
select MAX( eidate ) Min( eidate ) MAX( erecdv ) MIN( erecdv )
into corresponding fields of (wa_final-max_date,wa_final-min_date, wa_final-max_km , wa_final-min_km)
from equi AS a
inner join equz as b
on aequnr = bequnr
inner join iloa as f
on biloan = filoan
inner join imptt as c
on aobjnr = cmpobj
inner join eqkt as d
on aequnr = dequnr
inner join imrg as e
on epoint = cpoint
where a~equnr in p_equnr
and
e~idate in p_idate and
e~recdu = 'KM' .
"group by aequnr deqktx feqfnr eidate erecdu erecdv.
"endselect.
select MAX( eidate ) Min( eidate ) MAX( erecdv ) MIN( erecdv )
into corresponding fields of (wa_final-max_date, wa_final-min_date, wa_final-max_hr, wa_final-min_hr)
from equi AS a
inner join equz as b
on aequnr = bequnr
inner join iloa as f
on biloan = filoan
inner join imptt as c
on aobjnr = cmpobj
inner join eqkt as d
on aequnr = dequnr
inner join imrg as e
on epoint = cpoint
where a~equnr in p_equnr
and
e~idate in p_idate and
e~recdu = 'H'.
"group by aequnr deqktx feqfnr eidate erecdu erecdv.
"endselect.
select MAX( eidate ) Min( eidate ) MAX( erecdv ) MIN( erecdv ) SUM( e~recdv )
into (wa_final-max_date,wa_final-min_date, wa_final-max_lit, wa_final-min_lit , wa_final-t_max_min_lit )
from equi AS a
inner join equz as b
on aequnr = bequnr
inner join iloa as f
on biloan = filoan
inner join imptt as c
on aobjnr = cmpobj
inner join eqkt as d
on aequnr = dequnr
inner join imrg as e
on epoint = cpoint
where a~equnr in p_equnr
and
e~idate in p_idate and
e~recdu = 'L' .
"group by aequnr deqktx feqfnr eidate erecdu erecdv.
"endselect.
wa_final-t_max_min_km = ( wa_final-max_km - wa_final-min_km ).
wa_final-t_max_min_hr = ( wa_final-max_hr - wa_final-min_hr ).
"wa_final-t_max_min_lit = ( wa_final-max_lit - wa_final-min_lit ).
wa_final-fuel_con =
fuel_con type p decimals 2, " Total_hrs / t_max_min_hr
km_l type p decimals 2, " km / L
lit_per_hr type i , " fuel comsumed / t_max_min_hr
IF p_mode = 'A'.
wa_final-equnr = wa_data-equnr.
wa_final-eqktx = wa_data-eqktx.
wa_final-eqfnr = wa_data-eqfnr.
APPEND wa_final TO i_final.
ELSE.
MODIFY i_final FROM wa_final
TRANSPORTING
max_date
min_date
max_km
min_km
max_hr
min_hr
max_lit
min_lit
t_max_min_km
t_max_min_hr
where equnr = wa_data-equnr.
ENDIF.
"endselect.
ENDFORM. " PREPARE_FINAL_RECHi,
I don't think so that there is such report which will give you operation wise consumption but you can make that fuel consumption as a activity type in ur standard value key and make some std value to put it in the routing, then if you go for operation wise confirmation then in that screen you will be able to put the consumption details in it.
you can take a report of that also in COOIS.
order wise consumption you can get from order report itself
reward poits if you find it useful. -
SAP MM- SRV Mgmt integration with Fleet management-Config Required
Hi friends,
My client is asking us to implement SAP fleet managent integration with SAP MM service management.kindly help me by providing config details also.
Regards,
WilliamHi,
Read the below sap help
http://help.sap.com/saphelp_470/helpdata/en/e3/0aeb1802e211d39eeb0000e8323350/frameset.htm
Kapil -
IMG Setting for Fleet Management - Set Reference Object for Vehicles
On other SAP 4.7 systems I have been able to access in the IMG "Set Reference Object Screen for Vehicles" under the "Settings for Fleet Management". I am currently working in a system that doesn't have that option in the IMG. What do I have to do to get this menu in the IMG?
Hi,
All the extra features provided by business functions in PLM are documented in note [1389108|https://service.sap.com/sap/support/notes/1389108]. See the pdf attachment in that note.
-Paul -
PM Fleet Management Consumtion Relevant node missing under SPRO
Hi,
I am trying to configure Fleet Management under Plant Maintenance module using SPRO.
We are on ECC 6.0 with the patch levels to <N>.
I am not able to find the node "_Consumtion Relevant Counter Reading Update_" under Fleet Management System. The main node is missing which would further take me to the creation/defining of "Gas Stations". As, in the IFCU transaction system is asking for Gas Station Code.
Please let me know if I can provide some more information for the same, for you to help me with the same to the best of your knowledge.
Thanks in advance.
VijayHello,
You need to activate the EA-PLM extension switch. See [this|Fllet management; thread.
-Paul
Maybe you are looking for
-
What's the right way to move folders into a new library ?
I'm going to transfer my photos from PC to iMac using USB flash drive. I organized all the folders with files on the PC's desktop, some by year, others by themes. I'll transfer folder by folder. With each transfer I'll go to iPhoto and will create a
-
How to synchronize the »content« of a smartfolder?
Morning. I want to synchronize automatically the »content« of a smartfolder with the Documents folder on my iDisk. The respective smartfolder contains all PDF files modified within the last 30 days. So it has dynamic content. And it is unavoidable th
-
Leading zeros in downloaded excel
Hi, I'm facing a problem with truncated leading zeros in downloaded excel. Can anybody suggest me how to get those leading zeros in excel. I tried Function modules XXL_FULL_API and WS_DOWNLOAD, both did not work. Regards, Praveena
-
HP Envy Fan Suddenly Runs All the Time
A few weeks ago, I sent my HP ENVY 15t-j000 Quad Edition Notebook PC (product number E4T17AV) to HP because my trackpad was especially stiff, squeaky, and unpleasant to use. After they sent it back, my hardrive was wiped. I restored all of my files,
-
PPro very slow using linked AE files when AE running
I'm pretty sure I have seen this issue before, but checking if there are any further developments. PPro timelines containg AE linked files slow to an unusable crawl if AE is open. Quite AE and all is working a s expected, which is a pain because then