Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Parâmetros

NomeTipoDescriçãoReferência
aLabelsArrayArray de que receberá as legendas da etiqueta passado como referência para receber uma nova linha..X
nIndiceNuméricoIndice para a posição ser adicionada no array.X
cValorCaracterCódigo da etiqueta.
cCorCaracterCor da etiqueta.
cTextoCaracterTexto da etiqueta.
cCorTextoCaracterCor do texto da etiqueta.


Exemplo de Uso

Bloco de código
Method BuscaDetalhes(oFiltros, nPagina) Class StatusOrdemProducao
    Local aColunas   := {}
    Local aLabels    := {}
    Local cJsonDados := ""
    Local lExpResult := .F.
    Local nIndCols   := 0
    Local nIndLabels := 0    
	Local oDados     := JsonObject():New()

    oDados["items"]        := {}
    oDados["columns"]      := {}
    oDados["headers"]      := {}
    oDados["tags"]         := {}
    oDados["canExportCSV"] := .T.
	oDados["hasNext"]      := .F.

    If nPagina == 0
        lExpResult := .T.
    EndIf    

    PCPMonitorUtils():AdicionaLabelsColunaTabela(aLabels,@nIndLabels,"1","rgba(255,255,0,1)","Prevista","rgba(0,0,0,1)")
    PCPMonitorUtils():AdicionaLabelsColunaTabela(aLabels,@nIndLabels,"2","rgba(126,226,148,1)","Em aberto","rgba(255,255,255,1)")
    PCPMonitorUtils():AdicionaLabelsColunaTabela(aLabels,@nIndLabels,"3","rgba(255,128,0,1)","Iniciada","rgba(255,255,255,1)")
    PCPMonitorUtils():AdicionaLabelsColunaTabela(aLabels,@nIndLabels,"4","rgba(128,128,128,1)","Ociosa","rgba(255,255,255,1)")
    PCPMonitorUtils():AdicionaLabelsColunaTabela(aLabels,@nIndLabels,"5","rgba(0,0,165,1)","Enc.Parcialmente","rgba(255,255,255,1)")
    PCPMonitorUtils():AdicionaLabelsColunaTabela(aLabels,@nIndLabels,"6","rgba(241,143,136,1)","Enc.Totalmente","rgba(255,255,255,1)")
    PCPMonitorUtils():AdicionaColunaTabela(aColunas,@nIndCols,"STATUS","Status","cellTemplate",.T.,.T.,aLabels) 
    PCPMonitorUtils():AdicionaColunaTabela(aColunas,@nIndCols,"C2_FILIAL","Filial","string",lExpResult)
    PCPMonitorUtils():AdicionaColunaTabela(aColunas,@nIndCols,"C2_OP","OP","string",.T.)
    PCPMonitorUtils():AdicionaColunaTabela(aColunas,@nIndCols,"C2_PRODUTO","Produto","string",.T.)
    PCPMonitorUtils():AdicionaColunaTabela(aColunas,@nIndCols,"B1_DESC","Desc. Produto","string",lExpResult)
    PCPMonitorUtils():AdicionaColunaTabela(aColunas,@nIndCols,"C2_LOCAL","Armazém","string",.T.)
    PCPMonitorUtils():AdicionaColunaTabela(aColunas,@nIndCols,"C2_DATPRI","Previsão Início","string",.T.)
    PCPMonitorUtils():AdicionaColunaTabela(aColunas,@nIndCols,"C2_DATPRF","Previsão Entrega","string",.T.)
    PCPMonitorUtils():AdicionaColunaTabela(aColunas,@nIndCols,"C2_QUANT","Quantidade","string",.T.)
    PCPMonitorUtils():AdicionaColunaTabela(aColunas,@nIndCols,"C2_QUJE","Qtd. Prod","string",.T.)
    oDados["columns"] := aClone(aColunas)

    cJsonDados := oDados:toJson()
    FreeObj(oDados)
    FwFreeArray(aColunas)
    FwFreeArray(aLabels)
Return cJsonDados