Index: trunk/ippTasks/pantasks.pro
===================================================================
--- trunk/ippTasks/pantasks.pro	(revision 25946)
+++ trunk/ippTasks/pantasks.pro	(revision 25966)
@@ -561,5 +561,13 @@
   end    
 
-  strhash $skycellID $count -var skyhash
+  local j myValue skyhash
+  list word -splitbychar . $skycellID
+  $skyhash = 0
+  for j 0 $word:n
+    inthash $word:$j 46 -var myValue
+    $skyhash = $skyhash + $myValue
+  end
+  # strhash $skycellID $count -var skyhash
+
   sprintf skyname "sky%02d" $skyhash
 
@@ -613,5 +621,13 @@
   end    
 
-  strhash $skycellID $count -var skyhash
+  local j myValue skyhash
+  list word -splitbychar . $skycellID
+  $skyhash = 0
+  for j 0 $word:n
+    inthash $word:$j 46 -var myValue
+    $skyhash = $skyhash + $myValue
+  end
+  # strhash $skycellID $count -var skyhash
+
   sprintf skyname "sky%02d" $skyhash