510: end rollback_row;
511:
512: FUNCTION Query_Row
513: ( p_pull_sequence_id IN NUMBER
514: ) RETURN INV_Kanban_PVT.Pull_Sequence_Rec_Type
515: IS
516: l_pull_sequence_rec INV_Kanban_PVT.Pull_Sequence_Rec_Type;
517: BEGIN
518:
512: FUNCTION Query_Row
513: ( p_pull_sequence_id IN NUMBER
514: ) RETURN INV_Kanban_PVT.Pull_Sequence_Rec_Type
515: IS
516: l_pull_sequence_rec INV_Kanban_PVT.Pull_Sequence_Rec_Type;
517: BEGIN
518:
519: SELECT PULL_SEQUENCE_ID
520: , INVENTORY_ITEM_ID
666:
667: END Query_Row;
668:
669: FUNCTION Convert_Miss_To_Null
670: ( p_pull_sequence_rec IN INV_Kanban_PVT.Pull_Sequence_Rec_Type
671: ) RETURN INV_Kanban_PVT.Pull_Sequence_Rec_Type
672: IS
673: l_pull_sequence_rec INV_Kanban_PVT.Pull_Sequence_Rec_Type := p_pull_sequence_rec;
674: BEGIN
667: END Query_Row;
668:
669: FUNCTION Convert_Miss_To_Null
670: ( p_pull_sequence_rec IN INV_Kanban_PVT.Pull_Sequence_Rec_Type
671: ) RETURN INV_Kanban_PVT.Pull_Sequence_Rec_Type
672: IS
673: l_pull_sequence_rec INV_Kanban_PVT.Pull_Sequence_Rec_Type := p_pull_sequence_rec;
674: BEGIN
675:
669: FUNCTION Convert_Miss_To_Null
670: ( p_pull_sequence_rec IN INV_Kanban_PVT.Pull_Sequence_Rec_Type
671: ) RETURN INV_Kanban_PVT.Pull_Sequence_Rec_Type
672: IS
673: l_pull_sequence_rec INV_Kanban_PVT.Pull_Sequence_Rec_Type := p_pull_sequence_rec;
674: BEGIN
675:
676: IF l_pull_sequence_rec.pull_sequence_id = FND_API.G_MISS_NUM THEN
677: l_pull_sequence_rec.pull_sequence_id := NULL;
902:
903: END Convert_Miss_To_Null;
904:
905: FUNCTION Complete_Record
906: ( p_pull_sequence_rec IN INV_Kanban_PVT.Pull_Sequence_Rec_Type
907: , p_old_pull_sequence_rec IN INV_Kanban_PVT.Pull_Sequence_Rec_Type
908: ) RETURN INV_Kanban_PVT.Pull_Sequence_Rec_Type
909: IS
910: l_pull_sequence_rec INV_Kanban_PVT.Pull_Sequence_Rec_Type := p_pull_sequence_rec;
903: END Convert_Miss_To_Null;
904:
905: FUNCTION Complete_Record
906: ( p_pull_sequence_rec IN INV_Kanban_PVT.Pull_Sequence_Rec_Type
907: , p_old_pull_sequence_rec IN INV_Kanban_PVT.Pull_Sequence_Rec_Type
908: ) RETURN INV_Kanban_PVT.Pull_Sequence_Rec_Type
909: IS
910: l_pull_sequence_rec INV_Kanban_PVT.Pull_Sequence_Rec_Type := p_pull_sequence_rec;
911: BEGIN
904:
905: FUNCTION Complete_Record
906: ( p_pull_sequence_rec IN INV_Kanban_PVT.Pull_Sequence_Rec_Type
907: , p_old_pull_sequence_rec IN INV_Kanban_PVT.Pull_Sequence_Rec_Type
908: ) RETURN INV_Kanban_PVT.Pull_Sequence_Rec_Type
909: IS
910: l_pull_sequence_rec INV_Kanban_PVT.Pull_Sequence_Rec_Type := p_pull_sequence_rec;
911: BEGIN
912:
906: ( p_pull_sequence_rec IN INV_Kanban_PVT.Pull_Sequence_Rec_Type
907: , p_old_pull_sequence_rec IN INV_Kanban_PVT.Pull_Sequence_Rec_Type
908: ) RETURN INV_Kanban_PVT.Pull_Sequence_Rec_Type
909: IS
910: l_pull_sequence_rec INV_Kanban_PVT.Pull_Sequence_Rec_Type := p_pull_sequence_rec;
911: BEGIN
912:
913: IF l_pull_sequence_rec.pull_sequence_id = FND_API.G_MISS_NUM THEN
914: l_pull_sequence_rec.pull_sequence_id := p_old_pull_sequence_rec.pull_sequence_id;
1379: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1380:
1381: End Insert_Row;
1382: */
1383: Procedure Insert_Row(p_pull_sequence_rec INV_Kanban_PVT.Pull_Sequence_Rec_Type)
1384: Is
1385: l_Pull_sequence_rec INV_Kanban_PVT.Pull_Sequence_Rec_Type :=
1386: p_pull_sequence_rec;
1387: l_return_status Varchar2(1);
1381: End Insert_Row;
1382: */
1383: Procedure Insert_Row(p_pull_sequence_rec INV_Kanban_PVT.Pull_Sequence_Rec_Type)
1384: Is
1385: l_Pull_sequence_rec INV_Kanban_PVT.Pull_Sequence_Rec_Type :=
1386: p_pull_sequence_rec;
1387: l_return_status Varchar2(1);
1388:
1389: Begin
1855:
1856: END Update_Row;
1857: */
1858: PROCEDURE Update_Row(
1859: p_pull_sequence_rec INV_Kanban_PVT.Pull_sequence_Rec_Type)
1860: Is
1861:
1862: l_return_status Varchar2(1);
1863:
1972: l_return_status varchar2(1) := FND_API.G_RET_STS_ERROR;
1973:
1974: BEGIN
1975: FND_MSG_PUB.Initialize;
1976: if INV_Kanban_PVT.Ok_To_Delete_Pull_Sequence(p_pull_sequence_Id)
1977: then
1978:
1979: DELETE FROM MTL_KANBAN_PULL_SEQUENCES
1980: WHERE pull_sequence_id = p_pull_sequence_id;