################################### ## ## ## V S A M S Q L DUTAS ## ## ## ################################### ##Install-Module -Name SqlServer -AllowClobber ##Import-Module SqlServer $Db = "DUTAS_VSAM" $ConnStr = "Server=DOES-DUTAS-SQL1;Integrated Security=True;Encrypt=False;Connection Timeout=30;" $ConnDb = "Server=DOES-DUTAS-SQL1;Integrated Security=True;Encrypt=False;Connection Timeout=30;Initial Catalog=DUTAS_VSAM" Write-Host $ConnDb ### Drop/Create _VSAMSQL Database #Invoke-Sqlcmd -Query "DROP DATABASE IF EXISTS [$Db]; CREATE DATABASE [$Db]" -ConnectionString $ConnStr #Invoke-Sqlcmd -InputFile "$Env:RCBIN\sql\Functions.sql" -ConnectionString $ConnDb #Invoke-Sqlcmd -InputFile "$Env:RCBIN\sql\EbcdicFuncs.sql" -ConnectionString $ConnDb ### Create Tables & "$env:rcbin\VsamSql.DbGenerator.exe" -CatalogConfiguration="C:\ProgramData\Raincode\Batch\Raincode.Catalog.xml" -OutputFile="DBGenerator.sql" -SqlDatabase="$ConnDb" Invoke-Sqlcmd -Query "DROP TABLE IF EXISTS [PERSON]" -ConnectionString $ConnDb Invoke-Sqlcmd -InputFile "DBGenerator.sql" -ConnectionString $ConnDb ### Create View & "$env:rcbin\cobrc.exe" :DeclDescriptors="PERSON.xml" "PERSON.cpy" & "$env:rcbin\CopybookViewGenerator.exe" -xml="PERSON.xml" -struct="PERSONREC" -table="PERSON" -output="CopybookViewGenerator.sql" Invoke-Sqlcmd -InputFile "CopybookViewGenerator.sql" -ConnectionString $ConnDb ### Define VSAM Cluster & "$Env:RCBATCHDIR\submit" -File="JCL001.jcl" -CatalogConfiguration="Raincode.Catalog.xml" ### Load Data & "$Env:RCBATCHDIR\submit" -File="JCL002.jcl" -CatalogConfiguration="Raincode.Catalog.xml" Pop-Location