← Back to branch summary

~cathbethfischer/jp2gen/cfischer

« back to all changes in this revision

Viewing changes to idl/stereo/euvi/hv_euvi_by_date.pro

  • Committer: Jack.Ireland at nasa
  • Date: 2011-06-02 21:11:00 UTC
  • mfrom: (70.1.250 jp2gen-jack)
  • Revision ID: jack.ireland@nasa.gov-20110602211100-ei39jq5p7yqliwh1
merged with jack's branch

Show diffs side-by-side

added added

removed removed

Lines of Context:
idl/stereo/euvi/hv_euvi_by_date.pro
57
57
; Prev. Hist. : None.
58
58
;
59
59
; History     : Version 1, 22-Dec-2010, William Thompson, GSFC
 
60
;               08-Apr-2011, Jack Ireland, GSFC, added a prepped data
 
61
;               return function
60
62
;
61
63
; Contact     : WTHOMPSON
62
64
;-
63
65
;
64
66
pro hv_euvi_by_date, date, only_synoptic=only_synoptic, overwrite=overwrite,$
65
 
                     copy2outgoing = copy2outgoing
 
67
                     copy2outgoing = copy2outgoing,recalculate_crpix = recalculate_crpix
66
68
  on_error, 2
 
69
;
 
70
; General variables
 
71
;
 
72
  g = HVS_GEN()
 
73
;
 
74
; Prepped data - default is no prepped data
 
75
;
 
76
  prepped = [g.MinusOneString]
67
77
  progname = 'hv_euvi_by_date'
68
78
;
69
79
;  Check that the date is valid.
97
107
;  Get the catalog of EUVI image files.
98
108
;
99
109
     cat = scc_read_summary(date=utc, spacecraft=sc[isc], telescope='euvi', $
100
 
                            source='lz', type='img', /check)
 
110
                           source='lz', type='img', /check)
101
111
     if datatype(cat,1) eq 'Structure' then begin
102
112
;
103
113
;  Filter out beacon images, and optionally special event images.
117
127
              if filename ne '' and file_exist(filename) then begin
118
128
                 already_written = HV_PARSE_SECCHI_NAME_TEST_IN_DB(filename)
119
129
                 if not(already_written) and file_exist(filename) then begin
120
 
                    hv_euvi_prep2jp2, filename, overwrite=overwrite, jp2_filename = jp2_filename
 
130
                    hv_euvi_prep2jp2, filename, overwrite=overwrite, jp2_filename = jp2_filename,recalculate_crpix = recalculate_crpix
121
131
                    if firsttimeflag then begin
122
132
                       prepped = [jp2_filename]
123
133
                       firsttimeflag = 0