Linha Microsiga Protheus.

Home

Linha Microsiga Protheus

Páginas filhas
  • PM200Cpy - Permite ou não cópia de Tarefa EDT

Ponto-de-Entrada: PM200Cpy - Permite ou não cópia de Tarefa /EDT
Versões: Microsiga Protheus 10
Compatível Países: Todos
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todos
Idiomas: Espanhol , Inglês
Descrição: 
Ponto de entrada que permite ou aborta a copia de tarefa/EDT do orcamento/projeto e se deve atualizar a arvore/planilha do gerenciamento de orcamento/projeto.
Programa Fonte 
PMSA200.PRW
Sintaxe

PM200Cpy - Permite ou não cópia de Tarefa /EDT ( < PARAMIXB[1]> , < PARAMIXB[2]> , < PARAMIXB[3]> ) --> aRet

Parâmetros:
Nome Tipo Descrição Default Obrigatório Referência
PARAMIXB[1] Numérico 1 para orcamento e 2 para projeto X
PARAMIXB[2] Caracter Alias da tabela X
PARAMIXB[3] Numérico Número do registro em que está posicionado da tabela X
Retorno
    aRet(array_of_record)
  • Se continua ou não na rotina e se deve atualizar arvore/planilha do orcamento/projeto
Observações

Retorno da aRet

aRet[1] - Tipo Lógico - Se for verdadeiro, continua o processo apresentado a tela de seleção do projeto/orcamento

aRet[2] - Tipo Lógico - Se for verdadeiro, atualiza a arvore/planilha do orcamento/projeto da tela. Porém ser aret[1] for verdadeiro será ignorado o conteudo dele.

Exemplos 
User Function pm200CPY()Local nOrcPrj := PARAMIXB[1]Local cAlias  := PARAMIXB[2]Local nRecno  := PARAMIXB[3]Local aRet := {.F. ,.F.}Local cMensagem := ""	cMensagem := "Ponto de Entrada PM200CPY"+CHR(13)+CHR(10)	cMensagem += "Parametro 1:"+str(nOrcPrj,2,0)+CHR(13)+CHR(10)	cMensagem += "Parametro 2:"+cAlias+CHR(13)+CHR(10)	cMensagem += "Parametro 3:"+str(nRecno)+CHR(13)+CHR(10)	Alert(cMensagem)return aRet