{"id":306,"date":"2010-02-03T11:31:56","date_gmt":"2010-02-03T09:31:56","guid":{"rendered":"http:\/\/www.karadere.com\/blog\/?p=306"},"modified":"2010-02-03T11:31:56","modified_gmt":"2010-02-03T09:31:56","slug":"abap-listbox-and-itab-or-table","status":"publish","type":"post","link":"https:\/\/www.karadere.com\/blog\/abap-listbox-and-itab-or-table.html","title":{"rendered":"Abap Listbox and itab or table"},"content":{"rendered":"

\"sap-abap-logo\"<\/span><\/span><\/p>\n

TYPE<\/span>-POOLS\u00a0:\u00a0vrm.
\nTABLES<\/span>:vbak,vbap.
\nDATA<\/span>\u00a0:\u00a0v(80<\/span>)\u00a0TYPE<\/span>\u00a0c<\/span>.<\/span><\/p>\n

DATA<\/span>:\u00a0wa_vbak\u00a0TYPE<\/span>\u00a0vbak,
\nit_vbak\u00a0TYPE<\/span>\u00a0vbak\u00a0OCCURS<\/span>\u00a00<\/span>\u00a0WITH<\/span>\u00a0HEADER<\/span>\u00a0LINE<\/span>,
\nwa_vbap\u00a0TYPE<\/span>\u00a0vbap,
\nit_vbap\u00a0TYPE<\/span>\u00a0vbap\u00a0OCCURS<\/span>\u00a00<\/span>\u00a0WITH<\/span>\u00a0HEADER<\/span>\u00a0LINE<\/span>.
\nDATA<\/span>:\u00a0l_name\u00a0TYPE<\/span>\u00a0vrm_id,
\nli_list\u00a0TYPE<\/span>\u00a0vrm_values\u00a0,
\nv_count\u00a0TYPE<\/span>\u00a0i<\/span>,
\nl_value\u00a0LIKE<\/span>\u00a0LINE<\/span>\u00a0OF<\/span>\u00a0li_list.<\/p>\n

PARAMETERS<\/span>:\u00a0p_test(20<\/span>)\u00a0AS<\/span>\u00a0LISTBOX\u00a0VISIBLE\u00a0LENGTH\u00a060<\/span>\u00a0MODIF\u00a0ID<\/span>\u00a0DAT.<\/p>\n

INITIALIZATION<\/span>.<\/p>\n

AT<\/span>\u00a0SELECTION-SCREEN<\/span>\u00a0OUTPUT<\/span>.<\/p>\n

PERFORM<\/span>\u00a0get_data.<\/p>\n

LOOP<\/span>\u00a0AT<\/span>\u00a0it_vbak.
\nl_value-key<\/span>\u00a0=\u00a0it_vbak-vbeln\u00a0.
\nl_value-text<\/span>\u00a0=\u00a0it_vbak-vbeln\u00a0.
\nAPPEND<\/span>\u00a0l_value\u00a0TO<\/span>\u00a0li_list.
\nENDLOOP<\/span>.<\/p>\n

CALL<\/span>\u00a0FUNCTION<\/span>\u00a0‘VRM_SET_VALUES’<\/span>
\nEXPORTING<\/span>
\nid<\/span>\u00a0=\u00a0‘P_TEST’<\/span>
\nvalues\u00a0=\u00a0li_list
\nEXCEPTIONS<\/span>
\nid_illegal_name\u00a0=\u00a01<\/span>
\nOTHERS<\/span>\u00a0=\u00a02<\/span>.<\/p>\n

AT<\/span>\u00a0SELECTION-SCREEN<\/span>\u00a0ON<\/span>\u00a0P_TEST.
\nclear<\/span>\u00a0:\u00a0li_list\u00a0,\u00a0li_list[].
\nSELECT<\/span>\u00a0vbeln
\nmatnr
\nmeins<\/p>\n

FROM<\/span>\u00a0vbap<\/p>\n

INTO<\/span>\u00a0CORRESPONDING\u00a0FIELDS<\/span>\u00a0OF<\/span>\u00a0TABLE<\/span>\u00a0it_vbap
\nWHERE<\/span>\u00a0vbeln\u00a0=\u00a0p_test.<\/p>\n

START-OF<\/span>-SELECTION.
\nSELECT<\/span>\u00a0vbeln
\nmatnr
\nmeins
\nFROM<\/span>\u00a0vbap<\/p>\n

INTO<\/span>\u00a0CORRESPONDING\u00a0FIELDS<\/span>\u00a0OF<\/span>\u00a0TABLE<\/span>\u00a0it_vbap<\/p>\n

WHERE<\/span>\u00a0vbeln\u00a0=\u00a0p_test.<\/p>\n

LOOP<\/span>\u00a0AT<\/span>\u00a0it_vbap.<\/p>\n

WRITE<\/span>\u00a0:\/\u00a0it_vbap-vbeln,\u00a0it_vbap-matnr,it_vbap-meins.<\/p>\n

ENDLOOP<\/span>.
\n*&———————————————————————*<\/span>
\n*&\u00a0Form\u00a0get_Data<\/span>
\n*&———————————————————————*<\/span><\/p>\n

FORM<\/span>\u00a0get_data\u00a0.
\nSELECT<\/span>\u00a0\u00a0vbeln\u00a0UP<\/span>\u00a0TO<\/span>\u00a0100<\/span>\u00a0ROWS<\/span>
\nFROM<\/span>\u00a0vbak
\nINTO<\/span>\u00a0CORRESPONDING\u00a0FIELDS<\/span>\u00a0OF<\/span>\u00a0TABLE<\/span>\u00a0it_vbak.
\nENDFORM<\/span>.\u00a0”\u00a0get_Data<\/span><\/p>\n","protected":false},"excerpt":{"rendered":"

TYPE-POOLS\u00a0:\u00a0vrm. TABLES:vbak,vbap. DATA\u00a0:\u00a0v(80)\u00a0TYPE\u00a0c. DATA:\u00a0wa_vbak\u00a0TYPE\u00a0vbak, it_vbak\u00a0TYPE\u00a0vbak\u00a0OCCURS\u00a00\u00a0WITH\u00a0HEADER\u00a0LINE, wa_vbap\u00a0TYPE\u00a0vbap, it_vbap\u00a0TYPE\u00a0vbap\u00a0OCCURS\u00a00\u00a0WITH\u00a0HEADER\u00a0LINE. DATA:\u00a0l_name\u00a0TYPE\u00a0vrm_id, li_list\u00a0TYPE\u00a0vrm_values\u00a0, v_count\u00a0TYPE\u00a0i, l_value\u00a0LIKE\u00a0LINE\u00a0OF\u00a0li_list. PARAMETERS:\u00a0p_test(20)\u00a0AS\u00a0LISTBOX\u00a0VISIBLE\u00a0LENGTH\u00a060\u00a0MODIF\u00a0ID\u00a0DAT. INITIALIZATION. AT\u00a0SELECTION-SCREEN\u00a0OUTPUT. PERFORM\u00a0get_data. LOOP\u00a0AT\u00a0it_vbak. l_value-key\u00a0=\u00a0it_vbak-vbeln\u00a0. l_value-text\u00a0=\u00a0it_vbak-vbeln\u00a0. APPEND\u00a0l_value\u00a0TO\u00a0li_list. ENDLOOP. CALL\u00a0FUNCTION\u00a0‘VRM_SET_VALUES’ EXPORTING id\u00a0=\u00a0‘P_TEST’ values\u00a0=\u00a0li_list EXCEPTIONS id_illegal_name\u00a0=\u00a01 OTHERS\u00a0=\u00a02. AT\u00a0SELECTION-SCREEN\u00a0ON\u00a0P_TEST. clear\u00a0:\u00a0li_list\u00a0,\u00a0li_list[]. SELECT\u00a0vbeln matnr meins FROM\u00a0vbap INTO\u00a0CORRESPONDING\u00a0FIELDS\u00a0OF\u00a0TABLE\u00a0it_vbap WHERE\u00a0vbeln\u00a0=\u00a0p_test. START-OF-SELECTION. SELECT\u00a0vbeln matnr meins FROM\u00a0vbap INTO\u00a0CORRESPONDING\u00a0FIELDS\u00a0OF\u00a0TABLE\u00a0it_vbap WHERE\u00a0vbeln\u00a0=\u00a0p_test. LOOP\u00a0AT\u00a0it_vbap. WRITE\u00a0:\/\u00a0it_vbap-vbeln,\u00a0it_vbap-matnr,it_vbap-meins. ENDLOOP. *&———————————————————————* *&\u00a0Form\u00a0get_Data *&———————————————————————* FORM\u00a0get_data\u00a0. SELECT\u00a0\u00a0vbeln\u00a0UP\u00a0TO\u00a0100\u00a0ROWS FROM\u00a0vbak INTO\u00a0CORRESPONDING\u00a0FIELDS\u00a0OF\u00a0TABLE\u00a0it_vbak. ENDFORM.\u00a0”\u00a0get_Data<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"om_disable_all_campaigns":false,"_monsterinsights_skip_tracking":false,"_monsterinsights_sitenote_active":false,"_monsterinsights_sitenote_note":"","_monsterinsights_sitenote_category":0,"_uf_show_specific_survey":0,"_uf_disable_surveys":false,"footnotes":"","_links_to":"","_links_to_target":""},"categories":[87],"tags":[395,1392],"class_list":["post-306","post","type-post","status-publish","format-standard","hentry","category-advanced-business-application-programming","tag-abap","tag-listbox","has-post-title","has-post-date","has-post-category","has-post-tag","has-post-comment","has-post-author",""],"aioseo_notices":[],"views":1914,"_links":{"self":[{"href":"https:\/\/www.karadere.com\/blog\/wp-json\/wp\/v2\/posts\/306","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/www.karadere.com\/blog\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.karadere.com\/blog\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.karadere.com\/blog\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/www.karadere.com\/blog\/wp-json\/wp\/v2\/comments?post=306"}],"version-history":[{"count":0,"href":"https:\/\/www.karadere.com\/blog\/wp-json\/wp\/v2\/posts\/306\/revisions"}],"wp:attachment":[{"href":"https:\/\/www.karadere.com\/blog\/wp-json\/wp\/v2\/media?parent=306"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.karadere.com\/blog\/wp-json\/wp\/v2\/categories?post=306"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.karadere.com\/blog\/wp-json\/wp\/v2\/tags?post=306"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}