printing labels problem

  • Thread starter Thread starter Octavee Uhl
  • Start date Start date
O

Octavee Uhl

Hello,

I have a library program where I need to print spine labels of the call
number.
The call number is one field and is alphanumeric. It has data like the
folowing:
110 Ous
299 Uran V1
220.12 Car

When I print these labels I want them to look like this:
110
Ous

299
Uran V1 or

299
Uran
V1

220.12
Car

Any hints are appreciated.

Greetings
Octavee
 
Hello,

I have a library program where I need to print spine labels of the call
number.
The call number is one field and is alphanumeric. It has data like the
folowing:
110 Ous
299 Uran V1
220.12 Car

When I print these labels I want them to look like this:
110
Ous

299
Uran V1 or

299
Uran
V1

220.12
Car

Any hints are appreciated.

Greetings
Octavee

Use an unbound control for the label.

To get
299
Uran V1
Set it's control source to:

=Left([Fieldname],InStr([FieldName]," "_-1) & chr(13) & chr(10) &
Mid([FieldName],InStr([fieldName]," ")+1)

The above should be all on one line.

To get
299
Uran
V1
as control source, write:

=Replace([FieldName]," ", chr(13) & chr(10))
 
Hi Fred,

I tried the unbound field:
=Left([itemcallnumber],InStr([itemcallnumber]," "_-1) & chr(13) & chr(10) &
Mid([itemcallnumber],InStr([itemcallnumber]," ")+1)

But it gave me a syntax error.

The other solution =Replace([FieldName]," ", chr(13) & chr(10)) and it
worked great. Thanks very much.

Octavee



fredg said:
Hello,

I have a library program where I need to print spine labels of the call
number.
The call number is one field and is alphanumeric. It has data like the
folowing:
110 Ous
299 Uran V1
220.12 Car

When I print these labels I want them to look like this:
110
Ous

299
Uran V1 or

299
Uran
V1

220.12
Car

Any hints are appreciated.

Greetings
Octavee

Use an unbound control for the label.

To get
299
Uran V1
Set it's control source to:

=Left([Fieldname],InStr([FieldName]," "_-1) & chr(13) & chr(10) &
Mid([FieldName],InStr([fieldName]," ")+1)

The above should be all on one line.

To get
299
Uran
V1
as control source, write:

=Replace([FieldName]," ", chr(13) & chr(10))
 
Hi Fred,

I tried the unbound field:
=Left([itemcallnumber],InStr([itemcallnumber]," "_-1) & chr(13) & chr(10) &
Mid([itemcallnumber],InStr([itemcallnumber]," ")+1)

But it gave me a syntax error.

The other solution =Replace([FieldName]," ", chr(13) & chr(10)) and it
worked great. Thanks very much.

Octavee

fredg said:
Hello,

I have a library program where I need to print spine labels of the call
number.
The call number is one field and is alphanumeric. It has data like the
folowing:
110 Ous
299 Uran V1
220.12 Car

When I print these labels I want them to look like this:
110
Ous

299
Uran V1 or

299
Uran
V1

220.12
Car

Any hints are appreciated.

Greetings
Octavee

Use an unbound control for the label.

To get
299
Uran V1
Set it's control source to:

=Left([Fieldname],InStr([FieldName]," "_-1) & chr(13) & chr(10) &
Mid([FieldName],InStr([fieldName]," ")+1)

The above should be all on one line.

To get
299
Uran
V1
as control source, write:

=Replace([FieldName]," ", chr(13) & chr(10))

I hit the underscore key instead of the close parenthesis.
It should have been:

=Left([Fieldname],InStr([FieldName]," ") -1) & etc....
 
great, that worked.
Thanks again, Octavee

fredg said:
Hi Fred,

I tried the unbound field:
=Left([itemcallnumber],InStr([itemcallnumber]," "_-1) & chr(13) & chr(10)
&
Mid([itemcallnumber],InStr([itemcallnumber]," ")+1)

But it gave me a syntax error.

The other solution =Replace([FieldName]," ", chr(13) & chr(10)) and it
worked great. Thanks very much.

Octavee

fredg said:
On Fri, 11 Jan 2008 13:17:29 -0700, Octavee Uhl wrote:

Hello,

I have a library program where I need to print spine labels of the call
number.
The call number is one field and is alphanumeric. It has data like the
folowing:
110 Ous
299 Uran V1
220.12 Car

When I print these labels I want them to look like this:
110
Ous

299
Uran V1 or

299
Uran
V1

220.12
Car

Any hints are appreciated.

Greetings
Octavee

Use an unbound control for the label.

To get
299
Uran V1
Set it's control source to:

=Left([Fieldname],InStr([FieldName]," "_-1) & chr(13) & chr(10) &
Mid([FieldName],InStr([fieldName]," ")+1)

The above should be all on one line.

To get
299
Uran
V1
as control source, write:

=Replace([FieldName]," ", chr(13) & chr(10))

I hit the underscore key instead of the close parenthesis.
It should have been:

=Left([Fieldname],InStr([FieldName]," ") -1) & etc....
 
Back
Top