ORDERITEMS: Load OrderItemsDiscounts for Entire Order

This function does not exist in the LSK and is useful for loading all the order item discounts in one go without looping through each order item and loading individually.

<MvFUNCTION NAME = "OrderItemDiscountList_Load_Order_id" PARAMETERS = "order_id, orderitemdiscounts var" STANDARDOUTPUTLEVEL = "" ERROROUTPUTLEVEL = ""> 
	<MvOPENVIEW NAME = "Merchant" VIEW = "OrderItemDiscounts" 
		QUERY = "{ 'SELECT * FROM ' $ g.Store_Table_Prefix $ 'OrderItemDiscounts WHERE order_id = ? ORDER BY priority DESC, pgrp_id ASC' }" 
		FIELDS = "l.order_id"> 
 
	<MvIF EXPR = "{ g.MvOPENVIEW_Error }"> 
		<MvFUNCTIONRETURN VALUE = "{ [ g.Library_Filename_Utilities ].Error( 'MER-DBP-OID-00002', g.MvOPENVIEW_Error ) }"> 
	</MvIF> 
 
	<MvASSIGN NAME = "l.orderitemdiscount_count" VALUE = 0> 
	<MvWHILE EXPR = "{ NOT OrderItemDiscounts.d.EOF }"> 
		<MvEVAL EXPR = "{ OrderItemDiscount_Read( l.orderitemdiscounts[ ++l.orderitemdiscount_count ] ) }"> 
		<MvSKIP NAME = "Merchant" VIEW = "OrderItemDiscounts" ROWS = 1> 
	</MvWHILE> 
 
	<MvCLOSEVIEW NAME = "Merchant" VIEW = "OrderItemDiscounts"> 
	<MvFUNCTIONRETURN VALUE = "{ ListLoad_EOF_Return( 'MER-DBP-OID-00003', l.orderitemdiscount_count ) }"> 
</MvFUNCTION>