Yes, I read the Data from a file!
So, before I insert my Data in a Table I run the vb.code above and I recreate the file with the generated ref_number.
The raw Data in the file are (semilicon (;) delimited)-->
H;123442;23%;78.99;52000990889
L;socks;blue;100
L;socks;L;red;200
H;123443;23%;500.99;52000990111
L;skirt;blue;100
L;pants;red;200
Thank you!!