topic F110-Transaction in Application Development and Automation Discussions

F110-Transaction

Former Member — Mon, 05 Mar 2007 08:28:13 GMT

The values that entered in the field LAUFD(Run date) and LAUFI(Identification)

in F110 transaction, should be reflected in my Z-program screen fields(Run date and identification) which is assgined for a particular payment method in F110 transaction.Help me out to solve this issue.

Thanks.

Re: F110-Transaction

Former Member — Mon, 05 Mar 2007 08:48:23 GMT

Hi pandiyan,

look at table REGUV and REGUT.

Details are with SE16 and REGU*. There are some tables for details.

Hope it helps.

Regards, Dieter

Re: F110-Transaction

Former Member — Mon, 05 Mar 2007 08:54:50 GMT

You can get that table REGUV

fields are LAUFD and LAUFI

Re: F110-Transaction

Former Member — Tue, 06 Mar 2007 07:47:40 GMT

Hi pandiyan,

problem solved.

Regards, Dieter

Re: F110-Transaction

Former Member — Tue, 06 Mar 2007 09:37:25 GMT

Hi Dieter ,

yes that table was affected.But both Identification and run date are primary key in that table.So it will be a problem to fetch from that table , i think so.

Re: F110-Transaction

Former Member — Tue, 06 Mar 2007 10:01:52 GMT

Hi pandiyan,

make your own F4 like this:

TYPE-POOLS: SLIS.

TABLES: REGUV.

PARAMETERS: P_LAUFD LIKE REGUV-LAUFD.

PARAMETERS: P_LAUFI LIKE REGUV-LAUFI.

DATA: DYNFIELDS TYPE TABLE OF DYNPREAD WITH HEADER LINE.

DATA: FIELDCAT_REGUV TYPE SLIS_T_FIELDCAT_ALV,

WA_FIELDCAT TYPE SLIS_FIELDCAT_ALV,

SELFIELD TYPE SLIS_SELFIELD,

ALV_EXIT(1).

DATA: BEGIN OF ITAB_REGUV OCCURS 0,

LAUFD LIKE REGUV-LAUFD,

LAUFI LIKE REGUV-LAUFI,

END OF ITAB_REGUV.

AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_LAUFD.

ALV als Popup ausgeben

CALL FUNCTION 'REUSE_ALV_POPUP_TO_SELECT'

EXPORTING

I_TITLE = 'Liste der Zahlungen'

I_TABNAME = 'ITAB_REGUV'

IT_FIELDCAT = FIELDCAT_REGUV

IMPORTING

ES_SELFIELD = SELFIELD

E_EXIT = ALV_EXIT

TABLES

T_OUTTAB = ITAB_REGUV

EXCEPTIONS

PROGRAM_ERROR = 1

OTHERS = 2.

IF SY-SUBRC = 0 AND ALV_EXIT = SPACE.

READ TABLE ITAB_REGUV INDEX SELFIELD-TABINDEX.

IF SY-SUBRC = 0.

DYNFIELDS-FIELDNAME = 'P_LAUFD'.

WRITE ITAB_REGUV-LAUFD TO DYNFIELDS-FIELDVALUE.

APPEND DYNFIELDS.

DYNFIELDS-FIELDNAME = 'P_LAUFI'.

WRITE ITAB_REGUV-LAUFI TO DYNFIELDS-FIELDVALUE.

APPEND DYNFIELDS.

CALL FUNCTION 'DYNP_VALUES_UPDATE'

EXPORTING

DYNAME = SY-REPID

DYNUMB = SY-DYNNR

TABLES

DYNPFIELDS = DYNFIELDS.

ENDIF.

AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_LAUFI.

ALV als Popup ausgeben

CALL FUNCTION 'REUSE_ALV_POPUP_TO_SELECT'

EXPORTING

I_TITLE = 'Liste der IDs / Cities'

I_TABNAME = 'ITAB_REGUV'

IT_FIELDCAT = FIELDCAT_REGUV

IMPORTING

ES_SELFIELD = SELFIELD

E_EXIT = ALV_EXIT

TABLES

T_OUTTAB = ITAB_REGUV

EXCEPTIONS

PROGRAM_ERROR = 1

OTHERS = 2.

IF SY-SUBRC = 0 AND ALV_EXIT = SPACE.

READ TABLE ITAB_REGUV INDEX SELFIELD-TABINDEX.

IF SY-SUBRC = 0.

P_MATNR = ITAB_MATNR.

DYNFIELDS-FIELDNAME = 'P_LAUFD'.

WRITE ITAB_REGUV-LAUFD TO DYNFIELDS-FIELDVALUE.

APPEND DYNFIELDS.

DYNFIELDS-FIELDNAME = 'P_LAUFI'.

WRITE ITAB_REGUV-LAUFI TO DYNFIELDS-FIELDVALUE.

APPEND DYNFIELDS.

CALL FUNCTION 'DYNP_VALUES_UPDATE'

EXPORTING

DYNAME = SY-REPID

DYNUMB = SY-DYNNR

TABLES

DYNPFIELDS = DYNFIELDS.

ENDIF.

INITIALIZATION.

CLEAR WA_FIELDCAT.

WA_FIELDCAT-TABNAME = 'ITAB_REGUV'.

WA_FIELDCAT-REF_TABNAME = 'REGUV'.

WA_FIELDCAT-REF_FIELDNAME = 'LAUFD'.

WA_FIELDCAT-FIELDNAME = 'LAUFD'.

APPEND WA_FIELDCAT TO FIELDCAT_REGUV.

CLEAR WA_FIELDCAT.

WA_FIELDCAT-TABNAME = 'ITAB_REGUV'.

WA_FIELDCAT-REF_TABNAME = 'REGUV'.

WA_FIELDCAT-REF_FIELDNAME = 'LAUFI'.

WA_FIELDCAT-FIELDNAME = 'LAUFI'.

APPEND WA_FIELDCAT TO FIELDCAT_REGUV.

SELECT LAUFD LAUFI INTO TABLE ITAB_REGUV FROM REGUV.

START-OF-SELECTION.

SELECT * FROM REGUV WHERE LAUFD = P_LAUFD

AND LAUFI = P_LAUFI.

WRITE: / REGUV-LAUFD, REGUV-LAUFI.

ENDSELECT.

Hope it helps.

Regards, Dieter

Re: F110-Transaction

Former Member — Tue, 06 Mar 2007 10:28:02 GMT

Hi Dieter,

thanks for your quick reply.

My requirement is as follow,

In Transaction F110 , user will enter the Run date and Identification.

In the same transaction F110 , I am going to assign my Z-program for a particular payment method.If i execute my Z-program, it also contains the run date and Identification.By creating a variant for Z-program user going to run Payment transcation F110.So if user does not enter the values for rundate and identification in the variant of my Z-program,then at this time I have to fetch the values of run date and identification from the initial screen of the F110 transaction.So how to do this.