[RESOLVIDO] Processo de Migração - Compilação de Específicos

Discussão em 'EMS , HCM e Totvs 11' iniciado por Sidnei Alves, Dezembro 22, 2016.

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

    Sidnei Alves Sem Pontuação

    Colegas, boa tarde.

    Estamos em processo de migração de EMS2.06 para Totvs12, tudo instalado sem problemas, mas quando vou compilar meus específicos surge o erro abaixo:
    -------------------------------- PROGRAMA--------------------------------
    Programa:ag1036rpb.p
    -------------------------------- LOGWIN ---------------------------------
    Unknown or ambiguous table prog_dtsul. (725)
    \\BRSMARDSAPP02\dts-12\ERP\especificos\ems2\AGRIPEC\include\i-prgvrs.i Nao entendi a linha 33. (196)
    D:\ProgramasCompilar\ag1036rpb.p Nao entendi a linha 13. (196)
    -------------------------------------------------------------------------

    O que tem na linha cinco do i-prgvrs.i o "find mgcad.prog_dtsul" da tabela mgcad.prog_dtsul.

    DEF BUFFER prog_dtsul FOR mgcad.prog_dtsul .
    DEF BUFFER empresa FOR mgcad.empresa .
    DEF BUFFER procedimento FOR mgcad.procedimento .
    DEF BUFFER modul_dtsul FOR mgcad.modul_dtsul .
    DEF BUFFER usuar_mestre FOR mgcad.usuar_mestre .
    DEF BUFFER layout_impres_padr FOR mgcad.layout_impres_padr .
    DEF BUFFER impressora FOR mgcad.impressora.
    DEF BUFFER tip_imprsor FOR mgcad.tip_imprsor.
    DEF BUFFER servid_exec_imprsor FOR mgcad.servid_exec_imprsor.
    DEF BUFFER imprsor_usuar FOR mgcad.imprsor_usuar .
    DEF BUFFER layout_impres FOR mgcad.layout_impres .
    DEF BUFFER configur_layout_impres FOR mgcad.configur_layout_impres.
    DEF BUFFER configur_tip_imprsor FOR mgcad.configur_tip_imprsor.
    DEF BUFFER ped_exec FOR mgcad.ped_exec .

    DEF BUFFER cliente FOR mgcad.cliente.


    def new global shared var c-arquivo-log as char format "x(60)" no-undo.
    def var c-prg-vrs as char init "[[[{2}[[[" no-undo.
    def var c-prg-obj as char no-undo.
    assign c-prg-vrs = "{2}"
    c-prg-obj = "{1}".
    if c-arquivo-log <> "" and c-arquivo-log <> ? then do:
    find mgcad.prog_dtsul
    where prog_dtsul.cod_prog_dtsul = "{1}"
    no-lock no-error.
    =============================================================

    Como resolvo isso?

    Algum gênio me ajudar?

    Obrigado.

    Sidnei
    rhemati curtiu isso.
  2. marco.luques

    marco.luques Membro Ativo

    Sidnei, essas tabela prog_dtsul, usuar_mestre, etc... agora fica no msfnd, por isso esta dando erro.

    este i-prgvrs.i não está atualizado para o datasul12
  3. bootstrapmaster

    bootstrapmaster Moderator Moderador Equipe de Suporte

    na verdade esses includes tem nas pastas do produto padrão, e vc está com uma copia do antigo em suas pastas de especificos, eu simplesmente removeria a pasta include dos especificos deixando pegar o do produto padrão.
    rhemati e reissobr curtiram isso.
  4. Sidnei Alves

    Sidnei Alves Sem Pontuação

    É verdade, você tem total razão, está pegando da minha pasta de específicos.

    Obrigado meu amigo.

    Valeu.
  5. Sidnei Alves

    Sidnei Alves Sem Pontuação

    Ola mestre!!

    É isso ai, eu removi da pasta dos meus específicos e passou direitinho.

    Muito obrigado!!
Status do Tópico:
Não esta aberto para novas mensagens.

Compartilhe esta Página