Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Descrição:

Esse ponto permite a geracao da base de atendimento de acordo com os itens da planilha do contrato.

Eventos:

Executado na confirmação da Aprovação da Revisão do Contrato.  

Fonte do Programa:

CNTXGS.PRW

Função:

C100GRBI

Parâmetros:

Posição

Tipo

Descrição

PARAMIXB[1]

Array

Cabeçalho da base de atendimento

PARAMIXB[2]

Array 

Itens da base de atendimento

Retorno:

Valentia

Tipo

Descrição

aRetorno

Array

Array contendo na posição 1 o cabeçalho e na posição 2 os itens

Exemplo

...

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24



Situação 1: Gerar base instalada com os dados dos Itens do Contrato sem nenhuma alteração.

Bloco de código
languagetext
firstline1
titleExemplo
linenumberstrue
#INCLUDE "PROTHEUS.CH"

...



/*/{Protheus.doc} C100GRBI

...


     Gera Base Instalada dos ítens da Planilha na aprovacao do Contrato

...



    OBS: Alterar parametro MV_CNINTFS para .T.

...


@type function

...


@version 

...


@since 04/03/2024

...


@return Array contendo o Cabecalho da Base Instalada e os Itens da Base Instalada

...


/*/

...


User Function C100GRBI()

...



    Local aArea     := GetArea()

...


    Local aRetorno := {}

...


    Local aCabecBI  := ParamIxb[1]

...


    Local aItensBI  := ParamIxb[2]

...



    aRetorno := {aCabecBI,aItensBI}

...



    RestArea(aArea)

...



Return(aRetorno)

...

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24

25

26



Situação 2: Gerar base de atendimento com os dados dos Itens do Contrato, incluindo o numero do Contrato (AA3_CONTRT) e o Site da base instalada (AA3_SITE).

Bloco de código
languagetext
firstline1
titleExemplo
linenumberstrue
#INCLUDE "PROTHEUS.CH"

...



/*/{Protheus.doc} C100GRBI

...


    Gera Base Instalada dos ítens da Planilha na aprovacao do Contrato

...


    OBS: Alterar parametro MV_CNINTFS para .T.

...


    Esse ponto de entrada e acionado no momento de confirmar a aprovacao da Revisao do contrato.

...


@type function

...


@version 

...


@since 04/03/2024

...


@return Array contendo o Cabecalho da Base Instalada e os Itens da Base Instalada

...


/*/

...


User Function C100GRBI()

...



    Local aArea     := GetArea()

...


    Local aRetorno := {}

...


    Local aCabecBI  := ParamIxb[1] //Array com os dados do Contrato (CNA, CNB e AGW) para gerar a base instalada

...


    Local aItensBI  := ParamIxb[2] //Itens da base instalada. Array zerado

...


    

...


    //Incluir o numero do Contrato e site na base instalada

...


    aAdd(aCabecBI,{"AA3_CONTRT",CN9->CN9_NUMERO,NIL})

...


    aAdd(aCabecBI,{"AA3_SITE","www.google.com.br",NIL})

...


    

...


    aRetorno := {aCabecBI,aItensBI}

...



    RestArea(aArea)

...



Return(aRetorno)

Image Modified




Informações
titleInformações

Contrato do tipo 2 - Venda

Para ativar essa integração, é necessário habilitar o parâmetro MV_CNINTFS para .T.

Necessario o preenchimento do parametro "MV_OCORROS" com o codigo da ocorrencia para a geracao de ordem de servico automaticamente entre os modulos Gestao de Contratos e Gestao de Servicos.

No cadastro dos itens da planilha do contrato, alterar o campo Base Instal. (CNB_BASINS) para SIM

Antes de Aprovar a Revisão, verificar se os itens da planilha (produtos) estão cadastrados na rotina Localização Fisica (Atualizacoes - Compra e Venda - Localização Fisica), pois o(s) produto(s) precisam possuir Numero de Serie

Para gerar a Base de Atendimento (base instalada), os parametros "MV_ATESTCL" e "MV_ATESTLJ" precisam estar em branco.

...