AnsweredAssumed Answered

how to make a routine for increment serial number

Question asked by Kastor77 on Mar 20, 2014
Latest reply on Oct 14, 2014 by recantu

Like • Show 0 Likes0
Comment • 1

hi to all
i need to implement in a testplan
and i would like if somebody can help me to make build a routine for a serial number increment
for example this

302QA125TT060
302QA125TT061
302QA125TT062
302QA125TT063
302QA125TT064
302QA125TT065 ....302QA125TT069....302QA125TT06A....302QA125TT06B.... etc etc
somebody can help me giving any tips
thanks in advance

No one else has this question

Outcomes

1 Reply

recantu Oct 14, 2014 10:04 AM
Mark Correct
Correct Answer
I assume that it increments in hexadecimal so the following BT-Basic code can be used.

dim SN$(0:15)                       +*!Initializae Serial Number String Array*+
S$="302QA125TT06"           +*! Define Serial Number prefix*+
for I = 0 to 15                        +*! Initiate a for loop*+
SN$(I) = S$ & ith$(I)               +*! Concatenate S and the Integer-to-Hex value of I*+
print SN$(I)                           +*! Print the array*+
next I                                     +*! end of for loop*+
end                                        +*! end of program (if part a subrutine should be subend)*+

The output of this program is:

302QA125TT060
302QA125TT061
302QA125TT062
302QA125TT063
302QA125TT064
302QA125TT065
302QA125TT066
302QA125TT067
302QA125TT068
302QA125TT069
302QA125TT06A
302QA125TT06B
302QA125TT06C
302QA125TT06D
302QA125TT06E
302QA125TT06F

Sorry for the scramble generated by the comments on every line of the code. The forum does not accept the old code snipet to insert code.

If you want to copy-paste this code to BT-Basic, first, copy to notepad and then select the text copy and paste on BT-Basic with right-click.
Like • Show 0 Likes0
Actions

how to make a routine for increment serial number

Outcomes

Related Content

Recommended Content