11: G_COMMIT CONSTANT VARCHAR2(1) := FND_API.G_TRUE;
12: G_INIT_MSG_LIST CONSTANT VARCHAR2(1) := FND_API.G_TRUE;
13: G_VALIDATION_LEVEL CONSTANT NUMBER := FND_API.G_VALID_LEVEL_FULL;
14:
15: SUBTYPE blk_rec_type IS okl_blk_ast_upd_pvt.okl_loc_rec_type;
16: SUBTYPE blk_tbl_type IS okl_blk_ast_upd_pvt.okl_loc_tbl_type;
17: ---------------------------------------------------------------------------
18: -- Procedures and Functions
19: ---------------------------------------------------------------------------
12: G_INIT_MSG_LIST CONSTANT VARCHAR2(1) := FND_API.G_TRUE;
13: G_VALIDATION_LEVEL CONSTANT NUMBER := FND_API.G_VALID_LEVEL_FULL;
14:
15: SUBTYPE blk_rec_type IS okl_blk_ast_upd_pvt.okl_loc_rec_type;
16: SUBTYPE blk_tbl_type IS okl_blk_ast_upd_pvt.okl_loc_tbl_type;
17: ---------------------------------------------------------------------------
18: -- Procedures and Functions
19: ---------------------------------------------------------------------------
20: PROCEDURE update_location(