;++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
;
;*NAME:                     pics_db_execute
;
;*CATEGORY:                 PMAS Instrument Control Software
;
;*PURPOSE:                  write into EPICS Data Base from pblock String Array
;                           in preparation for execution of subsequent commands,
;                           update picsdb
;
;*CALLING SEQUENCE:         pics_db_execute, errormsg, picsdb, picsdbup, cmd_list,
;                                            not_on_list, T_used [,/KEYWORD]
;
;*PARAMETERS:        in:    picsdb     Data Base String Array (FITS Header Format), also out
;                           picsdbup   DB with update time in comments, also output
;                    out:   errormsg
;                           picsdb     Data Base String Array in FITS Header Format
;                           picsdbup   DB with update time in comments
;                           cmd_pblock   strarr with Keywords (picsdb entries to be updated)
;                           not_on_list  strarr with Keywords which were not found in picsdb
;                           T_used     time [sec] used to create DB (optional)
;               keywords:   /VERSION   return version number (do nothing else)
;                           /DEBUG     debug switch (print messages)
;                                      
;*EXAMPLES:
;
;               We start assuming that there is a pics database db1:
;
;               fxaddpar,pblock,'S_XBIN',3         create Parameter Block, set XBIN=3
;               fxaddpar,pblock,'S_YBIN',3         set YBIN=3
;               fxaddpar,pblock,'S_OBJECT','TEST'  set S_OBJECT
;
;               pics_db_execute,e,db1,pblock,['S_XBIN','S_YBIN'],/D
;
;               Note: S_OBJECT was not considered in this call to pics_db_execute
;               because the keyword is not contained in cmd_list.
;
;
;*SYSTEM VARIABLES USED:
;
;*COMMON BLOCKS:
;
;*INTERACTIVE INPUT:
;
;*SUBROUTINES CALLED:
;
;*FILES USED:
;
;*SIDE EFFECTS:
;
;*RESTRICTIONS:
;
;*NOTES:
;
;*PROCEDURE:
;
;*MODIFICATION HISTORY:
pics_db_execute_VERSION = 'pics_db_execute.pro Version 0.3 --- 24/08/02 mmr'

;
;	03/06/02	MMR	initial programming (V 0.1)
;       24/08/02        mmr     V0.3 modif. parameter list, corrections
;          
;*AUTHORS:
;
;	MMR		Martin M. Roth	Astrophysikalisches Institut Potsdam
;					An der Sternwarte 16
;					D-14547 Potsdam  
;					Tel. +49 - 331 - 7499 313
;                                       email: mmroth@aip.de
;-