MP Batchs, copybooks, jcls, Procs

This commit is contained in:
2025-09-13 10:11:09 -04:00
parent c59b4762c2
commit ece2ee4599
261 changed files with 91380 additions and 11991 deletions

37
Output/CreateDB.ps1 Normal file
View File

@ -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

50
Output/JCL.ps1 Normal file
View File

@ -0,0 +1,50 @@
& "C:\Program Files\Raincode\Crossbow\net8.0\bin\submit.exe" -ProcLibs='E:\Innova\Code\MP\Git\DUTAS\Procs' -File="E:\Innova\Code\MP\Git\DUTAS\JCL\DTSBXTMP.jcl" #-ScanOnly -DBDriver=SQLite -DBConnectString="Out185.db3"
& "C:\Program Files\Raincode\Crossbow\net8.0\bin\submit.exe" -ProcLibs='E:\Innova\Code\MP\Git\DUTAS\Procs' -File="E:\Innova\Code\MP\Git\DUTAS\JCL\DTSBX305.jcl" # -ScanOnly -DBDriver=SQLite -DBConnectString="Out185.db3"
& "C:\Program Files\Raincode\Crossbow\net8.0\bin\submit.exe" -ProcLibs='E:\Innova\Code\MP\Git\DUTAS\Procs' -File="E:\Innova\Code\MP\Git\DUTAS\JCL\DTSESDAY.jcl"
& "C:\Program Files\Raincode\Crossbow\net8.0\bin\submit.exe" -ProcLibs='E:\Innova\Code\MP\Git\DUTAS\Procs' -File="E:\Innova\Code\MP\Git\DUTAS\AddParams.jcl" # -ScanOnly -DBDriver=SQLite -DBConnectString="Out185.db3"
& "C:\Program Files\Raincode\Crossbow\net8.0\bin\submit.exe" -ProcLibs='E:\Innova\Code\MP\Git\DUTAS\Procs' -File="E:\Innova\Code\MP\Git\DUTAS\AddUserParms.jcl"
& "C:\Program Files\Raincode\Crossbow\net8.0\bin\submit.exe" -ProcLibs='E:\Innova\Code\MP\Git\DUTAS\Procs' -File="E:\Innova\Code\MP\Git\DUTAS\AddParamsSYS2.jcl"
& "C:\Program Files\Raincode\Crossbow\net8.0\bin\submit.exe" -File="E:\Innova\Code\MP\Git\DUTAS\CreateVSAM1.jcl" -CatalogConfiguration="C:\ProgramData\Raincode\Batch\Raincode.Catalog.xml"
& "C:\Program Files\Raincode\Crossbow\net8.0\bin\submit.exe" -File="E:\Innova\Code\MP\Git\DUTAS\CopyVSAM.jcl" -CatalogConfiguration="C:\ProgramData\Raincode\Batch\Raincode.Catalog.xml"
& "C:\Program Files\Raincode\Crossbow\net8.0\bin\submit.exe" -File="E:\Innova\Code\MP\Git\DUTAS\CreateGDG.jcl" -CatalogConfiguration="C:\ProgramData\Raincode\Batch\Raincode.Catalog.xml"
& "C:\Program Files\Raincode\Crossbow\net8.0\bin\submit.exe" -ProcLibs='E:\Innova\Code\MP\Git\DUTAS\Procs' -File="E:\Innova\Code\MP\Git\DUTAS\JCL\DTSBX305.jcl"
& "C:\Program Files\Raincode\Crossbow\net8.0\bin\submit.exe" -ProcLibs='E:\Innova\Code\MP\Git\DUTAS\Procs' -File="E:\Innova\Code\MP\Git\DUTAS\JCL\DTSRQ459.jcl"
& "C:\Program Files\Raincode\Crossbow\net8.0\bin\submit.exe" -ProcLibs='E:\Innova\Code\MP\Git\DUTAS\Procs' -File="E:\Innova\Code\MP\Git\DUTAS\JCL\DTSBXPFL.jcl"
& "C:\Program Files\Raincode\Crossbow\net8.0\bin\submit.exe" -ProcLibs='E:\Innova\Code\MP\Git\DUTAS\Procs' -File="E:\Innova\Code\MP\Git\DUTAS\JCL\DTSESDAY.jcl"
& "C:\Program Files\Raincode\Crossbow\net8.0\bin\submit.exe" -ProcLibs='E:\Innova\Code\MP\Git\DUTAS\Procs' -File="E:\Innova\Code\MP\Git\DUTAS\JCL\DTSFT202.jcl"
& "C:\Program Files\Raincode\Crossbow\net8.0\bin\submit.exe" -ProcLibs='E:\Innova\Code\MP\Git\DUTAS\Procs' -File="E:\Innova\Code\MP\Git\DUTAS\TESTMISSING.txt"
#& "C:\Program Files\Raincode\Crossbow\net8.0\bin\submit.exe" -ProcLibs='E:\Innova\Code\MP\Git\DUTAS\Procs' -File="E:\Innova\Code\MP\Git\DUTAS\AddReproVSAMATC.jcl"
#& "C:\Program Files\Raincode\Crossbow\net8.0\bin\submit.exe" -ProcLibs='E:\Innova\Code\MP\Git\DUTAS\Procs' -File="E:\Innova\Code\MP\Git\DUTAS\AddReproVSAMMSTA.jcl"
#& "C:\Program Files\Raincode\Crossbow\net8.0\bin\submit.exe" -ProcLibs='E:\Innova\Code\MP\Git\DUTAS\Procs' -File="E:\Innova\Code\MP\Git\DUTAS\AddReproVSAMMSTE.jcl"
#& "C:\Program Files\Raincode\Crossbow\net8.0\bin\submit.exe" -ProcLibs='E:\Innova\Code\MP\Git\DUTAS\Procs' -File="E:\Innova\Code\MP\Git\DUTAS\AddReproVSAMMSTF.jcl"
#& "C:\Program Files\Raincode\Crossbow\net8.0\bin\submit.exe" -ProcLibs='E:\Innova\Code\MP\Git\DUTAS\Procs' -File="E:\Innova\Code\MP\Git\DUTAS\AddReproVSAMMSTG.jcl"
#& "C:\Program Files\Raincode\Crossbow\net8.0\bin\submit.exe" -ProcLibs='E:\Innova\Code\MP\Git\DUTAS\Procs' -File="E:\Innova\Code\MP\Git\DUTAS\AddReproVSAMMSTJ.jcl"
#& "C:\Program Files\Raincode\Crossbow\net8.0\bin\submit.exe" -ProcLibs='E:\Innova\Code\MP\Git\DUTAS\Procs' -File="E:\Innova\Code\MP\Git\DUTAS\AddReproVSAMOLA.jcl"
#& "C:\Program Files\Raincode\Crossbow\net8.0\bin\submit.exe" -ProcLibs='E:\Innova\Code\MP\Git\DUTAS\Procs' -File="E:\Innova\Code\MP\Git\DUTAS\AddReproVSAMREF.jcl"
& "C:\Program Files\Raincode\Crossbow\net8.0\bin\submit.exe" -ProcLibs='E:\Innova\Code\MP\Git\DUTAS\Procs' -File="E:\Innova\Code\MP\Git\DUTAS\AddReproVSAMWESQ.jcl"E----
#& "C:\Program Files\Raincode\Crossbow\net8.0\bin\submit.exe" -ProcLibs='E:\Innova\Code\MP\Git\DUTAS\Procs' -File="E:\Innova\Code\MP\Git\DUTAS\AddReproVSAMWRK.jcl"
& "C:\Program Files\Raincode\Crossbow\net8.0\bin\submit.exe" -ProcLibs='E:\Innova\Code\MP\Git\DUTAS\Procs' -File="E:\Innova\Code\MP\Git\DUTAS\AddReproVSAMAIX.jcl"E---
#& "C:\Program Files\Raincode\Crossbow\net8.0\bin\submit.exe" -ProcLibs='E:\Innova\Code\MP\Git\DUTAS\Procs' -File="E:\Innova\Code\MP\Git\DUTAS\AddReproVSAMWTC.jcl"
& "C:\Program Files\Raincode\Crossbow\net8.0\bin\submit.exe" -ProcLibs='E:\Innova\Code\MP\Git\DUTAS\Procs' -File="E:\Innova\Code\MP\Git\DUTAS\AddReproVSAMMSTB.jcl"6
& "C:\Program Files\Raincode\Crossbow\net8.0\bin\submit.exe" -ProcLibs='E:\Innova\Code\MP\Git\DUTAS\Procs' -File="E:\Innova\Code\MP\Git\DUTAS\AddReproVSAMMSTC.jcl"5
#& "C:\Program Files\Raincode\Crossbow\net8.0\bin\submit.exe" -ProcLibs='E:\Innova\Code\MP\Git\DUTAS\Procs' -File="E:\Innova\Code\MP\Git\DUTAS\AddReproVSAMMSTD.jcl"
#& "C:\Program Files\Raincode\Crossbow\net8.0\bin\submit.exe" -ProcLibs='E:\Innova\Code\MP\Git\DUTAS\Procs' -File="E:\Innova\Code\MP\Git\DUTAS\AddReproVSAMMSTH.jcl"
& "C:\Program Files\Raincode\Crossbow\net8.0\bin\submit.exe" -ProcLibs='E:\Innova\Code\MP\Git\DUTAS\Procs' -File="E:\Innova\Code\MP\Git\DUTAS\AddReproVSAMMSTI.jcl"7
#& "C:\Program Files\Raincode\Crossbow\net8.0\bin\submit.exe" -ProcLibs='E:\Innova\Code\MP\Git\DUTAS\Procs' -File="E:\Innova\Code\MP\Git\DUTAS\AddReproVSAMWAGE.jcl"
#& "C:\Program Files\Raincode\Crossbow\net8.0\bin\submit.exe" -ProcLibs='E:\Innova\Code\MP\Git\DUTAS\Procs' -File="E:\Innova\Code\MP\Git\DUTAS\AddReproVSAMWGH.jcl"E----