본문 바로가기
반응형

ABAP

 (19)
라인별 중복 데이터 체크하기 DATA: LV_MESSAGE TYPE STRING.DATA(LT_LIST) = GT_LIST.LOOP AT LT_LIST INTO DATA(LS_LIST) GROUP BY ( KOSTL = LS_LIST-KOSTL KSTAR = LS_LIST-KSTAR COUNT = GROUP SIZE ) INTO DATA(LS_DUP). CHECK LS_DUP-COUNT > 1. LV_MESSAGE = '중복된 코스트센터, 원가요소가 존재합니다.'.ENDLOOP. 코스트센터(KOSTL)와 원가요소(KSTAR) 필드를 기준으로 중복 데이터를 체크하는 방법
연도, 월 선택 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 ..
월의 마지막 날 받기(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..
POPUP_TO_CONFIRM 팝업 확인 창 띄우기 DATA: LV_CHECK  TYPE C,        LV_ANSWER TYPE C.  PERFORM POPUP_TO_CONFIRM USING TEXT-P01 TEXT-P02 CHANGING LV_ANSWER.  IF LV_ANSWER = 1.  ELSE.    MESSAGE S009 DISPLAY LIKE 'E'. "취소하였습니다.    EXIT.  ENDIF.*&---------------------------------------------------------------------**& Form POPUP_TO_CONFIRM*&---------------------------------------------------------------------*FORM POPUP_TO_CONFIRM  US..
반응형

티스토리툴바