' (NumBottles is passed in)

    Dim wb As Excel.Workbook
    Dim posSheet As Worksheet
    Dim NodeNum As Integer
    Dim ChartTitle As String

If Dir$(opath & "Requests\" & dirStr, vbDirectory) = "" Then

# Creates the date
DIR_EXT=`date '+%Y%m%d_%H%M%S'`

# I want this next line to take the date created above and add a "_" and the value in the $JOB_NAME, and make this one directory.
UNIQUE_DIR=$DIR_EXT_$JOB_NAME

"char gstrCasePart[19][40] = {{"Outside, Long Sides"},{"Outside, Bottom"}, {"Outside, Short Flaps"},{"Outside, Long Flaps"}, {"Inside, Ends"}, 
{"Inside, Side Flaps"},{"Inside, Angled Flaps +X+Y, -X-Y"},
{"Inside, Angled Flaps +X-Y, -X+Y"},{"Cover"},{""} //,{""},{""},{""},{""},{""},{""}

...
    gintCasePart[0] = 1;
	gintCasePart[1] = 2;
	gintCasePart[2] = 3;
	gintCasePart[3] = 4;
	gintCasePart[4]

#! /bin/sh
C_Program input.txt

  'above this, I just dim the variables
   If Target.Cells.Count > 1 Then Exit Sub
    If IsEmpty(Target) Then Exit Sub
    If Not Intersect(Target, Range("C1:C60000")) Is Nothing Then Exit Sub

            init_Row = Target.Row
            If Cells(init_Row, 79).Value = -1 Then
                  Do
                      init_Row = init_Row - 1
                      If Cells(init_Row, 79).Value <>