; LOGON.KIX
;
; KIXSTART LOGON SCRIPT FOR PRECISION RESPONSE CORP.
;
; WRITTEN BY ERIC GREENBERG SYSTEMS ENGINEER, NETERA CORP
;
; UPDATE HISTORY
;
; 8/12/99 INITIAL CODING OF SCRIPT, (ERIC GREENBERG)

;Display Initial Greeting to User
CLS
small
Color b+/n
BOX (0,0,24,79,GRID) ; 'background grid'
Color b/n
BOX (8,21,18,61,Å) ; 'shadow of the box'
Color c+/n
BOX (7,20,18,60,FULL)
Color r+/n
AT (9,25) "Welcome Back @fullname"

Color w+/n
AT (11,25) "Privilege : "
AT (12,25) "Workstation : "
AT (13,25) "Workgroup : "
AT (14,25) "Logon Server : "
AT (15,25) "Current Time : "

Color r+/n
AT (17,22) "PLEASE WAIT WHILE LOGON IS PROCESSED"

Color y+/n
AT (11,40) @priv
AT (12,40) @wksta
AT (13,40) @domain
AT (14,40) @lserver
AT (15,40) @time
AT (17,40) @comment

sleep 5

Color g+/n

; Set Variables
$server1="\\ngg1fsv01" ;This is the new NTServer name for old Prc_Nwfs server.
$server2="\\ngg2fsv02" ;This is the new NTServer name for old Prc_Developers server.

.if $locale="Prc_Nt"
. $group="Domain Admins"
. if ingroup($group)
. exit
. endif
.else
.
. if $locale="Prc_Nt" ;The following lines are for the Prc_Nwfs Users
. $group="Grp_Oldnwfs"
. if ingroup($group)
. use f: "@homeshr"
. use g: "$server1\share"
. use h: "$server1\apps"
. use i: "$server1\db"
. endif
.
. $group="Grp_Corp_Treasury"
. if ingroup($group)
. use k: "$server1\treasury"
. use l: "$server1\users"
. endif
.
. $group="Grp_Account_Services"
. if ingroup($group)
. use k: "$server1\tlmkrpts"
. endif
.
. $group="Grp_GG_Accounting"
. if ingroup($group)
. use k: "$server1\acctdept"
. use l: "$server1\billing"
. endif
.
. $group="Grp_GG_Attshare"
. if ingroup($group)
. use k: "server1\attshare"
. endif
.
. $group="Grp_GG_Priv"
. if ingroup($group)
. use k: "server1\exec_pri"
. endif
.
. $group="Grp_GG_Legal"
. if ingroup($group)
. use k: "server1\legal"
. endif
.
. $group="Grp_GG_Quick_Books"
. if ingroup($group)
. use k: "server1\quickboo"
. endif
.
. $group="Grp_GG_Orgusers"
. if ingroup($group)
. use k: "server1\lotus"
. endif
.
. $group="Grp_GG_Tlmkrpts"
. if ingroup($group)
. use k: "server1\tlmkrpts"
. endif
.
. $group="Grp_OldDev" ;This starts section for old Prc_Developers users
. if ingroup($group)
. use f: "server2\users"
. use g: "server2\share"
. use h: "server2\db"
. use i: "server2\orawin"
. endif
.
. $group="Grp_Qa_Prodstaging"
. if ingroup($group)
. use k: "server2\production staging"
. use l: "server2\quality"
. endif
.
. $group="Grp_1313-Ml"
. if ingroup($group)
. use k: "server2\attaws" ;this share needs to be created by nwgw.
. endif ;Prc_Ml\ISG:\Attaws
.
. $group="Grp_Dev_Dbshare"
. if ingroup($group)
. use m: "server2\mldb" ;this share needs to be created by nwgw.
. use n: "server2\deerwooddb" ;this share needs to be created by nwgw.
. use o: "server2\margatedbold" ;this share needs to be created by nwgw.
. use p: "server2\opalockadb" ;this share needs to be created by nwgw.
. endif
.
. $group="Grp_Dev_Ucs"
. if ingroup($group)
. use k: "server2\Ucs_Isg_Development"
. endif
.
. $group="Grp_Ml_Isg"
. if ingroup($group)
. use k: "server2\common" ;this share needs to be created by nwgw.
. use l: "server2\attaws" ;Prc_Ml\ISG:\Attaws \\...\common
. endif
. endif
.endif

cookie1
cookie1
exit