Árvore de páginas

Versões comparadas

Chave

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

...

Bloco de código
languagec#
firstline1
titleExemplo
linenumberstrue
#INCLUDE "PROTHEUS.CH"  User 

User Function P144COL()
    Local aCabPers := {}
    Local cGridSel:= PARAMIXB[1]
    Local aHeadSel:= PARAMIXB[2]

    If cGridSel == "gridResult"
        aAdd(aCabPers, {"Novo Campo",;            // [1] Título
                            "Z1_QUANT",;          // [2] Campo
                            "@E 99,999,999.999",; // [3] Picture
                            12,;                  // [4] Tamanho
                            3,;                   // [5] Decimal
                            "",;                  // [6] Validação
                            "û",;                 // [7] Reservado
                            "N",;                 // [8] Tipo
                            ""})                  // [9] Reservado
    ElseIf cGridSel == "gridDocs"
        aAdd(aCabPers, {"Novo Campo",;            // [1] Título
                        	"Z1_QUANT",;          // [2] Campo
                            "@E 99,999,999.999",; // [3] Picture
                            12,;                  // [4] Tamanho
                            3,;                   // [5] Decimal
                            "",;                  // [6] Validação
                            "û",;                 // [7] Reservado
                            "N",;                 // [8] Tipo
                            ""})                  // [9] Reservado
    EndIf

Return aCabPers