‎2006 Jun 27 5:30 PM
HI
PLZ CLARIFY I NEED TO PRINT MATERIAL NUM AS 2 0F 5 BARCODE PLZ TELL ME THE BELOW COD EIS CORRECT OR NOT
<BC>&HD_GEN-MATERIAL_NUMBER&</>
REGARDS
NA
‎2006 Jun 27 6:16 PM
‎2006 Jun 27 6:22 PM
Hi,
barcodes wil be generated in the printer itself, if you give <b><BC>&HD_GEN-MATERIAL_NUMBER&</></b> then you have a value for "Barcode" .
<b>Adding Your Own Bar Code:-</b>
http://help.sap.com/saphelp_nw04/helpdata/en/d9/4a94fc51ea11d189570000e829fbbd/content.htm
<b>barcodes in SAP</b>
http://help.sap.com/saphelp_nw04/helpdata/en/68/4a0d5b74110d44b1b88d9b6aa1315b/content.htm
Thanks
Sudheer
‎2006 Jun 27 6:39 PM
hi,
Print Unique Indicator as a Barcode
The printing of unique indicators of elements (reference numbers of records, case indicators, or document numbers) as barcodes is controlled by SAPscript forms.
SAP delivers a common SAPscript form based on the SAP barcode type AUFNR for records, cases, documents and incoming post items.
To create another SAP barcode type, you can copy the SAPscript form RMPS_BARCODE and then adjust it to your own requirements. Then you have to define the new form using the following attribute names in the table SCMGPARAM:
From within a SAPscript form, a subroutine GET_BARCODE in the ABAP program QCJPERFO is called. Then the simple barcode contained there (First page, Next page, Last page) is printed as local variable symbol.
Definition in the SAPscript form:
/: PERFORM GET_BARCODE IN PROGRAM QCJPERFO
/: USING &PAGE&
/: USING &NEXTPAGE&
/: CHANGING &BARCODE&
/: ENDPERFORM
/
/ &BARCODE&
Coding of the calling ABAP program:
REPORT QCJPERFO.
FORM GET_BARCODE TABLES IN_PAR STUCTURE ITCSY
OUT_PAR STRUCTURE ITCSY.
DATA: PAGNUM LIKE SY-TABIX, "page number
NEXTPAGE LIKE SY-TABIX. "number of next page
READ TABLE IN_PAR WITH KEY PAGE.
CHECK SY-SUBRC = 0.
PAGNUM = IN_PAR-VALUE.
READ TABLE IN_PAR WITH KEY NEXTPAGE.
CHECK SY-SUBRC = 0.
NEXTPAGE = IN_PAR-VALUE.
READ TABLE OUT_PAR WITH KEY BARCODE.
CHECK SY-SUBRC = 0.
IF PAGNUM = 1.
OUT_PAR-VALUE = |. "First page
ELSE.
OUT_PAR-VALUE = ||. "Next page
ENDIF.
IF NEXTPAGE = 0.
OUT_PAR-VALUE+2 = L. "Flag: last page
ENDIF.
MODIFY OUT_PAR INDEX SY-TABIX.
ENDFORM.
regards,
keerthi
Message was edited by: keerthi kiran varanasi
‎2006 Jun 27 6:50 PM