Problem with ISOLatin1Encodung for Barcode-Font

[Tucky68]

Hello!

Here you can see a part of the generated PostScript-Prolog:

/SetWordFont{dup 3 get exch 4 get 1 index LastFont eq
{dup /LastHeight exch eq{pop pop}{dup /LastHeight exch def /ActualFont
findfont [1 0 0 -1 0 0] makefont exch scalefont setfont pop}ifelse}
{exch dup /LastFont exch def findfont dup length dict begin
{1 index /FID ne{def}{pop pop}ifelse} forall /Encoding ISOLatin1Encoding def
currentdict end /ActualFont exch definefont pop /ActualFont findfont [1 0 0 -1 0 0] makefont
exch dup /LastHeight exch def scalefont setfont}ifelse}bind def

It defines the ISOLatin1Encoding for every Font I use.
Now I have to create a Document, where you can find normal text and also some Barcodes.
If I use the Prolog from above I have trouble with some Barcode characters and without it I have the trouble with the German glyphs.
Now I'm looking for a modification for the code above so that the ISOLatin1Encoding is defined for all font except the Barcode Font.

Thanx in advance,

Tucky