Skip to Content
0
Former Member
Oct 16, 2006 at 11:00 AM

sign

36 Views

Hi,

i am using a dataobject in my print program to get the negative values of amount of a certain quantity. This negative value is then used in my form to get the final display as described below. But i am not getting the negative sign in that value. What could be reasons and possible solution?

ELSEIF BKPF-BLART ='Z2'. "If the document type is 'Z2' all the quantities will be negative

CLEAR: G_TOT_AMT, G_TOT_GST2, G_TOTAL.

LOOP AT T_BSEG1.

G_Z2 = T_BSEG1-DMBTR * -1.

G_TOT_AMT = G_TOT_AMT + G_Z2.

ENDLOOP.

LOOP AT T_BSEG1.

G_COUNT = SY-TABIX.

G_GST2 = ( T_BSEG1-DMBTR / G_TOT_AMT ) * T_BSEG3-GST.

G_TOT_GST2 = G_TOT_GST2 + G_GST2.

PERFORM SUB_WRITE_FORM.

ENDLOOP.

G_TOTAL = G_TOT_AMT + G_TOT_GST2.

WRITE G_TOTAL TO G_CURR_TOTAL CURRENCY 'AUD'.

CONCATENATE '$' G_CURR_TOTAL INTO G_CURR_TOTAL.

CONDENSE G_CURR_TOTAL NO-GAPS.

PERFORM SUB1_WRITE_FORM.

In the Form:

/E ELEDATA

LI ,,&G_COUNT&,,&T_BSEG1-SGTXT&,,&G_GST2&,,&T_BSEG1-DMBTR&

TZ ,,Total for Items,,&G_TOT_GST2&,,&G_TOT_AMT&

GT ,,Total Amount (including GST),,&G_CURR_TOTAL&

REGARDS,

VISHWANATH