Production order report

Can any suggest me the SAP Standard production order report apart from COOIS .
Thanks
JJ

hi jj
OPtoin 1 .
   you will get the data for production in AFRU table. and afpo table for material.
you can use the following code.
select    aufnr
   budat
   ism01
   ile01
   gmnga
   lmnga
   meinh
   gmein
   ism05
   ile06
   werks
   stokz
   stzhl
   wablnr
   rueck
   rmzhl
into corresponding fields of table it_afru
from   afru
where budat in full_date "so_date
and werks in so_plant.
AND stokz NE 'X'
and stzhl Eq 0.
For Material Number-----
select aufnr
   matnr
   verid
   umrez
   pwerk
   dwerk from afpo into corresponding fields of table it_afpo
   for all entries in it_afru
   where aufnr = it_afru-aufnr
   and matnr in so_matnr.
and get it in one table accordeing to your requirement
Option 2
Use Standard Transactions like COOIS or MB51 (With movement type 101) for calculation your requoiremnt and make layout for requiremnt.
rgds
BV

Similar Messages

Creation of production order report as per format

Hi!!!!
Gurus!!!!!
I want production order report in some required format.
How to see the format on production order
How to see the report in the following format.
Company name:-
Material requirement Number:-
date :-
Time:-
Due Date:-
Plan Date:-
Production Details:-
Item Code:-
Item Description:-
WH:-
Planned Quantity:-
Completed Quantity:-
Completed date:-
Rejected Quantity:
Waste and Scrap:-
Evaporation Quantity:-
Components:-
Sr.No.      Item No.   Desription             BOM Quantity Planned Quantity Issue Quantity
1     1000     RED                 20                     200                      200
2     1001     BLUE                 30                     300                      300
3     1002     Waste and Scrap -0.45987     -0.9845           -0.984567
          Total Quantity      50.45987     500.9845                     501.98888
Order Remark.
I want to see the report in this format.
Thanks with Regards,
Nitin

Nitin,
Your requirement certainly qualifies for creation of a new Production order Print form and custom print program if you are looking at printing at individual order. If you are looking at report, then certainly a custom report.
Regards,
Prasobh

Creation of production order report

Dear,
Gurus !!!!!
I am working on production order report.
Could you give me some idea how to create a production order ,stock overview report and
work center reports.
How I see it .
Regards,
Nitin

Dear Nitin,
use std report availble
1. production order COOIS
2. Stock overview MMBE, RWBE, MB5B, MB52
3. For work center use CR05/06/07/08/10/15/60/80
sree

Production Order Report - System Query

The Production Order Report in v2005A SP01 is not implemented in v2007A.
This report is important to some of our B1 user customers.
If the 2005A report is copied and pasted into the Query Generator in 2007A, it appears to work correctly, but the risk is that:-
(a) table changes which have been made have effects which aren't apparent on normal inspection, and
(b) it will eventually be lost during upgrades and users will have to recreate it themselves, for which many don't have the expertise.
Please verify that the functionality of the 2005A query remains correct in 2007A, and reinstate it as a system query in a future release.
Regards,
Mike Burmeister

Hi,
In SAP B1 2007A SP01 PL10, there is a change log. You can check all the differences made by user in the pass in the change log.
the table is AWOR. The product no. is taken from OITM. You can use both table in order to find out the comparison
JimM

Production Order Report with Cost

Hi,
I am trying to create a report using query to show the production order details, including the components item code (can be inventory or non-inventory), issued qty, component cost of each component and product cost.
Can anyone help?
Thanks.

Hi,
Try this
SELECT T0.[DocNum], T0.[Status], T0.[DueDate], T0.[ItemCode], T3.[ItemName], T3.[ItemCode],
T3.[OnHand], T1.[BaseQty]*T2.Quantity 'Base Qty', T1.[PlannedQty]*T2.Quantity 'Planned Qty',
(Select sum(isnull(T4.LineTotal,0)) from IGE1 T4 where T4.BaseEntry = T1.DocEntry and T4.ItemCode= T1.ItemCode and T4.BaseType = '202')as 'Cost'
FROM [dbo].[OWOR] T0
INNER JOIN [dbo].[WOR1] T1 ON T0.DocEntry = T1.DocEntry
INNER JOIN [dbo].[ITT1] T2 ON T1.ItemCode = T2.Father
INNER JOIN [dbo].[OITM] T3 ON T2.Code = T3.ItemCode
WHERE T0.[ItemCode] = '[%0]' AND T0.[DocNum] = '[%1]'
Regards,
Bala

Production order report on Daily

Hi gurus,
I tried to create a report for production orders. it contain four selection parameters. Here i am using four tables 1) crhd 2) caufv 3) aufk 4) afru 5) zbreak ( this is a ztable created by me ) . i need the fields like date,work centre, porder,startdate,enddate,order quantity,processed quantity,yield,scrap, (down time ,from time ,reason these all from ztable). i want to make one report on this.
   i did it in two ways. I used a join statement but it is taking more time to execute. i know this is a performance issue. please give me a good idea how to finish this report.
<< Please repect the 2,500 character limit on posts. Post only the relevant portion of your code. And please use code tags.>>
form get_data.
select
     a~arbpl
     b~plnbez
     c~aufnr
     d~rueck
     d~isdd
     d~iedd
     b~gamng
     d~lmnga
     d~xmnga
     d~rmnga
     e~from_time
     e~to_time
     e~total_time
     e~workcentre
     e~reason
     into table itab
*     (itab-arbpl, itab-plnbez, itab-aufnr,
*     itab-rueckb itab-isdd itab-iedd,
*     itab-gamng, itab-lmnga, itab-xmnga,
*     itab-rmnga ,itab-from_time, itab-to_time,
*     itab-total_time, itab-workcenter, itab-reason)
     from ( ( crhd as a
      inner join caufv as b
     on a~werks = b~werks
     inner join aufk as c
     on c~werks = b~werks
      inner join afru as d
     on d~werks = c~WERKS )
     inner join ZBREAK_DOWN_TIME as e
     on e~werks = d~werks )
     WHERE PLNBEZ IN S_MATNR.
     append itab.
endform.
Thank you.
Edited by: Rob Burbank on Jan 3, 2010 2:09 PM

Hi MadhuRao,
My observations in your current SELECT statement are as follows:
1. In your query you are selecting AUFNR from the table AUFK which is already there in the view CAUFV which you have already included. So this is un-necessary.
2. There is no index for WERKS in table CRHD (Work Center Header) table. You should read the work centers separately in a hash table and read to fill your main internal table.
3. You should join Order table (view CAUFV) and Order confirmations (AFRU) based on order number (AUFNR). Currently you are joining based on plant (WERKS) which is also another serious performance issue.
My suggestions are:
1. SELECT all the Work-Centers from CRHD into an internal table.
2. SELECT from CAUFV first for the given list of material numbers (which is the only WHERE clause field in your query). This must be your main internal table itab.
3. Consolidate all the unique Order Numbers (AUFNR) and if possible the counter (APLZL) into a separate internal table.
4. SELECT from the confirmation table (AFRU) for the list of above orders only.
5. Loop through your main internal table itab and update the fields from the Work-Center and Confirmation internal tables.
This would greatly improve the performance, however your code will be huger.
Cheers
Suresh

Open production orders report

Dear Experts,
Please what are the standard tcodes I can use to get a report on all open production orders from the system?

Hi Vincent,
You can use the T code COOIS for the comprehensive report of production report.
As you say you need to check the open order, I assume these are the orders for which the GR is yet to be done.
In COOIS, beside other selection criteria on the selection screen, against 'System status' select DLV and the 'Excl.' indicator next to it.
Do check and revert.
SmanS

Production order report - to see if it was settled and UD on it

Help!!!
I need as report for Production orders that will show the User Decision on the order and if it was settled or not.
I dont think there is a standard report for that. Am i wrong?
As of now, i can see the report COOIS that is showing the order info and QA33 that is showing the status of UD.
Can i combine these two reports and also add the field "Cost" from the order master data to track if the cost is =0 then it was setteled?
If yes, how to combine these reports? Is there a common field? Material is a common field, but sometimes there are multiple orders for the same material, so it will not work.
any ideas?
Thanks! Points will be assigned!

Hello, if the inspection lot was created for in process (03) or production (04) , then the insp lot should have the production order as a common field.
Hope this helps.
Dario

Production order report for changes in component & quantity

Dear all Hi,
Is there any standard report/functionality in SAP PP to see changes made to the production order once it is created. This is the client's requirement, changes that are made to components, quantities, operations & dates of a production order should be displayed in a report. Please do guide me, thanks in advance.

Hi,
One Option could be Order Change Management (OCM).
The second could be , use the modification which is provide by SAP in SAP note 390635.
(This OSS Note was suggested by Sabine Trosse number of times in the Forum, there were number of success feedbacks after using this.)
Hope this helps..
Regards,
Siva

CO Production Order Report

Hi,
Would just like to ask if there is a report that lists down CO Production Orders? Something similar to COOIS for Production Orders.
Thanks!
Best Regards,
Armie

Hi,
Use the report MCP6 , KKBC_ORD and KKBC_PKO.
CO26 is definetely the old version of COOIS.
Regards
Edited by: Dublin on Oct 1, 2009 11:42 PM

BATCH/PRODUCTION ORDER REPORT

GURUS,
is there any report which shows batch/production order relationship except coois.
basu

If you have activated the batch where used list, you can see the connections in MB56. See documentation under:
http://help.sap.com/erp2005_ehp_04/helpdata/en/25/283d074f7811d18a150000e816ae6e/frameset.htm
for further information.
Regards,
Sabine

Production order reporting using COOIS

Hi all
I am using tcode COOIS for creating reports for Production orders. I have the following requirement
I want to batch schedule the report using a variant which I have done. The report should automatically run every night at 12 am and it should automatically email the report to the email ids of the Production team. The report should be in a spreadsheet format. My question is
1/ where do i put the e mail id
2/ how do i make it to spit the report in a spreadsheet format ( Manually I can go into System > List > Save > Spreadsheet and save it onto spreadsheet)
thanks a lot

Hi John Mastram,
Use transaction SM36 to schedule your batch job. There you can maintain the email address of the recipient.
If the scheduled job has a spool list output, the same would be sent by email to the address maintaind
Regards,
Jayakandan

Report for Production orders with name of Customers

Dear Expert,
Kindly suggest to view the production orders with customer numbers for which the sales orders is created.
I tried in MB51 with layout settings but the customer number comes out be blank despite the sales order number is populated for an production order.
Kindly suggst a way or any report in the system to get the corresponding information of production order number and corresponding customer name mentioned in the sales order .
Thanks in advance for your help and inputs..
Best regards,
Nitish jain

Nitish,
MB51 is a Material Document list. Many production orders exist that have no entries in this report, so it would be an unlikely candidate to be a solution for your requirement..
The standard production order reporting tool is COOIS. The output for MTO orders can be configured to display Sales order and Item and Soldto.
Obviously, displaying even the customer order number in COOIS is impossible in a MTS scenario.
In addition, a user experienced in using SAP Query (SQVI or SQ01/SQ02/SQ03) could also create a production order report without having to know ABAP, by properly linking tables AFKO, AUFK, AFPO (production order data) with VBAK (sales order header data) to get customer number, and KNA1 to get customer name..
If you are not expert in SAP Query, I suggest you discuss this requirement with a local ABAPer.
If you are feeling like educating yourself in the wonders of SAP query, try this doc. Although old, SAP query hasn't changed very much since this document was written.
http://help.sap.com/printdocu/core/Print46c/en/data/pdf/BCSRVQUE/BCSRVQUE.pdf
Rgds,
DB49
Edited by: Dogboy49 on Apr 20, 2010 10:47 PM

Production Order Operations Report

I'm trying to create a quickviewer report for production orders. We have added a second operation to the routing for some of our materials and would like to see how much has been confirmed per operation in this report.
This would be like any other production order report with basic info like Material Numbers, PO numbers, etc., but the key is that I want to have a column for each operation, and the ability to see what quantity has been confirmed for each operation all in one report.
What tables have the information that I'm looking for?

Hi,
Just a suggestion:
For the info you're looking for, you can use COOIS report instead of building a custom report. In the list selection you can select, Operations, Confirmations, Header or Components as per your need & it will give you all the info you're looking for.
However if there is any compelling reason only then it would be advisable to go for a custom report, the previous posting gives you the tables to refer to.
Regards,
Vivek

How to get all production orders for a workcenter

Hello ...
I have a requirement to create a report of all production orders for a given workcenter. The user enters the workcenter (CRHD-ARBPL), plant (CRHD-WERKS) and a date range, and wants to see a list of orders (AUFNR) that fall within that date range along with some other data from AFKO and AFPO.
I can't figure out a good, consistent way to get from workcenter to production orders.
Any ideas?
Thanks!
Sharon

Hi there check this program for relation between SO PO and Production order
REPORT z_so_info.
TABLES: vbak, vbap, afko, afpo.
*Field catalog
TYPE-POOLS: slis.
DATA: lv_repid TYPE sy-repid VALUE sy-repid,
xfield TYPE slis_t_fieldcat_alv,
afield TYPE slis_fieldcat_alv.
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(25) text-002.
SELECT-OPTIONS: so_so FOR vbak-vbeln OBLIGATORY.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK b1.
SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE text-003.
PARAMETERS:
p_kunnr LIKE vbak-kunnr, " sold-to
p_kunwe LIKE vbak-kunnr. " ship-to
SELECTION-SCREEN END OF BLOCK b2.
*Constants
CONSTANTS: c_zor TYPE vbak-auart VALUE 'ZOR',
c_we TYPE vbpa-parvw VALUE 'WE',
c_ag TYPE vbpa-parvw VALUE 'AG'.
* c_space TYPE space.
*Ranges
RANGES: ra_parvw FOR vbpa-parvw,
ra_kunnr FOR vbpa-kunnr.
*Tables
DATA: BEGIN OF gt_output OCCURS 0,
vbeln LIKE vbak-vbeln, " sales order number
posnr LIKE vbap-posnr, " SO item number
matnr LIKE vbap-matnr, " material number
sh LIKE vbpa-kunnr, " Ship-to
sp LIKE vbpa-kunnr, " Sold-to
lifnr LIKE ekko-lifnr, " Vendor
bstnk LIKE vbak-bstnk, " PO number
banfn LIKE vbep-banfn, " Purchase requi
po_st TYPE char30, " PO status text
pstyv TYPE vbap-pstyv, " Item catagory
aufnr LIKE afpo-aufnr, " Production Order
prd_stat TYPE string, " Prd order status
END OF gt_output.
DATA: wa_output LIKE gt_output.
FIELD-SYMBOLS: <fs_output> LIKE gt_output.
*Table for sales order and PO
TYPES : BEGIN OF gs_data,
vbeln TYPE vbak-vbeln,
posnr TYPE vbap-posnr,
pstyv TYPE vbap-pstyv,
matnr TYPE vbap-matnr,
END OF gs_data.
DATA: gt_data TYPE STANDARD TABLE OF gs_data,
wa_data TYPE gs_data.
*Table for Production Orders
TYPES: BEGIN OF gs_prd,
aufnr TYPE afpo-aufnr,
posnr TYPE afpo-posnr,
kdauf TYPE afpo-kdauf,
kdpos TYPE afpo-kdpos,
wepos TYPE afpo-wepos, "Goods Receipt Indicator
elikz TYPE afpo-elikz, "Delivery Completed Indicator
objnr TYPE aufk-objnr, "Object number
* getri TYPE afko-getri, "Confirmed Order Finish Date
* gltri TYPE afko-gltri, "Actual finish date
END OF gs_prd.
DATA: gt_prd TYPE STANDARD TABLE OF gs_prd,
wa_prd TYPE gs_prd.
*Table for partner data
TYPES: BEGIN OF gs_partner,
vbeln TYPE vbak-vbeln,
posnr TYPE vbap-posnr,
parvw TYPE vbpa-parvw,
kunnr TYPE vbpa-kunnr,
END OF gs_partner.
DATA: gt_partner TYPE STANDARD TABLE OF gs_partner,
wa_partner TYPE gs_partner.
TYPES: BEGIN OF gs_po,
ebeln TYPE ekkn-ebeln,
ebelp TYPE ekkn-ebelp,
vbeln TYPE ekkn-vbeln,
vbelp TYPE ekkn-vbelp,
END OF gs_po.
DATA: gt_po TYPE STANDARD TABLE OF gs_po,
wa_po TYPE gs_po.
TYPES: BEGIN OF gs_preq,
vbeln TYPE vbep-vbeln,
posnr TYPE vbep-posnr,
banfn TYPE vbep-banfn,
END OF gs_preq.
DATA: gt_preq TYPE STANDARD TABLE OF gs_preq,
wa_preq TYPE gs_preq.
TYPES: BEGIN OF gs_po_stat,
ebeln TYPE ekko-ebeln,
procstat TYPE ekko-procstat,
lifnr TYPE ekko-lifnr,
END OF gs_po_stat.
DATA: gt_po_stat TYPE STANDARD TABLE OF gs_po_stat,
wa_po_stat TYPE gs_po_stat.
*Field symbols
FIELD-SYMBOLS: <fs> TYPE tj02t-txt04,
<fs_temp> TYPE tj02t-txt04,
<fs_stat> TYPE char30.
START-OF-SELECTION.
PERFORM fr_build_range.
PERFORM fr_get_data.
PERFORM fr_build_fc.
PERFORM fr_output.
*& Form fr_get_data
* text
* --> p1 text
* <-- p2 text
FORM fr_get_data.
*Get SO
SELECT a~vbeln a~posnr a~pstyv a~matnr
FROM vbap AS a
JOIN vbak AS b
ON a~vbeln = b~vbeln
JOIN vbpa AS c
ON b~vbeln = c~vbeln
INTO TABLE gt_data
WHERE b~vbeln IN so_so
AND b~auart EQ c_zor "Only Sales Orders
AND c~kunnr IN ra_kunnr. "from selection screen
DELETE ADJACENT DUPLICATES FROM gt_data COMPARING vbeln posnr.
*get data of the production order
IF NOT gt_data[] IS INITIAL.
SELECT a~aufnr a~posnr a~kdauf a~kdpos a~wepos a~elikz
b~objnr
FROM afpo AS a
JOIN aufk AS b
ON a~aufnr = b~aufnr
INTO TABLE gt_prd
FOR ALL ENTRIES IN gt_data
WHERE a~kdauf EQ gt_data-vbeln
AND a~kdpos EQ gt_data-posnr.
ENDIF.
*Get partner data
IF NOT gt_data[] IS INITIAL.
SELECT vbeln posnr parvw kunnr
FROM vbpa
INTO TABLE gt_partner
FOR ALL ENTRIES IN gt_data
WHERE vbeln EQ gt_data-vbeln.
ENDIF.
*Get Purchase Order
IF NOT gt_data[] IS INITIAL.
SELECT ebeln ebelp vbeln vbelp
FROM ekkn
INTO TABLE gt_po
FOR ALL ENTRIES IN gt_data
WHERE vbeln EQ gt_data-vbeln
AND vbelp EQ gt_data-posnr.
SELECT vbeln posnr banfn
FROM vbep
INTO TABLE gt_preq
FOR ALL ENTRIES IN gt_data
WHERE vbeln EQ gt_data-vbeln
AND posnr EQ gt_data-posnr.
ENDIF.
IF NOT gt_po[] IS INITIAL.
SELECT a~ebeln a~procstat a~lifnr
FROM ekko AS a
JOIN ekpo AS b
ON a~ebeln = b~ebeln
INTO TABLE gt_po_stat
FOR ALL ENTRIES IN gt_po
WHERE b~ebeln EQ gt_po-ebeln
AND b~ebelp EQ gt_po-ebelp.
ENDIF.
*Move data to output table
LOOP AT gt_data INTO wa_data.
wa_output-vbeln = wa_data-vbeln.
wa_output-posnr = wa_data-posnr.
wa_output-pstyv = wa_data-pstyv.
wa_output-matnr = wa_data-matnr.
READ TABLE gt_po INTO wa_po WITH KEY vbeln = wa_data-vbeln
vbelp = wa_data-posnr.
IF sy-subrc EQ 0.
wa_output-bstnk = wa_po-ebeln.
READ TABLE gt_po_stat INTO wa_po_stat WITH KEY ebeln = wa_po-ebeln.
IF sy-subrc EQ 0.
wa_output-lifnr = wa_po_stat-lifnr.
CASE wa_po_stat-procstat.
WHEN '01'.
wa_output-po_st = 'Version in process'.
WHEN '02'.
wa_output-po_st = 'Active'.
WHEN '03'.
wa_output-po_st = 'In release'.
WHEN '04'.
wa_output-po_st = 'Partially released'.
WHEN '05'.
wa_output-po_st = 'Released Completely'.
WHEN '08'.
wa_output-po_st = 'Rejected'.
ENDCASE.
ENDIF. "inner read subrc
ENDIF. "outer read subrc
READ TABLE gt_preq INTO wa_preq WITH KEY vbeln = wa_data-vbeln
posnr = wa_data-posnr.
IF sy-subrc EQ 0.
wa_output-banfn = wa_preq-banfn.
ENDIF.
READ TABLE gt_prd INTO wa_prd WITH KEY kdauf = wa_data-vbeln
kdpos = wa_data-posnr.
IF sy-subrc EQ 0.
wa_output-aufnr = wa_prd-aufnr.
*get the purchase requisition for production order as well
SELECT SINGLE banfn
FROM ebkn
INTO wa_output-banfn
WHERE aufnr EQ wa_prd-aufnr.
*Get the status of the production order
PERFORM fr_get_prd_stat USING wa_prd-objnr
CHANGING wa_output-prd_stat.
ENDIF. " sy-subrc
READ TABLE gt_partner INTO wa_partner WITH KEY vbeln = wa_data-vbeln
parvw = c_we.
IF sy-subrc EQ 0.
wa_output-sh = wa_partner-kunnr.
ENDIF.
READ TABLE gt_partner INTO wa_partner WITH KEY vbeln = wa_data-vbeln
parvw = c_ag.
IF sy-subrc EQ 0.
wa_output-sp = wa_partner-kunnr.
ENDIF.
APPEND wa_output TO gt_output.
CLEAR: wa_data, wa_prd,wa_partner,wa_output.
ENDLOOP.
ENDFORM. " fr_get_data
*& Form fr_build_range
* text
* --> p1 text
* <-- p2 text
FORM fr_build_range .
*Range for partner function
MOVE 'I' TO ra_parvw-sign.
MOVE 'EQ' TO ra_parvw-option.
MOVE 'SH' TO ra_parvw-low. " we
APPEND ra_parvw.
CLEAR ra_parvw.
MOVE 'I' TO ra_parvw-sign.
MOVE 'EQ' TO ra_parvw-option.
MOVE 'SP' TO ra_parvw-low. " ag
APPEND ra_parvw.
CLEAR ra_parvw.
*Range for ship-to and sold-to
MOVE 'I' TO ra_kunnr-sign.
MOVE 'EQ' TO ra_kunnr-option.
MOVE p_kunnr TO ra_kunnr-low.
APPEND ra_kunnr.
CLEAR ra_kunnr.
MOVE 'I' TO ra_kunnr-sign.
MOVE 'EQ' TO ra_kunnr-option.
MOVE p_kunwe TO ra_kunnr-low.
APPEND ra_kunnr.
CLEAR ra_kunnr.
ENDFORM. " fr_build_range
*& Form fr_build_fc
* text
* --> p1 text
* <-- p2 text
FORM fr_build_fc .
* sales order number
afield-fieldname = 'VBELN'.
afield-seltext_s = 'Sales #'.
afield-ref_tabname = 'VBAK'.
APPEND afield TO xfield. CLEAR afield.
* sales ITEM number
afield-fieldname = 'POSNR'.
afield-seltext_s = 'Item #'.
afield-ref_tabname = 'VBAP'.
APPEND afield TO xfield. CLEAR afield.
* Material Number
afield-fieldname = 'MATNR'.
afield-seltext_s = 'Material #'.
afield-ref_tabname = 'VBAP'.
afield-outputlen = 10.
APPEND afield TO xfield. CLEAR afield.
*Vendor Number
afield-fieldname = 'LIFNR'.
afield-seltext_s = 'Vendor Num.'.
afield-ref_tabname = 'EKKO'.
APPEND afield TO xfield. CLEAR afield.
* ship-to-party
afield-fieldname = 'SH'.
afield-seltext_s = 'Ship-to'.
afield-ref_tabname = 'VBPA'.
APPEND afield TO xfield. CLEAR afield.
* sold-to-party
afield-fieldname = 'SP'.
afield-seltext_s = 'Sold-to'.
afield-ref_tabname = 'VBPA'.
APPEND afield TO xfield. CLEAR afield.
*PO number
afield-fieldname = 'BSTNK'.
afield-seltext_s = 'PO NUM'.
afield-ref_tabname = 'EKKO'.
APPEND afield TO xfield. CLEAR afield.
*PO status
* afield-fieldname = 'PO_STAT'.
* afield-seltext_s = 'Step'.
* afield-ref_tabname = 'zbacklog_v2'.
* APPEND afield TO xfield. CLEAR afield.
*PO step status
afield-fieldname = 'PO_ST'.
afield-seltext_s = 'PO.Status'.
afield-ref_tabname = 'zbacklog_v2'.
APPEND afield TO xfield. CLEAR afield.
*Purchase requisition
afield-fieldname = 'BANFN'.
afield-seltext_s = 'Pur. Req.'.
afield-ref_tabname = 'VBEP'.
APPEND afield TO xfield. CLEAR afield.
*Item catagory
afield-fieldname = 'PSTYV'.
afield-seltext_s = 'Itm. Catg'.
afield-ref_tabname = 'VBAP'.
APPEND afield TO xfield. CLEAR afield.
*Prodcution Order number
afield-fieldname = 'AUFNR'.
afield-seltext_m = 'Prod.Order'.
afield-ref_tabname = 'AFKO'.
APPEND afield TO xfield. CLEAR afield.
*PRODCUTION status
afield-fieldname = 'PRD_STAT'.
afield-seltext_s = 'Prd. Step'.
afield-ref_tabname = 'zbacklog_v2'.
afield-outputlen = 20.
APPEND afield TO xfield. CLEAR afield.
*PRODUCTION step status
* afield-fieldname = 'PRD_ST'.
* afield-seltext_s = 'Prd. Status'.
* afield-ref_tabname = 'zbacklog_v2'.
* APPEND afield TO xfield. CLEAR afield.
ENDFORM. " fr_build_fc
*& Form fr_output
* text
* --> p1 text
* <-- p2 text
FORM fr_output .
CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
EXPORTING
i_callback_program = sy-repid
* I_CALLBACK_PF_STATUS_SET = ' '
* I_CALLBACK_USER_COMMAND = ' '
* I_STRUCTURE_NAME =
* IS_LAYOUT =
it_fieldcat = xfield[]
i_default = 'X'
i_save = 'A'
TABLES
t_outtab = gt_output
EXCEPTIONS
program_error = 1
OTHERS = 2.
ENDFORM. " fr_output
*& Form fr_get_prd_stat
* text
* -->P_WA_PRD_OBJNR text
FORM fr_get_prd_stat USING p_objnr CHANGING p_prd_stat.
DATA: lt_status TYPE STANDARD TABLE OF jstat,
wa_status TYPE jstat,
lv_status TYPE tj02t-txt04,
lv_temp2 TYPE char5,
lv_buff TYPE string.
CALL FUNCTION 'STATUS_READ'
EXPORTING
client = sy-mandt
objnr = p_objnr
only_active = 'X'
TABLES
status = lt_status
EXCEPTIONS
object_not_found = 1
OTHERS = 2.
LOOP AT lt_status INTO wa_status.
IF wa_status-stat(1) EQ 'I'.
SELECT txt04 FROM tj02t
INTO lv_status
WHERE istat EQ wa_status-stat
AND spras EQ 'E'.
ENDSELECT.
lv_temp2 = lv_status.
CONCATENATE lv_temp2 p_prd_stat INTO p_prd_stat
SEPARATED BY ','.
ENDIF.
CLEAR: wa_status, lv_status, lv_temp2.
ENDLOOP.
lv_buff = p_prd_stat.
*Status of Production Order
IF lv_buff CS 'CRTD'.
p_prd_stat = 'Not Active'.
ENDIF.
IF lv_buff CS 'REL'.
IF lv_buff CS 'GMPS'.
p_prd_stat = 'Printed In Prod'.
ELSE.
p_prd_stat = 'Printed'.
ENDIF.
ENDIF.
IF lv_buff CS 'TECO'.
p_prd_stat = 'Technically Compt.'.
ENDIF.
ENDFORM. " fr_get_prd_stat

Production order report

Similar Messages

Maybe you are looking for