We use the same variable names regularly. Can't you just move the variable
definitions to the end, the way they compile wants?

R R1CONS FONT(&FONTID (*POINTSIZE
&PNTSIZ))

RCONS 210 POSITION(&DWN &ACC)
DWN 5S 3P
ACC 5S 3P
FONTID 10A P
PNTSIZ 4S 1P



From: "Stone, Joel" <Joel.Stone@xxxxxxxxxx>
To: "'Midrange Systems Technical Discussion'"
<midrange-l@xxxxxxxxxxxx>,
Date: 04/04/2012 01:30 PM
Subject: *AFPDS Printer file - how to use same horizontal positioning
variable HPOS and vertical VPOS for multiple record formats
Sent by: midrange-l-bounces@xxxxxxxxxxxx



Is it possible to use the same positioning variable names in DDS (and then
COBOL)?

I cant get past the DDS compile - it wants PFLINE to appear BEFORE the
positioning variables.

Any better way to do this so I don't need to have two positioning variables
for EACH element on the page?

Thanks!







R PFOVLREC OVERLAY(&PFOVLNAME &PF_VPOS +
&PF_HPOS)
PF_VPOS 5S 3P
PF_HPOS 5S 3P
PFOVLNAME 8 P

R PFPAGESEGR PAGSEG(&PFPAGESEG &PF_VPOS +
&PF_HPOS )
PF_VPOS 5S 3P
PF_HPOS 5S 3P
PFPAGESEG 8 P

R PFLINER
PF_VPOS 5S 3P
PF_HPOS 5S 3P
PFLINE 80 POSITION(&PF_VPOS &PF_HPOS )

______________________________________________________________________
This outbound email has been scanned for all viruses by the MessageLabs
Skyscan service.
For more information please visit http://www.symanteccloud.com
______________________________________________________________________
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.




This thread ...

Follow-Ups:
Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2019 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].