Home

Linha Microsiga Protheus

Páginas filhas
  • Integração do PMS com MS-Project PMSC010

Integração do PMS com MS-Project (PMSC010)

Neste documento descreveremos a funcionalidade da integração do módulo Gestão de Projetos (SIGAPMS) com o MS-Project via OLE.

Para utilizar a funcionalidade acesse o Gestão de Projetos (SIGAPMS) no menu Atualizações / Integração / Microsoft Project (PMSC010):

Selecione o Projeto a ser exportado ao Ms-Project.

Clique na opção Exportar ou Sincronizar.

A opção Exportar disponibiliza os dados do projeto para manipulação via MS-Project sem possibilidade de retorno dos valores para o Gestão de Projetos (SIGAPMS). Utilizado principalmente para impressões do cronograma do projeto, para envio por e-mail no formato do MS-Project, etc.

A opção Sincronizar tem a mesma funcionalidade, porém com a possibilidade de retornar os dados digitados no MS-Project para o Gestão de Projetos (SIGAPMS) uma vez que é disponibilizado um Assistente de Integração com a opção Importar os dados, tais como, criação de novas tarefas, alteração da duração da tarefa, etc.

Em ambos os casos são disponibilizados para o MS-Project as seguintes informações:

- Calendarios (SH7)

- Recursos (AE8 / AFA )

- EDTs (AFC)

- Tarefas (AF9)

- Relacionamentos ( AFD/AJ4)

Na integração é criado um objeto MS-Project que são carregados os dados especificados, conforme o fluxo abaixo:

 

 

 

A seguir as informações carregadas no MS-Project:

  1. Planilha do Projeto



  2. Planilha de Recurso

Propriedades do objeto Ms-Project -> tabelas SIGAPMS

EDTs (AFC->AFC_DESCRI)

oApp:Projects(1):Tasks(n):Calendar    ->  AFC->AFC_CALEND

oApp:Projects(1):Tasks(n):Text1 -> AFC->AFC_EDT

oApp:Projects(1):Tasks(n):Start -> AFC->(AFC_START + " " + AFC_HORAI)

oApp:Projects(1):Tasks(n):Duration -> ' 0 h'

oApp:Projects(1):Tasks(n):SetField("PJTASKOUTLINELEVEL", AFC->AFC_NIVEL)

oApp:Projects(1):Tasks(n):SetField("PJTASKNUMBER1", AFC->AFC_QUANT)

oApp:Projects(1):Tasks(n):SetField("PJTASKTEXT2", AFC->AFC_UM)

oApp:Projects(1):Tasks(n):SetField("PJTASKTEXT23", AFC->AFC_EDT)


TAREFAS (AF9->AF9_DESCRI)

oApp:Projects(1):Tasks(n):Calendar    ->  AF9->AF9_CALEND

oApp:Projects(1):Tasks(n):Text1 -> AF9->AF9_TAREFA

oApp:Projects(1):Tasks(n):Start -> AF9->(AF9_START + " " + AF9_HORAI)

oApp:Projects(1):Tasks(n):Duration -> AF9->AF9_HDURAC + ' h'

oApp:Projects(1):Tasks(n):SetField("PJTASKOUTLINELEVEL", AF9->AF9_NIVEL)

oApp:Projects(1):Tasks(n):SetField("PJTASKNUMBER1", AF9->AF9_QUANT)

oApp:Projects(1):Tasks(n):SetField("PJTASKTEXT2", AF9->AF9_UM)

oApp:Projects(1):Tasks(n):SetField("PJTASKTEXT23", AF9->AF9_TAREFA)

oApp:Projects(1):Tasks(n):SetField("PJTASKPRIORITY", AF9->AF9_PRIORI)

oApp:Projects(1):Tasks(n):SetField("PJTASKCONSTRAINTTYPE", Tabela Tipo de Restricao : AF9->AF9_RESTRI)

oApp:Projects(1):Tasks(n):SetField("PJTASKCONSTRAINTDATE", AF9->(AF9_DTREST+ " " + AF9_HRREST)

oApp:Projects(1):Tasks(n):SetField("PJTASKPERCENTCOMPLETE", PMSPOCAF9(AF9_PROJET, AF9_REVISA, AF9_TAREFA, dDataBase)

 

Nível 1 (Acesso Clientes)
Espanhol , Inglês
Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10, Protheus 11
Todos
Windows
Todos