Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Composition Setup
import.css=/download/attachments/327912/newLayout.css

...

Punto de entrada: CT220SEL -

...

Envío de

...

contenido

...

Alcances:

Microsiga Protheus 8.11 , Microsiga Protheus 10

...

Versiones:

Microsiga Protheus 8.11 , Microsiga Protheus 10

...

Compatible países:

Todos

Sistemas

...

operativos:

Todos

...

Compatible con las bases de datos:

...

Todas

...

Descripción:

O ponto de entrada CT220SEL permite enviar o conteúdo do (Array) contendo os dados de quais empresas e arquivos que se quer agrupar. 

El punto de entrada CT220SEL permite enviar el contenido del (Array) con los datos de las empresas y archivos que se quieren agrupar.

Programa fuente

CTBA220

Sintaxis

CT220SEL - Envío de contenido

Programa Fonte
CTBA220

...

( [ aEmp ], [ aQuais ] ) --> .T. or .F.

...

Parámetros:

...


Nombre



Tipo

...



Descripción

...



Estándar

...



Obligatorio

...



Referencia



aEmp



Array of Record

...



PUNTO DE ENTRADA, enviando

...

el contenido del array aEmp












aQuais



Array of Record

...



PUNTO DE ENTRADA, enviando

...

el contenido del array aQuais

...











...

Devolución
            .T. or .F.()

...

            Devuelve un valor lógico para ejecutar o no el procesamiento.

Observaciones

Punto de activación:

En el momento de la preparación del entorno para el proceso de consolidación se cargan los datos de las empresas y archivos que se agruparán.


Devolución esperada:

Devolución lógica para validar las Empresas/Sucursales y archivos que se agruparán. 
 Ejemplos

...

Ponto de chamada:

No momento da preparação do ambiente para o processo de consolidação são carregados os dados das empresas e arquivos que serão agrupados.

...

Retorno lógico para validar quais Empresas/Filiais e arquivos serão agrupados. 
 

...

User Function CT220Sel( aEmp ) Local cMVSchedu := Getnewpar( 'MV_XSCHEDU' , '' ) Local 

...

axEmp2     

...

:={}   

...

Local 

...

nJ       := 0 Local 

...

nI       := 

...

 

...

Local 

...

lRet     

...

:= .T. If 

...

lRet  // 

...

solamente 

...

si 

...

la 

...

variable 

...

no 

...

estuviera 

...

vacía  

...

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    // 

...

cero 

...

la array de 

...

las empresas solamente para

...

 informar 

...

las 

...

del 

...

parámetro   FOR nI = 1 to len(aEmp)

...

     

...

aEmp[nI][1] := .F.    NEXT    

...

//  

...

marco como 

...

verdadero 

...

los 

...

ítems 

...

de 

...

la 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. 

...

Variables

...


Nombre



Tipo

...



Alcance

...



Puede modificar

...



Descripción






Array of Record



Global

...



No