Skip to Content
0
Former Member
Nov 17, 2009 at 01:28 PM

Blocking delivery output types

131 Views

HI Experts,

i have created VOFM requirement routine for the output & thn assigned tht VOFM routine to the output type in the output determination procedure,eventhough the output type is getting generated. below code for ur ref.how can i solve this iisue..

DATA: w_value TYPE ZVXXVALUE,

w_subrc TYPE sy-subrc.

DATA: e_lips TYPE lips.

DATA: i_lips TYPE STANDARD TABLE OF lips.

CONSTANTS: c_xlips(17) TYPE c VALUE '(SAPMV50A)XLIPS[]',

c_main TYPE ZVXXMAIN VALUE 'STXH_VSLOC',

c_value TYPE ZVXXVALUE VALUE '0098'.

FIELD-SYMBOLS: <fs_lips> TYPE ANY TABLE,

<fs_t_lips> TYPE lips.

UNASSIGN <fs_lips>.

ASSIGN (c_xlips) TO <fs_lips>.

IF <fs_lips> IS ASSIGNED.

FREE i_lips.

MOVE <fs_lips> TO i_lips[].

UNASSIGN <fs_t_lips>.

LOOP AT i_lips ASSIGNING <fs_t_lips> WHERE vbeln EQ komkbv2-vbeln.

CLEAR e_lips.

MOVE <fs_t_lips> TO e_lips.

CLEAR w_value.

SELECT SINGLE value

FROM ZVXXPARAM_GLOBAL

INTO w_value

WHERE main EQ c_main

AND Sub1 EQ <fs_t_lips>-werks

AND sub2 EQ c_value.

IF sy-subrc EQ 0.

IF w_value EQ <fs_t_lips>-lgort.

MOVE 4 TO w_subrc.

ELSE.

MOVE 0 TO w_subrc.

ENDIF.

ENDIF.

ENDLOOP.

ENDIF.

sy-subrc = w_subrc.

Thx & Regards,

Veera.