1.환경구축
SAP 예전에는 구경하기도 어려웠습니다. 접속도 못해보고 SAP 해봤다 하면
SAP 로그인만 해도 SAP 해봤다고 해도 될정도입니다.
sap erp를 학습하면서 모르는부분은
chatgpt에게 물어보면서 모르는부분을 해결했던사례를 게시물작성해서 스터디원들과 공유하고, chatgpt로 해결이 안되면 인간지능으로 학습해서 답글로 모르는부분을 해결하도록 하겠습니다.
ABAP서버 실습환경구축
https://drive.google.com/drive/folders/18Ag9OJafmEXHVuCqqipKZGreGLWb-674
2.SAP는 ERP입니다. ERP는 더존입니다. 해외 ERP라고 이해하면 SAP 어렵지 않습니다.
SAP로 ERP공부하기보다는 전산회계, ERP정보관리사 교재로 공부하면 훨씬 이해가 쉽고 연습도 많이 할수있습니다.
더존에서 예제대로 전표를 많이 입력해보고 조회해보고 하면 ERP는 쉽습니다.
저도 처음엔 더존을 사용하고 더존을 공부했습니다.
더존과 SAP는 ERP프로그램이다.
3.실습
FI모듈은 위에서 보여준것처럼 전표치는것을 보았습니다.
ABAP 실습을 해보겠습니다.
F1키를 활용해서 실행, 디버깅
*&---------------------------------------------------------------------*
*& Report ZIT35_003
*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*
REPORT ZIT35_003.
PARAMETERS : p_zname TYPE Zgpters_v_h-zname.
PARAMETERS : p_ztitle TYPE Zgpters_v_h-ztitle.
PARAMETERS : p_zlink TYPE Zgpters_v_h-zlink.
PARAMETERS : P_INSERT RADIOBUTTON GROUP RR DEFAULT 'X'.
PARAMETERS : P_MODIFY RADIOBUTTON GROUP RR .
PARAMETERS : P_DELETE RADIOBUTTON GROUP RR .
PARAMETERS : P_DISPLY RADIOBUTTON GROUP RR .
* 테이블 정의
*DATA: BEGIN OF LT_ZFAGLFLEXT OCCURS 0,
* zname TYPE Zgpters_v_h-zname,
* ztitle TYPE Zgpters_v_h-ztitle,
* zlink TYPE Zgpters_v_h-zlink,
* END OF LT_ZFAGLFLEXT.
" 테이블 생성
data : lt_zfaglflext LIKE table of Zgpters_v_h.
DATA : LS_ZFAGLFLEXT LIKE Zgpters_v_h.
* 필드값 설정
CASE ABAP_TRUE .
WHEN P_INSERT.
LS_ZFAGLFLEXT-zname = p_zname.
LS_ZFAGLFLEXT-ztitle = p_ztitle.
LS_ZFAGLFLEXT-zlink = p_zlink.
INSERT Zgpters_v_h FROM LS_ZFAGLFLEXT.
IF SY-SUBRC EQ 0.
MESSAGE S000(ZABAP) WITH ' SAVEDE(DISPLY)'.
ELSE.
MESSAGE E000(ZABAP) WITH 'NOT SAVED'.
ENDIF.
when p_modify.
LS_ZFAGLFLEXT-zname = p_zname.
LS_ZFAGLFLEXT-ztitle = p_ztitle.
LS_ZFAGLFLEXT-zlink = p_zlink.
modify Zgpters_v_h FROM LS_ZFAGLFLEXT.
IF SY-SUBRC EQ 0.
MESSAGE S000(ZABAP) WITH ' SAVEDE(DISPLY)'.
ELSE.
MESSAGE E000(ZABAP) WITH 'NOT SAVED'.
ENDIF.
when p_delete.
LS_ZFAGLFLEXT-zname = p_zname.
LS_ZFAGLFLEXT-ztitle = p_ztitle.
LS_ZFAGLFLEXT-zlink = p_zlink.
delete Zgpters_v_h FROM LS_ZFAGLFLEXT.
IF SY-SUBRC EQ 0.
MESSAGE S000(ZABAP) WITH ' SAVEDE(DISPLY)'.
ELSE.
MESSAGE E000(ZABAP) WITH 'NOT SAVED'.
ENDIF.
*
when p_disply.
* 데이터 조회
SELECT * FROM Zgpters_v_h INTO TABLE @LT_ZFAGLFLEXT.
* 조회된 데이터 출력
LOOP AT LT_ZFAGLFLEXT INTO LS_ZFAGLFLEXT.
WRITE: / 'zname:', LS_ZFAGLFLEXT-zname.
WRITE: / 'ztitle:', LS_ZFAGLFLEXT-ztitle.
WRITE: / 'zlink:', LS_ZFAGLFLEXT-zlink.
ENDLOOP.
IF SY-SUBRC EQ 0.
MESSAGE S000(ZABAP) WITH ' SAVEDE(DISPLY)'.
ELSE.
MESSAGE E000(ZABAP) WITH 'NOT SAVED'.
ENDIF.
WHEN OTHERS.
ENDCASE.ABAP GIT을 활용해서, IMPORT
ABAP 프로그램이 commit되었습니다. 끝
#9기 SAP방
