Application Development and Automation Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 
Read only

Trouble with dynamic action

Former Member
0 Likes
636

Hi all,

We have a problem with a dynamic action that is not working properly since almost one month.
This dynamic action is triggered by saving datas to a specific infotype 9005.


The recording in the table T588Z ar as below:

Code: Select all
    Infty        Action   N° Code
    9005             02   5   F   MODIFICATION_VERSEMENT(ZPR_TI_MES_DYN_CET)
    9005             04   5   F   CREATION_VERSEMENT(ZPR_TI_MES_DYN_CET)
    9005             08   5   F   SUPPRESSION_VERSEMENT(ZPR_TI_MES_DYN_CET)

The form "creation_versement" trigger another form "create_0416_0015_2013"

Code: Select all
      DATA l_nbr  TYPE ptm_quonum.                         "M001 04/01/2013+
      DATA l_nbr_char(255).                                "M001 04/01/2013+
      CLEAR l_nbr.                                         "M001 04/01/2013+
    *---Contingent à débiter
    *---Création Compensation de contingent (It 0416)
      IF NOT zdthpa_verscet-qctyp IS INITIAL.
        MOVE p9005-vernb TO l_nbr.                         "M001 04/01/2013+
        PERFORM dynmeas USING 'INS' '0416' zdthpa_verscet-qctyp
                              'D' p9005-begda p9005-begda
                              dynmeas-seqnr.
        MOVE l_nbr TO l_nbr_char.                              "M001 04/01/2013+
        SHIFT l_nbr_char LEFT DELETING LEADING space.          "M001 04/01/2013+
        PERFORM initial_values USING 'P0416-NUMBR' l_nbr_char  "M001 04/01/2013+
    *                                             p9005-vernb "M001 04/01/2013-
                                   dynmeas-seqnr.

      ELSE.

    *---Rubrique de déduction
    *---Création Paiement complémentaire (It 0015)
        IF NOT zdthpa_verscet-lgart IS INITIAL.

          PERFORM dynmeas USING 'INS' '0015' zdthpa_verscet-lgart
                                'D' p9005-begda p9005-begda
                                dynmeas-seqnr.

          PERFORM initial_values USING 'P0015-BETRG' p9005-vermt
                                        dynmeas-seqnr.

          PERFORM initial_values USING 'P0015-WAERS' p9005-waers
                                        dynmeas-seqnr.

        ENDIF.

      ENDIF.

    *---Contingent CET à créditer (It 2013)
      IF NOT zdthpa_verscet-konti_c IS INITIAL.
        CLEAR : l_nbr, l_nbr_char.                         "M001 04/01/2013+
        MOVE p9005-nbjcet TO l_nbr.                        "M001 04/01/2013+
        PERFORM dynmeas USING 'INS' '2013' zdthpa_verscet-konti_c
                              'D' p9005-begda p9005-begda
                              dynmeas-seqnr.

        MOVE l_nbr TO l_nbr_char.                              "M001 04/01/2013+
        SHIFT l_nbr_char LEFT DELETING LEADING space.          "M001 04/01/2013+
        PERFORM initial_values USING 'P2013-ACCNU'  l_nbr_char "M001 04/01/2013+
    *                                          p9005-nbjcet "M001 04/01/2013-
                                      dynmeas-seqnr.
      ENDIF.

    ENDFORM.                    "CREATE_0416_0015_2013

Normally, it creates a recording in infotype 0416 throuogh dynamic action with the field 'P0416-NUMBR' filled with the value of the field P905-VERNB. However, the field is empty.

We are on a 4.7 version of SAP, the HR SP is SAPKE470D9 .

Do anybody got a clue ?

1 ACCEPTED SOLUTION
Read only

Former Member
0 Likes
485

I found it by myself.

The field DMSNR in the table INITIAL_VALUES must be filled with SEQNR.

Hi all,

We have a problem with a dynamic action that is not working properly since almost one month.
This dynamic action is triggered by saving datas to a specific infotype 9005.


The recording in the table T588Z ar as below:

Code: Select all
    Infty        Action   N° Code
    9005             02   5   F   MODIFICATION_VERSEMENT(ZPR_TI_MES_DYN_CET)
    9005             04   5   F   CREATION_VERSEMENT(ZPR_TI_MES_DYN_CET)
    9005             08   5   F   SUPPRESSION_VERSEMENT(ZPR_TI_MES_DYN_CET)

The form "creation_versement" trigger another form "create_0416_0015_2013"

Code: Select all
      DATA l_nbr  TYPE ptm_quonum.                         "M001 04/01/2013+
      DATA l_nbr_char(255).                                "M001 04/01/2013+
      CLEAR l_nbr.                                         "M001 04/01/2013+
    *---Contingent à débiter
    *---Création Compensation de contingent (It 0416)
      IF NOT zdthpa_verscet-qctyp IS INITIAL.
        MOVE p9005-vernb TO l_nbr.                         "M001 04/01/2013+
        PERFORM dynmeas USING 'INS' '0416' zdthpa_verscet-qctyp
                              'D' p9005-begda p9005-begda
                              dynmeas-seqnr.
        MOVE l_nbr TO l_nbr_char.                              "M001 04/01/2013+
        SHIFT l_nbr_char LEFT DELETING LEADING space.          "M001 04/01/2013+
        PERFORM initial_values USING 'P0416-NUMBR' l_nbr_char  "M001 04/01/2013+
    *                                             p9005-vernb "M001 04/01/2013-
                                   dynmeas-seqnr.

      ELSE.

    *---Rubrique de déduction
    *---Création Paiement complémentaire (It 0015)
        IF NOT zdthpa_verscet-lgart IS INITIAL.

          PERFORM dynmeas USING 'INS' '0015' zdthpa_verscet-lgart
                                'D' p9005-begda p9005-begda
                                dynmeas-seqnr.

          PERFORM initial_values USING 'P0015-BETRG' p9005-vermt
                                        dynmeas-seqnr.

          PERFORM initial_values USING 'P0015-WAERS' p9005-waers
                                        dynmeas-seqnr.

        ENDIF.

      ENDIF.

    *---Contingent CET à créditer (It 2013)
      IF NOT zdthpa_verscet-konti_c IS INITIAL.
        CLEAR : l_nbr, l_nbr_char.                         "M001 04/01/2013+
        MOVE p9005-nbjcet TO l_nbr.                        "M001 04/01/2013+
        PERFORM dynmeas USING 'INS' '2013' zdthpa_verscet-konti_c
                              'D' p9005-begda p9005-begda
                              dynmeas-seqnr.

        MOVE l_nbr TO l_nbr_char.                              "M001 04/01/2013+
        SHIFT l_nbr_char LEFT DELETING LEADING space.          "M001 04/01/2013+
        PERFORM initial_values USING 'P2013-ACCNU'  l_nbr_char "M001 04/01/2013+
    *                                          p9005-nbjcet "M001 04/01/2013-
                                      dynmeas-seqnr.
      ENDIF.

    ENDFORM.                    "CREATE_0416_0015_2013

Normally, it creates a recording in infotype 0416 throuogh dynamic action with the field 'P0416-NUMBR' filled with the value of the field P905-VERNB. However, the field is empty.

We are on a 4.7 version of SAP, the HR SP is SAPKE470D9 .

Do anybody got a clue ?

1 REPLY 1
Read only

Former Member
0 Likes
486

I found it by myself.

The field DMSNR in the table INITIAL_VALUES must be filled with SEQNR.