SYS.OWA_UTIL dependencies on HTP

Line 298: htp.header(1,'Source code for ' || procname);

294: begin
295:
296: name_resolve(cname, procowner, procname);
297:
298: htp.header(1,'Source code for ' || procname);
299: htp.preOpen;
300:
301: stmt_cursor := open_source_cursor(procowner, procname);
302: while (fetch_source_cursor(stmt_cursor, line, text) >= 0)

Line 299: htp.preOpen;

295:
296: name_resolve(cname, procowner, procname);
297:
298: htp.header(1,'Source code for ' || procname);
299: htp.preOpen;
300:
301: stmt_cursor := open_source_cursor(procowner, procname);
302: while (fetch_source_cursor(stmt_cursor, line, text) >= 0)
303: loop

Line 309: htp.print;

305: then
306: line1s := line1s + 1;
307: if (line1s = 2)
308: then
309: htp.print;
310: end if;
311: end if;
312: htp.prints(translate(text,NL_CHAR,' '));
313: end loop;

Line 312: htp.prints(translate(text,NL_CHAR,' '));

308: then
309: htp.print;
310: end if;
311: end if;
312: htp.prints(translate(text,NL_CHAR,' '));
313: end loop;
314: close_source_cursor(stmt_cursor);
315:
316: htp.preClose;

Line 316: htp.preClose;

312: htp.prints(translate(text,NL_CHAR,' '));
313: end loop;
314: close_source_cursor(stmt_cursor);
315:
316: htp.preClose;
317: signature;
318: end;
319:
320: /**************************************************/

Line 325: htp.line;

321: /* Procedures for printing out an OWA "signature" */
322: /**************************************************/
323: procedure signature is
324: begin
325: htp.line;
326: htp.p('This page was produced by the ');
327: htp.p(htf.bold('PL/SQL Web ToolKit')||' on '||
328: to_char(sysdate,'Month DD, YYYY HH12:MI PM')||htf.nl);
329: end;

Line 326: htp.p('This page was produced by the ');

322: /**************************************************/
323: procedure signature is
324: begin
325: htp.line;
326: htp.p('This page was produced by the ');
327: htp.p(htf.bold('PL/SQL Web ToolKit')||' on '||
328: to_char(sysdate,'Month DD, YYYY HH12:MI PM')||htf.nl);
329: end;
330:

Line 327: htp.p(htf.bold('PL/SQL Web ToolKit')||' on '||

323: procedure signature is
324: begin
325: htp.line;
326: htp.p('This page was produced by the ');
327: htp.p(htf.bold('PL/SQL Web ToolKit')||' on '||
328: to_char(sysdate,'Month DD, YYYY HH12:MI PM')||htf.nl);
329: end;
330:
331: procedure signature(cname in varchar2 character set any_cs) is

Line 334: htp.anchor(owa_util.get_owa_service_path||

330:
331: procedure signature(cname in varchar2 character set any_cs) is
332: begin
333: signature;
334: htp.anchor(owa_util.get_owa_service_path||
335: 'owa_util.showsource?cname='||cname,
336: 'View PL/SQL source code');
337: end;
338:

Line 340: /* Procedure for printing a page generated by htp/htf */

336: 'View PL/SQL source code');
337: end;
338:
339: /******************************************************/
340: /* Procedure for printing a page generated by htp/htf */
341: /* in SQL*Plus or SQL*DBA */
342: /******************************************************/
343: procedure showpage is
344: begin

Line 345: htp.showpage;

341: /* in SQL*Plus or SQL*DBA */
342: /******************************************************/
343: procedure showpage is
344: begin
345: htp.showpage;
346: end;
347:
348: /**************************************************************/
349: /* Procedure/function for accessing CGI environment variables */

Line 368: htp.print(owa.cgi_var_name(i)||' = '||owa.cgi_var_val(i)||htf.nl);

364: procedure print_cgi_env is
365: begin
366: for i in 1..owa.num_cgi_vars
367: loop
368: htp.print(owa.cgi_var_name(i)||' = '||owa.cgi_var_val(i)||htf.nl);
369: end loop;
370: end;
371:
372: function get_owa_service_path return varchar2 is

Line 404: htp.prn('Content-type: '||l_ccontent_type||NL_CHAR);

400: then
401: charset := owa_util.get_cgi_env('REQUEST_IANA_CHARSET');
402: if (charset is null)
403: then
404: htp.prn('Content-type: '||l_ccontent_type||NL_CHAR);
405: else
406: htp.prn('Content-type: '||l_ccontent_type
407: ||'; charset='||charset||NL_CHAR);
408: end if;

Line 406: htp.prn('Content-type: '||l_ccontent_type

402: if (charset is null)
403: then
404: htp.prn('Content-type: '||l_ccontent_type||NL_CHAR);
405: else
406: htp.prn('Content-type: '||l_ccontent_type
407: ||'; charset='||charset||NL_CHAR);
408: end if;
409: else
410: htp.prn('Content-type: '||l_ccontent_type||NL_CHAR);

Line 410: htp.prn('Content-type: '||l_ccontent_type||NL_CHAR);

406: htp.prn('Content-type: '||l_ccontent_type
407: ||'; charset='||charset||NL_CHAR);
408: end if;
409: else
410: htp.prn('Content-type: '||l_ccontent_type||NL_CHAR);
411: end if;
412: htp.setHTTPCharset(charset, owa_util.get_cgi_env('REQUEST_CHARSET'));
413: else
414: -- Just output what was passed in without check for type 'text'

Line 412: htp.setHTTPCharset(charset, owa_util.get_cgi_env('REQUEST_CHARSET'));

408: end if;
409: else
410: htp.prn('Content-type: '||l_ccontent_type||NL_CHAR);
411: end if;
412: htp.setHTTPCharset(charset, owa_util.get_cgi_env('REQUEST_CHARSET'));
413: else
414: -- Just output what was passed in without check for type 'text'
415: if (l_ccharset is null) then
416: htp.prn('Content-type: '||l_ccontent_type||NL_CHAR);

Line 416: htp.prn('Content-type: '||l_ccontent_type||NL_CHAR);

412: htp.setHTTPCharset(charset, owa_util.get_cgi_env('REQUEST_CHARSET'));
413: else
414: -- Just output what was passed in without check for type 'text'
415: if (l_ccharset is null) then
416: htp.prn('Content-type: '||l_ccontent_type||NL_CHAR);
417: htp.setHTTPCharset(l_ccharset, owa_util.get_cgi_env('REQUEST_CHARSET'));
418: else
419: htp.prn('Content-type: '||l_ccontent_type
420: ||'; charset='||l_ccharset||NL_CHAR);

Line 417: htp.setHTTPCharset(l_ccharset, owa_util.get_cgi_env('REQUEST_CHARSET'));

413: else
414: -- Just output what was passed in without check for type 'text'
415: if (l_ccharset is null) then
416: htp.prn('Content-type: '||l_ccontent_type||NL_CHAR);
417: htp.setHTTPCharset(l_ccharset, owa_util.get_cgi_env('REQUEST_CHARSET'));
418: else
419: htp.prn('Content-type: '||l_ccontent_type
420: ||'; charset='||l_ccharset||NL_CHAR);
421: htp.setHTTPCharset(l_ccharset);

Line 419: htp.prn('Content-type: '||l_ccontent_type

415: if (l_ccharset is null) then
416: htp.prn('Content-type: '||l_ccontent_type||NL_CHAR);
417: htp.setHTTPCharset(l_ccharset, owa_util.get_cgi_env('REQUEST_CHARSET'));
418: else
419: htp.prn('Content-type: '||l_ccontent_type
420: ||'; charset='||l_ccharset||NL_CHAR);
421: htp.setHTTPCharset(l_ccharset);
422: end if;
423: end if;

Line 421: htp.setHTTPCharset(l_ccharset);

417: htp.setHTTPCharset(l_ccharset, owa_util.get_cgi_env('REQUEST_CHARSET'));
418: else
419: htp.prn('Content-type: '||l_ccontent_type
420: ||'; charset='||l_ccharset||NL_CHAR);
421: htp.setHTTPCharset(l_ccharset);
422: end if;
423: end if;
424:
425: if (bclose_header)

Line 438: htp.prn('Location: '||l_url||NL_CHAR);

434: begin
435:
436: l_url := validate_arg(curl);
437:
438: htp.prn('Location: '||l_url||NL_CHAR);
439:
440: if (bclose_header)
441: then http_header_close;
442: end if;

Line 454: htp.prn('Status: '||nstatus||' '||l_creason||NL_CHAR);

450: begin
451: -- validate parameter
452: l_creason := validate_arg(creason);
453:
454: htp.prn('Status: '||nstatus||' '||l_creason||NL_CHAR);
455:
456: if (bclose_header)
457: then http_header_close;
458: end if;

Line 463: htp.prn(NL_CHAR);

459: end;
460:
461: procedure http_header_close is
462: begin
463: htp.prn(NL_CHAR);
464: end;
465:
466: /**********************************************/
467: /* A couple of handy routines used internally */

Line 1302: htp.formHidden('ctable', ctable);

1298: /* We will need to parse out the owner, etc. */
1299: resolve_table(ctable,USER,
1300: table_resolved,owner_resolved,db_link_resolved);
1301:
1302: htp.formHidden('ctable', ctable);
1303: htp.formHidden('COLS', 'DUMMY');
1304:
1305: cols_cursor := dbms_sql.open_cursor;
1306: sys.dbms_sys_sql.parse_as_user(cols_cursor,

Line 1303: htp.formHidden('COLS', 'DUMMY');

1299: resolve_table(ctable,USER,
1300: table_resolved,owner_resolved,db_link_resolved);
1301:
1302: htp.formHidden('ctable', ctable);
1303: htp.formHidden('COLS', 'DUMMY');
1304:
1305: cols_cursor := dbms_sql.open_cursor;
1306: sys.dbms_sys_sql.parse_as_user(cols_cursor,
1307: 'select column_name from all_tab_columns where table_name = upper(:t)

Line 1318: htp.formCheckbox('COLS', col_name);

1314: loop
1315: if (dbms_sql.fetch_rows(cols_cursor) > 0)
1316: then
1317: dbms_sql.column_value(cols_cursor, 1, col_name);
1318: htp.formCheckbox('COLS', col_name);
1319: htp.print(col_name);
1320: htp.nl;
1321: else
1322: exit;

Line 1319: htp.print(col_name);

1315: if (dbms_sql.fetch_rows(cols_cursor) > 0)
1316: then
1317: dbms_sql.column_value(cols_cursor, 1, col_name);
1318: htp.formCheckbox('COLS', col_name);
1319: htp.print(col_name);
1320: htp.nl;
1321: else
1322: exit;
1323: end if;

Line 1320: htp.nl;

1316: then
1317: dbms_sql.column_value(cols_cursor, 1, col_name);
1318: htp.formCheckbox('COLS', col_name);
1319: htp.print(col_name);
1320: htp.nl;
1321: else
1322: exit;
1323: end if;
1324: end loop;

Line 1326: htp.formSubmit(NULL,'Execute Query');

1322: exit;
1323: end if;
1324: end loop;
1325: dbms_sql.close_cursor(cols_cursor);
1326: htp.formSubmit(NULL,'Execute Query');
1327: end;
1328:
1329: function tablePrint(ctable in varchar2,
1330: cattributes in varchar2 DEFAULT NULL,

Line 1429: htp.tableOpen(NULL, NULL, NULL, NULL, cattributes);

1425: is
1426: begin
1427: if (ntable_type = HTML_TABLE)
1428: then
1429: htp.tableOpen(NULL, NULL, NULL, NULL, cattributes);
1430: else
1431: if (cattributes is not null)
1432: then
1433: table_border := '|';

Line 1437: htp.print('

');

1433: table_border := '|';
1434: else
1435: table_border := ' ';
1436: end if;
1437: htp.print('

');

1438: end if;

1439: end;

1440: 

1441: procedure tableCaption(ccaption in varchar2 character set any_cs,


Line 1447: htp.tableCaption(ccaption, calign);


1443: ntable_type in integer DEFAULT HTML_TABLE) is

1444: begin

1445: if (ntable_type = HTML_TABLE)

1446: then

1447: htp.tableCaption(ccaption, calign);

1448: else

1449: htp.print(ccaption);

1450: end if;

1451: end;


Line 1449: htp.print(ccaption);


1445: if (ntable_type = HTML_TABLE)

1446: then

1447: htp.tableCaption(ccaption, calign);

1448: else

1449: htp.print(ccaption);

1450: end if;

1451: end;

1452: 

1453: procedure tableHeaderRowOpen(crowstring in out varchar2,


Line 1459: htp.tableRowOpen;


1455: is

1456: begin

1457: if (ntable_type = HTML_TABLE)

1458: then

1459: htp.tableRowOpen;

1460: else

1461: crowstring := table_border;

1462: end if;

1463: end;


Line 1472: htp.tableRowOpen;


1468: is

1469: begin

1470: if (ntable_type = HTML_TABLE)

1471: then

1472: htp.tableRowOpen;

1473: else

1474: ntable_width := 1;

1475: crowstring := table_border;

1476: end if;


Line 1488: htp.tableHeader(ccolumn_name);


1484: is

1485: begin

1486: if (ntable_type = HTML_TABLE)

1487: then

1488: htp.tableHeader(ccolumn_name);

1489: else

1490: crowstring := crowstring||align(ccolumn_name,ncolumn_size,calign);

1491: end if;

1492: end;


Line 1504: htp.tableHeader(ccolumn_name);


1500: is

1501: begin

1502: if (ntable_type = HTML_TABLE)

1503: then

1504: htp.tableHeader(ccolumn_name);

1505: else

1506: ntable_width := ntable_width+ncolumn_size+3;

1507: crowstring := crowstring||align(ccolumn_name,ncolumn_size,calign);

1508: end if;


Line 1517: htp.tableRowClose;


1513: is

1514: begin

1515: if (ntable_type = HTML_TABLE)

1516: then

1517: htp.tableRowClose;

1518: else

1519: htp.print(crowstring);

1520: end if;

1521: end;


Line 1519: htp.print(crowstring);


1515: if (ntable_type = HTML_TABLE)

1516: then

1517: htp.tableRowClose;

1518: else

1519: htp.print(crowstring);

1520: end if;

1521: end;

1522: 

1523: procedure tableHeaderRowClose(crowstring in out varchar2,


Line 1530: htp.tableRowClose;


1526: is

1527: begin

1528: if (ntable_type = HTML_TABLE)

1529: then

1530: htp.tableRowClose;

1531: else

1532: if (table_border = '|')

1533: then

1534: htp.print(rpad('-',ntable_width,'-'));


Line 1534: htp.print(rpad('-',ntable_width,'-'));


1530: htp.tableRowClose;

1531: else

1532: if (table_border = '|')

1533: then

1534: htp.print(rpad('-',ntable_width,'-'));

1535: htp.print(crowstring);

1536: htp.print(rpad('-',ntable_width,'-'));

1537: else

1538: htp.print(' ');


Line 1535: htp.print(crowstring);


1531: else

1532: if (table_border = '|')

1533: then

1534: htp.print(rpad('-',ntable_width,'-'));

1535: htp.print(crowstring);

1536: htp.print(rpad('-',ntable_width,'-'));

1537: else

1538: htp.print(' ');

1539: htp.print(crowstring);


Line 1536: htp.print(rpad('-',ntable_width,'-'));


1532: if (table_border = '|')

1533: then

1534: htp.print(rpad('-',ntable_width,'-'));

1535: htp.print(crowstring);

1536: htp.print(rpad('-',ntable_width,'-'));

1537: else

1538: htp.print(' ');

1539: htp.print(crowstring);

1540: htp.print(' ');


Line 1538: htp.print(' ');


1534: htp.print(rpad('-',ntable_width,'-'));

1535: htp.print(crowstring);

1536: htp.print(rpad('-',ntable_width,'-'));

1537: else

1538: htp.print(' ');

1539: htp.print(crowstring);

1540: htp.print(' ');

1541: end if;

1542: end if;


Line 1539: htp.print(crowstring);


1535: htp.print(crowstring);

1536: htp.print(rpad('-',ntable_width,'-'));

1537: else

1538: htp.print(' ');

1539: htp.print(crowstring);

1540: htp.print(' ');

1541: end if;

1542: end if;

1543: end;


Line 1540: htp.print(' ');


1536: htp.print(rpad('-',ntable_width,'-'));

1537: else

1538: htp.print(' ');

1539: htp.print(crowstring);

1540: htp.print(' ');

1541: end if;

1542: end if;

1543: end;

1544: 


Line 1551: htp.tableRowOpen;


1547: is

1548: begin

1549: if (ntable_type = HTML_TABLE)

1550: then

1551: htp.tableRowOpen;

1552: else

1553: crowstring := table_border;

1554: end if;

1555: end;


Line 1566: htp.tableData(cdata, calign);


1562: is

1563: begin

1564: if (ntable_type = HTML_TABLE)

1565: then

1566: htp.tableData(cdata, calign);

1567: else

1568: crowstring := crowstring||align(translate(cdata,NL_CHAR,' '),

1569: ncolumn_size, calign);

1570: end if;


Line 1582: htp.tableData('No data found', ccolspan=>nnum_cols);


1578: is

1579: begin

1580: if (ntable_type = HTML_TABLE)

1581: then

1582: htp.tableData('No data found', ccolspan=>nnum_cols);

1583: else

1584: crowstring := crowstring||align('No data found',ntable_width-4,calign);

1585: end if;

1586: end;


Line 1594: htp.tableRowClose;


1590: is

1591: begin

1592: if (ntable_type = HTML_TABLE)

1593: then

1594: htp.tableRowClose;

1595: else

1596: htp.print(crowstring);

1597: end if;

1598: end;


Line 1596: htp.print(crowstring);


1592: if (ntable_type = HTML_TABLE)

1593: then

1594: htp.tableRowClose;

1595: else

1596: htp.print(crowstring);

1597: end if;

1598: end;

1599: 

1600: procedure tableClose(ntable_type in integer DEFAULT HTML_TABLE)


Line 1605: htp.tableClose;


1601: is

1602: begin

1603: if (ntable_type = HTML_TABLE)

1604: then

1605: htp.tableClose;

1606: else

1607: htp.print('

Line 1607: htp.print('');

1603: if (ntable_type = HTML_TABLE)
1604: then
1605: htp.tableClose;
1606: else
1607: htp.print('');
1608: end if;
1609: end;
1610:
1611: procedure tableClose(ntable_width in integer,

Line 1617: htp.tableClose;

1613: is
1614: begin
1615: if (ntable_type = HTML_TABLE)
1616: then
1617: htp.tableClose;
1618: else
1619: if (table_border = '|')
1620: then
1621: htp.print(rpad('-',ntable_width,'-'));

Line 1621: htp.print(rpad('-',ntable_width,'-'));

1617: htp.tableClose;
1618: else
1619: if (table_border = '|')
1620: then
1621: htp.print(rpad('-',ntable_width,'-'));
1622: else
1623: htp.print(' ');
1624: end if;
1625:

Line 1623: htp.print(' ');

1619: if (table_border = '|')
1620: then
1621: htp.print(rpad('-',ntable_width,'-'));
1622: else
1623: htp.print(' ');
1624: end if;
1625:
1626: htp.print('');
1627: end if;

Line 1626: htp.print('');

1622: else
1623: htp.print(' ');
1624: end if;
1625:
1626: htp.print('');
1627: end if;
1628: end;
1629:
1630: /******************************************************************/

Line 1676: htp.p(htf.format_cell(columnValue, format_numbers));

1672: columnValue in varchar2 character set any_cs,
1673: format_numbers in varchar2
1674: ) is
1675: begin
1676: htp.p(htf.format_cell(columnValue, format_numbers));
1677: end format_cell;
1678:
1679: function bind_outputs( p_theCursor in integer,
1680: colCnt in number,

Line 1928: htp.tableRowOpen;

1924: recIx := recIx + 1;
1925: if (recIx > p_skip_rec)
1926: then
1927: recCnt := recCnt + 1;
1928: htp.tableRowOpen;
1929: for i in 1..colCnt
1930: loop
1931: if (rec_tab(i).col_charsetform= 2) or
1932: (rec_tab(i).col_type = 12)

Line 1941: htp.tableRowClose;

1937: dbms_sql.column_value(p_theCursor, i, columnValue);
1938: format_cell(columnValue, p_format_numbers);
1939: end if;
1940: end loop;
1941: htp.tableRowClose;
1942: end if;
1943: end loop;
1944: dbms_sql.close_cursor(tmpCursor);
1945: p_reccnt := recCnt;

Line 1970: htp.tableRowOpen;

1966: recMax := p_resultTbl.count / p_colCnt;
1967: colRec := 0;
1968: for recIx in 1..recMax
1969: loop
1970: htp.tableRowOpen;
1971: for i in 1..p_colCnt
1972: loop
1973: colRec := colRec + 1;
1974: format_cell(p_resultTbl(colRec), p_format_numbers);

Line 1976: htp.tableRowClose;

1972: loop
1973: colRec := colRec + 1;
1974: format_cell(p_resultTbl(colRec), p_format_numbers);
1975: end loop;
1976: htp.tableRowClose;
1977: end loop;
1978: end cellsprint;
1979:
1980: procedure cellsprint(p_colCnt in integer,

Line 1995: htp.tableRowOpen;

1991: recMax := p_resultTbl.count / p_colCnt;
1992: colRec := 0;
1993: for recIx in 1..recMax
1994: loop
1995: htp.tableRowOpen;
1996: for i in 1..p_colCnt
1997: loop
1998: colRec := colRec + 1;
1999: format_cell(p_resultTbl(colRec), p_format_numbers);

Line 2001: htp.tableRowClose;

1997: loop
1998: colRec := colRec + 1;
1999: format_cell(p_resultTbl(colRec), p_format_numbers);
2000: end loop;
2001: htp.tableRowClose;
2002: end loop;
2003: end cellsprint;
2004:
2005: procedure cellsprint( p_theQuery in varchar2,

Line 2144: htp.formSelectOpen( cname => p_cname,

2140: dbms_sql.define_column(p_theCursor, 3, selected, 2000);
2141:
2142: status := dbms_sql.execute(p_theCursor);
2143:
2144: htp.formSelectOpen( cname => p_cname,
2145: nsize => p_nsize,
2146: cattributes => ite( p_multiple,'multiple',NULL));
2147: loop
2148: exit when ( dbms_sql.fetch_rows(p_theCursor) <= 0 );

Line 2154: htp.formSelectOption( cvalue => nc_visible,

2150: then
2151: dbms_sql.column_value( p_theCursor, 1, nc_value );
2152: dbms_sql.column_value( p_theCursor, 2, nc_visible );
2153: dbms_sql.column_value( p_theCursor, 3, selected );
2154: htp.formSelectOption( cvalue => nc_visible,
2155: cselected => ite( selected IS NULL, NULL, 'select'),
2156: cattributes => 'value="' || nc_value || '"' );
2157: else
2158: dbms_sql.column_value( p_theCursor, 1, value );

Line 2161: htp.formSelectOption( cvalue => visible,

2157: else
2158: dbms_sql.column_value( p_theCursor, 1, value );
2159: dbms_sql.column_value( p_theCursor, 2, visible );
2160: dbms_sql.column_value( p_theCursor, 3, selected );
2161: htp.formSelectOption( cvalue => visible,
2162: cselected => ite( selected IS NULL, NULL, 'select'),
2163: cattributes => 'value="' || value || '"' );
2164: end if;
2165: end loop;

Line 2166: htp.formSelectClose;

2162: cselected => ite( selected IS NULL, NULL, 'select'),
2163: cattributes => 'value="' || value || '"' );
2164: end if;
2165: end loop;
2166: htp.formSelectClose;
2167: end listprint;
2168:
2169: procedure listprint( p_theQuery in varchar2,
2170: p_cname in varchar2,

Line 2189: htp.formSelectOpen( cname => p_name, nsize => 1 );

2185: l_day number default to_number(to_char(p_date,'DD'));
2186: l_mon number default to_number(to_char(p_date,'MM'));
2187: l_year number default to_number(to_char(p_date,'YYYY'));
2188: begin
2189: htp.formSelectOpen( cname => p_name, nsize => 1 );
2190: for i in 1 .. 31 loop
2191: htp.formSelectOption( cvalue => i,
2192: cselected => ite( i=l_day, 'selected', NULL ),
2193: cattributes => 'value="' ||

Line 2191: htp.formSelectOption( cvalue => i,

2187: l_year number default to_number(to_char(p_date,'YYYY'));
2188: begin
2189: htp.formSelectOpen( cname => p_name, nsize => 1 );
2190: for i in 1 .. 31 loop
2191: htp.formSelectOption( cvalue => i,
2192: cselected => ite( i=l_day, 'selected', NULL ),
2193: cattributes => 'value="' ||
2194: ltrim(to_char(i,'00')) || '"' );
2195: end loop;

Line 2196: htp.formSelectClose;

2192: cselected => ite( i=l_day, 'selected', NULL ),
2193: cattributes => 'value="' ||
2194: ltrim(to_char(i,'00')) || '"' );
2195: end loop;
2196: htp.formSelectClose;
2197: htp.p( '-' );
2198: htp.formSelectOpen( cname => p_name, nsize => 1 );
2199: for i in 1 .. 12 loop
2200: htp.formSelectOption( cvalue => to_nchar( to_date( i, 'MM' ), N'MON' ),

Line 2197: htp.p( '-' );

2193: cattributes => 'value="' ||
2194: ltrim(to_char(i,'00')) || '"' );
2195: end loop;
2196: htp.formSelectClose;
2197: htp.p( '-' );
2198: htp.formSelectOpen( cname => p_name, nsize => 1 );
2199: for i in 1 .. 12 loop
2200: htp.formSelectOption( cvalue => to_nchar( to_date( i, 'MM' ), N'MON' ),
2201: cselected => ite( i=l_mon, 'selected', NULL ),

Line 2198: htp.formSelectOpen( cname => p_name, nsize => 1 );

2194: ltrim(to_char(i,'00')) || '"' );
2195: end loop;
2196: htp.formSelectClose;
2197: htp.p( '-' );
2198: htp.formSelectOpen( cname => p_name, nsize => 1 );
2199: for i in 1 .. 12 loop
2200: htp.formSelectOption( cvalue => to_nchar( to_date( i, 'MM' ), N'MON' ),
2201: cselected => ite( i=l_mon, 'selected', NULL ),
2202: cattributes => 'value="' ||

Line 2200: htp.formSelectOption( cvalue => to_nchar( to_date( i, 'MM' ), N'MON' ),

2196: htp.formSelectClose;
2197: htp.p( '-' );
2198: htp.formSelectOpen( cname => p_name, nsize => 1 );
2199: for i in 1 .. 12 loop
2200: htp.formSelectOption( cvalue => to_nchar( to_date( i, 'MM' ), N'MON' ),
2201: cselected => ite( i=l_mon, 'selected', NULL ),
2202: cattributes => 'value="' ||
2203: ltrim(to_char(i,'00')) || '"' );
2204: end loop;

Line 2205: htp.formSelectClose;

2201: cselected => ite( i=l_mon, 'selected', NULL ),
2202: cattributes => 'value="' ||
2203: ltrim(to_char(i,'00')) || '"' );
2204: end loop;
2205: htp.formSelectClose;
2206: htp.p( '-' );
2207: htp.formSelectOpen( cname => p_name, nsize => 1 );
2208: for i in l_year-5 .. l_year+5 loop
2209: htp.formSelectOption( cvalue => i,

Line 2206: htp.p( '-' );

2202: cattributes => 'value="' ||
2203: ltrim(to_char(i,'00')) || '"' );
2204: end loop;
2205: htp.formSelectClose;
2206: htp.p( '-' );
2207: htp.formSelectOpen( cname => p_name, nsize => 1 );
2208: for i in l_year-5 .. l_year+5 loop
2209: htp.formSelectOption( cvalue => i,
2210: cselected => ite( i=l_year, 'selected', NULL ),

Line 2207: htp.formSelectOpen( cname => p_name, nsize => 1 );

2203: ltrim(to_char(i,'00')) || '"' );
2204: end loop;
2205: htp.formSelectClose;
2206: htp.p( '-' );
2207: htp.formSelectOpen( cname => p_name, nsize => 1 );
2208: for i in l_year-5 .. l_year+5 loop
2209: htp.formSelectOption( cvalue => i,
2210: cselected => ite( i=l_year, 'selected', NULL ),
2211: cattributes => 'value="' ||

Line 2209: htp.formSelectOption( cvalue => i,

2205: htp.formSelectClose;
2206: htp.p( '-' );
2207: htp.formSelectOpen( cname => p_name, nsize => 1 );
2208: for i in l_year-5 .. l_year+5 loop
2209: htp.formSelectOption( cvalue => i,
2210: cselected => ite( i=l_year, 'selected', NULL ),
2211: cattributes => 'value="' ||
2212: ltrim(to_char(i,'0000')) || '"' );
2213: end loop;

Line 2214: htp.formSelectClose;

2210: cselected => ite( i=l_year, 'selected', NULL ),
2211: cattributes => 'value="' ||
2212: ltrim(to_char(i,'0000')) || '"' );
2213: end loop;
2214: htp.formSelectClose;
2215: end;
2216:
2217: function todate( p_dateArray in dateType ) return date
2218: is

Line 2275: htp.tableOpen( cborder=>'border', cattributes=>'width="100%"' );

2271: l_loop_start := 1;
2272: l_loop_stop := 5;
2273: end if;
2274:
2275: htp.tableOpen( cborder=>'border', cattributes=>'width="100%"' );
2276: htp.tableCaption( to_nchar( l_start, N'Month YYYY' ) );
2277:
2278: for i in l_loop_start .. l_loop_stop loop
2279: htp.tableHeader( cvalue => to_nchar( l_magic_date+i, N'Day' ), cattributes => l_width );

Line 2276: htp.tableCaption( to_nchar( l_start, N'Month YYYY' ) );

2272: l_loop_stop := 5;
2273: end if;
2274:
2275: htp.tableOpen( cborder=>'border', cattributes=>'width="100%"' );
2276: htp.tableCaption( to_nchar( l_start, N'Month YYYY' ) );
2277:
2278: for i in l_loop_start .. l_loop_stop loop
2279: htp.tableHeader( cvalue => to_nchar( l_magic_date+i, N'Day' ), cattributes => l_width );
2280: end loop;

Line 2279: htp.tableHeader( cvalue => to_nchar( l_magic_date+i, N'Day' ), cattributes => l_width );

2275: htp.tableOpen( cborder=>'border', cattributes=>'width="100%"' );
2276: htp.tableCaption( to_nchar( l_start, N'Month YYYY' ) );
2277:
2278: for i in l_loop_start .. l_loop_stop loop
2279: htp.tableHeader( cvalue => to_nchar( l_magic_date+i, N'Day' ), cattributes => l_width );
2280: end loop;
2281: htp.tableRowOpen;
2282: loop
2283: exit when to_nchar( l_magic_date, N'DY' ) = to_nchar(l_start, N'DY');

Line 2281: htp.tableRowOpen;

2277:
2278: for i in l_loop_start .. l_loop_stop loop
2279: htp.tableHeader( cvalue => to_nchar( l_magic_date+i, N'Day' ), cattributes => l_width );
2280: end loop;
2281: htp.tableRowOpen;
2282: loop
2283: exit when to_nchar( l_magic_date, N'DY' ) = to_nchar(l_start, N'DY');
2284: if ( not l_mf_only or not is_weekend(l_magic_date) ) then
2285: htp.tableData( htf.br );

Line 2285: htp.tableData( htf.br );

2281: htp.tableRowOpen;
2282: loop
2283: exit when to_nchar( l_magic_date, N'DY' ) = to_nchar(l_start, N'DY');
2284: if ( not l_mf_only or not is_weekend(l_magic_date) ) then
2285: htp.tableData( htf.br );
2286: end if;
2287: l_magic_date := l_magic_date+1;
2288: end loop;
2289:

Line 2294: htp.p( '' );

2290: loop
2291: exit when ( to_nchar( p_start, N'MON') <> to_nchar( l_start, N'MON') );
2292:
2293: if ( not l_mf_only or not is_weekend(l_start) ) then
2294: htp.p( '' );
2295: htp.p( htf.italic(htf.bold(to_nchar(l_start,N'DD'))) || htf.br );
2296: end if;
2297:
2298: while(l_cnt < p_cnt AND to_nchar(l_start) = to_nchar(p_dates(l_cnt)) )

Line 2295: htp.p( htf.italic(htf.bold(to_nchar(l_start,N'DD'))) || htf.br );

2291: exit when ( to_nchar( p_start, N'MON') <> to_nchar( l_start, N'MON') );
2292:
2293: if ( not l_mf_only or not is_weekend(l_start) ) then
2294: htp.p( '' );
2295: htp.p( htf.italic(htf.bold(to_nchar(l_start,N'DD'))) || htf.br );
2296: end if;
2297:
2298: while(l_cnt < p_cnt AND to_nchar(l_start) = to_nchar(p_dates(l_cnt)) )
2299: loop

Line 2301: htp.p( '»' );

2297:
2298: while(l_cnt < p_cnt AND to_nchar(l_start) = to_nchar(p_dates(l_cnt)) )
2299: loop
2300: if ( not l_mf_only or not is_weekend(l_start) ) then
2301: htp.p( '»' );
2302: if (nchar_path) then
2303: if ( p_nlink(l_cnt) is NULL ) then
2304: htp.p( p_ntext(l_cnt) );
2305: else

Line 2304: htp.p( p_ntext(l_cnt) );

2300: if ( not l_mf_only or not is_weekend(l_start) ) then
2301: htp.p( '»' );
2302: if (nchar_path) then
2303: if ( p_nlink(l_cnt) is NULL ) then
2304: htp.p( p_ntext(l_cnt) );
2305: else
2306: htp.anchor( p_nlink(l_cnt), p_ntext(l_cnt) );
2307: end if;
2308: else

Line 2306: htp.anchor( p_nlink(l_cnt), p_ntext(l_cnt) );

2302: if (nchar_path) then
2303: if ( p_nlink(l_cnt) is NULL ) then
2304: htp.p( p_ntext(l_cnt) );
2305: else
2306: htp.anchor( p_nlink(l_cnt), p_ntext(l_cnt) );
2307: end if;
2308: else
2309: if ( p_link(l_cnt) is NULL ) then
2310: htp.p( p_text(l_cnt) );

Line 2310: htp.p( p_text(l_cnt) );

2306: htp.anchor( p_nlink(l_cnt), p_ntext(l_cnt) );
2307: end if;
2308: else
2309: if ( p_link(l_cnt) is NULL ) then
2310: htp.p( p_text(l_cnt) );
2311: else
2312: htp.anchor( p_link(l_cnt), p_text(l_cnt) );
2313: end if;
2314: end if;

Line 2312: htp.anchor( p_link(l_cnt), p_text(l_cnt) );

2308: else
2309: if ( p_link(l_cnt) is NULL ) then
2310: htp.p( p_text(l_cnt) );
2311: else
2312: htp.anchor( p_link(l_cnt), p_text(l_cnt) );
2313: end if;
2314: end if;
2315: htp.br;
2316: end if;

Line 2315: htp.br;

2311: else
2312: htp.anchor( p_link(l_cnt), p_text(l_cnt) );
2313: end if;
2314: end if;
2315: htp.br;
2316: end if;
2317: l_cnt := l_cnt+1;
2318: end loop;
2319: if ( not l_mf_only or not is_weekend( l_start ) ) then

Line 2320: htp.p( '' );

2316: end if;
2317: l_cnt := l_cnt+1;
2318: end loop;
2319: if ( not l_mf_only or not is_weekend( l_start ) ) then
2320: htp.p( '' );
2321: end if;
2322:
2323: if ( to_char(l_start,'DY','NLS_DATE_LANGUAGE=AMERICAN') = 'SAT' ) then
2324: htp.tableRowClose;

Line 2324: htp.tableRowClose;

2320: htp.p( '' );
2321: end if;
2322:
2323: if ( to_char(l_start,'DY','NLS_DATE_LANGUAGE=AMERICAN') = 'SAT' ) then
2324: htp.tableRowClose;
2325: if ( l_start <> last_day(l_start) ) then
2326: htp.tableRowOpen;
2327: end if;
2328: end if;

Line 2326: htp.tableRowOpen;

2322:
2323: if ( to_char(l_start,'DY','NLS_DATE_LANGUAGE=AMERICAN') = 'SAT' ) then
2324: htp.tableRowClose;
2325: if ( l_start <> last_day(l_start) ) then
2326: htp.tableRowOpen;
2327: end if;
2328: end if;
2329: l_start := l_start+1;
2330: end loop;

Line 2334: htp.tableData( htf.br );

2330: end loop;
2331: if ( to_char(l_start ,'DY','NLS_DATE_LANGUAGE=AMERICAN') <> 'SUN' ) then
2332: loop
2333: if ( not l_mf_only or not is_weekend( l_start ) ) then
2334: htp.tableData( htf.br );
2335: end if;
2336: exit when ( to_char(l_start,'DY','NLS_DATE_LANGUAGE=AMERICAN') = 'SAT' );
2337: l_start := l_start+1;
2338: end loop;

Line 2339: htp.tableRowClose;

2335: end if;
2336: exit when ( to_char(l_start,'DY','NLS_DATE_LANGUAGE=AMERICAN') = 'SAT' );
2337: l_start := l_start+1;
2338: end loop;
2339: htp.tableRowClose;
2340: end if;
2341: htp.tableClose;
2342:
2343: end show_internal;

Line 2341: htp.tableClose;

2337: l_start := l_start+1;
2338: end loop;
2339: htp.tableRowClose;
2340: end if;
2341: htp.tableClose;
2342:
2343: end show_internal;
2344:
2345:

Line 2475: htp.print('Current OWA toolkit version is '||owa_version);

2471: /* Procedure to print the version number */
2472: /**********************************************************************/
2473: procedure print_version is
2474: begin
2475: htp.print('Current OWA toolkit version is '||owa_version);
2476: end;
2477: end;