718: ( p_count => l_msg_count,
719: p_data => l_msg_data
720: );
721: IF (SQLCODE <> -20001) THEN
722: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
723: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
724: FND_FILE.Put_Line(FND_FILE.Log,sqlerrm);
725: END IF;
726:
719: p_data => l_msg_data
720: );
721: IF (SQLCODE <> -20001) THEN
722: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
723: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
724: FND_FILE.Put_Line(FND_FILE.Log,sqlerrm);
725: END IF;
726:
727: IF Invoice_Cursor%ISOPEN THEN
997:
998: EXCEPTION
999: WHEN OTHERS THEN
1000: IF (SQLCODE <> -20001) THEN
1001: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1002: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1003: FND_FILE.Put_Line(FND_FILE.Log,sqlerrm);
1004: END IF;
1005:
998: EXCEPTION
999: WHEN OTHERS THEN
1000: IF (SQLCODE <> -20001) THEN
1001: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1002: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1003: FND_FILE.Put_Line(FND_FILE.Log,sqlerrm);
1004: END IF;
1005:
1006: -- Bug 7297864- End