60: -- | |
61: -- | + -- width specification
62: -- +-- align specification (L-Left, C-Center, R-Right, S-Start E-End)
63: --
64: procedure NTF_Table(cells in wf_notification.tdType,
65: col in pls_integer,
66: type in varchar2, -- 'V'ertical or 'H'orizontal
67: rs in out nocopy varchar2)
68: is
130: ' cellspacing='||l_table_cellspacing||
131: ' bgcolor='||l_table_bgcolor||' '||l_dirAttr||'>';
132:
133: -- ### implement as generic log in the future
134: -- if (wf_notification.debug) then
135: -- dbms_output.put_line(to_char(cells.LAST));
136: -- end if;
137:
138: for i in 1..cells.LAST loop
135: -- dbms_output.put_line(to_char(cells.LAST));
136: -- end if;
137:
138: for i in 1..cells.LAST loop
139: -- if (wf_notification.debug) then
140: -- dbms_output.put_line(substrb('('||to_char(i)||')='||cells(i),1,254));
141: -- end if;
142: modv := mod(i, col);
143: if (modv = 1) then
166: else
167: l_align := 'CENTER';
168: end if;
169:
170: -- if (wf_notification.debug) then
171: -- dbms_output.put_line('modv = '||to_char(modv));
172: -- end if;
173:
174: colon := instrb(cells(i),':');
226: rs := rs||wf_core.newline||''||wf_core.newline||'';
227:
228: exception
229: when OTHERS then
230: wf_core.context('Wf_Notification', 'NTF_Table',to_char(col),l_type);
231: raise;
232: end NTF_Table;
233:
234:
258: l_registered_count number := 0;
259:
260: buf varchar2(2000);
261: title VARCHAR2(200);
262: cells wf_notification.tdType;
263: cellcnt number;
264: BEGIN
265: if ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
266: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
311: cells(cellcnt+1) := align_total||':'||FND_MESSAGE.get_string('SQLAP', 'OIE_CC_TOTAL_PROMPT');
312: cells(cellcnt+2) := align_right||':'||to_char(l_new_count);
313: cellcnt := cellcnt + 2;
314:
315: IF display_type = WF_NOTIFICATION.doc_text THEN
316: buf := title || fnd_global.local_chr(10);
317: for i in 1..cellcnt/2 loop
318: buf := buf || cell_text(cells(i*2-1))||': '||cell_text(cells(i*2))||fnd_global.local_chr(10);
319: end loop;
316: buf := title || fnd_global.local_chr(10);
317: for i in 1..cellcnt/2 loop
318: buf := buf || cell_text(cells(i*2-1))||': '||cell_text(cells(i*2))||fnd_global.local_chr(10);
319: end loop;
320: document_type := WF_NOTIFICATION.doc_text;
321: ELSE
322: ntf_table(cells,2,table_horizontal,buf);
323: buf := '
320: document_type := WF_NOTIFICATION.doc_text;
321: ELSE
322: ntf_table(cells,2,table_horizontal,buf);
323: buf := '
322: ntf_table(cells,2,table_horizontal,buf);
323: buf := '
344: l_card_program_id number;
345:
346: buf varchar2(2000);
347: title VARCHAR2(200);
348: cells wf_notification.tdType;
349: cellcnt number;
350:
351: cursor cvalidation is
352: select lookup_code, displayed_field
392: cells(cellcnt+1) := align_total||':'||FND_MESSAGE.get_string('SQLAP', 'OIE_CC_TOTAL_PROMPT');
393: cells(cellcnt+2) := align_right||':'||to_char(totcnt);
394: cellcnt := cellcnt + 2;
395:
396: IF display_type = WF_NOTIFICATION.doc_text THEN
397: buf := title || fnd_global.local_chr(10);
398: for i in 2..cellcnt/2 loop
399: buf := buf || cell_text(cells(i*2-1))||': '||cell_text(cells(i*2))||fnd_global.local_chr(10);
400: end loop;
397: buf := title || fnd_global.local_chr(10);
398: for i in 2..cellcnt/2 loop
399: buf := buf || cell_text(cells(i*2-1))||': '||cell_text(cells(i*2))||fnd_global.local_chr(10);
400: end loop;
401: document_type := WF_NOTIFICATION.doc_text;
402: ELSE
403: ntf_table(cells,2,table_horizontal,buf);
404: buf := '
401: document_type := WF_NOTIFICATION.doc_text;
402: ELSE
403: ntf_table(cells,2,table_horizontal,buf);
404: buf := '
403: ntf_table(cells,2,table_horizontal,buf);
404: buf := '