-1

我有一个完全定制的 SAP 屏幕,用于创建租赁协议。当使用帮助/对话框(即 F4 按钮)选项选择税收管辖区时,会导致填充不可编辑的州和县税收字段。这两个字段仅用于显示,以便用户可以根据实际的州和县验证他们的税收管辖权。

为确保整个屏幕上的所有字段都有效,程序使用 PAI 字段链接,如下所示。问题是,如果我在税收管辖区字段中手动输入新值并按回车键,那么除非链中的所有其他字段也有效,否则州和县不会更新。

我使用功能模块手动强制更新州和县字段DYNP_VALUES_UPDATE,效果很好,除非下面的其他字段之一无效。即使链中的其他字段之一无效,如何强制在屏幕上更新州和县字段?我开始认为这根本不可能。

税收管辖字段称为kna1-txjcd

PROCESS BEFORE OUTPUT.
MODULE status_0100.

MODULE setup_defaults.              

MODULE screen_modify.                 

MODULE ltext_add_comments_0100.

PROCESS AFTER INPUT.

MODULE cancel AT EXIT-COMMAND.
MODULE user_command_0100.


FIELD t001-bukrs MODULE check_sales_org.                  "DV1K933404


FIELD kna1-j_3gagext
MODULE check_customer_sales_area.

CHAIN.

FIELD: kna1-j_3gagext
       MODULE check_cust_num.
MODULE verify_recipient.                                "DV1K935780
FIELD: zsd_etm_contract-bill_to_party
       MODULE check_bill_to_party.
FIELD zsd_etm_contract-payer
       MODULE check_payer_number.                       "CHG12588

ENDCHAIN.
CHAIN.
FIELD: kna1-txjcd
       MODULE check_txjcd.                              "DV1K933404

FIELD:  zsd_etm_contract-rig_num,
        zsd_etm_contract-ship_via.

FIELD   zsd_etm_contract-well_name.

FIELD:
       zdls_ls, zdls_sc, zdls_twp, zdls_rg, zdls_m.
FIELD: znts_qtr_unit, znts_unit, znts_block,
       znts_map.
FIELD: zlsd_other.
MODULE check_lsd_num .

FIELD: zsd_etm_contract-contact_tel_num,
       zsd_etm_contract-cus_rep_loc,
       zsd_etm_contract-cus_rep_tel_num,
       zsd_etm_contract-cus_rep_fax_num,
       zsd_etm_contract-cus_rep_email,                  "dv1k931160
       zsd_etm_contract-lrg_contract,                   "DV1K935629
       t001-bukrs,                                      "DV1K935752
       zsd_etm_contract-lrg_camp,                       "DV1K935752
       zsd_etm_contract-customer_contact.               "DV1K931062

FIELD:
     zsd_etm_contract-cus_rep_loc
         MODULE check_cus_rep_loc,
    zsd_etm_contract-afe,
    zsd_etm_contract-po,
    zsd_etm_contract-msa,
    zsd_etm_contract-cost_center,
    zsd_etm_contract-gl
          MODULE check_afe_po_msa_num,
    zsd_etm_contract-invoice_approval
        MODULE check_invoice_approval,
    zsd_etm_contract-usage_type
        MODULE check_usage_type.
FIELD:  zsd_etm_contract-lrg_contract,                  "DV1K935629
        t001-bukrs,                                     "DV1K935752
        zsd_etm_contract-lrg_camp.                      "DV1K935752
MODULE check_lrg_entries.                               "DV1K935752


FIELD:
   zsd_etm_contract-prl_rep
       MODULE check_prl_rep,
   zsd_etm_contract-branch
       MODULE check_branch,
   zsd_etm_contract-bill_region, t001-bukrs
       MODULE check_bill_region,
   zsd_etm_contract-eoj_bill
       MODULE check_eoj_bill,
   zsd_etm_contract-sd_shd_flag,
   zsd_etm_contract-next_set_date
       MODULE check_next_set_date,
   zsd_etm_contract-audit_flag,
   zsd_etm_contract-ratetype. " CHG13225 DV1K939527

ENDCHAIN.


CHAIN.
FIELD: zsd_etm_contract-usage_type,
       zsd_etm_contract-well_type.
MODULE check_well_type.
ENDCHAIN.

FIELD zsd_etm_contract-well_type.
MODULE get_well_type_text.

FIELD zsd_etm_contract-unit_num MODULE check_unit_num.

CHAIN.
FIELD: zsd_etm_contract-afe,
       zsd_etm_contract-po,
       zsd_etm_contract-msa,
       zsd_etm_contract-gl.
MODULE combine_fields.
ENDCHAIN.

MODULE fill_wa_etm_contract.
MODULE check_ltext.

MODULE user_command_create_0100.

PROCESS ON VALUE-REQUEST.
FIELD: kna1-txjcd
      MODULE help_txjcd,
     zsd_etm_contract-prl_rep
      MODULE help_prel_rep,
     zsd_etm_contract-bill_to_party
      MODULE help_bill_to_party.
FIELD: zsd_etm_contract-payer
      MODULE help_payer.
FIELD: zsd_etm_contract-ratetype " CHG13225 DV1K939527
      MODULE help_ratetype.    " CHG13225 DV1K939527

更新 下面的屏幕截图显示了我最初使用 F4 选项提供税务管辖区代码时的屏幕。请注意,州、县和市以及相应的税收都会更新。

在此处输入图像描述

在下图中,我通过输入新值手动更改了税收管辖区,然后按 ENTER。请注意,州、县和市以及相应的税收保持不变。它们应该已经更新为完全不同的值,但由于问题似乎没有这样做CHAIN(即屏幕更新不会发生,因为字段处于无效状态)。

在此处输入图像描述

4

1 回答 1

-1

您可以使用“HACK”屏幕CALL FUNCTION 'DYNP_VALUES_UPDATE'

重新考虑何时以及如何引发错误。避免现场模块与链模块问题。例如,在所有现场模块和链模块之后发出错误

于 2014-07-23T05:48:11.297 回答