625: autocharge_type,
626: basis_type,
627: completion_date,
628: scheduled_flag,
629: standard_rate_flag,
630: substitution_type,
631: supply_subinventory,
632: -- swai: add columns for operations
633: backflush_flag,
637: first_unit_start_date,
638: last_unit_completion_date,
639: last_unit_start_date,
640: minimum_transfer_quantity,
641: standard_operation_id,
642: description
643: )
644: Values
645: (
675: l_job_details_rec.autocharge_type,
676: l_job_details_rec.basis_type,
677: l_job_details_rec.completion_date,
678: l_job_details_rec.scheduled_flag,
679: l_job_details_rec.standard_rate_flag,
680: l_job_details_rec.substitution_type,
681: l_job_details_rec.supply_subinventory,
682: -- swai: add columns for operations
683: l_job_details_rec.backflush_flag,
687: l_job_details_rec.first_unit_start_date,
688: l_job_details_rec.last_unit_completion_date,
689: l_job_details_rec.last_unit_start_date,
690: l_job_details_rec.minimum_transfer_quantity,
691: l_job_details_rec.standard_operation_id,
692: l_job_details_rec.description
693: );
694:
695:
1424: END IF;
1425:
1426: SAVEPOINT PROCESS_JOB_COMP_TXN_PVT;
1427:
1428: -- Standard call to check for call compatibility.
1429: IF NOT FND_API.Compatible_API_Call(lc_api_version_number,
1430: p_api_version_number,
1431: lc_api_name,
1432: G_PKG_NAME) THEN
1710: END IF;
1711:
1712: SAVEPOINT INSERT_JOB_COMP_TXN_PVT;
1713:
1714: -- Standard call to check for call compatibility.
1715: IF NOT FND_API.Compatible_API_Call(lc_api_version_number,
1716: p_api_version_number,
1717: lc_api_name,
1718: G_PKG_NAME) THEN
1924: -- Regardless of whether or not details are needed, pass back
1925: -- the transaction header ID.
1926: x_transaction_header_id := l_transactions_interface_rec.transaction_header_id;
1927:
1928: -- Standard check for p_commit
1929: IF FND_API.to_Boolean( p_commit )
1930: THEN
1931: COMMIT WORK;
1932: END IF;
2017: END IF;
2018:
2019: SAVEPOINT PROCESS_MTI_TRANSACTIONS_PVT;
2020:
2021: -- Standard call to check for call compatibility.
2022: IF NOT FND_API.Compatible_API_Call(lc_api_version_number,
2023: p_api_version_number,
2024: lc_api_name,
2025: G_PKG_NAME) THEN
2059: FND_MSG_PUB.ADD;
2060: RAISE FND_API.G_EXC_ERROR;
2061: END IF;
2062:
2063: -- Standard check for p_commit
2064: IF FND_API.to_Boolean( p_commit )
2065: THEN
2066: COMMIT WORK;
2067: END IF;
2207: 'Entering private API process_oper_comp_txn' );
2208: END IF;
2209:
2210: SAVEPOINT PROCESS_OPER_COMP_TXN_PVT;
2211: -- Standard call to check for call compatibility.
2212: IF NOT FND_API.Compatible_API_Call
2213: (lc_api_version_number,
2214: p_api_version_number,
2215: lc_api_name,
2400:
2401: -- END IF;
2402:
2403:
2404: -- Standard check for p_commit
2405: IF FND_API.to_Boolean( p_commit )
2406: THEN
2407: COMMIT WORK;
2408: END IF;
2580: 'Entering private API process_issue_mtl_txn' );
2581: END IF;
2582:
2583: SAVEPOINT PROCESS_ISSUE_MTL_TXN_PVT;
2584: -- Standard call to check for call compatibility.
2585: IF NOT FND_API.Compatible_API_Call
2586: (lc_api_version_number,
2587: p_api_version_number,
2588: lc_api_name,
3253:
3254:
3255:
3256:
3257: -- Standard check for p_commit
3258: IF l_need_details_flag = 'F' and FND_API.to_Boolean( p_commit )
3259: THEN
3260: COMMIT WORK;
3261: END IF;
3350: 'Entering private API process_issue_mtl_txns_lot_srl' );
3351: END IF;
3352:
3353: SAVEPOINT PROCESS_MTL_TXNS_LOT_SRL_PVT;
3354: -- Standard call to check for call compatibility.
3355: IF NOT FND_API.Compatible_API_Call
3356: (lc_api_version_number,
3357: p_api_version_number,
3358: lc_api_name,
3410: FND_MSG_PUB.ADD;
3411: RAISE FND_API.G_EXC_ERROR;
3412: END IF;
3413:
3414: -- Standard check for p_commit
3415: IF FND_API.to_Boolean( p_commit )
3416: THEN
3417: COMMIT WORK;
3418: END IF;
3512: 'Entering private API update_mtl_txns_lot_srl' );
3513: END IF;
3514:
3515: SAVEPOINT UPDATE_MTL_TXNS_LOT_SRL_PVT;
3516: -- Standard call to check for call compatibility.
3517: IF NOT FND_API.Compatible_API_Call
3518: (lc_api_version_number,
3519: p_api_version_number,
3520: lc_api_name,
3613: END IF;
3614: END IF; -- end lot control condition
3615: END LOOP;
3616:
3617: -- Standard check for p_commit
3618: IF FND_API.to_Boolean( p_commit )
3619: THEN
3620: COMMIT WORK;
3621: END IF;
3736: 'Entering private API process_transact_res_txn' );
3737: END IF;
3738:
3739: SAVEPOINT PROCESS_TRANSACT_RES_TXN_PVT;
3740: -- Standard call to check for call compatibility.
3741: IF NOT FND_API.Compatible_API_Call
3742: (lc_api_version_number,
3743: p_api_version_number,
3744: lc_api_name,
3809: FND_MSG_PUB.ADD;
3810: RAISE FND_API.G_EXC_ERROR;
3811: end if;
3812:
3813: l_job_details_rec.standard_rate_flag := fnd_profile.value('CSD_HV_STD_FLG');
3814:
3815: -- If standard_rate_flag is null, throw an error and return;
3816:
3817: IF l_job_details_rec.standard_rate_flag is NULL THEN
3811: end if;
3812:
3813: l_job_details_rec.standard_rate_flag := fnd_profile.value('CSD_HV_STD_FLG');
3814:
3815: -- If standard_rate_flag is null, throw an error and return;
3816:
3817: IF l_job_details_rec.standard_rate_flag is NULL THEN
3818:
3819: FND_MESSAGE.SET_NAME('CSD','CSD_STD_FLG_NULL');
3813: l_job_details_rec.standard_rate_flag := fnd_profile.value('CSD_HV_STD_FLG');
3814:
3815: -- If standard_rate_flag is null, throw an error and return;
3816:
3817: IF l_job_details_rec.standard_rate_flag is NULL THEN
3818:
3819: FND_MESSAGE.SET_NAME('CSD','CSD_STD_FLG_NULL');
3820: FND_MSG_PUB.ADD;
3821: RAISE FND_API.G_EXC_ERROR;
4102:
4103: END IF;
4104:
4105:
4106: -- Standard check for p_commit
4107: IF FND_API.to_Boolean( p_commit )
4108: THEN
4109: COMMIT WORK;
4110: END IF;
4191:
4192: -- Constants Used for Inserting into wip_job_schedule_interface,
4193: -- These are the values needed for WIP Mass Load to pick up the records
4194:
4195: -- Non Standard Update Discrete Job Load Type
4196: lc_non_std_update_load_type CONSTANT NUMBER := 3;
4197:
4198:
4199: lc_load_mtl_type CONSTANT NUMBER := 2;
4248: lc_mod_name||'begin',
4249: 'Entering private API process_save_mtl_txn_dtls' );
4250: END IF;
4251:
4252: -- Standard Start of API savepoint
4253: SAVEPOINT PROCESS_SAVE_MTL_TXN_DTLS_PVT;
4254: -- Standard call to check for call compatibility.
4255: IF NOT FND_API.Compatible_API_Call
4256: (lc_api_version_number,
4250: END IF;
4251:
4252: -- Standard Start of API savepoint
4253: SAVEPOINT PROCESS_SAVE_MTL_TXN_DTLS_PVT;
4254: -- Standard call to check for call compatibility.
4255: IF NOT FND_API.Compatible_API_Call
4256: (lc_api_version_number,
4257: p_api_version_number,
4258: lc_api_name,
4522: ,p_FIRST_UNIT_START_DATE => null
4523: ,p_LAST_UNIT_COMPLETION_DATE => null
4524: ,p_LAST_UNIT_START_DATE => null
4525: ,p_MINIMUM_TRANSFER_QUANTITY => null
4526: ,p_STANDARD_OPERATION_ID => null
4527: );
4528:
4529: else
4530:
4559: ,p_FIRST_UNIT_START_DATE => null
4560: ,p_LAST_UNIT_COMPLETION_DATE => null
4561: ,p_LAST_UNIT_START_DATE => null
4562: ,p_MINIMUM_TRANSFER_QUANTITY => null
4563: ,p_STANDARD_OPERATION_ID => null
4564: ,p_OBJECT_VERSION_NUMBER => p_mtl_txn_dtls_tbl(mtl_ctr).object_version_number
4565: );
4566:
4567: end if;
4567: end if;
4568:
4569: END LOOP;
4570:
4571: -- Standard check for p_commit
4572: IF FND_API.to_Boolean( p_commit )
4573: THEN
4574: COMMIT WORK;
4575: END IF;
4657:
4658: -- Constants Used for Inserting into wip_job_schedule_interface,
4659: -- These are the values needed for WIP Mass Load to pick up the records
4660:
4661: -- Non Standard Update Discrete Job Load Type
4662: lc_non_std_update_load_type CONSTANT NUMBER := 3;
4663:
4664:
4665: lc_load_res_type CONSTANT NUMBER := 1;
4668: -- 11/7/05
4669: -- lc_manual_autocharge_type CONSTANT NUMBER := 2;
4670: -- lc_item_basis_type CONSTANT NUMBER := 1;
4671: -- lc_no_scheduled_flag CONSTANT NUMBER := 2;
4672: -- lc_yes_standard_rate_flag CONSTANT NUMBER := 1;
4673:
4674:
4675: -- Job Records to hold the Job header and details information
4676:
4717: lc_mod_name||'begin',
4718: 'Entering private API process_save_res_txn_dtls' );
4719: END IF;
4720:
4721: -- Standard Start of API savepoint
4722: SAVEPOINT PROCESS_SAVE_RES_TXN_DTLS_PVT;
4723: -- Standard call to check for call compatibility.
4724: IF NOT FND_API.Compatible_API_Call
4725: (lc_api_version_number,
4719: END IF;
4720:
4721: -- Standard Start of API savepoint
4722: SAVEPOINT PROCESS_SAVE_RES_TXN_DTLS_PVT;
4723: -- Standard call to check for call compatibility.
4724: IF NOT FND_API.Compatible_API_Call
4725: (lc_api_version_number,
4726: p_api_version_number,
4727: lc_api_name,
4752: -- l_job_details_rec.autocharge_type := lc_manual_autocharge_type;
4753: -- l_job_details_rec.basis_type := lc_item_basis_type;
4754: l_job_details_rec.completion_date := sysdate;
4755: -- l_job_details_rec.scheduled_flag := lc_no_scheduled_flag;
4756: -- l_job_details_rec.standard_rate_flag := lc_yes_standard_rate_flag;
4757:
4758:
4759:
4760: -- Populate the row who columns
4943: ,p_FIRST_UNIT_START_DATE => null
4944: ,p_LAST_UNIT_COMPLETION_DATE => null
4945: ,p_LAST_UNIT_START_DATE => null
4946: ,p_MINIMUM_TRANSFER_QUANTITY => null
4947: ,p_STANDARD_OPERATION_ID => null
4948: );
4949: else
4950:
4951: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4980: ,p_FIRST_UNIT_START_DATE => null
4981: ,p_LAST_UNIT_COMPLETION_DATE => null
4982: ,p_LAST_UNIT_START_DATE => null
4983: ,p_MINIMUM_TRANSFER_QUANTITY => null
4984: ,p_STANDARD_OPERATION_ID => null
4985: ,p_OBJECT_VERSION_NUMBER => p_res_txn_dtls_tbl(res_ctr).object_version_number
4986: );
4987:
4988: end if;
4988: end if;
4989:
4990: END LOOP;
4991:
4992: -- Standard check for p_commit
4993: IF FND_API.to_Boolean( p_commit )
4994: THEN
4995: COMMIT WORK;
4996: END IF;
5072: lc_mod_name CONSTANT VARCHAR2(2000) := 'csd.plsql.csd_wip_job_pvt.process_save_op_dtls.';
5073:
5074: -- Constants Used for Inserting into wip_job_schedule_interface,
5075: -- These are the values needed for WIP Mass Load to pick up the records
5076: lc_non_std_update_load_type CONSTANT NUMBER := 3; -- load type for update non standard discrete job
5077:
5078: -- Constants Used for Inserting into wip_job_dtls_interface
5079: lc_load_op_type CONSTANT NUMBER := 3; -- load type for operations
5080: lc_substitution_add_type CONSTANT NUMBER := 2; -- indicates add record (vs. change=3 or delete=1)
5103: lc_mod_name||'begin',
5104: 'Entering private API process_save_op_dtls' );
5105: END IF;
5106:
5107: -- Standard Start of API savepoint
5108: SAVEPOINT PROCESS_SAVE_OP_DTLS_PVT;
5109:
5110: -- Standard call to check for call compatibility.
5111: IF NOT FND_API.Compatible_API_Call
5106:
5107: -- Standard Start of API savepoint
5108: SAVEPOINT PROCESS_SAVE_OP_DTLS_PVT;
5109:
5110: -- Standard call to check for call compatibility.
5111: IF NOT FND_API.Compatible_API_Call
5112: (lc_api_version_number,
5113: p_api_version_number,
5114: lc_api_name,
5176:
5177: IF p_op_dtls_tbl(op_ctr).new_row = 'Y' THEN
5178: l_job_details_rec.substitution_type := lc_substitution_add_type;
5179: l_job_details_rec.department_id := p_op_dtls_tbl(op_ctr).department_id;
5180: l_job_details_rec.standard_operation_id := p_op_dtls_tbl(op_ctr).standard_operation_id;
5181: ELSE
5182: l_job_details_rec.substitution_type := lc_substitution_change_type;
5183: END IF;
5184:
5300: ,p_FIRST_UNIT_START_DATE => p_op_dtls_tbl(op_ctr).FIRST_UNIT_START_DATE
5301: ,p_LAST_UNIT_COMPLETION_DATE => p_op_dtls_tbl(op_ctr).LAST_UNIT_COMPLETION_DATE
5302: ,p_LAST_UNIT_START_DATE => p_op_dtls_tbl(op_ctr).LAST_UNIT_START_DATE
5303: ,p_MINIMUM_TRANSFER_QUANTITY => p_op_dtls_tbl(op_ctr).MINIMUM_TRANSFER_QUANTITY
5304: ,p_STANDARD_OPERATION_ID => p_op_dtls_tbl(op_ctr).STANDARD_OPERATION_ID
5305:
5306: );
5307:
5308: else
5337: ,p_FIRST_UNIT_START_DATE => p_op_dtls_tbl(op_ctr).FIRST_UNIT_START_DATE
5338: ,p_LAST_UNIT_COMPLETION_DATE => p_op_dtls_tbl(op_ctr).LAST_UNIT_COMPLETION_DATE
5339: ,p_LAST_UNIT_START_DATE => p_op_dtls_tbl(op_ctr).LAST_UNIT_START_DATE
5340: ,p_MINIMUM_TRANSFER_QUANTITY => p_op_dtls_tbl(op_ctr).MINIMUM_TRANSFER_QUANTITY
5341: ,p_STANDARD_OPERATION_ID => p_op_dtls_tbl(op_ctr).STANDARD_OPERATION_ID
5342: ,p_OBJECT_VERSION_NUMBER => p_op_dtls_tbl(op_ctr).object_version_number
5343: );
5344:
5345: end if;
5344:
5345: end if;
5346: END LOOP;
5347:
5348: -- Standard check for p_commit
5349: IF FND_API.to_Boolean( p_commit )
5350: THEN
5351: COMMIT WORK;
5352: END IF;
5435:
5436: lc_released_status_code CONSTANT NUMBER := 3;
5437: lc_unreleased_status_code CONSTANT NUMBER := 1;
5438:
5439: -- Non Standard Discrete Job Load Type
5440: lc_non_standard_load_type CONSTANT NUMBER := 4;
5441:
5442:
5443: -- COnstants used for FND_LOG debug messages
5436: lc_released_status_code CONSTANT NUMBER := 3;
5437: lc_unreleased_status_code CONSTANT NUMBER := 1;
5438:
5439: -- Non Standard Discrete Job Load Type
5440: lc_non_standard_load_type CONSTANT NUMBER := 4;
5441:
5442:
5443: -- COnstants used for FND_LOG debug messages
5444:
5516: lc_mod_name||'begin',
5517: 'Entering Private API create_wip_job');
5518: END IF;
5519:
5520: -- Standard Start of API savepoint
5521: SAVEPOINT CREATE_WIP_JOB_PVT;
5522: -- Standard call to check for call compatibility.
5523: IF NOT FND_API.Compatible_API_Call
5524: (lc_api_version_number,
5518: END IF;
5519:
5520: -- Standard Start of API savepoint
5521: SAVEPOINT CREATE_WIP_JOB_PVT;
5522: -- Standard call to check for call compatibility.
5523: IF NOT FND_API.Compatible_API_Call
5524: (lc_api_version_number,
5525: p_api_version_number,
5526: lc_api_name,
5594: l_job_header_rec.status_type := lc_unreleased_status_code;
5595: end if;
5596:
5597:
5598: l_job_header_rec.load_type := lc_non_standard_load_type;
5599:
5600:
5601:
5602: l_job_header_rec.first_unit_start_date := sysdate;
5978: RETURN;
5979:
5980: END IF;
5981:
5982: -- Standard check for p_commit
5983: IF FND_API.to_Boolean( p_commit )
5984: THEN
5985: COMMIT WORK;
5986: END IF;
6069: -- The Lookup Type is WIP_JOB_STATUS
6070: lc_released_status_code CONSTANT NUMBER := 3;
6071: lc_unreleased_status_code CONSTANT NUMBER := 1;
6072:
6073: -- Non Standard Discrete Job Load Type
6074: lc_non_standard_load_type CONSTANT NUMBER := 4;
6075:
6076: lc_service_code CONSTANT VARCHAR2(30) := 'SERVICE_CODE';
6077:
6070: lc_released_status_code CONSTANT NUMBER := 3;
6071: lc_unreleased_status_code CONSTANT NUMBER := 1;
6072:
6073: -- Non Standard Discrete Job Load Type
6074: lc_non_standard_load_type CONSTANT NUMBER := 4;
6075:
6076: lc_service_code CONSTANT VARCHAR2(30) := 'SERVICE_CODE';
6077:
6078:
6188: lc_mod_name||'begin',
6189: 'Entering Private API generate_wip_jobs_from_scs');
6190: END IF;
6191:
6192: -- Standard Start of API savepoint
6193: SAVEPOINT GENERATE_WIP_JOBS_FROM_SCS_PVT;
6194: -- Standard call to check for call compatibility.
6195: IF NOT FND_API.Compatible_API_Call
6196: (lc_api_version_number,
6190: END IF;
6191:
6192: -- Standard Start of API savepoint
6193: SAVEPOINT GENERATE_WIP_JOBS_FROM_SCS_PVT;
6194: -- Standard call to check for call compatibility.
6195: IF NOT FND_API.Compatible_API_Call
6196: (lc_api_version_number,
6197: p_api_version_number,
6198: lc_api_name,
6252: l_job_header_rec.status_type := lc_unreleased_status_code;
6253: end if;
6254:
6255:
6256: l_job_header_rec.load_type := lc_non_standard_load_type;
6257: l_job_header_rec.first_unit_start_date := sysdate;
6258: l_job_header_rec.last_unit_completion_date := sysdate;
6259: l_job_header_rec.start_quantity := p_repair_quantity;
6260:
6693: p_data => x_msg_data);
6694: end if;
6695: -- swai: end bug 5239301
6696:
6697: -- Standard check for p_commit
6698: IF FND_API.to_Boolean( p_commit )
6699: THEN
6700: COMMIT WORK;
6701: END IF;