Histórico da Página
...
Exemplo
Bloco de código | ||||||
---|---|---|---|---|---|---|
| ||||||
#Include "Totvs.ch" //Ponto de Entrada para alterar as informações dos produtos que estão sendo exportados User Function MRPEDITEXP() Local cAliasQry := GetNextAlias() Local cTicket := ParamixB[1] Local oJson := ParamixB[2] Local nIndex := 1 Local nLenHeader := Len(oJson["headers"]) Local nLenItems := Len(oJson["items"]) aAdd(oJson["headers"], JsonObject():New()) nLenHeader++ oJson["headers"][nLenHeader]["id"] := "especifico" oJson["headers"][nLenHeader]["label"] := "Cabeçalho Específico" aAdd(oJson["headers"], JsonObject():New()) nLenHeader++ oJson["headers"][nLenHeader]["id"] := "level" oJson["headers"][nLenHeader]["label"] := "Nível" For nIndex := 1 To nLenItems cProduto := oJson["items"][nIndex]["productId"] BeginSql Alias cAliasQry SELECT MAX(HWB_NIVEL) Nivel FROM %Table:HWB% WHERE HWB_TICKET = %exp:cTicket% AND HWB_PRODUT = %exp:cProduto% AND %NotDel% EndSql oJson["items"][nIndex]["especifico"] := "Valor Específico" oJson["items"][nIndex]["level"] := (cAliasQry)->Nivel (cAliasQry)->(dbCloseArea()) Next nIndex Return |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas