1: package body ozf_sys_parameters_pvt_w as
2: /* $Header: ozfwsysb.pls 120.4 2007/12/21 07:48:30 gdeepika ship $ */
3: rosetta_g_mistake_date date := to_date('01/01/+4713', 'MM/DD/SYYYY');
4: rosetta_g_miss_date date := to_date('01/01/-4712', 'MM/DD/SYYYY');
5:
106: , x_set_of_books_id out nocopy NUMBER
107: )
108:
109: as
110: ddp_sys_parameters_rec ozf_sys_parameters_pvt.sys_parameters_rec_type;
111: ddindx binary_integer; indx binary_integer;
112: begin
113:
114: -- copy data to the local IN or IN-OUT args, if any
207: ddp_sys_parameters_rec.claim_tax_incl_flag := p7_a85;
208:
209:
210: -- here's the delegated call to the old PL/SQL routine
211: ozf_sys_parameters_pvt.create_sys_parameters(p_api_version,
212: p_init_msg_list,
213: p_commit,
214: p_validation_level,
215: x_return_status,
326: , x_object_version_number out nocopy NUMBER
327: )
328:
329: as
330: ddp_sys_parameters_rec ozf_sys_parameters_pvt.sys_parameters_rec_type;
331: ddindx binary_integer; indx binary_integer;
332: begin
333:
334: -- copy data to the local IN or IN-OUT args, if any
428:
429:
430:
431: -- here's the delegated call to the old PL/SQL routine
432: ozf_sys_parameters_pvt.update_sys_parameters(p_api_version,
433: p_init_msg_list,
434: p_commit,
435: p_validation_level,
436: x_return_status,
546: , p6_a85 VARCHAR2
547: )
548:
549: as
550: ddp_sys_parameters_rec ozf_sys_parameters_pvt.sys_parameters_rec_type;
551: ddindx binary_integer; indx binary_integer;
552: begin
553:
554: -- copy data to the local IN or IN-OUT args, if any
645: ddp_sys_parameters_rec.net_amt_for_mass_settle_flag := p6_a84;
646: ddp_sys_parameters_rec.claim_tax_incl_flag := p6_a85;
647:
648: -- here's the delegated call to the old PL/SQL routine
649: ozf_sys_parameters_pvt.validate_sys_parameters(p_api_version,
650: p_init_msg_list,
651: p_validation_level,
652: x_return_status,
653: x_msg_count,
753: , x_return_status out nocopy VARCHAR2
754: )
755:
756: as
757: ddp_sys_parameters_rec ozf_sys_parameters_pvt.sys_parameters_rec_type;
758: ddindx binary_integer; indx binary_integer;
759: begin
760:
761: -- copy data to the local IN or IN-OUT args, if any
848:
849:
850:
851: -- here's the delegated call to the old PL/SQL routine
852: ozf_sys_parameters_pvt.check_sys_parameters_items(ddp_sys_parameters_rec,
853: p_validation_mode,
854: x_return_status);
855:
856: -- copy data back from the local variables to OUT or IN-OUT args, if any
1034: , x_return_status out nocopy VARCHAR2
1035: )
1036:
1037: as
1038: ddp_sys_parameters_rec ozf_sys_parameters_pvt.sys_parameters_rec_type;
1039: ddp_complete_rec ozf_sys_parameters_pvt.sys_parameters_rec_type;
1040: ddindx binary_integer; indx binary_integer;
1041: begin
1042:
1035: )
1036:
1037: as
1038: ddp_sys_parameters_rec ozf_sys_parameters_pvt.sys_parameters_rec_type;
1039: ddp_complete_rec ozf_sys_parameters_pvt.sys_parameters_rec_type;
1040: ddindx binary_integer; indx binary_integer;
1041: begin
1042:
1043: -- copy data to the local IN or IN-OUT args, if any
1217:
1218:
1219:
1220: -- here's the delegated call to the old PL/SQL routine
1221: ozf_sys_parameters_pvt.check_sys_parameters_record(ddp_sys_parameters_rec,
1222: ddp_complete_rec,
1223: p_mode,
1224: x_return_status);
1225:
1317: , p0_a85 out nocopy VARCHAR2
1318: )
1319:
1320: as
1321: ddx_sys_parameters_rec ozf_sys_parameters_pvt.sys_parameters_rec_type;
1322: ddindx binary_integer; indx binary_integer;
1323: begin
1324:
1325: -- copy data to the local IN or IN-OUT args, if any
1324:
1325: -- copy data to the local IN or IN-OUT args, if any
1326:
1327: -- here's the delegated call to the old PL/SQL routine
1328: ozf_sys_parameters_pvt.init_sys_parameters_rec(ddx_sys_parameters_rec);
1329:
1330: -- copy data back from the local variables to OUT or IN-OUT args, if any
1331: p0_a0 := ddx_sys_parameters_rec.set_of_books_id;
1332: p0_a1 := ddx_sys_parameters_rec.object_version_number;
1590: , p1_a85 out nocopy VARCHAR2
1591: )
1592:
1593: as
1594: ddp_sys_parameters_rec ozf_sys_parameters_pvt.sys_parameters_rec_type;
1595: ddx_complete_rec ozf_sys_parameters_pvt.sys_parameters_rec_type;
1596: ddindx binary_integer; indx binary_integer;
1597: begin
1598:
1591: )
1592:
1593: as
1594: ddp_sys_parameters_rec ozf_sys_parameters_pvt.sys_parameters_rec_type;
1595: ddx_complete_rec ozf_sys_parameters_pvt.sys_parameters_rec_type;
1596: ddindx binary_integer; indx binary_integer;
1597: begin
1598:
1599: -- copy data to the local IN or IN-OUT args, if any
1685: ddp_sys_parameters_rec.claim_tax_incl_flag := p0_a85;
1686:
1687:
1688: -- here's the delegated call to the old PL/SQL routine
1689: ozf_sys_parameters_pvt.complete_sys_parameters_rec(ddp_sys_parameters_rec,
1690: ddx_complete_rec);
1691:
1692: -- copy data back from the local variables to OUT or IN-OUT args, if any
1693:
1778: p1_a84 := ddx_complete_rec.net_amt_for_mass_settle_flag;
1779: p1_a85 := ddx_complete_rec.claim_tax_incl_flag;
1780: end;
1781:
1782: end ozf_sys_parameters_pvt_w;