';
srw.set_before_form_html (srw.text_escape, vc_parameter_form);
return (TRUE);
--
exception
WHEN NO_OBJECT THEN
SRW.MESSAGE(1000,'*ERROR* No parameters were passed - report terminated.');
return (FALSE);
--
WHEN NO_INST THEN
SRW.MESSAGE(1000,'*ERROR* No records found on GUBIPRF - report terminated.');
return (FALSE);
--
WHEN NO_ACCESS THEN
SRW.MESSAGE(1000,'*ERROR* User not authorized to access FRR134B - report terminated.');
return (FALSE);
--
WHEN NO_PASSWORD THEN
SRW.MESSAGE(1000,'*ERROR* No password found on GUBROLE - report terminated.');
return (FALSE);
--
WHEN INVALID_VERSION THEN
SRW.MESSAGE(1000,'*ERROR* Invalid version of FRR134B - report terminated.');
return (FALSE);
--
WHEN INVALID_ACCESS THEN
SRW.MESSAGE(1000,'*ERROR* Invalid password tried - report terminated.');
return (FALSE);
--
WHEN ORA_JAVA.EXCEPTION_THROWN THEN
SRW.MESSAGE(1000, '*ERROR* Report Server Configuration - report terminated.');
ORA_JAVA.CLEAR_EXCEPTION;
return (FALSE);
--
WHEN OTHERS THEN
SRW.MESSAGE(1000,'ERROR: ' || SUBSTR(SQLERRM l ,1,190));
--SRW.MESSAGE(1000, '*ERROR* Before Parm trigger could not set database role - report terminated.');
return (FALSE);
end;
f g \N $ h
rwian ] _ f g \ $ h
rwihli ] _ f g \L $ h
rwitb ] _ f g \ $ h
rwirow ] _ f g \ $ h
rwico ] _ f g \ $ h
rwidro ] _ f g \ $ h
rwidco ] _ f g t u 8808 s [ % \^ $ h
rwifil ] _ f g \Q $ h
rwifrr ] _ f g \# $ h
rwirfr ] _ f g \] $ h
rwifie ] _ f g \\ $ h
rwidt ] _ f g \S $ h
rwicw ] _ f g \! $ h
rwict ] _ f g \" $ h
rwipa ] _ f g \$ $ h
rwibu ] _ f g t u U#8808! s [ % \ \ \ \
\q) $ h
rwlpl ] _ f g \q $ h
rwlpc ] _ f g \q* $ h
rwlpg ] _ f g \q8 $ h
rwlpf ] _ f g \ $ h
rwldr ] f _ \ $ h
rwlpr ] f _ \ $ h
rwlcm ] f _ \ $ h
rwlud _ \ $ h
rwldd _ t u A:88088 " " s [ % \ $ h
new _ \ e $ h
open _ \@ $ h
save _ \ $ h
print _ \ $ h
rwmail _ \ n $ h
rwcon _ \ $ h
cut _ \ $ h
copy _ \ $ h
paste _ \ $ h
undo _ \p' $ h
rwredo _ \e $ h
rwhbr ] _ f g \g $ h
rwrn ] _ f g \ $ h
rwpdf _ \ $ h
rwrnw _ \ $ h
rwrnp _ \Y $ h
help _ t u N8808L 6 6RESFILE ___
p8 xheaderfield uted to a PDF file l 1 $ AFTERREPORT function AfterReport return boolean is
begin
G$_REPORT_SECURITY.G$_REPORT_REVOKE_ACCESS;
return (TRUE);
exception
when others then
return (FALSE);
end; l ͫͫͫͫͫͫͫ w SYS STANDARD /LgoqorepG$_REPORT_SECURITY $ ͫͫͫͫͫͫͫͫͫͫͫͫͫͫͫ 8 & "PKG INIT"AFTERREPORT"" | ! " 5 $ ͫͫͫͫͫͫͫͫͫͫͫͫͫͫͫ 8 v
$
L "AFTERREPORT"BOOLEAN"G$_REPORT_SECURITY"G$_REPORT_REVOKE_ACCESS"TRUE"FALSE""
% ) * . 0 4 8 ; @ A E H L N R U Y [ \ a e g s u h , k W Z e S Z e O
/
d , plsql_compiler_flags"nls_length_semantics" INTERPRETED,DEBUG"BYTE" ͫͫͫͫͫͫͫ H 6 6 ics" $ %$ %k k hg ! l AFTERREPORT ) d h @ @ en blue assocview selectstyle cheight autoscrolled secure editable horizontal scrollee navigable tabstop pagecnt pages numcols scrollself columns width slowdraw x y lineincrement private csprings cspringcnt iconfile autoskip canreorder contentwd contentht enabled nitems id hidden tearoff help submenu accelerator standardkey keyval modifiers cs state startgroup icon cantitle vtatype htatype statustype statusclass status htaclass hta vtaclass vta menu iconsize showlabels canvasmovable wd ht viewclass casefold splitmode string newui pageresource current canapply eventprocname eventargname fgcolor compress ishoriz selected buttons properties data ismapped maprequest isdragsource showlines numrows cells value enable eanble srctl tgttl buttonstyle 0800 0 @ 0800 B P ` 0800
p 0800 0800 0800 % 0800 c
d , plsql_compiler_flags"nls_length_semantics" INTERPRETED,DEBUG"BYTE" ͫͫͫͫͫͫͫ H ics" % hg !x h
, AFTERPFORM d @ @ swoX 0000V D Dfunction AfterPForm return boolean is
begin
return (TRUE);
end; 0800 P 0808 function AfterReport return boolean is
begin
G$_REPORT_SECURITY.G$_REPORT_REVOKE_ACCESS;
return (TRUE);
exception
when others then
return (FALSE);
end;;
: 00008 & &select * from emp where deptno = :dept 6JRZcf(j nsz(~((((ppppp re SQL*ReportWriter REPORT EKU gxjjxcl tu EKUxg
EKUxi $.! 5 @ SAGE(1000,'ERROR: ' || SUBSTR(SQLERRM,1,190));
--SR r 1 fphuvwxyzp~~pp000000pppppppp p_servername
2
OUTP P_SERVERNAME 1 fphqrstuvpzzp{p{{|}~000000pppppppp P_ACTION d
P_ACTION .bpckl(rpvpv0v0w8x8z|}~x000000p0ppp B_EMPNO 0
ĵe -Țe EL .bpckl(rpvpv8v0x8z8|~x000000p0ppp h B_ENAME 0 .bpcij(nprpr8r0t8v8xz{|x000000p0ppp ROB_JOB 0 6 0 6 .bpcij(nprpr8r0t8v8xz{|x000000p0ppp T B_MGR
0 T 0 T h .bpcno(rpvpv8v0x8z8|~x000000p0ppp B_HIREDATE 00 j T j QUE .bpcij(nprpr@r0v8x8z|}~x000000p0ppp h B_SAL TE 0 j .bpcjk(nprpr@r0v8x8z|}~x000000p0ppp ITB_COMM E 0 j E_SET @ &o /pp (*+, -VG_COLOR NAME_LENGTH g /pp (*+, -VG_COLOR COLOR_NAME x 5 'pp "#$ %VG_COLOR RED g )pp "$%& 'VG_COLOR GREEN 88g )pp "$%& 'VG_COLOR BLUE 100 "x 0 Empno ^ "x Ename & x * Job x 0g Mgr %x # & Hiredate x " Sal !x Comm & ( #x ! Deptno 5x 300 PDF/Excel output example ! <x : Enter values for the parameters !x ( Dept b10 #x ! Output Gx E + If Save as text file selected, output is
,x *ay routed to Excel G x Eay + If View on Screen is selected, output is
1 x / & routed to a PDF file (00x " $ &ON * gray80333333 (00x " $ &n + gray76=p=p=p (00x " $ &r , gray72GGG (00x " $ & - gray68QQQ '00x! "$ % . r0g25b0 @ )00x " $& 'di / r25g25b0@ @ )00x " $& 't 0 r50g25b0 @ }~ )00x " $& ' 1 r75g25b0 @ )00x " $& 'AN 2 r88g25b0 @ +00x $ &( ) 3 r100g25b0 @ *00x" $ & (v 4 r0g25b50 @ 0 ,00x $ & ( * 5 r25g25b50 @ @ ,00x $ & ( * 6 r50g25b50 @ ,00x $ & ( * 7 r75g25b50 @ ,00x $ & ( *0 8 r88g25b50 @ ,00x $ & ( *p 9
r100g25b50@ *00x" $ & (er : r0g25b75 0@ ,00x $ & ( *r ; r25g25b75 @ @ ,00x $ & ( * < r50g25b75 @ ,00x $ & ( *ES = r75g25b75 @ ,00x $ & ( * F > r88g25b75 @ ,00x $ & ( *r ?
r100g25b75@ *00x" $ & ( @ r0g25b88 5@ ,00x $ & ( *ME A r25g25b88 @ @ ,00x $ & ( * B r50g25b88 @ 100b100 5g75b100 5 @ h r .bpclm(nprpr@r0v8x8z|}~x000000p0ppp B_DEPTNO 0 j uv .bpchi(jpnpn8n8p8r8tvwxx~000000p0ppp PB_1 rV r V 0 .bpchi(jpnpn8n8p8r8tvwxx~~000000p0ppp PB_2 IS |~ .bpckl(rpvpv8v8x8z8|~x000000p0ppp PB_DEPT q
S q
S xz .bpchi(jpnpn8n8p8r8tvwxx~000000p0ppp PB_3 U-U U S
U -U U
S t8v .bpchi(jpnpn8n8p8r8tvwxx~000000p0ppp PB_4 Me
S
M e
S v8v . bpdij(nprpr8r8t8v8xz{|x000000p0ppp PB_5
V;Uj
V ;U j
npr
k
~
ݴ
FpGWX(^pbpb0b0c@f8jlmno0p0q0r0s0t0uv0w0xyz{|}~p M_G_EMPNO_GRPFR pp0 h z FpGUV XpZpZ0Z0[@^8bdefg0h0i0j0k0l0mn0o0pqrstuvwpx x_CM_G_EMPNO_HDR h GR z FpGQR(VpZpZ0Z8\@^8bdefg0h0i0j0k0l0mn0o0pqrstuvwpx xR_G_EMPNO R 0 h %NpOWX(^pbpb0b8d8f8hjklmnopqr0s0t0upvpv0vwxyz{|}~pp F_EMPNO 0 0 j %NpOWX(^pbpb8b8d8f8hjklmnopqr0s0t0upvpv0vwxyz{|}~pp F_ENAME 0 0 m ~ %NpOUV(Zp^p^8^8`8b8dfghijklmn0o0p0qprpr0rstuvwxyz{p|p| |F_JOB 00 6 p pt ~ %NpOUV(Zp^p^8^8`8b8dfghijklmn0o0p0qprpr0rstuvwxyz{p|p| |F_MGR 00 T s %NpOZ[(^pbpb8b8d8f8hjklmnopqr0s0t0upvpv0vwxyz{|}~pp F_HIREDATE 00 j v & %NpOUV(Zp^p^@^8b8d8fhijklmnop0q0r0sptpv0vwxyz{|}~pp F_SAL
TE 0 y $ &r , gray72GGG (00x " $ & - gray68QQQ '00x! "$ % . r0g25b0 @ )00x " $& 'di / r25g25b0@ @ )00x " $& 't 0 r50g25b0 @ }~ )00x " $& ' 1 r75g25b0 @ )00x " $& 'AN 2 r88g25b0 @ +00x $ &( ) 3 r100g25b0 @ *00x" $ & (v 4 r0g25b50 @ 0 ,00x $ & ( * 5 r25g25b50 @ @ ,00x $ & ( * 6 r50g25b50 @ ,00x $ & ( * 7 r75g25b50 @ ,00x $ & ( *0 8 r88g25b50 @ ,00x $ & ( *p 9
r100g25b50@ *00x" $ & (er : r0g25b75 0@ ,00x $ & ( *r ; r25g25b75 @ @ ,00x $ & ( * < r50g25b75 @ ,00x $ & ( *ES = r75g25b75 @ ,00x $ & ( * F > r88g25b75 @ ,00x $ & ( *r ?
r100g25b75@ *00x" $ & ( @ r0g25b88 5@ ,00x $ & ( *ME A r25g25b88 @ @ ,00x $ & ( * B r50g25b88 @ 100b100 5g75b100 5 @