create procedure test()
AS
BEGIN
DECLARE CardCode nvarchar(200);
DECLARE CardName nvarchar(200);
DECLARE GroupCode nvarchar(200);
BEGIN
DECLARE CURSOR Acursor FOR SELECT "CardCode","CardName","GroupCode" FROM OCRD where "CardName" = CardName;
OPEN Acursor;
FETCH Acursor INTO CardCode,CardName,GroupCode;
WHILE Acursor::ROWCOUNT = 0 DO
BEGIN
FETCH Acursor INTO CardCode,CardName,GroupCode ;
BEGIN
DECLARE CURSOR Bcursor FOR SELECT "CardCode","CardName","GroupCode" FROM OCRD where "CardCode" = CardCode;
OPEN Bcursor;
FETCH Acursor INTO CardCode,CardName,GroupCode;
CLOSE Bcursor;
END;
END;
CLOSE Acursor;
END WHILE;
END;
END;