Mon Sep  8 12:27:09 EDT 1997
To:	SMGR Users				Bulletin: 19

From:	Neal Rhodes /MNOP Ltd

Subject: Submit generates error on Dec Alpha

To Recap,  you are finding that the PRS command on Dec Alpha does not like
revisions like 1.04 and really wants 1.4.   Fair nuff.

IF you are doing the submit from the checkin trap, trafchki.i, then you
should be able to tweak it by adding the line shown below.

/* =====================================================================
        SUBMIT Files directly to Production Manager
========================================================================*/

/*
def var sub-reply as logical init true no-undo.

for each stsprcat where stsprcat.cat = scat no-lock:
        if (min-rev <> "" and snew-rev < min-rev )
        or (max-rev <> "" and snew-rev > max-rev ) then do:
                message "Revision outside range for project "
                        stsprcat.project-name.
                end.
        else do:
                message "Submit to " stsprcat.project-name "?" update sub-reply.
                if sub-reply then do:
                        sdestination = stsprcat.project-name.
                        srev = snew-rev.
/* TWEAK TWEAK TWEAK->*/{strevext.i &rev="srev"}
                        {stsubex.i}
                        end.
                end.
        end.
*/

If you are running the submit from within the version browser, you can either:

A. actually edit out the zero in the submit options window,
B. wait for me to change that source and send it to you,
C. tweak the ./pmgrbin/_submit procedure as follows: 

	# Submit - Put request to submit file into Prodmgr Queue
	# Copyright 1994 Neal Rhodes MNOP Ltd - All rights reserved
	# Revision: "@(#) _submit 1.3 smgr 94/12/13 "

	submitFile() {
	#category|file|date|tag|revision|comment text
	DATE=`date '+%y/%m/%d'`

==>	REV=`echo $REV | sed -e "s/\.0/\./"`		# Remove leading 0

	TEXT=`prs -r$REV -d":C:" ${scdir}s.$ELEM | tr '\012' ';'`
	echo "$CAT|$ELEM|$DATE|$ME| |$REV|$TEXT|" >> $SUBMIT_FILE
	}