138:
139:
140: WHEN others THEN
141: IF (SQLCODE <> -20001) THEN
142: Fnd_Message.Set_Name ('JL', 'JL_ZZ_AP_DEBUG');
143: Fnd_Message.Set_Token('ERROR', SQLERRM);
144: Fnd_Message.Set_Token('CALLING_SEQUENCE', l_calling_sequence);
145: Fnd_Message.Set_Token('PARAMETERS',
146: ', Check Id= ' || to_char(P_payment_Id));
139:
140: WHEN others THEN
141: IF (SQLCODE <> -20001) THEN
142: Fnd_Message.Set_Name ('JL', 'JL_ZZ_AP_DEBUG');
143: Fnd_Message.Set_Token('ERROR', SQLERRM);
144: Fnd_Message.Set_Token('CALLING_SEQUENCE', l_calling_sequence);
145: Fnd_Message.Set_Token('PARAMETERS',
146: ', Check Id= ' || to_char(P_payment_Id));
147: Fnd_Message.Set_Token('DEBUG_INFO', l_debug_info);
140: WHEN others THEN
141: IF (SQLCODE <> -20001) THEN
142: Fnd_Message.Set_Name ('JL', 'JL_ZZ_AP_DEBUG');
143: Fnd_Message.Set_Token('ERROR', SQLERRM);
144: Fnd_Message.Set_Token('CALLING_SEQUENCE', l_calling_sequence);
145: Fnd_Message.Set_Token('PARAMETERS',
146: ', Check Id= ' || to_char(P_payment_Id));
147: Fnd_Message.Set_Token('DEBUG_INFO', l_debug_info);
148: END IF;
141: IF (SQLCODE <> -20001) THEN
142: Fnd_Message.Set_Name ('JL', 'JL_ZZ_AP_DEBUG');
143: Fnd_Message.Set_Token('ERROR', SQLERRM);
144: Fnd_Message.Set_Token('CALLING_SEQUENCE', l_calling_sequence);
145: Fnd_Message.Set_Token('PARAMETERS',
146: ', Check Id= ' || to_char(P_payment_Id));
147: Fnd_Message.Set_Token('DEBUG_INFO', l_debug_info);
148: END IF;
149:
143: Fnd_Message.Set_Token('ERROR', SQLERRM);
144: Fnd_Message.Set_Token('CALLING_SEQUENCE', l_calling_sequence);
145: Fnd_Message.Set_Token('PARAMETERS',
146: ', Check Id= ' || to_char(P_payment_Id));
147: Fnd_Message.Set_Token('DEBUG_INFO', l_debug_info);
148: END IF;
149:
150: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
151: FND_LOG.STRING(G_LEVEL_STATEMENT,