[Home] [Help]
1: PACKAGE BODY WSH_IB_TXN_MATCH_PKG as
2: /* $Header: WSHIBMAB.pls 120.2.12000000.2 2007/01/23 19:15:53 rvishnuv ship $ */
3: --
4: --
5: C_PROCESS_FLAG CONSTANT VARCHAR2(1) := 'Y';
132: --}
133: END;
134: ************/
135: --
136: G_PKG_NAME CONSTANT VARCHAR2(50) := 'WSH_IB_TXN_MATCH_PKG';
137: --
138: --
139: --========================================================================
140: -- PROCEDURE : validateMandatoryInfo
344: END IF;
345: --
346: WHEN OTHERS THEN
347: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
348: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.validateMandatoryInfo');
349: --
350: -- Debug Statements
351: --
352: IF l_debug_on THEN
537: END IF;
538: --
539: WHEN OTHERS THEN
540: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
541: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.retrieveMessages');
542: --
543: -- Debug Statements
544: --
545: IF l_debug_on THEN
707: --
708: -- Debug Statements
709: --
710: IF l_debug_on THEN
711: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.RETRIEVEMESSAGES',WSH_DEBUG_SV.C_PROC_LEVEL);
712: END IF;
713: --
714: WSH_IB_TXN_MATCH_PKG.retrieveMessages
715: (
710: IF l_debug_on THEN
711: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.RETRIEVEMESSAGES',WSH_DEBUG_SV.C_PROC_LEVEL);
712: END IF;
713: --
714: WSH_IB_TXN_MATCH_PKG.retrieveMessages
715: (
716: p_startIndex => p_messageStartIndex,
717: p_endIndex => FND_MSG_PUB.Count_Msg,
718: x_messageTbl => l_messageTbl,
922: END IF;
923: --
924: WHEN OTHERS THEN
925: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
926: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.handleMatchFailure');
927: --
928: -- Debug Statements
929: --
930: IF l_debug_on THEN
1101: END IF;
1102: --
1103: WHEN OTHERS THEN
1104: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1105: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.getTransactionKey');
1106: --
1107: -- Debug Statements
1108: --
1109: IF l_debug_on THEN
1272: END IF;
1273: --
1274: WHEN OTHERS THEN
1275: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1276: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.addTransactionHistoryRecord');
1277: --
1278: -- Debug Statements
1279: --
1280: IF l_debug_on THEN
1489: END IF;
1490: --
1491: WHEN OTHERS THEN
1492: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1493: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.insertTransactionHistory');
1494: --
1495: -- Debug Statements
1496: --
1497: IF l_debug_on THEN
1649: --
1650: -- Debug Statements
1651: --
1652: IF l_debug_on THEN
1653: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.INSERTTRANSACTIONHISTORY',WSH_DEBUG_SV.C_PROC_LEVEL);
1654: END IF;
1655: --
1656: WSH_IB_TXN_MATCH_PKG.insertTransactionHistory
1657: (
1652: IF l_debug_on THEN
1653: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.INSERTTRANSACTIONHISTORY',WSH_DEBUG_SV.C_PROC_LEVEL);
1654: END IF;
1655: --
1656: WSH_IB_TXN_MATCH_PKG.insertTransactionHistory
1657: (
1658: p_transactionType => p_transactionType,
1659: p_ReceiptAgainstASN => p_ReceiptAgainstASN,
1660: p_autonomous => TRUE,
1884: END IF;
1885: --
1886: WHEN OTHERS THEN
1887: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1888: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.checkShipmentHistory');
1889: --
1890: -- Debug Statements
1891: --
1892: IF l_debug_on THEN
2145: END IF;
2146: --
2147: WHEN OTHERS THEN
2148: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2149: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.processCancelASN');
2150: --
2151: -- Debug Statements
2152: --
2153: IF l_debug_on THEN
2252: END IF;
2253: --
2254: WHEN OTHERS THEN
2255: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2256: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.processReceiptHeaderUpdate');
2257: --
2258: -- Debug Statements
2259: --
2260: IF l_debug_on THEN
2381: END IF;
2382: --
2383: WHEN OTHERS THEN
2384: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2385: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.extendLineRecTbl');
2386: --
2387: -- Debug Statements
2388: --
2389: IF l_debug_on THEN
2443: --
2444: -- Debug Statements
2445: --
2446: IF l_debug_on THEN
2447: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.EXTENDLINERECTBL',WSH_DEBUG_SV.C_PROC_LEVEL);
2448: END IF;
2449: --
2450: WSH_IB_TXN_MATCH_PKG.extendLineRecTbl
2451: (
2446: IF l_debug_on THEN
2447: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.EXTENDLINERECTBL',WSH_DEBUG_SV.C_PROC_LEVEL);
2448: END IF;
2449: --
2450: WSH_IB_TXN_MATCH_PKG.extendLineRecTbl
2451: (
2452: p_extendBy => 1,
2453: x_lineRecTbl => x_lineRecTbl,
2454: x_return_status => l_return_status
2549: END IF;
2550: --
2551: WHEN OTHERS THEN
2552: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2553: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.addNewLine');
2554: --
2555: -- Debug Statements
2556: --
2557: IF l_debug_on THEN
2707: END IF;
2708: --
2709: WHEN OTHERS THEN
2710: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2711: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.extendMatchedLineRecTbl');
2712: --
2713: -- Debug Statements
2714: --
2715: IF l_debug_on THEN
2789: -- Debug Statements
2790: --
2791: IF l_debug_on THEN
2792: WSH_DEBUG_SV.log(l_module_name,'l_extendBy',l_extendBy);
2793: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.EXTENDMATCHEDLINERECTBL',WSH_DEBUG_SV.C_PROC_LEVEL);
2794: END IF;
2795: --
2796: WSH_IB_TXN_MATCH_PKG.extendMatchedLineRecTbl
2797: (
2792: WSH_DEBUG_SV.log(l_module_name,'l_extendBy',l_extendBy);
2793: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.EXTENDMATCHEDLINERECTBL',WSH_DEBUG_SV.C_PROC_LEVEL);
2794: END IF;
2795: --
2796: WSH_IB_TXN_MATCH_PKG.extendMatchedLineRecTbl
2797: (
2798: p_extendBy => l_extendBy,
2799: x_matchedLineRecTbl => x_matchedLineRecTbl,
2800: x_return_status => l_return_status
2927: END IF;
2928: --
2929: WHEN OTHERS THEN
2930: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2931: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.copyMatchedLine');
2932: --
2933: -- Debug Statements
2934: --
2935: IF l_debug_on THEN
3003: -- Debug Statements
3004: --
3005: IF l_debug_on THEN
3006: WSH_DEBUG_SV.log(l_module_name,'l_extendBy',l_extendBy);
3007: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.EXTENDMATCHEDLINERECTBL',WSH_DEBUG_SV.C_PROC_LEVEL);
3008: END IF;
3009: --
3010: WSH_IB_TXN_MATCH_PKG.extendMatchedLineRecTbl
3011: (
3006: WSH_DEBUG_SV.log(l_module_name,'l_extendBy',l_extendBy);
3007: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.EXTENDMATCHEDLINERECTBL',WSH_DEBUG_SV.C_PROC_LEVEL);
3008: END IF;
3009: --
3010: WSH_IB_TXN_MATCH_PKG.extendMatchedLineRecTbl
3011: (
3012: p_extendBy => l_extendBy,
3013: x_matchedLineRecTbl => x_matchedLineRecTbl,
3014: x_return_status => l_return_status
3137: END IF;
3138: --
3139: WHEN OTHERS THEN
3140: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
3141: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.addNewMatchedLine');
3142: --
3143: -- Debug Statements
3144: --
3145: IF l_debug_on THEN
3352: --
3353: -- Debug Statements
3354: --
3355: IF l_debug_on THEN
3356: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.ADDNEWMATCHEDLINE',WSH_DEBUG_SV.C_PROC_LEVEL);
3357: END IF;
3358: --
3359: WSH_IB_TXN_MATCH_PKG.addNewMatchedLine
3360: (
3355: IF l_debug_on THEN
3356: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.ADDNEWMATCHEDLINE',WSH_DEBUG_SV.C_PROC_LEVEL);
3357: END IF;
3358: --
3359: WSH_IB_TXN_MATCH_PKG.addNewMatchedLine
3360: (
3361: p_line_rec => p_line_rec,
3362: p_sourceindex => p_line_rec_index,
3363: p_lineDate => x_matchedLineRecTbl.line_date_tab(l_lineIndex),
3432: --
3433: -- Debug Statements
3434: --
3435: IF l_debug_on THEN
3436: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.COPYMATCHEDLINE',WSH_DEBUG_SV.C_PROC_LEVEL);
3437: END IF;
3438: --
3439: WSH_IB_TXN_MATCH_PKG.copyMatchedLine
3440: (
3435: IF l_debug_on THEN
3436: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.COPYMATCHEDLINE',WSH_DEBUG_SV.C_PROC_LEVEL);
3437: END IF;
3438: --
3439: WSH_IB_TXN_MATCH_PKG.copyMatchedLine
3440: (
3441: x_matchedLineRecTbl => x_matchedLineRecTbl,
3442: p_sourceIndex => l_lineIndex,
3443: p_destinationIndex => x_lineEndIndex,
3483: --
3484: -- Debug Statements
3485: --
3486: IF l_debug_on THEN
3487: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.ADDNEWMATCHEDLINE',WSH_DEBUG_SV.C_PROC_LEVEL);
3488: END IF;
3489: --
3490: WSH_IB_TXN_MATCH_PKG.addNewMatchedLine
3491: (
3486: IF l_debug_on THEN
3487: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.ADDNEWMATCHEDLINE',WSH_DEBUG_SV.C_PROC_LEVEL);
3488: END IF;
3489: --
3490: WSH_IB_TXN_MATCH_PKG.addNewMatchedLine
3491: (
3492: p_line_rec => p_line_rec,
3493: p_sourceindex => p_line_rec_index,
3494: p_lineDate => p_transactionDate,
3576: END IF;
3577: --
3578: WHEN OTHERS THEN
3579: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
3580: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.splitLines');
3581: --
3582: -- Debug Statements
3583: --
3584: IF l_debug_on THEN
3838: END IF;
3839: --
3840: WHEN OTHERS THEN
3841: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
3842: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.applyDelta');
3843: --
3844: -- Debug Statements
3845: --
3846: IF l_debug_on THEN
4082: END IF;
4083: --
4084: WHEN OTHERS THEN
4085: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
4086: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.applyQuantity');
4087: --
4088: -- Debug Statements
4089: --
4090: IF l_debug_on THEN
4250: --
4251: -- Debug Statements
4252: --
4253: IF l_debug_on THEN
4254: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.GETTRANSACTIONKEY',WSH_DEBUG_SV.C_PROC_LEVEL);
4255: END IF;
4256: --
4257: WSH_IB_TXN_MATCH_PKG.getTransactionKey
4258: (
4253: IF l_debug_on THEN
4254: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.GETTRANSACTIONKEY',WSH_DEBUG_SV.C_PROC_LEVEL);
4255: END IF;
4256: --
4257: WSH_IB_TXN_MATCH_PKG.getTransactionKey
4258: (
4259: p_transactionType => p_transactionType,
4260: p_ReceiptAgainstASN => p_ReceiptAgainstASN,
4261: p_index => l_index,
4358: --
4359: -- Debug Statements
4360: --
4361: IF l_debug_on THEN
4362: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.SPLITLINES',WSH_DEBUG_SV.C_PROC_LEVEL);
4363: END IF;
4364: --
4365: WSH_IB_TXN_MATCH_PKG.splitLines
4366: (
4361: IF l_debug_on THEN
4362: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.SPLITLINES',WSH_DEBUG_SV.C_PROC_LEVEL);
4363: END IF;
4364: --
4365: WSH_IB_TXN_MATCH_PKG.splitLines
4366: (
4367: p_txnUniqueSFLocnId => p_txnUniqueSFLocnId,
4368: p_transactionType => p_transactionType,
4369: p_transactionDate => p_transactionDate,
4705: --
4706: -- Debug Statements
4707: --
4708: IF l_debug_on THEN
4709: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.APPLYQUANTITY',WSH_DEBUG_SV.C_PROC_LEVEL);
4710: END IF;
4711: --
4712: WSH_IB_TXN_MATCH_PKG.applyQuantity
4713: (
4708: IF l_debug_on THEN
4709: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.APPLYQUANTITY',WSH_DEBUG_SV.C_PROC_LEVEL);
4710: END IF;
4711: --
4712: WSH_IB_TXN_MATCH_PKG.applyQuantity
4713: (
4714: p_transactionType => l_transactionSubType,
4715: p_ReceiptAgainstASN => p_ReceiptAgainstASN,
4716: p_quantity => l_lineQty,
4895: --
4896: -- Debug Statements
4897: --
4898: IF l_debug_on THEN
4899: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.APPLYQUANTITY',WSH_DEBUG_SV.C_PROC_LEVEL);
4900: END IF;
4901: --
4902: WSH_IB_TXN_MATCH_PKG.applyDelta
4903: (
4898: IF l_debug_on THEN
4899: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.APPLYQUANTITY',WSH_DEBUG_SV.C_PROC_LEVEL);
4900: END IF;
4901: --
4902: WSH_IB_TXN_MATCH_PKG.applyDelta
4903: (
4904: p_transactionType => l_transactionSubType,
4905: p_ReceiptAgainstASN => p_ReceiptAgainstASN,
4906: p_quantity => l_remainingQty,
5071: END IF;
5072: --
5073: WHEN OTHERS THEN
5074: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
5075: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.matchQuantity');
5076: --
5077: -- Debug Statements
5078: --
5079: IF l_debug_on THEN
5725: END IF;
5726: --
5727: WHEN OTHERS THEN
5728: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
5729: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.matchLines');
5730: --
5731: -- Debug Statements
5732: --
5733: IF l_debug_on THEN
6308: WSH_DEBUG_SV.log(l_module_name,'p_action_prms.action_code',p_action_prms.action_code);
6309: WSH_DEBUG_SV.log(l_module_name,'l_transactionType',l_transactionType);
6310: WSH_DEBUG_SV.log(l_module_name,'p_action_prms.ib_txn_history_id',p_action_prms.ib_txn_history_id);
6311: WSH_DEBUG_SV.log(l_module_name,'Total Input Records',p_line_rec.shipment_line_id.COUNT);
6312: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.VALIDATEMANDATORYINFO',WSH_DEBUG_SV.C_PROC_LEVEL);
6313: END IF;
6314: --
6315: -- Validate mandatory fields required to be passed by Receiving Module
6316: --
6313: END IF;
6314: --
6315: -- Validate mandatory fields required to be passed by Receiving Module
6316: --
6317: WSH_IB_TXN_MATCH_PKG.validateMandatoryInfo
6318: (
6319: p_transactionType => l_transactionType,
6320: p_index => l_index,
6321: x_line_rec => p_line_rec,
6463: --
6464: -- Debug Statements
6465: --
6466: IF l_debug_on THEN
6467: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.CHECKSHIPMENTHISTORY',WSH_DEBUG_SV.C_PROC_LEVEL);
6468: END IF;
6469: --
6470: -- Check Shipment History
6471: -- In case of ASN/Receipt, check if same transaction is not being interfaced again.
6470: -- Check Shipment History
6471: -- In case of ASN/Receipt, check if same transaction is not being interfaced again.
6472: -- In case of child transactions, find out its parent transaction (and its status)
6473: --
6474: WSH_IB_TXN_MATCH_PKG.checkShipmentHistory
6475: (
6476: p_transactionType => l_transactionType,
6477: p_shipmentHeaderId => p_line_rec.shipment_header_id(l_index),
6478: p_ReceiptAgainstASN => l_ReceiptAgainstASN,
6538: --
6539: -- Debug Statements
6540: --
6541: IF l_debug_on THEN
6542: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.PROCESSCANCELASN',WSH_DEBUG_SV.C_PROC_LEVEL);
6543: END IF;
6544: --
6545: WSH_IB_TXN_MATCH_PKG.processCancelASN
6546: (
6541: IF l_debug_on THEN
6542: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.PROCESSCANCELASN',WSH_DEBUG_SV.C_PROC_LEVEL);
6543: END IF;
6544: --
6545: WSH_IB_TXN_MATCH_PKG.processCancelASN
6546: (
6547: x_parentTxnHistoryRec => l_parentTxnHistoryRec,
6548: x_return_status => l_return_status
6549: );
6575: --
6576: -- Debug Statements
6577: --
6578: IF l_debug_on THEN
6579: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.INSERTTRANSACTIONHISTORY',WSH_DEBUG_SV.C_PROC_LEVEL);
6580: END IF;
6581: --
6582: -- Insert record into WSH_INBOUND_TXN_HISTORY for the receipt
6583: -- It is possible that during earlier receipt interface processing
6583: -- It is possible that during earlier receipt interface processing
6584: -- some fatal error was encountered and transaction was lost
6585: -- So, now insert it and keep it pending
6586: --
6587: WSH_IB_TXN_MATCH_PKG.insertTransactionHistory
6588: (
6589: p_transactionType => WSH_INBOUND_TXN_HISTORY_PKG.C_RECEIPT,
6590: p_ReceiptAgainstASN => l_ReceiptAgainstASN,
6591: p_autonomous => TRUE,
6741: --
6742: -- Debug Statements
6743: --
6744: IF l_debug_on THEN
6745: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.VALIDATEMANDATORYINFO',WSH_DEBUG_SV.C_PROC_LEVEL);
6746: END IF;
6747: --
6748: WSH_IB_TXN_MATCH_PKG.validateMandatoryInfo
6749: (
6744: IF l_debug_on THEN
6745: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.VALIDATEMANDATORYINFO',WSH_DEBUG_SV.C_PROC_LEVEL);
6746: END IF;
6747: --
6748: WSH_IB_TXN_MATCH_PKG.validateMandatoryInfo
6749: (
6750: p_transactionType => l_transactionType,
6751: p_index => l_index,
6752: x_line_rec => p_line_rec,
6906: --
6907: IF l_debug_on THEN
6908: WSH_DEBUG_SV.log(l_module_name,'l_transactionType',l_transactionType);
6909: --WSH_DEBUG_SV.log(l_module_name,'l_transactionSubType',l_transactionSubType);
6910: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.GETTRANSACTIONKEY',WSH_DEBUG_SV.C_PROC_LEVEL);
6911: END IF;
6912: --
6913: -- Key for each input line can be PLL/RSL ID
6914: --
6911: END IF;
6912: --
6913: -- Key for each input line can be PLL/RSL ID
6914: --
6915: WSH_IB_TXN_MATCH_PKG.getTransactionKey
6916: (
6917: p_transactionType => l_transactionType,
6918: p_ReceiptAgainstASN => l_ReceiptAgainstASN,
6919: p_index => l_index,
7376: --
7377: -- Debug Statements
7378: --
7379: IF l_debug_on THEN
7380: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.ADDNEWLINE',WSH_DEBUG_SV.C_PROC_LEVEL);
7381: END IF;
7382: --
7383: WSH_IB_TXN_MATCH_PKG.addNewLine
7384: (
7379: IF l_debug_on THEN
7380: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.ADDNEWLINE',WSH_DEBUG_SV.C_PROC_LEVEL);
7381: END IF;
7382: --
7383: WSH_IB_TXN_MATCH_PKG.addNewLine
7384: (
7385: p_lineDate => l_transactionDate,
7386: p_primaryUomCode => l_primaryUOMCode,
7387: p_secondaryUOMCode => l_secondaryUOMCode,
7716: --
7717: -- Debug Statements
7718: --
7719: IF l_debug_on THEN
7720: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.EXTENDMATCHEDLINERECTBL',WSH_DEBUG_SV.C_PROC_LEVEL);
7721: END IF;
7722: --
7723: WSH_IB_TXN_MATCH_PKG.extendMatchedLineRecTbl
7724: (
7719: IF l_debug_on THEN
7720: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.EXTENDMATCHEDLINERECTBL',WSH_DEBUG_SV.C_PROC_LEVEL);
7721: END IF;
7722: --
7723: WSH_IB_TXN_MATCH_PKG.extendMatchedLineRecTbl
7724: (
7725: p_extendBy => l_extendBy,
7726: x_matchedLineRecTbl => l_matchedLineRecTbl,
7727: x_return_status => l_return_status
8013: --
8014: -- Debug Statements
8015: --
8016: IF l_debug_on THEN
8017: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.MATCHLINES',WSH_DEBUG_SV.C_PROC_LEVEL);
8018: END IF;
8019: --
8020: WSH_IB_TXN_MATCH_PKG.matchLines
8021: (
8016: IF l_debug_on THEN
8017: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.MATCHLINES',WSH_DEBUG_SV.C_PROC_LEVEL);
8018: END IF;
8019: --
8020: WSH_IB_TXN_MATCH_PKG.matchLines
8021: (
8022: p_line_rec => p_line_rec,
8023: p_transactionType => l_transactionSubType ,
8024: p_transactionMeaning => l_transactionMeaning,
8127: --
8128: -- Debug Statements
8129: --
8130: IF l_debug_on THEN
8131: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.ADDTRANSACTIONHISTORYRECORD',WSH_DEBUG_SV.C_PROC_LEVEL);
8132: END IF;
8133: --
8134: WSH_IB_TXN_MATCH_PKG.addTransactionHistoryRecord
8135: (
8130: IF l_debug_on THEN
8131: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.ADDTRANSACTIONHISTORYRECORD',WSH_DEBUG_SV.C_PROC_LEVEL);
8132: END IF;
8133: --
8134: WSH_IB_TXN_MATCH_PKG.addTransactionHistoryRecord
8135: (
8136: p_transactionType => l_transactionSubType,
8137: p_ReceiptAgainstASN => l_ReceiptAgainstASN,
8138: p_index => l_index,
8180: -- Debug Statements
8181: --
8182: IF l_debug_on THEN
8183: WSH_DEBUG_SV.log(l_module_name,'l_minFailedTransactionId',l_minFailedTransactionId);
8184: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.ADDTRANSACTIONHISTORYRECORD',WSH_DEBUG_SV.C_PROC_LEVEL);
8185: END IF;
8186: --
8187: WSH_IB_TXN_MATCH_PKG.addTransactionHistoryRecord
8188: (
8183: WSH_DEBUG_SV.log(l_module_name,'l_minFailedTransactionId',l_minFailedTransactionId);
8184: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.ADDTRANSACTIONHISTORYRECORD',WSH_DEBUG_SV.C_PROC_LEVEL);
8185: END IF;
8186: --
8187: WSH_IB_TXN_MATCH_PKG.addTransactionHistoryRecord
8188: (
8189: p_transactionType => l_transactionSubType,
8190: p_ReceiptAgainstASN => l_ReceiptAgainstASN,
8191: p_index => l_index,
8393: --
8394: -- Debug Statements
8395: --
8396: IF l_debug_on THEN
8397: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.MATCHLINES',WSH_DEBUG_SV.C_PROC_LEVEL);
8398: END IF;
8399: --
8400: WSH_IB_TXN_MATCH_PKG.matchLines
8401: (
8396: IF l_debug_on THEN
8397: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.MATCHLINES',WSH_DEBUG_SV.C_PROC_LEVEL);
8398: END IF;
8399: --
8400: WSH_IB_TXN_MATCH_PKG.matchLines
8401: (
8402: p_line_rec => p_line_rec,
8403: p_transactionType => l_transactionSubType ,
8404: p_transactionMeaning => l_transactionMeaning,
8492: --
8493: -- Debug Statements
8494: --
8495: IF l_debug_on THEN
8496: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.MATCHLINES',WSH_DEBUG_SV.C_PROC_LEVEL);
8497: END IF;
8498: --
8499: WSH_IB_TXN_MATCH_PKG.matchLines
8500: (
8495: IF l_debug_on THEN
8496: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.MATCHLINES',WSH_DEBUG_SV.C_PROC_LEVEL);
8497: END IF;
8498: --
8499: WSH_IB_TXN_MATCH_PKG.matchLines
8500: (
8501: p_line_rec => p_line_rec,
8502: p_transactionType => l_transactionSubType ,
8503: p_transactionMeaning => l_transactionMeaning,
8611: --
8612: -- Debug Statements
8613: --
8614: IF l_debug_on THEN
8615: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.MATCHLINES',WSH_DEBUG_SV.C_PROC_LEVEL);
8616: END IF;
8617: --
8618: WSH_IB_TXN_MATCH_PKG.matchLines
8619: (
8614: IF l_debug_on THEN
8615: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.MATCHLINES',WSH_DEBUG_SV.C_PROC_LEVEL);
8616: END IF;
8617: --
8618: WSH_IB_TXN_MATCH_PKG.matchLines
8619: (
8620: p_line_rec => p_line_rec,
8621: p_transactionType => l_transactionSubType ,
8622: p_transactionMeaning => l_transactionMeaning,
8723: --
8724: -- Debug Statements
8725: --
8726: IF l_debug_on THEN
8727: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.MATCHQUANTITY',WSH_DEBUG_SV.C_PROC_LEVEL);
8728: END IF;
8729: --
8730: WSH_IB_TXN_MATCH_PKG.matchQuantity
8731: (
8726: IF l_debug_on THEN
8727: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.MATCHQUANTITY',WSH_DEBUG_SV.C_PROC_LEVEL);
8728: END IF;
8729: --
8730: WSH_IB_TXN_MATCH_PKG.matchQuantity
8731: (
8732: p_line_rec => p_line_rec,
8733: p_transactionType => l_transactionType, --l_transactionSubType ,
8734: p_transactionMeaning => l_transactionMeaning,
9084: --
9085: -- Debug Statements
9086: --
9087: IF l_debug_on THEN
9088: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.HANDLEMATCHFAILURE',WSH_DEBUG_SV.C_PROC_LEVEL);
9089: END IF;
9090: --
9091: WSH_IB_TXN_MATCH_PKG.handleMatchFailure
9092: (
9087: IF l_debug_on THEN
9088: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.HANDLEMATCHFAILURE',WSH_DEBUG_SV.C_PROC_LEVEL);
9089: END IF;
9090: --
9091: WSH_IB_TXN_MATCH_PKG.handleMatchFailure
9092: (
9093: p_transactionType => l_transactionType, --l_transactionSubType,
9094: p_transactionMeaning => l_transactionMeaning,
9095: p_ReceiptAgainstASN => l_ReceiptAgainstASN,
9164: --
9165: WHEN OTHERS THEN
9166: ROLLBACK TO matchTransaction_sp;
9167: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
9168: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.matchTransaction');
9169: --
9170: -- Debug Statements
9171: --
9172: IF l_debug_on THEN
9403: --
9404: --
9405: IF l_debug_on THEN
9406: WSH_DEBUG_SV.log(l_module_name,'l_processRTVFlag',l_processRTVFlag);
9407: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.matchTransaction',WSH_DEBUG_SV.C_PROC_LEVEL);
9408: END IF;
9409: --
9410: WSH_IB_TXN_MATCH_PKG.matchTransaction
9411: (
9406: WSH_DEBUG_SV.log(l_module_name,'l_processRTVFlag',l_processRTVFlag);
9407: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.matchTransaction',WSH_DEBUG_SV.C_PROC_LEVEL);
9408: END IF;
9409: --
9410: WSH_IB_TXN_MATCH_PKG.matchTransaction
9411: (
9412: p_action_prms => l_action_prms,
9413: p_line_rec => l_line_rec,
9414: x_return_status => l_return_status
9523: l_action_prms.ship_from_location_id := p_hzShipFromLocationId; --IB-Phase-2
9524: --
9525: --
9526: IF l_debug_on THEN
9527: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.matchTransaction',WSH_DEBUG_SV.C_PROC_LEVEL);
9528: END IF;
9529: --
9530: WSH_IB_TXN_MATCH_PKG.matchTransaction
9531: (
9526: IF l_debug_on THEN
9527: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.matchTransaction',WSH_DEBUG_SV.C_PROC_LEVEL);
9528: END IF;
9529: --
9530: WSH_IB_TXN_MATCH_PKG.matchTransaction
9531: (
9532: p_action_prms => l_action_prms,
9533: p_line_rec => l_line_rec,
9534: x_return_status => l_return_status
9607: --
9608: WHEN OTHERS THEN
9609: --ROLLBACK TO matchTransaction_sp;
9610: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
9611: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.processPriorReceipts');
9612: --
9613: -- Debug Statements
9614: --
9615: IF l_debug_on THEN
9954: --OR l_objectVersionNumber = l_txnHistoryRec.object_version_number
9955: --THEN
9956: --{
9957: IF l_debug_on THEN
9958: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_IB_TXN_MATCH_PKG.processPriorReceipts',WSH_DEBUG_SV.C_PROC_LEVEL);
9959: END IF;
9960: --
9961: l_processedTxns := TRUE;
9962: --
9965: FETCH get_hz_location_csr INTO l_hzShipFromLocationId;
9966: CLOSE get_hz_location_csr;
9967: --
9968:
9969: WSH_IB_TXN_MATCH_PKG.processPriorReceipts
9970: (
9971: p_shipmentHeaderId => rcv_headers_rec.shipment_header_id ,
9972: p_transactionType => rcv_headers_rec.txn_type,
9973: p_MAtransactionType => l_transactionType,
10173: --
10174: WHEN OTHERS THEN
10175: --ROLLBACK TO matchTransaction_sp;
10176: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
10177: wsh_util_core.default_handler('WSH_IB_TXN_MATCH_PKG.handlePriorReceipts');
10178: --
10179: -- Debug Statements
10180: --
10181: IF l_debug_on THEN
10187: END handlePriorReceipts;
10188:
10189:
10190:
10191: END WSH_IB_TXN_MATCH_PKG;