TECO status - pls help me to do a control

Question

Hi SAP gurus,
I am seeking your assistance to help me..
I want to control a tasklist to not allow changes in component whether adding or deletion BUT they are not working for deletion if user do a manual TECO.
What i am doing in userexit?
Program will read if material is deleted(manual delete) - have flag deletion.
Then the program can capture the flag then prompt the error msg.
BUT
When user is doing manual TECO, flag of deletion is automatically assign.
Then the program will capture the flag and prompt the error.
How do i do to allow saving if user doing manual TECO??
<u><b>My checking codes:</b></u>
LOOP AT tafvgd_get WHERE phflg <> 'X'.
          CLEAR: stpo, ycam, plmz, ta_plmz, ta_stpo.
          SELECT SINGLE * FROM ycam WHERE plnnr = tafvgd_get-plnnr.
          IF sy-subrc = 0 AND ycam-ychgind NE 'Y'.
            SELECT * FROM plmz INTO CORRESPONDING FIELDS OF
            TABLE ta_plmz WHERE plnty = tafvgd_get-plnty
                          AND   plnnr = tafvgd_get-plnnr
                          AND   plnkn = tafvgd_get-plnkn
                          AND   loekz <> 'X'.
            SELECT * FROM stpo INTO CORRESPONDING FIELDS OF
            TABLE ta_stpo FOR ALL ENTRIES IN ta_plmz
                   WHERE stlty = ta_plmz-stlty
                   AND   stlnr = ta_plmz-stlnr
                   AND   stlkn = ta_plmz-stlkn
                   AND   lkenz <> 'X'.
Not allowed additional material in campaign task list.
            LOOP AT resbd_get WHERE vornr = tafvgd_get-vornr
                                    AND xloek <> 'X'.
              READ TABLE ta_stpo WITH KEY idnrk = resbd_get-matnr.
              IF sy-subrc NE 0.
                MESSAGE e778(yi).
              ENDIF.
            ENDLOOP.
Not allowed to delete material in campaign task list.
            LOOP AT ta_stpo.
              READ TABLE resbd_get WITH KEY vornr = tafvgd_get-vornr
                                            matnr = ta_stpo-idnrk
                                            xloek = ''.
              IF sy-subrc NE 0.
                MESSAGE e777(yi) WITH ta_stpo-idnrk.
              ENDIF.
            ENDLOOP.
          ENDIF.
        ENDLOOP.

Answer 1

Hi Jagrut,
Check FM EXTENDED_PROGRAM_CHECK and RS_SYNTAX_CHECK.
Hope this helps.
Thanks
Lakshman