1. This site uses cookies. By continuing to use this site, you are agreeing to our use of cookies. Learn More.

  2. Anuncie Aqui ! Entre em contato fdantas@4each.com.br

[RESOLVIDO] Upc Novamente

Discussão em 'EMS , HCM e Totvs 11' iniciado por Will, Setembro 11, 2009.

Status do Tópico:
Não esta aberto para novas mensagens.
  1. Will

    Will Membro Participativo

    Eae pessoal, novamente estou com problema de upc, tenho uma que por sua vez terá que desabilitar a opão TERMINAL do do radios-set rs-destino do programa ft0516aa, porém utilizei um exemplo que fazia o mesmo funcioanmento em outro programa, mas nada ocorre quando executo a mesma , segue o código...
    Código:
    define input param p-ind-event  as char          no-undo.
    define input param p-ind-object as char          no-undo.
    define input param p-wgh-object as handle        no-undo.
    define input param p-wgh-frame  as widget-handle no-undo.
    define input param p-cod-table  as char          no-undo.
    define input param p-row-table  as rowid         no-undo.
    
    def var h_frame                 as widget-handle no-undo.
    def var h_page                  as widget-handle no-undo.
    def var c-char                  as char          no-undo.
    def var c-objeto                as char          no-undo.
    def new global shared var hFunc     as widget-handle no-undo.
    def                   var wh-objeto as handle        no-undo.
    
       assign wh-objeto = p-wgh-frame:first-child.
       do while valid-handle(wh-objeto):
    
          case wh-objeto:name:
             when "rs-destino" then do:
                /*assign wh-objeto:sensitive = no.*/
                wh-objeto:disable("Terminal").
             end.
          end case.
    
          if wh-objeto:TYPE = 'field-group' then
             assign wh-objeto = wh-objeto:first-child.
          else
             assign wh-objeto = wh-objeto:next-sibling.
    
       end.
    
  2. muertebr

    muertebr Membro Participativo

    O programa ft0516aa de impressão de NF-E tem o fonte aberto... altera por la mesmo ;)

    Eu tava precisando era passa as NF selecioanadas no FT0909 para o ft0516, só que não consigo buscar as notas selecionadas..
    se alguem souber ;)
  3. Will

    Will Membro Participativo

    muertebr, cara seguinte, quanto ao seu problema, dei uma olhada no ft0909, e teria que dar um jeito de pegar a recordset do componenete, via upc provavelmente , mas nunca fiz isso, derepente o código que passei aqui possa lhe ser útil


    quanto ao programa ft0516aa, tentei alterar o .w, desabilitando a opção terminal da impressão, o mesmo apresentou o seguinte problema, após ser alterado, fui rodar ele no menu e le carrega os componenetes na interface do menu e o programa em si fica aberto somente com a window vazia, alguém já viu isto antes???? abrçs
  4. muertebr

    muertebr Membro Participativo

    Bom will eu fiz da seguinte forma para bloquear os campos, só que antes de implementar preciso resolver o otro caso do ft0909 bloqueando estabelecimento, destino, impresso

    /* _UIB-CODE-BLOCK-END */
    &ANALYZE-RESUME

    &ANALYZE-SUSPEND _UIB-CODE-BLOCK _CONTROL c-cod-estabel wReport
    ON LEAVE OF c-cod-estabel IN FRAME fPage2 /* Nr Nota Fiscal */
    DO:
    ASSIGN c-cod-estabel:sensitive in frame fPage2 = no
    c-serie:sensitive in frame fPage2 = no
    c-nr-nota-fis-ini:sensitive in frame fPage2 = no
    c-nr-nota-fis-fim:sensitive in frame fPage2 = no
    rsDestiny:SENSITIVE in frame fPage6 = NO
    rs-impressora:SENSITIVE IN FRAME fPage6 = NO
    rsDestiny:SCREEN-VALUE = string(1).
    END.
  5. Will

    Will Membro Participativo

    fiz dsimilar, mas o programa ,se desconfigura, a troco de nada, muito estranho, vou tentar resolver por aqui se achar uma solução eu posto no site
  6. Will

    Will Membro Participativo

    a sim, só pra constar , esse meu relatório ele abre, porém ele não mostra as abas de pa~^ametros selecao e impressao, porém poelo menu consigo alterar os pages da mesma. A si me tentando executar pelo app builder ele executa porém não carrega a tela.
Status do Tópico:
Não esta aberto para novas mensagens.

Compartilhe esta Página