메뉴 건너뛰기

SAP 한국 커뮤니티

▲123,456' 으로 표시하게 한다

꿀단지 2011.10.11 11:17 조회 수 : 5687

* H_HSL_SUM이 0보다 작을 때는 ' 123,456.00-' 대신
* ' ▲123,456' 으로 표시하게 한다.


DATA: UNIT_LEN TYPE I,
CHK_ZERO TYPE I,
D_LEN(1),
U_LEN(1).


IF H_HSL_SUM < 0.

* 먼저 H_HSL_SUM을 부호와 소숫점없이 화면에 WRITE한다.
WRITE AT POS1(LEN1) H_HSL_SUM DECIMALS 0 NO-SIGN.

* 'CURR' TYPE인 H_HSL_SUM을 'CHAR' TYPE인 C_HSL_SUM으로 복사한다.
* EX) ' 123,456.00-' 를 ' 123456.00-'
C_HSL_SUM = H_HSL_SUM.

* 왼쪽의 SPACE를 없앤다. EX) ' 123456.00-' 을 '123456.00- '로 만든다.
SHIFT C_HSL_SUM LEFT DELETING LEADING SPACE.

* '-'의 위치값을 알아낸다. 즉, 문자의 길이를 알아낸다.
SEARCH C_HSL_SUM FOR '-'.

* SY-FDPOS가 '-'의 위치값을 갖고 있다.
I_LENT = SY-FDPOS - 3.


U_LEN = CEIL( I_LENT / 3 ).
D_LEN = I_LENT / 3.
CHK_ZERO = U_LEN - D_LEN.
* COMMA의 갯수를 알아낸다.
I_COMMA = CEIL( I_LENT / 3 ).

IF CHK_ZERO <> 0.
I_COMMA = I_COMMA + 1.
ENDIF.

* H_HSL_SUM필드값 길이를 알아낸다. (20 : H_HSL_SUM필드의 길이,
POS1: H_HSL_SUM필드를 WRITE하는 처음 위치)
I_LEN = ( 20 - I_LENT ) + POS1 - I_COMMA - 1.
WRITE AT I_LEN '▲'.
ELSE.
WRITE AT POS1(LEN1) H_HSL_SUM DECIMALS 0 NO-SIGN.
ENDIF.

번호 제목 글쓴이 날짜 조회 수
387 문자열에 있는 값이 숫자만으로 되어있는지 문자가 포함됐는지 체크하는 함수 [3] 꿀단지 2011.10.11 19821
386 CALL FUNCTION 'STRING_REPLACE' [1] 꿀단지 2011.10.11 5526
385 SAP 오피스의 메일박스에 메일 전송하는 함수 꿀단지 2011.10.11 5760
384 업로드할 엑셀 파일을 TXT 파일(탭으로 분리된)로 내리지 않고 엑셀파일로 꿀단지 2011.10.11 6369
383 ALV 색상 번호와 사용 목적 꿀단지 2011.10.11 4960
382 CS_BOM [1] 꿀단지 2011.10.11 5569
381 바피사용이유 [18] 꿀단지 2011.10.11 8344
» ▲123,456' 으로 표시하게 한다 [3] 꿀단지 2011.10.11 5687
379 Mac Notebook을 쓰는 사람들을 위한 조그만 팁. [2] Bigbrother 2011.09.21 5034
378 Do Varying 간단한 예제 및 설명입니다^^ [6] file JJB 2011.08.30 6080
377 Word Wrab 기능을사용해보자. [2] file 양키 2011.07.19 5595
376 Area 메뉴 일괄 다운로드 하기 [5] file 고담 2011.06.15 8274
375 시분초를 가져오는 구문 [8] 양키 2011.05.26 8532
374 한글 자음 분석해보기. [5] file 공백 2011.05.19 7256
373 [Tip] Explorer 8.0 & SAP GUI 7.2 fancky 2011.05.19 6603
372 Automated Note Search & Customer Code Detection 소주와 막걸리 2011.04.27 6352
371 SAP Notes Viewer for iPad/iPhone [4] D.Y.Kim 2011.04.21 6219
370 where 조건을 상황에따라 바꿔볼까? [8] 양키 2011.04.14 8735
369 간단한 계산공식은 Macro를 사용하자 [5] 양키 2011.04.14 9516
368 Batch JOB이 수행중인지 여부체크 [5] deepbluesea 2011.04.05 11383