On Fri, 6 Oct 2006 12:55:11 -0300
"Edson - PMSS" <[EMAIL PROTECTED]> wrote:

> Para instalar o tinycobol no Debian-BR-CDD, baixe os pacotes .deb de:
> http://paginas.terra.com.br/informatica/bau/debian/pacote/tinycobol/ 
> 
> Execute na linha de comando:
> 
> # dpkg -i *.deb
> 
> Para testar crie o arquivo (ou copiar/colar) abaixo:
> 
>          IDENTIFICATION DIVISION.
>          PROGRAM-ID.     HELLO.
>          AUTHOR. EDSON.
>         *> Programa Hello.cob.
>         *> Uso: programa hello tradicional.
>          INSTALLATION.   PMSS.
>          DATE-WRITTEN.   06/10/2006.
>          DATE-COMPILED.  
>          SECURITY.       LIVRE.
>         
>          ENVIRONMENT DIVISION.
>          CONFIGURATION SECTION.
>          SOURCE-COMPUTER. PIII800.
>          OBJECT-COMPUTER. PIII800.
>          SPECIAL-NAMES.
>              DECIMAL-POINT IS COMMA.
>         
>          DATA DIVISION.
>          WORKING-STORAGE SECTION.
>        77  TECLA       PIC 9(1).
>          SCREEN SECTION.
>          01  TELA.
>          02  BLANK SCREEN.
>          02  LINE 04 COLUMN 21 VALUE "Programa Hello World!".
>          02  LINE 06 COLUMN 21 VALUE "AUTOR: EDSON - PMSS - 06/10/2006".
>          02  LINE 14 COLUMN 21 VALUE "Olá mundo!".
>         
>          PROCEDURE DIVISION.
>          INICIO.
>              DISPLAY TELA.
>          FIM.
>              DISPLAY 'FIM DO PROGRAMA' LINE 24 POSITION 31.
>            ACCEPT TECLA.
>              STOP RUN.
> 
> Para compilar:
> 
> # htcobol hello.cob -o hello
> 
> Agora é só executar:
> 
> # ./hello 
> 
> Edson - Pref. Mun. de São Sebastião - SP
> Divisão de Tecnologia da Informação 


Valeu pela dica Edson.  
Eu tambem uso o Tiny em minha Automacao Comercial


-- 
Carlucio Lopes-Cobolito 62-8415-8939 3526-8001 msn:[EMAIL PROTECTED]
Entenda Pirataria --> http://www.carlinux.v10.com.br
Compilador Cobol Free http://tinycobol.org em Portugues
Porque Cobol? --> http://www.clubecobol.com.br/cc_porque_cobol_02.asp
Projeto Debian Brasil http://cdd.debian-br.org
Tinycobol/Debian Gnu-Linux/Postgresql/Tcl-Tk

Responder a