Pricing condition is blocked when editing another

Hello experts,
I'm experiencing an issue and would like your feedback.
I created 2 pricing conditions for the same Condition type (PR00) and same combination key (see below)
MANDT
KAPPL
KSCHL
VKORG
VTWEG
KUNNR
MATNR
KFRST
DATBI
DATAB
KBSTAT
KNUMH
100
V
PR00
NL45
1
15943
SI_REN
31.12.9999
24.07.2014
1752042
100
V
PR00
NL45
1
15943
SI_TRC_TON
31.12.9999
24.07.2014
1752043
If the first record is being edited via VK12 and we try to edit the second one by another session or even by another user, the system gives the message VK083 'Conditions for the selection entered are blocked".
Even with same combination, the material code selected is different. Should'nt the system allow to edit the second record? is this the standard SAP behaviour?
looking forward to receive your comments
Fatima

is this the standard SAP behaviour?
Yes it is a standard behaviour as system would lock the entry for the header of the selection screen. Ideally, if at all you want to change any existing condition record, the same to be done ONLY via VK11 and not via VK12.
G. Lakshmipathi

Similar Messages

Reset a pricing condition type value when generating billing document

Hi experts,
I have a delivery-related billing type. In sales order, there is a pricing condition type Z001, with value = 100, I would like to reset it to zero when generating billing document. Is there any configuration or user exits can do this? Thanks.

Hello,
You can do this in BILLING provided , if the Condition type is Manual condition type
To achieve this you have to do some configuration in the condition types as,
Goto transaction code V/06 and select your condition type and maintain the MNAUAL ENTRIES as C which means you can process it manually and in the V/08 chose your pricing procedure and against your condition type check the Manal entry .
Now you can change the value of the condittion type to 0 in the Billing document.
Hope this is clear,
regards,
santosh

WLS is blocked when contacting another http server

Hi,
I have developed a servlet in WLS. It must communicates with another
over an HTTP request. For that I have used :
- URLConnection,
- URL,
- DataOutputStream
Everything works well but when the targeted server is not available, WLS
is completely blocked by a single user. When the targeted server is
available again, WLS begin reworks well.
I don't see where I can put a timeout when using URL... objects ?
Has anyone an idea ?
Thanks for your help,
Manuel.

It is cerainly possible (but killing the thread is not a very good idea - if it
fails to make HTTP connection it's better to let it wait until default timeout
expires and return from it's run() method).
Probably better solution (for now) will be to implement your own HTTP handler
which allows you to specify connect and wait-for-response timeouts.
Daniel Hoppe <[email protected]> wrote:
Hi,
I'm waiting for this flag as well ;-). If this was not a server-side
problem I'd try the following:
Start a thread which tries to build establish the connection / read from
the URL. When the thread has successfully finished, set a flag. The
method starting the thread can loop / wait until a time-out value has
been reached and check the flag on each loop. If the thread has not set
the flag after your timeout value, you can kill the thread and either
retry or throw an exception. If the flag has been set, your input has
been read and you can continue.
I'm using this approach on the clientside quite successfully, but people
alway warn of starting threads within weblogic. Maybe something like
your 'long-running-task-in-weblogic' pattern could be used to achieve
something similar on the serverside.
Cheers,
Daniel--
Dimitri

Change Pricing Condition for an item with CRM_ORDER_MAINTAIN

Hi community,
I try to change an existing condition with the function module crm_order_maintain.
Everything looks fine, no error no dump, but no success
The condition stays the same!
Can anybody find a solution for this?
Heres my report so far:
*& Report ZTEST_PRICING2
REPORT ztest_pricing2.
DATA: lt_guid      TYPE crmt_object_guid_tab,
      lt_item      TYPE crmt_object_guid_tab,
      lt_saved     TYPE crmt_return_objects,
      lt_pridoc    TYPE crmt_pric_cond_t,
      ls_pridoc    TYPE crmt_pric_cond,
      lt_pricom    TYPE crmt_pridoc_comt,
      ls_pricom    TYPE crmt_pridoc_com,
      lt_header    TYPE crmt_orderadm_h_comt,
      lt_input     TYPE crmt_input_field_tab,
      ls_input     TYPE crmt_input_field,
      ls_input_fn TYPE CRMT_INPUT_FIELD_NAMES,
      ls_cond_chg TYPE prct_cond_external_change,
      ls_cond      TYPE PRCT_COND_DU,
      lt_pricing_i TYPE CRMT_PRICING_I_WRKT.
PARAMETERS: lv_head TYPE crmt_object_guid DEFAULT 'C4C61C4E35DDF306E10000000A024089'.
PARAMETERS: lv_item TYPE crmt_object_guid DEFAULT '09C71C4E35DDF306E10000000A024089'.
PARAMETERS: lv_kbetr TYPE prct_cond_rate DEFAULT '100'.
INSERT lv_head INTO TABLE lt_guid.
INSERT lv_item INTO TABLE lt_item.
CALL FUNCTION 'CRM_ORDER_READ'
EXPORTING
    it_header_guid                    = lt_guid
    it_item_guid                      = lt_item
*   IV_MODE                           =
*   IV_ONLY_SPEC_ITEMS                =
*   IT_REQUESTED_OBJECTS              =
*   IV_NO_AUTH_CHECK                  =
*   IT_ITEM_USAGE_RANGE               =
*   IV_SUBITEM_DEPTH                  = -1
*   IT_OBJECT_FILTER                  =
*   IV_ONLY_CHANGED_OBJ               = FALSE
*   IV_STATUS_H_CHECK_RELEVANCE       = FALSE
IMPORTING
    et_pridoc                         = lt_pridoc
    et_pricing_i                      = lt_pricing_i
* CHANGING
*   CV_LOG_HANDLE                     =
EXCEPTIONS
   document_not_found                = 1
   error_occurred                    = 2
   document_locked                   = 3
   no_change_authority               = 4
   no_display_authority              = 5
   no_change_allowed                 = 6
   OTHERS                            = 7.
IF sy-subrc <> 0 AND lt_pridoc IS NOT INITIAL.
WRITE: / 'ERROR'.
EXIT.
ENDIF.
READ TABLE lt_pridoc INDEX 1 INTO ls_pridoc.
IF sy-subrc <> 0.
WRITE: / 'ERROR'.
EXIT.
ENDIF.
READ TABLE ls_pridoc-pric_cond INTO ls_cond WITH KEY kschl = 'PB00'.
IF sy-subrc <> 0.
WRITE: / 'ERROR'.
EXIT.
ENDIF.
ls_input-ref_guid   = lv_head.
ls_input-ref_kind   = 'A'.
ls_input-objectname = 'PRIDOC'.
ls_input_fn-fieldname = 'WAERS'.
INSERT ls_input_fn INTO TABLE ls_input-field_names.
ls_input_fn-fieldname = 'KBETR'.
INSERT ls_input_fn INTO TABLE ls_input-field_names.
INSERT ls_input INTO TABLE lt_input.
ls_pricom-ref_guid   = lv_head.
ls_pricom-ref_kind   = 'A'.
*ls_pricom-PRICING_TYPE = 'B'.
*ls_pricom-pricing_procedure = 'ZZMTA'.
ls_pricom-pric_cond[] = ls_pridoc-pric_cond[].
MOVE-CORRESPONDING ls_cond TO ls_cond_chg.
ls_cond_chg-waers = 'EUR'.
ls_cond_chg-kbetr = lv_kbetr.
INSERT ls_cond_chg INTO TABLE ls_pricom-cond_change.
APPEND ls_pricom TO lt_pricom.
CALL FUNCTION 'CRM_ORDER_MAINTAIN'
EXPORTING
    it_pridoc         = lt_pricom
CHANGING
*    ct_orderadm_h     = lt_header
    ct_input_fields   = lt_input
EXCEPTIONS
    error_occurred    = 1
    document_locked   = 2
    no_change_allowed = 3
    no_authority      = 4
    OTHERS            = 5.
IF sy-subrc <> 0.
EXIT.
ENDIF.
CALL FUNCTION 'CRM_ORDER_SAVE'
EXPORTING
    it_objects_to_save         = lt_guid
IMPORTING
    et_saved_objects           = lt_saved
*   ET_EXCEPTION               =
*   ET_OBJECTS_NOT_SAVED       =
EXCEPTIONS
   document_not_saved         = 1
   OTHERS                     = 2.
IF sy-subrc EQ 0.
COMMIT WORK AND WAIT.
ELSE.
ROLLBACK WORK.
ENDIF.
regards
Markus

Hello Jordi,
The example below is whereby i was trying to copy all the pricing condition on one document to another and deleting what's not present on the source document.
You can used this piece of code to adapt your requirement.
CALL FUNCTION 'ZCRC_FM_COPY_PRICE_COND_ALL'
          EXPORTING
id_object_guid_src    = <fs_el_con_guid>
id_object_guid_dest = <fs_el_so_guid>
id_commit                  = abap_false
          EXCEPTIONS
not_allowed         = 1
error_occured     = 2
OTHERS                 = 3.
PERFORM f_recup_donnees USING     id_object_guid_src
                                                          id_object_guid_dest.
PERFORM f_modif_condition_prix USING id_object_guid_src
                                                                                  id_object_guid_dest.
PERFORM f_header_copy_pricing using id_object_guid_src
                                                                        id_object_guid_dest.
FORM f_recup_donnees   USING      pd_object_guid_src TYPE crmt_object_guid
                                                                       pd_object_guid_dest TYPE crmt_object_guid.
DATA:
     lt_header_guid        TYPE crmt_object_guid_tab.
INSERT pd_object_guid_src INTO TABLE lt_header_guid.
INSERT pd_object_guid_dest INTO TABLE lt_header_guid.
CLEAR: gt_orderadm_i, gt_doc_flow.
CALL FUNCTION 'CRM_ORDER_READ'
    EXPORTING
      it_header_guid       = lt_header_guid
    IMPORTING
      et_doc_flow          = gt_doc_flow
      et_orderadm_i        = gt_orderadm_i
    EXCEPTIONS
      document_not_found   = 1
      error_occurred       = 2
      document_locked      = 3
      no_change_authority = 4
      no_display_authority = 5
      no_change_allowed    = 6
      OTHERS               = 7.
IF sy-subrc NE 0.
    RAISE error_occured.
ENDIF.
" F_RECUP_DONNEES
FORM f_modif_condition_prix USING pd_guid_src TYPE crmt_object_guid
                                  pd_guid_dest TYPE crmt_object_guid.
DATA : ld_pd_handle_src     TYPE prct_handle,
          ld_pd_handle_dest    TYPE prct_handle,
          lt_komv_print_src    TYPE prct_cond_print_t,
lt_komv_print_dest   TYPE prct_cond_print_t,
          ls_komv_print_dest   LIKE LINE OF lt_komv_print_dest,
          ls_komv_print_src    LIKE LINE OF lt_komv_print_src,
          lt_cond_chg          TYPE prct_cond_print_t,
          lt_cond_chg_insert   TYPE prct_cond_print_t,
          ls_cond_chg          TYPE prct_cond_print,
          ls_cond_chg_tmp      TYPE prct_cond_print,
          ls_input_fields      TYPE crmt_input_field,
          lt_input_fields      TYPE crmt_input_field_tab.
DATA : bal_log         TYPE balloghndl,
         lt_item_ret     TYPE prct_item_ret_t,
         lt_cond_ret     TYPE prct_cond_print_t,
         ld_data_changed TYPE xfeld,
         gv_decimal      TYPE usdefaults-dcpfm,
         ld_lines        TYPE i,
         ld_ajout_cond   TYPE abap_bool.
FIELD-SYMBOLS : <fs_orderadm_i_dest> TYPE crmt_orderadm_i_wrk,
<fs_orderadm_i_src>   TYPE crmt_orderadm_i_wrk,
                  <fs_cond_chg>         TYPE prct_cond_print,
<fs_cond_chg_insert> TYPE prct_cond_print.
* Début Ajout CD1K904313-001.
DATA: ld_guid_src TYPE crmt_object_guid.
FIELD-SYMBOLS: <fs_doc_flow> TYPE crmt_doc_flow_wrk.
* Début Ajout CD1K904313-001.
* Verrouillage des documents source et destinataire
PERFORM f_lock_document USING pd_guid_src.
PERFORM f_lock_document USING pd_guid_dest.
*Récupérer le pricing handle des documents
* Document source
CALL FUNCTION 'CRM_PRIDOC_GET_HANDLE_OW'
    EXPORTING
iv_header_guid             = pd_guid_src
    IMPORTING
ev_pd_handle               = ld_pd_handle_src
    EXCEPTIONS
error_occurred             = 1
handle_determination_error = 2
      orgdata_error              = 3
      OTHERS                     = 4.
IF sy-subrc <> 0.
    RETURN.
ENDIF.
* Document destinataire
CALL FUNCTION 'CRM_PRIDOC_GET_HANDLE_OW'
    EXPORTING
      iv_header_guid             = pd_guid_dest
    IMPORTING
      ev_pd_handle               = ld_pd_handle_dest
    EXCEPTIONS
      error_occurred             = 1
      handle_determination_error = 2
      orgdata_error              = 3
      OTHERS                     = 4.
IF sy-subrc <> 0.
    RETURN.
ENDIF.
* A ne pas traiter les postes de type ZPDF
DELETE gt_orderadm_i WHERE itm_type = 'ZPDF'.
LOOP AT gt_orderadm_i ASSIGNING <fs_orderadm_i_dest> WHERE header = pd_guid_dest.
    REFRESH : lt_komv_print_src,
              lt_komv_print_dest,
lt_cond_chg,
lt_cond_chg_insert.
* Début Modif CD1K904313-001.
* Récupérer le guid de l'item liée au item destinataire.
    READ TABLE gt_doc_flow ASSIGNING <fs_doc_flow> WITH KEY objkey_b = <fs_orderadm_i_dest>-guid.
    CHECK sy-subrc EQ 0.
    ld_guid_src = <fs_doc_flow>-objkey_a.
*    READ TABLE gt_orderadm_i ASSIGNING <fs_orderadm_i_src> WITH KEY header = pd_guid_src
* number_int = <fs_orderadm_i_dest>-number_int.
* Fin Modif CD1K904313-001.
* Récupérer les pricing document
    IF sy-subrc EQ 0.
*     Document source
      CALL FUNCTION 'PRC_PD_ITEM_SHOW'
        EXPORTING
          iv_pd_handle        = ld_pd_handle_src
*         iv_item_no          = <fs_orderadm_i_src>-guid    "Supression CD1K904313-001
          iv_item_no          = ld_guid_src                 "Addition CD1K904313-001
        IMPORTING
          et_komv_print       = lt_komv_print_src
        EXCEPTIONS
          non_existing_handle = 1
          non_existing_item   = 2
          ipc_error           = 3
          OTHERS              = 4.
    ENDIF.
*   Document destinataire
    CALL FUNCTION 'PRC_PD_ITEM_SHOW'
      EXPORTING
        iv_pd_handle        = ld_pd_handle_dest
        iv_item_no          = <fs_orderadm_i_dest>-guid
      IMPORTING
et_komv_print       = lt_komv_print_dest
      EXCEPTIONS
        non_existing_handle = 1
        non_existing_item   = 2
        ipc_error           = 3
        OTHERS              = 4.
* Modification et Suppression des conditions de prix
    LOOP AT lt_komv_print_dest INTO ls_komv_print_dest .
      CLEAR: ls_cond_chg,
             ls_komv_print_src.
      MOVE-CORRESPONDING ls_komv_print_dest TO ls_cond_chg.
* Rechercher la condition sur le document source
      READ TABLE lt_komv_print_src INTO ls_komv_print_src WITH KEY kschl = ls_komv_print_dest-kschl
zaehk = ls_komv_print_dest-zaehk. "CD1K904313
      IF sy-subrc EQ 0.
        ls_cond_chg-kbetr_prt = ls_komv_print_src-kbetr_prt.
        ls_cond_chg-kwert     = ls_komv_print_src-kwert.
        ls_cond_chg-kinak     = ls_komv_print_src-kinak.
      ELSEIF ls_cond_chg-kschl IS NOT INITIAL.
        CLEAR ls_cond_chg.
        CONTINUE.
      ENDIF.
*     Format décimal
      CASE gv_decimal.
        WHEN space.       "format N.NNN,NN
          REPLACE ALL OCCURRENCES OF '.' IN ls_cond_chg-kbetr_prt WITH ','.
        WHEN 'Y'.         "format N NNN NNN,NN
          REPLACE ALL OCCURRENCES OF '.' IN ls_cond_chg-kbetr_prt WITH ','.
      ENDCASE.
      INSERT ls_cond_chg INTO TABLE lt_cond_chg.
      CLEAR ls_cond_chg.
    ENDLOOP.
* Ajout des conditions de prix
    LOOP AT lt_komv_print_src INTO ls_komv_print_src WHERE kschl IS NOT INITIAL.
      CLEAR: ls_cond_chg, ld_lines, ls_komv_print_dest, ls_cond_chg_tmp, ld_ajout_cond.
* Vérifier la présence de la condition sur le document destinataire
      READ TABLE lt_komv_print_dest INTO ls_komv_print_dest WITH KEY kschl = ls_komv_print_src-kschl
zaehk = ls_komv_print_src-zaehk. "CD1K904313.
      IF sy-subrc EQ 0.
        CLEAR: ls_cond_chg, ls_komv_print_dest.
        CONTINUE.
      ELSE.
        DESCRIBE TABLE lt_cond_chg LINES ld_lines.
        READ TABLE lt_cond_chg INTO ls_cond_chg_tmp INDEX ld_lines.
        IF sy-subrc EQ 0.
          ld_ajout_cond = abap_true.
          MOVE-CORRESPONDING ls_komv_print_src TO ls_cond_chg.
          ls_cond_chg-knumv     = ls_cond_chg_tmp-knumv.
          ls_cond_chg-kposn     = ls_cond_chg_tmp-kposn.
          ls_cond_chg-stunr     = ls_cond_chg_tmp-stunr + 10.
        ELSE.
          CLEAR: ls_cond_chg, ld_lines, ls_komv_print_dest, ls_cond_chg_tmp.
          CONTINUE.
        ENDIF.
      ENDIF.
*     Format décimal
      CASE gv_decimal.
        WHEN space.             "format N.NNN,NN
          REPLACE ALL OCCURRENCES OF '.' IN ls_cond_chg-kbetr_prt WITH ','.
        WHEN 'Y'.               "format N NNN NNN,NN
          REPLACE ALL OCCURRENCES OF '.' IN ls_cond_chg-kbetr_prt WITH ','.
      ENDCASE.
* Récupérer les nouvelles conditions qui seront ajouté au document destinataire
      IF ld_ajout_cond EQ abap_true.
        INSERT ls_cond_chg INTO TABLE lt_cond_chg_insert.
      ENDIF.
      INSERT ls_cond_chg INTO TABLE lt_cond_chg.
      CLEAR ls_cond_chg.
    ENDLOOP.
    CALL FUNCTION 'PRC_INT_ITEM_INPUT'
      EXPORTING
        iv_pd_handle        = ld_pd_handle_dest
        iv_item_no          = <fs_orderadm_i_dest>-guid
        it_cond_prt         = lt_cond_chg
        iv_bal_log          = bal_log
        iv_req_ret          = abap_true
        iv_req_cond_prt     = abap_true
      IMPORTING
        et_item_ret         = lt_item_ret
        et_cond_prt         = lt_cond_ret
        ev_data_changed     = ld_data_changed
      EXCEPTIONS
        non_existing_handle = 1
        non_existing_item   = 2
        ipc_error           = 3.
    IF sy-subrc = 0.
*     En cas d'ajout de nouvelles conditions de prix, appeler le MF PRC_INT_ITEM_INPUT
*     avec les montants
      IF lt_cond_chg_insert IS NOT INITIAL.
        REFRESH lt_cond_chg[].
        lt_cond_chg[] = lt_cond_ret[].
        LOOP AT lt_cond_chg_insert ASSIGNING <fs_cond_chg_insert>.
          READ TABLE lt_cond_chg ASSIGNING <fs_cond_chg> WITH KEY kschl = <fs_cond_chg_insert>-kschl.
          IF sy-subrc EQ 0.
            <fs_cond_chg>-kwert     = <fs_cond_chg_insert>-kwert.
            <fs_cond_chg>-kbetr_prt = <fs_cond_chg_insert>-kbetr_prt.
          ENDIF.
        ENDLOOP.
        REFRESH lt_cond_ret[].
        CALL FUNCTION 'PRC_INT_ITEM_INPUT'
          EXPORTING
            iv_pd_handle        = ld_pd_handle_dest
            iv_item_no          = <fs_orderadm_i_dest>-guid
            it_cond_prt         = lt_cond_chg
            iv_bal_log          = bal_log
            iv_req_ret          = abap_true
            iv_req_cond_prt     = abap_true
          IMPORTING
            et_item_ret         = lt_item_ret
            et_cond_prt         = lt_cond_ret
            ev_data_changed     = ld_data_changed
          EXCEPTIONS
            non_existing_handle = 1
            non_existing_item   = 2
            ipc_error           = 3.
      ENDIF.
*   Publish event afin de sauvegarder les conditions de prix
      CALL FUNCTION 'CRM_EVENT_PUBLISH_OW'
        EXPORTING
          iv_obj_name = 'PRIDOC'
          iv_guid_hi = pd_guid_dest
          iv_kind_hi = 'A'
          iv_event    = 'SAVE'
        EXCEPTIONS
          OTHERS      = 1.
*   As no order_maintain will follow implicitly and therefore no
*   exec times for the events will be set, call CRM_ORDER_MAINTAIN
*   without any parameters
*   Then the exec time 'end of document' will be set and with the
*   group logic also all exec times before
*   But at least one object is needed in input_fields
*   --> use PRIDOC
      ls_input_fields-ref_guid   = <fs_orderadm_i_dest>-guid.
      ls_input_fields-ref_kind   = 'B'.
      ls_input_fields-objectname = 'PRIDOC'.
      INSERT ls_input_fields INTO TABLE lt_input_fields.
      CLEAR ls_input_fields.
      CALL FUNCTION 'CRM_ORDER_MAINTAIN'
        CHANGING
          ct_input_fields   = lt_input_fields
        EXCEPTIONS
          error_occurred    = 1
          document_locked   = 2
          no_change_allowed = 3
          no_authority      = 4
          OTHERS            = 5.
    ENDIF.
ENDLOOP.
" F_MODIF_CONDITION_PRIX
*& Form F_LOCK_DOCUMENT
* Verrouillage d'un document
FORM f_lock_document USING pd_guid TYPE crmt_object_guid.
CONSTANTS : lc_orderadm_h TYPE crmt_object_name VALUE 'ORDERADM_H',
              lc_orderadm_i TYPE crmt_object_name VALUE 'ORDERADM_I'.
DATA: lv_process_mode      TYPE crmt_mode,
        lv_order_initialized TYPE crmt_boolean,
        lv_process_type      TYPE crmt_process_type,
        lv_already_locked    TYPE abap_bool.
DATA: ls_admin_ui_status TYPE crmt_admin_ui_status,
        ls_item_usage_range TYPE crmt_item_usage_range.
DATA: lt_objects_to_read   TYPE crmt_object_guid_tab,
        lt_requested_objects TYPE crmt_object_name_tab,
        lt_item_usage_range TYPE crmt_item_usage_range_tab,
        lt_locked_contract   TYPE crmt_object_guid_tab.
INSERT pd_guid INTO TABLE lt_objects_to_read.
INSERT lc_orderadm_h INTO TABLE lt_requested_objects.
INSERT lc_orderadm_i INTO TABLE lt_requested_objects.
ls_item_usage_range-sign = 'E'.
ls_item_usage_range-value = '02'.
INSERT ls_item_usage_range INTO TABLE lt_item_usage_range.
* LAM: Financing Options should be viewed in a separate screen:
ls_item_usage_range-sign = 'E'.
ls_item_usage_range-value = '05'.   "Financing options
INSERT ls_item_usage_range INTO TABLE lt_item_usage_range.
*-> read document in change mode
CALL FUNCTION 'CRM_ORDER_READ'
    EXPORTING
      it_header_guid       = lt_objects_to_read
      iv_mode              = 'B'
      it_requested_objects = lt_requested_objects
      it_item_usage_range = lt_item_usage_range
    EXCEPTIONS
      document_not_found   = 1
      error_occurred       = 2
      document_locked      = 3
      no_change_authority = 4
      no_display_authority = 5
      OTHERS               = 6.
PERFORM enqueue_order IN PROGRAM saplcrm_order_ow IF FOUND
    USING pd_guid
          abap_false
          abap_false
          abap_false
CHANGING sy-subrc
          lv_already_locked
          lt_locked_contract.
" F_LOCK_DOCUMENT
* Fin Ajout CD1K904074-001
FORM f_header_copy_pricing USING   pd_guid_src
pd_guid_dest.
DATA : ld_pd_handle_src     TYPE prct_handle,
          ld_pd_handle_dest    TYPE prct_handle,
          lt_komv_print_src    TYPE prct_cond_print_t,
lt_komv_print_dest   TYPE prct_cond_print_t,
          ls_komv_print_dest   LIKE LINE OF lt_komv_print_dest,
          ls_komv_print_src    LIKE LINE OF lt_komv_print_src,
          lt_cond_chg          TYPE prct_cond_print_t,
          ls_cond_chg          TYPE prct_cond_print,
          ls_input_fields      TYPE crmt_input_field,
          lt_input_fields      TYPE crmt_input_field_tab.
DATA : bal_log         TYPE balloghndl,
         lt_cond_ret     TYPE prct_cond_print_t,
         ld_data_changed TYPE xfeld,
         gv_decimal      TYPE usdefaults-dcpfm.
* Verrouillage des documents source et destinataire
PERFORM f_lock_document USING pd_guid_src.
PERFORM f_lock_document USING pd_guid_dest.
* Récupérer le pricing handle des documents
* Document source
CALL FUNCTION 'CRM_PRIDOC_GET_HANDLE_OW'
    EXPORTING
      iv_header_guid             = pd_guid_src
    IMPORTING
      ev_pd_handle               = ld_pd_handle_src
    EXCEPTIONS
      error_occurred             = 1
      handle_determination_error = 2
      orgdata_error              = 3
      OTHERS                     = 4.
IF sy-subrc <> 0.
    RETURN.
ENDIF.
* Document destinataire
CALL FUNCTION 'CRM_PRIDOC_GET_HANDLE_OW'
    EXPORTING
      iv_header_guid             = pd_guid_dest
    IMPORTING
      ev_pd_handle               = ld_pd_handle_dest
    EXCEPTIONS
      error_occurred             = 1
      handle_determination_error = 2
      orgdata_error              = 3
      OTHERS                     = 4.
IF sy-subrc <> 0.
    RETURN.
ENDIF.
* * Récupérer les pricing document
* Document Source
CALL FUNCTION 'PRC_PD_HEAD_SHOW'
    EXPORTING
      iv_pd_handle        = ld_pd_handle_src
    IMPORTING
      et_komv_print       = lt_komv_print_src
    EXCEPTIONS
      non_existing_handle = 1
      ipc_error           = 2
      OTHERS              = 3.
CHECK sy-subrc EQ 0.
* Document Destinataire
CALL FUNCTION 'PRC_PD_HEAD_SHOW'
    EXPORTING
      iv_pd_handle        = ld_pd_handle_dest
    IMPORTING
et_komv_print       = lt_komv_print_dest
    EXCEPTIONS
      non_existing_handle = 1
      ipc_error           = 2
      OTHERS              = 3.
CHECK sy-subrc EQ 0.
* * Modification et Suppression des conditions de prix
LOOP AT lt_komv_print_src INTO ls_komv_print_src .
    CLEAR: ls_cond_chg,
           ls_komv_print_dest.
    MOVE-CORRESPONDING ls_komv_print_src TO ls_cond_chg.
* Rechercher la condition sur le document source
    READ TABLE lt_komv_print_dest INTO ls_komv_print_dest WITH KEY kschl = ls_komv_print_src-kschl
zaehk = ls_komv_print_src-zaehk.
    IF sy-subrc EQ 0.
      IF ls_komv_print_src-kbetr NE ls_komv_print_dest-kbetr.
        ls_cond_chg-kbetr_prt = ls_komv_print_src-kbetr_prt.
        ls_cond_chg-kwert     = ls_komv_print_src-kwert.
        ls_cond_chg-kinak     = ls_komv_print_src-kinak.
        CASE gv_decimal.
          WHEN space.       "format N.NNN,NN
            REPLACE ALL OCCURRENCES OF '.' IN ls_cond_chg-kbetr_prt WITH ','.
          WHEN 'Y'.         "format N NNN NNN,NN
            REPLACE ALL OCCURRENCES OF '.' IN ls_cond_chg-kbetr_prt WITH ','.
        ENDCASE.
      ENDIF.
    ENDIF.
    CLEAR ls_cond_chg-krech.
    INSERT ls_cond_chg INTO TABLE lt_cond_chg.
    CLEAR ls_cond_chg.
ENDLOOP.
CALL FUNCTION 'PRC_INT_HEAD_INPUT'
    EXPORTING
      iv_pd_handle        = ld_pd_handle_dest
      iv_bal_log          = bal_log
      it_cond_prt         = lt_cond_chg
      iv_req_ret          = abap_true
      iv_req_cond_prt     = abap_true
    IMPORTING
      et_cond_prt         = lt_cond_ret
      ev_data_changed     = ld_data_changed
    EXCEPTIONS
      non_existing_handle = 1
      ipc_error           = 2
      not_allowed         = 3
      OTHERS              = 4.
CHECK sy-subrc EQ 0.
*    *   Publish event afin de sauvegarder les conditions de prix
CALL FUNCTION 'CRM_EVENT_PUBLISH_OW'
    EXPORTING
      iv_obj_name = 'PRIDOC'
      iv_guid_hi = pd_guid_dest
      iv_kind_hi = 'A'
      iv_event    = 'SAVE'
    EXCEPTIONS
      OTHERS      = 1.
*   As no order_maintain will follow implicitly and therefore no
*   exec times for the events will be set, call CRM_ORDER_MAINTAIN
*   without any parameters
*   Then the exec time 'end of document' will be set and with the
*   group logic also all exec times before
*   But at least one object is needed in input_fields
*   --> use PRIDOC
ls_input_fields-ref_guid   = pd_guid_dest.
ls_input_fields-ref_kind   = 'A'.
ls_input_fields-objectname = 'PRIDOC'.
INSERT ls_input_fields INTO TABLE lt_input_fields.
CLEAR ls_input_fields.
CALL FUNCTION 'CRM_ORDER_MAINTAIN'
    CHANGING
      ct_input_fields   = lt_input_fields
    EXCEPTIONS
      error_occurred    = 1
      document_locked   = 2
      no_change_allowed = 3
      no_authority      = 4
      OTHERS            = 5.
ENDFORM.
FORM f_header_copy_pricing USING   pd_guid_src
pd_guid_dest.
DATA : ld_pd_handle_src     TYPE prct_handle,
          ld_pd_handle_dest    TYPE prct_handle,
          lt_komv_print_src    TYPE prct_cond_print_t,
lt_komv_print_dest   TYPE prct_cond_print_t,
          ls_komv_print_dest   LIKE LINE OF lt_komv_print_dest,
          ls_komv_print_src    LIKE LINE OF lt_komv_print_src,
          lt_cond_chg          TYPE prct_cond_print_t,
          ls_cond_chg          TYPE prct_cond_print,
          ls_input_fields      TYPE crmt_input_field,
          lt_input_fields      TYPE crmt_input_field_tab.
DATA : bal_log         TYPE balloghndl,
         lt_cond_ret     TYPE prct_cond_print_t,
         ld_data_changed TYPE xfeld,
         gv_decimal      TYPE usdefaults-dcpfm.
PERFORM f_lock_document USING pd_guid_src.
PERFORM f_lock_document USING pd_guid_dest.
* Récupérer le pricing handle des documents
* Document source
CALL FUNCTION 'CRM_PRIDOC_GET_HANDLE_OW'
    EXPORTING
      iv_header_guid             = pd_guid_src
    IMPORTING
      ev_pd_handle               = ld_pd_handle_src
    EXCEPTIONS
      error_occurred             = 1
      handle_determination_error = 2
      orgdata_error              = 3
      OTHERS                     = 4.
IF sy-subrc <> 0.
    RETURN.
ENDIF.
* Document destinataire
CALL FUNCTION 'CRM_PRIDOC_GET_HANDLE_OW'
    EXPORTING
      iv_header_guid             = pd_guid_dest
    IMPORTING
      ev_pd_handle               = ld_pd_handle_dest
    EXCEPTIONS
      error_occurred             = 1
      handle_determination_error = 2
      orgdata_error              = 3
      OTHERS                     = 4.
IF sy-subrc <> 0.
    RETURN.
ENDIF.
* * Récupérer les pricing document
* Document Source
CALL FUNCTION 'PRC_PD_HEAD_SHOW'
    EXPORTING
      iv_pd_handle        = ld_pd_handle_src
    IMPORTING
      et_komv_print       = lt_komv_print_src
    EXCEPTIONS
      non_existing_handle = 1
      ipc_error           = 2
      OTHERS              = 3.
CHECK sy-subrc EQ 0.
* Document Destinataire
CALL FUNCTION 'PRC_PD_HEAD_SHOW'
    EXPORTING
      iv_pd_handle        = ld_pd_handle_dest
    IMPORTING
et_komv_print       = lt_komv_print_dest
    EXCEPTIONS
      non_existing_handle = 1
      ipc_error           = 2
      OTHERS              = 3.
CHECK sy-subrc EQ 0.
* * Modification et Suppression des conditions de prix
LOOP AT lt_komv_print_src INTO ls_komv_print_src .
    CLEAR: ls_cond_chg,
           ls_komv_print_dest.
    MOVE-CORRESPONDING ls_komv_print_src TO ls_cond_chg.
* Rechercher la condition sur le document source
    READ TABLE lt_komv_print_dest INTO ls_komv_print_dest WITH KEY kschl = ls_komv_print_src-kschl
zaehk = ls_komv_print_src-zaehk.
    IF sy-subrc EQ 0.
      IF ls_komv_print_src-kbetr NE ls_komv_print_dest-kbetr.
        ls_cond_chg-kbetr_prt = ls_komv_print_src-kbetr_prt.
        ls_cond_chg-kwert     = ls_komv_print_src-kwert.
        ls_cond_chg-kinak     = ls_komv_print_src-kinak.
        CASE gv_decimal.
          WHEN space.       "format N.NNN,NN
            REPLACE ALL OCCURRENCES OF '.' IN ls_cond_chg-kbetr_prt WITH ','.
          WHEN 'Y'.         "format N NNN NNN,NN
            REPLACE ALL OCCURRENCES OF '.' IN ls_cond_chg-kbetr_prt WITH ','.
        ENDCASE.
      ENDIF.
    ENDIF.
    CLEAR ls_cond_chg-krech.
    INSERT ls_cond_chg INTO TABLE lt_cond_chg.
    CLEAR ls_cond_chg.
ENDLOOP.
CALL FUNCTION 'PRC_INT_HEAD_INPUT'
    EXPORTING
      iv_pd_handle        = ld_pd_handle_dest
      iv_bal_log          = bal_log
      it_cond_prt         = lt_cond_chg
      iv_req_ret          = abap_true
      iv_req_cond_prt     = abap_true
    IMPORTING
      et_cond_prt         = lt_cond_ret
      ev_data_changed     = ld_data_changed
    EXCEPTIONS
      non_existing_handle = 1
      ipc_error           = 2
      not_allowed         = 3
      OTHERS              = 4.
CHECK sy-subrc EQ 0.
CALL FUNCTION 'CRM_EVENT_PUBLISH_OW'
    EXPORTING
      iv_obj_name = 'PRIDOC'
      iv_guid_hi = pd_guid_dest
      iv_kind_hi = 'A'
      iv_event    = 'SAVE'
    EXCEPTIONS
      OTHERS      = 1.
ls_input_fields-ref_guid   = pd_guid_dest.
ls_input_fields-ref_kind   = 'A'.
ls_input_fields-objectname = 'PRIDOC'.
INSERT ls_input_fields INTO TABLE lt_input_fields.
CLEAR ls_input_fields.
CALL FUNCTION 'CRM_ORDER_MAINTAIN'
    CHANGING
      ct_input_fields   = lt_input_fields
    EXCEPTIONS
      error_occurred    = 1
      document_locked   = 2
      no_change_allowed = 3
      no_authority      = 4
      OTHERS            = 5.

END CONDITIONS IN BLOCK STEP

In approval process how many agents are determined at run time in multiline container, i used block for this if any one rejects i should come out of block i created one container element in local container of the block , in rejected branch i assigned some value using container operation, the same thing i given as a end condition in block, when i checked if any one rejected it is not coming out of the block can any one sugge

why end condition is not working in block step i have given like this
In rejected branch   container operation -
flag = x (local container of block)
      end condition is flag = x.
I tried like this also flag = x,
   I Binded to workflow container flag -
> flag1(workflow container).
   i have given end condition is flag1 = x.
both are not working, I have seen in the workflow log it is executing till the container operation when i click on reject.

Wrong pricing condition values when using GN_INVOICE_CREATE

Hi all,
I am currently handling a program where I have to display all the materials in a given sales area and some corresponding values that depend on pricing conditions. I am using FM GN_INVOICE_CREATE to extract table komv. However, I am experiencing a problem because the values I am getting are different from those in table konv. I am getting the price conditions without the value of field KNUMV.
I would like to ask if anybody has any idea on how to go about this or maybe another function module that I can use to get the data I need.
Thanks a lot..
Regards,
jac

Hi,
Thanks for your reply. I only have the field AUART for checking on the pricing conditions.
Here is a the part of my code
CALL FUNCTION 'GN_INVOICE_CREATE'
       EXPORTING
            vbsk_i           = i_vbsk
            id_kvorg        = ''
            id_no_dialog = c_exis
            invoice_date = p_datum
            pricing_date = p_datum
       IMPORTING
            vbsk_e          = i_vbsk
       TABLES
            xkomfk         = i_komfk
            xkomfkgn      = i_komfkgn
            xkomfkko      = i_komfkko
            xkomv          = i_komv
            xthead         = i_thead
            xvbfs           = i_vbfs
            xvbpa          = i_vbpa
            xvbrk           = i_vbrk
            xvbrp           = i_vbrp
            xvbss          = i_vbss
       EXCEPTIONS
            OTHERS       = 1.
The only parameters in those that have values are c_exis = X, p_datum = given date, and xkomfkgn. The other parameters are all initial when passed to the function module. I get a resulting komv table however, values are incorrect.
Thanks again for the help..
Regards,
jac

When currency changed from RMB, entry is lost in pricing condition of PO

Hi all,
I am facing a strange issue while creating a PO (SRM 5.0). When adding a new pricing condition for a line item, I try to change the currency from RMB to CNY. When this is done, the entire record is lost with all other values set to zero.
I tried using the function module CONVERT_TO_LOCAL_CURRENCY and this works fine.
What could be the possible reason as this happens only for this particular currency?
Where do I need to check further?
Edited by: gayu_march on Nov 10, 2010 11:28 AM
Edited by: gayu_march on Nov 10, 2010 11:29 AM

Hi
In the Access sequence maintain the Table sequence as exclusive for the Second access... This will ensure that if the Condition record is found it will adopt that.
Please check if your PO Qulaifies for the Second access or not.
Whether it is a third party Sales order & Check the Customer data & Country
Thanks & Regards
Kishore

Inserting Pricing condition in Sales order when saving the sales order

Dear ABAPers,
My customers requirement is when saving the sales order new pricing condition has to be updated in the line item.for this i am using the User Exit 'USEREXIT_SAVE_DOCUMENT_PREPARE' ( MV45AFZZ).While saving the Sales order i am calculating the Price and updating in the Pricing conditions.
In XKOMV internal table i am appending the pricing condition.But the problem is ,it is not calculating the taxes and it is Updating in VBAK and VBAP.
How to do this.
Thanks & Regards,
Ashok.

Dear ABAPers,
I have Solved this Problem.
Thanks & Regards,
Ashok.

How to disable pricing conditions from editing in sales order's(vA01) and (VA02)

Hi Experts,
We have a requirement to disable all the pricing conditions in a sales order from editing where some user's are changing the prices manually.
This should be disabled for particular order types and also based on the user's role in SU01. can anyone help me to fulfill this requirement.
Regards
Sree kumar.

Hi
Check my below document in which I have explained this in detail.
Authorization for entering/displaying manual condition in Sale order.
Thank$

How to copy the Pricing conditions from one Distribution Channel to another

Generally we use VK11 transaction to create conditional records .
but I Need to Know whether is it Possible to copy the Pricing conditions from one Distribution Channel to another with same name and same internal Characteristics .
Since we have around 70+ of Condition type with different parameter Sequence.So Instead of Going for BDC whether is there any standard Funct Modules/programs/BAPIs to do this?
How to make a copy Condition types from One Distribution Channel to another.
since SAP has already provided to copy conditions from Customer to customer.
Likewise i need to know whether SAP is facilitating for these feature also.
Iam Dubious in this issue.
Hope Fully looking for the answers.
Harish.N

- IDOC_INPUT_COND_A (you can create IDOC, but also call directly)
- call transaction / batch input (use transaction XK15, as used by LSMW)
- use group of function modules RV_CONDITION_COPY, RV_CONDITION_SAVE, RV_CONDITION_RESET + commit.
if you search SDN on 'RV_CONDITION_COPY' you'll find more info I believe.
Someone mentioned BAPI_PRICE_CONDITIONS as well.

Firefox have some promlems and it block when is opeining hotmail, in my laptop always have that problem, so i need check my email using another programs...that problem is in my laptop or it´s a problem of navigator??

Firefox have some problems and it block when is opening hotmail, in my laptop always have that problem, so i need check my email using another programs...that problem is in my laptop or it´s a problem of navigator??

I know you can't help with my Yahoo problem, however, apparently at some time in the past I have went to the Sync and tried to figure it out on both my laptop and my desktop, because I have the long snyc key information. However, when I go to try to sync both computers I never get the box to enter that key on either one. That is my problem. So should I try and get a new sync key and see if that works.

Lately Photoshop CC 2014 in my PC gets blocked when doing panoramas. First I edit my raw photos in Lightroom, then export to Photoshop for making panoramas. My Pc runs Windows 8.1 64 bits 8Gb Ram, Lately Photoshop CC 2014 in my PC gets blocked when doing

Últimamente Photoshop CC 2014 se detiene fusionando las capas al hacer panoramas. Primero edito mis fotos Raw en Lightroom luego las paso a Photoshop para hacer panoramas. Photoshop las abre y fusionando las capas se detiene.
Según el administrador de tareas cuando se bloquea tiene ocupado el 81 % de memoria 25% de CPU y 1% del disco.
Mi PC tiene Windows 8.1 de 64 bits y tiene 8 Gb de ram
Lately Photoshop CC 2014 in my PC gets blocked when doing panoramas. First I edit my raw photos in Lightroom, then export to Photoshop for making panoramas. My Pc runs Windows 8.1 64 bits 8Gb Ram

Últimamente Photoshop CC 2014 se detiene fusionando las capas al hacer panoramas. Primero edito mis fotos Raw en Lightroom luego las paso a Photoshop para hacer panoramas. Photoshop las abre y fusionando las capas se detiene.
Según el administrador de tareas cuando se bloquea tiene ocupado el 81 % de memoria 25% de CPU y 1% del disco.
Mi PC tiene Windows 8.1 de 64 bits y tiene 8 Gb de ram
Lately Photoshop CC 2014 in my PC gets blocked when doing panoramas. First I edit my raw photos in Lightroom, then export to Photoshop for making panoramas. My Pc runs Windows 8.1 64 bits 8Gb Ram

Block Sales order if pricing condition changed manually (no delivery)

Hi,
Requirement is to block sales orders for review by a manager if pricing condition amount is changed manually. Only a manager should be able to review and release the sales order for billing. There is no delivery, item is service.
Thanks

Hi,
This can be achieved as follows:
1) SAP Standard updates the field KOMV->KSTEU for respective price condition type as soon as its changed Manually.
2) Through enhancement automatically delivery block should be set at Sales Order Header, for which User (Sales End User) should not have rights to change.
3) Respective Sales Manager should receive a mail regarding the same.
Point '3' can be done manually i.e user will request respective Manager to do the needful.
RB.

Condition type field when Define Pricing Procedure Determination

Hello Gurus,
there is a condition type field when Define Pricing Procedure Determination. what does it mean ?
Many thanks,
Frank Zhang

Here is are the details of various fields while configuring pricing procedure.
A. STEP
This indicates the number of step-in the procedure.
B. COUNTER
This is used to show a second ministep
C. CONDITION TYPE
This is the most important component in the pricing procedure. The rates are picked up from this element, on the basis of the properties described.
D. DESCRIPTION
This forms the description of the condition type.
E. FROM
This is used to define the progression of the calculation and range of subtotals
F. TO
This is used to define the progression of the calculation and range of subtotals
G. MANUAL
This function enables to allow the condition type to be entered manually also apart from automatic pickup.
H. MANDATORY
This function identifies the conditions that are mandatory in the pricing procedure. The sales price is a mandatory condition type.
I. STATISTICS
This can be used to represent the cost price of the material sold, generally used for study statistical impacts of price
J. PRINT
The activation of this function will enable the printing of the values and conditions to the document.
K. SUBTOTAL
A key is assigned from the drop down menu; this can be used by the system in other area like Sis for reporting purpose also
L. REQUIRMENT KEY
This function is used to assign a requirement to the condition type. This requirement can be used to exclude the system from accessing the condition type and trying to determine the value. This can be used to specify that the condition type should only be accessed if the customer has a low risk credit.
M. ALTERNATE CALCULATION TYPE
This function allows you use a formula as an alternative in finding the value of the condition type, instead of standard condition technique. this can be used to calculate complex tax structures.
N. ALTERNATE CONDITION BASE VALUE.
The alternative condition base value is a formula assigned to a condition type in order to promote an alternative base value for the calculation of a value.
O. ACCOUNTS KEY
The account keys form part of account determination. These keys are used here to define the posting of the revenue generated to respective account heads& to subsequent assignment to GL accounts.
PR00- ERL
K007/KA00- ERS.
KF00- ERFu2026u2026u2026u2026.& so On.
P. ACCRUAL KEY.
The accrual keys form part of account determination. These keys are used here to define the posting of the revenue generated to respective account heads& to subsequent assignment to GL accounts and payment to respective parties.
Kalpesh

I want to block a ertain pricing condition after a certain date, is it poss

Hi
i want to block a Certain pricing condition after a certain date, is it possible?..
Regards
Tanmoy

HI
It is possible to control it in Info record in the conditions details for the condition tyep PB00, similarly if you have any condition reord for PB00 or any other condition in place of it in MEK1 then also it can be blocked with the validity period. You can control the conditions with access sequence only in any of these two places.
Regards

Pricing condition is blocked when editing another

Similar Messages

Maybe you are looking for