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

Development (ABAP Development WorkBench, ABAP/4 programming)

Moderators: Snowy, thx4allthefish, YuriT, Gothmog

sapmanie
Posts: 488
Joined: Fri Jan 23, 2004 10:39 am

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

Post by sapmanie » Wed Jan 25, 2012 12:03 pm

program RSPPFPROCESS
Take a deep breath...

Code: Select all

*   take a deep breath to avoid double processing       "note 1111286
    wait up to 1 seconds.

sapmanie
Posts: 488
Joined: Fri Jan 23, 2004 10:39 am

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

Post by sapmanie » Thu May 03, 2012 2:56 am

RM06BB10

Code: Select all

 
 IF 0 LT 1.                                                "4.0C
    CALL FUNCTION 'MM_GROUP_REQUISITIONS'                   "4.0C
This function module always gets called :-P

sapmanie
Posts: 488
Joined: Fri Jan 23, 2004 10:39 am

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

Post by sapmanie » Wed May 30, 2012 11:35 am

Function module RFC_GET_UNICODE_STRUCTURE

Code: Select all

  "check if hassle------------------------------------------------------
Check if ABAP is getting hassled.

sapmanie
Posts: 488
Joined: Fri Jan 23, 2004 10:39 am

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

Post by sapmanie » Mon Jun 25, 2012 8:24 am

A sorrowful programmer...

LKKCAU02

Code: Select all

* Sorrowly I have to read in the row again, because someone may have
* changed the state between reading it and getting the lock
    SELECT SINGLE * FROM CATDO WHERE COBJ_ID = COBJ_ID.
      ENDIF.
    ENDIF.
* Sorrowly someone could also have changed meanwhile the lock key
* by using CATT_OBJECT_UPDATE
    IF L_ABLNR <> CATDO-ABLNR OR L_CYCLE <> CATDO-CYCLE

Sharpshooter
Posts: 1172
Joined: Wed Mar 17, 2010 12:01 pm
Location: In the dark

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

Post by Sharpshooter » Mon Aug 06, 2012 11:33 am

FM warranty_check_equipment_list

Code: Select all

* as this function module has been identified as obsolete,
* the following short dump is intended.
* please have a look at note 552326 for details.
  COMPUTE SY-SUBRC = 1 / 0.
Good luck!

sapmanie
Posts: 488
Joined: Fri Jan 23, 2004 10:39 am

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

Post by sapmanie » Wed Aug 22, 2012 3:18 am

Vendor master table LFA1 has field SPERM :lol:

sapmanie
Posts: 488
Joined: Fri Jan 23, 2004 10:39 am

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

Post by sapmanie » Tue Sep 04, 2012 11:37 am

Evil hack...

CL_WDR_CLIENT_ABSTRACT_HTTP===CM01A

[code] cl_wdr_client_ssr=>todo_cleanup( 'Evil hack because of missing support in RR_APPLICATION' )."#EC NOTEXT

[/code]

egbert37
Posts: 76
Joined: Tue Mar 21, 2006 9:10 am

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

Post by egbert37 » Mon Oct 15, 2012 5:33 am

SAP must be painful:

Program FP50PE11:

Code: Select all

* This class does external performs in order to provide a clean
* interface to the outside world. We have no good way to avoid them.
* DON'T TRY THIS AT HOME KIDS. THIS WILL HURT!                     "XYV
*---------------------------------------------------------------------*
Have fun,
Egbert

sapmanie
Posts: 488
Joined: Fri Jan 23, 2004 10:39 am

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

Post by sapmanie » Mon Nov 19, 2012 9:16 am

Short text for function module FIELD_EXIT_BUPLA_0: sdfasdfdf
Short text for function module FIELD_EXIT_BUPLA_1: dfjdkfd

q4u
Posts: 441
Joined: Wed Mar 08, 2006 7:02 am

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

Post by q4u » Fri Mar 15, 2013 3:45 am

Title attribute of include RVCOMFZ1: x

q4u
Posts: 441
Joined: Wed Mar 08, 2006 7:02 am

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

Post by q4u » Sun Mar 24, 2013 1:59 pm

Don't panic!

MLHELP_AVR_PARA_MONITOR:
GET PARAMETER ID 'DONTPANIC' FIELD gd_dontpanic.

sapmanie
Posts: 488
Joined: Fri Jan 23, 2004 10:39 am

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

Post by sapmanie » Thu Apr 18, 2013 4:53 pm

Some things in the world of SAP are nice, some things are bad...

* if this field is set, the ALV grid control color-codes the column
* (nice) as a key field and fixed this column during horizontal
* scrolling (bad)

Class CL_BUBAS_APPL_LOG
Method GET_FIELDCATALOG

Sharpshooter
Posts: 1172
Joined: Wed Mar 17, 2010 12:01 pm
Location: In the dark

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

Post by Sharpshooter » Fri May 24, 2013 12:37 pm

Much more elegant and sophisticated than a simple "message type X" :

Code: Select all

FUNCTION IQS1_GENERATE_DUMP.
*"----------------------------------------------------------------------
*"*"Lokale Schnittstelle:
*"       EXCEPTIONS
*"              GENERATE_DUMP
*"----------------------------------------------------------------------
*--- creates a dump, in case the data in the segments are not missing

  RAISE GENERATE_DUMP.

ENDFUNCTION.
Good luck!

Gothmog
Posts: 1952
Joined: Wed Sep 12, 2007 4:46 am
Location: Probably not home

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

Post by Gothmog » Wed Jun 26, 2013 9:40 am

Looking at the LSMW standard upload program for work centers, I found what is the application log object name for it: CRAP.
But the best application log object name is for Real Estate Management: FIRE
Seems oddly appropriate - for a given value of 'management'. :mrgreen:
68 74 74 70 3a 2f 2f 74 69 6e 79 75 72 6c 2e 63 6f 6d 2f 62 64 6f 37 6d 77 67

Sharpshooter
Posts: 1172
Joined: Wed Mar 17, 2010 12:01 pm
Location: In the dark

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

Post by Sharpshooter » Mon Sep 30, 2013 7:05 am

Code: Select all

***INCLUDE MV45AF0S_SLL_DOCUMENT_TRANSFER .

*----------------------------------------------------------------------*
*   Form SLL_DOCUMENT_ACTIVATE                                         *
*----------------------------------------------------------------------*
*  Aktivierung Beleg in Legal & Logistics Services                     *
*----------------------------------------------------------------------*
FORM sll_document_activate.                                 "#EC CALLED

  CHECK 1 = 1.



ENDFORM.                    "SLL_DOCUMENT_ACTIVATE
Good luck!

Post Reply