ABAP Code Bundle


Sl No
1
Topic
Call BADI 
Info
NA
Where
NA
Code
DATA:lr_badi      TYPE REF TO <BADI_name>,
     lv_filter    
TYPE <filter_type>.

      
GET BADI lr_badi
        FILTERS
          rcomp 
lv_filter.

      
IF lr_badi IS BOUND.
        
CALL BADI lr_badi-><BADI_method>
          
<PARAMETERS>
      
ENDIF.

 

Sl No
2
Topic
Update BP ( BUT000 data)
Info
NA
Where
NA
Code
* Get details in buffer
    
CALL FUNCTION 'BAPI_BUPA_CENTRAL_CHANGE'
      
EXPORTING
        businesspartner 
ls_partner.

    
IF sy-subrc 0.
* Retrieve BUT000 entry from memory
      
CALL FUNCTION 'BUP_MEMORY_BUT000_GET'
        
EXPORTING
          iv_partner      
ls_partner
        
IMPORTING
          es_but000       
ls_but000
        
EXCEPTIONS
          not_found       
1
          parameter_error 
2
          
OTHERS          3.
* Change the ownership type value
      ls_but000
-<field> <value>.

*Save to memory
      
CALL FUNCTION 'BUP_MEMORY_BUT000_FILL'
        
EXPORTING
          is_but000       
ls_but000
        
EXCEPTIONS
          parameter_error 
1
          
OTHERS          2.


 
Sl No
3
Topic
Create Verbage Text
Info
Declare variable gv_verbage_text in IMPL class as string variable. Populate the value of gv_verbage_text in DO_PREPARE_OUTPUT
Where
HTML page
Code
<%
DATA lv_verbage_text type string.
lv_verbage_text controller->gv_verbage_text.
<%
<thtmlb:label id        "text"
              labelType = 
"TITLE"
              wrapping  = 
"TRUE"
              
text      "<%= lv_verbage_text %>" />
</thtmlb>

No comments:

Post a Comment