I haven' tried this, but can't you just write

where (H.Haul_Code=:supphaul or :supphaul is null)
and A.code=H.haul_code

and then just pass NULL to :supphaul if you want all records?

HTH,
Markus