ENDOFSQL
- select '<option value="'||rtrim(lk_code)||'">'||lk_desc
- from oratut.lookup where lk_type = 'SW' and lk_code !=
- (select rtrim(software) from oratut.calls
- where seq=$seq)
- union
- select '<option value="'||rtrim(software)||
- '" SELECTED>'||lk_desc
- from oratut.calls, oratut.lookup
- where seq=$seq and lk_type='SW'
- and rtrim(lk_code)=rtrim(software)
- order by 1;