! @(#)rbs.ctx	17.1.1.1 (ESO-IPG) 01/25/02 17:11:09
!+++++++++++++++++++++++++++++++++++++++++++++++++++++++
!
!.IDENT       RBS.ctx
!.COPYRIGHT   (C) 1991 European Southern Observatory
!.AUTHOR      Klaus Banse,  ESO - Garching
!.PURPOSE     Context file for RB execution from Midas
!.VERSION     1.0    Creation    990702
!990920
!-------------------------------------------------------
!
! indicate origin of context
!HELP =  $MIDASHOME/$MIDVERS/applic/general/etc
!
write/out  "     " Context RBS enabled 
write/out
! 
create/comm  start/pipeline @d rbexec,start
create/comm  execute/RB @d rbexec
create/comm  RBS/help @d rbexec,help
! 
info/keyw calibdb_rec
if mid$info(1) .eq. 0 then
   write/keyw calibdb_rec/c/1/100  "/cal/ut1/fors1/ima/rec/ "
   write/keyw calibdb_rul/c/1/100  "/cal/ut1/fors1/rul/ "
endif
!
write/out The following commands are available:
write/out  start/pipeline Display/NoDisplay 
write/out "                       to start the pipeline with /without Display"
write/out  execute/RB rbfile "     to execute given RB"
write/out  RBS/help "              to get help about this context"
write/out
write/out "current path for CalibDBs:"
write/out "   " {calibdb_rul}
write/out "   " {calibdb_rec}
! 
! section for clearing context RBS
! 
entry clear
! 
wait/secs 0			!do not delete the keywords...