Cobol Foro
Navegación en el Foro
Retroceder   Cobol Foro Entornos de desarrollo y compiladores Cobol Fujitsu COBOL PowerCOBOL (ActiveX, v4 - v11)
PowerCOBOL (ActiveX, v4 - v11) Versiones del IDE basadas en ActiveX
 
Otros temas que te pueden interesar
Tema Autor Foro Respuestas Último post
[Compilador] Aplicacion CURD conectar servidor de MariaDB nbiker GnuCOBOL (OpenCOBOL) 8 30 de diciembre de 2024 15:48
[Duda] Diferencia resultados consulta en MariaDB y PWC9 Josber PowerCOBOL (ActiveX, v4 - v11) 27 2 de octubre de 2024 03:33
[Compilador] Diagnostica error para ciertas variables Tigre PowerCOBOL v3 (V3L10, Win32) 1 14 de agosto de 2024 17:33
[Sintaxis] Error de sintaxis SQL GabrielACE AcuCobol 10 29 de enero de 2019 20:14
Resalto de sintaxis Kuk Funcionamiento del Foro 4 14 de diciembre de 2016 03:06

Respuesta
 
Herramientas

  #11
Antiguo 25 de julio de 2017, 01:02
dmosca
Forero
Última Actividad 07.07.2022 13:19
Posts Posts: 69
Likes enviados Enviados: 32
Likes recibidos Recibidos: 3

adjunto ppj, espero se haga la luz....

estoy por volver a los indexados cobol...

---------- Post añadido : 20:02 ---------- Post anterior : 19:53 ----------

Adjunto ppj...

estoy atento a sus comentarios....

muchas gracias

3 intento de subir el ppj
Archivos Adjuntos
Tipo de Archivo: rar ADO0003.rar (5,4 KB)Descargas: 127
dmosca is offline   Responder Con Cita
  #12
Antiguo 25 de julio de 2017, 17:53
Kuk
Administrador
Última Actividad 21.09.2026 18:24
Posts Posts: 2.500
Likes enviados Enviados: 1037
Likes recibidos Recibidos: 1207

dmosca, cambia los campos numéricos por los binarios estándar. Es decir

Código COBOL:
  1.      01 WEJEMPLO.
  2.         02 WORDEN   PIC S9(4) COMP-5.
  3.         02 WCAMPO1  PIC X(30).
  4.         02 WCAMPO2  PIC S9(9) COMP-5.
  5.         02 WCAMPO3  PIC X.

Muéstranos el código DDL de la tabla (con qué tipos de campos se ha creado).



NORMAS DEL FORO - para garantizar el buen funcionamiento del Foro.
¿Te han ayudado? NO TE OLVIDES de darle a
¿Quieres dirigirte a alguien en tu post? Notifícale haciendo clic en su Nick
Kuk is offline   Responder Con Cita
  #13
Antiguo 25 de julio de 2017, 17:56
Josber
Moderador Global
Activista del Foro: Activista del Foro - Issue reason: Por aportar manuales y enriquecer  Agradecimientos: Por muchos agradecimientos de parte de los Foreros - Issue reason: Por muchos agradecimientos 
Última Actividad 22.09.2026 16:20
Posts Posts: 883
Likes enviados Enviados: 418
Likes recibidos Recibidos: 492

dmosca, cambiando los parámetros por los de la BD que tengo yo, a mi me funciona perfectamente tal y como lo tienes ahora, (con la linea del INTO :WORDEN .... comentada), en cuanto quito el comentario a la linea, ya no funciona de ninguna manera.

¿Qué es lo que quieres hacer exactamente?, ¿Una lectura recursiva de todos los registros que tengan un cierto valor o de sólo un registro?.

Este es el pantallazo de que funciona sin quitar el comentario de la linea.

Miniatura de Adjuntos
Pulsar la imagen para la versión amplia
Nombre:  Sin título.jpg
Vistas: 122
Tamaño:  16,4 KB  
Josber is offline   Responder Con Cita
  #14
Antiguo 25 de julio de 2017, 17:58
Kuk
Administrador
Última Actividad 21.09.2026 18:24
Posts Posts: 2.500
Likes enviados Enviados: 1037
Likes recibidos Recibidos: 1207

También ahora que lo pienso, en ADO (que yo nunca lo he usado) ¿se puede meter INTO? Creo que no, hay otro comando para recoger los datos, algo tipo "GetRecordSet" o algo así ¿no?



NORMAS DEL FORO - para garantizar el buen funcionamiento del Foro.
¿Te han ayudado? NO TE OLVIDES de darle a
¿Quieres dirigirte a alguien en tu post? Notifícale haciendo clic en su Nick
Kuk is offline   Responder Con Cita
  #15
Antiguo 25 de julio de 2017, 18:24
Josber
Moderador Global
Activista del Foro: Activista del Foro - Issue reason: Por aportar manuales y enriquecer  Agradecimientos: Por muchos agradecimientos de parte de los Foreros - Issue reason: Por muchos agradecimientos 
Última Actividad 22.09.2026 16:20
Posts Posts: 883
Likes enviados Enviados: 418
Likes recibidos Recibidos: 492

Cuando empecé a trastear con las BDs, para eliminar los ficheros indexados de COBOL, pero sólo los grandes, los pequeños los conservo, estuve mirando si hacerlo con SQL-Embebido o a través de ADO, al final me decanté por SQL_Embebido, porque aparte de que escribes menos y es más sencillo, después el programa es más claro de entender, ADO se aparta mucho de la "limpieza visual" que ha tenido COBOL de toda la vida.

Un saludo
Josber is offline   Responder Con Cita
  #16
Antiguo 25 de julio de 2017, 23:33
dmosca
Forero
Última Actividad 07.07.2022 13:19
Posts Posts: 69
Likes enviados Enviados: 32
Likes recibidos Recibidos: 3
Base de datos variables de trabajo ADODB
0 Inactivo Inactivo

Josber

quiero ver si existe un usuario y comparar si corresponde el password.

como te comentaba si elimino la linea del "into" funciona ok.

Ejemplo es una base simple para ver si lo puedo hacer funcionar...

Estoy iniciando con sql, como leí en el foro que es mas rápido ADO que SQL embebido me decidí por ADO.

Kuk:

modifique los campos en la working, sigue el error

adjunto definición de la tabla ejemplo:

Miniatura de Adjuntos
Pulsar la imagen para la versión amplia
Nombre:  Ejemplo.JPG
Vistas: 111
Tamaño:  17,6 KB  
dmosca is offline   Responder Con Cita
  #17
Antiguo 27 de julio de 2017, 12:55
Kuk
Administrador
Última Actividad 21.09.2026 18:24
Posts Posts: 2.500
Likes enviados Enviados: 1037
Likes recibidos Recibidos: 1207

dmosca, como he dicho en mi post de antes, el INTO no puedes usarlo ahí. Fíjate en el ejemplo de Dasije:

[Aporte] Ejemplo PWC y SQL Embebido - COBOL Foro



NORMAS DEL FORO - para garantizar el buen funcionamiento del Foro.
¿Te han ayudado? NO TE OLVIDES de darle a
¿Quieres dirigirte a alguien en tu post? Notifícale haciendo clic en su Nick
Kuk is offline   Responder Con Cita
  #18
Antiguo 29 de julio de 2017, 00:19
Dasije
Forero Senior
Última Actividad 06.03.2022 17:04
Posts Posts: 173
Likes enviados Enviados: 1
Likes recibidos Recibidos: 79

dmosca, Hay que tener en cuenta los tipos de datos:

Código SQL:
  1. Char PIC X(x).
  2. Int   PIC S9(9) COMP-5.

En el manual de COBOL, hay una sección sobre el tema de SQL, donde te indica que tipo de campos debes seguir, en el resto de motores no varia mucho.



Empresa de desarrollo de aplicaciones en COBOL.

DASIJE INFORMATICA, S.L.
C/ TOMAS BRETON 20
11406 JEREZ DE LA FRONTERA
CADIZ

Teléfono : 956 11 21 11
Web: http://www.dasije.es / DASIJE INFORMATICA
E-m@il: clientes(@)dasije.es
Dasije is offline   Responder Con Cita
Respuesta



Derechos de Publicación
No puedes publicar nuevos temas
No puedes publicar posts/responder
No puedes adjuntar archivos
No puedes editar tus posts

BB code is habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado

Saltar a Foro


La franja horaria es GMT +2. Ahora son las 22:12.
Powered by: vBulletin, Versión 3.8.7
Derechos de Autor ©2000 - 2026, Jelsoft Enterprises Ltd.