Gracias Rui Pinto (Rapinto)
COBOL Foro
Foro dedicado a COBOL, a la Programación y a la Informática.
Retroceder   COBOL Foro > IDE-s y compiladores COBOL > Fujitsu COBOL > PowerCOBOL (ActiveX, v4 - v11)
PowerCOBOL (ActiveX, v4 - v11) Versiones del IDE basadas en ActiveX
Noticias y Avisos
Otros temas que te pueden interesar
Tema Autor Foro Respuestas Último post
[Herramienta] Fujitsu Cobol & Internet Joseg PowerCOBOL (ActiveX, v4 - v11) 5 8 de marzo de 2018 12:10
Vendió una página de internet "píxel por píxel" Kuk Espacio "Offtop" 0 10 de febrero de 2017 14:29
[Información] Enviar aviso "Sin conexion a internet" Gatomalo PowerCOBOL (ActiveX, v4 - v11) 6 1 de febrero de 2017 18:12
[Información] Creación de ficheros de datos Dasije WinDev 0 7 de agosto de 2016 18:16
Base de datos .mdb Lobosauseda Bases de datos 3 10 de febrero de 2016 15:32
Respuesta
 
Herramientas

  #11
Antiguo 17 de julio de 2019, 17:07
IDENTIFICATION DIVISION
fastpho
Novato Junior
ENVIRONMENT DIVISION
Avatar de fastpho
DATA DIVISION
Forero desde (Registrado)diciembre 2016
Argentina
UbicaciónMendoza
Edad48 años
Última Actividad20.08.2019 13:44
PROCEDURE DIVISION
PostsPosts: 64
Ha dicho GraciasEnviado: 37
Ha recibido agradecimientosRecibido: 17
Mejores respuestasSoluiones: 2
ReputaciónReputación: 4
fastpho is an unknown quantity at this point fastpho is an unknown quantity at this point
Predeterminado

Buenas gente ....
Empece instalando wampserver para trabajar con el php haber como era el tema...
Y comence a leer un poco de php y el ejemplo que habia, resulta que hice una pruebas con un archivo de similares caracteristicas al del ejemplo "granos.dat" pero creado con pwcobol version 5 ,
lo que hace la rutina es buscar por indice o variable llamada $clave al principio todo bien encontraba el registro , resulta que a medida que hacia diferentes busquedas de acuerdo al indice del registro aumentaba su valor me daba como que el registro no existia.....
Jorgeanna me podrias mirar el codigo que puse haber en donde esta el problema

Código PHP:
  1. <HTML>
  2. <HEAD>
  3. <TITLE> Pruebas en PHP </TITLE>
  4. <LINK REL="stylesheet" TYPE="text/css" HREF="estilo.css">
  5. </HEAD>
  6.  
  7. <BODY>
  8.  
  9. <H1>lectura de archivo cobol</H1>
  10. <form method='post' >
  11.    <p><input name='numero' type='text' /></p>
  12.    <p><input type='submit' value='enviar'></p>
  13. </form>
  14. <?php
  15.     require("RmFile.php");
  16.     require("wenteje.php");
  17.    
  18.   // $datos= "Datos";
  19.   // $clave="0001";
  20.    
  21.    echo ("esta es la clave ") . $_POST['numero'];
  22.    $clave = $_POST['numero'];
  23.    
  24.    echo ("--------");
  25.    
  26.    
  27.    //------------------------WEMAES.DAT--------------------    
  28.         $iFile = new RmFile("RUBROS.DNX",wenteje::lectura(),".");
  29.     // muestra un determinado registro
  30.          if ($iFile->find($clave,0)){
  31.             if ($reg = $iFile->next()){
  32.         //  var_dump($reg);
  33.                 print_r($reg);
  34.                 echo "-------------lo encontro...................";
  35. //              if ($reg["wmid"]->Value == "10"){
  36.             }else{
  37.                 echo "no en el next";
  38.             }
  39.         }else{
  40.         echo "no en el find";
  41.         }
  42.         echo "---------------------------------- MUESTRA TODO EL REGISTRO --------------------";
  43.         // muestra todo el registro completo
  44.     if ($iFile->find($clave,0)){
  45.         while ($reg = $iFile->next())
  46.            
  47.         print_r($reg);
  48.         echo "----------------------------------";
  49.          
  50.         //endwhile;
  51.     }
  52.    
  53.  
  54. ?>
  55.  
  56. </BODY>
  57. </HTML>
fastpho no ha iniciado sesión   Responder Con Cita
  #12
Antiguo 18 de julio de 2019, 03:46
IDENTIFICATION DIVISION
Jorgeanna
Acabo de llegar...
ENVIRONMENT DIVISION
Avatar de Jorgeanna
DATA DIVISION
Forero desde (Registrado)septiembre 2015
Argentina
UbicaciónBuenos Aires
Última Actividad14.08.2019 01:25
PROCEDURE DIVISION
PostsPosts: 9
Ha dicho GraciasEnviado: 0
Ha recibido agradecimientosRecibido: 4
Mejores respuestasSoluiones: 1
ReputaciónReputación: 0
Jorgeanna is on a distinguished road
Predeterminado Libreria PHP - JOSE KOBER

Para mejor respuesta a tu pregunta, subi un archivo con un ejemplo mas didactico de como se puede utilizar la rutina en php para leer archivos cobol desde la web sin pasar los datos a texto y luego leerlo en mysql. LO UNICO QUE HAY QUE HACER ES LEER Y MOSTRAR LOS RESULTADOS.

Quiero dejar aclarado que no soy el autor de la libreria, me la suministro gentilmente el Sr. JOSE KOBER y ademas me ayudo a ponerla en practica.

Oportunamente vi que la solicitaba Fito y se la envie con la observacion de que si la compartiera hiciera mencion a su creador, pero bueno la publico y ni siquiera dijo recordar quien se la habia enviado, por eso pido por favor demos el credito a quien desinteresadamente suministro esta poderosa libreria.

En el comprimido van una serie de pantallas que estan corriendo en la web, con resultados extraidos directamente desde los archivos enviados por ftp, que se actualiza automaticamente al salir de la aplicacion.

Un demo que hice oportunamente para una presentacion de reconocimiento de ultrasonido podran observar en el siguiente Menu Demo USE

Por ultimo quiero decirles que el tiempo que le dediquen a su implementacion seguro estara ampliamente compensado.
Archivos Adjuntos
Tipo de Archivo: rar ejemplo.rar (404,2 KB, 5 descargas)
Jorgeanna no ha iniciado sesión   Responder Con Cita
Ha dicho Gracias : 1
Joseg (18 de julio de 2019)
  #13
Antiguo 18 de julio de 2019, 15:30
IDENTIFICATION DIVISION
fastpho
Novato Junior
ENVIRONMENT DIVISION
Avatar de fastpho
DATA DIVISION
Forero desde (Registrado)diciembre 2016
Argentina
UbicaciónMendoza
Edad48 años
Última Actividad20.08.2019 13:44
PROCEDURE DIVISION
PostsPosts: 64
Ha dicho GraciasEnviado: 37
Ha recibido agradecimientosRecibido: 17
Mejores respuestasSoluiones: 2
ReputaciónReputación: 4
fastpho is an unknown quantity at this point fastpho is an unknown quantity at this point
Predeterminado

Muchas Gracias Jorgeanna y tambien a el Sr JOSE KOBER , por su tiempo
seguire haciendo pruebas y subire los resultados para que otras personas puedan utilizar esta libreria para implementar en sus sistemas
fastpho no ha iniciado sesión   Responder Con Cita
  #14
Antiguo 18 de julio de 2019, 16:52
IDENTIFICATION DIVISION
Joseg
Novato Senior
ENVIRONMENT DIVISION
Avatar de Joseg
DATA DIVISION
Forero desde (Registrado)abril 2015
Portugal
Última Actividad06.08.2019 22:50
PROCEDURE DIVISION
PostsPosts: 162
Ha dicho GraciasEnviado: 37
Ha recibido agradecimientosRecibido: 46
Mejores respuestasSoluiones: 9
Medallas recibidas: 1Medallas: Innovación: Por aportar innovaciones - Razón: Por aportar soluciones innovadoras en varias ocasiones 
ReputaciónReputación: 9
Joseg has a spectacular aura about Joseg has a spectacular aura about Joseg has a spectacular aura about Joseg has a spectacular aura about Joseg has a spectacular aura about
Predeterminado

Cita del post de Jorgeanna Ver Mensaje
Para mejor respuesta a tu pregunta, subi un archivo con un ejemplo mas didactico de como se puede utilizar la rutina en php para leer archivos cobol desde la web sin pasar los datos a texto y luego leerlo en mysql. LO UNICO QUE HAY QUE HACER ES LEER Y MOSTRAR LOS RESULTADOS.

Quiero dejar aclarado que no soy el autor de la libreria, me la suministro gentilmente el Sr. JOSE KOBER y ademas me ayudo a ponerla en practica.

Oportunamente vi que la solicitaba Fito y se la envie con la observacion de que si la compartiera hiciera mencion a su creador, pero bueno la publico y ni siquiera dijo recordar quien se la habia enviado, por eso pido por favor demos el credito a quien desinteresadamente suministro esta poderosa libreria.

En el comprimido van una serie de pantallas que estan corriendo en la web, con resultados extraidos directamente desde los archivos enviados por ftp, que se actualiza automaticamente al salir de la aplicacion.

Un demo que hice oportunamente para una presentacion de reconocimiento de ultrasonido podran observar en el siguiente Menu Demo USE

Por ultimo quiero decirles que el tiempo que le dediquen a su implementacion seguro estara ampliamente compensado.


Muito interessante.
Esta libraria consegue ler qualquer arquivo indexado? Não necessita de runtime do Fujitsu Cobol?
Consegue interpretar campos COMP ?
Joseg no ha iniciado sesión   Responder Con Cita
  #15
Antiguo 19 de julio de 2019, 00:14
IDENTIFICATION DIVISION
Jorgeanna
Acabo de llegar...
ENVIRONMENT DIVISION
Avatar de Jorgeanna
DATA DIVISION
Forero desde (Registrado)septiembre 2015
Argentina
UbicaciónBuenos Aires
Última Actividad14.08.2019 01:25
PROCEDURE DIVISION
PostsPosts: 9
Ha dicho GraciasEnviado: 0
Ha recibido agradecimientosRecibido: 4
Mejores respuestasSoluiones: 1
ReputaciónReputación: 0
Jorgeanna is on a distinguished road
Predeterminado

No se necesita el runtime del powerCOBOL, y segun tengo entendido es compatible con campos comp, habria que ver si la rutina esta actualizada. Aclaro que no los he utilizado.

los tipos a declarar serian I,S,C,D, no es necesario delarar la totalidad de los campos sino los que se van a utilizar su ubicacion y largo.

Pueden probar con cualquier archivo que tengan, con solo hacer muy pocos cambios al ejemplo enviado pueden ver los resultados inmediatamente

Tengan en cuenta que si lo suben en un servidor web, mantengan los nombres de archivo en minusculas, ya que lo que anda en local cuando se sube a la web no anda y este fue uno de mis primeros dolores de cabeza.

Para quien tenga alguna duda, se puede hacer de todo menos grabar, el resto funciona de maravilla y por eso digo que depende de las ganas de aprender a utilizar esta herramienta, que hace tiempo esta en el foro y nadie le metio mano.

Saludos y suerte.
Jorgeanna no ha iniciado sesión   Responder Con Cita
Ha dicho Gracias : 1
Joseg (19 de julio de 2019)
Respuesta


Usuarios activos actualmente viendo este tema: 1 (0 miembros y 1 visitantes)
 
Herramientas

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



La franja horaria es GMT +1. Ahora son las 06:02.
Powered by: vBulletin, Versión 3.8.7
Derechos de Autor ©2000 - 2019, Jelsoft Enterprises Ltd.