[Home] [Help]
1: PACKAGE BODY IGI_MPP_SETUP_PKG AS
2: -- $Header: igipmsub.pls 115.6 2003/12/01 16:13:17 sdixit ship $
3: --bug 3199481: following variables added for fnd logging changes:sdixit :start
4: l_debug_level number := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
5: l_state_level number := FND_LOG.LEVEL_STATEMENT;
59: CLOSE c_insert;
60: raise no_data_found;
61: --bug 3199481: fnd logging changes:sdixit :start
62: IF (l_error_level >= l_debug_level ) THEN
63: FND_LOG.MESSAGE (l_error_level , 'igi.pls.igipmsub.IGI_MPP_SETUP_PKG.Insert_Row',FALSE);
64: END IF;
65: --bug 3199481 fnd logging changes: sdixit: end block
66: END IF;
67: CLOSE c_insert;
91: IF SQL%NOTFOUND THEN
92: raise no_data_found;
93: --bug 3199481: fnd logging changes:sdixit :start
94: IF (l_error_level >= l_debug_level ) THEN
95: FND_LOG.MESSAGE (l_error_level , 'igi.pls.igipmsub.IGI_MPP_SETUP_PKG.Update_Row',FALSE);
96: END IF;
97: --bug 3199481 fnd logging changes: sdixit: end block
98: END IF;
99:
124: close c_mpp_setup;
125: fnd_message.set_name( 'FND', 'FORM_RECORD_DELETED');
126: --bug 3199481: fnd logging changes:sdixit :start
127: IF (l_error_level >= l_debug_level ) THEN
128: FND_LOG.MESSAGE (l_error_level , 'igi.pls.igipmsub.IGI_MPP_SETUP_PKG.Lock_Row.FORM_RECORD_DELETED',FALSE);
129: END IF;
130: --bug 3199481 fnd logging changes: sdixit: end block
131: app_exception.raise_exception;
132: END IF;
159: else
160: fnd_message.set_name( 'FND', 'FORM_RECORD_CHANGED');
161: --bug 3199481: fnd logging changes:sdixit :start
162: IF (l_error_level >= l_debug_level ) THEN
163: FND_LOG.MESSAGE (l_error_level , 'igi.pls.igipmsub.IGI_MPP_SETUP_PKG.Lock_Row.FORM_RECORD_CHANGED',FALSE);
164: END IF;
165: --bug 3199481 fnd logging changes: sdixit: end block
166: app_exception.raise_exception;
167: END IF;
167: END IF;
168: END;
169:
170: -- Enter further code below as specified in the Package spec.
171: END IGI_MPP_SETUP_PKG ;