Community
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
Turn on suggestions
Auto-suggest helps you quickly narrow down your search results by suggesting possible matches as you type.
Showing results for 
Search instead for 
Did you mean: 
Read only

F110-Transaction

Former Member

‎2007 Mar 05 8:28 AM

0 Likes
1,051

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.

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.

Reply
6 REPLIES 6
Read only

Former Member

‎2007 Mar 05 8:48 AM

0 Likes
995

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

Read only

Former Member

‎2007 Mar 05 8:54 AM

0 Likes
995

You can get that table REGUV

fields are LAUFD and LAUFI

Read only

Former Member

‎2007 Mar 06 7:47 AM

0 Likes
995

Hi pandiyan,

problem solved.

Regards, Dieter

Read only

Former Member
In response to Former Member

‎2007 Mar 06 9:37 AM

0 Likes
995

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.

Read only

Former Member
In response to Former Member

‎2007 Mar 06 10:01 AM

0 Likes
995

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.

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.

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

Read only

Former Member
In response to Former Member

‎2007 Mar 06 10:28 AM

0 Likes
995

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.