PEC053 - Visualização do Pedido de Venda

Ponto de entrada para apresentação dos campos na visualização do Pedido de Venda.

PWSC050.PRW

PEC053 - Visualização do Pedido de Venda ( < cParam> ) --> aReturn

aReturn(array_of_record)
• Array contendo os campos a serem apresentados.

User Function PEC053()Local cParam 	:= PARAMIXB[1]Local aReturn 	:= {}Do Case	Case cParam == 1		//ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿		//³ Campos a serem mostrados             									³		//ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ		aAdd( aReturn, "ORDERID" )		aAdd( aReturn, "ORDERTYPECODE" )		aAdd( aReturn, "CUSTOMERCODE" )		aAdd( aReturn, "CUSTOMERUNIT" )		aAdd( aReturn, "DELIVERYCUSTOMER" )		aAdd( aReturn, "DELIVERYUNITCODE" )		aAdd( aReturn, "CARRIERCODE" )		aAdd( aReturn, "CUSTOMERTYPE" )		aAdd( aReturn, "PAYMENTPLANCODE" )		aAdd( aReturn, "PRICELISTCODE" )		aAdd( aReturn, "SELLERS" )		aAdd( aReturn, "DISCOUNT1" )		aAdd( aReturn, "DISCOUNT2" )		aAdd( aReturn, "DISCOUNT3" )		aAdd( aReturn, "DISCOUNT4" )		aAdd( aReturn, "BANKCODE" )		aAdd( aReturn, "FINANCIALDISCOUNT" )		aAdd( aReturn, "REGISTERDATE" )		aAdd( aReturn, "BIDNUMBER" )		aAdd( aReturn, "FREIGHTTYPE" )		aAdd( aReturn, "FREIGHTVALUE" )		aAdd( aReturn, "INSURANCEVALUE" )		aAdd( aReturn, "ADDITIONALEXPENSEVALUE" )		aAdd( aReturn, "INDEPENDENTFREIGHT" )		aAdd( aReturn, "ADJUSTMENTTYPE" )		aAdd( aReturn, "SALESORDERCURRENCY" )		aAdd( aReturn, "NETWEIGHT" )		aAdd( aReturn, "GROSSWEIGHT" )		aAdd( aReturn, "REDELIVERYCARRIERCODE" )		aAdd( aReturn, "PACKAGESVOLUMES" )		aAdd( aReturn, "FINANCIALINCREASE" )		aAdd( aReturn, "INVOICEMESSAGE" )		aAdd( aReturn, "STANDARDMESSAGE1" )		aAdd( aReturn, "PRICEWITHSERVICETAX" )		aAdd( aReturn, "APROBATIONTYPE" )		aAdd( aReturn, "INDEMNITYVALUE" )		aAdd( aReturn, "INDEMNITYPERCENTAGE" )			Case cParam == 2		//ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿		//³ Campos a serem mostrados             									³		//ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ		aAdd( aReturn, "ORDERID" )		aAdd( aReturn, "ORDERITEM" )		aAdd( aReturn, "PRODUCTID" )		aAdd( aReturn, "UNITOFMEASURE" )		aAdd( aReturn, "QUANTITY" )		aAdd( aReturn, "NETUNITPRICE" )		aAdd( aReturn, "NETTOTAL" )		aAdd( aReturn, "QUANTITYAPPROVED" )		aAdd( aReturn, "QUANTITYDELIVERED" )		aAdd( aReturn, "QUANTITYRELEASEDSECONDUNIT" )		aAdd( aReturn, "SECONDUNITOFMEASURE" )		aAdd( aReturn, "ITEMOUTFLOWTYPE" )		aAdd( aReturn, "SECONDMEASUREUNITQUANTITY" )		aAdd( aReturn, "WAREHOUSE" )		aAdd( aReturn, "FISCALOPERATION" )		aAdd( aReturn, "DISCOUNTPERCENTAGE" )		aAdd( aReturn, "ITEMDISCOUNTVALUE" )		aAdd( aReturn, "DELIVERYDATE" )		aAdd( aReturn, "COMMISSIONSPERCENTAGE" )		aAdd( aReturn, "CUSTOMERORDERNUMBER" )		aAdd( aReturn, "PRODUCTDESCRIPTION" )		aAdd( aReturn, "UNITLISTPRICE" )		aAdd( aReturn, "ORIGINALINVOICE" )		aAdd( aReturn, "ORIGINALINVOICESERIALID" )		aAdd( aReturn, "ORIGINALINVOICEITEM" )		aAdd( aReturn, "LOTNUMBER" )		aAdd( aReturn, "SUBLOT" )		aAdd( aReturn, "LOCATION" )		aAdd( aReturn, "PRODUCTSERIALNUMBER" )		aAdd( aReturn, "MANUFACTURERCODE" )		aAdd( aReturn, "MANUFACTURERUNIT" )		aAdd( aReturn, "OPERATIONTYPE" )EndCaseReturn aReturn