function ProductType ( ID ) {
   if (ID.length!=0) {
      var Idx = ID.charAt(0)
      if (Idx=='1') {
         return 'Card'
      } else if (Idx=='2') {//
	     return 'Print'
      } else if ((Idx=='3') || (Idx=='4')) {
	     return 'Bronze'
	  }
   }
   return ''
}

function PathTo (ID) {
   return '/' + ProductType(ID).toLowerCase() + 's/index.html?' + ID
}

function CvtString (InStr) {
   var OutStr = ""
   for (var i=0; i<=InStr.length; i++) {
      if (InStr.charAt(i)=="_") {
	     OutStr += "&nbsp;"
      } else {
	     OutStr += InStr.charAt(i)
	  }
   }
   return OutStr
}

var ItemCnt = 38
var ItemID = new Array(ItemCnt)
var ItemSoldOut = new Array(ItemCnt)
var ItemPic = new Array(ItemCnt)
var ItemName = new Array(ItemCnt)
var ItemPrice = new Array(ItemCnt)
var ItemDim = new Array(ItemCnt)
var ItemDesc = new Array(ItemCnt)
var CurIdx = 0

function AddArtItem(ID, ISoldOut, IPicName, IName, IPrice, IDim, IDesc) {
   if (CurIdx>=ItemCnt) {
      alert('Bad Item Count: ItemCnt = ' + ItemCnt + ', CurIdx = ' + CurIdx)
   } else {
      ItemID[CurIdx]    = ID
	  ItemSoldOut[CurIdx] = ISoldOut
      ItemPic[CurIdx]   = IPicName
      ItemName[CurIdx]  = IName
      ItemPrice[CurIdx] = IPrice
      ItemDim[CurIdx]   = IDim
      ItemDesc[CurIdx]  = IDesc
      CurIdx++
   }
}

AddArtItem('1001', 'N', 'wish',      'Just_Wishing (Scene_#1)',        '14.95', '4.5"_x_6.25" (9"_x_6.25"_open)', 'Box_of_10_blank_cards (10_envelopes)')
AddArtItem('1002', 'N', 'kid',       'Just_Wishing (Scene_#2)',        '14.95', '4.5"_x_6.25" (9"_x_6.25"_open)', 'Box_of_10_blank_cards (10_envelopes)')
AddArtItem('1003', 'N', 'feed',      'Just_Wishing (Scene_#3)',        '14.95', '4.5"_x_6.25" (9"_x_6.25"_open)', 'Box_of_10_blank_cards (10_envelopes)')
AddArtItem('1004', 'N', 'kidhorse',  'Just_Wishing (Scene_#4)',        '14.95', '4.5"_x_6.25" (9"_x_6.25"_open)', 'Box_of_10_blank_cards (10_envelopes)')
AddArtItem('1005', 'N', 'ridehorse', 'Just_Wishing (Scene_#5)',        '14.95', '4.5"_x_6.25" (9"_x_6.25"_open)', 'Box_of_10_blank_cards (10_envelopes)')
AddArtItem('1006', 'N', 'snow',      'Just_Wishing (Scene_#6)',        '14.95', '4.5"_x_6.25" (9"_x_6.25"_open)', 'Box_of_10_blank_cards (10_envelopes)')
AddArtItem('1007', 'N', 'horses',    'Just_Wishing (Scene_#7)',        '14.95', '4.5"_x_6.25" (9"_x_6.25"_open)', 'Box_of_10_blank_cards (10_envelopes)')
AddArtItem('1008', 'N', '2horses',   'Just_Wishing (Scene_#8)',        '14.95', '4.5"_x_6.25" (9"_x_6.25"_open)', 'Box_of_10_blank_cards (10_envelopes)')
AddArtItem('1009', 'N', 'sunset',    'Just_Wishing (Scene_#9)',        '14.95', '4.5"_x_6.25" (9"_x_6.25"_open)', 'Box_of_10_blank_cards (10_envelopes)')
AddArtItem('1010', 'N', 'explore',   'Springtime_in_the_Rockies',      '14.95', '4.5"_x_6.25" (9"_x_6.25"_open)', 'Box_of_10_blank_cards (10_envelopes)')
AddArtItem('1011', 'N', 'bulls',     'Autumn_Roundup',                 '14.95', '4.5"_x_6.25" (9"_x_6.25"_open)', 'Box_of_10_blank_cards (10_envelopes)')
AddArtItem('1012', 'N', 'girl',      'Riding_with_Grandpa',            '14.95', '4.5"_x_6.25" (9"_x_6.25"_open)', 'Box_of_10_blank_cards (10_envelopes)')
AddArtItem('1013', 'N', 'indian',    'Little_Navajo',                  '14.95', '4.5"_x_6.25" (9"_x_6.25"_open)', 'Box_of_10_blank_cards (10_envelopes)')
AddArtItem('1014', 'N', '',          'Just_Wishing (Scenes_1_to_9)',   '14.95', '4.5"_x_6.25" (9"_x_6.25"_open)', 'Box_of_10_blank_cards (10_envelopes)')
AddArtItem('2001', 'N', 'Palisade Indian Camp', 'Palisade_Indian_Camp','75.00', '16"_x_20"',                      'At peace in the Rockies')
AddArtItem('2002', 'N', 'How the West Was Won', 'How_the_West_Was_Won','95.00', '18"_x_27"',                      "Everything can't finish the trip.")
AddArtItem('2003', 'N', "All in a Day's Work",  "All_in_a_Day's_Work", '225.00', '21"_x_34"',                      "A collage of the activities that make up a cowboy's day. Smaller individual scenes may be purchased also (below).")
AddArtItem('2004', 'N', 'Aidw1',     "All_in_a_Day's_Work (Scene_#1)", '35.00', '10"_x_10"',                      "Individual scene (top_left) from larger collage (2003_above).")
AddArtItem('2005', 'N', 'Aidw2',     "All_in_a_Day's_Work (Scene_#2)", '35.00', '10"_x_14"',                      "Individual scene (top_center) from larger collage (2003_above).")
AddArtItem('2006', 'N', 'Aidw3',     "All_in_a_Day's_Work (Scene_#3)", '35.00', '10"_x_10"',                      "Individual scene (top_right) from larger collage (2003_above).")
AddArtItem('2007', 'N', 'Aidw4',     "All_in_a_Day's_Work (Scene_#4)", '35.00', '10"_x_10"',                      "Individual scene (bottom_right) from larger collage (2003_above).")
AddArtItem('2008', 'N', 'Aidw5',     "All_in_a_Day's_Work (Scene_#5)", '35.00', '10"_x_14"',                      "Individual scene (bottom_center) from larger collage (2003_above).")
AddArtItem('2009', 'N', 'Aidw6',     "All_in_a_Day's_Work (Scene_#6)", '35.00', '10"_x_10"',                      "Individual scene (bottom_left) from larger collage (2003_above).")
AddArtItem('3010', 'N', 'quanah',    'Quanah',                        '650.00', '6"_tall',                        "Limited edition.")
AddArtItem('4003', 'N', 'mamas_care',"Mama's Care",                  '1550.00', '7.1"_tall',                      "Limited edition of 30.")
AddArtItem('4004', 'Y', 'twister',   'Twister',                      '2000.00', '13.5"_tall on_2"_base',          "Walnut base.<br>Limited edition of 30.")
AddArtItem('4005', 'N', 'tricky',    'Tricky Son-of-a-Gun',          '2500.00', '11.75"_tall on_2"_base',         "Walnut base.<br>Limited edition of 30.")
AddArtItem('3001', 'N', 'hoolihan',  'The_Hoolihan',                  '275.00', '6.75"H_x_2.25"W',                "Limited edition of_100.")
AddArtItem('3002', 'N', 'oleboy',    'Good_Ole_Boy',                  '250.00', '6.5"H_x_2.25"W',                 "Limited edition of_100.")
AddArtItem('3003', 'N', 'sourdough', 'Ole_Sourdough',                 '250.00', '5.75"H_x_2"W',                   "Limited edition of_100.")
AddArtItem('3004', 'Y', 'storytell', 'Storyteller',                   '250.00', '5.5"H_x_2.5"W',                  "Limited edition of_100.")
AddArtItem('3005', 'Y', 'chico',     'Chico_Canary',                  '250.00', '2.75"H_x_3"W',                   "Limited edition of_100.")
AddArtItem('3006', 'Y', 'listen',    'Listener',                      '250.00', '5.5"H_x_2.25"W',                 "Limited edition of_100.")
AddArtItem('3007', 'N', 'sunfish',   'Sunfisher',                     '375.00', '4.75"H_x_2.5"W on_1"_base',      "Limited edition of_200.")
AddArtItem('3008', 'N', 'moons',     'Many_Moons_Ago',                '425.00', '3.75"_tall',                     "Limited edition of_100.")
AddArtItem('3009', 'N', 'buck',      'Little_Buckaroo',               '450.00', '4.75"_tall',                     "Limited edition of_200.")
AddArtItem('4001', 'N', 'salty',     'Salty',                        '2500.00', '16.5"_tall on_2"_base',          "Buckskin or regular patina.<br>Base with turntable.<br>Limited edition of 30.")
AddArtItem('4002', 'N', 'slicker',   'Slicker_Shy',                  '2250.00', '12.5"_tall on_2"_base',          "Walnut base with turntable.<br>Limited edition of 30.")

function ItemLookup ( ID ) {
   for (var i=0; i<ItemCnt; i++) {
      if (ItemID[i]==ID) {
	     return i
      }
   }
   return '-'
}