Search help from one field used to populate another on subscreen.

Question

I have a subscreen with 2 fields;  Plant & Batch.   Search help MCH1F displays batches for plants.  When a batch for a plant is selected in the search help for the batch field, I want to populate the plant field in addition to the batch.  The batch number comes back from the search help selection, but I need to get the plant associated with that batch just selected and populate the subscreen plant field.  SET/GET doesn't work either in the screen field setup or abap flow logic.   Any tips would be appreciated.  Thanks.

Answer 1

Hi Kurt,
i think that way its not possible but the closest way is
i HAVE TWO TABLES
ZPHY
ZPROC
I HAVE SCREEN  IN WHICH I HAVE TO GET VALUE FOR  PHY BASED ON ID.
AND FOR OTHER FIELD IN THE SCREEN I HAVE PROC BASED ON THE ID I USED TO GET PHY AND  FOR THE SAME ID I AHVE MULTIPLE PROC AND I HAVE SELECT ONE OF THOSE , HERE WHEN YOU PRESS F4 IT WILL GIVE ALL THE PROC ASSOCIATED TO
ID THATI USED IN THE SELECTION OF PHY.
AND I THINK YOURS IS THE SAME CASE RIGHT.
FIRST GET
process on value-request.
FIELD zabc-def MODULE VALUE_REQUEST_PHYACT.
FIELD zabc-proc MODULE VALUE_REQUEST_PROC.
MODULE VALUE_REQUEST_PHYACT INPUT.
DATA: progname TYPE sy-repid,
      dynnum   TYPE sy-dynnr.
CLEAR zabc.
CLEAR : zabc-def, zabc-id, zabc-proc,
zabc-ZSHECPROC.
CLEAR FINAL.
CALL FUNCTION 'F4IF_FIELD_VALUE_REQUEST'
  EXPORTING
    TABNAME                   = 'ZPHY'
    FIELDNAME                 = 'def'
    SEARCHHELP                = 'ZPHY'
  SHLPPARAM                 = ' '
    DYNPPROG                  = PROGNAME
    DYNPNR                    = DYNNUM
  DYNPROFIELD               = ' '
  STEPL                     = 0
  VALUE                     = ' '
  MULTIPLE_CHOICE           = ' '
  DISPLAY                   = ' '
  SUPPRESS_RECORDLIST       = ' '
  CALLBACK_PROGRAM          = ' '
  CALLBACK_FORM             = ' '
  TABLES
    RETURN_TAB                = IT_RETURN4
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.
read table it_return4 index 1.
zabc-def = it_return4-fieldval.
select single id into zabc-id FROM ZPHY
                      WHERE def = zabc-def.
FINAL-def = zabc-def.
FINAL-id = zabc-id.
HERE BASED ON ID I AM RETRIEVING  DEF FIELD ,THIS IS FROM SEARCH HELP USING SE11.
AND FOR THE SAME ID I HAVE TO GET PROC FIELD FROM ANOTHER TABLE
ENDMODULE.                 " VALUE_REQUEST_PHYACT  INPUT
MODULE VALUE_REQUEST_PROC INPUT.
DATA : SERVICE LIKE zabc-id.
select single id into SERVICE FROM ZPHY
                      WHERE def = zabc-def.
SELECT * INTO TABLE ITAB_TEST4 FROM ZPROC
                  WHERE id = SERVICE.
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
  EXPORTING
  DDIC_STRUCTURE         = ' '
    RETFIELD               = 'proc'
  PVALKEY                = ' '
  DYNPPROG               = ' '
  DYNPNR                 = ' '
  DYNPROFIELD            = ' '
  STEPL                  = 0
    WINDOW_TITLE           = 'PROCEDURE'
  VALUE                  = ' '
    VALUE_ORG              = 'S'
  MULTIPLE_CHOICE        = ' '
  DISPLAY                = ' '
  CALLBACK_PROGRAM       = ' '
  CALLBACK_FORM          = ' '
  TABLES
    VALUE_TAB              = ITAB_TEST4
  FIELD_TAB              =
    RETURN_TAB             = IT_RETURN4
  DYNPFLD_MAPPING        =
EXCEPTIONS
  PARAMETER_ERROR        = 1
  NO_VALUES_FOUND        = 2
  OTHERS                 = 3
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
if sy-subrc = 0.
          clear itab_TEST4.
          read table it_return4 index 1.
               zabc-proc = it_return4-fieldval.
     read table itab_TEST4 with key id = itab_details-def
         itab_zMOR-def = itab_details-def.
         itab_zMOR-zzfname  = itab_details-zzfname.
        endif.
SELECT SINGLE ZSHECPROC INTO zabc-ZSHECPROC FROM ZPROC
WHERE proc = zabc-proc.
FINAL-proc = zabc-proc.
final-zshecproc = zabc-zshecproc.
*********AGAIN THIS IS NOT THE SEARCH HELP FROM SE11
ENDMODULE.                 " VALUE_REQUEST_PROC  INPUT
hope this helps
Thanks