Printing Serial numbers in a script.

Hi friends,
I want to print serial number for the line items in the main window of a script, Please help me regarding this, if possible give me the sample code.
I want to print like this
sl.no.   material no.
1.        100-100
2.        100-101
thanks in advance,
Arundhathi.

Hi
to increase a sapscript counter you put a symbol in front
Like for example
You can increase or decrease the value of a SAPSCRIPT-COUNTER_x (x=0.. 9) counter variable by 1, before the current counter value is printed.
Syntax:
&SAPSCRIPT-COUNTER_x(+)& Increases by 1 the contents
of the counter variable x
(x=0.. 9)
&SAPSCRIPT-COUNTER_x(-)& Decreases by 1 the contents
of the counter variable x
(x=0.. 9)
If you want to change the value of a counter variable without actually printing the new value, use this formatting option together with an additional option to set the output length to 0 (see above). If you want to set a counter variable to some specific value, use the DEFINE control command.
Assume that &SAPSCRIPT-COUNTER_1& initially has the value 2.
&SAPSCRIPT-COUNTER_1& -> 2
&SAPSCRIPT-COUNTER_1(+)& -> 3
&SAPSCRIPT-COUNTER_1(-)& -> 2
&SAPSCRIPT-COUNTER_1(-)& -> 1
&SAPSCRIPT-COUNTER_1(+0)& ->
&SAPSCRIPT-COUNTER_1(+)& -> 3
Or in your report give this coding
FORM increase_line_count TABLES in_par STRUCTURE itcsy
                                out_par STRUCTURE itcsy.
DATA: line_count TYPE i.
READ TABLE in_par WITH KEY 'COUNTER'.
IF sy-subrc = 0.
*---Increase Counter
    line_count = in_par-value + 1.
*---Set Counter
    READ TABLE out_par WITH KEY 'COUNTER'.
    IF sy-subrc = 0.
      out_par-value = line_count.
      MODIFY out_par INDEX sy-tabix.
    ENDIF.
ENDIF.
ENDFORM.                    " INCREASE_LINE_COUNT
Then in your main window call this form as:
/: PERFORM INCREASE_LINE_COUNT IN PROGRAM ZPROGRAMNAME
/: USING &COUNTER&
/: CHANGING &COUNTER&
/: ENDPERFORM
Regards
Pavan

Similar Messages

How to generate Serial numbers using JAVA SCRIPT

how to generate serial numbers(incrementing by 1) using JAVA SCRIPT
thanking you,
pola pradeep

i am afraid that whether ur looking for this. bcoz its a simple for loop
<script language="JavaScript">
//count = limit value for u
for(i=0;i<count;++i){
alert(i);
</script>
or if ur looking for something else, pls mention ur requrment precisely
aleena

Printing Serial Number in Material document print output

Hi
Is it possible to print serial numbers in Material document print output. Any settings to be done?
Regards

Hi,
Yes you can, you need to get you ABAP Developer to change the smartform (He should know how to do this)
Please award points if helpful
Regards
Adeel

Label printing for serial numbers out of production order

Dear PP experts,
according to the standard help description, it should be possible to
print a label with barcode for each serial number generated for production order when printing shop floor papers.
As for the standard set up, the following forms are assigned for
production order object, where none of them seems to be a label type.
LF01 PRT overview
LG01 Object list
LG02 Op. control ticket
LG03 Job Ticket
LG04 Kanban ticket
LK01 Pick list
LK02 Goods issue slip
LK03 Goods receipt list
LP01
LP02
LV01 Time ticket
LV02 Confirmation slip
LV03 Document links
LV04 Operation Splitting
Some of the print programs contain the ser.number information though
none of them is designed for label printing. Does anyone know
further information how is the label printing intended to work for
serial numbers in production order?
Thanks.
Peter --
Message was edited by:
Peter Hanak

Hi,
The process of scanning barcodes and label printing :
First u have to define the output type which has tobe attached with or linked to a "form" or "Smart Form" which displays a label layout.Through ABAP coding u have to link the object (any of the mentioned by u) with the "form or smart form".
So as u scan the barcode with serial number the label gets printed at the required stage of production order processing.
This includes the pure Technical stuff of coding.
Prakash

How to print page numbers in adobe form

Hi,
Can anybody tell me how to print page numbers in adobe form.
Thanks in advance
Chaitanya

Hi,
Yes the field page n of m is used normally for printing page numbers. But it won't display the current page of total pages by itself. You have to set the run time property to n (current page ) and m (Total number of pages). Carefully select the # (current page ) and ## (Total number of pages). Hope this works for you.
My requirement is to have the user control on current page. For Example:
Example for a Invoice with 5 PO items (stands on 2 pages) :
1st page is the letter : no page number
2nd page is the 1st page of the 1st copy of the invoice : we should read u201C1 / 2u201D
3rd page is the 2nd page of the 1st copy of the invoice : we should read u201C2 / 2u201D
4th page is the 1st page of the 2nd copy of the invoice : we should read u201C1 / 2u201D
5th page is the 2nd page of the 2nd copy of the invoice : we should read u201C2 / 2u201D
Presently i cam getting the current page number for page 4th as 3 / 2 and for 5th page 4 / 2. I could able to control the total number of pages from print program. But when i am printing the second copy (4th and 5th pages), I couldn't able to control the current page number. I need to initialize the Current page count (4th page ) as 1.
I have used the follwing java scripting:
this.rawValue = wv_pages - xfa.layout.page(this)
where wv_pages is total no of pages calculated from print program.
Please help me in this regard with some formcal or java scripting conditions.
Thank You,
Regards,
Naresh.

In Purchase Order Line item Maintaining Serial Numbers for Material Codes

Dear Gurus,
We have a business process in legacy system for Purchase Order like in PO line item, Material code with description, Quantity, unit of Measurement, Serial Number Start and Serial Number End is maintained, for example for Material code when we enter the data AXMLN00001 in Serial Number Start column, if the Qty 500 is maintained, by default system will calculate AXMLN00500 in Serial Number End column.
We understand that in standard SAP we donu2019t have this option of maintaining Serial Number Start and End in Purchase order Line item. Please let us know how this can be mapped and is it advisable to create two Z fields in EKPO table or else can we make any development.
Suppose if this is not possible in SAP for PO then in Banks if we want to place a order for Cheque books how we can maintain Start and End Serial Numbers to print in cheque books.
Also client is not agreeing to maintain manually Serial numbers in item text.
regards,
Dhanu

Aamir,
When the PO Item was created say for example Material had Valuation category "Y" and latter you wanted to change the category to "Y". Now system would have check for all open PO's etc...based on this you must have set Deletion Indicator to this Line Item to allow valuation category change in material master. Now when this Item got created in the table level (EKPO), system updates the valuation category "Y". Currently this valuation category is not active so it would not allow you to perform removal of deletion indicator as program cannot automatically nor you have an option to manually update the valuation category to this Item.
Regards,
Prasobh

Serial Numbers in third party system

Hi All,
How to mange serial number in the third party sales scenario.In standard sales process we manage serial numbers at delivery level.
But for Third party delivery will be done from vendor's place.But our client wants to keep
a track of serial numbers.Kindly share some inputs
Would apprecite a quick response.
Regards
Neel

hello,
do u want serial nos for tracking purpose?
one way out is to maintain them at sales order level and have the same no in purchase order sent to the vendor in the form of text.
ask the vendor to print this no in his delivery document as well.
from the sales order, you can pick this no for invoice print as well.
i hope this is a way out. dont know if something is available in standard.
rgs,
ak

How to print Sequential Numbers like purchase order?

I ma new to mac and Numbers 09 and have a quick question. How do I print sequential numbers? I have my own MS Excel purchase order number with macro and I want to use Iwork Numbers to print the numbers. For example, Purchase Order: 70085-1 is in my form. When I ask to print 20 copies, it will print 70085-1, 70085-1, 70085-3, etc.
Thanks in advance

Here is a modified version of my original script which was posted in :
http://discussions.apple.com/thread.jspa?messageID=12679002
This time, with a single run, we may define the number of consecutive invoices to create.
--[SCRIPT openAndNameInvoiceWithAnumber]
Enregistrer le script en tant que Script : openAndNameInvoiceWithAnumber.scpt
déplacer le fichier créé dans le dossier
<VolumeDeDémarrage>:Utilisateurs:<votreCompte>:Bibliothèque:Scripts:Applications:Pages:
Il vous faudra peut-être créer le dossier Pages et peut-être même le dossier Applications.
aller au menu Scripts , choisir Pages puis choisir openAndNameInvoiceWithAnumber
crée un nouveau document à partir du modèle personnel prédéfini
et renomme le document avec un nouveau numéro.
Il insère également le numéro de facture au début du document.
--=====
L'aide du Finder explique:
L'Utilitaire AppleScript permet d'activer le Menu des scripts :
Ouvrez l'Utilitaire AppleScript situé dans le dossier Applications/AppleScript.
Cochez la case "Afficher le menu des scripts dans la barre de menus".
+++++++
Save the script as Script, Application or Application Bundle: openAndNameInvoiceWithAnumber.xxx
Move the newly created file into the folder:
<startup Volume>:Users:<yourAccount>:Library:Scripts:Applications:Pages:
Maybe you would have to create the folder Pages and even the folder Applications by yourself.
go to the Scripts Menu, choose Pages, then choose openAndNameInvoiceWithAnumber
will create a new document from the defined user template
and name it with a new number.
It also insert the invoice number at the very beginning of the document.
--=====
The Finder's Help explains:
To make the Script menu appear:
Open the AppleScript utility located in Applications/AppleScript.
Select the "Show Script Menu in menu bar" checkbox.
--=====
Yvan KOENIG (Vallauris, FRANCE)
2010/11/30
2010/12/20 edited to apply if the template is a flatfile one.
2011/01/11 added ability to build several invoices in a single call
property theApp : "Pages"
property theExt : ""
property myTemplate : "ma_facture.template" (*
Adapter à vos besoins
Put your preferred template name *)
property fichierNum : "le_numéro.txt" (*
Adapter à vos gouts
Put your preferred text file name *)
--=====
on run
if theApp is "Pages" then
set theExt to "pages"
else
if my parleAnglais() then
error "The application “" & theApp & "” is not supported !"
else
error "L’application « " & theApp & " » n’est pas gérée"
end if
end if
if my parleAnglais() then
set nombredefactures to my askAnumber("Enter the number of consecutive invoices needed", 1, "i")
else
set nombredefactures to my askAnumber("Saisir le nombre de factures consécutives demandé", 1, "i")
end if
repeat nombredefactures times
my buildaninvoice()
end repeat
end run
--=====
on buildaninvoice()
set {p2myTemplate, numero} to my prepare()
set numero to text -5 thru -1 of ("0000" & numero) (* pour numéro de 5 chiffres *)
set UNTITLED_loc to my getLocalizedFrameWorksName(theApp, "Untitled")
tell application "Pages"
activate
try
close document UNTITLED_loc
end try
end tell -- to Pages
tell application "Pages"
activate
open p2myTemplate
set theDoc to numero & "." & theExt
set name of document 1 to theDoc
tell document 1
tell body text
if my parleAnglais() then
set paragraph 1 to "invoice #" & numero & return & paragraph 1
else
set paragraph 1 to "facture n°" & numero & return & paragraph 1
end if
end tell
end tell
end tell
end buildaninvoice
--=====
on getLocalizedFrameWorksName(theApp, x)
local p2bndl
set p2bndl to (path to application support as text) & "iWork '09:Frameworks:SFApplication.framework:Versions:A:Resources:"
set x_loc to my getLocalizedName(theApp, x, p2bndl)
return x_loc
end getLocalizedFrameWorksName
--=====
on getLocalizedFunctionName(theApp, x)
local p2bndl
set p2bndl to (path to application support as text) & "iWork '09:Frameworks:SFTabular.framework:Versions:A:Resources:"
set x_loc to my getLocalizedName(theApp, x, p2bndl)
return x_loc
end getLocalizedFunctionName
--=====
on getLocalizedName(aa, tt, ff)
tell application aa to return localized string tt from table "Localizable" in bundle file ff
end getLocalizedName
--=====
on prepare()
local d1, d2, p2d, containerOfTemplates, pathToTheTemplate, p2n, nn
tell application theApp
set d1 to localized string "Templates" (* nom local du dossier "Modèles" *)
set d2 to localized string "My Templates" (* nom local du dossier "Mes Modèles" *)
end tell -- theApp
set p2d to (path to application support from user domain) as Unicode text
set containerOfTemplates to p2d & "iWork:" & theApp & ":" & d1 & ":" & d2 & ":"
set pathToTheTemplate to containerOfTemplates & myTemplate & ":"
try
set pathToTheTemplate to pathToTheTemplate as alias
on error
if my parleAnglais() then
error "The template “" & pathToTheTemplate & "” is unavailable! Please make sure the template file “" & myTemplate & "” is installed in Numbers “Templates:My Templates” folder, then rerun this script."
else
error "Le modèle « " & pathToTheTemplate & " » est introuvable! Veuillez installer le fichier modèle « " & myTemplate & " » dans le dossier « Modèles:Mes modèles » de Numbers avant de relancer ce script."
end if
end try
tell application "System Events"
if class of disk item (pathToTheTemplate as text) is file then
(* flat file *)
set p2n to containerOfTemplates & fichierNum
if not (exists file p2n) then
make new file at end of folder containerOfTemplates with properties {name:fichierNum}
write "100" to file p2n (* mettez le numéro de départ de votre choix *)
end if -- not…
else
(* package *)
set p2n to "" & pathToTheTemplate & fichierNum
if not (exists file p2n) then
make new file at end of pathToTheTemplate with properties {name:fichierNum}
write "100" to file p2n (* mettez le numéro de départ de votre choix *)
end if -- not…
end if
end tell -- System Events
set nn to read file p2n
set nn to ((nn as integer) + 1) as text
write nn to file p2n starting at 1
return {pathToTheTemplate, nn}
end prepare
--=====
on parleAnglais()
local z
try
tell application theApp to set z to localized string "Cancel"
on error
set z to "Cancel"
end try
return (z is not "Annuler")
end parleAnglais
--=====
Asks for an entry and checks that it is an floating number
set myInteger to my askAnumber(Prompt, DefaultValue, "i")
set myFloating to my askAnumber(Prompt, DefaultValue, "f")
on askAnumber(lPrompt, lDefault, IorF)
local lPrompt, lDefault, n
tell application (path to frontmost application as string)
if IorF is in {"F", "f"} then
set n to text returned of (display dialog lPrompt & " (" & (1.2 as text) & ")" default answer lDefault as text)
try
set n to n as number (* try to convert the value as an number *)
return n
on error
if my parleAnglais() then
display alert "The value needs to be a floating number." & return & "Please try again."
else
display alert "La valeur saisie doit être un nombre décimal." & return & "Veuillez recommencer."
end if
end try
else
set n to text returned of (display dialog lPrompt default answer lDefault as text)
try
set n to n as integer (* try to convert the value as an integer *)
return n
on error
if my parleAnglais() then
display alert "The value needs to be an integer." & return & "Please try again."
else
display alert "La valeur saisie doit être un nombre entier." & return & "Veuillez recommencer."
end if
end try -- 1st attempt
end if -- IorF…
end tell -- application
Here if the first entry was not of the wanted class
second attempt *)
tell application (path to frontmost application as string)
if IorF is in {"F", "f"} then
set n to text returned of (display dialog lPrompt & " (" & (1.2 as text) & ")" default answer lDefault as text)
try
set n to n as number (* try to convert the value as an number *)
return n
on error
end try
else
set n to text returned of (display dialog lPrompt default answer lDefault as text)
try
set n to n as integer (* try to convert the value as an integer *)
return n
on error
end try -- 1st attempt
end if -- IorF…
end tell -- application
if my parleAnglais() then
error "The value you entered was not numerical !" & return & "Goodbye !"
else
error "La valeur saisie n’est pas numérique !" & return & "Au revoir !"
end if
end askAnumber
--=====
--[/SCRIPT]
Yvan KOENIG (VALLAURIS, France) mardi 11 janvier 2011 09:30:37

How to include Serial Numbers in a marketing documents

Hi,
we would like to show the serial number attached to the right item in the Invoice and Delivery documents. But the serial number columns are always empty in the markleting documents. My boss don't want to see the serial numbers on a separate report like it is right now.
Do you have any solution ? I tried to use a Formatted search to fill the Serial Number Field, but it's not working, I can't discard the wrong serial number or the SQL query do not work in SAP (thought it's working well in SQL Server)..
Daniel Gagnon

You should select the setting for When Batch/Serial No. Exist, Print
Select the option to print Batch or Serial Number information in inventory documents.
Document and Batch/Serial No. (Print the document and the Batch or Serial Number information)
To access this area Administration > System Initialization > Print Preferences..Per document Tab
Suda

Serial Numbers and Delivery not automated.

"The serial number field on the delivery is only a text field and requires user input. The actual serial numbers shipped on the delivery are not put in this field automatically by the system as you know. This is how it works. The serial number data is stored in different tables, OSRI and SRI1 and linked to the delivery document."
We have been manually typing the S/N into the delivery form so that we can have it print packing lists and invoices. Once we select the S/N for the delivery it should automatically update the delivery form.
The Delivery form does not automatically fill in the S/N once we select a s/n. Here is a scenario
1.)Select a Sales Order that has an item that requires a s/n.
2.) Copy SO to Delivery
3.) Click Add or put the cursor in the proper row of the s/n column and hit enter. A new window showing available S/N should appear.
4.) Select the S/N, assign to this SO and click Update then OK.
5.) Repeat if more then 1 item requires a s/n.
6) When done, click ADD and a new Delivery ticket is created. Note at this time the S/N are not showing in the Delivery Form.
7) You can now click Print Preview and it will show the Packing List along with a page for serial numbers. Also a Crystal Report Packing list is generated, but the s/nu2019s are not listed.
The only way we can get s/nu2019s to show on the Delivery form and in Crystal .Reports is to MANUALLY type the s/n into the Delivery form. We want to avoid typing the data, potential for typou2019s. This should be something the software does for us.

We're wondering the same thing. Would a bar code scanner work? The data would have to be displayed on a PC or something where it could be recorded.
Yes and no.
We have a small Bluetooth barcode scanner. Works well if the bar codes were printed better. I mean, the bar codes for switches/routers are "readable" but for wireless access points, you would need several attempts to get it to read.
Alternatively, you can read the bar codes from the box. I only use this as a "last resort" because I have seen, in two occasions, that the codes in the box and the the ones from the appliance don't match.

Serial Numbers in GRN Template

Hi,
I am creating a template for Inventory Transfers. I am including a field to show the Serial Numbers, but when I see the print preview, the serial numbers field remains blank. I am sure that the items have serial numbers.
Any ideas please?
Thanks,
vankri

hy
once check this option
go to administration >print preference
select per document Tab
select inventory transfer document from list
there is a option" When Batch/Serial No. Exist, Print" in front of that select "document and Batch/Serial No"
Thanks
Avtar Singh Saini

Serial numbers in sales order/delivery

Hi All
I have a question question on Bar code number generation. Please note that this is NOT a question on bar code printing or issuing output to printer.
One of our customers requires serial numbers for all the products that we supply to them and they give us a serial number range from time to time and every material that we supply to them must go with one new serial number from their range.
It may not be able to possible achieve the above functionality by maintaining serial numbers in the Material Master as it is customer specific. I need to maintain this number range somewhere and when the sales order/delivery is entered for this particular customer, the system must check (or some function module) the next available number and assign a number to the material.
I checked all the possible help sites, but they do not explain about getting it for particular customer. Can you please suggest me any methods or procedures to do it
Regards
Monika
Edited by: Monika2010 on Jul 20, 2010 3:14 PM

hi,
In order to maintain customer specific serial numbers you can do the following steps:
1. Maintain the serial numbers provided by your client in tcode IQ01. this will create the customer serial numbers in the system.
2. In the material master under Sales View maintain the serial number profile as 0002. this is sap standard.
3. Once the above has been maintained you can assign serial numbers at the time of delivery and NOT in sales order.
I hope this helps.
Regards,
Vishesh

Newest MBPs and their serial numbers

Hello,
I was wondering what the serial numbers for the newest MBP are right now. I just got a MBP, and before I open the box, I'd like to know if it is one of the newer units.
thanks much

The serial number is printed on the outside of the Apple packaging. I recieved a W8617 (week 17) at the end of April.

Change external serial numbers

Hello Folks,
The serial numbers at the Client place have year stamp (external numbers). here is an example of it
ex : 0988880000001
Where first 2 digit "09" is a year stamp
the next 4 digits are material code - "8888"
the last 7 digits are for pieces to procure - "0000001"
totally there are 13 digits and are printed and used as barcodes on the pieces (EAN 13)
I want to know whether i can change this format to "1088880000001" from the next year. (After midnight 31st Dec 09). if yes , how to do this and where, so that the data gets uploading in the same table as a continuation of previous entries. Would there be any inconsistencies like system cannot access previous serial numbers?
Thanks much in advance,
Ashwin.

Angela,
You cannot change in Mass but one by one you can change for that you will have to go into Tcode. OIS2, Check Column StkCk -Stock check for serial numbers, maintain this column as blank. i.e., StkCk = 0
Else
with StkCk = 2 you cannot enter Stock type, Plant, Storage location if you do it, it will throw an error,
"Stock control active (profile ZXXX) for material XXXXXXXXX in plant XXXX), but you can maintain StkCk = 0 temporarily, until you complete maintaining plant, storage location for all the serial numbers then reinstate StkCk = 2.
Discipline the enduser from clicking "create serial no Automatically" then it will create DUmmy serial nos without plant and storage location.
2. You cannot delete it, but you can set Deletion Flag and you can make serial no active or inactive.
TCode Iq02 : Matserialno --> Functions --> A. Active and B. Deletion flag
Note: Be careful it should not affect other plants.
Regards
Sathya

Printing Serials with ALD print first serial double in last row

Hallo,
when we print serials the first serial will be printed in a additionally last row befor the next article will be print out.
Example:
Article      quantity
4711         3
Serial: abc
Serial: def
Serial: ghi
Serial: abc <- This line is unnecessary and should not
               be print out
To print the serial numbers we use the following formula:
if(Belegzeile.Seriennummer.Seriennummer<>"", "Seriennummer: " + Belegzeile.Seriennummer.Seriennummer ,"")
Datstellungsbedinung:
Previous (Belegzeile.Zeilennummer) = Belegzeile.Zeilennummer and Previous (Belegzeile.Seriennummer.Seriennummer) <> Belegzeile.Seriennummer.Seriennummer
The Version of the ALD ist 6.70.1.5
Any Idea?
Best regards,
Michael

Hi,
Check SAP Business One Customer Portal on The Marketplace.
Search the Hint Nr. 813796
"... It is possible to create a data line definition for a document line and its item information. Also
it is possible to create a data definition line for all serial number information using ONLY fields from the
node "DocumentLine(s)->SerialNumber")
IT IS NOT ALLOWED TO MIX THE FIELDS!
How to identify the different line types?
The designing tool has to identify which line type should be printed, e.g. should data definition line for the
document line or the data definition line for the serial number be printed
There is a Field below the folder "DocuemtLine(s)" named "LineType". This line type identifies which line
definition should be used. Use this field as an appearance condition for the several data definition lines.
e.g. Use the data definition line or the serial number only if DocumentLines.LineType = "SRI", or use the
fields of the document line and the item only if DocumentLines.LineType = "R"
Which line types do exist?
Currently the following line types exist
LineType Description Valid Folder
"S" "Summation" (DocumentLines->Structure)
"T" "Text" (see LineType "S")
"IBT" "Batch Number" (DocumentLines->BatchNumber)
"SRI" "Serial Number" (DocumentLines->SerialNumber)
"R" "Regular Item" (Everything else but above)
"A" "Alternative Article" (see LineType "R")
this Doc may help

Printing Serial numbers in a script.

Similar Messages

Maybe you are looking for