StripNatGasWinter

Description

Displays a NYMEX Natural Gas Winter Strip (October to March) for the specified year.

Formula

StripNatGasWinter(nvYear)=begin

   retval = nonum

   divisor = 5

   if nvYear == vchart(NG#.YEAR[-1]) then begin

      cMonth = vchart(NG#.MONTH[-1])

      if cMonth == 11 then divisor = 5

      if cMonth == 12 then divisor = 4

   end

   if nvYear - vchart(NG#.YEAR[-1]) == 1 then begin

      cMonth = vchart(NG#.MONTH[-1])

      if cMonth == 1 then divisor = 3

      if cMonth == 2 then divisor = 2

      if cMonth == 3 then divisor = 1

   end

   if nvYear == 2003 then retval = Scale(Sum(NGX3.recent,
     NGZ3.recent,NGF3.recent,NGG3.recent,
     NGH3.recent)/divisor,STRIP_SCALE)

   if nvYear == 2004 then retval = Scale(Sum(NGX4.recent,
     NGZ4.recent,NGF4.recent,NGG4.recent,
     NGH4.recent)/divisor,STRIP_SCALE)

   if nvYear == 2005 then retval = Scale(Sum(NGX5.recent,
     NGZ5.recent,NGF5.recent,NGG5.recent,
     NGH5.recent)/divisor,STRIP_SCALE)

   if nvYear == 2006 then retval = Scale(Sum(NGX6.recent,
     NGZ6.recent,NGF6.recent,NGG6.recent,
     NGH6.recent)/divisor,STRIP_SCALE)

   if nvYear == 2007 then retval = Scale(Sum(NGX7.recent,
     NGZ7.recent,NGF7.recent,NGG7.recent,
     NGH7.recent)/divisor,STRIP_SCALE)

   if nvYear == 2008 then retval = Scale(Sum(NGX8.recent,
     NGZ8.recent,NGF8.recent,NGG8.recent,
     NGH8.recent)/divisor,STRIP_SCALE)

   if nvYear == 2009 then retval = Scale(Sum(NGX9.recent,
     NGZ9.recent,NGF9.recent,NGG9.recent,
     NGH9.recent)/divisor,STRIP_SCALE)

   if nvYear == 2010 then retval = Scale(Sum(NGX0.recent,
     NGZ0.recent,NGF0.recent,NGG0.recent,
     NGH0.recent)/divisor,STRIP_SCALE)

   if nvYear == 2011 then retval = Scale(Sum(NGX1.recent,
     NGZ1.recent,NGF1.recent,NGG1.recent,
     NGH1.recent)/divisor,STRIP_SCALE)

   if nvYear == 2012 then retval = Scale(Sum(NGX2.recent,
     NGZ2.recent,NGF2.recent,NGG2.recent,
     NGH2.recent)/divisor,STRIP_SCALE)

   if nvYear == 2013 then retval = Scale(Sum(NGX3.recent,
     NGZ3.recent,NGF3.recent,NGG3.recent,
     NGH3.recent)/divisor,STRIP_SCALE)

   if nvYear == 2014 then retval = Scale(Sum(NGX4.recent,
     NGZ4.recent,NGF4.recent,NGG4.recent,
     NGH4.recent)/divisor,STRIP_SCALE)

   if nvYear == 2015 then retval = Scale(Sum(NGX5.recent,
     NGZ5.recent,NGF5.recent,NGG5.recent,
     NGH5.recent)/divisor,STRIP_SCALE)

   if nvYear == 2016 then retval = Scale(Sum(NGX6.recent,
     NGZ6.recent,NGF6.recent,NGG6.recent,
     NGH6.recent)/divisor,STRIP_SCALE)

   if nvYear == 2017 then retval = Scale(Sum(NGX7.recent,
     NGZ7.recent,NGF7.recent,NGG7.recent,
     NGH7.recent)/divisor,STRIP_SCALE)

   if nvYear == 2018 then retval = Scale(Sum(NGX8.recent,
     NGZ8.recent,NGF8.recent,NGG8.recent,
     NGH8.recent)/divisor,STRIP_SCALE)

   if nvYear == 2019 then retval = Scale(Sum(NGX9.recent,
     NGZ9.recent,NGF9.recent,NGG9.recent,
     NGH9.recent)/divisor,STRIP_SCALE)

   if nvYear == 2020 then retval = Scale(Sum(NGX0.recent,
     NGZ0.recent,NGF0.recent,NGG0.recent,
     NGH0.recent)/divisor,STRIP_SCALE)

   if nvYear == 2021 then retval = Scale(Sum(NGX1.recent,
     NGZ1.recent,NGF1.recent,NGG1.recent,
     NGH1.recent)/divisor,STRIP_SCALE)

   if nvYear == 2022 then retval = Scale(Sum(NGX2.recent,
     NGZ2.recent,NGF2.recent,NGG2.recent,
     NGH2.recent)/divisor,STRIP_SCALE)

   if nvYear == 2023 then retval = Scale(Sum(NGX3.recent,
     NGZ3.recent,NGF3.recent,NGG3.recent,
     NGH3.recent)/divisor,STRIP_SCALE)

   if nvYear == 2024 then retval = Scale(Sum(NGX4.recent,
     NGZ4.recent,NGF4.recent,NGG4.recent,
     NGH4.recent)/divisor,STRIP_SCALE)

   if nvYear == 2025 then retval = Scale(Sum(NGX5.recent,
     NGZ5.recent,NGF5.recent,NGG5.recent,
     NGH5.recent)/divisor,STRIP_SCALE)

   if retval == 0 then retval = nonum

   retval

end

Parameters

year

Four digit year (i.e., 2008) for which you want a Winter Strip.

Return Value

A Winter Strip.

Examples

StripNatGasWinter(2008)

Displays a strip of 2008 Natural Gas winter contracts.

Comments

NA