declaration of variables in abap by aRo

ABAP May 9th, 2008

 

declaration of variables: 

DATA:  time TYPE T.

A variable can be from the following data types:

 

Data Type

Initial

field length

Valid

field length

Initial value

Meaning

Numeric types

I

4

4

0

Integer (whole number)

F

8

8

0

Floating point number

P

8

1 - 16

0

Packed number

Character types

C

1

1 - 65535

'   …   '

Text field

(alphanumeric characters)

D

8

8

'00000000'

Date field

(Format: YYYYMMDD)

N

1

1 - 65535

'0 … 0'

Numeric text field

(numeric characters)

T

6

6

'000000'

Time field

(format: HHMMSS)

Hexadecimal type

X

1

1 - 65535

X'0 … 0'

Hexadecimal field

 

declaration of constants:

CONSTANTS: pi TYPE P DECIMALS 10 VALUE '3.1415926536'.

 

declaration of parameters: 

This is when you create a parameter field onscreen. The variable is checked for the right syntax.

It's also possible to refer to a field by using "tablename-field". If that field is a date then u can select the date using a standard SAP popup.

PARAMETERS: x as checkbox.

PARAMETERS DATUM LIKE SY-DATUM DEFAULT '19931224' .  

No Comments

writing a language specific long date by aRo

ABAP May 9th, 2008

How to generate a long date like “2 januari 2007″ from “20070102″.

  1. DATA my_date TYPE DATUM.
  2. my_date = '20070502'.
  3.  
  4. DATA wa_dates LIKE TABLE OF T247 WITH HEADER LINE.
  5. DATA wa_date LIKE TABLE OF T247 WITH HEADER LINE.
  6. DATA long_date TYPE STRING.
  7.  
  8. CALL FUNCTION 'MONTH_NAMES_GET'
  9.  EXPORTING
  10.    LANGUAGE                    = SY-LANGU
  11.   TABLES
  12.     month_names                 = wa_dates.
  13.  
  14.           .
  15. IF sy-subrc eq 0.
  16.   READ TABLE wa_dates INTO wa_date
  17.   WITH KEY MNR = my_date+4(2).
  18.   CONCATENATE: my_date+6(2) wa_date-ltx my_date+0(4)  INTO long_date SEPARATED BY SPACE.
  19. ENDIF.
  20.  
  21.    write: long_date.
No Comments

how to create a business partner( BP ) by aRo

ABAP May 9th, 2008

The following code can be used to create business partner.

  1. DATA:
  2. ls_centraldata TYPE bapibus1006_central,
  3. ls_centraldata_person TYPE bapibus1006_central_person,
  4. ls_addressdata TYPE bapibus1006_address,
  5. lv_businesspartner LIKE bapibus1006_head-bpartner,
  6. lt_return TYPE TABLE OF bapiret2 ,
  7. lv_return TYPE bapiret2,
  8. lv_insz TYPE zbu_00000000,
  9. lv_mutatie_error TYPE /genesys/mutatie_error.
  10.  
  11. CONSTANTS: gc_partnercategory LIKE bapibus1006_head-partn_cat VALUE '1',
  12. gc_partnertype_nanb TYPE bu_bpkind VALUE 'NANB',
  13. gc_dataorigintype_rr TYPE bu_source VALUE 'RR',
  14. gc_wait LIKE bapita-wait VALUE 'X'.
  15.  
  16. MOVE gc_partnertype_nanb TO ls_centraldata-partnertype.
  17. MOVE '' TO ls_centraldata-dataorigintype.
  18. MOVE '' TO ls_centraldata_person-firstname.
  19. MOVE '' TO ls_centraldata_person-lastname.
  20. MOVE '' TO ls_centraldata_person-birthdate.
  21. MOVE '' TO ls_centraldata_person-birthplace.
  22.  
  23. MOVE '' TO ls_centraldata_person-nationality.
  24. *MOVE 'X' TO ls_addressdata-standardaddress.
  25. *MOVE '' TO ls_addressdata-street.
  26. *MOVE '' TO ls_addressdata-house_no.
  27. *MOVE '' TO ls_addressdata-house_no2.
  28. *MOVE '' TO ls_addressdata-house_no3.
  29. *MOVE '' TO ls_addressdata-postl_cod1.
  30. *MOVE '' TO ls_addressdata-city.
  31. *MOVE '' TO ls_addressdata-country.
  32.  
  33. CALL FUNCTION 'BAPI_BUPA_CREATE_FROM_DATA'
  34. EXPORTING
  35. partnercategory = gc_partnercategory
  36. centraldata = ls_centraldata
  37. centraldataperson = ls_centraldata_person
  38. addressdata = ls_addressdata
  39. IMPORTING
  40. businesspartner = lv_businesspartner
  41. TABLES
  42. return = lt_return.
  43.  
  44. CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'.
No Comments
Next Entries »