[Home] [Help]
1: package body umx_reg_requests_pvt_w as
2: /* $Header: UMXRGRWB.pls 115.5 2004/07/09 20:31:03 kching noship $ */
3: procedure is_username_available(p_username VARCHAR2
4: , ddrosetta_retval_bool OUT NOCOPY NUMBER
5: )
11:
12: -- copy data to the local IN or IN-OUT args, if any
13:
14: -- here's the delegated call to the old PL/SQL routine
15: ddrosetta_retval := umx_reg_requests_pvt.is_username_available(p_username);
16:
17: -- copy data back from the local variables to OUT or IN-OUT args, if any
18: if ddrosetta_retval is null
19: then ddrosetta_retval_bool := null;
41: , p0_a15 in out nocopy VARCHAR2
42: )
43:
44: as
45: ddp_reg_request umx_reg_requests_pvt.reg_request_type;
46: ddindx binary_integer; indx binary_integer;
47: begin
48:
49: -- copy data to the local IN or IN-OUT args, if any
64: ddp_reg_request.wf_event_name := p0_a14;
65: ddp_reg_request.email_verification_flag := p0_a15;
66:
67: -- here's the delegated call to the old PL/SQL routine
68: umx_reg_requests_pvt.update_reg_request(ddp_reg_request);
69:
70: -- copy data back from the local variables to OUT or IN-OUT args, if any
71: p0_a0 := ddp_reg_request.reg_request_id;
72: p0_a1 := ddp_reg_request.reg_service_type;
85: p0_a14 := ddp_reg_request.wf_event_name;
86: p0_a15 := ddp_reg_request.email_verification_flag;
87: end;
88:
89: end umx_reg_requests_pvt_w;