The benefits of open source. (Serious fun for April 1st).

[Baz]

BAdi name: /CUM/BADI_CU_EXPLODE

[eranfox]

Hi all,
I just found this:
CLASS:
CL_HRRCF_DATAOVERVIEW_PL
METHOD:
GET_REQ_PDF_SMARTFORMS
LINE NUMBER
8

Code: Select all

         lv_sam_hawkins           TYPE          int4,         "#EC NEEDED

Who is sam hawkins? - the singer maybe? the programmer?

[sapmanie]

Function module: SPDA_PATCH_DISASSEMBLER

*-----------------------------------------------------------------------
* DOCUMENTATION => function module documentation !!! TODO: update it
*-----------------------------------------------------------------------

(It was never done )

[YuriT]

Function module: SPDA_PATCH_DISASSEMBLER

*-----------------------------------------------------------------------
* DOCUMENTATION => function module documentation !!! TODO: update it
*-----------------------------------------------------------------------

(It was never done )

How come? I guess this is the only example of non-documented SAP object then.

[EricHP]

Hi all,

You can find some nice comments while debugging the /DSD/SL_COCKPIT transaction...

Regards,
Eric Hernandez

FM: /DSD/SL_FSR_DEL_FFMT_PROCESS
at line 285

* now, bgins the *REAL* hard work! (only for the case the
* stuff before got on your nerves)

Code: Select all

* now, bgins the *REAL* hard work! (only for the case the
* stuff before got on your nerves)
  SORT lt_docs BY role custnbr.                             "n_1311656
  READ TABLE it_due_list INTO ls_due_list INDEX 1.
  SELECT SINGLE * FROM /dsd/st_status INTO ls_status
                  WHERE tourid = ls_due_list-tour_id.


at line 352, 356 and 362


* now, finally, after a journey through the dark and
* dangerous forrest, it comes to decision:

Code: Select all

*       now, finally, after a journey through the dark and
*       dangerous forrest, it comes to decision:
        if l_gen_fault eq /dsd/sl_cl_const=>yes             "n_1046771
        and lt_sld_flow is initial.                         "n_1046771

"sorry, you loose

Code: Select all

          rollback work."sorry, you loose
*       delete success entries in the application log         "vn_869049
          perform delete_log_msg
             using lt_order_msg_tab.
          clear lt_order_msg_tab[].                         "^n_869049
        else.


"there is a new champion in town!

Code: Select all

          commit work.  "there is a new champion in town!
* for loading deliveries (temporary visit for the driver)
* no electronic signature may be proceseed.
          IF l_role NE 'D'.                                 "n_1311656


At line 625

* there is a new champion in town, but follow on steps
* should wait, until he has done

Code: Select all

*       there is a new champion in town, but follow on steps
*       should wait, until he has done
        commit work and wait.


FM: /DSD/SL_FSR_DEL_FFMT_PROCESS
at line 487

* now, finally wait, until all children are back from the dark,
* dark and dangerous forrest (only, if we sent them there)

Code: Select all

* now, finally wait, until all children are back from the dark,
* dark and dangerous forrest (only, if we sent them there)
  IF  g_para_control-objects_per_task GT 0.
    IF g_para_control-dispatch_timeout GT 0.
      WAIT UNTIL g_number_active_tasks LE 0
           UP TO g_para_control-dispatch_timeout SECONDS.
    ELSE.
      WAIT UNTIL g_number_active_tasks LE 0.


At line 764

* PANIC !!!
* If there are *NO* data at this stage, some bullshit
* happened before. Therefore:

Code: Select all

  IF sy-subrc NE 0.
*   PANIC !!!
*   If there are *NO* data at this stage, some bullshit
*   happened before. Therefore:
*    MESSAGE x015 WITH space space space space.
*   DSD Endabstimmungslauf: Schwerer Anwendungsfehler.
    ROLLBACK WORK.                                     "#EC CI_ROLLBACK
    CALL FUNCTION '/DSD/SL_FSR_BAL_SPL_ENTRY_ADD'


[thx4allthefish]

Note 1572302

Symptom

ABAP Data Dictionary contains code which changes the program's behaviour when a user successfully authenticates with a certain username.

Code: Select all

Delete Block

  IF sy-uname = 'DDIC'       OR sy-uname = 'BOLENDER'  OR
     sy-uname = 'NAUNDORF'   OR sy-uname = 'HOPRICH'   OR
     sy-uname = 'WEBERP'     OR sy-uname = 'HOEFTK'    OR
     sy-uname = 'HELLBRUECK' OR
     sy-uname = 'TREBING'    OR sy-uname = 'TSESIS'    OR
     sy-uname = 'STAHLM'     OR sy-uname = 'BUEHLERU'  OR
     sy-uname = 'WENZELG'.

Insert Block

  IF sy-uname = 'DDIC'.

[blackfish]

CFM system, FM THMHR_OVERHEDGED_SCENARIO:

Code: Select all

    CHECK sy-subrc = tpmco_subrc_0.
* anyting nu? doo-be-do-be-doo?
    CHECK l_str_hr_new <> l_str_hr_old.

[VLozano]

Check this...
(it's a help.sap.com link, SFW)

I was looking for SOAP information, trust me

[YuriT]

RHCHECK1 documentation:

Do all of an object's infotypes lie within the validity period of infotype 1000?

Everybody lies.

[Gothmog]

Include LMEOUTP14, lines 1205-1210:

Code: Select all

      read table my_hash_table into ls_hash
                               with table key ebeln = <updqueue>-ebeln.

      if not sy-subrc is initial.
        raise panic.
      endif.

sy-subrc was initial, so I didn't panic, but it still doesn't work...
I think I'll get angry instead !

[VLozano]

Class CL_BFW_CHANNEL_POC, method CREATE_MESSAGES:

Code: Select all

* --- messages from JavaScript environment ---
  IF 0 EQ 1.
    MESSAGE e325(cpoc) WITH '' '' '' ''. " bfwChannel
    MESSAGE e326(cpoc) WITH ''.          " bfwChannel
    MESSAGE e327(cpoc) WITH '' ''.       " bfwChannel
    MESSAGE e328(cpoc) WITH ''.          " bfwChannel
    MESSAGE e330(cpoc) WITH '' ''.       " bfwComponent
    MESSAGE e331(cpoc) WITH ''.          " bfwComponent
    MESSAGE e332(cpoc) WITH '' '' ''.    " bfwComponent, bfwContainer
    MESSAGE e333(cpoc) WITH '' '' ''.    " bfwComponent, bfwContainer
    MESSAGE e334(cpoc) WITH '' '' '' ''. " bfwComponent
    MESSAGE e335(cpoc) WITH '' ''.       " bfwComponent
    MESSAGE e338(cpoc) WITH ''.          " bfwDocument
    MESSAGE e339(cpoc) WITH '' ''.       " bfwDocument
    MESSAGE e340(cpoc) WITH '' '' ''.    " bfwWindow
    MESSAGE e341(cpoc) WITH '' ''.       " bfwSystem
    MESSAGE e342(cpoc) WITH '' '' ''.    " bfwWindow
  ENDIF.

In two words: im pressive.

[Gothmog]

Actually, there's a reason for this : to find this method in the where-used list of these messages, as they are generically used just above.

[VLozano]

Actually, there's a reason for this : to find this method in the where-used list of these messages, as they are generically used just above.

Me no comprendo tu idioma... WTF? They need to use a message to point the method? Sounds absurd, I say.

[Gothmog]

This method receives message and show them, but without having the message number hard coded.
If you get message CPOC 325, a where-used case won't tell you where it's coming from.
Thanks to this 'useless' coding, now you will find that it's coming from there.
Clearer ?

[VLozano]

Clearer. But I don't think it will be a good practice, at least, if no one ads your explanation to the code via comments, for example.

Thanks for your help.