Need help writing a query that generates sequential tokens

Question

Updated example to accomodate duplicates in cacard and to change the #temp_tokentable.cccard to varchar(20).
I am just having a block. I have a should be easy task, and have looked at it several ways, but cannot come up with some tsql that I would not be embarressed to show coworkers.
This is a the simplistic example of what needs to get done - 
cacard table has credit cards. need to replace all credit cards with a generated token. the token is generated by just adding 1 to the lasttokenused and then + the right(creditcard, 4). Then the token and clear credit card values are inserted into
tokentable.
cacard can be a rather large table (# of rows and wide) in production so need to be as efficient as possible. But it is a onetime conversion program.
Thanks for any help
IF OBJECT_ID('tempdb..#Temp_cacard') IS NOT NULL
DROP TABLE #Temp_cacard
IF OBJECT_ID('tempdb..#Temp_tokentable') IS NOT NULL
DROP TABLE #Temp_tokentable
IF OBJECT_ID('tempdb..#Temp_lasttokenused') IS NOT NULL
DROP TABLE #Temp_lasttokenused
Create table #temp_cacard (ccard numeric(19,0))
Insert into #temp_cacard values (1234567891234567), (2344567890123456789),(3456789012345678900), (1234567891234567)
Create table #temp_tokentable (token varchar(20), ccard varchar(20))
Create table #temp_lasttokenused (token varchar(20))
Insert into #temp_lasttokenused values ('081111111111111111')
want to end up with
CACARD
08111111111111124567
08111111111111136789
0811111111111114890008111111111111124567
tokentable
08111111111111124567 1234567891234567
08111111111111136789 2344567890123456789
08111111111111148900 3456789012345678900
lasttokenused
0811111111111114

Answer 1

Thought that I would post the code that reads a credit card number file and replaces card numbers
with token values. The tokens keep the last 4 of the original credit card number. I have two example card number tables. One table -cacardn - has a numeric(19,0) card number and the other - cacardv - has a varchar(20) card
number. My shop has credit card numbers defined as both. Obviously, another step after this runs is to encrypt the #token.data column.
IF OBJECT_ID('tempdb..#cacardn')IS NOT NULL
DROP TABLE #cacardn;
IF OBJECT_ID('tempdb..#cacardv')IS NOT NULL
DROP TABLE #cacardv;
IF OBJECT_ID('tempdb..#Token')IS NOT NULL
DROP TABLE #Token;
IF OBJECT_ID('tempdb..#Temp_Token')IS NOT NULL
DROP TABLE #Temp_Token;
IF OBJECT_ID('tempdb..#LastToken')IS NOT NULL
DROP TABLE #LastToken;
-- cardnumber table that has numeric (19,0) card numbers
Create Table #cacardn ([cccard] numeric(19,0))
INSERT INTO #cacardn ([cccard]) VALUES
(NULL),
(0),
(1111),
(91111111111121112),
(1111),
(1113),
(91111111111201120);
-- carnumber table that has varchar(20) card numbers
Create Table #cacardv ([cccard] varchar(20))
INSERT INTO #cacardv ([cccard]) VALUES
(NULL),
('0'),
('00000000000000001111'),
('00091111111111121112'),
('00000000000000001111'),
('00000000000000001113'),
('00091111111111201120');
-- token table that has tokens, varbinary card numbers, data type (13-20) are card numbers
Create Table #Token (
[token] varchar(20),
[data] varbinary(256),
[type] int)
INSERT INTO #Token ([token],[data],[type]) VALUES
('00000000000000000000', CAST('00000000000000000000' as varbinary), 13),
('', CAST('' as varbinary), 13),
('0', CAST('0' as varbinary), 13),
('00091111111111111111', CAST('00000000000000001111' as varbinary), 13),
('00091111111111121112', CAST('00000000000000001112' as varbinary), 14),
('00091111111111201120', CAST('00000000000000001120' as varbinary), 20)
-- Temporary, Intermediate table
CREATE TABLE #Temp_Token(ClearValue varchar(128));
SELECT * INTO #LastToken from (
SELECT '0009111111111150') d (lastgeneratedToken)
-- Create an entry in the Temp_Token table for entries in the card number field that do not match the Token table token or
-- Token table data values. These must be card number clear values.
-- ++ change from #cacardv to #cacardv to test both numeric and varchar card numbers
-- ++ the card number field must not NULL, not = 0 and numberic values
INSERT INTO #Temp_Token
SELECT DISTINCT cccard
FROM #cacardv l
WHERE cccard IS NOT NULL and CAST(cccard as varchar) <> '0' and CAST(cccard as varchar) not like '%[^0-9]%' and
NOT EXISTS (SELECT 1 FROM #Token s
WHERE (right('00000000000000000000'+ rtrim(cccard), 20) = [token] or
CAST(right('00000000000000000000'+ rtrim(cccard), 20) as varchar) = CAST([data] as varchar)) and
[type] in (13,14,15,16,20))
DECLARE @lastgeneratedToken varchar(20) = (SELECT lastgeneratedToken from #LastToken)
-- Update the last token used
UPDATE ifs_EDLastTokenUsed
SET EDToken = RIGHT('0000000000000000' + CAST(@lastgeneratedToken + CAST(@@RowCount AS numeric)AS varchar), 16);
-- Insert into the Token table
INSERT INTO #Token
SELECT DISTINCT RIGHT('0000000000000000' + CAST(@lastgeneratedToken + ROW_NUMBER() OVER (ORDER BY ClearValue) AS varchar(20)) + RIGHT(ClearValue,4), 20),
CAST(RIGHT('0000000000000000' + ClearValue, 20) as varbinary), 13
FROM #Temp_Token
-- Now Update the card number field that matches the Token data field with the Token token field.
-- ++ change from #cacardv to #cacardv to test both numeric and varchar card numbers
-- ++ Do not undate NULL, 0, or non-numeric card numbers (they are invalid values)
UPDATE c
SET c.cccard = s.[token]
FROM #cacardv c inner join (SELECT DISTINCT cccard, Cast([token] as varchar) as [Token]
FROM #cacardv l inner join #Token s
ON RIGHT('0000000000000000' + CAST(l.cccard as varchar), 20) = CAST(s.[Data] as varchar)
WHERE [type] in (13,14,15,16,20)) s
on c.cccard = s.cccard
WHERE c.cccard IS NOT NULL and CAST(c.cccard as varchar) <> '0' and CAST(c.cccard as varchar) not like '%[^0-9]%'
-- Check the Results
select * from #cacardv
Any comments or suggestions would be appreciated. (this is not the exact code. but the main statements are represented.)
Wonder about my WHERE clauses that seek to exclude junk data (IS NOT NULL, <> '0', and numeric only data), shhould the WHERE close be on the inner or outer WHERE?