본문 바로가기
반응형

ABAP

 (23)
라인별 중복 데이터 체크하기 DATA(LT_TEMP) = GT_LIST.  LOOP AT GT_LIST ASSIGNING FIELD-SYMBOL().      DATA(LV_COUNT) = REDUCE I( INIT LV_X = 0 FOR LS IN LT_TEMP USING KEY IDX01                                 WHERE ( KOSTL = -KOSTL AND KSTAR =  KSTAR ) NEXT LV_X = LV_X + 1 ).      IF LV_COUNT > 1.        -ICON    = ICON_RED_LIGHT.        -MESSAGE = '중복된 코스트센터, 원가요소가 존재합니다.'.      ENDIF.    ENDIF.  ENDLOOP.코스트센터(KOSTL)와 원가요소..
연도, 월 선택 POP-UP 띄우기(POPUP_TO_SELECT_MONTH) 우선 SELECTION-SCREEN 영역에  AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_SPMON.  PERFORM F4_SPMON CHANGING P_SPMON. 아래는 PERFORM 문 추가*&---------------------------------------------------------------------**& Form F4_SPMON*&---------------------------------------------------------------------**& *AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_SPMON.*& PERFORM F4_SPMON CHANGING P_SPMON.*&-------------------..
다른 프로그램 ALV DATA 가져오기(CL_SALV_BS_RUNTIME_INFO) DATA: GT_DATA TYPE TABLE OF ZCOS1010.  DATA: LR_DATA TYPE REF TO DATA.  FIELD-SYMBOLS:  TYPE ANY TABLE.  CL_SALV_BS_RUNTIME_INFO=>SET( EXPORTING DISPLAY  = ABAP_FALSE                                          METADATA = ABAP_FALSE                                          DATA     = ABAP_TRUE ).  SUBMIT ZCOR1010 WITH P_KOKRS EQ P_KOKRS                  WITH P_BUKRS EQ P_BUKRS                  WITH..
도메인 Value Range 값 가져오기(GET_DOMAIN_VALUES) ZDCKML_CATEG 이라는 도메인에 위와 같은 값이 있다.이 도메인들의 내역을 가져오는 펑션이 있다.   DATA: LT_DD07V TYPE TABLE OF DD07V.  PERFORM GET_DOMAIN_TEXT USING 'ZDCKML_CATEG' CHANGING LT_DD07V.*&---------------------------------------------------------------------**& Form GET_DOMAIN_TEXT*&---------------------------------------------------------------------**& text*&-------------------------------------------------------------..
특수문자 제거 함수(SF_SPECIALCHAR_DELETE) DATA: LV_WITHSC TYPE STRING,        LV_WIOTSC TYPE STRING.  PERFORM DELETE_SPECIAL_CHAR USING LV_WITHSC CHANGING LV_WIOTSC.*&---------------------------------------------------------------------**& Form DELETE_SPECIAL_CHAR*&---------------------------------------------------------------------**& text*&---------------------------------------------------------------------*FORM DELETE_SPECIAL_CHAR ..
코스트센터 그룹, 원가요소 그룹 등 HIERARCHY 읽기(K_HIERARCHY_TABLES_READ) DATA: LV_CLASS  TYPE SETHIER-SETCLASS,        LV_SETID  TYPE SETHIER-SETID,        LT_VALUES TYPE GSETH_VAL_TAB.  PERFORM READ_K_HIERARCHY_TABLES USING LV_CLASS LV_SETID P_KOKRS CHANGING LT_VALUES. *&---------------------------------------------------------------------**& Form READ_K_HIERARCHY_TABLES*&---------------------------------------------------------------------**& SET CLASS*&  - 0101 : ..
월의 마지막 날 받기(RP_LAST_DAY_OF_MONTHS) DATA: LV_EDATE TYPE SY-DATUM.PERFORM GET_LAST_DAY_OF_MONTHS USING SY-DATUM CHANGING LV_EDATE.*&---------------------------------------------------------------------**& Form GET_LAST_DAY_OF_MONTHS*&---------------------------------------------------------------------**& text*&---------------------------------------------------------------------*FORM GET_LAST_DAY_OF_MONTHS  USING    PV_SDATE      ..
엑셀 업로드(GUI_UPLOAD) 업로드 할 엑셀 파일 템플릿을 준비한다. ▼ 엑셀 데이터를 담기 위한 테이블을 선언한다. 타입은 CHAR로 선언▼TYPES: BEGIN OF TY_EXCEL,         KOKRS(50),         KOSTL(50),         WKG001(50),         WKG002(50),         WKG003(50),         WKG004(50),         WKG005(50),         WKG006(50),         WKG007(50),         WKG008(50),         WKG009(50),         WKG010(50),         WKG011(50),         WKG012(50),       END OF TY_EXCEL.TYPES: TT..
반응형

티스토리툴바