RE: Issues compiling FREE pgm

Ya forgot to move it, caught up trying to make compile.

Regards
Michael Lange
Loewen Windows
Steinbach, MB
204.326.6808 ext. 5148



From: Justin Taylor <JUSTIN@xxxxxxxxxxxxx>
To: Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxx>
Date: 02/08/2018 01:42 PM
Subject: RE: Issues compiling FREE pgm
Sent by: "MIDRANGE-L" <midrange-l-bounces@xxxxxxxxxxxx>



Why is there a /FREE above your D-specs?

-----Original Message-----
From: MichaelLange@xxxxxxxxxx [mailto:MichaelLange@xxxxxxxxxx]
Sent: Thursday, February 08, 2018 1:27 PM
To: midrange-l@xxxxxxxxxxxx
Subject: Issues compiling FREE pgm




Sorry if you get this twice sent the first time to the wrong address.


So I'm trying to compile this pgm with a call to LWNORD09R1

/FREE
// Parameter list for SAB16R.
D SAB16R PR EXTPGM('SAB16R')
D RUNDTE 8 0
D SAB16R PI
D RUNDTE 8 0
// Call to LWNORD09R1 to get list and net for order.
D GETNET PR EXTPGM('LWNORD09R1')
D XORD# 8 0
D XSUFX 2 0
D XTLST 13 2
D XTNET 13 2

But its not compiling for reasons of ....

The name or indicator XORD# is not defined.
The name or indicator XSUFX is not defined.
The name or indicator XTLST is not defined.
The name or indicator XTNET is not defined.

They look defined to me.

Also...

The prototype for the call is not defined.


What am I missing.
Trying to find a previous pgm that I coded with a call but haven't found it
yet.


Regards
Michael Lange
Loewen Windows
Steinbach, MBThis e-mail message, including any attachments, is for the
sole use of the person to whom it has been sent, and may contain
information that is confidential or legally protected. If you are not the
intended recipient or have received this message in error, you are not
authorized to copy, distribute, or otherwise use this message or its
attachments. Please notify the sender immediately by return e-mail and
permanently delete this message and any attachments. Loewen makes no
warranty that this e-mail is error or virus free.
Please think green before printing this email.

--
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: https://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/midrange-l.

Please contact support@xxxxxxxxxxxx for any subscription related questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: http://amzn.to/2dEadiD

This e-mail message, including any attachments, is for the sole use of the person to whom it has been sent, and may contain information that is confidential or legally protected. If you are not the intended recipient or have received this message in error, you are not authorized to copy, distribute, or otherwise use this message or its attachments. Please notify the sender immediately by return e-mail and permanently delete this message and any attachments. Loewen makes no warranty that this e-mail is error or virus free.
Please think green before printing this email.