sapscript print barcode problem.

[Former Member]

hi everyone . i have troble about printing barcode using sapscript.

now i have program sapscript program name is "ZRABARC01"

and this program call sapscript = "ZAA_BARCODE" (you will see code at below of this message)

this program work well.

i want to create new programm "ZRABARC01_TEST"

(i use se38 for copy program from ZRABARC01)

and this new program will call sapscipt "ZAA_BARCODE_TEST"

(i use se71 to copy from ZAA_BARCODE)

sapscript is active

the problem is when i execute program ZRABARC01_TEST to call sapscript ZAA_BARCODE_TEST

it's will show button print barcode

after press button . it's will show print preview button.

when i press print preview button .

it's show error like this.

............................................................

error message

There is no valid form

Message no. AB 061

Diagnosis

During the printing of barcodes,

the system could not find a valid form. Either no form was selected,

or the form selected is not active.

System Response

The print procedure terminates.

Procedure

Use a valid form. You can either use the sample supplied by SAP,

or modify it to your requirements. You maintain forms using the "form painter" (SE71) transaction.

..............................................................

and after that i press print button again.

there is error

ABAP runtime errors LOOP_WITHIN_LOOP

what should i do to use program ZRABARC01_test call sapscript ZAA_BARCODE_test

and i wonder why when i use program ZRABARC01_test and call sapscript

ZAA_BARCODE it's show same error.

please help me.

.................................................................

program code

pa_form = 'ZAA_BARCODE'

LOOP.

AT FIRST.

• Formular ๖ffnen

CALL FUNCTION 'FIAA_BARCODE_OPEN'

EXPORTING

i_form = pa_form.

ENDAT.

• Zurckholen der Struktur ANLAV.

anlav = anlav_str.

• Insert 03/11/2004 OaK

WRITE anlav-anln1 TO t-anln1 NO-ZERO.

l1 = strlen( t-anln1 ).

CASE l1.

WHEN '1'.

CONCATENATE '000000000000' t-anln1 INTO t-anln1.

WHEN '2'.

CONCATENATE '00000000000' t-anln1 INTO t-anln1.

WHEN '3'.

CONCATENATE '0000000000' t-anln1 INTO t-anln1.

WHEN '4'.

CONCATENATE '000000000' t-anln1 INTO t-anln1.

WHEN '5'.

CONCATENATE '00000000' t-anln1 INTO t-anln1.

WHEN '6'.

CONCATENATE '0000000' t-anln1 INTO t-anln1.

WHEN '7'.

CONCATENATE '000000' t-anln1 INTO t-anln1.

WHEN '8'.

CONCATENATE '00000' t-anln1 INTO t-anln1.

WHEN '9'.

CONCATENATE '0000' t-anln1 INTO t-anln1.

WHEN '10'.

CONCATENATE '000' t-anln1 INTO t-anln1.

WHEN '11'.

CONCATENATE '00' t-anln1 INTO t-anln1.

WHEN '12'.

CONCATENATE '0' t-anln1 INTO t-anln1.

ENDCASE.

*End of insert 03/11/2004 OaK

*Insert for Barcode printing 26/01/04

• UNPACK anlav-anln1 TO t-anln1.

IF anlav-anln1+0(2) = '00'.

MOVE anlav-anln21(3) TO t-anln10(3).

ENDIF.

APPEND t.

*End of insert.

CALL FUNCTION 'Z_AA_BARCODE_PRINT'

EXPORTING

i_anlav = anlav

i_form = pa_form

TABLES

i_t = t.

*

CALL FUNCTION 'END_FORM'.

CALL FUNCTION 'START_FORM'

EXPORTING

form = pa_form

EXCEPTIONS

OTHERS = 8.

*

AT LAST .

• Formular schliessen

CALL FUNCTION 'FIAA_BARCODE_CLOSE'

EXPORTING

i_form = pa_form.

ENDAT.

ENDLOOP.

ENDFORM.

Edited by: dittaporn nanasilp on Nov 17, 2009 11:55 AM

[Sandra_Rossi]

dittaporn, please reduce the size of your post, and preview before posting. It must be less than 2500 characters as you should know

[Former Member]

i will post question again.

thank you.

[NAeda]

hi,

I am unable to read your post, check it once.

rgds