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:
- Planilha do Projeto
- Planilha de Recurso
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)