Get VALUES from FILE
Get VALUES from FILE
(OP)
I am trying to do the following. I am trying to identify all the locations assigned to a USER in an ORACLE table. But how do I populate all the returned values into a drop down box? The following code, only obtains the first value.
SQL ORA
select locations AS LOC
FROM user t
WHERE Upper(t.userid) = Upper('&MRUSER')
;
TABLE FILE SQLOUT
PRINT
LOC AS 'LOC'
ON TABLE HOLD AS LOCHLD1
END
-RUN
DEFINE FILE LOCHLD1
RLOC1/A55 = '<option value="'|| LOC ||'">' || LOC ;
END
Thanks in advance
SQL ORA
select locations AS LOC
FROM user t
WHERE Upper(t.userid) = Upper('&MRUSER')
;
TABLE FILE SQLOUT
LOC AS 'LOC'
ON TABLE HOLD AS LOCHLD1
END
-RUN
DEFINE FILE LOCHLD1
RLOC1/A55 = '<option value="'|| LOC ||'">' || LOC ;
END
Thanks in advance
RE: Get VALUES from FILE
PRINT RLOC1
ON TABLE SAVE LOCLIST
END
-RUN
-HTMLFORM formname
Where the HTMLFORM has a !IBI.FIL.LOCLIST;
RE: Get VALUES from FILE
This is code that I used to populate a drop down box.
DEFINE FILE COMPANY
OPTCOMPANY/A80 = '<OPTION VALUE="' | CMPY_NUMBER || '">' | CMPY_NAME;
END
TABLE FILE COMPANY
SUM OPTCOMPANY
BY CMPY_NAME NOPRINT
&COMPWHER
WHERE CMPY_STATUS EQ 'A' OR 'B'
ON TABLE HOLD AS CLIST FORMAT ALPHA
END
-RUN
And this is how I display it in the HTML code.
<TD width=50%><STRONG>Company/Vendor Name:</STRONG><SELECT name=compnoa size=1
onChange="CheckIt(this.options[selectedIndex].value,this.form)">
<OPTION value=''>All companies</OPTION>
!IBI.FIL.CLIST;
</SELECT>
</td>