Hi all..very urgent

Hi Gurus,
Could you plz help me to collect the tables, structures,views, search helps and programs which uses PRODH3 and PRODH4 data elements...
plz guys very urgent..
marks wud definetly be given.
Regards
Sahil

A900
ZPRODH4
A914
ZPRODH4
A915
A916
A918
A923
A924
A925
A926
A900
A914
A915
A916
A918
A923
A924
A925
A926
A928
A931
A937
A955
A966
S800
S800E
S801
S801E
S802
S802E
S803
S803E
S804
S804E
S805
S805E
S806
S806E
S821
S821E
S911
S911E
S912
S912E
S950
S950E
S951
S951E
for prodh3
A144
A148
A921
PRODH3
S020
S020E
S075
S075E
S800
S800E
S801
S801E
S802
S802E
S803
S803E
S804
S804E
S805
S805E
S806
S806E
S821
S821E
S911
S911E
S912
S912E
S950
S950E
Message was edited by:
        Amit Singla
Message was edited by:
        Amit Singla

Similar Messages

Set Page "HEIGHT" ---Very Urgent, Please Help me on this issue. Please.

Hi all ,
Very Urgent, Please Help me on this issue.
when_now_form trigger i set set maximize the window and MDI. And my window and canvas is same height (1500). The formsweb.cfg also changed to 1500. But still I can not view full page on web. Where to I change the properties. Please help.
Selvam

Is your form running inside the browser window (with SeparateFrame=False)? If the browser is maximized, and your form is maximized, yet you cannot see the entire screen, you can run with SeparateFrame=True. You can do that on the browser line.

RE: (forte-users) Hi All....very urgent...Forte doesn'thandle La rge ar

Okay, here's my three cents worth,
Are you using Forte "Keep Alive" settings? If yes, you may simply have a
time-out.
While a partition is waiting for a reply from a database, it blocks and
won't respond
to anything, including pings to check if it's still alive. So, if the query
takes longer to
complete than the time-out period of the communication manager, then you
will
loose the connection to the partition.
-----Original Message-----
From: Aberdour George [SMTP:george.aberdourdet.nsw.edu.au]
Sent: Sunday, February 13, 2000 11:39 AM
To: 'Babu Raj'; kamranaminyahoo.com
Subject: RE: (forte-users) Hi All....very urgent...Forte doesn't
handle La rge array properly
Hi,
This sounds almost identical to a problem we have experienced.
If it is the same problem it is because you have compiled a back-end
load-balanced partition, but NOT the router that manages it.
With such a configuration, attempts to send greater than a few thousand
rows
will fail - and it doesn't seem to matter what you set -fm to.
You don't see the problem running distributed from your workspace because
everything is interpreted.
So just compile the router and try again.
Hope this helps.
George Aberdour
(George.Aberdourdet.nsw.edu.au)
-----Original Message-----
From: Babu Raj [mailto:ibcsmartboyyahoo.com]
Sent: Saturday, 12 February 2000 7:24
To: kamranaminyahoo.com
Subject: (forte-users) Hi All....very urgent...Forte doesn't handle
Large array properly
Hi All,
Have anyone experienced problem of retrieving
more than 1500 records from the database table, into
the object.
I use dynamic SQL statement, and populating Array
object from the DBDataSet. When it runs from my
workspace distributed, it works fine. But, when I make
deployment, and install on the test bed, I face
Network connection failure from the client machine. It
looks like, server read the data from the Database,
and while packaging it, to send it across to the
client, server seems to run out ouf memory or couldn't
maintain the connection with the client. I tried to
set -fm flag on that partition, and separately setting
FORTE_GC_SPECIAL too, but still no luck.
we have increased, the rollback segment size on
Oracle too, but still no luck.
Appreciate, your suggestions, if you can,
Thank you,
Babu
For the archives, go to: http://lists.xpedior.com/forte-users and use
the login: forte and the password: archive. To unsubscribe, send in a new
email the word: 'Unsubscribe' to: forte-users-requestlists.xpedior.com
For the archives, go to: http://lists.xpedior.com/forte-users and use
the login: forte and the password: archive. To unsubscribe, send in a new
email the word: 'Unsubscribe' to: forte-users-requestlists.xpedior.com

Okay, here's my three cents worth,
Are you using Forte "Keep Alive" settings? If yes, you may simply have a
time-out.
While a partition is waiting for a reply from a database, it blocks and
won't respond
to anything, including pings to check if it's still alive. So, if the query
takes longer to
complete than the time-out period of the communication manager, then you
will
loose the connection to the partition.
-----Original Message-----
From: Aberdour George [SMTP:george.aberdourdet.nsw.edu.au]
Sent: Sunday, February 13, 2000 11:39 AM
To: 'Babu Raj'; kamranaminyahoo.com
Subject: RE: (forte-users) Hi All....very urgent...Forte doesn't
handle La rge array properly
Hi,
This sounds almost identical to a problem we have experienced.
If it is the same problem it is because you have compiled a back-end
load-balanced partition, but NOT the router that manages it.
With such a configuration, attempts to send greater than a few thousand
rows
will fail - and it doesn't seem to matter what you set -fm to.
You don't see the problem running distributed from your workspace because
everything is interpreted.
So just compile the router and try again.
Hope this helps.
George Aberdour
(George.Aberdourdet.nsw.edu.au)
-----Original Message-----
From: Babu Raj [mailto:ibcsmartboyyahoo.com]
Sent: Saturday, 12 February 2000 7:24
To: kamranaminyahoo.com
Subject: (forte-users) Hi All....very urgent...Forte doesn't handle
Large array properly
Hi All,
Have anyone experienced problem of retrieving
more than 1500 records from the database table, into
the object.
I use dynamic SQL statement, and populating Array
object from the DBDataSet. When it runs from my
workspace distributed, it works fine. But, when I make
deployment, and install on the test bed, I face
Network connection failure from the client machine. It
looks like, server read the data from the Database,
and while packaging it, to send it across to the
client, server seems to run out ouf memory or couldn't
maintain the connection with the client. I tried to
set -fm flag on that partition, and separately setting
FORTE_GC_SPECIAL too, but still no luck.
we have increased, the rollback segment size on
Oracle too, but still no luck.
Appreciate, your suggestions, if you can,
Thank you,
Babu
For the archives, go to: http://lists.xpedior.com/forte-users and use
the login: forte and the password: archive. To unsubscribe, send in a new
email the word: 'Unsubscribe' to: forte-users-requestlists.xpedior.com
For the archives, go to: http://lists.xpedior.com/forte-users and use
the login: forte and the password: archive. To unsubscribe, send in a new
email the word: 'Unsubscribe' to: forte-users-requestlists.xpedior.com

Hi all..very urgent..problem with the transaction VL10.

Hi gurus,i having trouble in executing the transaction VL10.
the procedure is as follows.
1.Enter the transaction VL10
2.Select Sales orders Tab
Enter sales document number 16283319 to 16283320
Remaining all fields should be blank
3.Click on Execute Icon.
4.Selected two Sales Documents.
5.Clickd on Back ground icon.
6.Error i am getting is OBJECT REQUESTED IS CURRENTLY LOCKED BY USER PSREDDY.
Can anybody help me with this..very urgent and full marks wud be given.

Hi Sahil,
Go to transaction SM12, put user name PSREDDY.
Exceute it, and select all entry and delete.
After follow the same procedure, you followed early.
Hope it will solve the problem.
Regards
Krishnendu

How to write code for this logic in a routine, very urgent --help me

hi all,
i want to apply this logic into one subroutin ZABC.
here i m giving my logic ,can any body help me in coding for this, this is very urgent, i hv to submit on wednesday.
4.1 Read the company code number BSEG-BUKRS from document line item.
4.2 Fetch PRDHA from MARA into GV_PRDHA where MATNR = BSEG-MATNR.
4.3 Fetch Business area (GSBER) from ZFIBU into GV_GSBER where (PRDHA = GV_PRDHA and BUKRS = BSEG-BUKRS) OR (PRDHA = GV_PRDHA and BUKRS = SPACE).
4.4 If business area match is found, go to step 3.9. Else continue.
4.5 If BKPF-BLART IN set ZVS_POSDT OR BKPF-XBLNR starts with I0*, execute steps below. Else, go to Step 3.6.
i. MOVE: BSEG-BKURS TO work area field WA_ZFIBUE-BUKRS,
BSEG-MATNR TO work area field WA_ZFIBUE-MATNR,
GV_PRDHA TO work area field WA_ZFIBUE-PRDHA,
BSEG-HKONT TO work area field WA_ZFIBUE-HKONT,
BSEG-GSBER TO work area field WA_ZFIBUE-GSBER,
BSEG-PSWBT TO work area field WA_ZFIBUE-PSWBT,
BKPF-BUDAT TO work area field WA_ZFIBUE-BUDAT,
SY-DATUM TO work area field WA_ZFIBUE-CREDATE,
SY-UZEIT TO work area field WA_ZFIBUE-CRETIME,
Fetch running serial number (WA_ZFIBUE-SERIALNO) from ZFICO. This number will be stored in ZFICO with PARAMTYPE = "BPM030307", SUBTYPE = "ZFIBUE" and KEY1 = "SERIALNO". The actual serial number will be stored in the field VALUE1.
i. Insert WA_ZFIBUE INTO ZFIBUE.
ii. Send email notification to the user (if it is not already sent to user on the same posting date).
Use function module SO_NEW_DOCUMENT_ATT_SEND_API1 to send mail.
Fetch email address and date of last email from ZFICO. These values will be stored in ZFICO with PARAMTYPE = "BPM030307", SUBTYPE = "EMAIL" and KEY1 = "<USERNAME>". The email address will be stored in the field VALUE1 and posting date in VALUE2. Once mail is sent, VALUE2 is updated with latest posting date (BKPF-BUDAT).
iii. Increment the running serial number and update ZFICO with new serial number.
a. GV_ SERIALNO = WA_ZFIBUE-SERIALNO + 1
b. Update ZFICO Set value1 = GV_SERIALNO
Where PARAMTYPE = "BPM030307" AND
SUBTYPE = "ZFIBUE" AND
KEY1 = "SERIALNO".
iv Move VDFT to BSEG-GSBER.
v. Exit routine.
4.6 Fetch MTART into GV_MTART from MARA where MATNR = BSEG-MATNR.
4.7 If SY-BATCH = INITIAL AND GV_MTART <> ROH, issue the error message - Maintain the mapping of product hierarchy <PRDHA> from article <MATNR> for <BUKRS>. Else, go to step 3.8.
4.8 If SY-BATCH <> INITIAL AND GV_MTART <> ROH, issue the error message - Maintain product hierarchy on article master. Go to step 3.10.
4.9 Move GV_GSBER TO BSEG-GSBER.
4.10 Exit Routine
plz give me reply asap --this is very urgent
thanks in advance
swathi

Hi Swathi,
If it's very very urgent then you better get on with it, don't waste time on the web. Chop chop.

Update Routine ... Help me Please--VERY URGENT

Hi All ,
I Moving data from Cube to ODS . Let me explain abt the records in the cube .
There are 6 key figures in the cube as well as dimensions, UNIQKEY TRANSACTION is One Dimension and ARTICLE is another dimension which is having an Navigational attribute called CORE ELEMENT.
I am showing the data with those two dimension and the key figures which are to be used in the routine.
Charc----
Key Figures
UNIQKEY-ARTICLE-Coreelement--
billqty
in base unit
A00N----1006330--1--
10.5
A00M -
1006320----2--
2.5
A00P-----1006330--1--
10.5
A00P-----1006320--2--
2.5
A00Q-----1006320--2--
2.5
A00Q-----1006340--3--
10.5
Now Lets see what the core element numbers mean,
core element 1 means -- fuel .
Core elemnet other 1 -- food .
I need to move these data into ODS Which will have an extra field called No of items in the transaction --ITEMS.For this i need to write a routine .
The Logic is ...
1.if Materail is of type 1(Means if the core element - 1)
I need to Populate the No of items in tnx = 1 .--ITEMS.
2.If Material is of type(Means if the core element)2or 3 I need to populate the billing quantity to the no of transcations.--ITEMS
3. If the Uniqkey tanscation contains two line items as suppose that you have 20 litres of fuel and 2 cans of coke, then No of Items in the transaction should be 3 and Billing Quantity in BUoM 22
billing quantity in BUoM = 20 litres for the first line item and 2 for the second line item...
then as the first line item is fuel, field No OF Items in the Transcation should be 1 (replacing the 20) + 2 = 3
so the final result in the ODS should be billing quantity in BUoM = 22 and The Items in the Transcation= 3
So the ODS Data should look like this.
UNIQKEY--billqty--
ITEMS
in base unit
A00N--10.5--
1
A00M--2.5--
2.5
A00P--13--
3.5
A00Q--13--
12.5
NOTE : IN the ODS only the UNIQKEY IS THE KEY FIELD and the rest are DATA FIELDS.
I Posted this one before also. But didnt get proper responses.
I am Pasting the piece of code which I have written . This code will work for the first two records in the cube , But it is failing for the UNIQKEY Transcation having Line items.
PROGRAM UPDATE_ROUTINE.
$$ begin of global - insert your declaration only below this line -
TABLES: /BI0/PMATERIAL.
DATA: TITEMS LIKE /BIC/AZPOCODS00-/BIC/ZTITEMS,
       CORE_ELEMENT like /BI0/PMATERIAL-RPA_WGH1.
$$ end of global - insert your declaration only before this line   -
FORM compute_data_field
TABLES   MONITOR STRUCTURE RSMONITOR "user defined monitoring
USING    COMM_STRUCTURE LIKE /BIC/CS8ZPOCTUS04
           RECORD_NO LIKE SY-TABIX
           RECORD_ALL LIKE SY-TABIX
           SOURCE_SYSTEM LIKE RSUPDSIMULH-LOGSYS
CHANGING RESULT LIKE /BIC/AZPOCODS00-/BIC/ZTITEMS
           RETURNCODE LIKE SY-SUBRC "Do not use!
           ABORT LIKE SY-SUBRC. "set ABORT <> 0 to cancel update
$$ begin of routine - insert your code only below this line        -
fill the internal table "MONITOR", to make monitor entries
check not COMM_STRUCTURE-material is initial.
select SINGLE RPA_WGH1
        INTO CORE_ELEMENT
        from /BI0/PMATERIAL
        where
        material = COMM_STRUCTURE-material
        and OBJVERS <>'D'.
   IF CORE_ELEMENT EQ '1'.
   TITEMS = '1'.
     CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
       EXPORTING
         input         = titems
      IMPORTING
        OUTPUT        = titems
   ELSE.
   TITEMS = COMM_STRUCTURE-BILL_QTY.
   ENDIF.
result value of the routine
RESULT = TITEMS..
if abort is not equal zero, the update process will be canceled
ABORT = 0.
$$ end of routine - insert your code only before this line         -
PLease give me ideas on how to acheive this . As I am not Aware of ABAP very well.. PLease try to give me the code. I hope one of you may got the same requirement before.
Its very urgent and I need to deliver it today itself.
Thanks in advance , you can mail me to [email protected]. If anybody intersted to discuss this Issue they can reach at +91 9845922955.

Hi ,
While I am moving the data from cube to ods . I need to create the update rules with cube -- 8cube . WHen i am doing this the billqty is a key figure in cube so that is not a problem but the ITEMS is not there in the cube ,SO for that I need to write a routine to populate that one.
Its strange but the user what to analyse with the UNIQKEY transaction. And these objects will be added as navigational attributes to the Characteristic. as it acts as another dimension.
He wants to laod these from ODS to Master data -Characteristic.
to say for each transcation hpw many items are getting sold.
Message was edited by: Nagarjuna Reddy
ONce again thanks for the qucik replies
Message was edited by: Nagarjuna Reddy

UPDATE ROUTINE --- CUBE --- ODS Very Very URGENT

Hi Collegues/Friends ,
First I need to thank for the intiators of this site , as I came to know that for many
problems we will get different best solutions ... Hoping the same I am posting a question
which is very very very urgent as the client is running after me for this .
My Requirement is as Follows. ..
I Moving the data from Cube to ODS . While i need to write a routine for an extra field in
ODS based on Billing Quantity in Base Unit of Measure . The Key Field in the ODS Is UNIQKEY
Transaction and It is a Characterstic in the Cube and we have MAterial as another
Characteristic and core element as navigational attribute .
In the Cube for every UNIQKEY transaction- there are more than One line items.
My data fields in the ODS are Billing Quantity in Base Unit of MEasure and and EXTRA FIELD
: No of Items in Transaction . But the thing is that I have only Billing Quantity in Base
Unit of Measure in cube as a key figure
BAsing on the UNIQKEY transcation and Billing Quantity In Base Unit Of Measure I need to
populate the No of Items in Transaction... For this i need to write a routine .
Let suppose say that for the Materials the core elements are as follows
Material Core element
10         1 -- fuel -- In liters
20         2 -- Cigar - in PAck
30         3 -- Coke - in Cans
Now Lets see how the records are there in InfoCUbe
Uniqkey / Material / Core element /Billin Quantiy
A          /   10      /     1        /    22
B          /   30      /     3        /    2
C          /   10      /    1         / 15
C          /   30      /     3        /     2
D          /   20      /     2        /    10
D          /   30      /     3        /    2
And IN the ODS -- I need to Populate the No OF items in Transaction.
the Logic behind this as follows .
1.if Materail is of type 1(Mean if the core element - 1)
I need to Populate the No of items in tnx = 1
2.If Material id of type 2 or 3 I need to populate the billing quantity to the no of
transcations.
3. If the Uniqkey tanscation contains two line items as suppose that you have 20 litres of
fuel and 2 cans of coke, then No of Items in the transaction should be 3 and Billing
Quantity in BUoM 22
billing quantity in BUoM = 20 litres for the first line item and 2 for the second line
item...
then as the first line item is fuel, field No OF Items in the Transcation should be 1
(replacing the 20) + 2 = 3
so the final result in the ODS should be billing quantity in BUoM = 22 and The Items in the
Transcation = 3
For this I have Written a Rouinte like this for that field
PROGRAM UPDATE_ROUTINE.
$$ begin of global - insert your declaration only below this line -
TABLES: /BI0/PMATERIAL.
DATA: TITEMS LIKE /BIC/AZPOCODS00-/BIC/ZTITEMS,
       CORE_ELEMENT like /BI0/PMATERIAL-RPA_WGH1.
$$ end of global - insert your declaration only before this line   -
FORM compute_data_field
TABLES   MONITOR STRUCTURE RSMONITOR "user defined monitoring
USING    COMM_STRUCTURE LIKE /BIC/CS8ZPOCTUS04
           RECORD_NO LIKE SY-TABIX
           RECORD_ALL LIKE SY-TABIX
           SOURCE_SYSTEM LIKE RSUPDSIMULH-LOGSYS
CHANGING RESULT LIKE /BIC/AZPOCODS00-/BIC/ZTITEMS
           RETURNCODE LIKE SY-SUBRC "Do not use!
           ABORT LIKE SY-SUBRC. "set ABORT <> 0 to cancel update
$$ begin of routine - insert your code only below this line        -
fill the internal table "MONITOR", to make monitor entries
check not COMM_STRUCTURE-material is initial.
select SINGLE RPA_WGH1
        INTO CORE_ELEMENT
        from /BI0/PMATERIAL
        where
        material = COMM_STRUCTURE-material
        and OBJVERS <>'D'.
   IF CORE_ELEMENT EQ '1'.
   TITEMS = '1'.
     CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
       EXPORTING
         input         = titems
      IMPORTING
        OUTPUT        = titems
   ELSE.
   TITEMS = COMM_STRUCTURE-BILL_QTY.
   ENDIF.
result value of the routine
RESULT = TITEMS..
if abort is not equal zero, the update process will be canceled
ABORT = 0.
$$ end of routine - insert your code only before this line         -
Does it satisfy all the conditions ?? mentioned above if . As far As i know as the only key
field in the transcation it will satisfy the first two conditions .
I want to know or If possioble anybody pls take some pain for me to send the code or any
Ideas for satisfying all the conditions.
Hope I will get immediate replies....
Mail me to [email protected]

Reddy,
Please do not post in all sections ... makes it hard to follow up on posts..
Arun

Open items for purchase order its very urgent

hi
my requirement is to write extract program for purchase order(me21) to extract only open items.
please provide sample code its very urgent.
thanks in advance.
points will be rewarded.
thanks
hari prasad reddy

check the below report :
REPORT ZMM_OPEN_PO_REPORT no standard page heading
                          line-size 255
                          message-id zwave.
======================================================================
Program Name : ZMM_OPEN_PO_REPORT                                    *
Description : This report displays all Open PO Items and output     *
               would be PO Number,Material number and so on          *
Author       : Seshu                                                 *
Date         : 01/24/2007                                            *
MODIFICATION HISTORY                                                 *
DATE    | AUTHOR   | CHANGE #   | DESCRIPTION OF MODIFICATION        *
--|||--
01/24/07| Seshu    | DEVK921979 | Initial                            *
D A T A D E C L A R A T I O N   P A R T                         ***
type-pools
type-pools : slis.
Tables
tables : ekko, " Purchase order Header
         ekpo, " Purchase order Item
         marc. " Material with Plant data
Internal table for output.
data : begin of i_output occurs 0,
       ebeln like ekko-ebeln,
       matnr like ekpo-matnr,
       end of i_output.
ALV Data declaration.
data : v_repid like sy-repid.
ALV Function Module Variables
DATA: gs_layout type slis_layout_alv,
      g_exit_caused_by_caller,
      gs_exit_caused_by_user type slis_exit_by_user.
DATA: gt_fieldcat    type slis_t_fieldcat_alv,
      gs_print       type slis_print_alv,
      gt_events      type slis_t_event,
      gt_list_top_of_page type slis_t_listheader,
      g_status_set   type slis_formname value 'PF_STATUS_SET',
      g_user_command type slis_formname value 'USER_COMMAND',
      g_top_of_page type slis_formname value 'TOP_OF_PAGE',
      g_top_of_list type slis_formname value 'TOP_OF_LIST',
      g_end_of_list type slis_formname value 'END_OF_LIST',
      g_variant LIKE disvariant,
      g_save(1) TYPE c,
      g_tabname_header TYPE slis_tabname,
      g_tabname_item   TYPE slis_tabname,
      g_exit(1) TYPE c,
      gx_variant LIKE disvariant.
data : gr_layout_bck type slis_layout_alv.
Ranges
ranges r_eindt for eket-eindt.
initialization.
v_repid = sy-repid.
start-of-selection.
Get the data from EKKO ,EKPO and MARC Table
perform get_data_tables.
end-of-selection.
display the data in the form of ALV
perform display_data.
*&      Form get_data_tables
      Get the data from EKKO,EKPO and MARC Table
FORM get_data_tables.
clear : i_output.
refresh : i_output.
fill the dates in ranges
r_eindt-low = sy-datum - 7.
r_eindt-high = sy-datum + 14.
r_eindt-option = 'BT'.
r_eindt-sign = 'I'.
append r_eindt.
Get the data from EKKO,EKPO and EKET Tables
select aebeln bmatnr into table i_output
                       from ekko as a inner join
                            ekpo as b on aebeln = bebeln
                            inner join marc as c on cmatnr = bmatnr
                            inner join mara as d on dmatnr = bmatnr
                            inner join eket as e on eebeln = aebeln
                                           and   eebelp = bebelp
                            where c~beskz = 'E'
                            and   c~werks = '1000'
                            and   d~mtart = 'FERT'
                            and   b~loekz = space
                            and   b~elikz = space
                            and   e~eindt in r_eindt.
if sy-subrc ne 0.
message e000(zwave) with 'No open purchase order found'.
endif.
ENDFORM.                    " get_data_tables
*&      Form display_data
      text
FORM display_data.
Fill the Fiedlcat
PERFORM fieldcat_init using gt_fieldcat[].
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
   EXPORTING
   I_INTERFACE_CHECK                 = ' '
   I_BYPASSING_BUFFER                =
   I_BUFFER_ACTIVE                   = ' '
     I_CALLBACK_PROGRAM                = v_repid
   I_CALLBACK_PF_STATUS_SET          = ' '
    I_CALLBACK_USER_COMMAND           = g_user_command
   I_CALLBACK_TOP_OF_PAGE            = ' '
   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                         = gr_layout_bck
      IT_FIELDCAT                       = gt_fieldcat[]
   IT_EXCLUDING                      =
   IT_SPECIAL_GROUPS                 =
   IT_SORT                           =
   IT_FILTER                         =
   IS_SEL_HIDE                       =
   I_DEFAULT                         = 'X'
    I_SAVE                            = g_save
    IS_VARIANT                        =
   IT_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                          = i_output
   EXCEPTIONS
     PROGRAM_ERROR                     = 1
     OTHERS                            = 2
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
ENDFORM.                    " display_data
*&      Form fieldcat_init
      text
     -->P_GT_FIELDCAT[] text
FORM fieldcat_init USING e01_lt_fieldcat type slis_t_fieldcat_alv.
DATA: LS_FIELDCAT TYPE SLIS_FIELDCAT_ALV.
Purchase order number
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'EBELN'.
LS_FIELDCAT-ref_fieldname = 'EBELN'.
LS_FIELDCAT-ref_tabname = 'EKKO'.
LS_FIELDCAT-TABNAME    = 'I_OUTPUT'.
ls_fieldcat-seltext_L = 'Purchase Order'.
ls_fieldcat-seltext_M = 'Purchase Order'.
ls_fieldcat-seltext_S = 'Purchase Order'.
APPEND LS_FIELDCAT TO E01_LT_FIELDCAT.
Material #
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'MATNR'.
LS_FIELDCAT-ref_fieldname = 'MATNR'.
LS_FIELDCAT-ref_tabname = 'EKPO'.
LS_FIELDCAT-TABNAME    = 'I_OUTPUT'.
ls_fieldcat-seltext_L = 'Material'.
ls_fieldcat-seltext_M = 'Material'.
ls_fieldcat-seltext_S = 'Material'.
APPEND LS_FIELDCAT TO E01_LT_FIELDCAT.
ENDFORM.                    " fieldcat_init

Communication b/w SAP and VB .exe file - Very urgent.

hi,
I am currently in a project implementing SAP for a cement manufacturing company. Here we have a VB .exe file which takes parameters and return values. now we need to connect this to application to SAP R/3 to pass data to that application and access the data from that .exe file.
Note: we don't have any source code for that vb .exe file its a third party software.
Its an very urgent one....
please guide me how to do it with all steps.
Any material please pass to [email protected]
Thanks in advance.

form grosswt .
refresh itab3.
clear itab3.
   Executing VB EXE file to get the weight from weigh bridge
call function 'WS_EXECUTE'
   exporting
      DOCUMENT                 = ' '
      CD                       = ' '
      COMMANDLINE              = ' '
     inform                   = 'X'
       cd      = 'C:\SAPWEI'
     program                  = 'C:\sapwei\MyVB.exe'
      STAT                     = ' '
      WINID                    = ' '
      OSMAC_SCRIPT             = ' '
      OSMAC_CREATOR            = ' '
      WIN16_EXT                = ' '
      EXEC_RC                  = ' '
    IMPORTING
      RBUFF                    =
    EXCEPTIONS
      FRONTEND_ERROR           = 1
      NO_BATCH                 = 2
      PROG_NOT_FOUND           = 3
      ILLEGAL_OPTION           = 4
      GUI_REFUSE_EXECUTE       = 5
      OTHERS                   = 6
IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
   Fetching Value from VB text file
call function 'WS_UPLOAD'
   exporting
    CODEPAGE                      = ' '
     filename                      = 'C:\sapwei\w1.txt'
    FILETYPE                      = 'ASC'
    HEADLEN                       = ' '
    LINE_EXIT                     = ' '
    TRUNCLEN                      = ' '
    USER_FORM                     = ' '
    USER_PROG                     = ' '
    DAT_D_FORMAT                  = ' '
IMPORTING
    FILELENGTH                    =
    tables
      data_tab                      = itab3
EXCEPTIONS
    CONVERSION_ERROR              = 1
    FILE_OPEN_ERROR               = 2
    FILE_READ_ERROR               = 3
    INVALID_TYPE                  = 4
    NO_BATCH                      = 5
    UNKNOWN_ERROR                 = 6
    INVALID_TABLE_WIDTH           = 7
    GUI_REFUSE_FILETRANSFER       = 8
    CUSTOMER_ERROR                = 9
    NO_AUTHORITY                  = 10
    OTHERS                        = 11
if sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
endif.
loop at itab3.
    v1 = itab3-num.
    pgrwt = v1.
endloop.
message 'Save Gross Weight' type 'S'.
endform.                    " grosswt

CAN ANY BODY EXPLAIN THESE QUESTIONS, VERY URGENT

WHAT IS THE USE OF CHAPTER ID, IN CHAPTER ID RATES WILL BE DETERMINES.
HOW MANY TAX CODES NEED CST, LST.
WHERE CAN I SEE EXCISE REGISTER
WHAT IS MEANT BY RG1 CAN ANY BODY EXPLAIN BRIEFLY, WHAT IS THE USE OF RG1
HOW DO I GET OPENING BALANCE FOR EVERY MONTH.
IN DEPOT SALES, IF CREATING EXCISE INVOICE A CERTIFICATED WILL ISSUE, IN A CERTIFICATE WHICH FIELDS WILL BE THERE.
WHAT IS MEANT BY JURISDICTION CODE & COUNTY CODE.
IN SD FACTORY SALES WHICH A/C ENTERIES GENERATED.
CAN ANY BODY EXPLAIN THESE FORMS, WHICH SITUATION THESE FORMS WE ARE USING. I NEED VERY URGENT.
a) A form
b) D form
c) C form
d) H form
e) DDP form
f) TR6 form
g) D3 form.
H) ARE.
I) ARE 1
j) ARE 2
IN DEPOT SALES PRICING PROCEDURE JFACT, WHICH CONDITION TYPES WILL COME,
IN FACTORY SALES PRICING PROCEDURE JFACT, WHICH CONDITION TYPES WILL COME
NOW WHAT IS THE VAT TAX.
what is the use of common distribution channel and common divisions
PLS FORWARD ANSWERS TO THIS MAIL ID.
i hope that definitely people will help
thanks every body.

Dear vara prasad
You can take it for granted if you post so much questions in one thread like this, nobody will answer / clarify you.
So please make one thread per question.
Meanwhile, just I would like to clarify for few questions
1) The most important feature of chapter id is that based on this chapter id which you maintain in "Excise Tax Rate", all your excise tax rates will be flowing into your sale order / billing
2) If the rate of tax differs, then you need to maintain a separate tax code. For example, the LST / VAT in some state is 4%, and in some state it is 12%. So in this case, you need to maintain two tax codes
thanks
G. Lakshmipathi

Searching for the fields of a table(very very urgent)

Hi all,
i am in graet trouble now.i am searching for the fields like
1)country of origin where the finished good is created.
2) customer sales order number
3)customer sales order line number
i am writing a report for delivery order.in this report i have to refer customer PO & customer SO .
i mean, my company has a customer ( seagate) & seagate has a customer (let maxtor).initially maxtor will give a PO to seagate then seagate will raise a SO againest maxtor.
Then seagate will send PO number(of maxtor), PO line number,SO number(seagate), SO line number(seagate) to our company.
Then i have to write a report for sales order & delivery order.in these reports i have to refer seagate PO number & seagate SO number for reference.
i got PO number as vbkd-bstkd but not getting any field for reference Sales order.plz advice me on this. it is very very urgent.
ur idea is highly appreaciated.
Thank u very much.
Regards
pabitra

check out tables VBAK(sales order header), VBAP(sales items)

How to write code for this logic, plz help me very urgent

Hi All,
i am new to sap-abap, i got this work and i m working on this can any body help me in writing code, plz help me, this is very very urgent.
here i m giving my logic, can anybody send me the code related to this logic.
this is very urgent .
this program o/p should be in ALV format and need to create one commond 'SAVE" on this o/t list if user clicks save processedon and processedby fields in ZFIBUE should be updated automatically.
i am creating one custom table zfibue having fields: (serialno, bukrs, matnr,prdha,hkont,gsber,wrbtr,budat, credate, cretime,processed, processedon, processedby,mapped)
fields of zfibue:
serailno = numc
bukrs = char
matnr = char
prdha = char
hkont = char
gsber = char
wrbtr = char
budat = date
credate = date
cretime = time
processed= char
processedon = date
processedby = char
mapped = char      are   belongs to above type data types
and seelct-optionfields: s_bukrs for bseg-bukrs
                                    s_hkont for bseg-hkont,
                                     s_budat for bkpf-budat,
                                     s_processed for zfibue-processed,
                                      s_processedon for zfibue-processedon,
                                      s_mapped. for zfibue-mapped
parameters: p_chk1 as checkbox,
                  p_chk2 as checkbox.
                  p_filepath type rlgrap-filename.
1.1 Validate the user inputs (S_BUKRS and S_HKONT) against respective check tables (T001 and SKB1). If the validation fails, provide respective error message. Eg: Invalid input for Company Code.
1.2 Fetch SERIALNO, BUKRS, MATNR, PRDHA, HKONT, GSBER, WRBTR, BUDAT, CREDATE, CRETIME, PROCESSED, PROCESSEDON, PROCESSEDBY, MAPPED from table ZFIBUE into internal table GT_ZFIBUE where BUKRS IN S_BUKRS, HKONT IN S_HKONT, BUDAT IN S_BUDAT, PROCESSED IN S_PROCESSED, PROCESSEDON IN S_PROCESSEDON, and MAPPED IN S_MAPPED.
1.3 If P_CHK2 = X, go to step 1.11. Else continue.
1.4 If P_CHK1 = X, continue. Else go to step 1.9
1.5 Fetch MATNR, PRDHA from MARA into GT_MARA for all entries in GT_ZFIBUE where MATNR = GT_ZFIBUE-MATNR.
1.6 Sort and delete adjacent duplicates from GT_MARA based on MATNR.
1.7 Loop through GT_ZFIBUE where PRDHA = blank.
          Read Table GT_MARA based on MATNR = GT_ZFIBUE-MATNR.
          IF sy-subrc = 0.
                 Move GT_MARA-PRDHA to GT_ZFIBUE-PRDHA.
              Modify Table GT_ZFIBUE. Update Product Hierarchy
             Endif.
    Fetch PRDHA, GSBER from ZFIBU into GT_ZFIBU for all entries in GT_ZFIBUE where PRDHA = GT_ZFIBUE-PRDHA.
    Read Table GT_ZFIBU based on PRDHA = GT_ZFIBUE-PRDHA.
          IF sy-subrc = 0.
                 Move GT_ZFIBU-GSBER to GT_ZFIBUE-GSBER.
              Move X to GT_ZFIBUE-MAPPED.
              Modify Table GT_ZFIBUE.
             Endif.
Endloop.
1.8 Modify database table ZFIBUE from GT_ZFIBUE.
1.9 Fill the field catalog table GT_FIELDCAT using the details of output fields listed in section Inputs/Outputs (above).
   Eg:                 LWA_ FIELDCAT -SELTEXT_L = 'Serial Number.
                          LWA_ FIELDCAT -DATATYPE = NUMC.
                          LWA_ FIELDCAT -OUTPUTLEN = 9.
                          LWA_ FIELDCAT -TABNAME = 'GT_ZFIBUE'.
                          LWA_ FIELDCAT-FIELDNAME = 'SERIALNO'.
          Append LWA_FIELDCAT to GT_FIELDCAT
Note: a) The output field GT_ZFIBUE-PROCESSED will be editable marking INPUT = X in field catalog (GT_FIELDCAT).
         b) The standard ALV functionality will be used to give the user option for selecting all or blocks of entries at a time.
         c) The PF-STATUS STANDARD_FULLSCREEN from function group SLVC_FULLSCREEN will be copied to the program and modified to include a SAVE button.
1.10 Call the function module REUSE_ALV_GRID_DISPLAY passing output table GT_ZFIBUE and field catalog GT_FIELDCAT. Additional parameters like I_CALLBACK_PF_STATUS_SET (= ZFIBUESTAT) and I_CALLBACK_USER_COMMAND (=HANDLE_USER_ACTION) will also be passed to handle user events. Go to 2.14.
1.11 Download the file to P_FILEPATH using function module GUI_DOWNLOAD passing GT_ZFIBUE.
1.12 Exit Program.
Logic to be implemented in routine Handle_User_Action
This routine will have the following interface:
FORM Handle_User_Action USING r_ucomm LIKE sy-ucomm
                                                           rs_selfield TYPE slis_selfield.
ENDFORM.
Following logic will be implemented in this routine:
1.     If r_ucomm = SAVE, continue. Else exit.
2.     Loop through GT_ZFIBUE where SEL_ROW = X. Row is selected
a.     IF GT_ZFIBUE-PROCESSED = X.
i.     GT_ZFIBUE-PROCESSEDON = SY-DATUM.
ii.     GT_ZFIBUE-PROCESSEDBY = SY-UNAME.
iii.     MODIFY ZFIBUE FROM work area GT_ZFIBUE.
Endif.
Endloop.

Hi Swathi,
If it's very very urgent then you better get on with it, don't waste time on the web. Chop chop.

Very urgent: Travel Request Error in production server

Hi All,
While creating Travel request in production server, we are getting an error..
Error while writing to the database PTRV_HEAD/PTRV_PERIO/Cluster TE
Someone please help me on this. This is very urgent..
Thanks in advance!

Solved..by setting up trip number ranges..
Thanks!

Kernel panics, message saying "You need to restart your computer.Hold down the Power..." I am in the middle of HSC very URGENT please help!! Mac keeps needing to restart!!

Kernel panics, message saying "You need to restart your computer.Hold down the Power..." I am in the middle of HSC very URGENT please help!! Mac keeps needing to restart!!
I looked in console and its saying that it may be because of Sophos Anti-Virus, i deleted and uninstalled all traces of Sophos but looked in console and this is some of the lines coming up:
26/09/13 10:11:17.945 PM com.apple.launchd: (com.sophos.intercheck[6460]) posix_spawn("/Library/Sophos Anti-Virus/InterCheck.app/Contents/MacOS/InterCheck", ...): No such file or directory
26/09/13 10:11:17.945 PM com.apple.launchd: (com.sophos.autoupdate[6461]) posix_spawn("/Library/Sophos Anti-Virus/SophosAutoUpdate.app/Contents/MacOS/SophosAutoUpdate", ...): No such file or directory
26/09/13 10:11:17.945 PM com.apple.launchd: (com.sophos.notification[6462]) posix_spawn("/Library/Sophos Anti-Virus/SophosAntiVirus.app/Contents/MacOS/SophosAntiVirus", ...): No such file or directory
26/09/13 10:11:17.946 PM com.apple.launchd: (com.sophos.intercheck[6460]) Exited with code: 1
26/09/13 10:11:17.946 PM com.apple.launchd: (com.sophos.intercheck) Throttling respawn: Will start in 10 seconds
26/09/13 10:11:17.946 PM com.apple.launchd: (com.sophos.autoupdate[6461]) Exited with code: 1
26/09/13 10:11:17.946 PM com.apple.launchd: (com.sophos.autoupdate) Throttling respawn: Will start in 10 seconds
26/09/13 10:11:17.946 PM com.apple.launchd: (com.sophos.notification[6462]) Exited with code: 1
26/09/13 10:11:17.946 PM com.apple.launchd: (com.sophos.notification) Throttling respawn: Will start in 10 seconds
26/09/13 10:11:18.291 PM Safari: self <TabContentView: 0x7f8d5dd1aa50>
26/09/13 10:11:22.617 PM Safari: self <TabContentView: 0x7f8d5db7bb00>
26/09/13 10:11:27.866 PM Safari: self <TabContentView: 0x7f8d5c331a70>
26/09/13 10:12:19.939 PM com.apple.launchd.peruser.501: (com.sophos.uiserver[6487]) posix_spawn("/Library/Sophos Anti-Virus/SophosUIServer.app/Contents/MacOS/SophosUIServer", ...): No such file or directory
26/09/13 10:12:19.939 PM com.apple.launchd.peruser.501: (com.sophos.uiserver[6487]) Exited with code: 1
26/09/13 10:12:19.939 PM com.apple.launchd.peruser.501: (com.sophos.uiserver) Throttling respawn: Will start in 10 seconds"
Looked all over computer and cant find anything of Sophos please help very urgent!

That was all that there was in the most recent one, how long do you think it could take to fix?
Here is the second most recent:
Wed Sep 25 15:39:39 2013
panic(cpu 0 caller 0xffffff80002c4794): Kernel trap at 0xffffff7f81757965, type 14=page fault, registers:
CR0: 0x0000000080010033, CR2: 0xffffff81acc397fe, CR3: 0x000000001e2b5025, CR4: 0x00000000000606e0
RAX: 0x000000001d31a000, RBX: 0x0000000000000000, RCX: 0x0000000000000000, RDX: 0x0000000000000000
RSP: 0xffffff80b0dbb710, RBP: 0xffffff80b0dbb820, RSI: 0x0000000000000000, RDI: 0x0000000000000001
R8: 0x000000000000000a, R9: 0x0000000000000378, R10: 0x0000000000000128, R11: 0x0000000000000378
R12: 0xffffff800c626400, R13: 0x0000000000000000, R14: 0x0000000000000000, R15: 0xffffff81acc39802
RFL: 0x0000000000010246, RIP: 0xffffff7f81757965, CS: 0x0000000000000008, SS: 0x0000000000000010
CR2: 0xffffff81acc397fe, Error code: 0x0000000000000000, Faulting CPU: 0x0
Backtrace (CPU 0), Frame : Return Address
0xffffff80b0dbb3c0 : 0xffffff8000220792
0xffffff80b0dbb440 : 0xffffff80002c4794
0xffffff80b0dbb5f0 : 0xffffff80002da55d
0xffffff80b0dbb610 : 0xffffff7f81757965
0xffffff80b0dbb820 : 0xffffff7f817667a0
0xffffff80b0dbb840 : 0xffffff7f8173a58e
0xffffff80b0dbb870 : 0xffffff7f8177fb6f
0xffffff80b0dbb8a0 : 0xffffff7f81779632
0xffffff80b0dbb8d0 : 0xffffff7f8177d7d5
0xffffff80b0dbb900 : 0xffffff7f8177c6db
0xffffff80b0dbb9e0 : 0xffffff7f817412b8
0xffffff80b0dbba10 : 0xffffff7f81778684
0xffffff80b0dbba30 : 0xffffff7f817449ce
0xffffff80b0dbbb60 : 0xffffff7f81741a4c
0xffffff80b0dbbbc0 : 0xffffff8000655f3e
0xffffff80b0dbbbe0 : 0xffffff800065681a
0xffffff80b0dbbc40 : 0xffffff8000656fbb
0xffffff80b0dbbd80 : 0xffffff80002a3f08
0xffffff80b0dbbe80 : 0xffffff8000223096
0xffffff80b0dbbeb0 : 0xffffff80002148a9
0xffffff80b0dbbf10 : 0xffffff800021bbd8
0xffffff80b0dbbf70 : 0xffffff80002aef10
0xffffff80b0dbbfb0 : 0xffffff80002daec3
      Kernel Extensions in backtrace:
         com.apple.driver.AppleIntelHD3000Graphics(7.3.2)[A2328231-E577-32FF-B20F-D08BDC FE9C51]@0xffffff7f81738000->0xffffff7f8179bfff
            dependency: com.apple.iokit.IOPCIFamily(2.7)[5C23D598-58B2-3204-BC03-BC3C0F00BD32]@0xffffff 7f80889000
            dependency: com.apple.iokit.IONDRVSupport(2.3.4)[7C8672C4-8B0D-3CCF-A79A-23C62E90F895]@0xff ffff7f80d2e000
            dependency: com.apple.iokit.IOGraphicsFamily(2.3.4)[D0A1F6BD-E66E-3DD8-9913-A3AB8746F422]@0 xffffff7f80cf5000
BSD process name corresponding to current thread: WindowServer
Mac OS version:
11G63b
Kernel version:
Darwin Kernel Version 11.4.2: Thu Aug 23 16:25:48 PDT 2012; root:xnu-1699.32.7~1/RELEASE_X86_64
Kernel UUID: FF3BB088-60A4-349C-92EA-CA649C698CE5
System model name: MacBookPro8,1 (Mac-94245B3640C91C81)
System uptime in nanoseconds: 1866666823698
last loaded kext at 480357661446: com.apple.filesystems.smbfs          1.7.2 (addr 0xffffff7f80795000, size 241664)
last unloaded kext at 303348424187: com.apple.driver.AppleUSBUHCI          5.1.0 (addr 0xffffff7f80af7000, size 65536)
loaded kexts:
com.sophos.kext.sav          8.0.14
org.virtualbox.kext.VBoxNetAdp          4.2.16
org.virtualbox.kext.VBoxNetFlt          4.2.16
org.virtualbox.kext.VBoxUSB          4.2.16
org.virtualbox.kext.VBoxDrv          4.2.16
com.logmein.driver.LogMeInSoundDriver          1.0.2
com.Greatdy.driver.SystemAudioCapture          1.0.0
com.apple.filesystems.smbfs          1.7.2
com.apple.driver.AppleHWSensor          1.9.5d0
com.apple.driver.AppleMikeyHIDDriver          122
com.apple.iokit.IOBluetoothSerialManager          4.0.8f17
com.apple.driver.AudioAUUC          1.59
com.apple.driver.AppleHDA          2.2.5a5
com.apple.driver.AppleMikeyDriver          2.2.5a5
com.apple.driver.AGPM          100.12.75
com.apple.driver.AppleUpstreamUserClient          3.5.9
com.apple.driver.SMCMotionSensor          3.0.2d6
com.apple.driver.AppleSMCPDRC          5.0.0d8
com.apple.iokit.IOUserEthernet          1.0.0d1
com.apple.Dont_Steal_Mac_OS_X          7.0.0
com.apple.driver.AudioIPCDriver          1.2.3
com.apple.driver.AppleSMCLMU          2.0.1d2
com.apple.driver.ApplePolicyControl          3.1.33
com.apple.driver.ACPI_SMC_PlatformPlugin          5.0.0d8
com.apple.driver.AppleIntelHD3000Graphics          7.3.2
com.apple.driver.AppleBacklight          170.2.2
com.apple.driver.AppleLPC          1.6.0
com.apple.driver.AppleMCCSControl          1.0.33
com.apple.filesystems.autofs          3.0
com.apple.driver.AppleUSBTCButtons          227.6
com.apple.driver.BroadcomUSBBluetoothHCIController          4.0.8f17
com.apple.driver.AppleUSBTCKeyboard          227.6
com.apple.driver.AppleIRController          312
com.apple.AppleFSCompression.AppleFSCompressionTypeDataless          1.0.0d1
com.apple.AppleFSCompression.AppleFSCompressionTypeZlib          1.0.0d1
com.apple.BootCache          33
com.apple.iokit.SCSITaskUserClient          3.2.1
com.apple.driver.XsanFilter          404
com.apple.iokit.IOAHCISerialATAPI          2.0.3
com.apple.iokit.IOAHCIBlockStorage          2.1.0
com.apple.driver.AppleUSBHub          5.1.0
com.apple.driver.AppleFWOHCI          4.9.0
com.apple.driver.AirPort.Brcm4331          561.7.22
com.apple.driver.AppleSDXC          1.2.2
com.apple.iokit.AppleBCM5701Ethernet          3.2.4b8
com.apple.driver.AppleEFINVRAM          1.6.1
com.apple.driver.AppleSmartBatteryManager          161.0.0
com.apple.driver.AppleAHCIPort          2.3.1
com.apple.driver.AppleUSBEHCI          5.1.0
com.apple.driver.AppleACPIButtons          1.5
com.apple.driver.AppleRTC          1.5
com.apple.driver.AppleHPET          1.7
com.apple.driver.AppleSMBIOS          1.9
com.apple.driver.AppleACPIEC          1.5
com.apple.driver.AppleAPIC          1.6
com.apple.driver.AppleIntelCPUPowerManagementClient          195.0.0
com.apple.nke.applicationfirewall          3.2.30
com.apple.security.quarantine          1.4
com.apple.security.TMSafetyNet          8
com.apple.driver.AppleIntelCPUPowerManagement          195.0.0
com.apple.iokit.IOSerialFamily          10.0.5
com.apple.driver.DspFuncLib          2.2.5a5
com.apple.iokit.IOSurface          80.0.2
com.apple.iokit.IOFireWireIP          2.2.5
com.apple.driver.AppleHDAController          2.2.5a5
com.apple.iokit.IOHDAFamily          2.2.5a5
com.apple.iokit.IOAudioFamily          1.8.6fc18
com.apple.kext.OSvKernDSPLib          1.3
com.apple.driver.AppleGraphicsControl          3.1.33
com.apple.driver.AppleSMC          3.1.3d10
com.apple.driver.IOPlatformPluginLegacy          5.0.0d8
com.apple.driver.AppleSMBusPCI          1.0.10d0
com.apple.driver.AppleBacklightExpert          1.0.4
com.apple.driver.IOPlatformPluginFamily          5.1.1d6
com.apple.iokit.IONDRVSupport          2.3.4
com.apple.driver.AppleSMBusController          1.0.10d0
com.apple.driver.AppleIntelSNBGraphicsFB          7.3.2
com.apple.iokit.IOGraphicsFamily          2.3.4
com.apple.kext.triggers          1.0
com.apple.driver.AppleUSBBluetoothHCIController          4.0.8f17
com.apple.iokit.IOBluetoothFamily          4.0.8f17
com.apple.driver.AppleThunderboltDPInAdapter          1.8.5
com.apple.driver.AppleThunderboltDPAdapterFamily          1.8.5
com.apple.driver.AppleThunderboltPCIDownAdapter          1.2.5
com.apple.driver.AppleUSBMultitouch          230.5
com.apple.iokit.IOUSBHIDDriver          5.0.0
com.apple.driver.AppleUSBMergeNub          5.1.0
com.apple.driver.AppleUSBComposite          5.0.0
com.apple.iokit.IOSCSIMultimediaCommandsDevice          3.2.1
com.apple.iokit.IOBDStorageFamily          1.7
com.apple.iokit.IODVDStorageFamily          1.7.1
com.apple.iokit.IOCDStorageFamily          1.7.1
com.apple.iokit.IOSCSIArchitectureModelFamily          3.2.1
com.apple.driver.AppleThunderboltNHI          1.6.0
com.apple.iokit.IOThunderboltFamily          2.0.3
com.apple.iokit.IOUSBUserClient          5.0.0
com.apple.iokit.IOFireWireFamily          4.4.8
com.apple.iokit.IO80211Family          420.3
com.apple.iokit.IOEthernetAVBController          1.0.1b1
com.apple.iokit.IONetworkingFamily          2.1
com.apple.iokit.IOAHCIFamily          2.0.8
com.apple.iokit.IOUSBFamily          5.1.0
com.apple.driver.AppleEFIRuntime          1.6.1
com.apple.iokit.IOHIDFamily          1.7.1
com.apple.iokit.IOSMBusFamily          1.1
com.apple.security.sandbox          177.11
com.apple.kext.AppleMatch          1.0.0d1
com.apple.driver.DiskImages          331.7
com.apple.iokit.IOStorageFamily          1.7.2
com.apple.driver.AppleKeyStore          28.18
com.apple.driver.AppleACPIPlatform          1.5
com.apple.iokit.IOPCIFamily          2.7
com.apple.iokit.IOACPIFamily          1.4

Error during GR(very very urgent)

Hi all,
i am using a developed program for GR.i used this program before.there was no error.but now i am facing error like
<b>PO ordered quqntity exceeded by 18,000 EA.</b>.i am using <b>BAPI_GOODSMVT_CREATE</b> for goods transfer.
In the selection screen, i am putting
PO number- PO1
material number- MAT
GR quantity- 18,000
delivery order-111
i want to receive the material MAT of quantity 18,000 from that PO.initially i have ordered PO quntity as 1 lakh. Till now i have received 42,000 materials,now i try to receive 18,000 materials.but it is showing this type of error.
This error is fired from the return parameter of that BAPI only.error having message class-M7 & error no-022
is comming.
i am giving my coding below.plz suggest where is the problem.it is very very urgent.recently my company has added some patches to update the SAP.is this the cause for that error.plz suggest.
any idea will be highly appreaciated.
Regards
REPORT zmui001
       LINE-SIZE 140
       LINE-COUNT 65
       NO STANDARD PAGE HEADING.
*-- DATA DECLARATION--
*-- tables
TABLES : ekpo,
            ekbe,
         marv.
*--Includes
INCLUDE : <icon>.                   " Include for Icons
*-- Types
TYPES : BEGIN OF t_mseg,
          ebeln LIKE ekko-ebeln,
          name1 LIKE lfa1-name1,
          lifnr LIKE lfa1-lifnr,
          eknam LIKE t024-eknam,
          mblnr LIKE mkpf-mblnr,
          matnr LIKE ekpo-matnr,
          maktx LIKE makt-maktx,
          lgort LIKE mseg-lgort,
          charg LIKE mseg-charg, "chg: 10/17/2005
          menge LIKE mseg-menge,
          budat LIKE mkpf-budat,
          bldat LIKE mkpf-bldat, " chg : 08/18/2003
          xblnr LIKE mkpf-xblnr,
          END OF t_mseg.
DATA: BEGIN OF t_ekbe,
          ebeln LIKE ekbe-ebeln,
          ebelp LIKE ekbe-ebelp,
          bwart LIKE ekbe-bwart,
          matnr LIKE ekbe-matnr,
          menge LIKE ekbe-menge,
          END OF t_ekbe,
          BEGIN OF t_ekpo,
          ebeln LIKE ekpo-ebeln,
          ebelp LIKE ekpo-ebelp,
          matnr LIKE ekpo-matnr,
          menge LIKE ekpo-menge,
          END OF t_ekpo.
TYPES : BEGIN OF t_options.
        INCLUDE STRUCTURE itcpo.
TYPES : END OF t_options.
*--Internal tables
DATA: BEGIN OF i_item OCCURS 50.    "Create Material Document Item
        INCLUDE STRUCTURE bapi2017_gm_item_create.
DATA: END OF i_item .
DATA: BEGIN OF i_return OCCURS 20. "Return parameter
        INCLUDE STRUCTURE bapiret2.
DATA: END OF i_return.
DATA: BEGIN OF i_part OCCURS 0,     " Internal table for split data
        part(20),
      END OF i_part.
DATA: BEGIN OF i_return1 OCCURS 20. "Return parameter
        INCLUDE STRUCTURE bapiret1.
DATA: END OF i_return1.
*-- Work areas
DATA: BEGIN OF wa_header .       "Material Document Header Data
        INCLUDE STRUCTURE bapi2017_gm_head_01.
DATA: END OF wa_header .
DATA: BEGIN OF wa_return .       "Output Structure
        INCLUDE STRUCTURE bapi2017_gm_head_ret.
DATA: END OF wa_return .
*-- Work areas
DATA: wa_mseg TYPE t_mseg,
         wa_ekbe LIKE t_ekbe,
         wa_ekpo LIKE t_ekpo,
      wa_options TYPE t_options,
       i_ekbe LIKE STANDARD TABLE OF t_ekbe,
        i_ekbe2 LIKE STANDARD TABLE OF t_ekbe,
       i_ekpo LIKE STANDARD TABLE OF t_ekpo.
*---Variables
DATA: v_first,         " variable to get first digit
      v_set TYPE c,
      v_found TYPE p,
      v_menge TYPE p,
      v_ebeln LIKE ekko-ebeln,
      v_lifnr LIKE ekko-lifnr,
      v_belnr LIKE ekbe-belnr,
      v_postdate LIKE mkpf-budat,
      v_bukrs LIKE marv-bukrs,
      v_datum LIKE sy-datum,
      v_lgort LIKE mard-lgort,   " Stge. location
      v_bwart LIKE mseg-bwart,   " Movement type
      v_infnr LIKE eina-infnr,   " Info record no.
      v_ltsnr LIKE eina-ltsnr.
*---Constants
CONSTANTS: c_comma TYPE c VALUE ',',   " For splitting data at commas
           c_01(2) TYPE c VALUE '01', " For movement code in Bapi
           c_b     TYPE c VALUE 'B',   " For mvt. Indicator in Bapi
           c_save(4) TYPE c VALUE 'SAVE', " For button text
           c_clear(5) TYPE c VALUE 'CLEAR', " For clear button
           c_mvmt(4) TYPE c VALUE 'MVMT',
           c_ok(2)   TYPE c VALUE 'OK',
           c_error(5) TYPE c VALUE 'Error'.
*--SELECTION SCREEN DESIGN--
SELECTION-SCREEN BEGIN OF BLOCK blk1 WITH FRAME.
PARAMETERS:     p_bar(75) , " Scanned data from barcode
            p_ebeln LIKE ekko-ebeln, " PO number
            p_matnr LIKE ekpo-matnr, " Material number
            p_menge LIKE ekpo-menge, " Quantity
           p_lifnr LIKE ekko-lifnr, " Vendor code
            p_frbnr LIKE mkpf-frbnr, " Reference doc for goods mvt
            p_status(5) TYPE c.
SELECTION-SCREEN END OF BLOCK blk1.
SELECTION-SCREEN PUSHBUTTON 15(10) v_save USER-COMMAND mvmt.
SELECTION-SCREEN PUSHBUTTON 40(10) v_clear USER-COMMAND clear.
INITIALIZATION -
INITIALIZATION.
v_save = c_save .
v_clear = c_clear.
*--AT SELECTION_SCREEN--
AT SELECTION-SCREEN .
IF sy-ucomm = c_clear.
    PERFORM f_clear.
ELSE.
    IF sy-ucomm <> c_mvmt.
       if not sy-tabix is initial and sy-ucomm <> c_mvmt.
*--- Extracting the data by splitting the scanned values.
      PERFORM f_get_split_data.
*--- Validating the input data.
      PERFORM f_check_inputs.
    ELSE .
*--- Validating the input data.
      PERFORM f_check_inputs.
*-- Determining the posting date and period check.
      PERFORM f_get_posting_date.
*---Post goods movement
      PERFORM f_post_receipt.
    ENDIF.
ENDIF.
           SUBROUTINES                                               *
*&      Form f_check_inputs
    Validating the input parameters
FORM f_check_inputs.
*-- Validating material no.
SELECT SINGLE matnr INTO p_matnr
    FROM mara
      WHERE matnr = p_matnr.
IF sy-subrc = 4.
    p_status = c_error.
    MESSAGE e003(zm) WITH 'Material no.'.
ENDIF.
*-- Validating JHT reference no.
SELECT SINGLE ebeln
                lifnr
                bukrs
                INTO (p_ebeln, v_lifnr , v_bukrs)
                FROM ekko
        where unsez = p_unsez. chg:07072003
          WHERE ebeln = p_ebeln.
IF sy-subrc = 4.
    p_status = c_error.
    MESSAGE e003(zm) WITH 'Purchase order no.'.
ENDIF.
*-- Validating material po combination
SELECT SINGLE *
       FROM ekpo
         WHERE ebeln = p_ebeln
           AND matnr = p_matnr.
IF sy-subrc = 4.
    p_status = c_error.
    MESSAGE e003(zm) WITH 'Purchase order no.' ' and Material no.'.
ENDIF.
*--- Checking for DO entry . (chng : 30/06/2003)
IF p_frbnr IS INITIAL.
    MESSAGE e018(m7) WITH 'Delivery no.'.
    p_status = c_error.
    PERFORM f_clear.
ENDIF.
*-- Validating material po do combination
SELECT SINGLE a~belnr
                INTO v_belnr
                FROM ekbe AS a
                  INNER JOIN mkpf AS b
                   ON   abelnr = bmblnr
                   AND agjahr = bmjahr
                  WHERE a~ebeln = ekpo-ebeln
                    AND a~ebelp = ekpo-ebelp
                    AND b~xblnr = p_frbnr.
IF sy-subrc = 0.
    MESSAGE e019(zm) WITH v_belnr.
    p_status = c_error.
    PERFORM f_clear.
ENDIF.
p_status = c_ok.
ENDFORM.                    " f_check_inputs
*&      Form f_get_split_data
   Extracting the data by splitting the Scanned data
FORM f_get_split_data.
*-- Splitting the data at commas
SPLIT p_bar AT c_comma INTO TABLE i_part.
*-- Assigning the parts to variables.
LOOP AT i_part.
    v_first = i_part-part+0(1).
    TRANSLATE v_first TO UPPER CASE.
    CASE v_first .
     WHEN 'V'.
       p_lifnr = i_part-part+1(10).
      WHEN 'P'.
        p_matnr = i_part-part+1(18).
      WHEN 'Q'.
        p_menge = i_part-part+1(13).
      WHEN 'K'.
        p_ebeln = i_part-part+1(10).
      WHEN 'D'.
        p_frbnr = i_part-part+2(16).
      WHEN OTHERS.
        CONTINUE.
    ENDCASE.
ENDLOOP.
ENDFORM.                    " f_get_split_data
*&      Form f_get_posting_date
Determing the posting date for document
FORM f_get_posting_date.
*-- get the current period for todays date.
DATA: l_period LIKE t009b-poper.
CALL FUNCTION 'DATE_TO_PERIOD_CONVERT'
    EXPORTING
      i_date               = sy-datum
      i_periv              = 'K4'
   IMPORTING
     e_buper               = l_period
E_GJAHR              =
   EXCEPTIONS
     input_false          = 1
     t009_notfound        = 2
     t009b_notfound       = 3
     OTHERS               = 4
IF sy-subrc <> 0.
    MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
            WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
*-- Determining whether the open period
SELECT SINGLE *
                FROM marv
                WHERE bukrs = v_bukrs.
IF sy-subrc = 0.
    IF l_period = marv-lfmon .
      v_postdate = sy-datum.
    ELSE.
      CALL FUNCTION 'BAPI_CCODE_GET_FIRSTDAY_PERIOD'
           EXPORTING
                companycodeid       = v_bukrs
                fiscal_period       = marv-lfmon
                fiscal_year         = marv-lfgja
           IMPORTING
                first_day_of_period = v_postdate
                return              = i_return1.
      IF NOT i_return[] IS INITIAL.
        LOOP AT i_return1.
          MESSAGE i016(zm) WITH i_return-message.
        ENDLOOP.
      ENDIF.
    ENDIF.
ENDIF.
ENDFORM.                    " f_get_posting_date
*&      Form f_post_receipt
Post the goods receipt for entered data.
FORM f_post_receipt.
PERFORM f_fill_item.
PERFORM f_fill_header.
PERFORM f_execute_transfer.
PERFORM f_clear.
ENDFORM.                    " f_post_receipt
*&      Form f_fill_item
Updating the item data for the GR
FORM f_fill_item.
Checking for IQC cycle is done here.(chng : 23/07/2003)
PERFORM f_check_iqc.
*---- Assigning movement type as per IQC cycle.(chng : 23/07/2003)
IF v_lgort IS INITIAL.
    MOVE '101'   TO i_item-move_type.
    SELECT SINGLE lgort INTO i_item-stge_loc
    FROM ekpo
     where ebeln = v_ebeln and " chg :07/07/2003
       WHERE ebeln = p_ebeln AND
           matnr = p_matnr .
ELSE.
    MOVE v_lgort TO i_item-stge_loc.
    MOVE v_bwart TO i_item-move_type.
ENDIF.
MOVE p_matnr TO i_item-material.
MOVE p_menge TO i_item-entry_qnt.
move v_ebeln to i_item-po_number. " 07/07/2003
MOVE p_ebeln TO i_item-po_number.
MOVE v_lifnr TO i_item-vendor.
MOVE c_b TO i_item-mvt_ind.
select single ebelp into i_item-po_item " chg :29/07/2003
   from ekpo
      where ebeln = p_ebeln
        and   matnr = p_matnr
       and elikz = ''.
SELECT ebeln
            ebelp
            matnr
            menge
            INTO CORRESPONDING FIELDS OF TABLE i_ekpo
            FROM ekpo
            WHERE ebeln = p_ebeln
               AND matnr = p_matnr
               AND loekz = '' .
SORT i_ekpo BY ebeln ebelp matnr.
LOOP AT i_ekpo INTO wa_ekpo.
    IF v_found = 0.
      SELECT ebeln ebelp
            bwart menge
            INTO CORRESPONDING FIELDS OF TABLE i_ekbe
            FROM ekbe
            WHERE ebeln = p_ebeln
            AND ebelp = wa_ekpo-ebelp
            AND matnr = p_matnr.
                      and elikz = '' . CHG -- 03/19/2004
      IF sy-subrc = 0.
        LOOP AT i_ekbe INTO wa_ekbe .
          IF wa_ekbe-bwart = '101'.
            v_menge = v_menge + wa_ekbe-menge.
          ENDIF.
          IF wa_ekbe-bwart = '102'.
            v_menge = v_menge - wa_ekbe-menge.
          ENDIF.
          IF wa_ekbe-bwart = '122'.
            v_menge = v_menge - wa_ekbe-menge.
          ENDIF.
        ENDLOOP.
chng: 03/19/2004 compare po qty against receipt
        v_menge = v_menge + p_menge .
        IF wa_ekpo-menge >= v_menge .
          v_found = 1.
          MOVE wa_ekpo-ebelp TO i_item-po_item.
        ENDIF.
      ELSE .
        v_found = 1.
        MOVE wa_ekpo-ebelp TO i_item-po_item.
      ENDIF.
    ENDIF.
    CLEAR : wa_ekbe, i_ekbe, v_menge.
ENDLOOP.
IF v_found = 0 .
    MESSAGE e003(zm) WITH ' delivery items'.
ENDIF.
APPEND i_item.
CLEAR : i_item, v_found .
ENDFORM.                    " f_fill_item
*&      Form f_check_iqc
Checking the storage location for the (chng : 23/07/2003)
FORM f_check_iqc.
CALL FUNCTION 'Z_M_GET_IQC_STATUS'
       EXPORTING
            matnr          = p_matnr
            lifnr          = v_lifnr
       IMPORTING
            lgort          = v_lgort
            bwart          = v_bwart
            ltsnr          = v_ltsnr
            infnr          = v_infnr
       EXCEPTIONS
            non_iqc_vendor = 1
            OTHERS         = 2.
IF sy-subrc <> 0.
    CLEAR : v_lgort , v_bwart , v_ltsnr.
ENDIF.
ENDFORM.                    " f_check_iqc
*&      Form f_fill_header
Updating data in the header
FORM f_fill_header.
MOVE v_postdate TO wa_header-pstng_date.
MOVE sy-datum TO wa_header-doc_date.
MOVE p_frbnr TO wa_header-ref_doc_no.
ENDFORM.                    " f_fill_header
*&      Form f_execute_transfer
      Executing the goods movement.
FORM f_execute_transfer.
CALL FUNCTION 'BAPI_GOODSMVT_CREATE'
       EXPORTING
            goodsmvt_header = wa_header
            goodsmvt_code    = c_01
       IMPORTING
            goodsmvt_headret = wa_return
       TABLES
            goodsmvt_item    = i_item
            return           = i_return.
IF i_return[] IS INITIAL .
    COMMIT WORK.
*--- UPdating Info record for IQC cycle ind.(chng : 23/07/2003)
    IF NOT v_ltsnr IS INITIAL.
      UPDATE eina SET ltsnr = v_ltsnr
      WHERE infnr = v_infnr.
    ENDIF.
    REFRESH : i_item.
    CLEAR : wa_header,v_ltsnr , v_infnr,v_bwart,v_lifnr.
    MESSAGE i012(migo) WITH wa_return-mat_doc.
    PERFORM f_do_print.
ELSE.
    REFRESH : i_item.
    CLEAR : wa_header,v_ltsnr , v_infnr,v_bwart,v_lifnr.
    PERFORM write_errors.
ENDIF.
ENDFORM.                    " f_execute_transfer
FORM write_errors.
WRITE: 0(90) sy-uline ,
         /0'|',
          3 'System messages for GR posting',
          90 '|',
         /0(90) sy-uline .
LOOP AT i_return.
    CASE i_return-type.
      WHEN 'E'.
        MESSAGE i016(zm) WITH i_return-message.
      WHEN 'W'.
        MESSAGE i017(zm) WITH i_return-message.
      WHEN 'I'.
       WRITE: /0'|',
              icon_yellow_light AS ICON ,
              '|',
              10 i_return-message,
              90 '|'.
        MESSAGE i018(zm) WITH i_return-message.
      WHEN 'S'.
       WRITE: /0'|',
              icon_green_light AS ICON ,
              '|',
              10 i_return-message,
              90 '|'.
        MESSAGE i018(zm) WITH i_return-message.
      WHEN OTHERS.
       WRITE: /0'|',
              icon_red_light AS ICON ,
              '|',
              10 i_return-message,
              90 '|'.
        MESSAGE e016(zm) WITH i_return-message.
    ENDCASE.
   AT LAST .
     WRITE:/0(90) sy-uline .
   ENDAT.
ENDLOOP.
ENDFORM.                    " write_errors
*&      Form f_clear
Clearing the input parameters
FORM f_clear.
CLEAR : p_ebeln ,
          p_bar,
          p_matnr,
          p_frbnr,
          v_lifnr,
          p_menge,
          p_status.

Hi all,
can anyone suggest any idea?
Regrds
pabitra

Hi all..very urgent

Similar Messages

Maybe you are looking for