Cobol Foro - Nuevo foro y sus posibilidades

Cobol Foro (https://www.cobolforo.es/index.php)

- Funcionamiento del Foro (https://www.cobolforo.es/forumdisplay.php?f=22)

- - Nuevo foro y sus posibilidades (https://www.cobolforo.es/showthread.php?t=18)

Nuevo foro y sus posibilidades

Amigos, aqui podemos discutir del nuevo foro, comentarme los bugs que veáis etc.
Ademas, este foro dispone de muchos plugins, como Galería de imágenes, chat instantáneo, y muchas cosas mas.

Voy a ver si puedo añadir con el tiempo algunos plugins. Existe resalto de sintaxis de lenguajes de programación, voy a buscar el de COBOL.

Ideas, opiniones etc... Todo lo podéis comentar aquí.

Un abrazo a todos.

hola kuk
hoy escribi en este foro pero parese que se borra
bueno lo me gustaria si le pones tags a este foro para buscarlo por google
como foro cobol, cobol , cobol en español etc

Roger, de momento no tiene sentido porque estamos en un espacio gratuito y sin dominio (URL) fijo. Pero llevas razon, en cuanto se decida todo lo hacemos.

Nuevas caritas (emoticons):

:mor: :mola: :enamor: :banned: :foto: :) :sue: :cardenal: :mafia: :( :tonto: :jefe: :vacuna: :duerme: :confused: :focus: :cerv: :yoquese: :rey: :silba: :playa: :perdon: :piensa: :mad: :beber: :malo: :busca: :hi: :baila: :astro: :susto: :help: :loco: :angel: :lee: :cumple: :p :llora: :bronca: :airkiss: :rosa: ;) :cojo: :nocreo: :agres: :fuma: :D :apl: :shok: :acute: :amigo: :o :rolleyes: :cool: :eek:

Añadido Hack - solo los usuarios registrados pueden ver los enlaces:

www.google.es

Para agregar codigo COBOL hay que meterlo entre los tags COBOL como se indica abajo (sin espacios). O usando el boton http://www.zucker.comlu.com/images/editor/cobol.gif
Podeis probar antes de publicar un post con Vista Previa (en modo avanzado del editor)

Código:



[ COBOL ]



...codigo cobol 



[ /COBOL ]

Código COBOL:

              IDENTIFICATION DIVISION.
 
       PROGRAM-ID.    SHELL.
 
       ENVIRONMENT DIVISION.
 
       SPECIAL-NAMES.
 
           DECIMAL-POINT IS COMMA.
 
 
       INPUT-OUTPUT SECTION.
 
       FILE-CONTROL.
 
           SELECT OPTIONAL COMP-FILE
           ASSIGN TO PRINTER "LINK.TXT"
      *    ORGANIZATION IS INDEXED
      *    ACCESS MODE  IS RANDOM
      *    RECORD KEY   IS RE-COM-NAME
           FILE STATUS  IS SW-FILE-STATUS.
 
 
       DATA DIVISION.
 
       FILE SECTION.
 
       FD  COMP-FILE
           LABEL RECORDS ARE STANDARD
           DATA RECORD IS RE-COMP.
       01  RE-COMP      PIC X(100).
 
 
       WORKING-STORAGE SECTION.
 
       01  WS-CAMPO PIC X.
      *01  ws-campo-2 PIC N(10) Usage National.
 
       01  SW-FILE-STATUS              PIC XX.
           88  SW-FS-OK                        VALUE '00' '05'.
           88  SW-DUP-KEY                      VALUE '22'.
           88  SW-FIN-FICH                     VALUE '10'.
           88  SW-NOT-FND                      VALUE '23'.
 
      *01  RUSO PIC N(50) VALUE "ÇÊÙÛÔ".
 
       LINKAGE SECTION.
 
       COPY "PBDM001R.cpy".
 
 
       PROCEDURE DIVISION USING VA-PBDM001R.
 
           OPEN OUTPUT COMP-FILE
 
           STRING "VN-OPTION: " VN-OPTION "|"
           DELIMITED BY SIZE INTO RE-COMP
 
           WRITE RE-COMP
 
           STRING "VA-PBDM001R-INDATA: " VA-PBDM001R-INDATA "|"
           DELIMITED BY SIZE INTO RE-COMP
 
           WRITE RE-COMP
 
           STRING "VA-001R-IN-OP1-DATE: " VA-001R-IN-OP1-DATE "|"
           DELIMITED BY SIZE INTO RE-COMP
 
           WRITE RE-COMP
 
           STRING "VA-001R-OUT-DATE: " VA-001R-OUT-DATE "|"
           DELIMITED BY SIZE INTO RE-COMP
 
           WRITE RE-COMP
 
           STRING "VA-001R-OUT-TIME: " VA-001R-OUT-TIME "|"
           DELIMITED BY SIZE INTO RE-COMP
 
           WRITE RE-COMP
 
           STRING "VA-001R-OUT-STAMP: " VA-001R-OUT-STAMP "|"
           DELIMITED BY SIZE INTO RE-COMP
 
           WRITE RE-COMP
 
           STRING "VN-001R-OUT-NUMMER: " VN-001R-OUT-NUMMER "|"
           DELIMITED BY SIZE INTO RE-COMP
 
           WRITE RE-COMP
 
           STRING "VA-001R-RC: " VA-001R-RC "|"
           DELIMITED BY SIZE INTO RE-COMP
 
           WRITE RE-COMP
 
           STRING "VA-001R-RC-DESC: " VA-001R-RC-DESC "|"
           DELIMITED BY SIZE INTO RE-COMP
 
           WRITE RE-COMP
 
           CLOSE COMP-FILE
 
           GOBACK.

Amigos!!! Tenemos Chat! Se encuentra entre los foros y la caja de estadisticas. Se puede abrir en ventana nueva.

Tenemos un nuevo sistema instalado en el foro - MEDALLAS

Algunas se pueden solicitar, otras no. Aunque generalmente seremos los Admins quien decidiremos.
Es una manera más de valorar la calidad y la participación de nuestros foreros.

Espero que os guste. :fuma:

A partir de ahora, viendo un tema, al hacer click en el Nickname de un usuario, se cita el Nickname en la respuesta rápida (la que se encuentra abajo, en cada tema)
Tambien, al seleccionar texto en un mensaje, sale un botoncito flotante para citar lo seleccionado en la respuesta rápida!