Apparently the last script was very long winded because for a time they were running mainly Win 98 machines, and they now use almost exclusively Win2k Pro.
If you are interested, I've changed the code so it reads thus
code:
IF 
SUBSTR(@WKSTA,1,2) = "D1" OR
@WKSTA = "LEAT 30"

$PrinterName = "\\TCW2KS01\D1-HP4Si"
SETDEFAULTPRINTER ($PrinterName)
IF
SETDEFAULTPRINTER ($PrinterName) <> 0
CALL "@LSERVER\NetLogon\Scripts\dfltpntr.kix"
ENDIF
EXIT
ENDIF

I put the CALL statement in incase everything turns pear shaped. Hope it all works out!

Thanks again for your help.

Happy scripting,
Ben.