';
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,1,190));
--SR l W.MESSAGE(1000, '*ERROR* Before Parm trigger could not set database role - report terminated.');
return (FALSE);
end;
exists. //1 0/ n9 lInvalid library name.ota@ 0> ba: $ lProgram unit name must be specified.M 0K ex; 1 lA stored program unit named %[1]s already exists.new= 0; {
< ! lInvalid stored program unit name.ram< 0: il= lPROCEDURE %[1]s IS
BEGIN
END;D 0B /
> ( lFUNCTION %[1]s RETURN _ IS
BEGIN
END;4 02 ex? lPACKAGE %[1]s IS
END;9 07
@ lPACKAGE BODY %[1]s IS
END;on + 0) wA lTYPE %[1]s IS ;*6 04 m_B lTYPE BODY %[1]s IS
END;ge@ 0>
}C $ lProgram unit name must be specified.M 0K 1)D 1 lA stored program unit named %[1]s already exists.
/*= 0; ncE ! lInvalid stored program unit name.age< 0: umF lPROCEDURE %[1]s IS
BEGIN
END;D 0B spG ( lFUNCTION %[1]s RETURN _ IS
BEGIN
END;4 02 f H lPACKAGE %[1]s IS
END;9 07 }I lPACKAGE BODY %[1]s IS
END;
{+ 0) = J lTYPE %[1]s IS ;e6 04 ;
K lTYPE BODY %[1]s IS
END;CR% 0# FOL lNew %[1]s" o" 0 ; M l(None)>
6 04 d>N lLibrary must be specified. o( 0& m)O lOpen Library( 0& onP lSave Library! 0 "bQ lFrom:="P 0 (tR lTo:
+ 0) agS lPL/SQL Outlinerd: 08 T lUnable to open the file %[1]s.)"D 0B ttU ( lFile %[1]s already exists. Overwrite it?` 0^ /BV D lProgram unit %[1]s is already being edited in another editor window.( 0& 8W lProgram Unit $
AFTERPFORM Efunction AfterPForm return boolean is
begin
return (TRUE);
end;
I B ͫͫͫͫͫͫͫ w SYS STANDARD $ ͫͫͫͫͫͫͫͫͫͫͫͫͫͫͫ 8 & "PKG INIT"AFTERPFORM"" | ! " $ ͫͫͫͫͫͫͫͫͫͫͫͫͫͫͫ 8 Q "AFTERPFORM"BOOLEAN"TRUE"" 6
% ) * . 0 4 7 ; = A C O h , Z e O
d , plsql_compiler_flags"nls_length_semantics" INTERPRETED,DEBUG"BYTE" ͫͫͫͫͫͫͫ H ics" % hg !x h
, AFTERPFORM d @ @ Y 0000W E Efunction AfterPForm return boolean is
begin
return (TRUE);
end;
st 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 = :deptwi 6JRZcf(j nsz(~((((ppppp SQL*ReportWriter REPORT EKU gxjjrtf EKUxg
EKUxi $! 5 @ $ rwbwmr window rwbwrg window 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 @ @ lu 8000 u toscrolled 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 rd 0800 0 @ 0800 B P ` 0800
p 0800 0800 0800 % 0800 c ing z x rwdqr string k i rwdpc_help string f d rwbf_outliner Fonts T R rwbf_pf_dflt Fonts L J rwbf_dflt Fonts J H rwbfd_label Fonts I G rwbfd_status Fonts H F rwbf_pf_name Fonts E C rwbf_formula Fonts B @ rwbf_column Fonts @ > rwbf_query Fonts > < vgmipg_help string vgmiss_help string rwdq string i g rwlfs string rwdqe string m k 6 2 7 Locates PL/SQL program units* ( 2 7 &PL/SQL Editor pL J 2 07 Creates, deletes, and edits PL/SQL program units/ - 2 7 PL/SQL &Interpreter 0800 0 @ 0800 B P ` 0800
p 0800 0800 0800 % 0800 c r 1 fphqrstuvpzzp{p{{|}~000000pppppppp P_ACTION d
P_ACTION 1 fphuvwxyzp~~pp000000pppppppp P_SERVERNAME 2
P_SERVERNAME .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 @ & /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 4x 200 PDF/Word output Example <x : Enter values for the parameters !x $ Dept 75g #x !0 Output Gx E + If View on Screen is selected, output is
2x 0 routed to a PDF file. " G x E + If Save as text file is selected, output
/ x -0 is routed to Word. 00x " $ & * gray80333333 (00x " $ & + gray76=p=p=p (00x " $ & , gray72GGG (00x " $ &0 - gray68QQQ '00x! "$ % . r0g25b0 @ )00x " $& ' / r25g25b0@ @ 0 )00x " $& ' 0 r50g25b0 @ )00x " $& ' 1 r75g25b0 @ )00x " $& ' 2 r88g25b0 @ 0 +00x $ &( ) 3 r100g25b0 @ *00x" $ & ( 4 r0g25b50 @ ,00x $ & ( * 5 r25g25b50 @ @ ,00x $ & ( * 6 r50g25b50 @ ,00x $ & ( * 7 r75g25b50 @ ,00x $ & ( * 8 r88g25b50 @ ,00x $ & ( * 9
r100g25b50@ *00x" $ & ( : r0g25b75 0@ ,00x $ & ( * ; r25g25b75 @ @ ,00x $ & ( * < r50g25b75 @ ,00x $ & ( * = r75g25b75 @ ,00x $ & ( * > r88g25b75 @ ,00x $ & ( * ?
r100g25b75@ *00x" $ & ( @ r0g25b88 5@ ,00x $ & ( * A r25g25b88 @ @ ,00x $ & ( * B r50g25b88 @ 8000 u 8000 v h r .bpclm(nprpr@r0v8x8z|}~x000000p0ppp B_DEPTNO 0 j p .bpchi(jpnpn8n8p8r8tvwxx~000000p0ppp PB_1 S S 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 @Uj
S
@U j
S v8v . bpdij(nprpr8r8t8v8xz{|x000000p0ppp PB_5 UZ e
U Z e
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 5g ~ %NpOUV(Zp^p^8^8`8b8dfghijklmn0o0p0qprpr0rstuvwxyz{p|p| |F_MGR 00 T s %NpOZ[(^pbpb8b8d8f8hjklmnopqr0s0t0upvpv0vwxyz{|}~pp F_HIREDATE 00 j v x %NpOUV(Zp^p^@^8b8d8fhijklmnop0q0r0sptpv0vwxyz{|}~pp F_SAL
TE 0 y $ & , gray72GGG (00x " $ &0 - gray68QQQ '00x! "$ % . r0g25b0 @ )00x " $& ' / r25g25b0@ @ 0 )00x " $& ' 0 r50g25b0 @ )00x " $& ' 1 r75g25b0 @ )00x " $& ' 2 r88g25b0 @ 0 +00x $ &( ) 3 r100g25b0 @ *00x" $ & ( 4 r0g25b50 @ ,00x $ & ( * 5 r25g25b50 @ @ ,00x $ & ( * 6 r50g25b50 @ ,00x $ & ( * 7 r75g25b50 @ ,00x $ & ( * 8 r88g25b50 @ ,00x $ & ( * 9
r100g25b50@ *00x" $ & ( : r0g25b75 0@ ,00x $ & ( * ; r25g25b75 @ @ ,00x $ & ( * < r50g25b75 @ ,00x $ & ( * = r75g25b75 @ ,00x $ & ( * > r88g25b75 @ ,00x $ & ( * ?
r100g25b75@ *00x" $ & ( @ r0g25b88 5@ ,00x $ & ( * A r25g25b88 @ @ ,00x $ & ( * B r50g25b88 @ 8000 u 8000 v