How to use the J_1B_NF_VALUE_DETERMINATION fn.module

dear all,
can anybody help me out in using the function module.
J_1B_NF_VALUE_DETERMINATION : Read values from NF returned combined with J_1B_NF_DOCUMENT_READ using.
to determine the NFTOT value.
regs,
Raja

Refer this report - J_1BLB03
Regards,
Amit
Reward all helpful replies.

Similar Messages

I need this file "How to Use the Content Conversion Module in JMS Adapter"

Can someone send me this file:
"How to Use the Content Conversion Module in JMS Adapter"
I am not able to find it.
Thanks
Antonello

pls refer guide
https://www.sdn.sap.com/irj/servlet/prt/portal/prtroot/com.sap.km.cm.docs/library/xi/xi-adapters/how%20to%20use%20the%20content%20conversion%20module%20with%20xi%203.0%20j2ee%20jms%20adapter.pdf
Regards,
Swetha.

How to use the alv function module

hi all,
        can any one help me out how to use reuse_alv_block_list_append function module, what parameters shall i pass to it, so that i get top of page and end of page events and report data in two blocks, can any one tell how can i didvide the data into block, at a particular line

hi,
this is my simple alv blockedlist programme.go through it.it will definrtley help u.
REPORT z50870alv_blocked.
TYPE-POOLS : slis.
*&      structure declaration
TYPES : BEGIN OF st_ekko,
          ebeln TYPE ekko-ebeln,    "Purchasing Document Number
          bstyp TYPE ekko-bstyp,    "Purchasing Document Category
          bsart TYPE ekko-bsart,    "Purchasing Document Type
          aedat TYPE ekko-aedat,    "record created on
          ernam TYPE ekko-ernam,    "Person who Created the Object
        END OF st_ekko.
TYPES : BEGIN OF st_ekpo,
          ebeln TYPE ekko-ebeln,
          ebelp TYPE ekpo-ebelp,    "Item Number of Purchasing Document
          ematn TYPE ekpo-ematn,    "Material number
          matkl TYPE ekpo-matkl,    "Material group
          netpr TYPE ekpo-netpr,    "Net price in purchasing document
        END OF st_ekpo.
*&      internal table and work area declaration
DATA : it_ekpo       TYPE STANDARD TABLE OF st_ekpo,
       it_ekko       TYPE STANDARD TABLE OF st_ekko,
       it_fieldcat1 TYPE slis_t_fieldcat_alv,
       wa_fieldcat1 TYPE slis_fieldcat_alv,
       it_fieldcat2 TYPE slis_t_fieldcat_alv,
       wa_fieldcat2 TYPE slis_fieldcat_alv,
       it_events     Type slis_t_event,
       wa_layout     TYPE slis_layout_alv.
*&      data declaration
DATA : v_ebeln TYPE ekko-ebeln.
*&      selection-screen
SELECTION-SCREEN BEGIN OF BLOCK a WITH FRAME TITLE text-000.
SELECT-OPTIONS : so_ebeln FOR v_ebeln.
SELECTION-SCREEN END OF BLOCK a.
*&      At-selection-screen
at selection-screen on so_ebeln.
perform validate_ebeln.
*&      start-of-selection
START-OF-SELECTION.
PERFORM data_retrieval.
*&      end-of-selection
END-OF-SELECTION.
PERFORM initialize_alv_block.
PERFORM build_fieldcatalog1.
PERFORM build_fieldcatalog2.
PERFORM build_layout.
PERFORM get_events .
PERFORM append_ekkodata_to_alv_block.
PERFORM append_ekpodata_to_alv_block.
PERFORM display_blocked_alv.
*&     FORM initialize_alv_block
FORM initialize_alv_block.
CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_INIT'
EXPORTING
    i_callback_program             = sy-repid.
endform.
*&     FORM validate_ebeln
form validate_ebeln.
select ebeln
   from ekko
   into table it_ekko
   where ebeln in so_ebeln.
if sy-subrc ne 0.
    message text-003 type 'W'.
endif.
endform.
*&     FORM data_retrieval
FORM data_retrieval.
SELECT ebeln bstyp bsart aedat ernam
    FROM ekko
    INTO TABLE it_ekko
    WHERE ebeln IN so_ebeln.
if sy-subrc ne 0.
   message text-001 type 'I'.
endif.
SELECT ebeln ebelp ematn matkl netpr
    FROM ekpo
    INTO TABLE it_ekpo
    WHERE ebeln IN so_ebeln.
if sy-subrc ne 0.
   message text-002 type 'I'.
endif.
endform.
*&      Form build_fieldcatalog1
FORM build_fieldcatalog1.
wa_fieldcat1-fieldname   = 'EBELN'.
wa_fieldcat1-seltext_l   = 'PURCHASE ORDER'.
wa_fieldcat1-col_pos     = 0.
APPEND wa_fieldcat1 TO it_fieldcat1.
wa_fieldcat1-fieldname   = 'BSTYP'.
wa_fieldcat1-seltext_l   = 'DOCUMENT CATEGORY'.
wa_fieldcat1-col_pos     = 1.
APPEND wa_fieldcat1 TO it_fieldcat1.
wa_fieldcat1-fieldname   = 'BSART'.
wa_fieldcat1-seltext_l   = 'DOCUMENT TYPE'.
wa_fieldcat1-col_pos     = 2.
APPEND wa_fieldcat1 TO it_fieldcat1.
wa_fieldcat1-fieldname   = 'AEDAT'.
wa_fieldcat1-seltext_l   = 'DATE'.
wa_fieldcat1-col_pos     = 3.
APPEND wa_fieldcat1 TO it_fieldcat1.
wa_fieldcat1-fieldname   = 'ERNAM'.
wa_fieldcat1-seltext_l   = 'NAME'.
wa_fieldcat1-col_pos     = 4.
APPEND wa_fieldcat1 TO it_fieldcat1.
ENDFORM.                    "build_fieldcatalog
*&      Form build_fieldcatalog2
FORM build_fieldcatalog2.
wa_fieldcat2-fieldname   = 'EBELN'.
wa_fieldcat2-seltext_l   = 'PURCHASE ORDER'.
wa_fieldcat2-col_pos     = 0.
APPEND wa_fieldcat2 TO it_fieldcat2.
wa_fieldcat2-fieldname   = 'EBELP'.
wa_fieldcat2-seltext_l   = 'ITEM NUMBER'.
wa_fieldcat2-col_pos     = 1.
APPEND wa_fieldcat2 TO it_fieldcat2.
wa_fieldcat2-fieldname   = 'EMATN'.
wa_fieldcat2-seltext_l   = 'MATERIAL TYPE'.
wa_fieldcat2-col_pos     = 2.
APPEND wa_fieldcat2 TO it_fieldcat2.
wa_fieldcat2-fieldname   = 'MATKL'.
wa_fieldcat2-seltext_l   = 'MATERIAL GROUP'.
wa_fieldcat2-col_pos     = 3.
APPEND wa_fieldcat2 TO it_fieldcat2.
wa_fieldcat2-fieldname   = 'NETPR'.
wa_fieldcat2-seltext_l   = 'NET PRICE'.
wa_fieldcat2-col_pos     = 4.
wa_fieldcat2-do_sum      = 'X'.
APPEND wa_fieldcat2 TO it_fieldcat2.
ENDFORM.                    "build_fieldcatalog
*&      form build_layout.
FORM build_layout.
wa_layout-zebra ='X'.
wa_layout-no_vline = 'X'.
wa_layout-no_hline = 'X'.
wa_layout-colwidth_optimize = 'X'.
wa_layout-window_titlebar = 'PURCHASE ORDER HEADER AND ITEM DETAILS'.
ENDFORM.                    "build_layout
*&      form append_ekkodata_to_alv_block
FORM append_ekkodata_to_alv_block.
CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_APPEND'
EXPORTING
    is_layout                        = wa_layout
    it_fieldcat                      = it_fieldcat1
    i_tabname                        ='it_ekko'
    it_events                        = it_events[]
IT_SORT                          = IT_SORT
I_TEXT                           = ' '
TABLES
    t_outtab                         = it_ekko
EXCEPTIONS
   PROGRAM_ERROR                    = 1
   MAXIMUM_OF_APPENDS_REACHED       = 2
   OTHERS                           = 3.
IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
endform.
*&      form append_ekpodata_to_alv_block
FORM append_ekpodata_to_alv_block.
CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_APPEND'
EXPORTING
    is_layout                        = wa_layout
    it_fieldcat                      = it_fieldcat2
    i_tabname                        ='it_ekpo'
    it_events                        = it_events[]
IT_SORT                          = IT_SORT
I_TEXT                           = ' '
TABLES
    t_outtab                         = it_ekpo
EXCEPTIONS
   PROGRAM_ERROR                    = 1
   MAXIMUM_OF_APPENDS_REACHED       = 2
   OTHERS                           = 3.
IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
endform.
*&      FORM display_blocked_alv.
FORM display_blocked_alv.
CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_DISPLAY'.
endform.
*&      Form GET_EVENTS
FORM get_events .
CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
    EXPORTING
      i_list_type     = 2
    IMPORTING
      et_events       = it_events[]
    EXCEPTIONS
      list_type_wrong = 1
      OTHERS          = 2.
IF sy-subrc <> 0.
    MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
            WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
ENDFORM.                    " GET_EVENTS\
regards,
pavan t.

How to use the Function module 'BAPI_APPRAISAL_GETDETAIL'

hello friends,
I have to create the report which displays appraisee name, appraiser name,reviewer name and result.Using BAPI_APPRAISAL_GETDETAIL we can get the above all.But i don't know how to use the above function module.If anyone have used in their program could you please send me or anyone have idea how to do that Please help.It is very Urgent Help me.
Thanks in advance,
Regards,
Ashok.

Hi,
I do not hae the code but i can tell you how you use the FM and get the required data, please follow the below mentioned steps:
1) In this Bapi you need to pass the Plan verison and Object Id data in the BAPI Import parameters and while passing the these values need to decalra the data variables same (of use the same reference fields as they are in Bapi import fields)as they are Bapi importing data fields.
2) decalre the Internal Table structure as they are in the Export and Table parameters.
3) Assign the decalred Import and Tables structures to the BAPI FM.
4) once the Bapi is run with the Import parameters data the Apprisal data and Apprisee data will returened in the import and table structures and also return value wll be imported.
5) now using the Structures which are in Import and Table decalrations in the FM you can retrieve the data by reading them.
Do let me know if you need any more details in this regard.
Raghotham Reddy.
If you find this is the right solution then allocate reward point.

How to use the text module in script

hi,
i script how to use the text modules and how to write the code in layout of the script?

Hi,
You canr use text modules in script. You have to use standard texts .
Standard text are maintained in SO10 transaction.
you can create translation text for other languages also . So based on logon language it will print translation text.
go to SO10
give textname it say Ztextname id as ST and language as EN
say create, then you will get editor there maintain your text and save it . then come back . Now change language (say for german DE) say create and eneter translation text and save it.
so now you have created a text called ztextname which you can use in your script.
Inorder to insert the texts in your script do as below
go to any window editor and select path
Insert->texts->symbols->standard symbols
then you will get popup in which you have to mention all the parameters that you have created earlier.
after inserting just change language EN to sy-langu
Reward points if useful
About text elements Sravan already given some informatiomn
Regards,
Nageswar

How to print text rertrived by using the READ_TEXT fun module in smartform

Please tell me how to print the text which is rertrived by using the READ_TEXT function module in smartform.
I have coded all things in the program lines and in that i am retriveing the long texts.
I am getting the text lines in my internal table clearly, the thing is that I am not able to pass these lines to the text module.
its urgent. Points will be rewarded for any type of clue. whether it will work or not.

loop the table into which u have retrieved the text .
in the form interface of the smartform ... in importing parameter give the that table name .
and in smartform whereever u want to print there insert the data into work area and pass to fields for dispaly .
decalre ur work area in global defintions
thnaks .

How to use the structure in the EXIT_SAPMM06E_013 function module

Hello Experts,
Please guide me how to use the structure defined in function modules under table tab in the driver program for smart form to fetch the data. Please post some sample code if available.
Best Regards,
Sandesh.Sreyamsh

Can you please elaborate little bit more what is the actual requirement?

How to use the Bluetooth module natively in Parallels Desktop

link to the instructions on how to enable bluetooth natively in parallels:
http://www.mattiouz.com/blog/2007/04/13/how-to-use-the-built-in-mac-bluetooth-in -windows-under-parallels/
link to the .exe that installs the apple driver for the bluetooth module needed in parallels: http://www.mattiouz.com/download/AppleBluetoothInstaller.exe
now my bluetooth is accessible under parallels 3.0.5158. i scanned with a bluetooth netowrk scanner and i had no problems connecting to my treo 650.
i took my some time to find the info but @ last i found it;-)
Message was edited by: smokeonit

Hi,
You canr use text modules in script. You have to use standard texts .
Standard text are maintained in SO10 transaction.
you can create translation text for other languages also . So based on logon language it will print translation text.
go to SO10
give textname it say Ztextname id as ST and language as EN
say create, then you will get editor there maintain your text and save it . then come back . Now change language (say for german DE) say create and eneter translation text and save it.
so now you have created a text called ztextname which you can use in your script.
Inorder to insert the texts in your script do as below
go to any window editor and select path
Insert->texts->symbols->standard symbols
then you will get popup in which you have to mention all the parameters that you have created earlier.
after inserting just change language EN to sy-langu
Reward points if useful
About text elements Sravan already given some informatiomn
Regards,
Nageswar

How to use the function module 'HR_ES_FEATURE_BACKFIELD'

Hi,
How to use the function module 'HR_ES_FEATURE_BACKFIELD'?
I need the usage from both technical as well as functional point of view.
What is the use of this function module and technically how it is to be used to retrieve a feature for a particular employee.

hey iam from functional side can u be little bit clear of that feature
thanks
sikindar

How to use the function module CONVERSION_FACTOR_GET?

Hi Experts,
I have to use convert the value of a field from units 'HL' to 'HHL'. According to me, we can use the function module CONVERSION_FACTOR_GET. However, i am not able to know how to use it?
Can anyone explain how to use the FM, i mean what should be the importing and exporting parameter.... For recap, i need to convert HL to HHL, for example 3 HL to 0.03 HHL.
Please help.
Rewards for sure!
Thanks in advance.
Aksh

Hi
If it is Unit Conversion better use the following Fun modules
UNIT_CONVERSION_SIMPLE
MD_CONVERT_MATERIAL_UNIT
goto SE37 first and execute them by entering some value and then use it in the code after confirming it
Regards
Anji

How to use the function module ....

hi
how to use the function module ssf_function_module_name in smartforms

Hi..
If you are using this Function module, you can get the generated function module name of smartform dynamically. It is good progrmaming practice to get the fucntion module name dynamically because there might be some problems if you are hard coding in program.
This will return the name of the function module and then from the exporting parameters you can use the fucntion module name to pass parameters to Smartforms.
Check this link.I am expalining here how to use this function module.
https://wiki.sdn.sap.com/wiki/pages/pointstab/viewpageversion.action?pageId=36109&version=2
Calling SMARTFORMS from your ABAP program
REPORT ZSMARTFORM.
Calling SMARTFORMS from your ABAP program.
Collecting all the table data in your program, and pass once to SMARTFORMS
SMARTFORMS
Declare your table type in :-
Global Settings -> Form Interface
Global Definintions -> Global Data
Main Window -> Table -> DATA
Written by : SAP Hints and Tips on Configuration and ABAP/4 Programming
http://sapr3.tripod.com
TABLES: MKPF.
DATA: FM_NAME TYPE RS38L_FNAM.
DATA: BEGIN OF INT_MKPF OCCURS 0.
INCLUDE STRUCTURE MKPF.
DATA: END OF INT_MKPF.
SELECT-OPTIONS S_MBLNR FOR MKPF-MBLNR MEMORY ID 001.
SELECT * FROM MKPF WHERE MBLNR IN S_MBLNR.
MOVE-CORRESPONDING MKPF TO INT_MKPF.
APPEND INT_MKPF.
ENDSELECT.
At the end of your program.
Passing data to SMARTFORMS
call function 'SSF_FUNCTION_MODULE_NAME'
exporting
formname = 'ZSMARTFORM'
VARIANT = ' '
DIRECT_CALL = ' '
IMPORTING
FM_NAME = FM_NAME
EXCEPTIONS
NO_FORM = 1
NO_FUNCTION_MODULE = 2
OTHERS = 3.
if sy-subrc <> 0.
WRITE: / 'ERROR 1'.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
endif.
call function FM_NAME
EXPORTING
ARCHIVE_INDEX =
ARCHIVE_INDEX_TAB =
ARCHIVE_PARAMETERS =
CONTROL_PARAMETERS =
MAIL_APPL_OBJ =
MAIL_RECIPIENT =
MAIL_SENDER =
OUTPUT_OPTIONS =
USER_SETTINGS = 'X'
IMPORTING
DOCUMENT_OUTPUT_INFO =
JOB_OUTPUT_INFO =
JOB_OUTPUT_OPTIONS =
TABLES
GS_MKPF = INT_MKPF
EXCEPTIONS
FORMATTING_ERROR = 1
INTERNAL_ERROR = 2
SEND_ERROR = 3
USER_CANCELED = 4
OTHERS = 5.
if sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
endif.
<b>Reward points if useful</b>
Regards
Ashu

How to use the function module /IRM/IPBB_AGREEMENT_CREATE.

Hi all,
Please help me how to use the function module /IRM/IPBB_AGREEMENT_CREATE.
It is a Vistex fuction module which is used to create Sales contract in SAP-Vistex. If anyone has use the function module and do have the sample code please share it.
Thanks.

FORM create_agreement TABLES pt_agreement
                                       CHANGING po_agreement .
CONSTANTS: c_strt_knumh TYPE knumh VALUE '0000000000'.
DATA: lc_kona TYPE /irm/s_gkona,
        lc_cbasp TYPE /irm/s_ipcbasp,
      lt_cbapr TYPE /irm/t_ipcbapr,         "Partners
      lc_cbapr TYPE /irm/s_ipcbapr,
      lt_cbadt TYPE /irm/t_ipcbadt,        "Dates
      lc_cbadt TYPE /irm/s_ipcbadt,
      lt_cbafs TYPE /irm/t_ipcbafs,
      lc_cbafs TYPE /irm/s_ipcbafs,
      lt_cbacn TYPE /irm/t_ipcbacn,
      lc_cbacn TYPE /irm/s_ipcbacn,
      lt_cbacl TYPE /irm/t_ipcbacl,
      lc_cbacl TYPE /irm/s_ipcbacl,
      lt_cbtpv TYPE /irm/t_ipagtpv,
      lc_cbtpv TYPE /irm/s_ipagtpv,
      lt_texts TYPE text_lh,
      lc_texts TYPE itclh,
      lt_cbasd TYPE /irm/t_ipcbasd,
      lc_cbasd TYPE /irm/s_ipcbasd,
      lc_agreement    TYPE /irm/s_ipcbasp_doc,
      lc_e_log_number TYPE balognr,
      lt_messages     TYPE /irm/t_gprolog.
DATA: lt_vake      TYPE cond_vakevb_t,
        lc_vake      TYPE LINE OF cond_vakevb_t,
        lt_konh      TYPE /irm/t_gkonh,
        lc_konh      TYPE LINE OF /irm/t_gkonh,
        lt_konp      TYPE /irm/t_gkonp,
        lc_konp      TYPE LINE OF /irm/t_gkonp,
        lt_konw      TYPE /irm/t_gkonwu,
        lc_konw      TYPE LINE OF /irm/t_gkonwu,
        lt_konm      TYPE /irm/t_gkonmu,
        lc_konm      TYPE LINE OF /irm/t_gkonmu,
        lt_komg      TYPE /irm/t_gkomg_index,
        lc_komg      TYPE LINE OF /irm/t_gkomg_index,
        lt_user_data TYPE /irm/t_gpraxfu_index,
        lc_user_data TYPE LINE OF /irm/t_gpraxfu_index.
DATA: lc_updt(1) TYPE c.
DATA: lc_knumh TYPE knumh.
DATA: BEGIN OF lc_str_knumh,
         hd(2) TYPE c VALUE '$$',
         inc_num(8) TYPE c,
        END OF lc_str_knumh.
DATA: blank_agree_key TYPE knuma VALUE '~~~~~~~~~~'.
FIELD-SYMBOLS <konh_line> LIKE LINE OF lt_konh.
FIELD-SYMBOLS <konp_line> LIKE LINE OF lt_konp.
DATA: lc_rule TYPE type_key_rule.
READ TABLE pt_agreement INTO lc_rule INDEX 1.
SELECT SINGLE * FROM kona
        WHERE vkorg   = lc_rule-vkorg
        AND    vtweg   = '10'
        AND    spart   = '10'
        AND    boart   = 'ZPS1'
        AND    botext = lc_rule-sap_agkey.
IF sy-subrc = 0.
   lc_updt = 'U'.
ELSE.
lc_updt = 'I'.
ENDIF.
LOOP AT pt_agreement INTO lc_rule.
    MOVE sy-tabix TO lc_str_knumh-inc_num.
    CONDENSE lc_str_knumh-inc_num NO-GAPS.
    WHILE lc_str_knumh-inc_num+7(1) = ' '.
      CONCATENATE '0' lc_str_knumh-inc_num INTO lc_str_knumh-inc_num.
      CONDENSE lc_str_knumh-inc_num NO-GAPS.
    ENDWHILE.
    CONCATENATE '$$' lc_knumh INTO lc_knumh.
    MOVE lc_str_knumh TO lc_knumh.
   MOVE c_strt_knumh TO lc_knumh.
    CLEAR: lc_konh, lc_konp, lc_komg.
    MOVE: lc_rule-vkorg    TO lc_komg-komg-vkorg,
          '10'             TO lc_komg-komg-vtweg,
          '10'             TO lc_komg-komg-spart,
          p_waers          TO lc_komg-komg-waerk,
          '1300'           TO lc_komg-komg-bukrs,
          lc_rule-lifnr    TO lc_komg-komg-lifnr,
          lc_knumh         TO lc_komg-knumh,
          lc_knumh         TO lc_konh-knumh,
          lc_knumh         TO lc_konp-knumh,
          lc_rule-datab    TO lc_konh-datab,
          lc_rule-datbi    TO lc_konh-datbi.
    CASE lc_rule-tablnam.
      WHEN 'A701'.                   "Every Agreement will have a A701 rule -
        "Therefore we acn setup the header using A701
        MOVE: 'New       ' TO lc_kona-knuma,
              lc_rule-vkorg TO lc_kona-vkorg,
              '10'          TO lc_kona-vtweg,
              '10'          TO lc_kona-spart,
              'ZPS1'        TO lc_kona-boart,
              'C'           TO lc_kona-abtyp,
              'V'           TO lc_kona-kappl,
              p_waers       TO lc_kona-waers,
              lc_rule-knuma_ag TO lc_kona-abrex,
              'ZPS2'        TO lc_kona-kobog,
              lc_rule-datab TO lc_kona-datab,
              lc_rule-datbi TO lc_kona-datbi,
              lc_rule-sap_agkey TO lc_kona-botext,
              '1300'        TO lc_kona-bukrs,
              'I'           TO lc_kona-updkz.
        MOVE: 'New       ' TO lc_cbasp-knuma_ag,
              'ZPS1'        TO lc_cbasp-boart_ag,
              p_waers       TO lc_cbasp-waers,
              'A'           TO lc_cbasp-setl_mth,
              'B'           TO lc_cbasp-setl_typ,
              'A2'          TO lc_cbasp-ident,
              'E'           TO lc_cbasp-setlm,
              'ZPDA'        TO lc_cbasp-pargr,
              'X'           TO lc_cbasp-npric,
              'LF'          TO lc_cbasp-stprl,
              lc_rule-lifnr TO lc_cbasp-stpar,
              lc_rule-contract_rev TO lc_cbasp-rvnum,
              'I'           TO lc_cbasp-updkz.
        CONCATENATE: blank_agree_key
               lc_rule-lifnr        INTO lc_konh-vakey.
        MOVE: lc_rule-lifnr TO lc_konp-lifnr.
      WHEN 'A703'.
        CONCATENATE: blank_agree_key
                     lc_rule-kunnr      INTO lc_konh-vakey.
        MOVE lc_rule-kunnr TO lc_komg-komg-kunnr.
      WHEN 'A709'.
        CONCATENATE: blank_agree_key
        lc_rule-zzprodh1 lc_rule-zzprodh2 lc_rule-zzprodh3
               lc_rule-zzprodh4 lc_rule-zzprodh5 INTO lc_konh-vakey.
        CONCATENATE: lc_rule-zzprodh1 lc_rule-zzprodh2 lc_rule-zzprodh3
               lc_rule-zzprodh4 lc_rule-zzprodh5 INTO lc_komg-komg-prodh.
      WHEN 'A710'.
        CONCATENATE: blank_agree_key
            lc_rule-matkl   INTO lc_konh-vakey.
        MOVE lc_rule-matkl TO lc_komg-komg-matkl.
      WHEN 'A711'.
        CONCATENATE: blank_agree_key
             lc_rule-matnr   INTO lc_konh-vakey.
        MOVE lc_rule-matnr TO lc_komg-komg-matnr.
        IF lc_rule-kschl = 'ZPPL'.
          MOVE: 'C'              TO lc_konp-krech,
                'CAD'              TO lc_konp-konwa.
          lc_konp-kbetr = lc_rule-net_po_price * 1.
        ENDIF.
      WHEN 'A717'.
      WHEN 'A718'.
        CONCATENATE: blank_agree_key
             lc_rule-zzextwg INTO lc_konh-vakey.
        MOVE lc_rule-zzextwg TO lc_komg-komg-zzextwg.
     WHEN 'A719'.
       CONCATENATE: blank_agree_key
            lc_rule-werks INTO lc_konh-vakey.
       MOVE lc_rule-werks TO lc_komg-komg-werks.
     WHEN 'A721'.
       CONCATENATE: blank_agree_key
             lc_rule-kunnr lc_rule-werks INTO lc_konh-vakey.
       MOVE: lc_rule-kunnr TO lc_konp-kunnr,
             lc_rule-kunnr TO lc_komg-komg-kunnr.
      WHEN 'A722'.
        CONCATENATE: blank_agree_key
                     lc_rule-vkbur INTO lc_konh-vakey.
        MOVE lc_rule-vkbur TO lc_komg-komg-vkbur.
      WHEN 'A724'.
        CONCATENATE: blank_agree_key
                      lc_rule-kunnr lc_rule-vkbur INTO lc_konh-vakey.
        MOVE: lc_rule-kunnr TO lc_konp-kunnr,
              lc_rule-kunnr TO lc_komg-komg-kunnr,
              lc_rule-vkbur TO lc_komg-komg-vkbur.
    ENDCASE.
    MOVE: 'A'                  TO lc_konh-kvewe,
          lc_rule-tablnam+1(3) TO lc_konh-kotabnr,
          lc_rule-kappl        TO lc_konh-kappl,
          lc_rule-kschl        TO lc_konh-kschl.
    REPLACE ALL OCCURRENCES OF '~' IN lc_konh-vakey WITH ' '.
    APPEND lc_konh TO lt_konh.
    CLEAR lc_konh.
*--- Add in the KONP.Do we need to add
    MOVE: lc_rule-kappl        TO lc_konp-kappl,
          lc_rule-kschl        TO lc_konp-kschl,
          'G'                  TO lc_konp-krech.
    IF lc_rule-kschl+3(1) = '%'.
      MOVE: 'A'              TO lc_konp-krech,
            '%'              TO lc_konp-konwa.
      lc_konp-kbetr = lc_rule-rebate_perc * 1.
    ENDIF.
    APPEND lc_konp TO lt_konp. CLEAR lc_konp.
    APPEND lc_komg TO lt_komg. CLEAR lc_komg.
ENDLOOP.
IF lc_updt = 'I'.
    CALL FUNCTION '/IRM/IPCB_AGREEMENT_CREATE'
      EXPORTING
      I_MESSAGES_DISPLAY        = ' '
      I_SAVE_MESSAGES           = ' '
      I_COMMIT_WORK             = 'X'
      I_CALL_FROM_WS            = ' '
        is_kona                   = lc_kona
        is_cbasp                  = lc_cbasp
        it_cbapr                  = lt_cbapr
        it_cbadt                  = lt_cbadt
        it_cbafs                  = lt_cbafs
        it_cbacn                  = lt_cbacn
        it_cbacl                  = lt_cbacl
        it_cbtpv                  = lt_cbtpv
        it_texts                  = lt_texts
        it_cbasd                  = lt_cbasd
      IMPORTING
        es_agreement              = lc_agreement
        e_log_number              = lc_e_log_number
      TABLES
        t_messages                = lt_messages
     CHANGING
      CT_VAKE                   = lt_vake
      ct_konh                   = lt_konh
      ct_konp                   = lt_konp
      CT_KONW                   = lt_konw
      CT_KONM                   = lt_konm
       ct_komg                   = lt_komg
      CT_USER_DATA              = lt_usr_data
      EXCEPTIONS
        no_documents_to_process   = 1
        no_authorization          = 2
        creation_failed           = 3
        new_pricing_not_maitained = 4
        OTHERS                    = 5.
    IF sy-subrc <> 0.
Implement suitable error handling here
    ELSE.
      MOVE: lc_agreement-knuma_ag TO po_agreement,
            lc_agreement-knuma_ag TO lc_kona-knuma.
    ENDIF.
    APPEND LINES OF lt_messages TO gt_messages.
ELSE.
    MOVE-CORRESPONDING kona TO lc_kona.
ENDIF.
LOOP AT lt_konh ASSIGNING <konh_line>.
    MOVE lc_kona-knuma TO <konh_line>-vakey+0(10).
   move '&'           to <konh_line>-knumh+0(1).
ENDLOOP.
LOOP AT lt_konp ASSIGNING <konp_line>.
   MOVE lc_kona-knuma TO <konp_line>-vakey+0(10).
    move '&'           to <konh_line>-knumh+0(1).
ENDLOOP.
lc_kona-updkz = 'U'.
lc_cbasp-updkz = 'U'.
CLEAR lt_messages.
CALL FUNCTION '/IRM/IPCB_AGREEMENT_CHANGE'
    EXPORTING
    I_MESSAGES_DISPLAY      = ' '
    I_SAVE_MESSAGES         = ' '
    I_COMMIT_WORK           = 'X'
    I_INIT_DATA             = 'X'
      is_kona                 = lc_kona
      is_cbasp                = lc_cbasp
     it_cbapr                = lt_cbapr
     it_cbadt                = lt_cbadt
     it_cbafs                = lt_cbafs
     it_cbacl                = lt_cbacl
     it_cbacn                = lt_cbacn
    IT_FIELDS               =
     it_texts                = lt_texts
   IMPORTING
     e_log_number            = lc_e_log_number
     TABLES
       t_messages              = lt_messages
    CHANGING
      cs_agreement            = lc_agreement
    CT_VAKE                 = lt_vake
      ct_konh                 = lt_konh
      ct_konp                 = lt_konp
    CT_KONW                 = lt_konw
    CT_KONM                 = lt_konm
      ct_komg                 = lt_komg
    CT_USER_DATA            = lt_usr_data
    EXCEPTIONS
      no_documents_to_process = 1
      no_authorization        = 2
      change_failed           = 3
      agreement_locked        = 4
      OTHERS                  = 5.
IF sy-subrc <> 0.
Implement suitable error handling here
ENDIF.
APPEND LINES OF lt_messages TO gt_messages.
ENDFORM.                    " CREATE_AGREEMENT

How to Use the Function Module 'BAPI_BUSPROCESSND_CHANGEMULTI'

Dear Experts,
         Can anyone Explain me how to Use the Function Module 'BAPI_BUSPROCESSND_CHANGEMULTI'.My Requirement is i want to change the Partners of the Service Order.It is Very Urgent Requirement Please Help me.
Thanks & Regards,
Ashok.

Hi,
For service order you can use FM 'BAPI_ACTIVITYCRM_CHANGEMULTI' as it is much easier to use.
Sample code is below. You can use that:
"fill the details of partner which is
          "to be added as main partner or in place of Interaction Agent
          wa_partner_new-ref_guid = w_guid_ref.
          wa_partner_new-ref_handle = '0000000000'.
          wa_partner_new-ref_kind = 'A'.
          wa_partner_new-kind_of_entry = wa_partner-kind_of_entry.
          wa_partner_new-ref_partner_handle = '0000'.
          wa_partner_new-ref_partner_fct = 'Z_IA'.
"wa_partner-partner_no : New partner no.
          wa_partner_new-ref_partner_no = wa_partner-partner_no.
          wa_partner_new-ref_no_type = wa_partner-ref_no_type.
          wa_partner_new-ref_display_type = wa_partner-ref_display_type.
          wa_partner_new-display_type = 'BP'.
          wa_partner_new-no_type = 'BP'.
          wa_partner_new-partner_fct = 'Z_IA'.
"w_partner_no : Old partner no. which is to be changed
          wa_partner_new-partner_no = w_partner_no.
          wa_partner_new-mainpartner = 'X'.
          INSERT wa_partner_new INTO TABLE it_partner_new.
          wa_partner_newx-display_type = 'X'.
          wa_partner_newx-no_type = 'X'.
          wa_partner_newx-partner_fct = 'X'.
          wa_partner_newx-partner_no = 'X'.
          wa_partner_newx-mainpartner = 'X'.
          INSERT wa_partner_newx INTO TABLE it_partner_newx.
IF it_partner_new[] IS NOT INITIAL AND it_partner_newx[] IS NOT INITIAL.
    "maintain all changes to be done
    CALL FUNCTION 'BAPI_ACTIVITYCRM_CHANGEMULTI'
      TABLES
        partner = it_partner_new
        partnerx = it_partner_newx.
    CLEAR : wa_guid1.
    REFRESH : it_guid1.
    wa_guid1-guid = w_guid_ref.
    APPEND wa_guid1 TO it_guid1.
    "save the changes
    CALL FUNCTION 'BAPI_ACTIVITYCRM_SAVE'
      TABLES
        objects_to_save = it_guid1.
    "commit the transaction
    CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'.
ENDIF.
Reply fro any further help.
Please reward points if helpful.
Regards,
Ashlesha

How to use the Calculated attibute in view object

Hi,
I have a view object query with the calculated attribute name as 'TRANCODE' in the below sql.This query works for the initial page loading.
After the page gets loaded, there is a search section in the same page at the top.
Here i will have to build the whereclause to the same query and retrieve the values.
i am using jDeveloper 10.1.3.1, with adf and jHeadstart.
Can some one tell as how to use the calculated attribute TRANCODE in whereclause?
SELECT /*+ first_rows(10) */
BatchCntl.FILE_CNTL_ID,
CASE WHEN chk_bit(Entry.ENTRY_FLAGS, 2)='Y' OR Entry.ENTRY_SUBSTATUS = 'D' OR Entry.ENTRY_SUBSTATUS = 'J'
THEN
CASE eeh.TRAN_CODE
WHEN '21' THEN 'C'
WHEN '22' THEN 'C'
WHEN '31' THEN 'C'
WHEN '32' THEN 'C'
WHEN '26' THEN 'D'
WHEN '27' THEN 'D'
WHEN '36' THEN 'D'
WHEN '37' THEN 'D'
ELSE eeh.TRAN_CODE
END
ELSE
CASE Entry.TRAN_CODE
WHEN '21' THEN 'C'
WHEN '22' THEN 'C'
WHEN '31' THEN 'C'
WHEN '32' THEN 'C'
WHEN '26' THEN 'D'
WHEN '27' THEN 'D'
WHEN '36' THEN 'D'
WHEN '37' THEN 'D'
ELSE Entry.TRAN_CODE
END
END AS TRANCODE,
FROM Batch_Cntl BatchCntl, Entry, ENTRY_EDIT_HIST eeh
WHERE (BatchCntl.BATCH_TYPE = 'E')
AND (BatchCntl.BATCH_STATUS in ('A','D','R','P'))
AND entry.in_batch_cntl_id = BatchCntl.BATCH_CNTL_ID
and Entry.fi_rt = eeh.fi_rt (+)
and Entry.entry_id = eeh.entry_id (+)
AND (Entry.ENTRY_STATUS in ('A','D','R','P'))
ORDER BY BatchCntl.BATCH_CNTL_ID, Entry.entry_id
regards
Raj.

Let's say your application module is com.yourcompany.someapp.services.MyService, and let's say you authored a method like the following in the MyServiceImpl.java file:
public void doSomething(int i, String s) {
}and you exposed this AM custom method using the AM editor.
BC4J design time will automatically create you the com.yourcompany.someapp.services.common.MyService interface that will look like this if you go look at the source code:
package com.yourcompany.someapp.services.common;
import oracle.jbo.ApplicationModule;
public interface MyService extends ApplicationModule {
public void doSomething(int i, String s);
}To use your custom method from a client, just cast your ApplicationModule to your custom interface like this:
import com.yourcompany.someapp.services.common.MyService;
MyService mySvc = (MyService)yourAM;
mySvc.doSomething(1,"foo");

How to use the "out" parameter in idl

hello.idl:
module HelloApp
interface Hello
string sayHello();
void getPass(in string name,out string pass);
HelloServer:
public class HelloServer
class HelloServant extends _HelloImplBase
public void getPass(String name,org.omg.CORBA.StringHolder pass)
System.out.println("Server pass = " + pass);
if (name.equals("lxh"))
pass = new org.omg.CORBA.StringHolder("1234");
if (name.equals("cbj"))
pass = new org.omg.CORBA.StringHolder("5678");
HelloClient:
public class HelloClient
public static void main(String args[])
try{
org.omg.CORBA.StringHolder Pass = null;
if (args.length == 1)
System.out.println("Client pass = " + args[0]);
helloRef.getPass(args[0],Pass);
System.out.println(Pass);
} catch(Exception e) {
When I run client main method with parameter "lxh",I will get a error says the getPass() parameter which has given is wrong.
How to use the out parameter in client?

Does this error only occurs if you pass "lxh" or always?
Did you try passing a StringHolder Object rather than a NULL Object?
Perhaps you can post the error message!?

How to use the J_1B_NF_VALUE_DETERMINATION fn.module

Similar Messages

Maybe you are looking for