<%
' MyPAYE
' Module: SelectERImport.asp
'
' This software is the copyright of Mr T J Sheppard and may not be copied, duplicated or
' modified other than as permitted in the licence agreement.
'
' © 2012 - 2023 Mr T J Sheppard
' Lyndale House
' Church Street
' Bradwell
' Hope Valley
' S33 9HJ
'
' Tel 0845 643 5191
' Email Support@MyPAYE.co.uk
'
' MyPAYE is a Registered Trademark of MyPAYE Ltd
'-------------------------------------------------------------------
'
' Updated 02 May 2023
'
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
'
' Description - This module enables the importing of new Employers including the first payroll
'
' Amendment Log
'------------------------------------------------------------------------------------------
' Date | Name | Vers. | Description
'------------------------------------------------------------------------------------------
' 10/03/19 | TJS | 5.5.01 | Page added
' 20/10/19 | TJS | 5.7.00 | Modified to use GetMainMenuParam to save having to read lots of parameters for each page build
' 11/11/19 | TJS | 5.7.00a | Corrected menu selected
' 25/02/20 | TJS | 5.7.04 | Modified to cater for Partner only reports on Multi Employer Overview
' 30/05/20 | TJS | 5.8.00 | Modified for new styling - added centered class on body and modified to replace stylesheet.css, mainmenu.css and buttons-css.asp with BodyAndMenu-css.asp
' 09/04/21 | TJS | 5.9.09 | Modified to use ASPDOTNET/LogOut.aspx and ASPDOTNET/AgencyCancel.aspx pages
' 02/05/23 | TJS | 5.9.24 | Modified to use Tools/CreateERImportTemplate.ashx
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
PageID = 82428
NoBack = True
SessionID = request.querystring("ID")
SessionVarsID = RemoveHTML(request.querystring("SV"))
SourceFrame = RemoveHTML(request.querystring("S"))
DestFrame = RemoveHTML(request.querystring("D"))
EmployerID = CheckURLDBIDField(RemoveHTML(request.querystring("ER")), "EmployerID")
%>
<%GetSessionVarsIDRecord(SessionVarsID)%>
<%RowCount = 0
response.Expires = -1500
response.Expiresabsolute = Now() - 2
response.AddHeader "pragma", "no-cache"
response.AddHeader "cache-control", "no-store"
response.CacheControl = "no-cache"
sql = "SELECT " & EmployerTableMenuOptionFields & " FROM " & DBSchema & "Employers WHERE Employer_ID = " & EmployerID
set rsEmployer = OpenRecordset(objConn, sql)
sql = "SELECT " & UserTableMenuPermissionFields & ", Restrict_Payroll_List FROM " & DBSchema & "Users INNER JOIN " & DBSchema
sql = sql & "User_Permissions ON Users.User_ID = User_Permissions.User_ID AND (Employee_Employer_ID = '' OR Employee_Employer_ID = '"
sql = sql & EncodeEmployerID(UserPermissionsTable, EmployerID) & "') WHERE Users.User_ID = " & GetSessionVar("UserID")
sql = sql & " AND User_Permissions.Deleted = 0 ORDER BY Employee_Employer_ID DESC"
set rsUser = OpenRecordset(objConn, sql)
ReadMainMenuParams SessionVarsID, cBool(rsUser("User_Admin")), (cBool(rsUser("Run_Payroll")) or cBool(rsUser("Payroll_EOY")) or cBool(rsUser("CIS_Returns"))), _
cBool(rsUser("Run_Payroll")), rsUser("Support_User_ID") ' TJS 20/10/19
%>
Select file for New Employer Import
<%if CheckBrowserVersion("MSIE", 8, true, false, false) then ' [if LT IE 8]%>
<%end if
if CheckBrowserVersion("MSIE", 7, true, true, false) then ' [if lte IE 7]%>
<%end if
if "" & GetSessionVar("PathModifier") <> "" then%>
Partner-CSS.asp" />
<%end if%>
<%MenuShowHome = true
MenuShowEmployer = true
MenuShowFindEmployee = true
MenuShowUsers = true
MenuShowCreate = true
MenuShowCreatePayroll = true
MenuShowCreateEmployer = true
MenuShowCreateUser = true
MenuShowHMRC = true
MenuShowReports = true
MenuPartnerReportsOnly = false ' TJS 25/02/20
MenuShowPayrollData = true
MenuShowTools = true
MenuShowSupport = true
MenuSelected = ""
MenuEmployerExists = true
MenuShowAccount = true
MenuSelected = "ToolsImpER" ' TJS 11/11/19%>
Select file for New Employer Import
This process will import new Employers, as well as creating their first Payroll.
Import Data
Template file creation settings
Please refer to the help topic for a description of each import data item.
Create Template File
/Secure/PayrollHome.asp?ID=<%=SetPageSessionID(38684, DestFrame)%>&SV=<%=SessionVarsID%>&S=<%=DestFrame%>&D=<%=MainFrame%>&PR=-1&ER=<%=EmployerID%>&RPy=No&RrP=No&CNP=No','PayrollHome','',true);">Cancel
<%
ReleaseASPEncrypt
rsEmployer.close
rsUser.close
set rsEmployer = nothing
set rsUser = nothing
SaveSessionVarsRecord SessionVarsID
objConn.close
set objConn = nothing
%>