byeongwook.choiandClaude Fable 5.1
11ae3629b2
Co-Authored-By: Claude Fable 5.1 <noreply@anthropic.com>
228 KiB
228 KiB
type, title, description, resource, tags, generated, status, x-package, x-changed-on, x-tables-read, x-tables-write, x-calls, x-code-hash, x-unit-count, x-chunk-count, x-declaration-count
| type | title | description | resource | tags | generated | status | x-package | x-changed-on | x-tables-read | x-tables-write | x-calls | x-code-hash | x-unit-count | x-chunk-count | x-declaration-count | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| abap-program | ZCOR0020 — 부서별 예산 집행 현황 | 코스트센터(부서) 또는 투자오더(Internal Order) 단위로 회계연도·기간별 예산(Budget)과 실적(Actual)·약정(Commitment)·임시전표(Parked)를 비교하여 가용예산과 가용율을 보여주는 예산 집행 현황(Budget vs. Actual) 리포트다. 코스트센터 예산은 COSP의 계획값(WRTTP 01, 버전 B00 사업계획 또는 B10~B15/B20 월별 실행예산·조정·이월)에서, 투자오더 예산은 BPEJ(WRTTP 41, KBUD/KBN0/KBR0)에서 읽고, 실적은 COSP(WRTTP 04/22/60, 버전 000)에서 집계한다. 예산통제 그룹(ZCOT0010)을 표시하고 가용율에 따라 신호등 아이콘(10% 이하 빨강, 50% 이하 노랑, 50% 초과 초록)을 부여하며, ALV에서 실적/임시 금액을 더블클릭하면 KSB1/KOB1 라인아이템(RKAEP000)으로 드릴다운한다. | abap://ZCOR0020 |
|
|
stable |
|
|
|
9a9eb5d79f5b4495c53a8a34a17b12409072baaecec4b85bc40b524cded1a4ad | 151 | 82 | 224 |
업무 목적
코스트센터(부서) 또는 투자오더(Internal Order) 단위로 회계연도·기간별 예산(Budget)과 실적(Actual)·약정(Commitment)·임시전표(Parked)를 비교하여 가용예산과 가용율을 보여주는 예산 집행 현황(Budget vs. Actual) 리포트다. 코스트센터 예산은 COSP의 계획값(WRTTP 01, 버전 B00 사업계획 또는 B10~B15/B20 월별 실행예산·조정·이월)에서, 투자오더 예산은 BPEJ(WRTTP 41, KBUD/KBN0/KBR0)에서 읽고, 실적은 COSP(WRTTP 04/22/60, 버전 000)에서 집계한다. 예산통제 그룹(ZCOT0010)을 표시하고 가용율에 따라 신호등 아이콘(10% 이하 빨강, 50% 이하 노랑, 50% 초과 초록)을 부여하며, ALV에서 실적/임시 금액을 더블클릭하면 KSB1/KOB1 라인아이템(RKAEP000)으로 드릴다운한다.
주 흐름
- 선택화면 초기화: 관리회계영역 텍스트 설정, 코스트센터/투자오더 라디오버튼에 따라 입력 블록을 표시·숨김하고 예산 Indicator 신호등 범례를 표시한다 (SET_DYNP, LOOP_AT_SCREEN, SET_SCREEN_ICON)
- 코스트센터·원가요소·투자오더 그룹 F4는 K_GROUP_SELECT(SET CLASS 0101/0102/0103)로, 원가요소·오더 F4는 CSKB/CSKU·AUFK 조회로 제공한다 (F4_GRP, F4_KSTAR, F4_AUFNR)
- 그룹과 개별 값이 동시에 입력되었거나 둘 다 비어 있으면 오류 처리하고, 코스트센터 그룹/원가요소 그룹을 GET_SETLEAF_VALUES로 전개해 ONRKS(코스트센터 OBJNR) 또는 ONROR+AUFK(투자오더 OBJNR, AUART I%/S%) 조회 대상을 결정한다 (INITIALIZE_DATA, CHECK_INPUT, DETERMINE_KOSTL, DETERMINE_KSTAR, DETERMINE_AUFNR)
- 예산통제 대상 원가요소(P_CONT)이면 ZCOT0010에 등록된 원가요소만 남기고, 예산통제 그룹 매핑을 읽는다 (DETERMINE_KSTAR, GET_MASTER_ZCOT0010)
- 예산값 조회: 코스트센터는 COSP에서 WRTTP 01·선택 버전(B00 / B10 / B10~B15,B20)으로, 투자오더는 BPEJ에서 WRTTP 41·VORGA KBUD/KBN0/KBR0 연간예산을 B00으로 매핑하여 GT_COSP에 적재한다 (PROCESS_DATA, SELECT_COSP 'B', SELECT_BPEJ)
- 실적값 조회: COSP에서 WRTTP 04(실제)/22(약정)/60(임시), 버전 000을 읽고 BEKNZ 'A' 레코드는 제외한다 (SELECT_COSP 'A')
- 선택 기간(코스트센터: S_PERBL, 오더: 1
12월)의 WKG001WKG012 컬럼을 버전별 예산 컬럼(BG_B00~BG_B20)과 ACTUAL/PARK 컬럼으로 분배하며 OBJNR·원가요소 단위로 COLLECT한다 (COLLECT_DATA, DISTIBUTE_FIELD) - 코스트센터명(CSKT), 원가요소명(CSKU), 오더명·책임/요청 코스트센터(AUFK)를 보완하고 총예산(BG_ALL)·집행액(ACTUAL+PARK)·가용예산·가용율과 신호등 상태를 계산한 뒤 전부 0인 행을 삭제한다 (EDIT_DATA)
- 금액 단위(원/천원/백만원)에 따라 CURR 필드를 나누고, 화면 100 ALV Grid에 표시하며 실적/임시 컬럼 더블클릭 시 RKAEP000(KSB1 또는 KOB1)을 SUBMIT한다 (CONVERT_CURR, END-OF-SELECTION CALL SCREEN 100, CALL_REPORT)
핵심 내부테이블
GT_ONRKS— 조회 대상 코스트센터의 오브젝트번호(OBJNR)-코스트센터 매핑 (채움: DETERMINE_KOSTL / 소비: EDIT_DATA)GT_ONROR— 조회 대상 투자오더의 오브젝트번호-오더번호 매핑 (AUART I%/S%) (채움: DETERMINE_AUFNR / 소비: EDIT_DATA)GT_KSTAR— 조회 대상 원가요소(CSKB/CSKU, 0050000000~0069999999)와 명칭; GR_KSTAR 범위 생성용 (채움: DETERMINE_KSTAR / 소비: DETERMINE_KSTAR)GT_ZCOT0010— 원가요소별 예산통제 그룹 매핑 마스터 (채움: GET_MASTER_ZCOT0010 / 소비: EDIT_DATA)GT_COSP— COSP/BPEJ에서 집계한 월별(WKG001~012) 예산(C_TYPE B)·실적(C_TYPE A) 원본 (채움: SELECT_COSP, SELECT_BPEJ / 소비: COLLECT_DATA, DISTIBUTE_FIELD)GT_DATA— ALV 출력용 코스트센터/오더·원가요소별 버전별 예산(BG_B00~BG_B20), 실적, 임시, 총예산, 가용예산, 가용율, 상태 아이콘, 예산통제 그룹 (채움: COLLECT_DATA, EDIT_DATA, CONVERT_CURR / 소비: CALL_REPORT, DISPLAY_ALV_LIST)
테이블 / 외부 호출
- read: AENR, AUFK, BPEJ, COSP, CSKB, CSKS, CSKT, CSKU, DD07T, ONRKS, ONROR, T001, TKA01, TKT09, ZCOT0010
- write: GT_COSP, GT_DATA, GT_KSTAR
- 외부 호출: ALSM_EXCEL_TO_INTERNAL_TABLE, BAPI_CURRENCY_CONV_TO_INTERNAL, CC01, CLOI_PUT_SIGN_IN_FRONT, CONVERSION_EXIT_ALPHA_INPUT, CONVERSION_EXIT_ALPHA_OUTPUT, CONVERT_OTF, CONVERT_TO_LOCAL_CURRENCY, CURRENCY_AMOUNT_IDOC_TO_SAP, CURRENCY_AMOUNT_SAP_TO_IDOC, DATE_CHECK_PLAUSIBILITY, DYNP_VALUES_READ, DYNP_VALUES_UPDATE, F4IF_INT_TABLE_VALUE_REQUEST, F4_DATE, FI_PERIOD_DETERMINE, GUI_DOWNLOAD, K_GROUP_SELECT, K_HIERARCHY_TABLES_READ, LVC_FIELDCATALOG_MERGE, LVC_FIELDCAT_COMPLETE, LVC_TRANSFER_FROM_SLIS, MD_CONVERT_MATERIAL_UNIT, MESSAGE_TEXT_BUILD, NUMBER_GET_NEXT, POPUP_TO_CONFIRM, POPUP_TO_CONFIRM_STEP, POPUP_TO_SELECT_MONTH, POSTING_INTERFACE_END, POSTING_INTERFACE_START
로직 조각 (82건 / unit 62개)
LLM 이 코드에서 골라낸 업무 로직 단위다. 조각마다 소스 원문과 자연어 설명을 함께 싣는다 — 설명이 코드와 맞는지 바로 대조할 수 있어야 하기 때문이다. 테이블·호출은 LLM 이 쓴 값이 아니라 파서가 조각 범위에서 다시 뽑은 사실이다. 순서는 실행 순서다.
FORM SET_KOKRS_BASE — ZCO_COMMON L2094-L2101 (8줄)
TKA01에서 관리회계영역의 명칭·통화·계정과목표를 읽어 전역변수에 설정하는 공통 FORM이다.
이 unit 의 조각 1개가 4/8줄(50%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[sql_select] TKA01에서 관리회계영역(P_KOKRS)의 명칭(BEZEI), 통화(WAERS), 계정과목표(KTOPL)를 조회해 GV_KOKRS_BEZEI/GV_WAERS/GV_KTOPL에 저장해 이후 검증·금액 변환의 기준으로 쓴다.
2096| SELECT SINGLE BEZEI WAERS KTOPL
2097| INTO (GV_KOKRS_BEZEI, GV_WAERS, GV_KTOPL)
2098| FROM TKA01
2099| WHERE KOKRS = P_KOKRS.
- EN: Read controlling area description, currency and chart of accounts from TKA01 into global variables used for validation and amount conversion.
- 테이블(파서): read TKA01 / write -
- SAP 객체: TKA01
- 업무 키워드: 관리회계영역 기본정보, 통화, 계정과목표
- English: Controlling Area, TKA01, Chart of Accounts, Currency
- 정의부(복사 시 함께 필요):
GV_KOKRS_BEZEI,GV_WAERS,GV_KTOPL,P_KOKRS - 위치:
abap://ZCOR0020/ZCO_COMMON#L2096-L2099· confidence 0.95 ·ZCOR0020#ZCO_COMMON#FORM#SET_KOKRS_BASE#C1
FORM F4_KSTAR — ZCOR0020F01 L137-L160 (24줄)
관리회계영역의 유효한 원가요소(50000000~69999999)를 CSKB/CSKU에서 조회해 F4 검색도움 목록으로 제공한다.
이 unit 의 조각 1개가 13/24줄(54%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[sql_select] CSKB와 CSKU를 조인해 P_KOKRS의 원가요소 50000000~69999999 중 현재 유효한 원가요소와 명칭을 조회하고 F4IF_INT_TABLE_VALUE_REQUEST로 선택화면 필드에 F4 목록을 띄운다.
146| SELECT A~KSTAR B~KTEXT
147| FROM CSKB AS A INNER JOIN CSKU AS B
148| ON A~KSTAR = B~KSTAR
149| INTO CORRESPONDING FIELDS OF TABLE LT_CSKA
150| WHERE A~KOKRS = P_KOKRS
151| AND A~KSTAR BETWEEN '0050000000' AND '0069999999'
152| AND SPRAS = SY-LANGU
153| AND A~DATBI >= SY-DATUM
154| AND A~DATAB <= SY-DATUM.
155|
156| PERFORM F4IF_INT_TABLE_VALUE_REQUEST
157| TABLES LT_CSKA LT_FIELDTAB LT_RETURN
158| USING 'KSTAR' P_FIELD.
- EN: Select valid cost elements in range 50000000-69999999 with texts from CSKB joined CSKU for the controlling area and present them as an F4 value list via F4IF_INT_TABLE_VALUE_REQUEST.
- 테이블(파서): read CSKB, CSKU / write -
- 호출(파서): F4IF_INT_TABLE_VALUE_REQUEST
- SAP 객체: CSKB, CSKU, F4IF_INT_TABLE_VALUE_REQUEST
- 업무 키워드: 원가요소 검색도움, 원가요소 명칭, 유효기간, F4
- English: Cost Element, Search Help, F4 Help, Controlling Area
- 정의부(복사 시 함께 필요):
LT_CSKA,P_KOKRS,LT_FIELDTAB,LT_RETURN - 위치:
abap://ZCOR0020/ZCOR0020F01#L146-L158· confidence 0.85 ·ZCOR0020#ZCOR0020F01#FORM#F4_KSTAR#C1
FORM F4_GRP — ZCOR0020F01 L168-L190 (23줄)
K_GROUP_SELECT를 호출해 코스트센터 그룹(0101) 또는 원가요소 그룹(0102) 세트를 선택하는 F4 검색도움을 제공한다.
이 unit 의 조각 1개가 12/23줄(52%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[fm_call] 세트 클래스(0101 코스트센터 그룹/0102 원가요소 그룹)·필드명·관리회계영역·계정과목표 GV_KTOPL을 넘겨 K_GROUP_SELECT로 그룹 선택 대화상자를 띄우고 선택된 세트명을 선택화면 파라미터에 반환한다.
177| CALL FUNCTION 'K_GROUP_SELECT'
178| EXPORTING
179| CLASS = LV_CLASS
180| FIELD_NAME = LV_FIELDNAME
181| KOKRS = P_KOKRS
182| KTOPL = GV_KTOPL
183| IMPORTING
184| SET_NAME = P_DYN_FIELD
185| SET_TITLE = KMAS_D-SETTXT_KST
186| EXCEPTIONS
187| NO_SET_PICKED = 1
188| OTHERS = 2.
- EN: Call K_GROUP_SELECT with set class (0101 cost center group / 0102 cost element group), field name, controlling area and chart of accounts to let the user pick a group and return the set name.
- 호출(파서): K_GROUP_SELECT
- SAP 객체: K_GROUP_SELECT, RGSBS
- 업무 키워드: 그룹 선택, 코스트센터 그룹, 원가요소 그룹, 검색도움
- English: Cost Center Group, Cost Element Group, Set, F4 Help, Chart of Accounts
- 정의부(복사 시 함께 필요):
LV_CLASS,LV_FIELDNAME,P_KOKRS,GV_KTOPL,KMAS_D - 위치:
abap://ZCOR0020/ZCOR0020F01#L177-L188· confidence 0.9 ·ZCOR0020#ZCOR0020F01#FORM#F4_GRP#C1
FORM F4_AUFNR — ZCOR0020F01 L775-L793 (19줄)
오더유형이 I로 시작하는 투자오더 목록을 AUFK에서 읽어 F4IF_INT_TABLE_VALUE_REQUEST로 오더번호 검색도움을 제공한다.
이 unit 의 조각 1개가 8/19줄(42%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[fm_call] AUFK에서 오더유형(AUART)이 I로 시작하는 투자오더의 번호·유형·명칭을 조회해 F4IF_INT_TABLE_VALUE_REQUEST로 선택화면 오더 필드(P_FIELD)에 검색도움을 띄운다.
785| SELECT AUFNR AUART KTEXT
786| INTO CORRESPONDING FIELDS OF TABLE LT_AUFK
787| FROM AUFK
788| WHERE AUART LIKE 'I%'.
789|
790| PERFORM F4IF_INT_TABLE_VALUE_REQUEST
791| TABLES LT_AUFK LT_FIELDTAB LT_RETURN
792| USING 'AUFNR' P_FIELD.
- EN: Select investment orders (order type starting with I) from AUFK and show them as an F4 value help for the selection-screen order field via F4IF_INT_TABLE_VALUE_REQUEST.
- 테이블(파서): read AUFK / write -
- 호출(파서): F4IF_INT_TABLE_VALUE_REQUEST
- SAP 객체: AUFK, F4IF_INT_TABLE_VALUE_REQUEST
- 업무 키워드: 투자오더 검색도움, 오더유형, F4
- English: Internal Order, Value Help, Order Type
- 정의부(복사 시 함께 필요):
LT_AUFK,AUFK,LT_FIELDTAB,LT_RETURN - 위치:
abap://ZCOR0020/ZCOR0020F01#L785-L792· confidence 0.9 ·ZCOR0020#ZCOR0020F01#FORM#F4_AUFNR#C1
FORM INITIALIZE_DATA — ZCOR0020F01 L75-L107 (33줄)
관리회계영역 기본정보와 ALV 필드카탈로그를 준비하고 전역 변수를 초기화한 뒤 입력 검증과 코스트센터/원가요소 또는 투자오더 조회 대상 결정, 예산통제 그룹 마스터 조회를 호출한다.
이 unit 의 조각 1개가 9/33줄(27%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[control_flow] 입력 검증(CHECK_INPUT) 후 코스트센터 모드면 DETERMINE_KOSTL·DETERMINE_KSTAR, 투자오더 모드면 DETERMINE_AUFNR로 조회 대상을 정하고 GET_MASTER_ZCOT0010으로 예산통제 그룹 마스터를 읽는다.
98| PERFORM CHECK_INPUT.
99|
100| IF PR_CC = 'X'.
101| PERFORM DETERMINE_KOSTL.
102| PERFORM DETERMINE_KSTAR.
103| ELSEIF PR_IO = 'X'.
104| PERFORM DETERMINE_AUFNR.
105| ENDIF.
106| PERFORM GET_MASTER_ZCOT0010.
- EN: After input validation, determine target cost centers/cost elements (cost center mode) or orders (internal order mode), then load the budget control group master ZCOT0010.
- 호출(파서): CHECK_INPUT, DETERMINE_KOSTL, DETERMINE_KSTAR, DETERMINE_AUFNR, GET_MASTER_ZCOT0010
- SAP 객체: ZCOT0010
- 업무 키워드: 입력 검증, 조회 대상 결정, 예산통제 그룹, 코스트센터, 투자오더
- English: Input Validation, Cost Center, Internal Order, Budget Control Group
- 정의부(복사 시 함께 필요):
PR_CC,PR_IO - 위치:
abap://ZCOR0020/ZCOR0020F01#L98-L106· confidence 0.85 ·ZCOR0020#ZCOR0020F01#FORM#INITIALIZE_DATA#C1
FORM GET_FCAT_LIKE_ITAB — ZCO_COMMON L160-L201 (42줄)
프로그램 내부테이블 이름으로 REUSE_ALV_FIELDCATALOG_MERGE→LVC 변환→LVC_FIELDCAT_COMPLETE를 거쳐 LVC 필드카탈로그를 생성하는 공통 FORM이다.
이 unit 의 조각 1개가 26/42줄(62%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[fm_call] 내부테이블 정의(SY-REPID 내 P_ITAB_NAME)로 REUSE_ALV_FIELDCATALOG_MERGE를 호출해 SLIS 필드카탈로그를 얻고 LVC_TRANSFER_FROM_SLIS로 LVC 형식으로 바꾼 뒤 LVC_FIELDCAT_COMPLETE로 보완해 반환한다.
173| CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
174| EXPORTING
175| I_PROGRAM_NAME = SY-REPID
176| I_INTERNAL_TABNAME = P_ITAB_NAME
177| I_INCLNAME = SY-REPID
178| I_STRUCTURE_NAME = ''
179| I_BYPASSING_BUFFER = 'X'
180| CHANGING
181| CT_FIELDCAT = LT_FIELDCAT[]
182| EXCEPTIONS
183| INCONSISTENT_INTERFACE = 1
184| PROGRAM_ERROR = 2.
185|
186| CALL FUNCTION 'LVC_TRANSFER_FROM_SLIS'
187| EXPORTING
188| IT_FIELDCAT_ALV = LT_FIELDCAT
189| IMPORTING
190| ET_FIELDCAT_LVC = LT_ALV_CAT
191| TABLES
192| IT_DATA = LT_TABLE[].
193|
194| CALL FUNCTION 'LVC_FIELDCAT_COMPLETE'
195| CHANGING
196| CT_FIELDCAT = LT_ALV_CAT.
197|
198| PT_REF_FCAT[] = LT_ALV_CAT[].
- EN: Generate an LVC field catalog from the program internal table definition via REUSE_ALV_FIELDCATALOG_MERGE, LVC_TRANSFER_FROM_SLIS and LVC_FIELDCAT_COMPLETE.
- 호출(파서): REUSE_ALV_FIELDCATALOG_MERGE, LVC_TRANSFER_FROM_SLIS, LVC_FIELDCAT_COMPLETE
- SAP 객체: REUSE_ALV_FIELDCATALOG_MERGE, LVC_TRANSFER_FROM_SLIS, LVC_FIELDCAT_COMPLETE, LVC_S_FCAT
- 업무 키워드: 필드카탈로그 생성, 내부테이블 구조, ALV 컬럼 정보
- English: Field Catalog, ALV, LVC
- 정의부(복사 시 함께 필요):
LT_FIELDCAT,LT_ALV_CAT,LT_TABLE - 위치:
abap://ZCOR0020/ZCO_COMMON#L173-L198· confidence 0.9 ·ZCOR0020#ZCO_COMMON#FORM#GET_FCAT_LIKE_ITAB#C1
FORM CHECK_INPUT — ZCOR0020F01 L316-L351 (36줄)
코스트센터 모드는 코스트센터 그룹/코스트센터 및 원가요소 그룹/원가요소, 투자오더 모드는 오더 그룹/오더가 둘 다 입력되거나 둘 다 비어 있으면 오류 메시지로 실행을 중단하는 선택화면 입력 검증이다.
이 unit 의 조각 1개가 32/36줄(89%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[validation] 코스트센터 모드(PR_CC)에서는 코스트센터 그룹(P_KSSET)과 코스트센터(S_KOSTL)가 동시 입력되거나 모두 비었을 때, 원가요소 그룹(P_KASET)과 원가요소(S_KSTAR)가 동시 입력되었을 때, 투자오더 모드(PR_IO)에서는 오더 그룹(P_KOSET)과 오더(S_AUFNR)가 동시 입력되거나 모두 비었을 때 S000 오류 메시지를 띄우고 LEAVE LIST-PROCESSING 한다.
318| IF PR_CC = 'X'.
319| IF P_KSSET IS NOT INITIAL AND S_KOSTL[] IS NOT INITIAL.
320| MESSAGE S000 DISPLAY LIKE 'E'
321| WITH '코스트센터 그룹 혹은 코스트센터 필드 하나만 입력하여 주십시오.'(F05).
322| LEAVE LIST-PROCESSING.
323| ENDIF.
324|
325| IF P_KSSET IS INITIAL AND S_KOSTL[] IS INITIAL.
326| MESSAGE S000 DISPLAY LIKE 'E'
327| WITH '코스트센터 그룹 혹은 코스트센터 필드를 입력하여 주십시오.'(F09).
328| LEAVE LIST-PROCESSING.
329| ENDIF.
330|
331| IF P_KASET IS NOT INITIAL AND S_KSTAR[] IS NOT INITIAL.
332| MESSAGE S000 DISPLAY LIKE 'E'
333| WITH '원가요소 그룹 혹은 원가요소 필드 하나만 입력하여 주십시오.'(F06).
334| LEAVE LIST-PROCESSING.
335| ENDIF.
336|
337| ELSEIF PR_IO = 'X'.
338| IF P_KOSET IS NOT INITIAL AND S_AUFNR[] IS NOT INITIAL.
339| MESSAGE S000 DISPLAY LIKE 'E'
340| WITH '투자오더 그룹 혹은 투자 오더 필드 하나만 입력하여 주십시오.'(F10).
341| LEAVE LIST-PROCESSING.
342| ENDIF.
343|
344| IF P_KOSET IS INITIAL AND S_AUFNR[] IS INITIAL.
345| MESSAGE S000 DISPLAY LIKE 'E'
346| WITH '투자오더 그룹 혹은 투자오더 필드를 입력하여 주십시오.'(F11).
347| LEAVE LIST-PROCESSING.
348| ENDIF.
349| ENDIF.
- EN: Validate that exactly one of group or individual values is entered: cost center group vs cost centers and cost element group vs cost elements in cost center mode, order group vs orders in internal order mode; otherwise issue an error message and leave list processing.
- SAP 객체: S_KOSTL, S_KSTAR, S_AUFNR
- 업무 키워드: 입력 검증, 코스트센터 그룹, 원가요소 그룹, 투자오더 그룹, 상호 배타 입력
- English: Input Validation, Cost Center Group, Cost Element Group, Order Group, Selection Screen
- 정의부(복사 시 함께 필요):
PR_CC,P_KSSET,S_KOSTL,P_KASET,S_KSTAR,PR_IO,P_KOSET,S_AUFNR - 위치:
abap://ZCOR0020/ZCOR0020F01#L318-L349· confidence 0.95 ·ZCOR0020#ZCOR0020F01#FORM#CHECK_INPUT#C1
FORM DETERMINE_KOSTL — ZCOR0020F01 L269-L307 (39줄)
선택화면의 코스트센터 또는 코스트센터 그룹(SET CLASS 0101)을 전개해 ONRKS에서 코스트센터의 OBJNR을 구하고 조회 대상 범위 GR_SELECT_OBJ를 결정한다.
이 unit 의 조각 2개가 30/39줄(77%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[control_flow] 코스트센터(S_KOSTL)가 입력되면 그대로 범위로 쓰고, 코스트센터 그룹(P_KSSET)이면 GET_SETLEAF_VALUES로 SET CLASS 0101 그룹을 전개해 범위를 만들며 비어 있으면 오류 메시지 후 종료한다.
275| IF S_KOSTL[] IS NOT INITIAL.
276| LR_KOSTL[] = S_KOSTL[].
277| ELSEIF P_KSSET IS NOT INITIAL.
278| PERFORM GET_SETLEAF_VALUES USING
279| P_KSSET '0101'.
280| MACRO_VALUE_TO_RANGE : LR_KOSTL GT_VALUE_SET.
281|
282| IF LR_KOSTL[] IS INITIAL.
283| MESSAGE S000 DISPLAY LIKE 'E'
284| WITH '코스트센터 그룹에 데이터가 없습니다.'(F07).
285| LEAVE LIST-PROCESSING.
286| ENDIF.
287| ENDIF.
- EN: Use entered cost centers S_KOSTL or expand the cost center group P_KSSET (set class 0101) via GET_SETLEAF_VALUES into a range; stop with an error message if the group is empty.
- 호출(파서): GET_SETLEAF_VALUES
- SAP 객체: GET_SETLEAF_VALUES, CSKS
- 업무 키워드: 코스트센터 그룹, 그룹 전개, 입력 검증
- English: Cost Center Group, Set Leaf Values, Set Class 0101
- 정의부(복사 시 함께 필요):
S_KOSTL,LR_KOSTL,P_KSSET,MACRO_VALUE_TO_RANGE,GT_VALUE_SET - 위치:
abap://ZCOR0020/ZCOR0020F01#L275-L287· confidence 0.85 ·ZCOR0020#ZCOR0020F01#FORM#DETERMINE_KOSTL#C1
[sql_select] ONRKS에서 관리회계영역·코스트센터 범위에 해당하는 오브젝트번호(OBJNR)-코스트센터 매핑을 GT_ONRKS에 읽고 OBJNR을 COSP 조회 대상 범위 GR_SELECT_OBJ에 추가하며 대상이 없으면 오류로 종료한다.
289| SELECT OBJNR KOSTL
290| FROM ONRKS
291| INTO CORRESPONDING FIELDS OF TABLE GT_ONRKS
292| WHERE KOKRS = P_KOKRS
293| AND KOSTL IN LR_KOSTL.
294|
295| SORT GT_ONRKS BY OBJNR.
296|
297| " 실 제조회 대상 코스트센터
298| LOOP AT GT_ONRKS.
299| ADD_RANGE_EQ : GR_SELECT_OBJ GT_ONRKS-OBJNR.
300| ENDLOOP.
301|
302| IF GR_SELECT_OBJ[] IS INITIAL.
303| MESSAGE S000 DISPLAY LIKE 'E' WITH '대상 코스트센터가 없습니다.'(F13).
304| LEAVE LIST-PROCESSING.
305| ENDIF.
- EN: Select object number/cost center mappings from ONRKS for the controlling area and cost center range into GT_ONRKS, add each OBJNR to the COSP selection range GR_SELECT_OBJ, and stop with an error when none exist.
- 테이블(파서): read ONRKS / write -
- SAP 객체: ONRKS, GT_ONRKS
- 업무 키워드: 오브젝트 번호, 코스트센터, 조회 대상 결정, 관리회계영역
- English: Object Number, Cost Center, ONRKS, Controlling Area
- 정의부(복사 시 함께 필요):
GT_ONRKS,P_KOKRS,LR_KOSTL,ADD_RANGE_EQ,GR_SELECT_OBJ - 위치:
abap://ZCOR0020/ZCOR0020F01#L289-L305· confidence 0.9 ·ZCOR0020#ZCOR0020F01#FORM#DETERMINE_KOSTL#C2
FORM GET_SETLEAF_VALUES — ZCO_COMMON L233-L297 (65줄)
세트 클래스(코스트센터 그룹/원가요소 그룹 등)와 세트명으로 SETID를 구성해 K_HIERARCHY_TABLES_READ로 세트의 값 목록을 GT_VALUE_SET에 읽어오는 공통 FORM이다.
이 unit 의 조각 1개가 48/65줄(74%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[fm_call] 세트 클래스(0101 코스트센터, 0102 원가요소, 0103 오더, 0106 손익센터, 0109 계정과목)에 따라 관리회계영역(GC_KOKRS) 또는 계정과목표(GV_KTOPL)를 붙여 SETID를 만들고 K_HIERARCHY_TABLES_READ로 세트 계층의 값 구간(T_VALUES)을 GT_VALUE_SET에 조회한다.
249| L_CLASS = PV_CLASS.
250|
251| CASE PV_CLASS.
252| WHEN '0101'. " 코스트센터
253| CONCATENATE PV_CLASS GC_KOKRS P_SETNAME INTO L_SETID.
254| WHEN '0102'. " 원가요소
255| CONCATENATE PV_CLASS GV_KTOPL P_SETNAME INTO L_SETID.
256| WHEN '0103'. " 오더
257| * CONCATENATE PV_CLASS GC_KOKRS P_SETNAME INTO L_SETID.
258| CONCATENATE PV_CLASS P_SETNAME INTO L_SETID. " New GL/Segment
259| WHEN '0106'. " 손익센터
260| CONCATENATE PV_CLASS GC_KOKRS P_SETNAME INTO L_SETID.
261| WHEN '0109'. " 계정과목
262| CONCATENATE PV_CLASS GV_KTOPL P_SETNAME INTO L_SETID.
263| ENDCASE.
264|
265| CALL FUNCTION 'K_HIERARCHY_TABLES_READ'
266| EXPORTING
267| E_CLASS = L_CLASS
268| E_SETID = L_SETID
269| E_KOKRS = GC_KOKRS
270| E_MANDT = SY-MANDT
271| TABLES
272| T_NODES = LT_NODE
273| T_VALUES = GT_VALUE_SET
274| CHANGING
275| C_INFO = LT_GRPHINFO
276| C_OVERWRITE = SY-DATAR
277| EXCEPTIONS
278| NO_CONTROLLING_AREA = 1
279| NO_CHART_OF_ACCOUNT = 2
280| DIFFERENT_CONTROLLING_AREAS = 3
281| DIFFERENT_CHART_OF_ACCOUNTS = 4
282| SET_NOT_FOUND = 5
283| ILLEGAL_FIELD_REPLACEMENT = 6
284| ILLEGAL_TABLE_REPLACEMENT = 7
285| FM_RAISE = 8
286| CONVERT_ERROR = 9
287| NO_OVERWRITE_STANDARD_HIER = 10
288| NO_BUKRS_FOR_KOKRS = 11
289| OTHERS = 12.
290|
291| IF SY-SUBRC <> 0.
292| * MESSAGE ID 'GS' TYPE 'E' NUMBER '004'
293| * WITH P_SETNAME INTO L_MESSAGE.
294| * MESSAGE S000(ZCOM1) DISPLAY LIKE 'E' WITH L_MESSAGE.
295| * LEAVE LIST-PROCESSING.
296| ENDIF.
- EN: Compose the SETID by set class with controlling area or chart of accounts, then read the set hierarchy values via K_HIERARCHY_TABLES_READ into GT_VALUE_SET.
- 호출(파서): K_HIERARCHY_TABLES_READ
- SAP 객체: K_HIERARCHY_TABLES_READ, SETHIER, SETLEAF, GT_VALUE_SET
- 업무 키워드: 세트 값 조회, 코스트센터 그룹, 원가요소 그룹, 계정과목 그룹, 관리회계영역
- English: Set Hierarchy, Cost Center Group, Cost Element Group, K_HIERARCHY_TABLES_READ
- 정의부(복사 시 함께 필요):
L_CLASS,GC_KOKRS,L_SETID,GV_KTOPL,LT_NODE,GT_VALUE_SET,LT_GRPHINFO - 위치:
abap://ZCOR0020/ZCO_COMMON#L249-L296· confidence 0.9 ·ZCOR0020#ZCO_COMMON#FORM#GET_SETLEAF_VALUES#C1
FORM DETERMINE_KSTAR — ZCOR0020F01 L199-L260 (62줄)
선택화면의 원가요소 또는 원가요소 그룹(SET CLASS 0102)을 전개해 CSKB/CSKU에서 유효한 원가요소(0050000000~0069999999)를 구하고, 예산통제 대상 옵션이면 ZCOT0010 등록 원가요소만 남겨 조회 범위 GR_KSTAR를 만든다.
이 unit 의 조각 4개가 46/62줄(74%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[control_flow] 원가요소(S_KSTAR)가 입력되면 그대로 범위로 쓰고, 원가요소 그룹(P_KASET)이면 GET_SETLEAF_VALUES로 SET CLASS 0102 그룹을 전개해 범위를 만들며 비어 있으면 오류 메시지 후 종료한다.
208| IF S_KSTAR[] IS NOT INITIAL.
209| LR_KSTAR[] = S_KSTAR[].
210| ELSEIF P_KASET IS NOT INITIAL.
211| PERFORM GET_SETLEAF_VALUES USING
212| P_KASET '0102'.
213| MACRO_VALUE_TO_RANGE : LR_KSTAR GT_VALUE_SET.
214|
215| IF LR_KSTAR[] IS INITIAL.
216| MESSAGE S000 DISPLAY LIKE 'E'
217| WITH '원가요소 그룹에 데이터가 없습니다..'(F08).
218| LEAVE LIST-PROCESSING.
219| ENDIF.
220| ENDIF.
- EN: Use entered cost elements S_KSTAR or expand the cost element group P_KASET (set class 0102) via GET_SETLEAF_VALUES; stop with an error message if the group is empty.
- 호출(파서): GET_SETLEAF_VALUES
- SAP 객체: GET_SETLEAF_VALUES, CSKA
- 업무 키워드: 원가요소 그룹, 그룹 전개, 입력 검증
- English: Cost Element Group, Set Leaf Values, Set Class 0102
- 정의부(복사 시 함께 필요):
S_KSTAR,LR_KSTAR,P_KASET,MACRO_VALUE_TO_RANGE,GT_VALUE_SET - 위치:
abap://ZCOR0020/ZCOR0020F01#L208-L220· confidence 0.85 ·ZCOR0020#ZCOR0020F01#FORM#DETERMINE_KSTAR#C1
[sql_select] CSKB와 CSKU를 조인해 관리회계영역의 현재 유효한 원가요소 중 0050000000~0069999999 범위(비용 계정)에 속하고 입력 범위에 해당하는 원가요소와 명칭을 GT_KSTAR에 조회한다.
223| SELECT A~KSTAR B~KTEXT
224| FROM CSKB AS A INNER JOIN CSKU AS B
225| ON A~KSTAR = B~KSTAR
226| INTO CORRESPONDING FIELDS OF TABLE GT_KSTAR
227| WHERE A~KOKRS = P_KOKRS
228| AND A~KSTAR BETWEEN '0050000000' AND '0069999999'
229| AND SPRAS = SY-LANGU
230| AND A~DATBI >= SY-DATUM
231| AND A~DATAB <= SY-DATUM
232| AND A~KSTAR IN LR_KSTAR.
233|
234| SORT GT_KSTAR BY KSTAR.
- EN: Select valid cost elements and texts from CSKB joined with CSKU for the controlling area within 0050000000-0069999999 and the input range into GT_KSTAR.
- 테이블(파서): read CSKB, CSKU / write -
- SAP 객체: CSKB, CSKU, GT_KSTAR
- 업무 키워드: 원가요소 마스터, 비용 계정 범위, 유효기간, 원가요소 명칭
- English: Cost Element Master, CSKB, CSKU, Validity
- 정의부(복사 시 함께 필요):
GT_KSTAR,P_KOKRS,LR_KSTAR - 위치:
abap://ZCOR0020/ZCOR0020F01#L223-L234· confidence 0.95 ·ZCOR0020#ZCOR0020F01#FORM#DETERMINE_KSTAR#C2
[validation] 예산통제 대상만 조회 옵션(P_CONT)이면 ZCOT0010(예산통제 그룹 마스터)을 읽어 등록되지 않은 원가요소를 GT_KSTAR에서 삭제한다.
237| IF P_CONT = 'X'.
238| SELECT * FROM ZCOT0010
239| INTO CORRESPONDING FIELDS OF TABLE LT_ZCOT0010
240| WHERE KOKRS = P_KOKRS.
241|
242| SORT LT_ZCOT0010 BY KSTAR.
243|
244| LOOP AT GT_KSTAR.
245|
246| READ TABLE LT_ZCOT0010 WITH KEY
247| KSTAR = GT_KSTAR-KSTAR BINARY SEARCH.
248|
249| IF SY-SUBRC NE 0.
250| DELETE GT_KSTAR.
251| ENDIF.
252|
253| ENDLOOP.
254| ENDIF.
- EN: When only budget-controlled cost elements are requested (P_CONT), read ZCOT0010 and delete cost elements from GT_KSTAR that are not registered there.
- 테이블(파서): read ZCOT0010 / write GT_KSTAR
- SAP 객체: ZCOT0010, GT_KSTAR
- 업무 키워드: 예산통제 대상, 원가요소 필터, 예산통제 그룹
- English: Budget Control, Cost Element Filter, ZCOT0010
- 정의부(복사 시 함께 필요):
P_CONT,LT_ZCOT0010,P_KOKRS,GT_KSTAR - 위치:
abap://ZCOR0020/ZCOR0020F01#L237-L254· confidence 0.9 ·ZCOR0020#ZCOR0020F01#FORM#DETERMINE_KSTAR#C3
[other] 최종 조회 대상 원가요소를 COSP 조회용 범위 GR_KSTAR에 EQ 조건으로 추가한다.
257| LOOP AT GT_KSTAR.
258| ADD_RANGE_EQ : GR_KSTAR GT_KSTAR-KSTAR.
259| ENDLOOP.
- EN: Add each remaining cost element to the GR_KSTAR range used for the COSP selection.
- SAP 객체: GT_KSTAR
- 업무 키워드: 원가요소 범위, 조회 조건
- English: Cost Element Range, Select-Option
- 정의부(복사 시 함께 필요):
GT_KSTAR,ADD_RANGE_EQ,GR_KSTAR - 위치:
abap://ZCOR0020/ZCOR0020F01#L257-L259· confidence 0.85 ·ZCOR0020#ZCOR0020F01#FORM#DETERMINE_KSTAR#C4
FORM DETERMINE_AUFNR — ZCOR0020F01 L802-L843 (42줄)
선택화면의 투자오더 또는 오더 그룹(SET CLASS 0103)을 전개해 ONROR/AUFK에서 오더유형 I·S로 시작하는 오더의 OBJNR을 구해 조회 대상(GR_SELECT_OBJ)을 결정한다.
이 unit 의 조각 2개가 32/42줄(76%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[control_flow] 오더번호(S_AUFNR)가 입력되면 그대로 범위로 쓰고, 오더 그룹(P_KOSET)이면 GET_SETLEAF_VALUES로 SET CLASS 0103 그룹을 전개해 오더 범위를 만들며 비어 있으면 오류 메시지 후 종료한다.
807| IF S_AUFNR[] IS NOT INITIAL.
808| LR_AUFNR[] = S_AUFNR[].
809| ELSEIF P_KOSET IS NOT INITIAL.
810| PERFORM GET_SETLEAF_VALUES USING
811| P_KOSET '0103'.
812| MACRO_VALUE_TO_RANGE : LR_AUFNR GT_VALUE_SET.
813|
814| IF LR_AUFNR[] IS INITIAL.
815| MESSAGE S000 DISPLAY LIKE 'E'
816| WITH '투자오더 그룹에 데이터가 없습니다.'(F12).
817| LEAVE LIST-PROCESSING.
818| ENDIF.
819| ENDIF.
- EN: Use entered order numbers S_AUFNR or expand the order group P_KOSET (set class 0103) via GET_SETLEAF_VALUES into an order range; stop with an error message if the group yields nothing.
- 호출(파서): GET_SETLEAF_VALUES
- SAP 객체: GET_SETLEAF_VALUES, AUFK
- 업무 키워드: 투자오더 그룹, 그룹 전개, 오더 범위, 입력 검증
- English: Order Group, Set Leaf Values, Set Class 0103
- 정의부(복사 시 함께 필요):
S_AUFNR,LR_AUFNR,P_KOSET,MACRO_VALUE_TO_RANGE,GT_VALUE_SET - 위치:
abap://ZCOR0020/ZCOR0020F01#L807-L819· confidence 0.85 ·ZCOR0020#ZCOR0020F01#FORM#DETERMINE_AUFNR#C1
[sql_select] ONROR와 AUFK를 조인해 오더 범위 중 오더유형(AUART)이 I 또는 S로 시작하는 투자/설비 오더의 OBJNR-오더번호 매핑을 GT_ONROR에 읽고 OBJNR을 조회 대상 범위 GR_SELECT_OBJ에 추가하며 대상이 없으면 오류로 종료한다.
821| SELECT A~OBJNR A~AUFNR
822| FROM ONROR AS A INNER JOIN AUFK AS B
823| ON A~AUFNR = B~AUFNR
824| INTO CORRESPONDING FIELDS OF TABLE GT_ONROR
825| WHERE A~AUFNR IN LR_AUFNR
826| " I와 S로 시작하는 오더만 조회한다.
827| AND ( B~AUART LIKE 'I%' OR B~AUART LIKE 'S%' ).
828|
829| SORT GT_ONROR BY OBJNR.
830|
831| " 실제조회 대상 투자오더
832| LOOP AT GT_ONROR.
833| ADD_RANGE_EQ : GR_SELECT_OBJ GT_ONROR-OBJNR.
834| ENDLOOP.
835|
836| IF GR_SELECT_OBJ[] IS INITIAL.
837| MESSAGE S000 DISPLAY LIKE 'E' WITH '대상 오더가 없습니다'(F14).
838| LEAVE LIST-PROCESSING.
839| ENDIF.
- EN: Join ONROR with AUFK to get object number/order mappings for orders whose order type starts with I or S into GT_ONROR, add each OBJNR to the selection range GR_SELECT_OBJ, and stop with an error when none exist.
- 테이블(파서): read ONROR, AUFK / write -
- SAP 객체: ONROR, AUFK, GT_ONROR
- 업무 키워드: 오브젝트 번호, 투자오더, 오더유형, 조회 대상 결정
- English: Object Number, Internal Order, Order Type, ONROR
- 정의부(복사 시 함께 필요):
AUFK,GT_ONROR,LR_AUFNR,ADD_RANGE_EQ,GR_SELECT_OBJ - 위치:
abap://ZCOR0020/ZCOR0020F01#L821-L839· confidence 0.9 ·ZCOR0020#ZCOR0020F01#FORM#DETERMINE_AUFNR#C2
FORM GET_MASTER_ZCOT0010 — ZCOR0020F01 L758-L767 (10줄)
관리회계영역별 원가요소-예산통제 그룹 매핑 마스터 ZCOT0010을 전체 조회해 GT_ZCOT0010에 담고 원가요소로 정렬한다.
이 unit 의 조각 1개가 5/10줄(50%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[sql_select] 예산통제 그룹 마스터 ZCOT0010을 관리회계영역(P_KOKRS) 기준으로 조회해 GT_ZCOT0010에 담고 KSTAR로 정렬한다(이후 BINARY SEARCH용).
762| SELECT * FROM ZCOT0010
763| INTO CORRESPONDING FIELDS OF TABLE GT_ZCOT0010
764| WHERE KOKRS = P_KOKRS.
765|
766| SORT GT_ZCOT0010 BY KSTAR.
- EN: Read the budget control group master ZCOT0010 for the controlling area into GT_ZCOT0010 and sort by cost element for binary search.
- 테이블(파서): read ZCOT0010 / write -
- SAP 객체: ZCOT0010
- 업무 키워드: 예산통제 그룹, 원가요소 마스터, 관리회계영역
- English: Budget Control Group, Cost Element, Custom Table
- 정의부(복사 시 함께 필요):
GT_ZCOT0010,P_KOKRS - 위치:
abap://ZCOR0020/ZCOR0020F01#L762-L766· confidence 0.95 ·ZCOR0020#ZCOR0020F01#FORM#GET_MASTER_ZCOT0010#C1
FORM PROCESS_DATA — ZCOR0020F01 L113-L128 (16줄)
코스트센터 모드는 COSP 계획값, 투자오더 모드는 BPEJ 예산을 읽고 COSP 실적을 조회한 뒤 집계·가공·단위환산 서브루틴을 순서대로 호출하는 메인 처리 흐름이다.
이 unit 의 조각 1개가 11/16줄(69%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[control_flow] 코스트센터(PR_CC)면 SELECT_COSP B로 계획값을, 투자오더(PR_IO)면 SELECT_BPEJ로 예산을 읽고 SELECT_COSP A로 실적을 조회한 후 COLLECT_DATA, EDIT_DATA, CONVERT_CURR를 순차 수행한다.
117| " 계획값 SELECT.
118| IF PR_CC = 'X'.
119| PERFORM SELECT_COSP USING 'B'. " 계획
120| ELSEIF PR_IO = 'X'.
121| PERFORM SELECT_BPEJ.
122| ENDIF.
123|
124| PERFORM SELECT_COSP USING 'A'. " 실적
125| PERFORM COLLECT_DATA.
126| PERFORM EDIT_DATA.
127| PERFORM CONVERT_CURR.
- EN: Dispatch budget retrieval (SELECT_COSP B for cost centers or SELECT_BPEJ for orders), then actuals (SELECT_COSP A), followed by COLLECT_DATA, EDIT_DATA and CONVERT_CURR.
- 호출(파서): SELECT_COSP, SELECT_BPEJ, SELECT_COSP, COLLECT_DATA, EDIT_DATA, CONVERT_CURR
- SAP 객체: COSP, BPEJ
- 업무 키워드: 예산 조회, 실적 조회, 처리 순서, 코스트센터, 투자오더
- English: Budget, Actual, Process Flow, COSP, BPEJ
- 정의부(복사 시 함께 필요):
PR_CC,PR_IO - 위치:
abap://ZCOR0020/ZCOR0020F01#L117-L127· confidence 0.9 ·ZCOR0020#ZCOR0020F01#FORM#PROCESS_DATA#C1
FORM SELECT_COSP — ZCOR0020F01 L359-L435 (77줄)
구분(B: 예산 계획값, A: 실적/약정/임시)에 따라 값유형·버전 범위를 정해 COSP에서 오브젝트·원가요소별 월별 금액을 합산 조회하고 GT_COSP에 구분을 표시한다.
이 unit 의 조각 2개가 66/77줄(86%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[control_flow] 예산(B)이면 값유형 01(계획)과 선택한 예산 버전(B00 사업계획, B10 실행예산, 또는 B10~B15+B20 전체)을, 실적(A)이면 값유형 04(실제)/22(약정)/60(임시)와 버전 000을 조회 범위로 구성한다.
368| IF P_FLAG = 'B'.
369| " 1 : 계획값
370| ADD_RANGE_EQ : LR_WRTTP '01'.
371|
372| IF P_B00 = 'X'.
373| ADD_RANGE_EQ : LR_VERSN 'B00'.
374| ELSEIF P_B10 = 'X'.
375| ADD_RANGE_EQ : LR_VERSN 'B10'.
376| ELSEIF P_B1X = 'X'.
377| ADD_RANGE_EQ : LR_VERSN 'B10'.
378| ADD_RANGE_EQ : LR_VERSN 'B11'.
379| ADD_RANGE_EQ : LR_VERSN 'B12'.
380| ADD_RANGE_EQ : LR_VERSN 'B13'.
381| ADD_RANGE_EQ : LR_VERSN 'B14'.
382| ADD_RANGE_EQ : LR_VERSN 'B15'. " 판매운영비 추가 2013-09-30
383| ADD_RANGE_EQ : LR_VERSN 'B20'.
384| ENDIF.
385| ELSEIF P_FLAG = 'A'.
386| * 실제, 약정, 임시
387| ADD_RANGE_EQ : LR_WRTTP '04'. " 실제
388| ADD_RANGE_EQ : LR_WRTTP '22'. " 약정
389| ADD_RANGE_EQ : LR_WRTTP '60'. " 임시
390|
391| * " 2. 버전 -000
392| ADD_RANGE_EQ : LR_VERSN '000'.
393| ENDIF.
- EN: Build WRTTP/VERSN ranges: for budget use value type 01 with the chosen plan version(s) B00, B10 or B10-B15 plus B20; for actual use value types 04 (actual), 22 (commitment), 60 (parked) with version 000.
- SAP 객체: COSP-WRTTP, COSP-VERSN
- 업무 키워드: 값유형, 예산 버전, 사업계획, 실행예산, 약정, 임시전표
- English: Value Type, Plan Version, Commitment, Parked Document
- 정의부(복사 시 함께 필요):
ADD_RANGE_EQ,LR_WRTTP,P_B00,LR_VERSN,P_B10,P_B1X - 위치:
abap://ZCOR0020/ZCOR0020F01#L368-L393· confidence 0.9 ·ZCOR0020#ZCOR0020F01#FORM#SELECT_COSP#C1
[sql_select] COSP(원장 00)에서 조회 대상 OBJNR·회계연도·값유형·버전·원가요소 범위로 월별 금액 WKG001~012를 오브젝트·원가요소·차대구분·통화·버전·값유형별 합산해 GT_COSP에 추가하고, 실적이면 차대구분 A 행을 제거한 뒤 구분(C_TYPE)을 표시한다.
395| SELECT
396| OBJNR
397| GJAHR
398| KSTAR
399| BEKNZ
400| TWAER
401| VERSN
402| WRTTP
403| SUM( WKG001 ) AS WKG001
404| SUM( WKG002 ) AS WKG002
405| SUM( WKG003 ) AS WKG003
406| SUM( WKG004 ) AS WKG004
407| SUM( WKG005 ) AS WKG005
408| SUM( WKG006 ) AS WKG006
409| SUM( WKG007 ) AS WKG007
410| SUM( WKG008 ) AS WKG008
411| SUM( WKG009 ) AS WKG009
412| SUM( WKG010 ) AS WKG010
413| SUM( WKG011 ) AS WKG011
414| SUM( WKG012 ) AS WKG012
415| FROM COSP
416| APPENDING CORRESPONDING FIELDS OF TABLE GT_COSP
417| WHERE LEDNR = '00'
418| AND OBJNR IN GR_SELECT_OBJ
419| AND GJAHR = P_GJAHR
420| AND WRTTP IN LR_WRTTP
421| AND VERSN IN LR_VERSN
422| AND KSTAR IN GR_KSTAR
423| GROUP BY OBJNR GJAHR KSTAR BEKNZ TWAER VERSN
424| WRTTP.
425|
426| IF GT_COSP[] IS NOT INITIAL. " 구분 설정.
427| IF P_FLAG = 'A'. " 실제
428| DELETE GT_COSP WHERE BEKNZ = 'A'.
429| ENDIF.
430|
431| LS_COSP-C_TYPE = P_FLAG.
432| MODIFY GT_COSP FROM LS_COSP TRANSPORTING C_TYPE
433| WHERE C_TYPE IS INITIAL.
434| ENDIF.
- EN: Aggregate monthly amounts WKG001-012 from COSP (ledger 00) for the target objects, fiscal year, value types, versions and cost element range into GT_COSP, delete debit/credit indicator A rows for actual data, and set C_TYPE to the flag.
- 테이블(파서): read COSP / write GT_COSP
- SAP 객체: COSP, GT_COSP
- 업무 키워드: 코스트센터 실적, 계획값, 월별 금액, 원가요소, 차대구분, 관리회계 합계
- English: COSP, Cost Totals, Plan Value, Actual, Debit/Credit Indicator
- 정의부(복사 시 함께 필요):
COSP,GT_COSP,GR_SELECT_OBJ,P_GJAHR,LR_WRTTP,LR_VERSN,GR_KSTAR,LS_COSP - 선언을 못 찾은 이름: C_TYPE (수집 안 된 인클루드·함수 인터페이스일 수 있다)
- 위치:
abap://ZCOR0020/ZCOR0020F01#L395-L434· confidence 0.95 ·ZCOR0020#ZCOR0020F01#FORM#SELECT_COSP#C2
FORM SELECT_BPEJ — ZCOR0020F01 L852-L878 (27줄)
투자오더의 연간 예산(BPEJ, 값유형 41, 편성/증액/삭감)을 오브젝트별로 합산해 GT_COSP에 예산(C_TYPE B, 버전 B00)으로 추가한다.
이 unit 의 조각 1개가 20/27줄(74%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[sql_select] BPEJ에서 조회 대상 오더 OBJNR(GR_SELECT_OBJ)·회계연도의 값유형 41(예산) 중 VORGA KBUD(편성)/KBN0(증액)/KBR0(삭감) 금액 WLJHR을 합산해 GT_COSP에 추가하고 구분을 예산(C_TYPE B), 버전 B00으로 표시한다.
857| SELECT
858| GJAHR
859| OBJNR
860| TWAER
861| SUM( WLJHR ) AS WKG001
862| FROM BPEJ
863| APPENDING CORRESPONDING FIELDS OF TABLE GT_COSP
864| WHERE OBJNR IN GR_SELECT_OBJ
865| AND WRTTP = '41'
866| AND GJAHR = P_GJAHR
867| AND VORGA IN ('KBUD', 'KBN0', 'KBR0') " 예산 편성, 증액, 삭감
868| GROUP BY GJAHR OBJNR TWAER.
869|
870| IF GT_COSP[] IS NOT INITIAL.
871| LS_COSP-C_TYPE = 'B'.
872| LS_COSP-VERSN = 'B00'. " B00 연간 필드에 맵핑해줌.
873| MODIFY GT_COSP FROM LS_COSP TRANSPORTING C_TYPE
874| VERSN
875| WHERE C_TYPE IS INITIAL.
876| ENDIF.
- EN: Select yearly order budget from BPEJ (value type 41, business transactions KBUD/KBN0/KBR0 for original budget, supplement, return) summed by object number and fiscal year into GT_COSP, marking rows as budget type B with version B00.
- 테이블(파서): read BPEJ / write GT_COSP
- SAP 객체: BPEJ, GT_COSP
- 업무 키워드: 투자오더 예산, 예산 편성, 예산 증액, 예산 삭감, 연간 예산
- English: Order Budget, BPEJ, Original Budget, Supplement, Return
- 정의부(복사 시 함께 필요):
GT_COSP,GR_SELECT_OBJ,P_GJAHR,LS_COSP - 선언을 못 찾은 이름: C_TYPE (수집 안 된 인클루드·함수 인터페이스일 수 있다)
- 위치:
abap://ZCOR0020/ZCOR0020F01#L857-L876· confidence 0.95 ·ZCOR0020#ZCOR0020F01#FORM#SELECT_BPEJ#C1
FORM COLLECT_DATA — ZCOR0020F01 L444-L498 (55줄)
COSP/BPEJ에서 읽은 월별 금액(WKG001~012)을 선택 기간 범위만큼 순회하며 오브젝트·원가요소별로 예산/실적 필드에 배분하고 COLLECT로 GT_DATA에 집계한다.
이 unit 의 조각 2개가 38/55줄(69%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[control_flow] 집계할 기간 범위를 코스트센터 모드는 선택화면 기간(S_PERBL LOWHIGH), 투자오더 모드는 연간 전체(112월)로 정하고 반복 횟수(LV_DOCNT)를 계산한다.
458| IF PR_CC = 'X'.
459| LV_START = S_PERBL-LOW.
460| IF S_PERBL-HIGH IS INITIAL.
461| LV_END = LV_START.
462| ELSE.
463| LV_END = S_PERBL-HIGH.
464| ENDIF.
465| ELSEIF PR_IO = 'X'.
466| LV_START = 1.
467| LV_END = 12.
468| ENDIF.
469|
470| LV_DOCNT = LV_END - LV_START + 1.
- EN: Determine the period range to aggregate: selected periods S_PERBL for cost center mode, full year 1-12 for internal order mode, and compute the loop count.
- SAP 객체: COSP-PERBL, S_PERBL
- 업무 키워드: 기간 범위, 코스트센터, 투자오더, 연간
- English: Period Range, Fiscal Period, Cost Center, Internal Order
- 정의부(복사 시 함께 필요):
PR_CC,LV_START,S_PERBL,LV_END,PR_IO,LV_DOCNT - 위치:
abap://ZCOR0020/ZCOR0020F01#L458-L470· confidence 0.9 ·ZCOR0020#ZCOR0020F01#FORM#COLLECT_DATA#C1
[aggregation] GT_COSP 각 행의 월별 금액 필드(WKGnnn)를 시작월부터 동적 ASSIGN으로 읽어 OBJNR·원가요소(코스트센터 모드)·통화를 키로 DISTIBUTE_FIELD로 예산/실적 필드에 배분한 뒤 COLLECT로 GT_DATA에 합산한다.
472| LOOP AT GT_COSP.
473| LV_NC = LV_START.
474| DO LV_DOCNT TIMES.
475| CONCATENATE 'GT_COSP-WKG' LV_NC
476| INTO LV_FIELD.
477|
478| ASSIGN (LV_FIELD) TO <FS_FIELD>.
479|
480| IF SY-SUBRC EQ 0.
481|
482| GT_DATA-OBJNR = GT_COSP-OBJNR.
483| IF PR_CC = 'X'.
484| GT_DATA-KSTAR = GT_COSP-KSTAR.
485| ENDIF.
486| GT_DATA-TWAER = GV_WAERS.
487|
488| PERFORM DISTIBUTE_FIELD USING <FS_FIELD>.
489| COLLECT GT_DATA. CLEAR : GT_DATA.
490| ENDIF.
491|
492| LV_NC = LV_NC + 1.
493| CLEAR : LV_FIELD.
494| ENDDO.
495| CLEAR : LV_NC.
496| ENDLOOP.
- EN: For each GT_COSP row read the monthly amount fields WKGnnn from the start period via dynamic ASSIGN, distribute them into budget/actual fields through DISTIBUTE_FIELD keyed by OBJNR, cost element and currency, and COLLECT into GT_DATA.
- 호출(파서): DISTIBUTE_FIELD
- SAP 객체: GT_COSP, GT_DATA, COSP
- 업무 키워드: 월별 금액 집계, 오브젝트 번호, 원가요소, 예산 실적 합산
- English: Monthly Amount, Object Number, Cost Element, COLLECT Aggregation
- 정의부(복사 시 함께 필요):
GT_COSP,LV_NC,LV_START,LV_DOCNT,LV_FIELD,<FS_FIELD>,GT_DATA,PR_CC,GV_WAERS - 위치:
abap://ZCOR0020/ZCOR0020F01#L472-L496· confidence 0.9 ·ZCOR0020#ZCOR0020F01#FORM#COLLECT_DATA#C2
FORM DISTIBUTE_FIELD — ZCOR0020F01 L507-L537 (31줄)
GT_COSP 한 행의 월별 금액을 구분(C_TYPE)과 버전/값유형에 따라 GT_DATA의 예산 버전 필드(BG_B00~BG_B20) 또는 실적(ACTUAL)/임시(PARK) 필드에 동적으로 배분한다.
이 unit 의 조각 1개가 25/31줄(81%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[calculation] 예산(C_TYPE B)이면 버전명으로 GT_DATA-BG_+VERSN 필드를 동적 ASSIGN해 금액을 넣고, 실적(C_TYPE A)이면 값유형 WRTTP 04는 ACTUAL, 22/60(약정·임시)은 PARK 필드에 금액을 배분한다.
511| IF GT_COSP-C_TYPE = 'B'.
512| CLEAR : LV_FIELD.
513|
514| CONCATENATE 'GT_DATA-BG_' GT_COSP-VERSN
515| INTO LV_FIELD.
516|
517| ASSIGN (LV_FIELD) TO <FS_FIELD>.
518|
519| IF SY-SUBRC EQ 0.
520| <FS_FIELD> = P_VALUE.
521| ENDIF.
522| ELSEIF GT_COSP-C_TYPE = 'A'.
523| CASE GT_COSP-WRTTP.
524| WHEN '04'.
525| LV_FIELD = 'GT_DATA-ACTUAL'.
526| WHEN '22' OR '60'.
527| LV_FIELD = 'GT_DATA-PARK'.
528| ENDCASE.
529|
530| ASSIGN (LV_FIELD) TO <FS_FIELD>.
531|
532| IF SY-SUBRC EQ 0.
533| <FS_FIELD> = P_VALUE.
534| ENDIF.
535| ENDIF.
- EN: For budget rows (C_TYPE B) assign the amount to the GT_DATA-BG_ field dynamically; for actual rows (C_TYPE A) route value type 04 to ACTUAL and 22/60 (commitment/parked) to PARK.
- SAP 객체: GT_COSP, GT_DATA, COSP-WRTTP, COSP-VERSN
- 업무 키워드: 예산 버전 배분, 실적, 약정, 임시전표, 값유형, 동적 필드
- English: Budget Version, Actual, Commitment, Parked, Value Type, Dynamic Assign
- 정의부(복사 시 함께 필요):
GT_COSP,LV_FIELD,<FS_FIELD> - 위치:
abap://ZCOR0020/ZCOR0020F01#L511-L535· confidence 0.9 ·ZCOR0020#ZCOR0020F01#FORM#DISTIBUTE_FIELD#C1
FORM EDIT_DATA — ZCOR0020F01 L546-L709 (164줄)
집계된 GT_DATA에 코스트센터/원가요소/오더 명칭을 붙이고 총예산(BG_ALL)·총실적·가용예산·가용율을 계산해 신호등 상태와 예산통제 그룹을 부여한 뒤 금액이 모두 0인 행을 제거한다.
이 unit 의 조각 7개가 127/164줄(77%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[sql_select] 관리회계영역(P_KOKRS)의 현재 유효한 코스트센터 명칭을 CSKT와 CSKS 조인으로 조회해 LT_CSKT에 담고 KOSTL로 정렬한다.
570| SELECT B~KOSTL A~KTEXT
571| FROM CSKT AS A INNER JOIN CSKS AS B
572| ON A~KOSTL = B~KOSTL
573| INTO CORRESPONDING FIELDS OF TABLE LT_CSKT
574| WHERE A~KOKRS = P_KOKRS
575| AND B~DATBI >= SY-DATUM
576| AND B~DATAB <= SY-DATUM
577| AND A~SPRAS = SY-LANGU
578| AND A~DATBI >= SY-DATUM.
579|
580| SORT LT_CSKT BY KOSTL.
- EN: Select currently valid cost center texts (CSKT joined with CSKS) for the controlling area into LT_CSKT and sort by KOSTL.
- 테이블(파서): read CSKT, CSKS / write -
- SAP 객체: CSKT, CSKS
- 업무 키워드: 코스트센터 명칭, 관리회계영역, 유효기간
- English: Cost Center Text, Controlling Area, Validity Period
- 정의부(복사 시 함께 필요):
CSKS,LT_CSKT,P_KOKRS - 위치:
abap://ZCOR0020/ZCOR0020F01#L570-L580· confidence 0.95 ·ZCOR0020#ZCOR0020F01#FORM#EDIT_DATA#C1
[sql_select] GT_DATA에 있는 원가요소의 명칭을 계정과목표(GV_KTOPL) 기준으로 CSKU에서 FOR ALL ENTRIES로 조회해 LT_CSKU에 담는다.
583| SELECT KSTAR KTEXT
584| FROM CSKU
585| INTO CORRESPONDING FIELDS OF TABLE LT_CSKU
586| FOR ALL ENTRIES IN GT_DATA
587| WHERE KTOPL = GV_KTOPL
588| AND KSTAR = GT_DATA-KSTAR
589| AND SPRAS = SY-LANGU.
590|
591| SORT LT_CSKU BY KSTAR.
- EN: Select cost element texts from CSKU for all cost elements in GT_DATA by chart of accounts GV_KTOPL into LT_CSKU.
- 테이블(파서): read CSKU / write -
- SAP 객체: CSKU
- 업무 키워드: 원가요소 명칭, 계정과목표
- English: Cost Element Text, Chart of Accounts
- 정의부(복사 시 함께 필요):
LT_CSKU,GT_DATA,GV_KTOPL - 위치:
abap://ZCOR0020/ZCOR0020F01#L583-L591· confidence 0.95 ·ZCOR0020#ZCOR0020F01#FORM#EDIT_DATA#C2
[calculation] 코스트센터 모드에서 OBJNR을 GT_ONRKS로 코스트센터로 환산하고 코스트센터·원가요소 명칭을 붙인 뒤, 총예산(BG_ALL)을 사업계획(B00) 선택 시 BG_B00, 아니면 실행예산 버전 B10~B15+B20 합계로 계산한다.
595| IF PR_CC = 'X'.
596| READ TABLE GT_ONRKS WITH KEY OBJNR = <FS_DATA>-OBJNR
597| BINARY SEARCH.
598|
599| IF SY-SUBRC EQ 0.
600| <FS_DATA>-KOSTL = GT_ONRKS-KOSTL.
601| ENDIF.
602|
603| READ TABLE LT_CSKT INTO LS_CSKT
604| WITH KEY KOSTL = <FS_DATA>-KOSTL BINARY SEARCH.
605|
606| IF SY-SUBRC EQ 0.
607| <FS_DATA>-KOSTL_T = LS_CSKT-KTEXT.
608| ENDIF.
609|
610| READ TABLE LT_CSKU INTO LS_CSKU
611| WITH KEY KSTAR = <FS_DATA>-KSTAR BINARY SEARCH.
612|
613| IF SY-SUBRC EQ 0.
614| <FS_DATA>-KSTAR_T = LS_CSKU-KTEXT.
615| ENDIF.
616|
617| IF P_B00 NE 'X'.
618| <FS_DATA>-BG_ALL =
619| <FS_DATA>-BG_B10 +
620| <FS_DATA>-BG_B11 +
621| <FS_DATA>-BG_B12 +
622| <FS_DATA>-BG_B13 +
623| <FS_DATA>-BG_B14 +
624| <FS_DATA>-BG_B15 +
625| <FS_DATA>-BG_B20.
626| ELSE.
627| <FS_DATA>-BG_ALL = <FS_DATA>-BG_B00.
628| ENDIF.
- EN: In cost center mode map OBJNR to cost center via GT_ONRKS, attach cost center/cost element texts, and compute total budget BG_ALL as BG_B00 (business plan) or the sum of execution budget versions B10-B15 and B20.
- SAP 객체: GT_ONRKS, GT_DATA
- 업무 키워드: 코스트센터, 총예산, 사업계획, 실행예산, 버전 합계
- English: Cost Center, Total Budget, Plan Version, Object Number
- 정의부(복사 시 함께 필요):
PR_CC,GT_ONRKS,GT_DATA,<FS_DATA>,LT_CSKT,LS_CSKT,LT_CSKU,LS_CSKU,P_B00 - 위치:
abap://ZCOR0020/ZCOR0020F01#L595-L628· confidence 0.9 ·ZCOR0020#ZCOR0020F01#FORM#EDIT_DATA#C3
[sql_select] 투자오더 모드에서 OBJNR을 GT_ONROR로 오더번호로 환산하고 AUFK에서 오더 명칭·책임코스트센터(KOSTV)·요청코스트센터(AKSTL)를 SELECT SINGLE로 읽어 명칭을 붙이며 총예산(BG_ALL)은 BG_B00으로 둔다.
629| ELSEIF PR_IO = 'X'.
630| READ TABLE GT_ONROR WITH KEY OBJNR = <FS_DATA>-OBJNR
631| BINARY SEARCH.
632|
633| IF SY-SUBRC EQ 0.
634| <FS_DATA>-AUFNR = GT_ONROR-AUFNR.
635| ENDIF.
636|
637| SELECT SINGLE KTEXT KOSTV AKSTL
638| FROM AUFK
639| INTO (<FS_DATA>-AUFNR_T,
640| <FS_DATA>-KOSTV,
641| <FS_DATA>-AKSTL)
642| WHERE AUFNR = <FS_DATA>-AUFNR.
643|
644| READ TABLE LT_CSKT INTO LS_CSKT
645| WITH KEY KOSTL = <FS_DATA>-KOSTV BINARY SEARCH.
646|
647| IF SY-SUBRC EQ 0.
648| <FS_DATA>-KOSTV_T = LS_CSKT-KTEXT.
649| ENDIF.
650|
651| CLEAR : LS_CSKT.
652|
653| READ TABLE LT_CSKT INTO LS_CSKT
654| WITH KEY KOSTL = <FS_DATA>-AKSTL BINARY SEARCH.
655|
656| IF SY-SUBRC EQ 0.
657| <FS_DATA>-AKSTL_T = LS_CSKT-KTEXT.
658| ENDIF.
659|
660| <FS_DATA>-BG_ALL = <FS_DATA>-BG_B00.
661| ENDIF.
- EN: In internal order mode map OBJNR to order number via GT_ONROR, read order text, responsible cost center (KOSTV) and requesting cost center (AKSTL) from AUFK with their texts, and set BG_ALL to BG_B00.
- 테이블(파서): read AUFK / write -
- SAP 객체: AUFK, GT_ONROR
- 업무 키워드: 투자오더, 오더 명칭, 책임 코스트센터, 요청 코스트센터, 총예산
- English: Internal Order, Responsible Cost Center, Requesting Cost Center, AUFK
- 정의부(복사 시 함께 필요):
PR_IO,GT_ONROR,GT_DATA,<FS_DATA>,AUFK,LT_CSKT,LS_CSKT - 위치:
abap://ZCOR0020/ZCOR0020F01#L629-L661· confidence 0.9 ·ZCOR0020#ZCOR0020F01#FORM#EDIT_DATA#C4
[calculation] 총집행(TOTAL_A=실적+임시), 가용예산(POSSIBLE_BG=총예산-총집행, 음수/예산없음은 0)과 가용율(%)을 계산하고 가용율 0은 초기, 10% 이하 빨강, 50% 이하 노랑, 50% 초과 초록 신호등 상태를 부여한다.
663| <FS_DATA>-TOTAL_A = <FS_DATA>-ACTUAL
664| + <FS_DATA>-PARK.
665|
666| <FS_DATA>-POSSIBLE_BG =
667| <FS_DATA>-BG_ALL -
668| <FS_DATA>-TOTAL_A.
669| *
670| IF <FS_DATA>-POSSIBLE_BG <= 0 OR
671| <FS_DATA>-BG_ALL = 0.
672| <FS_DATA>-POSSIBLE_BG = 0.
673| ENDIF.
674|
675| IF <FS_DATA>-BG_ALL NE 0.
676| LV_PV = <FS_DATA>-POSSIBLE_BG /
677| <FS_DATA>-BG_ALL.
678| LV_PV = LV_PV * 100.
679| ENDIF.
680|
681| IF LV_PV = 0.
682| <FS_DATA>-STATUS = GC_STATUS_INIT.
683| ELSEIF LV_PV <= 10.
684| <FS_DATA>-STATUS = GC_STATUS_RED.
685| ELSEIF LV_PV <= 50.
686| <FS_DATA>-STATUS = GC_STATUS_YELLOW.
687| ELSEIF LV_PV > 50.
688| <FS_DATA>-STATUS = GC_STATUS_GREEN.
689| ENDIF.
690|
691| <FS_DATA>-PER = LV_PV.
- EN: Compute total consumption (actual + parked), available budget (total budget minus consumption, floored at 0) and availability ratio in percent, then assign traffic-light status: 0 initial, <=10% red, <=50% yellow, >50% green.
- SAP 객체: GT_DATA
- 업무 키워드: 가용예산, 가용율, 예산 집행, 신호등 아이콘, 임시전표
- English: Available Budget, Availability Ratio, Budget Consumption, Traffic Light Status
- 정의부(복사 시 함께 필요):
GT_DATA,<FS_DATA>,LV_PV,GC_STATUS_INIT,GC_STATUS_RED,GC_STATUS_YELLOW,GC_STATUS_GREEN - 위치:
abap://ZCOR0020/ZCOR0020F01#L663-L691· confidence 0.95 ·ZCOR0020#ZCOR0020F01#FORM#EDIT_DATA#C5
[other] 원가요소별 예산통제 그룹 마스터(GT_ZCOT0010)를 관리회계영역+원가요소로 읽어 그룹명과 그룹 설명을 GT_DATA 행에 부여한다.
693| READ TABLE GT_ZCOT0010 WITH KEY
694| KOKRS = P_KOKRS
695| KSTAR = <FS_DATA>-KSTAR
696| BINARY SEARCH.
697|
698| IF SY-SUBRC EQ 0.
699| <FS_DATA>-GROUPNAME = GT_ZCOT0010-GROUPNAME.
700| <FS_DATA>-GRP_DESCRIPT = GT_ZCOT0010-GRP_DESCRIPT.
701| ENDIF.
- EN: Look up the budget control group master GT_ZCOT0010 by controlling area and cost element and assign group name and description to the row.
- SAP 객체: ZCOT0010
- 업무 키워드: 예산통제 그룹, 원가요소 매핑
- English: Budget Control Group, Cost Element Mapping
- 정의부(복사 시 함께 필요):
GT_ZCOT0010,P_KOKRS,GT_DATA,<FS_DATA> - 위치:
abap://ZCOR0020/ZCOR0020F01#L693-L701· confidence 0.9 ·ZCOR0020#ZCOR0020F01#FORM#EDIT_DATA#C6
[other] 실적·임시·총예산·가용예산이 모두 0인 무의미한 행을 GT_DATA에서 삭제한다.
706| DELETE GT_DATA WHERE ACTUAL = 0
707| AND PARK = 0 AND BG_ALL = 0 AND POSSIBLE_BG = 0.
- EN: Delete rows from GT_DATA where actual, parked, total budget and available budget are all zero.
- 테이블(파서): read - / write GT_DATA
- SAP 객체: GT_DATA
- 업무 키워드: 0 행 제거, 결과 정리
- English: Zero Row Deletion
- 정의부(복사 시 함께 필요):
GT_DATA - 선언을 못 찾은 이름: BG_ALL (수집 안 된 인클루드·함수 인터페이스일 수 있다)
- 위치:
abap://ZCOR0020/ZCOR0020F01#L706-L707· confidence 0.9 ·ZCOR0020#ZCOR0020F01#FORM#EDIT_DATA#C7
FORM CONVERT_CURR — ZCOR0020F01 L718-L749 (32줄)
선택화면의 금액 단위 옵션(원/천원/백만원)에 따라 GT_DATA의 모든 통화(CURR) 필드를 1000 또는 1000000으로 나누어 표시 단위를 환산한다.
이 unit 의 조각 1개가 25/32줄(78%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[calculation] 원 단위(P_WON1)가 아니면 천원(P_WON2)은 1000, 백만원(P_WON3)은 1000000을 나눗수로 정해 ALV 필드카탈로그(GT_MAIN_FIELDCAT)의 DATATYPE CURR 필드를 동적 ASSIGN으로 찾아 GT_DATA 금액을 단위 환산한다.
724| CHECK P_WON1 NE 'X'.
725|
726| IF P_WON2 = 'X'.
727| LV_DIVIDE = 1000.
728| ELSEIF P_WON3 = 'X'.
729| LV_DIVIDE = 1000000.
730| ENDIF.
731|
732| LOOP AT GT_DATA.
733| LOOP AT GT_MAIN_FIELDCAT INTO LS_FIELDCAT
734| WHERE DATATYPE = 'CURR'.
735|
736| CONCATENATE 'GT_DATA-' LS_FIELDCAT-FIELDNAME
737| INTO LV_FIELD.
738|
739| ASSIGN (LV_FIELD) TO <FS>.
740|
741| IF SY-SUBRC EQ 0 AND <FS> NE 0.
742| <FS> = <FS> / LV_DIVIDE.
743| ENDIF.
744| CLEAR : LV_FIELD.
745| ENDLOOP.
746|
747| MODIFY GT_DATA. CLEAR: GT_DATA.
748| ENDLOOP.
- EN: Unless the amount unit is KRW (P_WON1), set divisor 1000 (thousand) or 1000000 (million) and divide every CURR-type field of GT_DATA found via the ALV field catalog with dynamic ASSIGN.
- 테이블(파서): read - / write GT_DATA
- SAP 객체: GT_DATA, GT_MAIN_FIELDCAT, LVC_S_FCAT
- 업무 키워드: 금액 단위 환산, 천원, 백만원, 통화 필드, 동적 필드 할당
- English: Amount Unit Conversion, Currency Field, Field Catalog, Dynamic Assign
- 정의부(복사 시 함께 필요):
P_WON1,P_WON2,LV_DIVIDE,P_WON3,GT_DATA,GT_MAIN_FIELDCAT,LS_FIELDCAT,LV_FIELD,<FS> - 위치:
abap://ZCOR0020/ZCOR0020F01#L724-L748· confidence 0.9 ·ZCOR0020#ZCOR0020F01#FORM#CONVERT_CURR#C1
EVENT END-OF-SELECTION — ZCOR0020 L78-L89 (12줄)
온라인 실행 시 검증된 업로드 데이터(GT_DATA)가 있으면 화면 100(ALV)을 호출하고 없으면 메시지를 내는 END-OF-SELECTION 이벤트이다.
이 unit 의 조각 1개가 11/12줄(92%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[control_flow] 배치가 아닌 온라인 실행이고 GT_DATA가 있으면 CALL SCREEN 100으로 ALV 검증 결과 화면을 띄우고, 없으면 '조회된 데이터가 없습니다' 메시지를 낸다.
79| IF SY-BATCH NE 'X'.
80| IF GT_DATA[] IS NOT INITIAL.
81| CALL SCREEN 100.
82| ELSE.
83| MESSAGE S000 WITH '조회된 데이터가 없습니다.'.
84| ENDIF.
85| ELSE.
86| IF GT_DATA[] IS NOT INITIAL.
87| * PERFORM DISPLAY_SPOOL_BY_SALV TABLES GT_DATA[].
88| ENDIF.
89| ENDIF...
- EN: In dialog mode call screen 100 to show the ALV when GT_DATA is filled, otherwise issue a no-data message; batch mode does nothing.
- 호출(파서): 100
- SAP 객체: GT_DATA
- 업무 키워드: 결과 화면 호출, 데이터 없음 메시지
- English: CALL SCREEN, ALV, Batch Mode
- 정의부(복사 시 함께 필요):
GT_DATA - 위치:
abap://ZCOR0020/ZCOR0020#L79-L89· confidence 0.85 ·ZCOR0020#ZCOR0020#EVENT#END-OF-SELECTION#C1
FORM SET_COMPANY_BASE — ZCO_COMMON L210-L227 (18줄)
회사코드로 T001을 읽어 통화·계정과목표·언어·회사명·국가 전역변수를 설정하는 공통 FORM이다.
이 unit 의 조각 1개가 13/18줄(72%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[sql_select] T001에서 회사코드(BUKRS)를 조회해 회사 통화(WAERS), 계정과목표(KTOPL), 언어, 회사명(BUTXT), 국가(LAND1)를 전역변수에 저장해 이후 검증·금액 변환의 기준으로 쓴다.
214| SELECT SINGLE *
215| FROM T001
216| INTO L_T001
217| WHERE BUKRS = P_BUKRS.
218|
219| IF SY-SUBRC EQ 0.
220| GV_WAERS = L_T001-WAERS.
221| GV_KTOPL = L_T001-KTOPL.
222| GV_SPRAS = L_T001-SPRAS.
223| GV_WAERS = L_T001-WAERS.
224| GV_BUKRS_TXT = L_T001-BUTXT.
225| GV_LAND1 = L_T001-LAND1.
226| ENDIF.
- EN: Read company code master T001 and store company currency, chart of accounts, language, company name and country in global variables.
- 테이블(파서): read T001 / write -
- SAP 객체: T001
- 업무 키워드: 회사코드 기본정보, 회사 통화, 계정과목표
- English: Company Code, T001, Chart of Accounts, Local Currency
- 정의부(복사 시 함께 필요):
L_T001,GV_WAERS,GV_KTOPL,GV_SPRAS,GV_BUKRS_TXT,GV_LAND1 - 위치:
abap://ZCOR0020/ZCO_COMMON#L214-L226· confidence 0.95 ·ZCOR0020#ZCO_COMMON#FORM#SET_COMPANY_BASE#C1
FORM DYNPRO — ZCO_COMMON L309-L335 (27줄)
BDCDATA 한 줄(화면 시작 또는 필드/값)을 생성해 BDC 테이블에 추가하되, 예외 등록 필드가 초기값이면 건너뛰는 공통 FORM이다.
이 unit 의 조각 1개가 19/27줄(70%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[interface] DYNBEGIN='X'면 프로그램·화면번호로 BDC 화면 시작 레코드를, 아니면 필드명·값 레코드를 BDCDATA에 추가하며, GT_EXCP_INIT_FIELD에 등록된 필드는 값이 없을 때 추가하지 않는다.
315| IF PV_DYNBEGIN = 'X'.
316| WRITE : PV_INPUT TO LS_BDCTAB-PROGRAM LEFT-JUSTIFIED.
317| WRITE : PV_VALUE TO LS_BDCTAB-DYNPRO LEFT-JUSTIFIED.
318| WRITE : 'X' TO LS_BDCTAB-DYNBEGIN LEFT-JUSTIFIED.
319|
320| APPEND LS_BDCTAB TO PT_BDCTAB.
321| ELSE.
322| READ TABLE GT_EXCP_INIT_FIELD TRANSPORTING NO FIELDS
323| WITH KEY FNAME = PV_INPUT BINARY SEARCH.
324|
325| IF SY-SUBRC EQ 0 AND PV_VALUE IS INITIAL.
326| EXIT.
327| ENDIF.
328|
329| WRITE : PV_INPUT TO LS_BDCTAB-FNAM LEFT-JUSTIFIED.
330| WRITE : PV_VALUE TO LS_BDCTAB-FVAL LEFT-JUSTIFIED.
331|
332| APPEND LS_BDCTAB TO PT_BDCTAB.
333| ENDIF.
- EN: Append a BDCDATA screen-start record or a field/value record, skipping fields registered in GT_EXCP_INIT_FIELD when their value is initial.
- SAP 객체: BDCDATA, GT_EXCP_INIT_FIELD
- 업무 키워드: BDC 데이터 생성, 화면 필드 입력, 초기값 예외 필드
- English: BDCDATA, Batch Input, Call Transaction
- 정의부(복사 시 함께 필요):
LS_BDCTAB,GT_EXCP_INIT_FIELD - 위치:
abap://ZCOR0020/ZCO_COMMON#L315-L333· confidence 0.9 ·ZCOR0020#ZCO_COMMON#FORM#DYNPRO#C1
FORM DATE_CHK — ZCO_COMMON L446-L455 (10줄)
DATE_CHECK_PLAUSIBILITY로 날짜의 유효성을 검사해 결과 코드를 돌려주는 공통 FORM이다.
이 unit 의 조각 1개가 8/10줄(80%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[validation] 입력 날짜를 DATE_CHECK_PLAUSIBILITY로 검증하고 SY-SUBRC를 P_SUBRC로 반환해 호출자가 잘못된 날짜를 판단하게 한다.
447| CALL FUNCTION 'DATE_CHECK_PLAUSIBILITY'
448| EXPORTING
449| DATE = P_IN_DATE
450| EXCEPTIONS
451| PLAUSIBILITY_CHECK_FAILED = 1
452| OTHERS = 2.
453|
454| P_SUBRC = SY-SUBRC.
- EN: Validate the date with DATE_CHECK_PLAUSIBILITY and return the result code to the caller.
- 호출(파서): DATE_CHECK_PLAUSIBILITY
- SAP 객체: DATE_CHECK_PLAUSIBILITY
- 업무 키워드: 날짜 유효성 검사
- English: Date Validation, Plausibility Check
- 위치:
abap://ZCOR0020/ZCO_COMMON#L447-L454· confidence 0.9 ·ZCOR0020#ZCO_COMMON#FORM#DATE_CHK#C1
FORM BAR_MSG_PER — ZCO_COMMON L492-L516 (25줄)
처리 건수 비율(%)을 계산해 SAPGUI_PROGRESS_INDICATOR로 진행률 메시지를 표시하는 공통 FORM이다.
이 unit 의 조각 1개가 18/25줄(72%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[output] 현재 건수/전체 건수로 진행률(%)을 계산해 텍스트에 붙이고 SAPGUI_PROGRESS_INDICATOR로 상태바에 진행 상황을 표시한다.
498| L_NCNT1 = P_CNT1.
499| L_NCNT2 = P_CNT2.
500|
501| GV_CALC_I = P_CNT1 * 100 / P_CNT2.
502| GV_CALC_C0 = GV_CALC_I.
503|
504| IF L_NCNT1 IS INITIAL AND L_NCNT2 IS INITIAL.
505| GV_PROGRESS_MSG = P_TEXT.
506| ELSE.
507| CONCATENATE P_TEXT '(' GV_CALC_C0 '% )'
508| INTO GV_PROGRESS_MSG SEPARATED BY SPACE.
509| CONDENSE GV_PROGRESS_MSG.
510| ENDIF.
511|
512| CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR'
513| EXPORTING
514| PERCENTAGE = GV_CALC_I
515| TEXT = GV_PROGRESS_MSG.
- EN: Compute the percentage of processed lines and show it with the text in the status bar via SAPGUI_PROGRESS_INDICATOR.
- 호출(파서): SAPGUI_PROGRESS_INDICATOR
- SAP 객체: SAPGUI_PROGRESS_INDICATOR
- 업무 키워드: 진행률 표시, 처리 건수
- English: Progress Indicator, Status Bar
- 정의부(복사 시 함께 필요):
L_NCNT1,L_NCNT2,GV_CALC_I,GV_CALC_C0,GV_PROGRESS_MSG - 위치:
abap://ZCOR0020/ZCO_COMMON#L498-L515· confidence 0.85 ·ZCOR0020#ZCO_COMMON#FORM#BAR_MSG_PER#C1
FORM DISPLAY_SPOOL_BY_SALV — ZCO_COMMON L525-L535 (11줄)
CL_SALV_TABLE=>FACTORY로 전달받은 내부테이블을 SALV(ALV) 리스트로 표시하는 공통 FORM(배치 스풀 출력용)이다.
이 unit 의 조각 1개가 7/11줄(64%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[output] CL_SALV_TABLE=>FACTORY로 SALV 객체를 생성하고 DISPLAY로 내부테이블 내용을 ALV 리스트(스풀)로 출력한다.
528| CL_SALV_TABLE=>FACTORY(
529| IMPORTING
530| R_SALV_TABLE = GR_TABLE
531| CHANGING
532| T_TABLE = PT_TABLE[] ).
533|
534| GR_TABLE->DISPLAY( ).
- EN: Create a SALV table object with CL_SALV_TABLE=>FACTORY and display the internal table as an ALV list for spool output.
- 호출(파서): CL_SALV_TABLE=>FACTORY, GR_TABLE->DISPLAY
- SAP 객체: CL_SALV_TABLE
- 업무 키워드: ALV 리스트 출력, 스풀 출력
- English: SALV, ALV List, Spool
- 정의부(복사 시 함께 필요):
GR_TABLE - 위치:
abap://ZCOR0020/ZCO_COMMON#L528-L534· confidence 0.85 ·ZCOR0020#ZCO_COMMON#FORM#DISPLAY_SPOOL_BY_SALV#C1
FORM UPLOAD_DATA — ZCO_COMMON L595-L652 (58줄)
엑셀 파일을 ALSM_EXCEL_TO_INTERNAL_TABLE로 읽어 동적으로 지정된 내부테이블·구조체에 행/열 단위로 적재하는 공통 업로드 FORM이다.
이 unit 의 조각 2개가 43/58줄(74%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[fm_call] 대상 테이블·구조체를 동적 ASSIGN한 뒤 지정 행/열 범위로 ALSM_EXCEL_TO_INTERNAL_TABLE을 호출해 엑셀 셀 데이터를 LT_INTERN에 읽고, 실패 시 파일 없음/경로 오류 메시지 또는 시스템 메시지를 낸다.
607| ASSIGN: (PT_EXCEL_TABLE) TO <L_FS02>,
608| (PS_EXCEL_STRUC) TO <L_FS03>.
609|
610| CALL FUNCTION 'ALSM_EXCEL_TO_INTERNAL_TABLE'
611| EXPORTING
612| FILENAME = PV_EXCEL_FILENAME
613| I_BEGIN_COL = PV_BEGIN_COL
614| I_BEGIN_ROW = PV_BEGIN_ROW
615| I_END_COL = PV_END_COL
616| I_END_ROW = PV_END_ROW
617| TABLES
618| INTERN = LT_INTERN
619| EXCEPTIONS
620| INCONSISTENT_PARAMETERS = 1
621| UPLOAD_OLE = 2
622| OTHERS = 3.
623|
624| IF SY-SUBRC <> 0.
625| IF SY-MSGID IS INITIAL.
626| MESSAGE I000 WITH 'No Selected File Exists or Too Long File path'.
627| LEAVE LIST-PROCESSING.
628| ELSE.
629| MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
630| WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
631| ENDIF.
632| ENDIF.
- EN: Dynamically assign the target table and structure, read the Excel cell range with ALSM_EXCEL_TO_INTERNAL_TABLE and report file/path errors on failure.
- 호출(파서): ALSM_EXCEL_TO_INTERNAL_TABLE
- SAP 객체: ALSM_EXCEL_TO_INTERNAL_TABLE, ALSMEX_TABLINE
- 업무 키워드: 엑셀 업로드, 파일 읽기, 업로드 오류 메시지
- English: Excel Upload, ALSM_EXCEL_TO_INTERNAL_TABLE, OLE
- 정의부(복사 시 함께 필요):
<L_FS02>,<L_FS03>,ALSMEX_TABLINE,LT_INTERN - 위치:
abap://ZCOR0020/ZCO_COMMON#L607-L632· confidence 0.95 ·ZCOR0020#ZCO_COMMON#FORM#UPLOAD_DATA#C1
[calculation] 셀 데이터를 순회하며 열 번호에 해당하는 구조체 컴포넌트에 값을 넣고(숫자는 콤마 제거) 행이 끝날 때마다 대상 내부테이블(GT_UPLOAD)에 APPEND한다.
634| LOOP AT LT_INTERN.
635| AT NEW ROW.
636| CLEAR : <L_FS03>.
637| ENDAT.
638|
639| ASSIGN COMPONENT LT_INTERN-COL OF STRUCTURE <L_FS03> TO <L_FS01>.
640|
641| IF LT_INTERN-VALUE CO '0123456789,.- '.
642| REPLACE ALL OCCURRENCES OF ',' IN LT_INTERN-VALUE WITH ''.
643| ENDIF.
644|
645| MOVE LT_INTERN-VALUE TO <L_FS01>.
646|
647| AT END OF ROW.
648| APPEND <L_FS03> TO <L_FS02>.
649| ENDAT.
650| ENDLOOP.
- EN: Map each cell value to the structure component by column (removing thousand separators) and append one line per Excel row to the target table.
- SAP 객체: ALSMEX_TABLINE, GT_UPLOAD
- 업무 키워드: 셀 값 매핑, 행 단위 적재, 콤마 제거
- English: Cell Mapping, ASSIGN COMPONENT, Internal Table
- 정의부(복사 시 함께 필요):
ALSMEX_TABLINE,LT_INTERN,<L_FS03>,<L_FS01>,<L_FS02> - 위치:
abap://ZCOR0020/ZCO_COMMON#L634-L650· confidence 0.9 ·ZCOR0020#ZCO_COMMON#FORM#UPLOAD_DATA#C2
FORM BUILD_MESSAGE — ZCO_COMMON L701-L722 (22줄)
BDC 메시지(BDCMSGCOLL)를 MESSAGE_TEXT_BUILD로 텍스트화하고 '&' 치환문자를 제거하는 공통 FORM이다.
이 unit 의 조각 1개가 12/22줄(55%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[fm_call] BDCMSGCOLL의 MSGID/MSGNR/MSGV1~4를 MESSAGE_TEXT_BUILD에 넘겨 Call Transaction 결과 메시지 텍스트를 만들고 남은 '&'를 제거한다.
706| CALL FUNCTION 'MESSAGE_TEXT_BUILD'
707| EXPORTING
708| MSGID = PS_MESSAGE-MSGID
709| MSGNR = PS_MESSAGE-MSGNR
710| MSGV1 = PS_MESSAGE-MSGV1
711| MSGV2 = PS_MESSAGE-MSGV2
712| MSGV3 = PS_MESSAGE-MSGV3
713| MSGV4 = PS_MESSAGE-MSGV4
714| IMPORTING
715| MESSAGE_TEXT_OUTPUT = PV_TEXT.
716|
717| REPLACE ALL OCCURRENCES OF '&' IN PV_TEXT WITH ''.
- EN: Build the readable message text from a BDCMSGCOLL entry via MESSAGE_TEXT_BUILD and remove leftover ampersand placeholders.
- 호출(파서): MESSAGE_TEXT_BUILD
- SAP 객체: MESSAGE_TEXT_BUILD, BDCMSGCOLL
- 업무 키워드: BDC 메시지 텍스트, 메시지 조립
- English: BDCMSGCOLL, Message Text, Call Transaction
- 위치:
abap://ZCOR0020/ZCO_COMMON#L706-L717· confidence 0.9 ·ZCOR0020#ZCO_COMMON#FORM#BUILD_MESSAGE#C1
FORM BUILD_MESSAGE_BAPI — ZCO_COMMON L732-L753 (22줄)
BAPIRET2 메시지를 MESSAGE_TEXT_BUILD로 텍스트화하고 '&' 치환문자를 제거하는 공통 FORM이다.
이 unit 의 조각 1개가 12/22줄(55%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[fm_call] BAPIRET2의 ID/NUMBER/MESSAGE_V1~4를 MESSAGE_TEXT_BUILD에 넘겨 메시지 텍스트를 만들고 남은 '&' 자리표시자를 제거한다.
737| CALL FUNCTION 'MESSAGE_TEXT_BUILD'
738| EXPORTING
739| MSGID = PS_MESSAGE-ID
740| MSGNR = PS_MESSAGE-NUMBER
741| MSGV1 = PS_MESSAGE-MESSAGE_V1
742| MSGV2 = PS_MESSAGE-MESSAGE_V2
743| MSGV3 = PS_MESSAGE-MESSAGE_V3
744| MSGV4 = PS_MESSAGE-MESSAGE_V4
745| IMPORTING
746| MESSAGE_TEXT_OUTPUT = PV_TEXT.
747|
748| REPLACE ALL OCCURRENCES OF '&' IN PV_TEXT WITH ''.
- EN: Build the message text from a BAPIRET2 entry with MESSAGE_TEXT_BUILD and strip remaining placeholder ampersands.
- 호출(파서): MESSAGE_TEXT_BUILD
- SAP 객체: MESSAGE_TEXT_BUILD, BAPIRET2
- 업무 키워드: BAPI 메시지 텍스트, 메시지 조립
- English: BAPIRET2, Message Text
- 위치:
abap://ZCOR0020/ZCO_COMMON#L737-L748· confidence 0.9 ·ZCOR0020#ZCO_COMMON#FORM#BUILD_MESSAGE_BAPI#C1
FORM EXCEL_FORM_DOWNLOAD — ZCO_COMMON L760-L890 (131줄)
엑셀 컬럼 제목 목록으로 동적 테이블을 만들어 헤더 1행만 담은 업로드 양식(xls)을 저장 대화상자를 통해 PC에 다운로드하는 공통 FORM이다.
이 unit 의 조각 2개가 85/131줄(65%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[calculation] 전달받은 엑셀 컬럼 제목마다 필드카탈로그(COLnn)를 만들고 CL_ALV_TABLE_CREATE=>CREATE_DYNAMIC_TABLE로 동적 테이블을 생성한 뒤 컬럼 제목을 값으로 한 헤더 1행을 APPEND해 업로드 양식 데이터를 구성한다.
802| CHECK PT_EXCEL_EXPORT[] IS NOT INITIAL.
803|
804| LOOP AT PT_EXCEL_EXPORT.
805| ADD_EXCEL_COL : PT_EXCEL_EXPORT-EXCEL_COL.
806| ENDLOOP.
807|
808| " 동적 테이블 생성
809| CALL METHOD CL_ALV_TABLE_CREATE=>CREATE_DYNAMIC_TABLE
810| EXPORTING
811| IT_FIELDCATALOG = LT_FCAT
812| IMPORTING
813| EP_TABLE = LF_DATA.
814|
815| ASSIGN LF_DATA->* TO <FS_TABLE>.
816|
817| " 테이블 라인 생성
818| CREATE DATA LL_DATA LIKE LINE OF <FS_TABLE>.
819| ASSIGN LL_DATA->* TO <FS_LINE>.
820|
821| " 템플릿 내용 단 한라인만 등록
822| LOOP AT LT_FCAT INTO LS_FCAT.
823| ASSIGN COMPONENT LS_FCAT-COL_POS
824| OF STRUCTURE <FS_LINE> TO <FS_COL>.
825|
826| IF SY-SUBRC EQ 0.
827| <FS_COL> = LS_FCAT-COLTEXT. " COLTEXT 의 내용을 그대로.
828| ENDIF.
829| ENDLOOP.
830|
831| " 테이블에 담기.
832| APPEND <FS_LINE> TO <FS_TABLE>.
- EN: Build a field catalog from the Excel column titles, create a dynamic table with CL_ALV_TABLE_CREATE and append one header row containing the titles as the upload template.
- 호출(파서): CL_ALV_TABLE_CREATE=>CREATE_DYNAMIC_TABLE
- SAP 객체: CL_ALV_TABLE_CREATE=>CREATE_DYNAMIC_TABLE, LVC_S_FCAT, GT_EXCEL_EXPORT
- 업무 키워드: 업로드 양식 생성, 동적 테이블, 엑셀 헤더
- English: Dynamic Table, Field Catalog, Upload Template
- 정의부(복사 시 함께 필요):
LT_FCAT,LF_DATA,<FS_TABLE>,LL_DATA,<FS_LINE>,LS_FCAT,<FS_COL> - 위치:
abap://ZCOR0020/ZCO_COMMON#L802-L832· confidence 0.85 ·ZCOR0020#ZCO_COMMON#FORM#EXCEL_FORM_DOWNLOAD#C1
[fm_call] '<프로그램명>_UploadForm.xls' 기본 파일명으로 FILE_SAVE_DIALOG를 열고 사용자가 확인하면 CL_GUI_FRONTEND_SERVICES=>GUI_DOWNLOAD(탭 구분)로 양식 테이블을 저장한 뒤 성공/실패/취소 메시지를 낸다.
836| CONCATENATE SY-REPID '_UploadForm.xls' INTO L_FNAME.
837|
838| CALL METHOD CL_GUI_FRONTEND_SERVICES=>FILE_SAVE_DIALOG
839| EXPORTING
840| DEFAULT_EXTENSION = 'XLS'
841| DEFAULT_FILE_NAME = L_FNAME
842| FILE_FILTER = '*.XLS'
843| CHANGING
844| FILENAME = L_EXT_FILENAME
845| PATH = L_PATH
846| FULLPATH = L_FULLPATH
847| USER_ACTION = L_USR_ACT.
848|
849| IF L_USR_ACT = '0'.
850| CALL METHOD CL_GUI_FRONTEND_SERVICES=>GUI_DOWNLOAD
851| EXPORTING
852| FILENAME = L_FULLPATH
853| WRITE_FIELD_SEPARATOR = 'X'
854| IMPORTING
855| FILELENGTH = L_FILE_LEN
856| CHANGING
857| DATA_TAB = <FS_TABLE>
858| EXCEPTIONS
859| FILE_WRITE_ERROR = 1
860| NO_BATCH = 2
861| GUI_REFUSE_FILETRANSFER = 3
862| INVALID_TYPE = 4
863| NO_AUTHORITY = 5
864| UNKNOWN_ERROR = 6
865| HEADER_NOT_ALLOWED = 7
866| SEPARATOR_NOT_ALLOWED = 8
867| FILESIZE_NOT_ALLOWED = 9
868| HEADER_TOO_LONG = 10
869| DP_ERROR_CREATE = 11
870| DP_ERROR_SEND = 12
871| DP_ERROR_WRITE = 13
872| UNKNOWN_DP_ERROR = 14
873| ACCESS_DENIED = 15
874| DP_OUT_OF_MEMORY = 16
875| DISK_FULL = 17
876| DP_TIMEOUT = 18
877| FILE_NOT_FOUND = 19
878| DATAPROVIDER_EXCEPTION = 20
879| CONTROL_FLUSH_ERROR = 21
880| OTHERS = 22.
881|
882| IF SY-SUBRC = 0.
883| MESSAGE S000 WITH 'Success.'.
884| ELSE.
885| MESSAGE I000 WITH 'Failure'.
886| ENDIF.
887| ELSE.
888| MESSAGE I000 WITH 'Cancled'.
889| ENDIF.
- EN: Open a save dialog with a default template filename and download the template table via CL_GUI_FRONTEND_SERVICES=>GUI_DOWNLOAD, reporting success, failure or cancel.
- 호출(파서): CL_GUI_FRONTEND_SERVICES=>FILE_SAVE_DIALOG, CL_GUI_FRONTEND_SERVICES=>GUI_DOWNLOAD
- SAP 객체: CL_GUI_FRONTEND_SERVICES=>FILE_SAVE_DIALOG, CL_GUI_FRONTEND_SERVICES=>GUI_DOWNLOAD
- 업무 키워드: 엑셀 양식 다운로드, 파일 저장, 결과 메시지
- English: GUI_DOWNLOAD, File Save Dialog, Excel Template
- 정의부(복사 시 함께 필요):
L_FNAME,L_EXT_FILENAME,L_PATH,L_FULLPATH,L_USR_ACT,L_FILE_LEN,<FS_TABLE> - 위치:
abap://ZCOR0020/ZCO_COMMON#L836-L889· confidence 0.9 ·ZCOR0020#ZCO_COMMON#FORM#EXCEL_FORM_DOWNLOAD#C2
FORM CONVERT_CURRENCY — ZCO_COMMON L903-L922 (20줄)
전기일 환율로 외화 금액을 현지통화 금액으로 CONVERT_TO_LOCAL_CURRENCY를 이용해 환산하는 공통 FORM이다.
이 unit 의 조각 1개가 15/20줄(75%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[fm_call] 외화와 현지통화가 같으면 금액을 그대로 쓰고, 다르면 전기일 기준 환율로 CONVERT_TO_LOCAL_CURRENCY를 호출해 현지통화 금액(P_LAMT)을 구한다.
906| IF P_FCURR = P_LCURR.
907| P_LAMT = P_FAMT.
908| ELSE.
909| CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY'
910| EXPORTING
911| CLIENT = SY-MANDT
912| DATE = P_BUDAT
913| FOREIGN_CURRENCY = P_FCURR
914| FOREIGN_AMOUNT = P_FAMT
915| LOCAL_CURRENCY = P_LCURR
916| IMPORTING
917| LOCAL_AMOUNT = P_LAMT
918| EXCEPTIONS
919| NO_RATE_FOUND = 01.
920| ENDIF.
- EN: Convert the foreign amount to local currency at the posting-date exchange rate using CONVERT_TO_LOCAL_CURRENCY unless both currencies are identical.
- 호출(파서): CONVERT_TO_LOCAL_CURRENCY
- SAP 객체: CONVERT_TO_LOCAL_CURRENCY, TCURR
- 업무 키워드: 환율 환산, 현지통화 금액, 외화
- English: Exchange Rate, Local Currency, Foreign Currency
- 위치:
abap://ZCOR0020/ZCO_COMMON#L906-L920· confidence 0.9 ·ZCOR0020#ZCO_COMMON#FORM#CONVERT_CURRENCY#C1
FORM CONVERT_CHAR_TO_AMT — ZCO_COMMON L932-L959 (28줄)
콤마가 포함된 문자형 금액을 콤마 제거 후 BAPI_CURRENCY_CONV_TO_INTERNAL로 통화 내부 금액으로 변환하는 공통 FORM이다.
이 unit 의 조각 1개가 22/28줄(79%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[calculation] STRING_REPLACE로 문자 금액의 콤마를 제거한 뒤 BAPI_CURRENCY_CONV_TO_INTERNAL로 통화(P_WAERS)에 맞는 내부 금액으로 변환해 P_AMT에 넣는다(엑셀 업로드 금액 정리용).
936| CALL FUNCTION 'STRING_REPLACE'
937| EXPORTING
938| PATTERN = ','
939| SUBSTITUTE = ''
940| CHANGING
941| TEXT = P_VALUE.
942|
943| IF SY-SUBRC NE 0.
944|
945| ENDIF.
946|
947| LV_EXT = P_VALUE.
948|
949| CALL FUNCTION 'BAPI_CURRENCY_CONV_TO_INTERNAL'
950| EXPORTING
951| CURRENCY = P_WAERS
952| AMOUNT_EXTERNAL = LV_EXT
953| MAX_NUMBER_OF_DIGITS = '11'
954| IMPORTING
955| AMOUNT_INTERNAL = LV_AMT.
956|
957| P_AMT = LV_AMT.
- EN: Strip thousand separators from the character amount and convert it to internal currency amount via BAPI_CURRENCY_CONV_TO_INTERNAL for uploaded Excel values.
- 호출(파서): STRING_REPLACE, BAPI_CURRENCY_CONV_TO_INTERNAL
- SAP 객체: STRING_REPLACE, BAPI_CURRENCY_CONV_TO_INTERNAL
- 업무 키워드: 문자 금액 변환, 콤마 제거, 통화 내부형식
- English: Currency Conversion, Internal Amount, Excel Upload
- 정의부(복사 시 함께 필요):
LV_EXT,LV_AMT - 위치:
abap://ZCOR0020/ZCO_COMMON#L936-L957· confidence 0.9 ·ZCOR0020#ZCO_COMMON#FORM#CONVERT_CHAR_TO_AMT#C1
FORM POPUP_TO_CONFIRM_02 — ZCO_COMMON L1010-L1023 (14줄)
POPUP_TO_CONFIRM_STEP으로 두 줄 질문의 확인 팝업(J/N/A)을 띄워 응답을 돌려주는 공통 FORM이다.
이 unit 의 조각 1개가 7/14줄(50%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[fm_call] 제목과 두 줄 질문으로 POPUP_TO_CONFIRM_STEP을 호출해 예(J)/아니오(N)/취소(A) 응답을 PV_ANSWER로 받는다(예산 전기 전 확인에 사용).
1015| CALL FUNCTION 'POPUP_TO_CONFIRM_STEP'
1016| EXPORTING
1017| TEXTLINE1 = PV_QUESTION1
1018| TEXTLINE2 = PV_QUESTION2
1019| TITEL = PV_TITLE
1020| IMPORTING
1021| ANSWER = PV_ANSWER. " J:예 N:아니오 A:취소
- EN: Show a confirmation popup via POPUP_TO_CONFIRM_STEP and return J/N/A answer, used before posting the plan budget.
- 호출(파서): POPUP_TO_CONFIRM_STEP
- SAP 객체: POPUP_TO_CONFIRM_STEP
- 업무 키워드: 확인 팝업, 전기 전 확인
- English: Confirmation Popup, POPUP_TO_CONFIRM_STEP
- 위치:
abap://ZCOR0020/ZCO_COMMON#L1015-L1021· confidence 0.9 ·ZCOR0020#ZCO_COMMON#FORM#POPUP_TO_CONFIRM_02#C1
FORM POPUP_TO_CONFIRM — ZCO_COMMON L1035-L1060 (26줄)
POPUP_TO_CONFIRM으로 Yes/No 확인 팝업을 띄워 사용자 응답을 돌려주는 공통 FORM이다.
이 unit 의 조각 1개가 18/26줄(69%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[fm_call] 제목·질문·기본 버튼·취소 버튼 표시 여부로 POPUP_TO_CONFIRM(Yes/No)을 호출해 응답(P_ANSWER)을 받고 예외 시 시스템 메시지 후 응답을 비운다.
1041| CALL FUNCTION 'POPUP_TO_CONFIRM'
1042| EXPORTING
1043| TITLEBAR = P_TITLE
1044| TEXT_QUESTION = P_TEXT
1045| TEXT_BUTTON_1 = 'Yes'
1046| TEXT_BUTTON_2 = 'No'
1047| DEFAULT_BUTTON = P_DEFAULT
1048| DISPLAY_CANCEL_BUTTON = P_CANC
1049| IMPORTING
1050| ANSWER = P_ANSWER
1051| EXCEPTIONS
1052| TEXT_NOT_FOUND = 1
1053| OTHERS = 2.
1054| IF SY-SUBRC <> 0.
1055| MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
1056| WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
1057| CLEAR P_ANSWER.
1058| ENDIF.
- EN: Show a Yes/No confirmation popup with POPUP_TO_CONFIRM and return the user answer, clearing it on exception.
- 호출(파서): POPUP_TO_CONFIRM
- SAP 객체: POPUP_TO_CONFIRM
- 업무 키워드: 확인 팝업, 사용자 확인
- English: Confirmation Popup, POPUP_TO_CONFIRM
- 위치:
abap://ZCOR0020/ZCO_COMMON#L1041-L1058· confidence 0.9 ·ZCOR0020#ZCO_COMMON#FORM#POPUP_TO_CONFIRM#C1
FORM GET_LAST_DAY — ZCO_COMMON L1069-L1078 (10줄)
RP_LAST_DAY_OF_MONTHS로 주어진 날짜가 속한 월의 마지막 날을 구하는 공통 FORM이다.
이 unit 의 조각 1개가 5/10줄(50%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[fm_call] 입력 날짜를 RP_LAST_DAY_OF_MONTHS에 넘겨 해당 월의 말일을 P_LAST_DATE로 돌려받는다.
1073| CALL FUNCTION 'RP_LAST_DAY_OF_MONTHS'
1074| EXPORTING
1075| DAY_IN = P_DATE
1076| IMPORTING
1077| LAST_DAY_OF_MONTH = P_LAST_DATE.
- EN: Determine the last day of the month for the given date via RP_LAST_DAY_OF_MONTHS.
- 호출(파서): RP_LAST_DAY_OF_MONTHS
- SAP 객체: RP_LAST_DAY_OF_MONTHS
- 업무 키워드: 월 말일 계산, 날짜 계산
- English: Last Day of Month, Date
- 위치:
abap://ZCOR0020/ZCO_COMMON#L1073-L1077· confidence 0.9 ·ZCOR0020#ZCO_COMMON#FORM#GET_LAST_DAY#C1
FORM SET_DSMOD — ZCO_COMMON L1086-L1095 (10줄)
BDC 처리 모드 입력값이 A/E/N 중 하나인지 검사하고 아니면 오류 메시지로 중단하는 공통 FORM이다.
이 unit 의 조각 1개가 6/10줄(60%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[validation] BDC 표시 모드를 대문자로 바꾼 뒤 'A','E','N'이 아니면 'BDC Mode Fail' 메시지를 내고 LEAVE LIST-PROCESSING으로 종료한다.
1088| TRANSLATE PA_DSMOD TO UPPER CASE.
1089|
1090| IF PA_DSMOD NA 'AEN'.
1091| MESSAGE S000 DISPLAY LIKE 'E' WITH 'BDC Mode Fail'.
1092| LEAVE LIST-PROCESSING.
1093| ENDIF.
- EN: Validate the BDC display mode is one of A/E/N after uppercasing, otherwise show an error and leave processing.
- 업무 키워드: BDC 모드 검증, 입력값 검사
- English: BDC Mode, Validation
- 위치:
abap://ZCOR0020/ZCO_COMMON#L1088-L1093· confidence 0.85 ·ZCOR0020#ZCO_COMMON#FORM#SET_DSMOD#C1
FORM FILE_EXISTS — ZCO_COMMON L1104-L1135 (32줄)
CL_GUI_FRONTEND_SERVICES=>FILE_EXIST로 프론트엔드 파일 존재 여부를 확인해 참/거짓을 돌려주는 공통 FORM이다.
이 unit 의 조각 1개가 21/32줄(66%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[validation] 파일명이 있을 때 CL_GUI_FRONTEND_SERVICES=>FILE_EXIST로 로컬 파일 존재 여부를 조회해 P_EXISTS에 반환하고 호출 예외 시 시스템 메시지를 낸다.
1113| CHECK P_FNAME IS NOT INITIAL.
1114|
1115| L_FILENM = P_FNAME.
1116|
1117| CALL METHOD CL_GUI_FRONTEND_SERVICES=>FILE_EXIST
1118| EXPORTING
1119| FILE = L_FILENM
1120| RECEIVING
1121| RESULT = L_RESULT
1122| EXCEPTIONS
1123| CNTL_ERROR = 1
1124| ERROR_NO_GUI = 2
1125| WRONG_PARAMETER = 3
1126| NOT_SUPPORTED_BY_GUI = 4
1127| OTHERS = 5.
1128| IF SY-SUBRC <> 0.
1129| MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
1130| WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
1131| ENDIF.
1132|
1133| P_EXISTS = L_RESULT.
- EN: Check whether the local file exists via CL_GUI_FRONTEND_SERVICES=>FILE_EXIST and return the boolean result.
- 호출(파서): CL_GUI_FRONTEND_SERVICES=>FILE_EXIST
- SAP 객체: CL_GUI_FRONTEND_SERVICES=>FILE_EXIST
- 업무 키워드: 파일 존재 확인, 업로드 파일 검증
- English: File Exist Check, Frontend Services
- 정의부(복사 시 함께 필요):
L_FILENM,L_RESULT - 위치:
abap://ZCOR0020/ZCO_COMMON#L1113-L1133· confidence 0.9 ·ZCOR0020#ZCO_COMMON#FORM#FILE_EXISTS#C1
FORM AMT_CONV_TO_INTERNAL — ZCO_COMMON L1144-L1161 (18줄)
외부 형식 금액을 통화별 소수점에 맞는 SAP 내부 금액으로 BAPI_CURRENCY_CONV_TO_INTERNAL로 변환하는 공통 FORM이다.
이 unit 의 조각 1개가 11/18줄(61%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[fm_call] 통화(P_WAERS)에 따라 외부 표시 금액을 BAPI_CURRENCY_CONV_TO_INTERNAL로 내부 저장 형식 금액으로 변환해 P_AMOUNT에 되돌려준다.
1149| L_INTERNAL = P_AMOUNT.
1150|
1151| CALL FUNCTION 'BAPI_CURRENCY_CONV_TO_INTERNAL'
1152| EXPORTING
1153| CURRENCY = P_WAERS
1154| AMOUNT_EXTERNAL = L_INTERNAL
1155| MAX_NUMBER_OF_DIGITS = 22
1156| IMPORTING
1157| AMOUNT_INTERNAL = L_INTERNAL.
1158|
1159| P_AMOUNT = L_INTERNAL.
- EN: Convert an externally formatted amount to SAP internal format for the currency using BAPI_CURRENCY_CONV_TO_INTERNAL.
- 호출(파서): BAPI_CURRENCY_CONV_TO_INTERNAL
- SAP 객체: BAPI_CURRENCY_CONV_TO_INTERNAL, BAPICURR
- 업무 키워드: 금액 내부형식 변환, 통화 소수점
- English: Currency Conversion, Internal Amount
- 정의부(복사 시 함께 필요):
L_INTERNAL - 위치:
abap://ZCOR0020/ZCO_COMMON#L1149-L1159· confidence 0.9 ·ZCOR0020#ZCO_COMMON#FORM#AMT_CONV_TO_INTERNAL#C1
FORM GET_NEXT_NUMBER — ZCO_COMMON L1172-L1203 (32줄)
번호범위 객체·구간으로 NUMBER_GET_NEXT를 호출해 다음 채번 번호를 가져오는 공통 FORM이다.
이 unit 의 조각 1개가 23/32줄(72%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[fm_call] 번호범위 객체와 구간 번호로 NUMBER_GET_NEXT를 호출해 다음 번호를 채번하고 예외 발생 시 결과를 비운다.
1179| LV_NRRANG = P_NRRANG.
1180| LV_OBJECT = P_OBJECT.
1181|
1182| CALL FUNCTION 'NUMBER_GET_NEXT'
1183| EXPORTING
1184| NR_RANGE_NR = LV_NRRANG
1185| OBJECT = LV_OBJECT
1186| IMPORTING
1187| NUMBER = P_DOCNO
1188| EXCEPTIONS
1189| INTERVAL_NOT_FOUND = 1
1190| NUMBER_RANGE_NOT_INTERN = 2
1191| OBJECT_NOT_FOUND = 3
1192| QUANTITY_IS_0 = 4
1193| QUANTITY_IS_NOT_1 = 5
1194| INTERVAL_OVERFLOW = 6
1195| BUFFER_OVERFLOW = 7
1196| OTHERS = 8.
1197| IF SY-SUBRC <> 0.
1198| * MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
1199| * WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
1200| CLEAR P_DOCNO.
1201| ENDIF.
- EN: Draw the next number from the number range object and interval via NUMBER_GET_NEXT and clear it on exception.
- 호출(파서): NUMBER_GET_NEXT
- SAP 객체: NUMBER_GET_NEXT, NRIV
- 업무 키워드: 채번, 번호범위
- English: Number Range, NUMBER_GET_NEXT
- 정의부(복사 시 함께 필요):
LV_NRRANG,LV_OBJECT - 위치:
abap://ZCOR0020/ZCO_COMMON#L1179-L1201· confidence 0.95 ·ZCOR0020#ZCO_COMMON#FORM#GET_NEXT_NUMBER#C1
FORM GET_NEXT_NUMBER_YEAR — ZCO_COMMON L1215-L1254 (40줄)
번호범위 객체·구간·연도로 NUMBER_GET_NEXT를 호출해 연도별 다음 채번 번호를 가져오는 공통 FORM이다.
이 unit 의 조각 1개가 30/40줄(75%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[fm_call] 번호범위 객체(NRIV-OBJECT)와 구간 번호, 연도(없으면 '0000')를 지정해 NUMBER_GET_NEXT로 다음 번호를 채번하고 실패 시 번호를 비운다.
1223| LV_NRRANG = P_NRRANG.
1224| LV_OBJECT = P_OBJECT.
1225| IF P_YEAR IS NOT INITIAL.
1226| LV_YEAR = P_YEAR.
1227| ELSE.
1228| LV_YEAR = '0000'.
1229|
1230| ENDIF.
1231|
1232| CALL FUNCTION 'NUMBER_GET_NEXT'
1233| EXPORTING
1234| NR_RANGE_NR = LV_NRRANG
1235| OBJECT = LV_OBJECT
1236| TOYEAR = LV_YEAR
1237| IMPORTING
1238| NUMBER = P_DOCNO
1239| EXCEPTIONS
1240| INTERVAL_NOT_FOUND = 1
1241| NUMBER_RANGE_NOT_INTERN = 2
1242| OBJECT_NOT_FOUND = 3
1243| QUANTITY_IS_0 = 4
1244| QUANTITY_IS_NOT_1 = 5
1245| INTERVAL_OVERFLOW = 6
1246| BUFFER_OVERFLOW = 7
1247| OTHERS = 8.
1248| IF SY-SUBRC <> 0.
1249| * MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
1250| * WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
1251| CLEAR P_DOCNO.
1252| ENDIF.
- EN: Draw the next number from the number range object and interval for the given year (or 0000) via NUMBER_GET_NEXT, clearing the result on error.
- 호출(파서): NUMBER_GET_NEXT
- SAP 객체: NUMBER_GET_NEXT, NRIV
- 업무 키워드: 채번, 번호범위, 연도별 번호
- English: Number Range, NUMBER_GET_NEXT, Fiscal Year
- 정의부(복사 시 함께 필요):
LV_NRRANG,LV_OBJECT,LV_YEAR - 위치:
abap://ZCOR0020/ZCO_COMMON#L1223-L1252· confidence 0.95 ·ZCOR0020#ZCO_COMMON#FORM#GET_NEXT_NUMBER_YEAR#C1
FORM GET_VALUE_LIST_DOM — ZCO_COMMON L1263-L1278 (16줄)
도메인 고정값과 텍스트를 DD07T에서 읽어 전달받은 테이블에 채우는 공통 FORM(F4/드롭다운용)이다.
이 unit 의 조각 1개가 11/16줄(69%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[sql_select] DD07T에서 지정 도메인의 활성 고정값(DOMVALUE_L)과 텍스트(DDTEXT)를 로그온 언어로 조회해 P_TAB에 넣고 정렬하며, 없으면 테이블을 비운다.
1266| SELECT DOMVALUE_L DDTEXT
1267| INTO TABLE P_TAB
1268| FROM DD07T
1269| WHERE DOMNAME EQ P_DOMAIN
1270| AND DDLANGUAGE EQ SY-LANGU
1271| AND AS4LOCAL EQ 'A'.
1272| IF SY-SUBRC EQ 0.
1273| SORT P_TAB.
1274| ELSE.
1275| REFRESH P_TAB.
1276| ENDIF.
- EN: Read active domain fixed values and texts from DD07T for the logon language into the given table, sorting it or clearing it when nothing is found.
- 테이블(파서): read DD07T / write -
- SAP 객체: DD07T
- 업무 키워드: 도메인 값 목록, 드롭다운 값, F4 값 목록
- English: Domain Fixed Values, DD07T, Value List
- 위치:
abap://ZCOR0020/ZCO_COMMON#L1266-L1276· confidence 0.95 ·ZCOR0020#ZCO_COMMON#FORM#GET_VALUE_LIST_DOM#C1
FORM GET_DOM_TEXT_LIST — ZCO_COMMON L1287-L1298 (12줄)
도메인 고정값 텍스트를 DD07T에서 읽어 GT_DOMAIN에 누적하는 공통 FORM이다.
이 unit 의 조각 1개가 8/12줄(67%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[sql_select] DD07T에서 지정 도메인의 활성(AS4LOCAL='A') 고정값과 로그온 언어 텍스트를 조회해 GT_DOMAIN에 추가하고 정렬한다.
1289| SELECT DOMNAME DOMVALUE_L DDTEXT
1290| APPENDING TABLE GT_DOMAIN
1291| FROM DD07T
1292| WHERE DOMNAME = P_DOMNA
1293| AND DDLANGUAGE = SY-LANGU
1294| AND AS4LOCAL = 'A'.
1295|
1296| SORT : GT_DOMAIN.
- EN: Select active domain fixed values and their texts in the logon language from DD07T and append them to GT_DOMAIN.
- 테이블(파서): read DD07T / write -
- SAP 객체: DD07T, GT_DOMAIN
- 업무 키워드: 도메인 고정값, 값 텍스트 조회
- English: Domain Fixed Values, DD07T
- 정의부(복사 시 함께 필요):
GS_DOMAIN,GT_DOMAIN - 위치:
abap://ZCOR0020/ZCO_COMMON#L1289-L1296· confidence 0.95 ·ZCOR0020#ZCO_COMMON#FORM#GET_DOM_TEXT_LIST#C1
FORM MD_CONVER_MAT_UNIT — ZCO_COMMON L1311-L1341 (31줄)
자재의 수량을 입력 단위에서 출력 단위로 MD_CONVERT_MATERIAL_UNIT을 이용해 환산하는 공통 FORM이다.
이 unit 의 조각 1개가 23/31줄(74%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[fm_call] 수량이 0이거나 단위가 같으면 그대로 반환하고, 그 외에는 MD_CONVERT_MATERIAL_UNIT으로 자재(MATNR)의 단위 환산 비율에 따라 수량을 변환하며 오류 시 0으로 처리한다.
1317| IF P_MENGE IS INITIAL.
1318| CLEAR PV_MENGE.
1319| EXIT.
1320| ELSEIF P_IN_ME EQ P_OUT_ME.
1321| PV_MENGE = P_MENGE.
1322| EXIT.
1323| ENDIF.
1324|
1325| CALL FUNCTION 'MD_CONVERT_MATERIAL_UNIT'
1326| EXPORTING
1327| I_MATNR = P_MATNR
1328| I_IN_ME = P_IN_ME
1329| I_OUT_ME = P_OUT_ME
1330| I_MENGE = P_MENGE
1331| IMPORTING
1332| E_MENGE = PV_MENGE
1333| EXCEPTIONS
1334| ERROR_IN_APPLICATION = 1
1335| ERROR = 2
1336| OTHERS = 3.
1337| IF SY-SUBRC <> 0.
1338| CLEAR PV_MENGE.
1339| ENDIF.
- EN: Return the quantity unchanged for zero or identical units, otherwise convert it between units of measure for the material via MD_CONVERT_MATERIAL_UNIT.
- 호출(파서): MD_CONVERT_MATERIAL_UNIT
- SAP 객체: MD_CONVERT_MATERIAL_UNIT, EKPO
- 업무 키워드: 자재 단위 환산, 수량 변환, 기본단위
- English: Unit of Measure Conversion, Material, Quantity
- 위치:
abap://ZCOR0020/ZCO_COMMON#L1317-L1339· confidence 0.9 ·ZCOR0020#ZCO_COMMON#FORM#MD_CONVER_MAT_UNIT#C1
FORM SHOW_MESSAGE_LIST — ZCO_COMMON L1349-L1359 (11줄)
누적된 헤더/상세 메시지 테이블(GT_HEAMSG/GT_DETMSG)을 SCPR_SV_SHOW_MESSAGE_LIST로 팝업 표시하는 공통 FORM이다.
이 unit 의 조각 1개가 7/11줄(64%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[output] 제목과 함께 GT_HEAMSG(메시지 목록)·GT_DETMSG(상세)를 SCPR_SV_SHOW_MESSAGE_LIST에 넘겨 처리 결과 메시지 목록을 팝업으로 보여준다.
1351| CALL FUNCTION 'SCPR_SV_SHOW_MESSAGE_LIST'
1352| EXPORTING
1353| TITLE_TEXT = P_TITLE
1354| SORT_BY_LEVEL = ' '
1355| SHOW_IDS = 'X'
1356| MESSAGE_LIST = GT_HEAMSG
1357| DETAILS_LIST = GT_DETMSG.
- EN: Display the collected message list and details in a popup via SCPR_SV_SHOW_MESSAGE_LIST.
- 호출(파서): SCPR_SV_SHOW_MESSAGE_LIST
- SAP 객체: SCPR_SV_SHOW_MESSAGE_LIST, GT_HEAMSG, GT_DETMSG
- 업무 키워드: 메시지 목록 팝업, 처리 결과 표시
- English: Message List, Popup
- 정의부(복사 시 함께 필요):
GT_HEAMSG,GT_DETMSG - 위치:
abap://ZCOR0020/ZCO_COMMON#L1351-L1357· confidence 0.85 ·ZCOR0020#ZCO_COMMON#FORM#SHOW_MESSAGE_LIST#C1
FORM GET_FILE_PATH — ZCO_COMMON L1368-L1399 (32줄)
파일 열기 대화상자(FILE_OPEN_DIALOG)로 업로드할 XLS 파일을 선택받아 파일 경로를 반환하는 공통 FORM이다.
이 unit 의 조각 1개가 22/32줄(69%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[fm_call] XLS 필터로 CL_GUI_FRONTEND_SERVICES=>FILE_OPEN_DIALOG를 열어 사용자가 OK를 누르면 첫 번째 선택 파일 경로를 P_FILENM에 반환한다.
1376| CALL METHOD CL_GUI_FRONTEND_SERVICES=>FILE_OPEN_DIALOG
1377| EXPORTING
1378| WINDOW_TITLE = 'Upload'
1379| MULTISELECTION = ' '
1380| DEFAULT_EXTENSION = 'XLS'
1381| DEFAULT_FILENAME = ' '
1382| FILE_FILTER = '*.XLS'
1383| CHANGING
1384| FILE_TABLE = LT_FILETABLE
1385| RC = RTN_CODE
1386| USER_ACTION = USER_ACTION.
1387|
1388| CALL METHOD CL_GUI_CFW=>FLUSH.
1389|
1390| CASE USER_ACTION.
1391| WHEN CL_GUI_FRONTEND_SERVICES=>ACTION_OK.
1392| READ TABLE LT_FILETABLE INTO LS_FILETABLE INDEX 1.
1393| CHECK SY-SUBRC IS INITIAL.
1394| MOVE: LS_FILETABLE-FILENAME TO P_FILENM.
1395|
1396| WHEN CL_GUI_FRONTEND_SERVICES=>ACTION_CANCEL.
1397| ENDCASE.
- EN: Open a file-open dialog filtered to XLS and return the first selected file path when the user confirms.
- 호출(파서): CL_GUI_FRONTEND_SERVICES=>FILE_OPEN_DIALOG, CL_GUI_CFW=>FLUSH, CL_GUI_FRONTEND_SERVICES=>ACTION_OK, CL_GUI_FRONTEND_SERVICES=>ACTION_CANCEL
- SAP 객체: CL_GUI_FRONTEND_SERVICES=>FILE_OPEN_DIALOG, CL_GUI_CFW=>FLUSH
- 업무 키워드: 파일 선택 대화상자, 엑셀 업로드 경로
- English: File Open Dialog, Frontend Services, Excel Upload
- 정의부(복사 시 함께 필요):
LT_FILETABLE,RTN_CODE,USER_ACTION,LS_FILETABLE - 위치:
abap://ZCOR0020/ZCO_COMMON#L1376-L1397· confidence 0.9 ·ZCOR0020#ZCO_COMMON#FORM#GET_FILE_PATH#C1
FORM CHK_FILE_PATH — ZCO_COMMON L1408-L1433 (26줄)
CL_GUI_FRONTEND_SERVICES=>FILE_EXIST로 업로드 파일 경로의 존재를 확인하고 없으면 메시지 후 처리를 중단하는 공통 FORM이다.
이 unit 의 조각 1개가 17/26줄(65%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[validation] 프론트엔드 파일 존재 여부를 FILE_EXIST로 검사해 호출 오류 시 시스템 메시지를, 파일이 없으면 'Please check your file path' 메시지 후 LEAVE LIST-PROCESSING으로 중단한다.
1415| CALL METHOD CL_GUI_FRONTEND_SERVICES=>FILE_EXIST
1416| EXPORTING
1417| FILE = LV_FILE
1418| RECEIVING
1419| RESULT = LV_RESULT.
1420|
1421| IF NOT SY-SUBRC IS INITIAL.
1422|
1423| MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
1424| WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
1425|
1426| ELSEIF LV_RESULT IS INITIAL.
1427|
1428| MESSAGE S001(00) WITH 'Please check your file path'.
1429| LEAVE LIST-PROCESSING.
1430|
1431| ENDIF.
- EN: Verify the local file exists with CL_GUI_FRONTEND_SERVICES=>FILE_EXIST and stop processing with a message when it is missing.
- 호출(파서): CL_GUI_FRONTEND_SERVICES=>FILE_EXIST
- SAP 객체: CL_GUI_FRONTEND_SERVICES=>FILE_EXIST
- 업무 키워드: 파일 존재 확인, 업로드 경로 검증
- English: File Exist Check, Frontend Services
- 정의부(복사 시 함께 필요):
LV_FILE,LV_RESULT - 위치:
abap://ZCOR0020/ZCO_COMMON#L1415-L1431· confidence 0.9 ·ZCOR0020#ZCO_COMMON#FORM#CHK_FILE_PATH#C1
FORM BDC_CREATE_AENNR — ZCO_COMMON L1545-L1612 (68줄)
변경번호(AENNR) 존재 여부를 AENR에서 확인한 뒤 없으면 BDC로 CC01(변경마스터 생성)을 실행하고 결과 메시지를 반환하는 공통 FORM이다.
이 unit 의 조각 2개가 60/68줄(88%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[sql_select] AENR 테이블에서 변경번호(AENNR)가 이미 존재하는지 조회하여 있으면 성공(S)으로 종료해 중복 생성을 막는다.
1550| SELECT SINGLE AENNR
1551| INTO P_AENNR
1552| FROM AENR
1553| WHERE AENNR EQ P_AENNR.
1554| IF SY-SUBRC EQ 0.
1555| P_MSGTY = 'S'.
1556| EXIT.
1557| ENDIF.
- EN: Check AENR for an existing change number and exit with success if it already exists to avoid duplicate creation.
- 테이블(파서): read AENR / write -
- SAP 객체: AENR
- 업무 키워드: 변경번호 존재 확인, 중복 생성 방지, 설계변경관리
- English: Change Number, AENR, Engineering Change Management
- 위치:
abap://ZCOR0020/ZCO_COMMON#L1550-L1557· confidence 0.95 ·ZCOR0020#ZCO_COMMON#FORM#BDC_CREATE_AENNR#C1
[fm_call] SAPMC29C 화면(0100/0010/0020)에 변경번호·내역·효력시작일·변경사유·상태 등을 채운 BDC 데이터를 구성해 CALL TRANSACTION 'CC01'(N 모드, 동기 업데이트)로 변경마스터를 생성하고, 메시지 CC001 성공 여부로 P_MSGTY를 정하며 실패 시 BUILD_MESSAGE로 오류 텍스트를 만든다.
1559| REFRESH : GT_BDCDATA, GT_MESSTAB.
1560| CLEAR : GS_BDC_OPTION.
1561|
1562| GS_BDC_OPTION-DISMODE = 'N'.
1563| GS_BDC_OPTION-UPDMODE = 'S'.
1564|
1565| PERFORM DYNPRO TABLES PT_TABLES USING:
1566| 'X' 'SAPMC29C' '0100', "설계변경관리: 초기화면
1567| ' ' 'BDC_OKCODE' '/00',
1568| ' ' 'RC29A-AENNR' P_AENNR,
1569|
1570| 'X' 'SAPMC29C' '0010', "ECM: Basic Screen
1571| ' ' 'BDC_OKCODE' '/00',
1572| ' ' 'RC29A-AETXT' P_TEXT, "내역
1573| ' ' 'RC29A-DATUV' P_DATUV, "효력 시작일
1574| ' ' 'RC29A-AEGRU' P_AEGRU, "변경사유
1575| ' ' 'RC29A-AENST' '01', "변경 번호 상태
1576|
1577| 'X' 'SAPMC29C' '0020', "ECM: Basic Screen
1578| ' ' 'BDC_OKCODE' '=ENT1',
1579| ' ' 'RC29A-AEERL(01)' 'X', "Obj. 유형 활성
1580|
1581| 'X' 'SAPMC29C' '0020', "ECM: Basic Screen
1582| ' ' 'BDC_OKCODE' '=ENT1',
1583| ' ' 'RC29A-INDFL(01)' 'X', "오브젝트
1584|
1585| 'X' 'SAPMC29C' '0020', "ECM: Basic Screen
1586| ' ' 'BDC_OKCODE' '=ENT1',
1587| ' ' 'RC29A-OIGEN(01)' 'X', "관리레코드생성
1588|
1589| 'X' 'SAPMC29C' '0020', "ECM: Basic Screen
1590| ' ' 'BDC_OKCODE' '/00',
1591|
1592| 'X' 'SAPMC29C' '0020', "ECM: Basic Screen
1593| ' ' 'BDC_OKCODE' '=FCBU'.
1594|
1595| CALL TRANSACTION 'CC01'
1596| USING GT_BDCDATA[]
1597| OPTIONS FROM GS_BDC_OPTION
1598| MESSAGES INTO GT_MESSTAB[].
1599|
1600| *-- 메시지 처리
1601| READ TABLE GT_MESSTAB WITH KEY MSGTYP = 'S'
1602| MSGID = 'CC'
1603| MSGNR = '001'.
1604| IF SY-SUBRC EQ 0.
1605| P_MSGTY = 'S'.
1606| ELSE.
1607| P_MSGTY = 'E'.
1608| PERFORM BUILD_MESSAGE USING GT_MESSTAB
1609| CHANGING P_MSGTX.
1610| ENDIF.
- EN: Build BDC screens for SAPMC29C with change number, description, valid-from date, reason and status, run CALL TRANSACTION CC01, and derive success/error message from BDC messages (CC 001).
- 호출(파서): DYNPRO, DYNPRO, DYNPRO, DYNPRO, DYNPRO, DYNPRO, DYNPRO, DYNPRO, DYNPRO, DYNPRO, DYNPRO, DYNPRO, DYNPRO, DYNPRO, DYNPRO, DYNPRO, DYNPRO, DYNPRO, DYNPRO, DYNPRO
- SAP 객체: CC01, SAPMC29C, GT_BDCDATA, GT_MESSTAB, BUILD_MESSAGE, DYNPRO
- 업무 키워드: 변경마스터 생성, BDC 배치입력, CC01, 효력 시작일, 변경사유, 메시지 처리
- English: Change Master, BDC, Call Transaction, CC01, ECM
- 정의부(복사 시 함께 필요):
GT_BDCDATA,BDCMSGCOLL,GT_MESSTAB,GS_BDC_OPTION - 위치:
abap://ZCOR0020/ZCO_COMMON#L1559-L1610· confidence 0.9 ·ZCOR0020#ZCO_COMMON#FORM#BDC_CREATE_AENNR#C2
FORM GET_DYNP_VALUES_READ — ZCO_COMMON L1620-L1669 (50줄)
DYNP_VALUES_READ로 현재 화면의 필드 값을 읽어 같은 이름의 프로그램 변수에 넣는 공통 FORM이다.
이 unit 의 조각 1개가 35/50줄(70%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[fm_call] DYNP_VALUES_READ로 현재 화면(SY-REPID/SY-DYNNR)의 지정 필드 값을 읽고, 성공하면 동적 ASSIGN한 동일 이름의 ABAP 변수에 값을 대입한다(F4/PAI 전 값 취득용).
1632| LS_DYNPFIELDS-FIELDNAME = P_FIELD.
1633| APPEND LS_DYNPFIELDS TO LT_DYNPFIELDS.
1634|
1635| CALL FUNCTION 'DYNP_VALUES_READ'
1636| EXPORTING
1637| DYNAME = LV_DYNAME
1638| DYNUMB = LV_DYNUM
1639| TABLES
1640| DYNPFIELDS = LT_DYNPFIELDS
1641| EXCEPTIONS
1642| INVALID_ABAPWORKAREA = 1
1643| INVALID_DYNPROFIELD = 2
1644| INVALID_DYNPRONAME = 3
1645| INVALID_DYNPRONUMMER = 4
1646| INVALID_REQUEST = 5
1647| NO_FIELDDESCRIPTION = 6
1648| INVALID_PARAMETER = 7
1649| UNDEFIND_ERROR = 8
1650| DOUBLE_CONVERSION = 9
1651| STEPL_NOT_FOUND = 10
1652| OTHERS = 11.
1653|
1654| IF SY-SUBRC <> 0.
1655| EXIT.
1656|
1657| ELSE.
1658| READ TABLE LT_DYNPFIELDS INTO LS_DYNPFIELDS
1659| WITH KEY FIELDNAME = P_FIELD.
1660| IF SY-SUBRC EQ 0.
1661| ASSIGN (P_FIELD) TO <FS_FIELD>.
1662| IF <FS_FIELD> IS ASSIGNED.
1663| <FS_FIELD> = LS_DYNPFIELDS-FIELDVALUE.
1664| ENDIF.
1665| ENDIF.
1666|
- EN: Read the current screen field value with DYNP_VALUES_READ and move it into the ABAP variable of the same name via dynamic assignment.
- 호출(파서): DYNP_VALUES_READ
- SAP 객체: DYNP_VALUES_READ, DYNPREAD
- 업무 키워드: 화면 필드 값 읽기, F4 도움말 전 값 취득
- English: Dynpro, DYNP_VALUES_READ, Screen Field
- 정의부(복사 시 함께 필요):
LS_DYNPFIELDS,LT_DYNPFIELDS,LV_DYNAME,LV_DYNUM,<FS_FIELD> - 위치:
abap://ZCOR0020/ZCO_COMMON#L1632-L1666· confidence 0.85 ·ZCOR0020#ZCO_COMMON#FORM#GET_DYNP_VALUES_READ#C1
FORM SET_DYNP_VALUES — ZCO_COMMON L1678-L1719 (42줄)
프로그램 변수 값을 DYNP_VALUES_UPDATE로 현재 화면 필드에 반영하는 공통 FORM이다.
이 unit 의 조각 1개가 23/42줄(55%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[fm_call] 필드명으로 ABAP 변수를 동적 ASSIGN하여 값을 DYNPREAD에 담고 DYNP_VALUES_UPDATE로 현재 화면(SY-REPID/SY-DYNNR)의 해당 필드 값을 갱신한다.
1690| LS_DYNPFIELDS-FIELDNAME = P_FIELD.
1691|
1692| ASSIGN (P_FIELD) TO <FS_FIELD>.
1693| IF <FS_FIELD> IS ASSIGNED.
1694| LS_DYNPFIELDS-FIELDVALUE = <FS_FIELD>.
1695| ENDIF.
1696| APPEND LS_DYNPFIELDS TO LT_DYNPFIELDS.
1697|
1698| CALL FUNCTION 'DYNP_VALUES_UPDATE'
1699| EXPORTING
1700| DYNAME = LV_DYNAME
1701| DYNUMB = LV_DYNUM
1702| TABLES
1703| DYNPFIELDS = LT_DYNPFIELDS
1704| EXCEPTIONS
1705| INVALID_ABAPWORKAREA = 1
1706| INVALID_DYNPROFIELD = 2
1707| INVALID_DYNPRONAME = 3
1708| INVALID_DYNPRONUMMER = 4
1709| INVALID_REQUEST = 5
1710| NO_FIELDDESCRIPTION = 6
1711| UNDEFIND_ERROR = 7
1712| OTHERS = 8.
- EN: Read the ABAP variable by dynamic assignment and push its value to the current screen field via DYNP_VALUES_UPDATE.
- 호출(파서): DYNP_VALUES_UPDATE
- SAP 객체: DYNP_VALUES_UPDATE, DYNPREAD
- 업무 키워드: 화면 필드 값 갱신, 선택화면 동적 값 설정
- English: Dynpro, DYNP_VALUES_UPDATE, Screen Field
- 정의부(복사 시 함께 필요):
LS_DYNPFIELDS,<FS_FIELD>,LT_DYNPFIELDS,LV_DYNAME,LV_DYNUM - 위치:
abap://ZCOR0020/ZCO_COMMON#L1690-L1712· confidence 0.85 ·ZCOR0020#ZCO_COMMON#FORM#SET_DYNP_VALUES#C1
FORM AUTHORITY_CHECK_TCODE — ZCO_COMMON L1725-L1738 (14줄)
S_TCODE 권한 객체로 현재 T-Code 실행 권한을 검사하고 T-Code 끝자리가 1이면 조회 모드(GV_DIP_MOD)로 설정하는 공통 FORM이다.
이 unit 의 조각 1개가 8/14줄(57%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[validation] AUTHORITY-CHECK OBJECT 'S_TCODE'로 SY-TCODE 실행 권한을 검사해 없으면 E077(S#) 오류로 중단하고, T-Code가 '*1' 패턴이면 조회 전용 모드 플래그를 켠다.
1729| AUTHORITY-CHECK OBJECT 'S_TCODE'
1730| ID 'TCD' FIELD SY-TCODE.
1731|
1732| IF SY-SUBRC NE 0.
1733| MESSAGE E077(S#) WITH SY-TCODE.
1734| ELSEIF SY-TCODE CP '*1'.
1735| GV_DIP_MOD = 'X'.
1736| ENDIF.
- EN: Check transaction authorization via S_TCODE; raise error E077(S#) if missing, and set display-only mode when the T-Code ends with 1.
- SAP 객체: S_TCODE
- 업무 키워드: 트랜잭션 권한 검사, 조회 모드 설정
- English: Authorization Check, S_TCODE, Display Mode
- 정의부(복사 시 함께 필요):
GV_DIP_MOD - 위치:
abap://ZCOR0020/ZCO_COMMON#L1729-L1736· confidence 0.95 ·ZCOR0020#ZCO_COMMON#FORM#AUTHORITY_CHECK_TCODE#C1
FORM F_PDF_DOWNLOAD — ZCO_COMMON L1777-L1842 (66줄)
Smart Forms 출력 결과(OTF)를 PDF로 변환하고 저장 대화상자를 거쳐 PC에 다운로드하는 공통 FORM이다.
이 unit 의 조각 2개가 47/66줄(71%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[fm_call] Smart Forms 잡 결과(SSFCRESCL-OTFDATA)의 OTF 데이터를 CONVERT_OTF로 PDF 바이너리로 변환하고, OTF 라인을 텍스트 테이블로 만들어 SX_OBJECT_CONVERT_OTF_PDF로 PDF 바이너리 컨텐츠(LT_CONTENT_BIN)와 길이를 얻는다.
1792| LT_OTF[] = P_JOB-OTFDATA.
1793|
1794| CALL FUNCTION 'CONVERT_OTF'
1795| EXPORTING
1796| FORMAT = 'PDF'
1797| IMPORTING
1798| BIN_FILESIZE = LV_BIN_FILESIZE
1799| BIN_FILE = LV_BIN_FILE
1800| TABLES
1801| OTF = LT_OTF
1802| LINES = LT_LINES
1803| EXCEPTIONS
1804| ERR_MAX_LINEWIDTH = 1
1805| ERR_FORMAT = 2
1806| ERR_CONV_NOT_POSSIBLE = 3
1807| ERR_BAD_OTF = 4
1808| OTHERS = 5.
1809|
1810| LOOP AT LT_OTF.
1811| CONCATENATE LT_OTF-TDPRINTCOM LT_OTF-TDPRINTPAR INTO LS_OTF.
1812| APPEND LS_OTF TO LT_CONTENT_TXT.
1813| ENDLOOP.
1814|
1815| CALL FUNCTION 'SX_OBJECT_CONVERT_OTF_PDF'
1816| EXPORTING
1817| FORMAT_SRC = 'OTF'
1818| FORMAT_DST = 'PDF'
1819| DEVTYPE = 'PRINTER'
1820| CHANGING
1821| TRANSFER_BIN = LV_TRANSFER_BIN
1822| CONTENT_TXT = LT_CONTENT_TXT
1823| CONTENT_BIN = LT_CONTENT_BIN
1824| OBJHEAD = LT_OBJHEAD
1825| LEN = LV_LEN_IN
1826| EXCEPTIONS
1827| ERR_CONV_FAILED = 1
1828| OTHERS = 2.
- EN: Convert Smart Forms OTF output to PDF using CONVERT_OTF and SX_OBJECT_CONVERT_OTF_PDF, producing binary PDF content and its length.
- 호출(파서): CONVERT_OTF, SX_OBJECT_CONVERT_OTF_PDF
- SAP 객체: CONVERT_OTF, SX_OBJECT_CONVERT_OTF_PDF, SSFCRESCL, ITCOO
- 업무 키워드: OTF PDF 변환, Smart Forms 출력, 양식 다운로드
- English: Smart Forms, OTF, PDF Conversion
- 정의부(복사 시 함께 필요):
LT_OTF,LV_BIN_FILESIZE,LV_BIN_FILE,LT_LINES,LS_OTF,LT_CONTENT_TXT,LV_TRANSFER_BIN,LT_CONTENT_BIN,LT_OBJHEAD,LV_LEN_IN - 위치:
abap://ZCOR0020/ZCO_COMMON#L1792-L1828· confidence 0.9 ·ZCOR0020#ZCO_COMMON#FORM#F_PDF_DOWNLOAD#C1
[fm_call] OPEN_SAVE_FILE_SEL로 pdf 저장 경로를 받은 뒤 GUI_DOWNLOAD(FILETYPE='BIN')로 PDF 바이너리를 로컬 PC에 저장한다.
1831| LV_FILESIZE = LV_LEN_IN.
1832| PERFORM OPEN_SAVE_FILE_SEL USING 'pdf' CHANGING LV_FILENAME.
1833|
1834| CALL FUNCTION 'GUI_DOWNLOAD'
1835| EXPORTING
1836| BIN_FILESIZE = LV_FILESIZE
1837| FILENAME = LV_FILENAME
1838| FILETYPE = 'BIN'
1839| TABLES
1840| DATA_TAB = LT_CONTENT_BIN.
- EN: Ask for a PDF save path via OPEN_SAVE_FILE_SEL and download the binary PDF content to the frontend with GUI_DOWNLOAD.
- 호출(파서): OPEN_SAVE_FILE_SEL, GUI_DOWNLOAD
- SAP 객체: GUI_DOWNLOAD, OPEN_SAVE_FILE_SEL
- 업무 키워드: PDF 다운로드, 로컬 저장
- English: GUI_DOWNLOAD, PDF, Frontend Download
- 정의부(복사 시 함께 필요):
LV_FILESIZE,LV_LEN_IN,LV_FILENAME,LT_CONTENT_BIN - 위치:
abap://ZCOR0020/ZCO_COMMON#L1831-L1840· confidence 0.9 ·ZCOR0020#ZCO_COMMON#FORM#F_PDF_DOWNLOAD#C2
FORM OPEN_SAVE_FILE_SEL — ZCO_COMMON L1851-L1907 (57줄)
파일 저장 대화상자(FILE_SAVE_DIALOG)를 열어 사용자가 지정한 저장 파일명을 돌려주는 공통 FORM이다.
이 unit 의 조각 1개가 36/57줄(63%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[fm_call] 확장자·기본 파일명·필터(전체/엑셀)·초기 디렉토리를 설정한 뒤 CL_GUI_FRONTEND_SERVICES=>FILE_SAVE_DIALOG를 호출하고, 오류 시 메시지, 취소 시 종료, 확인 시 파일명을 P_FILENAME에 반환한다.
1868| LV_DEFAULT_EXTENSION = P_EXT.
1869| CONCATENATE '*.' P_EXT INTO LV_DEFAULT_FILE_NAME.
1870| LV_INITIAL_DIRECTORY = 'C:\'.
1871| CONCATENATE CL_GUI_FRONTEND_SERVICES=>FILETYPE_ALL
1872| * CL_GUI_FRONTEND_SERVICES=>FILETYPE_TEXT
1873| CL_GUI_FRONTEND_SERVICES=>FILETYPE_EXCEL
1874| INTO LV_FILE_FILTER.
1875|
1876| CALL METHOD CL_GUI_FRONTEND_SERVICES=>FILE_SAVE_DIALOG
1877| EXPORTING
1878| * WINDOW_TITLE
1879| DEFAULT_EXTENSION = LV_DEFAULT_EXTENSION
1880| DEFAULT_FILE_NAME = LV_DEFAULT_FILE_NAME
1881| * WITH_ENCODING = ABAP_TRUE
1882| FILE_FILTER = LV_FILE_FILTER
1883| INITIAL_DIRECTORY = LV_INITIAL_DIRECTORY
1884| CHANGING
1885| FILENAME = LV_FILENAME
1886| PATH = LV_PATH
1887| FULLPATH = LV_FULLPATH
1888| USER_ACTION = LV_USER_ACTION
1889| EXCEPTIONS
1890| CNTL_ERROR = 2
1891| ERROR_NO_GUI = 3
1892| NOT_SUPPORTED_BY_GUI = 4
1893| OTHERS = 5.
1894| IF SY-SUBRC <> 0.
1895| MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
1896| WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
1897| EXIT.
1898| ELSE.
1899| IF LV_USER_ACTION NE CL_GUI_FRONTEND_SERVICES=>ACTION_OK.
1900| EXIT.
1901| ENDIF.
1902|
1903| P_FILENAME = LV_FILENAME.
- EN: Prepare extension, default name, file filter and initial directory, call CL_GUI_FRONTEND_SERVICES=>FILE_SAVE_DIALOG and return the chosen filename when the user confirms.
- 호출(파서): CL_GUI_FRONTEND_SERVICES=>FILETYPE_ALL, CL_GUI_FRONTEND_SERVICES=>FILETYPE_EXCEL, CL_GUI_FRONTEND_SERVICES=>FILE_SAVE_DIALOG, CL_GUI_FRONTEND_SERVICES=>ACTION_OK
- SAP 객체: CL_GUI_FRONTEND_SERVICES=>FILE_SAVE_DIALOG
- 업무 키워드: 파일 저장 대화상자, 다운로드 경로 선택
- English: File Save Dialog, Frontend Services
- 정의부(복사 시 함께 필요):
LV_DEFAULT_EXTENSION,LV_DEFAULT_FILE_NAME,LV_INITIAL_DIRECTORY,LV_FILE_FILTER,LV_FILENAME,LV_PATH,LV_FULLPATH,LV_USER_ACTION - 위치:
abap://ZCOR0020/ZCO_COMMON#L1868-L1903· confidence 0.9 ·ZCOR0020#ZCO_COMMON#FORM#OPEN_SAVE_FILE_SEL#C1
FORM ALSMEX_TAB_TO_ITAB — ZCO_COMMON L1917-L1945 (29줄)
ALSM_EXCEL_TO_INTERNAL_TABLE 결과(ALSMEX_TABLINE)를 동적으로 지정한 내부테이블·구조체에 행/열 매핑하여 적재하는 공통 FORM이다.
이 unit 의 조각 1개가 20/29줄(69%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[calculation] 엑셀 셀 데이터(ROW/COL/VALUE)를 순회하며 열 번호에 해당하는 구조체 컴포넌트에 값을 넣고(숫자는 콤마 제거), 행이 바뀔 때마다 대상 내부테이블에 APPEND한다.
1924| ASSIGN : (PT_EXCEL_TABLE) TO <ITAB>.
1925| ASSIGN : (PS_EXCEL_STRUC) TO <ILINE>.
1926|
1927| LOOP AT PT_INTERN.
1928| AT NEW ROW.
1929| CLEAR : <ILINE>.
1930| ENDAT.
1931|
1932| ASSIGN COMPONENT PT_INTERN-COL OF STRUCTURE <ILINE> TO <FIELD>.
1933|
1934| IF PT_INTERN-VALUE CO '0123456789,.- '.
1935| REPLACE ALL OCCURRENCES OF ',' IN PT_INTERN-VALUE WITH ''.
1936| ENDIF.
1937|
1938| MOVE PT_INTERN-VALUE TO <FIELD>.
1939|
1940| AT END OF ROW.
1941| APPEND <ILINE> TO <ITAB>.
1942| ENDAT.
1943| ENDLOOP.
- EN: Iterate Excel cell lines, move each value into the structure component matching the column (removing thousand separators from numerics) and append one line per row to the dynamically assigned target table.
- SAP 객체: ALSMEX_TABLINE, ALSM_EXCEL_TO_INTERNAL_TABLE
- 업무 키워드: 엑셀 셀 매핑, 동적 내부테이블, 콤마 제거
- English: Excel Upload, ALSMEX_TABLINE, Dynamic Assign
- 정의부(복사 시 함께 필요):
<ITAB>,<ILINE>,<FIELD> - 위치:
abap://ZCOR0020/ZCO_COMMON#L1924-L1943· confidence 0.9 ·ZCOR0020#ZCO_COMMON#FORM#ALSMEX_TAB_TO_ITAB#C1
FORM START_INTERFACE_BDC — ZCO_COMMON L1953-L1973 (21줄)
FTPOST 작업 테이블을 초기화하고 POSTING_INTERFACE_START로 FI Posting Interface(Call Transaction 방식)를 시작하는 공통 FORM이다.
이 unit 의 조각 1개가 13/21줄(62%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[fm_call] POSTING_INTERFACE_START를 I_FUNCTION='C'(Call Transaction), 지정 모드(P_MODE), 동기 업데이트('S')로 호출해 FI 전표 전기 인터페이스를 연다.
1960| CALL FUNCTION 'POSTING_INTERFACE_START'
1961| EXPORTING
1962| I_FUNCTION = 'C' " Using Call Transaction
1963| I_KEEP = 'Y'
1964| I_MODE = P_MODE
1965| I_UPDATE = 'S'
1966| EXCEPTIONS
1967| CLIENT_INCORRECT = 1
1968| FUNCTION_INVALID = 2
1969| GROUP_NAME_MISSING = 3
1970| MODE_INVALID = 4
1971| UPDATE_INVALID = 5
1972| OTHERS = 6.
- EN: Open the FI posting interface with POSTING_INTERFACE_START in call-transaction mode, given display mode and synchronous update.
- 호출(파서): POSTING_INTERFACE_START
- SAP 객체: POSTING_INTERFACE_START
- 업무 키워드: 전기 인터페이스 시작, Call Transaction, 전표 전기
- English: Posting Interface, Call Transaction, FI Document
- 위치:
abap://ZCOR0020/ZCO_COMMON#L1960-L1972· confidence 0.9 ·ZCOR0020#ZCO_COMMON#FORM#START_INTERFACE_BDC#C1
FORM END_INTERFACE_BDC — ZCO_COMMON L1980-L1990 (11줄)
POSTING_INTERFACE_END를 호출해 FI Posting Interface 세션을 종료하고 FTPOST/FTTAX/BLNTAB 작업 테이블을 초기화하는 공통 FORM이다.
이 unit 의 조각 1개가 3/11줄(27%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[fm_call] FI Posting Interface 처리를 POSTING_INTERFACE_END(I_BDCIMMED='X')로 종료해 BDC 세션을 즉시 처리한다.
1981| CALL FUNCTION 'POSTING_INTERFACE_END'
1982| EXPORTING
1983| I_BDCIMMED = 'X'.
- EN: Close the FI posting interface session via POSTING_INTERFACE_END with immediate BDC processing.
- 호출(파서): POSTING_INTERFACE_END
- SAP 객체: POSTING_INTERFACE_END
- 업무 키워드: 전기 인터페이스 종료, BDC 세션
- English: Posting Interface, BDC Session
- 위치:
abap://ZCOR0020/ZCO_COMMON#L1981-L1983· confidence 0.9 ·ZCOR0020#ZCO_COMMON#FORM#END_INTERFACE_BDC#C1
FORM FILL_FIELD — ZCO_COMMON L2000-L2023 (24줄)
Posting Interface(FTPOST)용 필드명·값을 한 건 채우며 금액 필드는 통화 형식으로 편집하여 FTPOST 테이블에 추가하는 공통 FORM이다.
이 unit 의 조각 1개가 18/24줄(75%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[interface] 값이 있는 경우에만 FTPOST에 STYPE/COUNT와 필드명을 설정하고, 금액 필드(FCURR_X='X')는 통화(GV_FTPOST_WAERS) 기준으로 WRITE 편집 후 FTPOST-FVAL에 넣어 Posting Interface 전표 필드로 APPEND한다.
2004| CHECK FVAL NE SPACE.
2005|
2006| FTPOST-FNAM = FNAM.
2007| FTPOST-STYPE = GV_FTPOST_TYPE.
2008| FTPOST-COUNT = GV_FTPOST_CNT.
2009|
2010| " 금액 필드일 경우.
2011| IF FCURR_X = 'X'.
2012| WRITE FVAL TO LV_CURR CURRENCY
2013| GV_FTPOST_WAERS LEFT-JUSTIFIED.
2014| CONDENSE LV_CURR NO-GAPS.
2015| WRITE LV_CURR TO FTPOST-FVAL.
2016| ELSE.
2017| WRITE FVAL TO FTPOST-FVAL.
2018| ENDIF.
2019|
2020| APPEND FTPOST.
2021| CLEAR FTPOST.
- EN: Populate one FTPOST entry for the FI posting interface: set field name, segment type and count, format amount fields with currency and append.
- SAP 객체: FTPOST, POSTING_INTERFACE_DOCUMENT
- 업무 키워드: 전기 인터페이스, FTPOST 필드 구성, 금액 통화 편집
- English: Posting Interface, FTPOST, Currency Format
- 정의부(복사 시 함께 필요):
FTPOST,GV_FTPOST_TYPE,GV_FTPOST_CNT,LV_CURR,GV_FTPOST_WAERS - 위치:
abap://ZCOR0020/ZCO_COMMON#L2004-L2021· confidence 0.85 ·ZCOR0020#ZCO_COMMON#FORM#FILL_FIELD#C1
FORM BUILD_MESSGE_IF — ZCO_COMMON L2032-L2047 (16줄)
인터페이스 메시지 구조(MSGID/MSGNO/MSGV1~4)를 MESSAGE_TEXT_BUILD로 메시지 텍스트로 조립하는 공통 FORM이다.
이 unit 의 조각 1개가 10/16줄(62%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[fm_call] 메시지 클래스·번호·변수 1~4를 MESSAGE_TEXT_BUILD에 넘겨 사용자에게 보여줄 메시지 문장을 생성한다.
2037| CALL FUNCTION 'MESSAGE_TEXT_BUILD'
2038| EXPORTING
2039| MSGID = PS_MESSAGE-MSGID
2040| MSGNR = PS_MESSAGE-MSGNO
2041| MSGV1 = PS_MESSAGE-MSGV1
2042| MSGV2 = PS_MESSAGE-MSGV2
2043| MSGV3 = PS_MESSAGE-MSGV3
2044| MSGV4 = PS_MESSAGE-MSGV4
2045| IMPORTING
2046| MESSAGE_TEXT_OUTPUT = PV_TEXT.
- EN: Build the readable message text from message ID, number and variables using MESSAGE_TEXT_BUILD.
- 호출(파서): MESSAGE_TEXT_BUILD
- SAP 객체: MESSAGE_TEXT_BUILD, GT_IF_MSG
- 업무 키워드: 메시지 텍스트 생성, 인터페이스 메시지
- English: Message Text, Message Class
- 위치:
abap://ZCOR0020/ZCO_COMMON#L2037-L2046· confidence 0.9 ·ZCOR0020#ZCO_COMMON#FORM#BUILD_MESSGE_IF#C1
FORM GET_POST_PERIOD — ZCO_COMMON L2057-L2084 (28줄)
회사코드와 전기일로 FI_PERIOD_DETERMINE을 호출해 회계연도·전기기간을 구하고 실패 시 날짜에서 직접 추출하는 공통 FORM이다.
이 unit 의 조각 1개가 21/28줄(75%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[fm_call] 회사코드(BUKRS)와 전기일(BUDAT)로 FI_PERIOD_DETERMINE을 호출해 회계연도(GJAHR)와 전기기간(MONAT)을 구하고, 예외 발생 시 달력 연도·월을 대신 사용한다.
2062| CALL FUNCTION 'FI_PERIOD_DETERMINE'
2063| EXPORTING
2064| I_BUKRS = PV_BUKRS
2065| I_BUDAT = PV_DATE
2066| IMPORTING
2067| E_GJAHR = P_LFGJA
2068| E_MONAT = P_LFMON
2069| EXCEPTIONS
2070| FISCAL_YEAR = 1
2071| PERIOD = 2
2072| PERIOD_VERSION = 3
2073| POSTING_PERIOD = 4
2074| SPECIAL_PERIOD = 5
2075| VERSION = 6
2076| POSTING_DATE = 7
2077| OTHERS = 8.
2078|
2079| IF SY-SUBRC NE 0.
2080| P_LFGJA = PV_DATE(4).
2081| P_LFMON = PV_DATE+4(2).
2082| ENDIF.
- EN: Determine fiscal year and posting period from company code and posting date via FI_PERIOD_DETERMINE, falling back to calendar year/month on exception.
- 호출(파서): FI_PERIOD_DETERMINE
- SAP 객체: FI_PERIOD_DETERMINE
- 업무 키워드: 회계연도 결정, 전기기간, 회사코드, 전기일
- English: Fiscal Year, Posting Period, Company Code, Posting Date
- 위치:
abap://ZCOR0020/ZCO_COMMON#L2062-L2082· confidence 0.95 ·ZCOR0020#ZCO_COMMON#FORM#GET_POST_PERIOD#C1
FORM CONV_DB_WAERS — ZCO_COMMON L2109-L2116 (8줄)
CURRENCY_AMOUNT_IDOC_TO_SAP로 외부(IDoc) 형식 금액을 통화 소수점에 맞는 SAP 내부 금액으로 변환하는 공통 FORM이다.
이 unit 의 조각 1개가 6/8줄(75%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[fm_call] 통화(P_WAERS)에 따라 외부 표시 금액을 CURRENCY_AMOUNT_IDOC_TO_SAP로 DB 저장용 내부 금액으로 변환해 P_VALUE에 되돌린다.
2110| CALL FUNCTION 'CURRENCY_AMOUNT_IDOC_TO_SAP'
2111| EXPORTING
2112| CURRENCY = P_WAERS
2113| IDOC_AMOUNT = P_VALUE
2114| IMPORTING
2115| SAP_AMOUNT = P_VALUE.
- EN: Convert an IDoc/external amount to SAP internal amount format for the currency via CURRENCY_AMOUNT_IDOC_TO_SAP.
- 호출(파서): CURRENCY_AMOUNT_IDOC_TO_SAP
- SAP 객체: CURRENCY_AMOUNT_IDOC_TO_SAP
- 업무 키워드: 금액 내부형식 변환, 통화 소수점
- English: Currency Conversion, Internal Amount
- 위치:
abap://ZCOR0020/ZCO_COMMON#L2110-L2115· confidence 0.9 ·ZCOR0020#ZCO_COMMON#FORM#CONV_DB_WAERS#C1
FORM CONV_VIEW_WAERS — ZCO_COMMON L2126-L2134 (9줄)
CURRENCY_AMOUNT_SAP_TO_IDOC로 SAP 내부 금액을 통화 소수점에 맞는 외부(IDoc) 형식 문자열로 변환하는 공통 FORM이다.
이 unit 의 조각 1개가 6/9줄(67%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[fm_call] 통화 코드(P_WAERS)에 따라 내부 금액을 CURRENCY_AMOUNT_SAP_TO_IDOC로 IDoc/BAPI 외부 금액 형식으로 변환해 BAPI 금액 필드에 넣을 값을 만든다.
2128| CALL FUNCTION 'CURRENCY_AMOUNT_SAP_TO_IDOC'
2129| EXPORTING
2130| CURRENCY = P_WAERS
2131| SAP_AMOUNT = P_VALUE
2132| IMPORTING
2133| IDOC_AMOUNT = P_DOC_VALUE.
- EN: Convert an SAP internal amount to IDoc/BAPI external amount format for the given currency using CURRENCY_AMOUNT_SAP_TO_IDOC.
- 호출(파서): CURRENCY_AMOUNT_SAP_TO_IDOC
- SAP 객체: CURRENCY_AMOUNT_SAP_TO_IDOC
- 업무 키워드: 통화 금액 변환, 외부 형식, BAPI 금액
- English: Currency Conversion, IDoc Amount, BAPI Amount
- 위치:
abap://ZCOR0020/ZCO_COMMON#L2128-L2133· confidence 0.9 ·ZCOR0020#ZCO_COMMON#FORM#CONV_VIEW_WAERS#C1
FORM GET_VERSN_TEXT — ZCO_COMMON L2168-L2177 (10줄)
TKT09에서 관리회계영역·버전의 계획 버전 텍스트를 로그온 언어로 읽는 공통 FORM이다.
이 unit 의 조각 1개가 6/10줄(60%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[sql_select] TKT09에서 관리회계영역(KOKRS)·버전(VERSN)·언어(SY-LANGU)로 계획 버전 텍스트를 조회해 선택화면 표시용으로 반환한다.
2171| SELECT SINGLE TXT
2172| INTO P_VERSN_TXT
2173| FROM TKT09
2174| WHERE KOKRS = P_KOKRS
2175| AND VERSN = P_VERSN
2176| AND LANGU = SY-LANGU.
- EN: Read the CO plan version description from TKT09 for the controlling area, version and logon language.
- 테이블(파서): read TKT09 / write -
- SAP 객체: TKT09
- 업무 키워드: 계획 버전 텍스트, 관리회계영역
- English: Plan Version, TKT09, Controlling Area
- 정의부(복사 시 함께 필요):
P_KOKRS - 위치:
abap://ZCOR0020/ZCO_COMMON#L2171-L2176· confidence 0.95 ·ZCOR0020#ZCO_COMMON#FORM#GET_VERSN_TEXT#C1
FORM UPLOAD_XLS_STRUCT — ZCO_COMMON L2191-L2245 (55줄)
엑셀 파일을 ALSM_EXCEL_TO_INTERNAL_TABLE로 읽어 행/열 단위 값을 구조체 컴포넌트에 매핑해 내부테이블로 적재하는 공통 업로드 FORM이다.
이 unit 의 조각 2개가 39/55줄(71%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[fm_call] 지정한 시작/종료 행·열 범위로 엑셀 파일을 ALSM_EXCEL_TO_INTERNAL_TABLE로 읽어 LT_INTERN에 담고, 업로드 실패나 데이터 없음이면 메시지를 출력하고 종료한다.
2203| CALL FUNCTION 'ALSM_EXCEL_TO_INTERNAL_TABLE'
2204| EXPORTING
2205| FILENAME = P_FILE
2206| I_BEGIN_COL = P_SCOL
2207| I_BEGIN_ROW = P_SROW
2208| I_END_COL = P_ECOL
2209| I_END_ROW = P_EROW
2210| TABLES
2211| INTERN = LT_INTERN
2212| EXCEPTIONS
2213| INCONSISTENT_PARAMETERS = 1
2214| UPLOAD_OLE = 2
2215| OTHERS = 3.
2216|
2217| IF SY-SUBRC <> 0.
2218| FORMAT COLOR COL_BACKGROUND INTENSIFIED.
2219| WRITE:/ 'Error Uploading file'.
2220| EXIT.
2221| ENDIF.
2222|
2223| IF LT_INTERN[] IS INITIAL.
2224| FORMAT COLOR COL_BACKGROUND INTENSIFIED.
2225| WRITE:/ 'No Data Uploaded'.
2226| EXIT.
- EN: Call ALSM_EXCEL_TO_INTERNAL_TABLE with the given row/column range to read the Excel file into ALSMEX_TABLINE and exit with a message on upload error or empty data.
- 호출(파서): ALSM_EXCEL_TO_INTERNAL_TABLE
- SAP 객체: ALSM_EXCEL_TO_INTERNAL_TABLE, ALSMEX_TABLINE
- 업무 키워드: 엑셀 업로드, 파일 읽기, 업로드 오류 처리
- English: Excel Upload, OLE, File Read
- 정의부(복사 시 함께 필요):
ALSMEX_TABLINE,LT_INTERN - 위치:
abap://ZCOR0020/ZCO_COMMON#L2203-L2226· confidence 0.95 ·ZCOR0020#ZCO_COMMON#FORM#UPLOAD_XLS_STRUCT#C1
[calculation] 행·열 순으로 정렬한 셀 값을 열 번호에 해당하는 구조체 컴포넌트에 ASSIGN COMPONENT로 옮기고(숫자 값은 콤마 제거), 행이 끝날 때마다 P_TABLE에 APPEND한다.
2228| SORT LT_INTERN BY ROW COL.
2229| LOOP AT LT_INTERN.
2230| MOVE LT_INTERN-COL TO LV_INDEX.
2231| ASSIGN COMPONENT LV_INDEX OF STRUCTURE P_TABLE TO <FS_LINE>.
2232|
2233| IF LT_INTERN-VALUE CO '0123456789,.- '.
2234| REPLACE ALL OCCURRENCES OF ',' IN LT_INTERN-VALUE WITH ''.
2235| ENDIF.
2236|
2237| MOVE LT_INTERN-VALUE TO <FS_LINE>.
2238| AT END OF ROW.
2239| APPEND P_TABLE.
2240| CLEAR P_TABLE.
2241| ENDAT.
2242| ENDLOOP.
- EN: Sort cells by row/column, move each cell value into the matching structure component (stripping thousand separators from numeric values) and append one internal table line per Excel row.
- SAP 객체: ALSMEX_TABLINE
- 업무 키워드: 셀 값 매핑, 콤마 제거, 행 단위 적재
- English: Cell Mapping, ASSIGN COMPONENT, Internal Table
- 정의부(복사 시 함께 필요):
ALSMEX_TABLINE,LT_INTERN,LV_INDEX,<FS_LINE> - 위치:
abap://ZCOR0020/ZCO_COMMON#L2228-L2242· confidence 0.9 ·ZCOR0020#ZCO_COMMON#FORM#UPLOAD_XLS_STRUCT#C2
FORM CALL_REPORT — ZCOR0020F01 L886-L957 (72줄)
ALV에서 실적(ACTUAL)/임시(PARK) 금액 셀을 더블클릭했을 때 해당 코스트센터 또는 투자오더의 CO 라인아이템 리포트(RKAEP000, KSB1/KOB1)로 드릴다운한다.
이 unit 의 조각 3개가 59/72줄(82%)을 덮는다. 나머지는 선언·화면설정 등 업무 의미가 없다고 판단해 버린 구간이다.
[validation] 더블클릭된 행/컬럼이 ACTUAL 또는 PARK 컬럼인지 검증하고 GT_DATA 해당 행을 읽은 뒤 관리회계영역 파라미터(CAC)를 세팅하고 값유형(WRTTP) 범위를 실적은 04, 임시전표는 60으로 결정한다.
896| CHECK P_ROW CO '0123456789 '.
897|
898| IF NOT ( P_COLUMN = 'ACTUAL' OR P_COLUMN = 'PARK' ).
899| EXIT.
900| ENDIF.
901|
902| READ TABLE GT_DATA INDEX P_ROW.
903|
904| CHECK SY-SUBRC EQ 0.
905|
906| SET PARAMETER ID 'CAC' FIELD P_KOKRS.
907|
908| IF P_COLUMN = 'ACTUAL'.
909| ADD_RANGE_EQ : LR_WRTTP '04'.
910| ELSEIF P_COLUMN = 'PARK'.
911| ADD_RANGE_EQ : LR_WRTTP '60'.
912| ENDIF.
- EN: Validate the clicked ALV row/column (ACTUAL or PARK), read the GT_DATA row, set parameter ID CAC and determine the value type (WRTTP) range 04 for actual or 60 for parked documents.
- SAP 객체: GT_DATA, COEP-WRTTP
- 업무 키워드: 드릴다운, 값유형, 실적, 임시전표, 관리회계영역
- English: Drilldown, Value Type, Actual, Parked Document, Controlling Area
- 정의부(복사 시 함께 필요):
GT_DATA,P_KOKRS,ADD_RANGE_EQ,LR_WRTTP - 위치:
abap://ZCOR0020/ZCOR0020F01#L896-L912· confidence 0.9 ·ZCOR0020#ZCOR0020F01#FORM#CALL_REPORT#C1
[fm_call] 코스트센터 조회 모드에서는 코스트센터·원가요소·전기일(회계연도+기간 범위의 초일~말일, GET_LAST_DAY) 범위를 만들고 값유형 11을 추가한 뒤 RKAEP000을 KSB1(코스트센터 실제 라인아이템)로 SUBMIT AND RETURN 한다.
914| IF PR_CC = 'X'.
915| ADD_RANGE_EQ : LR_WRTTP '11'. " 11번 추가
916|
917| ADD_RANGE_EQ : LR_KOSTL GT_DATA-KOSTL.
918| ADD_RANGE_EQ : LR_KSTAR GT_DATA-KSTAR.
919| CONCATENATE P_GJAHR S_PERBL-LOW+1(2) '01' INTO LV_S_DATE.
920|
921| IF S_PERBL-HIGH IS NOT INITIAL.
922| CONCATENATE P_GJAHR S_PERBL-HIGH+1(2) '01' INTO LV_E_DATE.
923| ELSE.
924| LV_E_DATE = LV_S_DATE.
925| ENDIF.
926|
927| PERFORM GET_LAST_DAY USING LV_E_DATE
928| CHANGING LV_E_DATE.
929|
930| LR_BUDAT-LOW = LV_S_DATE.
931| LR_BUDAT-HIGH = LV_E_DATE.
932| LR_BUDAT-SIGN = 'I'.
933| LR_BUDAT-OPTION = 'BT'.
934| APPEND LR_BUDAT.
935|
936| SUBMIT RKAEP000 WITH KOTSL IN LR_KOSTL
937| WITH R_BUDAT IN LR_BUDAT
938| WITH P_TCODE EQ 'KSB1'
939| WITH KSTAR IN LR_KSTAR
940| WITH KOSTL IN LR_KOSTL
941| WITH GR_WRTTP IN LR_WRTTP
942| AND RETURN.
- EN: For cost center mode, build cost center, cost element and posting date ranges (first to last day of the selected periods via GET_LAST_DAY), add value type 11, and SUBMIT RKAEP000 as KSB1 (Cost Center Actual Line Items) and return.
- 호출(파서): GET_LAST_DAY, RKAEP000
- SAP 객체: RKAEP000, KSB1, GET_LAST_DAY, CSKS, COBK
- 업무 키워드: 코스트센터, 라인아이템, 전기일 범위, 드릴다운, 원가요소
- English: Cost Center, Line Item Report, KSB1, Posting Date
- 정의부(복사 시 함께 필요):
PR_CC,ADD_RANGE_EQ,LR_WRTTP,LR_KOSTL,GT_DATA,LR_KSTAR,P_GJAHR,S_PERBL,LV_S_DATE,LV_E_DATE,LR_BUDAT - 선언을 못 찾은 이름: R_BUDAT, P_TCODE, GR_WRTTP (수집 안 된 인클루드·함수 인터페이스일 수 있다)
- 위치:
abap://ZCOR0020/ZCOR0020F01#L914-L942· confidence 0.9 ·ZCOR0020#ZCOR0020F01#FORM#CALL_REPORT#C2
[fm_call] 투자오더 조회 모드에서는 오더번호 범위만 지정하고 잔액이 완전정산되지 않으므로 전기일 범위 없이 전체 기간으로 RKAEP000을 KOB1(오더 실제 라인아이템, 표시변형 /ZORDER)로 SUBMIT AND RETURN 한다.
943| ELSE.
944| ADD_RANGE_EQ : LR_AUFNR GT_DATA-AUFNR.
945|
946| " 잔액을 완전정산 하지 않으므로 전체 기간을 조회해야 한다.
947| CLEAR : LR_BUDAT.
948|
949| SUBMIT RKAEP000 WITH AUFNR IN LR_AUFNR
950| WITH R_BUDAT IN LR_BUDAT
951| WITH GR_WRTTP IN LR_WRTTP
952| WITH P_TCODE EQ 'KOB1'
953| WITH P_DISVAR = '/ZORDER' " A 상계계정을 없앤다.
954| AND RETURN.
955| ENDIF.
- EN: For internal order mode, set only the order number range and SUBMIT RKAEP000 as KOB1 (Order Actual Line Items, display variant /ZORDER) over all periods since balances are not fully settled.
- 호출(파서): RKAEP000
- SAP 객체: RKAEP000, KOB1, AUFK
- 업무 키워드: 투자오더, 라인아이템, 드릴다운, 전체 기간, 표시변형
- English: Internal Order, Line Item Report, KOB1, Display Variant
- 정의부(복사 시 함께 필요):
ADD_RANGE_EQ,LR_AUFNR,GT_DATA,LR_BUDAT,LR_WRTTP - 선언을 못 찾은 이름: R_BUDAT, GR_WRTTP, P_TCODE, P_DISVAR (수집 안 된 인클루드·함수 인터페이스일 수 있다)
- 위치:
abap://ZCOR0020/ZCOR0020F01#L943-L955· confidence 0.9 ·ZCOR0020#ZCOR0020F01#FORM#CALL_REPORT#C3
정의부 (347건)
로직 조각을 다른 프로그램으로 옮겨 붙일 때 함께 가야 하는 선언이다. 조각별로 무엇이 필요한지는 위 조각 항목의 정의부 줄에 있고(이름을 누르면 여기로 온다), 붙여넣기용으로 의존까지 묶은 코드는 GET /chunks/<chunk_id> 의 declaration_code 로 받는다.
ZCOR0020C01 (1건)
LCL_DEF_RECEIVER — class · L5-L56
CLASS LCL_DEF_RECEIVER DEFINITION.
PUBLIC SECTION.
METHODS: HANDLE_TOP_OF_PAGE
FOR EVENT TOP_OF_PAGE OF CL_GUI_ALV_GRID
IMPORTING E_DYNDOC_ID TABLE_INDEX.
METHODS : HANDLE_TOOLBAR
FOR EVENT TOOLBAR OF CL_GUI_ALV_GRID
IMPORTING SENDER
E_OBJECT
E_INTERACTIVE.
METHODS : HANDLE_USER_COMMAND
FOR EVENT USER_COMMAND OF CL_GUI_ALV_GRID
IMPORTING SENDER E_UCOMM.
METHODS : HANDLE_DATA_CHANGED
FOR EVENT DATA_CHANGED OF CL_GUI_ALV_GRID
IMPORTING SENDER ER_DATA_CHANGED.
METHODS : HANDLE_DATA_CHANGED_FINISHED
FOR EVENT DATA_CHANGED_FINISHED OF CL_GUI_ALV_GRID
IMPORTING SENDER E_MODIFIED
ET_GOOD_CELLS.
METHODS : HANDLE_HOTSPOT_CLICK
FOR EVENT HOTSPOT_CLICK OF CL_GUI_ALV_GRID
IMPORTING SENDER E_ROW_ID
E_COLUMN_ID.
METHODS : HANDLE_DOUBLE_CLICK
FOR EVENT DOUBLE_CLICK OF CL_GUI_ALV_GRID
IMPORTING SENDER
E_ROW
E_COLUMN
ES_ROW_NO.
METHODS: HANDLE_ON_F4 FOR EVENT ONF4 OF CL_GUI_ALV_GRID
IMPORTING SENDER
E_FIELDNAME
E_FIELDVALUE
ES_ROW_NO
ER_EVENT_DATA
ET_BAD_CELLS
E_DISPLAY.
METHODS : HANDLE_CONTEXT_MENU_REQ
FOR EVENT CONTEXT_MENU_REQUEST OF CL_GUI_ALV_GRID
IMPORTING E_OBJECT.
ENDCLASS. " LCL_DEF_RECEIVER
ZCOR0020TOP (50건)
IBRTT — type-pool · L1-L1
TYPE-POOLS : IBRTT, VRM, ICON.
ICON — type-pool · L1-L1
TYPE-POOLS : IBRTT, VRM, ICON.
VRM — type-pool · L1-L1
TYPE-POOLS : IBRTT, VRM, ICON.
ICON — tables · L2-L2
TABLES : ICON, SSCRFIELDS.
SSCRFIELDS — tables · L2-L2
TABLES : ICON, SSCRFIELDS.
ISELLIST — tables · L3-L3
TABLES : ISELLIST. " 선택한 달력 조회
CSKA — tables · L4-L4
TABLES : DD03L, CSKS, CSKA.
CSKS — tables · L4-L4
TABLES : DD03L, CSKS, CSKA.
DD03L — tables · L4-L4
TABLES : DD03L, CSKS, CSKA.
AUFK — tables · L5-L5
TABLES : KMAS_D, COSP, AUFK.
COSP — tables · L5-L5
TABLES : KMAS_D, COSP, AUFK.
KMAS_D — tables · L5-L5
TABLES : KMAS_D, COSP, AUFK.
GV_OK_CODE — data · L14-L14
DATA : GV_OK_CODE LIKE SY-UCOMM.
GV_T_OK_CODE — data · L15-L15
DATA : GV_T_OK_CODE LIKE SY-UCOMM.
GT_UCOMM — data · L17-L17
DATA : GT_UCOMM TYPE TABLE OF SY-UCOMM.
GV_LOCK — data · L21-L21
DATA : GV_LOCK(1) TYPE C. " Locking
GV_UPLOAD_ERROR — data · L22-L22
DATA : GV_UPLOAD_ERROR(1) TYPE C. " 업로드 오류
GV_ALREADY_POST — data · L23-L23
DATA : GV_ALREADY_POST(1) TYPE C. " 실행 여부
GV_POST_ERROR — data · L24-L24
DATA : GV_POST_ERROR(1) TYPE C. " 전기 오류
GC_MAIN_ITAB_NAME — constants · L29-L30
CONSTANTS : GC_MAIN_ITAB_NAME TYPE DD03L-TABNAME
VALUE 'GT_DATA'.
GT_MAIN_FIELDCAT — data · L36-L36
DATA : GT_MAIN_FIELDCAT TYPE LVC_T_FCAT.
GT_DATA — data · L40-L70
DATA : BEGIN OF GT_DATA OCCURS 0,
OBJNR LIKE COSP-OBJNR,
KOSTL LIKE CSKS-KOSTL,
KOSTL_T LIKE CSKT-KTEXT,
AUFNR LIKE AUFK-AUFNR,
AUFNR_T LIKE AUFK-KTEXT,
KSTAR LIKE CSKA-KSTAR,
KSTAR_T LIKE CSKU-KTEXT,
TOTAL_A LIKE COSP-WKG001,
ACTUAL LIKE COSP-WKG001,
PARK LIKE COSP-WKG001,
BG_B00 LIKE COSP-WKG001,
BG_B10 LIKE COSP-WKG001,
BG_B11 LIKE COSP-WKG001,
BG_B12 LIKE COSP-WKG001,
BG_B13 LIKE COSP-WKG001,
BG_B14 LIKE COSP-WKG001,
BG_B15 LIKE COSP-WKG001,
BG_B20 LIKE COSP-WKG001,
BG_ALL LIKE COSP-WKG001,
POSSIBLE_BG LIKE COSP-WKG001,
TWAER LIKE COSP-TWAER,
PER TYPE P DECIMALS 2,
GROUPNAME LIKE ZCOT0010-GROUPNAME,
GRP_DESCRIPT LIKE ZCOT0010-GRP_DESCRIPT,
KOSTV LIKE AUFK-KOSTV,
KOSTV_T LIKE CSKT-KTEXT,
AKSTL LIKE AUFK-AKSTL,
AKSTL_T LIKE CSKT-KTEXT,
STATUS LIKE ICON-ID,
END OF GT_DATA.
GS_DATA — data · L72-L72
DATA : GS_DATA LIKE GT_DATA.
GT_LOG_POP — data · L74-L78
DATA : BEGIN OF GT_LOG_POP OCCURS 0,
STATUS LIKE ICON-ID,
KOSTL LIKE CSKS-KOSTL,
MESSAGE LIKE BDCMSGCOLL-MSGV1,
END OF GT_LOG_POP.
W_POPUP_GRID — data · L81-L81
DATA : W_POPUP_GRID TYPE REF TO CL_RS_ALV_GRID_POPUP.
GT_COSP — data · L83-L106
DATA : BEGIN OF GT_COSP OCCURS 0 ,
OBJNR LIKE COSP-OBJNR,
GJAHR LIKE COSP-GJAHR,
KSTAR LIKE COSP-KSTAR,
BEKNZ LIKE COSP-BEKNZ,
TWAER LIKE COSP-TWAER,
VERSN LIKE COSP-VERSN,
WRTTP LIKE COSP-WRTTP,
WKG001 LIKE COSP-WKG001,
WKG002 LIKE COSP-WKG002,
WKG003 LIKE COSP-WKG003,
WKG004 LIKE COSP-WKG004,
WKG005 LIKE COSP-WKG005,
WKG006 LIKE COSP-WKG006,
WKG007 LIKE COSP-WKG007,
WKG008 LIKE COSP-WKG008,
WKG009 LIKE COSP-WKG009,
WKG010 LIKE COSP-WKG010,
WKG011 LIKE COSP-WKG011,
WKG012 LIKE COSP-WKG012,
C_TYPE TYPE C, " B: 예산, A: 실제
END OF GT_COSP.
GR_KSTAR — ranges · L108-L108
RANGES : GR_KSTAR FOR CSKA-KSTAR.
GT_KSTAR — data · L110-L113
DATA : BEGIN OF GT_KSTAR OCCURS 0,
KSTAR LIKE CSKB-KSTAR,
KTEXT LIKE CSKU-KTEXT,
END OF GT_KSTAR.
GT_ONRKS — data · L115-L115
DATA : GT_ONRKS LIKE ONRKS OCCURS 0 WITH HEADER LINE.
GT_ONROR — data · L116-L116
DATA : GT_ONROR LIKE ONROR OCCURS 0 WITH HEADER LINE.
GR_SELECT_OBJ — ranges · L118-L118
RANGES : GR_SELECT_OBJ FOR COSP-OBJNR.
GT_ZCOT0010 — data · L120-L120
DATA : GT_ZCOT0010 LIKE ZCOT0010 OCCURS 0 WITH HEADER LINE.
PR_CC — parameter · L128-L129
PARAMETER : PR_CC TYPE C RADIOBUTTON GROUP RG1 DEFAULT 'X'
USER-COMMAND UC1.
PR_IO — parameter · L131-L131
PARAMETER : PR_IO TYPE C RADIOBUTTON GROUP RG1.
P_KOKRS — parameter · L141-L142
PARAMETERS : P_KOKRS LIKE TKA01-KOKRS OBLIGATORY DEFAULT 'KR01'
MODIF ID MG1.
P_GJAHR — parameter · L147-L148
PARAMETER : P_GJAHR LIKE COSP-GJAHR DEFAULT SY-DATUM+0(4)
OBLIGATORY.
S_PERBL — select-option · L149-L151
SELECT-OPTIONS : S_PERBL FOR COSP-PERBL NO-EXTENSION OBLIGATORY
DEFAULT SY-DATUM+4(2)
MODIF ID MG2.
P_KSSET — parameter · L156-L156
PARAMETER : P_KSSET LIKE GRPDYNP-NAME_COALL MODIF ID MG2.
S_KOSTL — select-option · L157-L157
SELECT-OPTIONS : S_KOSTL FOR CSKS-KOSTL MODIF ID MG2.
P_KASET — parameter · L158-L158
PARAMETER : P_KASET LIKE GRPDYNP-NAME_COALL MODIF ID MG2.
S_KSTAR — select-option · L159-L159
SELECT-OPTIONS : S_KSTAR FOR CSKA-KSTAR MODIF ID MG2.
P_CONT — parameter · L163-L163
PARAMETER : P_CONT TYPE C AS CHECKBOX DEFAULT 'X' MODIF ID MG2.
P_B00 — parameter · L168-L168
PARAMETER : P_B00 TYPE C RADIOBUTTON GROUP RG2 MODIF ID MG2.
P_B10 — parameter · L170-L170
PARAMETER : P_B10 TYPE C RADIOBUTTON GROUP RG2 MODIF ID MG2.
P_B1X — parameter · L172-L172
PARAMETER : P_B1X TYPE C RADIOBUTTON GROUP RG2 DEFAULT 'X' MODIF ID MG2.
P_KOSET — parameter · L178-L178
PARAMETER : P_KOSET LIKE GRPDYNP-NAME_COALL MODIF ID MG3.
S_AUFNR — select-option · L179-L179
SELECT-OPTIONS : S_AUFNR FOR AUFK-AUFNR MODIF ID MG3.
P_WON1 — parameter · L184-L184
PARAMETER : P_WON1 TYPE C RADIOBUTTON GROUP RG3 .
P_WON2 — parameter · L186-L186
PARAMETER : P_WON2 TYPE C RADIOBUTTON GROUP RG3 DEFAULT 'X' .
P_WON3 — parameter · L188-L188
PARAMETER : P_WON3 TYPE C RADIOBUTTON GROUP RG3 .
ZCO_ALV (123건)
F4TYP — type-pool · L9-L9
TYPE-POOLS : SLIS, F4TYP, SDYDO.
SDYDO — type-pool · L9-L9
TYPE-POOLS : SLIS, F4TYP, SDYDO.
SLIS — type-pool · L9-L9
TYPE-POOLS : SLIS, F4TYP, SDYDO.
T_MSG — types · L11-L19
TYPES : BEGIN OF T_MSG,
MSGID TYPE SYMSGID,
MSGNO TYPE SYMSGNO,
MSGTY,
MSG1(50),
MSG2(50),
MSG3(50),
MSG4(50),
END OF T_MSG.
GS_MSG — data · L20-L20
DATA : GS_MSG TYPE T_MSG.
GT_TOP_OF_PAGE_TXT — data · L22-L26
DATA : BEGIN OF GT_TOP_OF_PAGE_TXT OCCURS 0,
TOP_TEXT TYPE SDYDO_TEXT_ELEMENT,
FONTSIZE TYPE SDYDO_ATTRIBUTE,
COLOR TYPE SDYDO_ATTRIBUTE,
END OF GT_TOP_OF_PAGE_TXT.
GC_STATUS_SET — constants · L28-L28
CONSTANTS : GC_STATUS_SET TYPE SLIS_FORMNAME VALUE 'PF_STATUS_SET'.
GC_USER_COMMAND — constants · L29-L29
CONSTANTS : GC_USER_COMMAND TYPE SLIS_FORMNAME VALUE 'USER_COMMAND'.
GC_TOP_OF_PAGE — constants · L30-L30
CONSTANTS : GC_TOP_OF_PAGE TYPE SLIS_FORMNAME VALUE 'TOP_OF_PAGE'.
GC_TOP_OF_LIST — constants · L31-L31
CONSTANTS : GC_TOP_OF_LIST TYPE SLIS_FORMNAME VALUE 'TOP_OF_LIST'.
GC_END_OF_LIST — constants · L32-L32
CONSTANTS : GC_END_OF_LIST TYPE SLIS_FORMNAME VALUE 'END_OF_LIST'.
GC_DATA_CHANGED — constants · L33-L33
CONSTANTS : GC_DATA_CHANGED TYPE SLIS_FORMNAME VALUE 'DATA_CHANGED'.
GC_HTML_TOP_OF_PAGE — constants · L34-L35
CONSTANTS : GC_HTML_TOP_OF_PAGE TYPE SLIS_FORMNAME VALUE
'HTML_TOP_OF_PAGE'.
GC_PRT_TOP_OF_PAGE — constants · L36-L37
CONSTANTS : GC_PRT_TOP_OF_PAGE TYPE SLIS_FORMNAME VALUE
'PRT_TOP_OF_PAGE'.
GV_SAVE — data · L40-L40
DATA : GV_SAVE.
GV_TABIX — data · L41-L41
DATA : GV_TABIX LIKE SY-TABIX.
GV_FLD_NAME — data · L42-L42
DATA : GV_FLD_NAME(30).
GV_EXGT_CAUSED_BY_CALLER — data · L43-L43
DATA : GV_EXGT_CAUSED_BY_CALLER.
GV_REPID — data · L44-L44
DATA : GV_REPID TYPE SY-REPID.
GV_DYNNR — data · L45-L45
DATA : GV_DYNNR TYPE SY-DYNNR.
GV_PROGRAM_NAME — data · L46-L46
DATA : GV_PROGRAM_NAME LIKE SY-REPID.
GV_INCLNAME — data · L47-L47
DATA : GV_INCLNAME LIKE TRDIR-NAME.
GV_EXTENSION — data · L48-L48
DATA : GV_EXTENSION TYPE I.
GS_LAYOUT — data · L51-L51
DATA : GS_LAYOUT TYPE SLIS_LAYOUT_ALV.
GS_EXGT_CAUSED_BY_USER — data · L52-L52
DATA:
GS_EXGT_CAUSED_BY_USER TYPE SLIS_EXIT_BY_USER.
GS_FIELDCAT — data · L53-L53
DATA:
GS_FIELDCAT TYPE SLIS_FIELDCAT_ALV.
GS_SORT — data · L54-L54
DATA:
GS_SORT TYPE SLIS_SORTINFO_ALV.
GS_KEYINFO — data · L55-L55
DATA:
GS_KEYINFO TYPE SLIS_KEYINFO_ALV.
GS_VARIANT — data · L56-L56
DATA:
GS_VARIANT TYPE DISVARIANT.
GS_SCROLL — data · L57-L57
DATA:
GS_SCROLL TYPE SLIS_LIST_SCROLL.
GS_DETAIL_FUNC — data · L58-L58
DATA:
GS_DETAIL_FUNC LIKE DD02L-TABNAME.
GS_LVC_LAYO1 — data · L60-L60
DATA : GS_LVC_LAYO1 TYPE LVC_S_LAYO. " LAYOUT\
GS_LVC_LAYO2 — data · L61-L61
DATA:
GS_LVC_LAYO2 TYPE LVC_S_LAYO.
GS_LVC_LAYO3 — data · L62-L62
DATA:
GS_LVC_LAYO3 TYPE LVC_S_LAYO.
GS_LVC_LAYO4 — data · L63-L63
DATA:
GS_LVC_LAYO4 TYPE LVC_S_LAYO.
GS_LVC_FCAT — data · L65-L65
DATA : GS_LVC_FCAT TYPE LVC_S_FCAT. " FIELDCATALOG
GS_ROW — data · L67-L67
DATA : GS_ROW LIKE LVC_S_ROW.
GS_COL — data · L68-L68
DATA:
GS_COL LIKE LVC_S_COL.
GS_STABLE — data · L69-L69
DATA : GS_STABLE TYPE LVC_S_STBL.
GT_EVENTS — data · L72-L72
DATA : GT_EVENTS TYPE SLIS_T_EVENT.
GT_LISTHEADER — data · L73-L73
DATA:
GT_LISTHEADER TYPE SLIS_T_LISTHEADER.
GT_FIELDCAT — data · L74-L74
DATA:
GT_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV.
GT_SORT — data · L75-L75
DATA:
GT_SORT TYPE SLIS_T_SORTINFO_ALV.
GT_EXIT — data · L76-L76
DATA:
GT_EXIT TYPE SLIS_EVENT_EXIT OCCURS 0.
GT_PRINT — data · L77-L77
DATA:
GT_PRINT TYPE SLIS_PRINT_ALV.
GT_UI_FUNCTIONS1 — data · L79-L79
DATA : GT_UI_FUNCTIONS1 TYPE UI_FUNCTIONS. " TOOLBAR
GT_UI_FUNCTIONS2 — data · L80-L80
DATA:
GT_UI_FUNCTIONS2 TYPE UI_FUNCTIONS.
GT_UI_FUNCTIONS3 — data · L81-L81
DATA:
GT_UI_FUNCTIONS3 TYPE UI_FUNCTIONS.
GT_UI_FUNCTIONS4 — data · L82-L82
DATA:
GT_UI_FUNCTIONS4 TYPE UI_FUNCTIONS.
GT_LVC_SORT1 — data · L84-L84
DATA : GT_LVC_SORT1 TYPE LVC_T_SORT. " SORT
GT_LVC_SORT2 — data · L85-L85
DATA:
GT_LVC_SORT2 TYPE LVC_T_SORT.
GT_LVC_SORT3 — data · L86-L86
DATA:
GT_LVC_SORT3 TYPE LVC_T_SORT.
GT_LVC_SORT4 — data · L87-L87
DATA:
GT_LVC_SORT4 TYPE LVC_T_SORT.
GT_LVC_FCAT1 — data · L89-L89
DATA : GT_LVC_FCAT1 TYPE LVC_T_FCAT. " FIELDCATALOG
GT_LVC_FCAT2 — data · L90-L90
DATA:
GT_LVC_FCAT2 TYPE LVC_T_FCAT.
GT_LVC_FCAT3 — data · L91-L91
DATA:
GT_LVC_FCAT3 TYPE LVC_T_FCAT.
GT_LVC_FCAT4 — data · L92-L92
DATA:
GT_LVC_FCAT4 TYPE LVC_T_FCAT.
GT_LVC_DROP — data · L95-L95
DATA : GT_LVC_DROP TYPE LVC_T_DROP.
GS_LVC_DROP — data · L96-L96
DATA:
GS_LVC_DROP TYPE LVC_S_DROP.
GT_ALV_COLOR — data · L99-L99
DATA : GT_ALV_COLOR TYPE LVC_T_SCOL WITH HEADER LINE.
GS_ALV_COLOR — data · L100-L100
DATA:
GS_ALV_COLOR TYPE LVC_S_COLO.
GT_ROWS — data · L103-L103
DATA : GT_ROWS TYPE LVC_T_ROW.
GS_ROWS — data · L104-L104
DATA:
GS_ROWS TYPE LVC_S_ROW.
GV_FUN — data · L105-L105
DATA:
GV_FUN(1) VALUE 'D'.
GS_F4_VALUE — data · L109-L109
DATA : GS_F4_VALUE TYPE SEAHLPRES.
GS_F4_FIELD — data · L110-L110
DATA:
GS_F4_FIELD TYPE DFIES.
GS_F4 — data · L111-L111
DATA:
GS_F4 TYPE DDSHRETVAL.
GS_LVC_MODI — data · L112-L112
DATA:
GS_LVC_MODI TYPE LVC_S_MODI.
GS_LVC_F4 — data · L113-L113
DATA:
GS_LVC_F4 TYPE LVC_S_F4.
GT_F4_VALUES — data · L116-L116
DATA : GT_F4_VALUES TYPE TABLE OF SEAHLPRES.
GT_F4_FIELDS — data · L117-L117
DATA:
GT_F4_FIELDS TYPE TABLE OF DFIES.
GT_LVC_F4 — data · L118-L118
DATA:
GT_LVC_F4 TYPE LVC_T_F4.
<FS_F4TAB> — field-symbol · L121-L121
FIELD-SYMBOLS : <FS_F4TAB> TYPE LVC_T_MODI.
GV_CONSISTENCY_CHECK — data · L123-L123
DATA : GV_CONSISTENCY_CHECK(1) TYPE C.
GV_ALV_COLPOS — data · L125-L125
DATA : GV_ALV_COLPOS TYPE I.
GC_STATUS_GREEN — constants · L128-L128
CONSTANTS : GC_STATUS_GREEN LIKE ICON-ID VALUE ICON_GREEN_LIGHT.
GC_STATUS_YELLOW — constants · L129-L129
CONSTANTS : GC_STATUS_YELLOW LIKE ICON-ID VALUE ICON_YELLOW_LIGHT.
GC_STATUS_RED — constants · L130-L130
CONSTANTS : GC_STATUS_RED LIKE ICON-ID VALUE ICON_RED_LIGHT.
GC_STATUS_INIT — constants · L131-L131
CONSTANTS : GC_STATUS_INIT LIKE ICON-ID VALUE ICON_LIGHT_OUT.
GV_TOP_OF_PAGE — data · L133-L133
DATA : GV_TOP_OF_PAGE(255) TYPE C.
GC_ALV1_CONTNAME — constants · L143-L143
CONSTANTS : GC_ALV1_CONTNAME TYPE SCRFNAME VALUE 'ALV1_CONT'.
GC_ALV2_CONTNAME — constants · L144-L144
CONSTANTS : GC_ALV2_CONTNAME TYPE SCRFNAME VALUE 'ALV2_CONT'.
GC_ALV3_CONTNAME — constants · L145-L145
CONSTANTS : GC_ALV3_CONTNAME TYPE SCRFNAME VALUE 'ALV3_CONT'.
GC_ALV4_CONTNAME — constants · L146-L146
CONSTANTS : GC_ALV4_CONTNAME TYPE SCRFNAME VALUE 'ALV4_CONT'.
GO_CONTAINER_TOP1 — data · L149-L149
DATA:
GO_CONTAINER_TOP1 TYPE REF TO CL_GUI_CONTAINER.
GO_CONTAINER_ALV1 — data · L150-L150
DATA:
GO_CONTAINER_ALV1 TYPE REF TO CL_GUI_CONTAINER.
GO_CONTAINER_TOP2 — data · L152-L152
DATA:
GO_CONTAINER_TOP2 TYPE REF TO CL_GUI_CONTAINER.
GO_CONTAINER_ALV2 — data · L153-L153
DATA:
GO_CONTAINER_ALV2 TYPE REF TO CL_GUI_CONTAINER.
GO_CONTAINER_TOP3 — data · L155-L155
DATA:
GO_CONTAINER_TOP3 TYPE REF TO CL_GUI_CONTAINER.
GO_CONTAINER_ALV3 — data · L156-L156
DATA:
GO_CONTAINER_ALV3 TYPE REF TO CL_GUI_CONTAINER.
GO_CONTAINER_TOP4 — data · L158-L158
DATA:
GO_CONTAINER_TOP4 TYPE REF TO CL_GUI_CONTAINER.
GO_CONTAINER_ALV4 — data · L159-L159
DATA:
GO_CONTAINER_ALV4 TYPE REF TO CL_GUI_CONTAINER.
GO_ALV1 — data · L161-L161
DATA:
GO_ALV1 TYPE REF TO LCL_DEF_GRID.
GO_ALV2 — data · L162-L162
DATA:
GO_ALV2 TYPE REF TO LCL_DEF_GRID.
GO_ALV3 — data · L163-L163
DATA:
GO_ALV3 TYPE REF TO LCL_DEF_GRID.
GO_ALV4 — data · L164-L164
DATA:
GO_ALV4 TYPE REF TO LCL_DEF_GRID.
GO_SPLITTER0 — data · L166-L166
DATA:
GO_SPLITTER0 TYPE REF TO CL_GUI_EASY_SPLITTER_CONTAINER.
GO_SPLITTER1 — data · L167-L167
DATA:
GO_SPLITTER1 TYPE REF TO CL_GUI_SPLITTER_CONTAINER.
GO_SPLITTER2 — data · L168-L168
DATA:
GO_SPLITTER2 TYPE REF TO CL_GUI_SPLITTER_CONTAINER.
GO_SPLITTER3 — data · L169-L169
DATA:
GO_SPLITTER3 TYPE REF TO CL_GUI_SPLITTER_CONTAINER.
GO_SPLITTER4 — data · L170-L170
DATA:
GO_SPLITTER4 TYPE REF TO CL_GUI_SPLITTER_CONTAINER.
GO_DOCKING — data · L172-L172
DATA:
GO_DOCKING TYPE REF TO CL_GUI_CONTAINER.
GO_COLUMN_TREE — data · L174-L174
DATA:
GO_COLUMN_TREE TYPE REF TO CL_GUI_COLUMN_TREE.
GO_TREE — data · L175-L175
DATA:
GO_TREE TYPE REF TO CL_GUI_ALV_TREE.
GO_TOOLBAR — data · L176-L176
DATA:
GO_TOOLBAR TYPE REF TO CL_GUI_TOOLBAR.
GO_TEXTEDIT — data · L177-L177
DATA:
GO_TEXTEDIT TYPE REF TO CL_GUI_TEXTEDIT.
GO_EVENT_RECEIVER1 — data · L179-L179
DATA:
GO_EVENT_RECEIVER1 TYPE REF TO LCL_DEF_RECEIVER.
GO_EVENT_RECEIVER2 — data · L180-L180
DATA:
GO_EVENT_RECEIVER2 TYPE REF TO LCL_DEF_RECEIVER.
GO_EVENT_RECEIVER3 — data · L181-L181
DATA:
GO_EVENT_RECEIVER3 TYPE REF TO LCL_DEF_RECEIVER.
GO_DOCKING_CONT1 — data · L183-L183
DATA : GO_DOCKING_CONT1 TYPE REF TO CL_GUI_DOCKING_CONTAINER.
GO_DOCKING_CONT2 — data · L184-L184
DATA : GO_DOCKING_CONT2 TYPE REF TO CL_GUI_DOCKING_CONTAINER.
GO_DOCKING_CONT3 — data · L185-L185
DATA : GO_DOCKING_CONT3 TYPE REF TO CL_GUI_DOCKING_CONTAINER.
GO_DOCKING_CONT4 — data · L186-L186
DATA : GO_DOCKING_CONT4 TYPE REF TO CL_GUI_DOCKING_CONTAINER.
GO_DD_DOCUMENT1 — data · L188-L188
DATA : GO_DD_DOCUMENT1 TYPE REF TO CL_DD_DOCUMENT.
GO_DD_DOCUMENT2 — data · L189-L189
DATA : GO_DD_DOCUMENT2 TYPE REF TO CL_DD_DOCUMENT.
GO_DD_DOCUMENT3 — data · L190-L190
DATA : GO_DD_DOCUMENT3 TYPE REF TO CL_DD_DOCUMENT.
GO_DD_DOCUMENT4 — data · L191-L191
DATA : GO_DD_DOCUMENT4 TYPE REF TO CL_DD_DOCUMENT.
GO_HTML_VIEW1 — data · L193-L193
DATA : GO_HTML_VIEW1 TYPE REF TO CL_GUI_HTML_VIEWER.
GO_HTML_VIEW2 — data · L194-L194
DATA : GO_HTML_VIEW2 TYPE REF TO CL_GUI_HTML_VIEWER.
GO_HTML_VIEW3 — data · L195-L195
DATA : GO_HTML_VIEW3 TYPE REF TO CL_GUI_HTML_VIEWER.
GO_HTML_VIEW4 — data · L196-L196
DATA : GO_HTML_VIEW4 TYPE REF TO CL_GUI_HTML_VIEWER.
GO_DDIC_FCAT — data · L198-L198
DATA : GO_DDIC_FCAT TYPE LVC_T_FCAT.
LCL_DEF_GRID — class · L203-L215
CLASS LCL_DEF_GRID DEFINITION INHERITING FROM CL_GUI_ALV_GRID.
PUBLIC SECTION.
METHODS : U_SET_FIXED_ROWS,
U_SET_RESIZE_COLS,
U_SCROLL_TO_BOTTOM,
U_SET_OPTIMIZE,
U_SET_CURRENT_CELL_BASE
IMPORTING
ROW TYPE I
COL TYPE I.
ENDCLASS. "LCL_DEF_GRID DEFINITION
ZCO_COMMON (132건)
BDCMSGCOLL — tables · L4-L4
TABLES: BDCMSGCOLL. " * Collecting messages in the SAP System
ALSMEX_TABLINE — tables · L5-L5
TABLES:
ALSMEX_TABLINE. " * Rows for Table with Excel Data
TBTCO — tables · L6-L6
TABLES:
TBTCO. " * Job status overview table
RFCDOC — tables · L7-L7
TABLES:
RFCDOC.
RFCDES — tables · L8-L8
TABLES:
RFCDES.
DBCON — tables · L9-L9
TABLES:
DBCON.
STXH — tables · L10-L10
TABLES:
STXH.
GSETH — type-pool · L11-L11
TYPE-POOLS: KCDE, VRM, ICON, SCP1, GSETH, SLIS.
ICON — type-pool · L11-L11
TYPE-POOLS: KCDE, VRM, ICON, SCP1, GSETH, SLIS.
KCDE — type-pool · L11-L11
TYPE-POOLS: KCDE, VRM, ICON, SCP1, GSETH, SLIS.
SCP1 — type-pool · L11-L11
TYPE-POOLS: KCDE, VRM, ICON, SCP1, GSETH, SLIS.
SLIS — type-pool · L11-L11
TYPE-POOLS: KCDE, VRM, ICON, SCP1, GSETH, SLIS.
VRM — type-pool · L11-L11
TYPE-POOLS: KCDE, VRM, ICON, SCP1, GSETH, SLIS.
GV_CALC_I — data · L14-L14
DATA : GV_CALC_I TYPE I. "* %
GV_PROGRESS_MSG — data · L15-L15
DATA : GV_PROGRESS_MSG(100). "* Display
GV_CALC_C0 — data · L16-L16
DATA : GV_CALC_C0(5).
GV_CALC_C1 — data · L17-L17
DATA : GV_CALC_C1(5).
GV_VALUE_SET — data · L20-L20
DATA : GV_VALUE_SET TYPE GSETH_VAL_LINE.
GT_VALUE_SET — data · L21-L21
DATA : GT_VALUE_SET TYPE GSETH_VAL_TAB.
GT_DETMSG — data · L23-L23
DATA : GT_DETMSG TYPE TABLE OF SCP1_GENERAL_ERROR.
GT_HEAMSG — data · L24-L24
DATA : GT_HEAMSG TYPE TABLE OF SCP1_GENERAL_ERROR.
GS_DOMAIN — data · L27-L31
DATA : BEGIN OF GS_DOMAIN,
DOMAIN LIKE DD07T-DOMNAME,
VALUE LIKE DD07T-DOMVALUE_L,
DDTEXT LIKE DD07T-DDTEXT,
END OF GS_DOMAIN.
GT_DOMAIN — data · L32-L32
DATA : GT_DOMAIN LIKE TABLE OF GS_DOMAIN.
T_EXCEL_EXPORT — types · L35-L37
TYPES : BEGIN OF T_EXCEL_EXPORT,
EXCEL_COL TYPE STRING,
END OF T_EXCEL_EXPORT.
GT_EXCEL_EXPORT — data · L39-L39
DATA : GT_EXCEL_EXPORT TYPE T_EXCEL_EXPORT OCCURS 0 WITH HEADER LINE.
GV_DIP_MOD — data · L43-L43
DATA : GV_DIP_MOD TYPE C.
GV_REFRESH — data · L45-L45
DATA : GV_REFRESH TYPE C.
GV_BUKRS_TXT — data · L50-L50
DATA : GV_BUKRS_TXT TYPE T001-BUTXT VALUE ''.
GV_KOKRS_TXT — data · L51-L51
DATA : GV_KOKRS_TXT TYPE TKT09-TXT VALUE ''.
GV_WAERS — data · L52-L52
DATA : GV_WAERS TYPE T001-WAERS VALUE 'KRW'.
GV_KTOPL — data · L53-L53
DATA : GV_KTOPL TYPE T001-KTOPL VALUE '1000'.
GV_SPRAS — data · L54-L54
DATA : GV_SPRAS TYPE T001-SPRAS VALUE '3'. " KO
GV_LAND1 — data · L55-L55
DATA : GV_LAND1 TYPE T001-LAND1 VALUE 'KR'.
GC_BUKRS — constants · L57-L57
CONSTANTS : GC_BUKRS TYPE T001-BUKRS VALUE 'KR01'.
GC_KOKRS — constants · L58-L58
CONSTANTS : GC_KOKRS TYPE TKA02-KOKRS VALUE 'KR01'.
GV_KOKRS_BEZEI — data · L60-L60
DATA : GV_KOKRS_BEZEI LIKE TKA01-BEZEI VALUE ''.
GS_BDC_OPTION — data · L64-L64
DATA: GS_BDC_OPTION TYPE CTU_PARAMS.
GT_BDCDATA — data · L65-L65
DATA: GT_BDCDATA LIKE BDCDATA OCCURS 0 WITH HEADER LINE.
GT_MESSTAB — data · L66-L66
DATA: GT_MESSTAB LIKE BDCMSGCOLL OCCURS 0 WITH HEADER LINE.
FTPOST — data · L71-L71
DATA: FTPOST LIKE FTPOST OCCURS 0 WITH HEADER LINE.
FTTAX — data · L72-L72
DATA : FTTAX LIKE FTTAX OCCURS 0 WITH HEADER LINE.
BLNTAB — data · L73-L73
DATA : BLNTAB LIKE BLNTAB OCCURS 0 WITH HEADER LINE.
GV_FTPOST_TYPE — data · L74-L74
DATA : GV_FTPOST_TYPE TYPE C.
GV_FTPOST_CNT — data · L75-L75
DATA : GV_FTPOST_CNT TYPE I.
GV_FTPOST_WAERS — data · L76-L76
DATA : GV_FTPOST_WAERS LIKE T001-WAERS.
GT_IF_MSG — data · L78-L88
DATA : BEGIN OF GT_IF_MSG OCCURS 0,
MSGID LIKE SY-MSGID,
MSGNO LIKE SY-MSGNO,
MSGTY LIKE SY-MSGTY,
MSGV1 LIKE SY-MSGV1,
MSGV2 LIKE SY-MSGV2,
MSGV3 LIKE SY-MSGV3,
MSGV4 LIKE SY-MSGV4,
SUBRC LIKE SY-SUBRC,
MESSAGE LIKE BDCMSGCOLL-MSGV1,
END OF GT_IF_MSG.
GT_EXCP_INIT_FIELD — data · L92-L94
DATA : BEGIN OF GT_EXCP_INIT_FIELD OCCURS 0,
FNAME TYPE FNAM_____4,
END OF GT_EXCP_INIT_FIELD.
MACRO_VALUE_TO_RANGE — macro · L103-L121
DEFINE MACRO_VALUE_TO_RANGE.
CLEAR : GV_VALUE_SET.
CLEAR : &1. REFRESH : &1.
LOOP AT &2 INTO GV_VALUE_SET.
&1-LOW = GV_VALUE_SET-VFROM.
&1-SIGN = 'I'.
IF GV_VALUE_SET-VFROM NE GV_VALUE_SET-VTO.
&1-OPTION = 'BT'.
&1-HIGH = GV_VALUE_SET-VTO.
ELSE.
&1-OPTION = 'EQ'.
ENDIF.
APPEND &1.
CLEAR : &1.
ENDLOOP.
CLEAR : &2. REFRESH : &2.
END-OF-DEFINITION.
ADD_RANGE_EQ — macro · L123-L129
DEFINE ADD_RANGE_EQ.
CLEAR &1.
&1-SIGN = 'I'.
&1-OPTION = 'EQ'.
&1-LOW = &2.
APPEND &1.
END-OF-DEFINITION.
ADD_RANGE_FULL — macro · L131-L138
DEFINE ADD_RANGE_FULL.
CLEAR &1.
&1-SIGN = &2.
&1-OPTION = &3.
&1-LOW = &4.
&1-HIGH = &5.
APPEND &1.
END-OF-DEFINITION.
LT_TABLE — data · unit 로컬 · L164-L164
DATA : LT_TABLE LIKE DD02L-TABNAME OCCURS 0 WITH HEADER LINE.
LT_FIELDCAT — data · unit 로컬 · L165-L165
DATA : LT_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV.
LT_ALV_CAT — data · unit 로컬 · L166-L166
DATA : LT_ALV_CAT TYPE TABLE OF LVC_S_FCAT.
L_T001 — data · unit 로컬 · L211-L211
DATA : L_T001 LIKE T001.
LT_NODE — data · unit 로컬 · L237-L237
DATA : LT_NODE TYPE GSETH_NODE_TAB.
L_CLASS — data · unit 로컬 · L238-L238
DATA : L_CLASS TYPE SETHIER-SETCLASS.
L_SETID — data · unit 로컬 · L239-L239
DATA : L_SETID TYPE SETHIER-SETID.
LT_GRPHINFO — data · unit 로컬 · L240-L240
DATA : LT_GRPHINFO TYPE GRPHINFO OCCURS 0 WITH HEADER LINE.
LS_BDCTAB — data · unit 로컬 · L311-L311
DATA : LS_BDCTAB TYPE BDCDATA.
L_NCNT1 — data · unit 로컬 · L493-L493
DATA : L_NCNT1(5) TYPE N.
L_NCNT2 — data · unit 로컬 · L494-L494
DATA : L_NCNT2(5) TYPE N.
GR_TABLE — data · unit 로컬 · L526-L526
DATA : GR_TABLE TYPE REF TO CL_SALV_TABLE.
LT_INTERN — data · unit 로컬 · L603-L603
DATA : LT_INTERN LIKE ALSMEX_TABLINE OCCURS 0 WITH HEADER LINE.
<L_FS01> — field-symbol · unit 로컬 · L604-L604
FIELD-SYMBOLS : <L_FS01>.
<L_FS02> — field-symbol · unit 로컬 · L605-L605
FIELD-SYMBOLS:
<L_FS02> TYPE STANDARD TABLE.
<L_FS03> — field-symbol · unit 로컬 · L606-L606
FIELD-SYMBOLS:
<L_FS03>.
LT_FCAT — data · unit 로컬 · L762-L762
DATA : LT_FCAT TYPE TABLE OF LVC_S_FCAT.
LS_FCAT — data · unit 로컬 · L763-L763
DATA : LS_FCAT TYPE LVC_S_FCAT.
LF_DATA — data · unit 로컬 · L767-L767
DATA : LF_DATA TYPE REF TO DATA.
LL_DATA — data · unit 로컬 · L768-L768
DATA : LL_DATA TYPE REF TO DATA.
L_USR_ACT — data · unit 로컬 · L769-L769
DATA : L_USR_ACT TYPE I.
L_FILE_LEN — data · unit 로컬 · L770-L770
DATA : L_FILE_LEN TYPE I.
L_FNAME — data · unit 로컬 · L771-L771
DATA : L_FNAME TYPE STRING.
L_EXT_FILENAME — data · unit 로컬 · L772-L772
DATA : L_EXT_FILENAME TYPE STRING.
L_FULLPATH — data · unit 로컬 · L773-L773
DATA : L_FULLPATH TYPE STRING.
L_PATH — data · unit 로컬 · L774-L774
DATA : L_PATH TYPE STRING.
<FS_TABLE> — field-symbol · unit 로컬 · L776-L776
FIELD-SYMBOLS : <FS_TABLE> TYPE STANDARD TABLE.
<FS_LINE> — field-symbol · unit 로컬 · L777-L777
FIELD-SYMBOLS : <FS_LINE> TYPE ANY.
<FS_COL> — field-symbol · unit 로컬 · L778-L778
FIELD-SYMBOLS : <FS_COL> TYPE ANY.
LV_AMT — data · unit 로컬 · L933-L933
DATA : LV_AMT(20) TYPE C.
LV_EXT — data · unit 로컬 · L934-L934
DATA : LV_EXT TYPE BAPICURR-BAPICURR.
L_RESULT — data · unit 로컬 · L1106-L1106
DATA : L_RESULT TYPE ABAP_BOOL.
L_FILENM — data · unit 로컬 · L1107-L1107
DATA : L_FILENM TYPE STRING.
L_INTERNAL — data · unit 로컬 · L1147-L1147
DATA: L_INTERNAL TYPE BAPICURR-BAPICURR.
LV_NRRANG — data · unit 로컬 · L1176-L1176
DATA:
LV_NRRANG LIKE INRDP-NRRANGENR.
LV_OBJECT — data · unit 로컬 · L1177-L1177
DATA:
LV_OBJECT LIKE NRIV-OBJECT.
LV_NRRANG — data · unit 로컬 · L1219-L1219
DATA:
LV_NRRANG LIKE INRDP-NRRANGENR.
LV_OBJECT — data · unit 로컬 · L1220-L1220
DATA:
LV_OBJECT LIKE NRIV-OBJECT.
LV_YEAR — data · unit 로컬 · L1221-L1221
DATA:
LV_YEAR LIKE INRI-TOYEAR.
USER_ACTION — data · unit 로컬 · L1371-L1371
DATA:
USER_ACTION TYPE I.
RTN_CODE — data · unit 로컬 · L1372-L1372
DATA:
RTN_CODE LIKE SY-SUBRC.
LT_FILETABLE — data · unit 로컬 · L1373-L1373
DATA:
LT_FILETABLE TYPE FILETABLE.
LS_FILETABLE — data · unit 로컬 · L1374-L1374
DATA:
LS_FILETABLE TYPE FILE_TABLE.
LV_RESULT — data · unit 로컬 · L1410-L1410
DATA: LV_RESULT TYPE CHAR1.
LV_FILE — data · unit 로컬 · L1411-L1411
DATA:
LV_FILE TYPE STRING.
LT_DYNPFIELDS — data · unit 로컬 · L1622-L1622
DATA : LT_DYNPFIELDS TYPE TABLE OF DYNPREAD.
LS_DYNPFIELDS — data · unit 로컬 · L1623-L1623
DATA:
LS_DYNPFIELDS TYPE DYNPREAD.
LV_DYNAME — data · unit 로컬 · L1624-L1624
DATA:
LV_DYNAME TYPE SY-REPID.
LV_DYNUM — data · unit 로컬 · L1625-L1625
DATA:
LV_DYNUM TYPE SY-DYNNR.
<FS_FIELD> — field-symbol · unit 로컬 · L1627-L1627
FIELD-SYMBOLS <FS_FIELD> TYPE ANY.
LT_DYNPFIELDS — data · unit 로컬 · L1680-L1680
DATA : LT_DYNPFIELDS TYPE TABLE OF DYNPREAD.
LS_DYNPFIELDS — data · unit 로컬 · L1681-L1681
DATA:
LS_DYNPFIELDS TYPE DYNPREAD.
LV_DYNAME — data · unit 로컬 · L1682-L1682
DATA:
LV_DYNAME TYPE SY-REPID.
LV_DYNUM — data · unit 로컬 · L1683-L1683
DATA:
LV_DYNUM TYPE SY-DYNNR.
<FS_FIELD> — field-symbol · unit 로컬 · L1685-L1685
FIELD-SYMBOLS <FS_FIELD> TYPE ANY.
LV_TRANSFER_BIN — data · unit 로컬 · L1779-L1779
DATA : LV_TRANSFER_BIN TYPE SX_BOOLEAN.
LT_CONTENT_TXT — data · unit 로컬 · L1780-L1780
DATA:
LT_CONTENT_TXT TYPE SOLI_TAB.
LT_CONTENT_BIN — data · unit 로컬 · L1781-L1781
DATA:
LT_CONTENT_BIN TYPE SOLIX_TAB.
LT_OBJHEAD — data · unit 로컬 · L1782-L1782
DATA:
LT_OBJHEAD TYPE SOLI_TAB.
LV_LEN_IN — data · unit 로컬 · L1783-L1783
DATA:
LV_LEN_IN LIKE SOOD-OBJLEN.
LS_OTF — data · unit 로컬 · L1784-L1784
DATA:
LS_OTF TYPE SOLISTI1.
LV_BIN_FILESIZE — data · unit 로컬 · L1785-L1785
DATA:
LV_BIN_FILESIZE TYPE I.
LV_BIN_FILE — data · unit 로컬 · L1786-L1786
DATA:
LV_BIN_FILE TYPE XSTRING.
LT_LINES — data · unit 로컬 · L1787-L1787
DATA:
LT_LINES LIKE TLINE OCCURS 0 WITH HEADER LINE.
LV_FILESIZE — data · unit 로컬 · L1788-L1788
DATA : LV_FILESIZE TYPE I.
LV_FILENAME — data · unit 로컬 · L1789-L1789
DATA:
LV_FILENAME TYPE STRING.
LT_OTF — data · unit 로컬 · L1790-L1790
DATA : LT_OTF TYPE TABLE OF ITCOO WITH HEADER LINE.
LV_FILENAME — data · unit 로컬 · L1855-L1855
DATA:
LV_FILENAME TYPE STRING.
LV_PATH — data · unit 로컬 · L1856-L1856
DATA:
LV_PATH TYPE STRING.
LV_FULLPATH — data · unit 로컬 · L1857-L1857
DATA:
LV_FULLPATH TYPE STRING.
LV_DEFAULT_EXTENSION — data · unit 로컬 · L1858-L1858
DATA:
LV_DEFAULT_EXTENSION TYPE STRING.
LV_FILE_FILTER — data · unit 로컬 · L1859-L1859
DATA:
LV_FILE_FILTER TYPE STRING.
LV_INITIAL_DIRECTORY — data · unit 로컬 · L1860-L1860
DATA:
LV_INITIAL_DIRECTORY TYPE STRING.
LV_DEFAULT_FILE_NAME — data · unit 로컬 · L1861-L1861
DATA:
LV_DEFAULT_FILE_NAME TYPE STRING.
LV_USER_ACTION — data · unit 로컬 · L1864-L1864
DATA:
LV_USER_ACTION TYPE I.
— field-symbol · unit 로컬 · L1920-L1920
FIELD-SYMBOLS : <FIELD> TYPE ANY.
— field-symbol · unit 로컬 · L1921-L1921
FIELD-SYMBOLS : <ITAB> TYPE STANDARD TABLE.
— field-symbol · unit 로컬 · L1922-L1922
FIELD-SYMBOLS : <ILINE> TYPE ANY.
LV_CURR — data · unit 로컬 · L2002-L2002
DATA : LV_CURR(15) TYPE C.
LT_INTERN — data · unit 로컬 · L2198-L2198
DATA : LT_INTERN TYPE ALSMEX_TABLINE OCCURS 0 WITH HEADER LINE.
LV_INDEX — data · unit 로컬 · L2200-L2200
DATA : LV_INDEX TYPE I.
<FS_LINE> — field-symbol · unit 로컬 · L2201-L2201
FIELD-SYMBOLS : <FS_LINE>.
ZCOR0020F01 (41건)
LT_CSKA — data · unit 로컬 · L138-L141
DATA : BEGIN OF LT_CSKA OCCURS 0,
KSTAR LIKE CSKA-KSTAR,
KTEXT LIKE CSKU-KTEXT,
END OF LT_CSKA.
LT_RETURN — data · unit 로컬 · L143-L143
DATA : LT_RETURN TYPE DDSHRETVAL OCCURS 0 WITH HEADER LINE.
LT_FIELDTAB — data · unit 로컬 · L144-L144
DATA : LT_FIELDTAB TYPE DFIES OCCURS 0 WITH HEADER LINE.
LV_FIELDNAME — data · unit 로컬 · L170-L170
DATA : LV_FIELDNAME TYPE RGSBS-FIELD.
LV_CLASS — data · unit 로컬 · L171-L171
DATA : LV_CLASS TYPE RGSBS-CLASS.
LR_KSTAR — ranges · unit 로컬 · L200-L200
RANGES : LR_KSTAR FOR CSKA-KSTAR.
LT_ZCOT0010 — data · unit 로컬 · L201-L201
DATA : LT_ZCOT0010 LIKE ZCOT0010 OCCURS 0 WITH HEADER LINE.
LR_KOSTL — ranges · unit 로컬 · L270-L270
RANGES : LR_KOSTL FOR CSKS-KOSTL.
LR_WRTTP — ranges · unit 로컬 · L361-L361
RANGES : LR_WRTTP FOR COSP-WRTTP.
LR_VERSN — ranges · unit 로컬 · L362-L362
RANGES : LR_VERSN FOR COSP-VERSN.
LS_COSP — data · unit 로컬 · L363-L363
DATA : LS_COSP LIKE GT_COSP.
LV_START — data · unit 로컬 · L445-L445
DATA : LV_START LIKE COSP-PERBL.
LV_END — data · unit 로컬 · L446-L446
DATA : LV_END LIKE COSP-PERBL.
LV_DOCNT — data · unit 로컬 · L447-L447
DATA : LV_DOCNT TYPE I.
<FS_FIELD> — field-symbol · unit 로컬 · L448-L448
FIELD-SYMBOLS : <FS_FIELD> TYPE ANY.
LV_FIELD — data · unit 로컬 · L449-L449
DATA : LV_FIELD(30) TYPE C.
LV_NC — data · unit 로컬 · L450-L450
DATA : LV_NC(3) TYPE N.
<FS_FIELD> — field-symbol · unit 로컬 · L508-L508
FIELD-SYMBOLS : <FS_FIELD> TYPE ANY.
LV_FIELD — data · unit 로컬 · L509-L509
DATA : LV_FIELD(30) TYPE C.
<FS_DATA> — field-symbol · unit 로컬 · L547-L547
FIELD-SYMBOLS : <FS_DATA> LIKE GT_DATA.
LV_PV — data · unit 로컬 · L548-L548
DATA : LV_PV TYPE P DECIMALS 4.
LT_CSKT — data · unit 로컬 · L551-L554
DATA : BEGIN OF LT_CSKT OCCURS 0,
KOSTL LIKE CSKS-KOSTL,
KTEXT LIKE CSKT-KTEXT,
END OF LT_CSKT.
LT_CSKU — data · unit 로컬 · L556-L559
DATA : BEGIN OF LT_CSKU OCCURS 0,
KSTAR LIKE CSKU-KSTAR,
KTEXT LIKE CSKU-KTEXT,
END OF LT_CSKU.
LS_CSKT — data · unit 로컬 · L561-L561
DATA : LS_CSKT LIKE LINE OF LT_CSKT.
LS_CSKU — data · unit 로컬 · L562-L562
DATA : LS_CSKU LIKE LINE OF LT_CSKU.
LS_FIELDCAT — data · unit 로컬 · L719-L719
DATA : LS_FIELDCAT TYPE LVC_S_FCAT.
— field-symbol · unit 로컬 · L720-L720
FIELD-SYMBOLS : <FS> TYPE ANY.
LV_FIELD — data · unit 로컬 · L721-L721
DATA : LV_FIELD(30) TYPE C.
LV_DIVIDE — data · unit 로컬 · L722-L722
DATA : LV_DIVIDE TYPE I.
LT_AUFK — data · unit 로컬 · L776-L780
DATA : BEGIN OF LT_AUFK OCCURS 0,
AUFNR LIKE AUFK-AUFNR,
AUART LIKE AUFK-AUART,
KTEXT LIKE AUFK-KTEXT,
END OF LT_AUFK.
LT_RETURN — data · unit 로컬 · L782-L782
DATA : LT_RETURN TYPE DDSHRETVAL OCCURS 0 WITH HEADER LINE.
LT_FIELDTAB — data · unit 로컬 · L783-L783
DATA : LT_FIELDTAB TYPE DFIES OCCURS 0 WITH HEADER LINE.
LR_AUFNR — ranges · unit 로컬 · L803-L803
RANGES : LR_AUFNR FOR AUFK-AUFNR.
LS_COSP — data · unit 로컬 · L854-L854
DATA : LS_COSP LIKE GT_COSP.
LV_S_DATE — data · unit 로컬 · L887-L887
DATA : LV_S_DATE LIKE SY-DATUM.
LV_E_DATE — data · unit 로컬 · L888-L888
DATA : LV_E_DATE LIKE SY-DATUM.
LR_WRTTP — ranges · unit 로컬 · L890-L890
RANGES : LR_WRTTP FOR COEP-WRTTP.
LR_KOSTL — ranges · unit 로컬 · L891-L891
RANGES : LR_KOSTL FOR CSKS-KOSTL.
LR_BUDAT — ranges · unit 로컬 · L892-L892
RANGES : LR_BUDAT FOR COBK-BUDAT.
LR_KSTAR — ranges · unit 로컬 · L893-L893
RANGES : LR_KSTAR FOR CSKA-KSTAR.
LR_AUFNR — ranges · unit 로컬 · L894-L894
RANGES : LR_AUFNR FOR AUFK-AUFNR.
Unit 목록 (컨테이너)
| unit | 유형 | 위치 | 조각 | 한 줄 요약 |
|---|---|---|---|---|
| INITIALIZATION | EVENT | ZCOR0020 L26-31 | 0 | INITIALIZATION 이벤트에서 선택화면 초기 설정 루틴 SET_DYNP를 호출한다. |
| AT SELECTION-SCREEN | EVENT | ZCOR0020 L32-33 | 0 | AT SELECTION-SCREEN 이벤트 선언만 있고 처리 로직이 없는 빈 이벤트 블록이다. |
| AT SELECTION-SCREEN OUTPUT | EVENT | ZCOR0020 L34-42 | 0 | AT SELECTION-SCREEN OUTPUT에서 화면 필드 제어(LOOP_AT_SCREEN)와 신호등 범례 아이콘 설정(SET_SCREEN_ICON)을 호출하는 PBO 이벤트다. |
| AT SELECTION-SCREEN ON VALUE-REQUEST | EVENT | ZCOR0020 L43-45 | 0 | 원가요소 범위 하한(S_KSTAR-LOW)의 F4 검색도움으로 F4_KSTAR를 호출하는 이벤트다. |
| AT SELECTION-SCREEN ON VALUE-REQUEST | EVENT | ZCOR0020 L46-48 | 0 | 원가요소 범위 상한(S_KSTAR-HIGH)의 F4 검색도움으로 F4_KSTAR를 호출하는 이벤트다. |
| AT SELECTION-SCREEN ON VALUE-REQUEST | EVENT | ZCOR0020 L49-51 | 0 | 코스트센터 그룹(P_KSSET) 입력 필드의 F4 검색도움으로 F4_GRP(SET CLASS 0101, KOSTL)를 호출하는 이벤트다. |
| AT SELECTION-SCREEN ON VALUE-REQUEST | EVENT | ZCOR0020 L52-54 | 0 | 원가요소 그룹(P_KASET) 입력 필드의 F4 검색도움으로 F4_GRP(SET CLASS 0102, KSTAR)를 호출하는 이벤트다. |
| AT SELECTION-SCREEN ON VALUE-REQUEST | EVENT | ZCOR0020 L55-57 | 0 | 투자오더 범위 하한(S_AUFNR-LOW)의 F4 검색도움으로 F4_AUFNR을 호출하는 이벤트다. |
| AT SELECTION-SCREEN ON VALUE-REQUEST | EVENT | ZCOR0020 L58-60 | 0 | 투자오더 범위 상한(S_AUFNR-HIGH)의 F4 검색도움으로 F4_AUFNR을 호출하는 이벤트다. |
| AT SELECTION-SCREEN ON VALUE-REQUEST | EVENT | ZCOR0020 L61-70 | 0 | 투자오더 그룹(P_KOSET) 입력 필드의 F4 검색도움으로 F4_GRP(SET CLASS 0103, AUFNR)를 호출하는 이벤트다. |
| START-OF-SELECTION | EVENT | ZCOR0020 L71-77 | 0 | START-OF-SELECTION에서 초기화(INITIALIZE_DATA)와 데이터 처리(PROCESS_DATA) 서브루틴을 호출하는 진입 이벤트다. |
| END-OF-SELECTION | EVENT | ZCOR0020 L78-89 | 1 | 온라인 실행 시 검증된 업로드 데이터(GT_DATA)가 있으면 화면 100(ALV)을 호출하고 없으면 메시지를 내는 END-OF-SELECTION 이벤트이다. |
| LCL_DEF_RECEIVER~HANDLE_TOP_OF_PAGE | METHOD | ZCOR0020C01 L63-65 | 0 | |
| LCL_DEF_RECEIVER~HANDLE_TOOLBAR | METHOD | ZCOR0020C01 L67-71 | 0 | |
| LCL_DEF_RECEIVER~HANDLE_USER_COMMAND | METHOD | ZCOR0020C01 L73-77 | 0 | |
| LCL_DEF_RECEIVER~HANDLE_DATA_CHANGED | METHOD | ZCOR0020C01 L79-83 | 0 | |
| LCL_DEF_RECEIVER~HANDLE_DATA_CHANGED_FINISHED | METHOD | ZCOR0020C01 L85-89 | 0 | |
| LCL_DEF_RECEIVER~HANDLE_HOTSPOT_CLICK | METHOD | ZCOR0020C01 L91-95 | 0 | |
| LCL_DEF_RECEIVER~HANDLE_DOUBLE_CLICK | METHOD | ZCOR0020C01 L97-101 | 0 | |
| LCL_DEF_RECEIVER~HANDLE_ON_F4 | METHOD | ZCOR0020C01 L103-111 | 0 | |
| LCL_DEF_RECEIVER~HANDLE_CONTEXT_MENU_REQ | METHOD | ZCOR0020C01 L113-115 | 0 | |
| TOOBAR_PART | FORM | ZCOR0020C01 L123-127 | 0 | |
| USER_COMMAND_PART | FORM | ZCOR0020C01 L135-141 | 0 | |
| DATA_CHANGED | FORM | ZCOR0020C01 L149-151 | 0 | |
| F_OUT_MESSAGE_PROC | FORM | ZCOR0020C01 L160-176 | 0 | |
| DATA_CHANGED_FINISHED | FORM | ZCOR0020C01 L185-188 | 0 | |
| HOTSPOT_CLICK | FORM | ZCOR0020C01 L197-200 | 0 | |
| DOUBLE_CLICK | FORM | ZCOR0020C01 L210-216 | 0 | |
| ON_F4 | FORM | ZCOR0020C01 L230-246 | 0 | |
| ON_F4_100 | FORM | ZCOR0020C01 L260-278 | 0 | |
| DISPLAY_ALV_LIST | FORM | ZCOR0020C01 L288-358 | 0 | |
| SET_FCAT_DDIC_X01 | FORM | ZCOR0020C01 L368-433 | 0 | |
| FILL_FIELD_CATALOGS | FORM | ZCOR0020C01 L445-463 | 0 | |
| FILL_FCAT | FORM | ZCOR0020C01 L477-558 | 0 | |
| GET_LIKEITAB_FACT | FORM | ZCOR0020C01 L569-619 | 0 | |
| SET_TOP_OF_PAGE | FORM | ZCOR0020C01 L631-689 | 0 | |
| SET_TOP_OF_PAGE_TEXT | FORM | ZCOR0020C01 L699-709 | 0 | |
| LOOP_AT_SCREEN | FORM | ZCOR0020F01 L6-27 | 0 | 코스트센터/투자오더 라디오버튼에 따라 선택화면 입력 블록(MG2/MG3)을 숨기고 MG1 그룹 필드를 입력 불가로 만드는 LOOP AT SCREEN 화면 제어 루틴이다. |
| SET_SCREEN_ICON | FORM | ZCOR0020F01 L36-45 | 0 | 선택화면에 예산 가용율 신호등 범례(빨강 10% 이하, 노랑 50% 이하, 초록 50% 초과, 소등 통제 없음) 아이콘과 텍스트를 표시하는 화면 꾸밈 루틴이다. |
| SET_DYNP | FORM | ZCOR0020F01 L51-69 | 0 | INITIALIZATION 시 SET_KOKRS_BASE로 관리회계영역 기본정보를 읽어 선택화면에 관리회계영역 명칭(P_BEZEI)을 표시하는 초기 설정 루틴이다(개발계 기본값 설정은 주석 처리됨). |
| INITIALIZE_DATA | FORM | ZCOR0020F01 L75-107 | 1 | 관리회계영역 기본정보와 ALV 필드카탈로그를 준비하고 전역 변수를 초기화한 뒤 입력 검증과 코스트센터/원가요소 또는 투자오더 조회 대상 결정, 예산통제 그룹 마스터 조회를 호출한다. |
| PROCESS_DATA | FORM | ZCOR0020F01 L113-128 | 1 | 코스트센터 모드는 COSP 계획값, 투자오더 모드는 BPEJ 예산을 읽고 COSP 실적을 조회한 뒤 집계·가공·단위환산 서브루틴을 순서대로 호출하는 메인 처리 흐름이다. |
| F4_KSTAR | FORM | ZCOR0020F01 L137-160 | 1 | 관리회계영역의 유효한 원가요소(50000000~69999999)를 CSKB/CSKU에서 조회해 F4 검색도움 목록으로 제공한다. |
| F4_GRP | FORM | ZCOR0020F01 L168-190 | 1 | K_GROUP_SELECT를 호출해 코스트센터 그룹(0101) 또는 원가요소 그룹(0102) 세트를 선택하는 F4 검색도움을 제공한다. |
| DETERMINE_KSTAR | FORM | ZCOR0020F01 L199-260 | 4 | 선택화면의 원가요소 또는 원가요소 그룹(SET CLASS 0102)을 전개해 CSKB/CSKU에서 유효한 원가요소(0050000000~0069999999)를 구하고, 예산통제 대상 옵션이면 ZCOT0010 등록 원가요소만 남겨 조회 범위 GR_KSTAR를 만든다. |
| DETERMINE_KOSTL | FORM | ZCOR0020F01 L269-307 | 2 | 선택화면의 코스트센터 또는 코스트센터 그룹(SET CLASS 0101)을 전개해 ONRKS에서 코스트센터의 OBJNR을 구하고 조회 대상 범위 GR_SELECT_OBJ를 결정한다. |
| CHECK_INPUT | FORM | ZCOR0020F01 L316-351 | 1 | 코스트센터 모드는 코스트센터 그룹/코스트센터 및 원가요소 그룹/원가요소, 투자오더 모드는 오더 그룹/오더가 둘 다 입력되거나 둘 다 비어 있으면 오류 메시지로 실행을 중단하는 선택화면 입력 검증이다. |
| SELECT_COSP | FORM | ZCOR0020F01 L359-435 | 2 | 구분(B: 예산 계획값, A: 실적/약정/임시)에 따라 값유형·버전 범위를 정해 COSP에서 오브젝트·원가요소별 월별 금액을 합산 조회하고 GT_COSP에 구분을 표시한다. |
| COLLECT_DATA | FORM | ZCOR0020F01 L444-498 | 2 | COSP/BPEJ에서 읽은 월별 금액(WKG001~012)을 선택 기간 범위만큼 순회하며 오브젝트·원가요소별로 예산/실적 필드에 배분하고 COLLECT로 GT_DATA에 집계한다. |
| DISTIBUTE_FIELD | FORM | ZCOR0020F01 L507-537 | 1 | GT_COSP 한 행의 월별 금액을 구분(C_TYPE)과 버전/값유형에 따라 GT_DATA의 예산 버전 필드(BG_B00~BG_B20) 또는 실적(ACTUAL)/임시(PARK) 필드에 동적으로 배분한다. |
| EDIT_DATA | FORM | ZCOR0020F01 L546-709 | 7 | 집계된 GT_DATA에 코스트센터/원가요소/오더 명칭을 붙이고 총예산(BG_ALL)·총실적·가용예산·가용율을 계산해 신호등 상태와 예산통제 그룹을 부여한 뒤 금액이 모두 0인 행을 제거한다. |
| CONVERT_CURR | FORM | ZCOR0020F01 L718-749 | 1 | 선택화면의 금액 단위 옵션(원/천원/백만원)에 따라 GT_DATA의 모든 통화(CURR) 필드를 1000 또는 1000000으로 나누어 표시 단위를 환산한다. |
| GET_MASTER_ZCOT0010 | FORM | ZCOR0020F01 L758-767 | 1 | 관리회계영역별 원가요소-예산통제 그룹 매핑 마스터 ZCOT0010을 전체 조회해 GT_ZCOT0010에 담고 원가요소로 정렬한다. |
| F4_AUFNR | FORM | ZCOR0020F01 L775-793 | 1 | 오더유형이 I로 시작하는 투자오더 목록을 AUFK에서 읽어 F4IF_INT_TABLE_VALUE_REQUEST로 오더번호 검색도움을 제공한다. |
| DETERMINE_AUFNR | FORM | ZCOR0020F01 L802-843 | 2 | 선택화면의 투자오더 또는 오더 그룹(SET CLASS 0103)을 전개해 ONROR/AUFK에서 오더유형 I·S로 시작하는 오더의 OBJNR을 구해 조회 대상(GR_SELECT_OBJ)을 결정한다. |
| SELECT_BPEJ | FORM | ZCOR0020F01 L852-878 | 1 | 투자오더의 연간 예산(BPEJ, 값유형 41, 편성/증액/삭감)을 오브젝트별로 합산해 GT_COSP에 예산(C_TYPE B, 버전 B00)으로 추가한다. |
| CALL_REPORT | FORM | ZCOR0020F01 L886-957 | 3 | ALV에서 실적(ACTUAL)/임시(PARK) 금액 셀을 더블클릭했을 때 해당 코스트센터 또는 투자오더의 CO 라인아이템 리포트(RKAEP000, KSB1/KOB1)로 드릴다운한다. |
| USER_COMMAND_0100 INPUT | MODULE | ZCOR0020I01 L6-28 | 0 | 화면 100의 PAI에서 BACK/CANC/EXIT 기능코드를 받아 ALV 컨테이너를 해제하고 프로그램 또는 화면을 빠져나가는 단순 종료 처리 모듈이다. |
| STATUS_0100 OUTPUT | MODULE | ZCOR0020O01 L6-11 | 0 | |
| CREATE_AND_INIT_CONTROLS_0100 OUTPUT | MODULE | ZCOR0020O01 L17-60 | 0 | |
| CREATE_CUSTOM_OBJECT_0100 | FORM | ZCOR0020O01 L70-114 | 0 | |
| SET_ALV_LAYOUT_0100 | FORM | ZCOR0020O01 L122-127 | 0 | |
| SET_ALV_LAYOUT_POP | FORM | ZCOR0020O01 L135-139 | 0 | |
| SET_ALV_TOOLBAR_0100 | FORM | ZCOR0020O01 L147-169 | 0 | |
| SET_ALV_EVENT_REGISTER_0100 | FORM | ZCOR0020O01 L178-206 | 0 | |
| SET_TOP_OF_PAGE_TEXT_0100 | FORM | ZCOR0020O01 L279-339 | 0 | |
| SET_FCAT_LIKETAB_0100 | FORM | ZCOR0020O01 L349-524 | 0 | |
| SET_ALV_SORT_0100 | FORM | ZCOR0020O01 L532-569 | 0 | |
| LCL_DEF_GRID~U_SET_FIXED_ROWS | METHOD | ZCO_ALV L222-226 | 0 | |
| LCL_DEF_GRID~U_SET_RESIZE_COLS | METHOD | ZCO_ALV L228-232 | 0 | |
| LCL_DEF_GRID~U_SCROLL_TO_BOTTOM | METHOD | ZCO_ALV L234-236 | 0 | |
| LCL_DEF_GRID~U_SET_CURRENT_CELL_BASE | METHOD | ZCO_ALV L238-243 | 0 | |
| LCL_DEF_GRID~U_SET_OPTIMIZE | METHOD | ZCO_ALV L245-249 | 0 | |
| CLEAR_CONTAINER_PROC | FORM | ZCO_ALV L263-311 | 0 | |
| UCOMM_PROC | FORM | ZCO_ALV L320-343 | 0 | |
| GET_SELECTED_ROW | FORM | ZCO_ALV L352-361 | 0 | |
| GET_SELECTED_ROW2 | FORM | ZCO_ALV L370-398 | 0 | |
| REFRESH_CONTAINER | FORM | ZCO_ALV L407-437 | 0 | |
| APPEND_EXCLUDE_FUNCTIONS | FORM | ZCO_ALV L446-454 | 0 | |
| REGISTER_ALV_EVENT | FORM | ZCO_ALV L463-466 | 0 | |
| CHECK_SORT_PARAMETER | FORM | ZCO_ALV L473-494 | 0 | |
| ADD_EXCP_FIELD_WHEN_INITIAL | FORM | ZCO_COMMON L146-151 | 0 | |
| GET_FCAT_LIKE_ITAB | FORM | ZCO_COMMON L160-201 | 1 | 프로그램 내부테이블 이름으로 REUSE_ALV_FIELDCATALOG_MERGE→LVC 변환→LVC_FIELDCAT_COMPLETE를 거쳐 LVC 필드카탈로그를 생성하는 공통 FORM이다. |
| SET_COMPANY_BASE | FORM | ZCO_COMMON L210-227 | 1 | 회사코드로 T001을 읽어 통화·계정과목표·언어·회사명·국가 전역변수를 설정하는 공통 FORM이다. |
| GET_SETLEAF_VALUES | FORM | ZCO_COMMON L233-297 | 1 | 세트 클래스(코스트센터 그룹/원가요소 그룹 등)와 세트명으로 SETID를 구성해 K_HIERARCHY_TABLES_READ로 세트의 값 목록을 GT_VALUE_SET에 읽어오는 공통 FORM이다. |
| DYNPRO | FORM | ZCO_COMMON L309-335 | 1 | BDCDATA 한 줄(화면 시작 또는 필드/값)을 생성해 BDC 테이블에 추가하되, 예외 등록 필드가 초기값이면 건너뛰는 공통 FORM이다. |
| SET_BDC_OPTION | FORM | ZCO_COMMON L349-366 | 0 | |
| ZERO_O | FORM | ZCO_COMMON L375-381 | 0 | |
| ZERO_I | FORM | ZCO_COMMON L390-396 | 0 | |
| F4_DATE_FORMAT_YYYYMM | FORM | ZCO_COMMON L405-421 | 0 | |
| F4_DATE_FORMAT_YYYYMMDD | FORM | ZCO_COMMON L430-436 | 0 | |
| DATE_CHK | FORM | ZCO_COMMON L446-455 | 1 | DATE_CHECK_PLAUSIBILITY로 날짜의 유효성을 검사해 결과 코드를 돌려주는 공통 FORM이다. |
| BAR_MSG | FORM | ZCO_COMMON L465-470 | 0 | |
| BAR_MSG_PER | FORM | ZCO_COMMON L492-516 | 1 | 처리 건수 비율(%)을 계산해 SAPGUI_PROGRESS_INDICATOR로 진행률 메시지를 표시하는 공통 FORM이다. |
| DISPLAY_SPOOL_BY_SALV | FORM | ZCO_COMMON L525-535 | 1 | CL_SALV_TABLE=>FACTORY로 전달받은 내부테이블을 SALV(ALV) 리스트로 표시하는 공통 FORM(배치 스풀 출력용)이다. |
| SET_MINUS_FRONT | FORM | ZCO_COMMON L544-550 | 0 | |
| F4_FNAME | FORM | ZCO_COMMON L558-581 | 0 | |
| UPLOAD_DATA | FORM | ZCO_COMMON L595-652 | 2 | 엑셀 파일을 ALSM_EXCEL_TO_INTERNAL_TABLE로 읽어 동적으로 지정된 내부테이블·구조체에 행/열 단위로 적재하는 공통 업로드 FORM이다. |
| BDC_DATE | FORM | ZCO_COMMON L661-667 | 0 | |
| BDC_CURR | FORM | ZCO_COMMON L676-680 | 0 | |
| BDC_CHECKBOX | FORM | ZCO_COMMON L689-691 | 0 | |
| BUILD_MESSAGE | FORM | ZCO_COMMON L701-722 | 1 | BDC 메시지(BDCMSGCOLL)를 MESSAGE_TEXT_BUILD로 텍스트화하고 '&' 치환문자를 제거하는 공통 FORM이다. |
| BUILD_MESSAGE_BAPI | FORM | ZCO_COMMON L732-753 | 1 | BAPIRET2 메시지를 MESSAGE_TEXT_BUILD로 텍스트화하고 '&' 치환문자를 제거하는 공통 FORM이다. |
| EXCEL_FORM_DOWNLOAD | FORM | ZCO_COMMON L760-890 | 2 | 엑셀 컬럼 제목 목록으로 동적 테이블을 만들어 헤더 1행만 담은 업로드 양식(xls)을 저장 대화상자를 통해 PC에 다운로드하는 공통 FORM이다. |
| CONVERT_CURRENCY | FORM | ZCO_COMMON L903-922 | 1 | 전기일 환율로 외화 금액을 현지통화 금액으로 CONVERT_TO_LOCAL_CURRENCY를 이용해 환산하는 공통 FORM이다. |
| CONVERT_CHAR_TO_AMT | FORM | ZCO_COMMON L932-959 | 1 | 콤마가 포함된 문자형 금액을 콤마 제거 후 BAPI_CURRENCY_CONV_TO_INTERNAL로 통화 내부 금액으로 변환하는 공통 FORM이다. |
| F4IF_INT_TABLE_VALUE_REQUEST | FORM | ZCO_COMMON L971-999 | 0 | |
| POPUP_TO_CONFIRM_02 | FORM | ZCO_COMMON L1010-1023 | 1 | POPUP_TO_CONFIRM_STEP으로 두 줄 질문의 확인 팝업(J/N/A)을 띄워 응답을 돌려주는 공통 FORM이다. |
| POPUP_TO_CONFIRM | FORM | ZCO_COMMON L1035-1060 | 1 | POPUP_TO_CONFIRM으로 Yes/No 확인 팝업을 띄워 사용자 응답을 돌려주는 공통 FORM이다. |
| GET_LAST_DAY | FORM | ZCO_COMMON L1069-1078 | 1 | RP_LAST_DAY_OF_MONTHS로 주어진 날짜가 속한 월의 마지막 날을 구하는 공통 FORM이다. |
| SET_DSMOD | FORM | ZCO_COMMON L1086-1095 | 1 | BDC 처리 모드 입력값이 A/E/N 중 하나인지 검사하고 아니면 오류 메시지로 중단하는 공통 FORM이다. |
| FILE_EXISTS | FORM | ZCO_COMMON L1104-1135 | 1 | CL_GUI_FRONTEND_SERVICES=>FILE_EXIST로 프론트엔드 파일 존재 여부를 확인해 참/거짓을 돌려주는 공통 FORM이다. |
| AMT_CONV_TO_INTERNAL | FORM | ZCO_COMMON L1144-1161 | 1 | 외부 형식 금액을 통화별 소수점에 맞는 SAP 내부 금액으로 BAPI_CURRENCY_CONV_TO_INTERNAL로 변환하는 공통 FORM이다. |
| GET_NEXT_NUMBER | FORM | ZCO_COMMON L1172-1203 | 1 | 번호범위 객체·구간으로 NUMBER_GET_NEXT를 호출해 다음 채번 번호를 가져오는 공통 FORM이다. |
| GET_NEXT_NUMBER_YEAR | FORM | ZCO_COMMON L1215-1254 | 1 | 번호범위 객체·구간·연도로 NUMBER_GET_NEXT를 호출해 연도별 다음 채번 번호를 가져오는 공통 FORM이다. |
| GET_VALUE_LIST_DOM | FORM | ZCO_COMMON L1263-1278 | 1 | 도메인 고정값과 텍스트를 DD07T에서 읽어 전달받은 테이블에 채우는 공통 FORM(F4/드롭다운용)이다. |
| GET_DOM_TEXT_LIST | FORM | ZCO_COMMON L1287-1298 | 1 | 도메인 고정값 텍스트를 DD07T에서 읽어 GT_DOMAIN에 누적하는 공통 FORM이다. |
| MD_CONVER_MAT_UNIT | FORM | ZCO_COMMON L1311-1341 | 1 | 자재의 수량을 입력 단위에서 출력 단위로 MD_CONVERT_MATERIAL_UNIT을 이용해 환산하는 공통 FORM이다. |
| SHOW_MESSAGE_LIST | FORM | ZCO_COMMON L1349-1359 | 1 | 누적된 헤더/상세 메시지 테이블(GT_HEAMSG/GT_DETMSG)을 SCPR_SV_SHOW_MESSAGE_LIST로 팝업 표시하는 공통 FORM이다. |
| GET_FILE_PATH | FORM | ZCO_COMMON L1368-1399 | 1 | 파일 열기 대화상자(FILE_OPEN_DIALOG)로 업로드할 XLS 파일을 선택받아 파일 경로를 반환하는 공통 FORM이다. |
| CHK_FILE_PATH | FORM | ZCO_COMMON L1408-1433 | 1 | CL_GUI_FRONTEND_SERVICES=>FILE_EXIST로 업로드 파일 경로의 존재를 확인하고 없으면 메시지 후 처리를 중단하는 공통 FORM이다. |
| SET_BUTTON_100 | FORM | ZCO_COMMON L1444-1466 | 0 | |
| BDC_CREATE_AENNR | FORM | ZCO_COMMON L1545-1612 | 2 | 변경번호(AENNR) 존재 여부를 AENR에서 확인한 뒤 없으면 BDC로 CC01(변경마스터 생성)을 실행하고 결과 메시지를 반환하는 공통 FORM이다. |
| GET_DYNP_VALUES_READ | FORM | ZCO_COMMON L1620-1669 | 1 | DYNP_VALUES_READ로 현재 화면의 필드 값을 읽어 같은 이름의 프로그램 변수에 넣는 공통 FORM이다. |
| SET_DYNP_VALUES | FORM | ZCO_COMMON L1678-1719 | 1 | 프로그램 변수 값을 DYNP_VALUES_UPDATE로 현재 화면 필드에 반영하는 공통 FORM이다. |
| AUTHORITY_CHECK_TCODE | FORM | ZCO_COMMON L1725-1738 | 1 | S_TCODE 권한 객체로 현재 T-Code 실행 권한을 검사하고 T-Code 끝자리가 1이면 조회 모드(GV_DIP_MOD)로 설정하는 공통 FORM이다. |
| SET_BTN_1000 | FORM | ZCO_COMMON L1748-1768 | 0 | |
| F_PDF_DOWNLOAD | FORM | ZCO_COMMON L1777-1842 | 2 | Smart Forms 출력 결과(OTF)를 PDF로 변환하고 저장 대화상자를 거쳐 PC에 다운로드하는 공통 FORM이다. |
| OPEN_SAVE_FILE_SEL | FORM | ZCO_COMMON L1851-1907 | 1 | 파일 저장 대화상자(FILE_SAVE_DIALOG)를 열어 사용자가 지정한 저장 파일명을 돌려주는 공통 FORM이다. |
| ALSMEX_TAB_TO_ITAB | FORM | ZCO_COMMON L1917-1945 | 1 | ALSM_EXCEL_TO_INTERNAL_TABLE 결과(ALSMEX_TABLINE)를 동적으로 지정한 내부테이블·구조체에 행/열 매핑하여 적재하는 공통 FORM이다. |
| START_INTERFACE_BDC | FORM | ZCO_COMMON L1953-1973 | 1 | FTPOST 작업 테이블을 초기화하고 POSTING_INTERFACE_START로 FI Posting Interface(Call Transaction 방식)를 시작하는 공통 FORM이다. |
| END_INTERFACE_BDC | FORM | ZCO_COMMON L1980-1990 | 1 | POSTING_INTERFACE_END를 호출해 FI Posting Interface 세션을 종료하고 FTPOST/FTTAX/BLNTAB 작업 테이블을 초기화하는 공통 FORM이다. |
| FILL_FIELD | FORM | ZCO_COMMON L2000-2023 | 1 | Posting Interface(FTPOST)용 필드명·값을 한 건 채우며 금액 필드는 통화 형식으로 편집하여 FTPOST 테이블에 추가하는 공통 FORM이다. |
| BUILD_MESSGE_IF | FORM | ZCO_COMMON L2032-2047 | 1 | 인터페이스 메시지 구조(MSGID/MSGNO/MSGV1~4)를 MESSAGE_TEXT_BUILD로 메시지 텍스트로 조립하는 공통 FORM이다. |
| GET_POST_PERIOD | FORM | ZCO_COMMON L2057-2084 | 1 | 회사코드와 전기일로 FI_PERIOD_DETERMINE을 호출해 회계연도·전기기간을 구하고 실패 시 날짜에서 직접 추출하는 공통 FORM이다. |
| SET_KOKRS_BASE | FORM | ZCO_COMMON L2094-2101 | 1 | TKA01에서 관리회계영역의 명칭·통화·계정과목표를 읽어 전역변수에 설정하는 공통 FORM이다. |
| CONV_DB_WAERS | FORM | ZCO_COMMON L2109-2116 | 1 | CURRENCY_AMOUNT_IDOC_TO_SAP로 외부(IDoc) 형식 금액을 통화 소수점에 맞는 SAP 내부 금액으로 변환하는 공통 FORM이다. |
| CONV_VIEW_WAERS | FORM | ZCO_COMMON L2126-2134 | 1 | CURRENCY_AMOUNT_SAP_TO_IDOC로 SAP 내부 금액을 통화 소수점에 맞는 외부(IDoc) 형식 문자열로 변환하는 공통 FORM이다. |
| CONVERT_1000_U | FORM | ZCO_COMMON L2143-2146 | 0 | |
| CONVERT_1000_D | FORM | ZCO_COMMON L2155-2158 | 0 | |
| GET_VERSN_TEXT | FORM | ZCO_COMMON L2168-2177 | 1 | TKT09에서 관리회계영역·버전의 계획 버전 텍스트를 로그온 언어로 읽는 공통 FORM이다. |
| UPLOAD_XLS_STRUCT | FORM | ZCO_COMMON L2191-2245 | 2 | 엑셀 파일을 ALSM_EXCEL_TO_INTERNAL_TABLE로 읽어 행/열 단위 값을 구조체 컴포넌트에 매핑해 내부테이블로 적재하는 공통 업로드 FORM이다. |