code:

---

select
    case substr(@wksta,1,1) = "L"
         run @scriptdir + '\Notebooks.kix'
    case substr(@wksta,1,1) = "W"
         run @scriptdir + '\Workstations.kix'
    case 1
         "Naming convention not fulfilled ... logging you off !" $ = shutdown("","",1,0)
endselect

---

code:

---

$LaptopID='LTS'
$PCID='PCS'
select
case left(@WKSTA,len($LaptopID))=$LaptopID
  ;  it's a laptop
  call laptop.kix
  gosub laptopscript
  $laptop=1
  $pc=0
case left(@WKSTA,len($PCID))=$PCID
  ; it's a PC
  call pc.kix
  gosub pcscript
  $laptop=0
  $pc=1
case 1
  ; it's soemthing else
endselect

---