Linha Microsiga Protheus - Espanhol

Atalhos

Árvore de páginas

Punto de entrada: CT175GRV - Genera asientos de ajuste

Alcances:

Microsiga Protheus 10 , Microsiga Protheus 11

Versiones:

Microsiga Protheus 10 , Microsiga Protheus 11

Compatible países:

Todos

Sistemas operativos:

Todos

Compatible con las bases de datos:

Todas

Idiomas:

Portugués (Brasil) , Portugués (Portugal) , Español , Inglés

Descripción:

Este P.E. Genera asientos de ajuste   

Eventos

Ocurre en la rutina que Genera asientos de ajuste                                

Programa fuente

CTBA175.PRW

Sintaxis

CT175GRV - Genera asientos de ajuste ( [ aClone(aCab) ], [ aClone(aTotItem) ] ) --> aRetorno

Parámetros:


Nombre



Tipo



Descripción



Estándar



Obligatorio



Referencia



aClone(aCab)



Array of Record



Copia de la matriz encab












aClone(aTotItem)



array_of_record



Copia de la matriz con totales de los ítems











Devolución
           aRetorno(array_of_record)

           Colección con los asientos de ajuste

Ejemplos

	If lCt175GrCT2		aRetorno	:=	ExecBlock('CT175GRV',.F.,.F.,{aClone(aCab),aClone(aTotItem)})		aCab		:=	aClone(aRetorno[1])		aTotItem	:=	aClone(aRetorno[2])		aRetorno	:=	{}		Endif			IncProc(STR0036) //"Generando asiento "	MSExecAuto({|x,y,Z| Ctba102(x,y,Z)},aCab,aTotItem,3) 	aTotItem	:=	{}		If lMsErroAuto		DisarmTransaction()		MostraErro()		Return .F.	Endif			nBase		:=	nX