🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: es.comp.lenguajes
Article #175

RE: Programacion con GOTO

#175
From: Pepito
Date: Thu, 23 Nov 2000 00:00
52 lines
3249 bytes
Seguro que el lenguaje SQL se puede considerar sin ning�n lugar a dudas como
un 4GL y lenguaje de cuarta generaci�n, �a que si?.

Pues que sepas que tiene la instrucci�n GOTO, por lo menos el T-SQL que
tiene el Microsoft SQL Server.

Como muestra el ejemplo con el que ilustra la instrucci�n GOTO (Es un
ejemplo un poco absurdo ya que pod�a haber usado while, pero bueno, la
cuesti�n es que tiene goto).


USE pubs
GO
DECLARE @tablename sysname
SET @tablename = N'authors'
table_loop:
    IF (@@FETCH_STATUS <> -2)
    BEGIN
        SELECT @tablename = RTRIM(UPPER(@tablename))
        EXEC ("SELECT """ + @tablename + """ = COUNT(*) FROM "
                + @tablename )
        PRINT " "
    END
    FETCH NEXT FROM tnames_cursor INTO @tablename
IF (@@FETCH_STATUS <> -1) GOTO table_loop
GO


PD. Por cierto el Java (el de Microsoft) tambi�n tiene la palabra reservada
GOTO.

Saludos,



Jos� Luis P�rez Diez <Jluis@noEmai.com> escribi� en el mensaje de noticias
VA.0000012a.004e316a@noemai.com...
> In article <3A1C47BB.8163C24C@BORRAR.megaiweb.com>, Josep wrote:
> > Sobre lo que dices de lenguajes de "2� generaci�n" como si fueran
antiguallas, te
> > sorprender�a los MILLONES de personas que se ganan la vida trabajando
con ellos,
> > hoy, en pleno a�o 2000
> >
>  yo no digo que no sean utiles ,ni que no han superado las condiciones del
dise�o
> inicial, son lenguages que han demostrado su eficiencia. Tambien hay
muchos que
> usan asemblers, cobol ... simplemente indicaba el motivo de que tubiesen
la
> instruccion goto.
>
Technical Details
Message-ID: <8vj2at$362$1@diana.bcn.ttd.net>
Path: arc1-ca.pugleaf.net!unknown!not-for-mail
References: <zXhQ5.698$cQ5.16259@m2newsread.uni2.es> <8uto1a$t5g$1@titan.bt.es> <vpoa1tc0cg7go25021sfiajav8p4qa5e1v@4ax.com> <8v5q8s$jb2$1@titan.bt.es> <4omd1toikcik7gsm6d0c6jfu9jnken815u@4ax.com> <RK6S5.47$%x5.1611@m2newsread.uni2.es> <VA.00000122.14986ebd@noemai.com> <CqtS5.331$bU5.3285@m2newsread.uni2.es> <VA.00000123.00dcb227@noemai.com> <3A1AD2BE.49CB9748@BORRAR.megaiweb.com> <VA.00000127.006e5b03@noemai.com> <3A1C47BB.8163C24C@BORRAR.megaiweb.com> <VA.0000012a.004e316a@noemai.com>

Show Full Headers
Complete Article Headers
X-Google-Language: SPANISH,ASCII
X-Google-Thread: 1135b7,9ebb41239b0c5eaa
X-Google-Attributes: gid1135b7,public
X-Google-Thread: 105378,9ebb41239b0c5eaa
X-Google-Attributes: gid105378,public
X-Google-Thread: 10d088,9ebb41239b0c5eaa
X-Google-Attributes: gid10d088,public
X-Google-Thread: f78ff,9ebb41239b0c5eaa
X-Google-Attributes: gidf78ff,public
X-Google-Thread: f59de,9ebb41239b0c5eaa
X-Google-Attributes: gidf59de,public
X-Google-Thread: 1116f3,9ebb41239b0c5eaa
X-Google-Attributes: gid1116f3,public
X-Google-Thread: f86c8,9ebb41239b0c5eaa
X-Google-Attributes: gidf86c8,public
From: "Pepito" <kit1972@hotmail.com>
Subject: RE: Programacion con GOTO
Date: 2000/11/23
Message-ID: <8vj2at$362$1@diana.bcn.ttd.net>
X-Deja-AN: 697038648
References: <zXhQ5.698$cQ5.16259@m2newsread.uni2.es> <8uto1a$t5g$1@titan.bt.es> <vpoa1tc0cg7go25021sfiajav8p4qa5e1v@4ax.com> <8v5q8s$jb2$1@titan.bt.es> <4omd1toikcik7gsm6d0c6jfu9jnken815u@4ax.com> <RK6S5.47$%x5.1611@m2newsread.uni2.es> <VA.00000122.14986ebd@noemai.com> <CqtS5.331$bU5.3285@m2newsread.uni2.es> <VA.00000123.00dcb227@noemai.com> <3A1AD2BE.49CB9748@BORRAR.megaiweb.com> <VA.00000127.006e5b03@noemai.com> <3A1C47BB.8163C24C@BORRAR.megaiweb.com> <VA.0000012a.004e316a@noemai.com>
X-Priority: 3
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.2314.1300
Organization: Telefonica Transmision de Datos
X-MSMail-Priority: Normal
Reply-To: "Pepito" <kit1972@hotmail.com>
Newsgroups: es.comp.lenguajes,es.comp.lenguajes.java,es.comp.lenguajes.misc,es.comp.os.linux.programacion,es.comp.os.ms-windows.programacion,es.foro.lenguajes,esp.comp.so.linux.programacion