Vendor reports?

[Former Member]

Hi Friends,

Is there any report which displays Vendor No. Vendor Name, Amount, Vendor address, etc., If so please let me know or any other similar report where we can get all related information about Vendor.

All answers will be rewarded.

Regards,

SMP

[Former Member]

Hi Friends,

Is there any report which displays Vendor No. Vendor Name, Amount, Vendor address, etc., If so please let me know or any other similar report where we can get all related information about Vendor.

All answers will be rewarded.

Regards,

SMP

[nikhil_chitre]

Hi,

The details you are looking for are in table LFA1.

Build a report...by querying on this table...

Regards,

Nikhil

[Former Member]

REPORT ZRMMXEBM_VENDOR_GENERAL_DATA.

----

---

• INCLUDES

----

---

INCLUDE <symbol>.

INCLUDE <ICON>.

----

---

• TABLES

----

---

TABLES: LFA1.

----

---

• TYPES

----

---

TYPES: BEGIN OF T_LIS,

LIFNR LIKE LFA1-LIFNR, "Vendor

LAND1 LIKE LFA1-LAND1, "Country key

NAME1 LIKE LFA1-NAME1, "Name 1

NAME2 LIKE LFA1-NAME2, "Name 2

NAME3 LIKE LFA1-NAME3, "Name 3

NAME4 LIKE LFA1-NAME4, "Name 4

ORT01 LIKE LFA1-ORT01, "City

PSTLZ LIKE LFA1-PSTLZ, "Postal Code

REGIO LIKE LFA1-REGIO, "Region

SORTL LIKE LFA1-SORTL, "Sort field

STRAS LIKE LFA1-STRAS, "Address

BRSCH LIKE LFA1-BRSCH, "Industry key

ERDAT LIKE LFA1-ERDAT, "Created on

ERNAM LIKE LFA1-ERNAM, "Created by

KTOKK LIKE LFA1-KTOKK, "Vendor account group

KUNNR LIKE LFA1-KUNNR, "Customer number

LNRZA LIKE LFA1-LNRZA, "Alternative Payee

LOEVM LIKE LFA1-LOEVM, "Central Deletion Flag

SPERR LIKE LFA1-SPERR, "Central posting block

SPERM LIKE LFA1-SPERM, "Central purchasing block

SPRAS LIKE LFA1-SPRAS, "Language key

STCD1 LIKE LFA1-STCD1, "Tax number 1

STCD2 LIKE LFA1-STCD2, "Tax number 2

TELF1 LIKE LFA1-TELF1, "First telephone number

TELFX LIKE LFA1-TELFX, "Fax number

VBUND LIKE LFA1-VBUND, "Trading partner

STCEG LIKE LFA1-STCEG, "VAT registration number

STKZN LIKE LFA1-STKZN, "Natural person?

KRAUS LIKE LFA1-KRAUS, "Credit information number

END OF T_LIS.

TYPE-POOLS: SLIS.

----

---

• INTERNAL TABLES *

----

---

• Internal table with variables for output.

DATA: t_listado TYPE STANDARD TABLE OF t_lis

INITIAL SIZE 0 WITH HEADER LINE.

----

---

• CONSTANTS *

----

---

----

---

• VARIABLES *

----

---

• Variable with the number of lines for output.

DATA lineas LIKE sy-tabix.

DATA TABKEY_AUX LIKE CDPOS-TABKEY.

*ALV data declarations

DATA:

ls_fieldcat TYPE slis_t_fieldcat_alv WITH HEADER LINE,

gd_tab_group TYPE slis_t_sp_group_alv,

gd_layout TYPE slis_layout_alv,

titulo TYPE lvc_title,

gt_events TYPE slis_alv_event OCCURS 0 WITH HEADER LINE,

• g_formname TYPE slis_formname VALUE 'TOP_OF_PAGE',

alv_header TYPE slis_listheader OCCURS 0 WITH HEADER LINE,

gd_repid LIKE sy-repid.

----

---

• SELECTION SCREEN

----

---

SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE text-030.

SELECT-OPTIONS: S_LIFNR FOR LFA1-LIFNR,

S_KTOKK FOR LFA1-KTOKK,

S_LAND1 FOR LFA1-LAND1,

S_NAME1 FOR LFA1-NAME1,

S_LOEVM FOR LFA1-LOEVM,

S_ERDAT FOR LFA1-ERDAT,

S_BRSCH FOR LFA1-BRSCH,

S_STCD1 FOR LFA1-STCD1,

S_STCD2 FOR LFA1-STCD2,

S_STCEG FOR LFA1-STCEG,

S_VBUND FOR LFA1-VBUND,

S_KRAUS FOR LFA1-KRAUS,

S_STKZN FOR LFA1-STKZN.

SELECTION-SCREEN END OF BLOCK B1.

----

---

• EVENTS

----

---

*----

---

***

• INITIALIZATION ***

*----

---

***

INITIALIZATION.

PERFORM inicializar_tablas.

----

---

• START-OF-SELECTION

----

---

START-OF-SELECTION.

PERFORM inicializar_datos_alv.

PERFORM build_layout.

PERFORM data_selection.

----

---

• END-OF-SELECTION

----

---

END-OF-SELECTION.

CLEAR lineas.

DESCRIBE TABLE t_listado LINES lineas.

• If no entries for output are considered, message "Data not exist for

• selection" appears.

IF lineas EQ 0.

MESSAGE s000(5@) WITH text-031.

ELSE.

PERFORM get_events.

PERFORM data_alv.

ENDIF.

----

---

• FUNCIONES *

----

---

----

---

• Form INICIALIZAR_TABLAS *

----

---

• In this routine initialization of internal tables involved in the *

• program is made. *

----

---

FORM inicializar_tablas.

REFRESH: t_listado. " Ouput list internal table.

CLEAR: t_listado. " Ouput list internal table.

ENDFORM. " INICIALIZAR_TABLAS

----

---

• Form INICIALIZAR_DATOS_ALV *

----

---

• In this routine, initialization of ALV data is made. *

----

---

FORM inicializar_datos_alv.

gd_repid = sy-repid.

PERFORM build_fieldcatalog.

ENDFORM.

----

---

• Form BUILD_FIELDCATALOG *

----

---

• Building of catalog of fields is made into this routine. *

----

---

FORM build_fieldcatalog.

DATA columna(2) TYPE n.

CLEAR ls_fieldcat.

columna = 0.

*----

---

Vendor (TEXT-001)

• LS_FIELDCAT-TABNAME = 'T_LISTADO'.

ls_fieldcat-fieldname = 'LIFNR'.

• LS_FIELDCAT-LZERO = 'X'.

• LS_FIELDCAT_OUTPUTLEN = 10.

• LS_FIELDCAT-NO_OUT = ' '.

ls_fieldcat-col_pos = columna.

ls_fieldcat-seltext_s = text-001.

ls_fieldcat-seltext_l = text-001.

ls_fieldcat-seltext_m = text-001.

APPEND ls_fieldcat TO ls_fieldcat.

CLEAR ls_fieldcat.

columna = columna + 1.

*----

---

Vendor (TEXT-002)

• LS_FIELDCAT-TABNAME = 'T_LISTADO'.

ls_fieldcat-fieldname = 'LAND1'.

• LS_FIELDCAT-LZERO = 'X'.

• LS_FIELDCAT_OUTPUTLEN = 10.

• LS_FIELDCAT-NO_OUT = ' '.

ls_fieldcat-col_pos = columna.

ls_fieldcat-seltext_s = text-002.

ls_fieldcat-seltext_l = text-002.

ls_fieldcat-seltext_m = text-002.

APPEND ls_fieldcat TO ls_fieldcat.

CLEAR ls_fieldcat.

columna = columna + 1.

*----

---

Vendor (TEXT-003)

• LS_FIELDCAT-TABNAME = 'T_LISTADO'.

ls_fieldcat-fieldname = 'NAME1'.

• LS_FIELDCAT-LZERO = 'X'.

• LS_FIELDCAT_OUTPUTLEN = 10.

• LS_FIELDCAT-NO_OUT = ' '.

ls_fieldcat-col_pos = columna.

ls_fieldcat-seltext_s = text-003.

ls_fieldcat-seltext_l = text-003.

ls_fieldcat-seltext_m = text-003.

APPEND ls_fieldcat TO ls_fieldcat.

CLEAR ls_fieldcat.

columna = columna + 1.

*----

---

Vendor (TEXT-004)

• LS_FIELDCAT-TABNAME = 'T_LISTADO'.

ls_fieldcat-fieldname = 'NAME2'.

• LS_FIELDCAT-LZERO = 'X'.

• LS_FIELDCAT_OUTPUTLEN = 10.

• LS_FIELDCAT-NO_OUT = ' '.

ls_fieldcat-col_pos = columna.

ls_fieldcat-seltext_s = text-004.

ls_fieldcat-seltext_l = text-004.

ls_fieldcat-seltext_m = text-004.

APPEND ls_fieldcat TO ls_fieldcat.

CLEAR ls_fieldcat.

columna = columna + 1.

*----

---

Vendor (TEXT-005)

• LS_FIELDCAT-TABNAME = 'T_LISTADO'.

ls_fieldcat-fieldname = 'NAME3'.

• LS_FIELDCAT-LZERO = 'X'.

• LS_FIELDCAT_OUTPUTLEN = 10.

• LS_FIELDCAT-NO_OUT = ' '.

ls_fieldcat-col_pos = columna.

ls_fieldcat-seltext_s = text-005.

ls_fieldcat-seltext_l = text-005.

ls_fieldcat-seltext_m = text-005.

APPEND ls_fieldcat TO ls_fieldcat.

CLEAR ls_fieldcat.

columna = columna + 1.

*----

---

Vendor (TEXT-006)

• LS_FIELDCAT-TABNAME = 'T_LISTADO'.

ls_fieldcat-fieldname = 'NAME4'.

• LS_FIELDCAT-LZERO = 'X'.

• LS_FIELDCAT_OUTPUTLEN = 10.

• LS_FIELDCAT-NO_OUT = ' '.

ls_fieldcat-col_pos = columna.

ls_fieldcat-seltext_s = text-006.

ls_fieldcat-seltext_l = text-006.

ls_fieldcat-seltext_m = text-006.

APPEND ls_fieldcat TO ls_fieldcat.

CLEAR ls_fieldcat.

columna = columna + 1.

*----

---

Vendor (TEXT-007)

• LS_FIELDCAT-TABNAME = 'T_LISTADO'.

ls_fieldcat-fieldname = 'ORT01'.

• LS_FIELDCAT-LZERO = 'X'.

• LS_FIELDCAT_OUTPUTLEN = 10.

• LS_FIELDCAT-NO_OUT = ' '.

ls_fieldcat-col_pos = columna.

ls_fieldcat-seltext_s = text-007.

ls_fieldcat-seltext_l = text-007.

ls_fieldcat-seltext_m = text-007.

APPEND ls_fieldcat TO ls_fieldcat.

CLEAR ls_fieldcat.

columna = columna + 1.

*----

---

Vendor (TEXT-008)

• LS_FIELDCAT-TABNAME = 'T_LISTADO'.

ls_fieldcat-fieldname = 'PSTLZ'.

• LS_FIELDCAT-LZERO = 'X'.

• LS_FIELDCAT_OUTPUTLEN = 10.

• LS_FIELDCAT-NO_OUT = ' '.

ls_fieldcat-col_pos = columna.

ls_fieldcat-seltext_s = text-008.

ls_fieldcat-seltext_l = text-008.

ls_fieldcat-seltext_m = text-008.

APPEND ls_fieldcat TO ls_fieldcat.

CLEAR ls_fieldcat.

columna = columna + 1.

*----

---

Vendor (TEXT-009)

• LS_FIELDCAT-TABNAME = 'T_LISTADO'.

ls_fieldcat-fieldname = 'REGIO'.

• LS_FIELDCAT-LZERO = 'X'.

• LS_FIELDCAT_OUTPUTLEN = 10.

• LS_FIELDCAT-NO_OUT = ' '.

ls_fieldcat-col_pos = columna.

ls_fieldcat-seltext_s = text-009.

ls_fieldcat-seltext_l = text-009.

ls_fieldcat-seltext_m = text-009.

APPEND ls_fieldcat TO ls_fieldcat.

CLEAR ls_fieldcat.

columna = columna + 1.

*----

---

Vendor (TEXT-010)

• LS_FIELDCAT-TABNAME = 'T_LISTADO'.

ls_fieldcat-fieldname = 'SORTL'.

• LS_FIELDCAT-LZERO = 'X'.

• LS_FIELDCAT_OUTPUTLEN = 10.

• LS_FIELDCAT-NO_OUT = ' '.

ls_fieldcat-col_pos = columna.

ls_fieldcat-seltext_s = text-010.

ls_fieldcat-seltext_l = text-010.

ls_fieldcat-seltext_m = text-010.

APPEND ls_fieldcat TO ls_fieldcat.

CLEAR ls_fieldcat.

columna = columna + 1.

*----

---

Vendor (TEXT-011)

• LS_FIELDCAT-TABNAME = 'T_LISTADO'.

ls_fieldcat-fieldname = 'STRAS'.

• LS_FIELDCAT-LZERO = 'X'.

• LS_FIELDCAT_OUTPUTLEN = 10.

• LS_FIELDCAT-NO_OUT = ' '.

ls_fieldcat-col_pos = columna.

ls_fieldcat-seltext_s = text-011.

ls_fieldcat-seltext_l = text-011.

ls_fieldcat-seltext_m = text-011.

APPEND ls_fieldcat TO ls_fieldcat.

CLEAR ls_fieldcat.

columna = columna + 1.

*----

---

Vendor (TEXT-012)

• LS_FIELDCAT-TABNAME = 'T_LISTADO'.

ls_fieldcat-fieldname = 'BRSCH'.

• LS_FIELDCAT-LZERO = 'X'.

• LS_FIELDCAT_OUTPUTLEN = 10.

• LS_FIELDCAT-NO_OUT = ' '.

ls_fieldcat-col_pos = columna.

ls_fieldcat-seltext_s = text-012.

ls_fieldcat-seltext_l = text-012.

ls_fieldcat-seltext_m = text-012.

APPEND ls_fieldcat TO ls_fieldcat.

CLEAR ls_fieldcat.

columna = columna + 1.

*----

---

Vendor (TEXT-013)

• LS_FIELDCAT-TABNAME = 'T_LISTADO'.

ls_fieldcat-fieldname = 'ERDAT'.

• LS_FIELDCAT-LZERO = 'X'.

• LS_FIELDCAT_OUTPUTLEN = 10.

• LS_FIELDCAT-NO_OUT = ' '.

ls_fieldcat-col_pos = columna.

ls_fieldcat-seltext_s = text-013.

ls_fieldcat-seltext_l = text-013.

ls_fieldcat-seltext_m = text-013.

APPEND ls_fieldcat TO ls_fieldcat.

CLEAR ls_fieldcat.

columna = columna + 1.

*----

---

Vendor (TEXT-014)

• LS_FIELDCAT-TABNAME = 'T_LISTADO'.

ls_fieldcat-fieldname = 'ERNAM'.

• LS_FIELDCAT-LZERO = 'X'.

• LS_FIELDCAT_OUTPUTLEN = 10.

• LS_FIELDCAT-NO_OUT = ' '.

ls_fieldcat-col_pos = columna.

ls_fieldcat-seltext_s = text-014.

ls_fieldcat-seltext_l = text-014.

ls_fieldcat-seltext_m = text-014.

APPEND ls_fieldcat TO ls_fieldcat.

CLEAR ls_fieldcat.

columna = columna + 1.

*----

---

Vendor (TEXT-015)

• LS_FIELDCAT-TABNAME = 'T_LISTADO'.

ls_fieldcat-fieldname = 'KTOKK'.

• LS_FIELDCAT-LZERO = 'X'.

• LS_FIELDCAT_OUTPUTLEN = 10.

• LS_FIELDCAT-NO_OUT = ' '.

ls_fieldcat-col_pos = columna.

ls_fieldcat-seltext_s = text-015.

ls_fieldcat-seltext_l = text-015.

ls_fieldcat-seltext_m = text-015.

APPEND ls_fieldcat TO ls_fieldcat.

CLEAR ls_fieldcat.

columna = columna + 1.

*----

---

Vendor (TEXT-016)

• LS_FIELDCAT-TABNAME = 'T_LISTADO'.

ls_fieldcat-fieldname = 'KUNNR'.

• LS_FIELDCAT-LZERO = 'X'.

• LS_FIELDCAT_OUTPUTLEN = 10.

• LS_FIELDCAT-NO_OUT = ' '.

ls_fieldcat-col_pos = columna.

ls_fieldcat-seltext_s = text-016.

ls_fieldcat-seltext_l = text-016.

ls_fieldcat-seltext_m = text-016.

APPEND ls_fieldcat TO ls_fieldcat.

CLEAR ls_fieldcat.

columna = columna + 1.

*----

---

Vendor (TEXT-017)

• LS_FIELDCAT-TABNAME = 'T_LISTADO'.

ls_fieldcat-fieldname = 'LNRZA'.

• LS_FIELDCAT-LZERO = 'X'.

• LS_FIELDCAT_OUTPUTLEN = 10.

• LS_FIELDCAT-NO_OUT = ' '.

ls_fieldcat-col_pos = columna.

ls_fieldcat-seltext_s = text-017.

ls_fieldcat-seltext_l = text-017.

ls_fieldcat-seltext_m = text-017.

APPEND ls_fieldcat TO ls_fieldcat.

CLEAR ls_fieldcat.

columna = columna + 1.

*----

---

Vendor (TEXT-018)

• LS_FIELDCAT-TABNAME = 'T_LISTADO'.

ls_fieldcat-fieldname = 'LOEVM'.

• LS_FIELDCAT-LZERO = 'X'.

• LS_FIELDCAT_OUTPUTLEN = 10.

• LS_FIELDCAT-NO_OUT = ' '.

ls_fieldcat-col_pos = columna.

ls_fieldcat-seltext_s = text-018.

ls_fieldcat-seltext_l = text-018.

ls_fieldcat-seltext_m = text-018.

APPEND ls_fieldcat TO ls_fieldcat.

CLEAR ls_fieldcat.

columna = columna + 1.

*----

---

Vendor (TEXT-019)

• LS_FIELDCAT-TABNAME = 'T_LISTADO'.

ls_fieldcat-fieldname = 'SPERR'.

• LS_FIELDCAT-LZERO = 'X'.

• LS_FIELDCAT_OUTPUTLEN = 10.

• LS_FIELDCAT-NO_OUT = ' '.

ls_fieldcat-col_pos = columna.

ls_fieldcat-seltext_s = text-019.

ls_fieldcat-seltext_l = text-019.

ls_fieldcat-seltext_m = text-019.

APPEND ls_fieldcat TO ls_fieldcat.

CLEAR ls_fieldcat.

columna = columna + 1.

*----

---

Vendor (TEXT-020)

• LS_FIELDCAT-TABNAME = 'T_LISTADO'.

ls_fieldcat-fieldname = 'SPERM'.

• LS_FIELDCAT-LZERO = 'X'.

• LS_FIELDCAT_OUTPUTLEN = 10.

• LS_FIELDCAT-NO_OUT = ' '.

ls_fieldcat-col_pos = columna.

ls_fieldcat-seltext_s = text-020.

ls_fieldcat-seltext_l = text-020.

ls_fieldcat-seltext_m = text-020.

APPEND ls_fieldcat TO ls_fieldcat.

CLEAR ls_fieldcat.

columna = columna + 1.

*----

---

Vendor (TEXT-021)

• LS_FIELDCAT-TABNAME = 'T_LISTADO'.

ls_fieldcat-fieldname = 'SPRAS'.

• LS_FIELDCAT-LZERO = 'X'.

• LS_FIELDCAT_OUTPUTLEN = 10.

• LS_FIELDCAT-NO_OUT = ' '.

ls_fieldcat-col_pos = columna.

ls_fieldcat-seltext_s = text-021.

ls_fieldcat-seltext_l = text-021.

ls_fieldcat-seltext_m = text-021.

APPEND ls_fieldcat TO ls_fieldcat.

CLEAR ls_fieldcat.

columna = columna + 1.

*----

---

Vendor (TEXT-022)

• LS_FIELDCAT-TABNAME = 'T_LISTADO'.

ls_fieldcat-fieldname = 'STCD1'.

• LS_FIELDCAT-LZERO = 'X'.

• LS_FIELDCAT_OUTPUTLEN = 10.

• LS_FIELDCAT-NO_OUT = ' '.

ls_fieldcat-col_pos = columna.

ls_fieldcat-seltext_s = text-022.

ls_fieldcat-seltext_l = text-022.

ls_fieldcat-seltext_m = text-022.

APPEND ls_fieldcat TO ls_fieldcat.

CLEAR ls_fieldcat.

columna = columna + 1.

*----

---

Vendor (TEXT-023)

• LS_FIELDCAT-TABNAME = 'T_LISTADO'.

ls_fieldcat-fieldname = 'STCD2'.

• LS_FIELDCAT-LZERO = 'X'.

• LS_FIELDCAT_OUTPUTLEN = 10.

• LS_FIELDCAT-NO_OUT = ' '.

ls_fieldcat-col_pos = columna.

ls_fieldcat-seltext_s = text-023.

ls_fieldcat-seltext_l = text-023.

ls_fieldcat-seltext_m = text-023.

APPEND ls_fieldcat TO ls_fieldcat.

CLEAR ls_fieldcat.

columna = columna + 1.

*----

---

Vendor (TEXT-024)

• LS_FIELDCAT-TABNAME = 'T_LISTADO'.

ls_fieldcat-fieldname = 'TELF1'.

• LS_FIELDCAT-LZERO = 'X'.

• LS_FIELDCAT_OUTPUTLEN = 10.

• LS_FIELDCAT-NO_OUT = ' '.

ls_fieldcat-col_pos = columna.

ls_fieldcat-seltext_s = text-024.

ls_fieldcat-seltext_l = text-024.

ls_fieldcat-seltext_m = text-024.

APPEND ls_fieldcat TO ls_fieldcat.

CLEAR ls_fieldcat.

columna = columna + 1.

*----

---

Vendor (TEXT-025)

• LS_FIELDCAT-TABNAME = 'T_LISTADO'.

ls_fieldcat-fieldname = 'TELFX'.

• LS_FIELDCAT-LZERO = 'X'.

• LS_FIELDCAT_OUTPUTLEN = 10.

• LS_FIELDCAT-NO_OUT = ' '.

ls_fieldcat-col_pos = columna.

ls_fieldcat-seltext_s = text-025.

ls_fieldcat-seltext_l = text-025.

ls_fieldcat-seltext_m = text-025.

APPEND ls_fieldcat TO ls_fieldcat.

CLEAR ls_fieldcat.

columna = columna + 1.

*----

---

Vendor (TEXT-026)

• LS_FIELDCAT-TABNAME = 'T_LISTADO'.

ls_fieldcat-fieldname = 'VBUND'.

• LS_FIELDCAT-LZERO = 'X'.

• LS_FIELDCAT_OUTPUTLEN = 10.

• LS_FIELDCAT-NO_OUT = ' '.

ls_fieldcat-col_pos = columna.

ls_fieldcat-seltext_s = text-026.

ls_fieldcat-seltext_l = text-026.

ls_fieldcat-seltext_m = text-026.

APPEND ls_fieldcat TO ls_fieldcat.

CLEAR ls_fieldcat.

columna = columna + 1.

*----

---

Vendor (TEXT-027)

• LS_FIELDCAT-TABNAME = 'T_LISTADO'.

ls_fieldcat-fieldname = 'STCEG'.

• LS_FIELDCAT-LZERO = 'X'.

• LS_FIELDCAT_OUTPUTLEN = 10.

• LS_FIELDCAT-NO_OUT = ' '.

ls_fieldcat-col_pos = columna.

ls_fieldcat-seltext_s = text-027.

ls_fieldcat-seltext_l = text-027.

ls_fieldcat-seltext_m = text-027.

APPEND ls_fieldcat TO ls_fieldcat.

CLEAR ls_fieldcat.

columna = columna + 1.

*----

---

Vendor (TEXT-028)

• LS_FIELDCAT-TABNAME = 'T_LISTADO'.

ls_fieldcat-fieldname = 'STKZN'.

• LS_FIELDCAT-LZERO = 'X'.

• LS_FIELDCAT_OUTPUTLEN = 10.

• LS_FIELDCAT-NO_OUT = ' '.

ls_fieldcat-col_pos = columna.

ls_fieldcat-seltext_s = text-028.

ls_fieldcat-seltext_l = text-028.

ls_fieldcat-seltext_m = text-028.

APPEND ls_fieldcat TO ls_fieldcat.

CLEAR ls_fieldcat.

columna = columna + 1.

*----

---

Vendor (TEXT-029)

• LS_FIELDCAT-TABNAME = 'T_LISTADO'.

ls_fieldcat-fieldname = 'KRAUS'.

• LS_FIELDCAT-LZERO = 'X'.

• LS_FIELDCAT_OUTPUTLEN = 10.

• LS_FIELDCAT-NO_OUT = ' '.

ls_fieldcat-col_pos = columna.

ls_fieldcat-seltext_s = text-029.

ls_fieldcat-seltext_l = text-029.

ls_fieldcat-seltext_m = text-029.

APPEND ls_fieldcat TO ls_fieldcat.

CLEAR ls_fieldcat.

columna = columna + 1.

ENDFORM. " BUILD_FIELDCATALOG

----

---

• Form TOP_OF_PAGE *

----

---

• EVENT TOP-OF-PAGE: HEADER OF THE LIST *

----

---

*FORM top_of_page.

*

• DATA text(200).

• CLEAR: text.

*

• REFRESH alv_header.

• text = text-025. "'Stock Value: Slow-moving items'.

• alv_header-typ = 'H'.

• alv_header-info = text.

• APPEND alv_header.

*

• PERFORM header.

*

*ENDFORM. " TOP_OF_PAGE

----

---

• Form HEADER *

----

---

• HEADER OF THE LIST IN ALV FORMAT. *

----

---

FORM header.

CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'

EXPORTING

it_list_commentary = alv_header[].

ENDFORM. " HEADER

----

---

• Form GET_EVENTS *

----

---

• Obtaining events for ALV control. *

----

---

FORM get_events.

CALL FUNCTION 'REUSE_ALV_EVENTS_GET'

EXPORTING

i_list_type = 0

IMPORTING

et_events = gt_events[].

• READ TABLE gt_events WITH KEY name = slis_ev_top_of_page.

• IF sy-subrc = 0.

• MOVE g_formname TO gt_events-form.

• APPEND gt_events.

• ENDIF.

ENDFORM. " GET_EVENTS

----

---

• Form DATA_SELECTION *

----

---

• Selection of data involved in output. *

----

---

FORM data_selection.

CLEAR T_LISTADO.

SELECT * FROM LFA1 INTO CORRESPONDING FIELDS OF T_LISTADO

WHERE LIFNR IN S_LIFNR AND

KTOKK IN S_KTOKK AND

LAND1 IN S_LAND1 AND

NAME1 IN S_NAME1 AND

LOEVM IN S_LOEVM AND

ERDAT IN S_ERDAT AND

BRSCH IN S_BRSCH AND

STCD1 IN S_STCD1 AND

STCD2 IN S_STCD2 AND

STCEG IN S_STCEG AND

VBUND IN S_VBUND AND

KRAUS IN S_KRAUS AND

STKZN IN S_STKZN

ORDER BY PRIMARY KEY.

APPEND T_LISTADO.

CLEAR T_LISTADO.

ENDSELECT.

ENDFORM. " DATA_SELECTION

----

---

• Form DATA_ALV *

----

---

• Calling to the function module of ALV for layout data *

----

---

FORM data_alv.

CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'

EXPORTING

i_callback_program = gd_repid

i_grid_title = titulo

is_layout = gd_layout

it_fieldcat = ls_fieldcat[] " Fields in screen

i_save = 'X'

it_events = gt_events[]

TABLES

t_outtab = t_listado.

IF sy-subrc <> 0.

• MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO

• WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

ENDIF.

ENDFORM. " DATA_ALV

----

---

• Form BUILD_LAYOUT *

----

---

• Building final layout of report *

----

---

FORM build_layout.

gd_layout-no_input = 'X'.

gd_layout-colwidth_optimize = 'X'.

gd_layout-totals_text = 'Totals'(201).

ENDFORM. " BUILD_LAYOUT

Reward points..

[Former Member]

Hi,

Please check out thses Transaction Codes

S_ALR_87012087 - Vender Address List

S_ALR_87012086 - Vendor List. ( Program - RFKKVZ00 )

MVKZ - List of Vendors: Purchasing ( Program - RMKKVZ00 )

Best regards,

raam

[kesavadas_thekkillath]

get the list of vendor number from LFA1..

pass LFA1-adrnr to ADRC and get the relevant address of a vendor

[Former Member]

Hi there,

I am able to get the all the vendor details but not the vendor amount, can any one tell me where I can get the vendor amount.

Regards,

SMP

[Former Member]

Hi,

Table names

LFA1-Vendor master

LFB1-Vendor per company code

LFB5-Vendor dunning data

LFM-Purchasing organization data

LFM2-Purchasing data

LFBK-Bank details

please check thses Tcodes

MCE3:Vendor analysis Selection

MCVA: Vendor Analysis Lot Overview

MCVA : Vendor Analysis Lot Overview

MCVB : General Results for Vendor

MCVC : Vendor Analysis - Qty Overvie

MCVD : Quant. Results for Vendor

MCVE : Vendor Analysis Quality Score

MCVG : Vendor Analysis - Lot Numbers

MCVI : Vendor Analysis - Quantities

MCVK : Vendor Analysis - Effort

MCVM : Vendor Analyis - Level & Disp

MCVO : Vendor Analysis - Lots Overview

ME2L:Purchase Orders by Vendor

Vendor Line item display FBL1N .

Best regards,

raam