01. DADOS GERAIS

Produto:

Linha de Produto:

Segmento:

Módulo:

Função:CTBA220
País:Brasil
Ticket:Interno
Requisito/Story/IssueDSERCTR1-46829

02. DESCRIÇÃO

O ponto de entrada CT220SEL permite o envio de um array contendo as informações das empresas e arquivos que devem ser agrupados no processo de consolidação. Esse recurso é utilizado para definir e organizar os elementos a serem consolidados, possibilitando uma seleção personalizada das empresas e dados que serão processados em conjunto, conforme as necessidades do usuário.

03. DEMAIS INFORMAÇÕES


ExecBlock("CT220SEL",.f.,.f.,{aEmp,aQuais}))
User Function CT220Sel(  ) 
	
	Local aEmp := PARAMIXB[1]
	Loal  aQuais := PARAMIXB[1]
	Local cMVSchedu := Getnewpar( 'MV_XSCHEDU' , '' ) 
	Local axEmp2     :={}   
	Local nJ       := 0 
	Local nI       := 0  
	Local lRet     := .T. 

	If lRet  // somente quando a variavel não estiver vazia  

		If ! Empty (cMVSchedu) .and. ( ValType( aEmp ) == 'A' .And. len( aEmp ) > 0 )  

			while ! Empty( cMVSchedu )     
				cResult := Substr( cMVSchedu , 1 , 4 )     
				aAdd(axEmp2 , cResult )     
				cMVSchedu := Substr( cResult , 2)   
			End    // zero a array das empresas para somente informar as do parametro   
			
			FOR nI := 1 to len(aEmp)     
				aEmp[nI][1] := .F.    
			NEXT    //  seto como verdadeiro os itens da empresa   
			FOR nI := 1 to len(axEmp2)     
				FOR nJ = 1 to len(aEmp)        
					If ( aEmp[nJ][1] == axEmp2[nI][1] )         
						aEmp[nJ][2] := .T.        
					Endif     
				Next   
			Next                  
		Endif     

	Endif 

Return .T.


  • Observa-se que a utilização do PE e os impactos dele no sistema são de responsabilidade do cliente.
  • Os exemplos utilizados nessa documentação são apenas para fins de demonstração, cada cliente deve verificar qual comportamento deseja realizar de acordo com o escopo do ponto de entrada.

04. ASSUNTOS RELACIONADOS