|
+ |
Fr03.Password = 30 Fr03.Connect '''''''''''''''''''''''''''''''''''''''''''''''''''''''' 'Fr03.Quantity = 2.25 Fr03.Price = 17.5 Fr03.Department = 0 Fr03.StringForPrinting = "" Fr03.Sale If ResultCode <> 0 Then GoTo exit_sub Fr03.Quantity = 3 Fr03.Price = 98.3 Fr03.Department = 0 Fr03.StringForPrinting = " 0,5" Fr03.Sale If ResultCode <> 0 Then GoTo exit_sub '''''''''''''''''''''''''''''''''''''''''''''''''''''''' ' Fr03.StringForPrinting = "------------------------------------" Fr03.CheckSubTotal Fr03.CloseCheck If ResultCode <> 0 Then GoTo exit_sub Fr03.Disconnect |
http://www.sql.ru/forum/1170881/vypolnenie-funkcii-iz-zaprosa