1: package body FND_PRINT as
2: /* $Header: AFPRGPIB.pls 120.3 2006/03/06 13:21:39 pferguso ship $ */
3:
4:
5:
18: end if;
19:
20: select width, length
21: into p_width, p_length
22: from fnd_printer_styles
23: where printer_style_name = style;
24:
25: return true;
26:
37: */
38: function PRINTER_INFORMATION(printer in varchar2,
39: style in varchar2) return boolean is
40:
41: dummy fnd_printer.printer_name%TYPE;
42: begin
43:
44: select fp.printer_name
45: into dummy
42: begin
43:
44: select fp.printer_name
45: into dummy
46: from fnd_printer fp, fnd_printer_information fpi
47: where fp.printer_name = printer
48: and fp.printer_type = fpi.printer_type
49: and fpi.printer_style = style;
50:
110: VALIDSTYLE out nocopy varchar2) return boolean is
111:
112: cursor C1(MINW number, MAXW number, MINL number, MAXL number) is
113: select printer_style_name
114: from fnd_printer_styles
115: where width >= minw
116: and (maxw is null or width <= maxw)
117: and length >= minl
118: and (maxl is null or length <= maxl)
191: end GET_STYLE;
192:
193:
194:
195: end FND_PRINT;