File layout for random file in Exercise 10.5

Private Type udtSandwich
    strName                 As String * 20
    strBread                As String * 20
    strMeat                 As String * 20
    strCheese               As String * 20
    strCondiments           As String * 40
    strSandwichCode         As String * 4
    strDeleteCode           As String * 1   'D = deleted; A = active
End Type