;++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
;
;*NAME:		pmas_grotpos
;
;*CATEGORY:	PMAS instrument control
;
;*PURPOSE:	set PMAS Fiber Spectrograph grating rotator
;
;*CALLING SEQUENCE:  pmas_grotpos, oldpos [,setpos, newpos, errmsg] [,/SILENT]
;
;*PARAMETERS:
;	INPUT:    setpos           new set position (optional)
;		
;	OUTPUT:   oldpos           position before move
;		  newpos           new position after move
;
;	KEYWORDS: [/SILENT]        no messages printed
;		       
;       note:     Call of pmas_camfoc with 1 parameter returns oldpos and 
;                 DOES NOT MOVE
;
;*EXAMPLES:	pmas_grotpos,opos,-63,npos,err 
;                         
;
;*SYSTEM VARIABLES USED:
;		- none -
;
;*COMMON BLOCKS:
;		- none -
;
;*INTERACTIVE INPUT:
;		- none -
;
;*SUBROUTINES CALLED:
;		sstring
;		...
;		...
;
;*FILES USED:
;		- none -
;
;*SIDE EFFECTS:
;		
;
;*RESTRICTIONS:
;
;
;*NOTES:
;		This routine needs an update if ACE software should be changed 
;
;*PROCEDURE:
;
;
;*MODIFICATION HISTORY:
;
;	24/05/01	MMR	initial programming
;          
;*AUTHORS:
;
;	MMR		Martin M. Roth	Astrophysikalisches Institut Potsdam
;					An der Sternwarte 16
;					D-14547 Potsdam  
;					Tel. +49 - 331 - 7499 313
;                                       email: mmroth@aip.de
;-