×
The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.
How would the following declaration look? (ugly but valid)
DCL VAR(&DS1) TYPE(*CHAR) LEN(1000)
DCL VAR(&DS2) TYPE(*CHAR) LEN(1000)
DCL VAR(&NOTSTORAGE) TYPE(*DEC) LEN(15 0)
DCL VAR(&FIELD1.1) TYPE(*CHAR) STG(*DEFINED) +
LEN(512) DEFVAR(&DS1)
DCL VAR(&FIELD2.1) TYPE(*CHAR) STG(*DEFINED) +
LEN(512) DEFVAR(&DS2)
DCL VAR(&FIELD1.2) TYPE(*CHAR) STG(*DEFINED) +
LEN(10) DEFVAR(&DS1)
DCL VAR(&FIELD2.2) TYPE(*CHAR) STG(*DEFINED) +
LEN(150) DEFVAR(&DS2)
DCL VAR(&FIELD1.3) TYPE(*CHAR) STG(*DEFINED) +
LEN(150) DEFVAR(&DS1)
DCL VAR(&FIELD2.3) TYPE(*CHAR) STG(*DEFINED) +
LEN(10) DEFVAR(&DS2)
Mark Murphy
STAR BASE Consulting, Inc.
mmurphy@xxxxxxxxxxxxxxx
-----MichaelQuigley@xxxxxxxxxx wrote: -----
To: "Midrange.com, WDSc" <wdsci-l@xxxxxxxxxxxx>
From: MichaelQuigley@xxxxxxxxxx
Date: 05/06/2016 03:31PM
Subject: [WDSCI-L] New RFE--an option for formatting DCL statements in RDi
I entered a new RFE to automatically indent DCL statements for variables
with defined storage. Here's the link:
http://www.ibm.com/developerworks/rfe/execute?use_case=viewRfe&CR_ID=87977
If you like it, please vote for it.
Michael Quigley
Computer Services
The Way International
www.TheWay.org
midrange.com
