MP Batchs, copybooks, jcls, Procs

Output/CreateDB.ps1

@@ -0,0 +1,37 @@
+
+###################################
+##                               ##
+##    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