PEC054 - AlteraçãoInclusão do pedido de venda

Ponto de entrada para apresentação dos campos na Alteração/Inclusão do Pedido de Venda.

PWSC050.PRW

PEC054 - Alteração/Inclusão do pedido de venda ( < cParam> ) --> aReturn

aReturn(array_of_record)
• Array que contem na primeira posição os valores: 1-Indicando cabeçalho 2-Indicando itens

User Function PEC054()Local cParam 	:= PARAMIXB[1]Local aReturn 	:= {}Do Case	Case cParam == 1		//ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿		//³ Campos a serem mostrados             									³		//ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ		aAdd( aReturn, { "ORDERID", "D" } )		aAdd( aReturn, { "CUSTOMERCODE", "D" } )		aAdd( aReturn, { "CUSTOMERUNIT", "D" } )		aAdd( aReturn, { "DELIVERYCUSTOMER", "D" } )		aAdd( aReturn, { "DELIVERYUNITCODE", "D" } )		aAdd( aReturn, { "CARRIERCODE", "N", { "GETCARRIER", ;												{ "CCARRIERCODE", "CCODE" } ;												}, ;												{ "CCODE", "CDESCRIPTION" } } )		aAdd( aReturn, { "PAYMENTPLANCODE", "D"  } )		aAdd( aReturn, { "PRICELISTCODE", "D" } )		aAdd( aReturn, { "DISCOUNT1", "D" } )		aAdd( aReturn, { "DISCOUNT2", "D" } )		aAdd( aReturn, { "DISCOUNT3", "D" } )		aAdd( aReturn, { "DISCOUNT4", "D" } )		aAdd( aReturn, "BANKCODE" )		aAdd( aReturn, { "FINANCIALDISCOUNT", "D" } )		aAdd( aReturn, { "REGISTERDATE", "D" } )		aAdd( aReturn, "BIDNUMBER" )		aAdd( aReturn, { "FREIGHTVALUE", "D" } )		aAdd( aReturn, { "INSURANCEVALUE", "D" } )		aAdd( aReturn, { "ADDITIONALEXPENSEVALUE", "D" } )		aAdd( aReturn, { "INDEPENDENTFREIGHT", "D" } )		aAdd( aReturn, { "ADJUSTMENTTYPE", "D" } )		aAdd( aReturn, { "SALESORDERCURRENCY", "D" } )		aAdd( aReturn, { "NETWEIGHT", "D" } )		aAdd( aReturn, { "GROSSWEIGHT", "D" } )		aAdd( aReturn, { "REDELIVERYCARRIERCODE", "D" } )		aAdd( aReturn, { "FINANCIALINCREASE", "D" } )		aAdd( aReturn, { "INVOICEMESSAGE", "D" } )		aAdd( aReturn, { "STANDARDMESSAGE1", "D" } )		aAdd( aReturn, { "INDEMNITYVALUE", "D" } )		aAdd( aReturn, { "INDEMNITYPERCENTAGE", "D" } )	Case cParam == 2		//ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿		//³ Campos a serem mostrados             									³		//ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ		aAdd( aReturn, { "PRODUCTID", "N", { "GETCATALOG", ;														{ "CPRODUCTID", "CPRODUCTCODE" } ;													}, ;													{ "CPRODUCTCODE", "CDESCRIPTION" }, 13 } )		aAdd( aReturn, { "PRODUCTDESCRIPTION", "N", 0, .F. } )		aAdd( aReturn, { "QUANTITY", "N", 3 } )		aAdd( aReturn, { "NETUNITPRICE", "N", 0, .F. } )		aAdd( aReturn, { "CUSTOMERORDERNUMBER", "N", 5 } )		aAdd( aReturn, { "NETTOTAL", "N", 0, .F. } )EndCaseReturn aReturn