1. This site uses cookies. By continuing to use this site, you are agreeing to our use of cookies. Learn More.
  2. Anuncie Aqui
  3. Anuncie Aqui
    Anuncie aqui você Também: fdantas@4each.com.br
Cookies A2 Solutions Anuncie Aqui

[RESOLVIDO] upc re1001rp

Discussão em 'EMS , HCM e Totvs 11' iniciado por Alexandre, Novembro 25, 2015.

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

    Alexandre Membro Participativo

    Pessoal eu tenho uma UPC no re1001rp.

    eu recebo pela upc a tt-epc:
    DEFINE INPUT PARAM p-ind-event AS CHAR NO-UNDO.
    DEFINE INPUT-OUTPUT PARAM TABLE FOR tt-epc.

    Ali eu pego a handle:
    FOR EACH tt-epc:
    CASE tt-epc.cod-parameter:
    WHEN 'object-handle' THEN DO:
    hDBOre1005 = WIDGET-HANDLE(tt-epc.val-parameter).
    LEAVE.
    END.
    END CASE.
    END.

    FOR EACH rowErrors:
    RUN _insertErrorManual IN hDBOre1005 (INPUT RowErrors.errornumber,
    INPUT RowErrors.ERRORtype,
    INPUT RowErrors.ERRORsubtype,
    INPUT RowErrors.errordescription,
    INPUT RowErrors.errorhelp,
    INPUT "":U).
    END.






    Mas isso parou de funcionar pq a tt-epc não tras mais 'object-handle' .

    Minha duvida:
    Porque tt-epc.cod-parameter não passa mais o "object-handle"?
    Tem que entrar em contato com a TOTVS para eles passar esse parametro?
    Alexandre, Novembro 25, 2015
    #1
  2. bootstrapmaster

    bootstrapmaster Moderator Moderador Equipe de Suporte

    não seria RE1005RP ???? não existe RE1001RP.

    RE1005RP eu uso assim .....
    Código:
        {utp/ut-glob.i}
    {include/i-epc200.i} /* Definicao tt-EPC */
    {iminc/ime019.i}     /* Definicao das temp-tables utilizadas na geracao de NFT */
    {cdp/cd0666.i}       /* Definicao tt-erro */
    {cep/ceapi001.i}     /* Definicao tt-movto */
    {method/dbotterr.i}

    define temp-table tt-conta-ft no-undo
        field conta-dev-rec as character
        field valor         as decimal
        index conta as primary conta-dev-rec.

    def input        param p-ind-event as char no-undo.
    def input-output param table for tt-epc.

    find first tt-epc no-lock
         where tt-epc.cod-parameter = 'docum-est rowid'
               no-error.

    if avail tt-epc then do:
        find first docum-est no-lock
             where rowid(docum-est) = to-rowid(tt-epc.val-parameter)
                   no-error.

        if avail docum-est then do:
    bootstrapmaster, Novembro 26, 2015
    #2
  3. Alexandre

    Alexandre Membro Participativo

    Bom dia ... cara me enganei sim é o RE1005RP.

    Mas preciso do 'object-handle'

    CASE tt-epc.cod-parameter:
    WHEN 'object-handle' THEN DO:
    hDBOre1005 = WIDGET-HANDLE(tt-epc.val-parameter).
    LEAVE.

    o problema que antes ele me passava esse parametro, agora nao passa mais.

    O que pode ser?
    Alexandre, Novembro 26, 2015
    #3
  4. bootstrapmaster

    bootstrapmaster Moderator Moderador Equipe de Suporte

    mas meu caro, é RP.P, não tem object-handle, é processamento.
    bootstrapmaster, Novembro 26, 2015
    #4
  5. bootstrapmaster

    bootstrapmaster Moderator Moderador Equipe de Suporte

    mais facil vc então char a BO que o re1005 usa e colocar UPC/EPC nela
    bootstrapmaster, Novembro 26, 2015
    #5
Status do Tópico:
Não esta aberto para novas mensagens.

Compartilhe esta Página