Histórico da Página

#INCLUDE "PROTHEUS.CH"

/*/{Protheus.doc} C100GRBI      
	Gera Base Instalada dos itens da Planilha na aprovação do Contrato
	OBS: Alterar parametro MV_CNINTFS para .T.
@type function
@version 
@since 04/03/2024
@return Array contendo o CabecalhoCabeçalho 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)

#INCLUDE "PROTHEUS.CH"

/*/{Protheus.doc} C100GRBI     
	Gera Base Instalada dos itens da Planilha na aprovação do Contrato     
	OBS: Alterar parâmetro MV_CNINTFS para .T.     
	Esse ponto de entrada eé acionado no momento de confirmar a aprovação da Revisão 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)