source: EWD/ewdapps/DIINQUIRE/pages/index.ewd@ 1603

Last change on this file since 1603 was 1313, checked in by Sam Habiel, 13 years ago

Added <vista:session>

File size: 1.7 KB
Line 
1<ewd:config isFirstPage="false" prePageScript="FILES^C0EDIINQUIRE">
2<vista:session>
3<html>
4<head>
5<title>Inquire into File Entries</title>
6<script type="text/javascript">
7 var VISTA = {}; //Mi Casa
8
9 VISTA.getEntries = function(value) {
10 ewd:ENTRY^C0EDIINQUIRE(value);
11 document.getElementById('fsEntry').style.visibility = 'visible';
12 };
13
14 VISTA.showInqOpts = function() {
15 document.getElementById('fsInqOptions').style.visibility = 'visible';
16 }
17</script>
18</head>
19<body>
20<h1>Inquire into File Entries</h1>
21<form method="post" action="ewd">
22 <fieldset id="fsFile">
23 <label for="file">File:</label><select name="file" onChange="VISTA.getEntries(this.value)"></select>
24 <input type="button" value="Select" onClick="VISTA.getEntries(document.getElementById('file').value)">
25 </fieldset>
26 <fieldset id="fsEntry" style="visibility: hidden">
27 <label for="entry">Entry: </label><select name="entry" onChange="VISTA.showInqOpts()"></select>
28 <input type="button" value="Select" onClick="VISTA.showInqOpts()" />
29 </fieldset>
30 <fieldset id="fsInqOptions" style="visibility: hidden">
31 <p>Inquire Options</p>
32 <label for="R">Record Number:</label><input id="R" type="checkbox" name="outopt" value="R" /><br />
33 <label for="C">Computed Fields:</label><input id="C" type="checkbox" name="outopt" value="C" /><br />
34 <label for="A">Audit: </label><input id="A" type="checkbox" name="outopt" value="A" /><br />
35 <input type="submit" value="Submit" name="submit" ajax="true" nextpage="outputter" targetId="output" />
36 </fieldset>
37</form>
38<div id="output" style="font-family: Monospace; left: 10%; white-space: pre">
39</div>
40</body>
41</html>
Note: See TracBrowser for help on using the repository browser.