🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: es.comp.os.as400
Article #456

RE: problema con fichero logico en Cobol400

#456
From: Motrasa
Date: Mon, 28 Aug 2000 10:49
24 lines
2156 bytes
Hola!
    Lo mas probable es que el campo del fichero fisico definido como clave
en el l�gico, sea empaquetado, y cuando estas accediendo con un valor clave
sin empaquetar (por eso te da errores la variable, no la clave).
Prueba a definir la variable que mueves al campo de clave como empaquetada.-
No lo recuerdo ahora mismo, pero creo que es algo asi como COMP-3 dentro de
la clausula PICTURE.
    Suerte
    Un Saludo.-
            Gomzky.-

eperez <eps-rps@wanadoo.es> escribi� en el mensaje de noticias
RNBp5.432$cW2.11636@m2newsread.uni2.es...
Mi problema es el siguiente , tengo un programa que accede a un logico para
recuperar datos de �l mediante acceso aleatorio , pero cuando intento mover
un valor numerico al campo clave del fichero (que tambien es numerico) me da
un error , que aunque ahora mismo no recuerdo su codigo ( *cpfxxxx ) la
descripcion es la siguiente : "La variable del archivo XXXXX no esta activa"
.
Si yo abro el archivo (INPUT) adecuadamente y �ste hace referencia a un
fisico que contiene datos y ambos estan bien creados , por qu� obtengo ese
error ? , si alguien pudiese ayudarme se lo agradecer�a enormemente !

Un Saludo.
Technical Details
Message-ID: <8odfjr$9ui$1@talia.mad.ttd.net>
Path: arc1-ca.pugleaf.net!supernews.google.com!sn-xit-02!sn-east!supernews.com!newsfeed.direct.ca!look.ca!newsfeed.icl.net!diablo.netcom.net.uk!netcom.net.uk!news.tele.dk!128.39.3.166!uninett.no!newsfeed1.enitel.no!masternews.telia.net!news-sto.telia.net!newsfeed.bcn.ttd.net!news.mad.ttd.net!not-for-mail
References: <RNBp5.432$cW2.11636@m2newsread.uni2.es>

Show Full Headers
Complete Article Headers
X-Google-Language: SPANISH,ASCII
X-Google-Thread: 104581,2c8b9fc5f97556ac
X-Google-Attributes: gid104581,public
X-Google-ArrivalTime: 2000-08-28 03:46:01 PST
Path: arc1-ca.pugleaf.net!supernews.google.com!sn-xit-02!sn-east!supernews.com!newsfeed.direct.ca!look.ca!newsfeed.icl.net!diablo.netcom.net.uk!netcom.net.uk!news.tele.dk!128.39.3.166!uninett.no!newsfeed1.enitel.no!masternews.telia.net!news-sto.telia.net!newsfeed.bcn.ttd.net!news.mad.ttd.net!not-for-mail
From: "Motrasa" <gcarrera@motrasa.com>
Newsgroups: es.comp.os.as400
Subject: RE: problema con fichero logico en Cobol400
Date: Mon, 28 Aug 2000 12:49:18 +0200
Organization: Telefonica Transmision de Datos
Lines: 31
Message-ID: <8odfjr$9ui$1@talia.mad.ttd.net>
References: <RNBp5.432$cW2.11636@m2newsread.uni2.es>
NNTP-Posting-Host: 195.76.247.241
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 5.00.2615.200
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.2615.200