topic Re: append logic in Application Development and Automation Discussions

append logic

Former Member — Wed, 19 Sep 2007 10:19:07 GMT

int_a with values:

order item good qty rej qty

200 1 10 0

200 2 0 2

201 1 20 0

201 2 0 6

sort int_a by order item

loop at int_a

v_good = v_good + int_a-good

v_rej = v_rej + int_a-rej

at new order.

v_index = 1.

endat.

if v_index = 1.

move-corresponding int_a to int_b.

int_b-good = v_good.

int_b_rej = v_rej.

append int_b.

clear: v_index,int_b,v_good,v_rej.

endif.

endloop.

int_b-rej values coming topsy turvy.. i tried at end of ord,, still no use..

can any one tell me how to append the 2 line item values(good and rej) of int_a into int_b in single line?

Re: append logic

Former Member — Wed, 19 Sep 2007 10:26:34 GMT

sort int_a by order item

clear: v_index,int_b,v_good,v_rej.

loop at int_a

v_good = v_good + int_a-good

v_rej = v_rej + int_a-rej

at end of order. " not at new

v_index = 1.

endat.

if v_index = 1.

move-corresponding int_a to int_b.

int_b-good = v_good.

int_b_rej = v_rej.

append int_b.

clear: v_index,int_b,v_good,v_rej.

endif.

endloop.

regards

shiba dutta

Re: append logic

Former Member — Wed, 19 Sep 2007 10:26:39 GMT

Hi Nihi

you can modify code like this , using collect statement to sum the data .

sort int_a by order.

loop at int_a.

move-corresponding int_a to int_b. " no item in int_b

collect int_b " you can collect

endloop.

Regards

Wiboon

Re: append logic

Former Member — Wed, 19 Sep 2007 10:28:56 GMT

int_a with values:

order item good qty rej qty

200 1 10 0

200 2 0 2

201 1 20 0

201 2 0 6

sort int_a by order item

loop at int_a

v_good = v_good + int_a-good

v_rej = v_rej + int_a-rej

at end order.

move-corresponding int_a to int_b.

int_b-good = v_good.

int_b_rej = v_rej.

append int_b.

clear: v_index,int_b,v_good,v_rej.

endat.

endloop.

Re: append logic

Former Member — Wed, 19 Sep 2007 10:33:25 GMT

Hi Shiba,

thanks a lot for quick reply,,

i was using at end of before. but when i use that the item value is getting as 2..i want item as 1 in my Int_b.

does the clear: v_index,int_b,v_good,v_rej before looping will work?

Sorry for asking silly questions, but my mind got jammed..:)

Re: append logic

Former Member — Wed, 19 Sep 2007 10:38:29 GMT

just change this part

if v_index = 1.

move-corresponding int_a to int_b.

int_b-item = v_index. " or int_b-item = 1.

int_b-good = v_good.

int_b_rej = v_rej.

append int_b.

clear: v_index,int_b,v_good,v_rej.

endif.

regards

shiba dutta

Re: append logic

Former Member — Wed, 19 Sep 2007 10:43:15 GMT

thanks a ton Shiba ,,,it worked

Re: append logic

Former Member — Wed, 19 Sep 2007 11:01:25 GMT

Try this, this will surely resolve your requirement.

sort int_a by order item.

loop at int_a.

v_good = v_good + int_a-good.

v_rej = v_rej + int_a-rej.

at END OF order.

CLEAR V_INDEX.

v_index = 1.

endat.

if v_index = 1.

move-corresponding int_a to int_b..

move int_a-ORDER to int_b-ORDER.

move int_a-ITEM to int_b-ITEM.

int_b-good = v_good.

int_b-rej = v_rej.

append int_b.

clear: v_index,int_b,v_good,v_rej.

endif.

endloop.

Regards

Amit Singla