🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

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

Problema Subarchivo en RPG

#452
From: Motrasa
Date: Thu, 24 Aug 2000 12:10
29 lines
2134 bytes
Hola a todos;
    A ver si alguien me puede echar una mano con un tema de subarchivos en
RPG que me esta volviendo loco.-

Tengo una pantalla definida con tres registros y con las siguientes
caracteristicas:
    - Pantalla inicial donde se pide el codigo de empresa, llamada
(registro) BASE1
              * Tiene puesto la opcion ASSUME y OVERLAY para que no borre lo
anterior
    - Un control del Subarchivo llamado CTL01 que solicita datos para el
subarchivo (Codigo y nombre)
               *Tiene las palabras clave KEEP y OVERLAY tambien para que no
borre la pantalla anterior
               * El indicador 50 muestra el subarchivo
               * El indicador 51 muestra el control
    - Un Subarchivo llamado SFL01 que muestra los datos leidos en el fichero
(Codigo y nombre)

    El problema es que cada vez que muestro el control, y a pesar de haber
escrito la pantalla BASE1, esta se borra  y solo se muestran el subarchivo y
el control.-
    Creo que debe de ser por alguna palabra clave que me falta en el
registro de control (CTL01), pero no soy capaz de acertar con la que es.-

    Si alguien me puede "iluminar", estaria muy agradecido.-

Un saludo.-
    Gomzky.-
Technical Details
Message-ID: <8o32rk$i1o$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!newsfeed.icl.net!news-lond.gip.net!news.gsl.net!gip.net!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

Show Full Headers
Complete Article Headers
X-Google-Language: SPANISH,ASCII-7-bit
X-Google-Thread: 104581,d778c3998c0282df,start
X-Google-Attributes: gid104581,public
X-Google-ArrivalTime: 2000-08-24 05:06:32 PST
Path: arc1-ca.pugleaf.net!supernews.google.com!sn-xit-02!sn-east!supernews.com!newsfeed.direct.ca!look.ca!newsfeed.icl.net!newsfeed.icl.net!news-lond.gip.net!news.gsl.net!gip.net!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: Problema Subarchivo en RPG
Date: Thu, 24 Aug 2000 14:10:10 +0200
Organization: Telefonica Transmision de Datos
Lines: 32
Message-ID: <8o32rk$i1o$1@talia.mad.ttd.net>
NNTP-Posting-Host: 195.57.132.202
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