2024年6月11日发(作者:)

CABNT~ATBEZ

CABN~ATNAM

INTO (GS_TX-ATBEZ,GS_TX-ATNAM)

FROM CABNT INNER JOIN CABN ON CABNT~ATINN = CABN~ATINN

AND CABNT~ADZHL = CABN~ADZHL

WHERE CABN~ATNAM = GS_ORDER_CFGS_CUVALS_OUT-CHARC.

SELECT SINGLE

CAWNT~ATWTB

INTO GS_TX-ATWTB

FROM CAWN INNER JOIN CAWNT ON CAWN~ATINN = CAWNT~ATINN

AND CAWN~ATZHL = CAWNT~ATZHL

WHERE CAWN~ATWRT = GS_ORDER_CFGS_CUVALS_OUT-VALUE.

IF SY-SUBRC <> 0.

VALUE = GS_ORDER_CFGS_CUVALS_OUT-VALUE.

CALL FUNCTION 'QSS0_FLTP_TO_CHAR_CONVERSION'

EXPORTING

I_NUMBER_OF_DIGITS = 0

I_FLTP_VALUE = VALUE

I_VALUE_NOT_INITIAL_FLAG = 'X'

I_SCREEN_FIELDLENGTH = 16

IMPORTING

E_CHAR_FIELD = TEMP.

GS_TX-ATWTB = TEMP.

ENDIF.

APPEND GS_TX TO GT_TX.

ENDLOOP.