Xtt opplace argument without path

xtt/exe/rt_xtt/src/xtt_main.cpp

@@ -673,6 +673,21 @@ Xtt::Xtt( int *argc, char **argv[], int *return_sts) :
       // Opplace argument
       strcpy( opplace_str, (*argv)[i]);
       
+      if ( strchr( opplace_str, '-') == 0) {
+	char oname[80];
+
+	sts = gdh_GetClassList( pwr_cClass_OpPlace, &op_objid);
+	while (ODD(sts)) {
+	  sts = gdh_ObjidToName( op_objid, oname, sizeof(oname), cdh_mName_object);
+	  if (ODD(sts) && cdh_NoCaseStrcmp( oname, opplace_str) == 0) {
+	    sts = gdh_ObjidToName( op_objid, opplace_str, sizeof(opplace_str), cdh_mName_volumeStrict);
+	    opplace_found = 1;
+	    break;
+	  }
+	  sts = gdh_GetNextObject( op_objid, &op_objid);
+	}
+      }
+      else {
 	sts = gdh_NameToObjid( opplace_str, &op_objid);
 	if ( EVEN(sts)) {
 	  printf("** Unable to find opplace\n");
@@ -689,6 +704,7 @@ Xtt::Xtt( int *argc, char **argv[], int *return_sts) :
 	opplace_found = 1;
       }
     }
+  }
     
   if ( network_optimized)
     XttMethodToolbar::disable();