;$Author: kenb $
;$Date: 2006-10-11 13:32:51 -0700 (Wed, 11 Oct 2006) $
;$Header: /home/cdaweb/dev/control/RCS/generate_inventory.pro,v 1.18 2005/09/14 21:01:59 kovalick Exp kovalick $
;$Locker: kovalick $
;$Revision: 8 $
;---------------------------------------------------------------------------
;Modifications: 2/4/98 - T. Kovalick - modified this to do what the inventory function
;in inventory.pro use to do, so that I can free up memory w/ delvar (has to be
;done at the main program level).

@compile_inventory.pro

;debug = 1

; Read the metadata file...
a = ingest_database('/home/cdaweb/metadata/istp_public_cdfmetafile.txt',DEBUG=DEBUG)

; Draw inventory graph...
;s=draw_inventory(a,TITLE='ISTP PUBLIC DATA',GIF='/home/cdaweb/metadata/istp_public_cdfmetafile.gif',$
;START_TIME='1992/07/01 00:00:00', STOP_TIME='2002/12/31 23:59:59', /debug)

aa=a

s=draw_inventory(a,TITLE='Active Mission Data 1960-2010', $
GIF='/home/cdaweb/metadata/istp_public_cdfmetafile.gif',$
START_TIME='1960/01/01 00:00:00', STOP_TIME='2010/01/01 23:59:59', /BIGPLOT)
a=aa
s=draw_inventory(a,TITLE='ISTP PUBLIC DATA 1990-1994', $
GIF='/home/cdaweb/website/htdocs/istp_public/avail_1990-1994.gif',$
START_TIME='1990/01/01 00:00:00', STOP_TIME='1994/12/31 23:59:59', /FIVEYEAR)
a=aa
s=draw_inventory(a,TITLE='ISTP PUBLIC DATA 1995-1999', $
GIF='/home/cdaweb/website/htdocs/istp_public/avail_1995-1999.gif',$
START_TIME='1995/01/01 00:00:00', STOP_TIME='1999/12/31 23:59:59', /debug, /FIVEYEAR)
a=aa
s=draw_inventory(a,TITLE='ISTP PUBLIC DATA 2000-2004', $
GIF='/home/cdaweb/website/htdocs/istp_public/avail_2000-2004.gif',$
START_TIME='2000/01/01 00:00:00', STOP_TIME='2004/12/31 23:59:59', /debug, /FIVEYEAR)
a=aa
s=draw_inventory(a,TITLE='ISTP PUBLIC DATA 2005-2009', $
GIF='/home/cdaweb/website/htdocs/istp_public/avail_2005-2009.gif',$
START_TIME='2005/01/01 00:00:00', STOP_TIME='2009/12/31 23:59:59', /debug, /FIVEYEAR)
;
delvar, a,aa

; Read the metadata file... Added this back in w/ release of IDL 5.1 (won't work w/ previous versions)
a = ingest_database('/home/cdaweb/metadata/full_cdfmetafile.txt',DEBUG=DEBUG)
; Draw inventory graph...
s=draw_inventory(a,TITLE='FULL CDAWEB HOLDINGS',GIF='/home/cdaweb/metadata/full_cdfmetafile.gif',$
/BIGPLOT, /debug)
delvar, a

;generation of the cluster, radiation,bowshock and cdaw9 being done in generate_inventory2.pro. TJK 6/3/98
;generation of the two space physics and one image files is done in generate_small.pro
;because we run out of memory at this point...TJK 2/11/98

exit