Users Adding Extra Lines to Old PO's

I am working on a job checking SAP security for a client. They have expressed concern that people are adding lines to old purchase orders in order to bypass requisition approval.
I was wondering if there is a way to prevent this and how access to do this is restricted. I'm presuming through removing maintain 02 access from ME21N??

Hi,
check this
SPRO>IMG> MM> Purchasing>PO--> Release Procedure for PO
[http://www.sap123.com/a/59/]
Regards
kailas Ugale

Similar Messages

Adding Extra lines in Webapplication Integratted Planning

Hi Friends,
How to add extra lines in web based planning application in Iintegratted planning.
Please share your ideas on this.
Will assign the points.
Best regards
SAP

Hi,
and read note 1149346 for the available functionality.
Regards,
Gregor

User adding extra form boxes

Hello,
I'm not sure what the exact parlance is here but can anyone advise me on how about doing the following?
Like on many Airline websites the user can click a button to 'add another passager' or whatever and a new form box/form boxes pop-up underneath. I'm trying to do the same thing (but with adding food to a list) but also wondering the recommended way to do it.
I was thinking a bit of Javascript activated on click, to draw up a new form box in the form with a different ID/name to be posted through to the update page along with everything else. I'm still learning javascript - does anyone know a good tutorial for this? I would search myself but I'm not sure what this would come under.
Thanks
Chris

Found a tutorial that could help you. http://papermashup.com/dynamically-add-form-inputs-and-submit-using-jquery/

Captivate adding extra time to old RoboDemo projects

I am currently evaluating Captivate for my company with the
final goal of advising on whether to upgrade our RoboDemo
application. While there are several nice new features that are
great incentives to upgrade, there is one very annoying problem
that I cannot see a workaround to.
We have several complete RoboDemo projects (*.rd) When I open
these files in Captivate 1.01, it is adding 3.0 seconds to many
slides. On slides in RoboDemo that only had mouse movement and had
timing that I had meticiously edited by hand, it has defaulted all
mouse movement timing to 2.0 seconds and then added 3.0 seconds of
time where it is just the screen capture showing. In a demo where
many slides are like this and originally had times of 1.0 second or
less, it has made our demos 4 or 5 times longer!! VERY
Unacceptable.
I tried locking all of my RoboDemo slides and saving before
opening in Captivate, but Captivate still modified my timing. I
tried to copy RoboDemo slides to Captivate with no help.
Has anyone gone through this experience? I searched the
website and could not find anything. This is a substantial
hinderance to a possible upgrade and we would probably wait until a
newer version comes out for Captivate that resolves this problem.
Thanks!!!!

Hi Marc,
Thanks for the continued ideas. I did try this just now and
it is the same as trying to copy the entire slide. I am unable to
copy an individual caption or mouse movement.
Keep the ideas coming!
doxie_lover
Same result as trying to post the
quote:
Originally posted by:
MarcBosscher
so you tried copying robodemo slides into captivate? what
about copying individual robodemo captions? images? rollovers? etc?
if this works, instead of copying a slide, just CTRL+A and grab
everything on a slide and paste it all in. just one more click and
its the net same result as copying a slide.

Adding new line item in SC after it is added to PR or PO

Hi Experts,
Our customer wants that if line item is added to PR and PO on ECC side, it should be added to SC as well. I am sure you can't change apporved SC for which follow on document is created. But if someone did similar kind of requirement.
Here is requirement.
> SC has 2 line items.
> PR is created in ECC for 2 line items after SC is apporved.
> User added 3rd line item in PR on ECC side.
> Customer wants this line item should be added to SC as well.
Please advise.
Regards,
Kamal

Hi,
In Classic Scenario: This is not possible .when you are adding a P.O in ECC it will not reflect in
SRM.
In Extended Classic scenario: In SRM only P.O is created .You can add a new line items (or) change
because P.O in SRM Server is the main P.O.
Moreover in this also Shopping cart will not update. Once Shopping cart is approved you can do any changes
Please check which scenario your client is using.
Regards
G.Ganesh Kumar

Problem while inserting extra line item in XVBAP

Hi Experts,
I have to add extra line item in the Sale order through user exit.
So i added new line item in the internal table XVBAK of the subroutine USEREXIT_SAVE_DOCUMENT_PREPARE (MV45AFZZ). Its working fine with the sales order. But when I create delivery of the same new iserted line item is not going to the delivery.
Please give me solution...
Thanks
Sameer

Hi Sameer,
i think, you have added the line in XVBAP - not in XVBAK.
And what's about VBEP - without an entry in VBEP, there will be no delivery note. There are also several indexes for the delivery.
I hav'n dared to put an extra Line into the oder while Save_prepare.
Perhaps try the bapi for order changing.
You can get the new order-number while userexit Save. Save the need of change in an extra teble and change is via bapi with a background - job.
Hans

There's a random extra line text on the login screen?!

I would love if someone could help me figure this one out... (Just installed 10.7)
From my first Lion log in after the update: Just above the Sleep, Restart, and Shut Down buttons on the Lion Login Screen is an extra line of text. It's definitely there on purpose (it look all pretty and formatted in a nice little band) but I have NO CLUE where it came from or where the setting/option is to change what it says!
The text is my old company name, which changed over a year ago and all traces of it on the user profile and address book have been omitted or updated. We haven't used this name in a long time, and were very thorough in making sure all instances were updated, so that's why I'm having a hard time understanding where this buried piece of information came from and how Apple has justified grabbing it and using it on the welcome screen... What is the source of this text? I want to update it to the correct name!
And no, it's not the computer's name, which I also thought of. That's currently set to "Mac Pro." Any ideas at all?

Aha! Do/did you have Onyx installed?
Onyx system utility allowed users to make a change to the file called com.apple.loginwindow.plist. It's located in Macintosh -> Library -> Preferences, and it's a locked system file.
Onyx allowed you to edit the contents of that file and put in your own custom message. I must have done it one mine a while back (don't remember). Apparently for some people, after upgrading to Lion, the message is still there but they can't edit it anymore. The only version of Onyx that works now is the new beta version, but it still doesn't have this option.
Anyway, here's a website with instructions on how to edit it:
http://hints.macworld.com/article.ph...20921074429845
I haven't tried this because my System Preferences option took care of it. Hope this helps!

Fix for extra line spacing in code on publish

Hi Everyone
Here is a fix for the issue where on publishing using Contribute (CS3 / CS4) extra line spacing is added into the HTML code on publish. Everytime you publish using Contribute extra line spacing is added between the lines of coding destroying the formatting over time.
(See attached PDF document for the complete how to step-by-step fix.)
The issue lies in the line break type defined in Adobe Contribute settings. Where the web server type, the website is hosted on Unix / Windows, is different from the line break type defined in Contribute's settings under...
Users & Roles > Editing > Line break Type
For example:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
<title>Website Tile</title>
<meta name="keywords" content="Keywords here" />
<meta name="description" content="Description here" />
On publish becomes:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
<title>Website Tile</title>
<meta name="keywords" content="Keywords here" />
<meta name="description" content="Description here" />
(dots are used just to space the text in the forum thread post, they represent blank lines between the lines of code)

It sounds like you are carrying over a desktop setting that I dont think is editable in iPad pages. It is the before and after spacing around paragraphs. I have been using iPad versions for months now and cant think of the desktop wording in the inspector.
Open back up in Dekstop pages and see if you can find that setting and reset it to a lower value, or delete the value and resend to iPad.
Jason

Inserting Extra Lines dynamically in Iprocurement

Hi,
We have a rqquirement in iProcurement. Here are the rules
1. Typically user queries for a item, adds it to the shpping cart.
2. Clicks on the 'Proceed To Checkout' button.
3. This takes him to the ShoppingCart page which lists all the items that have been selected. The users clicks next...and submits the requisition for approval.
In step1, sometimes the item selected is a 'Kit' i.e. it has multiple items within it. When such a kit is selected, the shopping cart(Step3) page should not display a single row for the kit but should 'blowup' the single line to multiple lines that makeup the kit. These constituent item lines should replace the would-have-been kit line in the shopping cart page.
I can write a query to determine if an item is a kit and retrieve the details of it's constituent items. When the shopping cart page is displayed it should have created and should display the extra rows for the constituent items with their details populated.
Lets say user added to the cart 3 items. Item1- a regular item, item2-a kit item with 2 detail items and item3-once again a regular item. The shopping cart will look like this:
Current Functionality;
Line1: Item1 $10 //(Regular Item) -
Line2: Item2 $20 //(Kit with items item21, item22)
Line3: Item3 $40 //(Regular item)
New Functionality:
Line1: Item1 $10 //(Regular Item)
Line2: Item21 $10 //blow up to detail
Line3: Item22 $10 //blow up to detail
Line4: Item3 $40 //(Regular Item)
What is the best way to achieve this in OAF? Where do I write the code?
Thanks

Hi Tapash,
Thanks for the info.
We are trying to change an iprocurement seeded page. I am new to the OAF and Java . I attended an OAF class last week and took an online java course the week before - info overload. So I have a lot of rookie questions
Based on your suggestion I am calculating this is what happens. Just my thought process. Please advise if it makes sense.
1. User selects a bunch of items and adds them to the shopping cart.
2. These selected items' numbers are stored somewhere (where?)
2. Clicks on 'proceed to checkout' button.
3. This causes the VO to build a query something like
select details from items_table where item_numbers in (those selected in 1 and stored in 2).
What I will need to do is extend the VORowImpl and in init_query method change the query from 3 to somehow include the constituent Kit items.
Is this correct?
BTW I have seen some of your posts and you are doing a great job making the transition to OAF palatable to a lot of people. If you don't already work for Oracle, they should be paying you for this.
Thanks
Sandeep

Export to text creates extra line

I've created a number of fixed width extract reports that will be used to upload data into another system. The files, in general, are fine, however Crystal Reports 2008 is adding an extra line to the end of the file. This is causing the upload to fail.
I've created several. extract reports before, so I reviewed a sample extract from a report I created in Crystal Reports XI R2 and it, too, had the same issue.
Googling indicates that others have had the same issue, but I have yet to find a resolution to the problem.
Has anybody else encountered this and do you know how to resolve the issue?
Thank you, Kurt

Hi Kurt,
In my scheduler app I have a command line option to remove (or replace characters) in the resulting export file. This was developed for exactly that reason (so there is a special option to remove/replace only the last character in the file).
You can develop the same approach. Alternatively, there are more direct upload options (the export can go directly into a database table).
hth,
- Ido

Not able to add extra line item in sales order - va01

Hi friends,
At the time of creation of sales order via va01.
I am appending the my extra line item in xvbap. But on screen I am not able to view that extra line item.
Could you please help me out with this problem.
My code is given below.
I am writting this code in MV45AFZB &
in that FORM USEREXIT_CHECK_VBAP USING US_DIALOG.
it_free_goods is the table in which i am having data which needs to be uploaded in xvbap.
IF it_free_goods[] IS NOT INITIAL.
    LOOP AT it_free_goods INTO wa_free_goods.
      wa_xvbap-matnr = wa_free_goods-matnr.
      RV45A-MABNR = wa_free_goods-matnr.
      VBAP-POSNR   = vbap-posnr + 10.
      wa_xvbap-kwmeng = wa_free_goods-menge.
      wa_xvbap-meins = wa_free_goods-meins.
      wa_xvbap-pstyv = co_pstyv.
      wa_xvbap-posnr = vbap-posnr + 10.
      wa_XVBAP-UPDKZ = 'I'.
      MOVE-CORRESPONDING wa_xvbap TO xvbap.
      APPEND xvbap.
     ENDLOOP.
   ENDIF.
Please let me know if somethings needs to be changed.
It will be very helpful for me,
Thanks,
Best Regards,
Prashant

Hi Prashanth,
I believe the use of
USEREXIT_CHECK_VBAP
This user exit can be used to carry out additional checks (e.g. for completion) at item level
Please check the following link which has a similar requirement
Re: VA01/VA02 screen exit
Regards
Byju

GUI_DOWNLOAD : Extra Line

Hi All,
I am downloading the the internal table into a flat file using GUI_DOWNLOAD.
I am getting an extra line at the end which is not required.
I have debugged and found the content is correct.
However in note pad a blank line apprers.
Any help would be great.
reagrds,

REPORT ZPP_GROSS_REQUIREMENT_UPLOAD.
data : zwerks like BAPISITEMR-PLANT.
DATA : BEGIN OF ITAB_REQ OCCURS 0,
          RECTYPE(4),
          PLANT(3),
          MATERIAL(12),
          MAT_TYPE(1),
          START_DATE(8),
          END_DATE(8),
          QTY(14),
          SIGN(1),
          FILLER(9),
       END OF ITAB_REQ.
DATA : BEGIN OF ITAB_REQ2 OCCURS 0,
          RECTYPE(4),
          PLANT(3),
          MATERIAL(12),
          MAT_TYPE(1),
          START_DATE(8),
          END_DATE(8),
          QTY(14),
          SIGN(1),
          FILLER(9),
       END OF ITAB_REQ2.
DATA : BEGIN OF ITAB_PLAN OCCURS 0,
        MANDT TYPE SY-MANDT,
        PLANNO LIKE ZPP_PLAN_NUMBER-PLANNO,
        PLNTIME LIKE ZPP_PLAN_NUMBER-PLNTIME,
        PLNDATE LIKE ZPP_PLAN_NUMBER-PLNDATE,
        ACTIVE LIKE ZPP_PLAN_NUMBER-ACTIVE,
       END OF ITAB_PLAN .
DATA : BEGIN OF ITAB_STATUS OCCURS 0,
        MATERIAL LIKE MARA-MATNR,
        TYPE(1),
        DESC(200),
       END OF ITAB_STATUS .
data : p1(14) type p decimals 5.
data : p2(13) type p decimals 3.
data : p(15) type C.
DATA : REQ_OUT LIKE BAPISITMEO OCCURS 0 WITH HEADER LINE,
       REQ_OUT1 LIKE BAPISITMEO OCCURS 0 WITH HEADER LINE,
       RET2 LIKE BAPIRETURN1 OCCURS 0 WITH HEADER LINE.
DATA : REQ_IN LIKE BAPISSHDIN OCCURS 0 WITH HEADER LINE,
       RET3 LIKE BAPIRETURN1 OCCURS 0 WITH HEADER LINE.
DATA : BEGIN OF T1 OCCURS 0 ,
        MATNR LIKE MARA-MATNR,
        DATE_TYPE TYPE BAPISSHDIN-DATE_TYPE,
        REQ_DATE TYPE BAPISSHDIN-REQ_DATE,
        REQ_QTY TYPE BAPISSHDIN-REQ_QTY,
        UNIT TYPE BAPISSHDIN-UNIT,
      END OF T1.
DATA: BEGIN OF ITAB_OLDPLAN OCCURS 0,
        MANDT TYPE ZPP_PLAN_NUMBER-MANDT,
        PLANNO TYPE ZPP_PLAN_NUMBER-PLANNO,
        PLNTIME TYPE ZPP_PLAN_NUMBER-PLNTIME,
        PLNDATE TYPE ZPP_PLAN_NUMBER-PLNDATE,
        ACTIVE TYPE ZPP_PLAN_NUMBER-ACTIVE,
       END OF ITAB_OLDPLAN.
DATA: BEGIN OF ITAB_OLDPLAN1 OCCURS 0,
        MANDT TYPE ZPP_PLAN_NUMBER-MANDT,
        PLANNO TYPE ZPP_PLAN_NUMBER-PLANNO,
        PLNTIME TYPE ZPP_PLAN_NUMBER-PLNTIME,
        PLNDATE TYPE ZPP_PLAN_NUMBER-PLNDATE,
        ACTIVE TYPE ZPP_PLAN_NUMBER-ACTIVE,
       END OF ITAB_OLDPLAN1.
DATA : PLNNO TYPE I.
DATA : PLNNO1(10) TYPE C.
DATA : PLNNO_NEW TYPE I.
DATA : PLNNO_NEW1(10) TYPE C.
DATA : RET LIKE BAPIRETURN1 OCCURS 0 WITH HEADER LINE.
DATA : SCHEDULE_IN LIKE BAPISSHDIN OCCURS 0 WITH HEADER LINE.
DATA : ITEMS LIKE BAPISITEMR OCCURS 0 WITH HEADER LINE .
DATA : BEGIN OF T OCCURS 0,
         MATERIAL(12),
         DATE_TYPE(1),
         REQ_DATE LIKE SY-DATUM,
         REQ_QTY(13),
       END OF T.
DATA : L_DATTIME(10) .
*DATA : D1 like VTBBEWE-DBERVON, D2 like VTBBEWE-DBERBIS, D3 like VTBBEWE-ATAGE.
DATA : D1 TYPE D, D2 TYPE D, D3 TYPE I.
DATA QN(9) TYPE C.
DATA DEC(9) TYPE C.
DATA : TMAT(12).
DATA : ACTIVE_REQ LIKE BAPISITEMR-REQ_NUMBER,
       DEACTIVE_REQ(10) TYPE C .
SELECTION-SCREEN BEGIN OF BLOCK BLK WITH FRAME TITLE TEXT-001.
PARAMETER: P_FILE TYPE STRING DEFAULT
                                      'c:\data\gross_upload.txt'.
*PARAMETER: P_PLAN LIKE AM60X-PBDNR.
*PARAMETER: P_OLDPLN LIKE BAPISITEMR-REQ_NUMBER.
SELECTION-SCREEN END OF BLOCK BLK.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_FILE.
PERFORM GETFILE_NAME CHANGING P_FILE.
TOP-OF-PAGE.
WRITE :/35 '** GROSS REQUIREMENT UPLOAD **'.
WRITE :/35 '******************************'.
START-OF-SELECTION.
perform CHECK_PLAN_NUMBER USING P_OLDPLN.
PERFORM READ_FILE. "Reads the input file using GUI_UPLOAD.
PERFORM GET_OLD_PLAN. " GETS THE OLD PLAN NUMBER.
PERFORM CREATE_PLAN_NUMBER. " Creates a new plan number for this week.
PERFORM CREATE_GROSS_REQUIREMENT. " Creates the gross requirement.
PERFORM WRITE_STATUS.
*&      Form READ_FILE
      Reads the input file using GUI_UPLOAD.
--> p1        text
<-- p2        text
FORM READ_FILE .
CALL FUNCTION 'GUI_UPLOAD'
    EXPORTING
      FILENAME                      = P_FILE
   FILETYPE                      = 'DAT'
HAS_FIELD_SEPARATOR           = ' '
HEADER_LENGTH                 = 0
READ_BY_LINE                  = 'X'
DAT_MODE                      = ' '
CODEPAGE                      = ' '
IGNORE_CERR                   = ABAP_TRUE
REPLACEMENT                   = '#'
CHECK_BOM                     = ' '
VIRUS_SCAN_PROFILE            =
NO_AUTH_CHECK                 = ' '
IMPORTING
FILELENGTH                    =
HEADER                        =
    TABLES
      DATA_TAB                      = ITAB_REQ
EXCEPTIONS
FILE_OPEN_ERROR               = 1
FILE_READ_ERROR               = 2
NO_BATCH                      = 3
GUI_REFUSE_FILETRANSFER       = 4
INVALID_TYPE                  = 5
NO_AUTHORITY                  = 6
UNKNOWN_ERROR                 = 7
BAD_DATA_FORMAT               = 8
HEADER_NOT_ALLOWED            = 9
SEPARATOR_NOT_ALLOWED         = 10
HEADER_TOO_LONG               = 11
UNKNOWN_DP_ERROR              = 12
ACCESS_DENIED                 = 13
DP_OUT_OF_MEMORY              = 14
DISK_FULL                     = 15
DP_TIMEOUT                    = 16
OTHERS                        = 17
IF SY-SUBRC <> 0.
    MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
            WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
   DESCRIBE TABLE ITAB_REQ LINES LIN.
     IF SY-TABIX = '1' OR SY-TABIX = LIN.
       CONTINUE.
     ENDIF.
delete ITAB_REQ where MATERIAL+11(1) = 'I' and MAT_TYPE = 'P'.
ENDFORM.                    " READ_FILE
*&      Form CREATE_GROSS_REQUIREMENT
      Creates the gross requirement
--> p1        text
<-- p2        text
FORM CREATE_GROSS_REQUIREMENT .
*read table ITAB_REQ with key RECTYPE = 'OP01'.
*zwerks = ITAB_REQ-PLANT.
DELETE ITAB_REQ WHERE RECTYPE NE 'PFAI'.
SORT ITAB_REQ BY MATERIAL.
ITAB_REQ2[] = ITAB_REQ[] .
DELETE ADJACENT DUPLICATES FROM ITAB_REQ2 COMPARING MATERIAL.
LOOP AT ITAB_REQ .
    T-MATERIAL = ITAB_REQ-MATERIAL.
    D1 = ITAB_REQ-START_DATE.
    D2 = ITAB_REQ-END_DATE.
    IF D2 EQ '        '.
      D2 = D1 .
    ENDIF.
   D3 = D2 - D1.
   CALL FUNCTION 'CONVERT_DATE_FORMAT'
     EXPORTING
       I_DATE      = D1
     IMPORTING
       E_CALC_DATE = D1.
   CALL FUNCTION 'CONVERT_DATE_FORMAT'
     EXPORTING
       I_DATE      = D2
     IMPORTING
       E_CALC_DATE = D2.
   D3 = D2 - D1.
    CALL FUNCTION 'HR_SGPBS_YRS_MTHS_DAYS'
      EXPORTING
        BEG_DA     = D1
        END_DA     = D2
      IMPORTING
        NO_CAL_DAY = D3.
*CALL FUNCTION 'FIMA_DAYS_AND_MONTHS_AND_YEARS'
EXPORTING
   I_DATE_FROM          = d1
I_KEY_DAY_FROM       = '00'
   I_DATE_TO            = d2
I_KEY_DAY_TO         = '00'
I_FLG_SEPARATE       = ' '
IMPORTING
E_DAYS               = d3
E_MONTHS             =
E_YEARS              =
    IF D3 < 7 AND D3 > 0.
      T-DATE_TYPE = '2'. " Weekly
    ELSE.
      T-DATE_TYPE = '3'. " Monthly
    ENDIF.
    IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
    ENDIF.
    T-REQ_DATE = ITAB_REQ-START_DATE.
    QN = ITAB_REQ-QTY+0(9).
    DEC = ITAB_REQ-QTY+9(5).
    CONCATENATE QN '.' DEC INTO p.
    p1 = p.
   p2 = p1.
   T-REQ_QTY = p2.
T-REQ_QTY = p.
T-REQ_QTY = ITAB_REQ-QTY+0(9).
    APPEND T.
    CLEAR : T, D1, D2, D3.
ENDLOOP.
DATA PNO LIKE BAPISITEMR-REQ_NUMBER.
LOOP AT ITAB_REQ2.
    LOOP AT T WHERE MATERIAL = ITAB_REQ2-MATERIAL.
      SCHEDULE_IN-DATE_TYPE = T-DATE_TYPE .
      SCHEDULE_IN-REQ_DATE = T-REQ_DATE .
      SCHEDULE_IN-REQ_QTY = T-REQ_QTY.
      APPEND SCHEDULE_IN.
    ENDLOOP.
    ITEMS-MATERIAL = ITAB_REQ2-MATERIAL .
    ITEMS-PLANT = zwerks .
    ITEMS-REQU_TYPE = ' ' .
    ITEMS-VERSION = '00' .
    ITEMS-VERS_ACTIV = 'X'.
    ITEMS-REQ_NUMBER = L_DATTIME.
    ACTIVE_REQ = L_DATTIME.
   APPEND ITEMS.
   D1 = ITAB_REQ-START_DATE.
   D2 = ITAB_REQ-END_DATE.
   D3 = D2 - D1.
   IF D3 > 7.
     SCHEDULE_IN-DATE_TYPE = '3'. " MONTHLY
   ELSE.
     SCHEDULE_IN-DATE_TYPE = '2'. " WEEKLY
   ENDIF.
   SCHEDULE_IN-REQ_DATE = ITAB_REQ-START_DATE .
   SCHEDULE_IN-REQ_QTY = ITAB_REQ-QTY.
   APPEND SCHEDULE_IN.
    CALL FUNCTION 'BAPI_REQUIREMENTS_CREATE'
      EXPORTING
        REQUIREMENTS_ITEM              = ITEMS
REQUIREMENT_PARAM              =
       DO_COMMIT                      = 'X'
       UPDATE_MODE                    = 'X'
REFER_TYPE                     = ' '
PROFILID                       = ' '
IMPORTING
MATERIAL                       =
PLANT                          =
REQUIREMENTSTYPE               =
VERSION                        =
   REQMTSPLANNUMBER               =
MRP_AREA                       =
MATERIAL_EVG                   =
      TABLES
        REQUIREMENTS_SCHEDULE_IN       = SCHEDULE_IN
REQUIREMENTS_CHAR_IN           =
        RETURN                         = RET
   if sy-subrc ne 0.
   loop at ret.
   write :/ ret.
   endloop.
   endif.
    ITAB_STATUS-MATERIAL = ITAB_REQ2-MATERIAL.
   ITAB_STATUS-TYPE = RET-TYPE.
    ITAB_STATUS-DESC = RET-MESSAGE.
    IF RET-MESSAGE IS INITIAL.
      ITAB_STATUS-DESC = 'Requirement Created '.
    ENDIF.
    APPEND ITAB_STATUS.
    CLEAR ITAB_STATUS.
    CLEAR SCHEDULE_IN.
    REFRESH SCHEDULE_IN.
    CLEAR ITAB_REQ2.
    CLEAR T.
ENDLOOP.
ITAB_PLAN-MANDT = SY-MANDT.
ITAB_PLAN-PLANNO = L_DATTIME.
ITAB_PLAN-PLNTIME = SY-UZEIT.
ITAB_PLAN-PLNDATE = SY-DATUM.
ITAB_PLAN-ACTIVE = 'X'.
APPEND ITAB_PLAN.
CLEAR ITAB_PLAN.
INSERT ZPP_PLAN_NUMBER FROM TABLE ITAB_PLAN.
IF SY-SUBRC = 0.
    COMMIT WORK.
ENDIF.
ENDFORM.                    " CREATE_GROSS_REQUIREMENT
*&      Form WRITE_STATUS
      text
--> p1        text
<-- p2        text
FORM WRITE_STATUS .
WRITE :/ ' REQUIREMENT PLAN NUMBER ACTIVATED   : ', ACTIVE_REQ.
WRITE :/ ' REQUIREMENT PLAN NUMBER DEACTIVATED : ', DEACTIVE_REQ.
ULINE.
IF NOT ITAB_STATUS[] IS INITIAL. " WRITES ERROR MESSAGES
    WRITE SY-ULINE(110).
    WRITE :/1 SY-VLINE NO-GAP,
            6 'Material Number',
            24 SY-VLINE NO-GAP,
           25 'Return Code',
           38 SY-VLINE NO-GAP,
            39 'Return Message',
            110 SY-VLINE NO-GAP.
    WRITE SY-ULINE(110).
    LOOP AT ITAB_STATUS.
      WRITE :/1 SY-VLINE NO-GAP,
              6 ITAB_STATUS-MATERIAL,
              24 SY-VLINE NO-GAP,
             25 ITAB_STATUS-TYPE,
             38 SY-VLINE NO-GAP,
              39 ITAB_STATUS-DESC,
              110 SY-VLINE NO-GAP.
    ENDLOOP.
    WRITE SY-ULINE(110).
ENDIF.
ENDFORM.                    " WRITE_STATUS
*&      Form getfile_name
      text
     <--P_P_FILE text
FORM GETFILE_NAME CHANGING P_P_FILE.
DATA : TMP_FILE LIKE RLGRAP-FILENAME.
TMP_FILE = P_P_FILE.
CALL FUNCTION 'KD_GET_FILENAME_ON_F4'
   EXPORTING
PROGRAM_NAME        = SYST-REPID
DYNPRO_NUMBER       = SYST-DYNNR
FIELD_NAME          = ' '
STATIC              = ' '
     MASK                = ' .'
    CHANGING
      FILE_NAME           = TMP_FILE
   EXCEPTIONS
     MASK_TOO_LONG       = 1
     OTHERS              = 2.
IF SY-SUBRC = 0.
    P_P_FILE = TMP_FILE.
ENDIF.
ENDFORM.                    " getfile_name
*&      Form DEACTIVATE_OLD_REQUIREMENT
      text
--> p1        text
<-- p2        text
FORM DEACTIVATE_OLD_REQUIREMENT .
CALL FUNCTION 'BAPI_REQUIREMENTS_GETDETAIL'
    EXPORTING
      MATERIAL               = ' '
      PLANT                  = zwerks
      REQUIREMENTSTYPE       = ' '
      VERSION                = '00'
      REQMTSPLANNUMBER       = ITAB_OLDPLAN-PLANNO
MRP_AREA               =
MATERIAL_EVG           =
    TABLES
     REQUIREMENTS_OUT        = REQ_OUT
      RETURN                 = RET2
IF SY-SUBRC = 0.
    LOOP AT REQ_OUT.
      T1-MATNR = REQ_OUT-MATERIAL.
      T1-DATE_TYPE = REQ_OUT-DATE_TYPE.
      T1-REQ_DATE = REQ_OUT-REQ_DATE.
      T1-REQ_QTY = REQ_OUT-REQ_QTY.
      T1-UNIT = REQ_OUT-UNIT.
      APPEND T1.
      CLEAR T1.
    ENDLOOP.
    REQ_OUT1[] = REQ_OUT[].
    SORT REQ_OUT1 BY MATERIAL.
    DELETE ADJACENT DUPLICATES FROM REQ_OUT1 COMPARING MATERIAL.
    LOOP AT REQ_OUT1.
      LOOP AT T1 WHERE MATNR = REQ_OUT1-MATERIAL.
        REQ_IN-DATE_TYPE = T1-DATE_TYPE.
        REQ_IN-REQ_DATE = T1-REQ_DATE.
        REQ_IN-REQ_QTY   = T1-REQ_QTY.
        REQ_IN-UNIT      = T1-UNIT.
        APPEND REQ_IN.
        CLEAR REQ_IN.
      ENDLOOP.
      CALL FUNCTION 'BAPI_REQUIREMENTS_CHANGE'
        EXPORTING
          MATERIAL                       = REQ_OUT1-MATERIAL
          PLANT                          = zwerks
          REQUIREMENTSTYPE               = ' '
          VERSION                        = '00'
          REQMTSPLANNUMBER               = ITAB_OLDPLAN-PLANNO
          VERS_ACTIV                     = ' '
    REQUIREMENT_PARAM              =
    MRP_AREA                       =
          DO_COMMIT                      = 'X'
          UPDATE_MODE                    = 'X'
          DELETE_OLD                     = 'X'
    NO_WITHDR                      = ' '
    MATERIAL_EVG                   =
IMPORTING
    REQUIREMENT_ITEM_OUT           =
         TABLES
          REQUIREMENTS_SCHEDULE_IN       = REQ_IN
    REQUIREMENTS_CHAR_IN           =
          RETURN                         = RET3
    ENDLOOP.
ENDIF.
ENDFORM.                    " DEACTIVATE_OLD_REQUIREMENT
*&      Form CHECK_PLAN_NUMBER
      text
--> p1        text
<-- p2        text
FORM CHECK_PLAN_NUMBER . "USING P_P_OLDPLN.
DATA : ITAB_PBIM TYPE PBIM .
DATA MSG TYPE STRING.
SELECT SINGLE * FROM PBIM INTO ITAB_PBIM WHERE PBDNR = P_PLAN.
IF SY-SUBRC = 0.
   CONCATENATE 'THE PLAN NUMBER : ' P_PLAN ' ALREADY EXIST' INTO MSG.
   MESSAGE MSG TYPE 'E'.
ENDIF.
SELECT SINGLE * FROM PBIM INTO ITAB_PBIM WHERE PBDNR = P_OLDPLN.
IF SY-SUBRC NE 0.
   CONCATENATE 'THE PLAN NUMBER : ' P_OLDPLN ' DOES NOT EXIST' INTO MSG.
   MESSAGE MSG TYPE 'E'.
ENDIF.
ENDFORM.                    " CHECK_PLAN_NUMBER
*&      Form GENERATE_PLAN_NUMBER
      text
--> p1        text
<-- p2        text
FORM CREATE_PLAN_NUMBER.
PLNNO_NEW1 = PLNNO_NEW.
CONDENSE PLNNO_NEW1.
CONCATENATE SY-DATUM+2(6) PLNNO_NEW1 INTO L_DATTIME.
ENDFORM.                    " CREATE_PLAN_NUMBER
*&      Form GET_OLD_PLAN
      text
--> p1        text
<-- p2        text
FORM GET_OLD_PLAN .
SELECT * FROM ZPP_PLAN_NUMBER INTO TABLE ITAB_OLDPLAN WHERE ACTIVE = 'X'.
IF SY-SUBRC = 0.
    READ TABLE ITAB_OLDPLAN WITH KEY ACTIVE = 'X'.
    PLNNO1 = ITAB_OLDPLAN-PLANNO+6(4).
    CONDENSE PLNNO1.
    PLNNO = PLNNO1.
    read table ITAB_REQ with key RECTYPE = 'OP01'.
    zwerks = ITAB_REQ-PLANT.
    PERFORM DEACTIVATE_OLD_REQUIREMENT. " PREVIOUS PLAN IS DEACTIVATED.
    ITAB_OLDPLAN1[] = ITAB_OLDPLAN[].
    CLEAR ITAB_OLDPLAN.
    REFRESH ITAB_OLDPLAN.
    READ TABLE ITAB_OLDPLAN1 WITH KEY ACTIVE = 'X'.
    ITAB_OLDPLAN-PLANNO = ITAB_OLDPLAN1-PLANNO.
    ITAB_OLDPLAN-PLNTIME = ITAB_OLDPLAN1-PLNTIME.
    ITAB_OLDPLAN-PLNDATE = ITAB_OLDPLAN1-PLNDATE.
    ITAB_OLDPLAN-ACTIVE = ' '.
    APPEND ITAB_OLDPLAN.
    CLEAR ITAB_OLDPLAN.
    DEACTIVE_REQ = ITAB_OLDPLAN1-PLANNO.
    MODIFY ZPP_PLAN_NUMBER FROM TABLE ITAB_OLDPLAN.
    IF SY-SUBRC = 0.
      COMMIT WORK.
    ENDIF.
ENDIF.
PLNNO_NEW = PLNNO + 1.
ENDFORM.                    " GET_OLD_PLAN

Prevent user from view line item details in KSB1 report

Hi,
how to restricting user from view line item details by double-click on it or highlight an item click on Document?
Regards,
Kelvin

Hi,
This issue got resolved.
SAP suggested to execute the program "FAGL_CORR_0001" for company code wise.
In ECC 5.00 from support pack 10 onwards two new fields has been added to table FAGLFLEXA. (earlier we are on support pack 9, recently we applied the latest support pack)
If we can execute the above program FAGL_CORR_0001, the two new fields will filled with relevant data and then we can able to use drill down option.
This is for your information.
Message was edited by:
prasad naga

Automatic Payment Run - Generate Extra line items

Hi All,
We need to create extra line items when automatic payment (F110) is run because we need sub-fund entries.
For example:
Automatic payment will create:
Vendor a/c Dr.
Unpresented Cheque a/c Cr.
We need:
Vendor a/c Dr.
Sub-Fund a/c Dr.
Unpresented Cheque a/c Cr.
Sub-Fund a/c Cr.
This is a requirement specific to our organisation. We need to add these extra line items while F110 is running and before document is posted. We have checked all the user-exits for transaction F110 and didn't find anything to add this.
Any suggestions/ideas is highly appreciated.
Regards,
Sougata.

Hi Sougata.
Need to create Substitution rules (transaction OBBH) and within those rules you can define user exits (ZGGBS000 for e.g.). In those user exits, you can split the lines based on Document type (ZP, ZV) for automatic payment clearing.
This is a customization + ABAP intensive approach, but is a approach that is supported by SAP and I have used it in the past to split document lines at any stage in their processing. It has been a while though and I don't have any examples to give you.
Hope that helps!
Rishi

Form Validation using Javascript error when adding extra fields

Hi,
I have a form (with a few fields which require validation) which works just fine. I have added extra fields to the form and require them to validate too. My problem is that they are not showing via the behaviours/validation box and I can't figure out how to sort it! They are contained within the form element. I have tried to delate the original validation and start again but to no avail.
Please can someone help me?
Code below.
Many thanks
function MM_validateForm() { //v4.0
var i,p,q,nm,test,num,min,max,errors='',args=MM_validateForm.arguments;
for (i=0; i<(args.length-2); i+=3) { test=args[i+2]; val=MM_findObj(args[i]);
    if (val) { nm=val.name; if ((val=val.value)!="") {
      if (test.indexOf('isEmail')!=-1) { p=val.indexOf('@');
        if (p<1 || p==(val.length-1)) errors+='- '+nm+' must contain an e-mail address.\n';
      } else if (test!='R') { num = parseFloat(val);
        if (isNaN(val)) errors+='- '+nm+' must contain a number.\n';
        if (test.indexOf('inRange') != -1) { p=test.indexOf(':');
          min=test.substring(8,p); max=test.substring(p+1);
          if (num<min || max<num) errors+='- '+nm+' must contain a number between '+min+' and '+max+'.\n';
    } } } else if (test.charAt(0) == 'R') errors += '- '+nm+' is required.\n'; }
} if (errors) alert('The following error(s) occurred:\n'+errors);
document.MM_returnValue = (errors == '');
//-->
<form action="contact_us.asp" method="post" name="contact" target="_parent" class="contentText" id="contact">
      <table width="100%" border="0" cellspacing="5" cellpadding="0">
        <tr>
          <td width="54%" class="subHeader">Full Name* </td>
          <td width="46%" class="subHeader"><input name="FullName" type="text" id="FullName" /></td>
        </tr>
        <tr>
          <td class="subHeader">Company Name </td>
          <td class="subHeader"><input name="CompanyName" type="text" id="CompanyName" /></td>
        </tr>
        <tr>
          <td class="subHeader">Address</td>
          <td class="subHeader"><input name="Address1" type="text" id="Address1" /></td>
        </tr>
        <tr>
          <td class="subHeader"> </td>
          <td class="subHeader"><input name="Address2" type="text" id="Address2" /></td>
        </tr>
        <tr>
          <td class="subHeader"> </td>
          <td class="subHeader"><input name="Address3" type="text" id="Address3" /></td>
        </tr>
        <tr>
          <td class="subHeader">Postcode</td>
          <td class="subHeader"><input name="Postcode" type="text" id="Postcode" /></td>
        </tr>
        <tr>
          <td class="subHeader">Telephone Number* </td>
          <td class="subHeader"><input name="Telephone" type="text" id="Telephone" /></td>
        </tr>
        <tr>
          <td class="subHeader">Mobile Number </td>
          <td class="subHeader"><input name="Mobile" type="text" id="Mobile" /></td>
        </tr>
        <tr>
          <td height="25" class="subHeader">Email Address* </td>
          <td class="subHeader"><input name="Email" type="text" id="Email" /></td>
        </tr>
        <tr>
          <td height="30" class="subHeader">Status*</td>
          <td class="subHeader"><select name="StatusClass" id="StatusClass">
            <option selected="selected">Please Choose</option>
            <option>Architect</option>
            <option>Interior Designer</option>
            <option>Private Client</option>
            <option>Student</option>
            <option>Trade Enquiry</option>
          </select>          </td>
        </tr>
        <tr>
          <td height="23" class="subHeader">Project*</td>
          <td class="subHeader"><select name="Project" size="1" id="Project">
            <option selected="selected">Please Choose</option>
            <option>Planning Stages</option>
            <option>New Build</option>
            <option>Refurbishment</option>
            <option>Barn Conversion</option>
            <option>No project - information only</option>
          </select>          </td>
        </tr>
        <tr>
          <td height="37" class="subHeader">How did you hear about us?*</td>
          <td class="subHeader"><select name="CameFrom" size="1" id="CameFrom">
            <option selected="selected">Please Choose</option>
            <option>Web Search</option>
            <option>Grand Designs</option>
            <option>Living Etc</option>
            <option>Home Building & Renovation</option>
            <option>Architect</option>
            <option>Friend/Family</option>
            <option>Magazine/Editorial</option>
            <option>Newspaper Article</option>
            <option>Trade Show/Exhibition</option>
            <option>Other</option>
          </select></td>
        </tr>
        <tr>
          <td height="24" class="subHeader">Brochure Request </td>
          <td class="subHeader"><input name="Brochure" type="checkbox" id="Brochure" value="checkbox" /></td>
        </tr>
        <tr>
          <td class="subHeader">Message</td>
          <td class="subHeader"><span class="style4">
            <textarea name="Message" id="Message"></textarea>
          </span></td>
        </tr>
        <tr>
          <td class="subHeader"> </td>
          <td class="subHeader"><input name="Submit" type="submit" value="Submit" /></td>
        </tr>
        <tr>
          <td colspan="2" class="subHeader"><em>* Required fields</em></td>
        </tr>
      </table>
      </form>

whoops..... forgot to post this line of code which was a bit further down the page...
"MM_validateForm('name','','R','number','','RisNum');return document.MM_returnValue">

Users Adding Extra Lines to Old PO's

Similar Messages

Maybe you are looking for