‎2006 Dec 19 7:41 AM
Hi Frendz,
Can any one give me any idea of using Standard Bapi's eg (BAPI_COMPANYCODE_GETDETAIL ). can u give one example program ?
Thanks in advance
Points for sure for good example.
Regards
Vijaya
‎2006 Dec 19 7:43 AM
Here is a example
http://www.erpgenie.com/abap/bapi/example.htm
Its has got both creating a BAPI function as well as calling it with screen shots.
regards,
Ravi
Note - Please mark all the helpful answers
‎2006 Dec 19 7:48 AM
Hi Ravi,
i want one example program using standard bapi's. normally we will use standard bapi's right ? so pls give one example program using standard bapi's ( for eg BAPI_COMPANYCODE_GETDETAIL )
Thanks
‎2006 Dec 19 7:49 AM
See the example here
http://www.sap-img.com/abap/bapi-goodsmvt-create-to-post-goods-movement.htm
In fact its not different from just calling a function module.
Regards,
Ravi
Note - Please mark all the helpful ansewrs
‎2006 Dec 19 7:54 AM
‎2006 Dec 19 7:46 AM
‎2006 Dec 19 7:48 AM
DATA org LIKE bapip0001b OCCURS 0 WITH HEADER LINE.
DATA comp_detail LIKE bapi0002_2 OCCURS 0 WITH HEADER LINE.
start-of-selection.
CALL FUNCTION 'BAPI_COMPANYCODE_GETDETAIL'
EXPORTING
companycodeid = org-comp_code < -
0102 ...
IMPORTING
companycode_detail = comp_detail.
READ TABLE comp_detail.
write 😕 comp_detail.
‎2006 Dec 19 7:54 AM
‎2006 Dec 19 7:56 AM
tables: klah.
DATA : WA_BAPICLASSKEY TYPE BAPI_CLASS_KEY,
WA_BAPI1003BASIC TYPE BAPI1003_BASIC,
WA_BAPI1003BASICNEW TYPE BAPI1003_BASIC_NEW,
WA_BAPICATCH TYPE BAPI1003_CATCH,
IT_BAPICATCH LIKE TABLE OF BAPI1003_CATCH,
WA_BAPICHARACT TYPE BAPI1003_CHARACT,
IT_BAPICHARACT LIKE TABLE OF BAPI1003_CHARACT,
WA_BAPICATCHNEW TYPE BAPI1003_CATCH_NEW,
IT_BAPICATCHNEW LIKE TABLE OF BAPI1003_CATCH_NEW,
WA_BAPICHARACTOVR TYPE BAPI1003_CHARACT_OVERWR,
IT_BAPICHARACTOVR LIKE TABLE OF BAPI1003_CHARACT_OVERWR,
WA_BAPICHARACTOVRVALUE TYPE BAPI1003_CHARACT_VALUE_OVR,
IT_BAPICHARACTOVRVALUE LIKE TABLE OF BAPI1003_CHARACT_VALUE_OVR,
WA_BAPICHARVALTEXT TYPE BAPI1003_CHARVALTEXT,
IT_BAPICHARVALTEXT LIKE TABLE OF BAPI1003_CHARVALTEXT.
WA_BAPICLASSKEY-CLASSNUM = 'C_BIKE7'.
WA_BAPICLASSKEY-CLASSTYPE = 300.
WA_BAPI1003BASIC-STATUS = '2'.
WA_BAPI1003BASIC-valid_to = '31.12.9999'.
WA_BAPI1003BASIC-valid_from = sy-datum.
WA_BAPI1003BASICNEW-STATUS = '2'.
WA_BAPI1003BASICNEW-valid_to = '31.12.9999'.
WA_BAPI1003BASICNEW-valid_from = sy-datum.
WA_BAPICATCH-langu = 'EN'.
WA_BAPICATCH-CATCHWORD = 'Bike Description'.
append WA_BAPICATCH to it_BAPICATCH.
WA_BAPICHARACt-NAME_CHAR = 'ZVC_MOTOR'.
APPEND WA_BAPICHARACT TO IT_BAPICHARACT.
WA_BAPICATCHNEW-langu = 'EN'.
WA_BAPICATCHNEW-CATCHWORD = 'Bike Description'.
append WA_BAPICATCHNEW to it_BAPICATCHNEW.
WA_BAPICHARACTOVR-NAME_CHAR = 'ZVC_MOTOR'.
APPEND WA_BAPICHARACTOVR TO IT_BAPICHARACTOVR.
WA_BAPICHARACTOVRVALUE-NAME_CHAR = 'ZVC_MOTOR'.
WA_BAPICHARACTOVRVALUE-CHAR_VALUE = 'STANDARD'.
APPEND WA_BAPICHARACTOVRVALUE TO IT_BAPICHARACTOVRVALUE.
WA_BAPICHARVALTEXT-CHARACT = 'ZVC_MOTOR'.
WA_BAPICHARVALTEXT-VALUE = 'STANDARD'.
WA_BAPICHARVALTEXT-VALDESCR = 'STANDARD BIKE'.
WA_BAPICHARVALTEXT-LANGU = 'EN'.
APPEND WA_BAPICHARVALTEXT TO IT_BAPICHARVALTEXT.
CALL FUNCTION 'BAPI_CLASS_CHANGE'
EXPORTING
CLASSNUM = WA_BAPICLASSKEY-CLASSNUM
CLASSTYPE = WA_BAPICLASSKEY-CLASSTYPE
CHANGENUMBER = CHANGENUMBER
KEYDATE = SY-DATUM
CLASSBASICDATA = WA_BAPI1003BASIC
CLASSBASICDATANEW = WA_BAPI1003BASICNEW
CLASSDOCUMENT = CLASSDOCUMENT
CLASSDOCUMENTNEW = CLASSDOCUMENTNEW
CLASSADDITIONAL = CLASSADDITIONAL
CLASSADDITIONALNEW = CLASSADDITIONALNEW
CLASSSTANDARD = CLASSSTANDARD
CLASSSTANDARDNEW = CLASSSTANDARDNEW
TABLES
RETURN = IT_BAPIRETURN
CLASSDESCRIPTIONS = it_BAPICATCH
CLASSLONGTEXTS = CLASSLONGTEXTS
CLASSCHARACTERISTICS = IT_BAPICHARACT
CHARACTERISTICOVERWRITE = IT_BAPICHARACTOVR
CHARACTVALUEOVERWRIT = IT_BAPICHARACTOVRVALUE
CHARACTERISTICVALUETEXTOVR = CHARACTERISTICVALUETEXTOVR
CLASSDESCRIPTIONSNEW = it_BAPICATCHNEW
CLASSLONGTEXTSNEW = CLASSLONGTEXTSNEW
CLASSCHARACTERISTICSNEW = CLASSCHARACTERISTICSNEW
CHARACTERISTICOVERWRITENEW = CHARACTERISTICOVERWRITENEW
CHARACTVALUEOVERWRITNEW = CHARACTVALUEOVERWRITNEW
CHARACTERISTICVALUETEXTOVRNEW = IT_BAPICHARVALTEXT.
CALL FUNCTION 'BAPI_CLASS_CREATE'
EXPORTING
CLASSNUMNEW = WA_BAPICLASSKEY-CLASSNUM
CLASSTYPENEW = WA_BAPICLASSKEY-CLASSTYPE
CHANGENUMBER = CHANGENUMBER
CLASSBASICDATA = WA_BAPI1003BASIC
CLASSDOCUMENT = CLASSDOCUMENT
CLASSADDITIONAL = CLASSADDITIONAL
CLASSSTANDARD = CLASSSTANDARD
TABLES
RETURN = IT_BAPIRETURN
CLASSDESCRIPTIONS = it_BAPICATCH
CLASSLONGTEXTS = CLASSLONGTEXTS
CLASSCHARACTERISTICS = IT_BAPICHARACT
CHARACTOVERWRITE = IT_BAPICHARACTOVR
CHARACTVALUEOVERWRITE = IT_BAPICHARACTOVRVALUE
CHARACTVALUETEXTOVR = IT_BAPICHARVALTEXT.
.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
I_STRUCTURE_NAME = 'BAPIRET2'
TABLES
T_OUTTAB = IT_BAPIRETURN.
CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'.
Now see the table klah ur class will be created.
Run this program