11: p_msg in varchar2)
12: IS
13: l_module varchar2(2000);
14: BEGIN
15: /* Taken from Package FND_LOG
16: LEVEL_UNEXPECTED CONSTANT NUMBER := 6;
17: LEVEL_ERROR CONSTANT NUMBER := 5;
18: LEVEL_EXCEPTION CONSTANT NUMBER := 4;
19: LEVEL_EVENT CONSTANT NUMBER := 3;
23:
24: IF(l_fnd_debug = 'Y')THEN
25: l_module := 'pos.plsql.pos_asn_create_pvt.'||p_api_name;
26:
27: IF ( p_level >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
28: FND_LOG.string( LOG_LEVEL => p_level,
29: MODULE => l_module,
30: MESSAGE => p_msg);
31: END IF;
24: IF(l_fnd_debug = 'Y')THEN
25: l_module := 'pos.plsql.pos_asn_create_pvt.'||p_api_name;
26:
27: IF ( p_level >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
28: FND_LOG.string( LOG_LEVEL => p_level,
29: MODULE => l_module,
30: MESSAGE => p_msg);
31: END IF;
32:
200:
201: exception when others then
202: x_return_status := 'U';
203: x_msg_data := 'Unexpected Error:'||sqlerrm;
204: LOG(FND_LOG.LEVEL_UNEXPECTED,l_api_name,l_progress||':'||sqlerrm);
205: END insert_msni;
206:
207: /**
208: * Public Procedure: insert_mtli
458:
459: exception when others then
460: x_return_status := 'U';
461: x_msg_data := 'Unexpected Error:'||sqlerrm;
462: LOG(FND_LOG.LEVEL_UNEXPECTED,l_api_name,l_progress||':'||sqlerrm);
463: END insert_mtli;
464:
465: procedure insert_wlpni
466: (p_api_version IN NUMBER
567:
568: end if;
569:
570: EXCEPTION WHEN OTHERS THEN
571: LOG(FND_LOG.LEVEL_UNEXPECTED,l_api_name,l_progress||':'||sqlerrm);
572: x_return_status := 'U';
573: x_msg_data := 'Unexpected Error:'||sqlerrm;
574: END insert_wlpni;
575:
641:
642: exception when others then
643: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
644: x_return_msg := 'Unexpected Error at POSVASNB.pls.ValidateSerialRange:'||sqlerrm;
645: LOG(FND_LOG.LEVEL_UNEXPECTED,l_api_name,l_progress||':'||sqlerrm);
646: END ValidateSerialRange;
647:
648: procedure ValidateLpn( p_api_version in number,
649: x_return_status out nocopy varchar2,
714: x_return_status := FND_API.G_RET_STS_SUCCESS;
715: exception when others then
716: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
717: x_return_msg := 'Unexpected Error at POSVASNB.pls.ValidateLpn:'||sqlerrm;
718: LOG(FND_LOG.LEVEL_UNEXPECTED,l_api_name,l_progress||':'||sqlerrm);
719: END ValidateLpn;
720:
721: procedure ValidateLot(
722: p_api_version in number,
885: x_return_status := FND_API.G_RET_STS_SUCCESS;
886: EXCEPTION WHEN OTHERS THEN
887: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
888: x_return_msg := 'Unexpected Error at POSVASNB.pls.ValidateLot:'||sqlerrm;
889: LOG(FND_LOG.LEVEL_UNEXPECTED,l_api_name,l_progress||':'||sqlerrm);
890: END ValidateLot;
891:
892: procedure findLlsCode(p_line_location_id in number, x_llsCode out nocopy varchar2)
893: IS
935: x_llsCode := 'LPN';
936: end if;
937: end if;
938: exception when others then
939: LOG(FND_LOG.LEVEL_UNEXPECTED,l_api_name,l_progress||':'||sqlerrm);
940: x_llsCode := 'ERR:'||sqlerrm;
941:
942: END findLlsCode;
943:
1720:
1721: p_return_status := 'S';
1722:
1723: EXCEPTION WHEN OTHERS THEN
1724: LOG(FND_LOG.LEVEL_UNEXPECTED,l_api_name,l_progress||':'||sqlerrm);
1725: p_return_status := 'E';
1726: p_return_msg := 'Unexpected Error:'||sqlerrm;
1727:
1728:
1850:
1851:
1852:
1853: EXCEPTION WHEN OTHERS THEN
1854: LOG(FND_LOG.LEVEL_UNEXPECTED,l_api_name,l_progress||':'||sqlerrm);
1855: RETURN NULL;
1856:
1857: END get_total_shippedquantity;
1858: