selection-list

Discussão em 'Progress 4GL' iniciado por weiss_sbs, Novembro 10, 2015.

  1. weiss_sbs

    weiss_sbs Membro Participativo

    Tenho a seguinte selection-list:
    DEFINE VARIABLE lista AS CHARACTER FORMAT "X(256)":U
    LABEL "Lista" VIEW-AS SELECTION-LIST LIST-ITEM-PAIRS = "ITEM A,1,ITEM B,2,ITEM C,3" SCROLLBAR-HORIZONTAL SCROLLBAR-VERTICAL SIZE 36 BY 17.86 FONT 60 NO-UNDO.
    assign lista:LIST-ITEM-PAIRS = "ITEM A,1,ITEM B,2,ITEM C,3".
    como faço para colocar em uma variável os valores 'labels' de uma SELECION-LIST ?
    ex:
    var = "ITEM A,ITEM B,ITEM C".
    weiss_sbs, Novembro 10, 2015
    #1
  2. Cobra.cne

    Cobra.cne Equipe de Suporte Moderador

    Bom dia,

    Pode utilizar este código para pegar as informações.

    Código:
        DEFINE VARIABLE i AS INTEGER     NO-UNDO.
    DEFINE VARIABLE c-labels AS CHARACTER   NO-UNDO.
    DO i = 1 TO NUM-ENTRIES(lista:LIST-ITEM-PAIRS) BY 2:
        ASSIGN c-labels = c-labels + ENTRY(i,lista:LIST-ITEM-PAIRS) + ",".
   
    END.
    MESSAGE RIGHT-TRIM(c-labels,",")
        VIEW-AS ALERT-BOX.
    Espero que ajude.
    Cobra.cne, Novembro 18, 2015
    #2
  3. weiss_sbs

    weiss_sbs Membro Participativo

    Obrigado Cleiton.
    weiss_sbs, Novembro 18, 2015
    #3

Compartilhe esta Página