小编Jo0*_*0o0的帖子

从存储过程获取返回值时,它只返回第一个字符,

Exec sp_Auto_Gen_TTBDBatNo 'TT', '' 在SQL Server中获取整个字符串,但在ASP.NET中它获取第一个字符.

如何获得整个字符串值？

CREATE PROC sp_Auto_Gen_TTBDBatNo
      @Prefix nvarchar(2),
      @Result nvarchar(8) output
AS
BEGIN
    DECLARE @LastValue int


    -- CompanyCode = @CompanyCode AND BankCode = @BankCode AND AccountCode = @AccountCode

    SET NOCOUNT ON
    If @Prefix = 'BD'
        SELECT @LastValue = MAX(RIGHT(RTRIM(ISNULL(BatchNo, '')),2)) from dbo.Cheque_IssueRecord_Secretary_Review_BD WHERE ISNUMERIC(RIGHT(RTRIM(BatchNo),2))= 1 AND LEN(RIGHT(RTRIM(BatchNo),2)) = 2
    ELSE
        SELECT @LastValue = MAX(RIGHT(RTRIM(ISNULL(BatchNo, '')),2)) from dbo.Cheque_IssueRecord_Secretary_Review_TT WHERE ISNUMERIC(RIGHT(RTRIM(BatchNo),2))= 1 AND LEN(RIGHT(RTRIM(BatchNo),2)) = 2

    SET NOCOUNT OFF
    set @Result = @Prefix + RIGHT(RTRIM(STR(year(getdate()))),2)+RIGHT('0'+LTRIM(RTRIM(STR(month(getdate())))),2) + RIGHT('0'+LTRIM(RTRIM(STR(ISNULL(@LastValue,0)+1))),2) …

安装了QuickCheck,

我再次安装cabal安装QuickCheck-1.2.0.0

并再次加载并有错误

找不到模块Test.QuickCheck.Batch': It is a member of the hidden packageQuickCheck-1.2.0.0'.

它是隐藏包,怎么办？

ghc -o tryprog hello.hs -package QuickCheck-1.2.0.0:无法满足-package QuickCheck-1.2.0.0(使用-v获取更多信息)

除了这个错误,如何使用包quickcheck-1.2.0.0加载.hs文件？

为这个问题增加了50分

我真诚地乞求你对这个装载问题的帮助!!

BCHF_VOU_NUM +''+ BCHF_VOU_DTE的语法错误

set @m_sql =  'Select distinct BCHF_VOU_NUM, BCHF_VOU_DTE, BCHF_E_AMT, NACD_DES, 
(BCHF_VOU_NUM +' '+ BCHF_VOU_DTE +' '+BCHF_E_AMT +' '+NACD_DES) as name,
dbo.E_DOC_NUM_2_CHEQUE_NO(BCHF_E_DOC_NUM) FROM ' + @ParaCoCode + '..BCH' + @ParaBatchNo  +   ' abc inner join v_AnalysisCode on BCHF_E_ANA_CDE1 = ANACode inner join  
Project_TR_TP_COM_Test.dbo.FlexAccount zz ON zz.CurrentAccountID = (Select 
CurrentAccountID from Batch where'

模式中的解析错误:f.G

我是初学者,哪里错了？

   (f . g) x = f (g x)


class Functor f  where
    fmap :: (a -> b) -> f a -> f b

class Functor g  where
    fmap :: (a -> b) -> f a -> f b 

instance Functor F where
    fmap id = id 
    fmap (f . g)  = fmap f . fmap g

当我加载haskell文件时,它有错误

module REPL(REPL(..), repl) where
import qualified Control.Exception as E
import System.Console.Readline(readline, addHistory)

data REPL s = REPL {
    repl_init :: IO (String, s),        -- prompt and initial state
    repl_eval :: s -> String -> IO (Bool, s),       -- quit flag and new state
    repl_exit :: s -> IO ()
    }

repl :: REPL s -> IO ()
repl p = do
    (prompt, state) <- repl_init p
    let loop s = (do
        mline <- readline prompt
        case mline of
        Nothing …

如何使用for循环扫描ASP.net中页面中的所有控件？

因为我想在一个for循环中验证所有文本框的文本

import Data.List.Split
import Data.List(nub, groupBy)

z = splitOn "+" "x^2+2*x^3+x^2"

y = map (splitOn "*") z

x = map head y

toInt :: [String] -> [Int]
toInt = map read

u1 = filter ((< 2) . length) y
u2 = filter ((> 1) . length) y

v = map ("1" :) u1

q = u2 ++ v
q2 = zip toInt(map head q) (map last q)
q6 = groupBy nub(map tail q) q
q3 = map tail q
q5 = …