How to create custom help for a sub VI ?

Hello,
I was wondering, how can I make a custom help for a sub vi I made? I can't find anything on here about it...
thanks!
Solved!
Go to Solution.

Hi there
Open the LabVIEW Help and read the "Documenting and Printing VIs" section.
Best regards
chris
CL(A)Dly bending G-Force with LabVIEW
famous last words: "oh my god, it is full of stars!"

Similar Messages

How to create custom infotype for training and event management

hai freinds can any one tell me how to create custom infotype for training and event managment with following fields
PS No PA0000-> PERNR
Name - PA0001 -> ENAME
IS PS.No. PA0001-> PS no. of Immediate Superior
IS name PA0001 -> ENAME
thanx in advance
afzal

Hi,
Your question is not clear for me. Since it is a TEM infotype, it could be a PD infotype.
If you wish to create a PD infotype, use transaction PPCI to create the infotype.
But before that you need to create a structure HRInnnn (where nnnn is the infotype number) with all the fields relevant for the infotype.
If you wish to create a PA infotype, use transaction PM01 to create the infotype.
But before that you may be required to create a strcuture PSnnnn (where nnnn is the infotype number) with all the fields relevant for the infotype.
Regards,
Srini

How to create Search Help for a field in Table control !!

Hello Friends,
              I like to know - How to create Search Help for a field in Table control. Is it possible, if it is please share ur knowledge, I wud be happy if U provide some source code example for this.
Thanks,
Senthil

Check the sample code:
*& Include           ZSRO_MPRN_SEARCH                                 *
MODULE PSTLZ_F4 INPUT
MODULE pstlz_f4 INPUT.
reading post code
DATA: stepl TYPE systepl,
        stepl_index TYPE systepl.
CLEAR: stepl, stepl_index.
CLEAR:   lt_returntab,lt_dynpfields,i_mprn1.
REFRESH: lt_returntab,lt_dynpfields,i_mprn1.
lt_dynpfields-fieldname = 'I_MPRN-POST_CODE'.
lt_dynpfields-stepl     = stepl.
APPEND lt_dynpfields. CLEAR lt_dynpfields.
CALL FUNCTION 'DYNP_VALUES_READ'
    EXPORTING
      dyname               = sy-repid
      dynumb               = sy-dynnr
      translate_to_upper   = c_x
      determine_loop_index = c_x
    TABLES
      dynpfields           = lt_dynpfields
    EXCEPTIONS
      invalid_abapworkarea = 1
      invalid_dynprofield = 2
      invalid_dynproname   = 3
      invalid_dynpronummer = 4
      invalid_request      = 5
      no_fielddescription = 6
      invalid_parameter    = 7
      undefind_error       = 8
      double_conversion    = 9
      stepl_not_found      = 10
      OTHERS               = 11.
IF sy-subrc EQ 0.
    READ TABLE lt_dynpfields INDEX 1.
ENDIF.
ws_outcode = lt_dynpfields-fieldvalue.
stepl_index = lt_dynpfields-stepl.
REPLACE '*' WITH ' ' INTO lt_dynpfields-fieldvalue.
IF NOT lt_dynpfields-fieldvalue IS INITIAL.
    MOVE lt_dynpfields-fieldvalue TO ws_outcode.
    ws_len = STRLEN( lt_dynpfields-fieldvalue ).
    IF ws_len GE 7.
      ws_len = ws_len - 3.
     ws_icode = ws_code+ws_len(3).
      lt_dynpfields-fieldvalue = lt_dynpfields-fieldvalue+0(ws_len).
      CONCATENATE lt_dynpfields-fieldvalue '%'
          INTO ws_outcode.
      CONDENSE lt_dynpfields-fieldvalue.
   REPLACE ws_icode WITH ' ' INTO lt_dynpfields-fieldvalue.
    ELSE.
      CONCATENATE lt_dynpfields-fieldvalue+0(4) '%'
        INTO ws_outcode.
    ENDIF.
   ws_ocode = ws_code+0(3).
ENDIF.
reading MPRN
CLEAR:   lt_returntab,lt_dnpfields,i_mprn1.
REFRESH: lt_returntab,lt_dnpfields,i_mprn1.
lt_dnpfields-fieldname = 'I_MPRN-MPRN'.
lt_dnpfields-stepl     = stepl_index.
APPEND lt_dnpfields. CLEAR lt_dnpfields.
CALL FUNCTION 'DYNP_VALUES_READ'
    EXPORTING
      dyname               = sy-repid
      dynumb               = sy-dynnr
      translate_to_upper   = 'X'
    TABLES
      dynpfields           = lt_dnpfields
    EXCEPTIONS
      invalid_abapworkarea = 1
      invalid_dynprofield = 2
      invalid_dynproname   = 3
      invalid_dynpronummer = 4
      invalid_request      = 5
      no_fielddescription = 6
      invalid_parameter    = 7
      undefind_error       = 8
      double_conversion    = 9
      stepl_not_found      = 10
      OTHERS               = 11.
IF sy-subrc EQ 0.
    READ TABLE lt_dnpfields INDEX 1.
ENDIF.
MPRN blank and Post code exist
IF lt_dnpfields-fieldvalue IS INITIAL.
    IF NOT lt_dynpfields-fieldvalue IS INITIAL.
      SELECT mprn ser_num sub_bud bud_name del_pt_alias
             bud_num dep_street prin_street dbl_dep_street
             dep_locty post_town county outcode incode
             lg_site_ind file_date FROM zspa_mprn INTO
             CORRESPONDING FIELDS OF TABLE i_mprn1
             WHERE outcode LIKE ws_outcode.
    ELSE.
MPRN blank and Post code blank
      SELECT mprn ser_num sub_bud bud_name del_pt_alias
             bud_num dep_street prin_street dbl_dep_street
             dep_locty post_town county outcode incode
             lg_site_ind file_date FROM zspa_mprn INTO
             CORRESPONDING FIELDS OF TABLE i_mprn1.
    ENDIF.
ELSE.
MPRN exist and Post code exist
    IF NOT lt_dynpfields-fieldvalue IS INITIAL.
      SELECT mprn ser_num sub_bud bud_name del_pt_alias
             bud_num dep_street prin_street dbl_dep_street
             dep_locty post_town county outcode incode
             lg_site_ind file_date FROM zspa_mprn INTO
             CORRESPONDING FIELDS OF TABLE i_mprn1
             WHERE outcode LIKE ws_outcode AND
                   mprn EQ lt_dnpfields-fieldvalue.
    ELSE.
MPRN exist and Post code blank
      SELECT mprn ser_num sub_bud bud_name del_pt_alias
             bud_num dep_street prin_street dbl_dep_street
             dep_locty post_town county outcode incode
             lg_site_ind file_date FROM zspa_mprn INTO
             CORRESPONDING FIELDS OF TABLE i_mprn1
             WHERE mprn EQ lt_dnpfields-fieldvalue.
    ENDIF.
ENDIF.
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
    EXPORTING
      retfield        = 'MPRN'
      dynpprog        = sy-repid
      dynpnr          = sy-dynnr
      window_title    = 'Select MPRN'
      value_org       = 'S'
    TABLES
      value_tab       = i_mprn1 "lt_mprn
      return_tab      = lt_returntab
    EXCEPTIONS
      parameter_error = 1
      no_values_found = 2
      OTHERS          = 3.
IF sy-subrc EQ 0.
    READ TABLE lt_returntab INDEX 1.
    READ TABLE i_mprn1 WITH KEY mprn = lt_returntab-fieldval.
    IF sy-subrc EQ 0.
Updating post code
      CONCATENATE i_mprn1-outcode i_mprn1-incode
                    INTO ws_postcode
                         SEPARATED BY space.
      MOVE ws_postcode TO i_mprn-post_code.
      CLEAR   : i_dnpfld,
                ws_dynpfld.
      REFRESH : i_dnpfld.
      ws_dyname   = 'ZSRO_MASTER_DATA'.
      ws_dynumb   = '0301'.
      ws_dynpfld-fieldname ='I_MPRN-POST_CODE'.
      ws_dynpfld-fieldvalue = ws_postcode .
      ws_dynpfld-stepl      = stepl_index.
      APPEND ws_dynpfld TO i_dnpfld.
      CALL FUNCTION 'DYNP_VALUES_UPDATE'
        EXPORTING
          dyname               = ws_dyname
          dynumb               = ws_dynumb
        TABLES
          dynpfields           = i_dnpfld
        EXCEPTIONS
          invalid_abapworkarea = 1
          invalid_dynprofield = 2
          invalid_dynproname   = 3
          invalid_dynpronummer = 4
          invalid_request      = 5
          no_fielddescription = 6
          undefind_error       = 7
          OTHERS               = 8.
      IF sy-subrc <> 0.
      ENDIF.
Updating MPRN
      MOVE i_mprn1-mprn TO i_mprn-mprn.
      CLEAR   : i_dnpfld,
                ws_dynpfld.
      REFRESH : i_dnpfld.
      ws_dyname   = 'ZSRO_MASTER_DATA'.
      ws_dynumb   = '0301'.
      ws_dynpfld-fieldname ='I_MPRN-MPRN'.
      ws_dynpfld-fieldvalue = i_mprn1-mprn .
      ws_dynpfld-stepl      = stepl_index.
      APPEND ws_dynpfld TO i_dnpfld.
      CALL FUNCTION 'DYNP_VALUES_UPDATE'
        EXPORTING
          dyname               = ws_dyname
          dynumb               = ws_dynumb
        TABLES
          dynpfields           = i_dnpfld
        EXCEPTIONS
          invalid_abapworkarea = 1
          invalid_dynprofield = 2
          invalid_dynproname   = 3
          invalid_dynpronummer = 4
          invalid_request      = 5
          no_fielddescription = 6
          undefind_error       = 7
          OTHERS               = 8.
      IF sy-subrc <> 0.
      ENDIF.
    ENDIF.
ELSEIF sy-subrc EQ 2.
    MESSAGE s005(zspa) WITH ws_postcode .
ENDIF.
ENDMODULE.                    "PSTLZ_F4 INPUT
MODULE MPRN_F4 INPUT
MODULE mprn_f4 INPUT.
reading post code
DATA: stepl TYPE systepl,
       stepl_index TYPE systepl.
CLEAR: stepl, stepl_index.
CLEAR:   lt_returntab,lt_dynpfields,i_mprn1.
REFRESH: lt_returntab,lt_dynpfields,i_mprn1.
lt_dynpfields-fieldname = 'I_MPRN-POST_CODE'.
lt_dynpfields-stepl     = stepl.
APPEND lt_dynpfields. CLEAR lt_dynpfields.
CALL FUNCTION 'DYNP_VALUES_READ'
    EXPORTING
      dyname               = sy-repid
      dynumb               = sy-dynnr
      translate_to_upper   = c_x
      determine_loop_index = c_x
    TABLES
      dynpfields           = lt_dynpfields
    EXCEPTIONS
      invalid_abapworkarea = 1
      invalid_dynprofield = 2
      invalid_dynproname   = 3
      invalid_dynpronummer = 4
      invalid_request      = 5
      no_fielddescription = 6
      invalid_parameter    = 7
      undefind_error       = 8
      double_conversion    = 9
      stepl_not_found      = 10
      OTHERS               = 11.
IF sy-subrc EQ 0.
    READ TABLE lt_dynpfields INDEX 1.
ENDIF.
ws_outcode = lt_dynpfields-fieldvalue.
stepl_index = lt_dynpfields-stepl.
REPLACE '*' WITH ' ' INTO lt_dynpfields-fieldvalue.
IF NOT lt_dynpfields-fieldvalue IS INITIAL.
    MOVE lt_dynpfields-fieldvalue TO ws_outcode.
    ws_len = STRLEN( lt_dynpfields-fieldvalue ).
    IF ws_len GE 7.
      ws_len = ws_len - 3.
     ws_icode = ws_code+ws_len(3).
      lt_dynpfields-fieldvalue = lt_dynpfields-fieldvalue+0(ws_len).
      CONCATENATE lt_dynpfields-fieldvalue '%'
          INTO ws_outcode.
      CONDENSE lt_dynpfields-fieldvalue.
   REPLACE ws_icode WITH ' ' INTO lt_dynpfields-fieldvalue.
    ELSE.
      CONCATENATE lt_dynpfields-fieldvalue+0(4) '%'
        INTO ws_outcode.
    ENDIF.
   ws_ocode = ws_code+0(3).
ENDIF.
reading MPRN
CLEAR:   lt_returntab,lt_dnpfields,i_mprn1.
REFRESH: lt_returntab,lt_dnpfields,i_mprn1.
lt_dnpfields-fieldname = 'I_MPRN-MPRN'.
lt_dnpfields-stepl     = stepl_index.
APPEND lt_dnpfields. CLEAR lt_dnpfields.
CALL FUNCTION 'DYNP_VALUES_READ'
    EXPORTING
      dyname               = sy-repid
      dynumb               = sy-dynnr
      translate_to_upper   = 'X'
    TABLES
      dynpfields           = lt_dnpfields
    EXCEPTIONS
      invalid_abapworkarea = 1
      invalid_dynprofield = 2
      invalid_dynproname   = 3
      invalid_dynpronummer = 4
      invalid_request      = 5
      no_fielddescription = 6
      invalid_parameter    = 7
      undefind_error       = 8
      double_conversion    = 9
      stepl_not_found      = 10
      OTHERS               = 11.
IF sy-subrc EQ 0.
    READ TABLE lt_dnpfields INDEX 1.
ENDIF.
MPRN blank and Post code exist
IF lt_dnpfields-fieldvalue IS INITIAL.
    IF NOT lt_dynpfields-fieldvalue IS INITIAL.
      SELECT mprn ser_num sub_bud bud_name del_pt_alias
             bud_num dep_street prin_street dbl_dep_street
             dep_locty post_town county outcode incode
             lg_site_ind file_date FROM zspa_mprn INTO
             CORRESPONDING FIELDS OF TABLE i_mprn1
             WHERE outcode LIKE ws_outcode.
    ELSE.
MPRN blank and Post code blank
      SELECT mprn ser_num sub_bud bud_name del_pt_alias
             bud_num dep_street prin_street dbl_dep_street
             dep_locty post_town county outcode incode
             lg_site_ind file_date FROM zspa_mprn INTO
             CORRESPONDING FIELDS OF TABLE i_mprn1.
    ENDIF.
ELSE.
MPRN exist and Post code exist
    IF NOT lt_dynpfields-fieldvalue IS INITIAL.
      SELECT mprn ser_num sub_bud bud_name del_pt_alias
             bud_num dep_street prin_street dbl_dep_street
             dep_locty post_town county outcode incode
             lg_site_ind file_date FROM zspa_mprn INTO
             CORRESPONDING FIELDS OF TABLE i_mprn1
             WHERE outcode LIKE ws_outcode AND
                   mprn EQ lt_dnpfields-fieldvalue.
    ELSE.
MPRN exist and Post code blank
      SELECT mprn ser_num sub_bud bud_name del_pt_alias
             bud_num dep_street prin_street dbl_dep_street
             dep_locty post_town county outcode incode
             lg_site_ind file_date FROM zspa_mprn INTO
             CORRESPONDING FIELDS OF TABLE i_mprn1
             WHERE mprn EQ lt_dnpfields-fieldvalue.
    ENDIF.
ENDIF.
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
    EXPORTING
      retfield        = 'MPRN'
      dynpprog        = sy-repid
      dynpnr          = sy-dynnr
      window_title    = 'Select MPRN'
      value_org       = 'S'
    TABLES
      value_tab       = i_mprn1 "lt_mprn
      return_tab      = lt_returntab
    EXCEPTIONS
      parameter_error = 1
      no_values_found = 2
      OTHERS          = 3.
IF sy-subrc EQ 0.
    READ TABLE lt_returntab INDEX 1.
    READ TABLE i_mprn1 WITH KEY mprn = lt_returntab-fieldval.
    IF sy-subrc EQ 0.
Updating MPRN
      MOVE i_mprn1-mprn TO i_mprn-mprn.
      CLEAR   : i_dnpfld,
                ws_dynpfld.
      REFRESH : i_dnpfld.
      ws_dyname   = 'ZSRO_MASTER_DATA'.
      ws_dynumb   = '0301'.
      ws_dynpfld-fieldname ='I_MPRN-MPRN'.
      ws_dynpfld-fieldvalue = i_mprn1-mprn .
      ws_dynpfld-stepl      = stepl_index.
      APPEND ws_dynpfld TO i_dnpfld.
**code changed by laxman 10.08.2005
     ws_dynpfld-stepl = mprn-current_line.
**code changed by laxman 10.08.2005
      CALL FUNCTION 'DYNP_VALUES_UPDATE'
        EXPORTING
          dyname               = ws_dyname
          dynumb               = ws_dynumb
        TABLES
          dynpfields           = i_dnpfld
        EXCEPTIONS
          invalid_abapworkarea = 1
          invalid_dynprofield = 2
          invalid_dynproname   = 3
          invalid_dynpronummer = 4
          invalid_request      = 5
          no_fielddescription = 6
          undefind_error       = 7
          OTHERS               = 8.
      IF sy-subrc <> 0.
      ENDIF.
Updating post code
      CONCATENATE i_mprn1-outcode i_mprn1-incode
                    INTO ws_postcode
                         SEPARATED BY space.
      MOVE ws_postcode TO i_mprn-post_code.
      CLEAR   : i_dnpfld,
                ws_dynpfld.
      REFRESH : i_dnpfld.
      ws_dyname   = 'ZSRO_MASTER_DATA'.
      ws_dynumb   = '0301'.
      ws_dynpfld-fieldname ='I_MPRN-POST_CODE'.
      ws_dynpfld-fieldvalue = ws_postcode .
      ws_dynpfld-stepl      = stepl_index.
      APPEND ws_dynpfld TO i_dnpfld.
**code changed by laxman 10.08.2005
     break gblap0.
     ws_dynpfld-stepl = mprn-current_line.
     LOOP AT i_mprn.
       MOVE i_mprn1-mprn TO i_mprn-mprn.
       MOVE ws_postcode TO i_mprn-post_code.
       MODIFY i_mprn INDEX
                mprn-current_line." transporting MPRN POST_CODE.
     ENDLOOP.
**code changed by laxman 10.08.2005
      CALL FUNCTION 'DYNP_VALUES_UPDATE'
        EXPORTING
          dyname               = ws_dyname
          dynumb               = ws_dynumb
        TABLES
          dynpfields           = i_dnpfld
        EXCEPTIONS
          invalid_abapworkarea = 1
          invalid_dynprofield = 2
          invalid_dynproname   = 3
          invalid_dynpronummer = 4
          invalid_request      = 5
          no_fielddescription = 6
          undefind_error       = 7
          OTHERS               = 8.
      IF sy-subrc <> 0.
      ENDIF.
    ENDIF.
ELSEIF sy-subrc EQ 2.
    MESSAGE s006(zspa) WITH i_mprn1-mprn .
ENDIF.
ENDMODULE.                    "MPRN_F4 INPUT
MODULE GNTC_F4 INPUT
MODULE gntc_f4 INPUT.
DATA: BEGIN OF lt_gntc OCCURS 0,
          gntc LIKE iflot-zzgntc,
        END OF lt_gntc.
CLEAR:   lt_returntab, lt_gntc.
REFRESH: lt_returntab, lt_gntc.
lt_gntc-gntc = 'DM'.
APPEND lt_gntc. CLEAR lt_gntc.
lt_gntc-gntc = 'NDM'.
APPEND lt_gntc. CLEAR lt_gntc.
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
    EXPORTING
      retfield        = 'ZZGNTC'
      dynpprog        = sy-repid
      dynpnr          = sy-dynnr
      window_title    = 'Select Gas Nomination Type Code'
      value_org       = 'S'
    TABLES
      value_tab       = lt_gntc
      return_tab      = lt_returntab
    EXCEPTIONS
      parameter_error = 1
      no_values_found = 2
      OTHERS          = 3.
IF sy-subrc EQ 0.
    READ TABLE lt_returntab INDEX 1.
    i_mprn-dm_ndm = lt_returntab-fieldval.
ENDIF.
ENDMODULE.                    "GNTC_F4 INPUT
*&      Module mprn1_f4 INPUT
      text
MODULE mprn1_f4 INPUT.
DATA: lt_f4          TYPE ddshretval OCCURS 0 WITH HEADER LINE,
        lt_returntab1 LIKE ddshretval OCCURS 0 WITH HEADER LINE,
        lt_dynpfields1 LIKE dynpread OCCURS 0 WITH HEADER LINE,
        lt_dnpfields1 LIKE dynpread OCCURS 0 WITH HEADER LINE.
DATA: stepl1 TYPE systepl,
        stepl_index1 TYPE systepl.
DATA : i_dnpfld1      LIKE dynpread OCCURS 0 WITH HEADER LINE,
         ws_dyname1     LIKE d020s-prog,
         ws_dynumb1     LIKE d020s-dnum,
         ws_dynpfld1    LIKE dynpread.
CLEAR: i_dnpfld1, ws_dyname1, ws_dynumb1, ws_dynpfld1,
         lt_f4, lt_returntab1,lt_dynpfields1, lt_f4,
         stepl1, stepl_index1.
REFRESH: i_dnpfld1, lt_returntab1,lt_dynpfields1, lt_f4.
To Determine Steploop Index
lt_dynpfields1-fieldname = 'I_MPRN-POST_CODE'.
lt_dynpfields1-stepl     = stepl1.
APPEND lt_dynpfields1. CLEAR lt_dynpfields1.
CALL FUNCTION 'DYNP_VALUES_READ'
    EXPORTING
      dyname               = sy-repid
      dynumb               = sy-dynnr
      translate_to_upper   = 'X'
      determine_loop_index = 'X'
    TABLES
      dynpfields           = lt_dynpfields1
    EXCEPTIONS
      invalid_abapworkarea = 1
      invalid_dynprofield = 2
      invalid_dynproname   = 3
      invalid_dynpronummer = 4
      invalid_request      = 5
      no_fielddescription = 6
      invalid_parameter    = 7
      undefind_error       = 8
      double_conversion    = 9
      stepl_not_found      = 10
      OTHERS               = 11.
IF sy-subrc EQ 0.
    READ TABLE lt_dynpfields1 INDEX 1.
ENDIF.
stepl_index1 = lt_dynpfields1-stepl.
CALL FUNCTION 'F4IF_FIELD_VALUE_REQUEST'
    EXPORTING
      tabname           = 'IFLOT'
      fieldname         = 'I_MPRN-MPRN'
      searchhelp        = 'ZS_MPRN_PC'
      dynpprog          = sy-repid
      dynpnr            = sy-dynnr
    TABLES
      return_tab        = lt_f4
    EXCEPTIONS
      field_not_found   = 1
      no_help_for_field = 2
      inconsistent_help = 3
      no_values_found   = 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.
Update tablecontrol
READ TABLE lt_f4 WITH KEY fieldname = 'MPRN'.
IF sy-subrc = 0.
    MOVE lt_f4-fieldval TO i_mprn-mprn.
    ws_dyname1   = 'ZSRO_MASTER_DATA'.
    ws_dynumb1   = '0301'.
    ws_dynpfld1-fieldname ='I_MPRN-MPRN'.
    ws_dynpfld1-fieldvalue = i_mprn-mprn.
    ws_dynpfld1-stepl      = stepl_index1.
    APPEND ws_dynpfld1 TO i_dnpfld1.
    CALL FUNCTION 'DYNP_VALUES_UPDATE'
      EXPORTING
        dyname               = ws_dyname1
        dynumb               = ws_dynumb1
      TABLES
        dynpfields           = i_dnpfld1
      EXCEPTIONS
        invalid_abapworkarea = 1
        invalid_dynprofield = 2
        invalid_dynproname   = 3
        invalid_dynpronummer = 4
        invalid_request      = 5
        no_fielddescription = 6
        undefind_error       = 7
        OTHERS               = 8.
    IF sy-subrc <> 0.
    ENDIF.
ENDIF.
CLEAR : i_dnpfld1, ws_dynpfld1.
REFRESH: i_dnpfld1.
READ TABLE lt_f4 WITH KEY fieldname = 'ZZPSTLZ'.
IF sy-subrc = 0.
    MOVE lt_f4-fieldval TO i_mprn-post_code.
    ws_dyname1   = 'ZSRO_MASTER_DATA'.
    ws_dynumb1   = '0301'.
    ws_dynpfld1-fieldname ='I_MPRN-POST_CODE'.
    ws_dynpfld1-fieldvalue = i_mprn-post_code.
    ws_dynpfld1-stepl      = stepl_index1.
    APPEND ws_dynpfld1 TO i_dnpfld1.
    CALL FUNCTION 'DYNP_VALUES_UPDATE'
      EXPORTING
        dyname               = ws_dyname1
        dynumb               = ws_dynumb1
      TABLES
        dynpfields           = i_dnpfld1
      EXCEPTIONS
        invalid_abapworkarea = 1
        invalid_dynprofield = 2
        invalid_dynproname   = 3
        invalid_dynpronummer = 4
        invalid_request      = 5
        no_fielddescription = 6
        undefind_error       = 7
        OTHERS               = 8.
    IF sy-subrc <> 0.
    ENDIF.
ENDIF.
ENDMODULE.                 " mprn1_f4 INPUT
*&      Module pstlz1_f4 INPUT
      text
MODULE pstlz1_f4 INPUT.
CLEAR: i_dnpfld1, ws_dyname1, ws_dynumb1, ws_dynpfld1,
          lt_f4, lt_returntab1,lt_dynpfields1, lt_f4,
          stepl1, stepl_index1.
REFRESH: i_dnpfld1, lt_returntab1,lt_dynpfields1, lt_f4.
To Determine Steploop Index
lt_dynpfields1-fieldname = 'I_MPRN-MPRN'.
lt_dynpfields1-stepl     = stepl1.
APPEND lt_dynpfields1. CLEAR lt_dynpfields1.
CALL FUNCTION 'DYNP_VALUES_READ'
    EXPORTING
      dyname               = sy-repid
      dynumb               = sy-dynnr
      translate_to_upper   = 'X'
      determine_loop_index = 'X'
    TABLES
      dynpfields           = lt_dynpfields1
    EXCEPTIONS
      invalid_abapworkarea = 1
      invalid_dynprofield = 2
      invalid_dynproname   = 3
      invalid_dynpronummer = 4
      invalid_request      = 5
      no_fielddescription = 6
      invalid_parameter    = 7
      undefind_error       = 8
      double_conversion    = 9
      stepl_not_found      = 10
      OTHERS               = 11.
IF sy-subrc EQ 0.
    READ TABLE lt_dynpfields1 INDEX 1.
ENDIF.
stepl_index1 = lt_dynpfields1-stepl.
CALL FUNCTION 'F4IF_FIELD_VALUE_REQUEST'
    EXPORTING
      tabname           = 'IFLOT'
      fieldname         = 'I_MPRN-POST_CODE'
      searchhelp        = 'ZS_MPRN_PC'
      dynpprog          = sy-repid
      dynpnr            = sy-dynnr
    TABLES
      return_tab        = lt_f4
    EXCEPTIONS
      field_not_found   = 1
      no_help_for_field = 2
      inconsistent_help = 3
      no_values_found   = 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.
Update tablecontrol
READ TABLE lt_f4 WITH KEY fieldname = 'ZZPSTLZ'.
IF sy-subrc = 0.
    MOVE lt_f4-fieldval TO i_mprn-post_code.
    ws_dyname1   = 'ZSRO_MASTER_DATA'.
    ws_dynumb1   = '0301'.
    ws_dynpfld1-fieldname ='I_MPRN-POST_CODE'.
    ws_dynpfld1-fieldvalue = i_mprn-post_code.
    ws_dynpfld1-stepl      = stepl_index1.
    APPEND ws_dynpfld1 TO i_dnpfld1.
    CALL FUNCTION 'DYNP_VALUES_UPDATE'
      EXPORTING
        dyname               = ws_dyname1
        dynumb               = ws_dynumb1
      TABLES
        dynpfields           = i_dnpfld1
      EXCEPTIONS
        invalid_abapworkarea = 1
        invalid_dynprofield = 2
        invalid_dynproname   = 3
        invalid_dynpronummer = 4
        invalid_request      = 5
        no_fielddescription = 6
        undefind_error       = 7
        OTHERS               = 8.
    IF sy-subrc <> 0.
    ENDIF.
ENDIF.
CLEAR : i_dnpfld1, ws_dynpfld1.
REFRESH: i_dnpfld1.
READ TABLE lt_f4 WITH KEY fieldname = 'MPRN'.
IF sy-subrc = 0.
    MOVE lt_f4-fieldval TO i_mprn-mprn.
    ws_dyname1   = 'ZSRO_MASTER_DATA'.
    ws_dynumb1   = '0301'.
    ws_dynpfld1-fieldname ='I_MPRN-MPRN'.
    ws_dynpfld1-fieldvalue = i_mprn-mprn.
    ws_dynpfld1-stepl      = stepl_index1.
    APPEND ws_dynpfld1 TO i_dnpfld1.
    CALL FUNCTION 'DYNP_VALUES_UPDATE'
      EXPORTING
        dyname               = ws_dyname1
        dynumb               = ws_dynumb1
      TABLES
        dynpfields           = i_dnpfld1
      EXCEPTIONS
        invalid_abapworkarea = 1
        invalid_dynprofield = 2
        invalid_dynproname   = 3
        invalid_dynpronummer = 4
        invalid_request      = 5
        no_fielddescription = 6
        undefind_error       = 7
        OTHERS               = 8.
    IF sy-subrc <> 0.
    ENDIF.
ENDIF.
ENDMODULE.                 " pstlz1_f4 INPUT
Regards,
Prakash.

How to create customer exit for characteristic variables and for text vars.

hi friends,
can anybody tell me how to create customer exit for characteristic variables and for text variables in bw ides system.
thanks,
sree

Hi,
Please have a look at:
https://www.sdn.sap.com/irj/sdn/go/portal/prtroot/docs/library/uuid/f1a7e790-0201-0010-0a8d-f08a4662562d
Krzys

How to Created custom report for Ship not Billed (SD/FI)?

Hi all,
I am anticipating to write some abap reports..Here is one of them..
Anyone can help me with writing a Report , how to do 'Custom Report for shipped not Billed(SD/FI)' ..But since I am new to Abap , if you wish to reply, please use a little more detail and simple explanation, step by step so I can understand what is the idea, how it can be acheived...what kind of report should be used , techniques, tables etc...:)
Appreciate your help!
Regards,
Boby

Hi Boby,
You need to create custom transaction to achive these results.
you will have selection-screen ,it would be :
Date : Here date would be mandatory - Ranges Option
Customer - Optional field - Ranges
Order # Sales Order (Optional) Ranges
Invoice # - Invoice # (Optional) Ranges
You will get the data based on ur selection-screen criteria ...
First you will have customer order details from diffrent table
VBAK,
VBAP,
LIKP
LIPS
VBRK,
VBRP
KNA1,
VBFA Tables ( See the my sample program )
Output would be :
Customer #   Custome Name    Order #   Delivery #   Invoice #   Netpr, Netquantity ,
Check the condition whether invoice table has VBRK-RFBSK = ''.
See the my sample program : This is sales report by monthly..
REPORT ZFDSALES_REPORT no standard page heading
                       message-id zwave.
Data Declaration Part
TYPE-POOLS
type-pools : slis.
Tables
tables : VBAK,
         VBAP.
Internal table for VBAK Table
data : begin of i_vbak occurs 0,
       vbeln like vbak-vbeln,
       bstnk like vbak-bstnk,
       vdatu like vbak-vdatu,
       end of i_vbak.
Internal table for VBAP and MATNR
data : begin of i_vbap occurs 0,
       vbeln like vbap-vbeln,
       matnr like vbap-matnr,
       kdmat like vbap-kdmat,
       kwmeng like vbap-kwmeng,
       netpr like vbap-netpr,
       maktx like makt-maktx,
       end of i_vbap.
Internal tables
data : begin of i_sales occurs 0,
       vdatu like vbak-vdatu,
       bstnk like vbak-bstnk,
       matnr like vbap-matnr,
       maktx like makt-maktx,
       kdmat like vbap-kdmat,
       kwmeng like vbap-kwmeng,
       netpr like vbap-netpr,
       end of i_sales.
Variable for ALV
data : v_repid like sy-repid,
       gt_fieldcat    type slis_t_fieldcat_alv.
Selection-screen
selection-screen : begin of block blk with frame title text-001.
select-options : s_vbeln for vbak-vbeln,
                 s_erdat for vbak-erdat,
                 s_ernam for vbak-ernam,
                 s_vdatu for vbak-vdatu obligatory,
                 s_BSTNK for vbak-BSTNK,
                 s_KUNNR for vbak-kunnr,
                 s_matnr for vbap-matnr,
                 s_KDMAT for vbap-KDMAT.
selection-screen : end of block blk.
Initilization
initialization.
v_repid = sy-repid.
S T A R T - O F - S E L E C T I O N ****************
start-of-selection.
Get the data from VBAK and VBAP Tables
perform get_vbak_vbap.
E N D - O F - S E L E C T I O N *****************
end-of-selection.
Display the data
perform dispolay_data.
*&      Form get_vbak_vbap
      Get the data from VBAK and VBAP Table
FORM get_vbak_vbap.
Get the data from VBAK Table
select vbeln bstnk vdatu from vbak into table i_vbak
                     where vbeln in s_vbeln
                     and   bstnk in s_bstnk
                     and   vdatu in s_vdatu
                     and   kunnr in s_kunnr
                     and   erdat in s_erdat
                     and   ernam in s_ernam.
if sy-subrc ne 0.
    message e000(zwave) with 'No data found for given selection'.
endif.
Get the data from VBAP Table
select avbeln amatnr akdmat akwmeng a~netpr
         b~maktx into table i_vbap
         from vbap as a inner join makt as b on bmatnr = amatnr
         for all entries in i_vbak
         where a~vbeln in s_vbeln
         and   a~kdmat in s_kdmat
         and   a~abgru = space
         and   a~matnr in s_matnr
         and   a~matnr ne '000000000000009999'
         and   a~matnr ne '000000000000004444'
         and   a~matnr ne '000000000000008888'
         and   a~matnr ne '000000000000001111'
         and   a~werks = '1000'
         and   b~spras = 'E'
         and   a~vbeln = i_vbak-vbeln.
if sy-subrc ne 0.
    message e000(zwave) with 'No data found for given selection'.
endif.
sort i_vbak by vbeln.
sort i_vbap by vbeln matnr.
loop at i_vbap.
    read table i_vbak with key vbeln = i_vbap-vbeln
                            binary search.
    if sy-subrc eq 0.
      i_sales-bstnk = i_vbak-bstnk.
      i_sales-vdatu = i_vbak-vdatu.
      i_sales-matnr = i_vbap-matnr.
      i_sales-kdmat = i_vbap-kdmat.
      i_sales-maktx = i_vbap-maktx.
      i_sales-netpr = i_vbap-netpr.
      i_sales-kwmeng = i_vbap-kwmeng.
      append i_sales.
    else.
      continue.
    endif.
    clear : i_sales,
            i_vbap,
            i_vbak.
endloop.
sort i_sales by vdatu bstnk matnr.
refresh : i_vbap,
            i_vbak.
ENDFORM.                    " get_vbak_vbap
*&      Form dispolay_data
      Display the data
FORM dispolay_data.
Fill the Fiedlcat
PERFORM fieldcat_init using gt_fieldcat[].
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
   EXPORTING
I_INTERFACE_CHECK                 = ' '
I_BYPASSING_BUFFER                =
I_BUFFER_ACTIVE                   = ' '
      I_CALLBACK_PROGRAM                = v_repid
I_CALLBACK_PF_STATUS_SET          = ' '
I_CALLBACK_USER_COMMAND           = ' '
I_CALLBACK_TOP_OF_PAGE            = ' '
I_CALLBACK_HTML_TOP_OF_PAGE       = ' '
I_CALLBACK_HTML_END_OF_LIST       = ' '
I_STRUCTURE_NAME                  =
I_BACKGROUND_ID                   = ' '
I_GRID_TITLE                      =
I_GRID_SETTINGS                   =
IS_LAYOUT                         =
      IT_FIELDCAT                       = gt_fieldcat[]
IT_EXCLUDING                      =
IT_SPECIAL_GROUPS                 =
IT_SORT                           =
IT_FILTER                         =
IS_SEL_HIDE                       =
I_DEFAULT                         = 'X'
I_SAVE                            = ' '
IS_VARIANT                        =
IT_EVENTS                         =
IT_EVENT_EXIT                     =
IS_PRINT                          =
IS_REPREP_ID                      =
I_SCREEN_START_COLUMN             = 0
I_SCREEN_START_LINE               = 0
I_SCREEN_END_COLUMN               = 0
I_SCREEN_END_LINE                 = 0
IT_ALV_GRAPHICS                   =
IT_ADD_FIELDCAT                   =
IT_HYPERLINK                      =
I_HTML_HEIGHT_TOP                 =
I_HTML_HEIGHT_END                 =
IT_EXCEPT_QINFO                   =
IMPORTING
E_EXIT_CAUSED_BY_CALLER           =
ES_EXIT_CAUSED_BY_USER            =
    TABLES
      T_OUTTAB                          = i_sales
EXCEPTIONS
PROGRAM_ERROR                     = 1
OTHERS                            = 2
ENDFORM.                    " dispolay_data
*&      Form fieldcat_init
      text
     -->P_GT_FIELDCAT[] text
FORM fieldcat_init USING e01_lt_fieldcat type slis_t_fieldcat_alv.
DATA: LS_FIELDCAT TYPE SLIS_FIELDCAT_ALV.
Delivery Date
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'VDATU'.
LS_FIELDCAT-OUTPUTLEN    = 12.
LS_FIELDCAT-TABNAME    = 'I_SALES'.
ls_fieldcat-seltext_L = 'Delivery Date'.
APPEND LS_FIELDCAT TO E01_LT_FIELDCAT.
Purchase Order #Material Description
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'BSTNK'.
LS_FIELDCAT-OUTPUTLEN    = 25.
LS_FIELDCAT-TABNAME    = 'I_SALES'.
ls_fieldcat-seltext_L = 'Purchase Order #'.
APPEND LS_FIELDCAT TO E01_LT_FIELDCAT.
Material
CLEAR LS_FIELDCAT.
LS_FIELDCAT-REF_FIELDNAME    = 'MATNR'.
LS_FIELDCAT-REF_TABNAME    = 'MARA'.
LS_FIELDCAT-FIELDNAME    = 'MATNR'.
LS_FIELDCAT-TABNAME    = 'I_SALES'.
ls_fieldcat-seltext_L = 'Material #'.
ls_fieldcat-seltext_M = 'Material #'.
ls_fieldcat-seltext_S = 'Material #'.
APPEND LS_FIELDCAT TO E01_LT_FIELDCAT.
Material Description
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'MAKTX'.
LS_FIELDCAT-OUTPUTLEN    = 40.
LS_FIELDCAT-TABNAME    = 'I_SALES'.
ls_fieldcat-seltext_L = 'Material Description'.
APPEND LS_FIELDCAT TO E01_LT_FIELDCAT.
Customer Material #
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'KDMAT'.
LS_FIELDCAT-OUTPUTLEN    = 35.
LS_FIELDCAT-TABNAME    = 'I_SALES'.
ls_fieldcat-seltext_L = 'Customer material no.'.
APPEND LS_FIELDCAT TO E01_LT_FIELDCAT.
Quantity
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'KWMENG'.
LS_FIELDCAT-OUTPUTLEN    = 15.
LS_FIELDCAT-TABNAME    = 'I_SALES'.
ls_fieldcat-seltext_L = 'Quantity'.
APPEND LS_FIELDCAT TO E01_LT_FIELDCAT.
Net Price
CLEAR LS_FIELDCAT.
LS_FIELDCAT-FIELDNAME    = 'NETPR'.
LS_FIELDCAT-OUTPUTLEN    = 15.
LS_FIELDCAT-TABNAME    = 'I_SALES'.
ls_fieldcat-seltext_L = 'Net Price'.
APPEND LS_FIELDCAT TO E01_LT_FIELDCAT.
ENDFORM.                    " fieldcat_init
Reward Points if it is helpful
Thanks
Seshu

How to create custom adapter for Products and CommerceService

Hi guys!
First of all I wanted to say that I did search. Only relevant material I found was this http://dev.day.com/docs/en/cq/5-5/ecommerce/eCommerce-framework.html
Unfortunately it doesn't go in details enough...
I'm trying to follow geometrixx-outdoors example to create my shoppingCart. I have a list of of products in /etc/commerce/products.... referenced by productPage in content.
But I don't know how to create custom CommerceProvider and Adapter to create proper Product objects - it always picks up geoProductImpl.
As I understand I need to specify cq:commerceProvider to myProvider and then I need to somehow register MyProvider so it gets picked up.
Also I guess I need to add MyProductAdapter somehow so when shoppingCart executes following it returns my implementation instead of geoProductImpl.
Product product = productResource.adaptTo(Product.class);
I'd really appreciate if anyone could share an example or point me in the right direction for a guide.
Cheers
Kostya

Hi Kostya,
Look at this presentation recorded at http://dev.day.com/ddc/en/gems/commerce-framework.html
Thanks,
Sham

How to create custom template for webcenter portal application

Hi,
I created webcenter portal application in my jdev using the webcenter portal application template provided by the webcenter framework.
I tried to create custom template for my application by following steps:
1. Created new application using webcenter portal application template with all default package structure.
2. Right click pagetemplates folder under webcontent package and select new option.
3. New gallery opens up.
4. Selected JSF under webtier and JSF Page Template under items in the right hand side and clicked Ok button.
5. New wizard opens up for creating new JSF page template.
6. Gave template name(file name) and Page Template Name(template def name).
7. Selected checkbox staing start a Quick Start Layout and selected three column layout and selected Ok.
8. Selected checkbox for Create Associated ADFm Page Defination(so that page templates can be changes at run time).
9. Created some Facet Definations (header, footer, content1, content2, LHN, RHN).
10. Clicked Ok button which will create custom template.
11. Added some Panel Group Layout component from Component Palette.
12. Created new page (.jspx) with this template.
Now when I try to add producer portlets created using Producer Portlet application template and connected to the above application using WSRP2.0, I'm facing problem.
The prolem is that I'm not able to add more than one portlet in one single page?
Kindly let me know whether the steps followed by me is wrong some where and needs to corrected and let me know how I can add more than one portlet to page?
Basically I cant see more than one placeholders in my page to add portlets.

Thanks Yannick.
In the step 9 I had mentioned that I created various facet definations (header, footer, content, content1 RHN and LHN).
Is this is not facet you are talking about or should I drop facet ref from the resource palette?
Can't I add moer than one portlet to my page at design time itself?
Annoying since in weblogic portal we do this at design time(.portal).

How to create Search Help For Ztable fields

Hi all,
Please let me know How to create Search Help in SE11(what are the parameter i should pass)
and How to maintain search help for Ztable fields at DIctionary level (in SE11) and programming level.

hello .
there are two types of search helps .
1. elementary search help .
2. collective serch help
Below are the steps to create elementary search helps :
1 In the initial screen of the ABAP Dictionary, select object class Search help, enter the name of the search help and choose Create.
2.then youget a option elementary or collective search as per you r need .
3.select Elementary search help and choose
4.write explanatory text in the field Short text.
5. in the selection method give the name of the table or a view .
6 . Select the fields that should be used for value selection or in a hit list .
7. then define the attributes of the search help .
8 Select the IMP flag if it is an import parameter. Select the EXP flag if it is an export parameter.
9 .define the dialog type of the search help.
The dialog type tells how the hit list will be displayed in the input help.
10 . save and activate .
plz reward if usefull
Thanks ,
Abhishek .

How to create search help for field in interactive adobe form

HI
I want to create search help for PERNR field in adobe form.
how i can do it.
Can any one giud me.
Regards,
Laxman Sankhla

Hi Laxman,
Please search SDN, there are lots of queries posted and solved earlier on this.
especially there are step by step blogs.
Cheers,
Sai

How to create search help for Web Dynpro?

Hi all,
I have troubles when creating search help for web dynpro. I have visited this link /people/dirk.rehberg/blog/2006/12/27/generic-search-help-for-web-dynpro-for-java but I can't find this generic search help plug-in for download. If u have this plug-in can u share it for me or upload somewhere for download. Or anyone has already done this search help please help me solve this problem! Thanks in advance!

Hi Dinh Thieu Thien,
please place such a request to the appropriate forum "[Web Dynpro for Java|Web Dynpro Java;".
Thanks and regards,
Boris

How to create F4 help for a coloumn in CL_GUI_ALV_GRID?

Hi experts,
I have created alv grid on a container where i can enter data. But i need to create f4 help for a coloumn in the grid.Can you experts suggest some way to do it??
Thanks in advance
regards,
Ashwin

Hi ,
Follow thios code.
Develop a method in your class as follows.
CLASS CL_PRICE_DATA DEFINITION.
PUBLIC SECTION.
ON_F4
FOR EVENT ONF4 OF CL_GUI_ALV_GRID
IMPORTING ES_ROW_NO E_FIELDNAME ER_EVENT_DATA.
CLASS CL_PRICE_DATA IMPLEMENTATION.
F4 for Reason Code
METHOD ON_F4.
FIELD-SYMBOLS: <FT_MODI> TYPE LVC_T_MODI .
REFRESH :GT_FIELD_TAB,GT_VALUE_TAB,GT_RETURN.
IF E_FIELDNAME = 'CTMBRCHGREASCD'.
LOOP AT VALUES_TAB INTO VALUE_TAB.
MOVE VALUE_TAB-CTMBRCHGREASCD TO GS_VALUE_TAB-STRING .
APPEND GS_VALUE_TAB TO GT_VALUE_TAB.
CLEAR : GS_VALUE_TAB.
MOVE VALUE_TAB-CTMBRCHGRSNDSC TO GS_VALUE_TAB-STRING .
APPEND GS_VALUE_TAB TO GT_VALUE_TAB.
CLEAR :GS_VALUE_TAB.
ENDLOOP.
GS_FIELD_TAB-FIELDNAME = 'CTMBRCHGREASCD' .
GS_FIELD_TAB-TABNAME = '/CPC/TCTMBRCHG'.
APPEND GS_FIELD_TAB TO GT_FIELD_TAB.
clear GS_FIELD_TAB.
GS_FIELD_TAB-FIELDNAME = 'CTMBRCHGRSNDSC' .
GS_FIELD_TAB-TABNAME = '/CPC/TCTMBRCHG'.
APPEND GS_FIELD_TAB TO GT_FIELD_TAB.
clear GS_FIELD_TAB.
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
EXPORTING
RETFIELD = 'CTMBRCHGREASCD'
VALUE_ORG = 'C'
TABLES
VALUE_TAB = GT_VALUE_TAB
FIELD_TAB = GT_FIELD_TAB
RETURN_TAB = GT_RETURN.
ASSIGN ER_EVENT_DATA->M_DATA->* TO <FT_MODI>.
GWA_MODI-ROW_ID = ES_ROW_NO-ROW_ID.
LOOP AT GT_RETURN INTO GWA_LS_RETURN .
GWA_MODI-FIELDNAME = GWA_LS_RETURN-FIELDNAME.
GWA_MODI-VALUE = GWA_LS_RETURN-FIELDVAL.
INSERT GWA_MODI INTO TABLE <FT_MODI>.
READ TABLE VALUES_TAB INTO VALUE_TAB WITH KEY CTMBRCHGREASCD =
GWA_LS_RETURN-FIELDVAL.
GWA_MODI-FIELDNAME = 'CTMBRCHGRSNDSC'.
GWA_MODI-VALUE = VALUE_TAB-CTMBRCHGRSNDSC.
INSERT GWA_MODI INTO TABLE <FT_MODI>.
ENDLOOP.
ER_EVENT_DATA->M_EVENT_HANDLED = 'TRUE'.
ELSEIF E_FIELDNAME = 'CONTMBRSTATCODE'.
loop at gt_member_status into gs_member_status.
MOVE gs_member_status-status TO GS_VALUE_TAB-STRING .
APPEND GS_VALUE_TAB TO GT_VALUE_TAB.
CLEAR : GS_VALUE_TAB.
MOVE gs_member_status-description TO GS_VALUE_TAB-STRING .
APPEND GS_VALUE_TAB TO GT_VALUE_TAB.
CLEAR :GS_VALUE_TAB.
endloop.
GS_FIELD_TAB-FIELDNAME = 'CONTMBRSTATCODE' .
GS_FIELD_TAB-TABNAME = '/CPC/TCTMBRHST'.
GS_FIELD_TAB-reptext = 'Member Status'.
APPEND GS_FIELD_TAB TO GT_FIELD_TAB.
clear GS_FIELD_TAB .
GS_FIELD_TAB-FIELDNAME = 'CTSTATSHRTDESC' .
GS_FIELD_TAB-TABNAME = '/CPC/TCONSTAT'.
APPEND GS_FIELD_TAB TO GT_FIELD_TAB.
GS_FIELD_TAB-FIELDNAME = 'CTMBRCHGRSNDSC' .
GS_FIELD_TAB-TABNAME = '/CPC/TCTMBRCHG'.
APPEND GS_FIELD_TAB TO GT_FIELD_TAB.
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
EXPORTING
RETFIELD = 'CONTMBRSTATCODE'
VALUE_ORG = 'C'
TABLES
VALUE_TAB = GT_VALUE_TAB
FIELD_TAB = GT_FIELD_TAB
RETURN_TAB = GT_RETURN.
ASSIGN ER_EVENT_DATA->M_DATA->* TO <FT_MODI>.
GWA_MODI-ROW_ID = ES_ROW_NO-ROW_ID.
LOOP AT GT_RETURN INTO GWA_LS_RETURN .
GWA_MODI-FIELDNAME = GWA_LS_RETURN-FIELDNAME.
GWA_MODI-VALUE = GWA_LS_RETURN-FIELDVAL.
INSERT GWA_MODI INTO TABLE <FT_MODI>.
READ TABLE VALUES_TAB INTO VALUE_TAB WITH KEY CTMBRCHGREASCD =
GWA_LS_RETURN-FIELDVAL.
GWA_MODI-FIELDNAME = 'CTMBRCHGRSNDSC'.
GWA_MODI-VALUE = VALUE_TAB-CTMBRCHGRSNDSC.
INSERT GWA_MODI INTO TABLE <FT_MODI>.
ENDLOOP.
ER_EVENT_DATA->M_EVENT_HANDLED = 'TRUE'.
ELSEIF E_FIELDNAME = 'SH_CUST_NMBR'.
LOOP AT GT_SHARED_CUSTOMER INTO GS_SHARED_CUSTOMER.
SELECT SINGLE CUST_NAME FROM /CPC/TCUSTOMER INTO
GS_SHARED_CUSTOMER-CUST_NAME
WHERE CUST_NMBR = GS_SHARED_CUSTOMER-SH_CUST_NMBR.
MOVE GS_SHARED_CUSTOMER-SH_CUST_NMBR TO GS_VALUE_TAB-STRING .
APPEND GS_VALUE_TAB TO GT_VALUE_TAB.
CLEAR : GS_VALUE_TAB.
MOVE GS_SHARED_CUSTOMER-CUST_NAME TO GS_VALUE_TAB-STRING .
APPEND GS_VALUE_TAB TO GT_VALUE_TAB.
CLEAR : GS_VALUE_TAB.
ENDLOOP.
GS_FIELD_TAB-FIELDNAME = 'SH_CUST_NMBR' .
GS_FIELD_TAB-TABNAME = '/CPC/TGRPSHRHLD'.
APPEND GS_FIELD_TAB TO GT_FIELD_TAB.
clear GS_FIELD_TAB.
GS_FIELD_TAB-FIELDNAME = 'CUST_NAME' .
GS_FIELD_TAB-TABNAME = '/CPC/TCUSTOMER'.
APPEND GS_FIELD_TAB TO GT_FIELD_TAB.
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
EXPORTING
RETFIELD = 'SH_CUST_NMBR'
VALUE_ORG = 'C'
TABLES
VALUE_TAB = GT_VALUE_TAB
FIELD_TAB = GT_FIELD_TAB
RETURN_TAB = GT_RETURN.
ASSIGN ER_EVENT_DATA->M_DATA->* TO <FT_MODI>.
GWA_MODI-ROW_ID = ES_ROW_NO-ROW_ID.
LOOP AT GT_RETURN INTO GWA_LS_RETURN .
GWA_MODI-FIELDNAME = GWA_LS_RETURN-FIELDNAME.
GWA_MODI-VALUE = GWA_LS_RETURN-FIELDVAL.
INSERT GWA_MODI INTO TABLE <FT_MODI>.
ENDLOOP.
ER_EVENT_DATA->M_EVENT_HANDLED = 'TRUE'.
ENDIF.
ENDMETHOD.
This will trigger when do a F4 on the field .
Apart from this in the fieldcatalog for that field assign 'X' for the field F4AVAILABL and also set handler eventobj->on_f4 for grid .
Please reward if useful.

Please help! error -61399, how to create custom vi for every input in project explorer

Please help! I have been trying whole night but couldn't get through it.
I am creating custom vi to simulate cRIO inputs on development computer. ( FPGA target>>execute vi on>> development computer>>custom vi) I then follow tutorial creating test benches:
Tutorial: Creating Test Benches (FPGA Module)
but when I run fpga vi I get error -61399, input item/node is not supported (input item/node is my input which I've added from project explorer).
The closest I got in my research on why this error is occuring- I have not connected all inputs/outputs in project explorer to custom vi. I followed tutorial exactly step by step but still I couldn't get through it.
Please help! Please help!
In order to do further investigation, I converted custom vi to a state machine , please find attachment. Having highlight execution on, it clearly demonstrates that input in cRIO are not being selected as a result default cases execute.
Please find attached modified custom vi with state machine, fpga vi, and original custom vi.
Best regards
Ta
Attachments:
custom vi.vi ‏32 KB
inverter.vi ‏16 KB
original custom vi.vi ‏22 KB

Solution:
You will see this error if no Custom VI has been selected or the Custom VI has not been configured for every I/O item that you are using in your FPGA code???
I think that's exactly where I'm stuck!
How do I configure it for inputs??? My attachement show that I have done everything being asked in tutorial!
Thanks!

How to create custom folder for parameterized query

Hi Gurus,
I developed a query to generate report to " who is reporting to who in organization", when i am trying to create custom folder using this query but i am getting error like "The custom sql entered contains parameter and therefore invalid". Could you please help to parameterize the emp_key in query in Oracle Discoverer. Is there any way to pass the value using external procedure for this query.
SELECT
lpad(' ', 8 *(LEVEL -1)) || emp_last_name, emp_key, manager_id, emp_key, manager_key,
mgr_last_name, mgr_first_name, empid,
emp_last_name, emp_first_name, LEVEL FROM cmp_ppl1 START WITH emp_key = &emp_key
CONNECT BY PRIOR emp_key = manager_key;
Thanks & Regards
Vikram

I agree 100% that it's way easier to create a dataview or a custom folder - with no run time parameters being passed to the EUL - as is being done by Vikram.
The only concern I would have is that I don't know if it would work - or at least ever come back in reasonable time - for Vikram and therefore the question about parameters (only Vikram can say).
The reason I'm wondering is that I've created SQL similar to being shown (when used in an org chart report at a large client) and the start / connect by is used for going down the tree getting everyone on the way. And if it's not limited - that could be a huge undertaking - of records and/or time. Guess it depends on how many people work at the organization (and of course, levels).
But otherwise, absolutely, I would try and bring back all logical records to the folder and then filter in Disco.
Russ

How to create custom BAPI for a project on Agentry?

As I am very new to BAPI creation, I would like to get some helpful pdf documents or links for creating custom BAPIs, which would fetch data for an Agentry Project to be build.
Tags edited by: Michael Appleby

Rajkamal,
I would recommend you work through the following tutorial on how to build an Agentry application from scratch. It covers creating a BAPI to retrieve data from the SAP backend to Agentry.
Part 1 - http://scn.sap.com/docs/DOC-47550
Part 2 - http://scn.sap.com/docs/DOC-47651
--Bill

How to create search help for Maintanence View

Hi,
I want to create a Search Help for a Maintanence View and bring Conditions
in this Search Help. Condition can be as e.q. Show me only the Records with Status 2.
How can I achieve this?
Thanks.
Best Regards
Beserithan Malabakan

HI,
You can create this in SE11, there create a search help, and in the Minatain Search HElp screen, give the Maintanance view name and give the field anmes as you want, and right side you will find 'Default Values', there you can give the default values, so here in the Field name give as <b>STATUS</b> and in the Defaule Value will be <b>2</b>.
Regards
Sudheer

How to create custom help for a sub VI ?

Similar Messages

Maybe you are looking for