Linha Microsiga Protheus

Árvore de páginas

CONTEÚDO

  1. Visão Geral
  2. Descrição
  3. Sintaxe
  4. Parâmetros
  5. Retorno
  6. Exemplos

01. VISÃO GERAL


Produto:TOTVS Backoffice
Linha de Produto:Linha Protheus
Segmento:Backoffice
Módulo:SIGAPMS - Gestão de Projetos
Função:PMS230DOC
Abrangências:Microsiga Protheus 12
Versões:Microsiga Protheus 12
Compatível Países:Todos
Sistemas Operacionais:Todos
Compatível com as Bases de Dados:Todos
Nível de Acesso:Nível 1 (Acesso Clientes)
Idiomas:Todos

02. DESCRIÇÃO

Ponto de entrada executado na saída da tela do banco de conhecimento, o usuário poderá criar uma rotina para alimentar alguma tabela ou campo, enviar informação para a integração ou apresentar mensagens ou enviar e-mails.

03. SINTAXE

PM230DOC() → Nil

04. PARÂMETROS

NomeTipoDescrição
ParamIXBVetor

Vetor com os dados do documento, sendo:
[ 1 ]  - cProjeto - Código do Projeto que está sendo alterado - Tipo: Caráter

[ 2 ]  - cTarefa - Código da Tarefa do projeto que esta sendo incluído o documento em anexo - Tipo: Caráter

05. Retorno

Nenhum

06. EXEMPLO


PM230DOC
#include "protheus.ch"

User Function PM230DOC()
Local cProjeto := Paramixb[1]
Local cTarefa := Paramixb[2]
Local aArea  := GetArea()
Local cFilAF9 := xFilial("AF9")
Local aAreaAC9 := AC9->(GetArea())
Local cAlias := alias()

DbSelectArea("AC9")
DbSetorder(2) 
If DbSeek(xFilial("AC9")+cAlias +cFilAF9+cProjeto+cTarefa ) .And. __cUserId = "000000"
    MsgAlert ("Ponto de entrada PM230DOC")
EndIf

RestArea(aAreaAC9)    
RestArea(aArea)
Return