RE: SEPT

[Leif Svalgaard <l.svalgaard@xxxxxxxxxxxxx>]

Don, why repost it? I got Gene's original posting.

> -----Original Message-----
> From: Don [SMTP:dr2@cssas400.com]
> Sent: Wednesday, December 08, 1999 10:44 AM
> To:   mi400@midrange.com
> Subject:      SEPT
> 
> Folks, please make sure you post to MI400 from the ID you're sub'd
> under...tks..
> 
> ----------
> 
> 
> Reposted for Gene_Gaunt:
> 
> 
> Here's a simpler way to list SEPT:
> 
> DMPSYSOBJ  QLINMTBL  QSYS  19  F9
> 
> Or from MI program:
> 
> DCL SYSPTR TABLE     AUTO INIT("QLINMTBL", TYPE(SPC,H"F9"), CTX("QSYS"));
> DCL DD     ITEM(6700)     BAS(TABLE) POS(11) CHAR(11);
> DCL DD     PROG(6700)     DEF(ITEM) POS(1) CHAR(10) AEO(11);
> 
> SETSPPFP TABLE, TABLE;
> BRK "LOOK";
> 
> 
> +---
> | This is the MI Programmers Mailing List!
> | To submit a new message, send your mail to MI400@midrange.com.
> | To subscribe to this list send email to MI400-SUB@midrange.com.
> | To unsubscribe from this list send email to MI400-UNSUB@midrange.com.
> | Questions should be directed to the list owner/operator:
> dr2@cssas400.com
> +---
+---
| This is the MI Programmers Mailing List!
| To submit a new message, send your mail to MI400@midrange.com.
| To subscribe to this list send email to MI400-SUB@midrange.com.
| To unsubscribe from this list send email to MI400-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: dr2@cssas400.com
+---