DBA Data[Home] [Help]

APPS.AP_VENDOR_PUB_PKG dependencies on FND_API

Line 26: ap_null_num CONSTANT NUMBER := FND_API.G_NULL_NUM;

22:
23: G_Vendor_Type_Lookup_Code VARCHAR2(30);
24:
25: -- Global Constants to set null
26: ap_null_num CONSTANT NUMBER := FND_API.G_NULL_NUM;
27: ap_null_char CONSTANT VARCHAR2(1) := FND_API.G_NULL_CHAR;
28: ap_null_date CONSTANT DATE := FND_API.G_NULL_DATE;
29:
30: --Function: Insert_Rejections

Line 27: ap_null_char CONSTANT VARCHAR2(1) := FND_API.G_NULL_CHAR;

23: G_Vendor_Type_Lookup_Code VARCHAR2(30);
24:
25: -- Global Constants to set null
26: ap_null_num CONSTANT NUMBER := FND_API.G_NULL_NUM;
27: ap_null_char CONSTANT VARCHAR2(1) := FND_API.G_NULL_CHAR;
28: ap_null_date CONSTANT DATE := FND_API.G_NULL_DATE;
29:
30: --Function: Insert_Rejections
31: --This function is called whenever the process needs to insert a

Line 28: ap_null_date CONSTANT DATE := FND_API.G_NULL_DATE;

24:
25: -- Global Constants to set null
26: ap_null_num CONSTANT NUMBER := FND_API.G_NULL_NUM;
27: ap_null_char CONSTANT VARCHAR2(1) := FND_API.G_NULL_CHAR;
28: ap_null_date CONSTANT DATE := FND_API.G_NULL_DATE;
29:
30: --Function: Insert_Rejections
31: --This function is called whenever the process needs to insert a
32: --rejection into new supplier interface rejection table.

Line 877: l_return_status := FND_API.G_RET_STS_SUCCESS;

873: BEGIN
874: l_ret_value := 'Y';
875: l_legislative_cat_code := 'INCOME_TAX';
876: l_required_flag := 'Y'; --7442513
877: l_return_status := FND_API.G_RET_STS_SUCCESS;
878:
879: IF (p_country = 'US') THEN
880: FV_AP_TIN_PKG.TIN_VALIDATE(p_taxpayer_id, l_outcome, l_out_msg);
881: ELSIF (p_country = 'IT') THEN

Line 922: IF l_return_status = FND_API.G_RET_STS_ERROR

918: l_ret_value := 'N';
919: END IF;
920: END IF;
921: IF p_country IN ('IT','ES','PT') THEN
922: IF l_return_status = FND_API.G_RET_STS_ERROR
923: THEN
924: FND_MESSAGE.SET_NAME('XLE', 'XLE_INVALID_REG_NUM_ERR');
925: FND_MESSAGE.SET_TOKEN('REG_CODE', l_registration_code);
926: FND_MESSAGE.SET_TOKEN('REG_NUM', p_taxpayer_id);

Line 2915: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,

2911:
2912:
2913: PROCEDURE Create_Vendor
2914: ( p_api_version IN NUMBER,
2915: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
2916: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2917: p_validation_level IN NUMBER :=
2918: FND_API.G_VALID_LEVEL_FULL,
2919: x_return_status OUT NOCOPY VARCHAR2 ,

Line 2916: p_commit IN VARCHAR2 := FND_API.G_FALSE,

2912:
2913: PROCEDURE Create_Vendor
2914: ( p_api_version IN NUMBER,
2915: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
2916: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2917: p_validation_level IN NUMBER :=
2918: FND_API.G_VALID_LEVEL_FULL,
2919: x_return_status OUT NOCOPY VARCHAR2 ,
2920: x_msg_count OUT NOCOPY NUMBER,

Line 2918: FND_API.G_VALID_LEVEL_FULL,

2914: ( p_api_version IN NUMBER,
2915: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
2916: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2917: p_validation_level IN NUMBER :=
2918: FND_API.G_VALID_LEVEL_FULL,
2919: x_return_status OUT NOCOPY VARCHAR2 ,
2920: x_msg_count OUT NOCOPY NUMBER,
2921: x_msg_data OUT NOCOPY VARCHAR2,
2922: p_vendor_rec IN r_vendor_rec_type,

Line 3059: IF NOT FND_API.Compatible_API_Call ( l_api_version ,

3055: -- Standard Start of API savepoint
3056: SAVEPOINT Create_Vendor_PUB;
3057:
3058: -- Standard call to check for call compatibility.
3059: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
3060: p_api_version ,
3061: l_api_name ,
3062: G_PKG_NAME )
3063: THEN

Line 3064: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

3060: p_api_version ,
3061: l_api_name ,
3062: G_PKG_NAME )
3063: THEN
3064: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3065: END IF;
3066:
3067: -- Initialize message list if p_init_msg_list is set to TRUE.
3068: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 3068: IF FND_API.to_Boolean( p_init_msg_list ) THEN

3064: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3065: END IF;
3066:
3067: -- Initialize message list if p_init_msg_list is set to TRUE.
3068: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3069: FND_MSG_PUB.initialize;
3070: END IF;
3071:
3072: -- Initialize API return status to success

Line 3073: x_return_status := FND_API.G_RET_STS_SUCCESS;

3069: FND_MSG_PUB.initialize;
3070: END IF;
3071:
3072: -- Initialize API return status to success
3073: x_return_status := FND_API.G_RET_STS_SUCCESS;
3074: l_org_return_status := FND_API.G_RET_STS_SUCCESS;
3075: l_val_return_status := FND_API.G_RET_STS_SUCCESS;
3076: l_pay_return_status := FND_API.G_RET_STS_SUCCESS;
3077: l_sync_return_status := FND_API.G_RET_STS_SUCCESS;

Line 3074: l_org_return_status := FND_API.G_RET_STS_SUCCESS;

3070: END IF;
3071:
3072: -- Initialize API return status to success
3073: x_return_status := FND_API.G_RET_STS_SUCCESS;
3074: l_org_return_status := FND_API.G_RET_STS_SUCCESS;
3075: l_val_return_status := FND_API.G_RET_STS_SUCCESS;
3076: l_pay_return_status := FND_API.G_RET_STS_SUCCESS;
3077: l_sync_return_status := FND_API.G_RET_STS_SUCCESS;
3078:

Line 3075: l_val_return_status := FND_API.G_RET_STS_SUCCESS;

3071:
3072: -- Initialize API return status to success
3073: x_return_status := FND_API.G_RET_STS_SUCCESS;
3074: l_org_return_status := FND_API.G_RET_STS_SUCCESS;
3075: l_val_return_status := FND_API.G_RET_STS_SUCCESS;
3076: l_pay_return_status := FND_API.G_RET_STS_SUCCESS;
3077: l_sync_return_status := FND_API.G_RET_STS_SUCCESS;
3078:
3079: -- API body

Line 3076: l_pay_return_status := FND_API.G_RET_STS_SUCCESS;

3072: -- Initialize API return status to success
3073: x_return_status := FND_API.G_RET_STS_SUCCESS;
3074: l_org_return_status := FND_API.G_RET_STS_SUCCESS;
3075: l_val_return_status := FND_API.G_RET_STS_SUCCESS;
3076: l_pay_return_status := FND_API.G_RET_STS_SUCCESS;
3077: l_sync_return_status := FND_API.G_RET_STS_SUCCESS;
3078:
3079: -- API body
3080:

Line 3077: l_sync_return_status := FND_API.G_RET_STS_SUCCESS;

3073: x_return_status := FND_API.G_RET_STS_SUCCESS;
3074: l_org_return_status := FND_API.G_RET_STS_SUCCESS;
3075: l_val_return_status := FND_API.G_RET_STS_SUCCESS;
3076: l_pay_return_status := FND_API.G_RET_STS_SUCCESS;
3077: l_sync_return_status := FND_API.G_RET_STS_SUCCESS;
3078:
3079: -- API body
3080:
3081: -- Run initialize and get required default values

Line 3209: p_init_msg_list => FND_API.G_FALSE,

3205: l_vendor_rec.exclude_freight_from_discount
3206: := nvl(l_vendor_rec.exclude_freight_from_discount, 'N');
3207:
3208: validate_vendor(p_api_version => 1.0,
3209: p_init_msg_list => FND_API.G_FALSE,
3210: p_commit => FND_API.G_FALSE,
3211: x_return_status => l_val_return_status,
3212: x_msg_count => l_val_msg_count,
3213: x_msg_data => l_val_msg_data,

Line 3210: p_commit => FND_API.G_FALSE,

3206: := nvl(l_vendor_rec.exclude_freight_from_discount, 'N');
3207:
3208: validate_vendor(p_api_version => 1.0,
3209: p_init_msg_list => FND_API.G_FALSE,
3210: p_commit => FND_API.G_FALSE,
3211: x_return_status => l_val_return_status,
3212: x_msg_count => l_val_msg_count,
3213: x_msg_data => l_val_msg_data,
3214: p_vendor_rec => l_vendor_rec,

Line 3225: IF (l_val_return_status = FND_API.G_RET_STS_SUCCESS) THEN

3221:
3222: --bug 6371419.Added the below if clause to create a party in hz,external payee
3223: --in iby,tax code assignment in zx,supplier in AP only if the
3224: --SUPPLIER IS VALID.
3225: IF (l_val_return_status = FND_API.G_RET_STS_SUCCESS) THEN
3226:
3227: IF l_party_valid = 'N' THEN -- party_id was null
3228:
3229: l_org_rec.created_by_module := 'AP_SUPPLIERS_API';

Line 3273: p_init_msg_list => FND_API.G_FALSE,

3269:
3270: l_org_rec.party_rec := l_party_rec;
3271:
3272: hz_party_v2pub.create_organization(
3273: p_init_msg_list => FND_API.G_FALSE,
3274: p_organization_rec => l_org_rec,
3275: p_party_usage_code => 'SUPPLIER',
3276: -- p_commit => FND_API.G_FALSE,
3277: x_return_status => l_org_return_status,

Line 3276: -- p_commit => FND_API.G_FALSE,

3272: hz_party_v2pub.create_organization(
3273: p_init_msg_list => FND_API.G_FALSE,
3274: p_organization_rec => l_org_rec,
3275: p_party_usage_code => 'SUPPLIER',
3276: -- p_commit => FND_API.G_FALSE,
3277: x_return_status => l_org_return_status,
3278: x_msg_count => l_org_msg_count,
3279: x_msg_data => l_org_msg_data,
3280: x_party_id => l_org_party_id,

Line 3283: IF l_org_return_status <> FND_API.G_RET_STS_SUCCESS THEN

3279: x_msg_data => l_org_msg_data,
3280: x_party_id => l_org_party_id,
3281: x_party_number => l_org_party_number,
3282: x_profile_id => l_org_profile_id);
3283: IF l_org_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3284: ------------------------------------------------------------------------
3285: l_debug_info := 'After call to hz_party_v2pub.create_organization';
3286: l_debug_info := l_debug_info||' Return status : '||l_org_return_status||' Error : '||l_org_msg_data;
3287: ------------------------------------------------------------------------

Line 3308: IF l_org_return_status <> FND_API.G_RET_STS_SUCCESS THEN

3304: p_party_usg_assignment_rec => l_party_usg_rec,
3305: x_return_status => l_org_return_status,
3306: x_msg_count => l_org_msg_count,
3307: x_msg_data => l_org_msg_data);
3308: IF l_org_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3309: ------------------------------------------------------------------------
3310: l_debug_info := 'After call to HZ_PARTY_USG_ASSIGNMENT_PVT.assign_party_usage';
3311: l_debug_info := l_debug_info||' Return status : '||l_org_return_status||' Error : '||l_org_msg_data;
3312: ------------------------------------------------------------------------

Line 3359: p_init_msg_list => FND_API.G_FALSE,

3355:
3356: /* Calling IBY Payee Creation API */
3357: IBY_DISBURSEMENT_SETUP_PUB.Create_External_Payee
3358: ( p_api_version => 1.0,
3359: p_init_msg_list => FND_API.G_FALSE,
3360: p_ext_payee_tab => ext_payee_tab,
3361: x_return_status => l_pay_return_status,
3362: x_msg_count => l_pay_msg_count,
3363: x_msg_data => l_pay_msg_data,

Line 3366: IF l_pay_return_status = FND_API.G_RET_STS_SUCCESS THEN

3362: x_msg_count => l_pay_msg_count,
3363: x_msg_data => l_pay_msg_data,
3364: x_ext_payee_id_tab => ext_payee_id_tab,
3365: x_ext_payee_status_tab => ext_payee_create_tab);
3366: IF l_pay_return_status = FND_API.G_RET_STS_SUCCESS THEN
3367: ------------------------------------------------------------------------
3368: l_debug_info := 'After call to IBY_DISBURSEMENT_SETUP_PUB.Create_External_Payee';
3369: l_debug_info := l_debug_info||' Return status : '||l_pay_return_status||' Error : '||l_pay_msg_data;
3370: ------------------------------------------------------------------------

Line 3388: IF l_zx_return_status <> FND_API.G_RET_STS_SUCCESS THEN

3384: p_class_code => p_vendor_rec.vendor_type_lookup_code,
3385: x_return_status => l_zx_return_status,
3386: x_msg_count => l_zx_msg_count,
3387: x_msg_data => l_zx_msg_data );
3388: IF l_zx_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3389: ------------------------------------------------------------------------
3390: l_debug_info := 'After call to zx_tcm_bes_registration_pvt.synch_ptp_code_assigment';
3391: l_debug_info := l_debug_info||' Return status : '||l_zx_return_status||' Error : '||l_zx_msg_data;
3392: ------------------------------------------------------------------------

Line 3401: -- IF (l_val_return_status = FND_API.G_RET_STS_SUCCESS) AND

3397:
3398: END IF;
3399:
3400: --bug 6371419.commented the below condition as it was checked already
3401: -- IF (l_val_return_status = FND_API.G_RET_STS_SUCCESS) AND
3402: IF (l_org_return_status = FND_API.G_RET_STS_SUCCESS) AND
3403: (l_payee_valid = 'N' OR
3404: l_pay_return_status = FND_API.G_RET_STS_SUCCESS) THEN
3405:

Line 3402: IF (l_org_return_status = FND_API.G_RET_STS_SUCCESS) AND

3398: END IF;
3399:
3400: --bug 6371419.commented the below condition as it was checked already
3401: -- IF (l_val_return_status = FND_API.G_RET_STS_SUCCESS) AND
3402: IF (l_org_return_status = FND_API.G_RET_STS_SUCCESS) AND
3403: (l_payee_valid = 'N' OR
3404: l_pay_return_status = FND_API.G_RET_STS_SUCCESS) THEN
3405:
3406: ap_vendors_pkg.insert_row(

Line 3404: l_pay_return_status = FND_API.G_RET_STS_SUCCESS) THEN

3400: --bug 6371419.commented the below condition as it was checked already
3401: -- IF (l_val_return_status = FND_API.G_RET_STS_SUCCESS) AND
3402: IF (l_org_return_status = FND_API.G_RET_STS_SUCCESS) AND
3403: (l_payee_valid = 'N' OR
3404: l_pay_return_status = FND_API.G_RET_STS_SUCCESS) THEN
3405:
3406: ap_vendors_pkg.insert_row(
3407: p_vendor_rec => l_vendor_rec
3408: ,p_last_update_date => sysdate

Line 3435: IF l_sync_return_status <> FND_API.G_RET_STS_SUCCESS THEN

3431: l_sync_return_status,
3432: l_sync_msg_count,
3433: l_sync_msg_data,
3434: l_vendor_rec.party_id);
3435: IF l_sync_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3436: ------------------------------------------------------------------------
3437: l_debug_info := 'After call to AP_TCA_SUPPLIER_SYNC_PKG.SYNC_Supplier';
3438: l_debug_info := l_debug_info||' Return status : '||l_sync_return_status||' Error : '||l_sync_msg_data;
3439: ------------------------------------------------------------------------

Line 3445: IF l_sync_return_status = FND_API.G_RET_STS_SUCCESS THEN

3441: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3442: END IF;
3443: END IF;
3444:
3445: IF l_sync_return_status = FND_API.G_RET_STS_SUCCESS THEN
3446: Raise_Supplier_Event( i_vendor_id => l_vendor_id ); -- Bug 7307669
3447: x_return_status := FND_API.G_RET_STS_SUCCESS;
3448: END IF;
3449: -- Bug 5570585

Line 3447: x_return_status := FND_API.G_RET_STS_SUCCESS;

3443: END IF;
3444:
3445: IF l_sync_return_status = FND_API.G_RET_STS_SUCCESS THEN
3446: Raise_Supplier_Event( i_vendor_id => l_vendor_id ); -- Bug 7307669
3447: x_return_status := FND_API.G_RET_STS_SUCCESS;
3448: END IF;
3449: -- Bug 5570585
3450: x_party_id := nvl(l_vendor_rec.party_id,l_org_party_id);
3451: x_vendor_id := l_vendor_id;

Line 3455: ELSIF (l_val_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR

3451: x_vendor_id := l_vendor_id;
3452:
3453: END IF; --bug6371419.end of l_org_return_status SUCCESS
3454:
3455: ELSIF (l_val_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
3456: (l_org_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
3457: (l_pay_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
3458: (l_sync_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
3459:

Line 3456: (l_org_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR

3452:
3453: END IF; --bug6371419.end of l_org_return_status SUCCESS
3454:
3455: ELSIF (l_val_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
3456: (l_org_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
3457: (l_pay_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
3458: (l_sync_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
3459:
3460: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 3457: (l_pay_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR

3453: END IF; --bug6371419.end of l_org_return_status SUCCESS
3454:
3455: ELSIF (l_val_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
3456: (l_org_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
3457: (l_pay_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
3458: (l_sync_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
3459:
3460: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3461:

Line 3458: (l_sync_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

3454:
3455: ELSIF (l_val_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
3456: (l_org_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
3457: (l_pay_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
3458: (l_sync_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
3459:
3460: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3461:
3462: ELSE

Line 3460: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3456: (l_org_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
3457: (l_pay_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
3458: (l_sync_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
3459:
3460: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3461:
3462: ELSE
3463:
3464: x_return_status := FND_API.G_RET_STS_ERROR;

Line 3464: x_return_status := FND_API.G_RET_STS_ERROR;

3460: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3461:
3462: ELSE
3463:
3464: x_return_status := FND_API.G_RET_STS_ERROR;
3465: END IF; --Supplier Valid
3466:
3467: -- End of API body.
3468:

Line 3470: IF FND_API.To_Boolean( p_commit ) THEN

3466:
3467: -- End of API body.
3468:
3469: -- Standard check of p_commit.
3470: IF FND_API.To_Boolean( p_commit ) THEN
3471: COMMIT WORK;
3472: END IF;
3473:
3474: -- Standard call to get message count and if count is 1,

Line 3482: WHEN FND_API.G_EXC_ERROR THEN

3478: p_data => x_msg_data
3479: );
3480:
3481: EXCEPTION
3482: WHEN FND_API.G_EXC_ERROR THEN
3483: ROLLBACK TO Create_Vendor_PUB;
3484: x_return_status := FND_API.G_RET_STS_ERROR ;
3485: FND_MSG_PUB.Count_And_Get
3486: ( p_count => x_msg_count,

Line 3484: x_return_status := FND_API.G_RET_STS_ERROR ;

3480:
3481: EXCEPTION
3482: WHEN FND_API.G_EXC_ERROR THEN
3483: ROLLBACK TO Create_Vendor_PUB;
3484: x_return_status := FND_API.G_RET_STS_ERROR ;
3485: FND_MSG_PUB.Count_And_Get
3486: ( p_count => x_msg_count,
3487: p_data => x_msg_data
3488: );

Line 3489: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

3485: FND_MSG_PUB.Count_And_Get
3486: ( p_count => x_msg_count,
3487: p_data => x_msg_data
3488: );
3489: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3490: ROLLBACK TO Create_Vendor_PUB;
3491: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3492: FND_MSG_PUB.Count_And_Get
3493: ( p_count => x_msg_count,

Line 3491: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

3487: p_data => x_msg_data
3488: );
3489: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3490: ROLLBACK TO Create_Vendor_PUB;
3491: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3492: FND_MSG_PUB.Count_And_Get
3493: ( p_count => x_msg_count,
3494: p_data => x_msg_data
3495: );

Line 3498: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

3494: p_data => x_msg_data
3495: );
3496: WHEN OTHERS THEN
3497: ROLLBACK TO Create_Vendor_PUB;
3498: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3499: IF FND_MSG_PUB.Check_Msg_Level
3500: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3501: FND_MSG_PUB.Add_Exc_Msg
3502: ( G_PKG_NAME ,

Line 3514: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,

3510: END Create_Vendor;
3511:
3512: PROCEDURE Update_Vendor
3513: ( p_api_version IN NUMBER,
3514: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
3515: p_commit IN VARCHAR2 := FND_API.G_FALSE,
3516: p_validation_level IN NUMBER :=
3517: FND_API.G_VALID_LEVEL_FULL,
3518: x_return_status OUT NOCOPY VARCHAR2 ,

Line 3515: p_commit IN VARCHAR2 := FND_API.G_FALSE,

3511:
3512: PROCEDURE Update_Vendor
3513: ( p_api_version IN NUMBER,
3514: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
3515: p_commit IN VARCHAR2 := FND_API.G_FALSE,
3516: p_validation_level IN NUMBER :=
3517: FND_API.G_VALID_LEVEL_FULL,
3518: x_return_status OUT NOCOPY VARCHAR2 ,
3519: x_msg_count OUT NOCOPY NUMBER,

Line 3517: FND_API.G_VALID_LEVEL_FULL,

3513: ( p_api_version IN NUMBER,
3514: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
3515: p_commit IN VARCHAR2 := FND_API.G_FALSE,
3516: p_validation_level IN NUMBER :=
3517: FND_API.G_VALID_LEVEL_FULL,
3518: x_return_status OUT NOCOPY VARCHAR2 ,
3519: x_msg_count OUT NOCOPY NUMBER,
3520: x_msg_data OUT NOCOPY VARCHAR2,
3521: p_vendor_rec IN r_vendor_rec_type,

Line 3556: IF NOT FND_API.Compatible_API_Call ( l_api_version ,

3552: -- Standard Start of API savepoint
3553: SAVEPOINT Update_Vendor_PUB;
3554:
3555: -- Standard call to check for call compatibility.
3556: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
3557: p_api_version ,
3558: l_api_name ,
3559: G_PKG_NAME )
3560: THEN

Line 3561: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

3557: p_api_version ,
3558: l_api_name ,
3559: G_PKG_NAME )
3560: THEN
3561: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3562: END IF;
3563:
3564: -- Initialize message list if p_init_msg_list is set to TRUE.
3565: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 3565: IF FND_API.to_Boolean( p_init_msg_list ) THEN

3561: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3562: END IF;
3563:
3564: -- Initialize message list if p_init_msg_list is set to TRUE.
3565: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3566: FND_MSG_PUB.initialize;
3567: END IF;
3568:
3569: -- Initialize API return status to success

Line 3570: x_return_status := FND_API.G_RET_STS_SUCCESS;

3566: FND_MSG_PUB.initialize;
3567: END IF;
3568:
3569: -- Initialize API return status to success
3570: x_return_status := FND_API.G_RET_STS_SUCCESS;
3571: l_sync_return_status := FND_API.G_RET_STS_SUCCESS;
3572:
3573:
3574: -- API body

Line 3571: l_sync_return_status := FND_API.G_RET_STS_SUCCESS;

3567: END IF;
3568:
3569: -- Initialize API return status to success
3570: x_return_status := FND_API.G_RET_STS_SUCCESS;
3571: l_sync_return_status := FND_API.G_RET_STS_SUCCESS;
3572:
3573:
3574: -- API body
3575:

Line 3587: p_init_msg_list => FND_API.G_FALSE,

3583:
3584: l_vendor_rec := p_vendor_rec;
3585:
3586: validate_vendor(p_api_version => 1.0,
3587: p_init_msg_list => FND_API.G_FALSE,
3588: p_commit => FND_API.G_FALSE,
3589: x_return_status => l_val_return_status,
3590: x_msg_count => l_val_msg_count,
3591: x_msg_data => l_val_msg_data,

Line 3588: p_commit => FND_API.G_FALSE,

3584: l_vendor_rec := p_vendor_rec;
3585:
3586: validate_vendor(p_api_version => 1.0,
3587: p_init_msg_list => FND_API.G_FALSE,
3588: p_commit => FND_API.G_FALSE,
3589: x_return_status => l_val_return_status,
3590: x_msg_count => l_val_msg_count,
3591: x_msg_data => l_val_msg_data,
3592: p_vendor_rec => l_vendor_rec,

Line 3599: IF (l_val_return_status = FND_API.G_RET_STS_SUCCESS) THEN

3595: x_party_valid => l_party_valid,
3596: x_payee_valid => l_payee_valid,
3597: p_vendor_id => p_vendor_id );
3598:
3599: IF (l_val_return_status = FND_API.G_RET_STS_SUCCESS) THEN
3600:
3601: -- Select all the values needed to pass to update_row
3602: -- from PO_VENDORS
3603: SELECT

Line 4133: IF l_sync_return_status = FND_API.G_RET_STS_SUCCESS THEN

4129: l_sync_msg_count,
4130: l_sync_msg_data,
4131: l_vendor_rec.party_id);
4132:
4133: IF l_sync_return_status = FND_API.G_RET_STS_SUCCESS THEN
4134: Raise_Supplier_Event( i_vendor_id => p_vendor_id ); -- Bug 7307669
4135: x_return_status := FND_API.G_RET_STS_SUCCESS;
4136: END IF;
4137:

Line 4135: x_return_status := FND_API.G_RET_STS_SUCCESS;

4131: l_vendor_rec.party_id);
4132:
4133: IF l_sync_return_status = FND_API.G_RET_STS_SUCCESS THEN
4134: Raise_Supplier_Event( i_vendor_id => p_vendor_id ); -- Bug 7307669
4135: x_return_status := FND_API.G_RET_STS_SUCCESS;
4136: END IF;
4137:
4138: ELSIF (l_val_return_status = FND_API.G_RET_STS_UNEXP_ERROR OR
4139: l_sync_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

Line 4138: ELSIF (l_val_return_status = FND_API.G_RET_STS_UNEXP_ERROR OR

4134: Raise_Supplier_Event( i_vendor_id => p_vendor_id ); -- Bug 7307669
4135: x_return_status := FND_API.G_RET_STS_SUCCESS;
4136: END IF;
4137:
4138: ELSIF (l_val_return_status = FND_API.G_RET_STS_UNEXP_ERROR OR
4139: l_sync_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
4140:
4141: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4142:

Line 4139: l_sync_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

4135: x_return_status := FND_API.G_RET_STS_SUCCESS;
4136: END IF;
4137:
4138: ELSIF (l_val_return_status = FND_API.G_RET_STS_UNEXP_ERROR OR
4139: l_sync_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
4140:
4141: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4142:
4143: ELSE

Line 4141: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4137:
4138: ELSIF (l_val_return_status = FND_API.G_RET_STS_UNEXP_ERROR OR
4139: l_sync_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
4140:
4141: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4142:
4143: ELSE
4144:
4145: x_return_status := FND_API.G_RET_STS_ERROR;

Line 4145: x_return_status := FND_API.G_RET_STS_ERROR;

4141: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4142:
4143: ELSE
4144:
4145: x_return_status := FND_API.G_RET_STS_ERROR;
4146: END IF;
4147:
4148: --set access mode back to original value
4149: IF l_org_context <> mo_global.get_access_mode THEN

Line 4156: IF FND_API.To_Boolean( p_commit ) THEN

4152:
4153: -- End of API body.
4154:
4155: -- Standard check of p_commit.
4156: IF FND_API.To_Boolean( p_commit ) THEN
4157: COMMIT WORK;
4158: END IF;
4159:
4160: -- Standard call to get message count and if count is 1,

Line 4168: WHEN FND_API.G_EXC_ERROR THEN

4164: p_data => x_msg_data
4165: );
4166:
4167: EXCEPTION
4168: WHEN FND_API.G_EXC_ERROR THEN
4169: ROLLBACK TO Update_Vendor_PUB;
4170: x_return_status := FND_API.G_RET_STS_ERROR ;
4171: FND_MSG_PUB.Count_And_Get
4172: ( p_count => x_msg_count,

Line 4170: x_return_status := FND_API.G_RET_STS_ERROR ;

4166:
4167: EXCEPTION
4168: WHEN FND_API.G_EXC_ERROR THEN
4169: ROLLBACK TO Update_Vendor_PUB;
4170: x_return_status := FND_API.G_RET_STS_ERROR ;
4171: FND_MSG_PUB.Count_And_Get
4172: ( p_count => x_msg_count,
4173: p_data => x_msg_data
4174: );

Line 4175: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

4171: FND_MSG_PUB.Count_And_Get
4172: ( p_count => x_msg_count,
4173: p_data => x_msg_data
4174: );
4175: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4176: ROLLBACK TO Update_Vendor_PUB;
4177: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4178: FND_MSG_PUB.Count_And_Get
4179: ( p_count => x_msg_count,

Line 4177: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

4173: p_data => x_msg_data
4174: );
4175: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4176: ROLLBACK TO Update_Vendor_PUB;
4177: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4178: FND_MSG_PUB.Count_And_Get
4179: ( p_count => x_msg_count,
4180: p_data => x_msg_data
4181: );

Line 4184: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

4180: p_data => x_msg_data
4181: );
4182: WHEN OTHERS THEN
4183: ROLLBACK TO Update_Vendor_PUB;
4184: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4185: IF FND_MSG_PUB.Check_Msg_Level
4186: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4187: FND_MSG_PUB.Add_Exc_Msg
4188: ( G_PKG_NAME ,

Line 4200: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,

4196: END Update_Vendor;
4197:
4198: PROCEDURE Validate_Vendor
4199: ( p_api_version IN NUMBER,
4200: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
4201: p_commit IN VARCHAR2 := FND_API.G_FALSE,
4202: p_validation_level IN NUMBER :=
4203: FND_API.G_VALID_LEVEL_FULL,
4204: x_return_status OUT NOCOPY VARCHAR2 ,

Line 4201: p_commit IN VARCHAR2 := FND_API.G_FALSE,

4197:
4198: PROCEDURE Validate_Vendor
4199: ( p_api_version IN NUMBER,
4200: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
4201: p_commit IN VARCHAR2 := FND_API.G_FALSE,
4202: p_validation_level IN NUMBER :=
4203: FND_API.G_VALID_LEVEL_FULL,
4204: x_return_status OUT NOCOPY VARCHAR2 ,
4205: x_msg_count OUT NOCOPY NUMBER,

Line 4203: FND_API.G_VALID_LEVEL_FULL,

4199: ( p_api_version IN NUMBER,
4200: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
4201: p_commit IN VARCHAR2 := FND_API.G_FALSE,
4202: p_validation_level IN NUMBER :=
4203: FND_API.G_VALID_LEVEL_FULL,
4204: x_return_status OUT NOCOPY VARCHAR2 ,
4205: x_msg_count OUT NOCOPY NUMBER,
4206: x_msg_data OUT NOCOPY VARCHAR2,
4207: p_vendor_rec IN OUT NOCOPY r_vendor_rec_type,

Line 4234: IF NOT FND_API.Compatible_API_Call ( l_api_version ,

4230: -- Standard Start of API savepoint
4231: SAVEPOINT Validate_Vendor_PUB;
4232:
4233: -- Standard call to check for call compatibility.
4234: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
4235: p_api_version ,
4236: l_api_name ,
4237: G_PKG_NAME )
4238: THEN

Line 4239: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

4235: p_api_version ,
4236: l_api_name ,
4237: G_PKG_NAME )
4238: THEN
4239: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4240: END IF;
4241:
4242: -- Initialize message list if p_init_msg_list is set to TRUE.
4243: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 4243: IF FND_API.to_Boolean( p_init_msg_list ) THEN

4239: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4240: END IF;
4241:
4242: -- Initialize message list if p_init_msg_list is set to TRUE.
4243: IF FND_API.to_Boolean( p_init_msg_list ) THEN
4244: FND_MSG_PUB.initialize;
4245: END IF;
4246:
4247: -- Initialize API return status to success

Line 4248: x_return_status := FND_API.G_RET_STS_SUCCESS;

4244: FND_MSG_PUB.initialize;
4245: END IF;
4246:
4247: -- Initialize API return status to success
4248: x_return_status := FND_API.G_RET_STS_SUCCESS;
4249:
4250: -- API body
4251:
4252: -- Open Issue 7 Call eTax Validation

Line 4269: x_return_status := FND_API.G_RET_STS_ERROR;

4265:
4266: Validate_Lookups( 'INSPECTION_REQUIRED_FLAG', p_vendor_rec.inspection_required_flag,'YES/NO',
4267: 'PO_LOOKUP_CODES',x_valid);
4268: IF NOT x_valid THEN
4269: x_return_status := FND_API.G_RET_STS_ERROR;
4270: IF g_source = 'IMPORT' THEN
4271: IF (Insert_Rejections(
4272: 'AP_SUPPLIERS_INT',
4273: p_vendor_rec.vendor_interface_id,

Line 4310: x_return_status := FND_API.G_RET_STS_ERROR;

4306:
4307: Validate_Lookups( 'RECEIPT_REQUIRED_FLAG', p_vendor_rec.receipt_required_flag,'YES/NO',
4308: 'PO_LOOKUP_CODES',x_valid);
4309: IF NOT x_valid THEN
4310: x_return_status := FND_API.G_RET_STS_ERROR;
4311: IF g_source = 'IMPORT' THEN
4312: IF (Insert_Rejections(
4313: 'AP_SUPPLIERS_INT',
4314: p_vendor_rec.vendor_interface_id,

Line 4354: x_return_status := FND_API.G_RET_STS_ERROR;

4350: Check_payment_priority(p_vendor_rec.payment_priority,
4351: x_valid
4352: );
4353: IF NOT x_valid THEN
4354: x_return_status := FND_API.G_RET_STS_ERROR;
4355: IF g_source = 'IMPORT' THEN
4356: IF (Insert_Rejections(
4357: 'AP_SUPPLIERS_INT',
4358: p_vendor_rec.vendor_interface_id,

Line 4397: x_return_status := FND_API.G_RET_STS_ERROR;

4393: p_vendor_rec.federal_reportable_flag,
4394: x_valid
4395: );
4396: IF NOT x_valid THEN
4397: x_return_status := FND_API.G_RET_STS_ERROR;
4398: IF g_source = 'IMPORT' THEN
4399: IF (Insert_Rejections(
4400: 'AP_SUPPLIERS_INT',
4401: p_vendor_rec.vendor_interface_id,

Line 4503: x_return_status := FND_API.G_RET_STS_ERROR;

4499:
4500: IF(is_taxpayer_id_valid(p_vendor_rec.jgzz_fiscal_code,
4501: l_default_country_code) = 'N') THEN
4502:
4503: x_return_status := FND_API.G_RET_STS_ERROR;
4504: IF g_source = 'IMPORT' THEN
4505: IF (Insert_Rejections(
4506: 'AP_SUPPLIERS_INT',
4507: p_vendor_rec.vendor_interface_id,

Line 4544: x_return_status := FND_API.G_RET_STS_ERROR;

4540: --
4541: -- start added by abhsaxen for bug 7147735
4542: IF (p_vendor_rec.employee_id is null AND
4543: UPPER(p_vendor_rec.vendor_type_lookup_code)='EMPLOYEE') THEN
4544: x_return_status := FND_API.G_RET_STS_ERROR;
4545: IF g_source = 'IMPORT' THEN
4546: IF (Insert_Rejections(
4547: 'AP_SUPPLIERS_INT',
4548: p_vendor_rec.vendor_interface_id,

Line 4568: AND p_vendor_rec.employee_id <> fnd_api.g_miss_num THEN

4564: END IF;
4565: END IF;
4566: -- end added by abhsaxen for bug 7147735
4567: IF p_vendor_rec.employee_id is NOT NULL
4568: AND p_vendor_rec.employee_id <> fnd_api.g_miss_num THEN
4569: Check_Valid_Employee (p_vendor_rec.employee_id,
4570: x_valid);
4571: IF NOT x_valid THEN
4572: x_return_status := FND_API.G_RET_STS_ERROR;

Line 4572: x_return_status := FND_API.G_RET_STS_ERROR;

4568: AND p_vendor_rec.employee_id <> fnd_api.g_miss_num THEN
4569: Check_Valid_Employee (p_vendor_rec.employee_id,
4570: x_valid);
4571: IF NOT x_valid THEN
4572: x_return_status := FND_API.G_RET_STS_ERROR;
4573: IF g_source = 'IMPORT' THEN
4574: IF (Insert_Rejections(
4575: 'AP_SUPPLIERS_INT',
4576: p_vendor_rec.vendor_interface_id,

Line 4608: x_return_status := FND_API.G_RET_STS_ERROR;

4604: TRUNC(ppf.effective_start_date) AND
4605: TRUNC(ppf.effective_end_date);
4606: EXCEPTION
4607: WHEN OTHERS THEN
4608: x_return_status := FND_API.G_RET_STS_ERROR;
4609: IF g_source = 'IMPORT' THEN
4610: IF (Insert_Rejections(
4611: 'AP_SUPPLIERS_INT',
4612: p_vendor_rec.vendor_interface_id,

Line 4655: x_return_status := FND_API.G_RET_STS_ERROR;

4651: p_vendor_rec.receipt_required_flag,
4652: x_valid
4653: );
4654: IF NOT x_valid THEN
4655: x_return_status := FND_API.G_RET_STS_ERROR;
4656: IF g_source = 'IMPORT' THEN
4657: IF (Insert_Rejections(
4658: 'AP_SUPPLIERS_INT',
4659: p_vendor_rec.vendor_interface_id,

Line 4697: x_return_status := FND_API.G_RET_STS_ERROR;

4693: AND p_vendor_rec.name_control <> ap_null_char THEN
4694: Check_Valid_name_control(p_vendor_rec.name_control,
4695: x_valid);
4696: IF NOT x_valid THEN
4697: x_return_status := FND_API.G_RET_STS_ERROR;
4698: IF g_source = 'IMPORT' THEN
4699: IF (Insert_Rejections(
4700: 'AP_SUPPLIERS_INT',
4701: p_vendor_rec.vendor_interface_id,

Line 4745: x_return_status := FND_API.G_RET_STS_ERROR;

4741: x_valid
4742: );
4743:
4744: IF NOT x_valid THEN
4745: x_return_status := FND_API.G_RET_STS_ERROR;
4746: IF g_source = 'IMPORT' THEN
4747: IF (Insert_Rejections(
4748: 'AP_SUPPLIERS_INT',
4749: p_vendor_rec.vendor_interface_id,

Line 4789: x_return_status := FND_API.G_RET_STS_ERROR;

4785: Check_Valid_Sob_Id(p_vendor_rec.set_of_books_id,
4786: x_valid);
4787:
4788: IF NOT x_valid THEN
4789: x_return_status := FND_API.G_RET_STS_ERROR;
4790: IF g_source = 'IMPORT' THEN
4791: IF (Insert_Rejections(
4792: 'AP_SUPPLIERS_INT',
4793: p_vendor_rec.vendor_interface_id,

Line 4832: x_return_status := FND_API.G_RET_STS_ERROR;

4828: p_vendor_rec.employee_id,
4829: x_valid);
4830:
4831: IF NOT x_valid THEN
4832: x_return_status := FND_API.G_RET_STS_ERROR;
4833: END IF;
4834: END IF;
4835:
4836: ------------------------------------------------------------------------

Line 4852: x_return_status := FND_API.G_RET_STS_ERROR;

4848: Chk_Dup_segment1_int(p_vendor_rec.segment1,
4849: x_valid);
4850:
4851: IF NOT x_valid THEN
4852: x_return_status := FND_API.G_RET_STS_ERROR;
4853: IF g_source = 'IMPORT' THEN
4854: IF (Insert_Rejections(
4855: 'AP_SUPPLIERS_INT',
4856: p_vendor_rec.vendor_interface_id,

Line 4895: x_return_status := FND_API.G_RET_STS_ERROR;

4891: Chk_Dup_Vendor_Name_new(p_vendor_rec.vendor_name,
4892: x_valid);
4893:
4894: IF NOT x_valid THEN
4895: x_return_status := FND_API.G_RET_STS_ERROR;
4896: END IF;
4897: END IF;
4898: */
4899:

Line 4916: x_return_status := FND_API.G_RET_STS_ERROR;

4912: Chk_Dup_Vendor_Number(p_vendor_id,
4913: p_vendor_rec.segment1,
4914: x_valid);
4915: IF NOT x_valid THEN
4916: x_return_status := FND_API.G_RET_STS_ERROR;
4917: --bug 5606948
4918: IF g_source = 'IMPORT' THEN
4919: IF (Insert_Rejections(
4920: 'AP_SUPPLIERS_INT',

Line 4954: x_return_status := FND_API.G_RET_STS_ERROR;

4950:
4951: Chk_rcv_routing_id(p_vendor_rec.receiving_routing_id ,
4952: x_valid);
4953: IF NOT x_valid THEN
4954: x_return_status := FND_API.G_RET_STS_ERROR;
4955: IF g_source = 'IMPORT' THEN
4956: IF (Insert_Rejections(
4957: 'AP_SUPPLIERS_INT',
4958: p_vendor_rec.vendor_interface_id,

Line 5001: x_return_status := FND_API.G_RET_STS_ERROR;

4997: x_valid
4998: );
4999:
5000: IF NOT x_valid THEN
5001: x_return_status := FND_API.G_RET_STS_ERROR;
5002: IF g_source = 'IMPORT' THEN
5003: IF (Insert_Rejections(
5004: 'AP_SUPPLIERS_INT',
5005: p_vendor_rec.vendor_interface_id,

Line 5043: x_return_status := FND_API.G_RET_STS_ERROR;

5039: and p_vendor_rec.invoice_currency_code <> ap_null_char) THEN
5040: val_currency_code(p_vendor_rec.invoice_currency_code,
5041: x_valid);
5042: IF NOT x_valid THEN
5043: x_return_status := FND_API.G_RET_STS_ERROR;
5044: IF g_source = 'IMPORT' THEN
5045: IF (Insert_Rejections(
5046: 'AP_SUPPLIERS_INT',
5047: p_vendor_rec.vendor_interface_id,

Line 5084: x_return_status := FND_API.G_RET_STS_ERROR;

5080: p_vendor_rec.invoice_currency_code,
5081: x_valid);
5082:
5083: IF NOT x_valid THEN
5084: x_return_status := FND_API.G_RET_STS_ERROR;
5085: IF g_source = 'IMPORT' THEN
5086: IF (Insert_Rejections(
5087: 'AP_SUPPLIERS_INT',
5088: p_vendor_rec.vendor_interface_id,

Line 5128: x_return_status := FND_API.G_RET_STS_ERROR;

5124: p_vendor_rec.type_1099 <> ap_null_char THEN
5125: Val_Income_Tax_Type(p_vendor_rec.type_1099,
5126: x_valid);
5127: IF NOT x_valid THEN
5128: x_return_status := FND_API.G_RET_STS_ERROR;
5129: IF g_source = 'IMPORT' THEN
5130: IF (Insert_Rejections(
5131: 'AP_SUPPLIERS_INT',
5132: p_vendor_rec.vendor_interface_id,

Line 5177: x_return_status := FND_API.G_RET_STS_ERROR;

5173: p_vendor_id,
5174: x_valid);
5175:
5176: IF NOT x_valid THEN
5177: x_return_status := FND_API.G_RET_STS_ERROR;
5178: END IF;
5179: END IF;
5180: */
5181: null;

Line 5200: x_return_status := FND_API.G_RET_STS_ERROR;

5196: p_calling_prog,
5197: x_valid);
5198:
5199: IF NOT x_valid THEN
5200: x_return_status := FND_API.G_RET_STS_ERROR;
5201: IF g_source = 'IMPORT' THEN
5202: IF (Insert_Rejections(
5203: 'AP_SUPPLIERS_INT',
5204: p_vendor_rec.vendor_interface_id,

Line 5251: x_return_status := FND_API.G_RET_STS_ERROR;

5247: p_vendor_rec.employee_id,
5248: x_valid);
5249:
5250: IF NOT x_valid THEN
5251: x_return_status := FND_API.G_RET_STS_ERROR;
5252:
5253:
5254: IF (Insert_Rejections(
5255: 'AP_SUPPLIERS_INT',

Line 5288: p_init_msg_list => FND_API.G_FALSE,

5284: --
5285: IF p_vendor_rec.ext_payee_rec.payer_org_type IS NOT NULL THEN
5286: IBY_DISBURSEMENT_SETUP_PUB.Validate_External_Payee
5287: ( p_api_version => 1.0,
5288: p_init_msg_list => FND_API.G_FALSE,
5289: p_ext_payee_rec => p_vendor_rec.ext_payee_rec,
5290: x_return_status => l_payee_return_status,
5291: x_msg_count => l_payee_msg_count,
5292: x_msg_data => l_payee_msg_data);

Line 5294: IF l_payee_return_status = FND_API.G_RET_STS_SUCCESS THEN

5290: x_return_status => l_payee_return_status,
5291: x_msg_count => l_payee_msg_count,
5292: x_msg_data => l_payee_msg_data);
5293:
5294: IF l_payee_return_status = FND_API.G_RET_STS_SUCCESS THEN
5295: x_payee_valid := 'V';
5296: ELSE
5297: x_payee_valid := 'F';
5298: x_return_status := l_payee_return_status;

Line 5345: x_return_status := FND_API.G_RET_STS_ERROR;

5341: x_valid);
5342:
5343: IF NOT x_valid THEN
5344: x_party_valid := 'F';
5345: x_return_status := FND_API.G_RET_STS_ERROR;
5346: IF g_source = 'IMPORT' THEN
5347: IF (Insert_Rejections(
5348: 'AP_SUPPLIERS_INT',
5349: p_vendor_rec.vendor_interface_id,

Line 5396: x_return_status := FND_API.G_RET_STS_ERROR;

5392: p_vendor_rec.segment1 <> ap_null_char THEN
5393: Chk_Null_Vendor_Number(p_vendor_rec.segment1,
5394: x_valid);
5395: IF NOT x_valid THEN
5396: x_return_status := FND_API.G_RET_STS_ERROR;
5397: IF g_source = 'IMPORT' THEN
5398: IF (Insert_Rejections(
5399: 'AP_SUPPLIERS_INT',
5400: p_vendor_rec.vendor_interface_id,

Line 5445: x_return_status := FND_API.G_RET_STS_ERROR;

5441: Validate_Lookups(
5442: 'ONE_TIME_FLAG',p_vendor_rec.one_time_flag,'YES/NO',
5443: 'PO_LOOKUP_CODES',x_valid);
5444: IF NOT x_valid THEN
5445: x_return_status := FND_API.G_RET_STS_ERROR;
5446: IF g_source = 'IMPORT' THEN
5447: IF (Insert_Rejections(
5448: 'AP_SUPPLIERS_INT',
5449: p_vendor_rec.vendor_interface_id,

Line 5491: x_return_status := FND_API.G_RET_STS_ERROR;

5487: Validate_Lookups(
5488: 'SUMMARY_FLAG',p_vendor_rec.summary_flag,'YES/NO',
5489: 'PO_LOOKUP_CODES',x_valid);
5490: IF NOT x_valid THEN
5491: x_return_status := FND_API.G_RET_STS_ERROR;
5492: IF g_source = 'IMPORT' THEN
5493: IF (Insert_Rejections(
5494: 'AP_SUPPLIERS_INT',
5495: p_vendor_rec.vendor_interface_id,

Line 5535: x_return_status := FND_API.G_RET_STS_ERROR;

5531: Validate_Lookups(
5532: 'ENABLED_FLAG',p_vendor_rec.enabled_flag,'YES/NO',
5533: 'PO_LOOKUP_CODES',x_valid);
5534: IF NOT x_valid THEN
5535: x_return_status := FND_API.G_RET_STS_ERROR;
5536: IF g_source = 'IMPORT' THEN
5537: IF (Insert_Rejections(
5538: 'AP_SUPPLIERS_INT',
5539: p_vendor_rec.vendor_interface_id,

Line 5579: x_return_status := FND_API.G_RET_STS_ERROR;

5575: Validate_Lookups( 'VENDOR_TYPE_LOOKUP_CODE',
5576: p_vendor_rec.vendor_type_lookup_code,'VENDOR TYPE',
5577: 'PO_LOOKUP_CODES',x_valid);
5578: IF NOT x_valid THEN
5579: x_return_status := FND_API.G_RET_STS_ERROR;
5580: IF g_source = 'IMPORT' THEN
5581: IF (Insert_Rejections(
5582: 'AP_SUPPLIERS_INT',
5583: p_vendor_rec.vendor_interface_id,

Line 5624: x_return_status := FND_API.G_RET_STS_ERROR;

5620: p_vendor_rec.pay_date_basis_lookup_code,
5621: 'PAY DATE BASIS',
5622: 'PO_LOOKUP_CODES',x_valid);
5623: IF NOT x_valid THEN
5624: x_return_status := FND_API.G_RET_STS_ERROR;
5625: IF g_source = 'IMPORT' THEN
5626: IF (Insert_Rejections(
5627: 'AP_SUPPLIERS_INT',
5628: p_vendor_rec.vendor_interface_id,

Line 5668: x_return_status := FND_API.G_RET_STS_ERROR;

5664: Validate_Lookups( 'PAY_GROUP_LOOKUP_CODE',
5665: p_vendor_rec.pay_group_lookup_code,'PAY GROUP',
5666: 'PO_LOOKUP_CODES',x_valid);
5667: IF NOT x_valid THEN
5668: x_return_status := FND_API.G_RET_STS_ERROR;
5669: IF g_source = 'IMPORT' THEN
5670: IF (Insert_Rejections(
5671: 'AP_SUPPLIERS_INT',
5672: p_vendor_rec.vendor_interface_id,

Line 5715: x_return_status := FND_API.G_RET_STS_ERROR;

5711: p_vendor_rec.organization_type_lookup_code,
5712: 'ORGANIZATION TYPE',
5713: 'PO_LOOKUP_CODES',x_valid);
5714: IF NOT x_valid THEN
5715: x_return_status := FND_API.G_RET_STS_ERROR;
5716: IF g_source = 'IMPORT' THEN
5717: IF (Insert_Rejections(
5718: 'AP_SUPPLIERS_INT',
5719: p_vendor_rec.vendor_interface_id,

Line 5760: x_return_status := FND_API.G_RET_STS_ERROR;

5756: Validate_Lookups( 'MINORITY_GROUP_LOOKUP_CODE',
5757: p_vendor_rec.minority_group_lookup_code,'MINORITY GROUP',
5758: 'PO_LOOKUP_CODES',x_valid);
5759: IF NOT x_valid THEN
5760: x_return_status := FND_API.G_RET_STS_ERROR;
5761: IF g_source = 'IMPORT' THEN
5762: IF (Insert_Rejections(
5763: 'AP_SUPPLIERS_INT',
5764: p_vendor_rec.vendor_interface_id,

Line 5805: x_return_status := FND_API.G_RET_STS_ERROR;

5801: Validate_Lookups( 'TERMS_DATE_BASIS',
5802: p_vendor_rec.terms_date_basis,'TERMS DATE BASIS',
5803: 'AP_LOOKUP_CODES',x_valid);
5804: IF NOT x_valid THEN
5805: x_return_status := FND_API.G_RET_STS_ERROR;
5806: IF g_source = 'IMPORT' THEN
5807: IF (Insert_Rejections(
5808: 'AP_SUPPLIERS_INT',
5809: p_vendor_rec.vendor_interface_id,

Line 5850: x_return_status := FND_API.G_RET_STS_ERROR;

5846: Validate_Lookups( 'QTY_RCV_EXCEPTION_CODE',
5847: p_vendor_rec.qty_rcv_exception_code,'RCV OPTION',
5848: 'PO_LOOKUP_CODES',x_valid);
5849: IF NOT x_valid THEN
5850: x_return_status := FND_API.G_RET_STS_ERROR;
5851: IF g_source = 'IMPORT' THEN
5852: IF (Insert_Rejections(
5853: 'AP_SUPPLIERS_INT',
5854: p_vendor_rec.vendor_interface_id,

Line 5895: x_return_status := FND_API.G_RET_STS_ERROR;

5891: Validate_Lookups( 'ENFORCE_SHIP_TO_LOCATION_CODE',
5892: p_vendor_rec.enforce_ship_to_location_code,'RCV OPTION',
5893: 'PO_LOOKUP_CODES',x_valid);
5894: IF NOT x_valid THEN
5895: x_return_status := FND_API.G_RET_STS_ERROR;
5896: IF g_source = 'IMPORT' THEN
5897: IF (Insert_Rejections(
5898: 'AP_SUPPLIERS_INT',
5899: p_vendor_rec.vendor_interface_id,

Line 5940: x_return_status := FND_API.G_RET_STS_ERROR;

5936: Validate_Lookups( 'RECEIPT_DAYS_EXCEPTION_CODE',
5937: p_vendor_rec.receipt_days_exception_code,'RCV OPTION',
5938: 'PO_LOOKUP_CODES',x_valid);
5939: IF NOT x_valid THEN
5940: x_return_status := FND_API.G_RET_STS_ERROR;
5941: IF g_source = 'IMPORT' THEN
5942: IF (Insert_Rejections(
5943: 'AP_SUPPLIERS_INT',
5944: p_vendor_rec.vendor_interface_id,

Line 5985: x_return_status := FND_API.G_RET_STS_ERROR;

5981: Validate_Lookups( 'CREATE_DEBIT_MEMO_FLAG',
5982: p_vendor_rec.create_debit_memo_flag ,'YES/NO',
5983: 'PO_LOOKUP_CODES',x_valid);
5984: IF NOT x_valid THEN
5985: x_return_status := FND_API.G_RET_STS_ERROR;
5986: IF g_source = 'IMPORT' THEN
5987: IF (Insert_Rejections(
5988: 'AP_SUPPLIERS_INT',
5989: p_vendor_rec.vendor_interface_id,

Line 6030: x_return_status := FND_API.G_RET_STS_ERROR;

6026: Validate_Lookups( 'FEDERAL_REPORTABLE_FLAG',
6027: p_vendor_rec.federal_reportable_flag ,'YES/NO',
6028: 'PO_LOOKUP_CODES',x_valid);
6029: IF NOT x_valid THEN
6030: x_return_status := FND_API.G_RET_STS_ERROR;
6031: IF g_source = 'IMPORT' THEN
6032: IF (Insert_Rejections(
6033: 'AP_SUPPLIERS_INT',
6034: p_vendor_rec.vendor_interface_id,

Line 6075: x_return_status := FND_API.G_RET_STS_ERROR;

6071: Validate_Lookups('STATE_REPORTABLE_FLAG',
6072: p_vendor_rec.state_reportable_flag ,'YES/NO',
6073: 'PO_LOOKUP_CODES', x_valid);
6074: IF NOT x_valid THEN
6075: x_return_status := FND_API.G_RET_STS_ERROR;
6076: IF g_source = 'IMPORT' THEN
6077: IF (Insert_Rejections(
6078: 'AP_SUPPLIERS_INT',
6079: p_vendor_rec.vendor_interface_id,

Line 6120: x_return_status := FND_API.G_RET_STS_ERROR;

6116: Validate_Lookups('AUTO_CALCULATE_INTEREST_FLAG',
6117: p_vendor_rec.auto_calculate_interest_flag,'YES/NO',
6118: 'PO_LOOKUP_CODES', x_valid);
6119: IF NOT x_valid THEN
6120: x_return_status := FND_API.G_RET_STS_ERROR;
6121: IF g_source = 'IMPORT' THEN
6122: IF (Insert_Rejections(
6123: 'AP_SUPPLIERS_INT',
6124: p_vendor_rec.vendor_interface_id,

Line 6165: x_return_status := FND_API.G_RET_STS_ERROR;

6161: Validate_Lookups( 'EXCLUDE_FREIGHT_FROM_DISCOUNT',
6162: p_vendor_rec.exclude_freight_from_discount ,'YES/NO',
6163: 'PO_LOOKUP_CODES',x_valid);
6164: IF NOT x_valid THEN
6165: x_return_status := FND_API.G_RET_STS_ERROR;
6166: IF g_source = 'IMPORT' THEN
6167: IF (Insert_Rejections(
6168: 'AP_SUPPLIERS_INT',
6169: p_vendor_rec.vendor_interface_id,

Line 6210: x_return_status := FND_API.G_RET_STS_ERROR;

6206: Validate_Lookups('HOLD_UNMATCHED_INVOICES_FLAG',
6207: p_vendor_rec.hold_unmatched_invoices_flag ,'YES/NO',
6208: 'PO_LOOKUP_CODES',x_valid);
6209: IF NOT x_valid THEN
6210: x_return_status := FND_API.G_RET_STS_ERROR;
6211: IF g_source = 'IMPORT' THEN
6212: IF (Insert_Rejections(
6213: 'AP_SUPPLIERS_INT',
6214: p_vendor_rec.vendor_interface_id,

Line 6255: x_return_status := FND_API.G_RET_STS_ERROR;

6251: Validate_Lookups('ALLOW_UNORDERED_RECEIPTS_FLAG',
6252: p_vendor_rec.allow_unordered_receipts_flag,'YES/NO',
6253: 'PO_LOOKUP_CODES', x_valid);
6254: IF NOT x_valid THEN
6255: x_return_status := FND_API.G_RET_STS_ERROR;
6256: IF g_source = 'IMPORT' THEN
6257: IF (Insert_Rejections(
6258: 'AP_SUPPLIERS_INT',
6259: p_vendor_rec.vendor_interface_id,

Line 6301: x_return_status := FND_API.G_RET_STS_ERROR;

6297: Validate_Lookups('ALLOW_SUBSTITUTE_RECEIPTS_FLAG',
6298: p_vendor_rec.allow_substitute_receipts_flag,'YES/NO',
6299: 'PO_LOOKUP_CODES', x_valid);
6300: IF NOT x_valid THEN
6301: x_return_status := FND_API.G_RET_STS_ERROR;
6302: IF g_source = 'IMPORT' THEN
6303: IF (Insert_Rejections(
6304: 'AP_SUPPLIERS_INT',
6305: p_vendor_rec.vendor_interface_id,

Line 6346: x_return_status := FND_API.G_RET_STS_ERROR;

6342: Validate_Lookups('HOLD_FLAG', p_vendor_rec.hold_flag,
6343: 'YES/NO',
6344: 'PO_LOOKUP_CODES', x_valid);
6345: IF NOT x_valid THEN
6346: x_return_status := FND_API.G_RET_STS_ERROR;
6347: IF g_source = 'IMPORT' THEN
6348: IF (Insert_Rejections(
6349: 'AP_SUPPLIERS_INT',
6350: p_vendor_rec.vendor_interface_id,

Line 6391: x_return_status := FND_API.G_RET_STS_ERROR;

6387: Validate_Lookups('SMALL_BUSINESS_FLAG',
6388: p_vendor_rec.small_business_flag,'YES/NO',
6389: 'PO_LOOKUP_CODES',x_valid);
6390: IF NOT x_valid THEN
6391: x_return_status := FND_API.G_RET_STS_ERROR;
6392: IF g_source = 'IMPORT' THEN
6393: IF (Insert_Rejections(
6394: 'AP_SUPPLIERS_INT',
6395: p_vendor_rec.vendor_interface_id,

Line 6436: x_return_status := FND_API.G_RET_STS_ERROR;

6432: Validate_Lookups('WOMEN_OWNED_FLAG',
6433: p_vendor_rec.women_owned_flag,'YES/NO',
6434: 'PO_LOOKUP_CODES', x_valid);
6435: IF NOT x_valid THEN
6436: x_return_status := FND_API.G_RET_STS_ERROR;
6437: IF g_source = 'IMPORT' THEN
6438: IF (Insert_Rejections(
6439: 'AP_SUPPLIERS_INT',
6440: p_vendor_rec.vendor_interface_id,

Line 6481: x_return_status := FND_API.G_RET_STS_ERROR;

6477: Validate_Lookups('HOLD_FUTURE_PAYMENTS_FLAG',
6478: p_vendor_rec.hold_future_payments_flag,'YES/NO',
6479: 'PO_LOOKUP_CODES', x_valid);
6480: IF NOT x_valid THEN
6481: x_return_status := FND_API.G_RET_STS_ERROR;
6482: IF g_source = 'IMPORT' THEN
6483: IF (Insert_Rejections(
6484: 'AP_SUPPLIERS_INT',
6485: p_vendor_rec.vendor_interface_id,

Line 6526: x_return_status := FND_API.G_RET_STS_ERROR;

6522: Validate_Lookups('HOLD_ALL_PAYMENTS_FLAG',
6523: p_vendor_rec.hold_all_payments_flag,'YES/NO',
6524: 'PO_LOOKUP_CODES', x_valid);
6525: IF NOT x_valid THEN
6526: x_return_status := FND_API.G_RET_STS_ERROR;
6527: IF g_source = 'IMPORT' THEN
6528: IF (Insert_Rejections(
6529: 'AP_SUPPLIERS_INT',
6530: p_vendor_rec.vendor_interface_id,

Line 6571: x_return_status := FND_API.G_RET_STS_ERROR;

6567: Validate_Lookups( 'ALWAYS_TAKE_DISC_FLAG',
6568: p_vendor_rec.always_take_disc_flag,'YES/NO',
6569: 'PO_LOOKUP_CODES', x_valid);
6570: IF NOT x_valid THEN
6571: x_return_status := FND_API.G_RET_STS_ERROR;
6572: IF g_source = 'IMPORT' THEN
6573: IF (Insert_Rejections(
6574: 'AP_SUPPLIERS_INT',
6575: p_vendor_rec.vendor_interface_id,

Line 6615: x_return_status := FND_API.G_RET_STS_ERROR;

6611: Check_valid_vendor_num(l_segment1,
6612: x_valid);
6613:
6614: IF NOT x_valid THEN
6615: x_return_status := FND_API.G_RET_STS_ERROR;
6616: IF g_source = 'IMPORT' THEN
6617: IF (Insert_Rejections(
6618: 'AP_SUPPLIERS_INT',
6619: p_vendor_rec.vendor_interface_id,

Line 6657: x_return_status := FND_API.G_RET_STS_ERROR;

6653: Check_Valid_Match_Option(p_vendor_rec.match_option,
6654: x_valid
6655: );
6656: IF NOT x_valid THEN
6657: x_return_status := FND_API.G_RET_STS_ERROR;
6658: IF g_source = 'IMPORT' THEN
6659: IF (Insert_Rejections(
6660: 'AP_SUPPLIERS_INT',
6661: p_vendor_rec.vendor_interface_id,

Line 6709: x_return_status := FND_API.G_RET_STS_ERROR;

6705: x_valid
6706: );
6707:
6708: IF NOT x_valid THEN
6709: x_return_status := FND_API.G_RET_STS_ERROR;
6710: IF g_source = 'IMPORT' THEN
6711: IF (Insert_Rejections(
6712: 'AP_SUPPLIERS_INT',
6713: p_vendor_rec.vendor_interface_id,

Line 6755: x_return_status := FND_API.G_RET_STS_ERROR;

6751: Check_Valid_Hold_by (p_vendor_rec.hold_by,
6752: x_valid);
6753:
6754: IF NOT x_valid THEN
6755: x_return_status := FND_API.G_RET_STS_ERROR;
6756: END IF;
6757: END IF;
6758:
6759: ------------------------------------------------------------------------

Line 6783: x_return_status := FND_API.G_RET_STS_ERROR;

6779: p_vendor_rec.default_terms_id,
6780: x_valid);
6781:
6782: IF NOT x_valid THEN
6783: x_return_status := FND_API.G_RET_STS_ERROR;
6784: IF g_source = 'IMPORT' THEN
6785: IF (Insert_Rejections(
6786: 'AP_SUPPLIERS_INT',
6787: p_vendor_rec.vendor_interface_id,

Line 6818: IF FND_API.To_Boolean( p_commit ) THEN

6814:
6815: -- End of API body
6816:
6817: -- Standard check of p_commit.
6818: IF FND_API.To_Boolean( p_commit ) THEN
6819: COMMIT WORK;
6820: END IF;
6821:
6822: -- Standard call to get message count and if count is 1,

Line 6831: WHEN FND_API.G_EXC_ERROR THEN

6827: );
6828:
6829:
6830: EXCEPTION
6831: WHEN FND_API.G_EXC_ERROR THEN
6832: ROLLBACK TO Validate_Vendor_PUB;
6833: x_return_status := FND_API.G_RET_STS_ERROR ;
6834: FND_MSG_PUB.Count_And_Get
6835: ( p_count => x_msg_count,

Line 6833: x_return_status := FND_API.G_RET_STS_ERROR ;

6829:
6830: EXCEPTION
6831: WHEN FND_API.G_EXC_ERROR THEN
6832: ROLLBACK TO Validate_Vendor_PUB;
6833: x_return_status := FND_API.G_RET_STS_ERROR ;
6834: FND_MSG_PUB.Count_And_Get
6835: ( p_count => x_msg_count,
6836: p_data => x_msg_data
6837: );

Line 6838: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

6834: FND_MSG_PUB.Count_And_Get
6835: ( p_count => x_msg_count,
6836: p_data => x_msg_data
6837: );
6838: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6839: ROLLBACK TO Validate_Vendor_PUB;
6840: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6841: FND_MSG_PUB.Count_And_Get
6842: ( p_count => x_msg_count,

Line 6840: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

6836: p_data => x_msg_data
6837: );
6838: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6839: ROLLBACK TO Validate_Vendor_PUB;
6840: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6841: FND_MSG_PUB.Count_And_Get
6842: ( p_count => x_msg_count,
6843: p_data => x_msg_data
6844: );

Line 6847: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

6843: p_data => x_msg_data
6844: );
6845: WHEN OTHERS THEN
6846: ROLLBACK TO Validate_Vendor_PUB;
6847: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6848: IF FND_MSG_PUB.Check_Msg_Level
6849: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
6850: FND_MSG_PUB.Add_Exc_Msg
6851: ( G_PKG_NAME ,

Line 6863: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,

6859: END Validate_Vendor;
6860:
6861: PROCEDURE Create_Vendor_Site
6862: ( p_api_version IN NUMBER,
6863: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
6864: p_commit IN VARCHAR2 := FND_API.G_FALSE,
6865: p_validation_level IN NUMBER :=
6866: FND_API.G_VALID_LEVEL_FULL,
6867: x_return_status OUT NOCOPY VARCHAR2 ,

Line 6864: p_commit IN VARCHAR2 := FND_API.G_FALSE,

6860:
6861: PROCEDURE Create_Vendor_Site
6862: ( p_api_version IN NUMBER,
6863: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
6864: p_commit IN VARCHAR2 := FND_API.G_FALSE,
6865: p_validation_level IN NUMBER :=
6866: FND_API.G_VALID_LEVEL_FULL,
6867: x_return_status OUT NOCOPY VARCHAR2 ,
6868: x_msg_count OUT NOCOPY NUMBER,

Line 6866: FND_API.G_VALID_LEVEL_FULL,

6862: ( p_api_version IN NUMBER,
6863: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
6864: p_commit IN VARCHAR2 := FND_API.G_FALSE,
6865: p_validation_level IN NUMBER :=
6866: FND_API.G_VALID_LEVEL_FULL,
6867: x_return_status OUT NOCOPY VARCHAR2 ,
6868: x_msg_count OUT NOCOPY NUMBER,
6869: x_msg_data OUT NOCOPY VARCHAR2,
6870: p_vendor_site_rec IN r_vendor_site_rec_type,

Line 7072: IF NOT FND_API.Compatible_API_Call ( l_api_version ,

7068: BEGIN
7069: -- Standard Start of API savepoint
7070: SAVEPOINT Create_Vendor_Site_PUB;
7071:
7072: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
7073: p_api_version ,
7074: l_api_name ,
7075: G_PKG_NAME )
7076: THEN

Line 7077: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

7073: p_api_version ,
7074: l_api_name ,
7075: G_PKG_NAME )
7076: THEN
7077: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7078: END IF;
7079:
7080: -- Initialize message list if p_init_msg_list is set to TRUE.
7081: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 7081: IF FND_API.to_Boolean( p_init_msg_list ) THEN

7077: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7078: END IF;
7079:
7080: -- Initialize message list if p_init_msg_list is set to TRUE.
7081: IF FND_API.to_Boolean( p_init_msg_list ) THEN
7082: FND_MSG_PUB.initialize;
7083: END IF;
7084: -- Bug 5055120
7085: -- This call is incorrect. The correct call is to have the calling

Line 7098: x_return_status := FND_API.G_RET_STS_SUCCESS;

7094: MO_GLOBAL.INIT ('SQLAP');
7095: end if;
7096:
7097: -- Initialize API return status to success
7098: x_return_status := FND_API.G_RET_STS_SUCCESS;
7099: l_val_return_status := FND_API.G_RET_STS_SUCCESS;
7100: l_loc_return_status := FND_API.G_RET_STS_SUCCESS;
7101: l_site_return_status := FND_API.G_RET_STS_SUCCESS;
7102: l_pay_return_status := FND_API.G_RET_STS_SUCCESS;

Line 7099: l_val_return_status := FND_API.G_RET_STS_SUCCESS;

7095: end if;
7096:
7097: -- Initialize API return status to success
7098: x_return_status := FND_API.G_RET_STS_SUCCESS;
7099: l_val_return_status := FND_API.G_RET_STS_SUCCESS;
7100: l_loc_return_status := FND_API.G_RET_STS_SUCCESS;
7101: l_site_return_status := FND_API.G_RET_STS_SUCCESS;
7102: l_pay_return_status := FND_API.G_RET_STS_SUCCESS;
7103: l_sync_return_status := FND_API.G_RET_STS_SUCCESS;

Line 7100: l_loc_return_status := FND_API.G_RET_STS_SUCCESS;

7096:
7097: -- Initialize API return status to success
7098: x_return_status := FND_API.G_RET_STS_SUCCESS;
7099: l_val_return_status := FND_API.G_RET_STS_SUCCESS;
7100: l_loc_return_status := FND_API.G_RET_STS_SUCCESS;
7101: l_site_return_status := FND_API.G_RET_STS_SUCCESS;
7102: l_pay_return_status := FND_API.G_RET_STS_SUCCESS;
7103: l_sync_return_status := FND_API.G_RET_STS_SUCCESS;
7104:

Line 7101: l_site_return_status := FND_API.G_RET_STS_SUCCESS;

7097: -- Initialize API return status to success
7098: x_return_status := FND_API.G_RET_STS_SUCCESS;
7099: l_val_return_status := FND_API.G_RET_STS_SUCCESS;
7100: l_loc_return_status := FND_API.G_RET_STS_SUCCESS;
7101: l_site_return_status := FND_API.G_RET_STS_SUCCESS;
7102: l_pay_return_status := FND_API.G_RET_STS_SUCCESS;
7103: l_sync_return_status := FND_API.G_RET_STS_SUCCESS;
7104:
7105: -- API body

Line 7102: l_pay_return_status := FND_API.G_RET_STS_SUCCESS;

7098: x_return_status := FND_API.G_RET_STS_SUCCESS;
7099: l_val_return_status := FND_API.G_RET_STS_SUCCESS;
7100: l_loc_return_status := FND_API.G_RET_STS_SUCCESS;
7101: l_site_return_status := FND_API.G_RET_STS_SUCCESS;
7102: l_pay_return_status := FND_API.G_RET_STS_SUCCESS;
7103: l_sync_return_status := FND_API.G_RET_STS_SUCCESS;
7104:
7105: -- API body
7106: ------------------------------------------------------------------------

Line 7103: l_sync_return_status := FND_API.G_RET_STS_SUCCESS;

7099: l_val_return_status := FND_API.G_RET_STS_SUCCESS;
7100: l_loc_return_status := FND_API.G_RET_STS_SUCCESS;
7101: l_site_return_status := FND_API.G_RET_STS_SUCCESS;
7102: l_pay_return_status := FND_API.G_RET_STS_SUCCESS;
7103: l_sync_return_status := FND_API.G_RET_STS_SUCCESS;
7104:
7105: -- API body
7106: ------------------------------------------------------------------------
7107: l_debug_info := 'Call Org_Id and Operating_unit_name validation for Import';

Line 7128: x_return_status := FND_API.G_RET_STS_ERROR;

7124: p_vendor_site_rec.vendor_site_interface_id,
7125: x_valid);
7126:
7127: IF NOT x_valid THEN
7128: x_return_status := FND_API.G_RET_STS_ERROR;
7129: END IF;
7130:
7131: END IF;
7132:

Line 7140: x_return_status := FND_API.G_RET_STS_ERROR;

7136: l_def_org_id := p_vendor_site_rec.org_id;
7137: END IF;
7138:
7139: IF l_def_org_id IS NULL THEN
7140: x_return_status := FND_API.G_RET_STS_ERROR;
7141: IF g_source = 'IMPORT' THEN
7142: IF (Insert_Rejections(
7143: 'AP_SUPPLIER_SITES_INT',
7144: p_vendor_site_rec.vendor_site_interface_id,

Line 7163: -- RAISE FND_API.G_EXC_ERROR; BUG 6739544

7159: FND_MESSAGE.SET_NAME('SQLAP','AP_ORG_INFO_NULL');
7160: FND_MSG_PUB.ADD;
7161: -- Bug 5491139 hkaniven end --
7162: END IF;
7163: -- RAISE FND_API.G_EXC_ERROR; BUG 6739544
7164: RAISE ORG_ID_EXCEPTION; -- BUG 6739544
7165: END IF;
7166: -- Bug 5055120
7167: -- Added validation of org_id

Line 7198: -- RAISE FND_API.G_EXC_ERROR;

7194: FND_MESSAGE.SET_NAME('SQLAP','AP_ORG_INFO_NULL');
7195: FND_MSG_PUB.ADD;
7196: -- Bug 5491139 hkaniven end --
7197: END IF;
7198: -- RAISE FND_API.G_EXC_ERROR;
7199: RAISE ORG_ID_EXCEPTION; -- BUG 6739544
7200: END;
7201:
7202:

Line 7470: p_init_msg_list => FND_API.G_FALSE,

7466: l_vendor_site_rec.duns_number
7467: := nvl(l_vendor_site_rec.duns_number, l_duns_number);
7468:
7469: validate_vendor_site(p_api_version => 1.0,
7470: p_init_msg_list => FND_API.G_FALSE,
7471: p_commit => FND_API.G_FALSE,
7472: x_return_status => l_val_return_status,
7473: x_msg_count => l_val_msg_count,
7474: x_msg_data => l_val_msg_data,

Line 7471: p_commit => FND_API.G_FALSE,

7467: := nvl(l_vendor_site_rec.duns_number, l_duns_number);
7468:
7469: validate_vendor_site(p_api_version => 1.0,
7470: p_init_msg_list => FND_API.G_FALSE,
7471: p_commit => FND_API.G_FALSE,
7472: x_return_status => l_val_return_status,
7473: x_msg_count => l_val_msg_count,
7474: x_msg_data => l_val_msg_data,
7475: p_vendor_site_rec => l_vendor_site_rec,

Line 7485: IF l_location_valid = 'N' AND nvl(l_val_return_status,FND_API.G_RET_STS_SUCCESS) =

7481: p_vendor_site_id => x_vendor_site_id);
7482:
7483: -- Bug 7429668 Adding condition of l_val_return_status to ensure that
7484: -- locations are created only if the validation passes successfully.
7485: IF l_location_valid = 'N' AND nvl(l_val_return_status,FND_API.G_RET_STS_SUCCESS) =
7486: FND_API.G_RET_STS_SUCCESS THEN -- location_id was null
7487:
7488: l_location_rec.created_by_module := 'AP_SUPPLIERS_API';
7489: l_location_rec.application_id := 200;

Line 7486: FND_API.G_RET_STS_SUCCESS THEN -- location_id was null

7482:
7483: -- Bug 7429668 Adding condition of l_val_return_status to ensure that
7484: -- locations are created only if the validation passes successfully.
7485: IF l_location_valid = 'N' AND nvl(l_val_return_status,FND_API.G_RET_STS_SUCCESS) =
7486: FND_API.G_RET_STS_SUCCESS THEN -- location_id was null
7487:
7488: l_location_rec.created_by_module := 'AP_SUPPLIERS_API';
7489: l_location_rec.application_id := 200;
7490: l_location_rec.address_style := l_vendor_site_rec.address_style;

Line 7525: p_init_msg_list => FND_API.G_FALSE,

7521: --Bug6648405
7522: --Bug 6753822 - Added NVL on vendor_type_lookup_code
7523: IF (NVL(l_vendor_type_lookup_code,'DUMMY') <> 'EMPLOYEE') then
7524: hz_location_v2pub.create_location(
7525: p_init_msg_list => FND_API.G_FALSE,
7526: p_location_rec => l_location_rec,
7527: -- p_commit => FND_API.G_FALSE,
7528: x_return_status => l_loc_return_status,
7529: x_msg_count => l_loc_msg_count,

Line 7527: -- p_commit => FND_API.G_FALSE,

7523: IF (NVL(l_vendor_type_lookup_code,'DUMMY') <> 'EMPLOYEE') then
7524: hz_location_v2pub.create_location(
7525: p_init_msg_list => FND_API.G_FALSE,
7526: p_location_rec => l_location_rec,
7527: -- p_commit => FND_API.G_FALSE,
7528: x_return_status => l_loc_return_status,
7529: x_msg_count => l_loc_msg_count,
7530: x_msg_data => l_loc_msg_data,
7531: x_location_id => l_loc_id);

Line 7532: IF l_loc_return_status <> FND_API.G_RET_STS_SUCCESS THEN

7528: x_return_status => l_loc_return_status,
7529: x_msg_count => l_loc_msg_count,
7530: x_msg_data => l_loc_msg_data,
7531: x_location_id => l_loc_id);
7532: IF l_loc_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7533: ------------------------------------------------------------------------
7534: l_debug_info := 'After call to hz_location_v2pub.create_location';
7535: l_debug_info := l_debug_info||' Return status : '||l_loc_return_status||' Error : '||l_loc_msg_data;
7536: ------------------------------------------------------------------------

Line 7548: nvl(l_loc_return_status,FND_API.G_RET_STS_SUCCESS) =

7544: END IF; --location_id was null
7545:
7546: IF l_party_site_valid = 'N' and
7547: l_location_valid <> 'F' and
7548: nvl(l_loc_return_status,FND_API.G_RET_STS_SUCCESS) =
7549: FND_API.G_RET_STS_SUCCESS AND
7550: -- Bug 7429668
7551: nvl(l_val_return_status,FND_API.G_RET_STS_SUCCESS) =
7552: FND_API.G_RET_STS_SUCCESS THEN

Line 7549: FND_API.G_RET_STS_SUCCESS AND

7545:
7546: IF l_party_site_valid = 'N' and
7547: l_location_valid <> 'F' and
7548: nvl(l_loc_return_status,FND_API.G_RET_STS_SUCCESS) =
7549: FND_API.G_RET_STS_SUCCESS AND
7550: -- Bug 7429668
7551: nvl(l_val_return_status,FND_API.G_RET_STS_SUCCESS) =
7552: FND_API.G_RET_STS_SUCCESS THEN
7553:

Line 7551: nvl(l_val_return_status,FND_API.G_RET_STS_SUCCESS) =

7547: l_location_valid <> 'F' and
7548: nvl(l_loc_return_status,FND_API.G_RET_STS_SUCCESS) =
7549: FND_API.G_RET_STS_SUCCESS AND
7550: -- Bug 7429668
7551: nvl(l_val_return_status,FND_API.G_RET_STS_SUCCESS) =
7552: FND_API.G_RET_STS_SUCCESS THEN
7553:
7554: --populate party site record
7555: l_party_site_rec.location_id := l_vendor_site_rec.location_id;

Line 7552: FND_API.G_RET_STS_SUCCESS THEN

7548: nvl(l_loc_return_status,FND_API.G_RET_STS_SUCCESS) =
7549: FND_API.G_RET_STS_SUCCESS AND
7550: -- Bug 7429668
7551: nvl(l_val_return_status,FND_API.G_RET_STS_SUCCESS) =
7552: FND_API.G_RET_STS_SUCCESS THEN
7553:
7554: --populate party site record
7555: l_party_site_rec.location_id := l_vendor_site_rec.location_id;
7556: l_party_site_rec.created_by_module := 'AP_SUPPLIERS_API';

Line 7587: p_init_msg_list => FND_API.G_FALSE,

7583: FROM DUAL;
7584: END IF;
7585: -- udhenuko Bug 6823885 End
7586: hz_party_site_v2pub.create_party_site(
7587: p_init_msg_list => FND_API.G_FALSE,
7588: p_party_site_rec => l_party_site_rec,
7589: --p_commit => FND_API.G_FALSE,
7590: x_return_status => l_site_return_status,
7591: x_msg_count => l_site_msg_count,

Line 7589: --p_commit => FND_API.G_FALSE,

7585: -- udhenuko Bug 6823885 End
7586: hz_party_site_v2pub.create_party_site(
7587: p_init_msg_list => FND_API.G_FALSE,
7588: p_party_site_rec => l_party_site_rec,
7589: --p_commit => FND_API.G_FALSE,
7590: x_return_status => l_site_return_status,
7591: x_msg_count => l_site_msg_count,
7592: x_msg_data => l_site_msg_data,
7593: x_party_site_id => l_party_site_id,

Line 7595: IF l_site_return_status <> FND_API.G_RET_STS_SUCCESS THEN

7591: x_msg_count => l_site_msg_count,
7592: x_msg_data => l_site_msg_data,
7593: x_party_site_id => l_party_site_id,
7594: x_party_site_number => l_party_site_number);
7595: IF l_site_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7596: ------------------------------------------------------------------------
7597: l_debug_info := 'After call to hz_party_site_v2pub.create_party_site';
7598: l_debug_info := l_debug_info||' Return status : '||l_site_return_status||' Error : '||l_site_msg_data;
7599: ------------------------------------------------------------------------

Line 7654: IF ( (l_location_valid = 'V' OR (l_location_valid = 'N' and l_loc_return_status = FND_API.G_RET_STS_SUCCESS))

7650: IF (l_vendor_site_rec.vat_registration_num is not null
7651: or l_auto_tax_calc_flag is not null or l_offset_tax_flag is not null -- Bug#7371143 zrehman
7652: or l_tax_classification_code is not null) then -- Bug#7642742
7653:
7654: IF ( (l_location_valid = 'V' OR (l_location_valid = 'N' and l_loc_return_status = FND_API.G_RET_STS_SUCCESS))
7655: AND (l_party_site_valid = 'V' OR (l_party_site_valid = 'N' and l_site_return_status =
7656: FND_API.G_RET_STS_SUCCESS)) ) THEN
7657:
7658: BEGIN

Line 7656: FND_API.G_RET_STS_SUCCESS)) ) THEN

7652: or l_tax_classification_code is not null) then -- Bug#7642742
7653:
7654: IF ( (l_location_valid = 'V' OR (l_location_valid = 'N' and l_loc_return_status = FND_API.G_RET_STS_SUCCESS))
7655: AND (l_party_site_valid = 'V' OR (l_party_site_valid = 'N' and l_site_return_status =
7656: FND_API.G_RET_STS_SUCCESS)) ) THEN
7657:
7658: BEGIN
7659: SELECT PARTY_TAX_PROFILE_ID INTO L_PARTY_TAX_PROFILE_ID
7660: FROM ZX_PARTY_TAX_PROFILE

Line 7719: IF l_return_status <> fnd_api.g_ret_sts_success THEN

7715: X_RETURN_STATUS => l_return_status,
7716: P_REGISTRATION_TYPE_CODE => null,
7717: P_COUNTRY_CODE => null
7718: );
7719: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7720: l_debug_info := 'ZX_PARTY_TAX_PROFILE_PKG.update_row';
7721: l_debug_info := l_debug_info||' Return status : '||l_return_status;
7722: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
7723: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

Line 7736: IF (l_val_return_status = FND_API.G_RET_STS_SUCCESS) AND

7732: -- Allow the vendor site creation even if we do not have
7733: -- location or party site IDs and the vendor type is
7734: -- Employee.
7735:
7736: IF (l_val_return_status = FND_API.G_RET_STS_SUCCESS) AND
7737: ((l_loc_return_status = FND_API.G_RET_STS_SUCCESS) OR
7738: (l_loc_return_status <> FND_API.G_RET_STS_SUCCESS AND
7739: l_vendor_site_rec.location_id IS NULL AND
7740: l_vendor_type_lookup_code = 'EMPLOYEE')) AND

Line 7737: ((l_loc_return_status = FND_API.G_RET_STS_SUCCESS) OR

7733: -- location or party site IDs and the vendor type is
7734: -- Employee.
7735:
7736: IF (l_val_return_status = FND_API.G_RET_STS_SUCCESS) AND
7737: ((l_loc_return_status = FND_API.G_RET_STS_SUCCESS) OR
7738: (l_loc_return_status <> FND_API.G_RET_STS_SUCCESS AND
7739: l_vendor_site_rec.location_id IS NULL AND
7740: l_vendor_type_lookup_code = 'EMPLOYEE')) AND
7741: ((l_site_return_status = FND_API.G_RET_STS_SUCCESS) OR

Line 7738: (l_loc_return_status <> FND_API.G_RET_STS_SUCCESS AND

7734: -- Employee.
7735:
7736: IF (l_val_return_status = FND_API.G_RET_STS_SUCCESS) AND
7737: ((l_loc_return_status = FND_API.G_RET_STS_SUCCESS) OR
7738: (l_loc_return_status <> FND_API.G_RET_STS_SUCCESS AND
7739: l_vendor_site_rec.location_id IS NULL AND
7740: l_vendor_type_lookup_code = 'EMPLOYEE')) AND
7741: ((l_site_return_status = FND_API.G_RET_STS_SUCCESS) OR
7742: (l_site_return_status <> FND_API.G_RET_STS_SUCCESS AND

Line 7741: ((l_site_return_status = FND_API.G_RET_STS_SUCCESS) OR

7737: ((l_loc_return_status = FND_API.G_RET_STS_SUCCESS) OR
7738: (l_loc_return_status <> FND_API.G_RET_STS_SUCCESS AND
7739: l_vendor_site_rec.location_id IS NULL AND
7740: l_vendor_type_lookup_code = 'EMPLOYEE')) AND
7741: ((l_site_return_status = FND_API.G_RET_STS_SUCCESS) OR
7742: (l_site_return_status <> FND_API.G_RET_STS_SUCCESS AND
7743: l_vendor_site_rec.party_site_id IS NULL AND
7744: l_vendor_type_lookup_code = 'EMPLOYEE')) AND
7745: (l_payee_valid = 'N' OR

Line 7742: (l_site_return_status <> FND_API.G_RET_STS_SUCCESS AND

7738: (l_loc_return_status <> FND_API.G_RET_STS_SUCCESS AND
7739: l_vendor_site_rec.location_id IS NULL AND
7740: l_vendor_type_lookup_code = 'EMPLOYEE')) AND
7741: ((l_site_return_status = FND_API.G_RET_STS_SUCCESS) OR
7742: (l_site_return_status <> FND_API.G_RET_STS_SUCCESS AND
7743: l_vendor_site_rec.party_site_id IS NULL AND
7744: l_vendor_type_lookup_code = 'EMPLOYEE')) AND
7745: (l_payee_valid = 'N' OR
7746: l_pay_return_status = FND_API.G_RET_STS_SUCCESS) THEN

Line 7746: l_pay_return_status = FND_API.G_RET_STS_SUCCESS) THEN

7742: (l_site_return_status <> FND_API.G_RET_STS_SUCCESS AND
7743: l_vendor_site_rec.party_site_id IS NULL AND
7744: l_vendor_type_lookup_code = 'EMPLOYEE')) AND
7745: (l_payee_valid = 'N' OR
7746: l_pay_return_status = FND_API.G_RET_STS_SUCCESS) THEN
7747:
7748: ap_vendor_sites_pkg.insert_row(
7749: p_vendor_site_rec => l_vendor_site_rec,
7750: p_last_update_date => sysdate,

Line 7777: IF l_sync_return_status <> FND_API.G_RET_STS_SUCCESS THEN

7773: l_sync_msg_count,
7774: l_sync_msg_data,
7775: l_vendor_site_rec.location_id,
7776: l_vendor_site_rec.party_site_id);
7777: IF l_sync_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7778: ------------------------------------------------------------------------
7779: l_debug_info := 'After call to AP_TCA_SUPPLIER_SYNC_PKG.SYNC_Supplier_Sites';
7780: l_debug_info := l_debug_info||' Return status : '||l_sync_return_status||' Error : '||l_sync_msg_data;
7781: ------------------------------------------------------------------------

Line 7788: IF l_sync_return_status = FND_API.G_RET_STS_SUCCESS THEN

7784: END IF;
7785: END IF;
7786: END IF;
7787:
7788: IF l_sync_return_status = FND_API.G_RET_STS_SUCCESS THEN
7789: Raise_Supplier_Event( i_vendor_site_id => l_vendor_site_id ); -- Bug 7307669
7790: x_return_status := FND_API.G_RET_STS_SUCCESS;
7791: END IF;
7792: x_party_site_id := l_party_site_id;

Line 7790: x_return_status := FND_API.G_RET_STS_SUCCESS;

7786: END IF;
7787:
7788: IF l_sync_return_status = FND_API.G_RET_STS_SUCCESS THEN
7789: Raise_Supplier_Event( i_vendor_site_id => l_vendor_site_id ); -- Bug 7307669
7790: x_return_status := FND_API.G_RET_STS_SUCCESS;
7791: END IF;
7792: x_party_site_id := l_party_site_id;
7793: x_location_id := l_loc_id;
7794: x_vendor_site_id := l_vendor_site_id;

Line 7796: ELSIF (l_val_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR

7792: x_party_site_id := l_party_site_id;
7793: x_location_id := l_loc_id;
7794: x_vendor_site_id := l_vendor_site_id;
7795:
7796: ELSIF (l_val_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
7797: ((l_loc_return_status = FND_API.G_RET_STS_UNEXP_ERROR) AND
7798: (l_vendor_type_lookup_code <> 'EMPLOYEE') AND
7799: (l_vendor_site_rec.location_id IS NULL)) OR
7800: ((l_site_return_status = FND_API.G_RET_STS_UNEXP_ERROR) AND

Line 7797: ((l_loc_return_status = FND_API.G_RET_STS_UNEXP_ERROR) AND

7793: x_location_id := l_loc_id;
7794: x_vendor_site_id := l_vendor_site_id;
7795:
7796: ELSIF (l_val_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
7797: ((l_loc_return_status = FND_API.G_RET_STS_UNEXP_ERROR) AND
7798: (l_vendor_type_lookup_code <> 'EMPLOYEE') AND
7799: (l_vendor_site_rec.location_id IS NULL)) OR
7800: ((l_site_return_status = FND_API.G_RET_STS_UNEXP_ERROR) AND
7801: (l_vendor_type_lookup_code <> 'EMPLOYEE') AND

Line 7800: ((l_site_return_status = FND_API.G_RET_STS_UNEXP_ERROR) AND

7796: ELSIF (l_val_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
7797: ((l_loc_return_status = FND_API.G_RET_STS_UNEXP_ERROR) AND
7798: (l_vendor_type_lookup_code <> 'EMPLOYEE') AND
7799: (l_vendor_site_rec.location_id IS NULL)) OR
7800: ((l_site_return_status = FND_API.G_RET_STS_UNEXP_ERROR) AND
7801: (l_vendor_type_lookup_code <> 'EMPLOYEE') AND
7802: (l_vendor_site_rec.party_site_id IS NULL)) OR
7803: (l_pay_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
7804: (l_sync_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

Line 7803: (l_pay_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR

7799: (l_vendor_site_rec.location_id IS NULL)) OR
7800: ((l_site_return_status = FND_API.G_RET_STS_UNEXP_ERROR) AND
7801: (l_vendor_type_lookup_code <> 'EMPLOYEE') AND
7802: (l_vendor_site_rec.party_site_id IS NULL)) OR
7803: (l_pay_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
7804: (l_sync_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
7805:
7806: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7807:

Line 7804: (l_sync_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

7800: ((l_site_return_status = FND_API.G_RET_STS_UNEXP_ERROR) AND
7801: (l_vendor_type_lookup_code <> 'EMPLOYEE') AND
7802: (l_vendor_site_rec.party_site_id IS NULL)) OR
7803: (l_pay_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
7804: (l_sync_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
7805:
7806: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7807:
7808: ELSE

Line 7806: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

7802: (l_vendor_site_rec.party_site_id IS NULL)) OR
7803: (l_pay_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
7804: (l_sync_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
7805:
7806: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7807:
7808: ELSE
7809:
7810: x_return_status := FND_API.G_RET_STS_ERROR;

Line 7810: x_return_status := FND_API.G_RET_STS_ERROR;

7806: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7807:
7808: ELSE
7809:
7810: x_return_status := FND_API.G_RET_STS_ERROR;
7811: END IF;
7812:
7813: IF l_payee_valid = 'N' THEN --payee record is valid
7814:

Line 7878: p_init_msg_list => FND_API.G_FALSE,

7874:
7875: /* Calling IBY Payee Creation API */
7876: IBY_DISBURSEMENT_SETUP_PUB.Create_External_Payee
7877: ( p_api_version => 1.0,
7878: p_init_msg_list => FND_API.G_FALSE,
7879: p_ext_payee_tab => ext_payee_tab,
7880: x_return_status => l_pay_return_status,
7881: x_msg_count => l_pay_msg_count,
7882: x_msg_data => l_pay_msg_data,

Line 7885: IF l_pay_return_status <> FND_API.G_RET_STS_SUCCESS THEN

7881: x_msg_count => l_pay_msg_count,
7882: x_msg_data => l_pay_msg_data,
7883: x_ext_payee_id_tab => ext_payee_id_tab,
7884: x_ext_payee_status_tab => ext_payee_create_tab);
7885: IF l_pay_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7886: ------------------------------------------------------------------------
7887: l_debug_info := 'After call to IBY_DISBURSEMENT_SETUP_PUB.Create_External_Payee';
7888: l_debug_info := l_debug_info||' Return status : '||l_pay_return_status||' Error : '||l_pay_msg_data;
7889: ------------------------------------------------------------------------

Line 7904: IF FND_API.To_Boolean( p_commit ) THEN

7900:
7901: -- End of API body.
7902:
7903: -- Standard check of p_commit.
7904: IF FND_API.To_Boolean( p_commit ) THEN
7905: COMMIT WORK;
7906: END IF;
7907:
7908: -- Standard call to get message count and if count is 1,

Line 7916: WHEN FND_API.G_EXC_ERROR THEN

7912: p_data => x_msg_data
7913: );
7914:
7915: EXCEPTION
7916: WHEN FND_API.G_EXC_ERROR THEN
7917: ROLLBACK TO Create_Vendor_Site_PUB;
7918: x_return_status := FND_API.G_RET_STS_ERROR ;
7919: FND_MSG_PUB.Count_And_Get
7920: ( p_count => x_msg_count,

Line 7918: x_return_status := FND_API.G_RET_STS_ERROR ;

7914:
7915: EXCEPTION
7916: WHEN FND_API.G_EXC_ERROR THEN
7917: ROLLBACK TO Create_Vendor_Site_PUB;
7918: x_return_status := FND_API.G_RET_STS_ERROR ;
7919: FND_MSG_PUB.Count_And_Get
7920: ( p_count => x_msg_count,
7921: p_data => x_msg_data
7922: );

Line 7923: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

7919: FND_MSG_PUB.Count_And_Get
7920: ( p_count => x_msg_count,
7921: p_data => x_msg_data
7922: );
7923: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7924: ROLLBACK TO Create_Vendor_Site_PUB;
7925: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7926: FND_MSG_PUB.Count_And_Get
7927: ( p_count => x_msg_count,

Line 7925: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

7921: p_data => x_msg_data
7922: );
7923: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7924: ROLLBACK TO Create_Vendor_Site_PUB;
7925: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7926: FND_MSG_PUB.Count_And_Get
7927: ( p_count => x_msg_count,
7928: p_data => x_msg_data
7929: );

Line 7932: x_return_status := FND_API.G_RET_STS_ERROR ;

7928: p_data => x_msg_data
7929: );
7930: -- BUG 6739544 START
7931: WHEN ORG_ID_EXCEPTION THEN
7932: x_return_status := FND_API.G_RET_STS_ERROR ;
7933: FND_MSG_PUB.Count_And_Get
7934: ( p_count => x_msg_count,
7935: p_data => x_msg_data
7936: );

Line 7940: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

7936: );
7937: -- BUG 6739544 END.
7938: WHEN OTHERS THEN
7939: ROLLBACK TO Create_Vendor_Site_PUB;
7940: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7941: IF FND_MSG_PUB.Check_Msg_Level
7942: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
7943: FND_MSG_PUB.Add_Exc_Msg
7944: ( G_PKG_NAME ,

Line 7956: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,

7952: END Create_Vendor_Site;
7953:
7954: PROCEDURE Update_Vendor_Site
7955: ( p_api_version IN NUMBER,
7956: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
7957: p_commit IN VARCHAR2 := FND_API.G_FALSE,
7958: p_validation_level IN NUMBER :=
7959: FND_API.G_VALID_LEVEL_FULL,
7960: x_return_status OUT NOCOPY VARCHAR2 ,

Line 7957: p_commit IN VARCHAR2 := FND_API.G_FALSE,

7953:
7954: PROCEDURE Update_Vendor_Site
7955: ( p_api_version IN NUMBER,
7956: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
7957: p_commit IN VARCHAR2 := FND_API.G_FALSE,
7958: p_validation_level IN NUMBER :=
7959: FND_API.G_VALID_LEVEL_FULL,
7960: x_return_status OUT NOCOPY VARCHAR2 ,
7961: x_msg_count OUT NOCOPY NUMBER,

Line 7959: FND_API.G_VALID_LEVEL_FULL,

7955: ( p_api_version IN NUMBER,
7956: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
7957: p_commit IN VARCHAR2 := FND_API.G_FALSE,
7958: p_validation_level IN NUMBER :=
7959: FND_API.G_VALID_LEVEL_FULL,
7960: x_return_status OUT NOCOPY VARCHAR2 ,
7961: x_msg_count OUT NOCOPY NUMBER,
7962: x_msg_data OUT NOCOPY VARCHAR2,
7963: p_vendor_site_rec IN r_vendor_site_rec_type,

Line 7999: IF NOT FND_API.Compatible_API_Call ( l_api_version ,

7995: -- Standard Start of API savepoint
7996: SAVEPOINT Update_Vendor_Site_PUB;
7997:
7998: -- Standard call to check for call compatibility.
7999: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
8000: p_api_version ,
8001: l_api_name ,
8002: G_PKG_NAME )
8003: THEN

Line 8004: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

8000: p_api_version ,
8001: l_api_name ,
8002: G_PKG_NAME )
8003: THEN
8004: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8005: END IF;
8006:
8007: -- Initialize message list if p_init_msg_list is set to TRUE.
8008: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 8008: IF FND_API.to_Boolean( p_init_msg_list ) THEN

8004: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8005: END IF;
8006:
8007: -- Initialize message list if p_init_msg_list is set to TRUE.
8008: IF FND_API.to_Boolean( p_init_msg_list ) THEN
8009: FND_MSG_PUB.initialize;
8010: END IF;
8011:
8012: -- Initialize API return status to success

Line 8013: x_return_status := FND_API.G_RET_STS_SUCCESS;

8009: FND_MSG_PUB.initialize;
8010: END IF;
8011:
8012: -- Initialize API return status to success
8013: x_return_status := FND_API.G_RET_STS_SUCCESS;
8014: l_val_return_status := FND_API.G_RET_STS_SUCCESS;
8015:
8016: -- API body
8017:

Line 8014: l_val_return_status := FND_API.G_RET_STS_SUCCESS;

8010: END IF;
8011:
8012: -- Initialize API return status to success
8013: x_return_status := FND_API.G_RET_STS_SUCCESS;
8014: l_val_return_status := FND_API.G_RET_STS_SUCCESS;
8015:
8016: -- API body
8017:
8018: -- Bug 5055120

Line 8052: p_init_msg_list => FND_API.G_FALSE,

8048: l_vendor_site_rec.org_id := l_org_id;
8049: END IF;
8050:
8051: validate_vendor_site(p_api_version => 1.0,
8052: p_init_msg_list => FND_API.G_FALSE,
8053: p_commit => FND_API.G_FALSE,
8054: x_return_status => l_val_return_status,
8055: x_msg_count => l_val_msg_count,
8056: x_msg_data => l_val_msg_data,

Line 8053: p_commit => FND_API.G_FALSE,

8049: END IF;
8050:
8051: validate_vendor_site(p_api_version => 1.0,
8052: p_init_msg_list => FND_API.G_FALSE,
8053: p_commit => FND_API.G_FALSE,
8054: x_return_status => l_val_return_status,
8055: x_msg_count => l_val_msg_count,
8056: x_msg_data => l_val_msg_data,
8057: p_vendor_site_rec => l_vendor_site_rec,

Line 8065: IF (l_val_return_status = FND_API.G_RET_STS_SUCCESS) THEN

8061: x_location_valid => l_location_valid,
8062: x_payee_valid => l_payee_valid,
8063: p_vendor_site_id => p_vendor_site_id);
8064:
8065: IF (l_val_return_status = FND_API.G_RET_STS_SUCCESS) THEN
8066: --populate existing values
8067: SELECT
8068: decode(l_vendor_site_rec.AREA_CODE,
8069: ap_null_char,NULL,

Line 8576: IF l_sync_return_status = FND_API.G_RET_STS_SUCCESS THEN

8572: l_sync_msg_data,
8573: l_vendor_site_rec.location_id,
8574: l_vendor_site_rec.party_site_id);
8575:
8576: IF l_sync_return_status = FND_API.G_RET_STS_SUCCESS THEN
8577: Raise_Supplier_Event( i_vendor_site_id => p_vendor_site_id ); -- Bug 7307669
8578: x_return_status := FND_API.G_RET_STS_SUCCESS;
8579: END IF;
8580:

Line 8578: x_return_status := FND_API.G_RET_STS_SUCCESS;

8574: l_vendor_site_rec.party_site_id);
8575:
8576: IF l_sync_return_status = FND_API.G_RET_STS_SUCCESS THEN
8577: Raise_Supplier_Event( i_vendor_site_id => p_vendor_site_id ); -- Bug 7307669
8578: x_return_status := FND_API.G_RET_STS_SUCCESS;
8579: END IF;
8580:
8581: ELSIF (l_val_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
8582: (l_sync_return_status = FND_API.G_RET_STS_UNEXP_ERROR)THEN

Line 8581: ELSIF (l_val_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR

8577: Raise_Supplier_Event( i_vendor_site_id => p_vendor_site_id ); -- Bug 7307669
8578: x_return_status := FND_API.G_RET_STS_SUCCESS;
8579: END IF;
8580:
8581: ELSIF (l_val_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
8582: (l_sync_return_status = FND_API.G_RET_STS_UNEXP_ERROR)THEN
8583:
8584: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8585:

Line 8582: (l_sync_return_status = FND_API.G_RET_STS_UNEXP_ERROR)THEN

8578: x_return_status := FND_API.G_RET_STS_SUCCESS;
8579: END IF;
8580:
8581: ELSIF (l_val_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
8582: (l_sync_return_status = FND_API.G_RET_STS_UNEXP_ERROR)THEN
8583:
8584: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8585:
8586: ELSE

Line 8584: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

8580:
8581: ELSIF (l_val_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
8582: (l_sync_return_status = FND_API.G_RET_STS_UNEXP_ERROR)THEN
8583:
8584: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8585:
8586: ELSE
8587:
8588: x_return_status := FND_API.G_RET_STS_ERROR;

Line 8588: x_return_status := FND_API.G_RET_STS_ERROR;

8584: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8585:
8586: ELSE
8587:
8588: x_return_status := FND_API.G_RET_STS_ERROR;
8589: END IF;
8590:
8591: --set access mode back to original value
8592: IF l_org_context <> mo_global.get_access_mode THEN

Line 8599: IF FND_API.To_Boolean( p_commit ) THEN

8595:
8596: -- End of API body.
8597:
8598: -- Standard check of p_commit.
8599: IF FND_API.To_Boolean( p_commit ) THEN
8600: COMMIT WORK;
8601: END IF;
8602:
8603: -- Standard call to get message count and if count is 1,

Line 8611: WHEN FND_API.G_EXC_ERROR THEN

8607: p_data => x_msg_data
8608: );
8609:
8610: EXCEPTION
8611: WHEN FND_API.G_EXC_ERROR THEN
8612: ROLLBACK TO Update_Vendor_Site_PUB;
8613: x_return_status := FND_API.G_RET_STS_ERROR ;
8614: FND_MSG_PUB.Count_And_Get
8615: ( p_count => x_msg_count,

Line 8613: x_return_status := FND_API.G_RET_STS_ERROR ;

8609:
8610: EXCEPTION
8611: WHEN FND_API.G_EXC_ERROR THEN
8612: ROLLBACK TO Update_Vendor_Site_PUB;
8613: x_return_status := FND_API.G_RET_STS_ERROR ;
8614: FND_MSG_PUB.Count_And_Get
8615: ( p_count => x_msg_count,
8616: p_data => x_msg_data
8617: );

Line 8618: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

8614: FND_MSG_PUB.Count_And_Get
8615: ( p_count => x_msg_count,
8616: p_data => x_msg_data
8617: );
8618: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8619: ROLLBACK TO Update_Vendor_Site_PUB;
8620: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
8621: FND_MSG_PUB.Count_And_Get
8622: ( p_count => x_msg_count,

Line 8620: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

8616: p_data => x_msg_data
8617: );
8618: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8619: ROLLBACK TO Update_Vendor_Site_PUB;
8620: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
8621: FND_MSG_PUB.Count_And_Get
8622: ( p_count => x_msg_count,
8623: p_data => x_msg_data
8624: );

Line 8627: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

8623: p_data => x_msg_data
8624: );
8625: WHEN OTHERS THEN
8626: ROLLBACK TO Update_Vendor_Site_PUB;
8627: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
8628: IF FND_MSG_PUB.Check_Msg_Level
8629: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
8630: FND_MSG_PUB.Add_Exc_Msg
8631: ( G_PKG_NAME ,

Line 8643: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,

8639: END Update_Vendor_Site;
8640:
8641: PROCEDURE Validate_Vendor_Site
8642: ( p_api_version IN NUMBER,
8643: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
8644: p_commit IN VARCHAR2 := FND_API.G_FALSE,
8645: p_validation_level IN NUMBER :=
8646: FND_API.G_VALID_LEVEL_FULL,
8647: x_return_status OUT NOCOPY VARCHAR2 ,

Line 8644: p_commit IN VARCHAR2 := FND_API.G_FALSE,

8640:
8641: PROCEDURE Validate_Vendor_Site
8642: ( p_api_version IN NUMBER,
8643: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
8644: p_commit IN VARCHAR2 := FND_API.G_FALSE,
8645: p_validation_level IN NUMBER :=
8646: FND_API.G_VALID_LEVEL_FULL,
8647: x_return_status OUT NOCOPY VARCHAR2 ,
8648: x_msg_count OUT NOCOPY NUMBER,

Line 8646: FND_API.G_VALID_LEVEL_FULL,

8642: ( p_api_version IN NUMBER,
8643: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
8644: p_commit IN VARCHAR2 := FND_API.G_FALSE,
8645: p_validation_level IN NUMBER :=
8646: FND_API.G_VALID_LEVEL_FULL,
8647: x_return_status OUT NOCOPY VARCHAR2 ,
8648: x_msg_count OUT NOCOPY NUMBER,
8649: x_msg_data OUT NOCOPY VARCHAR2,
8650: p_vendor_site_rec IN OUT NOCOPY r_vendor_site_rec_type,

Line 8686: IF NOT FND_API.Compatible_API_Call ( l_api_version ,

8682: -- Standard Start of API savepoint
8683: SAVEPOINT Validate_Vendor_Site_PUB;
8684:
8685: -- Standard call to check for call compatibility.
8686: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
8687: p_api_version ,
8688: l_api_name ,
8689: G_PKG_NAME )
8690: THEN

Line 8691: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

8687: p_api_version ,
8688: l_api_name ,
8689: G_PKG_NAME )
8690: THEN
8691: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8692: END IF;
8693:
8694: -- Initialize message list if p_init_msg_list is set to TRUE.
8695: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 8695: IF FND_API.to_Boolean( p_init_msg_list ) THEN

8691: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8692: END IF;
8693:
8694: -- Initialize message list if p_init_msg_list is set to TRUE.
8695: IF FND_API.to_Boolean( p_init_msg_list ) THEN
8696: FND_MSG_PUB.initialize;
8697: END IF;
8698:
8699: -- Initialize API return status to success

Line 8700: x_return_status := FND_API.G_RET_STS_SUCCESS;

8696: FND_MSG_PUB.initialize;
8697: END IF;
8698:
8699: -- Initialize API return status to success
8700: x_return_status := FND_API.G_RET_STS_SUCCESS;
8701:
8702: -- API body
8703:
8704: --get sob

Line 8733: x_return_status := FND_API.G_RET_STS_ERROR;

8729: Validate_Lookups('HOLD_UNMATCHED_INVOICES_FLAG',
8730: p_vendor_site_rec.hold_unmatched_invoices_flag ,'YES/NO',
8731: 'PO_LOOKUP_CODES',x_valid);
8732: IF NOT x_valid THEN
8733: x_return_status := FND_API.G_RET_STS_ERROR;
8734: IF g_source = 'IMPORT' THEN
8735: IF (Insert_Rejections(
8736: 'AP_SUPPLIER_SITES_INT',
8737: p_vendor_site_rec.vendor_site_interface_id,

Line 8777: x_return_status := FND_API.G_RET_STS_ERROR;

8773: Validate_Lookups( 'TAX_REPORTING_SITE_FLAG',
8774: p_vendor_site_rec.tax_reporting_site_flag ,'YES/NO',
8775: 'PO_LOOKUP_CODES',x_valid);
8776: IF NOT x_valid THEN
8777: x_return_status := FND_API.G_RET_STS_ERROR;
8778: IF g_source = 'IMPORT' THEN
8779: IF (Insert_Rejections(
8780: 'AP_SUPPLIER_SITES_INT',
8781: p_vendor_site_rec.vendor_site_interface_id,

Line 8828: x_return_status := FND_API.G_RET_STS_ERROR;

8824: AND LOOKUP_CODE = p_vendor_site_rec.VAT_CODE );
8825:
8826:
8827: IF l_status = 0 THEN
8828: x_return_status := FND_API.G_RET_STS_ERROR;
8829: IF g_source = 'IMPORT' THEN
8830: IF (Insert_Rejections(
8831: 'AP_SUPPLIER_SITES_INT',
8832: p_vendor_site_rec.vendor_site_interface_id,

Line 8874: x_return_status := FND_API.G_RET_STS_ERROR;

8870: p_vendor_site_rec.org_id,
8871: x_valid
8872: );
8873: IF NOT x_valid THEN
8874: x_return_status := FND_API.G_RET_STS_ERROR;
8875: IF g_source = 'IMPORT' THEN
8876: IF (Insert_Rejections(
8877: 'AP_SUPPLIER_SITES_INT',
8878: p_vendor_site_rec.vendor_site_interface_id,

Line 8924: x_return_status := FND_API.G_RET_STS_ERROR;

8920: p_vendor_site_rec.org_name,
8921: p_vendor_site_rec.org_id,
8922: x_valid);
8923: IF NOT x_valid THEN
8924: x_return_status := FND_API.G_RET_STS_ERROR;
8925: IF g_source = 'IMPORT' THEN
8926: IF (Insert_Rejections(
8927: 'AP_SUPPLIER_SITES_INT',
8928: p_vendor_site_rec.vendor_site_interface_id,

Line 8974: x_return_status := FND_API.G_RET_STS_ERROR;

8970: p_vendor_site_rec.vendor_site_interface_id,
8971: x_valid);
8972:
8973: IF NOT x_valid THEN
8974: x_return_status := FND_API.G_RET_STS_ERROR;
8975: END IF;
8976:
8977: END IF;
8978:

Line 8997: x_return_status := FND_API.G_RET_STS_ERROR;

8993: Check_pay_on_rec_sum_code(p_vendor_site_rec.pay_on_code,
8994: p_vendor_site_rec.pay_on_receipt_summary_code,
8995: x_valid);
8996: IF NOT x_valid THEN
8997: x_return_status := FND_API.G_RET_STS_ERROR;
8998: IF g_source = 'IMPORT' THEN
8999: IF (Insert_Rejections(
9000: 'AP_SUPPLIER_SITES_INT',
9001: p_vendor_site_rec.vendor_site_interface_id,

Line 9043: x_return_status := FND_API.G_RET_STS_ERROR;

9039: x_valid
9040: );
9041:
9042: IF NOT x_valid THEN
9043: x_return_status := FND_API.G_RET_STS_ERROR;
9044: IF g_source = 'IMPORT' THEN
9045: IF (Insert_Rejections(
9046: 'AP_SUPPLIER_SITES_INT',
9047: p_vendor_site_rec.vendor_site_interface_id,

Line 9092: x_return_status := FND_API.G_RET_STS_ERROR;

9088: p_vendor_site_rec.terms_name,
9089: p_vendor_site_rec.default_terms_id,
9090: x_valid);
9091: IF NOT x_valid THEN
9092: x_return_status := FND_API.G_RET_STS_ERROR;
9093: IF g_source = 'IMPORT' THEN
9094: IF (Insert_Rejections(
9095: 'AP_SUPPLIER_SITES_INT',
9096: p_vendor_site_rec.vendor_site_interface_id,

Line 9140: x_return_status := FND_API.G_RET_STS_ERROR;

9136: p_vendor_site_rec.default_pay_site_id,
9137: x_valid);
9138:
9139: IF NOT x_valid THEN
9140: x_return_status := FND_API.G_RET_STS_ERROR;
9141: IF g_source = 'IMPORT' THEN
9142: IF (Insert_Rejections(
9143: 'AP_SUPPLIER_SITES_INT',
9144: p_vendor_site_rec.vendor_site_interface_id,

Line 9184: x_return_status := FND_API.G_RET_STS_ERROR;

9180: pay_on_receipt_summary_valid(p_vendor_site_rec.pay_on_receipt_summary_code,
9181: p_vendor_site_rec.pay_on_code,
9182: x_valid);
9183: IF NOT x_valid THEN
9184: x_return_status := FND_API.G_RET_STS_ERROR;
9185: IF g_source = 'IMPORT' THEN
9186: IF (Insert_Rejections(
9187: 'AP_SUPPLIER_SITES_INT',
9188: p_vendor_site_rec.vendor_site_interface_id,

Line 9229: x_return_status := FND_API.G_RET_STS_ERROR;

9225: Check_payment_priority(p_vendor_site_rec.payment_priority,
9226: x_valid
9227: );
9228: IF NOT x_valid THEN
9229: x_return_status := FND_API.G_RET_STS_ERROR;
9230: IF g_source = 'IMPORT' THEN
9231: IF (Insert_Rejections(
9232: 'AP_SUPPLIER_SITES_INT',
9233: p_vendor_site_rec.vendor_site_interface_id,

Line 9268: x_return_status := FND_API.G_RET_STS_ERROR;

9264: p_vendor_site_rec.invoice_currency_code <> ap_null_char) THEN
9265: val_currency_code(p_vendor_site_rec.invoice_currency_code,
9266: x_valid);
9267: IF NOT x_valid THEN
9268: x_return_status := FND_API.G_RET_STS_ERROR;
9269: IF g_source = 'IMPORT' THEN
9270: IF (Insert_Rejections(
9271: 'AP_SUPPLIER_SITES_INT',
9272: p_vendor_site_rec.vendor_site_interface_id,

Line 9310: x_return_status := FND_API.G_RET_STS_ERROR;

9306: payment_currency_code_valid(p_vendor_site_rec.payment_currency_code,
9307: p_vendor_site_rec.invoice_currency_code,
9308: x_valid);
9309: IF NOT x_valid THEN
9310: x_return_status := FND_API.G_RET_STS_ERROR;
9311: IF g_source = 'IMPORT' THEN
9312: IF (Insert_Rejections(
9313: 'AP_SUPPLIER_SITES_INT',
9314: p_vendor_site_rec.vendor_site_interface_id,

Line 9354: x_return_status := FND_API.G_RET_STS_ERROR;

9350: Validate_CCIDs('ACCTS_PAY_CCID',
9351: p_vendor_site_rec.accts_pay_code_combination_id, l_sob,
9352: x_valid);
9353: IF NOT x_valid THEN
9354: x_return_status := FND_API.G_RET_STS_ERROR;
9355: IF g_source = 'IMPORT' THEN
9356: IF (Insert_Rejections(
9357: 'AP_SUPPLIER_SITES_INT',
9358: p_vendor_site_rec.vendor_site_interface_id,

Line 9398: x_return_status := FND_API.G_RET_STS_ERROR;

9394: Validate_CCIDs( 'PREPAY_CCID',
9395: p_vendor_site_rec.prepay_code_combination_id, l_sob,
9396: x_valid);
9397: IF NOT x_valid THEN
9398: x_return_status := FND_API.G_RET_STS_ERROR;
9399: IF g_source = 'IMPORT' THEN
9400: IF (Insert_Rejections(
9401: 'AP_SUPPLIER_SITES_INT',
9402: p_vendor_site_rec.vendor_site_interface_id,

Line 9442: x_return_status := FND_API.G_RET_STS_ERROR;

9438: Validate_CCIDs( 'FUTURE_DATED_PAYMENT_CCID',
9439: p_vendor_site_rec.future_dated_payment_ccid, l_sob,
9440: x_valid);
9441: IF NOT x_valid THEN
9442: x_return_status := FND_API.G_RET_STS_ERROR;
9443: IF g_source = 'IMPORT' THEN
9444: IF (Insert_Rejections(
9445: 'AP_SUPPLIER_SITES_INT',
9446: p_vendor_site_rec.vendor_site_interface_id,

Line 9489: x_return_status := FND_API.G_RET_STS_ERROR;

9485: Chk_new_duns_number(p_vendor_site_rec.duns_number,
9486: x_valid);
9487:
9488: IF NOT x_valid THEN
9489: x_return_status := FND_API.G_RET_STS_ERROR;
9490: IF g_source = 'IMPORT' THEN
9491: IF (Insert_Rejections(
9492: 'AP_SUPPLIER_SITES_INT',
9493: p_vendor_site_rec.vendor_site_interface_id,

Line 9538: x_return_status := FND_API.G_RET_STS_ERROR;

9534: p_calling_prog,
9535: x_valid);
9536:
9537: IF NOT x_valid THEN
9538: x_return_status := FND_API.G_RET_STS_ERROR;
9539: IF g_source = 'IMPORT' THEN
9540: IF (Insert_Rejections(
9541: 'AP_SUPPLIER_SITES_INT',
9542: p_vendor_site_rec.vendor_site_interface_id,

Line 9579: p_init_msg_list => FND_API.G_FALSE,

9575: --
9576: IF p_vendor_site_rec.ext_payee_rec.payer_org_type IS NOT NULL THEN
9577: IBY_DISBURSEMENT_SETUP_PUB.Validate_External_Payee
9578: ( p_api_version => 1.0,
9579: p_init_msg_list => FND_API.G_FALSE,
9580: p_ext_payee_rec => p_vendor_site_rec.ext_payee_rec,
9581: x_return_status => l_payee_return_status,
9582: x_msg_count => l_payee_msg_count,
9583: x_msg_data => l_payee_msg_data);

Line 9585: IF l_payee_return_status = FND_API.G_RET_STS_SUCCESS THEN

9581: x_return_status => l_payee_return_status,
9582: x_msg_count => l_payee_msg_count,
9583: x_msg_data => l_payee_msg_data);
9584:
9585: IF l_payee_return_status = FND_API.G_RET_STS_SUCCESS THEN
9586: x_payee_valid := 'V';
9587: ELSE
9588: x_payee_valid := 'F';
9589: x_return_status := l_payee_return_status;

Line 9645: x_return_status := FND_API.G_RET_STS_ERROR;

9641: x_valid := FALSE;
9642: END;
9643:
9644: IF NOT x_valid THEN
9645: x_return_status := FND_API.G_RET_STS_ERROR;
9646: IF g_source = 'IMPORT' THEN
9647: IF (Insert_Rejections
9648: (
9649: 'AP_SUPPLIER_SITES_INT',

Line 9687: x_return_status := FND_API.G_RET_STS_ERROR;

9683: 'AP_SUPPLIER_SITES_INT',
9684: p_vendor_site_rec.vendor_site_interface_id,
9685: x_valid);
9686: IF NOT x_valid THEN
9687: x_return_status := FND_API.G_RET_STS_ERROR;
9688: IF g_source = 'IMPORT' THEN
9689: IF (Insert_Rejections(
9690: 'AP_SUPPLIER_SITES_INT',
9691: p_vendor_site_rec.vendor_site_interface_id,

Line 9763: x_return_status := FND_API.G_RET_STS_ERROR;

9759: -- Bug 7429668 Start
9760: IF x_loc_count > 1 THEN
9761: -- We have to ensure that no new locations are created in this case.
9762: x_location_valid := 'F';
9763: x_return_status := FND_API.G_RET_STS_ERROR;
9764:
9765: IF g_source = 'IMPORT' THEN
9766:
9767: IF (Insert_Rejections(

Line 9793: x_return_status := FND_API.G_RET_STS_ERROR;

9789: ELSIF x_loc_count = 0 AND
9790: p_vendor_site_rec.party_site_id IS NOT NULL THEN
9791: -- We have to ensure that no new locations are created in this case.
9792: x_location_valid := 'F';
9793: x_return_status := FND_API.G_RET_STS_ERROR;
9794:
9795: IF g_source = 'IMPORT' THEN
9796:
9797: IF (Insert_Rejections(

Line 9826: x_return_status := FND_API.G_RET_STS_ERROR;

9822: Country and address_line1 coulumns are not null*/
9823: IF(p_vendor_site_rec.country IS NULL)
9824: AND (NVL(G_Vendor_Type_Lookup_Code,'DUMMY') <> 'EMPLOYEE') THEN
9825:
9826: x_return_status := FND_API.G_RET_STS_ERROR;
9827:
9828: IF g_source = 'IMPORT' THEN
9829:
9830: IF (Insert_Rejections(

Line 9858: x_return_status := FND_API.G_RET_STS_ERROR;

9854:
9855: IF(p_vendor_site_rec.address_line1 IS NULL)
9856: AND (NVL(G_Vendor_Type_Lookup_Code,'DUMMY') <> 'EMPLOYEE') THEN
9857:
9858: x_return_status := FND_API.G_RET_STS_ERROR;
9859:
9860: IF g_source = 'IMPORT' THEN
9861:
9862: IF (Insert_Rejections(

Line 9946: x_return_status := FND_API.G_RET_STS_ERROR;

9942: p_vendor_site_rec.org_name,
9943: x_valid
9944: );
9945: IF NOT x_valid THEN
9946: x_return_status := FND_API.G_RET_STS_ERROR;
9947: IF g_source = 'IMPORT' THEN
9948: IF (Insert_Rejections(
9949: 'AP_SUPPLIER_SITES_INT',
9950: p_vendor_site_rec.vendor_site_interface_id,

Line 9986: x_return_status := FND_API.G_RET_STS_ERROR;

9982: IF (p_vendor_site_rec.country_of_origin_code is not null) THEN
9983: country_of_origin_valid(p_vendor_site_rec.country_of_origin_code,
9984: x_valid);
9985: IF NOT x_valid THEN
9986: x_return_status := FND_API.G_RET_STS_ERROR;
9987: IF g_source = 'IMPORT' THEN
9988: IF (Insert_Rejections(
9989: 'AP_SUPPLIER_SITES_INT',
9990: p_vendor_site_rec.vendor_site_interface_id,

Line 10031: x_return_status := FND_API.G_RET_STS_ERROR;

10027:
10028: Validate_Lookups( 'PCARD_SITE_FLAG', p_vendor_site_rec.pcard_site_flag ,'YES/NO',
10029: 'PO_LOOKUP_CODES',x_valid);
10030: IF NOT x_valid THEN
10031: x_return_status := FND_API.G_RET_STS_ERROR;
10032: IF g_source = 'IMPORT' THEN
10033: IF (Insert_Rejections(
10034: 'AP_SUPPLIER_SITES_INT',
10035: p_vendor_site_rec.vendor_site_interface_id,

Line 10074: x_return_status := FND_API.G_RET_STS_ERROR;

10070:
10071: Validate_Lookups( 'PURCHASING_SITE_FLAG', p_vendor_site_rec.purchasing_site_flag,'YES/NO',
10072: 'PO_LOOKUP_CODES', x_valid);
10073: IF NOT x_valid THEN
10074: x_return_status := FND_API.G_RET_STS_ERROR;
10075: IF g_source = 'IMPORT' THEN
10076: IF (Insert_Rejections(
10077: 'AP_SUPPLIER_SITES_INT',
10078: p_vendor_site_rec.vendor_site_interface_id,

Line 10117: x_return_status := FND_API.G_RET_STS_ERROR;

10113:
10114: Validate_Lookups( 'RFQ_ONLY_SITE_FLAG', p_vendor_site_rec.rfq_only_site_flag,'YES/NO',
10115: 'PO_LOOKUP_CODES', x_valid);
10116: IF NOT x_valid THEN
10117: x_return_status := FND_API.G_RET_STS_ERROR;
10118: IF g_source = 'IMPORT' THEN
10119: IF (Insert_Rejections(
10120: 'AP_SUPPLIER_SITES_INT',
10121: p_vendor_site_rec.vendor_site_interface_id,

Line 10160: x_return_status := FND_API.G_RET_STS_ERROR;

10156:
10157: Validate_Lookups( 'PAY_SITE_FLAG', p_vendor_site_rec.pay_site_flag,'YES/NO',
10158: 'PO_LOOKUP_CODES', x_valid);
10159: IF NOT x_valid THEN
10160: x_return_status := FND_API.G_RET_STS_ERROR;
10161: IF g_source = 'IMPORT' THEN
10162: IF (Insert_Rejections(
10163: 'AP_SUPPLIER_SITES_INT',
10164: p_vendor_site_rec.vendor_site_interface_id,

Line 10203: x_return_status := FND_API.G_RET_STS_ERROR;

10199:
10200: Validate_Lookups( 'ATTENTION_AR_FLAG', p_vendor_site_rec.attention_ar_flag,'YES/NO',
10201: 'PO_LOOKUP_CODES', x_valid);
10202: IF NOT x_valid THEN
10203: x_return_status := FND_API.G_RET_STS_ERROR;
10204: IF g_source = 'IMPORT' THEN
10205: IF (Insert_Rejections(
10206: 'AP_SUPPLIER_SITES_INT',
10207: p_vendor_site_rec.vendor_site_interface_id,

Line 10246: x_return_status := FND_API.G_RET_STS_ERROR;

10242:
10243: Validate_Lookups( 'PRIMARY_PAY_SITE_FLAG', p_vendor_site_rec.primary_pay_site_flag,'YES/NO',
10244: 'PO_LOOKUP_CODES',x_valid);
10245: IF NOT x_valid THEN
10246: x_return_status := FND_API.G_RET_STS_ERROR;
10247: IF g_source = 'IMPORT' THEN
10248: IF (Insert_Rejections(
10249: 'AP_SUPPLIER_SITES_INT',
10250: p_vendor_site_rec.vendor_site_interface_id,

Line 10290: x_return_status := FND_API.G_RET_STS_ERROR;

10286: Validate_Lookups( 'FREIGHT_TERMS_LOOKUP_CODE',
10287: p_vendor_site_rec.freight_terms_lookup_code,'FREIGHT TERMS',
10288: 'PO_LOOKUP_CODES',x_valid);
10289: IF NOT x_valid THEN
10290: x_return_status := FND_API.G_RET_STS_ERROR;
10291: IF g_source = 'IMPORT' THEN
10292: IF (Insert_Rejections(
10293: 'AP_SUPPLIER_SITES_INT',
10294: p_vendor_site_rec.vendor_site_interface_id,

Line 10333: x_return_status := FND_API.G_RET_STS_ERROR;

10329:
10330: Validate_Lookups( 'FOB_LOOKUP_CODE',p_vendor_site_rec.fob_lookup_code,'FOB',
10331: 'PO_LOOKUP_CODES',x_valid);
10332: IF NOT x_valid THEN
10333: x_return_status := FND_API.G_RET_STS_ERROR;
10334: IF g_source = 'IMPORT' THEN
10335: IF (Insert_Rejections(
10336: 'AP_SUPPLIER_SITES_INT',
10337: p_vendor_site_rec.vendor_site_interface_id,

Line 10377: x_return_status := FND_API.G_RET_STS_ERROR;

10373: Validate_Lookups( 'PAY_DATE_BASIS_LOOKUP_CODE',
10374: p_vendor_site_rec.pay_date_basis_lookup_code,'PAY DATE BASIS',
10375: 'PO_LOOKUP_CODES',x_valid);
10376: IF NOT x_valid THEN
10377: x_return_status := FND_API.G_RET_STS_ERROR;
10378: IF g_source = 'IMPORT' THEN
10379: IF (Insert_Rejections(
10380: 'AP_SUPPLIER_SITES_INT',
10381: p_vendor_site_rec.vendor_site_interface_id,

Line 10421: x_return_status := FND_API.G_RET_STS_ERROR;

10417: Validate_Lookups( 'PAY_GROUP_LOOKUP_CODE',
10418: p_vendor_site_rec.pay_group_lookup_code,'PAY GROUP',
10419: 'PO_LOOKUP_CODES',x_valid);
10420: IF NOT x_valid THEN
10421: x_return_status := FND_API.G_RET_STS_ERROR;
10422: IF g_source = 'IMPORT' THEN
10423: IF (Insert_Rejections(
10424: 'AP_SUPPLIER_SITES_INT',
10425: p_vendor_site_rec.vendor_site_interface_id,

Line 10464: x_return_status := FND_API.G_RET_STS_ERROR;

10460:
10461: Validate_Lookups( 'TERMS_DATE_BASIS',p_vendor_site_rec.terms_date_basis,'TERMS DATE BASIS',
10462: 'AP_LOOKUP_CODES',x_valid);
10463: IF NOT x_valid THEN
10464: x_return_status := FND_API.G_RET_STS_ERROR;
10465: IF g_source = 'IMPORT' THEN
10466: IF (Insert_Rejections(
10467: 'AP_SUPPLIER_SITES_INT',
10468: p_vendor_site_rec.vendor_site_interface_id,

Line 10509: x_return_status := FND_API.G_RET_STS_ERROR;

10505: Validate_Lookups( 'CREATE_DEBIT_MEMO_FLAG',
10506: p_vendor_site_rec.create_debit_memo_flag ,'YES/NO',
10507: 'PO_LOOKUP_CODES',x_valid);
10508: IF NOT x_valid THEN
10509: x_return_status := FND_API.G_RET_STS_ERROR;
10510: IF g_source = 'IMPORT' THEN
10511: IF (Insert_Rejections(
10512: 'AP_SUPPLIER_SITES_INT',
10513: p_vendor_site_rec.vendor_site_interface_id,

Line 10553: x_return_status := FND_API.G_RET_STS_ERROR;

10549: Validate_Lookups( 'EXCLUDE_FREIGHT_FROM_DISCOUNT',
10550: p_vendor_site_rec.exclude_freight_from_discount ,'YES/NO',
10551: 'PO_LOOKUP_CODES',x_valid);
10552: IF NOT x_valid THEN
10553: x_return_status := FND_API.G_RET_STS_ERROR;
10554: IF g_source = 'IMPORT' THEN
10555: IF (Insert_Rejections(
10556: 'AP_SUPPLIER_SITES_INT',
10557: p_vendor_site_rec.vendor_site_interface_id,

Line 10597: x_return_status := FND_API.G_RET_STS_ERROR;

10593:
10594: Validate_Lookups('HOLD_FUTURE_PAYMENTS_FLAG', p_vendor_site_rec.hold_future_payments_flag,'YES/NO',
10595: 'PO_LOOKUP_CODES', x_valid);
10596: IF NOT x_valid THEN
10597: x_return_status := FND_API.G_RET_STS_ERROR;
10598: IF g_source = 'IMPORT' THEN
10599: IF (Insert_Rejections(
10600: 'AP_SUPPLIER_SITES_INT',
10601: p_vendor_site_rec.vendor_site_interface_id,

Line 10640: x_return_status := FND_API.G_RET_STS_ERROR;

10636:
10637: Validate_Lookups('HOLD_ALL_PAYMENTS_FLAG', p_vendor_site_rec.hold_all_payments_flag,'YES/NO',
10638: 'PO_LOOKUP_CODES', x_valid);
10639: IF NOT x_valid THEN
10640: x_return_status := FND_API.G_RET_STS_ERROR;
10641: IF g_source = 'IMPORT' THEN
10642: IF (Insert_Rejections(
10643: 'AP_SUPPLIER_SITES_INT',
10644: p_vendor_site_rec.vendor_site_interface_id,

Line 10683: x_return_status := FND_API.G_RET_STS_ERROR;

10679:
10680: Validate_Lookups( 'ALWAYS_TAKE_DISC_FLAG', p_vendor_site_rec.always_take_disc_flag,'YES/NO',
10681: 'PO_LOOKUP_CODES', x_valid);
10682: IF NOT x_valid THEN
10683: x_return_status := FND_API.G_RET_STS_ERROR;
10684: IF g_source = 'IMPORT' THEN
10685: IF (Insert_Rejections(
10686: 'AP_SUPPLIER_SITES_INT',
10687: p_vendor_site_rec.vendor_site_interface_id,

Line 10727: x_return_status := FND_API.G_RET_STS_ERROR;

10723: Check_Valid_Match_Option(p_vendor_site_rec.match_option,
10724: x_valid
10725: );
10726: IF NOT x_valid THEN
10727: x_return_status := FND_API.G_RET_STS_ERROR;
10728: IF g_source = 'IMPORT' THEN
10729: IF (Insert_Rejections(
10730: 'AP_SUPPLIER_SITES_INT',
10731: p_vendor_site_rec.vendor_site_interface_id,

Line 10772: x_return_status := FND_API.G_RET_STS_ERROR;

10768: p_vendor_site_rec.org_id,
10769: x_valid
10770: );
10771: IF NOT x_valid THEN
10772: x_return_status := FND_API.G_RET_STS_ERROR;
10773: IF g_source = 'IMPORT' THEN
10774: IF (Insert_Rejections(
10775: 'AP_SUPPLIER_SITES_INT',
10776: p_vendor_site_rec.vendor_site_interface_id,

Line 10824: x_return_status := FND_API.G_RET_STS_ERROR;

10820: p_vendor_site_rec.allow_awt_flag,
10821: x_valid
10822: );
10823: IF NOT x_valid THEN
10824: x_return_status := FND_API.G_RET_STS_ERROR;
10825: IF g_source = 'IMPORT' THEN
10826: IF (Insert_Rejections(
10827: 'AP_SUPPLIER_SITES_INT',
10828: p_vendor_site_rec.vendor_site_interface_id,

Line 10872: x_return_status := FND_API.G_RET_STS_ERROR;

10868: p_vendor_site_rec.distribution_set_name,
10869: p_vendor_site_rec.default_dist_set_id,
10870: x_valid);
10871: IF NOT x_valid THEN
10872: x_return_status := FND_API.G_RET_STS_ERROR;
10873: IF g_source = 'IMPORT' THEN
10874: IF (Insert_Rejections(
10875: 'AP_SUPPLIER_SITES_INT',
10876: p_vendor_site_rec.vendor_site_interface_id,

Line 10922: x_return_status := FND_API.G_RET_STS_ERROR;

10918: p_vendor_site_rec.ship_to_location_code,
10919: p_vendor_site_rec.default_ship_to_loc_id,
10920: x_valid);
10921: IF NOT x_valid THEN
10922: x_return_status := FND_API.G_RET_STS_ERROR;
10923: IF g_source = 'IMPORT' THEN
10924: IF (Insert_Rejections(
10925: 'AP_SUPPLIER_SITES_INT',
10926: p_vendor_site_rec.vendor_site_interface_id,

Line 10972: x_return_status := FND_API.G_RET_STS_ERROR;

10968: p_vendor_site_rec.bill_to_location_code,
10969: p_vendor_site_rec.default_bill_to_loc_id,
10970: x_valid);
10971: IF NOT x_valid THEN
10972: x_return_status := FND_API.G_RET_STS_ERROR;
10973: IF g_source = 'IMPORT' THEN
10974: IF (Insert_Rejections(
10975: 'AP_SUPPLIER_SITES_INT',
10976: p_vendor_site_rec.vendor_site_interface_id,

Line 11020: x_return_status := FND_API.G_RET_STS_ERROR;

11016: Check_Valid_Sup_Notif_Method(p_vendor_site_rec.supplier_notif_method,
11017: x_valid
11018: );
11019: IF NOT x_valid THEN
11020: x_return_status := FND_API.G_RET_STS_ERROR;
11021: IF g_source = 'IMPORT' THEN
11022: IF (Insert_Rejections(
11023: 'AP_SUPPLIER_SITES_INT',
11024: p_vendor_site_rec.vendor_site_interface_id,

Line 11069: x_return_status := FND_API.G_RET_STS_ERROR;

11065: x_valid,
11066: l_tolerance_type
11067: );
11068: IF NOT x_valid THEN
11069: x_return_status := FND_API.G_RET_STS_ERROR;
11070: IF g_source = 'IMPORT' THEN
11071: IF (Insert_Rejections(
11072: 'AP_SUPPLIER_SITES_INT',
11073: p_vendor_site_rec.vendor_site_interface_id,

Line 11119: x_return_status := FND_API.G_RET_STS_ERROR;

11115: x_valid,
11116: l_tolerance_type
11117: );
11118: IF NOT x_valid THEN
11119: x_return_status := FND_API.G_RET_STS_ERROR;
11120: IF g_source = 'IMPORT' THEN
11121: IF (Insert_Rejections(
11122: 'AP_SUPPLIER_SITES_INT',
11123: p_vendor_site_rec.vendor_site_interface_id,

Line 11162: x_return_status := FND_API.G_RET_STS_ERROR;

11158:
11159: IF NOT (p_vendor_site_rec.retainage_rate < 0 OR
11160: p_vendor_site_rec.retainage_rate > 100) THEN
11161:
11162: x_return_status := FND_API.G_RET_STS_ERROR;
11163: IF g_source = 'IMPORT' THEN
11164: IF (Insert_Rejections(
11165: 'AP_SUPPLIER_SITES_INT',
11166: p_vendor_site_rec.vendor_site_interface_id,

Line 11207: x_return_status := FND_API.G_RET_STS_ERROR;

11203: p_vendor_site_rec.org_id,
11204: x_valid
11205: );
11206: IF NOT x_valid THEN
11207: x_return_status := FND_API.G_RET_STS_ERROR;
11208: IF g_source = 'IMPORT' THEN
11209: IF (Insert_Rejections(
11210: 'AP_SUPPLIER_SITES_INT',
11211: p_vendor_site_rec.vendor_site_interface_id,

Line 11255: x_return_status := FND_API.G_RET_STS_ERROR;

11251: p_vendor_site_rec.org_name,
11252: x_valid
11253: );
11254: IF NOT x_valid THEN
11255: x_return_status := FND_API.G_RET_STS_ERROR;
11256: IF g_source = 'IMPORT' THEN
11257: IF (Insert_Rejections(
11258: 'AP_SUPPLIER_SITES_INT',
11259: p_vendor_site_rec.vendor_site_interface_id,

Line 11298: x_return_status := FND_API.G_RET_STS_ERROR;

11294: p_vendor_site_rec.vendor_id,--Bug5260465
11295: x_valid);
11296:
11297: IF NOT x_valid THEN
11298: x_return_status := FND_API.G_RET_STS_ERROR;
11299: IF g_source = 'IMPORT' THEN
11300: IF (Insert_Rejections(
11301: 'AP_SUPPLIER_SITES_INT',
11302: p_vendor_site_rec.vendor_site_interface_id,

Line 11336: IF FND_API.To_Boolean( p_commit ) THEN

11332:
11333: -- End of API body.
11334:
11335: -- Standard check of p_commit.
11336: IF FND_API.To_Boolean( p_commit ) THEN
11337: COMMIT WORK;
11338: END IF;
11339:
11340: -- Standard call to get message count and if count is 1,

Line 11348: WHEN FND_API.G_EXC_ERROR THEN

11344: p_data => x_msg_data
11345: );
11346:
11347: EXCEPTION
11348: WHEN FND_API.G_EXC_ERROR THEN
11349: ROLLBACK TO Validate_Vendor_Site_PUB;
11350: x_return_status := FND_API.G_RET_STS_ERROR ;
11351: FND_MSG_PUB.Count_And_Get
11352: ( p_count => x_msg_count,

Line 11350: x_return_status := FND_API.G_RET_STS_ERROR ;

11346:
11347: EXCEPTION
11348: WHEN FND_API.G_EXC_ERROR THEN
11349: ROLLBACK TO Validate_Vendor_Site_PUB;
11350: x_return_status := FND_API.G_RET_STS_ERROR ;
11351: FND_MSG_PUB.Count_And_Get
11352: ( p_count => x_msg_count,
11353: p_data => x_msg_data
11354: );

Line 11355: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

11351: FND_MSG_PUB.Count_And_Get
11352: ( p_count => x_msg_count,
11353: p_data => x_msg_data
11354: );
11355: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
11356: ROLLBACK TO Validate_Vendor_Site_PUB;
11357: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
11358: FND_MSG_PUB.Count_And_Get
11359: ( p_count => x_msg_count,

Line 11357: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

11353: p_data => x_msg_data
11354: );
11355: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
11356: ROLLBACK TO Validate_Vendor_Site_PUB;
11357: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
11358: FND_MSG_PUB.Count_And_Get
11359: ( p_count => x_msg_count,
11360: p_data => x_msg_data
11361: );

Line 11364: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

11360: p_data => x_msg_data
11361: );
11362: WHEN OTHERS THEN
11363: ROLLBACK TO Validate_Vendor_Site_PUB;
11364: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
11365: IF FND_MSG_PUB.Check_Msg_Level
11366: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
11367: FND_MSG_PUB.Add_Exc_Msg
11368: ( G_PKG_NAME ,

Line 11380: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,

11376: END Validate_Vendor_Site;
11377:
11378: PROCEDURE Create_Vendor_Contact
11379: ( p_api_version IN NUMBER,
11380: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
11381: p_commit IN VARCHAR2 := FND_API.G_FALSE,
11382: p_validation_level IN NUMBER :=
11383: FND_API.G_VALID_LEVEL_FULL,
11384: x_return_status OUT NOCOPY VARCHAR2 ,

Line 11381: p_commit IN VARCHAR2 := FND_API.G_FALSE,

11377:
11378: PROCEDURE Create_Vendor_Contact
11379: ( p_api_version IN NUMBER,
11380: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
11381: p_commit IN VARCHAR2 := FND_API.G_FALSE,
11382: p_validation_level IN NUMBER :=
11383: FND_API.G_VALID_LEVEL_FULL,
11384: x_return_status OUT NOCOPY VARCHAR2 ,
11385: x_msg_count OUT NOCOPY NUMBER,

Line 11383: FND_API.G_VALID_LEVEL_FULL,

11379: ( p_api_version IN NUMBER,
11380: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
11381: p_commit IN VARCHAR2 := FND_API.G_FALSE,
11382: p_validation_level IN NUMBER :=
11383: FND_API.G_VALID_LEVEL_FULL,
11384: x_return_status OUT NOCOPY VARCHAR2 ,
11385: x_msg_count OUT NOCOPY NUMBER,
11386: x_msg_data OUT NOCOPY VARCHAR2,
11387: p_vendor_contact_rec IN r_vendor_contact_rec_type,

Line 11484: IF NOT FND_API.Compatible_API_Call ( l_api_version ,

11480: -- Standard Start of API savepoint
11481: SAVEPOINT Create_Vendor_Contact_PUB;
11482:
11483: -- Standard call to check for call compatibility.
11484: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
11485: p_api_version ,
11486: l_api_name ,
11487: G_PKG_NAME )
11488: THEN

Line 11489: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

11485: p_api_version ,
11486: l_api_name ,
11487: G_PKG_NAME )
11488: THEN
11489: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
11490: END IF;
11491:
11492: -- Initialize message list if p_init_msg_list is set to TRUE.
11493: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 11493: IF FND_API.to_Boolean( p_init_msg_list ) THEN

11489: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
11490: END IF;
11491:
11492: -- Initialize message list if p_init_msg_list is set to TRUE.
11493: IF FND_API.to_Boolean( p_init_msg_list ) THEN
11494: FND_MSG_PUB.initialize;
11495: END IF;
11496:
11497: -- Initialize API return status to success

Line 11498: x_return_status := FND_API.G_RET_STS_SUCCESS;

11494: FND_MSG_PUB.initialize;
11495: END IF;
11496:
11497: -- Initialize API return status to success
11498: x_return_status := FND_API.G_RET_STS_SUCCESS;
11499:
11500: -- API body
11501:
11502: --default return stati

Line 11503: l_val_return_status := FND_API.G_RET_STS_SUCCESS;

11499:
11500: -- API body
11501:
11502: --default return stati
11503: l_val_return_status := FND_API.G_RET_STS_SUCCESS;
11504: l_per_return_status := FND_API.G_RET_STS_SUCCESS;
11505: l_org_contact_return_status := FND_API.G_RET_STS_SUCCESS;
11506: l_site_return_status := FND_API.G_RET_STS_SUCCESS;
11507: l_phone_return_status := FND_API.G_RET_STS_SUCCESS;

Line 11504: l_per_return_status := FND_API.G_RET_STS_SUCCESS;

11500: -- API body
11501:
11502: --default return stati
11503: l_val_return_status := FND_API.G_RET_STS_SUCCESS;
11504: l_per_return_status := FND_API.G_RET_STS_SUCCESS;
11505: l_org_contact_return_status := FND_API.G_RET_STS_SUCCESS;
11506: l_site_return_status := FND_API.G_RET_STS_SUCCESS;
11507: l_phone_return_status := FND_API.G_RET_STS_SUCCESS;
11508: l_alt_phone_return_status := FND_API.G_RET_STS_SUCCESS;

Line 11505: l_org_contact_return_status := FND_API.G_RET_STS_SUCCESS;

11501:
11502: --default return stati
11503: l_val_return_status := FND_API.G_RET_STS_SUCCESS;
11504: l_per_return_status := FND_API.G_RET_STS_SUCCESS;
11505: l_org_contact_return_status := FND_API.G_RET_STS_SUCCESS;
11506: l_site_return_status := FND_API.G_RET_STS_SUCCESS;
11507: l_phone_return_status := FND_API.G_RET_STS_SUCCESS;
11508: l_alt_phone_return_status := FND_API.G_RET_STS_SUCCESS;
11509: l_fax_return_status := FND_API.G_RET_STS_SUCCESS;

Line 11506: l_site_return_status := FND_API.G_RET_STS_SUCCESS;

11502: --default return stati
11503: l_val_return_status := FND_API.G_RET_STS_SUCCESS;
11504: l_per_return_status := FND_API.G_RET_STS_SUCCESS;
11505: l_org_contact_return_status := FND_API.G_RET_STS_SUCCESS;
11506: l_site_return_status := FND_API.G_RET_STS_SUCCESS;
11507: l_phone_return_status := FND_API.G_RET_STS_SUCCESS;
11508: l_alt_phone_return_status := FND_API.G_RET_STS_SUCCESS;
11509: l_fax_return_status := FND_API.G_RET_STS_SUCCESS;
11510: l_email_return_status := FND_API.G_RET_STS_SUCCESS;

Line 11507: l_phone_return_status := FND_API.G_RET_STS_SUCCESS;

11503: l_val_return_status := FND_API.G_RET_STS_SUCCESS;
11504: l_per_return_status := FND_API.G_RET_STS_SUCCESS;
11505: l_org_contact_return_status := FND_API.G_RET_STS_SUCCESS;
11506: l_site_return_status := FND_API.G_RET_STS_SUCCESS;
11507: l_phone_return_status := FND_API.G_RET_STS_SUCCESS;
11508: l_alt_phone_return_status := FND_API.G_RET_STS_SUCCESS;
11509: l_fax_return_status := FND_API.G_RET_STS_SUCCESS;
11510: l_email_return_status := FND_API.G_RET_STS_SUCCESS;
11511: l_url_return_status := FND_API.G_RET_STS_SUCCESS;

Line 11508: l_alt_phone_return_status := FND_API.G_RET_STS_SUCCESS;

11504: l_per_return_status := FND_API.G_RET_STS_SUCCESS;
11505: l_org_contact_return_status := FND_API.G_RET_STS_SUCCESS;
11506: l_site_return_status := FND_API.G_RET_STS_SUCCESS;
11507: l_phone_return_status := FND_API.G_RET_STS_SUCCESS;
11508: l_alt_phone_return_status := FND_API.G_RET_STS_SUCCESS;
11509: l_fax_return_status := FND_API.G_RET_STS_SUCCESS;
11510: l_email_return_status := FND_API.G_RET_STS_SUCCESS;
11511: l_url_return_status := FND_API.G_RET_STS_SUCCESS;
11512:

Line 11509: l_fax_return_status := FND_API.G_RET_STS_SUCCESS;

11505: l_org_contact_return_status := FND_API.G_RET_STS_SUCCESS;
11506: l_site_return_status := FND_API.G_RET_STS_SUCCESS;
11507: l_phone_return_status := FND_API.G_RET_STS_SUCCESS;
11508: l_alt_phone_return_status := FND_API.G_RET_STS_SUCCESS;
11509: l_fax_return_status := FND_API.G_RET_STS_SUCCESS;
11510: l_email_return_status := FND_API.G_RET_STS_SUCCESS;
11511: l_url_return_status := FND_API.G_RET_STS_SUCCESS;
11512:
11513: l_vendor_contact_rec := p_vendor_contact_rec;

Line 11510: l_email_return_status := FND_API.G_RET_STS_SUCCESS;

11506: l_site_return_status := FND_API.G_RET_STS_SUCCESS;
11507: l_phone_return_status := FND_API.G_RET_STS_SUCCESS;
11508: l_alt_phone_return_status := FND_API.G_RET_STS_SUCCESS;
11509: l_fax_return_status := FND_API.G_RET_STS_SUCCESS;
11510: l_email_return_status := FND_API.G_RET_STS_SUCCESS;
11511: l_url_return_status := FND_API.G_RET_STS_SUCCESS;
11512:
11513: l_vendor_contact_rec := p_vendor_contact_rec;
11514:

Line 11511: l_url_return_status := FND_API.G_RET_STS_SUCCESS;

11507: l_phone_return_status := FND_API.G_RET_STS_SUCCESS;
11508: l_alt_phone_return_status := FND_API.G_RET_STS_SUCCESS;
11509: l_fax_return_status := FND_API.G_RET_STS_SUCCESS;
11510: l_email_return_status := FND_API.G_RET_STS_SUCCESS;
11511: l_url_return_status := FND_API.G_RET_STS_SUCCESS;
11512:
11513: l_vendor_contact_rec := p_vendor_contact_rec;
11514:
11515: validate_vendor_contact(p_api_version => 1.0,

Line 11516: p_init_msg_list => FND_API.G_FALSE,

11512:
11513: l_vendor_contact_rec := p_vendor_contact_rec;
11514:
11515: validate_vendor_contact(p_api_version => 1.0,
11516: p_init_msg_list => FND_API.G_FALSE,
11517: p_commit => FND_API.G_FALSE,
11518: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
11519: x_return_status => l_val_return_status,
11520: x_msg_count => l_val_msg_count,

Line 11517: p_commit => FND_API.G_FALSE,

11513: l_vendor_contact_rec := p_vendor_contact_rec;
11514:
11515: validate_vendor_contact(p_api_version => 1.0,
11516: p_init_msg_list => FND_API.G_FALSE,
11517: p_commit => FND_API.G_FALSE,
11518: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
11519: x_return_status => l_val_return_status,
11520: x_msg_count => l_val_msg_count,
11521: x_msg_data => l_val_msg_data,

Line 11518: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

11514:
11515: validate_vendor_contact(p_api_version => 1.0,
11516: p_init_msg_list => FND_API.G_FALSE,
11517: p_commit => FND_API.G_FALSE,
11518: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
11519: x_return_status => l_val_return_status,
11520: x_msg_count => l_val_msg_count,
11521: x_msg_data => l_val_msg_data,
11522: p_vendor_contact_rec => l_vendor_contact_rec,

Line 11575: p_init_msg_list => FND_API.G_FALSE,

11571:
11572: l_per_rec.party_rec := l_party_rec;
11573:
11574: hz_party_v2pub.create_person(
11575: p_init_msg_list => FND_API.G_FALSE,
11576: p_person_rec => l_per_rec,
11577: p_party_usage_code => 'SUPPLIER_CONTACT',
11578: --p_commit => FND_API.G_FALSE,
11579: x_return_status => l_per_return_status,

Line 11578: --p_commit => FND_API.G_FALSE,

11574: hz_party_v2pub.create_person(
11575: p_init_msg_list => FND_API.G_FALSE,
11576: p_person_rec => l_per_rec,
11577: p_party_usage_code => 'SUPPLIER_CONTACT',
11578: --p_commit => FND_API.G_FALSE,
11579: x_return_status => l_per_return_status,
11580: x_msg_count => l_per_msg_count,
11581: x_msg_data => l_per_msg_data,
11582: x_party_id => l_per_party_id,

Line 11585: IF l_per_return_status <> FND_API.G_RET_STS_SUCCESS THEN

11581: x_msg_data => l_per_msg_data,
11582: x_party_id => l_per_party_id,
11583: x_party_number => l_per_party_number,
11584: x_profile_id => l_per_profile_id);
11585: IF l_per_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11586: ------------------------------------------------------------------------
11587: l_debug_info := 'After call to hz_party_v2pub.create_person';
11588: l_debug_info := l_debug_info||' Return status : '||l_per_return_status||' Error : '||l_per_msg_data;
11589: ------------------------------------------------------------------------

Line 11610: p_init_msg_list => FND_API.G_FALSE,

11606: l_party_usg_rec.party_usage_code := 'ORG_CONTACT';
11607: l_party_usg_rec.created_by_module := 'AP_SUPPLIERS_API';
11608:
11609: HZ_PARTY_USG_ASSIGNMENT_PVT.assign_party_usage(
11610: p_init_msg_list => FND_API.G_FALSE,
11611: p_party_usg_assignment_rec => l_party_usg_rec,
11612: x_return_status => l_per_return_status,
11613: x_msg_count => l_per_msg_count,
11614: x_msg_data => l_per_msg_data);

Line 11651: p_init_msg_list => FND_API.G_FALSE,

11647: l_org_contact_rec.application_id := 200;
11648: l_org_contact_rec.party_rel_rec := l_rel_rec;
11649:
11650: hz_party_contact_v2pub.create_org_contact(
11651: p_init_msg_list => FND_API.G_FALSE,
11652: p_org_contact_rec => l_org_contact_rec,
11653: --p_commit => FND_API.G_FALSE,
11654: x_return_status => l_org_contact_return_status,
11655: x_msg_count => l_org_contact_msg_count,

Line 11653: --p_commit => FND_API.G_FALSE,

11649:
11650: hz_party_contact_v2pub.create_org_contact(
11651: p_init_msg_list => FND_API.G_FALSE,
11652: p_org_contact_rec => l_org_contact_rec,
11653: --p_commit => FND_API.G_FALSE,
11654: x_return_status => l_org_contact_return_status,
11655: x_msg_count => l_org_contact_msg_count,
11656: x_msg_data => l_org_contact_msg_data,
11657: x_org_contact_id => l_org_contact_id,

Line 11661: IF l_org_contact_return_status <> FND_API.G_RET_STS_SUCCESS THEN

11657: x_org_contact_id => l_org_contact_id,
11658: x_party_rel_id => l_rel_id,
11659: x_party_id => l_rel_party_id,
11660: x_party_number => l_rel_party_number);
11661: IF l_org_contact_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11662: ------------------------------------------------------------------------
11663: l_debug_info := 'After call to hz_party_contact_v2pub.create_org_contact';
11664: l_debug_info := l_debug_info||' Return status : '||l_org_contact_return_status||' Error : '||l_org_contact_msg_data;
11665: ------------------------------------------------------------------------

Line 11699: p_init_msg_list => FND_API.G_FALSE,

11695: END IF;
11696: -- udhenuko Bug 6823885 End
11697:
11698: hz_party_site_v2pub.create_party_site(
11699: p_init_msg_list => FND_API.G_FALSE,
11700: p_party_site_rec => l_party_site_rec,
11701: --p_commit => FND_API.G_FALSE,
11702: x_return_status => l_site_return_status,
11703: x_msg_count => l_site_msg_count,

Line 11701: --p_commit => FND_API.G_FALSE,

11697:
11698: hz_party_site_v2pub.create_party_site(
11699: p_init_msg_list => FND_API.G_FALSE,
11700: p_party_site_rec => l_party_site_rec,
11701: --p_commit => FND_API.G_FALSE,
11702: x_return_status => l_site_return_status,
11703: x_msg_count => l_site_msg_count,
11704: x_msg_data => l_site_msg_data,
11705: x_party_site_id => l_party_site_id,

Line 11707: IF l_site_return_status <> FND_API.G_RET_STS_SUCCESS THEN

11703: x_msg_count => l_site_msg_count,
11704: x_msg_data => l_site_msg_data,
11705: x_party_site_id => l_party_site_id,
11706: x_party_site_number => l_party_site_number);
11707: IF l_site_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11708: ------------------------------------------------------------------------
11709: l_debug_info := 'After call to hz_party_site_v2pub.create_party_site';
11710: l_debug_info := l_debug_info||' Return status : '||l_site_return_status||' Error : '||l_site_msg_data;
11711: ------------------------------------------------------------------------

Line 11750: p_init_msg_list => FND_API.G_FALSE,

11746: --
11747: l_phone_rec.phone_line_type := 'GEN';
11748:
11749: hz_contact_point_v2pub.create_phone_contact_point(
11750: p_init_msg_list => FND_API.G_FALSE,
11751: p_contact_point_rec => l_contact_point_rec,
11752: p_phone_rec => l_phone_rec,
11753: --p_commit => FND_API.G_FALSE,
11754: x_return_status => l_phone_return_status,

Line 11753: --p_commit => FND_API.G_FALSE,

11749: hz_contact_point_v2pub.create_phone_contact_point(
11750: p_init_msg_list => FND_API.G_FALSE,
11751: p_contact_point_rec => l_contact_point_rec,
11752: p_phone_rec => l_phone_rec,
11753: --p_commit => FND_API.G_FALSE,
11754: x_return_status => l_phone_return_status,
11755: x_msg_count => l_phone_msg_count,
11756: x_msg_data => l_phone_msg_data,
11757: x_contact_point_id => l_phone_contact_point_id);

Line 11758: IF l_phone_return_status <> FND_API.G_RET_STS_SUCCESS THEN

11754: x_return_status => l_phone_return_status,
11755: x_msg_count => l_phone_msg_count,
11756: x_msg_data => l_phone_msg_data,
11757: x_contact_point_id => l_phone_contact_point_id);
11758: IF l_phone_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11759: ------------------------------------------------------------------------
11760: l_debug_info := 'After call to hz_contact_point_v2pub.create_phone_contact_point Primary Phone';
11761: l_debug_info := l_debug_info||' Return status : '||l_phone_return_status||' Error : '||l_phone_msg_data;
11762: ------------------------------------------------------------------------

Line 11788: p_init_msg_list => FND_API.G_FALSE,

11784: --
11785: l_alt_phone_rec.phone_line_type := 'GEN';
11786:
11787: hz_contact_point_v2pub.create_phone_contact_point(
11788: p_init_msg_list => FND_API.G_FALSE,
11789: p_contact_point_rec => l_contact_point_rec,
11790: p_phone_rec => l_alt_phone_rec,
11791: --p_commit => FND_API.G_FALSE,
11792: x_return_status => l_alt_phone_return_status,

Line 11791: --p_commit => FND_API.G_FALSE,

11787: hz_contact_point_v2pub.create_phone_contact_point(
11788: p_init_msg_list => FND_API.G_FALSE,
11789: p_contact_point_rec => l_contact_point_rec,
11790: p_phone_rec => l_alt_phone_rec,
11791: --p_commit => FND_API.G_FALSE,
11792: x_return_status => l_alt_phone_return_status,
11793: x_msg_count => l_alt_phone_msg_count,
11794: x_msg_data => l_alt_phone_msg_data,
11795: x_contact_point_id => l_alt_phone_contact_point_id);

Line 11796: IF l_alt_phone_return_status <> FND_API.G_RET_STS_SUCCESS THEN

11792: x_return_status => l_alt_phone_return_status,
11793: x_msg_count => l_alt_phone_msg_count,
11794: x_msg_data => l_alt_phone_msg_data,
11795: x_contact_point_id => l_alt_phone_contact_point_id);
11796: IF l_alt_phone_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11797: ------------------------------------------------------------------------
11798: l_debug_info := 'After call to hz_contact_point_v2pub.create_phone_contact_point Alt Phone';
11799: l_debug_info := l_debug_info||' Return status : '||l_alt_phone_return_status||' Error : '||l_alt_phone_msg_data;
11800: ------------------------------------------------------------------------

Line 11822: p_init_msg_list => FND_API.G_FALSE,

11818: l_fax_rec.phone_number := l_vendor_contact_rec.fax_phone;
11819: l_fax_rec.phone_line_type := 'FAX';
11820:
11821: hz_contact_point_v2pub.create_phone_contact_point(
11822: p_init_msg_list => FND_API.G_FALSE,
11823: p_contact_point_rec => l_contact_point_rec,
11824: p_phone_rec => l_fax_rec,
11825: --p_commit => FND_API.G_FALSE,
11826: x_return_status => l_fax_return_status,

Line 11825: --p_commit => FND_API.G_FALSE,

11821: hz_contact_point_v2pub.create_phone_contact_point(
11822: p_init_msg_list => FND_API.G_FALSE,
11823: p_contact_point_rec => l_contact_point_rec,
11824: p_phone_rec => l_fax_rec,
11825: --p_commit => FND_API.G_FALSE,
11826: x_return_status => l_fax_return_status,
11827: x_msg_count => l_fax_msg_count,
11828: x_msg_data => l_fax_msg_data,
11829: x_contact_point_id => l_fax_contact_point_id);

Line 11830: IF l_fax_return_status <> FND_API.G_RET_STS_SUCCESS THEN

11826: x_return_status => l_fax_return_status,
11827: x_msg_count => l_fax_msg_count,
11828: x_msg_data => l_fax_msg_data,
11829: x_contact_point_id => l_fax_contact_point_id);
11830: IF l_fax_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11831: ------------------------------------------------------------------------
11832: l_debug_info := 'After call to hz_contact_point_v2pub.create_phone_contact_point Fax Phone';
11833: l_debug_info := l_debug_info||' Return status : '||l_fax_return_status||' Error : '||l_fax_msg_data;
11834: ------------------------------------------------------------------------

Line 11853: p_init_msg_list => FND_API.G_FALSE,

11849: l_contact_point_rec.primary_by_purpose := 'N';
11850: l_email_rec.email_address := l_vendor_contact_rec.email_address;
11851:
11852: hz_contact_point_v2pub.create_email_contact_point(
11853: p_init_msg_list => FND_API.G_FALSE,
11854: p_contact_point_rec => l_contact_point_rec,
11855: p_email_rec => l_email_rec,
11856: --p_commit => FND_API.G_FALSE,
11857: x_return_status => l_email_return_status,

Line 11856: --p_commit => FND_API.G_FALSE,

11852: hz_contact_point_v2pub.create_email_contact_point(
11853: p_init_msg_list => FND_API.G_FALSE,
11854: p_contact_point_rec => l_contact_point_rec,
11855: p_email_rec => l_email_rec,
11856: --p_commit => FND_API.G_FALSE,
11857: x_return_status => l_email_return_status,
11858: x_msg_count => l_email_msg_count,
11859: x_msg_data => l_email_msg_data,
11860: x_contact_point_id => l_email_contact_point_id);

Line 11861: IF l_email_return_status <> FND_API.G_RET_STS_SUCCESS THEN

11857: x_return_status => l_email_return_status,
11858: x_msg_count => l_email_msg_count,
11859: x_msg_data => l_email_msg_data,
11860: x_contact_point_id => l_email_contact_point_id);
11861: IF l_email_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11862: ------------------------------------------------------------------------
11863: l_debug_info := 'After call to hz_contact_point_v2pub.create_email_contact_point';
11864: l_debug_info := l_debug_info||' Return status : '||l_email_return_status||' Error : '||l_email_msg_data;
11865: ------------------------------------------------------------------------

Line 11886: p_init_msg_list => FND_API.G_FALSE,

11882: l_url_rec.web_type := 'HTTP';
11883: l_url_rec.url := l_vendor_contact_rec.url;
11884:
11885: hz_contact_point_v2pub.create_web_contact_point(
11886: p_init_msg_list => FND_API.G_FALSE,
11887: p_contact_point_rec => l_contact_point_rec,
11888: p_web_rec => l_url_rec,
11889: --p_commit => FND_API.G_FALSE,
11890: x_return_status => l_url_return_status,

Line 11889: --p_commit => FND_API.G_FALSE,

11885: hz_contact_point_v2pub.create_web_contact_point(
11886: p_init_msg_list => FND_API.G_FALSE,
11887: p_contact_point_rec => l_contact_point_rec,
11888: p_web_rec => l_url_rec,
11889: --p_commit => FND_API.G_FALSE,
11890: x_return_status => l_url_return_status,
11891: x_msg_count => l_url_msg_count,
11892: x_msg_data => l_url_msg_data,
11893: x_contact_point_id => l_url_contact_point_id);

Line 11894: IF l_url_return_status <> FND_API.G_RET_STS_SUCCESS THEN

11890: x_return_status => l_url_return_status,
11891: x_msg_count => l_url_msg_count,
11892: x_msg_data => l_url_msg_data,
11893: x_contact_point_id => l_url_contact_point_id);
11894: IF l_url_return_status <> FND_API.G_RET_STS_SUCCESS THEN
11895: ------------------------------------------------------------------------
11896: l_debug_info := 'After call to hz_contact_point_v2pub.create_web_contact_point';
11897: l_debug_info := l_debug_info||' Return status : '||l_url_return_status||' Error : '||l_url_msg_data;
11898: ------------------------------------------------------------------------

Line 11908: IF (l_val_return_status = FND_API.G_RET_STS_SUCCESS) AND

11904: END IF; --url
11905:
11906: END IF; --contact points
11907:
11908: IF (l_val_return_status = FND_API.G_RET_STS_SUCCESS) AND
11909: (l_per_return_status = FND_API.G_RET_STS_SUCCESS) AND
11910: (l_org_contact_return_status = FND_API.G_RET_STS_SUCCESS) AND
11911: (l_site_return_status = FND_API.G_RET_STS_SUCCESS) AND
11912: (l_phone_return_status = FND_API.G_RET_STS_SUCCESS) AND

Line 11909: (l_per_return_status = FND_API.G_RET_STS_SUCCESS) AND

11905:
11906: END IF; --contact points
11907:
11908: IF (l_val_return_status = FND_API.G_RET_STS_SUCCESS) AND
11909: (l_per_return_status = FND_API.G_RET_STS_SUCCESS) AND
11910: (l_org_contact_return_status = FND_API.G_RET_STS_SUCCESS) AND
11911: (l_site_return_status = FND_API.G_RET_STS_SUCCESS) AND
11912: (l_phone_return_status = FND_API.G_RET_STS_SUCCESS) AND
11913: (l_alt_phone_return_status = FND_API.G_RET_STS_SUCCESS) AND

Line 11910: (l_org_contact_return_status = FND_API.G_RET_STS_SUCCESS) AND

11906: END IF; --contact points
11907:
11908: IF (l_val_return_status = FND_API.G_RET_STS_SUCCESS) AND
11909: (l_per_return_status = FND_API.G_RET_STS_SUCCESS) AND
11910: (l_org_contact_return_status = FND_API.G_RET_STS_SUCCESS) AND
11911: (l_site_return_status = FND_API.G_RET_STS_SUCCESS) AND
11912: (l_phone_return_status = FND_API.G_RET_STS_SUCCESS) AND
11913: (l_alt_phone_return_status = FND_API.G_RET_STS_SUCCESS) AND
11914: (l_fax_return_status = FND_API.G_RET_STS_SUCCESS) AND

Line 11911: (l_site_return_status = FND_API.G_RET_STS_SUCCESS) AND

11907:
11908: IF (l_val_return_status = FND_API.G_RET_STS_SUCCESS) AND
11909: (l_per_return_status = FND_API.G_RET_STS_SUCCESS) AND
11910: (l_org_contact_return_status = FND_API.G_RET_STS_SUCCESS) AND
11911: (l_site_return_status = FND_API.G_RET_STS_SUCCESS) AND
11912: (l_phone_return_status = FND_API.G_RET_STS_SUCCESS) AND
11913: (l_alt_phone_return_status = FND_API.G_RET_STS_SUCCESS) AND
11914: (l_fax_return_status = FND_API.G_RET_STS_SUCCESS) AND
11915: (l_email_return_status = FND_API.G_RET_STS_SUCCESS) AND

Line 11912: (l_phone_return_status = FND_API.G_RET_STS_SUCCESS) AND

11908: IF (l_val_return_status = FND_API.G_RET_STS_SUCCESS) AND
11909: (l_per_return_status = FND_API.G_RET_STS_SUCCESS) AND
11910: (l_org_contact_return_status = FND_API.G_RET_STS_SUCCESS) AND
11911: (l_site_return_status = FND_API.G_RET_STS_SUCCESS) AND
11912: (l_phone_return_status = FND_API.G_RET_STS_SUCCESS) AND
11913: (l_alt_phone_return_status = FND_API.G_RET_STS_SUCCESS) AND
11914: (l_fax_return_status = FND_API.G_RET_STS_SUCCESS) AND
11915: (l_email_return_status = FND_API.G_RET_STS_SUCCESS) AND
11916: (l_url_return_status = FND_API.G_RET_STS_SUCCESS) THEN

Line 11913: (l_alt_phone_return_status = FND_API.G_RET_STS_SUCCESS) AND

11909: (l_per_return_status = FND_API.G_RET_STS_SUCCESS) AND
11910: (l_org_contact_return_status = FND_API.G_RET_STS_SUCCESS) AND
11911: (l_site_return_status = FND_API.G_RET_STS_SUCCESS) AND
11912: (l_phone_return_status = FND_API.G_RET_STS_SUCCESS) AND
11913: (l_alt_phone_return_status = FND_API.G_RET_STS_SUCCESS) AND
11914: (l_fax_return_status = FND_API.G_RET_STS_SUCCESS) AND
11915: (l_email_return_status = FND_API.G_RET_STS_SUCCESS) AND
11916: (l_url_return_status = FND_API.G_RET_STS_SUCCESS) THEN
11917:

Line 11914: (l_fax_return_status = FND_API.G_RET_STS_SUCCESS) AND

11910: (l_org_contact_return_status = FND_API.G_RET_STS_SUCCESS) AND
11911: (l_site_return_status = FND_API.G_RET_STS_SUCCESS) AND
11912: (l_phone_return_status = FND_API.G_RET_STS_SUCCESS) AND
11913: (l_alt_phone_return_status = FND_API.G_RET_STS_SUCCESS) AND
11914: (l_fax_return_status = FND_API.G_RET_STS_SUCCESS) AND
11915: (l_email_return_status = FND_API.G_RET_STS_SUCCESS) AND
11916: (l_url_return_status = FND_API.G_RET_STS_SUCCESS) THEN
11917:
11918:

Line 11915: (l_email_return_status = FND_API.G_RET_STS_SUCCESS) AND

11911: (l_site_return_status = FND_API.G_RET_STS_SUCCESS) AND
11912: (l_phone_return_status = FND_API.G_RET_STS_SUCCESS) AND
11913: (l_alt_phone_return_status = FND_API.G_RET_STS_SUCCESS) AND
11914: (l_fax_return_status = FND_API.G_RET_STS_SUCCESS) AND
11915: (l_email_return_status = FND_API.G_RET_STS_SUCCESS) AND
11916: (l_url_return_status = FND_API.G_RET_STS_SUCCESS) THEN
11917:
11918:
11919: SELECT po_vendor_contacts_s.nextval

Line 11916: (l_url_return_status = FND_API.G_RET_STS_SUCCESS) THEN

11912: (l_phone_return_status = FND_API.G_RET_STS_SUCCESS) AND
11913: (l_alt_phone_return_status = FND_API.G_RET_STS_SUCCESS) AND
11914: (l_fax_return_status = FND_API.G_RET_STS_SUCCESS) AND
11915: (l_email_return_status = FND_API.G_RET_STS_SUCCESS) AND
11916: (l_url_return_status = FND_API.G_RET_STS_SUCCESS) THEN
11917:
11918:
11919: SELECT po_vendor_contacts_s.nextval
11920: INTO l_vendor_contact_rec.vendor_contact_id

Line 12005: ELSIF (l_val_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR

12001: x_party_site_id := l_vendor_contact_rec.party_site_id;
12002:
12003: Raise_Supplier_Event( i_vendor_contact_id => x_vendor_contact_id ); -- Bug 7307669
12004:
12005: ELSIF (l_val_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12006: (l_per_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12007: (l_org_contact_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12008: (l_site_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12009: (l_phone_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR

Line 12006: (l_per_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR

12002:
12003: Raise_Supplier_Event( i_vendor_contact_id => x_vendor_contact_id ); -- Bug 7307669
12004:
12005: ELSIF (l_val_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12006: (l_per_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12007: (l_org_contact_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12008: (l_site_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12009: (l_phone_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12010: (l_alt_phone_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR

Line 12007: (l_org_contact_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR

12003: Raise_Supplier_Event( i_vendor_contact_id => x_vendor_contact_id ); -- Bug 7307669
12004:
12005: ELSIF (l_val_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12006: (l_per_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12007: (l_org_contact_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12008: (l_site_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12009: (l_phone_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12010: (l_alt_phone_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12011: (l_fax_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR

Line 12008: (l_site_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR

12004:
12005: ELSIF (l_val_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12006: (l_per_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12007: (l_org_contact_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12008: (l_site_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12009: (l_phone_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12010: (l_alt_phone_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12011: (l_fax_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12012: (l_email_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR

Line 12009: (l_phone_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR

12005: ELSIF (l_val_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12006: (l_per_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12007: (l_org_contact_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12008: (l_site_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12009: (l_phone_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12010: (l_alt_phone_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12011: (l_fax_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12012: (l_email_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12013: (l_url_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

Line 12010: (l_alt_phone_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR

12006: (l_per_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12007: (l_org_contact_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12008: (l_site_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12009: (l_phone_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12010: (l_alt_phone_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12011: (l_fax_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12012: (l_email_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12013: (l_url_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
12014:

Line 12011: (l_fax_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR

12007: (l_org_contact_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12008: (l_site_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12009: (l_phone_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12010: (l_alt_phone_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12011: (l_fax_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12012: (l_email_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12013: (l_url_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
12014:
12015: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 12012: (l_email_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR

12008: (l_site_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12009: (l_phone_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12010: (l_alt_phone_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12011: (l_fax_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12012: (l_email_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12013: (l_url_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
12014:
12015: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
12016:

Line 12013: (l_url_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

12009: (l_phone_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12010: (l_alt_phone_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12011: (l_fax_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12012: (l_email_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12013: (l_url_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
12014:
12015: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
12016:
12017: ELSE

Line 12015: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

12011: (l_fax_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12012: (l_email_return_status = FND_API.G_RET_STS_UNEXP_ERROR) OR
12013: (l_url_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
12014:
12015: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
12016:
12017: ELSE
12018:
12019: x_return_status := FND_API.G_RET_STS_ERROR;

Line 12019: x_return_status := FND_API.G_RET_STS_ERROR;

12015: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
12016:
12017: ELSE
12018:
12019: x_return_status := FND_API.G_RET_STS_ERROR;
12020: END IF;
12021:
12022: -- End of API body.
12023:

Line 12025: IF FND_API.To_Boolean( p_commit ) THEN

12021:
12022: -- End of API body.
12023:
12024: -- Standard check of p_commit.
12025: IF FND_API.To_Boolean( p_commit ) THEN
12026: COMMIT WORK;
12027: END IF;
12028:
12029: -- Standard call to get message count and if count is 1,

Line 12037: WHEN FND_API.G_EXC_ERROR THEN

12033: p_data => x_msg_data
12034: );
12035:
12036: EXCEPTION
12037: WHEN FND_API.G_EXC_ERROR THEN
12038: ROLLBACK TO Create_Vendor_Contact_PUB;
12039: x_return_status := FND_API.G_RET_STS_ERROR ;
12040: FND_MSG_PUB.Count_And_Get
12041: ( p_count => x_msg_count,

Line 12039: x_return_status := FND_API.G_RET_STS_ERROR ;

12035:
12036: EXCEPTION
12037: WHEN FND_API.G_EXC_ERROR THEN
12038: ROLLBACK TO Create_Vendor_Contact_PUB;
12039: x_return_status := FND_API.G_RET_STS_ERROR ;
12040: FND_MSG_PUB.Count_And_Get
12041: ( p_count => x_msg_count,
12042: p_data => x_msg_data
12043: );

Line 12044: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

12040: FND_MSG_PUB.Count_And_Get
12041: ( p_count => x_msg_count,
12042: p_data => x_msg_data
12043: );
12044: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
12045: ROLLBACK TO Create_Vendor_Contact_PUB;
12046: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
12047: FND_MSG_PUB.Count_And_Get
12048: ( p_count => x_msg_count,

Line 12046: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

12042: p_data => x_msg_data
12043: );
12044: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
12045: ROLLBACK TO Create_Vendor_Contact_PUB;
12046: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
12047: FND_MSG_PUB.Count_And_Get
12048: ( p_count => x_msg_count,
12049: p_data => x_msg_data
12050: );

Line 12053: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

12049: p_data => x_msg_data
12050: );
12051: WHEN OTHERS THEN
12052: ROLLBACK TO Create_Vendor_Contact_PUB;
12053: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
12054: IF FND_MSG_PUB.Check_Msg_Level
12055: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
12056: FND_MSG_PUB.Add_Exc_Msg
12057: ( G_PKG_NAME ,

Line 12069: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,

12065: END Create_Vendor_Contact;
12066:
12067: PROCEDURE Update_Vendor_Contact
12068: ( p_api_version IN NUMBER,
12069: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
12070: p_commit IN VARCHAR2 := FND_API.G_FALSE,
12071: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
12072: p_vendor_contact_rec IN r_vendor_contact_rec_type,
12073: x_return_status OUT NOCOPY VARCHAR2 ,

Line 12070: p_commit IN VARCHAR2 := FND_API.G_FALSE,

12066:
12067: PROCEDURE Update_Vendor_Contact
12068: ( p_api_version IN NUMBER,
12069: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
12070: p_commit IN VARCHAR2 := FND_API.G_FALSE,
12071: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
12072: p_vendor_contact_rec IN r_vendor_contact_rec_type,
12073: x_return_status OUT NOCOPY VARCHAR2 ,
12074: x_msg_count OUT NOCOPY NUMBER,

Line 12071: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

12067: PROCEDURE Update_Vendor_Contact
12068: ( p_api_version IN NUMBER,
12069: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
12070: p_commit IN VARCHAR2 := FND_API.G_FALSE,
12071: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
12072: p_vendor_contact_rec IN r_vendor_contact_rec_type,
12073: x_return_status OUT NOCOPY VARCHAR2 ,
12074: x_msg_count OUT NOCOPY NUMBER,
12075: x_msg_data OUT NOCOPY VARCHAR2

Line 12087: IF NOT FND_API.Compatible_API_Call ( l_api_version ,

12083: -- Standard Start of API savepoint
12084: SAVEPOINT Update_Vendor_Contact_PUB;
12085:
12086: -- Standard call to check for call compatibility.
12087: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
12088: p_api_version ,
12089: l_api_name ,
12090: G_PKG_NAME )
12091: THEN

Line 12092: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

12088: p_api_version ,
12089: l_api_name ,
12090: G_PKG_NAME )
12091: THEN
12092: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
12093: END IF;
12094:
12095: -- Initialize message list if p_init_msg_list is set to TRUE.
12096: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 12096: IF FND_API.to_Boolean( p_init_msg_list ) THEN

12092: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
12093: END IF;
12094:
12095: -- Initialize message list if p_init_msg_list is set to TRUE.
12096: IF FND_API.to_Boolean( p_init_msg_list ) THEN
12097: FND_MSG_PUB.initialize;
12098: END IF;
12099:
12100: -- Initialize API return status to success

Line 12101: x_return_status := FND_API.G_RET_STS_SUCCESS;

12097: FND_MSG_PUB.initialize;
12098: END IF;
12099:
12100: -- Initialize API return status to success
12101: x_return_status := FND_API.G_RET_STS_SUCCESS;
12102:
12103: -- API body
12104:
12105: IF ( p_vendor_contact_rec.PER_PARTY_ID IS NOT NULL AND

Line 12129: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

12125:
12126: Raise_Supplier_Event( i_vendor_contact_id => p_vendor_contact_rec.vendor_contact_id ); -- Bug 7307669
12127:
12128: ELSE
12129: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
12130: END IF;
12131:
12132: -- End of API body.
12133:

Line 12135: IF FND_API.To_Boolean( p_commit ) THEN

12131:
12132: -- End of API body.
12133:
12134: -- Standard check of p_commit.
12135: IF FND_API.To_Boolean( p_commit ) THEN
12136: COMMIT WORK;
12137: END IF;
12138:
12139: -- Standard call to get message count and if count is 1,

Line 12147: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

12143: p_data => x_msg_data
12144: );
12145:
12146: EXCEPTION
12147: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
12148: ROLLBACK TO Update_Vendor_Contact_PUB;
12149: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
12150: FND_MSG_PUB.Count_And_Get
12151: ( p_count => x_msg_count,

Line 12149: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

12145:
12146: EXCEPTION
12147: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
12148: ROLLBACK TO Update_Vendor_Contact_PUB;
12149: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
12150: FND_MSG_PUB.Count_And_Get
12151: ( p_count => x_msg_count,
12152: p_data => x_msg_data
12153: );

Line 12156: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

12152: p_data => x_msg_data
12153: );
12154: WHEN OTHERS THEN
12155: ROLLBACK TO Update_Vendor_Contact_PUB;
12156: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
12157: IF FND_MSG_PUB.Check_Msg_Level
12158: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
12159: FND_MSG_PUB.Add_Exc_Msg
12160: ( G_PKG_NAME ,

Line 12173: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,

12169:
12170:
12171: PROCEDURE Validate_Vendor_Contact
12172: ( p_api_version IN NUMBER,
12173: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
12174: p_commit IN VARCHAR2 := FND_API.G_FALSE,
12175: p_validation_level IN NUMBER :=
12176: FND_API.G_VALID_LEVEL_FULL,
12177: x_return_status OUT NOCOPY VARCHAR2 ,

Line 12174: p_commit IN VARCHAR2 := FND_API.G_FALSE,

12170:
12171: PROCEDURE Validate_Vendor_Contact
12172: ( p_api_version IN NUMBER,
12173: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
12174: p_commit IN VARCHAR2 := FND_API.G_FALSE,
12175: p_validation_level IN NUMBER :=
12176: FND_API.G_VALID_LEVEL_FULL,
12177: x_return_status OUT NOCOPY VARCHAR2 ,
12178: x_msg_count OUT NOCOPY NUMBER,

Line 12176: FND_API.G_VALID_LEVEL_FULL,

12172: ( p_api_version IN NUMBER,
12173: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
12174: p_commit IN VARCHAR2 := FND_API.G_FALSE,
12175: p_validation_level IN NUMBER :=
12176: FND_API.G_VALID_LEVEL_FULL,
12177: x_return_status OUT NOCOPY VARCHAR2 ,
12178: x_msg_count OUT NOCOPY NUMBER,
12179: x_msg_data OUT NOCOPY VARCHAR2,
12180: p_vendor_contact_rec IN OUT NOCOPY r_vendor_contact_rec_type,

Line 12205: IF NOT FND_API.Compatible_API_Call ( l_api_version ,

12201: -- Standard Start of API savepoint
12202: SAVEPOINT Validate_Vendor_Contact_PUB;
12203:
12204: -- Standard call to check for call compatibility.
12205: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
12206: p_api_version ,
12207: l_api_name ,
12208: G_PKG_NAME )
12209: THEN

Line 12210: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

12206: p_api_version ,
12207: l_api_name ,
12208: G_PKG_NAME )
12209: THEN
12210: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
12211: END IF;
12212:
12213: -- Initialize message list if p_init_msg_list is set to TRUE.
12214: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 12214: IF FND_API.to_Boolean( p_init_msg_list ) THEN

12210: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
12211: END IF;
12212:
12213: -- Initialize message list if p_init_msg_list is set to TRUE.
12214: IF FND_API.to_Boolean( p_init_msg_list ) THEN
12215: FND_MSG_PUB.initialize;
12216: END IF;
12217:
12218: -- Initialize API return status to success

Line 12219: x_return_status := FND_API.G_RET_STS_SUCCESS;

12215: FND_MSG_PUB.initialize;
12216: END IF;
12217:
12218: -- Initialize API return status to success
12219: x_return_status := FND_API.G_RET_STS_SUCCESS;
12220:
12221: -- API body
12222:
12223: -- Special logic for Import

Line 12235: x_return_status := FND_API.G_RET_STS_ERROR;

12231: 'AP_SUP_SITE_CONTACT_INT',
12232: p_vendor_contact_rec.vendor_contact_interface_id,
12233: x_valid);
12234: IF NOT x_valid THEN
12235: x_return_status := FND_API.G_RET_STS_ERROR;
12236: END IF;
12237: END IF;
12238:
12239: -- Bug 7013954 If Party_Site_Name is provided, derive the party_site_id.

Line 12254: x_return_status := FND_API.G_RET_STS_ERROR;

12250: 'AP_SUP_SITE_CONTACT_INT',
12251: p_vendor_contact_rec.vendor_contact_interface_id,
12252: x_valid);
12253: IF NOT x_valid THEN
12254: x_return_status := FND_API.G_RET_STS_ERROR;
12255: END IF;
12256: -- Vendor_Site_Id Validation
12257: -- We need to take vendor_site_id info only when party site info is null
12258: ELSIF p_vendor_contact_rec.vendor_site_id IS NOT NULL AND

Line 12266: x_return_status := FND_API.G_RET_STS_ERROR;

12262: 'AP_SUP_SITE_CONTACT_INT',
12263: p_vendor_contact_rec.vendor_contact_interface_id,
12264: x_valid);
12265: IF NOT x_valid THEN
12266: x_return_status := FND_API.G_RET_STS_ERROR;
12267: ELSE
12268: SELECT hps.party_id,
12269: hps.location_id
12270: INTO x_org_party_id,

Line 12294: x_return_status := FND_API.G_RET_STS_ERROR;

12290: 'AP_SUP_SITE_CONTACT_INT',
12291: p_vendor_contact_rec.vendor_contact_interface_id,
12292: x_valid);
12293: IF NOT x_valid THEN
12294: x_return_status := FND_API.G_RET_STS_ERROR;
12295: END IF;
12296: END IF;
12297: END IF;
12298:

Line 12316: x_return_status := FND_API.G_RET_STS_ERROR;

12312: x_valid);
12313:
12314: IF NOT x_valid THEN
12315: --party_site_id does not exist
12316: x_return_status := FND_API.G_RET_STS_ERROR;
12317: x_party_site_valid := 'F';
12318: -- Special logic for Import
12319: IF g_source = 'IMPORT' THEN
12320: IF (Insert_Rejections(

Line 12390: x_return_status := FND_API.G_RET_STS_ERROR;

12386: x_party_site_valid := 'V';
12387: x_valid := TRUE;
12388: /*
12389: -- new message
12390: x_return_status := FND_API.G_RET_STS_ERROR;
12391: -- Special logic for Import
12392: IF g_source = 'IMPORT' THEN
12393: IF (Insert_Rejections(
12394: 'AP_SUP_SITE_CONTACT_INT',

Line 12422: x_return_status := FND_API.G_RET_STS_ERROR;

12418: -- We need to first check if the org_party_site_id provided/ derived is
12419: -- valid. If x_valid is false then the party site info is invalid.
12420: IF NOT x_valid THEN
12421: --party_site_id does not exist
12422: x_return_status := FND_API.G_RET_STS_ERROR;
12423: -- Special logic for Import
12424: IF g_source = 'IMPORT' THEN
12425: IF (Insert_Rejections(
12426: 'AP_SUP_SITE_CONTACT_INT',

Line 12464: x_return_status := FND_API.G_RET_STS_ERROR;

12460: Check_Valid_Party_ID(p_vendor_contact_rec.per_party_id,
12461: x_valid);
12462:
12463: IF NOT x_valid THEN
12464: x_return_status := FND_API.G_RET_STS_ERROR;
12465: x_per_party_valid := 'F';
12466: -- Special logic for Import
12467: IF g_source = 'IMPORT' THEN
12468: IF (Insert_Rejections(

Line 12513: x_return_status := FND_API.G_RET_STS_ERROR;

12509: Check_Valid_Party_ID(p_vendor_contact_rec.rel_party_id,
12510: x_valid);
12511:
12512: IF NOT x_valid THEN
12513: x_return_status := FND_API.G_RET_STS_ERROR;
12514: x_rel_party_valid := 'F';
12515: -- Special logic for Import
12516: IF g_source = 'IMPORT' THEN
12517: IF (Insert_Rejections(

Line 12565: x_return_status := FND_API.G_RET_STS_ERROR;

12561: Check_Valid_Relationship_ID(p_vendor_contact_rec.relationship_id,
12562: x_valid);
12563:
12564: IF NOT x_valid THEN
12565: x_return_status := FND_API.G_RET_STS_ERROR;
12566: x_rel_valid := 'F';
12567: IF g_source = 'IMPORT' THEN
12568: IF (Insert_Rejections(
12569: 'AP_SUP_SITE_CONTACT_INT',

Line 12616: x_return_status := FND_API.G_RET_STS_ERROR;

12612: Check_Valid_Org_Contact_ID(p_vendor_contact_rec.org_contact_id,
12613: x_valid);
12614:
12615: IF NOT x_valid THEN
12616: x_return_status := FND_API.G_RET_STS_ERROR;
12617: x_org_contact_valid := 'F';
12618: -- Special logic for Import
12619: IF g_source = 'IMPORT' THEN
12620: IF (Insert_Rejections(

Line 12652: IF FND_API.To_Boolean( p_commit ) THEN

12648: END IF;
12649: -- End of API body.
12650:
12651: -- Standard check of p_commit.
12652: IF FND_API.To_Boolean( p_commit ) THEN
12653: COMMIT WORK;
12654: END IF;
12655:
12656: -- Standard call to get message count and if count is 1,

Line 12664: WHEN FND_API.G_EXC_ERROR THEN

12660: p_data => x_msg_data
12661: );
12662:
12663: EXCEPTION
12664: WHEN FND_API.G_EXC_ERROR THEN
12665: ROLLBACK TO Validate_Vendor_Contact_PUB;
12666: x_return_status := FND_API.G_RET_STS_ERROR ;
12667: FND_MSG_PUB.Count_And_Get
12668: ( p_count => x_msg_count,

Line 12666: x_return_status := FND_API.G_RET_STS_ERROR ;

12662:
12663: EXCEPTION
12664: WHEN FND_API.G_EXC_ERROR THEN
12665: ROLLBACK TO Validate_Vendor_Contact_PUB;
12666: x_return_status := FND_API.G_RET_STS_ERROR ;
12667: FND_MSG_PUB.Count_And_Get
12668: ( p_count => x_msg_count,
12669: p_data => x_msg_data
12670: );

Line 12671: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

12667: FND_MSG_PUB.Count_And_Get
12668: ( p_count => x_msg_count,
12669: p_data => x_msg_data
12670: );
12671: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
12672: ROLLBACK TO Validate_Vendor_Contact_PUB;
12673: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
12674: FND_MSG_PUB.Count_And_Get
12675: ( p_count => x_msg_count,

Line 12673: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

12669: p_data => x_msg_data
12670: );
12671: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
12672: ROLLBACK TO Validate_Vendor_Contact_PUB;
12673: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
12674: FND_MSG_PUB.Count_And_Get
12675: ( p_count => x_msg_count,
12676: p_data => x_msg_data
12677: );

Line 12680: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

12676: p_data => x_msg_data
12677: );
12678: WHEN OTHERS THEN
12679: ROLLBACK TO Validate_Vendor_Contact_PUB;
12680: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
12681: IF FND_MSG_PUB.Check_Msg_Level
12682: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
12683: FND_MSG_PUB.Add_Exc_Msg
12684: ( G_PKG_NAME ,

Line 12758: IF NOT FND_API.Compatible_API_Call (l_api_version,

12754: -- Standard Start of API savepoint
12755: SAVEPOINT Import_Vendor_PUB;
12756:
12757: -- Standard call to check for call compatibility.
12758: IF NOT FND_API.Compatible_API_Call (l_api_version,
12759: p_api_version,
12760: l_api_name,
12761: G_PKG_NAME )
12762: THEN

Line 12763: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

12759: p_api_version,
12760: l_api_name,
12761: G_PKG_NAME )
12762: THEN
12763: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
12764: END IF;
12765:
12766: FND_MSG_PUB.initialize;
12767:

Line 12772: x_return_status := FND_API.G_RET_STS_SUCCESS;

12768: g_user_id := FND_GLOBAL.USER_ID;
12769: g_login_id := FND_GLOBAL.LOGIN_ID;
12770: g_source := p_source;
12771: -- Initialize API return status to success
12772: x_return_status := FND_API.G_RET_STS_SUCCESS;
12773:
12774: -- API body
12775:
12776: IF g_source <> 'IMPORT' THEN

Line 12979: p_init_msg_list => FND_API.G_FALSE,

12975: -- 6458813 ends
12976:
12977: Create_Vendor
12978: ( p_api_version => 1.0,
12979: p_init_msg_list => FND_API.G_FALSE,
12980: p_commit => FND_API.G_FALSE,
12981: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
12982: x_return_status => l_return_status,
12983: x_msg_count => l_msg_count,

Line 12980: p_commit => FND_API.G_FALSE,

12976:
12977: Create_Vendor
12978: ( p_api_version => 1.0,
12979: p_init_msg_list => FND_API.G_FALSE,
12980: p_commit => FND_API.G_FALSE,
12981: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
12982: x_return_status => l_return_status,
12983: x_msg_count => l_msg_count,
12984: x_msg_data => l_msg_data,

Line 12981: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

12977: Create_Vendor
12978: ( p_api_version => 1.0,
12979: p_init_msg_list => FND_API.G_FALSE,
12980: p_commit => FND_API.G_FALSE,
12981: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
12982: x_return_status => l_return_status,
12983: x_msg_count => l_msg_count,
12984: x_msg_data => l_msg_data,
12985: p_vendor_rec => vendor_rec,

Line 12989: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

12985: p_vendor_rec => vendor_rec,
12986: x_vendor_id => l_vendor_id,
12987: x_party_id => l_party_id);
12988:
12989: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
12990:
12991: UPDATE Ap_Suppliers_Int
12992: SET status = 'PROCESSED'
12993: WHERE vendor_interface_id = vendor_rec.vendor_interface_id;

Line 13008: p_init_msg_list => FND_API.G_FALSE,

13004:
13005: /* Calling IBY Payee Validation API */
13006: IBY_DISBURSEMENT_SETUP_PUB.Validate_External_Payee
13007: ( p_api_version => 1.0,
13008: p_init_msg_list => FND_API.G_FALSE,
13009: p_ext_payee_rec => ext_payee_rec,
13010: x_return_status => l_return_status,
13011: x_msg_count => l_msg_count,
13012: x_msg_data => l_msg_data);

Line 13014: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

13010: x_return_status => l_return_status,
13011: x_msg_count => l_msg_count,
13012: x_msg_data => l_msg_data);
13013:
13014: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
13015:
13016: --bug 5568861 ext_payee_tab(ext_payee_tab.first) := ext_payee_rec;
13017: ext_payee_tab(1) := ext_payee_rec;
13018:

Line 13022: p_init_msg_list => FND_API.G_FALSE,

13018:
13019: /*Calling IBY Payee Creation API */
13020: IBY_DISBURSEMENT_SETUP_PUB.Create_External_Payee
13021: ( p_api_version => 1.0,
13022: p_init_msg_list => FND_API.G_FALSE,
13023: p_ext_payee_tab => ext_payee_tab,
13024: x_return_status => l_return_status,
13025: x_msg_count => l_msg_count,
13026: x_msg_data => l_msg_data,

Line 13030: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

13026: x_msg_data => l_msg_data,
13027: x_ext_payee_id_tab => ext_payee_id_tab,
13028: x_ext_payee_status_tab => ext_payee_create_tab);
13029:
13030: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
13031: --bug 5568861
13032: l_ext_payee_id := ext_payee_id_tab(1).ext_payee_id;
13033:
13034: UPDATE IBY_TEMP_EXT_BANK_ACCTS

Line 13050: p_init_msg_list => FND_API.G_FALSE,

13046:
13047: /* Calling IBY Bank Account Validation API */
13048: IBY_DISBURSEMENT_SETUP_PUB.Validate_Temp_Ext_Bank_Acct
13049: ( p_api_version => 1.0,
13050: p_init_msg_list => FND_API.G_FALSE,
13051: x_return_status => l_return_status,
13052: x_msg_count => l_msg_count,
13053: x_msg_data => l_msg_data,
13054: p_temp_ext_acct_id => l_temp_ext_acct_id);

Line 13056: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

13052: x_msg_count => l_msg_count,
13053: x_msg_data => l_msg_data,
13054: p_temp_ext_acct_id => l_temp_ext_acct_id);
13055:
13056: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
13057: /* Calling IBY Bank Account Creation API */
13058: -- Bug 6845995. Calling overloaded procedure
13059: -- which will create the association between
13060: -- supplier and bank account.

Line 13063: p_init_msg_list => FND_API.G_FALSE,

13059: -- which will create the association between
13060: -- supplier and bank account.
13061: IBY_DISBURSEMENT_SETUP_PUB.Create_Temp_Ext_Bank_Acct
13062: ( p_api_version => 1.0,
13063: p_init_msg_list => FND_API.G_FALSE,
13064: x_return_status => l_return_status,
13065: x_msg_count => l_msg_count,
13066: x_msg_data => l_msg_data,
13067: p_temp_ext_acct_id => l_temp_ext_acct_id,

Line 13076: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

13072: p_org_type => null, -- veramach added p_org_type as a new paramter for bug 7153777
13073: x_bank_acc_id => l_bank_acct_id,
13074: x_response => ext_response_rec);
13075:
13076: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
13077: UPDATE iby_temp_ext_bank_accts
13078: SET status = 'PROCESSED'
13079: WHERE temp_ext_bank_acct_id = l_temp_ext_acct_id;
13080:

Line 13229: WHEN FND_API.G_EXC_ERROR THEN

13225: p_data => x_msg_data
13226: );
13227:
13228: EXCEPTION
13229: WHEN FND_API.G_EXC_ERROR THEN
13230: ROLLBACK TO Import_Vendor_PUB;
13231: x_return_status := FND_API.G_RET_STS_ERROR ;
13232: FND_MSG_PUB.Count_And_Get
13233: ( p_count => x_msg_count,

Line 13231: x_return_status := FND_API.G_RET_STS_ERROR ;

13227:
13228: EXCEPTION
13229: WHEN FND_API.G_EXC_ERROR THEN
13230: ROLLBACK TO Import_Vendor_PUB;
13231: x_return_status := FND_API.G_RET_STS_ERROR ;
13232: FND_MSG_PUB.Count_And_Get
13233: ( p_count => x_msg_count,
13234: p_data => x_msg_data
13235: );

Line 13236: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

13232: FND_MSG_PUB.Count_And_Get
13233: ( p_count => x_msg_count,
13234: p_data => x_msg_data
13235: );
13236: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
13237: ROLLBACK TO Import_Vendor_PUB;
13238: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
13239: FND_MSG_PUB.Count_And_Get
13240: ( p_count => x_msg_count,

Line 13238: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

13234: p_data => x_msg_data
13235: );
13236: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
13237: ROLLBACK TO Import_Vendor_PUB;
13238: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
13239: FND_MSG_PUB.Count_And_Get
13240: ( p_count => x_msg_count,
13241: p_data => x_msg_data
13242: );

Line 13245: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

13241: p_data => x_msg_data
13242: );
13243: WHEN OTHERS THEN
13244: ROLLBACK TO Import_Vendor_PUB;
13245: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
13246: IF FND_MSG_PUB.Check_Msg_Level
13247: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
13248: FND_MSG_PUB.Add_Exc_Msg
13249: ( G_PKG_NAME,

Line 13325: IF NOT FND_API.Compatible_API_Call (l_api_version,

13321: -- Standard Start of API savepoint
13322: SAVEPOINT Import_Vendor_Sites_PUB;
13323:
13324: -- Standard call to check for call compatibility.
13325: IF NOT FND_API.Compatible_API_Call (l_api_version,
13326: p_api_version,
13327: l_api_name,
13328: G_PKG_NAME )
13329: THEN

Line 13330: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

13326: p_api_version,
13327: l_api_name,
13328: G_PKG_NAME )
13329: THEN
13330: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
13331: END IF;
13332:
13333: FND_MSG_PUB.initialize;
13334:

Line 13339: x_return_status := FND_API.G_RET_STS_SUCCESS;

13335: g_user_id := FND_GLOBAL.USER_ID;
13336: g_login_id := FND_GLOBAL.LOGIN_ID;
13337: g_source := p_source;
13338: -- Initialize API return status to success
13339: x_return_status := FND_API.G_RET_STS_SUCCESS;
13340:
13341: -- API body
13342:
13343: IF g_source <> 'IMPORT' THEN

Line 13591: p_init_msg_list => FND_API.G_FALSE,

13587: site_rec.offset_tax_flag := site_int_rec.offset_tax_flag ;
13588:
13589: Create_Vendor_Site
13590: ( p_api_version => 1.0,
13591: p_init_msg_list => FND_API.G_FALSE,
13592: p_commit => FND_API.G_FALSE,
13593: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
13594: x_return_status => l_return_status,
13595: x_msg_count => l_msg_count,

Line 13592: p_commit => FND_API.G_FALSE,

13588:
13589: Create_Vendor_Site
13590: ( p_api_version => 1.0,
13591: p_init_msg_list => FND_API.G_FALSE,
13592: p_commit => FND_API.G_FALSE,
13593: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
13594: x_return_status => l_return_status,
13595: x_msg_count => l_msg_count,
13596: x_msg_data => l_msg_data,

Line 13593: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

13589: Create_Vendor_Site
13590: ( p_api_version => 1.0,
13591: p_init_msg_list => FND_API.G_FALSE,
13592: p_commit => FND_API.G_FALSE,
13593: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
13594: x_return_status => l_return_status,
13595: x_msg_count => l_msg_count,
13596: x_msg_data => l_msg_data,
13597: p_vendor_site_rec => site_rec,

Line 13602: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

13598: x_vendor_site_id => l_vendor_site_id,
13599: x_party_site_id => l_party_site_id,
13600: x_location_id => l_location_id);
13601:
13602: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
13603:
13604: UPDATE Ap_Supplier_Sites_Int
13605: SET status = 'PROCESSED'
13606: WHERE vendor_site_interface_id =

Line 13638: p_init_msg_list => FND_API.G_FALSE,

13634:
13635: /* Calling IBY Payee Validation API */
13636: IBY_DISBURSEMENT_SETUP_PUB.Validate_External_Payee
13637: ( p_api_version => 1.0,
13638: p_init_msg_list => FND_API.G_FALSE,
13639: p_ext_payee_rec => ext_payee_rec,
13640: x_return_status => l_return_status,
13641: x_msg_count => l_msg_count,
13642: x_msg_data => l_msg_data);

Line 13644: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

13640: x_return_status => l_return_status,
13641: x_msg_count => l_msg_count,
13642: x_msg_data => l_msg_data);
13643:
13644: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
13645:
13646: --bug 5569961 ext_payee_tab(ext_payee_tab.first) := ext_payee_rec;
13647: ext_payee_tab(1) := ext_payee_rec;
13648:

Line 13652: p_init_msg_list => FND_API.G_FALSE,

13648:
13649: /* Calling IBY Payee Creation API */
13650: IBY_DISBURSEMENT_SETUP_PUB.Create_External_Payee
13651: ( p_api_version => 1.0,
13652: p_init_msg_list => FND_API.G_FALSE,
13653: p_ext_payee_tab => ext_payee_tab,
13654: x_return_status => l_return_status,
13655: x_msg_count => l_msg_count,
13656: x_msg_data => l_msg_data,

Line 13660: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

13656: x_msg_data => l_msg_data,
13657: x_ext_payee_id_tab => ext_payee_id_tab,
13658: x_ext_payee_status_tab => ext_payee_create_tab);
13659:
13660: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
13661: --bug 5568861 l_ext_payee_id := ext_payee_id_tab(ext_payee_id_tab.first).ext_payee_id;
13662: l_ext_payee_id := ext_payee_id_tab(1).ext_payee_id;
13663:
13664: UPDATE IBY_TEMP_EXT_BANK_ACCTS

Line 13680: p_init_msg_list => FND_API.G_FALSE,

13676:
13677: /* Calling IBY Bank Account Validation API */
13678: IBY_DISBURSEMENT_SETUP_PUB.Validate_Temp_Ext_Bank_Acct
13679: ( p_api_version => 1.0,
13680: p_init_msg_list => FND_API.G_FALSE,
13681: x_return_status => l_return_status,
13682: x_msg_count => l_msg_count,
13683: x_msg_data => l_msg_data,
13684: p_temp_ext_acct_id => l_temp_ext_acct_id);

Line 13686: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

13682: x_msg_count => l_msg_count,
13683: x_msg_data => l_msg_data,
13684: p_temp_ext_acct_id => l_temp_ext_acct_id);
13685:
13686: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
13687: /* Calling IBY Bank Account Creation API */
13688: -- Bug 6845995. Calling overloaded procedure
13689: -- which will create the association between
13690: -- supplier site and bank account.

Line 13693: p_init_msg_list => FND_API.G_FALSE,

13689: -- which will create the association between
13690: -- supplier site and bank account.
13691: IBY_DISBURSEMENT_SETUP_PUB.Create_Temp_Ext_Bank_Acct
13692: ( p_api_version => 1.0,
13693: p_init_msg_list => FND_API.G_FALSE,
13694: x_return_status => l_return_status,
13695: x_msg_count => l_msg_count,
13696: x_msg_data => l_msg_data,
13697: p_temp_ext_acct_id => l_temp_ext_acct_id,

Line 13706: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

13702: p_org_type => 'OPERATING_UNIT', -- veramach added p_org_type as a new paramter for bug 7153777
13703: x_bank_acc_id => l_bank_acct_id,
13704: x_response => ext_response_rec);
13705:
13706: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
13707: UPDATE iby_temp_ext_bank_accts
13708: SET status = 'PROCESSED'
13709: WHERE temp_ext_bank_acct_id = l_temp_ext_acct_id;
13710:

Line 13861: WHEN FND_API.G_EXC_ERROR THEN

13857: p_data => x_msg_data
13858: );
13859:
13860: EXCEPTION
13861: WHEN FND_API.G_EXC_ERROR THEN
13862: ROLLBACK TO Import_Vendor_Sites_PUB;
13863: x_return_status := FND_API.G_RET_STS_ERROR ;
13864: FND_MSG_PUB.Count_And_Get
13865: ( p_count => x_msg_count,

Line 13863: x_return_status := FND_API.G_RET_STS_ERROR ;

13859:
13860: EXCEPTION
13861: WHEN FND_API.G_EXC_ERROR THEN
13862: ROLLBACK TO Import_Vendor_Sites_PUB;
13863: x_return_status := FND_API.G_RET_STS_ERROR ;
13864: FND_MSG_PUB.Count_And_Get
13865: ( p_count => x_msg_count,
13866: p_data => x_msg_data
13867: );

Line 13868: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

13864: FND_MSG_PUB.Count_And_Get
13865: ( p_count => x_msg_count,
13866: p_data => x_msg_data
13867: );
13868: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
13869: ROLLBACK TO Import_Vendor_Sites_PUB;
13870: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
13871: FND_MSG_PUB.Count_And_Get
13872: ( p_count => x_msg_count,

Line 13870: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

13866: p_data => x_msg_data
13867: );
13868: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
13869: ROLLBACK TO Import_Vendor_Sites_PUB;
13870: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
13871: FND_MSG_PUB.Count_And_Get
13872: ( p_count => x_msg_count,
13873: p_data => x_msg_data
13874: );

Line 13877: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

13873: p_data => x_msg_data
13874: );
13875: WHEN OTHERS THEN
13876: ROLLBACK TO Import_Vendor_Sites_PUB;
13877: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
13878: IF FND_MSG_PUB.Check_Msg_Level
13879: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
13880: FND_MSG_PUB.Add_Exc_Msg
13881: ( G_PKG_NAME,

Line 13940: IF NOT FND_API.Compatible_API_Call (l_api_version,

13936:
13937: BEGIN
13938:
13939: -- Standard call to check for call compatibility.
13940: IF NOT FND_API.Compatible_API_Call (l_api_version,
13941: p_api_version,
13942: l_api_name,
13943: G_PKG_NAME )
13944: THEN

Line 13945: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

13941: p_api_version,
13942: l_api_name,
13943: G_PKG_NAME )
13944: THEN
13945: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
13946: END IF;
13947:
13948: FND_MSG_PUB.initialize;
13949:

Line 13954: x_return_status := FND_API.G_RET_STS_SUCCESS;

13950: g_user_id := FND_GLOBAL.USER_ID;
13951: g_login_id := FND_GLOBAL.LOGIN_ID;
13952: g_source := p_source;
13953: -- Initialize API return status to success
13954: x_return_status := FND_API.G_RET_STS_SUCCESS;
13955:
13956: -- API body
13957:
13958: IF g_source <> 'IMPORT' THEN

Line 14088: p_init_msg_list => FND_API.G_FALSE,

14084: -- Bug 7013954 end
14085:
14086: Create_Vendor_Contact
14087: ( p_api_version => 1.0,
14088: p_init_msg_list => FND_API.G_FALSE,
14089: p_commit => FND_API.G_FALSE,
14090: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
14091: x_return_status => l_return_status,
14092: x_msg_count => l_msg_count,

Line 14089: p_commit => FND_API.G_FALSE,

14085:
14086: Create_Vendor_Contact
14087: ( p_api_version => 1.0,
14088: p_init_msg_list => FND_API.G_FALSE,
14089: p_commit => FND_API.G_FALSE,
14090: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
14091: x_return_status => l_return_status,
14092: x_msg_count => l_msg_count,
14093: x_msg_data => l_msg_data,

Line 14090: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

14086: Create_Vendor_Contact
14087: ( p_api_version => 1.0,
14088: p_init_msg_list => FND_API.G_FALSE,
14089: p_commit => FND_API.G_FALSE,
14090: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
14091: x_return_status => l_return_status,
14092: x_msg_count => l_msg_count,
14093: x_msg_data => l_msg_data,
14094: p_vendor_contact_rec => vendor_contact_rec,

Line 14102: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

14098: x_rel_id => l_rel_id,
14099: x_org_contact_id => l_org_contact_id,
14100: x_party_site_id => l_party_site_id);
14101:
14102: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
14103:
14104: UPDATE Ap_Sup_Site_Contact_Int
14105: SET status = 'PROCESSED'
14106: WHERE CURRENT OF contact_int_cur; --Bug6413297

Line 14145: WHEN FND_API.G_EXC_ERROR THEN

14141: p_data => x_msg_data
14142: );
14143:
14144: EXCEPTION
14145: WHEN FND_API.G_EXC_ERROR THEN
14146: ROLLBACK TO Import_Vendor_Contact_PUB;
14147: x_return_status := FND_API.G_RET_STS_ERROR ;
14148: FND_MSG_PUB.Count_And_Get
14149: ( p_count => x_msg_count,

Line 14147: x_return_status := FND_API.G_RET_STS_ERROR ;

14143:
14144: EXCEPTION
14145: WHEN FND_API.G_EXC_ERROR THEN
14146: ROLLBACK TO Import_Vendor_Contact_PUB;
14147: x_return_status := FND_API.G_RET_STS_ERROR ;
14148: FND_MSG_PUB.Count_And_Get
14149: ( p_count => x_msg_count,
14150: p_data => x_msg_data
14151: );

Line 14152: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

14148: FND_MSG_PUB.Count_And_Get
14149: ( p_count => x_msg_count,
14150: p_data => x_msg_data
14151: );
14152: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
14153: ROLLBACK TO Import_Vendor_Contact_PUB;
14154: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
14155: FND_MSG_PUB.Count_And_Get
14156: ( p_count => x_msg_count,

Line 14154: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

14150: p_data => x_msg_data
14151: );
14152: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
14153: ROLLBACK TO Import_Vendor_Contact_PUB;
14154: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
14155: FND_MSG_PUB.Count_And_Get
14156: ( p_count => x_msg_count,
14157: p_data => x_msg_data
14158: );

Line 14161: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

14157: p_data => x_msg_data
14158: );
14159: WHEN OTHERS THEN
14160: ROLLBACK TO Import_Vendor_Contact_PUB;
14161: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
14162: IF FND_MSG_PUB.Check_Msg_Level
14163: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
14164: FND_MSG_PUB.Add_Exc_Msg
14165: ( G_PKG_NAME,

Line 14181: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

14177: --
14178:
14179: PROCEDURE Update_Address_Assignments_DFF(
14180: p_api_version IN NUMBER,
14181: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
14182: p_commit IN VARCHAR2 := FND_API.G_FALSE,
14183: p_contact_party_id IN NUMBER,
14184: p_org_party_site_id IN NUMBER,
14185: p_attribute_category IN VARCHAR2 DEFAULT NULL,

Line 14182: p_commit IN VARCHAR2 := FND_API.G_FALSE,

14178:
14179: PROCEDURE Update_Address_Assignments_DFF(
14180: p_api_version IN NUMBER,
14181: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
14182: p_commit IN VARCHAR2 := FND_API.G_FALSE,
14183: p_contact_party_id IN NUMBER,
14184: p_org_party_site_id IN NUMBER,
14185: p_attribute_category IN VARCHAR2 DEFAULT NULL,
14186: p_attribute1 IN VARCHAR2 DEFAULT NULL,

Line 14218: IF NOT FND_API.Compatible_API_Call ( l_api_version ,

14214: -- Standard Start of API savepoint
14215: SAVEPOINT Update_Address_Assign_DFF_PUB;
14216:
14217: -- Standard call to check for call compatibility.
14218: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
14219: p_api_version ,
14220: l_api_name ,
14221: G_PKG_NAME )
14222: THEN

Line 14223: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

14219: p_api_version ,
14220: l_api_name ,
14221: G_PKG_NAME )
14222: THEN
14223: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
14224: END IF;
14225:
14226: -- Initialize message list if p_init_msg_list is set to TRUE.
14227: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 14227: IF FND_API.to_Boolean( p_init_msg_list ) THEN

14223: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
14224: END IF;
14225:
14226: -- Initialize message list if p_init_msg_list is set to TRUE.
14227: IF FND_API.to_Boolean( p_init_msg_list ) THEN
14228: FND_MSG_PUB.initialize;
14229: END IF;
14230:
14231: -- Initialize API return status to success

Line 14232: x_return_status := FND_API.G_RET_STS_SUCCESS;

14228: FND_MSG_PUB.initialize;
14229: END IF;
14230:
14231: -- Initialize API return status to success
14232: x_return_status := FND_API.G_RET_STS_SUCCESS;
14233:
14234: -- API body
14235:
14236:

Line 14295: IF FND_API.To_Boolean( p_commit ) THEN

14291:
14292: -- End of API body.
14293:
14294: -- Standard check of p_commit.
14295: IF FND_API.To_Boolean( p_commit ) THEN
14296: COMMIT WORK;
14297: END IF;
14298:
14299: -- Standard call to get message count and if count is 1,

Line 14307: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

14303: p_data => x_msg_data
14304: );
14305:
14306: EXCEPTION
14307: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
14308: ROLLBACK TO Update_Address_Assign_DFF_PUB;
14309: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
14310: FND_MSG_PUB.Count_And_Get
14311: ( p_count => x_msg_count,

Line 14309: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

14305:
14306: EXCEPTION
14307: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
14308: ROLLBACK TO Update_Address_Assign_DFF_PUB;
14309: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
14310: FND_MSG_PUB.Count_And_Get
14311: ( p_count => x_msg_count,
14312: p_data => x_msg_data
14313: );

Line 14316: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

14312: p_data => x_msg_data
14313: );
14314: WHEN OTHERS THEN
14315: ROLLBACK TO Update_Address_Assign_DFF_PUB;
14316: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
14317: IF FND_MSG_PUB.Check_Msg_Level
14318: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
14319: FND_MSG_PUB.Add_Exc_Msg
14320: ( G_PKG_NAME ,