35: -- Internal Table Handler Use Only.
36: --
37: -- {End Of Comments}
38: -- ----------------------------------------------------------------------------
39: procedure chk_permanent_stoppage (p_rec in ssp_stp_shd.g_rec_type) is
40: --
41: l_proc varchar2 (72) := g_package||'chk_system_does_not_override';
42: --
43: cursor csr_withholding_reason is
62: --
63: if csr_withholding_reason%notfound then
64: --
65: close csr_withholding_reason;
66: ssp_stp_shd.constraint_error
67: (p_constraint_name => 'SSP_STOPPAGES_FK2');
68: --
69: end if;
70: --
74: --
75: -- The withholding reason is a permanent one. No withhold_to date is
76: -- allowed.
77: --
78: ssp_stp_shd.constraint_error
79: (p_constraint_name => 'SSP_STP_WITHHOLD_TO_PERMANENT');
80: --
81: end if;
82: --
85: end chk_permanent_stoppage;
86: -- ----------------------------------------------------------------------------
87: -- |---------------------------< insert_validate >----------------------------|
88: -- ----------------------------------------------------------------------------
89: Procedure insert_validate(p_rec in ssp_stp_shd.g_rec_type) is
90: --
91: l_proc varchar2(72) := g_package||'insert_validate';
92: --
93: Begin
103: --
104: -- ----------------------------------------------------------------------------
105: -- |---------------------------< update_validate >----------------------------|
106: -- ----------------------------------------------------------------------------
107: Procedure update_validate(p_rec in ssp_stp_shd.g_rec_type) is
108: --
109: l_proc varchar2(72) := g_package||'update_validate';
110: --
111: Begin
121: --
122: -- ----------------------------------------------------------------------------
123: -- |---------------------------< delete_validate >----------------------------|
124: -- ----------------------------------------------------------------------------
125: Procedure delete_validate(p_rec in ssp_stp_shd.g_rec_type) is
126: --
127: l_proc varchar2(72) := g_package||'delete_validate';
128: --
129: Begin