Remove hard coded library in CL; configure for RDi (#6)

* Initial commit for a branch to try out RDi and eGit.
RDi has the iProjects perspective which allows testing and development,
and as a side effect, keeps a copy of the source in a stream file.  It
is that stream file we're going to piggyback on.

* Initial commit; using RDi iProjects

* Remove hard coded library

* Put library parameter in CL call

* Change build.txt to match RDi folder hierarchy.
Also, remove PDIR() when done.

* Typo in cleanup command.

* Add MONMSG to handle errors.  
Will ignore if message file already exists.
Will ignore if message ID already exists.

.ibmi/.properties

@@ -0,0 +1,2 @@
+#Mon May 23 15:56:19 EDT 2016
+com.ibm.etools.iseries.remotebuild\:ActiveBuildStyle=com.ibm.etools.iseries.remotebuild.style.program

.ibmi/QCLSRC/.properties

@@ -0,0 +1,2 @@
+#Mon May 23 16:02:47 EDT 2016
+com.ibm.etools.iseries.projects.core\:ccsid=37

.ibmi/QRPGLESRC/.properties

@@ -0,0 +1,3 @@
+#Mon May 23 16:03:15 EDT 2016
+com.ibm.etools.iseries.projects.core\:ccsid=37
+com.ibm.etools.iseries.projects.core\:recordLength=92

.project

@@ -0,0 +1,22 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<projectDescription>
+	<name>SEUEXIT</name>
+	<comment></comment>
+	<projects>
+	</projects>
+	<buildSpec>
+		<buildCommand>
+			<name>com.ibm.etools.iseries.perspective.projectBuilder</name>
+			<arguments>
+			</arguments>
+		</buildCommand>
+		<buildCommand>
+			<name>com.ibm.etools.iseries.projects.modelValidator</name>
+			<arguments>
+			</arguments>
+		</buildCommand>
+	</buildSpec>
+	<natures>
+		<nature>com.ibm.etools.iseries.perspective.nature</nature>
+	</natures>
+</projectDescription>

QCLSRC/SEUEXITCL.CLP

@@ -0,0 +1,23 @@
+/* Create SEUEXIT message file */
+/* parameter is the name of the library where you want */
+/* to install the message file */
+pgm &tgtlib
+
+dcl &tgtlib *char 10
+
+monmsg cpf2112 /* MSGF already exists */
+monmsg cpf2412 /* MSG already exists */
+
+CRTMSGF MSGF(&tgtlib/SEUEXIT) TEXT('SEU Exit program messages') CCSID(*MSGD)
+
+ADDMSGD MSGID(SEU0001) MSGF(SEUEXIT) MSG('Cursor is not positioned within  a +
+          source statement.')
+ADDMSGD MSGID(SEU0002) MSGF(SEUEXIT) MSG('Line split complete.')
+ADDMSGD MSGID(SEU0003) MSGF(SEUEXIT) MSG('Line join complete.')
+ADDMSGD MSGID(SEU0004) MSGF(SEUEXIT) MSG('Cannot update in Browse mode.')
+ADDMSGD MSGID(SEU0005) MSGF(SEUEXIT) MSG('ATTR command processed.')
+ADDMSGD MSGID(SEU0006) MSGF(SEUEXIT) MSG('ATTR command not valid for this +
+          member type.')
+ADDMSGD MSGID(SEU0007) MSGF(SEUEXIT) MSG('&1') FMT((*CHAR 80))
+
+endpgm

build.txt

@@ -4,12 +4,12 @@ files:
 build:
 	ADDLIBLE &INTOLIB
 
-	SNDMSG MSG('SEUEXIT requires you to use ''BUCK'' as your INTOLIB due to the hardcode in SEUEXITCL.') TOUSR(*REQUESTER)
-
 	CRTSRCPF FILE(&INTOLIB/QSOURCE) RCDLEN(112)
-	CPYFRMSTMF FROMSTMF('&DIR/SEUEXITCL.CLP') TOMBR('/QSYS.lib/&INTOLIB.lib/QSOURCE.file/SEUEXITCL.mbr') MBROPT(*ADD)
+	CPYFRMSTMF FROMSTMF('&DIR/QCLSRC/SEUEXITCL.CLP') TOMBR('/QSYS.lib/&INTOLIB.lib/QSOURCE.file/SEUEXITCL.mbr') MBROPT(*ADD)
 	CRTCLPGM PGM(&INTOLIB/SEUEXITCL) SRCFILE(&INTOLIB/QSOURCE)
 	DLTOBJ &INTOLIB/QSOURCE OBJTYPE(*FILE)
-	CALL &INTOLIB/SEUEXITCL
+	CALL &INTOLIB/SEUEXITCL ('&INTOLIB')
+
+	CRTBNDRPG PGM(&INTOLIB/SEUEXIT) SRCSTMF('&DIR/QRPGLESRC/SEUEXIT.RPGLE') DBGVIEW(*LIST) REPLACE(*YES)
 
-	CRTBNDRPG PGM(&INTOLIB/SEUEXIT) SRCSTMF('&DIR/SEUEXIT.RPGLE') DBGVIEW(*LIST) REPLACE(*YES)
+	QSH CMD('rm -rf &DIR/')