Aumentar frame via UPC - Urgente

Discussão em 'EMS , HCM e Totvs 11' iniciado por lima, Março 23, 2012.

  1. lima

    lima Membro Participativo

    Boa tarde pessoal,

    Estou com um problema para aumentar a altura de uma frame via UPC, a tela está em ThinTemplates, utilizo o comando abaixo, porém, a mesma não é aumentada.

    assign wh-fPage1 :HEIGHT = wh-fPage1:HEIGHT + 1.

    Obrigado.
  2. denilson.silva

    denilson.silva Membro Participativo

    Verifique se a frame que quer aumentar está em uma viewer. Assim, deverá aumentar a frame da viewer e tambem do programa principal. Veja exemplo:
    Código:
    IF p-ind-event  =   'INITIALIZE' and
       p-ind-object =   'CONTAINER'            and
       p-wgh-object:name =   'cdp/cd1517.w'  THEN DO:
    
        /*Aumentar o tamanho da Frame*/
        assign p-wgh-frame:PARENT:HEIGHT = p-wgh-frame:PARENT:HEIGHT + 3.0
               p-wgh-frame:HEIGHT = p-wgh-frame:HEIGHT + 3.0.
    
    END.
    
    IF p-ind-event  =   'before-INITIALIZE' and
       p-ind-object =   'viewer'            and
       p-wgh-object:name =   'divwr/v01di232.w'  THEN DO:
    
        /* Aumenta o frame */
        assign p-wgh-frame:HEIGHT = p-wgh-frame:HEIGHT + 3.
    :
    :
    end.
    
    
  3. meschiatti

    meschiatti Sem Pontuação

    Nossa muito obrigado, me ajudou muito o pedaço de código que você citou logo acima...

    Valeu....

Compartilhe esta Página