Example #1
0
	public virtual Sybase.PowerBuilder.PBInt of_get_quote(Sybase.PowerBuilder.PBString as_symbol)
	{
		#line hidden
		Sybase.PowerBuilder.PBInt li_colonpos = Sybase.PowerBuilder.PBInt.DefaultValue;
		Sybase.PowerBuilder.PBInt li_ctr = Sybase.PowerBuilder.PBInt.DefaultValue;
		Sybase.PowerBuilder.PBInt li_commapos = Sybase.PowerBuilder.PBInt.DefaultValue;
		Sybase.PowerBuilder.PBLong ll_symbol_count = Sybase.PowerBuilder.PBLong.DefaultValue;
		Sybase.PowerBuilder.PBArray lsymbols = new Sybase.PowerBuilder.PBUnboundedStringArray();
		#line 9
		ib_append = new Sybase.PowerBuilder.PBBoolean(false);
		#line hidden
		#line 10
		li_colonpos = (Sybase.PowerBuilder.PBInt)(Sybase.PowerBuilder.Win.PBSystemFunctions.Pos(as_symbol, new Sybase.PowerBuilder.PBString(";")));
		#line hidden
		#line 11
		li_commapos = (Sybase.PowerBuilder.PBInt)(Sybase.PowerBuilder.Win.PBSystemFunctions.Pos(as_symbol, new Sybase.PowerBuilder.PBString(",")));
		#line hidden
		#line 12
		if ((Sybase.PowerBuilder.PBBoolean)(((Sybase.PowerBuilder.PBLong)(li_commapos)> (Sybase.PowerBuilder.PBLong)(new Sybase.PowerBuilder.PBInt(0)))& ((Sybase.PowerBuilder.PBLong)(li_colonpos)> (Sybase.PowerBuilder.PBLong)(new Sybase.PowerBuilder.PBInt(0)))))
		#line hidden
		{
			#line 13
			this.of_showmessage(new Sybase.PowerBuilder.PBBoolean(true), new Sybase.PowerBuilder.PBString("Can't have both ; and , as symbol separators"));
			#line hidden
			#line 14
			return new Sybase.PowerBuilder.PBInt(-1);
			#line hidden
		}
		#line 16
		this.of_showmessage(new Sybase.PowerBuilder.PBBoolean(false), new Sybase.PowerBuilder.PBString(""));
		#line hidden
		#line 17
		if ((Sybase.PowerBuilder.PBBoolean)((li_commapos == new Sybase.PowerBuilder.PBInt(0))& (li_colonpos == new Sybase.PowerBuilder.PBInt(0))))
		#line hidden
		{
			#line 17
			return (Sybase.PowerBuilder.PBInt)(dw_1.Retrieve((Sybase.PowerBuilder.PBAny)(((Sybase.PowerBuilder.PBAny)(as_symbol)))));
			#line hidden
		}
		#line 18
		if ((Sybase.PowerBuilder.PBBoolean)((Sybase.PowerBuilder.PBLong)(li_commapos)> (Sybase.PowerBuilder.PBLong)(new Sybase.PowerBuilder.PBInt(0))))
		#line hidden
		{
			#line 19
			ll_symbol_count = of_parsetoarray_3_345252223_3_44230024(this, as_symbol, new Sybase.PowerBuilder.PBString(","), ref lsymbols);
			#line hidden
		}
		#line 21
		if ((Sybase.PowerBuilder.PBBoolean)((Sybase.PowerBuilder.PBLong)(li_colonpos)> (Sybase.PowerBuilder.PBLong)(new Sybase.PowerBuilder.PBInt(0))))
		#line hidden
		{
			#line 22
			ll_symbol_count = of_parsetoarray_3_345252223_3_44230024(this, as_symbol, new Sybase.PowerBuilder.PBString(";"), ref lsymbols);
			#line hidden
		}
		#line 24
		dw_1.Reset();
		#line hidden
		#line 26
		for (li_ctr = new Sybase.PowerBuilder.PBInt(1);li_ctr <= ((Sybase.PowerBuilder.PBInt)(ll_symbol_count));li_ctr = li_ctr + 1)
		#line hidden
		{
				#line 32
				ids_buffer.Retrieve((Sybase.PowerBuilder.PBAny)(((Sybase.PowerBuilder.PBAny)(((Sybase.PowerBuilder.PBString)lsymbols[(Sybase.PowerBuilder.PBLong)(li_ctr)])))));
				#line hidden
				#line 33
				ids_buffer.RowsCopy((Sybase.PowerBuilder.PBLong)(new Sybase.PowerBuilder.PBInt(1)), (Sybase.PowerBuilder.PBLong)(new Sybase.PowerBuilder.PBInt(1)), (new Sybase.PowerBuilder.PBDWBufferValue(Sybase.PowerBuilder.PBDWBuffer.Primary)), (Sybase.PowerBuilder.IPBDataWindowControl)(((c__u_quotes.c__dw_1)(Sybase.PowerBuilder.PBSystemFunctions.PBCheckNull(dw_1)))), (Sybase.PowerBuilder.PBLong)(li_ctr)+ (Sybase.PowerBuilder.PBLong)(new Sybase.PowerBuilder.PBInt(1)), 
					(new Sybase.PowerBuilder.PBDWBufferValue(Sybase.PowerBuilder.PBDWBuffer.Primary)));
				#line hidden
		}
		return Sybase.PowerBuilder.PBInt.DefaultValue;
	}
	public virtual Sybase.PowerBuilder.PBInt of_get_quote(Sybase.PowerBuilder.PBString as_symbol)
	{
		#line hidden
		Sybase.PowerBuilder.PBInt li_colonpos = Sybase.PowerBuilder.PBInt.DefaultValue;
		Sybase.PowerBuilder.PBInt li_ctr = Sybase.PowerBuilder.PBInt.DefaultValue;
		Sybase.PowerBuilder.PBInt li_commapos = Sybase.PowerBuilder.PBInt.DefaultValue;
		Sybase.PowerBuilder.PBLong ll_symbol_count = Sybase.PowerBuilder.PBLong.DefaultValue;
		Sybase.PowerBuilder.PBArray lsymbols = new Sybase.PowerBuilder.PBUnboundedStringArray();
		#line 7
		ib_append = new Sybase.PowerBuilder.PBBoolean(false);
		#line hidden
		#line 8
		li_colonpos = (Sybase.PowerBuilder.PBInt)(Sybase.PowerBuilder.WPF.PBSystemFunctions.Pos(as_symbol, new Sybase.PowerBuilder.PBString(";")));
		#line hidden
		#line 9
		li_commapos = (Sybase.PowerBuilder.PBInt)(Sybase.PowerBuilder.WPF.PBSystemFunctions.Pos(as_symbol, new Sybase.PowerBuilder.PBString(",")));
		#line hidden
		#line 10
		if ((Sybase.PowerBuilder.PBBoolean)(((Sybase.PowerBuilder.PBLong)(li_commapos)> (Sybase.PowerBuilder.PBLong)(new Sybase.PowerBuilder.PBInt(0)))& ((Sybase.PowerBuilder.PBLong)(li_colonpos)> (Sybase.PowerBuilder.PBLong)(new Sybase.PowerBuilder.PBInt(0)))))
		#line hidden
		{
			#line 11
			this.of_showmessage(new Sybase.PowerBuilder.PBBoolean(true), new Sybase.PowerBuilder.PBString("Can't have both ; and , as symbol separators"));
			#line hidden
			#line 12
			return new Sybase.PowerBuilder.PBInt(-1);
			#line hidden
		}
		#line 14
		this.of_showmessage(new Sybase.PowerBuilder.PBBoolean(false), new Sybase.PowerBuilder.PBString(""));
		#line hidden
		#line 16
		if ((Sybase.PowerBuilder.PBBoolean)((li_commapos == new Sybase.PowerBuilder.PBInt(0))& (li_colonpos == new Sybase.PowerBuilder.PBInt(0))))
		#line hidden
		{
			#line 16
			return (Sybase.PowerBuilder.PBInt)(dw_1.Retrieve((Sybase.PowerBuilder.PBAny)(((Sybase.PowerBuilder.PBAny)(as_symbol)))));
			#line hidden
		}
		#line 17
		if ((Sybase.PowerBuilder.PBBoolean)((Sybase.PowerBuilder.PBLong)(li_commapos)> (Sybase.PowerBuilder.PBLong)(new Sybase.PowerBuilder.PBInt(0))))
		#line hidden
		{
			#line 18
			ll_symbol_count = of_parsetoarray_3_345252223_3_44230024(this, as_symbol, new Sybase.PowerBuilder.PBString(","), ref lsymbols);
			#line hidden
		}
		#line 20
		if ((Sybase.PowerBuilder.PBBoolean)((Sybase.PowerBuilder.PBLong)(li_colonpos)> (Sybase.PowerBuilder.PBLong)(new Sybase.PowerBuilder.PBInt(0))))
		#line hidden
		{
			#line 21
			ll_symbol_count = of_parsetoarray_3_345252223_3_44230024(this, as_symbol, new Sybase.PowerBuilder.PBString(";"), ref lsymbols);
			#line hidden
		}
		#line 23
		for (li_ctr = new Sybase.PowerBuilder.PBInt(1);li_ctr <= ((Sybase.PowerBuilder.PBInt)(ll_symbol_count));li_ctr = li_ctr + 1)
		#line hidden
		{
				#line 24
				dw_1.Retrieve((Sybase.PowerBuilder.PBAny)(((Sybase.PowerBuilder.PBAny)(((Sybase.PowerBuilder.PBString)lsymbols[(Sybase.PowerBuilder.PBLong)(li_ctr)])))));
				#line hidden
				#line 25
				ib_append = new Sybase.PowerBuilder.PBBoolean(true);
				#line hidden
		}
		return Sybase.PowerBuilder.PBInt.DefaultValue;
	}