First Commit (2026.08.28)
This commit is contained in:
@@ -0,0 +1,10 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||
<asx:values>
|
||||
<DATA>
|
||||
<MASTER_LANGUAGE>3</MASTER_LANGUAGE>
|
||||
<STARTING_FOLDER>/src/</STARTING_FOLDER>
|
||||
<FOLDER_LOGIC>PREFIX</FOLDER_LOGIC>
|
||||
</DATA>
|
||||
</asx:values>
|
||||
</asx:abap>
|
||||
@@ -0,0 +1,10 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<abapGit version="v1.0.0" serializer="LCL_OBJECT_DEVC" serializer_version="v1.0.0">
|
||||
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||
<asx:values>
|
||||
<DEVC>
|
||||
<CTEXT>CO-PA 하향식 배부 패키지</CTEXT>
|
||||
</DEVC>
|
||||
</asx:values>
|
||||
</asx:abap>
|
||||
</abapGit>
|
||||
@@ -0,0 +1,11 @@
|
||||
*&---------------------------------------------------------------------*
|
||||
*& 서브루틴풀 SAPFZTDPOOL
|
||||
*&---------------------------------------------------------------------*
|
||||
*&
|
||||
*&---------------------------------------------------------------------*
|
||||
|
||||
INCLUDE SAPFZTDPOOL_TOP . " Global Data
|
||||
|
||||
* INCLUDE SAPFZTDPOOL_O01 . " PBO-Modules
|
||||
* INCLUDE SAPFZTDPOOL_I01 . " PAI-Modules
|
||||
INCLUDE SAPFZTDPOOL_F01 . " FORM-Routines
|
||||
@@ -0,0 +1,22 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<abapGit version="v1.0.0" serializer="LCL_OBJECT_PROG" serializer_version="v1.0.0">
|
||||
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||
<asx:values>
|
||||
<PROGDIR>
|
||||
<NAME>SAPFZTDPOOL</NAME>
|
||||
<SUBC>S</SUBC>
|
||||
<RSTAT>K</RSTAT>
|
||||
<RLOAD>3</RLOAD>
|
||||
<FIXPT>X</FIXPT>
|
||||
<UCCHECK>X</UCCHECK>
|
||||
</PROGDIR>
|
||||
<TPOOL>
|
||||
<item>
|
||||
<ID>R</ID>
|
||||
<ENTRY>CO-PA 하향식 배부 서브루틴 풀</ENTRY>
|
||||
<LENGTH>19</LENGTH>
|
||||
</item>
|
||||
</TPOOL>
|
||||
</asx:values>
|
||||
</asx:abap>
|
||||
</abapGit>
|
||||
@@ -0,0 +1,146 @@
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Include SAPFZTDPOOL_F01
|
||||
*&---------------------------------------------------------------------*
|
||||
*
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Form get_table_info
|
||||
*&---------------------------------------------------------------------*
|
||||
FORM get_table_info .
|
||||
TYPES : BEGIN OF ty_table,
|
||||
type TYPE db2type,
|
||||
tbname TYPE tabname,
|
||||
END OF ty_table.
|
||||
|
||||
DATA : lt_mng_table TYPE TABLE OF ty_table.
|
||||
|
||||
DATA : lv_tabname TYPE tabname.
|
||||
|
||||
" 환경정보에서 관리 테이블명 조회
|
||||
CALL FUNCTION 'ZTOPDOWN_ENV'
|
||||
IMPORTING
|
||||
tb_name = lv_tabname.
|
||||
|
||||
" 관리 테이블 정보 로딩
|
||||
SELECT type,
|
||||
tbname
|
||||
FROM (lv_tabname)
|
||||
INTO CORRESPONDING FIELDS OF TABLE @Lt_mng_table.
|
||||
|
||||
LOOP AT lt_mng_table INTO DATA(ls_table).
|
||||
CASE ls_table-type.
|
||||
WHEN '1'. gv_manager = ls_table-tbname.
|
||||
WHEN '2'. gv_variant = ls_table-tbname.
|
||||
WHEN '3'. gv_sender = ls_table-tbname.
|
||||
WHEN '4'. gv_receiver = ls_table-tbname.
|
||||
WHEN '5'. gv_result = ls_table-tbname.
|
||||
WHEN '6'. gv_target = ls_table-tbname.
|
||||
WHEN '7'. gv_distinfo = ls_table-tbname.
|
||||
WHEN '8'. gv_distrule = ls_table-tbname.
|
||||
ENDCASE.
|
||||
ENDLOOP.
|
||||
ENDFORM.
|
||||
*
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Form show_progress
|
||||
*&---------------------------------------------------------------------*
|
||||
FORM show_progress USING p_percent p_text.
|
||||
|
||||
IF sy-batch = space.
|
||||
|
||||
CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR'
|
||||
EXPORTING
|
||||
percentage = p_percent
|
||||
text = p_text.
|
||||
|
||||
ELSE.
|
||||
MESSAGE s000 WITH p_text.
|
||||
ENDIF.
|
||||
|
||||
ENDFORM. " show_progress
|
||||
*
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Form confirm_step
|
||||
*&---------------------------------------------------------------------*
|
||||
FORM confirm_step USING VALUE(p_question)
|
||||
VALUE(p_cancel)
|
||||
CHANGING p_answer.
|
||||
* 확인
|
||||
CALL FUNCTION 'POPUP_TO_CONFIRM'
|
||||
EXPORTING
|
||||
titlebar = '확인'
|
||||
text_question = p_question
|
||||
display_cancel_button = p_cancel
|
||||
IMPORTING
|
||||
answer = p_answer
|
||||
EXCEPTIONS
|
||||
text_not_found = 1
|
||||
OTHERS = 2.
|
||||
IF sy-subrc <> 0.
|
||||
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
|
||||
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
|
||||
ENDIF.
|
||||
|
||||
* P_ANSWER
|
||||
* 1 : 예
|
||||
* 2 : 아니요
|
||||
* A : 취소
|
||||
|
||||
ENDFORM. " confirm_step
|
||||
*
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Form custom_table_info
|
||||
*&---------------------------------------------------------------------*
|
||||
FORM custom_table_info CHANGING gv_manager.
|
||||
DATA: lv_tabname TYPE tabname.
|
||||
|
||||
" 환경정보에서 관리 테이블명 조회
|
||||
CALL FUNCTION 'ZTOPDOWN_ENV'
|
||||
IMPORTING
|
||||
tb_name = lv_tabname.
|
||||
|
||||
|
||||
ENDFORM.
|
||||
*
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Form get_variant_list
|
||||
*&---------------------------------------------------------------------*
|
||||
FORM get_variant_list TABLES pt_variant
|
||||
USING p_erkrs TYPE erkrs.
|
||||
DATA : l_tabname TYPE tabname.
|
||||
|
||||
CONCATENATE 'CE1' p_erkrs INTO l_tabname.
|
||||
|
||||
|
||||
SELECT @p_erkrs AS erkrs,
|
||||
applclass,
|
||||
subclass,
|
||||
tabname,
|
||||
func,
|
||||
variant,
|
||||
vtext
|
||||
FROM covat
|
||||
WHERE spras = @sy-langu
|
||||
AND applclass = 'KE'
|
||||
AND subclass = '02'
|
||||
AND tabname = @l_tabname
|
||||
AND func = 'GITD'
|
||||
INTO CORRESPONDING FIELDS OF TABLE @pt_variant
|
||||
.
|
||||
ENDFORM.
|
||||
*
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Form get_variant_list
|
||||
*&---------------------------------------------------------------------*
|
||||
FORM get_target_variant TABLES pt_variant
|
||||
USING p_erkrs TYPE erkrs
|
||||
p_perio TYPE jahrper.
|
||||
DATA : l_tabname TYPE tabname.
|
||||
|
||||
PERFORM get_table_info.
|
||||
|
||||
SELECT *
|
||||
FROM (gv_variant)
|
||||
WHERE erkrs = @p_erkrs
|
||||
AND perio = @p_perio
|
||||
INTO CORRESPONDING FIELDS OF TABLE @pt_variant.
|
||||
ENDFORM.
|
||||
@@ -0,0 +1,21 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<abapGit version="v1.0.0" serializer="LCL_OBJECT_PROG" serializer_version="v1.0.0">
|
||||
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||
<asx:values>
|
||||
<PROGDIR>
|
||||
<NAME>SAPFZTDPOOL_F01</NAME>
|
||||
<SUBC>I</SUBC>
|
||||
<RSTAT>K</RSTAT>
|
||||
<RLOAD>3</RLOAD>
|
||||
<UCCHECK>X</UCCHECK>
|
||||
</PROGDIR>
|
||||
<TPOOL>
|
||||
<item>
|
||||
<ID>R</ID>
|
||||
<ENTRY>Include SAPFZTDPOOL_F01</ENTRY>
|
||||
<LENGTH>23</LENGTH>
|
||||
</item>
|
||||
</TPOOL>
|
||||
</asx:values>
|
||||
</asx:abap>
|
||||
</abapGit>
|
||||
@@ -0,0 +1,13 @@
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Include SAPFZTDPOOL_TOP - 서브루틴풀 SAPFZTDPOOL
|
||||
*&---------------------------------------------------------------------*
|
||||
PROGRAM sapfztdpool MESSAGE-ID ztopdown.
|
||||
|
||||
DATA : gv_manager TYPE tabname,
|
||||
gv_variant TYPE tabname,
|
||||
gv_sender TYPE tabname,
|
||||
gv_receiver TYPE tabname,
|
||||
gv_result TYPE tabname,
|
||||
gv_target TYPE tabname,
|
||||
gv_distinfo TYPE tabname,
|
||||
gv_distrule TYPE tabname.
|
||||
@@ -0,0 +1,21 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<abapGit version="v1.0.0" serializer="LCL_OBJECT_PROG" serializer_version="v1.0.0">
|
||||
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||
<asx:values>
|
||||
<PROGDIR>
|
||||
<NAME>SAPFZTDPOOL_TOP</NAME>
|
||||
<SUBC>I</SUBC>
|
||||
<RSTAT>K</RSTAT>
|
||||
<RLOAD>3</RLOAD>
|
||||
<UCCHECK>X</UCCHECK>
|
||||
</PROGDIR>
|
||||
<TPOOL>
|
||||
<item>
|
||||
<ID>R</ID>
|
||||
<ENTRY>Include SAPFZTDPOOL_TOP</ENTRY>
|
||||
<LENGTH>23</LENGTH>
|
||||
</item>
|
||||
</TPOOL>
|
||||
</asx:values>
|
||||
</asx:abap>
|
||||
</abapGit>
|
||||
File diff suppressed because it is too large
Load Diff
@@ -0,0 +1,757 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<abapGit version="v1.0.0" serializer="LCL_OBJECT_CLAS" serializer_version="v1.0.0">
|
||||
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||
<asx:values>
|
||||
<VSEOCLASS>
|
||||
<CLSNAME>ZCL_COPA_TOPDOWN</CLSNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>CO-PA 하향식 배부</DESCRIPT>
|
||||
<STATE>1</STATE>
|
||||
<CLSCCINCL>X</CLSCCINCL>
|
||||
<FIXPT>X</FIXPT>
|
||||
<UNICODE>X</UNICODE>
|
||||
</VSEOCLASS>
|
||||
<TPOOL>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>001</KEY>
|
||||
<ENTRY>경영단위를 등록하십시요.</ENTRY>
|
||||
<LENGTH>23</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>002</KEY>
|
||||
<ENTRY>VARIANT 코드를 등록하십시요.</ENTRY>
|
||||
<LENGTH>29</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>003</KEY>
|
||||
<ENTRY>VARIANT 정보를 확인하십시요.</ENTRY>
|
||||
<LENGTH>29</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>004</KEY>
|
||||
<ENTRY>Data saved successfully.</ENTRY>
|
||||
<LENGTH>48</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>005</KEY>
|
||||
<ENTRY>Error saving data.</ENTRY>
|
||||
<LENGTH>27</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>006</KEY>
|
||||
<ENTRY>등록된 데이타가 존재합니다. 삭제 후 재 처리 하시겠습니까?</ENTRY>
|
||||
<LENGTH>66</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>007</KEY>
|
||||
<ENTRY>데이타가 존재하지 않습니다. 확인 후 다시 처리 하십시요.</ENTRY>
|
||||
<LENGTH>64</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>008</KEY>
|
||||
<ENTRY>클래스 환경 구성을 위한 Data Elements (Domain) 생성 오류</ENTRY>
|
||||
<LENGTH>90</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>009</KEY>
|
||||
<ENTRY>클래스 환경 구성을 위한 관리 테이블 생성 오류</ENTRY>
|
||||
<LENGTH>52</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>010</KEY>
|
||||
<ENTRY>클래스 환경 구성을 위한 함수 생성 오류</ENTRY>
|
||||
<LENGTH>44</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>011</KEY>
|
||||
<ENTRY>클래스 운영을 위한 환경 구성이 완료되었습니다.</ENTRY>
|
||||
<LENGTH>52</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>012</KEY>
|
||||
<ENTRY>필수 Import 파라메타 값을 지정하여야 합니다.</ENTRY>
|
||||
<LENGTH>56</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>013</KEY>
|
||||
<ENTRY>클래스 환경 구성 정보 추출 성공하였습니다.</ENTRY>
|
||||
<LENGTH>28</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>014</KEY>
|
||||
<ENTRY>클래스 환경 구성 정보 조회시 오류가 발생하였습니다.</ENTRY>
|
||||
<LENGTH>58</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>015</KEY>
|
||||
<ENTRY>데이타 조회 과정에서 오류가 발생하였습니다.</ENTRY>
|
||||
<LENGTH>48</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>016</KEY>
|
||||
<ENTRY>요청 작업을 성공적으로 완료하였습니다.</ENTRY>
|
||||
<LENGTH>42</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>017</KEY>
|
||||
<ENTRY>요청 작업 수행 중 오류가 발생하였습니다.</ENTRY>
|
||||
<LENGTH>46</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>018</KEY>
|
||||
<ENTRY>전표 발행이 완료되어 요청 작업을 처리 할 수 없습니다.</ENTRY>
|
||||
<LENGTH>62</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>019</KEY>
|
||||
<ENTRY>현재 지원하지 않는 기능 영역입니다.</ENTRY>
|
||||
<LENGTH>40</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>020</KEY>
|
||||
<ENTRY>이미 처리된 내역이 존재합니다.</ENTRY>
|
||||
<LENGTH>27</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>021</KEY>
|
||||
<ENTRY>레코드 유형이 존재하지 않습니다. 다시 확인 바랍니다.</ENTRY>
|
||||
<LENGTH>60</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>022</KEY>
|
||||
<ENTRY>관리 테이블 정보 조회 오류</ENTRY>
|
||||
<LENGTH>25</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>023</KEY>
|
||||
<ENTRY>전표 발행 과정을 진행하지 않았습니다. CO-PA전표 발행 후, 수행하십시요.</ENTRY>
|
||||
<LENGTH>86</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>024</KEY>
|
||||
<ENTRY>CO-PA 전표가 존재하지 않습니다.</ENTRY>
|
||||
<LENGTH>40</LENGTH>
|
||||
</item>
|
||||
</TPOOL>
|
||||
<DESCRIPTIONS>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>BUILD_DYNAMIC_QUERY</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>데이타 추출을 위한 쿼리 수행</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>CONSTRUCTOR</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>CONSTRUCTOR</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>DELETE_TOPDOWN_TB_DATA</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>TYPE별(센더, 리시버, 결과, 전표발행) 테이블 데이타 삭제</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>EXECUTE_TOPDOWN_DISTRIBUTE</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>하향식 배부 실행(Templete)</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>GENERATE_DYNAMIC_NEW_SQL</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>데이타 추출을 위한 쿼리 수행</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>GET_COPA_DOC_LIST</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>CO-PA 전표 조회(배부 수행 결과 전표)</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>GET_CUSTOM_TABLE_INFO</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>센더, 리시버 테이블 정보(사용 X)</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>GET_FIELD_CATALOG</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>Variant별 사용 Field-Catalog 정보 조회</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>GET_SENDER_RECEIVER_DATA</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>센더, 리시버 데이타 생성(Templete)</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>GET_TABNAME</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>TABNAME 조회</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>GET_TB_DATA_EXIST_YN</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>테이블 데이타 존재 여부</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>GET_VARIANT_INFO</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>변형 정보 조회</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>GET_VARIANT_LIST</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>하향식 배부 변형 리스트 조회</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>GV_DISTINFO</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>배부 기준 세부 정보 테이블</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>GV_DISTRULE</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>배부 조건 Customizing</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>GV_MANAGER</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>Package 전용 테이블 관리 테이블 명</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>GV_RECEIVER</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>리시버(배부기준) 테이블 명</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>GV_RESULT</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>배부 결과 테이블 명</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>GV_SENDER</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>센더 테이블 명</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>GV_SOURCE</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>경영단위 CE1 테이블</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>GV_TARGET</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>전표 발행 대상 테이블 명</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>GV_VARIANT</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>월별 배부 기준 정보 테이블 명</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>MANAGER_STRUCT_DESC</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>관리 테이블 구조</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>POST_ACTUAL_TOPDOWN_DOCUMENTS</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>배주 전표 전기</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>RECEIVER_STRUCT_DESC</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>리시버 테이블 구조</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>RESULT_STRUCT_DESC</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>결과 테이블 구조</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>SENDER_STRUCT_DESC</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>센더 테이블 구조</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>SET_AUDIT_FIELDS</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>Data 생성자(수정자) 정보</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>SET_INFO</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>공용정보 지정</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>SET_SOURCE_INFO</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>소스 테이블 지정(CE1)</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>SET_VARIANT_DESC</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>하향식 배부 변형 설정 값 저장</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>SOURCE_STRUCT_DESC</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>소스(CE1) 테이블 구조</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>TARGET_STRUCT_DESC</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>전표 발행 대상</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>TT_SENDER</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>센더 데이타(구조)</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>TY_DISTINFO</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>배부 기준 세부 정보(구조)</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>TY_DISTRULE</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>배부 조건 Customizing(구조)</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>TY_MNG_TABLE</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>관리 테이블 정보</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>TY_RECEIVER</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>배부 기준 데이타(구조)</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>TY_RESULT</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>배부 결과 데이타(구조)</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>TY_SENDER</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>센더 데이타(구조)</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>TY_TARGET</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>전표 발행 대상 데이타(구조)</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>TY_VARIANT</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>배부 기준 정보(월별)(구조)</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>TY_WORKING_INFO</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>클래스 메소드 수행을 위한 공용 정보</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>VARIANT_STRUCT_DESC</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>배부기준 테이블 구조</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>WORKING_INFO</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>클래스 메소드 수행을 위한 공용 정보</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
</DESCRIPTIONS>
|
||||
<DESCRIPTIONS_SUB>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>BUILD_DYNAMIC_QUERY</CMPNAME>
|
||||
<SCONAME>RT_DATA</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>배부 기준 데이타(구조)</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>CREATE_DYNAMIC_TABLE</CMPNAME>
|
||||
<SCONAME>IV_TABNAME</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>테이블이름</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>DELETE_TOPDOWN_TB_DATA</CMPNAME>
|
||||
<SCONAME>ERKRS</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>경영 단위</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>DELETE_TOPDOWN_TB_DATA</CMPNAME>
|
||||
<SCONAME>PERIO</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>기간/연도</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>DELETE_TOPDOWN_TB_DATA</CMPNAME>
|
||||
<SCONAME>RESULT</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>리턴 매개변수</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>DELETE_TOPDOWN_TB_DATA</CMPNAME>
|
||||
<SCONAME>TYPE</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>유형</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>DELETE_TOPDOWN_TB_DATA</CMPNAME>
|
||||
<SCONAME>VARIANT</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>변형</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>EXECUTE_TOPDOWN_DISTRIBUTE</CMPNAME>
|
||||
<SCONAME>ERKRS</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>경영 단위</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>EXECUTE_TOPDOWN_DISTRIBUTE</CMPNAME>
|
||||
<SCONAME>PERIO</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>기간/연도</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>EXECUTE_TOPDOWN_DISTRIBUTE</CMPNAME>
|
||||
<SCONAME>RESULT</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>리턴 매개변수</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>EXECUTE_TOPDOWN_DISTRIBUTE</CMPNAME>
|
||||
<SCONAME>RT_RESULT</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>배부결과 데이타</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>EXECUTE_TOPDOWN_DISTRIBUTE</CMPNAME>
|
||||
<SCONAME>SAVE_YN</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>결과 저장(Y/N)</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>EXECUTE_TOPDOWN_DISTRIBUTE</CMPNAME>
|
||||
<SCONAME>VARIANT</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>변형</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>GENERATE_DIST_ID</CMPNAME>
|
||||
<SCONAME>RV_DIST</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>Record sequential number</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>GENERATE_DYNAMIC_NEW_SQL</CMPNAME>
|
||||
<SCONAME>ET_DATA</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>배부 기준 데이타(구조)</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>GET_COPA_DOC_LIST</CMPNAME>
|
||||
<SCONAME>COPA_DOC_LIST</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>CO-PA전표 데이타(리스트)</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>GET_COPA_DOC_LIST</CMPNAME>
|
||||
<SCONAME>ERKRS</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>경영 단위</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>GET_COPA_DOC_LIST</CMPNAME>
|
||||
<SCONAME>PERIO</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>기간/연도</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>GET_COPA_DOC_LIST</CMPNAME>
|
||||
<SCONAME>RESULT</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>리턴 매개변수</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>GET_COPA_DOC_LIST</CMPNAME>
|
||||
<SCONAME>REVERSE</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>지시자: 역분개전표 제외</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>GET_COPA_DOC_LIST</CMPNAME>
|
||||
<SCONAME>VARIANT</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>변형</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>GET_CUSTOM_TABLE_INFO</CMPNAME>
|
||||
<SCONAME>ERKRS</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>경영 단위</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>GET_CUSTOM_TABLE_INFO</CMPNAME>
|
||||
<SCONAME>RECEIVER</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>리시버 데이타 테이블</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>GET_CUSTOM_TABLE_INFO</CMPNAME>
|
||||
<SCONAME>SENDER</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>센더 데이타 테이블</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>GET_FIELD_CATALOG</CMPNAME>
|
||||
<SCONAME>ERKRS</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>경영 단위</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>GET_FIELD_CATALOG</CMPNAME>
|
||||
<SCONAME>PERIO</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>기간/연도</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>GET_FIELD_CATALOG</CMPNAME>
|
||||
<SCONAME>RESULT</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>리턴 매개변수</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>GET_FIELD_CATALOG</CMPNAME>
|
||||
<SCONAME>VARIANT</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>변형</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>GET_SENDER_RECEIVER_DATA</CMPNAME>
|
||||
<SCONAME>ERKRS</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>경영 단위</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>GET_SENDER_RECEIVER_DATA</CMPNAME>
|
||||
<SCONAME>PERIO</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>기간/연도</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>GET_SENDER_RECEIVER_DATA</CMPNAME>
|
||||
<SCONAME>RESULT</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>리턴 매개변수</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>GET_SENDER_RECEIVER_DATA</CMPNAME>
|
||||
<SCONAME>VARIANT</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>변형</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>GET_TABNAME</CMPNAME>
|
||||
<SCONAME>ERKRS</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>경영 단위</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>GET_TABNAME</CMPNAME>
|
||||
<SCONAME>TABNAME</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>테이블이름</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>GET_TB_DATA_EXIST_YN</CMPNAME>
|
||||
<SCONAME>ERKRS</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>경영 단위</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>GET_TB_DATA_EXIST_YN</CMPNAME>
|
||||
<SCONAME>PERIO</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>기간/연도</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>GET_TB_DATA_EXIST_YN</CMPNAME>
|
||||
<SCONAME>RESULT</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>리턴 매개변수</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>GET_TB_DATA_EXIST_YN</CMPNAME>
|
||||
<SCONAME>TYPE</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>유형</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>GET_TB_DATA_EXIST_YN</CMPNAME>
|
||||
<SCONAME>VARIANT</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>변형</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>GET_VARIANT_INFO</CMPNAME>
|
||||
<SCONAME>COVAD</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>변형범주</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>GET_VARIANT_INFO</CMPNAME>
|
||||
<SCONAME>ERKRS</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>경영 단위</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>GET_VARIANT_INFO</CMPNAME>
|
||||
<SCONAME>VARIANT</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>변형</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>GET_VARIANT_LIST</CMPNAME>
|
||||
<SCONAME>ERKRS</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>경영 단위</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>GET_VARIANT_LIST</CMPNAME>
|
||||
<SCONAME>RESULT</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>변형 리스트</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>GET_VARIANT_LIST</CMPNAME>
|
||||
<SCONAME>SELECT_ERR</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>data select error</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>MAP_DOCUMENT_DATA</CMPNAME>
|
||||
<SCONAME>CT_INPUTDATA</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>BAPIs CO-PA: CO-PA 데이타 대체유형</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>MAP_DOCUMENT_DATA</CMPNAME>
|
||||
<SCONAME>CV_INDEX</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>데이타레코드번호</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>POST_ACTUAL_TOPDOWN_DOCUMENTS</CMPNAME>
|
||||
<SCONAME>ERKRS</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>경영 단위</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>POST_ACTUAL_TOPDOWN_DOCUMENTS</CMPNAME>
|
||||
<SCONAME>PERIO</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>기간/연도</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>POST_ACTUAL_TOPDOWN_DOCUMENTS</CMPNAME>
|
||||
<SCONAME>RESULT</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>리턴 매개변수</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>POST_ACTUAL_TOPDOWN_DOCUMENTS</CMPNAME>
|
||||
<SCONAME>TESTRUN</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>테스트 여부</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>POST_ACTUAL_TOPDOWN_DOCUMENTS</CMPNAME>
|
||||
<SCONAME>VARIANT</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>변형</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>POST_ACTUAL_TOPDOWN_DOCUMENTS</CMPNAME>
|
||||
<SCONAME>VRGAR</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>레코드 유형(전표 발행)</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>SET_AUDIT_FIELDS</CMPNAME>
|
||||
<SCONAME>CS_DATA</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>배부 기준 세부 정보(구조)</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>SET_INFO</CMPNAME>
|
||||
<SCONAME>PERIO</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>기간/연도</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>SET_INFO</CMPNAME>
|
||||
<SCONAME>VARIANT</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>변형</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>SET_SOURCE_INFO</CMPNAME>
|
||||
<SCONAME>ERKRS</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>경영 단위</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>SET_SOURCE_INFO</CMPNAME>
|
||||
<SCONAME>RESULT</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>리턴 매개변수</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>SET_VARIANT_DESC</CMPNAME>
|
||||
<SCONAME>ERKRS</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>경영 단위</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>SET_VARIANT_DESC</CMPNAME>
|
||||
<SCONAME>PERIO</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>기간/연도</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>SET_VARIANT_DESC</CMPNAME>
|
||||
<SCONAME>VARIANT</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>변형</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
</DESCRIPTIONS_SUB>
|
||||
</asx:values>
|
||||
</asx:abap>
|
||||
</abapGit>
|
||||
File diff suppressed because it is too large
Load Diff
@@ -0,0 +1,223 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<abapGit version="v1.0.0" serializer="LCL_OBJECT_CLAS" serializer_version="v1.0.0">
|
||||
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||
<asx:values>
|
||||
<VSEOCLASS>
|
||||
<CLSNAME>ZCL_COPA_TOPDOWN_INSTALL</CLSNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>ZCL_COPA_TOPDOWN 환경 구성(초기세팅)</DESCRIPT>
|
||||
<STATE>1</STATE>
|
||||
<CLSCCINCL>X</CLSCCINCL>
|
||||
<FIXPT>X</FIXPT>
|
||||
<UNICODE>X</UNICODE>
|
||||
</VSEOCLASS>
|
||||
<TPOOL>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>001</KEY>
|
||||
<ENTRY>경영단위를 등록하십시요.</ENTRY>
|
||||
<LENGTH>23</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>002</KEY>
|
||||
<ENTRY>VARIANT 코드를 등록하십시요.</ENTRY>
|
||||
<LENGTH>29</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>003</KEY>
|
||||
<ENTRY>VARIANT 정보를 확인하십시요.</ENTRY>
|
||||
<LENGTH>29</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>004</KEY>
|
||||
<ENTRY>Data saved successfully.</ENTRY>
|
||||
<LENGTH>48</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>005</KEY>
|
||||
<ENTRY>Error saving data.</ENTRY>
|
||||
<LENGTH>28</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>006</KEY>
|
||||
<ENTRY>등록된 데이타가 존재합니다. 삭제 후 재 처리 하시겠습니까?</ENTRY>
|
||||
<LENGTH>66</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>007</KEY>
|
||||
<ENTRY>데이타가 존재하지 않습니다. 확인 후 다시 처리 하십시요.</ENTRY>
|
||||
<LENGTH>64</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>008</KEY>
|
||||
<ENTRY>클래스 환경 구성을 위한 Data Elements (Domain) 생성 오류</ENTRY>
|
||||
<LENGTH>84</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>009</KEY>
|
||||
<ENTRY>클래스 환경 구성을 위한 관리 테이블 생성 오류</ENTRY>
|
||||
<LENGTH>52</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>010</KEY>
|
||||
<ENTRY>클래스 환경 구성을 위한 함수 생성 오류</ENTRY>
|
||||
<LENGTH>44</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>011</KEY>
|
||||
<ENTRY>클래스 운영을 위한 환경 구성이 완료되었습니다.</ENTRY>
|
||||
<LENGTH>52</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>012</KEY>
|
||||
<ENTRY>필수 Import 파라메타 값을 지정하여야 합니다.</ENTRY>
|
||||
<LENGTH>56</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>013</KEY>
|
||||
<ENTRY>클래스 환경 구성 정보 추출 성공하였습니다.</ENTRY>
|
||||
<LENGTH>48</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>014</KEY>
|
||||
<ENTRY>클래스 환경 구성 정보 조회시 오류가 발생하였습니다.</ENTRY>
|
||||
<LENGTH>58</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>015</KEY>
|
||||
<ENTRY>데이타 조회 과정에서 오류가 발생하였습니다.</ENTRY>
|
||||
<LENGTH>48</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>016</KEY>
|
||||
<ENTRY>처리 중 오류가 발생하였습니다.</ENTRY>
|
||||
<LENGTH>27</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>017</KEY>
|
||||
<ENTRY>CO-PA 하향식 배부 추가 기능을 지원하기 위한 환경 구축 작업을 수행합니다.</ENTRY>
|
||||
<LENGTH>124</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>018</KEY>
|
||||
<ENTRY>이미 서비스를 사용중인 경우에는 다시 수행하지 마십시요. 재 수행시 심각한 문제가 발생할 수 있습니다.</ENTRY>
|
||||
<LENGTH>114</LENGTH>
|
||||
</item>
|
||||
</TPOOL>
|
||||
<DESCRIPTIONS>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>CONSTRUCTOR</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>CONSTRUCTOR</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>CREATE_INIT_STRUCTURE</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>2-1. 구조(Structure) 생성(MANDT포함)</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>CREATE_INIT_STRUCTURE_EX_MANDT</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>2-1. 구조(Structure) 생성(MANDT제외)</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>CREATE_INIT_TABLE</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>2. 패키지 운영 DB TABLE 생성</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>GV_DISTINFO</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>배부 기준 세부 정보 테이블</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>GV_DISTRULE</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>배부 조건 Customizing</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>GV_MANAGER</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>Package 전용 테이블 관리 테이블 명</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>GV_RECEIVER</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>리시버(배부기준) 테이블 명</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>GV_RESULT</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>배부 결과 테이블 명</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>GV_SENDER</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>센더 테이블 명</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>GV_SOURCE</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>경영단위 CE1 테이블</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>GV_TARGET</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>전표 발행 대상 테이블 명</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>GV_VARIANT</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>월별 배부 기준 정보 테이블 명</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>START_PACKAGE_INSTALL</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>1. 패키지 기본 환경 구축</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
<SEOCOMPOTX>
|
||||
<CMPNAME>WORKING_INFO</CMPNAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>클래스 메소드 수행을 위한 공용 정보</DESCRIPT>
|
||||
</SEOCOMPOTX>
|
||||
</DESCRIPTIONS>
|
||||
<DESCRIPTIONS_SUB>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>CREATE_INIT_DATA_TABLE</CMPNAME>
|
||||
<SCONAME>ERKRS</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>경영 단위</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>CREATE_INIT_STRUCTURE</CMPNAME>
|
||||
<SCONAME>ERKRS</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>경영 단위</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
<SEOSUBCOTX>
|
||||
<CMPNAME>CREATE_INIT_STRUCTURE_EX_MANDT</CMPNAME>
|
||||
<SCONAME>ERKRS</SCONAME>
|
||||
<LANGU>3</LANGU>
|
||||
<DESCRIPT>경영 단위</DESCRIPT>
|
||||
</SEOSUBCOTX>
|
||||
</DESCRIPTIONS_SUB>
|
||||
</asx:values>
|
||||
</asx:abap>
|
||||
</abapGit>
|
||||
@@ -0,0 +1,37 @@
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Report ZCOPATD0010
|
||||
*&---------------------------------------------------------------------*
|
||||
*&
|
||||
*&---------------------------------------------------------------------*
|
||||
|
||||
INCLUDE zcopatd0010top . " Global Data
|
||||
|
||||
INCLUDE zcopatd0010o01 . " PBO-Modules
|
||||
INCLUDE zcopatd0010i01 . " PAI-Modules
|
||||
INCLUDE zcopatd0010f01 . " FORM-Routines
|
||||
INCLUDE zcopatdcommF01 . " 패키지 Form-Routines
|
||||
|
||||
|
||||
*----------------------------------------------------------------------*
|
||||
* INITIALIZATION *
|
||||
*----------------------------------------------------------------------*
|
||||
INITIALIZATION.
|
||||
|
||||
*----------------------------------------------------------------------*
|
||||
* AT SELECTION-SCREEN *
|
||||
*----------------------------------------------------------------------*
|
||||
AT SELECTION-SCREEN.
|
||||
|
||||
|
||||
*----------------------------------------------------------------------*
|
||||
* START-OF-SELECTION.
|
||||
*----------------------------------------------------------------------*
|
||||
START-OF-SELECTION.
|
||||
PERFORM get_table_info.
|
||||
PERFORM get_data.
|
||||
|
||||
*----------------------------------------------------------------------*
|
||||
* END-OF-SELECTION.
|
||||
*----------------------------------------------------------------------*
|
||||
END-OF-SELECTION.
|
||||
CALL SCREEN 0100.
|
||||
File diff suppressed because it is too large
Load Diff
File diff suppressed because it is too large
Load Diff
@@ -0,0 +1,21 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<abapGit version="v1.0.0" serializer="LCL_OBJECT_PROG" serializer_version="v1.0.0">
|
||||
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||
<asx:values>
|
||||
<PROGDIR>
|
||||
<NAME>ZCOPATD0010F01</NAME>
|
||||
<SUBC>I</SUBC>
|
||||
<RSTAT>K</RSTAT>
|
||||
<RLOAD>3</RLOAD>
|
||||
<UCCHECK>X</UCCHECK>
|
||||
</PROGDIR>
|
||||
<TPOOL>
|
||||
<item>
|
||||
<ID>R</ID>
|
||||
<ENTRY>Include ZCOPATD0010F01</ENTRY>
|
||||
<LENGTH>22</LENGTH>
|
||||
</item>
|
||||
</TPOOL>
|
||||
</asx:values>
|
||||
</asx:abap>
|
||||
</abapGit>
|
||||
@@ -0,0 +1,110 @@
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Include ZCOPATD0010I01
|
||||
*&---------------------------------------------------------------------*
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Module SET_DATAR INPUT
|
||||
*&---------------------------------------------------------------------*
|
||||
* text
|
||||
*----------------------------------------------------------------------*
|
||||
MODULE set_datar INPUT.
|
||||
PERFORM set_datar.
|
||||
ENDMODULE.
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Module LOOP_PAI_201 INPUT
|
||||
*&---------------------------------------------------------------------*
|
||||
* text
|
||||
*----------------------------------------------------------------------*
|
||||
MODULE loop_pai_201 INPUT.
|
||||
|
||||
PERFORM LOOP_PAI_201.
|
||||
|
||||
ENDMODULE.
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Module OK_CODE_201 INPUT
|
||||
*&---------------------------------------------------------------------*
|
||||
* text
|
||||
*----------------------------------------------------------------------*
|
||||
MODULE ok_code_201 INPUT.
|
||||
|
||||
PERFORM OK_CODE_201.
|
||||
|
||||
ENDMODULE.
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Module EXIT_1000 INPUT
|
||||
*&---------------------------------------------------------------------*
|
||||
* text
|
||||
*----------------------------------------------------------------------*
|
||||
MODULE exit_1000 INPUT.
|
||||
|
||||
PERFORM EXIT_1000.
|
||||
|
||||
ENDMODULE.
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Module LOOP_PAI_1100 INPUT
|
||||
*&---------------------------------------------------------------------*
|
||||
* text
|
||||
*----------------------------------------------------------------------*
|
||||
MODULE loop_pai_1100 INPUT.
|
||||
|
||||
PERFORM LOOP_PAI_1100.
|
||||
|
||||
ENDMODULE.
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Module OK_CODE_1100 INPUT
|
||||
*&---------------------------------------------------------------------*
|
||||
* text
|
||||
*----------------------------------------------------------------------*
|
||||
MODULE ok_code_1100 INPUT.
|
||||
|
||||
PERFORM OK_CODE_1100.
|
||||
|
||||
ENDMODULE.
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Module HELP_MLOW INPUT
|
||||
*&---------------------------------------------------------------------*
|
||||
* text
|
||||
*----------------------------------------------------------------------*
|
||||
MODULE help_mlow INPUT.
|
||||
|
||||
PERFORM HELP_CRITERIA.
|
||||
|
||||
ENDMODULE.
|
||||
*----------------------------------------------------------------------*
|
||||
* MODULE VAL_SRC_FROM INPUT *
|
||||
*----------------------------------------------------------------------*
|
||||
MODULE VAL_SRC_FROM INPUT.
|
||||
|
||||
PERFORM VAL_CRITERIA_VALUE_1000 USING GT_REF-SRC_LOW
|
||||
'GT_REF-SRC_LOW_TXT'.
|
||||
|
||||
ENDMODULE. "VAL_SRC_FROM INPUT
|
||||
|
||||
*----------------------------------------------------------------------*
|
||||
* MODULE VAL_SRC_TO INPUT *
|
||||
*----------------------------------------------------------------------*
|
||||
MODULE VAL_SRC_TO INPUT.
|
||||
|
||||
PERFORM VAL_CRITERIA_VALUE_1000 USING GT_REF-SRC_HIGH
|
||||
'GT_REF-SRC_HIGH_TXT'.
|
||||
|
||||
ENDMODULE. "VAL_SRC_TO INPUT
|
||||
|
||||
*----------------------------------------------------------------------*
|
||||
* MODULE VAL_REF_FROM INPUT *
|
||||
*----------------------------------------------------------------------*
|
||||
MODULE VAL_REF_FROM INPUT.
|
||||
|
||||
PERFORM VAL_CRITERIA_VALUE_1000 USING GT_REF-REF_LOW
|
||||
'GT_REF-REF_LOW_TXT'.
|
||||
|
||||
ENDMODULE. "VAL_REF_FROM INPUT
|
||||
|
||||
*----------------------------------------------------------------------*
|
||||
* MODULE VAL_REF_TO INPUT *
|
||||
*----------------------------------------------------------------------*
|
||||
MODULE VAL_REF_TO INPUT.
|
||||
|
||||
PERFORM VAL_CRITERIA_VALUE_1000 USING GT_REF-REF_HIGH
|
||||
'GT_REF-REF_HIGH_TXT'.
|
||||
|
||||
ENDMODULE. "VAL_REF_TO INPUT
|
||||
@@ -0,0 +1,20 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<abapGit version="v1.0.0" serializer="LCL_OBJECT_PROG" serializer_version="v1.0.0">
|
||||
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||
<asx:values>
|
||||
<PROGDIR>
|
||||
<NAME>ZCOPATD0010I01</NAME>
|
||||
<SUBC>I</SUBC>
|
||||
<RLOAD>3</RLOAD>
|
||||
<UCCHECK>X</UCCHECK>
|
||||
</PROGDIR>
|
||||
<TPOOL>
|
||||
<item>
|
||||
<ID>R</ID>
|
||||
<ENTRY>Include ZCOPATD0010I01</ENTRY>
|
||||
<LENGTH>22</LENGTH>
|
||||
</item>
|
||||
</TPOOL>
|
||||
</asx:values>
|
||||
</asx:abap>
|
||||
</abapGit>
|
||||
@@ -0,0 +1,172 @@
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Include ZCOPATD0010O01
|
||||
*&---------------------------------------------------------------------*
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Module SET_STATUS OUTPUT
|
||||
*&---------------------------------------------------------------------*
|
||||
*&
|
||||
*&---------------------------------------------------------------------*
|
||||
MODULE set_status OUTPUT.
|
||||
|
||||
SET PF-STATUS 'GITD' EXCLUDING g_fcodetab.
|
||||
|
||||
" STD 기준으로 사용하는 함수 리스트 등록.
|
||||
CLEAR g_tkebpfm.
|
||||
g_tkebpfm-applclass = 'KE'.
|
||||
g_tkebpfm-subclass = '02'.
|
||||
g_tkebpfm-func = 'GITD'.
|
||||
g_tkebpfm-event = '01'.
|
||||
g_tkebpfm-funcmo = 'RKE_BP_INITIALIZATION'.
|
||||
APPEND g_tkebpfm.
|
||||
|
||||
* CLEAR g_tkebpfm.
|
||||
* g_tkebpfm-applclass = 'KE'.
|
||||
* g_tkebpfm-subclass = '02'.
|
||||
* g_tkebpfm-func = 'GITD'.
|
||||
* g_tkebpfm-event = '02'.
|
||||
* g_tkebpfm-funcmo = 'RKE_BP_SET_CUA_STATUS'.
|
||||
* APPEND g_tkebpfm.
|
||||
|
||||
CLEAR g_tkebpfm.
|
||||
g_tkebpfm-applclass = 'KE'.
|
||||
g_tkebpfm-subclass = '02'.
|
||||
g_tkebpfm-func = 'GITD'.
|
||||
g_tkebpfm-event = '10'.
|
||||
g_tkebpfm-funcmo = 'RKE_BP_CHECK_ALL_100'.
|
||||
APPEND g_tkebpfm.
|
||||
|
||||
CLEAR g_tkebpfm.
|
||||
g_tkebpfm-applclass = 'KE'.
|
||||
g_tkebpfm-subclass = '02'.
|
||||
g_tkebpfm-func = 'GITD'.
|
||||
g_tkebpfm-event = '20'.
|
||||
g_tkebpfm-funcmo = 'RKE_BP_CHECK_SINGLE_200'.
|
||||
APPEND g_tkebpfm.
|
||||
|
||||
CLEAR g_tkebpfm.
|
||||
g_tkebpfm-applclass = 'KE'.
|
||||
g_tkebpfm-subclass = '02'.
|
||||
g_tkebpfm-func = 'GITD'.
|
||||
g_tkebpfm-event = '21'.
|
||||
g_tkebpfm-funcmo = 'RKE_BP_CHECK_ALL_200'.
|
||||
APPEND g_tkebpfm.
|
||||
|
||||
CLEAR g_tkebpfm.
|
||||
g_tkebpfm-applclass = 'KE'.
|
||||
g_tkebpfm-subclass = '02'.
|
||||
g_tkebpfm-func = 'GITD'.
|
||||
g_tkebpfm-event = '30'.
|
||||
g_tkebpfm-funcmo = 'RKE_BP_CHECK_ALL'.
|
||||
APPEND g_tkebpfm.
|
||||
|
||||
*** new codes default off
|
||||
* g_fcodetab-ok_code = kepp_c_okcode-sfvw. COLLECT g_fcodetab.
|
||||
* g_fcodetab-ok_code = kepp_c_okcode-xtxt. COLLECT g_fcodetab.
|
||||
* g_fcodetab-ok_code = kepp_c_okcode-find. COLLECT g_fcodetab.
|
||||
* g_fcodetab-ok_code = kepp_c_okcode-fndp. COLLECT g_fcodetab.
|
||||
*
|
||||
* g_fcodetab-ok_code = kepp_c_okcode-pleb. COLLECT g_fcodetab.
|
||||
* g_fcodetab-ok_code = kepp_c_okcode-sela. COLLECT g_fcodetab.
|
||||
* g_fcodetab-ok_code = kepp_c_okcode-selk. COLLECT g_fcodetab.
|
||||
* g_fcodetab-ok_code = kepp_c_okcode-vaho. COLLECT g_fcodetab.
|
||||
* g_fcodetab-ok_code = kepp_c_okcode-vatr. COLLECT g_fcodetab.
|
||||
** IF sy-dynnr = kepp_c_dynnr-plebn.
|
||||
* IF sy-dynnr = kepp_c_dynnr-grnd.
|
||||
** DELETE g_fcodetab WHERE ok_code = kepp_c_okcode-xtxt.
|
||||
** DELETE g_fcodetab WHERE ok_code = kepp_c_okcode-find.
|
||||
** DELETE g_fcodetab WHERE ok_code = kepp_c_okcode-fndp.
|
||||
* ENDIF.
|
||||
|
||||
|
||||
|
||||
* READ TABLE g_tkebpfm WITH KEY event = '02'.
|
||||
* IF sy-subrc EQ 0.
|
||||
*
|
||||
* CALL FUNCTION g_tkebpfm-funcmo
|
||||
* EXPORTING
|
||||
* i_func = g_func
|
||||
* i_dnum = g_dnum
|
||||
* i_prog = kepp_c_prog
|
||||
* TABLES
|
||||
* pt_fcode = g_fcodetab.
|
||||
* ENDIF.
|
||||
ENDMODULE.
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Module INIT_201 OUTPUT
|
||||
*&---------------------------------------------------------------------*
|
||||
*&
|
||||
*&---------------------------------------------------------------------*
|
||||
MODULE init_201 OUTPUT.
|
||||
|
||||
PERFORM init_201.
|
||||
|
||||
ENDMODULE.
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Module HELP_LOW_200 INPUT
|
||||
*&---------------------------------------------------------------------*
|
||||
* text
|
||||
*----------------------------------------------------------------------*
|
||||
MODULE help_low_200 INPUT.
|
||||
|
||||
PERFORM help_low USING g_begin_200.
|
||||
|
||||
ENDMODULE.
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Module VAL_LOW_201 INPUT
|
||||
*&---------------------------------------------------------------------*
|
||||
* text
|
||||
*----------------------------------------------------------------------*
|
||||
MODULE val_low_201 INPUT.
|
||||
|
||||
PERFORM val_low_201 USING g_begin_200 kepp_c_sort_0200.
|
||||
|
||||
ENDMODULE.
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Module VAL_HIGH_201 INPUT
|
||||
*&---------------------------------------------------------------------*
|
||||
* text
|
||||
*----------------------------------------------------------------------*
|
||||
MODULE val_high_201 INPUT.
|
||||
|
||||
PERFORM val_high_201 USING g_begin_200 kepp_c_sort_0200.
|
||||
|
||||
ENDMODULE.
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Module LOOP_PBO_100 OUTPUT
|
||||
*&---------------------------------------------------------------------*
|
||||
*&
|
||||
*&---------------------------------------------------------------------*
|
||||
MODULE loop_pbo_100 OUTPUT.
|
||||
PERFORM loop_pbo_100.
|
||||
ENDMODULE.
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Module INIT_1100 OUTPUT
|
||||
*&---------------------------------------------------------------------*
|
||||
*&
|
||||
*&---------------------------------------------------------------------*
|
||||
MODULE init_1100 OUTPUT.
|
||||
|
||||
PERFORM init_1100.
|
||||
|
||||
ENDMODULE.
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Module LOOP_PBO_1100 OUTPUT
|
||||
*&---------------------------------------------------------------------*
|
||||
*&
|
||||
*&---------------------------------------------------------------------*
|
||||
MODULE loop_pbo_1100 OUTPUT.
|
||||
|
||||
PERFORM loop_pbo_1100.
|
||||
|
||||
ENDMODULE.
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Module GET_MARK_FROM_1100 INPUT
|
||||
*&---------------------------------------------------------------------*
|
||||
* text
|
||||
*----------------------------------------------------------------------*
|
||||
MODULE get_mark_from_1100 INPUT.
|
||||
|
||||
MODIFY gt_ref INDEX tc_ref-current_line
|
||||
TRANSPORTING mark.
|
||||
|
||||
ENDMODULE.
|
||||
@@ -0,0 +1,20 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<abapGit version="v1.0.0" serializer="LCL_OBJECT_PROG" serializer_version="v1.0.0">
|
||||
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||
<asx:values>
|
||||
<PROGDIR>
|
||||
<NAME>ZCOPATD0010O01</NAME>
|
||||
<SUBC>I</SUBC>
|
||||
<RLOAD>3</RLOAD>
|
||||
<UCCHECK>X</UCCHECK>
|
||||
</PROGDIR>
|
||||
<TPOOL>
|
||||
<item>
|
||||
<ID>R</ID>
|
||||
<ENTRY>Include ZCOPATD0010O01</ENTRY>
|
||||
<LENGTH>22</LENGTH>
|
||||
</item>
|
||||
</TPOOL>
|
||||
</asx:values>
|
||||
</asx:abap>
|
||||
</abapGit>
|
||||
@@ -0,0 +1,137 @@
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Include ZCOPATD0010TOP - Report ZCOPATD0010
|
||||
*&---------------------------------------------------------------------*
|
||||
REPORT zcopatd0010 MESSAGE-ID ztopdown.
|
||||
INCLUDE zcopatdcommtop . " 패키지 공용 Data
|
||||
|
||||
TABLES: cepl4a, t821t, tkepc, tkequs1t, tkeplexitt, tkeptrt,cepl4b.
|
||||
|
||||
* strategies
|
||||
CONSTANTS: g_c_distri LIKE tkepplsz-type VALUE '1'.
|
||||
CONSTANTS: g_c_forec LIKE tkepplsz-type VALUE '2'.
|
||||
CONSTANTS: g_c_reval LIKE tkepplsz-type VALUE '3'.
|
||||
CONSTANTS: g_c_treval LIKE tkepplsz-type VALUE '4'.
|
||||
CONSTANTS: true VALUE 'X', false VALUE space,
|
||||
ident_dim_curtp LIKE ceformf-field VALUE 'CURTP'.
|
||||
|
||||
DATA : g_topdown TYPE REF TO zcl_copa_topdown.
|
||||
|
||||
DATA: g_char_type.
|
||||
|
||||
TYPES:
|
||||
BEGIN OF ys_ref_on_screen,
|
||||
mark TYPE flag,
|
||||
fnam LIKE cedst-fnam.
|
||||
INCLUDE TYPE kepp_s_src.
|
||||
INCLUDE TYPE kepp_s_ref.
|
||||
TYPES:
|
||||
src_low_txt TYPE scrtext_m,
|
||||
src_high_txt TYPE scrtext_m,
|
||||
ref_low_txt TYPE scrtext_m,
|
||||
ref_high_txt TYPE scrtext_m,
|
||||
icon_more TYPE char5,
|
||||
icon_sel TYPE char5,
|
||||
END OF ys_ref_on_screen.
|
||||
|
||||
TYPES:
|
||||
BEGIN OF ys_0201,
|
||||
show_text,
|
||||
found_col TYPE fieldname,
|
||||
found_line TYPE int4,
|
||||
END OF ys_0201,
|
||||
|
||||
BEGIN OF ys_1100,
|
||||
fieldname TYPE fieldname,
|
||||
fieldname_txt TYPE scrtext_m,
|
||||
entry_count(8) TYPE n,
|
||||
cursor_line TYPE n,
|
||||
but_filter TYPE char5,
|
||||
but_filter_txt TYPE char30,
|
||||
found_col TYPE fieldname,
|
||||
found_line TYPE int4,
|
||||
show_text,
|
||||
show_from_to,
|
||||
col_optimize,
|
||||
|
||||
END OF ys_1100.
|
||||
|
||||
DATA: BEGIN OF g_fieldtabkey,
|
||||
tabname LIKE dd03p-tabname,
|
||||
fieldname LIKE dd03p-fieldname,
|
||||
END OF g_fieldtabkey.
|
||||
|
||||
|
||||
DATA: tscrol(1) OCCURS 0 WITH HEADER LINE.
|
||||
DATA: g_planmerk LIKE cepl5 OCCURS 0 WITH HEADER LINE.
|
||||
DATA: g_planwert LIKE cepl9 OCCURS 0 WITH HEADER LINE.
|
||||
|
||||
DATA: g_tkebpfm LIKE tkebpfm OCCURS 0 WITH HEADER LINE.
|
||||
DATA: gs_tkeb TYPE rkea1_v_tkeb.
|
||||
DATA: g_tkebpsf LIKE tkebpsf OCCURS 0 WITH HEADER LINE,
|
||||
gt_fnam TYPE kepp_t_fnam WITH HEADER LINE,
|
||||
gt_sort TYPE kepp_t_sort WITH HEADER LINE,
|
||||
gt_box TYPE kepp_t_box WITH HEADER LINE.
|
||||
|
||||
DATA :
|
||||
gt_backup_ref TYPE STANDARD TABLE OF ys_ref_on_screen
|
||||
WITH HEADER LINE,
|
||||
gt_backup_multi TYPE STANDARD TABLE OF ys_ref_on_screen
|
||||
WITH HEADER LINE.
|
||||
|
||||
DATA: g_fcodetab LIKE kpp0i OCCURS 0 WITH HEADER LINE.
|
||||
|
||||
DATA : g_exit(1),
|
||||
g_tfill_200 LIKE sy-tfill,
|
||||
g_func LIKE tkebpsf-func VALUE 'GITD',
|
||||
gs_0201 TYPE ys_0201,
|
||||
g_begin_200 LIKE sy-tabix,
|
||||
g_datar LIKE sy-datar,
|
||||
g_index_200 LIKE sy-tabix VALUE 1,
|
||||
g_ce0name LIKE dd03p-tabname VALUE 'CE01000',
|
||||
g_ce1name LIKE dd03p-tabname VALUE 'CE11000',
|
||||
g_tabname LIKE dd03p-tabname VALUE 'CEx1000',
|
||||
kepp_c_prog LIKE tkebpsf-prog VALUE 'SAPLKEPP',
|
||||
g_fcode LIKE kpp0i-ok_code,
|
||||
g_dnum LIKE tkebpsf-dnum VALUE '0200',
|
||||
g_fnam TYPE kepp_s_sel1-fnam,
|
||||
g_display(1),
|
||||
gt_chartab TYPE kepp_t_sel1 WITH HEADER LINE,
|
||||
gs_1100 TYPE ys_1100,
|
||||
g_first_pbo_1100 TYPE flag,
|
||||
g_loopc_200 LIKE sy-tabix,
|
||||
g_begin_1000 LIKE sy-tabix,
|
||||
g_tfill_1000 LIKE sy-tfill,
|
||||
g_loopc_1000 LIKE sy-tabix.
|
||||
|
||||
** curtp texts
|
||||
DATA: src_high TYPE char20,
|
||||
ref_high TYPE char20.
|
||||
|
||||
DATA: gs_bpsel TYPE kepp_s_bpsel,
|
||||
gt_old_sel TYPE kepp_t_sel1.
|
||||
|
||||
DATA: g_fieldtab TYPE rkea1_fieldtab WITH HEADER LINE.
|
||||
DATA: g_ftab_dep TYPE rkea1_t_depend WITH HEADER LINE.
|
||||
|
||||
DATA: g_erkrs LIKE tkeb-erkrs VALUE '1000',
|
||||
g_kokrs LIKE tka01-kokrs,
|
||||
g_pa_type LIKE ceddb-pa_type VALUE '1'.
|
||||
|
||||
DATA: subrc LIKE sy-subrc.
|
||||
|
||||
DATA:
|
||||
gt_ref TYPE STANDARD TABLE OF ys_ref_on_screen WITH HEADER LINE,
|
||||
gt_multi TYPE STANDARD TABLE OF ys_ref_on_screen WITH HEADER LINE.
|
||||
|
||||
CONTROLS:
|
||||
tctd_sk TYPE TABLEVIEW USING SCREEN '0100',
|
||||
tc_ref TYPE TABLEVIEW USING SCREEN '1100'.
|
||||
|
||||
|
||||
|
||||
*-- Selection Screen 입력값
|
||||
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE TEXT-s01.
|
||||
PARAMETERS: p_erkrs TYPE erkrs OBLIGATORY, "경영단위 코드
|
||||
p_perio TYPE jahrper OBLIGATORY, "기간(YYYYMM)
|
||||
p_varint TYPE covariant OBLIGATORY. "변형
|
||||
SELECTION-SCREEN END OF BLOCK b1.
|
||||
@@ -0,0 +1,21 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<abapGit version="v1.0.0" serializer="LCL_OBJECT_PROG" serializer_version="v1.0.0">
|
||||
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||
<asx:values>
|
||||
<PROGDIR>
|
||||
<NAME>ZCOPATD0010TOP</NAME>
|
||||
<SUBC>I</SUBC>
|
||||
<RSTAT>K</RSTAT>
|
||||
<RLOAD>3</RLOAD>
|
||||
<UCCHECK>X</UCCHECK>
|
||||
</PROGDIR>
|
||||
<TPOOL>
|
||||
<item>
|
||||
<ID>R</ID>
|
||||
<ENTRY>Include ZCOPATD0010TOP</ENTRY>
|
||||
<LENGTH>22</LENGTH>
|
||||
</item>
|
||||
</TPOOL>
|
||||
</asx:values>
|
||||
</asx:abap>
|
||||
</abapGit>
|
||||
@@ -0,0 +1,39 @@
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Report ZCOPATD0020
|
||||
*&---------------------------------------------------------------------*
|
||||
*&
|
||||
*&---------------------------------------------------------------------*
|
||||
|
||||
INCLUDE zcopatd0020top . " Global Data
|
||||
INCLUDE zcopatdcommF01 . " 패키지 Form-Routines
|
||||
INCLUDE zcopatd0020o01 . " PBO-Modules
|
||||
INCLUDE zcopatd0020i01 . " PAI-Modules
|
||||
INCLUDE zcopatd0020f01 . " FORM-Routines
|
||||
|
||||
|
||||
*----------------------------------------------------------------------*
|
||||
* INITIALIZATION *
|
||||
*----------------------------------------------------------------------*
|
||||
INITIALIZATION.
|
||||
PERFORM get_table_info. "패키지 DB Table 정보(필수 사전 작업)
|
||||
|
||||
*----------------------------------------------------------------------*
|
||||
* AT SELECTION-SCREEN *
|
||||
*----------------------------------------------------------------------*
|
||||
AT SELECTION-SCREEN.
|
||||
|
||||
|
||||
*----------------------------------------------------------------------*
|
||||
* START-OF-SELECTION.
|
||||
*----------------------------------------------------------------------*
|
||||
START-OF-SELECTION.
|
||||
|
||||
PERFORM show_progress(sapfztdpool) USING 30 '데이타 조회 중 입니다.'.
|
||||
|
||||
PERFORM select_data.
|
||||
|
||||
*----------------------------------------------------------------------*
|
||||
* END-OF-SELECTION.
|
||||
*----------------------------------------------------------------------*
|
||||
END-OF-SELECTION.
|
||||
CALL SCREEN 0100.
|
||||
@@ -0,0 +1,293 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<abapGit version="v1.0.0" serializer="LCL_OBJECT_PROG" serializer_version="v1.0.0">
|
||||
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||
<asx:values>
|
||||
<PROGDIR>
|
||||
<NAME>ZCOPATD0020</NAME>
|
||||
<SUBC>1</SUBC>
|
||||
<RSTAT>K</RSTAT>
|
||||
<RLOAD>3</RLOAD>
|
||||
<FIXPT>X</FIXPT>
|
||||
<UCCHECK>X</UCCHECK>
|
||||
</PROGDIR>
|
||||
<DYNPROS>
|
||||
<item>
|
||||
<HEADER>
|
||||
<PROGRAM>ZCOPATD0020</PROGRAM>
|
||||
<SCREEN>0100</SCREEN>
|
||||
<LANGUAGE>3</LANGUAGE>
|
||||
<DESCRIPT>조회</DESCRIPT>
|
||||
<TYPE>N</TYPE>
|
||||
<NEXTSCREEN>0100</NEXTSCREEN>
|
||||
<LINES>043</LINES>
|
||||
<COLUMNS>219</COLUMNS>
|
||||
</HEADER>
|
||||
<CONTAINERS>
|
||||
<RPY_DYCATT>
|
||||
<TYPE>SCREEN</TYPE>
|
||||
<NAME>SCREEN</NAME>
|
||||
</RPY_DYCATT>
|
||||
<RPY_DYCATT>
|
||||
<TYPE>CUST_CTRL</TYPE>
|
||||
<NAME>CONTAINER_LEFT</NAME>
|
||||
<ELEMENT_OF>SCREEN</ELEMENT_OF>
|
||||
<LINE>003</LINE>
|
||||
<COLUMN>002</COLUMN>
|
||||
<LENGTH>094</LENGTH>
|
||||
<HEIGHT>040</HEIGHT>
|
||||
<C_RESIZE_V>X</C_RESIZE_V>
|
||||
<C_RESIZE_H>X</C_RESIZE_H>
|
||||
<C_LINE_MIN>019</C_LINE_MIN>
|
||||
<C_COLN_MIN>040</C_COLN_MIN>
|
||||
</RPY_DYCATT>
|
||||
<RPY_DYCATT>
|
||||
<TYPE>CUST_CTRL</TYPE>
|
||||
<NAME>CONTAINER_RIGHT</NAME>
|
||||
<ELEMENT_OF>SCREEN</ELEMENT_OF>
|
||||
<LINE>003</LINE>
|
||||
<COLUMN>114</COLUMN>
|
||||
<LENGTH>094</LENGTH>
|
||||
<HEIGHT>040</HEIGHT>
|
||||
<C_RESIZE_V>X</C_RESIZE_V>
|
||||
<C_RESIZE_H>X</C_RESIZE_H>
|
||||
<C_LINE_MIN>019</C_LINE_MIN>
|
||||
<C_COLN_MIN>040</C_COLN_MIN>
|
||||
</RPY_DYCATT>
|
||||
</CONTAINERS>
|
||||
<FIELDS>
|
||||
<RPY_DYFATC>
|
||||
<CONT_TYPE>SCREEN</CONT_TYPE>
|
||||
<CONT_NAME>SCREEN</CONT_NAME>
|
||||
<TYPE>TEXT</TYPE>
|
||||
<NAME>%#AUTOTEXT001</NAME>
|
||||
<TEXT>전체_변형_리스트_______</TEXT>
|
||||
<LINE>002</LINE>
|
||||
<COLUMN>002</COLUMN>
|
||||
<LENGTH>016</LENGTH>
|
||||
<VISLENGTH>016</VISLENGTH>
|
||||
<HEIGHT>001</HEIGHT>
|
||||
<FORMAT>CHAR</FORMAT>
|
||||
<REQU_ENTRY>N</REQU_ENTRY>
|
||||
</RPY_DYFATC>
|
||||
<RPY_DYFATC>
|
||||
<CONT_TYPE>SCREEN</CONT_TYPE>
|
||||
<CONT_NAME>SCREEN</CONT_NAME>
|
||||
<TYPE>TEXT</TYPE>
|
||||
<NAME>%#AUTOTEXT002</NAME>
|
||||
<TEXT>선택_리스트_____</TEXT>
|
||||
<LINE>002</LINE>
|
||||
<COLUMN>114</COLUMN>
|
||||
<LENGTH>011</LENGTH>
|
||||
<VISLENGTH>011</VISLENGTH>
|
||||
<HEIGHT>001</HEIGHT>
|
||||
<FORMAT>CHAR</FORMAT>
|
||||
<REQU_ENTRY>N</REQU_ENTRY>
|
||||
</RPY_DYFATC>
|
||||
<RPY_DYFATC>
|
||||
<CONT_TYPE>SCREEN</CONT_TYPE>
|
||||
<CONT_NAME>SCREEN</CONT_NAME>
|
||||
<TYPE>PUSH</TYPE>
|
||||
<NAME>BTN_ADD</NAME>
|
||||
<TEXT>>>__지정__>>_____</TEXT>
|
||||
<LINE>008</LINE>
|
||||
<COLUMN>098</COLUMN>
|
||||
<LENGTH>015</LENGTH>
|
||||
<VISLENGTH>015</VISLENGTH>
|
||||
<HEIGHT>001</HEIGHT>
|
||||
<PUSH_FCODE>ADD</PUSH_FCODE>
|
||||
<FORMAT>CHAR</FORMAT>
|
||||
<REQU_ENTRY>N</REQU_ENTRY>
|
||||
</RPY_DYFATC>
|
||||
<RPY_DYFATC>
|
||||
<CONT_TYPE>SCREEN</CONT_TYPE>
|
||||
<CONT_NAME>SCREEN</CONT_NAME>
|
||||
<TYPE>PUSH</TYPE>
|
||||
<NAME>BTN_DEL</NAME>
|
||||
<TEXT><<__해제__<<_____</TEXT>
|
||||
<LINE>010</LINE>
|
||||
<COLUMN>098</COLUMN>
|
||||
<LENGTH>015</LENGTH>
|
||||
<VISLENGTH>015</VISLENGTH>
|
||||
<HEIGHT>001</HEIGHT>
|
||||
<PUSH_FCODE>DEL</PUSH_FCODE>
|
||||
<FORMAT>CHAR</FORMAT>
|
||||
<REQU_ENTRY>N</REQU_ENTRY>
|
||||
</RPY_DYFATC>
|
||||
<RPY_DYFATC>
|
||||
<CONT_TYPE>SCREEN</CONT_TYPE>
|
||||
<CONT_NAME>SCREEN</CONT_NAME>
|
||||
<TYPE>OKCODE</TYPE>
|
||||
<NAME>OK_CODE</NAME>
|
||||
<TEXT>____________________</TEXT>
|
||||
<LENGTH>020</LENGTH>
|
||||
<VISLENGTH>020</VISLENGTH>
|
||||
<HEIGHT>001</HEIGHT>
|
||||
<FORMAT>CHAR</FORMAT>
|
||||
<INPUT_FLD>X</INPUT_FLD>
|
||||
</RPY_DYFATC>
|
||||
</FIELDS>
|
||||
<FLOW_LOGIC>
|
||||
<RPY_DYFLOW>
|
||||
<LINE>PROCESS BEFORE OUTPUT.</LINE>
|
||||
</RPY_DYFLOW>
|
||||
<RPY_DYFLOW>
|
||||
<LINE> MODULE status_0100.</LINE>
|
||||
</RPY_DYFLOW>
|
||||
<RPY_DYFLOW>
|
||||
<LINE> MODULE init_object_010.</LINE>
|
||||
</RPY_DYFLOW>
|
||||
<RPY_DYFLOW/>
|
||||
<RPY_DYFLOW>
|
||||
<LINE>PROCESS AFTER INPUT.</LINE>
|
||||
</RPY_DYFLOW>
|
||||
<RPY_DYFLOW>
|
||||
<LINE> MODULE exit_0100 AT EXIT-COMMAND.</LINE>
|
||||
</RPY_DYFLOW>
|
||||
<RPY_DYFLOW>
|
||||
<LINE> MODULE user_command_0100.</LINE>
|
||||
</RPY_DYFLOW>
|
||||
</FLOW_LOGIC>
|
||||
</item>
|
||||
</DYNPROS>
|
||||
<CUA>
|
||||
<ADM>
|
||||
<ACTCODE>000001</ACTCODE>
|
||||
<PFKCODE>000001</PFKCODE>
|
||||
</ADM>
|
||||
<STA>
|
||||
<RSMPE_STAT>
|
||||
<CODE>0100</CODE>
|
||||
<MODAL>D</MODAL>
|
||||
<ACTCODE>000001</ACTCODE>
|
||||
<PFKCODE>000001</PFKCODE>
|
||||
<BUTCODE>0001</BUTCODE>
|
||||
<INT_NOTE>조회</INT_NOTE>
|
||||
</RSMPE_STAT>
|
||||
</STA>
|
||||
<FUN>
|
||||
<RSMPE_FUNT>
|
||||
<CODE>BACK</CODE>
|
||||
<TEXTNO>001</TEXTNO>
|
||||
<TYPE>E</TYPE>
|
||||
<TEXT_TYPE>S</TEXT_TYPE>
|
||||
<FUN_TEXT>뒤로</FUN_TEXT>
|
||||
</RSMPE_FUNT>
|
||||
<RSMPE_FUNT>
|
||||
<CODE>EXIT</CODE>
|
||||
<TEXTNO>001</TEXTNO>
|
||||
<TYPE>E</TYPE>
|
||||
<TEXT_TYPE>S</TEXT_TYPE>
|
||||
<TEXT_NAME>ICON_CANCEL</TEXT_NAME>
|
||||
<ICON_ID>@0W@</ICON_ID>
|
||||
<FUN_TEXT>취소</FUN_TEXT>
|
||||
</RSMPE_FUNT>
|
||||
<RSMPE_FUNT>
|
||||
<CODE>RW</CODE>
|
||||
<TEXTNO>001</TEXTNO>
|
||||
<TYPE>E</TYPE>
|
||||
<TEXT_TYPE>S</TEXT_TYPE>
|
||||
<FUN_TEXT>종료</FUN_TEXT>
|
||||
</RSMPE_FUNT>
|
||||
<RSMPE_FUNT>
|
||||
<CODE>SAVE</CODE>
|
||||
<TEXTNO>001</TEXTNO>
|
||||
<TEXT_TYPE>S</TEXT_TYPE>
|
||||
<TEXT_NAME>ICON_SYSTEM_SAVE</TEXT_NAME>
|
||||
<ICON_ID>@2L@</ICON_ID>
|
||||
<FUN_TEXT>저장</FUN_TEXT>
|
||||
</RSMPE_FUNT>
|
||||
</FUN>
|
||||
<PFK>
|
||||
<RSMPE_PFK>
|
||||
<CODE>000001</CODE>
|
||||
<PFNO>03</PFNO>
|
||||
<FUNCODE>BACK</FUNCODE>
|
||||
<FUNNO>001</FUNNO>
|
||||
</RSMPE_PFK>
|
||||
<RSMPE_PFK>
|
||||
<CODE>000001</CODE>
|
||||
<PFNO>11</PFNO>
|
||||
<FUNCODE>SAVE</FUNCODE>
|
||||
<FUNNO>001</FUNNO>
|
||||
</RSMPE_PFK>
|
||||
<RSMPE_PFK>
|
||||
<CODE>000001</CODE>
|
||||
<PFNO>12</PFNO>
|
||||
<FUNCODE>EXIT</FUNCODE>
|
||||
<FUNNO>001</FUNNO>
|
||||
</RSMPE_PFK>
|
||||
<RSMPE_PFK>
|
||||
<CODE>000001</CODE>
|
||||
<PFNO>15</PFNO>
|
||||
<FUNCODE>RW</FUNCODE>
|
||||
<FUNNO>001</FUNNO>
|
||||
</RSMPE_PFK>
|
||||
</PFK>
|
||||
<SET>
|
||||
<RSMPE_STAF>
|
||||
<STATUS>0100</STATUS>
|
||||
<FUNCTION>BACK</FUNCTION>
|
||||
</RSMPE_STAF>
|
||||
<RSMPE_STAF>
|
||||
<STATUS>0100</STATUS>
|
||||
<FUNCTION>EXIT</FUNCTION>
|
||||
</RSMPE_STAF>
|
||||
<RSMPE_STAF>
|
||||
<STATUS>0100</STATUS>
|
||||
<FUNCTION>RW</FUNCTION>
|
||||
</RSMPE_STAF>
|
||||
<RSMPE_STAF>
|
||||
<STATUS>0100</STATUS>
|
||||
<FUNCTION>SAVE</FUNCTION>
|
||||
</RSMPE_STAF>
|
||||
</SET>
|
||||
<DOC>
|
||||
<RSMPE_ATRT>
|
||||
<OBJ_TYPE>A</OBJ_TYPE>
|
||||
<OBJ_CODE>000001</OBJ_CODE>
|
||||
<MODAL>D</MODAL>
|
||||
<INT_NOTE>조회</INT_NOTE>
|
||||
</RSMPE_ATRT>
|
||||
<RSMPE_ATRT>
|
||||
<OBJ_TYPE>P</OBJ_TYPE>
|
||||
<OBJ_CODE>000001</OBJ_CODE>
|
||||
<MODAL>D</MODAL>
|
||||
<INT_NOTE>조회</INT_NOTE>
|
||||
</RSMPE_ATRT>
|
||||
<RSMPE_ATRT>
|
||||
<OBJ_TYPE>B</OBJ_TYPE>
|
||||
<OBJ_CODE>000001</OBJ_CODE>
|
||||
<SUB_CODE>0001</SUB_CODE>
|
||||
<MODAL>D</MODAL>
|
||||
<INT_NOTE>조회</INT_NOTE>
|
||||
</RSMPE_ATRT>
|
||||
</DOC>
|
||||
</CUA>
|
||||
<TPOOL>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>S01</KEY>
|
||||
<ENTRY>선택조건</ENTRY>
|
||||
<LENGTH>14</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>R</ID>
|
||||
<ENTRY>하향식 배부 사이클 지정</ENTRY>
|
||||
<LENGTH>13</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>S</ID>
|
||||
<KEY>P_ERKRS</KEY>
|
||||
<ENTRY>경영 단위</ENTRY>
|
||||
<LENGTH>13</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>S</ID>
|
||||
<KEY>P_PERIO</KEY>
|
||||
<ENTRY>기간/년도</ENTRY>
|
||||
<LENGTH>13</LENGTH>
|
||||
</item>
|
||||
</TPOOL>
|
||||
</asx:values>
|
||||
</asx:abap>
|
||||
</abapGit>
|
||||
@@ -0,0 +1,361 @@
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Include ZCOPATD0020F01
|
||||
*&---------------------------------------------------------------------*
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Form select_data
|
||||
*&---------------------------------------------------------------------*
|
||||
*& text
|
||||
*&---------------------------------------------------------------------*
|
||||
*& --> p1 text
|
||||
*& <-- p2 text
|
||||
*&---------------------------------------------------------------------*
|
||||
FORM select_data .
|
||||
PERFORM get_variant_list. "하향식 배부 변형 리스트 조회(좌측 grid)
|
||||
PERFORM get_selected_variant_list. "선택 변형 리스트 조회(우측 grid)
|
||||
|
||||
IF gt_covat_all[] IS INITIAL AND gt_covat_sel[] IS INITIAL.
|
||||
MESSAGE e006. "데이타가 존재하지 않습니다.
|
||||
ENDIF.
|
||||
|
||||
PERFORM exclude_variant_list. "이미 선택된 변형은 전체 리스트에서 제외
|
||||
ENDFORM.
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Form get_variant_list
|
||||
*&---------------------------------------------------------------------*
|
||||
*& text
|
||||
*&---------------------------------------------------------------------*
|
||||
*& --> p1 text
|
||||
*& <-- p2 text
|
||||
*&---------------------------------------------------------------------*
|
||||
FORM get_variant_list .
|
||||
|
||||
PERFORM get_variant_list(sapfztdpool) TABLES gt_covat_all
|
||||
USING p_erkrs.
|
||||
|
||||
ENDFORM.
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Form get_selected_variant_list
|
||||
*&---------------------------------------------------------------------*
|
||||
*& text
|
||||
*&---------------------------------------------------------------------*
|
||||
*& --> p1 text
|
||||
*& <-- p2 text
|
||||
*&---------------------------------------------------------------------*
|
||||
FORM get_selected_variant_list .
|
||||
|
||||
PERFORM get_target_variant(sapfztdpool) TABLES gt_covat_sel
|
||||
USING p_erkrs
|
||||
p_perio.
|
||||
|
||||
ENDFORM.
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Form create_object
|
||||
*&---------------------------------------------------------------------*
|
||||
*& text
|
||||
*&---------------------------------------------------------------------*
|
||||
*& --> p1 text
|
||||
*& <-- p2 text
|
||||
*&---------------------------------------------------------------------*
|
||||
FORM create_object .
|
||||
|
||||
PERFORM create_left_grid.
|
||||
PERFORM create_right_grid.
|
||||
|
||||
ENDFORM.
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Form create_left_grid
|
||||
*&---------------------------------------------------------------------*
|
||||
*& text
|
||||
*&---------------------------------------------------------------------*
|
||||
*& --> p1 text
|
||||
*& <-- p2 text
|
||||
*&---------------------------------------------------------------------*
|
||||
FORM create_left_grid .
|
||||
DATA : ls_layout TYPE lvc_s_layo.
|
||||
ls_layout-sel_mode = 'A'. " 행 선택 버튼 활성화
|
||||
|
||||
* 1. 컨테이너 생성
|
||||
CREATE OBJECT g_container_left
|
||||
EXPORTING
|
||||
container_name = 'CONTAINER_LEFT'.
|
||||
|
||||
* 2. ALV Grid 생성
|
||||
CREATE OBJECT g_grid_left
|
||||
EXPORTING
|
||||
i_parent = g_container_left.
|
||||
|
||||
* 3. 필드카탈로그 생성
|
||||
DATA: lt_fieldcat TYPE lvc_t_fcat.
|
||||
PERFORM set_field_catalog USING 'CONTAINER_LEFT' lt_fieldcat.
|
||||
|
||||
* 4. ALV Grid에 데이터와 필드카탈로그 전달하여 출력
|
||||
CALL METHOD g_grid_left->set_table_for_first_display
|
||||
EXPORTING
|
||||
is_layout = ls_layout
|
||||
CHANGING
|
||||
it_fieldcatalog = lt_fieldcat
|
||||
it_outtab = gt_covat_all.
|
||||
ENDFORM.
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Form create_right_grid
|
||||
*&---------------------------------------------------------------------*
|
||||
*& text
|
||||
*&---------------------------------------------------------------------*
|
||||
*& --> p1 text
|
||||
*& <-- p2 text
|
||||
*&---------------------------------------------------------------------*
|
||||
FORM create_right_grid .
|
||||
DATA : ls_layout TYPE lvc_s_layo.
|
||||
ls_layout-sel_mode = 'A'. " 행 선택 버튼 활성화
|
||||
|
||||
* 1. 컨테이너 생성
|
||||
CREATE OBJECT g_container_right
|
||||
EXPORTING
|
||||
container_name = 'CONTAINER_RIGHT'.
|
||||
|
||||
* 2. ALV Grid 생성
|
||||
CREATE OBJECT g_grid_right
|
||||
EXPORTING
|
||||
i_parent = g_container_right.
|
||||
|
||||
* 3. 필드카탈로그 생성
|
||||
DATA: lt_fieldcat TYPE lvc_t_fcat.
|
||||
PERFORM set_field_catalog USING 'CONTAINER_RIGHT' lt_fieldcat.
|
||||
|
||||
* 4. ALV Grid에 데이터와 필드카탈로그 전달하여 출력
|
||||
CALL METHOD g_grid_right->set_table_for_first_display
|
||||
EXPORTING
|
||||
is_layout = ls_layout
|
||||
CHANGING
|
||||
it_fieldcatalog = lt_fieldcat
|
||||
it_outtab = gt_covat_sel.
|
||||
ENDFORM.
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Form add_variant_select_item
|
||||
*&---------------------------------------------------------------------*
|
||||
*& text
|
||||
*&---------------------------------------------------------------------*
|
||||
*& --> p1 text
|
||||
*& <-- p2 text
|
||||
*&---------------------------------------------------------------------*
|
||||
FORM add_variant_select_item .
|
||||
DATA: lt_row TYPE lvc_t_roid,
|
||||
ls_row TYPE lvc_s_roid,
|
||||
ls_select TYPE ty_variant.
|
||||
|
||||
CALL METHOD g_grid_left->get_selected_rows
|
||||
IMPORTING
|
||||
et_row_no = lt_row.
|
||||
|
||||
IF lt_row[] IS INITIAL.
|
||||
MESSAGE s005 WITH '지정할 대상'.
|
||||
RETURN.
|
||||
ENDIF.
|
||||
|
||||
" 선택된 데이터 처리
|
||||
LOOP AT lt_row INTO ls_row.
|
||||
CLEAR : ls_select.
|
||||
|
||||
READ TABLE gt_covat_all INTO DATA(ls_data) INDEX ls_row-row_id.
|
||||
MOVE-CORRESPONDING ls_data TO ls_select.
|
||||
ls_select-perio = p_perio.
|
||||
APPEND ls_select TO gt_covat_sel.
|
||||
|
||||
ENDLOOP.
|
||||
|
||||
LOOP AT gt_covat_sel INTO DATA(ls_del).
|
||||
DELETE gt_covat_all WHERE variant = ls_del-variant.
|
||||
ENDLOOP.
|
||||
|
||||
ENDFORM.
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Form delete_variant_select_item
|
||||
*&---------------------------------------------------------------------*
|
||||
*& text
|
||||
*&---------------------------------------------------------------------*
|
||||
*& --> p1 text
|
||||
*& <-- p2 text
|
||||
*&---------------------------------------------------------------------*
|
||||
FORM delete_variant_select_item .
|
||||
DATA: lt_row TYPE lvc_t_roid,
|
||||
ls_row TYPE lvc_s_roid,
|
||||
ls_select TYPE ty_variant.
|
||||
|
||||
CALL METHOD g_grid_right->get_selected_rows
|
||||
IMPORTING
|
||||
et_row_no = lt_row.
|
||||
|
||||
IF lt_row[] IS INITIAL.
|
||||
MESSAGE e005 WITH '해제할 대상'.
|
||||
ENDIF.
|
||||
|
||||
" 선택된 데이터 사용 유무 점검
|
||||
LOOP AT lt_row INTO ls_row.
|
||||
READ TABLE gt_covat_sel INTO DATA(ls_data) INDEX ls_row-row_id.
|
||||
IF ls_data-sender = 'X' OR ls_data-receiver = 'X' OR ls_data-proc_dist = 'X'
|
||||
OR ls_data-post = 'X'.
|
||||
MESSAGE i001 WITH '지정을 취소'.
|
||||
RETURN.
|
||||
ENDIF.
|
||||
ENDLOOP.
|
||||
|
||||
LOOP AT lt_row INTO ls_row.
|
||||
READ TABLE gt_covat_sel INTO DATA(ls_sel) INDEX ls_row-row_id.
|
||||
APPEND ls_sel TO gt_covat_all. "지정 해제된 건은 다시 선택 대상으로 추가(이동)
|
||||
|
||||
ENDLOOP.
|
||||
|
||||
LOOP AT gt_covat_all INTO DATA(ls_del).
|
||||
DELETE gt_covat_sel WHERE variant = ls_del-variant.
|
||||
ENDLOOP.
|
||||
|
||||
ENDFORM.
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Form exclude_variant_list
|
||||
*&---------------------------------------------------------------------*
|
||||
*& text
|
||||
*&---------------------------------------------------------------------*
|
||||
*& --> p1 text
|
||||
*& <-- p2 text
|
||||
*&---------------------------------------------------------------------*
|
||||
FORM exclude_variant_list .
|
||||
LOOP AT gt_covat_sel INTO DATA(l_sel).
|
||||
"전체 변형 리스트 중에서, 이미 해당월 작업 대상으로 추가된 경우는 삭제.
|
||||
PERFORM delete_sel_itm_from_all USING l_sel-erkrs l_sel-variant.
|
||||
ENDLOOP.
|
||||
ENDFORM.
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Form delete_sel_itm_from_all
|
||||
*&---------------------------------------------------------------------*
|
||||
*& text
|
||||
*&---------------------------------------------------------------------*
|
||||
*& --> ERKRS
|
||||
*& --> VARIANT
|
||||
*&---------------------------------------------------------------------*
|
||||
FORM delete_sel_itm_from_all USING p_erkrs
|
||||
p_variant.
|
||||
DELETE gt_covat_all WHERE erkrs = p_erkrs
|
||||
AND variant = p_variant.
|
||||
ENDFORM.
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Form save_selected_variant
|
||||
*&---------------------------------------------------------------------*
|
||||
*& text
|
||||
*&---------------------------------------------------------------------*
|
||||
*& --> p1 text
|
||||
*& <-- p2 text
|
||||
*&---------------------------------------------------------------------*
|
||||
FORM save_selected_variant .
|
||||
DATA : ans TYPE c LENGTH 1.
|
||||
DATA lv_question TYPE string.
|
||||
|
||||
MESSAGE s002 INTO lv_question.
|
||||
|
||||
CALL FUNCTION 'POPUP_TO_CONFIRM'
|
||||
EXPORTING
|
||||
titlebar = '변형저장'
|
||||
text_question = lv_question
|
||||
text_button_1 = 'OK'
|
||||
icon_button_1 = 'ICON_CHECKED'
|
||||
text_button_2 = 'NO'
|
||||
icon_button_2 = 'ICON_NO'
|
||||
display_cancel_button = ' '
|
||||
popup_type = 'ICON_MESSAGE_ERROR'
|
||||
IMPORTING
|
||||
answer = ans.
|
||||
|
||||
IF ans = 2.
|
||||
RETURN.
|
||||
ENDIF.
|
||||
|
||||
DELETE FROM (gv_variant) WHERE erkrs = p_erkrs
|
||||
AND perio = p_perio.
|
||||
|
||||
MODIFY (gv_variant) FROM TABLE gt_covat_sel.
|
||||
IF sy-subrc NE 0.
|
||||
ROLLBACK WORK.
|
||||
MESSAGE e004 WITH '오류'.
|
||||
ENDIF.
|
||||
|
||||
"배부 기준 세부 정보 삭제(초기화)
|
||||
DELETE FROM (gv_distinfo) WHERE erkrs = p_erkrs
|
||||
AND perio = p_perio.
|
||||
|
||||
"기간/연도의 모든 배부 기준 세부 정보 재 생성 - Class 메소드 사용
|
||||
CREATE OBJECT g_top_down.
|
||||
|
||||
LOOP AT gt_covat_sel INTO DATA(ls_sel).
|
||||
|
||||
CALL METHOD g_top_down->set_variant_desc
|
||||
EXPORTING
|
||||
erkrs = p_erkrs
|
||||
variant = ls_sel-variant
|
||||
perio = p_perio.
|
||||
|
||||
ENDLOOP.
|
||||
|
||||
|
||||
|
||||
COMMIT WORK.
|
||||
MESSAGE s007 WITH '성공'.
|
||||
|
||||
ENDFORM.
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Form set_field_catalog
|
||||
*&---------------------------------------------------------------------*
|
||||
*& text
|
||||
*&---------------------------------------------------------------------*
|
||||
*& --> LT_FIELDCAT
|
||||
*&---------------------------------------------------------------------*
|
||||
FORM set_field_catalog USING VALUE(lv_container_name) TYPE c
|
||||
pt_fieldcat TYPE lvc_t_fcat.
|
||||
FIELD-SYMBOLS <ls_fcat> TYPE lvc_s_fcat.
|
||||
|
||||
* structure의 필드 얻기
|
||||
CALL FUNCTION 'LVC_FIELDCATALOG_MERGE'
|
||||
EXPORTING
|
||||
i_structure_name = 'ZSTOP_VARIANT'
|
||||
CHANGING
|
||||
ct_fieldcat = pt_fieldcat[]
|
||||
EXCEPTIONS
|
||||
inconsistent_interface = 1
|
||||
program_error = 2
|
||||
OTHERS = 3.
|
||||
IF sy-subrc <> 0.
|
||||
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
|
||||
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
|
||||
ENDIF.
|
||||
|
||||
LOOP AT pt_fieldcat ASSIGNING <ls_fcat>.
|
||||
CASE <ls_fcat>-fieldname.
|
||||
WHEN 'ERKRS'.
|
||||
<ls_fcat>-key = 'X'.
|
||||
WHEN 'PERIO'.
|
||||
IF LV_CONtainer_name = 'CONTAINER_LEFT'.
|
||||
<ls_fcat>-tech = 'X'.
|
||||
ELSE.
|
||||
<ls_fcat>-key = 'X'.
|
||||
ENDIF.
|
||||
WHEN 'VARIANT'.
|
||||
<ls_fcat>-key = 'X'.
|
||||
WHEN 'VTEXT'.
|
||||
<ls_fcat>-key = 'X'.
|
||||
WHEN 'SENDER'.
|
||||
<ls_fcat>-seltext = <ls_fcat>-coltext = '센더데이타 생성'.
|
||||
<ls_fcat>-col_opt = 'X'.
|
||||
WHEN 'RECEIVER'.
|
||||
<ls_fcat>-seltext = <ls_fcat>-coltext = '리시버 실적 집계'.
|
||||
<ls_fcat>-col_opt = 'X'.
|
||||
WHEN 'PROC_DIST'.
|
||||
<ls_fcat>-seltext = <ls_fcat>-coltext = '배부 수행'.
|
||||
<ls_fcat>-col_opt = 'X'.
|
||||
WHEN 'POST'.
|
||||
<ls_fcat>-seltext = <ls_fcat>-coltext = 'PA전표 전기'.
|
||||
<ls_fcat>-col_opt = 'X'.
|
||||
WHEN OTHERS.
|
||||
<ls_fcat>-tech = 'X'.
|
||||
ENDCASE.
|
||||
ENDLOOP.
|
||||
|
||||
|
||||
ENDFORM.
|
||||
@@ -0,0 +1,21 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<abapGit version="v1.0.0" serializer="LCL_OBJECT_PROG" serializer_version="v1.0.0">
|
||||
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||
<asx:values>
|
||||
<PROGDIR>
|
||||
<NAME>ZCOPATD0020F01</NAME>
|
||||
<SUBC>I</SUBC>
|
||||
<RSTAT>K</RSTAT>
|
||||
<RLOAD>3</RLOAD>
|
||||
<UCCHECK>X</UCCHECK>
|
||||
</PROGDIR>
|
||||
<TPOOL>
|
||||
<item>
|
||||
<ID>R</ID>
|
||||
<ENTRY>Include ZCOPATD0020F01</ENTRY>
|
||||
<LENGTH>22</LENGTH>
|
||||
</item>
|
||||
</TPOOL>
|
||||
</asx:values>
|
||||
</asx:abap>
|
||||
</abapGit>
|
||||
@@ -0,0 +1,33 @@
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Include ZCOPATD0020I01
|
||||
*&---------------------------------------------------------------------*
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Module USER_COMMAND_0100 INPUT
|
||||
*&---------------------------------------------------------------------*
|
||||
* text
|
||||
*----------------------------------------------------------------------*
|
||||
MODULE user_command_0100 INPUT.
|
||||
|
||||
CASE ok_code.
|
||||
WHEN 'ADD'.
|
||||
PERFORM add_variant_select_item.
|
||||
WHEN 'DEL'.
|
||||
PERFORM delete_variant_select_item.
|
||||
WHEN 'SAVE'.
|
||||
PERFORM save_selected_variant.
|
||||
ENDCASE.
|
||||
|
||||
CALL METHOD g_grid_left->refresh_table_display.
|
||||
CALL METHOD g_grid_right->refresh_table_display.
|
||||
ENDMODULE.
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Module EXIT_0100 INPUT
|
||||
*&---------------------------------------------------------------------*
|
||||
* text
|
||||
*----------------------------------------------------------------------*
|
||||
MODULE exit_0100 INPUT.
|
||||
CASE ok_code.
|
||||
WHEN 'BACK' OR 'RW' OR 'EXIT'.
|
||||
LEAVE TO SCREEN 0.
|
||||
ENDCASE.
|
||||
ENDMODULE.
|
||||
@@ -0,0 +1,21 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<abapGit version="v1.0.0" serializer="LCL_OBJECT_PROG" serializer_version="v1.0.0">
|
||||
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||
<asx:values>
|
||||
<PROGDIR>
|
||||
<NAME>ZCOPATD0020I01</NAME>
|
||||
<SUBC>I</SUBC>
|
||||
<RSTAT>K</RSTAT>
|
||||
<RLOAD>3</RLOAD>
|
||||
<UCCHECK>X</UCCHECK>
|
||||
</PROGDIR>
|
||||
<TPOOL>
|
||||
<item>
|
||||
<ID>R</ID>
|
||||
<ENTRY>Include ZCOPATD0020I01</ENTRY>
|
||||
<LENGTH>22</LENGTH>
|
||||
</item>
|
||||
</TPOOL>
|
||||
</asx:values>
|
||||
</asx:abap>
|
||||
</abapGit>
|
||||
@@ -0,0 +1,22 @@
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Include ZCOPATD0020O01
|
||||
*&---------------------------------------------------------------------*
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Module STATUS_0100 OUTPUT
|
||||
*&---------------------------------------------------------------------*
|
||||
*&
|
||||
*&---------------------------------------------------------------------*
|
||||
MODULE status_0100 OUTPUT.
|
||||
SET PF-STATUS '0100'.
|
||||
* SET TITLEBAR 'xxx'.
|
||||
ENDMODULE.
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Module INIT_OBJECT_010 OUTPUT
|
||||
*&---------------------------------------------------------------------*
|
||||
*&
|
||||
*&---------------------------------------------------------------------*
|
||||
MODULE init_object_010 OUTPUT.
|
||||
IF g_container_left IS INITIAL.
|
||||
PERFORM create_object.
|
||||
ENDIF.
|
||||
ENDMODULE.
|
||||
@@ -0,0 +1,21 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<abapGit version="v1.0.0" serializer="LCL_OBJECT_PROG" serializer_version="v1.0.0">
|
||||
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||
<asx:values>
|
||||
<PROGDIR>
|
||||
<NAME>ZCOPATD0020O01</NAME>
|
||||
<SUBC>I</SUBC>
|
||||
<RSTAT>K</RSTAT>
|
||||
<RLOAD>3</RLOAD>
|
||||
<UCCHECK>X</UCCHECK>
|
||||
</PROGDIR>
|
||||
<TPOOL>
|
||||
<item>
|
||||
<ID>R</ID>
|
||||
<ENTRY>Include ZCOPATD0020O01</ENTRY>
|
||||
<LENGTH>22</LENGTH>
|
||||
</item>
|
||||
</TPOOL>
|
||||
</asx:values>
|
||||
</asx:abap>
|
||||
</abapGit>
|
||||
@@ -0,0 +1,18 @@
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Include ZCOPATD0020TOP - Report ZCOPATD0020
|
||||
*&---------------------------------------------------------------------*
|
||||
REPORT zcopatd0020 MESSAGE-ID ztopdown.
|
||||
|
||||
INCLUDE zcopatdcommtop . " 패키지 공용 Data
|
||||
|
||||
*-- 내부 테이블/워크에어리어
|
||||
DATA: gt_covat_all TYPE TABLE OF ty_variant, "전체 목록(좌측)
|
||||
gt_covat_sel TYPE TABLE OF ty_variant. "선택 목록(우측)
|
||||
|
||||
*-- Selection Screen 입력값
|
||||
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE TEXT-s01.
|
||||
|
||||
PARAMETERS: p_erkrs TYPE erkrs OBLIGATORY, "경영단위 코드
|
||||
p_perio TYPE jahrper OBLIGATORY. "기간(YYYYMM)
|
||||
|
||||
SELECTION-SCREEN END OF BLOCK b1.
|
||||
@@ -0,0 +1,21 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<abapGit version="v1.0.0" serializer="LCL_OBJECT_PROG" serializer_version="v1.0.0">
|
||||
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||
<asx:values>
|
||||
<PROGDIR>
|
||||
<NAME>ZCOPATD0020TOP</NAME>
|
||||
<SUBC>I</SUBC>
|
||||
<RSTAT>K</RSTAT>
|
||||
<RLOAD>3</RLOAD>
|
||||
<UCCHECK>X</UCCHECK>
|
||||
</PROGDIR>
|
||||
<TPOOL>
|
||||
<item>
|
||||
<ID>R</ID>
|
||||
<ENTRY>Include ZCOPATD0020TOP</ENTRY>
|
||||
<LENGTH>22</LENGTH>
|
||||
</item>
|
||||
</TPOOL>
|
||||
</asx:values>
|
||||
</asx:abap>
|
||||
</abapGit>
|
||||
@@ -0,0 +1,42 @@
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Report ZCOPATD0030
|
||||
*&---------------------------------------------------------------------*
|
||||
*&
|
||||
*&---------------------------------------------------------------------*
|
||||
|
||||
INCLUDE zcopatd0030top . " Global Data
|
||||
INCLUDE ZCOPATD0030c01 . "Event.
|
||||
INCLUDE zcopatdcommF01 . " 패키지 Form-Routines
|
||||
INCLUDE zcopatd0030o01 . " PBO-Modules
|
||||
INCLUDE zcopatd0030i01 . " PAI-Modules
|
||||
INCLUDE zcopatd0030f01 . " FORM-Routines
|
||||
|
||||
*----------------------------------------------------------------------*
|
||||
* INITIALIZATION *
|
||||
*----------------------------------------------------------------------*
|
||||
INITIALIZATION.
|
||||
PERFORM get_table_info. "패키지 DB Table 정보(필수 사전 작업)
|
||||
|
||||
*----------------------------------------------------------------------*
|
||||
* AT SELECTION-SCREEN *
|
||||
*----------------------------------------------------------------------*
|
||||
AT SELECTION-SCREEN.
|
||||
|
||||
|
||||
*----------------------------------------------------------------------*
|
||||
* START-OF-SELECTION.
|
||||
*----------------------------------------------------------------------*
|
||||
START-OF-SELECTION.
|
||||
PERFORM show_progress(sapfztdpool) USING 30 '데이타 조회 중 입니다.'.
|
||||
|
||||
PERFORM select_data.
|
||||
PERFORM make_simple_tree_node.
|
||||
|
||||
* 하향식 배부 클래스 생성.
|
||||
PERFORM create_top_down_object.
|
||||
|
||||
*----------------------------------------------------------------------*
|
||||
* END-OF-SELECTION.
|
||||
*----------------------------------------------------------------------*
|
||||
END-OF-SELECTION.
|
||||
CALL SCREEN 0100.
|
||||
@@ -0,0 +1,626 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<abapGit version="v1.0.0" serializer="LCL_OBJECT_PROG" serializer_version="v1.0.0">
|
||||
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||
<asx:values>
|
||||
<PROGDIR>
|
||||
<NAME>ZCOPATD0030</NAME>
|
||||
<SUBC>1</SUBC>
|
||||
<RSTAT>K</RSTAT>
|
||||
<RLOAD>3</RLOAD>
|
||||
<FIXPT>X</FIXPT>
|
||||
<UCCHECK>X</UCCHECK>
|
||||
</PROGDIR>
|
||||
<DYNPROS>
|
||||
<item>
|
||||
<HEADER>
|
||||
<PROGRAM>ZCOPATD0030</PROGRAM>
|
||||
<SCREEN>0100</SCREEN>
|
||||
<LANGUAGE>3</LANGUAGE>
|
||||
<DESCRIPT>조회</DESCRIPT>
|
||||
<TYPE>N</TYPE>
|
||||
<NEXTSCREEN>0100</NEXTSCREEN>
|
||||
<LINES>045</LINES>
|
||||
<COLUMNS>218</COLUMNS>
|
||||
</HEADER>
|
||||
<CONTAINERS>
|
||||
<RPY_DYCATT>
|
||||
<TYPE>SCREEN</TYPE>
|
||||
<NAME>SCREEN</NAME>
|
||||
</RPY_DYCATT>
|
||||
<RPY_DYCATT>
|
||||
<TYPE>STRIP_CTRL</TYPE>
|
||||
<NAME>C_TAB</NAME>
|
||||
<ELEMENT_OF>SCREEN</ELEMENT_OF>
|
||||
<LINE>001</LINE>
|
||||
<COLUMN>001</COLUMN>
|
||||
<LENGTH>216</LENGTH>
|
||||
<HEIGHT>045</HEIGHT>
|
||||
<C_RESIZE_V>X</C_RESIZE_V>
|
||||
<C_RESIZE_H>X</C_RESIZE_H>
|
||||
<C_LINE_MIN>045</C_LINE_MIN>
|
||||
<C_COLN_MIN>216</C_COLN_MIN>
|
||||
</RPY_DYCATT>
|
||||
<RPY_DYCATT>
|
||||
<TYPE>SUBSCREEN</TYPE>
|
||||
<NAME>TAB1_SUB</NAME>
|
||||
<ELEMENT_OF>C_TAB</ELEMENT_OF>
|
||||
<LINE>003</LINE>
|
||||
<COLUMN>002</COLUMN>
|
||||
<LENGTH>214</LENGTH>
|
||||
<HEIGHT>042</HEIGHT>
|
||||
<C_RESIZE_V>X</C_RESIZE_V>
|
||||
<C_RESIZE_H>X</C_RESIZE_H>
|
||||
<C_LINE_MIN>003</C_LINE_MIN>
|
||||
<C_COLN_MIN>003</C_COLN_MIN>
|
||||
<C_SCROLL_V>X</C_SCROLL_V>
|
||||
<C_SCROLL_H>X</C_SCROLL_H>
|
||||
</RPY_DYCATT>
|
||||
<RPY_DYCATT>
|
||||
<TYPE>SUBSCREEN</TYPE>
|
||||
<NAME>TAB2_SUB</NAME>
|
||||
<ELEMENT_OF>C_TAB</ELEMENT_OF>
|
||||
<LINE>003</LINE>
|
||||
<COLUMN>002</COLUMN>
|
||||
<LENGTH>214</LENGTH>
|
||||
<HEIGHT>042</HEIGHT>
|
||||
<C_RESIZE_V>X</C_RESIZE_V>
|
||||
<C_RESIZE_H>X</C_RESIZE_H>
|
||||
<C_LINE_MIN>003</C_LINE_MIN>
|
||||
<C_COLN_MIN>003</C_COLN_MIN>
|
||||
<C_SCROLL_V>X</C_SCROLL_V>
|
||||
<C_SCROLL_H>X</C_SCROLL_H>
|
||||
</RPY_DYCATT>
|
||||
<RPY_DYCATT>
|
||||
<TYPE>SUBSCREEN</TYPE>
|
||||
<NAME>TAB3_SUB</NAME>
|
||||
<ELEMENT_OF>C_TAB</ELEMENT_OF>
|
||||
<LINE>003</LINE>
|
||||
<COLUMN>002</COLUMN>
|
||||
<LENGTH>214</LENGTH>
|
||||
<HEIGHT>042</HEIGHT>
|
||||
<C_RESIZE_V>X</C_RESIZE_V>
|
||||
<C_RESIZE_H>X</C_RESIZE_H>
|
||||
<C_LINE_MIN>003</C_LINE_MIN>
|
||||
<C_COLN_MIN>003</C_COLN_MIN>
|
||||
<C_SCROLL_V>X</C_SCROLL_V>
|
||||
<C_SCROLL_H>X</C_SCROLL_H>
|
||||
</RPY_DYCATT>
|
||||
</CONTAINERS>
|
||||
<FIELDS>
|
||||
<RPY_DYFATC>
|
||||
<CONT_TYPE>SCREEN</CONT_TYPE>
|
||||
<CONT_NAME>SCREEN</CONT_NAME>
|
||||
<TYPE>OKCODE</TYPE>
|
||||
<NAME>OK_CODE</NAME>
|
||||
<TEXT>____________________</TEXT>
|
||||
<LENGTH>020</LENGTH>
|
||||
<VISLENGTH>020</VISLENGTH>
|
||||
<HEIGHT>001</HEIGHT>
|
||||
<FORMAT>CHAR</FORMAT>
|
||||
<INPUT_FLD>X</INPUT_FLD>
|
||||
</RPY_DYFATC>
|
||||
<RPY_DYFATC>
|
||||
<CONT_TYPE>STRIP_CTRL</CONT_TYPE>
|
||||
<CONT_NAME>C_TAB</CONT_NAME>
|
||||
<TYPE>PUSH</TYPE>
|
||||
<NAME>TAB1</NAME>
|
||||
<TEXT>리시버___</TEXT>
|
||||
<LINE>001</LINE>
|
||||
<COLUMN>001</COLUMN>
|
||||
<LENGTH>006</LENGTH>
|
||||
<VISLENGTH>006</VISLENGTH>
|
||||
<HEIGHT>001</HEIGHT>
|
||||
<PUSH_FCODE>TAB1</PUSH_FCODE>
|
||||
<FORMAT>CHAR</FORMAT>
|
||||
<REQU_ENTRY>N</REQU_ENTRY>
|
||||
<REF_FIELD>TAB1_SUB</REF_FIELD>
|
||||
</RPY_DYFATC>
|
||||
<RPY_DYFATC>
|
||||
<CONT_TYPE>STRIP_CTRL</CONT_TYPE>
|
||||
<CONT_NAME>C_TAB</CONT_NAME>
|
||||
<TYPE>PUSH</TYPE>
|
||||
<NAME>TAB2</NAME>
|
||||
<TEXT>배부결과____</TEXT>
|
||||
<LINE>001</LINE>
|
||||
<COLUMN>002</COLUMN>
|
||||
<LENGTH>008</LENGTH>
|
||||
<VISLENGTH>008</VISLENGTH>
|
||||
<HEIGHT>001</HEIGHT>
|
||||
<PUSH_FCODE>TAB2</PUSH_FCODE>
|
||||
<FORMAT>CHAR</FORMAT>
|
||||
<REQU_ENTRY>N</REQU_ENTRY>
|
||||
<REF_FIELD>TAB2_SUB</REF_FIELD>
|
||||
</RPY_DYFATC>
|
||||
<RPY_DYFATC>
|
||||
<CONT_TYPE>STRIP_CTRL</CONT_TYPE>
|
||||
<CONT_NAME>C_TAB</CONT_NAME>
|
||||
<TYPE>PUSH</TYPE>
|
||||
<NAME>TAB3</NAME>
|
||||
<TEXT>CO-PA_전표__</TEXT>
|
||||
<LINE>001</LINE>
|
||||
<COLUMN>003</COLUMN>
|
||||
<LENGTH>010</LENGTH>
|
||||
<VISLENGTH>010</VISLENGTH>
|
||||
<HEIGHT>001</HEIGHT>
|
||||
<PUSH_FCODE>TAB3</PUSH_FCODE>
|
||||
<FORMAT>CHAR</FORMAT>
|
||||
<REQU_ENTRY>N</REQU_ENTRY>
|
||||
<REF_FIELD>TAB3_SUB</REF_FIELD>
|
||||
</RPY_DYFATC>
|
||||
</FIELDS>
|
||||
<FLOW_LOGIC>
|
||||
<RPY_DYFLOW>
|
||||
<LINE>PROCESS BEFORE OUTPUT.</LINE>
|
||||
</RPY_DYFLOW>
|
||||
<RPY_DYFLOW>
|
||||
<LINE> MODULE status_0100.</LINE>
|
||||
</RPY_DYFLOW>
|
||||
<RPY_DYFLOW>
|
||||
<LINE> MODULE init_object_010.</LINE>
|
||||
</RPY_DYFLOW>
|
||||
<RPY_DYFLOW>
|
||||
<LINE> MODULE set_tabs.</LINE>
|
||||
</RPY_DYFLOW>
|
||||
<RPY_DYFLOW/>
|
||||
<RPY_DYFLOW>
|
||||
<LINE> CALL SUBSCREEN tab1_sub INCLUDING sy-repid '0101'.</LINE>
|
||||
</RPY_DYFLOW>
|
||||
<RPY_DYFLOW>
|
||||
<LINE> CALL SUBSCREEN tab2_sub INCLUDING sy-repid '0102'.</LINE>
|
||||
</RPY_DYFLOW>
|
||||
<RPY_DYFLOW>
|
||||
<LINE> CALL SUBSCREEN tab3_sub INCLUDING sy-repid '0103'.</LINE>
|
||||
</RPY_DYFLOW>
|
||||
<RPY_DYFLOW/>
|
||||
<RPY_DYFLOW/>
|
||||
<RPY_DYFLOW>
|
||||
<LINE>PROCESS AFTER INPUT.</LINE>
|
||||
</RPY_DYFLOW>
|
||||
<RPY_DYFLOW>
|
||||
<LINE> MODULE exit_0100 AT EXIT-COMMAND.</LINE>
|
||||
</RPY_DYFLOW>
|
||||
<RPY_DYFLOW>
|
||||
<LINE> MODULE user_command_0100.</LINE>
|
||||
</RPY_DYFLOW>
|
||||
<RPY_DYFLOW/>
|
||||
<RPY_DYFLOW>
|
||||
<LINE> CALL SUBSCREEN tab1_sub.</LINE>
|
||||
</RPY_DYFLOW>
|
||||
<RPY_DYFLOW>
|
||||
<LINE> CALL SUBSCREEN tab2_sub.</LINE>
|
||||
</RPY_DYFLOW>
|
||||
<RPY_DYFLOW>
|
||||
<LINE> CALL SUBSCREEN tab3_sub.</LINE>
|
||||
</RPY_DYFLOW>
|
||||
</FLOW_LOGIC>
|
||||
</item>
|
||||
<item>
|
||||
<HEADER>
|
||||
<PROGRAM>ZCOPATD0030</PROGRAM>
|
||||
<SCREEN>0101</SCREEN>
|
||||
<LANGUAGE>3</LANGUAGE>
|
||||
<DESCRIPT>조회</DESCRIPT>
|
||||
<TYPE>I</TYPE>
|
||||
<NEXTSCREEN>0101</NEXTSCREEN>
|
||||
<LINES>045</LINES>
|
||||
<COLUMNS>217</COLUMNS>
|
||||
</HEADER>
|
||||
<CONTAINERS>
|
||||
<RPY_DYCATT>
|
||||
<TYPE>SCREEN</TYPE>
|
||||
<NAME>SCREEN</NAME>
|
||||
</RPY_DYCATT>
|
||||
<RPY_DYCATT>
|
||||
<TYPE>CUST_CTRL</TYPE>
|
||||
<NAME>C_TAB1</NAME>
|
||||
<ELEMENT_OF>SCREEN</ELEMENT_OF>
|
||||
<LINE>001</LINE>
|
||||
<COLUMN>001</COLUMN>
|
||||
<LENGTH>217</LENGTH>
|
||||
<HEIGHT>045</HEIGHT>
|
||||
<C_RESIZE_V>X</C_RESIZE_V>
|
||||
<C_RESIZE_H>X</C_RESIZE_H>
|
||||
<C_LINE_MIN>001</C_LINE_MIN>
|
||||
<C_COLN_MIN>108</C_COLN_MIN>
|
||||
</RPY_DYCATT>
|
||||
</CONTAINERS>
|
||||
<FIELDS>
|
||||
<RPY_DYFATC>
|
||||
<CONT_TYPE>SCREEN</CONT_TYPE>
|
||||
<CONT_NAME>SCREEN</CONT_NAME>
|
||||
<TYPE>OKCODE</TYPE>
|
||||
<TEXT>____________________</TEXT>
|
||||
<LENGTH>020</LENGTH>
|
||||
<VISLENGTH>020</VISLENGTH>
|
||||
<HEIGHT>001</HEIGHT>
|
||||
<FORMAT>CHAR</FORMAT>
|
||||
<INPUT_FLD>X</INPUT_FLD>
|
||||
</RPY_DYFATC>
|
||||
</FIELDS>
|
||||
<FLOW_LOGIC>
|
||||
<RPY_DYFLOW>
|
||||
<LINE>PROCESS BEFORE OUTPUT.</LINE>
|
||||
</RPY_DYFLOW>
|
||||
<RPY_DYFLOW>
|
||||
<LINE> MODULE tab1_pbo.</LINE>
|
||||
</RPY_DYFLOW>
|
||||
<RPY_DYFLOW/>
|
||||
<RPY_DYFLOW>
|
||||
<LINE>PROCESS AFTER INPUT.</LINE>
|
||||
</RPY_DYFLOW>
|
||||
<RPY_DYFLOW>
|
||||
<LINE>* MODULE USER_COMMAND_0201.</LINE>
|
||||
</RPY_DYFLOW>
|
||||
</FLOW_LOGIC>
|
||||
</item>
|
||||
<item>
|
||||
<HEADER>
|
||||
<PROGRAM>ZCOPATD0030</PROGRAM>
|
||||
<SCREEN>0102</SCREEN>
|
||||
<LANGUAGE>3</LANGUAGE>
|
||||
<DESCRIPT>조회</DESCRIPT>
|
||||
<TYPE>I</TYPE>
|
||||
<NEXTSCREEN>0102</NEXTSCREEN>
|
||||
<LINES>045</LINES>
|
||||
<COLUMNS>218</COLUMNS>
|
||||
</HEADER>
|
||||
<CONTAINERS>
|
||||
<RPY_DYCATT>
|
||||
<TYPE>SCREEN</TYPE>
|
||||
<NAME>SCREEN</NAME>
|
||||
</RPY_DYCATT>
|
||||
<RPY_DYCATT>
|
||||
<TYPE>CUST_CTRL</TYPE>
|
||||
<NAME>C_TAB2</NAME>
|
||||
<ELEMENT_OF>SCREEN</ELEMENT_OF>
|
||||
<LINE>001</LINE>
|
||||
<COLUMN>001</COLUMN>
|
||||
<LENGTH>218</LENGTH>
|
||||
<HEIGHT>045</HEIGHT>
|
||||
<C_RESIZE_V>X</C_RESIZE_V>
|
||||
<C_RESIZE_H>X</C_RESIZE_H>
|
||||
<C_LINE_MIN>020</C_LINE_MIN>
|
||||
<C_COLN_MIN>109</C_COLN_MIN>
|
||||
</RPY_DYCATT>
|
||||
</CONTAINERS>
|
||||
<FIELDS>
|
||||
<RPY_DYFATC>
|
||||
<CONT_TYPE>SCREEN</CONT_TYPE>
|
||||
<CONT_NAME>SCREEN</CONT_NAME>
|
||||
<TYPE>OKCODE</TYPE>
|
||||
<TEXT>____________________</TEXT>
|
||||
<LENGTH>020</LENGTH>
|
||||
<VISLENGTH>020</VISLENGTH>
|
||||
<HEIGHT>001</HEIGHT>
|
||||
<FORMAT>CHAR</FORMAT>
|
||||
<INPUT_FLD>X</INPUT_FLD>
|
||||
</RPY_DYFATC>
|
||||
</FIELDS>
|
||||
<FLOW_LOGIC>
|
||||
<RPY_DYFLOW>
|
||||
<LINE>PROCESS BEFORE OUTPUT.</LINE>
|
||||
</RPY_DYFLOW>
|
||||
<RPY_DYFLOW>
|
||||
<LINE> MODULE tab2_pbo.</LINE>
|
||||
</RPY_DYFLOW>
|
||||
<RPY_DYFLOW/>
|
||||
<RPY_DYFLOW>
|
||||
<LINE>PROCESS AFTER INPUT.</LINE>
|
||||
</RPY_DYFLOW>
|
||||
<RPY_DYFLOW>
|
||||
<LINE>* MODULE USER_COMMAND_0202.</LINE>
|
||||
</RPY_DYFLOW>
|
||||
</FLOW_LOGIC>
|
||||
</item>
|
||||
<item>
|
||||
<HEADER>
|
||||
<PROGRAM>ZCOPATD0030</PROGRAM>
|
||||
<SCREEN>0103</SCREEN>
|
||||
<LANGUAGE>3</LANGUAGE>
|
||||
<DESCRIPT>조회</DESCRIPT>
|
||||
<TYPE>I</TYPE>
|
||||
<NEXTSCREEN>0103</NEXTSCREEN>
|
||||
<LINES>045</LINES>
|
||||
<COLUMNS>218</COLUMNS>
|
||||
</HEADER>
|
||||
<CONTAINERS>
|
||||
<RPY_DYCATT>
|
||||
<TYPE>SCREEN</TYPE>
|
||||
<NAME>SCREEN</NAME>
|
||||
</RPY_DYCATT>
|
||||
<RPY_DYCATT>
|
||||
<TYPE>CUST_CTRL</TYPE>
|
||||
<NAME>C_TAB3</NAME>
|
||||
<ELEMENT_OF>SCREEN</ELEMENT_OF>
|
||||
<LINE>001</LINE>
|
||||
<COLUMN>001</COLUMN>
|
||||
<LENGTH>218</LENGTH>
|
||||
<HEIGHT>045</HEIGHT>
|
||||
<C_RESIZE_V>X</C_RESIZE_V>
|
||||
<C_RESIZE_H>X</C_RESIZE_H>
|
||||
<C_LINE_MIN>020</C_LINE_MIN>
|
||||
<C_COLN_MIN>109</C_COLN_MIN>
|
||||
</RPY_DYCATT>
|
||||
</CONTAINERS>
|
||||
<FIELDS>
|
||||
<RPY_DYFATC>
|
||||
<CONT_TYPE>SCREEN</CONT_TYPE>
|
||||
<CONT_NAME>SCREEN</CONT_NAME>
|
||||
<TYPE>OKCODE</TYPE>
|
||||
<TEXT>____________________</TEXT>
|
||||
<LENGTH>020</LENGTH>
|
||||
<VISLENGTH>020</VISLENGTH>
|
||||
<HEIGHT>001</HEIGHT>
|
||||
<FORMAT>CHAR</FORMAT>
|
||||
<INPUT_FLD>X</INPUT_FLD>
|
||||
</RPY_DYFATC>
|
||||
</FIELDS>
|
||||
<FLOW_LOGIC>
|
||||
<RPY_DYFLOW>
|
||||
<LINE>PROCESS BEFORE OUTPUT.</LINE>
|
||||
</RPY_DYFLOW>
|
||||
<RPY_DYFLOW>
|
||||
<LINE> MODULE tab3_pbo.</LINE>
|
||||
</RPY_DYFLOW>
|
||||
<RPY_DYFLOW/>
|
||||
<RPY_DYFLOW>
|
||||
<LINE>PROCESS AFTER INPUT.</LINE>
|
||||
</RPY_DYFLOW>
|
||||
<RPY_DYFLOW>
|
||||
<LINE>* MODULE USER_COMMAND_0202.</LINE>
|
||||
</RPY_DYFLOW>
|
||||
</FLOW_LOGIC>
|
||||
</item>
|
||||
</DYNPROS>
|
||||
<CUA>
|
||||
<ADM>
|
||||
<ACTCODE>000001</ACTCODE>
|
||||
<PFKCODE>000001</PFKCODE>
|
||||
</ADM>
|
||||
<STA>
|
||||
<RSMPE_STAT>
|
||||
<CODE>0100</CODE>
|
||||
<MODAL>D</MODAL>
|
||||
<ACTCODE>000001</ACTCODE>
|
||||
<PFKCODE>000001</PFKCODE>
|
||||
<BUTCODE>0001</BUTCODE>
|
||||
<INT_NOTE>조회</INT_NOTE>
|
||||
</RSMPE_STAT>
|
||||
</STA>
|
||||
<FUN>
|
||||
<RSMPE_FUNT>
|
||||
<CODE>BACK</CODE>
|
||||
<TEXTNO>001</TEXTNO>
|
||||
<TYPE>E</TYPE>
|
||||
<TEXT_TYPE>S</TEXT_TYPE>
|
||||
<FUN_TEXT>뒤로</FUN_TEXT>
|
||||
</RSMPE_FUNT>
|
||||
<RSMPE_FUNT>
|
||||
<CODE>CONFIRM</CODE>
|
||||
<TEXTNO>001</TEXTNO>
|
||||
<TEXT_TYPE>S</TEXT_TYPE>
|
||||
<TEXT_NAME>ICON_WORKING_PLAN</TEXT_NAME>
|
||||
<ICON_ID>@AJ@</ICON_ID>
|
||||
<FUN_TEXT>ICON_WORKING_PLAN</FUN_TEXT>
|
||||
<ICON_TEXT>배부기준 확정</ICON_TEXT>
|
||||
<INFO_TEXT>배부기준 확정</INFO_TEXT>
|
||||
</RSMPE_FUNT>
|
||||
<RSMPE_FUNT>
|
||||
<CODE>DELETE</CODE>
|
||||
<TEXTNO>001</TEXTNO>
|
||||
<TEXT_TYPE>S</TEXT_TYPE>
|
||||
<TEXT_NAME>ICON_DELETE_TEMPLATE</TEXT_NAME>
|
||||
<ICON_ID>@Q0@</ICON_ID>
|
||||
<FUN_TEXT>센더/리시버 데이타 삭제</FUN_TEXT>
|
||||
<ICON_TEXT>센더/리시버 데이타 삭제</ICON_TEXT>
|
||||
<INFO_TEXT>센더/리시버 데이타 삭제합니다.</INFO_TEXT>
|
||||
</RSMPE_FUNT>
|
||||
<RSMPE_FUNT>
|
||||
<CODE>EXEC</CODE>
|
||||
<TEXTNO>001</TEXTNO>
|
||||
<TEXT_TYPE>S</TEXT_TYPE>
|
||||
<TEXT_NAME>ICON_EXECUTE_OBJECT</TEXT_NAME>
|
||||
<ICON_ID>@15@</ICON_ID>
|
||||
<FUN_TEXT>하향식 배부 실행</FUN_TEXT>
|
||||
<ICON_TEXT>하향식 배부 실행</ICON_TEXT>
|
||||
<INFO_TEXT>하향식 배부 실제 수행</INFO_TEXT>
|
||||
</RSMPE_FUNT>
|
||||
<RSMPE_FUNT>
|
||||
<CODE>EXIT</CODE>
|
||||
<TEXTNO>001</TEXTNO>
|
||||
<TYPE>E</TYPE>
|
||||
<TEXT_TYPE>S</TEXT_TYPE>
|
||||
<TEXT_NAME>ICON_CANCEL</TEXT_NAME>
|
||||
<ICON_ID>@0W@</ICON_ID>
|
||||
<FUN_TEXT>취소</FUN_TEXT>
|
||||
</RSMPE_FUNT>
|
||||
<RSMPE_FUNT>
|
||||
<CODE>POST</CODE>
|
||||
<TEXTNO>001</TEXTNO>
|
||||
<TEXT_TYPE>S</TEXT_TYPE>
|
||||
<TEXT_NAME>ICON_SYSTEM_SAVE</TEXT_NAME>
|
||||
<ICON_ID>@2L@</ICON_ID>
|
||||
<FUN_TEXT>POST</FUN_TEXT>
|
||||
<ICON_TEXT>전표전기</ICON_TEXT>
|
||||
<INFO_TEXT>전표전기</INFO_TEXT>
|
||||
</RSMPE_FUNT>
|
||||
<RSMPE_FUNT>
|
||||
<CODE>REGEN</CODE>
|
||||
<TEXTNO>001</TEXTNO>
|
||||
<TEXT_TYPE>S</TEXT_TYPE>
|
||||
<TEXT_NAME>ICON_WRITE_FILE</TEXT_NAME>
|
||||
<ICON_ID>@HK@</ICON_ID>
|
||||
<FUN_TEXT>센더/리시버 데이타 추출</FUN_TEXT>
|
||||
<ICON_TEXT>센더/리시버 데이타 추출</ICON_TEXT>
|
||||
<INFO_TEXT>센더/리시버 데이타 추출합니다.</INFO_TEXT>
|
||||
</RSMPE_FUNT>
|
||||
<RSMPE_FUNT>
|
||||
<CODE>RW</CODE>
|
||||
<TEXTNO>001</TEXTNO>
|
||||
<TYPE>E</TYPE>
|
||||
<TEXT_TYPE>S</TEXT_TYPE>
|
||||
<FUN_TEXT>종료</FUN_TEXT>
|
||||
</RSMPE_FUNT>
|
||||
<RSMPE_FUNT>
|
||||
<CODE>SAVE</CODE>
|
||||
<TEXTNO>001</TEXTNO>
|
||||
<TEXT_TYPE>S</TEXT_TYPE>
|
||||
<TEXT_NAME>ICON_SYSTEM_SAVE</TEXT_NAME>
|
||||
<ICON_ID>@2L@</ICON_ID>
|
||||
<FUN_TEXT>저장</FUN_TEXT>
|
||||
</RSMPE_FUNT>
|
||||
</FUN>
|
||||
<BUT>
|
||||
<RSMPE_BUT>
|
||||
<PFK_CODE>000001</PFK_CODE>
|
||||
<CODE>0001</CODE>
|
||||
<NO>01</NO>
|
||||
<PFNO>18</PFNO>
|
||||
</RSMPE_BUT>
|
||||
<RSMPE_BUT>
|
||||
<PFK_CODE>000001</PFK_CODE>
|
||||
<CODE>0001</CODE>
|
||||
<NO>02</NO>
|
||||
<PFNO>21</PFNO>
|
||||
</RSMPE_BUT>
|
||||
<RSMPE_BUT>
|
||||
<PFK_CODE>000001</PFK_CODE>
|
||||
<CODE>0001</CODE>
|
||||
<NO>03</NO>
|
||||
<PFNO>20</PFNO>
|
||||
</RSMPE_BUT>
|
||||
<RSMPE_BUT>
|
||||
<PFK_CODE>000001</PFK_CODE>
|
||||
<CODE>0001</CODE>
|
||||
<NO>04</NO>
|
||||
<PFNO>23</PFNO>
|
||||
</RSMPE_BUT>
|
||||
</BUT>
|
||||
<PFK>
|
||||
<RSMPE_PFK>
|
||||
<CODE>000001</CODE>
|
||||
<PFNO>03</PFNO>
|
||||
<FUNCODE>BACK</FUNCODE>
|
||||
<FUNNO>001</FUNNO>
|
||||
</RSMPE_PFK>
|
||||
<RSMPE_PFK>
|
||||
<CODE>000001</CODE>
|
||||
<PFNO>12</PFNO>
|
||||
<FUNCODE>EXIT</FUNCODE>
|
||||
<FUNNO>001</FUNNO>
|
||||
</RSMPE_PFK>
|
||||
<RSMPE_PFK>
|
||||
<CODE>000001</CODE>
|
||||
<PFNO>15</PFNO>
|
||||
<FUNCODE>RW</FUNCODE>
|
||||
<FUNNO>001</FUNNO>
|
||||
</RSMPE_PFK>
|
||||
<RSMPE_PFK>
|
||||
<CODE>000001</CODE>
|
||||
<PFNO>18</PFNO>
|
||||
<FUNCODE>CONFIRM</FUNCODE>
|
||||
<FUNNO>001</FUNNO>
|
||||
</RSMPE_PFK>
|
||||
<RSMPE_PFK>
|
||||
<CODE>000001</CODE>
|
||||
<PFNO>20</PFNO>
|
||||
<FUNCODE>REGEN</FUNCODE>
|
||||
<FUNNO>001</FUNNO>
|
||||
</RSMPE_PFK>
|
||||
<RSMPE_PFK>
|
||||
<CODE>000001</CODE>
|
||||
<PFNO>21</PFNO>
|
||||
<FUNCODE>DELETE</FUNCODE>
|
||||
<FUNNO>001</FUNNO>
|
||||
</RSMPE_PFK>
|
||||
<RSMPE_PFK>
|
||||
<CODE>000001</CODE>
|
||||
<PFNO>23</PFNO>
|
||||
<FUNCODE>EXEC</FUNCODE>
|
||||
<FUNNO>001</FUNNO>
|
||||
</RSMPE_PFK>
|
||||
</PFK>
|
||||
<SET>
|
||||
<RSMPE_STAF>
|
||||
<STATUS>0100</STATUS>
|
||||
<FUNCTION>BACK</FUNCTION>
|
||||
</RSMPE_STAF>
|
||||
<RSMPE_STAF>
|
||||
<STATUS>0100</STATUS>
|
||||
<FUNCTION>CONFIRM</FUNCTION>
|
||||
</RSMPE_STAF>
|
||||
<RSMPE_STAF>
|
||||
<STATUS>0100</STATUS>
|
||||
<FUNCTION>DELETE</FUNCTION>
|
||||
</RSMPE_STAF>
|
||||
<RSMPE_STAF>
|
||||
<STATUS>0100</STATUS>
|
||||
<FUNCTION>EXEC</FUNCTION>
|
||||
</RSMPE_STAF>
|
||||
<RSMPE_STAF>
|
||||
<STATUS>0100</STATUS>
|
||||
<FUNCTION>EXIT</FUNCTION>
|
||||
</RSMPE_STAF>
|
||||
<RSMPE_STAF>
|
||||
<STATUS>0100</STATUS>
|
||||
<FUNCTION>REGEN</FUNCTION>
|
||||
</RSMPE_STAF>
|
||||
<RSMPE_STAF>
|
||||
<STATUS>0100</STATUS>
|
||||
<FUNCTION>RW</FUNCTION>
|
||||
</RSMPE_STAF>
|
||||
<RSMPE_STAF>
|
||||
<STATUS>0100</STATUS>
|
||||
<FUNCTION>SAVE</FUNCTION>
|
||||
</RSMPE_STAF>
|
||||
</SET>
|
||||
<DOC>
|
||||
<RSMPE_ATRT>
|
||||
<OBJ_TYPE>A</OBJ_TYPE>
|
||||
<OBJ_CODE>000001</OBJ_CODE>
|
||||
<MODAL>D</MODAL>
|
||||
<INT_NOTE>조회</INT_NOTE>
|
||||
</RSMPE_ATRT>
|
||||
<RSMPE_ATRT>
|
||||
<OBJ_TYPE>P</OBJ_TYPE>
|
||||
<OBJ_CODE>000001</OBJ_CODE>
|
||||
<MODAL>D</MODAL>
|
||||
<INT_NOTE>조회</INT_NOTE>
|
||||
</RSMPE_ATRT>
|
||||
<RSMPE_ATRT>
|
||||
<OBJ_TYPE>B</OBJ_TYPE>
|
||||
<OBJ_CODE>000001</OBJ_CODE>
|
||||
<SUB_CODE>0001</SUB_CODE>
|
||||
<MODAL>D</MODAL>
|
||||
<INT_NOTE>조회</INT_NOTE>
|
||||
</RSMPE_ATRT>
|
||||
</DOC>
|
||||
</CUA>
|
||||
<TPOOL>
|
||||
<item>
|
||||
<ID>I</ID>
|
||||
<KEY>S01</KEY>
|
||||
<ENTRY>선택조건</ENTRY>
|
||||
<LENGTH>14</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>R</ID>
|
||||
<ENTRY>하향식 배부 수행</ENTRY>
|
||||
<LENGTH>9</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>S</ID>
|
||||
<KEY>P_ERKRS</KEY>
|
||||
<ENTRY>경영 단위</ENTRY>
|
||||
<LENGTH>13</LENGTH>
|
||||
</item>
|
||||
<item>
|
||||
<ID>S</ID>
|
||||
<KEY>P_PERIO</KEY>
|
||||
<ENTRY>기간/년도</ENTRY>
|
||||
<LENGTH>13</LENGTH>
|
||||
</item>
|
||||
</TPOOL>
|
||||
</asx:values>
|
||||
</asx:abap>
|
||||
</abapGit>
|
||||
@@ -0,0 +1,156 @@
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Include ZCOPATD0030C01
|
||||
*&---------------------------------------------------------------------*
|
||||
*
|
||||
*----------------------------------------------------------------------*
|
||||
* Object Event
|
||||
*----------------------------------------------------------------------*
|
||||
|
||||
CLASS lcl_event_receiver DEFINITION.
|
||||
PUBLIC SECTION.
|
||||
" Tree node 더블클릭 이벤트
|
||||
METHODS: handle_node_double_click
|
||||
FOR EVENT node_double_click OF cl_gui_simple_tree
|
||||
IMPORTING node_key.
|
||||
|
||||
"ALV ToolBar 핸들러
|
||||
METHODS: handle_toolbar FOR EVENT toolbar OF cl_gui_alv_grid
|
||||
IMPORTING e_object sender,
|
||||
handle_user_command FOR EVENT user_command OF cl_gui_alv_grid
|
||||
IMPORTING e_ucomm sender.
|
||||
|
||||
"ALV 더블클릭 이벤트 핸들러.
|
||||
METHODS: handle_double_click
|
||||
FOR EVENT double_click OF cl_gui_alv_grid
|
||||
IMPORTING e_row e_column es_row_no sender.
|
||||
ENDCLASS.
|
||||
|
||||
CLASS lcl_event_receiver IMPLEMENTATION.
|
||||
METHOD handle_node_double_click.
|
||||
PERFORM select_sender_receiver_data USING node_key.
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD handle_toolbar.
|
||||
DATA ls_toolbar TYPE stb_button.
|
||||
CLEAR ls_toolbar.
|
||||
|
||||
ls_toolbar-function = '&&SEP07'.
|
||||
ls_toolbar-butn_type = 3. "분리자
|
||||
APPEND ls_toolbar TO e_object->mt_toolbar.
|
||||
|
||||
CASE sender.
|
||||
WHEN g_grid_sender.
|
||||
CLEAR ls_toolbar.
|
||||
ls_toolbar-function = 'FUNC1'.
|
||||
* ls_toolbar-icon = icon_display.
|
||||
ls_toolbar-text = '전체 조회'.
|
||||
ls_toolbar-quickinfo = '이전 전체 데이타 조회 상태로 전환'.
|
||||
APPEND ls_toolbar TO e_object->mt_toolbar.
|
||||
|
||||
WHEN g_grid_receiver.
|
||||
CLEAR ls_toolbar.
|
||||
ls_toolbar-function = 'FUNC1'.
|
||||
ls_toolbar-text = '전체 조회'.
|
||||
ls_toolbar-quickinfo = '이전 전체 데이타 조회 상태로 전환'.
|
||||
APPEND ls_toolbar TO e_object->mt_toolbar.
|
||||
|
||||
WHEN g_grid_result.
|
||||
CLEAR ls_toolbar.
|
||||
ls_toolbar-function = 'FUNC1'.
|
||||
ls_toolbar-text = '전체 조회'.
|
||||
ls_toolbar-quickinfo = '이전 전체 데이타 조회 상태로 전환'.
|
||||
APPEND ls_toolbar TO e_object->mt_toolbar.
|
||||
|
||||
ls_toolbar-function = 'FUNC3'.
|
||||
ls_toolbar-text = '배부결과삭제'.
|
||||
ls_toolbar-quickinfo = '배부 결과 데이타 삭제'.
|
||||
APPEND ls_toolbar TO e_object->mt_toolbar.
|
||||
|
||||
ls_toolbar-function = 'FUNC2'.
|
||||
ls_toolbar-text = '전표 전기'.
|
||||
ls_toolbar-quickinfo = '배부 결과를 PA전표로 전기'.
|
||||
APPEND ls_toolbar TO e_object->mt_toolbar.
|
||||
WHEN g_grid_target.
|
||||
CLEAR ls_toolbar.
|
||||
ls_toolbar-function = 'FUNC4'.
|
||||
ls_toolbar-text = '역분개 포함'.
|
||||
ls_toolbar-quickinfo = '역분개 전표를 포함한 모든 전표 조회'.
|
||||
APPEND ls_toolbar TO e_object->mt_toolbar.
|
||||
|
||||
ls_toolbar-function = 'FUNC5'.
|
||||
ls_toolbar-text = '역분개 제외'.
|
||||
ls_toolbar-quickinfo = '역분개된 전표를 제외한 모든 전표 조회'.
|
||||
APPEND ls_toolbar TO e_object->mt_toolbar.
|
||||
|
||||
ls_toolbar-function = 'FUNC6'.
|
||||
ls_toolbar-text = '역분개'.
|
||||
ls_toolbar-quickinfo = 'CO-PA전표 역분개 처리'.
|
||||
APPEND ls_toolbar TO e_object->mt_toolbar.
|
||||
ENDCASE.
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD handle_user_command.
|
||||
CASE e_ucomm.
|
||||
WHEN 'FUNC1'. " 전체 조회 버튼
|
||||
CLEAR : gs_sel_item-dist_id.
|
||||
PERFORM select_data_display_only USING gs_sel_item.
|
||||
|
||||
WHEN 'FUNC2'. " 전표 전기 버튼
|
||||
PERFORM post_copa_document.
|
||||
PERFORM select_data_display_only USING gs_sel_item.
|
||||
|
||||
WHEN 'FUNC3'. " 배부 데이타 삭제
|
||||
PERFORM delete_dist_data.
|
||||
PERFORM select_data_display_only USING gs_sel_item.
|
||||
|
||||
WHEN 'FUNC4'. " 역분개 전표(포함) 조회
|
||||
PERFORM select_copa_doc_all USING gs_sel_item ''.
|
||||
|
||||
WHEN 'FUNC5'. " 전표(역분개 제외) 조회
|
||||
PERFORM select_copa_doc_all USING gs_sel_item 'X'.
|
||||
|
||||
WHEN 'FUNC6'. " CO-PA전표 역분개
|
||||
PERFORM reverse_copa_document.
|
||||
|
||||
ENDCASE.
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD handle_double_click.
|
||||
DATA: ls_row TYPE lvc_s_row.
|
||||
|
||||
CLEAR : gs_sel_item.
|
||||
|
||||
" 더블클릭한 행 번호
|
||||
ls_row = e_row.
|
||||
|
||||
CASE sender.
|
||||
WHEN g_grid_sender.
|
||||
READ TABLE gt_sender INTO DATA(gs_sender) INDEX ls_row-index.
|
||||
IF sy-subrc EQ 0.
|
||||
gs_sel_item-perio = gs_sender-perio.
|
||||
gs_sel_item-variant = gs_sender-variant.
|
||||
gs_sel_item-dist_id = gs_sender-dist_id.
|
||||
ENDIF.
|
||||
|
||||
WHEN g_grid_receiver.
|
||||
READ TABLE gt_receiver INTO DATA(gs_receiver) INDEX ls_row-index.
|
||||
IF sy-subrc EQ 0.
|
||||
gs_sel_item-perio = gs_receiver-perio.
|
||||
gs_sel_item-variant = gs_receiver-variant.
|
||||
gs_sel_item-dist_id = gs_receiver-dist_id.
|
||||
ENDIF.
|
||||
WHEN g_grid_result.
|
||||
READ TABLE gt_result INTO DATA(gs_result) INDEX ls_row-index.
|
||||
IF sy-subrc EQ 0.
|
||||
gs_sel_item-perio = gs_result-perio.
|
||||
gs_sel_item-variant = gs_result-variant.
|
||||
gs_sel_item-dist_id = gs_result-dist_id.
|
||||
ENDIF.
|
||||
ENDCASE.
|
||||
|
||||
IF gs_sel_item IS NOT INITIAL.
|
||||
PERFORM select_data_display_only USING gs_sel_item.
|
||||
ENDIF.
|
||||
ENDMETHOD.
|
||||
|
||||
ENDCLASS.
|
||||
@@ -0,0 +1,21 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<abapGit version="v1.0.0" serializer="LCL_OBJECT_PROG" serializer_version="v1.0.0">
|
||||
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||
<asx:values>
|
||||
<PROGDIR>
|
||||
<NAME>ZCOPATD0030C01</NAME>
|
||||
<SUBC>I</SUBC>
|
||||
<RSTAT>K</RSTAT>
|
||||
<RLOAD>3</RLOAD>
|
||||
<UCCHECK>X</UCCHECK>
|
||||
</PROGDIR>
|
||||
<TPOOL>
|
||||
<item>
|
||||
<ID>R</ID>
|
||||
<ENTRY>Include ZCOPATD0030C01</ENTRY>
|
||||
<LENGTH>22</LENGTH>
|
||||
</item>
|
||||
</TPOOL>
|
||||
</asx:values>
|
||||
</asx:abap>
|
||||
</abapGit>
|
||||
File diff suppressed because it is too large
Load Diff
@@ -0,0 +1,21 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<abapGit version="v1.0.0" serializer="LCL_OBJECT_PROG" serializer_version="v1.0.0">
|
||||
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||
<asx:values>
|
||||
<PROGDIR>
|
||||
<NAME>ZCOPATD0030F01</NAME>
|
||||
<SUBC>I</SUBC>
|
||||
<RSTAT>K</RSTAT>
|
||||
<RLOAD>3</RLOAD>
|
||||
<UCCHECK>X</UCCHECK>
|
||||
</PROGDIR>
|
||||
<TPOOL>
|
||||
<item>
|
||||
<ID>R</ID>
|
||||
<ENTRY>Include ZCOPATD0030F01</ENTRY>
|
||||
<LENGTH>22</LENGTH>
|
||||
</item>
|
||||
</TPOOL>
|
||||
</asx:values>
|
||||
</asx:abap>
|
||||
</abapGit>
|
||||
@@ -0,0 +1,46 @@
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Include ZCOPATD0030I01
|
||||
*&---------------------------------------------------------------------*
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Module EXIT_0100 INPUT
|
||||
*&---------------------------------------------------------------------*
|
||||
* text
|
||||
*----------------------------------------------------------------------*
|
||||
MODULE exit_0100 INPUT.
|
||||
CASE ok_code.
|
||||
WHEN 'BACK' OR 'RW' OR 'EXIT'.
|
||||
LEAVE TO SCREEN 0.
|
||||
ENDCASE.
|
||||
ENDMODULE.
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Module USER_COMMAND_0100 INPUT
|
||||
*&---------------------------------------------------------------------*
|
||||
* text
|
||||
*----------------------------------------------------------------------*
|
||||
MODULE user_command_0100 INPUT.
|
||||
CASE ok_code.
|
||||
WHEN 'EXIT' OR 'BACK' OR 'CANCEL'.
|
||||
LEAVE PROGRAM.
|
||||
WHEN 'TAB1'.
|
||||
g_active_tab = 'TAB1'.
|
||||
WHEN 'TAB2'.
|
||||
g_active_tab = 'TAB2'.
|
||||
WHEN 'TAB3'.
|
||||
PERFORM select_posting_doc_data using 'X'. "탭을 선택할때 데이타 추출. performence 고려.
|
||||
WHEN 'CONFIRM'. "배부기준 확정
|
||||
PERFORM SET_VARIANT_DESC.
|
||||
WHEN 'DELETE'. "센더/리시버 데이타 삭제.
|
||||
PERFORM delete_topdown_data.
|
||||
PERFORM select_data_display_only USING gs_sel_item.
|
||||
WHEN 'REGEN'. "센더/리시버 데이타 (재)추출.
|
||||
PERFORM get_sender_receiver_data.
|
||||
PERFORM select_data_display_only USING gs_sel_item.
|
||||
WHEN 'EXEC'. "하향식 배부 실행.
|
||||
PERFORM execute_top_down_dist.
|
||||
PERFORM select_data_display_only USING gs_sel_item.
|
||||
|
||||
WHEN OTHERS.
|
||||
" 기타 버튼 처리
|
||||
ENDCASE.
|
||||
|
||||
ENDMODULE.
|
||||
@@ -0,0 +1,21 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<abapGit version="v1.0.0" serializer="LCL_OBJECT_PROG" serializer_version="v1.0.0">
|
||||
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||
<asx:values>
|
||||
<PROGDIR>
|
||||
<NAME>ZCOPATD0030I01</NAME>
|
||||
<SUBC>I</SUBC>
|
||||
<RSTAT>K</RSTAT>
|
||||
<RLOAD>3</RLOAD>
|
||||
<UCCHECK>X</UCCHECK>
|
||||
</PROGDIR>
|
||||
<TPOOL>
|
||||
<item>
|
||||
<ID>R</ID>
|
||||
<ENTRY>Include ZCOPATD0030I01</ENTRY>
|
||||
<LENGTH>22</LENGTH>
|
||||
</item>
|
||||
</TPOOL>
|
||||
</asx:values>
|
||||
</asx:abap>
|
||||
</abapGit>
|
||||
@@ -0,0 +1,50 @@
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Include ZCOPATD0030O01
|
||||
*&---------------------------------------------------------------------*
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Module STATUS_0100 OUTPUT
|
||||
*&---------------------------------------------------------------------*
|
||||
*&
|
||||
*&---------------------------------------------------------------------*
|
||||
MODULE status_0100 OUTPUT.
|
||||
SET PF-STATUS '0100'.
|
||||
* SET TITLEBAR 'xxx'.
|
||||
ENDMODULE.
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Module INIT_OBJECT_010 OUTPUT
|
||||
*&---------------------------------------------------------------------*
|
||||
*&
|
||||
*&---------------------------------------------------------------------*
|
||||
MODULE init_object_010 OUTPUT.
|
||||
IF g_docking_container IS INITIAL.
|
||||
"Container 생성
|
||||
PERFORM create_display_object_0100.
|
||||
|
||||
* 1번째 탭을 TABSTRIP의 기본 탭으로.
|
||||
c_tab-activetab = 'TAB1'.
|
||||
ENDIF.
|
||||
ENDMODULE.
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Module TAB1_PBO OUTPUT
|
||||
*&---------------------------------------------------------------------*
|
||||
*&
|
||||
*&---------------------------------------------------------------------*
|
||||
MODULE tab1_pbo OUTPUT.
|
||||
PERFORM CREATE_ALV_TAB1.
|
||||
ENDMODULE.
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Module TAB2_PBO OUTPUT
|
||||
*&---------------------------------------------------------------------*
|
||||
*&
|
||||
*&---------------------------------------------------------------------*
|
||||
MODULE tab2_pbo OUTPUT.
|
||||
PERFORM CREATE_ALV_TAB2.
|
||||
ENDMODULE.
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Module TAB3_PBO OUTPUT
|
||||
*&---------------------------------------------------------------------*
|
||||
*&
|
||||
*&---------------------------------------------------------------------*
|
||||
MODULE tab3_pbo OUTPUT.
|
||||
PERFORM CREATE_ALV_TAB3.
|
||||
ENDMODULE.
|
||||
@@ -0,0 +1,21 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<abapGit version="v1.0.0" serializer="LCL_OBJECT_PROG" serializer_version="v1.0.0">
|
||||
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||
<asx:values>
|
||||
<PROGDIR>
|
||||
<NAME>ZCOPATD0030O01</NAME>
|
||||
<SUBC>I</SUBC>
|
||||
<RSTAT>K</RSTAT>
|
||||
<RLOAD>3</RLOAD>
|
||||
<UCCHECK>X</UCCHECK>
|
||||
</PROGDIR>
|
||||
<TPOOL>
|
||||
<item>
|
||||
<ID>R</ID>
|
||||
<ENTRY>Include ZCOPATD0030O01</ENTRY>
|
||||
<LENGTH>22</LENGTH>
|
||||
</item>
|
||||
</TPOOL>
|
||||
</asx:values>
|
||||
</asx:abap>
|
||||
</abapGit>
|
||||
@@ -0,0 +1,65 @@
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Include ZCOPATD0030TOP - Report ZCOPATD0030
|
||||
*&---------------------------------------------------------------------*
|
||||
REPORT zcopatd0030 MESSAGE-ID ztopdown.
|
||||
|
||||
INCLUDE zcopatdcommtop . " 패키지 공용 Data
|
||||
|
||||
*----------------------------------------------------------------------*
|
||||
* Constants
|
||||
*----------------------------------------------------------------------*
|
||||
CONSTANTS : root_node_key TYPE TV_NODEKEY VALUE 'ROOT'.
|
||||
|
||||
*
|
||||
*----------------------------------------------------------------------*
|
||||
* CONTROLs
|
||||
*----------------------------------------------------------------------*
|
||||
DATA: c_tab1 TYPE REF TO cl_gui_custom_container,
|
||||
c_tab2 TYPE REF TO cl_gui_custom_container,
|
||||
c_tab3 TYPE REF TO cl_gui_custom_container.
|
||||
|
||||
*
|
||||
*----------------------------------------------------------------------*
|
||||
* TYPES
|
||||
*----------------------------------------------------------------------*
|
||||
TYPES : BEGIN OF ty_sel_item ,
|
||||
perio TYPE jahrper,
|
||||
variant TYPE covariant,
|
||||
dist_id TYPE pbr_seqre,
|
||||
END OF ty_sel_item.
|
||||
|
||||
*
|
||||
*----------------------------------------------------------------------*
|
||||
* Structure
|
||||
*----------------------------------------------------------------------*
|
||||
DATA : gs_sel_item TYPE ty_sel_item. "alv 선택 item.
|
||||
|
||||
*
|
||||
*----------------------------------------------------------------------*
|
||||
* Table
|
||||
*----------------------------------------------------------------------*
|
||||
DATA : gt_sender_bakup TYPE TABLE OF ty_sender, "센더 데이타(구조)
|
||||
gt_receiver_bakup TYPE TABLE OF ty_receiver, "배부 기준 데이타(구조)
|
||||
gt_result_bakup TYPE TABLE OF ty_result. "배부 결과 데이타(구조)
|
||||
|
||||
*
|
||||
*----------------------------------------------------------------------*
|
||||
* OBJECT
|
||||
*----------------------------------------------------------------------*
|
||||
DATA : g_grid_sender TYPE REF TO cl_gui_alv_grid,
|
||||
g_grid_receiver TYPE REF TO cl_gui_alv_grid,
|
||||
g_grid_result TYPE REF TO cl_gui_alv_grid,
|
||||
g_grid_target TYPE REF TO cl_gui_alv_grid.
|
||||
|
||||
*
|
||||
*----------------------------------------------------------------------*
|
||||
* Variance
|
||||
*----------------------------------------------------------------------*
|
||||
DATA: g_active_tab TYPE c LENGTH 4 VALUE 'TAB1'.
|
||||
|
||||
|
||||
*-- Selection Screen 입력값
|
||||
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE TEXT-s01.
|
||||
PARAMETERS: p_erkrs TYPE erkrs OBLIGATORY, "경영단위 코드
|
||||
p_perio TYPE jahrper OBLIGATORY. "기간(YYYYMM)
|
||||
SELECTION-SCREEN END OF BLOCK b1.
|
||||
@@ -0,0 +1,21 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<abapGit version="v1.0.0" serializer="LCL_OBJECT_PROG" serializer_version="v1.0.0">
|
||||
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||
<asx:values>
|
||||
<PROGDIR>
|
||||
<NAME>ZCOPATD0030TOP</NAME>
|
||||
<SUBC>I</SUBC>
|
||||
<RSTAT>K</RSTAT>
|
||||
<RLOAD>3</RLOAD>
|
||||
<UCCHECK>X</UCCHECK>
|
||||
</PROGDIR>
|
||||
<TPOOL>
|
||||
<item>
|
||||
<ID>R</ID>
|
||||
<ENTRY>Include ZCOPATD0030TOP</ENTRY>
|
||||
<LENGTH>22</LENGTH>
|
||||
</item>
|
||||
</TPOOL>
|
||||
</asx:values>
|
||||
</asx:abap>
|
||||
</abapGit>
|
||||
@@ -0,0 +1,12 @@
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Report ZCOPATD0040
|
||||
*&---------------------------------------------------------------------*
|
||||
*&
|
||||
*&---------------------------------------------------------------------*
|
||||
|
||||
INCLUDE ZCOPATD0040TOP . " Global Data
|
||||
|
||||
* INCLUDE ZCOPATD0040O01 . " PBO-Modules
|
||||
* INCLUDE ZCOPATD0040I01 . " PAI-Modules
|
||||
* INCLUDE ZCOPATD0040F01 . " FORM-Routines
|
||||
|
||||
@@ -0,0 +1,22 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<abapGit version="v1.0.0" serializer="LCL_OBJECT_PROG" serializer_version="v1.0.0">
|
||||
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||
<asx:values>
|
||||
<PROGDIR>
|
||||
<NAME>ZCOPATD0040</NAME>
|
||||
<SUBC>1</SUBC>
|
||||
<RSTAT>K</RSTAT>
|
||||
<RLOAD>3</RLOAD>
|
||||
<FIXPT>X</FIXPT>
|
||||
<UCCHECK>X</UCCHECK>
|
||||
</PROGDIR>
|
||||
<TPOOL>
|
||||
<item>
|
||||
<ID>R</ID>
|
||||
<ENTRY>CO-PA 전표 전기</ENTRY>
|
||||
<LENGTH>11</LENGTH>
|
||||
</item>
|
||||
</TPOOL>
|
||||
</asx:values>
|
||||
</asx:abap>
|
||||
</abapGit>
|
||||
@@ -0,0 +1,4 @@
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Include ZCOPATD0040TOP - Report ZCOPATD0040
|
||||
*&---------------------------------------------------------------------*
|
||||
REPORT ZCOPATD0040 MESSAGE-ID ZTOPDOWN.
|
||||
@@ -0,0 +1,21 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<abapGit version="v1.0.0" serializer="LCL_OBJECT_PROG" serializer_version="v1.0.0">
|
||||
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||
<asx:values>
|
||||
<PROGDIR>
|
||||
<NAME>ZCOPATD0040TOP</NAME>
|
||||
<SUBC>I</SUBC>
|
||||
<RSTAT>K</RSTAT>
|
||||
<RLOAD>3</RLOAD>
|
||||
<UCCHECK>X</UCCHECK>
|
||||
</PROGDIR>
|
||||
<TPOOL>
|
||||
<item>
|
||||
<ID>R</ID>
|
||||
<ENTRY>Include ZCOPATD0040TOP</ENTRY>
|
||||
<LENGTH>22</LENGTH>
|
||||
</item>
|
||||
</TPOOL>
|
||||
</asx:values>
|
||||
</asx:abap>
|
||||
</abapGit>
|
||||
@@ -0,0 +1,41 @@
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Include ZCOPATDCOMMF01
|
||||
*&---------------------------------------------------------------------*
|
||||
*
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Form get_table_info
|
||||
*&---------------------------------------------------------------------*
|
||||
FORM get_table_info.
|
||||
TYPES : BEGIN OF ty_table,
|
||||
type TYPE db2type,
|
||||
tbname TYPE tabname,
|
||||
END OF ty_table.
|
||||
|
||||
DATA : lt_mng_table TYPE TABLE OF ty_table.
|
||||
|
||||
DATA : lv_tabname TYPE tabname.
|
||||
|
||||
" 환경정보에서 관리 테이블명 조회
|
||||
CALL FUNCTION 'ZTOPDOWN_ENV'
|
||||
IMPORTING
|
||||
tb_name = lv_tabname.
|
||||
|
||||
" 관리 테이블 정보 로딩
|
||||
SELECT type,
|
||||
tbname
|
||||
FROM (lv_tabname)
|
||||
INTO CORRESPONDING FIELDS OF TABLE @Lt_mng_table.
|
||||
|
||||
LOOP AT lt_mng_table INTO DATA(ls_table).
|
||||
CASE ls_table-type.
|
||||
WHEN '1'. gv_manager = ls_table-tbname.
|
||||
WHEN '2'. gv_variant = ls_table-tbname.
|
||||
WHEN '3'. gv_sender = ls_table-tbname.
|
||||
WHEN '4'. gv_receiver = ls_table-tbname.
|
||||
WHEN '5'. gv_result = ls_table-tbname.
|
||||
WHEN '6'. gv_target = ls_table-tbname.
|
||||
WHEN '7'. gv_distinfo = ls_table-tbname.
|
||||
WHEN '8'. gv_distrule = ls_table-tbname.
|
||||
ENDCASE.
|
||||
ENDLOOP.
|
||||
ENDFORM.
|
||||
@@ -0,0 +1,21 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<abapGit version="v1.0.0" serializer="LCL_OBJECT_PROG" serializer_version="v1.0.0">
|
||||
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||
<asx:values>
|
||||
<PROGDIR>
|
||||
<NAME>ZCOPATDCOMMF01</NAME>
|
||||
<SUBC>I</SUBC>
|
||||
<RSTAT>K</RSTAT>
|
||||
<RLOAD>3</RLOAD>
|
||||
<UCCHECK>X</UCCHECK>
|
||||
</PROGDIR>
|
||||
<TPOOL>
|
||||
<item>
|
||||
<ID>R</ID>
|
||||
<ENTRY>Include ZCOPATDCOMMF01</ENTRY>
|
||||
<LENGTH>22</LENGTH>
|
||||
</item>
|
||||
</TPOOL>
|
||||
</asx:values>
|
||||
</asx:abap>
|
||||
</abapGit>
|
||||
@@ -0,0 +1,19 @@
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Include ZCOPATDCOMMON
|
||||
*&---------------------------------------------------------------------*
|
||||
|
||||
DATA : gt_sender TYPE TABLE OF zstop_sender, "센더 데이타(구조)
|
||||
gt_receiver TYPE TABLE OF zstop_receiver, "배부 기준 데이타(구조)
|
||||
gt_variant TYPE TABLE OF zstop_variant, "배부 기준 정보(월별)(구조)
|
||||
gt_result TYPE TABLE OF zstop_result, "배부 결과 데이타(구조)
|
||||
gt_target TYPE TABLE OF zstop_target, "전표 발행 대상 데이타(구조)
|
||||
gt_TY_DISTINFO TYPE TABLE OF zstop_distinfo, "배부 기준 세부 정보(구조)
|
||||
gt_DISTRULE TYPE TABLE OF zstop_distrule. "배부 조건 Customizing(구조)
|
||||
|
||||
|
||||
DATA: g_container TYPE REF TO cl_gui_custom_container,
|
||||
g_container_left TYPE REF TO cl_gui_custom_container,
|
||||
g_container_right TYPE REF TO cl_gui_custom_container,
|
||||
g_grid TYPE REF TO cl_gui_alv_grid,
|
||||
g_grid_left TYPE REF TO cl_gui_alv_grid,
|
||||
g_grid_right TYPE REF TO cl_gui_alv_grid.
|
||||
@@ -0,0 +1,21 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<abapGit version="v1.0.0" serializer="LCL_OBJECT_PROG" serializer_version="v1.0.0">
|
||||
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||
<asx:values>
|
||||
<PROGDIR>
|
||||
<NAME>ZCOPATDCOMMON</NAME>
|
||||
<SUBC>I</SUBC>
|
||||
<RSTAT>K</RSTAT>
|
||||
<RLOAD>3</RLOAD>
|
||||
<UCCHECK>X</UCCHECK>
|
||||
</PROGDIR>
|
||||
<TPOOL>
|
||||
<item>
|
||||
<ID>R</ID>
|
||||
<ENTRY>Include ZCOPATDCOMMON</ENTRY>
|
||||
<LENGTH>21</LENGTH>
|
||||
</item>
|
||||
</TPOOL>
|
||||
</asx:values>
|
||||
</asx:abap>
|
||||
</abapGit>
|
||||
@@ -0,0 +1,78 @@
|
||||
*&---------------------------------------------------------------------*
|
||||
*& Include ZCOPATDCOMMON
|
||||
*&---------------------------------------------------------------------*
|
||||
*-- 화면용 변수
|
||||
DATA : ok_code LIKE sy-ucomm, " Screen F-Code
|
||||
g_repid LIKE sy-repid,
|
||||
g_dynnr LIKE sy-dynnr.
|
||||
|
||||
*----------------------------------------------------------------------*
|
||||
* Constants
|
||||
*----------------------------------------------------------------------*
|
||||
|
||||
*----------------------------------------------------------------------*
|
||||
* CONTROLs
|
||||
*----------------------------------------------------------------------*
|
||||
CONTROLS: c_tab TYPE TABSTRIP. "탭스트립 선언
|
||||
|
||||
*----------------------------------------------------------------------*
|
||||
* TYPES
|
||||
*----------------------------------------------------------------------*
|
||||
TYPES : ty_sender TYPE zstop_sender,
|
||||
ty_receiver TYPE zstop_receiver,
|
||||
ty_variant TYPE zstop_variant,
|
||||
ty_result TYPE zstop_result,
|
||||
ty_target TYPE zstop_target,
|
||||
ty_distinfo TYPE zstop_distinfo,
|
||||
ty_distrule TYPE zstop_distrule.
|
||||
|
||||
*
|
||||
*----------------------------------------------------------------------*
|
||||
* Table
|
||||
*----------------------------------------------------------------------*
|
||||
DATA : gt_sender TYPE TABLE OF ty_sender, "센더 데이타(구조)
|
||||
gt_receiver TYPE TABLE OF ty_receiver, "배부 기준 데이타(구조)
|
||||
gt_variant TYPE TABLE OF ty_variant, "배부 기준 정보(월별)(구조)
|
||||
gt_result TYPE TABLE OF ty_result, "배부 결과 데이타(구조)
|
||||
gt_target TYPE TABLE OF ty_target, "전표 발행 대상 데이타(구조)
|
||||
gt_TY_DISTINFO TYPE TABLE OF ty_distinfo, "배부 기준 세부 정보(구조)
|
||||
gt_DISTRULE TYPE TABLE OF ty_distrule. "배부 조건 Customizing(구조)
|
||||
|
||||
*
|
||||
*----------------------------------------------------------------------*
|
||||
* OBJECT
|
||||
*----------------------------------------------------------------------*
|
||||
DATA : g_docking_container TYPE REF TO cl_gui_docking_container,
|
||||
g_docking_container_top TYPE REF TO cl_gui_docking_container.
|
||||
|
||||
DATA : g_simple_tree TYPE REF TO cl_gui_simple_tree,
|
||||
gt_nodes TYPE STANDARD TABLE OF mtreesnode.
|
||||
|
||||
DATA : splitter TYPE REF TO cl_gui_splitter_container,
|
||||
container TYPE REF TO cl_gui_custom_container.
|
||||
|
||||
* 하향식 배부를 수행하기 위한 핵심 cbo 클래스
|
||||
DATA : g_top_down TYPE REF TO zcl_copa_topdown.
|
||||
|
||||
DATA: g_container TYPE REF TO cl_gui_custom_container,
|
||||
g_container_left TYPE REF TO cl_gui_custom_container,
|
||||
g_container_right TYPE REF TO cl_gui_custom_container,
|
||||
g_grid TYPE REF TO cl_gui_alv_grid,
|
||||
g_grid_left TYPE REF TO cl_gui_alv_grid,
|
||||
g_grid_right TYPE REF TO cl_gui_alv_grid.
|
||||
*----------------------------------------------------------------------*
|
||||
* Variance
|
||||
*----------------------------------------------------------------------*
|
||||
* 패키지 에서 사용하는 주요 테이블명
|
||||
* 모든 프로그램은 직접적인 테이블 명이 아닌 아래 변수를 통해 처리해야 함.
|
||||
DATA : gv_manager TYPE tabname, "관리테이블
|
||||
gv_variant TYPE tabname, "변형(사이클) 지정 테이블
|
||||
gv_sender TYPE tabname, "센더 테이블
|
||||
gv_receiver TYPE tabname, "Receiver 실적 테이블(배부기준)
|
||||
gv_result TYPE tabname, "배부 결과 테이블
|
||||
gv_target TYPE tabname, "전표 발행 대상 테이블(Not Used..yet)
|
||||
gv_distinfo TYPE tabname, "변형 세부 내용 테이블
|
||||
gv_distrule TYPE tabname. "cbo 추가 조건 테이블
|
||||
|
||||
DATA : dynnr_up TYPE sy-dynnr,
|
||||
dynnr_bottom TYPE sy-dynnr.
|
||||
@@ -0,0 +1,21 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<abapGit version="v1.0.0" serializer="LCL_OBJECT_PROG" serializer_version="v1.0.0">
|
||||
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||
<asx:values>
|
||||
<PROGDIR>
|
||||
<NAME>ZCOPATDCOMMTOP</NAME>
|
||||
<SUBC>I</SUBC>
|
||||
<RSTAT>K</RSTAT>
|
||||
<RLOAD>3</RLOAD>
|
||||
<UCCHECK>X</UCCHECK>
|
||||
</PROGDIR>
|
||||
<TPOOL>
|
||||
<item>
|
||||
<ID>R</ID>
|
||||
<ENTRY>Include ZCOPATDCOMMON</ENTRY>
|
||||
<LENGTH>21</LENGTH>
|
||||
</item>
|
||||
</TPOOL>
|
||||
</asx:values>
|
||||
</asx:abap>
|
||||
</abapGit>
|
||||
@@ -0,0 +1,3 @@
|
||||
FUNCTION-POOL ZCOTOPDOWN. "MESSAGE-ID ..
|
||||
|
||||
* INCLUDE LZCOTOPDOWND... " Local class definition
|
||||
@@ -0,0 +1,17 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<abapGit version="v1.0.0">
|
||||
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||
<asx:values>
|
||||
<PROGDIR>
|
||||
<NAME>LZCOTOPDOWNTOP</NAME>
|
||||
<DBAPL>S</DBAPL>
|
||||
<DBNA>D$</DBNA>
|
||||
<SUBC>I</SUBC>
|
||||
<APPL>S</APPL>
|
||||
<FIXPT>X</FIXPT>
|
||||
<LDBNAME>D$S</LDBNAME>
|
||||
<UCCHECK>X</UCCHECK>
|
||||
</PROGDIR>
|
||||
</asx:values>
|
||||
</asx:abap>
|
||||
</abapGit>
|
||||
@@ -0,0 +1,15 @@
|
||||
*******************************************************************
|
||||
* System-defined Include-files. *
|
||||
*******************************************************************
|
||||
INCLUDE LZCOTOPDOWNTOP. " Global Declarations
|
||||
INCLUDE LZCOTOPDOWNUXX. " Function Modules
|
||||
|
||||
*******************************************************************
|
||||
* User-defined Include-files (if necessary). *
|
||||
*******************************************************************
|
||||
* INCLUDE LZCOTOPDOWNF... " Subroutines
|
||||
* INCLUDE LZCOTOPDOWNO... " PBO-Modules
|
||||
* INCLUDE LZCOTOPDOWNI... " PAI-Modules
|
||||
* INCLUDE LZCOTOPDOWNE... " Events
|
||||
* INCLUDE LZCOTOPDOWNP... " Local class implement.
|
||||
* INCLUDE LZCOTOPDOWNT99. " ABAP Unit tests
|
||||
@@ -0,0 +1,18 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<abapGit version="v1.0.0">
|
||||
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||
<asx:values>
|
||||
<PROGDIR>
|
||||
<NAME>SAPLZCOTOPDOWN</NAME>
|
||||
<DBAPL>S</DBAPL>
|
||||
<DBNA>D$</DBNA>
|
||||
<SUBC>F</SUBC>
|
||||
<APPL>S</APPL>
|
||||
<RLOAD>3</RLOAD>
|
||||
<FIXPT>X</FIXPT>
|
||||
<LDBNAME>D$S</LDBNAME>
|
||||
<UCCHECK>X</UCCHECK>
|
||||
</PROGDIR>
|
||||
</asx:values>
|
||||
</asx:abap>
|
||||
</abapGit>
|
||||
@@ -0,0 +1,30 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<abapGit version="v1.0.0" serializer="LCL_OBJECT_FUGR" serializer_version="v1.0.0">
|
||||
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||
<asx:values>
|
||||
<AREAT>CO-PA 하향식 배부 AddOn 서비스</AREAT>
|
||||
<INCLUDES>
|
||||
<SOBJ_NAME>LZCOTOPDOWNTOP</SOBJ_NAME>
|
||||
<SOBJ_NAME>SAPLZCOTOPDOWN</SOBJ_NAME>
|
||||
</INCLUDES>
|
||||
<FUNCTIONS>
|
||||
<item>
|
||||
<FUNCNAME>ZTOPDOWN_ENV</FUNCNAME>
|
||||
<SHORT_TEXT>테이블명 반환 함수</SHORT_TEXT>
|
||||
<EXPORT>
|
||||
<RSEXP>
|
||||
<PARAMETER>TB_NAME</PARAMETER>
|
||||
<TYP>TABNAME</TYP>
|
||||
</RSEXP>
|
||||
</EXPORT>
|
||||
<DOCUMENTATION>
|
||||
<RSFDO>
|
||||
<PARAMETER>TB_NAME</PARAMETER>
|
||||
<KIND>P</KIND>
|
||||
</RSFDO>
|
||||
</DOCUMENTATION>
|
||||
</item>
|
||||
</FUNCTIONS>
|
||||
</asx:values>
|
||||
</asx:abap>
|
||||
</abapGit>
|
||||
@@ -0,0 +1,13 @@
|
||||
FUNCTION ZTOPDOWN_ENV.
|
||||
*"--------------------------------------------------------------------
|
||||
*"*"로컬인터페이스:
|
||||
*" EXPORTING
|
||||
*" VALUE(TB_NAME) TYPE TABNAME
|
||||
*"--------------------------------------------------------------------
|
||||
tb_name = 'ZCOTD1000'.
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
ENDFUNCTION.
|
||||
@@ -0,0 +1,98 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<abapGit version="v1.0.0" serializer="LCL_OBJECT_MSAG" serializer_version="v1.0.0">
|
||||
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||
<asx:values>
|
||||
<T100A>
|
||||
<ARBGB>ZTOPDOWN</ARBGB>
|
||||
<MASTERLANG>3</MASTERLANG>
|
||||
<STEXT>CO-PA 하향식 배부 메시지 클래스</STEXT>
|
||||
</T100A>
|
||||
<T100>
|
||||
<T100>
|
||||
<SPRSL>3</SPRSL>
|
||||
<ARBGB>ZTOPDOWN</ARBGB>
|
||||
<MSGNR>000</MSGNR>
|
||||
<TEXT>& & & &</TEXT>
|
||||
</T100>
|
||||
<T100>
|
||||
<SPRSL>3</SPRSL>
|
||||
<ARBGB>ZTOPDOWN</ARBGB>
|
||||
<MSGNR>001</MSGNR>
|
||||
<TEXT>이미 처리된 내역이 존재하여, &할 수 없습니다.</TEXT>
|
||||
</T100>
|
||||
<T100>
|
||||
<SPRSL>3</SPRSL>
|
||||
<ARBGB>ZTOPDOWN</ARBGB>
|
||||
<MSGNR>002</MSGNR>
|
||||
<TEXT>작업 내용을 저장하시겠습니까?</TEXT>
|
||||
</T100>
|
||||
<T100>
|
||||
<SPRSL>3</SPRSL>
|
||||
<ARBGB>ZTOPDOWN</ARBGB>
|
||||
<MSGNR>003</MSGNR>
|
||||
<TEXT>& 되었습니다.</TEXT>
|
||||
</T100>
|
||||
<T100>
|
||||
<SPRSL>3</SPRSL>
|
||||
<ARBGB>ZTOPDOWN</ARBGB>
|
||||
<MSGNR>004</MSGNR>
|
||||
<TEXT>처리중 &가 발생하였습니다.</TEXT>
|
||||
</T100>
|
||||
<T100>
|
||||
<SPRSL>3</SPRSL>
|
||||
<ARBGB>ZTOPDOWN</ARBGB>
|
||||
<MSGNR>005</MSGNR>
|
||||
<TEXT>&을(를) 선택하십시요.</TEXT>
|
||||
</T100>
|
||||
<T100>
|
||||
<SPRSL>3</SPRSL>
|
||||
<ARBGB>ZTOPDOWN</ARBGB>
|
||||
<MSGNR>006</MSGNR>
|
||||
<TEXT>데이타가 존재하지 않습니다.</TEXT>
|
||||
</T100>
|
||||
<T100>
|
||||
<SPRSL>3</SPRSL>
|
||||
<ARBGB>ZTOPDOWN</ARBGB>
|
||||
<MSGNR>007</MSGNR>
|
||||
<TEXT>& 하였습니다.</TEXT>
|
||||
</T100>
|
||||
<T100>
|
||||
<SPRSL>3</SPRSL>
|
||||
<ARBGB>ZTOPDOWN</ARBGB>
|
||||
<MSGNR>008</MSGNR>
|
||||
<TEXT>& 이(가) 완료되었습니다.</TEXT>
|
||||
</T100>
|
||||
<T100>
|
||||
<SPRSL>3</SPRSL>
|
||||
<ARBGB>ZTOPDOWN</ARBGB>
|
||||
<MSGNR>009</MSGNR>
|
||||
<TEXT>& 이(가) 확인되지 않았습니다.</TEXT>
|
||||
</T100>
|
||||
<T100>
|
||||
<SPRSL>3</SPRSL>
|
||||
<ARBGB>ZTOPDOWN</ARBGB>
|
||||
<MSGNR>010</MSGNR>
|
||||
<TEXT>좌측 메뉴에서 원하는 변형을 더블클릭 한 후 사용하십시요.</TEXT>
|
||||
</T100>
|
||||
<T100>
|
||||
<SPRSL>3</SPRSL>
|
||||
<ARBGB>ZTOPDOWN</ARBGB>
|
||||
<MSGNR>011</MSGNR>
|
||||
<TEXT>선택된 &건의 전표를 역분개 하시겠습니까?</TEXT>
|
||||
</T100>
|
||||
<T100>
|
||||
<SPRSL>3</SPRSL>
|
||||
<ARBGB>ZTOPDOWN</ARBGB>
|
||||
<MSGNR>012</MSGNR>
|
||||
<TEXT>선택된 &건의 전표가 역분개 되었습니다.</TEXT>
|
||||
</T100>
|
||||
<T100>
|
||||
<SPRSL>3</SPRSL>
|
||||
<ARBGB>ZTOPDOWN</ARBGB>
|
||||
<MSGNR>344</MSGNR>
|
||||
<TEXT>특성 &가(이) 화면에 없습니다.</TEXT>
|
||||
</T100>
|
||||
</T100>
|
||||
</asx:values>
|
||||
</asx:abap>
|
||||
</abapGit>
|
||||
Reference in New Issue
Block a user