Regarding POS DM

Hi All,
I am working on BI 7.0 with ECC 6.0 for Retail.
non SAP POS system does not maintain Inventory/Stock details. Now if some stock arrives at Store and before GRN is created, article is issued from POS and bill gets generated, then data will get posted from POS to POS DM via XI but when IDoc is sent to R/3, it will give error in R/3 system, as stock details has not been updated in R/3 as GRN hasnu2019t been created as yet. Only solution is to avoid sending transaction details to R/3 until GRN is created.
So is there any check i can put at POS DM level to check the stock status???
Regards,
Sohil Shah

Similar Messages

Query regarding POs in bid invitation

Hi Experts,
Just a quick question if I can combine multiple bid responses i.e Bid Accepted status from one vendor into a single Purchase order.
Bid 1 -
Vendor 1 - Bid accepted
Bid 2 -
Vendor 1 - Bid accepted -
Create one PO.
Bid 3 -
Vendor 1 - Bid accepted
Regards,
Rajeshree

Rajeshree,
As far as i know, PO's are created automatically when the Bid is accepted...
So, what i think is that if you still wanting to develop this function, you will need to create a program that concentrates bids by vendor, something like find vendors bid's and group them to create single PO's for multiple Bids.
I don't know if there's some customizing to achieve this, what i suggest is to develop some programs to make it happen.
BR,
Gerardo.

Regarding POS balancing

Hi,
After balancing in POS terminal and EOD(End of Day) the data comes to POSDM system through PI system.If there is shortage or excess tendering amount after balancing , I want to send that information to another means of payment to IS-R system without error in POSDM system after execution the task 0030.
Can you please tell me how to configuration this in POSDM system.
Thanks in advance.

I have created one zFM in POSDM.
Thanks.

Re: is-retail POS extraction

Hi expert,
This is pradeep. I am right now working in is-retail project in that POS extraction please guide me .whether I used r/3 side to BW side extraction or in BW side used DB connection of POS system (is SQL).If I used DB at that time how can I do that one please guide me and doc regards POS extraction my id is [email protected] will be assign point
Regards,
Pradeep
Edited by: pradeep kandepu on Jun 19, 2008 9:47 AM

Chk these links for POS
http://help.sap.com/saphelp_erp2005vp/helpdata/en/12/084110470311d1894a0000e8323352/frameset.htm
http://help.sap.com/saphelp_erp2005vp/helpdata/en/0f/7af634b576bc4ee10000009b38f83b/frameset.htm
http://help.sap.com/saphelp_nw04/helpdata/en/0d/e4813e77d46245e10000000a114084/frameset.htm
/people/uwe.beister/blog/2006/05/02/sap-pos-dm-which-type-of-idoc-should-be-used-in-pos-dm-inbound
Regards,
B

POS Interface with SAP

Hi,
We are currently using SAP ECC6.0, not on IS Retail.
As we have quite a few POS machines being used in the business, we would like to interface POS with ECC6.0.
Is there any third party tools available in the market for achieving this solution?
Thanks
Ram.

Hi Ram
SAP offers regarding POS integration to IS Retail basically two options:
- POS DM (see http://wiki.scn.sap.com/wiki/pages/viewpage.action?pageId=113246846)
- classic POS interface direct in ECC (WPUBON/WPUFIB/WPUTAB IDoc's for POS transactions)
You want to interface directly in to a non IS Retail ECC system.
Question is what do you want to interface only financial postings or also goodsmovements?
How are the stores represented in SAP (customers/plants?)
The transaction logs (TLOG) info from the POS should be converted to a IDoc that will represent you functional needs on the ECC side.
For this mapping SAP offers SAP PO (proces orch), formally know as PI (or before that XI).
There are also several middleware solutions from third party vendors that can work with SAP.
In such a tool you have to map the TLOG to the desired IDoc you want to use in SAP.
(IDoc could also e replaced with a BAPI/RFC for instance).
Regards
Bob

Po status

Hi All,
My client has a requirement that
E Mail notification shall be send to buyer that PO will be deletd regarding POs that are
1) 30 days old
2) No approvals started
3) NO GR/IR/Payment done
Finally delete such POS.
To start with
We will have to look for data in EKKO table about POS 30 days old, not approved and search those in EKPO to find if any GR/IR was done...later on how to go about it?
Regards,
Satyendra

Hi
Check for PO's more than 30 days old in Table EKKO & EKPO for delivery date.
Check in EKBE for the Purchase order history creation.
List down all the PO's with the slected criteria & the buyers.
Trigger notifications to the buyer that the Po's will be flagged for deletion.
For the Notification you need to create a task & assign the workflow agents whihc will be determined using the PO's
All this logic you need to incorporate in the flag for deletion Program whcih you need to develop.
Thanks & Regards
Kishore

How do BOS works

Hi,
Please suggest how BOS has to be configured.

hi,
do you want to know regarding POS???
Or do you mean to say Bill of services (BOS), If it is Bill Os Service, then check the link
http://help.sap.com/saphelp_dimp50/helpdata/EN/d7/1f4b36ea16571be10000009b38f889/frameset.htm
Regards

What are the precautions to be taken while archiving the POs' and Material

Hi All,
I want to archive the Purchase orders and Material documents. Is there any standard rule to follow this procedure. What are the further consequences for the consecutive documents. And how do you check the open POs' of all.
I have archived PRs' and Invoices, but these are not interlinked.
Could you please help me in this, so that I will be very much thankful to you.
Regards,
Ram

Dear Ramesh,
Go to Tcode ARCHGUIDE --> Application Specific analyses and setting --> MM -->MM_EKKO and MM_MABTEL
You can tick on the documentation and link to SAP help for all the guide and need for this archiving.
Regards,
w1n

Idoc-XI-POS (Triversity) scenario - new in XI

Hi,
I am new to SAP XI and I have a scenario wherein I have to send message to SAP Triversity (POS which excepts CSV files) from R/3. Can anyone please guide me with the entire process starting from configuring the systems - R/3 sender, XI (SLD, IR, ID) and Triversity?
Also my scenario involves collecting data from more than one Idoc and put it in one file and send across to Triversity. How can that be done?
Please advice.
Thanks in advance,
Yash

hi yash,
>>I have to send message to SAP Triversity (POS which excepts CSV files) from R/3.
for this configure file receiver adapter and use idoc adapter at sender side.
refer this:
/people/prateek.shah/blog/2005/06/08/introduction-to-idoc-xi-file-scenario-and-complete-walk-through-for-starters
in file receiver u need to convert xml to csv file. for this use file content conversion. for this refer:
/people/arpit.seth/blog/2005/06/02/file-receiver-with-content-conversion
>>configuring the systems - R/3 sender...
for sending idoc to xi u need to do these settings in r/3
1. SM 59 (RFC destinations)
Create a RFC destination pointing to the XI server. The connection type should be R/3 connection.
2. WE 21
Create a transactional port. Provide the RFC destination created in this.
3. BD 54
Create a logical system.
4. WE 20 (Partner Profiles)
Create a new partner profile under partner type LS.
Also need to do this on XI server.
1. SM59 (RFC destination)
Configure the RFC destination pointing to the R/3 system.
2. IDX1 : create port here.
Create a port and provide the RFC destination.
To test from r/3:
WE19 :push the idoc in xi through trfc port.
also refer:
/people/swaroopa.vishwanath/blog/2007/01/22/ale-configuration-for-pushing-idocs-from-sap-to-xi - ALE settings for R3-XI
>>Also my scenario involves collecting data from more than one Idoc ...
for this refer:
/people/pooja.pandey/blog/2005/07/27/idocs-multiple-types-collection-in-bpm
[reward if helpful]
regards,
latika.

POS-DM, BIW & R/3 posting issue after BIW patch updation

Landscape details:
SAP IS-Retail (ECC 6.0), SAP POS (Triversity GM 9.5.10), PI 7.0, BIW/POS-DM 7.0
Issue Detail
We have upgraded the patch level of Support package BI_CONT in BIW from 5 to 11 in production server and after that following issues have started:
1.     The duplicate posting started in R/3 i.e. if some POS EoD (TLog) file is already posted from POS-DM to R/3 and if the same file comes to POS-DM again then it gets posted in R/3 again. It was not happening before updating the patch, it used to get stop in POS-DM only.
2.     We have some EANs which starts with ZERO, those POS transaction doesnu2019t get posted in BIW Cubes and R/3 wherein the ZERO prefix articles exists. It stuck in POS-DM with the error u201CUnknown EAN/UPC numberu201D. But this error comes only if we enable the u201CMstr Data Filteru201D check from General Setting in /N/POSDW/IMG. If we disable this check then the data gets posted in R/3 but it doesnu2019t go in RSA7 & BIW Cubes.
3.     Before updating the patch the u201CMstr Data Filteru201D check was disabled and our posting was happening perfectly in R/3 as well BIW. What we understand is that, this check is required to pick the Article Code from masters with reference of EAN number which comes in POS TLog file and then it gets posted. We had written a ROUTINE in update rules to pick the Article Code from masters after truncating ZERO prefix from EAN, because the masters which we upload in R/3 with ZERO prefix EAN are getting updated in BIW without ZERO prefix.
4.    In the T-Code /N/POSDW/MON0, we are not able to change the status of processed transaction from 4 (completed) to 1 (ready) or vice-a-versa. Earlier we were able to do the same. This is required to re-process the transactions after doing the corrections in errors occurred at the time of first processing.
Regards
Amar Preet Singh

Hi
1)Duplicate posting in R/3 : check the 'Tasks' configuration WPUUMS & WPUTAB in /N/POSDW/IMG in POSDM.
2) Write a Routine in BI side to allow EAN's with prefix Zeros
3) master data filter is used to check the data with BI master data. Master data filter should always be used while data posting.
4) The status should be first changed from completed to cancelled/rejected and then cancelled to Ready status.
    Then you will be able to reprocess the posdm data to ISR.
Regards
Abhijit

Attachments in PRs/POs should not be deleted

Dear All
Attachments in PRs and POs should not be deleted. Is there any control for this?
Thank you

Hi Jack,
SAP Note 49127 - cost center account assignments in asset accounting.
I couldnot find information on deletion of attachments in Purchasing documents PR/PO.
Can you guide me please
Regards,
Mavs

URGENT: - REGARDING ALV REPORT

hi,
    i had made dis report in ALV and i want to display d heading format as follows:-
        NAME:- TEST PROGRAM
        date: - 21.05.2007
        time:- 1:30:23 am
moreover i want to see the print perview of it but it is giving runtime error.
plz help me in solving dis problem and he or she will be definately rewarded..
*& Report ZMFTEST5
REPORT ZMFTEST5 no standard page heading LINE-SIZE 310.
TABLES : VBAK,ABAP,VBEP,VBKD,MARA,KNA1,MAKT.
*Varriable declaration.
TYPE-POOLS SLIS.
DATA : POS TYPE I.
DATA REPID LIKE SY-REPID.
DATA : F1 TYPE SLIS_T_FIELDCAT_ALV,
F2 TYPE SLIS_FIELDCAT_ALV,
L_LAYOUT TYPE SLIS_LAYOUT_ALV.
DATA L_POS TYPE I VALUE 1. "position of the column
DATA GT_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV.
DATA: GT_EVENTS TYPE SLIS_T_EVENT,
FS_EVENTCAT LIKE LINE OF GT_EVENTs.
DATA : T_HEADING TYPE slis_t_listheader.
INTERNAL TABLE FOR SALES ORDER *****************
DATA : BEGIN OF ITSO OCCURS 0,
VBELN LIKE VBAK-VBELN,
ERDAT LIKE VBAK-ERDAT,
BSTNK LIKE VBAK-BSTNK,
KUNNR LIKE VBAK-KUNNR,
MATNR LIKE VBAP-MATNR,
POSNR LIKE VBAP-POSNR,
WMENG LIKE VBEP-WMENG,
NTGEW LIKE MARA-NTGEW,
BRGEW LIKE MARA-BRGEW,
GEWEI LIKE MARA-GEWEI,
SPART LIKE VBAK-SPART,
BMENG LIKE VBEP-BMENG,
EDATU LIKE VBEP-EDATU,
BSTKD LIKE VBKD-BSTKD,
WERKS LIKE VBAP-WERKS,
MEINS LIKE MARA-MEINS,
KWMENG LIKE VBAP-KWMENG,
KLMENG LIKE VBAP-KLMENG,
BALQTY LIKE VBAP-KLMENG,
SOGWT LIKE MARA-BRGEW,
SONWT LIKE MARA-BRGEW,
SINWT LIKE MARA-BRGEW,
BALGWT LIKE MARA-BRGEW,
BALNWT LIKE MARA-BRGEW,
DISPNWT LIKE MARA-BRGEW,
PARTYNAME LIKE KNA1-NAME1,
ITEMDESC LIKE MAKT-MAKTX,
STATUS TYPE C,
END OF ITSO.
DATA:B_QTY TYPE P LENGTH 7 DECIMALS 3.
***********PARAMETERS***************
PARAMETERS : PLANT LIKE VBAP-WERKS OBLIGATORY.
*********SELECTION SCREEN OPTIONS*********
SELECT-OPTIONS : SO_ORD FOR VBAK-VBELN,
SO_PARTY FOR VBAK-KUNNR,
IT_M FOR MARA-MATNR,
DIV FOR VBAK-SPART,
SO_DATE FOR VBAK-ERDAT,
S_DATE FOR VBEP-EDATU.
START-OF-SELECTION.
SELECT DISTINCT A~VBELN A~ERDAT A~BSTNK A~KUNNR B~SPART B~MATNR B~POSNR B~WERKS B~KWMENG B~KBMENG C~NTGEW C~BRGEW C~GEWEI D~WMENG D~BMENG D~EDATU D~VBELN
FROM VBAK AS A INNER JOIN VBAP AS B ON B~VBELN = A~VBELN
INNER JOIN MARA AS C ON C~MATNR = B~MATNR
INNER JOIN VBEP AS D ON D~WMENG > 0 AND D~VBELN = A~VBELN AND D~POSNR = B~POSNR
INTO CORRESPONDING FIELDS OF TABLE ITSO
WHERE A~VBELN IN SO_ORD AND A~KUNNR IN SO_PARTY AND B~SPART IN DIV AND A~ERDAT IN SO_DATE AND D~EDATU IN S_DATE AND B~MATNR IN IT_M AND B~WERKS = PLANT.
IF SY-SUBRC <> 0.
MESSAGE E899(M3) WITH 'No records'.
ENDIF.
DATA : V_NETWT LIKE MARA-NTGEW,
       V_GRWT LIKE MARA-NTGEW,
       V_SOSTAT TYPE C.
LOOP AT ITSO.
if ITSO-bmeng = 0.
    V_SOSTAT = 'A'.
ELSEIF ITSO-WMENG <> ITSO-BMENG.
    V_SOSTAT = 'B'.
ELSE.
    V_SOSTAT = 'C'.
ENDIF.
IF ITSO-GEWEI = 'G'.
    V_NETWT = ITSO-NTGEW / 1000.
    V_GRWT = ITSO-BRGEW / 1000.
ELSEIF ITSO-GEWEI = 'KG'.
    V_NETWT = ITSO-NTGEW.
    V_GRWT = ITSO-BRGEW.
ELSEIF ITSO-GEWEI = 'TO'.
    V_NETWT = ITSO-NTGEW * 1000.
    V_GRWT = ITSO-BRGEW * 1000.
ENDIF.
ITSO-STATUS = V_SOSTAT.
ITSO-SOGWT = V_GRWT * ITSO-WMENG / 1000.
ITSO-SONWT = V_NETWT * ITSO-WMENG / 1000.
ITSO-SINWT = V_GRWT * ITSO-BMENG / 1000.
ITSO-BALGWT = V_GRWT * ( ITSO-WMENG - ITSO-BMENG ) / 1000.
ITSO-BALNWT = V_NETWT * ( ITSO-WMENG - ITSO-BMENG ) / 1000.
ITSO-DISPNWT = V_NETWT * ITSO-BMENG / 1000.
ITSO-BALQTY = ITSO-WMENG - ITSO-BMENG.
SELECT SINGLE NAME1 FROM KNA1 INTO ITSO-PARTYNAME WHERE KUNNR = ITSO-KUNNR.
SELECT SINGLE MAKTX FROM MAKT INTO ITSO-ITEMDESC WHERE MATNR = ITSO-MATNR.
MODIFY ITSO.
ENDLOOP.
perform f_build_eventcat.
PERFORM LAYOUT using t_heading.
END-OF-SELECTION.
FORM LAYOUT using t_heading type slis_t_listheader.
data : t_event    type slis_t_event.
PERFORM FCAT USING 'WERKS'     'ITSO' '' 'PLANT '               'WERKS'     'VBAP' ''.
PERFORM FCAT USING 'VBELN'     'ITSO' '' 'SO NO. '              'VBELN'     'VBAK' ''.
PERFORM FCAT USING 'ERDAT'     'ITSO' '' 'S.O.DATE'             'ERDAT'     'VBAK' ''.
PERFORM FCAT USING 'BSTNK'     'ITSO' '' 'P.O.N.O.'             'BSTNK'     'VBAK' ''.
PERFORM FCAT USING 'KUNNR'     'ITSO' '' 'PARTY '               'KUNNR'     'VBAP' ''.
PERFORM FCAT USING 'PARTYNAME' 'ITSO' '' 'PARTY DESCRIPTION'    'PARTYNAME' ''     ''.
PERFORM FCAT USING 'ITEMDESC' 'ITSO' '' 'MATERIAL DESCRIPTION' 'ITEMDESC' ''     ''.
PERFORM FCAT USING 'MATNR'     'ITSO' '' 'MAT.NO. '             'MATNR'     'MARA' ''.
PERFORM FCAT USING 'POSNR'     'ITSO' '' 'LINE.ITEM'            'POSNR'     'VBAP' ''.
PERFORM FCAT USING 'WMENG'     'ITSO' '' 'S.O.QTY'              'WMENG'     'VBEP' '' .
PERFORM FCAT USING 'EDATU'     'ITSO' '' 'SCH.DATE'             'EDATU'     'VBEP' ''.
PERFORM FCAT USING 'SONWT'     'ITSO' '' 'S.O.NWT '             'P'         ''     ''.
PERFORM FCAT USING 'SOGWT'     'ITSO' '' 'S.O.GWT '             'P'         ''     ''.
PERFORM FCAT USING 'SPART'     'ITSO' '' 'DIV    '              'SPART'     'VBAP' ''.
PERFORM FCAT USING 'BMENG'     'ITSO' '' 'DISP.QTY'             'BMENG'     'VBEP' ''.
PERFORM FCAT USING 'DISPNWT'   'ITSO' '' 'DISP.NT.WT '          'P'         ''     ''.
PERFORM FCAT USING 'BALQTY'    'ITSO' '' 'BAL.QTY.'             'P'         ''     ''.
PERFORM FCAT USING 'BALNWT'    'ITSO' '' 'BAL.NT.WT '           'P'         ''     ''.
PERFORM FCAT USING 'BALGWT'    'ITSO' '' 'BAL.GR.WT '           'P'         ''     ''.
PERFORM FCAT USING 'STATUS'    'ITSO' '' 'STATUS'               'STATUS'    ''     ''.
refresh t_event.
*perform set_top_page_heading using t_heading t_event.
REPID = SY-REPID.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
I_INTERFACE_CHECK                 = ' '
I_BYPASSING_BUFFER                =
I_BUFFER_ACTIVE                   = ' '
   I_CALLBACK_PROGRAM                = REPID
I_CALLBACK_PF_STATUS_SET          = ' '
I_CALLBACK_USER_COMMAND           = ' '
   I_CALLBACK_TOP_OF_PAGE            = ' '
I_CALLBACK
I_CALLBACK_HTML_TOP_OF_PAGE       = ' '
I_CALLBACK_HTML_END_OF_LIST       = ' '
I_STRUCTURE_NAME                  =
I_BACKGROUND_ID                   = ' '
I_GRID_TITLE                      =
I_GRID_SETTINGS                   =
IS_LAYOUT                         =
IT_FIELDCAT                       = F1
IT_EXCLUDING                      =
IT_SPECIAL_GROUPS                 =
IT_SORT                           =
IT_FILTER                         =
IS_SEL_HIDE                       =
I_DEFAULT                         = 'X'
I_SAVE                            = ' '
IS_VARIANT                        =
IT_EVENTS                         = GT_EVENTS[]
IT_EVENT_EXIT                     =
IS_PRINT                          =
IS_REPREP_ID                      =
I_SCREEN_START_COLUMN             = 0
I_SCREEN_START_LINE               = 0
I_SCREEN_END_COLUMN               = 0
I_SCREEN_END_LINE                 = 0
IT_ALV_GRAPHICS                   =
IT_ADD_FIELDCAT                   =
IT_HYPERLINK                      =
I_HTML_HEIGHT_TOP                 =
I_HTML_HEIGHT_END                 =
IT_EXCEPT_QINFO                   =
IMPORTING
E_EXIT_CAUSED_BY_CALLER           =
ES_EXIT_CAUSED_BY_USER            =
TABLES
   T_OUTTAB                          = ITSO
EXCEPTIONS
PROGRAM_ERROR                     = 1
OTHERS                            = 2
ENDFORM. " LAYOUT
*& Form FCAT
FORM FCAT USING P_FIELD P_TABLE P_SUM P_TEXT P_RFIELD P_RTABLE P_DISP.
ADD 1 TO POS.
F2-COL_POS = POS.
F2-FIELDNAME = P_FIELD.
F2-TABNAME = P_TABLE.
F2-SELTEXT_L = P_TEXT.
F2-REF_FIELDNAME = P_RFIELD.
F2-REF_TABNAME = P_RTABLE.
F2-DO_SUM = P_SUM.
F2-NO_OUT = P_DISP.
APPEND F2 TO F1.
CLEAR F2.
ENDFORM. " FCAT
FORM F_BUILD_EVENTCAT .
CLEAR: GT_EVENTS. REFRESH: GT_EVENTS.
CLEAR: FS_EVENTCAT.
FS_EVENTCAT-NAME = 'TOP_OF_PAGE'.
FS_EVENTCAT-FORM = 'F_REPORT_HEADER_ALV'.
APPEND FS_EVENTCAT TO GT_EVENTS.
CLEAR: FS_EVENTCAT.
FS_EVENTCAT-NAME = 'END_OF_LIST'.
FS_EVENTCAT-FORM = 'F_WRITE_SUMMARY'.
APPEND FS_EVENTCAT TO GT_EVENTS.
ENDFORM.
*FORM F_REPORT_HEADER_ALV.
*CALL FUNCTION 'Z_HEAD_PRINT'
EXPORTING
WRITE: / TITLE1 = 'XYZ Limited'
TITLE2 = 'Sales Order Report'
TITLE3 = 'Created on '
COLOR = 'X'.
*ENDFORM.
FORM F_WRITE_SUMMARY .
write:/ 'Welcome to XYZ Limited'.
write:/ 'This is a test program to display Report in ALV Format'.
ENDFORM.
*&      Form set_top_page_heading
      text
     -->P_T_HEADING text
*form set_top_page_heading using    t_heading
                                   t_events type slis_t_event.
*data: x_heading type slis_listheader,
     x_event   type line of slis_t_event.
Report title
clear t_heading[].
clear x_heading.
x_heading-typ = 'H'.
x_heading-info = ''(001).
append x_heading to t_heading.
t_heading-info = 'TEST'.
t_heading-typ = 'H'.
Program name
clear x_heading.
x_heading-typ = 'S'.
x_heading-key = 'Program: '.
x_heading-info = sy-repid.
append x_heading to t_heading.
User who is running the report
clear x_heading.
x_heading-typ = 'S'.
x_heading-key = 'User: '.
x_heading-info = sy-uname.
append x_heading to t_heading.
Date of execution
clear x_heading.
x_heading-typ = 'S'.
x_heading-key = 'Date: '.
write sy-datum to x_heading-info.
append x_heading to t_heading.
Time of execution
clear x_heading.
x_heading-typ = 'S'.
x_heading-key = 'Time: '.
write sy-uzeit to x_heading-info.
append x_heading to t_heading.
Top of page event
x_event-name = slis_ev_top_of_page.
x_event-form = 'TOP_OF_PAGE'.
append x_event to t_events.
*endform.                    " set_top_page_heading

Hi,
i had change ur code just copy this and try,i hope it will work.
REPORT ZMFTEST5 no standard page heading LINE-SIZE 310.
TABLES : VBAK,ABAP,VBEP,VBKD,MARA,KNA1,MAKT.
*Varriable declaration.
TYPE-POOLS SLIS.
DATA : POS TYPE I.
DATA REPID LIKE SY-REPID.
****************CHANGES**************
DATA : FDATE TYPE STRING,
       FTIME TYPE STRING,
       FNAME TYPE STRING.
****************CHANGES**************
DATA : F1 TYPE SLIS_T_FIELDCAT_ALV,
F2 TYPE SLIS_FIELDCAT_ALV,
L_LAYOUT TYPE SLIS_LAYOUT_ALV.
DATA L_POS TYPE I VALUE 1. "position of the column
DATA GT_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV.
DATA: GT_EVENTS TYPE SLIS_T_EVENT,
FS_EVENTCAT LIKE LINE OF GT_EVENTs.
DATA : T_HEADING TYPE slis_t_listheader.
INTERNAL TABLE FOR SALES ORDER *****************
DATA : BEGIN OF ITSO OCCURS 0,
VBELN LIKE VBAK-VBELN,
ERDAT LIKE VBAK-ERDAT,
BSTNK LIKE VBAK-BSTNK,
KUNNR LIKE VBAK-KUNNR,
MATNR LIKE VBAP-MATNR,
POSNR LIKE VBAP-POSNR,
WMENG LIKE VBEP-WMENG,
NTGEW LIKE MARA-NTGEW,
BRGEW LIKE MARA-BRGEW,
GEWEI LIKE MARA-GEWEI,
SPART LIKE VBAK-SPART,
BMENG LIKE VBEP-BMENG,
EDATU LIKE VBEP-EDATU,
BSTKD LIKE VBKD-BSTKD,
WERKS LIKE VBAP-WERKS,
MEINS LIKE MARA-MEINS,
KWMENG LIKE VBAP-KWMENG,
KLMENG LIKE VBAP-KLMENG,
BALQTY LIKE VBAP-KLMENG,
SOGWT LIKE MARA-BRGEW,
SONWT LIKE MARA-BRGEW,
SINWT LIKE MARA-BRGEW,
BALGWT LIKE MARA-BRGEW,
BALNWT LIKE MARA-BRGEW,
DISPNWT LIKE MARA-BRGEW,
PARTYNAME LIKE KNA1-NAME1,
ITEMDESC LIKE MAKT-MAKTX,
STATUS TYPE C,
END OF ITSO.
DATA:B_QTY TYPE P LENGTH 7 DECIMALS 3.
***********PARAMETERS***************
PARAMETERS : PLANT LIKE VBAP-WERKS OBLIGATORY.
*********SELECTION SCREEN OPTIONS*********
SELECT-OPTIONS : SO_ORD FOR VBAK-VBELN,
SO_PARTY FOR VBAK-KUNNR,
IT_M FOR MARA-MATNR,
DIV FOR VBAK-SPART,
SO_DATE FOR VBAK-ERDAT,
S_DATE FOR VBEP-EDATU.
START-OF-SELECTION.
SELECT DISTINCT A~VBELN A~ERDAT A~BSTNK A~KUNNR B~SPART B~MATNR B~POSNR B~WERKS B~KWMENG B~KBMENG C~NTGEW C~BRGEW C~GEWEI D~WMENG D~BMENG D~EDATU D~VBELN
FROM VBAK AS A INNER JOIN VBAP AS B ON B~VBELN = A~VBELN
INNER JOIN MARA AS C ON C~MATNR = B~MATNR
INNER JOIN VBEP AS D ON D~WMENG > 0 AND D~VBELN = A~VBELN AND D~POSNR = B~POSNR
INTO CORRESPONDING FIELDS OF TABLE ITSO
WHERE A~VBELN IN SO_ORD AND A~KUNNR IN SO_PARTY AND B~SPART IN DIV AND A~ERDAT IN SO_DATE AND D~EDATU IN S_DATE AND B~MATNR IN IT_M AND B~WERKS = PLANT.
IF SY-SUBRC <> 0.
MESSAGE E899(M3) WITH 'No records'.
ENDIF.
DATA : V_NETWT LIKE MARA-NTGEW,
V_GRWT LIKE MARA-NTGEW,
V_SOSTAT TYPE C.
LOOP AT ITSO.
if ITSO-bmeng = 0.
V_SOSTAT = 'A'.
ELSEIF ITSO-WMENG <> ITSO-BMENG.
V_SOSTAT = 'B'.
ELSE.
V_SOSTAT = 'C'.
ENDIF.
IF ITSO-GEWEI = 'G'.
V_NETWT = ITSO-NTGEW / 1000.
V_GRWT = ITSO-BRGEW / 1000.
ELSEIF ITSO-GEWEI = 'KG'.
V_NETWT = ITSO-NTGEW.
V_GRWT = ITSO-BRGEW.
ELSEIF ITSO-GEWEI = 'TO'.
V_NETWT = ITSO-NTGEW * 1000.
V_GRWT = ITSO-BRGEW * 1000.
ENDIF.
ITSO-STATUS = V_SOSTAT.
ITSO-SOGWT = V_GRWT * ITSO-WMENG / 1000.
ITSO-SONWT = V_NETWT * ITSO-WMENG / 1000.
ITSO-SINWT = V_GRWT * ITSO-BMENG / 1000.
ITSO-BALGWT = V_GRWT * ( ITSO-WMENG - ITSO-BMENG ) / 1000.
ITSO-BALNWT = V_NETWT * ( ITSO-WMENG - ITSO-BMENG ) / 1000.
ITSO-DISPNWT = V_NETWT * ITSO-BMENG / 1000.
ITSO-BALQTY = ITSO-WMENG - ITSO-BMENG.
SELECT SINGLE NAME1 FROM KNA1 INTO ITSO-PARTYNAME WHERE KUNNR = ITSO-KUNNR.
SELECT SINGLE MAKTX FROM MAKT INTO ITSO-ITEMDESC WHERE MATNR = ITSO-MATNR.
MODIFY ITSO.
ENDLOOP.
perform f_build_eventcat.
PERFORM LAYOUT using t_heading.
END-OF-SELECTION.
FORM LAYOUT using t_heading type slis_t_listheader.
data : t_event type slis_t_event.
PERFORM FCAT USING 'WERKS' 'ITSO' '' 'PLANT ' 'WERKS' 'VBAP' ''.
PERFORM FCAT USING 'VBELN' 'ITSO' '' 'SO NO. ' 'VBELN' 'VBAK' ''.
PERFORM FCAT USING 'ERDAT' 'ITSO' '' 'S.O.DATE' 'ERDAT' 'VBAK' ''.
PERFORM FCAT USING 'BSTNK' 'ITSO' '' 'P.O.N.O.' 'BSTNK' 'VBAK' ''.
PERFORM FCAT USING 'KUNNR' 'ITSO' '' 'PARTY ' 'KUNNR' 'VBAP' ''.
PERFORM FCAT USING 'PARTYNAME' 'ITSO' '' 'PARTY DESCRIPTION' 'PARTYNAME' '' ''.
PERFORM FCAT USING 'ITEMDESC' 'ITSO' '' 'MATERIAL DESCRIPTION' 'ITEMDESC' '' ''.
PERFORM FCAT USING 'MATNR' 'ITSO' '' 'MAT.NO. ' 'MATNR' 'MARA' ''.
PERFORM FCAT USING 'POSNR' 'ITSO' '' 'LINE.ITEM' 'POSNR' 'VBAP' ''.
PERFORM FCAT USING 'WMENG' 'ITSO' '' 'S.O.QTY' 'WMENG' 'VBEP' '' .
PERFORM FCAT USING 'EDATU' 'ITSO' '' 'SCH.DATE' 'EDATU' 'VBEP' ''.
PERFORM FCAT USING 'SONWT' 'ITSO' '' 'S.O.NWT ' 'P' '' ''.
PERFORM FCAT USING 'SOGWT' 'ITSO' '' 'S.O.GWT ' 'P' '' ''.
PERFORM FCAT USING 'SPART' 'ITSO' '' 'DIV ' 'SPART' 'VBAP' ''.
PERFORM FCAT USING 'BMENG' 'ITSO' '' 'DISP.QTY' 'BMENG' 'VBEP' ''.
PERFORM FCAT USING 'DISPNWT' 'ITSO' '' 'DISP.NT.WT ' 'P' '' ''.
PERFORM FCAT USING 'BALQTY' 'ITSO' '' 'BAL.QTY.' 'P' '' ''.
PERFORM FCAT USING 'BALNWT' 'ITSO' '' 'BAL.NT.WT ' 'P' '' ''.
PERFORM FCAT USING 'BALGWT' 'ITSO' '' 'BAL.GR.WT ' 'P' '' ''.
PERFORM FCAT USING 'STATUS' 'ITSO' '' 'STATUS' 'STATUS' '' ''.
refresh t_event.
*perform set_top_page_heading using t_heading t_event.
REPID = SY-REPID.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
I_INTERFACE_CHECK = ' '
I_BYPASSING_BUFFER =
I_BUFFER_ACTIVE = ' '
I_CALLBACK_PROGRAM = REPID
I_CALLBACK_PF_STATUS_SET = ' '
I_CALLBACK_USER_COMMAND = ' '
I_CALLBACK_TOP_OF_PAGE = ' '
I_CALLBACK
I_CALLBACK_HTML_TOP_OF_PAGE = 'TOP'
I_CALLBACK_HTML_END_OF_LIST = ' '
I_STRUCTURE_NAME =
I_BACKGROUND_ID = ' '
I_GRID_TITLE =
I_GRID_SETTINGS =
IS_LAYOUT =
IT_FIELDCAT = F1
IT_EXCLUDING =
IT_SPECIAL_GROUPS =
IT_SORT =
IT_FILTER =
IS_SEL_HIDE =
I_DEFAULT = 'X'
I_SAVE = ' '
IS_VARIANT =
IT_EVENTS = GT_EVENTS[]
IT_EVENT_EXIT =
IS_PRINT =
IS_REPREP_ID =
I_SCREEN_START_COLUMN = 0
I_SCREEN_START_LINE = 0
I_SCREEN_END_COLUMN = 0
I_SCREEN_END_LINE = 0
IT_ALV_GRAPHICS =
IT_ADD_FIELDCAT =
IT_HYPERLINK =
I_HTML_HEIGHT_TOP =
I_HTML_HEIGHT_END =
IT_EXCEPT_QINFO =
IMPORTING
E_EXIT_CAUSED_BY_CALLER =
ES_EXIT_CAUSED_BY_USER =
TABLES
T_OUTTAB = ITSO
EXCEPTIONS
PROGRAM_ERROR = 1
OTHERS = 2
ENDFORM. " LAYOUT
*& Form FCAT
FORM FCAT USING P_FIELD P_TABLE P_SUM P_TEXT P_RFIELD P_RTABLE P_DISP.
ADD 1 TO POS.
F2-COL_POS = POS.
F2-FIELDNAME = P_FIELD.
F2-TABNAME = P_TABLE.
F2-SELTEXT_L = P_TEXT.
F2-REF_FIELDNAME = P_RFIELD.
F2-REF_TABNAME = P_RTABLE.
F2-DO_SUM = P_SUM.
F2-NO_OUT = P_DISP.
APPEND F2 TO F1.
CLEAR F2.
ENDFORM. " FCAT
FORM F_BUILD_EVENTCAT .
CLEAR: GT_EVENTS. REFRESH: GT_EVENTS.
CLEAR: FS_EVENTCAT.
FS_EVENTCAT-NAME = 'TOP_OF_PAGE'.
FS_EVENTCAT-FORM = 'F_REPORT_HEADER_ALV'.
APPEND FS_EVENTCAT TO GT_EVENTS.
CLEAR: FS_EVENTCAT.
FS_EVENTCAT-NAME = 'END_OF_LIST'.
FS_EVENTCAT-FORM = 'F_WRITE_SUMMARY'.
APPEND FS_EVENTCAT TO GT_EVENTS.
ENDFORM.
*FORM F_REPORT_HEADER_ALV.
*CALL FUNCTION 'Z_HEAD_PRINT'
EXPORTING
WRITE: / TITLE1 = 'XYZ Limited'
TITLE2 = 'Sales Order Report'
TITLE3 = 'Created on '
COLOR = 'X'.
*ENDFORM.
FORM F_WRITE_SUMMARY .
write:/ 'Welcome to XYZ Limited'.
write:/ 'This is a test program to display Report in ALV Format'.
ENDFORM.
FORM TOP.
DATA: WT_HEADER TYPE SLIS_T_LISTHEADER,
        WA_HEADER TYPE SLIS_LISTHEADER.
CONCATENATE 'DATE:-' SY-DATUM INTO FDATE.
CONCATENATE 'TIME:-' SY-UZEIT INTO FTIME.
FNAME = 'NAME:- TEST'.
WA_HEADER-TYP = HEADER.
WA_HEADER-INFO = FNAME.
APPEND WA_HEADER TO WT_HEADER.
CLEAR WA_HEADER.
WA_HEADER-TYP = HEADER.
WA_HEADER-INFO = FDATE.
APPEND WA_HEADER TO WT_HEADER.
CLEAR WA_HEADER.
WA_HEADER-TYP = HEADER.
WA_HEADER-INFO = FTIME.
APPEND WA_HEADER TO WT_HEADER.
CLEAR WA_HEADER.
ENDFORM.
*& Form set_top_page_heading
text
-->P_T_HEADING text
*form set_top_page_heading using t_heading
t_events type slis_t_event.
*data: x_heading type slis_listheader,
x_event type line of slis_t_event.
Report title
clear t_heading[].
clear x_heading.
x_heading-typ = 'H'.
x_heading-info = ''(001).
append x_heading to t_heading.
t_heading-info = 'TEST'.
t_heading-typ = 'H'.
Program name
clear x_heading.
x_heading-typ = 'S'.
x_heading-key = 'Program: '.
x_heading-info = sy-repid.
append x_heading to t_heading.
User who is running the report
clear x_heading.
x_heading-typ = 'S'.
x_heading-key = 'User: '.
x_heading-info = sy-uname.
append x_heading to t_heading.
Date of execution
clear x_heading.
x_heading-typ = 'S'.
x_heading-key = 'Date: '.
write sy-datum to x_heading-info.
append x_heading to t_heading.
Time of execution
clear x_heading.
x_heading-typ = 'S'.
x_heading-key = 'Time: '.
write sy-uzeit to x_heading-info.
append x_heading to t_heading.
Top of page event
x_event-name = slis_ev_top_of_page.
x_event-form = 'TOP_OF_PAGE'.
append x_event to t_events.
*endform. " set_top_page_heading
*please do reward points if helpful
Thanks and Regards,
S.N.Venkatesh

Vendor Report per Plant for Non POs

Hi
We want a report that shows the Document date, the Invoice date, the vendor, the Plant, the value for Non POs. Is there any table or report, which can provide us with the mentioned data.
Quick Response will be appreciated.
Thanks & Regards
Edited by: Mehak Malhotra on Feb 16, 2009 9:18 AM
Edited by: Mehak Malhotra on Feb 16, 2009 9:18 AM

Hi Vikrant,
Thank you so much for your quick response. Just wanted to confirm if MB51 includes the vendor with PO and Non POs. As I am specifically looking for Vendors with Non POs. eg a consultant to a plant can also be considered as vendor who has no POs. I am trying to collect that information.
Thanks & Regards

Will MIM (Merchandize and inventory management) work with SAP AFS / SAP POS

We are implementing SAP AFS ERP at the head office and SAP POS at the retail stores.
We want to implement the MIM module for inventory management at retail store level. Does MIM work in conjunction with SAP AFS. A consultant was suggesting that MIM works only with SAP Retail and no other vertical SAP solution.
Can someone please clarify?
Regards
paddy

MIM is linked to IS Retail, not to AFS.
Nevertheless, you can always link and AFS and a Retail system. SAP provides a very convincing ALE scheme for this.
Eric

Report for POs which are unpaid

Dear All,
I need report where all POs whether material or Service, which are unpaid. Reasons could be fund,Material not received or bill not booked. I tried ME80FN but I am unable to get the same.
Please let me know where I can get this and in which report.
Thanking you.
With Best Regards,
Rajesh

Hi Rajesh,
Use ME2M, ME2N, ME2L reports. In the selection parameters field in the input screen select the apropriate key
eg: RECHNUNG for Open Invoices, WE101 for open goods receipt etc.
Hope the above answers your query, else revert.
If helpful award points
Regards,
Vivek

Regarding POS DM

Similar Messages

Maybe you are looking for