this post was submitted on 09 Sep 2023
1018 points (97.1% liked)

Programmer Humor

32588 readers
1646 users here now

Post funny things about programming here! (Or just rant about your favourite programming language.)

Rules:

founded 5 years ago
MODERATORS
 
you are viewing a single comment's thread
view the rest of the comments
[–] [email protected] 12 points 1 year ago (1 children)

Are you not blind after staring at ABAP?

[–] [email protected] 9 points 1 year ago (2 children)

Can you bleach my eyes with some really bad ABAP code? I've never seen ABAP and I want to feel scared

[–] [email protected] 5 points 1 year ago (2 children)

Let me introduce you to Cobol ...

[–] ChickenLadyLovesLife 3 points 1 year ago

Classic ASP for the win ...

[–] [email protected] 2 points 1 year ago

No, pleeease grandpa, I don't wanna sweep the cobwebs off the server rack

[–] [email protected] 3 points 1 year ago (2 children)

I'm not gonna lie, I haven't seen ABAP in 10 years and was only briefly familiar with it. But I did what one does and asked GPT4 for some tax computation ABAP.

DATA: lv_income TYPE P DECIMALS 2 VALUE '50000',
      lv_tax_rate TYPE P DECIMALS 2,
      lv_tax_amount TYPE P DECIMALS 2.

* Select the appropriate tax rate from the tax table based on income
SELECT SINGLE TAX_RATE INTO lv_tax_rate 
FROM ZTAX_TABLE 
WHERE INCOME >= lv_income 
ORDER BY INCOME ASCENDING.

IF sy-subrc = 0.
  lv_tax_amount = lv_income * lv_tax_rate / 100.
  WRITE: / 'Income:', lv_income,
         / 'Tax Rate:', lv_tax_rate,
         / 'Tax Amount:', lv_tax_amount.
ELSE.
  WRITE: / 'No tax rate found for income', lv_income.
ENDIF.
[–] [email protected] 3 points 1 year ago

Oh that looks awful. Maybe it’s just because I don’t know how to read it, but the fact that it is similar to SQL (definitely pronounced sequel at this time) messed with my head

[–] [email protected] 2 points 1 year ago

Oh my, that's an abomination, I'm literally squinting my eyes to read it. That ENDIF tho, that's where I draw the line °~°