👩🏼‍🤝‍👨🏿 👨‍👦‍👦 🎸 ऑनलाइन ABAP कोड जनरेटर 👩🏿‍🚒 🥉 🤖

अक्सर एबीएपी कोडिंग के दौरान एक विशिष्ट कार्य उत्पन्न होता है - आंतरिक तालिका के कुछ क्षेत्रों के मूल्यों द्वारा अन्य फ़ील्ड्स को आरंभ करने के लिए (डेटाबेस तालिका से चयन करें, एफएम, सबरूटीन को कॉल करके)। और इस मामले में कोड एल्गोरिथ्म के संदर्भ में बहुत सरल है, लेकिन यह काफी है। मैं हमेशा से इस तरह के रूटीन ऑपरेशन पर खर्च किए गए समय को कम करना चाहता था। और उन्होंने डेटाबेस तालिकाओं से उनकी कुंजी द्वारा संदर्भ मूल्यों का चयन करने के लिए कार्यक्रमों के गतिशील निर्माण पर आधारित एक विधि भी लिखी।

टिप्पणी में बताया

" कोड की अपठनीयता " आपकी सूक्ष्म भाषा है जिसे आपको सीखने की आवश्यकता है।
" डायनेमिक कॉल " - डायनेमिक कॉल का स्वागत नहीं है, जिसमें यह भी शामिल है कि इस मामले में उपयोग लॉग को संबंधित तालिकाओं / क्षेत्रों का उपयोग करने के लिए जगह नहीं मिलती है।

एक विकल्प के रूप में, मैं अभी भी स्वचालित कोड पीढ़ी के साथ एक विकल्प का प्रस्ताव कर रहा था, लेकिन केवल अब मैं इस चीज को तैयार उपकरण में लाया। कौन परवाह करता है, कृपया, बिल्ली के नीचे।

विचार सरल है: मापदंडों का एक सेट है जिसके द्वारा एक दिए गए टेम्पलेट के अनुसार एक ABAP कोड उत्पन्न होता है।

आइए एक सरल उदाहरण लेते हैं: आंतरिक तालिका में बीई के मूल्य में बीई का नाम डालें। डेवलपर की तकनीकी भाषा में बोलते हुए: आंतरिक तालिका में, BUKRS फ़ील्ड के मान से, डेटाबेस तालिका T001 के अनुसार BUTXT फ़ील्ड का मान डालें ।

केवल एक वाक्य में सरल कथन। लेकिन इसे महसूस करने के लिए, आपको या तो आंतरिक टेबल पर LOOP करना होगा और SELECT SINGLE को एक लूप में (जो तेज है, लेकिन गति के दृष्टिकोण से, यह बहुत स्वागत योग्य नहीं है, खासकर अगर आंतरिक तालिका में बहुत सारी पंक्तियाँ हैं), या अद्वितीय BUKRS मानों का चयन करें, डेटाबेस टेबल T001, क्वेरी के लिए। और फिर हमने READ TABLE के माध्यम से BUTXT फ़ील्ड के संबंधित मानों को नीचे रखा। इस मामले में, कोड अधिक इष्टतम होगा, लेकिन इसका लेखन इतना तेज़ नहीं है, क्योंकि यह कोड पहले से ही बहुत कुछ है। इसके अलावा, इसमें कुछ भी जटिल नहीं है - टाइपिंग पर एक लगभग सरल "बंदर" काम।

और यहां स्वचालित जनरेटर बचाव के लिए आता है, क्योंकि इस तरह के कोड में एक बॉयलरप्लेट फॉर्म होता है, जिसका अर्थ है कि इसका लेखन स्वचालित हो सकता है।

निम्नलिखित पैरामीटर निर्दिष्ट करें:

DB तालिका: T001
संचार क्षेत्र: BUKRS
प्रारंभिक फ़ील्ड: BUTXT

और निम्नलिखित उत्पन्न कोड प्राप्त करें

*--      T001 FORM values_from_tab_T001 USING "-- ()  uv_in_BUKRS TYPE any "--   uv_out_BUTXT TYPE any CHANGING "--    ct_table TYPE ANY TABLE . "--    ? CHECK NOT ( ct_table[] IS INITIAL ). "--     TYPES: BEGIN OF lty_item, BUKRS TYPE T001-BUKRS, BUTXT TYPE T001-BUTXT, END OF lty_item. DATA ls_item TYPE lty_item. DATA lt_item LIKE TABLE OF ls_item. FIELD-SYMBOLS <ls_item> LIKE LINE OF lt_item. FIELD-SYMBOLS <ls_table> TYPE any. FIELD-SYMBOLS <lv_BUKRS> TYPE any. FIELD-SYMBOLS <lv_BUTXT> TYPE any. "--    LOOP AT ct_table ASSIGNING <ls_table>. CLEAR ls_item. ASSIGN COMPONENT uv_in_BUKRS OF STRUCTURE <ls_table> TO <lv_BUKRS>. ls_item-BUKRS = <lv_BUKRS>. APPEND ls_item TO lt_item. ENDLOOP. "--     SORT lt_item BY BUKRS. DELETE ADJACENT DUPLICATES FROM lt_item COMPARING BUKRS. "--     SELECT BUKRS BUTXT FROM T001 INTO TABLE lt_item FOR ALL ENTRIES IN lt_item WHERE BUKRS = lt_item-BUKRS . "--     SORT lt_item BY BUKRS. "--     LOOP AT ct_table ASSIGNING <ls_table>. "--    ASSIGN COMPONENT uv_in_BUKRS OF STRUCTURE <ls_table> TO <lv_BUKRS>. ls_item-BUKRS = <lv_BUKRS>. "--    ASSIGN COMPONENT uv_out_BUTXT OF STRUCTURE <ls_table> TO <lv_BUTXT>. "--      READ TABLE lt_item ASSIGNING <ls_item> WITH KEY BUKRS = ls_item-BUKRS BINARY SEARCH. IF sy-subrc = 0. IF <lv_BUTXT> IS ASSIGNED. <lv_BUTXT> = <ls_item>-BUTXT. ENDIF. ELSE. IF <lv_BUTXT> IS ASSIGNED. CLEAR <lv_BUTXT>. ENDIF. ENDIF. ENDLOOP. ENDFORM.

अब आपके कार्यक्रम में उत्पन्न सबरूटिन को कॉल करने के लिए पर्याप्त है

 PERFORM values_from_tab_T001 USING 'BUKRS' 'BUTXT' CHANGING lt_TABLE.

ABAP जनरेटर वेबसाइट पर कोड देखें
आंतरिक तालिका और आंतरिक तालिका में फ़ील्ड्स के नाम ही सबरूटीन के मापदंडों के रूप में पारित किए जाते हैं। कॉल के बाद, BUTXT फ़ील्ड का वांछित मान होगा।

आंतरिक तालिका में फ़ील्ड्स के नाम पैरामीटर के रूप में बनाए जाते हैं ताकि एक ही सबरूटीन को विभिन्न क्षेत्रों के लिए बुलाया जा सके। यानी यदि आपके पास आंतरिक तालिका में दो BE फ़ील्ड हैं (उदाहरण के लिए, BUKRS1 और BUKRS2), तो आपको बस एक सबरूटीन उत्पन्न करने और इसे दो बार कॉल करने की आवश्यकता है

 PERFORM values_from_tab_T001 USING 'BUKRS1' 'BUTXT1' CHANGING lt_TABLE. PERFORM values_from_tab_T001 USING 'BUKRS2' 'BUTXT1' CHANGING lt_TABLE.

इस मामले में, "गैर-इष्टतमता" दिखाई देती है, क्योंकि डेटाबेस तालिका T001 से दो चयन होंगे, हालांकि आदर्श मामले में, आप एक के माध्यम से सब कुछ कर सकते हैं। लेकिन यह स्वचालन की लागत है। यह संभावना नहीं है कि यह कार्यक्रम के निष्पादन को काफी धीमा कर देगा, लेकिन यदि आवश्यक हो, तो आप हमेशा अपनी निजी जरूरतों के लिए उपप्रोग्राम को "समाप्त" कर सकते हैं।

आप एक ही बार में कई फ़ील्ड्स इनिशियलाइज़ कर सकते हैं, और स्थितियों में स्थिरांक निर्दिष्ट करते हैं (उदाहरण के लिए शब्द-पाठ, जो अक्सर पाठ चुनते समय उपयोग किया जाता है)। मानक उदाहरण में, UE के नाम तालिका T006A के अनुसार चुने गए हैं।

कोड जनरेट करते समय, एक लिंक भी बनाया जाता है जिसके द्वारा ब्राउज़र में बनाया गया उदाहरण खोला जा सकता है।

वर्तमान में जनरेटर में कई टेम्पलेट हैं:

संरचना को परिभाषित करें [+ तालिका प्रकार] - इस प्रकार की संरचना + तालिका प्रकार + तालिका को परिभाषित करें + तालिका कार्यक्षेत्र + तालिका का फ़ील्ड-प्रतीक। यह हमेशा आवश्यक नहीं है, लेकिन जनरेट को हटाने के लिए इसे मैन्युअल रूप से टाइप करना आसान है
फ़ील्ड द्वारा आंतरिक तालिका से डुप्लिकेट रिकॉर्ड को हटाना एक बहुत ही सरल जनरेटर है और सामान्य तौर पर, इस तरह के कोड को मैन्युअल रूप से लिखा जा सकता है, लेकिन अगर कई फ़ील्ड हैं, तो, मेरी राय में, इस टेम्पलेट का उपयोग करना बेहतर है
डेटाबेस तालिका से संदर्भ मानों का चयन करें - ऊपर वर्णित टेम्पलेट
संदर्भ मानों का चयन करें - टेम्पलेट आपको एफएम, सबप्रोग्राम के लिए कॉल के माध्यम से फ़ील्ड मान सेट करने की अनुमति देता है। इस स्थिति में, कॉल कैश हैं।
डोमेन से संदर्भ मानों का चयन करें - इस टेम्पलेट में कोई पैरामीटर नहीं है और इसे इस कोड को अपने प्रोग्राम में कॉपी करने में सक्षम होने के लिए जोड़ा गया था

मुझे लगता है कि प्रत्येक टेम्पलेट के संचालन का विस्तृत विवरण समझ में नहीं आता है, क्योंकि साइट पर इसके काम के परिणाम को देखना आसान है। प्रत्येक टेम्पलेट में इसके मापदंडों के लिए डिफ़ॉल्ट मान हैं और यदि आप एक एबैप डेवलपर हैं, तो आप जल्दी से कोड को समझेंगे।

ऑनलाइन ABAP कोड जनरेटर

More articles: