
_ASNID = ASIENTO.ASNID
_ASNEMP = ASIENTO.ASNEMP
_ASNUSR = ASIENTO.ASNUSR
_ASNDOC = ASIENTO.ASNDOC
_ASNFEC = ASIENTO.ASNFEC
_ASNCTR = ASIENTO.ASNCTR
_ASNULTNRO = ASIENTO.ASNULTNRO
_ASNORI = ASIENTO.ASNORI
_ASNNROORI = ASIENTO.ASNNROORI
_ASNCONPRI = ASIENTO.ASNCONPRI
_ASNTOTGRA10 = ASIENTO.ASNTOTGRA10
_ASNTOTGRA05 = ASIENTO.ASNTOTGRA05
_ASNTOTIVA10 = ASIENTO.ASNTOTIVA10
_ASNTOTIVA05 = ASIENTO.ASNTOTIVA05
_ASNTOTEX = ASIENTO.ASNTOTEX
_ASNSUC = ASIENTO.ASNSUC
_ASNREP = ASIENTO.ASNREP
_ASNNROGEN = ASIENTO.ASNNROGEN
_ASNNROMOVBANID = ASIENTO.ASNNROMOVBANID
_ASNNROREN = ASIENTO.ASNNROREN
_ASNNROFON = ASIENTO.ASNNROFON
_ASNNRODEVFON = ASIENTO.ASNNRODEVFON
_ASNAPR = ASIENTO.ASNAPR
_ASNIDANT = ASIENTO.ASNIDANT
TEXT TO vSql NOSHOW
		INSERT INTO ASIENTO (ASNEMP,ASNUSR,ASNDOC,ASNFEC,ASNCTR,ASNULTNRO,ASNORI,ASNNROORI,ASNCONPRI,ASNTOTGRA10,ASNTOTGRA05,ASNTOTIVA10,ASNTOTIVA05,ASNTOTEX,ASNSUC,ASNREP,ASNNROGEN,ASNNROMOVBANID,ASNNROREN,ASNNROFON,ASNNRODEVFON,ASNAPR,ASNIDANT)
		VALUES (?_ASNEMP,?_ASNUSR,?_ASNDOC,?_ASNFEC,?_ASNCTR,?_ASNULTNRO,?_ASNORI,?_ASNNROORI,?_ASNCONPRI,?_ASNTOTGRA10,?_ASNTOTGRA05,?_ASNTOTIVA10,?_ASNTOTIVA05,?_ASNTOTEX,?_ASNSUC,?_ASNREP,?_ASNNROGEN,?_ASNNROMOVBANID,?_ASNNROREN,?_ASNNROFON,?_ASNNRODEVFON,?_ASNAPR,?_ASNIDANT)
ENDTEXT
nDev2 = SQLEXEC(gnConnHandle,vSql)
IF nDev2 = -1 THEN
		MESSAGEBOX('No fue posible insertar en la tabla: ASIENTO',16,'Mensaje de Advertencia')
		nError = 1
		GO BOTTOM
ENDIF							