Abrangências: | Microsiga Protheus 8.11 , Microsiga Protheus 10, Microsiga Protheus 12 |
Versões: | Microsiga Protheus 8.11 , Microsiga Protheus 10, Microsiga Protheus 12 |
Compatível Países: | Todos |
Sistemas Operacionais: | Todos |
Compatível às Bases de Dados: | Todos |
Idiomas: | Português (Brasil) , Português (Portugal) , Espanhol , Inglês |
O ponto de Entrada: PEF064 permite adicionar campos no Cabeçalho da cotação e nos Itens da cotação, no Portal do Fornecedor.O array deverá ser montado com base na estrutura do WebServices e com os campos que serão adicionados pelo usuário.
PWSF060.PRW
PEF064 - Visualização de campos no Cabeçalho no Portal do fornecedor ( [ aTipo ] ) --> aRet
Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
aTipo | Array of Record | Indica o Tipo de array que está sendo utilizado:1 = ACols do Cabeçalho2 = Acols dos Itens |
- (array_of_record)
- Array com os campos que serão retornados para formar o Acols.
**** Atenção: ao incluir ou alterar o acols do cabeçalho ou dos itens da cotação, o acols retornado, deverá conter todos os campos
que devem aparecer no Browse, mesmo os que são padrões do sistema, conforme exemplo da documentação. ***
**** Campos não existentes no WebServices, devem ser referenciados no aCols com o nome do atributo na base de dados
e efetuado tratamento adcional no Ponto de Entrada: WsUsrField a fim de aparecer corretamente o título da coluna *****
1a) Parte #INCLUDE "RWMAKE.CH" Case cParam == 1 // Cabecalho //Campos padroes aAdd( aReturn, { "QUOTEID", "D" } ) aAdd( aReturn, { "PROPOSALID", "D" } ) aAdd( aReturn, { "SUPPLIER", "D" } ) aAdd( aReturn, { "REGISTERDATE", "D" } ) aAdd( aReturn, "CONTACT" ) aAdd( aReturn, { "PAYMENTPLANCODE","N", {"BRWPAYMENTPLAN", ; {"CPAYMENTPLANCODE", "CPAYMENTPLANCODE" } }, ; {"CPAYMENTPLANCODE", "CDESCRIPTIONPAYMENTPLAN" } } ) //Campo Adicional aAdd( aReturn, "C8_OBS" ) Case cParam == 2 //Itens //Campos padroes aAdd( aReturn, { "PROPOSALID", "N", 0, .F. } ) aAdd( aReturn, { "SEQUENTIALID", "N", 0, .F. } ) aAdd( aReturn, { "PRODUCTCODE", "N", 0, .F. } ) aAdd( aReturn, { "DESCRIPTIONPRODUCT", "N", 0, .F. } ) aAdd( aReturn, { "MEASUREUNIT", "N", 2, .F. } ) aAdd( aReturn, { "QUANTITY", "N", 3 } ) aAdd( aReturn, { "UNITPRICE", "N", 9, .T. } ) aAdd( aReturn, { "TAXRATE", "N", 5 } ) aAdd( aReturn, { "DISCOUNTPERCENT", "N", 3 } ) aAdd( aReturn, { "TOTALVALUE", "N", 0, .T. } ) //Campo Adicional aAdd( aReturn, "C8_PRAZO") aAdd( aReturn, "C8_VALFRE") EndCase Return aReturn ============================================================================== 2a) Parte #INCLUDE "RWMAKE.CH" User Function WsUsrField() Local cAlias := PARAMIXB[1] Local aReturn := {} Do Case Case cAlias == "SC8" aAdd(aReturn,"C8_OBS") aAdd( aReturn,"C8_PRAZO") aAdd( aReturn,"C8_VALFRE") End Case Return aReturn |
Mais informações: PCOM01004 - Funcionamento do Valor de Frete no Portal do Fornecedor