6: G_PKG_NAME CONSTANT VARCHAR2(30) := 'WIP_Default_Shopfloormove';
7:
8: -- Package global used within the package.
9:
10: g_ShopFloorMove_rec WIP_Transaction_PUB.Shopfloormove_Rec_Type;
11: g_OSP_rec WIP_Transaction_PUB.Res_Rec_Type;
12: g_Wip_Entities_rec WIP_Work_Order_PUB.Wip_Entities_Rec_Type;
13: g_osp_mov_details WIP_Transaction_PUB.OSP_Move_Details_Type;
14:
7:
8: -- Package global used within the package.
9:
10: g_ShopFloorMove_rec WIP_Transaction_PUB.Shopfloormove_Rec_Type;
11: g_OSP_rec WIP_Transaction_PUB.Res_Rec_Type;
12: g_Wip_Entities_rec WIP_Work_Order_PUB.Wip_Entities_Rec_Type;
13: g_osp_mov_details WIP_Transaction_PUB.OSP_Move_Details_Type;
14:
15: -- Get functions.
9:
10: g_ShopFloorMove_rec WIP_Transaction_PUB.Shopfloormove_Rec_Type;
11: g_OSP_rec WIP_Transaction_PUB.Res_Rec_Type;
12: g_Wip_Entities_rec WIP_Work_Order_PUB.Wip_Entities_Rec_Type;
13: g_osp_mov_details WIP_Transaction_PUB.OSP_Move_Details_Type;
14:
15: -- Get functions.
16:
17: PROCEDURE get_we_attr
407: IF g_osp_mov_details.transaction_quantity IS NULL THEN
408: g_osp_mov_details.transaction_quantity := l_transaction_quantity;
409: END IF;
410:
411: IF g_OSP_rec.action = WIP_Transaction_PUB.G_ACT_OSP_RET_TO_RCV
412: OR g_OSP_rec.action = WIP_Transaction_PUB.G_ACT_OSP_RET_TO_VEND
413: THEN
414: l_correction_type := MOVE_BACKWARD;
415: ELSIF g_OSP_rec.action = WIP_Transaction_PUB.G_ACT_OSP_CORRECT_TO_RCV
408: g_osp_mov_details.transaction_quantity := l_transaction_quantity;
409: END IF;
410:
411: IF g_OSP_rec.action = WIP_Transaction_PUB.G_ACT_OSP_RET_TO_RCV
412: OR g_OSP_rec.action = WIP_Transaction_PUB.G_ACT_OSP_RET_TO_VEND
413: THEN
414: l_correction_type := MOVE_BACKWARD;
415: ELSIF g_OSP_rec.action = WIP_Transaction_PUB.G_ACT_OSP_CORRECT_TO_RCV
416: THEN
411: IF g_OSP_rec.action = WIP_Transaction_PUB.G_ACT_OSP_RET_TO_RCV
412: OR g_OSP_rec.action = WIP_Transaction_PUB.G_ACT_OSP_RET_TO_VEND
413: THEN
414: l_correction_type := MOVE_BACKWARD;
415: ELSIF g_OSP_rec.action = WIP_Transaction_PUB.G_ACT_OSP_CORRECT_TO_RCV
416: THEN
417: IF l_neg_qty_indicator
418: THEN
419: l_correction_type := MOVE_FORWARD;
2103: END Get_Flex_Shopfloormove;
2104:
2105: -- Procedure Attributes
2106: PROCEDURE Attributes
2107: ( p_ShopFloorMove_rec IN WIP_Transaction_PUB.Shopfloormove_Rec_Type
2108: , p_iteration IN NUMBER := NULL
2109: , x_ShopFloorMove_rec IN OUT NOCOPY WIP_Transaction_PUB.Shopfloormove_Rec_Type
2110: , p_OSP_rec IN WIP_Transaction_PUB.Res_Rec_Type
2111: )
2105: -- Procedure Attributes
2106: PROCEDURE Attributes
2107: ( p_ShopFloorMove_rec IN WIP_Transaction_PUB.Shopfloormove_Rec_Type
2108: , p_iteration IN NUMBER := NULL
2109: , x_ShopFloorMove_rec IN OUT NOCOPY WIP_Transaction_PUB.Shopfloormove_Rec_Type
2110: , p_OSP_rec IN WIP_Transaction_PUB.Res_Rec_Type
2111: )
2112: IS
2113: BEGIN
2106: PROCEDURE Attributes
2107: ( p_ShopFloorMove_rec IN WIP_Transaction_PUB.Shopfloormove_Rec_Type
2108: , p_iteration IN NUMBER := NULL
2109: , x_ShopFloorMove_rec IN OUT NOCOPY WIP_Transaction_PUB.Shopfloormove_Rec_Type
2110: , p_OSP_rec IN WIP_Transaction_PUB.Res_Rec_Type
2111: )
2112: IS
2113: BEGIN
2114:
2129: END IF;
2130:
2131: -- Initialize global variables
2132:
2133: g_ShopFloorMove_rec := WIP_Transaction_PUB.G_MISS_SHOPFLOORMOVE_REC;
2134: g_OSP_rec := WIP_Transaction_PUB.G_MISS_RES_REC;
2135: g_Wip_Entities_rec := WIP_Work_Order_PUB.G_MISS_WIP_ENTITIES_REC;
2136: g_osp_mov_details := WIP_Transaction_PUB.G_MISS_OSP_MOVE_DET_REC;
2137:
2130:
2131: -- Initialize global variables
2132:
2133: g_ShopFloorMove_rec := WIP_Transaction_PUB.G_MISS_SHOPFLOORMOVE_REC;
2134: g_OSP_rec := WIP_Transaction_PUB.G_MISS_RES_REC;
2135: g_Wip_Entities_rec := WIP_Work_Order_PUB.G_MISS_WIP_ENTITIES_REC;
2136: g_osp_mov_details := WIP_Transaction_PUB.G_MISS_OSP_MOVE_DET_REC;
2137:
2138: g_ShopFloorMove_rec := p_ShopFloorMove_rec;
2132:
2133: g_ShopFloorMove_rec := WIP_Transaction_PUB.G_MISS_SHOPFLOORMOVE_REC;
2134: g_OSP_rec := WIP_Transaction_PUB.G_MISS_RES_REC;
2135: g_Wip_Entities_rec := WIP_Work_Order_PUB.G_MISS_WIP_ENTITIES_REC;
2136: g_osp_mov_details := WIP_Transaction_PUB.G_MISS_OSP_MOVE_DET_REC;
2137:
2138: g_ShopFloorMove_rec := p_ShopFloorMove_rec;
2139: g_OSP_rec := p_OSP_rec;
2140: