> d P1ArrVal like(ArrVal) <-- Prueba poniendo LikeDS(ArrVal)
otra forma es definir punteros y pasar los punteros. > /free On Thu, 15 Dec 2005 18:17:55 +0100, Juan Carlos Paredes wrote > Buenas tardes, foro: > > Me encuento con el siguiente problema. Tengo que pasarle a un programa una estructura de datos que es al mismo tiempo un array, y recibo el siguiente error en la compilación: > > RNF5343 30 1 La matriz tiene demasiados índices omitidos; se ignora la > especificación. > > Las definiciones son las siguientes: > > d Media s 15p 5 > d ArrVal ds dim(100) qualified > d Val 15p 5 > d Tpc 5p 2 > d medpon pr 15p 5 > d P1ArrVal like(ArrVal) > /free > Media=medpon(ArrVal); > /end-free > > y MEDPON es un procedimiento que lo que debe hacer es calcular la media ponderada de los valores que van en VAL, ponderándolos con el porcentaje indicado en TPC. El error antes indicado me lo da en la línea de llamada al procedimiento. > > ¿Alguna sugerencia o idea? > > Gracias y saludos. > > Juan Carlos. > > -- > No virus found in this outgoing message. > Checked by AVG Anti-Virus. > Version: 7.1.371 / Virus Database: 267.13.13/200 - Release Date: 14/12/2005 --------------------------------------------------------------- Héctor Benito Serón. Correo electrónico: [EMAIL PROTECTED] Responsable Departamento de Informática. GRUPO CARRERAS. División Almacenaje y Distribución S.A Ctra. de Huesca, km. 7,770 Ciudad del Transporte Tel. 976.011.116 Tel. 976.587.369 Fax. 976.150.499 Web. http://www.grupocarreras.com "Este correo electrónico y la información contenida en el mismo es de carácter confidencial y está sometida al secreto profesional, dirigiéndose exclusivamente al destinatario mencionado en el encabezamiento, cuyos datos forman parte de un fichero responsabilidad del GRUPO CARRERAS y cuya finalidad es contactar con el titular de los datos a través del correo electrónico. Le informamos que cuenta con los derechos de acceso, rectificación y cancelación, que podrá ejercitar mediante el envío de un e- mail a la siguiente direccion: [EMAIL PROTECTED] Si el receptor de la comunicación no fuera el destinatario, le informamos que cualquier divulgación, copia, distribución o utilización no autorizada de la información contenida en la misma está prohibida por la legislación vigente." http://www.grupocarreras.com ____________________________________________________________________________ __________________________________________________ Forum.HELP400 es un servicio más de NEWS/400. © Publicaciones Help400, S.L. - Todos los derechos reservados http://www.help400.es _____________________________________________________ Para darte de baja visita la siguente URL: http://coyote.combios.es/mailman/listinfo/forum.help400
