50: WHERE vendor_id = p_dup_vendor_id
51: AND vendor_site_id = p_dup_vendor_site_id;
52:
53: -- Prepare message name
54: FND_MESSAGE.SET_NAME('PN','PN_PAYMENT_TERMS');
55: IF SQL%FOUND THEN
56: x_return_status := FND_API.G_RET_STS_SUCCESS;
57: l_row_count := SQL%ROWCOUNT;
58: ELSE
57: l_row_count := SQL%ROWCOUNT;
58: ELSE
59: l_row_count := 0;
60: END IF;
61: FND_MESSAGE.SET_TOKEN('ROWS_UPDATED',l_row_count);
62: -- Add message to API message list.
63: FND_MSG_PUB.Add;
64:
65:
71: WHERE vendor_id = p_dup_vendor_id
72: AND vendor_site_id = p_dup_vendor_site_id;
73:
74: -- Prepare message name
75: FND_MESSAGE.SET_NAME('PN','PN_PAYMENT_ITEMS');
76: IF SQL%FOUND THEN
77: x_return_status := FND_API.G_RET_STS_SUCCESS;
78: l_row_count := SQL%ROWCOUNT;
79: ELSE
78: l_row_count := SQL%ROWCOUNT;
79: ELSE
80: l_row_count := 0;
81: END IF;
82: FND_MESSAGE.SET_TOKEN('ROWS_UPDATED',l_row_count);
83: -- Add message to API message list.
84: FND_MSG_PUB.Add;
85:
86:
92: WHERE vendor_id = p_dup_vendor_id
93: AND vendor_site_id = p_dup_vendor_site_id;
94:
95: -- Prepare message name
96: FND_MESSAGE.SET_NAME('PN','PN_TERM_TEMPLATES');
97: IF SQL%FOUND THEN
98: x_return_status := FND_API.G_RET_STS_SUCCESS;
99: l_row_count := SQL%ROWCOUNT;
100: ELSE
99: l_row_count := SQL%ROWCOUNT;
100: ELSE
101: l_row_count := 0;
102: END IF;
103: FND_MESSAGE.SET_TOKEN('ROWS_UPDATED',l_row_count);
104: -- Add message to API message list.
105: FND_MSG_PUB.Add;
106:
107: UPDATE pn_payment_terms_history
112: WHERE vendor_id = p_dup_vendor_id
113: AND vendor_site_id = p_dup_vendor_site_id;
114:
115: -- Prepare message name
116: FND_MESSAGE.SET_NAME('PN','PN_PAYMENT_TERMS_HISTORY');
117: IF SQL%FOUND THEN
118: x_return_status := FND_API.G_RET_STS_SUCCESS;
119: l_row_count := SQL%ROWCOUNT;
120: ELSE
119: l_row_count := SQL%ROWCOUNT;
120: ELSE
121: l_row_count := 0;
122: END IF;
123: FND_MESSAGE.SET_TOKEN('ROWS_UPDATED',l_row_count);
124: -- Add message to API message list.
125: FND_MSG_PUB.Add;
126:
127: -- Get message count and if 1, return message data.