Section	Tag Name	Variable Name	Question Text	Skip Instructions	
		www			
		CARIFile_Name_Info			
		XXXX			
		Laundry_List_Standards	** Non Displayed **		
		PreChart_Standards	** Non Displayed **		
		GLOBAL_HELP			
		CASEID_IN_Info	** Non-Displayed Field ***		
		CASEID_OUT_Info	** Not Displayed **		
		Spawning_Info			
		FUNCTION_KEYS	** Non Displayed **		
		STATUS_BAR	** Non Displayed **		
		8500_Input_Layouts			
		Input_Setup_Specifications	** See Attached **		
		CARIFIELDS			
FRONT		CASEID			
FRONT		CTRLNUM			
COVERAGE	MAXCUNUM	MAXCUNUM	** VARIABLE NEEDED FOR PROCESSING **		
COVERAGE		CUNUMBER			
		REPLACE	

1. Yes
2. No		
FRONT	H_HHROS	H_HHROS	RESP LN NAME                           MEMBER   RELATIONSHIP   CU  SEX  AGE  

1. Enter 1 to Continue	Return to  interview	
FRONT	H_PURPOSE	H_PURPOSE	            FREQUENTLY ASKED QUESTIONS  

1. What is this survey all about?   
2. Who uses this information?  What good is it?  
3. How is the data collected?    How many times will I be interviewed?
4. I hesitate to tell some things about myself,  what protection do I have?
5. Is this survey authorized by law?
6. Proceed with the interview	1:   Goto H_PURPOSE1
2:   Goto H_PURPOSE2
3:   Goto H_PURPOSE3
4:   Goto H_PURPOSE4
5:   Goto H_PURPOSE5
6:   Return to interivew	
FRONT	H_PURPOSE1	H_PURPOSE1	        WHAT IS THIS SURVEY ALL ABOUT?

The Consumer Expenditure Survey collects information from the Nation's households and families their buying habits (expenditures), income, and characteristics.  The strength of the survey is that it allows data users to relate the expenditure and income of consumers to the characteristics of those consumers.                    

1. Enter 1 to Continue	Return to interview	
FRONT	H_PURPOSE2	H_PURPOSE2	               WHO USES THIS INFORMATION?  WHAT GOOD IS IT?

Data from the Consumer Expenditure Survey are used in a number of different ways by a variety of users.  An important use of the survey by the Bureau of Labor Statistics is for the periodic revisions of the Consumer Price Index (CPI).   Survey results are used to select new market basket of goods and services for the CPI, to determine the relative importance of CPI components and to derive new cost weights for the market basket.Government and private agencies use the data to study the welfare of particular segments of the population.  Economic policymakers  use the data to study the impact of policy changes in the welfare of different socioeconomic groups.  Researchers use the data in a variety of studies, including those that focus on the spending behavior of different family types and historical spending trends.  

1. Enter 1 to Continue	Return to interview	
FRONT	H_PURPOSE3	H_PURPOSE3	         HOW IS THE DATA COLLECTED?
          HOW MANY TIMES WILL I BE INTERVIEWED?

Data collection is carried out by the Bureau of the Census. In the Interview Survey, each consumer unit is interviewed every 3 months over 4 calendar quarters. In the initial interview, information is collected on demographic and family characteristics. Expenditure information is then collected over four quarterly interviews using uniform questionnaires. In the fourth interview, a supplement is used to account for changes in assets and liabilities.

1. Enter 1 to Continue	Return to interview	
FRONT	H_PURPOSE4	H_PURPOSE4	            I HESITATE TO TELL SOME THINGS ABOUT MYSELF.
              WHAT PROTECTION DO I HAVE?

The information that respondents provide is used solely for statistical purposes.
 All Census Bureau data collectors take an oath of confidentiality and are subject
to fines and imprisonment for improperly disclosing information provided by
 respondents.  Names and addresses are removed from all forms and that information
 is not released as part of any statistical data.

1. Enter 1 to Continue	Return to interview	
FRONT	H_PURPOSE5	H_PURPOSE5	              IS THIS SURVEY AUTHORIZED BY LAW?

The Bureau of Labor Statistics conducts the Consumer Expenditure Survey under the authority of Title 29 of the U.S. Code.  Congress authorizes the financial support for the CE survey through Public Laws 94-439 and 95-205.The Bureau of the Census collects the CE data under the authority of Title 13, U.S. Code, Section 8b, which allows the Census Bureau to undertake surveys for other government agencies.  Participation in the survey is voluntary.  Under Title 13, the Census Bureau holds all information in strict confidence.  We will not release information reported in the survey which would permit the identification of a household or any of its members to anyone outside of the Census Bureau. 

1. Enter 1 to Continue	Return to interview	
FRONT	HRESPONDENT	HRESPONDENT	     Ask if necessary:    

With whom am I speaking?   

Enter line number
95. For proxy respondent

1. NameOnly[1]
2. NameOnly[2]
3. NameOnly[3]
4. NameOnly[4]
5. NameOnly[5]
6. NameOnly[6]
7. NameOnly[7]
8. NameOnly[8]
9. NameOnly[9]
10. NameOnly[10]
11. NameOnly[11]
12. NameOnly[12]
13. NameOnly[13]
14. NameOnly[14]
15. NameOnly[15]
16. NameOnly[16]
17. NameOnly[17]
18. NameOnly[18]
19. NameOnly[19]
20. NameOnly[20]
21. NameOnly[21]
22. NameOnly[22]
23. NameOnly[23]
24. NameOnly[24]
25. NameOnly[25]
26. NameOnly[26]
27. NameOnly[27]
28. NameOnly[28]
29. NameOnly[29]
30. NameOnly[30]
95. Proxy Respondent	IF RT10.CARISAMPLE = 1 then goto CARICONCrp

ELSE return to interview	
Change Respondent Block	CARICON	CARICON	? [F1]

This interview may be recorded for quality control purposes. Is that okay?

1. Yes
2. No	Return to interview	
FRONT	H_STATUS	H_STATUS	
                              STATUS OF INTERVIEW  (X = Section Complete)

1.   Survey Info . . . . . . . . (blank/X)               13.  Health Insurance ..    (blank/X) 
2.   Rental Liv Quarters    (blank/X)               14.  Medical/Health expenditures   (blank/X)
3.   Owned Liv Quarters    (blank/X)              15.  Insurance . . . . . . . . . . . . . . .   (blank/X) 
4.   Utility & Fuel  . . . . .      (blank/X)             16.  Education expenses . . . . . . .  (blank/X) 
5.   Construct Repairs  . .   (blank/X)             17.  Subscriptions . . . . . . . . . . . .   (blank/X) 
6.   Appliances  . . . . . . .    (blank/X)              18.  Trips & Vacations . . . . . . . . .   (blank/X) 
7.   HH equipment . . . . .   (blank/X)              19.  Misc. Expenses . . . . . . . . . . .  (blank/X) 
8.   Home furnish . . . . . .    (blank/X)             20.  Expense patterns . . . . . . . . . . (blank/X) 
9.   Clothing & Sewing . .    (blank/X)             21.  Work experience. . . . . . . . . . .(blank/X)
10.  Rented & Leased Vehicles .   (blank/X)  22.  Assets & Liabilities. . . . . . . .  (blank/X)
11.  Owned Vehicles . . .    (blank/X)                  
12.  Vehicle Expenses . .   (blank/X) 	Return to interview	
	ProductKey	lookupkeyword	  Enter the lookup key word to search for in the Product Index.		
	StopLooking	Endlooking	  Enter 1 to Continue and empty product lookup keyword.
  Enter nothing to retain current product keyword.

           Product                               =  (Fill information from the "Product" column of excel file.)
           Item Description                  =  (Fill information from the "ItemDesc" column of excel file.)
           Section Part-Item Number  =  (Fill information from the "Section" "Part"-"ItemNo" columns of the
                                                                 excel file.) 

1. Enter 1 to Continue	Exit Help	
		Product_Index_File	**Non Displayed**		
FRONT	H_KEYS	H_KEYS	See attached document H_Keys for the help text	Return to interview	
FRONT		Global_Prechart	     Global Prechart for case (CASEID)
                                                          
            Section (X) - (Part X) - (Description)	Return to interview	
FRONT		DATAMODEL_CK	** Non Displayed ITEM AT THE DATA MODEL LEVEL **	Goto SETBASIC	
FRONT		SETBASIC	** Non Displayed **	Goto START	
FRONT		TRAININGCASE	THIS IS A TRAINING CASE               THIS IS A TRAINING CASE               THIS IS A TRAINING CASE

                    THIS 
                 
                   IS     A

                TRAINING

                   CASE

THIS IS A TRAINING CASE               THIS IS A TRAINING CASE               THIS IS A TRAINING CASE

1. Enter 1 to Continue		
FRONT	SENSITIVECASE	SENSITIVECASE	WARNING!      WARNING!      WARNING!      WARNING!      WARNING!      WARNING!   
   
                    THIS                                                                                                     THIS
                 
                                      CASE                                                     CASE
            
                                                                  CONTAINS

                                       SENSITIVE                                            SENSITIVE
 
                 DATA                                                                                                          DATA

This case contains data that is considered sensitive and , therefore, you must treat the data as though it
is production data and apply appropriate data stewardship safeguards when using the data.  These
include, but as not limited to, the following:

o   Do not store the data to any removable media or to a laptop that is not fully encrypted
o   Do not take the data offsite, for telework or other reasons
o   Do not e-mail the data unless it is sent as an encrypted attachment
o   Do ensure that the data, in electronic or hard copy format, are not viewed by anyone who does not have sworn status

***If you do not agree to these conditions, exit the case as soon as the instrument allows it.***

WARNING!      WARNING!      WARNING!      WARNING!      WARNING!      WARNING!   

1. Enter 1 to Continue		
FRONT		NEWCU	** OUT VARIABLE **		
		NEWCU2	** Non-Displayed Field **		
		_NEWCU_	** Non-Displayed Field **		
Control Ca		AGE62	** OUT VARIABLE ** 

1. Yes
2. No		
		EXITINTERVIEW	

1. Yes
2. No		
		REPLACESPAWN	

1. Yes
2. No		
FRONT	START	START	                CENSUS CATI/CAPI SYSTEM                                              
                                                              
               CONSUMER EXPENDITURE SURVEYS
                  QUARTERLY INTERVIEW SURVEY

  DATE:  (current date)                           TIME:  (time) 

   INTERVIEW NUMBER:  (1/2/3/4/5)        CASE STATUS IS:  (case status)

    (THIS HOUSEHOLD IS A CONFIRMED REFUSAL/   )      
     Language Spoken Last Quarter:   (English/Spanish/(specify) )                  

1. Continue
2. Skip notes
3. Ready to transmit
4. Quit
5. Non-interview	1:   IF INTNMBR = 1 then goto GENINTRO
     ELSE goto SHOSTAT

2:   Goto GENINTRO

3:   IF OUTCOME = 200, 0 (zero), or 202 then goto CK1_START
     ELSEIF OUTCOME = 201 or 206 then goto CK3_START
     ELSE exit block and goto BBACK.TRANS

4:   Exit block and goto BBACK.VERIFY_INFO

5:   IF OUTCOME = 204 then goto CK2_START
     ELSEIF OUTCOME = 201 or 206 then goto CK3_START
     ELSE exit block and goto BCOVERAGE.NONTYP	
FRONT	SHOSTAT	SHOSTAT	         (This household was not in sample last quarter. /  )       
  
          PRECHARTS:  Press Shift-F8 to view pre-charts

       INTERVIEW NUMBER                      PREVIOUS OUTCOME DESCRIPTION    
             (1 /  )                                              (1st month outcome #)      (outcode description)
             (2 /  )                                              (2nd month outcome # )      (Outcome description)
             (3 /  )                                              (3rd month outcome # )      (Outcome description)

   ( BC NAME:  (name) /  )
   (BC TITLE: (title) /  )
   (BC PHONE NUMBER: ((phone number)    BC EXT:  (Extension)/  )
   (BC ADDRESS:   (Street address) / )
   (BC ADDRESS:  (street - line 2) /  )
   ((city, state zip)  /  )      
   (BC OBSERVATION:  (Yes/No)  /  )  

1. Enter 1 to Continue	IF ROSTERNAMEONINPUT = Yes then goto SHOWROS
ELSE goto GENINTRO	
FRONT	SHOWROS	SHOWROS	
                   STATUS OF HOUSEHOLD COMPOSITION

Resp.    LN          Name                     Member  Relationship   CU    Sex    Age 
(X /  ) (Line #)   (Name)                    (Yes/No)     (Relationship)        (Cu #)   (1/2)  (Age)        

1. Enter 1 to Continue	Goto GENINTRO	
FRONT	GENINTRO	GENINTRO	              Do not read as worded below 
            
         o  Identify yourself -  show I.D.
         o  (Ask for eligible respondent/Ask to speak to (respondent from last quarter))
         o  Introduce survey  
         o  The Household address is:
                (House #)  (House #)suf  (Street name)
                (Unit Designation)
                                        
         o  Read if necessary
             I am (your name) from the U.S. Census Bureau.  Here is my identification card.
             We are conducting a Consumer Expenditure Survey for the Bureau of Labor Statistics.
             I have some questions I would like to ask you.
    
      Did you receive our letter?

1. Yes
2. No
3. Non-interview	1:  IF INTNMBR <> 1 AND NEWCU <> 1 AND 
        ROSTERNAMEONINPUT = 'Yes' AND not a 
         replacement case then goto REPLACE_HH 
     ELSE goto VERADD

2:  Goto GIVE_LETTER

3:  Exit block and goto BCOVERAGE.NONTYP	
FRONT	GIVE_LETTER	GIVE_LETTER	?  [F1]

We normally send a letter in advance to sample households informing them about the survey, and communicating the Privacy Act and other information, but the current social distancing guidelines may have prohibited us from doing so. Therefore, we've provided the letter online at www.bls.gov/respondents/cex. 

Would you like me to email this link to you for your reference?

     If the respondent says "Yes" ask for (or verify) email address, and send link via OWA
        - Proceed with interview.   (Current Email address:  (Email address))

     If the respondent says "No" or "What does the letter say?" - Press F1 and read
        verbatim Help text. 

1. Enter 1 to Continue	IF INTNMBR <> 1 AND NEWCU <> 1 AND
   ROSTERNAMEONINPUT = 'Yes' AND not a replacement case 
   then goto REPLACE_HH 

ELSE goto VERADD	
FRONT	REPLACE_HH	REPLACE_HH	      Is this a Replacement Household?                

1. Yes
2. No	1:     Goto CK_REPLACE

2:     Goto VERADD	
FRONT	REPLACE_VER	REPLACE_VER	         A replacement household means that there are no members of the original household living at this
         address.  Are you sure that this is a replacement household?

          (This case is part of a multi-CU household.  Verify that ALL original members in all CU?s no longer live there. /  )

    LN      Name    Member Relationship   CU   Sex   Age 
    (Line #) (Name)   (Yes/No)   (Relationship)      (Cu #)  (1/2)  (Age)

1. Yes
2. No	1:    IF RT8500.TOTALCU = 1 then goto REPLACE_SPAWN
      ELSE goto REPLACE_VER2

2:    Goto CK_REPLACEVER	
FRONT	REPLACE_VER2	REPLACE_VER2	     Has a replacement case already been created/spawned for this address?   

       If unsure, back up to the start screen and Quit out of the instrument so you can check
       case management. 

1. Yes
2. No	1   Exit block and goto BBACK.DONE

2:   Goto REPLACE_SPAWN	
FRONT	REPLACE_SPAWN	REPLACE_SPAWN	   A replacement household Case will be spawned.
    You will need to exit this case and pull up the new Case
    in order to interview the replacement household.

    The case you are currently in will automatically become a type C.
     (NOTE: There are (total number of CUs) cases that must also be Type C'd/  )

1. Enter 1 to Continue	Exit block and goto BBACK.DONE	
FRONT	VERADD	VERADD	
(*  Confirm address information (Only ask if necessary) )
I have your address listed as  READ ADDRESS BELOW.  Is that your exact address?

                       (House #) (House #)SUF (Street Name)   (Unit Designation)
                       (City),  (State)    (Zipcode)
         Phy des:   (Physical Description)              
         GQ unit:   (GQ Unit Description)         Non-City:  (Non-city address)
         Building:  (Building Name)

1. Yes, address is EXACTLY CORRECT as listed.
2. Address is MOSTLY CORRECT, needs minor changes.	1:     Goto MAILAD

2:    Goto NADDST1	
FRONT	NADDST1	NADDST1	          Enter corrections for House Number  or  press ENTER for Same/No Change.
            
                      (House #)  (House #)SUF (Street Name)    (Unit Designation)
                      (City),  (State)    (Zipcode)
             Phy des:  (Physical Description)              
             GQ unit:  (GQ Unit Description)   
             Non-City: (Non-city address)
             Building:  (Building Name)	Goto NADDST2	
FRONT	NADDST2	NADDST2	  Enter corrections  for House # Suffix or Press ENTER for Same/No Change

                       (House #)  (House #)SUF (Street Name)    (Unit Designation)
                   (City),  (State)    (Zipcode)
         Phy des:    (Physical Description)              
         GQ unit:   (GQ Unit Description)   
         Non-City: (Non-city address)
         Building:  (Building Name)	Goto NADDST3	
FRONT	NADDST3	NADDST3	        Enter corrections  for Street Name or Press ENTER for Same/No Change

                   (House #)  (House #)SUF (Street Name)    (Unit Designation)
                   (City),  (State)    (Zipcode)
          Phy des:  (Physical Description)              
          GQ unit:   (GQ Unit Description)   
          Non-City: (Non-city address)
          Building:  (Building Name)	Goto NADDST4	
FRONT	NADDST4	NADDST4	       Enter corrections  for Unit Designation or Press ENTER for Same/No Change

                 (House #)  (House #)SUF (Street Name)    (Unit Designation)
                 (City),  (State)    (Zipcode)
         Phy des:   (Physical Description)              
         GQ unit:  (GQ Unit Description)   
         Non-City: (Non-city address)
         Building:  (Building Name)	IF FRAME = 3 or RT25.GQINAREA = 1 then goto NADDST5
ELSE goto NADDST6	
FRONT	NADDST5	NADDST5	       Enter corrections  for Group Quarters Unit Description or Press ENTER for Same/No Change

                      (House #)  (House #)SUF (Street Name)    (Unit Designation)
                 (City),  (State)    (Zipcode)
         Phy des:  (Physical Description)              
         GQ unit:  (GQ Unit Description)   
         Non-City: (Non-city address)
         Building:  (Building Name)	Goto NADDST6	
FRONT	NADDST6	NADDST6	      Enter corrections  for Non City Style Address or Press ENTER for Same/No Change

                 (House #)  (House #)SUF (Street Name)    (Unit Designation)
                 (City),  (State)    (Zipcode)
         Phy des:  (Physical Description)              
         GQ unit: (GQ Unit Description)   
         Non-City: (Non-city address)
         Building:  (Building Name)	Goto NADDPHYS	
FRONT	NADDPHYS	NADDPHYS	         Enter corrections for Physical Description or Press ENTER for Same/No Change

                    (House #)  (House #)SUF (Street Name)    (Unit Designation)
                 (City),  (State)    (Zipcode)
         Phy des:  (Physical Description)              
         GQ unit:  (GQ Unit Description)   
         Non-City: (Non-city address)
         Building:  (Building Name)	Goto NADDCT	
FRONT	NADDCT	NADDCT	       Enter corrections  for City or Press ENTER for Same/No Change

                 (House #)  (House #)SUF (Street Name)    (Unit Designation)
                 (City),  (State)    (Zipcode)
         Phy des:  (Physical Description)             
         GQ unit: (GQ Unit Description)   
         Non-City: (Non-city address)
         Building:  (Building Name)	Goto NADDST	
FRONT	NADDST	NADDST	? [F1]

          Enter corrections  for State or Press ENTER for Same/No Change

                      (House #)  (House #)SUF (Street Name)    (Unit Designation)
                 (City),  (State)    (Zipcode)
         Phy des:  (Physical Description)              
         GQ unit:  (GQ Unit Description)   
         Non-City: (Non-city address)
         Building:  (Building Name)	Goto NADDZP	
FRONT	NADDZP	NADDZP	   Enter corrections  for Zipcode or Press ENTER for Same/No Change

                     (House #)  (House #)SUF (Street Name)    (Unit Designation)
                 (City),  (State)    (Zipcode)
         Phy des:  (Physical Description)              
         GQ unit: (GQ Unit Description)   
         Non-City: (Non-city address)
         Building:   (Building Name)	IF entry lt 5 digits then goto CK_NADDZP
ELSE goto NADDBUIL	
FRONT	NADDBUIL	NADDBUIL	       Enter corrections  for Building Name or Press ENTER for Same/No Change

                  (House #)  (House #)SUF (Street Name)    (Unit Designation)
                 (City),  (State)    (Zipcode)
         Phy des:  (Physical Description)              
         GQ unit: (GQ Unit Description)   
         Non-City: (Non-city address)
         Building:  (Building Name)	Goto CK_ADDRESS	
FRONT	MAILAD	MAILAD	(Is this also your mailing address?/I have your mailing address as *READ ADDRESS BELOW.  Is that correct?)

(Mailing address entries / physical address entries)

1. Yes
2. No	1:   Goto PHONENUMBER

2:   Goto NMAILST1	
FRONT	NMAILST1	NMAILST1	   Enter change to Mailing address - House # or Press ENTER for Same/No Change

Address:                                               Mailing Address:                                               
(House #) (House #)SUF  (Street Name)             (House #)  (House #)SUF  (Street Name)
(Unit Designation)                                         (Unit Designation)
(City), (State) (Zipcode)                                                   (City), (State) (Zipcode)
Phys des:   (Physical Description)                           
GQ unit:    (GQ Unit Description)                      GQ unit:      (GQ Unit Description)
Non-Cty:   (Non-city address)                    Non-city:    (Non City Address)
Building:    (Building Name)                           	Goto NMAILST2	
FRONT	NMAILST2	NMAILST2	   Enter change to Mailing address - House #  suffix or Press ENTER for Same/No Change

Address:                                             Mailing Address:                                               
(House #) (House #)SUF  (Street Name)           (House #)  (House #)SUF  (Street Name)
(Unit Designation)                                       (Unit Designation)
(City), (State) (Zipcode)                                    (City), (State) (Zipcode)
Phys des:   (Physical Description)                          
GQ unit:    (GQ Unit Description)                   GQ unit:     (GQ Unit Description)
Non-Cty:   (Non-city address)                  Non-city:    (Non City Address)
Building:    (Building Name)                           	Goto NMAILST3	
FRONT	NMAILST3	NMAILST3	   Enter change to Mailing address - Street Name or Press ENTER for Same/No Change

Address:                                       Mailing Address:                                               
(House #) (House #)SUF  (Street Name)      (House #)  (House #)SUF  (Street Name)
(Unit Designation)                                  (Unit Designation)
(City), (State) (Zipcode)                               (City), (State) (Zipcode)
Phys des:   (Physical Description)                          
GQ unit:    (GQ Unit Description)                   GQ unit:     (GQ Unit Description)
Non-Cty:   (Non-city address)                  Non-city:    (Non City Address)
Building:    (Building Name)                           	Goto NMAILST4	
FRONT	NMAILST4	NMAILST4	   Enter change to Mailing address - Unit Designation or Press ENTER for Same/No Change

Address:                                       Mailing Address:                                               
(House #) (House #)SUF  (Street Name)      (House #)  (House #)SUF  (Street Name)
(Unit Designation)                                  (Unit Designation)
(City), (State) (Zipcode)                               (City), (State) (Zipcode)
Phys des:   (Physical Description)                          
GQ unit:    (GQ Unit Description)            GQ unit:     (GQ Unit Description)
Non-Cty:   (Non-city address)           Non-city:    (Non City Address)
Building:    (Building Name)                           	IF FRAME = 3 OR RT25.GQINAREA = 1 then goto NMAILST5
ELSE goto NMAILST6	
FRONT	NMAILST5	NMAILST5	   Enter change to Mailing address - GQ Unit Description or Press ENTER for Same/No Change

Address:                                                           Mailing Address:                                               
(House #) (House #)SUF  (Street Name)            (House #)  (House #)SUF  (Street Name)
(Unit Designation)                                        (Unit Designation)
 (City), (State)  (Zipcode)                                    (City), (State) (Zipcode)
Phys des:   (Physical Description)                                   
GQ unit:   ^MGQUNITINFO                  GQ unit:  (GQ Unit Description)
Non-Cty:  (Non-city address)                    Non-city:  (Non City Address)
Building:   (Building Name)                                   	Goto NMAILST6	
FRONT	NMAILST6	NMAILST6	   Enter change to Mailing address - Non-City Style Address or Press ENTER for Same/No Change

Address:                                       Mailing Address:                                               
(House #) (House #)SUF  (Street Name)      (House #)  (House #)SUF  (Street Name)
(Unit Designation)                                  (Unit Designation)
(City), (State) (Zipcode)                               (City), (State) (Zipcode)
Phys des:   (Physical Description)                          
GQ unit:    (GQ Unit Description)            GQ unit:     (GQ Unit Description)
Non-Cty:   (Non-city address)           Non-city:    (Non City Address)
Building:    (Building Name)                           	IF no entry in NMAILST1 and NMAILST6 then goto CK_NMAILST6
ELSE goto NMAILCT	
FRONT	NMAILCT	NMAILCT	   Enter change to Mailing address - City or Press ENTER for Same/No Change

Address:                                       Mailing Address:                                               
(House #) (House #)SUF  (Street Name)      (House #)  (House #)SUF  (Street Name)
(Unit Designation)                                  (Unit Designation)
(City), (State) (Zipcode)                               (City), (State) (Zipcode)
Phys des:   (Physical Description)                          
GQ unit:    (GQ Unit Description)            GQ unit:     (GQ Unit Description)
Non-Cty:   (Non-city address)           Non-city:    (Non City Address)
Building:    (Building Name)                           	Goto NMAILST	
FRONT	NMAILST	NMAILST	? [F1]

   Enter change to Mailing address -State or Press ENTER for Same/No Change

Address:                                       Mailing Address:                                               
(House #) (House #)SUF  (Street Name)      (House #)  (House #)SUF  (Street Name)
(Unit Designation)                                  (Unit Designation)
(City), (State) (Zipcode)                               (City), (State) (Zipcode)
Phys des:   (Physical Description)                          
GQ unit:    (GQ Unit Description)            GQ unit:     (GQ Unit Description)
Non-Cty:   (Non-city address)           Non-city:    (Non City Address)
Building:    (Building Name)                           	Goto NMAILZP1	
FRONT	NMAILZP1	NMAILZP1	   Enter change to Mailing address - Zipcode or Press ENTER for Same/No Change

Address:                                       Mailing Address:                                               
(House #) (House #)SUF  (Street Name)      (House #)  (House #)SUF  (Street Name)
(Unit Designation)                                  (Unit Designation)
(City), (State) (Zipcode)                               (City), (State) (Zipcode)
Phys des:   (Physical Description)                          
GQ unit:    (GQ Unit Description)            GQ unit:     (GQ Unit Description)
Non-Cty:   (Non-city address)           Non-city:    (Non City Address)
Building:    (Building Name)                           	IF entry lt 5 digits then goto CK_NMAILZP1
ELSE goto CK_MAILADDRESS	
FRONT	PHONENUMBER	PHONENUMBER	  Ask or verify, if necessary.

What is your telephone number?

  Enter phone number or 0 for None/Refused	IF PHONENUMBER = 0 then exit block and goto BCOVERAGE
ELSEIF PHONENUMBER < 10 digits then goto CK_PHONENUMBER
ELSE goto PHTYP1	
	PHTYP1	PHTYP1	  Is this a home, work, or cell number?

1. Home
2. Work
3. Cell	Exit block and goto BCOVERAGE	
FRONT		I_TOTALCU			
	CARICON1	CARICON_HH	? [F1]

This interview may be recorded for quality control purposes. Is that okay?

(*  To turn CARI Off, Enter 2 - No/ * To turn CARI On, Enter 1 - Yes)

1. Yes
2. No	Goto bCeintro.BUSCREEN	
		CARICON_Orig	

1. Yes
2. No		
		CARI_Continue	  Press the END key to return to the next unanswered question.		
COVERAGE	NONTYP	NONTYP	     What type of non-interview do you have?

      Type A = No one home, Temporarily absent, or refusal

      Type B = Vacant, under construction, occupied by persons with URE

      Type C = Demolished, house moved, merged, condemned, located on base, CU moved               

1. TYPE A
2. TYPE B
3. TYPE C	1:     Goto TYPEA
2:     Goto TYPEB
3:     Goto TYPEC	
COVERAGE	TYPEA	TYPEA	      Enter TYPE A noninterview.          

1. No one home
2. Avoidance/Silent Refusal
3. Temporarily Absent
4. Hostile respondent
5. Time related excuses
6. Language problem
7. Refused - specify
8. Other Type A -specify	1-6:   IF RT2501.URRAL = R and (RT2501.FRAME <> 3 or
               RT2501.GQTYPE = 901 or 903) AND
              (REPLACE = 1 or ( (INTNMBR = 1 or NEWCU = 1)
               AND NEWUNIT <> S) then goto FM_SALES
       ELSEIF ( (INTNMBR = 1 or _NEWCU_ = 1) and NEWUNIT <> S)
               then goto GQ_UNIT
       ELSE goto RACETYP

7:   Goto REASON_S

8: IF RT25.IMPADD = 1 then goto CK_TYPEA
   ELSE goto TYPEASP	
COVERAGE	TYPEASP	TYPEASP	  Specify other TYPE A	IF RT2501.URRAL = R and (RT2501.FRAME <> 3 or
       RT2501.GQTYPE = 901 or 902)  AND (REPLACE = 1
       or ( (INTNMBR = 1 or _NEWCU_ = 1) AND 
       NEWUNIT <> S) then goto FM_SALES

IF ( (INTNMBR = 1 or _NEWCU_ = 1) and NEWUNIT <> S)
    then goto GQ_UNIT

ELSE goto RACETYP	
COVERAGE	REASON_S	REASON_S	     Specify type of refusal	IF RT2501.URRAL = R and (RT2501.FRAME <> 3
       or RT2501.GQTYPE = 901 or 902)  AND 
       (REPLACE = 1 or ( (INTNMBR = 1 or _NEWCU_ = 1)
        AND NEWUNIT <> S) then goto FM_SALES

ELSEIF ( (INTNMBR = 1 or _NEWCU_ = 1) and
        NEWUNIT <> S) then goto GQ_UNIT

ELSE goto RACETYP	
COVERAGE	TYPEB	TYPEB	         Enter TYPE B noninterview

1. Vacant (for rent)
2. Vacant (for sale)
3. Vacant (other)
4. Occupied by persons with URE
5. Under construction, not ready
6. All persons under 16
7. Unfit or to be demolished
8. Unoccupied tent or trailer site
9. Permit granted, construction not started
10. Other Type B -specify	1,2,4-7:  IF ( (INTNMBR = 1 or _NEWCU_ = 1) and 
                    NEWUNIT <> S) then goto GQ_UNIT
            ELSE goto BCONTACT.BYOBS

3:      Goto VACANT_S

8,9:    Goto BCONTACT.BYOBS

10:     Goto TYPEB_SP	
COVERAGE	TYPEB_SP	TYPEB_SP	  Specify other TYPE B	IF ((INTNMBR = 1 or _NEWCU_ = 1) and NEWUNIT <> S) 
        then goto GQ_UNIT

ELSE goto BCONTACT.BYOBS	
COVERAGE	VACANT_S	VACANT_S	  Specify type of vacant	IF ((INTNMBR = 1 or _NEWCU_ = 1) and NEWUNIT <> S) 
       then goto GQ_UNIT

ELSE goto BCONTACT.BYOBS	
COVERAGE	TYPEC	TYPEC	     Enter TYPE C noninterview             

1. Demolished
2. House or Mobile Home moved
3. Converted to permanent nonresidential use
4. Merged with units in the same structure
5. Condemned
6. Located on military base (post)
7. Unused serial # on listing sheet
8. (CU Moved/ )
9. (CU merged with another CE CU within same address/ )
10. Spawned in error
11. Unlocatable Sample Address
12. Unit does not exist or Unit is out of scope
13. Other type C - specify	1,2,4-6,8-9:  Goto BContact.BYOBS

3,7:   Goto END_COVERAGE

10:  IF any POUT1-3 = 201 or 203 then goto CK_SpawnInErr
     ELSEIF CTRLNUM[18] = 1 OR CTRLNUM[20-21] = 10 then
            goto CK_SpawnInErr
     ELSE goto END_COVERAGE

11:  IF (RT25.IMPADD = 0 or blank) then goto CK_TYPEC
     ELSE goto END_COVERAGE

12:  IF RT25.DESIGN = 00 then goto CK_TYPEC2
     ELSE goto END_COVERAGE

13:   Goto TYPEC_SP	
COVERAGE	TYPEC_SP	TYPEC_SP	   Specify other TYPE C	Goto BContact.BYOBS	
COVERAGE	FM_SALES	FM_SALES	During the past 12 months did sales of crops, livestock, and other farm products from
this place amount to $1,000 or more?               

1. Yes
2. No	Goto GQ_UNIT	
COVERAGE	GQ_UNIT	GQ_UNIT	   Indicate if the unit is:

1. In a Group Quarters
2. NOT in a Group Quarters	1:  Goto HUTYPE

2,DK:   IF FRAME <> 3 then goto DIRACC
        ELSE goto HUTYPE	
COVERAGE	DIRACC	DIRACC	           Indicate if access to the household is:

1. Direct
2. Through another unit	1:   Goto HUTYPE

2,DK:   Goto MERGUA	
COVERAGE	MERGUA	MERGUA	? [F1]
  
Is this a merged unit?             

1. Merged
2. Not Merged	1,DK:  Goto HUTYPE

2:  Goto CK_MERGUA	
COVERAGE	HUTYPE	HUTYPE	       Enter type of Housing Unit.

1. House, apartment, flat
2. HU in non-transient hotel, motel, etc
3. HU permanent in transient hotel, motel, etc.
4. HU in rooming house
5. Mobile home or trailer with no permanent room added
6. Mobile home or trailer with one or more permanent rooms added
7. HU not specified above
8. Quarters not HU in rooming or boarding house
9. Students quarters in college dormitory
10. Group Quarters unit not specified above	1-6,8,9,DK:  Goto UNISTRQ

7,10: IF TYPEB <> 8 then goto HUTYPESP
      ELSE goto UNISTRQ	
COVERAGE	HUTYPESP	HUTYPESP	  Enter other type of housing unit	Goto UNISTRQ	
COVERAGE	UNISTRQ	UNISTRQ	                Ask if not apparent

How many housing units, both occupied and vacant, are there in this structure?    

1. Only Group Quarters units
2. Mobile home or trailer
3. One, detached
4. One, attached
5. 2
6. 3 - 4
7. 5 - 9
8. 10 - 19
9. 20 - 49
10. 50 or more	IF NONTYPE = 2 (type b) then goto BYOBS
ELSEIF NONTYP = 1 then goto RACETYP
ELSE goto END_COVERAGE	
COVERAGE	RACETYP	RACETYP	  The items below are required information for all TYPE A cases.

Race code

1. White
2. Black or African American
3. American Indian or Alaska native
4. Asian
5. Native Hawaiian
6. Guamanian or Chamorro
7. Samoan
8. Other Pacific Islander
9. Other 	Goto HH_MEMQ	
COVERAGE	HH_MEMQ	HH_MEMQ	 The items below are required information for all TYPE A cases.

Number of household members:	Goto TENURE	
COVERAGE	TENURE	TENURE	  The items below are required information for all TYPE A cases.

Tenure code

1. Owned
2. Rented	1,2:  Goto HHQSRCE

DK:   Goto BUILD_A	
COVERAGE	BUILD_A	BUILD_A	Which best describes this building?

1. Single family detached
2. Townhouse - inner unit
3. End row or end townhouse
4. Duplex
5. 3-plex or 4-plex
6. Garden
7. High-rise
8. Apartment or flat
9. Mobile home or trailer
10. College dormitory	Goto HHQSRCE	
COVERAGE	HHQSRCE	HHQSRCE	         What was the source of the information for the household
           characteristics?

    Enter all that apply, separate with commas

1. Observation
2. Neighbor
3. Building Manager
4. Other (Specify)	1-3:  IF TYPEA = 3 then goto REF_SEX
      ELSE goto END_COVERAGE

4:  Goto HHQ_SP	
COVERAGE	HHQ_SPECIFY	HHQ_SPECIFY	  Specify other source of information	IF TYPEA = 3 then goto REF_SEX
ELSE goto END_COVERAGE	
COVERAGE	REF_SEX	REF_SEX	  Provide the characteristics of the individual who refused to participate.

Sex of  individual      

1. Male
2. Female	Goto REF_RACE	
COVERAGE	REF_RACE	REF_RACE	  Provide the characteristics of the individual who
    refused to participate.

Race of individual     

1. White
2. Black or African American
3. American Indian or Alaska native
4. Asian
5. Native Hawaiian
6. Guamanian or Chamorro
7. Samoan
8. Other Pacific Islander
9. Other 	Goto REF_AGED	
COVERAGE	REF_AGED	REF_AGED	  Provide the characteristics of the individual who
    refused to participate.

Approximate age of individual            

1. Under 20
2. 21 - 50
3. 51 - 74
4. 75 or older	Goto END_COVERAGE	
COVERAGE		END_COVERAGE		IF (TYPEC = 3, 7, 10-12) then 
   goto BBACK.BlkAppt.DONE

ELSEIF (NONTYP = 1 or 2) OR (TYPEC = 1, 2 4-6, 8 or 11)
       then goto BBACK.BlkAppt.THANK2

All others goto START_DEMOS	
COVERAGE		HSG_UNIT			
COVERAGE		RACETYP1	** CREATED IN POST PROCESSING **		
COVERAGE		HH_MEMQ1	** CREATED IN POST PROCESSING **		
COVERAGE		TENURE1	** CREATED IN POST PROCESSING **		
COVERAGE		RACETYP2	** CREATED IN POST PROCESSING **		
COVERAGE		HH_MEMQ2	** CREATED IN POST PROCESSING **		
COVERAGE		TENURE2	** CREATED IN POST PROCESSING **		
COVERAGE		RACETYP3	** CREATED IN POST PROCESSING **		
COVERAGE		HH_MEMQ3	** CREATED IN POST PROCESSING **		
COVERAGE		TENURE3	** CREATED IN POST PROCESSING **		
COVERAGE		RACETYP4	** CREATED IN POST PROCESSING **		
COVERAGE		HH_MEMQ4	** CREATED IN POST PROCESSING **		
COVERAGE		TENURE4	** CREATED IN POST PROCESSING **		
COVERAGE	BYOBS	BYOBS	  Did you classify this unit by observation only?
   
     PREVIOUS OBSERVATION:  (YES/NO)

1. Yes
2. No	1:    Exit block and goto END_COVERAGE

2:    Goto CP1NAME	
COVERAGE	CP1NAME	CP1NAME	        Enter contact person name

        Press enter if no change is needed

PREVIOUS NAME:   (Previous Contact Persons Name)	Goto CP1TITL	
COVERAGE	CP1TITL	CP1TITL	       Enter  contact person title

         Press enter if no change is needed

PREVIOUS TITLE:  (Title)	Goto PHON	
COVERAGE	CP1PHONE	PHON	     Enter contact person phone number and extension     

      Press enter if no change is needed 

     PREVIOUS  PHONE NUMBER: (Previous phone) 

     PREVIOUS EXTENSION: (Previous extension)	IF entry is less than 10 digits then goto CK_CP1PHONE
ELSE goto CP1ADD1	
COVERAGE	CP1ADD1	CP1ADD1	     Enter contact person street address

       Press enter if no change is needed

PREVIOUS ADDRESS:  (Previous address)
                                        (previous address - 2nd line)
                                        (Previous city)    (previous state)   (previous zipcode)  - (previous zipcode extension)	Goto CP1ADD2	
COVERAGE	CP1ADD2	CP1ADD2	     Enter contact person second line of address, if necessary

       Press enter if no change is needed

  PREVIOUS ADDRESS:  (Previous address)
                                           (previous address - 2nd line)
                                        (Previous city)    (previous state)  (previous zipcode)  - (previous zipcode extension)	Goto CP1PO	
COVERAGE	CP1PO	CP1PO	    Enter town or city

       Press enter if no change is needed

  PREVIOUS ADDRESS:  (Previous address)
                                           (previous address - 2nd line)
                                           (Previous city)    (previous state)   (previous zipcode) - (previous zipcode extension)	Goto CP1ST	
COVERAGE	CP1ST	CP1ST	? [F1] 

   Enter state

      Press enter if no change is needed

  PREVIOUS ADDRESS:  (Previous address)
                                           (previous address - 2nd line)
                                           (Previous city)    (previous state)   (previous zipcode) - (previous zipcode extension)	IF entry is not a valid 2-digit state code then goto CK_CP1ST

ELSE goto CP1ZIP9	
COVERAGE	CP1ZIP9	CP1ZIP9	    Enter zipcode     

Press enter if no change is needed     

PREVIOUS ADDRESS:  (Previous address)
                                         (previous address - 2nd line)
                                         (Previous city)    (previous state)   (previous zipcode) - (previous zipcode extension)	IF entry is less than 5 digits then goto CK_CP1ZIP9
ELSEIF CP1ZIP9[6:4] is less than 4 digits then 
       goto CK2_CP1ZIP9
ELSE exit block and goto END_COVERAGE	
DEMOGRAPHICS	STLLIV	STLLIV	I have listed . . . . READ NAMES
(All of these/this) (person/people) still living or staying here?

(This case is part of a Multi-CU address.  There are (number) households for this address/  )

(Lis tof persons in the household)

1. Yes
2. No	Goto TUNIT1 Block - PERSTAT	
DEMOGRAPHICS	PERSTAT	PERSTAT	     (Use up/down arrows to move to the correct row for membership change.  When done, REVIEW/Update demographics. Press END key./Use left/right arrows to   

7. Delete person
8. CU member deceased
9. Reinstate person
99. Error - Person should not have been listed		
DEMOGRAPHICS	FNAME	FNAME	(What is the name of the next person living or staying here?/What are the names of all persons living or staying here?) 

          Enter 999 if no more persons.	16 characters:   Goto LNAME

99:  Goto CK_FNAME99

999:       IF ROW = 1 then goto ERR_FNAME
           ELSEIF MEMBNO < Nrosize + 1 then goto CK_FNAME
           ELSE exit block and goto CHECKS	
DEMOGRAPHICS	LNAME	LNAME	  Enter Last Name	Goto CU_CODE	
DEMOGRAPHICS	CU_CODE	CU_CODE	           Ask if not apparent

What is (your/NAME's) relationship to (you/the owner/renter/name of reference person)?

           If this is the Reference Person, enter 1
            (The Reference person is one of the persons who owns or rents this home.)

1. Reference person
2. Spouse (Husband/Wife)
3. Child or adopted child
4. Grandchild
5. In-Law
6. Brother or Sister
7. Mother or Father
8. Other related person (Aunt, Uncle, etc.)
9. Unrelated Person (Lodger, Lodger's spouse, foster child, etc)
10. Unmarried Partner	IF more than 1 reference person (CU_CODE = 1) has been 
   selected (refpercnt > 1) then goto CK_CHECKS2

ELSEIF 2 or 10 entered and there is another household member with cu_code = 2 or 10 then goto Ck_Spouse

ELSEIF Prev_CUCODE = 1 AND CU_CODE = 2-10,DK or RF then
       goto CK_NewRefper

ELSE goto SEX	
DEMOGRAPHICS	SEX	SEX	         Ask if not apparent

Is (Name) male or female?

1. Male
2. Female	1,2:  IF cu_code = 2 and SEX = sex[refper] then goto CK_SEX1
      ELSE goto AWAY_COL

DK,RF:  Goto AWAY_COL	
DEMOGRAPHICS	AWAY_COL	AWAY_COL	      Ask if not apparent                     

Is (Name) living away at college?

1. Yes
2. No	1:     IF CU_CODE = 1 then goto CK_AWAYCOL
       ELSE goto HH_MEM

2,DK,RF,EMPTY:     Goto HH_MEM	
DEMOGRAPHICS	HH_MEM	HH_MEM	Does (Name) usually live here?

                Probe if usual place of residence is elsewhere.               

1. Yes
2. No	1,DK,RF,EMPTY:    Goto Set_Flags

2:     IF CU_CODE = 1 then goto CK_HHMEM
       ELSE goto Set_Flags	
		Set_Flags		Go to next row in the table	
DEMOGRAPHICS		Prev_CUCODE	** Not Displayed **

1. Reference person
2. Spouse (Husband/Wife)
3. Child or adopted child
4. Grandchild
5. In-Law
6. Brother or Sister
7. Mother or Father
8. Other related person (Aunt, Uncle, etc.)
9. Unrelated Person (Lodger, Lodger's spouse, foster child, etc)
10. Unmarried Partner		
DEMOGRAPHICS		MEMBNO			
DEMOGRAPHICS		CHECKS	**  Non Displayed **	IF RefPerCnt = EMPT then goto CK_CHECKS1
IF any CU_CODE = EMPTY then goto CK_CUCODE
IF any SEX = EMPTY then goto CK_SEX
IF any AWAY_COL = EMPTY then goto CK_AWAYCOL
IF any HH_MEM = EMPTY then goto CK_HHMEM

IF No person on the roster has FlgElib = Yes then goto ANY_HHMEM 

ELSE goto HHRESP	
Control Card	ANY_HHMEM	ANY_HHMEM	  There are NO household members for this case.
    Does anyone use this as their usual residence?

     If no one uses this as their usual residence, press HOME to return to the START
     screen and make this a noninterview - Type B.

1. Yes, this is the usual residence for at least one person	1:  Got back to TUNIT1	
DEMOGRAPHICS	HHRESP	HHRESP	    Ask if necessary

With whom am I speaking? 

         Enter line number

1. NameOnly[1]
2. NameOnly[2]
3. NameOnly[3]
4. NameOnly[4]
5. NameOnly[5]
6. NameOnly[6]
7. NameOnly[7]
8. NameOnly[8]
9. NameOnly[9]
10. NameOnly[10]
11. NameOnly[11]
12. NameOnly[12]
13. NameOnly[13]
14. NameOnly[14]
15. NameOnly[15]
16. NameOnly[16]
17. NameOnly[17]
18. NameOnly[18]
19. NameOnly[19]
20. NameOnly[20]
21. NameOnly[21]
22. NameOnly[22]
23. NameOnly[23]
24. NameOnly[24]
25. NameOnly[25]
26. NameOnly[26]
27. NameOnly[27]
28. NameOnly[28]
29. NameOnly[29]
30. NameOnly[30]
95. Proxy Respondent	IF HHRESP gt NROSIZE then goto CK_HHRESP

ELSEIF (MEMBSTAT[HHRESP] = 1 and PERSTAT[HHRESP] ne 9) OR 
       (MEMBSTAT[HHRESP] = 5) OR (PERSTAT[HHRESP] = 7, 8 or 
       99) OR (HH_MEM[HHRESP] = 2 or blank) then
       goto CK_HHRESP2

ELSEIF ((INTNMBR = 1 or NEWCU = 1) and NEWUNIT ne S) OR 
       REPLACE = 1 AND NROSIZE less than 30 then goto MLIVE

ELSEIF ((INTNMBR = 1 or NEWCU = 1) and NEWUNIT ne S) OR 
       REPLACE = 1 AND NROSIZE eq 30 then exit block and goto
       BSUBFAMILY, BSFMAKEUP or TUNIT2 as appropriate 

ELSE goto NEWLIV	
DEMOGRAPHICS	MLIVE	MLIVE	So I have listed (Number of people in the household) (person/people) living or staying here now.

     (Lis tof persons in the household)

Is there anyone else living or staying here now - any babies, small children, non-relatives or anyone else?

       Please verify that the information on this screen is correct.

1. Yes
2. No	1:     Go back to where FNAME = 999

2,DK,RF:     Exit block and goto BSUBFAMILY, BSFMAKEUP or 
             TUNIT2 as appropriate	
DEMOGRAPHICS	NEWLIV	NEWLIV	 Is anyone else living or staying here, including newborn babies?

(Lis tof persons in the household)

1. Yes, add new person
2. No	1:     Go back to where FNAME = 999

2:     Exit block and goto BSUBFAMILY, BSFMAKEUP or 
       TUNIT2 as appropriate	
DEMOGRAPHICS	SUBFAM1	SUBFAM1	Earlier you said that (Name) was
not related to (Name of reference person).
 Is (Name) related to anyone else in this household?       

1. Yes
2. No	1:    Goto SUBFAM2

2:   IF no more non-rels then goto SET_SUBFAMS
     ELSE goto SUBFAM1 for next unassigned non-rel	
DEMOGRAPHICS	SUBFAM2	SUBFAM2	Who is (Name) related to?

           PROBE: Anyone else?

           Enter line number(s), separate with commas

1. ^NAME[1]
2. ^NAME[2]
3. ^NAME[3]
4. ^NAME[4]
5. ^NAME[5]
6. ^NAME[6]
7. ^NAME[7]
8. ^NAME[8]
9. ^NAME[9]
10. ^NAME[10]
11. ^NAME[11]
12. ^NAME[12]
13. ^NAME[13]
14. ^NAME[14]
15. ^NAME[15]
16. ^NAME[16]
17. ^NAME[17]
18. ^NAME[18]
19. ^NAME[19]
20. ^NAME[20]
21. ^NAME[21]
22. ^NAME[22]
23. ^NAME[23]
24. ^NAME[24]
25. ^NAME[25]
26. ^NAME[26]
27. ^NAME[27]
28. ^NAME[28]
29. ^NAME[29]
30. ^NAME[30]	IF SUBFAM2 gt NROSIZE then goto CK_SUBFAM2

ELSEIF no more non-rels then goto SET_SUBFAMS

ELSE goto SUBFAM, for next unassigned non-rel	
DEMOGRAPHICS		SET_SUBFAMS		Goto BFSMAKEUP Block - SHELTX	
DEMOGRAPHICS	SHELTX	SHELTX	(Begin financial responsibility questions to determine CU's/  )

(Do/Does) (READ NAMES) pay for all (his/her/their) housing  
expenses with (his/her/their) own money?          
                      
(subfamily names)

1. Yes
2. No	Goto FOODX	
DEMOGRAPHICS	FOODX	FOODX	(Do/Does) (READ NAMES) pay for all (his/her/their) food          
expenses with (his/her/their) own money?           
                       
(subfamily names)

1. Yes
2. No	1:   IF SHELTX = 1 and there are no more subfams then goto 
         UPDATE_SUBFAM
     ELSEIF SHELTX = 1 then goto SHELTX for next subfam
     ELSE goto OTHERX

2,DK,RF:   Goto OTHERX	
DEMOGRAPHICS	OTHERX	OTHERX	(Do/Does) (READ NAMES) pay for all (his/her/their) other      
living expenses such as clothing, transportation,          
etc., with (his/her/their) own money? 

(subfamily names)

1. Yes
2. No	1:   IF SHELTX = 1 OR FOODX = 1 AND there are no more 
        subfamiles then goto UPDATE_SUBFAM
     ELSEIF SHELTX = 1 OR FOODX = 1 then goto SHELTX for next
         subfamily
     ELSE goto SUPSRC

2,DK,RF:     Goto SUPSRC	
DEMOGRAPHICS	SUPSRC	SUPSRC	Does all or part of the money to pay for 
(READ NAMES) (housing/food/other living expenses...) come from someone 
in this household?

(subfamily names)

1. Yes
2. No	1:       Goto SUPRT1

2,DK,RF:  IF no more subfamilies then goto UPDATE_SUBFAM
          ELSE goto SHELTX for next subfamily	
DEMOGRAPHICS	SUPRT1	SUPRT1	Who is that person(s)?

    Enter line number(s), separate with commas

1. ^NAME[1]
2. ^NAME[2]
3. ^NAME[3]
4. ^NAME[4]
5. ^NAME[5]
6. ^NAME[6]
7. ^NAME[7]
8. ^NAME[8]
9. ^NAME[9]
10. ^NAME[10]
11. ^NAME[11]
12. ^NAME[12]
13. ^NAME[13]
14. ^NAME[14]
15. ^NAME[15]
16. ^NAME[16]
17. ^NAME[17]
18. ^NAME[18]
19. ^NAME[19]
20. ^NAME[20]
21. ^NAME[21]
22. ^NAME[22]
23. ^NAME[23]
24. ^NAME[24]
25. ^NAME[25]
26. ^NAME[26]
27. ^NAME[27]
28. ^NAME[28]
29. ^NAME[29]
30. ^NAME[30]	IF SUPRT1 gt NROSIZE then goto CK_SUPRT1

ELSEIF no more subfamilies then goto UPDATE_SUBFAM 

ELSE goto SHELTX for next subfamily	
DEMOGRAPHICS		UPDATE_SUBFAM		IF more than 1 CU then exit block and goto CONSUMER_UNITS
ELSE goto CU_INTRO	
DEMOGRAPHICS		SHELTX	(Do/Does) (READ NAMES) pay for all (his/her/their) housing  expenses with (his/her/their) own money?          

1. Yes
2. No		
DEMOGRAPHICS		FOODX	(Do/Does) (READ NAMES) pay for all (his/her/their) food  expenses with (his/her/their) own money?    

1. Yes
2. No		
DEMOGRAPHICS		OTHERX	(Do/Does) (READ NAMES) pay for all (his/her/their) other living expenses such as clothing, transportation, etc., with (his/her/their) own money? 

1. Yes
2. No		
DEMOGRAPHICS		SUPSRC	Does all or part of the money to pay for (READ NAMES) (housing/food/other living expenses...) come from someone 
in this household?

1. Yes
2. No		
DEMOGRAPHICS		SUPRT1	Who is that person(s)?

    Enter line number(s), separate with commas

1. ^NAME[1]
2. ^NAME[2]
3. ^NAME[3]
4. ^NAME[4]
5. ^NAME[5]
6. ^NAME[6]
7. ^NAME[7]
8. ^NAME[8]
9. ^NAME[9]
10. ^NAME[10]
11. ^NAME[11]
12. ^NAME[12]
13. ^NAME[13]
14. ^NAME[14]
15. ^NAME[15]
16. ^NAME[16]
17. ^NAME[17]
18. ^NAME[18]
19. ^NAME[19]
20. ^NAME[20]
21. ^NAME[21]
22. ^NAME[22]
23. ^NAME[23]
24. ^NAME[24]
25. ^NAME[25]
26. ^NAME[26]
27. ^NAME[27]
28. ^NAME[28]
29. ^NAME[29]
30. ^NAME[30]		
DEMOGRAPHICS	CONSUMER_UNITS	CONSUMER_UNITS	  HOUSEHOLD MEMBERS BROKEN INTO APPROPRIATE CU'S

     (List CU#, Line number, and name)

1. Enter 1 to Continue	Goto CU_INTRO	
DEMOGRAPHICS	CU_INTRO	CU_INTRO	During this interview, I will use the word household to refer to the group of related persons who are independent of all other persons living at this address for payment of their major expenses. 

 A "household" is considered one Consumer Unit
                             
The (person/ persons) I'm including  in your  household  (are/is) (READ NAME(S))         
                             
(Names of Cu members)

1. Enter 1 to Continue	Goto TUNIT2 block	
DEMOGRAPHICS		NAME	** SHOW ONLY **		
DEMOGRAPHICS		CU_CODE	** SHOW ONLY **

1. Reference person
2. Spouse (Husband/Wife)
3. Child or adopted child
4. Grandchild
5. In-Law
6. Brother or Sister
7. Mother or Father
8. Other related person (Aunt, Uncle, etc.)
9. Unrelated Person (Lodger, Lodger's spouse, foster child, etc)
10. Unmarried Partner		
DEMOGRAPHICS		SEX	 ** SHOW ONLY **

1. Male
2. Female		
DEMOGRAPHICS	AGE	AGE1	As of today, how old (are/is) (you/NAME)?	DK,RF:    Goto AGE2

0-109:   IF CU_CODE = 1 AND AGE lt 16 then goto CK_AGE
         ELSEIF CU_CODE = 1 AND (AGE = 16 or 17 ) AND 
           (there is at least 1 household member with AGE
            greater than 17) then goto CK_AgeRefPer
         ELSEIF RESPLINE = MEMBNO AND AGE lt 16 then
                goto CK_AGE
         ELSEIF AGE = 13 then goto AGESPEC
         ELSE goto HORIGIN

110-200:    Goto CK_AGE1	
DEMOGRAPHICS	AGESPEC	AGESPEC	Some questions are only asked for household members of a certain age.

In what month and year will (you/NAME) be 14 years old?

      Enter month and year when household member will turn 14	IF before current month and year then goto VERIFY_AGE

ELSEIF AGESPEC[3:6] after current year + 1 then 
       goto CK_AGESPEC

ELSE goto HORIGIN	
DEMOGRAPHICS	AGE2	AGE2	          Ask if necessary

(Are/Is) (you/he/she) under 16?      

1. Yes
2. No	1:       IF RESPLINE = MEMBNO then goto CK_AGE2
         ELSEIF CU_CODE = 1 then goto CK_AGE2
         ELSE goto HORIGIN

2,DK,RF:    Goto HORIGIN	
DEMOGRAPHICS	HORIGIN	HORIGIN	 5

(Are/Is) (you/NAME) Hispanic, Latino, or Spanish?

1. Yes
2. No	1:        Goto HISPANIC

2,DK,RF:   Goto MULTRACE	
DEMOGRAPHICS	HISPANIC	HISPANIC	 5

(Are/Is) (you/NAME) -

  Examples of "other" include - Argentinean, Colombian, Dominican, Nicaraguan, Salvadoran, Spaniard

1. Mexican?
2. Mexican-American?
3. Chicano?
4. Puerto Rican?
5. Cuban?
6. Other (Specify)	1-5,DK,RF:    Goto MULTRACE

6:         Goto HISPOTH	
DEMOGRAPHICS	HISPOTH	HISPOTH	  Specify:	Goto MULTRACE	
DEMOGRAPHICS	MULTRACE	MULTRACE	 5

What is (your/NAME's) race?

               Probe if necessary

            Enter all that apply, separate with commas

            Examples of "Other Pacific Islander" include - Fijian, Tongan

1. White
2. Black or African American
3. American Indian or Alaska native
4. Asian
5. Native Hawaiian
6. Guamanian or Chamorro
7. Samoan
8. Other Pacific Islander
9. Other Specify
10. Don't Know	1-3,5,8,10,RF:    IF AGE ge 14 OR AGERNG = 8 or 9 then
                     goto MARITAL
                  ELSE goto Next Person

4:      Goto ASIAN

9:      Goto RACESP	
DEMOGRAPHICS	ASIAN	ASIAN	 5

(Are/Is) (you/NAME) -

 Examples of "other" include - Hmong, Laotian, Thai, Pakistani, Cambodian

1. Chinese?
2. Filipino?
3. Japanese?
4. Korean?
5. Vietnamese?
6. Asian Indian?
7. Other (Specify)	1-6,DK,RF:    IF AGE ge 14 OR (AGERNG = 8 or 9) then 
                 goto MARITAL
              ELSE goto Next Person

7:           Goto ASIANOTH	
DEMOGRAPHICS	ASIANOTH	ASIANOTH	  Specify:	IF AGE ge 14 OR (AGERNG = 8 or 9) then goto MARITAL
ELSE goto Next Person	
DEMOGRAPHICS	RACESP	RACESP	  Specify other race	IF AGE ge 14 OR (AGERNG = 8 or 9) then goto MARITAL
ELSE goto Next Person	
DEMOGRAPHICS	MARITAL	MARITAL	            Ask if not apparent   

(Are/Is) (you/NAME) - 

1. Married?
2. Widowed?
3. Divorced?
4. Separated?
5. Never married?	Goto EDUCA	
DEMOGRAPHICS	EDUCA	EDUCA	 6

What is the highest level of school (you have/ (Name) has) completed or the highest degree (you have/ (Name) has) received?

1. No schooling completed, or less than 1 year
2. Nursery, kindergarten, and elementary (grades 1-8)
3. High school (grades 9-12, no degree)
4. High school graduate - high school diploma or the equivalent (GED)
5. Some college but no degree
6. Associate's degree in college
7. Bachelor's degree (BA, AB, BS, etc.)
8. Master's, professional, or doctorate degree (MA, MS, MBA, MD, JD, PhD, etc.)	1-3,DK,RF:  IF AGE = 17-65 or (AGERNG = 8 or 9) then goto ARM_FORC
            ELSEIF AGE >= 66 goto VETERAN
            ELSE goto next member

4-8:   Goto IN_COLL	
DEMOGRAPHICS	IN_COLL	IN_COLL	(Are/Is) (you/NAME) currently enrolled in a college or university either -            

1. Full-time?
2. Part-time?
3. Not at all?	IF AGE = 17-65 or (AGERNG = 8 or 9) then goto ARM_FORC

ELSE IF AGE >= 66 goto VETERAN

ELSE goto the next person	
DEMOGRAPHICS	ARM_FORC	ARM_FORC	 6    ? [F1]

(Are/Is) (you/NAME) currently serving on Active Duty in the U.S. Armed Forces?       

1. Yes
2. No	1:  IF this is the last person then goto CHECKS2
    ELSE goto the next person

2,DK,RF:  Goto VETERAN	
Demographics	VETERAN	VETERAN	? [F1]

Did (you/NAME) ever serve on Active Duty in the U.S. Armed Forces?

1. Yes
2. No	IF this is the last person then goto CHECKS2

ELSE goto the next person	
DEMOGRAPHICS		CHECK2	**  Non Displayed  **		
DEMOGRAPHICS		MEMBNO			
DEMOGRAPHICS		HH_CODE			
DEMOGRAPHICS		AGE			
DEMOGRAPHICS		AGERNG			
DEMOGRAPHICS		MEMBSTAT	

1. Delete person
2. Reinstate person
3. Deceased
5. Skip persons		
DEMOGRAPHICS		PERCUNUM			
DEMOGRAPHICS		RC_WHITE			
DEMOGRAPHICS		RC_BLACK			
DEMOGRAPHICS		RC_NATAM			
DEMOGRAPHICS		RC_ASIAN			
DEMOGRAPHICS		RC_HAWAI			
DEMOGRAPHICS		RC_GUAM			
DEMOGRAPHICS		RC_SAMOA			
DEMOGRAPHICS		RC_PACIL			
DEMOGRAPHICS		RC_OTHER			
DEMOGRAPHICS		RC_DK			
DEMOGRAPHICS		RECSTATM			
DEMOGRAPHICS		PERSTAT	

7. Delete person
8. CU member deceased
9. Reinstate person
99. Error - Person should not have been listed		
DEMOGRAPHICS		FNAME			
DEMOGRAPHICS		LNAME			
DEMOGRAPHICS		AWAY_COL	

1. Yes
2. No		
DEMOGRAPHICS		HH_MEM	

1. Yes
2. No		
Copied from Section 20B		TRANAMTX			
Copied from Section 20B		TRANPD	

1. Day
2. Week
3. Month		
Copied fromSection 20B		TRANDAYX			
Copied from Section 20B		AMTRAK	

1. Yes
2. No		
Copied from Section 20B		AMTRAKX			
Copied from Section 20B		TRANSUB	

1. Yes
2. No		
Copied from Section 20B		TRANSUBX			
Copied from Section 20B		TRAN_MTX	**OUT VARIABLE**		
Copied from Section 20B		TRAN_UBX	** OUT VARIABLE **		
Copied from 20A		SCHLMLX			
Copied from 20A		SCHLMLPD	

1. Day
2. Week
3. Two Weeks
4. Month
5. Quarterly (every 3 months)
6. Other		
20A		SCHLMLRX	How much was paid since the first of (reference month), not including this month?
 		
Copied from 20A		SCHMLWKQ			
Copied from 20A		SCHL_LPD			
20A		SCHL_LRX	
 		
DEMOGRAPHICS	CE_INTRO	CE_INTRO	As we start, please understand that we ask the same topics of everybody we talk to.  I realize some of these questions may not apply to your household.
     
Most questions that I will be asking refer to a specific time period.

During this interview, the time period, unless I state otherwise is for the 
past three months, that is, from the 1st day of (reference month) to today.

Most of my questions are about expenses your household had or bills you've received.  You will find it helpful to have your checkbook register, credit card statements and other records as you answer the questions.

1. Enter 1 to Continue	IF RT10.CARISAMPLE = 1 then goto bCase_Consent.CARICON_HH 

ELSE goto bCeintro.BUSCREEN	
	BUSCREEN	BUSCREEN	Since the first of (reference month), have (you/you or any members of your household) had any expenses that will be reimbursed or deducted as business expenses?

1. Yes
2. No	1,DK,RF:  Goto BUSXPNSE

2:  Exit block and goto BSECT01	
	BUSXPNSE	BUSXPNSE	For certain topics, such as housing, utilities, or vehicles, I will ask you to estimate how much of the expense was or will be deducted as a business expense.

1. Enter 1 to Continue	Exit block and goto BSECT01	
01B	ST_HOUS	ST_HOUS	       Ask if not apparent.

Are these living quarters presently used as student housing by a 
college or university?

1. Yes
2. No	IF COVERAGE.UNISTRQ = 2 or 3 OR (8500.UNISTRQ = 2 or 3) 
   then goto ROOMSQ

ELSE goto BUILDING	
01B	BUILDING	BUILDING	  7    ? [F1]

        Ask if not apparent by observation

Which best describes this building?  

1. Single family detached
2. Row or townhouse - inner unit
3. End row or end townhouse
4. Duplex
5. 3-plex or 4-plex
6. Garden
7. High-rise
8. Apartment or flat
9. Mobile home or trailer
10. College dormitory
11. Other - Specify	1-9,DK,RF:   Goto ROOMSQ

10:   IF ST_HOUS = 2, DK or RF then goto CK_BUILDING
      ELSE goto S1B_END

11:        Goto BUILDOTH	
01B	BUILDOTH	BUILDOTH	    Specify:	Goto ROOMSQ	
01B	ROOMSQ	ROOMSQ	How many ROOMS are there in this unit, including all finished
living areas and excluding all bathrooms?	1-30,DK,RF:  Goto BEDROOMQ

31-99:       Goto ERR1_ROOMSQ	
01B	BEDROOMQ	BEDROOMQ	How many BEDROOMS are there in this unit?

      Count all rooms used mainly for sleeping, even if also used for other purposes.	0-99:   IF (BEDROOMQ gt ROOMSQ) AND (ROOMSQ ne DK and 
            ROOMSQ ne RF) then goto CK_BEDROOMQ
        ELSEIF BEDROOMQ gt 12 then goto ERR1_BEDROOMQ
        ELSE goto BATHRMQ

DK,RF:   Goto BATHRMQ	
01B	BATHRMQ	BATHRMQ	How many COMPLETE bathrooms are there in this unit?

       A complete bathroom has a toilet, a bathtub or shower, and a sink,
        all with running water.	0-9:   IF (BATHRMQ > ROOMSQ) AND (ROOMSQ <> DK and <> RF) 
            then goto CK_BATHRMS
       ELSE goto HLFBATHQ

DK,RF:   Goto HLFBATHQ	
01B	HLFBATHQ	HLFBATHQ	How many HALF bathrooms are there in this unit?
  
         A half bathroom has at least a toilet or bathtub or shower, but
         does not have all the facilities of a complete bathroom.	0-9:  IF HLFBATHQ > ROOMSQ AND ROOMSQ = RESPONSE then goto CK_HLFBATHQ
      ELSE goto S1B_END

DK,RF:  Goto S1B_END	
01B		S1B_END		Goto Section 2 - BSECT02	
01B		ROOMSQ_			
01B		BEDR_OMQ			
01B		FGN_ORIG			
02		S2_CHK		IF BSECT01.ST_HOUS (from Section 1B) = 1 OR HUTYPE = 9 (from Coverage) OR (8500.ST_HOUS = 1) OR (HUTYPE = 9) then goto MORERENT.

IF INTNMBR = 2-4 and there is a record with 8500.OWNYB = 100 
   and 8500.OPB_STAT = 1 then goto S3_INTRO.

IF INTNMBR = 2-4 and (there is no 8500.OWNYB = 100
   with 8500.OPB_STAT = 1) and 8500.SectComp23 = 1 AND
   (8500.ST_HOUS is not 1) then goto STLRENT.

All others goto OWNED.	
02	STLRENT	STLRENT	Last time (you/your household) reported renting these living quarters.  
Do you still rent?      

1. Yes
2. No
3. No -Buying the sample unit	1,DK,RF:  Goto RENTED

2:        Goto BRENT02.RTASPAY

3:        IF I_UNITFEAT1 = EMPTY then goto UNITFEAT
          ELSEIF I_YRBUILT = EMPTY then goto YRBUILT
          ELSE exit block and goto Section 3	
02	OWNED	OWNED	Do you own this home?
  
           Include households with mortgages as owners.

1. Yes
2. No	1:        IF I_UNITFEAT1 = EMPTY then goto UNITFEAT
          ELSEIF I_YRBUILT = EMPTY then goto YRBUILT
          ELSE exit block and goto Section 3

2,DK,RF:   Goto PUBLHOUS	
02	UNITFEAT	UNITFEAT	 9    ? [F1]

Does this unit have any of the following?

         Enter all that apply, separate with commas

0. None
1. Swimming pool
2. Off-street parking
3. Porch, terrace, patio, or balcony
4. Apartment or guest house
5. Central air conditioning
6. Window air conditioning
7. Solar panels
77. Don't know	IF 0 is selected with other values then goto CK_UNITFEAT

ELSEIF I_YRBUILT = EMPTY then goto YRBUILT

ELSE exit block and goto Section 3	
02	YRBUILT	YRBUILT	About when was this building originally built?

      Do not consider later remodelings
        Probe for best estimate	1700-9999:  IF YRBUILT > current year then goto CK_YRBUILT
            ELSE goto Section 3

DK,RF:   Goto Section 3	
02	PUBLHOUS	PUBLHOUS	              Ask if not apparent.

Is this house in a public housing project, that is, is it owned by 
a local housing authority or other local public agency?

1. Yes
2. No	1:  IF I_INCLDRYR = EMPTY then goto INCLSTOV
    ELSE goto RENTED

2,DK,RF:  Goto GOVTCOST	
02	GOVTCOST	GOVTCOST	Are your housing costs lower because the Federal, State, or local 
government is paying part of the cost?    

1. Yes
2. No	IF I_INCLDRYR = EMPTY then goto INCLSTOV

ELSE goto RENTED	
02	INCLSTOV	INCLSTOV	 8    ? [F1]

Were any of the following appliances included in the home when you moved in . . .

    . . .  Cooking stove, range, or oven?

1. Yes
2. No	Goto INCLFRIG	
02	INCLFRIG	INCLFRIG	 8     ? [F1]

Were any of the following appliances included in the home when you moved in . . .

     . . . Refrigerator or home freezer?

1. Yes
2. No	Goto INCLBDSH	
02	INCLBDSH	INCLBDSH	 8     ? [F1]

Were any of the following appliances included in the home when you moved in . . .

     . . . Built-in dishwasher?

1. Yes
2. No	Goto INCLPDSH	
02	INCLPDSH	INCLPDSH	 8     ? [F1]

Were any of the following appliances included in the home when you moved in . . .

     . . . Portable dishwasher?

1. Yes
2. No	Goto INCLWSHR	
02	INCLWSHR	INCLWSHR	 8     ? [F1]

Were any of the following appliances included in the home when you moved in . . .

     . . . Clothes washer?

1. Yes
2. No	Goto INCLDRYR	
02	INCLDRYR	INCLDRYR	 8     ? [F1]

Were any of the following appliances included in the home when you moved in . . .

     . . . Clothes dryer?

1. Yes
2. No	Goto RENTED	
02	RENTED	RENTED	Do (you/you or any members of your household) (still/  ) pay rent for these living quarters?

1. Yes
2. No	1,DK,RF:    Goto BRent02.RENTX1

2:          Goto BRent02.RTASPAY	
02	MORERENT	MORERENT	Since the first of (reference month) have (you/you or any members of your household) rented any houses, apartments, or temporary living quarters NOT used entirely for business or vacation?  

               Do NOT include college or university regulated housing.

1. Yes
2. No	1:      Goto BRent02.RENTX1

2,DK,RF:  Goto S2_END	
	Description	RENTDESC	** SHOW ONLY **		
02	RENTX1	RENTX1	What was your total rental payment for (reference month) for this unit?  
Include any extra charges for garage or parking facilities, but do not
include direct payments by local, state or federal agencies.	1-9999999:  IF RENTX1 > 4999 then goto ERR1_RENTX1
            ELSE goto RENTX2

0,DK,RF:    Goto RENTX2	
02	RENTX2	RENTX2	What was the total rental payment for (month) for this unit?	1-9999999:   IF RENTX2 > 4999 then goto ERR1_RENTX2
             ELSEIF (RENTX1 <> 0, DK or RF) and 
               ((RENTX2 =< (0.6 x RENTX1)) or 
              (RENTX2 >= (1.4 x RENTX1))) then 
                 goto ERR2_RENTX2
             ELSE goto RENTX3

0,DK,RF:    Goto RENTX3	
02	RENTX3	RENTX3	What was the total rental payment for (last month) for this unit?	1-9999999:   IF RENTX3 > 4999 then goto ERR1_RENTX3
             ELSEIF (RENTX2 <> 0,DK or RF) and ((RENTX3 =< 
               (0.6 x RENTX2)) or (RENTX3 >= (1.4 x RENTX2))) 
               then goto ERR2_RENTX3              
              ELSE goto RTELECT

0,DK,RF:    Goto RTELECT	
02	RTELECT	RTELECT	  8

Does the rental payment include the cost of -
          
     . . . Electricity?  

1. Yes
2. No	Goto RTGAS	
02	RTGAS	RTGAS	  8

    Repeat if necessary

Does the rental payment include the cost of -

          . . . . Gas?     

1. Yes
2. No	Goto RTWATER	
02	RTWATER	RTWATER	  8

    Repeat if necessary
Does the rental payment include the cost of -

          . . . Piped in water?  

1. Yes
2. No	Goto RTHEAT	
02	RTHEAT	RTHEAT	  8

    Repeat if necessary
Does the rental payment include the cost of -

         . . . . Heating?     

1. Yes
2. No	Goto RTTRASH	
02	RTTRASH	RTTRASH	  8

    Repeat if necessary
Does the rental payment include the cost of - 

        . . . Trash or garbage collection?

1. Yes
2. No	Goto RTPARK	
02	RTPARK	RTPARK	  8

    Repeat if necessary
Does the rental payment include the cost of - 

      . . . Garage and parking facilities?     

1. Yes
2. No	Goto RTTELEPH	
02	RTTELEPH	RTTELEPH	  8

  Repeat if necessary
Does the rental payment include the cost of -

      . . . Telephone services?

1. Yes
2. No	Goto RTTVCABL	
02	RTTVCABL	RTTVCABL	  8

  Repeat if necessary   
Does the rental payment include the cost of -

   . . . Television services?

1. Yes
2. No	Goto RTINTRNT	
02	RTINTRNT	RTINTRNT	  8

        Repeat if necessary

Does the rental payment include the cost of -

   . . . Internet services?

1. Yes
2. No	Goto RTFUNSH	
02	RTFUNSH	RTFUNSH	  8

 Repeat if necessary 
Does the rental payment include the cost of -

   . . . Furniture?

1. Yes
2. No	Goto RTASPAY	
02	RTASPAY	RTASPAY	Did (you/you or any members of your household) receive any reduced or free rent for 
this unit as a form of pay since the first of (reference month)?

1. Yes
2. No	1:         Goto RTCOMPX

2,DK,RF:  IF BCeintro.BUSCREEN ne 2 then goto RTBSNS
          ELSEIF BCeintro.BUSCREEN = 2 AND (PSU = 06001,
            06013, 06037, 06041, 06059, 06065, 06071, 06081,
            06073, 06075, 06087, 06097, 11001, 24021, 24043,
            34003, 34013, 34017, 34023, 34027, 34031, 34037,
            36005, 36047, 36059, 36061, 36081, 36085, 36087,
            36103, 36119) then goto RENTCONT

           ELSE goto MORERNT	
02	RTCOMPX	RTCOMPX	What is the current monthly rental charge to another tenant for a similar unit?	0-999999:  IF RTCOMPX < 100 or RTCOMPX > 1550 then 
              goto ERR1_RTCOMPX
           ELSE goto REGRNTX

DK,RF:   Goto REGRNTX	
02	REGRNTX	REGRNTX	What is your regular rental payment?	IF REGRNTX > 1463 then goto ERR1_REGRNTX

ELSEIF BCeintro.BUSCREEN <> 2 then goto RTBSNS

ELSEIF BCeintro.BUSCREEN = 2 AND (PSU = 06001,
       06013, 06037, 06041, 06059, 06065, 06071, 06081,
       06073, 06075, 06087, 06097, 11001, 24021, 24043,
       34003, 34013, 34017, 34023, 34027, 34031, 34037,
       36005, 36047, 36059, 36061, 36081, 36085, 36087,
       36103, 36119) then goto RENTCONT

ELSE goto MORERNT	
02	RTBSNS	RTBSNS	Is any portion of this unit used for your own business?

1. Yes
2. No	1:   Goto RTBSNSZ

2:   IF STLRENT = 2 AND RTASPAY = 2 then goto CK_RTBSNS
     ELSEIF (PSU = 06001, 06013, 06037, 06041, 06059, 06065, 06071, 06073, 06075, 06081, 06087, 06097, 11001, 
             24021, 24043, 34003, 34013, 34017,34023, 34027, 
             34031, 34037, 36005, 36047,36059, 36061, 36081,
             36085, 36087, 36103, 36119) goto RENTCONT
          ELSE goto MORERNT

DK,RF:   IF (PSU = 06001, 06013, 06037, 06041, 06059, 06065, 06071, 06073, 06075, 06081, 06087, 06097, 11001, 
               24021, 24043, 34003, 34013, 34017,34023, 34027, 
               34031, 34037, 36005, 36047,36059, 36061, 36081,
                36085, 36087, 36103, 36119) goto RENTCONT
          ELSE goto MORERNT	
02	RTBSNSZ	RTBSNSZ	 What percent of the rental payment is counted as a business expense?
    
                    Enter to the nearest whole percent.	1-99,DK,RF:  IF (PSU = 06001, 06013, 06037, 06041, 06059, 06065, 06071, 
                06073, 06075, 06081, 06087, 06097, 11001, 24021, 
                24043, 34003, 34013, 34017, 34023, 34027, 
                34031, 34037, 36005, 36047, 36059, 36061, 
                36081, 36085, 36087, 36103,36119), 
                    goto RENTCONT
             ELSE goto MORERNT

100:   Goto ERR2_RTBSNSZ	
02	RENTCONT	RENTCONT	Is this unit under rent control? 

1. Yes
2. No	Goto MORERNT	
02	MORERNT	MORERNT	Since the first of (reference month), have (you/you or any members of your household)
rented any other houses, apartments, or temporary living
quarters NOT used entirely for business or vacation?  
     
          Do NOT include college or university regulated housing.

1. Yes
2. No	1:  Goto RENTX1

2,DK,RF:  Goto S2_END	
02		SAMP_UN			
02		RENTX1_			
02		RENTX2_			
02		RENTX3_			
02		REGRNTX_			
02		RTCOMPX_			
02		RNT_STAT			
02		RNT_ORIG			
02		S2_END		Goto Section 3 - BSECT3	
02		SWIMPOOL			
02		OFSTPARK			
02		PORCH			
02		APTMENT			
02		CNTRALAC			
02		WINDOWAC			
02		DNTKNOW			
02		SOLARPNL			
02		RNT2_ORIG			
02		I_UNITFEAT1			
02		I_YRBUILT			
02		I_INCLDRYR	

1. Yes
2. No		
03A2	S3_INTRO	S3_INTRO	(Now I am going to update the information you provided in the last interview for owned living quarters and other owned real estate./Now I am going to 

 Prop #|Description |Type |# Mort|# LSHEL |# LCHEL 

1. Enter 1 to Continue	IF INTNMBR = 2-5 AND NEWCU <> 1 then goto BSect3A1

ELSE goto BSect3A2	
03A1		PROP_NOJ			
03A1		PropDes	** SHOW ONLY **		
03A1		PropTyp	** SHOW ONLY **

1. Condominium
2. Cooperative
3. Something else		
03A1		I_Loannum	** SHOW ONLY **		
03A1		AuxLochelnum	** SHOW ONLY **		
03A1	STILOWN	STILOWN	 (Do/Does) (you/your household) still own your (property description)?  
           
  Prop #|Description |Type |# Mort|# LSHEL |# LCHEL

1. Yes
2. No	1,DK,RF:   IF I_OWNYB = 600 then exit block and 
              goto BSECT3I.VAC_RNTQ
           ELSEIF BCeintro.BUSCREEN = 2 AND (there are 
              previously reported loans with 8500.LOANTYPE = 1, 2 AND 
              8500.OPF_STAT = 1) then exit block and goto 
              BMCHANGE.Mchange
           ELSEIF BCeintro.BUSCREEN = 2 AND 
              8500.HWMNYLOC >= 1 then exit block and goto 
              THomeEquity.PDLOAN2
           ELSEIF BCeintro.BUSCREEN = 2 exit block and goto 
              TAddMort.ADDMORT
           ELSE goto BSNSEXPA

2:         IF I_OWNYB = 600 then exit block and goto PURPROP
           ELSEIF BCeintro.BUSCREEN = 2 AND (there are 
              previously reported loans with 8500.LOANTYPE = 1, 2 AND 
              8500.OPF_STAT = 1) then exit block and goto 
              BMCHANGE.Mchange
           ELSEIF BCeintro.BUSCREEN = 2 AND 
              8500.HWMNYLOC >= 1 then exit block and goto 
              THomeEquity.PDLOAN2
           ELSEIF BCeintro.BUSCREEN = 2 exit block and goto 
              TAddMort.ADDMORT           
           ELSE goto BSNSEXPA	
03A1	BSNSEXPA	BSNSEXPA	(Are/Were) any of the expenses for this property deducted 
as a farm, rental, or business expense?

           Prop # |Description |Type |# Mort|# LSHEL |# LCHEL      

1. Yes
2. No	1:        Goto OBSNSZBA

2,DK,RF:  IF there are previously reported loans with 
             8500.LOANTYPE = 1, 2 AND 8500.OPF_STAT = 1 then
              exit block and goto BMCHANGE.Mchange
          ELSEIF 8500.HWMNYLOC >= 1 then exit block and 
                goto THomeEquity.PDLOAN2 
          ELSE exit block and goto TAddMort.ADDMORT	
03A1	OBSNSZBA	OBSNSZBA	What percent of the expenses for this property (is/was) deducted?
Include the portion used for business, farming, or rented to someone outside the household. 

           Prop # |Description |Type |# Mort|# LSHEL |# LCHEL	1-99,DK,RF:  IF there are previously reported loans with 
                8500.LOANTYP = 1, 2 AND 8500.OPF_STAT = 1 then
                 exit block and goto BMCHANGE.Mchange
             ELSEIF 8500.HWMNYLOC >= 1 then exit block and 
                    goto THomeEquity.PDLOAN2 
             ELSE exit block and goto TAddMort.ADDMORT
 
100:   Goto ERR2_OBSNSZBA	
03A1		MATCHID			
03A1		PROP_NOJ	** SHOW ONLY **		
03A1		PROPDES	** SHOW ONLY **		
03A1		I_LoanNOF	** SHOW ONLY **		
03A1		LoanTyp	** SHOW ONLY **		
03A1		IMRTPMTX	** SHOW ONLY **		
03A	MCHANGE	MCHANGE	^MCHANGE_FILL 

1. Yes
2. No	1:      Goto  MORTCHNG

2,DK,RF:  IF 8500.Fixedrte = 2, DK or RF then goto PYMTJX1
          ELSEIF 8500.FIXEDRTE = 1 and there are more loans 
                 for this property with 8500.OPF_STAT = 1 then 
                 goto MCHANGE for the next loan 
          ELSEIF 8500.HWMNYLOC >= 1 then exit block and 
                 goto THomeequity.PDLOAN2
          ELSE exit block and goto TAddmort.ADDMORT	
03A	MORTCHNG	MORTCHNG	What was the reason for the change in your
(mortgage/lump sum home equity loan) for your (property description)?

1. Change in escrow payment  (include changes in property taxes, insurance)
2. Change in interest rate 
3. Paid off
4. Change in amount of the graduated payment for a graduated payment (mortgage/lump sum home equity loan)
5. (Mortgage/Lump sum home equity loan) renegotiated (rollover or renegotiable (mortgage/lump sum home equity loan)) 
6. Refinanced (mortgage/lump sum home equity loan) (this includes changing the term of the (mortgage/lump sum home equity loan)) 
7. Paid less than the required amount
8. Other reasons
9. More than one of the above	1,4:     Goto PYRINIJ
2:       Goto NEWMRRTJ
3:       Goto MORTCHMO

5,6,8,9,DK,RF: Goto ORWHAT

7:   Goto PYMTJX1	
03A	ORWHAT	ORWHAT	Is this a 30-year (mortgage/lump sum home equity loan), a 15-year
(mortgage/lump sum home equity loan), or something else?      

1. 30-year
2. 15-year
3. Something else	1,2,DK,RF:  Goto FIXEDRTJ

3:        Goto MRTTERMJ	
03A	MRTTERMJ	MRTTERMJ	  Enter number of years.	Goto FIXEDRTJ	
03A	FIXEDRTJ	FIXEDRTJ	Is this a fixed rate (mortgage/lump sum home equity loan)?

1. Yes
2. No	1:         Goto ORGMRTJX

2,DK,RF:   Goto PAYTYPJ	
03A1	PAYTYPJ	PAYTYPJ	? [F1]

There are many different kinds of (mortgages/lump sum home equity loans).
Which one of these comes closest to (yours/ your household's)?

           Read each item on list.
             Enter all that apply, separate with commas.

1. Variable or adjustable rate of interest (ARM)
2. Interest only
3. Other - Specify	IF 1 and 2 selected then goto CK_PAYTYPJ

ELSEIF 3 selected then goto PAYTOTHJ

ELSE goto ORGMRTJX	
03A1	PAYTOTHJ	PAYTOTHJ	  Specify:	Goto ORGMRTJX	
03A1	ORGMRTJX	ORGMRTJX	What was the amount of the (mortgage/lump sum home equity loan) when
(you/your household) first obtained it, not including any interest?	1-4999:  Goto CK_ORGMRTJX

5000-9999:  Goto ERR1_ORGMRTJX

1000-99999999: IF ( (8500.OWNYB = 100, 200 or 300) and 
                   ORGMRTJX gt 600000) OR
               (8500.OWNYB = 400 and ORGMRTJX gt 199999) then
                   goto ERR1_ORGMRTJX
             ELSE goto NEWMRRTJ

DK,RF:    Goto NEWMRRTJ	
03A1	NEWMRRTJ	NEWMRRTJ	? [F1]  

     What is the current interest rate for this (mortgage/lump sum home equity loan)?

              Enter percent including decimal	00.000-99.999:  IF entry lt 5 or gt 14 then goto ERR1_NEWMRRT
                ELSE goto PYRINIJ

DK,RF:    Goto PYRINIJ	
03A1	PYRINIJ	PYRINIJ	 10    ? [F1]

On (your/your household's) last regular payment, which of these things
were included?

      Enter all that apply, separate with commas

1. Principal?
2. Interest?
3. Property taxes?
4. Property insurance?
5. Mortgage guarantee insurance (PMI)?
6. Any other payments - specify?
77. Don't know	1-5,77:  IF neither 1 nor 2 were selected then goto 
                CK_PYRINIJ
         ELSEIF 8500.FIXEDRTE = 2,DK or RF or 
                FIXEDRTJ = 2,DK or RF then goto MORTCHMO
         ELSE goto MRTPMTJX

6:     Goto PYJOTH

RF:   IF 8500.FIXEDRTE = 2,DK or RF or FIXEDRTJ = 2,DK or RF 
         then goto MORTCHMO
      ELSE goto MRTPMTJX	
03A1	PYJOTH	PYJOTH	  Specify:	IF (8500.FIXEDRTE = 2, DK or RF) or (FIXEDRTJ = 2, DK or RF)
   then goto MORTCHMO

ELSE goto MRTPMTJX	
03A1	MRTPMTJX	MRTPMTJX	How much is (your/your household's) (mortgage/lump sum home equity loan) payment per month?	IF entry lt 70 or gt 3000 and (ne DK or RF) then 
   goto ERR1_MRTPMTJX

ELSEIF any codes 3 - 6 are selected in PYRINIJ then
       goto PRININJX

ELSE goto MORTCHMO	
03A1	PRININJX	PRININJX	How much of that amount is for (principal / interest/principal and interest)?	0-99999999:  IF entry lt 40 or gt 2700 then 
                goto ERR1_PRININJX
             ELSEIF PRININJX gt MRTPMTJX then 
                    goto CK_PRININJX
             ELSE goto MORTCHMO

DK,RF:   Goto MORTCHMO	
03A1	MORTCHMO	MORTCHMO	In what month did (you pay off your (mortgage/lump sum home equity loan)/your (mortgage/lump sum home equity loan) change)?

1. January
2. February
3. March
4. April
5. May
6. June
7. July
8. August
9. September
10. October
11. November
12. December	IF ENTRY is not in the reference period and <> DK and <> RF
   then goto CK_MORTCHMO

ELSE
    IF (FIXEDRTJ = 2, DK or RF) or (FIXEDRTJ ne 1 AND
       8500.FIXEDRTE = 2, DK or RF) then goto PYMTJX1

    ELSE goto MCHANGE for next loan for this property
         with 8500.LOANTYPE = 1, 2 and 8500.OPF_STAT = 1

         IF no more loans with (8500.LOANTYPE = 1, 2 
          and 8500.OPF_STAT = 1) for this property 
          AND 8500.HWMNYLOC >= 1 then exit block and 
          goto PDLOAN2 in Thomequity block

      ELSE exit block and goto ADDMORT in TAddmort block	
03A1	PYMTJX1	PYMTJX1	How much was (your/your household's) payment on this (mortgage/lump sum home equity loan) in (reference month)?	1-99999999,DK,RF: IF PYMTJX1 = 1-70 or gt 3000 and (ne DK or 
                     RF) then goto ERR1_PYMTJX1
               ELSEIF (any codes 3-6 selected in PYRINIJ) or
                  8500.PAYPROTX = 3 or 8500.PAYPROIN = 4 or
                  8500.PAYMORIN = 5 or 8500.PAYOTHER = 6 
                  then goto PRNINJX1
               ELSE goto PYMTJX2

0:    Goto PYMTJX2	
03A1	PRNINJX1	PRNINJX1	How much of that amount is for (principal / interest/principal and interest)?	0-99999999:  IF PRNINJX1 = 0-40 or gt 2700 then goto 
                  ERR1_PRNINJX1
             ELSEIF PRNINJX1 gt PYMTJX1 then goto CK_PRNINJX1
             ELSE goto PYMTJX2

DK,RF:  Goto PYMTJX2	
03A1	PYMTJX2	PYMTJX2	How much was (your/your household's) payment on this (mortgage/lump sum home equity loan) in (month)?	1-99999999,DK,RF:  IF PYMTJX2 1-70 or gt 3000 and ne DK or 
                      RF then goto ERR1_PYMTJX2
                   ELSEIF any codes 3 to 6 selected in 
                    PYRINIJ or 8500.PAYPROTX = 3 or 
                    8500.PAYPROIN = 4 or 8500.PAYMORIN = 5 
                    or 8500.PAYOTHER = 6 then goto PRNINJX2
               ELSE goto PYMTJX3

0:    Goto PYMTJX3	
03A1	PRNINJX2	PRNINJX2	How much of that amount is for (principal / interest/principal and interest)?	0-99999999:   IF PRNINJX2 gt PYMTJX2 then goto CK_PRNINJX2
              ELSEIF PRNINJX2 = 0-40 or gt 2700 then
                     goto ERR1_PRNINJX2
              ELSE goto PYMTJX3

DK,RF:   Goto PYMTJX3	
03A1	PYMTJX3	PYMTJX3	How much was  (your/your household's) payment on this (mortgage/lump sum home equity loan)  in (last month)?	IF PYMTJX3 lt 246 or gt 2690 and ne DK or RF then
    goto ERR1_PYMTJX3

ELSEIF (any codes 3 to 6 selected in PYRINIJ) or 
       8500.PAYPROTX = 3 or 8500.PAYPROIN = 4 or 
       8500.PAYMORIN = 5 or 8500.PAYOTHER = 6) then
            goto PRNINJX3

ELSEIF there are more loans on this property with 
       8500.OPF_STAT = 1 then goto MCHANGE for the next loan 

ELSEIF 8500.HWMNYLOC >= 1 then exit block and 
       goto THomeequity.PDLOAN2

ELSE exit block and goto TAddmort.ADDMORT	
03A1	PRNINJX3	PRNINJX3	How much of that amount is for (principal / interest/principal and interest)?	0-99999999:   IF PRNINJX3 gt PYMTJX3 then goto CK_PRNINJX3
              ELSEIF PRNINJX3 lt 40 or gt 2700 then 
                     goto ERR1_PRNINJX3
              ELSEIF there are more loans on this property 
                     with 8500.OPF_STAT = 1 then 
                     goto MCHANGE for the next loan 

          ELSEIF 8500.HWMNYLOC >= 1 then exit block and 
                 goto THomeequity.PDLOAN2

          ELSE exit block and goto TAddmort.ADDMORT

DK,RF: IF there are more loans on this property with 
          8500.OPF_STAT = 1 then goto MCHANGE for the next loan 

       ELSEIF 8500.HWMNYLOC >= 1 then exit block and
              goto THomeequity.PDLOAN2

       ELSE exit block and goto TAddmort.ADDMORT	
03A1		PYPRINIJ			
03A1		PYINTSTJ			
03A1		PYPROTXJ			
03A1		PYPROINJ			
03A1		PYMORINJ			
03A1		PYOTHERJ			
03A1		LOAN_NOJ			
03A1		ORGM_TJX			
03A1		MRTP_TJX			
03A1		PRIN_NJX			
03A1		NEWM_RTJ			
03A1		PYMTJX1_			
03A1		PYMTJX2_			
03A1		PYMTJX3_			
03A1		PRNI_JX1			
03A1		PRNI_JX2			
03A1		PRNI_JX3			
03A1		VARRTJ			
03A1		INTONLJ			
03A1		OTHRTJ			
03A1		MATCHID			
03F		OWNYJ			
03A1		IPROP_NOH	** SHOW ONLY **		
03A1		PROPDES	** SHOW ONLY **		
03A1		I_LoanNOH	** SHOW ONLY **		
03A1	PDLOAN2	PDLOAN2	Since the first of (reference month), (have/has) (you/your household)
made any payments for your home equity line of credit?          

1. Yes
2. No	1:   Goto PD2AMTX1

2,DK,RF:  Goto TOTOWED2	
03A1	PD2AMTX1	PD2AMTX1	What was the total amount paid in (reference month)?	1-99999999: IF (I_OWNYB = 100 and entry < 15 or entry > 6000) 
             OR (I_OWNYB = 200-400 and entry < 35 or entry > 
               35000) then goto ERR1_PD2AMTX1
             ELSE goto PD2AMTX2

0,DK,RF:  Goto PD2AMTX2	
03A1	PD2AMTX2	PD2AMTX2	What was the total amount paid in (month)?	1-99999999: IF (I_OWNYB = 100 and entry < 15 or entry > 6000) 
              OR (I_OWNYB = 200-400 and entry < 34 or 
                entry > 35000) then goto ERR1_PD2AMTX2
             ELSE goto PD2AMTX3

0,DK,RF:  Goto PD2AMTX3	
03A1	PD2AMTX3	PD2AMTX3	What was the total amount paid in (last month)?	1-99999999: IF (I_OWNYB = 100 and entry < 15 or entry > 6000) 
              OR (I_OWNYB = 200-400 and entry < 34 or 
                    entry > 35000) then goto ERR1_PD2AMTX3
               ELSE goto TOTOWED2

0,DK,RF:    Goto TOTOWED2	
03A1	TOTOWED2	TOTOWED2	^TOTOWED2_FILL	IF TOTOWED2 < PD2AMTX3 then goto CK_TOTOWED2

ELSEIF (I_OWNYB = 100 and entry = 1-165 or entry > 104400) OR 
      (I_OWNYB = 200-400 and entry = 1-2000 or entry > 100000) 
         then goto ERR1_TOTOWED2

ELSE goto PDLOAN2 for next loan for this property 
     with 8500.OPH_STAT = 1

     if no more loans for this property with
     8500.OPH_STAT = 1 then exit block and 
      goto TAddmort.Baddmort.ADDMORT	
03A1		PROP_NOJ			
03A1		LOAN_NOJ			
03A1		PD2A_TX1			
03A1		PD2A_TX2			
03A1		PD2A_TX3			
03A1		TOTO_ED2			
03A1		MATCHID			
03A1	ADDMORT	ADDMORT	Since the first of (reference month), (have/has) (you/your household)
obtained any (additional/     ) mortgages, including second mortgages or home 
equity loans, for your (property description)?

(Do not include reverse mortgages./ )

1. Yes
2. No	1:        Goto HEQUITY

2,DK,RF:   Exit block and goto S3A1_CHK1	
03A1	HEQUITY	HEQUITY	Was this a mortgage or home equity loan?

1. Mortgage
2. Home equity loan	1,DK,RF:   Goto OTHLOAN

2:   Goto HELTYPE	
03A1	HELTYPE	HELTYPE	There are two basic types of home equity loans:

A loan where (you/your household) received the entire lump-sum borrowed when (you/your household) took out the loan; or

A line of credit loan where (you/your household) can increase the amount borrowed by simply writing a check or using a special credit card.

Which type more closely describes this new home equity loan?

1. Lump sum home equity loan
2. Home equity line of credit	Goto OTHLOAN	
03A1	OTHLOAN	OTHLOAN	Did you have any other new mortgages or home equity loans for (property description)?

1. Yes
2. No	1:        Goto HEQUITY for the next row

2,DK,RF:  Exit block and goto S3A1_CHK1	
03A1		S3A1_CHECK		If this property was disposed of in the current interview 
    (OWNSTAT = 4) and OWNYB ne 600, goto Section 3D - BSECT3D

If this property was disposed of in the current interview and it is a residential business property (OWNYB = 600), goto PURPROP

IF the property is still owned (STILOWN = 1, DK or RF AND 
  OBSNSZBA ne 100) check to see if there are any new loans 
  (ADDMORT = 1)
    If yes and LOANTYPE = 1 or 2 (of the newly reported 
       loans) goto Section 3FG - BSECT3F
    If yes and LOANTYPE = 3 (of the newly reported loans)
       goto Section 3H - BSECT3HTABLE
    
    IF no, goto Section 3I - BSect3I	
03A1		OWNSTAT			
		INCLUDE_03D			
		INCLUDE_03F			
		INCLUDE_03H			
		INCLUDE_03I			
		S3CurrentProps_END		IF there are more "good" properties on the SCIF then go back
   to TStillOwn for the next property

ELSE exit block and goto PURPROP	
03A1	PURPROP	PURPROP	  9

(Other than the Sample Unit which you recently acquired/  ) (Since/since) the first of (reference month), (have/has) (you/your household) purchased or otherwise acquired any property or real estate?            

          

1. Yes
2. No	1:       Goto PCODE

2,DK,RF:   Goto 3A1_END	
03A1	PCODE	PCODE	  9

     What kind of property(ies) is this new property or real estate?

          Enter all that apply, separate with commas     

1. Other homes, vacation homes, recreational properties including timeshares
2. Commercial real estate or farm land
3. Homes rented out or owned only for investment purposes
4. Land with no buildings on it	if 1 is selected then goto NPROP2
if 2 is selected then goto CK_PCODE
if 3 is selected then goto NPROP6
if 4 is selected then goto NPROP4	
03A1	NPROP2	NPROP2	How many other homes, vacation homes or recreational properties, including timeshares?

            Exclude right-to-use timeshares, vacation clubs, or destination clubs.	IF (OnceNProp2 = 1) AND (NPROP2 < ORIGNPROP2) then 
    goto CK_NPROP2

ELSEIF 3 is selected in PCODE then goto NPROP6

ELSEIF 4 us selected in PCODE then goto NPROP4

ELSE goto S3A1_END	
03A1	NPROP6	NPROP6	How many homes rented out or owned only for investment purposes?		
03A1	NPROP4	NPROP4	How many were land with no buildings on it?	IF OnceNprop4 = 1 AND NPROP4 < OrigNprop4 then goto CK_NPROP4

ELSE goto S3A1_END	
03A1		S3A1_END		IF (PURPROP = 2, DK, RF) OR ( ONLY 2 entered in PCODE and 
     there is no new sample unit and there are no previously 
     reported active properties ) then exit block and 
     goto ANYRENT

ELSE goto Section 3B  (BSect3BDEFGHI)	
03A2	OTHERHOM	OTHERHOM	  9

Since the first of (reference month), (have/has) (you/your household) lived in any other home that (you/you or any members of your household) still (own/owns)?      

1. Yes
2. No	1:   Goto NOPROP

2,DK,RF:   Goto BUSPROP3	
03A2	NOPROP	NOPROP	How many?	IF (Section 3A2 has been completed) AND (the FR 
    attempts to lower the entry) then goto CK_NOPROP

ELSEIF entry > 5 then goto ERR1_NOPROP

ELSE goto BUSPROP3	
03A2	BUSPROP3	BUSPROP3	   9
     
(Do/Does) (you/your household) own any commercial real estate or farm land?

1. Yes
2. No	Goto RESBUSPR	
03A2	RESBUSPR	RESBUSPR	  9

(In the following questions, please do not include any of the commercial properties (you/your household) ^own_owns only for business or investment purposes.)

(Do/Does) (you/your household) own any homes rented out or owned only for investment purposes?

1. Yes
2. No	1:  Goto RES_NUM

2,DK,RF:   Goto SECHOME	
03A2	RES_NUM	RES_NUM	How many?	Goto SECHOME	
03A2	SECHOME	SECHOME	  9

(In the following questions, please do not include any of the properties ^You_YRCU (own/owns) only for business or investment purposes)
(Other than the property you have already mentioned./  ) 
(Do/Does/do/does) (you/your household) own any other homes, vacation homes, or recreational properties, including timeshares?

               Exclude right-to-use timeshares, vacation clubs, or destination clubs.   

1. Yes
2. No	1:  Goto SEC_NUM

2,DK,RF:   Goto NOBUILD	
03A2	SEC_NUM	SEC_NUM	How many? 

  Exclude right-to-use timeshares, vacation clubs, or destination clubs.	IF (Section 3A2 has been completed) AND (the FR 
    attempts to lower the entry) then goto CK_SECNUM

ELSEIF entry > 5 then goto ERR1_SECNUM

ELSE goto NOBUILD	
03A2	NOBUILD	NOBUILD	  9

Other than property you have already mentioned, (do/does) (you/your household) own any land without buildings on it?       

1. Yes
2. No	1:   Goto BUILDNUM

2,DK,RF:   Goto NOLONGER	
03A2	BUILDNUM	BUILDNUM	How many? 	IF (Section 3A2 has been completed) AND (the FR attempts to 
   lower the entry) then goto CK_BUILDNUM

ELSEIF entry > 5 then goto ERR1_BUILDNUM

ELSE goto NOLONGER	
03A2	NOLONGER	NOLONGER	  9

Are there any properties that (you/your household) owned at the beginning of (reference month) that (you/your household) no longer (own/owns)?     

1. Yes
2. No	1:   Goto NUMPRPTY

2,DK,RF:  Goto S3A2_END	
03A2	NUMPRPTY	NUMPRPTY	How many different properties?	1-20:  IF (Section 3A2 has been completed) AND 
          (the FR attempts to lower the entry) then 
           goto CK_NUMPRPTY
        ELSEIF entry > 5 then goto ERR1_NUMPRPTY
        ELSE goto P_TYPE

DK,RF:    Goto S3A2_END	
03A2	P_TYPE	P_TYPE	  9    ? [F1]

What type of (property was it/properties were they)?

         Enter all that apply, separate with commas.

1. A home in which (you/your household) used to live
2. Other homes, vacation homes, recreational properties including timeshares
3. Commercial real estate or farm land
4. Homes rented out or owned only for investment purposes
5. Land with no buildings on it	1-5:   IF NUMPRTY = DK or RF then goto S3A2_END
       If 1 selected in P_TYPE and NUMPRPTY is greater
         than 1 then goto HWMANY1
       If only 1 selected in P_TYPE and NUMPRPTY = 1 then
          goto S3A2_END

        If 2 selected in P_TYPE and NUMPRPTY is greater 
             than 1 then goto HWMANY2
        If only 2 selected in P_TYPE and NUMPRPTY = 1 then
           goto S3A2_END

        If 3 selected in P_TYPE and NUMPRPTY is greater
           than 1 then goto HWMANY3
        If only 3 selected in P_TYPE and NUMPRPTY = 1 then
           goto S3A2_END

        If 4 selected in P_TYPE and NUMPRPTY is greater 
         than 1 then goto HWMANY4
        If only 4 selected in P_TYPE and NUMPRPTY = 1 then
           goto S3A2_END

        If 5 selected in P_TYPE and NUMPRPTY is greater 
         than 1 then goto HWMANY5
        If only 5 selected in P_TYPE and NUMPRPTY = 1 then 
           goto S3A2_END

RF:  Goto S3A2_END	
03A2	HWMANY1	HWMANY1	How many homes in which (you/your household) used to live did (you/your household) dispose
of since (reference month)?	IF (Section 3A2 has been completed) AND 
   (the FR attempts to lower the entry) then goto CK_HWMANY1

ELSEIF 2 selected in P_TYPE then goto HWMANY2
ELSEIF 3 selected in P_TYPE then goto HWMANY3
ELSEIF 4 selected in P_TYPE then goto HWMANY4
ELSEIF 5 selected in P_TYPE then goto HWMANY5

ELSE goto S3A2_CHK	
03A2	HWMANY2	HWMANY2	How many other homes, vacation homes, recreational properties, or timeshares did (you/your household) dispose of since (reference month)?	IF (Section 3A2 has been completed) AND 
   (the FR attempts to lower the entry) then goto CK_HWMANY2

ELSEIF 3 selected in P_TYPE then goto HWMANY3
ELSEIF 4 selected in P_TYPE then goto HWMANY4
ELSEIF 5 selected in P_TYPE then goto HWMANY5
ELSE goto S3A2_CHK	
03A2	HWMANY3	HWMANY3	How many commercial real estate or farm land properties did (you/your household) dispose of since (reference month)?	IF (Section 3A2 has been completed) AND 
   (the FR attempts to lower the entry) then goto CK_HWMANY3
ELSEIF 4 selected in P_TYPE then goto HWMANY4
ELSEIF 5 selected in P_TYPE then goto HWMANY5
ELSE goto S3A2_CHK	
03A2	HWMANY4	HWMANY4	How many homes rented out or owned only for investment purposes did (you/your household) dispose of since (reference month)?	IF (Section 3A2 has been completed) AND 
   (the FR attempts to lower the entry) then goto CK_HWMANY4

ELSEIF 5 selected in P_TYPE then goto HWMANY5
ELSE goto S3A2_CHK	
03A2	HWMANY5	HWMANY5	How many land properties with no buildings on them did (you/your household) dispose of since (reference month)?	IF (Section 3A2 has been completed) AND 
   (the FR attempts to lower the entry) then goto CK_HWMANY5

ELSE goto S3A2_CHK	
03A2		S3A2_CK		IF (HWMANY1 + HWMANY2 + HWMANY3 +HWMANY4 + HWMANY5) ne NUMPRPTY then goto CK_NUMPROP

ELSE goto S3A2_END	
03A2		S3A2_END		IF OWNED ne 1 AND
  ( (OTHERHOM = 2, DK or RF) or 
    (OTHERHOM = 1 AND NOPROP = DK or RF) ) AND 
 ( (RESBUSPR = 2, DK or RF) or 
   (RESBUSPR = 1 AND RES_NUM = DK or RF) )  AND 
 ( (SECHOME = 2, DK or RF) or 
   (SECHOME = 1 AND SEC_NUM = DK or RF) ) AND 
 ( (NOBUILD = 2, DK or RF) or 
   (NOBUILD = 1 AND BUILDNUM = DK or RF))  AND
( (NOLONGER = 2, DK or RF) or 
  (NOLONGER = 1 AND NUMPRPTY = DK or RF) ) then
   goto S3I_END	
03B	WHICH_PROP	WHICH_PROP	(Now I am going to ask about your (owned properties/next property) )

     Enter type of property

1. Sample unit
2. (Former home/   )
3. (Other home, vacation home, or recreational property including timeshares/  )
4. (Homes rented out or owned only for investment purposes/ )
5. (Land with no buildings on it/  )	1:     Goto CK_WHICHPROP

2-5:  IF WHICH_PROP = 2 and BSect3A2.OTHERHOM = 1 and 
         1 selected in BSect3A2.P_TYPE then goto OWN_NOTOWN
      ELSEIF WHICH_PROP = 3 and BSect3A2.SECHOME = 1 and 2 
             selected in BSect3A2.P_TYPE then goto OWN_NOTOWN
      ELSEIF WHICH_PROP = 4 and BSect3A2.RESBUSPR = 1 and 4 
             selected in BSect3A2.P_TYPE then goto OWN_NOTOWN
      ELSEIF WHICH_PROP = 5 and BSect3A2.NOBUILD = 1 and 5 
             selected in BSect3A2.P_TYPE then goto OWN_NOTOWN
      ELSE goto PROPDESC	
3B	OWN_NOTOWN	OWN_NOTOWN	  You have indicated that the respondent currently owns a former home, other home, home rented out, land and
     also has a former home, other home, home rented out, land they no longer own.
 
     Which former home, other home, home rented out, land are you currently talking about?

1. Currently own property
2. No longer own	Goto PROPDESC	
03B	PROPDESC	PROPDESC	(Now I'm going to ask some questions about your Sample Unit.)
        
(Briefly describe the (property type) ( /you no longer own).

(*  Press Enter to continue./* Enter 888 to delete this property.)  	30 characters:  IF OWNYB = 300 then goto TIMESHAR
                ELSEIF OWNYB = 600 then goto COUNTRY
                ELSE goto SHARED2

888:    Goto next property	
03B	TIMESHAR	TIMESHAR	? [F1]

Is this a time-sharing arrangement where (you/your household) (have/has) use of the property only for a specified length of time each year?

1. Yes
2. No	1:  Goto DEEDED

2,DK,RF:  Goto SHARED2	
	DEEDED	DEEDED	? [F1]

Is this a deeded or right-to-use timeshare?

1. Deeded
2. Right-to-use	1,DK,RF:  Goto SHARWKS

2:   Goto CK_DEEDED	
03B	SHARWKS	SHARWKS	How many weeks are (you/your household) entitled to use your timeshare each year?	1-16,DK,RF: Goto SHARED1

17-52: Goto ERR1_SHARWKS	
03B	SHARED1	SHARED1	(Do/Does) (you/your household) own the timeshare with anyone else outside your household?

1. Yes
2. No	1:  Goto SHARPER1

2,DK,RF:  Goto COUNTRY	
03B	SHARPER1	SHARPER1	What percent of the timeshare (do/does) (you/your household) own?	Goto COUNTRY	
03B	SHARED2	SHARED2	(Do/Does) (you/your household) share ownership of the property with anyone else?

1. Yes
2. No	1:   Goto SHARPER2

2,DK,RF:  IF OWNYB = 300 then goto COUNTRY
          ELSEIF INTNMBR = 2-4 and NEWCU <> 1 AND 
                 OWNYB = 200 or 400 then goto STILOWNB
          ELSEIF BCeintro.BUSCREEN = 2 AND OWNYB = 100 
             then goto BSNEXP2
          ELSEIF BCeintro.BUSCREEN = 2 then goto ACQUIRYR
          ELSE goto BSNSEXP	
03B	SHARPER2	SHARPER2	What percentage of the property (do/does) (you/your household) own?	IF OWNYB = 300 then goto COUNTRY

ELSEIF INTNMBR = 2-4 AND NEWCU <> 1 AND OWNYB = 200 or 400 
       then goto STILOWNB

ELSEIF BCeintro.BUSCREEN = 2 AND OWNYB = 100 then goto 
       BSNEXP2

ELSEIF BCeintro.BUSCREEN = 2 then goto ACQUIRYR

ELSE goto BSNSEXP	
03B	COUNTRY	COUNTRY	   Ask if not apparent
  If this is a timeshare with multiple locations, select the most often used location.

Where is the property located?

1. United States
2. Foreign Country	1:    Goto STATE

2,DK,RF:  IF INTNMBR = 2-4 AND NEWCU <> 1 and OWNYB = 300 or
             600 then goto STILOWNB
          ELSEIF BCeintro.BUSCREEN = 2 AND OWNYB = 300 
             then goto ACQUIRYR
          ELSEIF OWNYB = 300 then goto BSNSEXP
          ELSE goto S3B_END	
03B	STATE	STATE	? [F1]

  Enter the two character State abbreviation	IF DK or RF: IF INTNMBR = 2-4 AND NEWCU <> 1 AND 
                   OWNYB = 300 or 600 then goto STILOWNB
            ELSEIF BCeintro.BUSCREEN = 2 AND OWNYB = 300 then
                     goto ACQUIRYR
                ELSEIF OWNYB = 300 then goto BSNSEXP
                ELSE goto S3B_END

ELSEIF not a good state abbreviation then goto CK_STATE

ELSE goto CNTYCODE	
03B	CNTYCODE	CNTYCODE	What county is the property located in?

    If the county name is not found, key X.	30 characters,DK,RF: IF INTNMBR = 2-4 AND NEWCU <> 1 AND 
                        OWNYB = 300 or 600 then goto STILOWNB
                 ELSEIF BCeintro.BUSCREEN = 2 AND OWNYB = 300 
                        then goto ACQUIRYR
                 ELSEIF OWNYB = 300 then goto BSNSEXP
                 ELSE goto S3B_END

X:   Goto OTHCNTY	
03B	OTHCNTY	OTHCNTY	   Specify other county	IF INTNMBR = 2-4 AND NEWCU <> 1 AND OWNYB = 300 or 600 
   then goto STILOWNB

ELSEIF BCeintro.BUSCREEN = 2 AND OWNYB = 300 then goto
   ACQUIRYR

ELSEIF OWNYB = 300 then goto BSNSEXP

ELSE goto S3B_END	
03B	STILOWNB	STILOWNB	     Ask if not apparent
    
Do you still own this property?

1. Yes
2. No	IF OWNYB = 600 then goto S3B_END

ELSEIF BCeintro.BUSCREEN = 2 AND OWNYB <> 600 then goto 
       ACQUIRYR 

ELSE goto BSNSEXP	
03B	BSNSEXP	BSNSEXP	(Are/Were) any of the expenses for this property deducted as a farm, rental, or business expense?       

1. Yes
2. No	1:  Goto OBSNSZB

2,DK,RF:   IF OWNYB = 100 then goto BSNEXP2
           ELSE goto ACQUIRYR	
03B	OBSNSZB	OBSNSZB	What percent of the expenses for this property (is/was) deducted? Include the portion used for business, farming, or rented to someone outside the household.	1-99,DK,RF:   Goto ACQUIRYR

100:  Goto ERR2_OBSNSZB	
03B	BSNEXP2	BSNEXP2	Is any part of this property you own rented to someone outside your household or used for business? 

1. Yes
2. No	Goto ACQUIRYR	
03B	ACQUIRYR	ACQUIRYR	In what year did (you/your household) close or settle on this property?	1900-9999:    If entry = current or previous year then 
                goto ACQUIRMO
              Else goto ANPROPTX

DK,RF: Goto ANPROPTX	
03B	ACQUIRMO	ACQUIRMO	In what month did (you/your household) close or settle on this property?

1. January
2. February
3. March
4. April
5. May
6. June
7. July
8. August
9. September
10. October
11. November
12. December	1-12:   IF ACQUIRMO and ACQUIRYR are in the future, 
            then goto CK_ACQUIRMO
        ELSEIF ACQUIRMO/ACQUIRYR are within the reference 
                period then goto GIFTPROP
        ELSE goto ANPROPTX

DK,RF:  Goto ANPROPTX	
03B	GIFTPROP	GIFTPROP	Was this property received as a gift or inheritance?

1. Yes
2. No	1,DK,RF:   Goto ANPROPTX

2:       Goto OWN_PURX	
03B	OWN_PURX	OWN_PURX	  9    ? [F1]

What was the total price paid for (this/the)  property, not including closing costs? 	0-99999999:  IF [(OWNYB = 100-300 and entry < 1500 or entry > 485000)  OR 
     (OWNYB = 400 and entry < 100 or entry > 250000) ]
      then goto ERR1_OWNPURX

      ELSE goto CLOSECST

DK,RF:  Goto CLOSECST	
03B	CLOSECST	CLOSECST	  9    ? [F1]

About how much were the closing costs?	0-99999999:  IF entry > OWN_PURX then goto CK_CLOSECST
             ELSEIF entry > 17000 then goto ERR1_CLOSCST
             ELSE goto OWNDPMTX

DK,RF:  Goto OWNDPMTX	
03B	OWNDPMTX	OWNDPMTX	What was the amount of the down payment?	0-99999999:  IF entry > OWN_PURX then goto CK_OWNDPMTX
            ELSEIF entry > 185000 then goto ERR1_OWNDPMTX 
            ELSE goto ANPROPTX

DK,RF:  Goto ANPROPTX	
03B	ANPROPTX	ANPROPTX	What (are/were) the annual property taxes for (this/the) property?	IF (ne DK or RF) AND [(OWNYB = 100 and ANPROPTX > 15000) OR 
    (OWNYB = 200 and ANPROPTX > 8000) OR 
    (OWNYB = 300 and ANPROPTX > 7000) OR 
    (OWNYB = 400 and ANPROPTX > 3000) ]
    then goto ERR1_ANPROPTX

ELSEIF OWNYB = 400 then goto S3B_END

ELSEIF (OWNYB = 100, 200 or 300) AND NOT (OWNYB = 100 AND 
       SECT01.BUILDING = 1, 9, or 10) then goto PROPTYPE

ELSE goto S3B_END	
03B	PROPTYPE	PROPTYPE	        Ask if not apparent.  
        If respondent doesn't know or refuses select pre-code 3.
    
 (Was/Is) this property a -

1. Condominium
2. Cooperative
3. Something else	Goto S3B_END	
03B		S3B_END		IF STILOWNB = 2 then exit block and goto Section 3D
ELSE exit block and goto Section 3E	
03B		PROP_NOB			
03B		OWNYB			
03B		OWNSTAT			
03B		VPRPCODE			
03B		HWMNYMRT			
03B		HWMNYLSL			
03B		HWMNYLOC			
03B		CLOS_CST			
03B		OWN__URX			
03B		OWND_MTX			
03B		FIPSCODE			
03B		ANPR_PTX			
03B		OPB_STAT			
03B		OPB_ORIG			
03D		PROP_NOD	** SHOW VARIABLE **		
03D		AuxPropDesc	** SHOW ONLY **		
03D	DISPMTHD	DISPMTHD	You said (you/your household) no longer (own/owns) your (property description).
Did (you/your household) sell it, give it to someone outside your household, or do 
something else with it?

1. Sold the property or traded the property in
2. Gave it to someone outside household
3. Something else, other - specify	1,2,DK,RF:   Goto DISPYR

3:       Goto DISPOTH	
03D	DISPOTH	DISPOTH	    Specify:	Goto DISPYR	
03D	DISPYR	DISPYR	In what year did (you/your household) (sell( trade) this property/give this property to someone outside your CU/dispose of this property)?	Goto DISPMO	
03D	DISPMO	DISPMO	In what month did (you/your household) (sell( trade) this property/give this property to someone outside your CU/dispose of this property)?

1. January
2. February
3. March
4. April
5. May
6. June
7. July
8. August
9. September
10. October
11. November
12. December	IF DISPMO = DK or RF then goto S3D_END

ELSEIF DISPYR = DK or RF then goto S3D_END

ELSEIF flgError = Yes then goto DISPDATE_ERR

ELSEIF DISPMTHD = 1 then goto DISPX

ELSE goto S3D_END	
03D	DISPX	DISPX	What was the selling price (trade-in value)?	IF entry < 750 or entry > 399900 AND (entry not DK or RF) 
   then goto ERR1_DISPX

ELSE goto DISPEXPX	
03D	DISPEXPX	DISPEXPX	 10     ? [F1]

Here is a list of some of the costs people may have when selling (trading) property.
Looking at the list may help you remember what (your/your household's) expenses were.  
What were (your/your household's) total expenses in selling (trading) this property?	0-99999999:   IF entry > 28000 then goto ERR1_DISPEXPX
              ELSEIF DISPEXPX > DISPX then goto CK_DISPEXPX
              ELSE goto S3D_END

DK,RF:   Goto S3D_END	
03D		S3D_END		Exit block and goto Section 3E	
03D		OWNYD			
03D		DISPX_			
03D		DISP_XPX			
03D		OPD_STAT			
03D		OPD_ORIG			
03E	PRESMORT	PRESMORT	Now I am going to ask about mortgages for your (property description).  Excluding home equity loans, (and reverse mortgages/      ),  (do/does) (you/your household) presently have a mortgage on your (property description)?        

1. Yes
2. No	1:  Goto NUMMORT1

2,DK,RF:  Goto HADMORT	
03E	NUMMORT1	NUMMORT1	How many mortgages (have/has) (you/your household) had on this property since the first of (reference month)?	IF (Section 3E has been completed) AND 
   (the FR attempts to lower the entry) then 
    goto CK_NUMMORT1

ELSE goto HOMEQ_YN	
03E	HADMORT	HADMORT	(Have/Has) (you/your household) had a mortgage on this property since the first of (reference month)?

1. Yes
2. No	1:   Goto NUMMORT2

2,DK,RF:  Goto HOMEQ_YN	
03E	NUMMORT2	NUMMORT2	How many mortgages (have/has) (you/your household) had on this property since the first of (reference month)?	IF (Section 3E has been completed) AND
   (the FR attempts to lower the entry) 
   then goto CK_NUMMORT2

ELSE goto HOMEQ_YN	
03E	MRTCPSHA	MRTCPSHA	Since the first of (reference month), in addition to (your/your household's) share of the cooperative's total costs, did (you/your household)  make payments on a mortgage that was obtained from an outside lender for (your/your household's) shares in the cooperative?          

1. Yes
2. No	1:  Goto NUMMORT3

2,DK,RF:  Goto HOMEQ_YN	
03E	NUMMORT3	NUMMORT3	How many mortgages (have/has) (you/your household) had on this property since the first of (reference month)?	IF (Section 3E has been completed) AND 
   (the FR attempts to lower the entry) 
   then goto CK_NUMMORT3

ELSE goto HOMEQ_YN	
03E	HOMEQ_YN	HOMEQ_YN	(Do/Does) (you/your household) have a home equity loan or any other loan which gives the lender claim on this property in case the loan is not repaid?     

1. Yes
2. No	1:  Goto LSHEL_YN

2,DK,RF:   Goto S3E_END	
03E	LSHEL_YN	LSHEL_YN	^LSHEL_YN_FILL_ONCE

(Have/Has) (you/your household) had a lump sum home equity loan on this property since the first of (reference month)?         

1. Yes
2. No	1:  Goto NUMLSHEL

2,DK,RF:  Goto LCHEL_YN	
03E	NUMLSHEL	NUMLSHEL	How many?	IF (Section 3E has been completed) AND 
   (the FR attempts to lower the entry) 
   then goto CK_NUMLSHEL

ELSE goto LCHEL_YN	
03E	LCHEL_YN	LCHEL_YN	(Have/Has) (you/your household) had a home equity line of credit on this property since the first of (reference month)?     

1. Yes
2. No	1:  Goto NUMLCHEL

2,DK,RF:  Goto S3E_END	
03E	NUMLCHEL	NUMLCHEL	How many?	IF (section 3E has been completed) AND
   (the FR attempts to lower the entry) 
    then goto CK_NUMLCHEL

ELSE goto S3E_END	
03E		S3E_END	** Non Displayed **	IF (NUMMORT1 > 0 OR NUMMORT2 > 0 OR NUMMORT3 > 0) OR 
     NUMLSHEL > 0 then goto Section 3FG

ELSEIF NUMLCHEL > 0 then goto Section 3H

ELSE goto Section 3I	
03E		NEWLOAN	** OUT VARIABLE **		
03E		PROPLNST	** OUT VARIABLE **		
03F		PROPNUM	** SHOW ONLY **		
03F		PROPDESC	** SHOW ONLY **		
03F	ORG_INTR	ORG_INTR	Now I will ask some questions about your (1st/2nd/3rd/etc.) (mortgage/lump sum home equity loan).  
These questions refer to the (mortgage/lump sum home equity loan) you (used to make/are currently making) payments on.

1. Continue
2. Delete the loan	1:    Goto REFI

2:    Goto S3FG_END	
3F	REFI	REFI	(Have/Has) (you/your household) ever refinanced this (mortgage/lump sum home equity loan)?

1. Yes
2. No	Goto FRSTPYYR	
03F	FRSTPYYR	FRSTPYYR	In what year did (you/your household) make the first payment
on this (mortgage/lump sum home equity loan)( after refinancing/)?

( *  Enter year of first payment after the most recent refinancing/)	1900-9999:   IF (entry > current year) or 
                (entry < (current year - 30)) then 
                  goto ERR1_FRSTPYYR
             ELSE goto FRSTPYMO

DK,RF:  Goto FRSTPYMO	
03F	FRSTPYMO	FRSTPYMO	In what month did (you/your household) make the first payment
on this (mortgage/lump sum home equity loan)( after refinancing/)?

( *  Enter month of first payment after the most recent refinancing/)

1. January
2. February
3. March
4. April
5. May
6. June
7. July
8. August
9. September
10. October
11. November
12. December	IF FRSTPYYR and FRSTPYMO > (current month + 2 and year) 
   then goto CK_FRPSTYMO

ELSE ORGMRTX	
03F	ORGMRTX	ORGMRTX	What was the amount of this (mortgage/lump sum home equity loan) when (you/your household) obtained it, not including any interest?	1-4999: Goto CK_ORGMRTX

5000-9999: Goto ERR1_ORGMRTX

10000-99999999: IF ( (OWNYB = 100, 200 or 300) and
                  ORGMRTX > 600000) OR
                 (OWNYB = 400 and ORGMRTX > 199999) then
                     goto ERR1_ORGMRTX
               ELSE goto MTERM

DK,RF: Goto MTERM	
03F	MTERM	MTERM	(Is/Was) this a 30 year (mortgage/lump sum home equity loan), a 15 year (mortgage/lump sum home equity loan), or something else?          

1. 30-year
2. 15-year
3. Something else	1:     IF (current year - FRSTPYYR) > 30 then goto CK_S3FG
       ELSE goto NEWMRRT

2:     IF (current year - FRSTPYYR) > 15 then goto CK_S3FG
       ELSE goto NEWMRRT

3:   Goto MORTTERM

DK,RF:   Goto NEWMRRT	
03F	MORTTERM	MORTTERM	  Enter number of years	1-50:  IF (current year - FRSTPYYR) > MORTTERM then 
           goto CK_S3FG
        ELSEIF entry < 5 or entry > 30 then 
                goto ERR1_MORTTERM
        ELSE goto NEWMRRT

DK,RF:  Goto  NEWMRRT	
03F	NEWMRRT	NEWMRRT	? [F1]

What (is/was) the current interest rate on this (mortgage/lump sum home equity loan)?

                   Enter percent including decimal	IF ENTRY < 2.5 or entry > 8.5 AND (not DK or RF) then
   goto ERR1_NEWMRRT

ELSE goto FIXEDRTE	
03F	FIXEDRTE	FIXEDRTE	(Is/Was) this a fixed rate (mortgage/lump sum home equity loan)?

1. Yes
2. No	1:   Goto PAYINCL

2,DK,RF:   Goto PAYTYPE	
03F	PAYTYPE	PAYTYPE	? [F1]

There are many different kinds of (mortgages/lump sum home equity loans).
Which of these comes closest to (yours/ your household's)?

         Read each item on list
         Enter all that apply, separate with commas

1. Variable or adjustable rate of interest (ARM)
2. Interest only
3. Other - Specify	IF 1 and 2 are selected then goto CK_PAYTYPE

ELSEIF 3 is selected then goto PAYTOTHF

ELSE goto PAYINCL	
03F	PAYTOTHF	PAYTOTHF	  Specify:	Goto PAYINCL	
03F	PAYINCL	PAYINCL	  10    ? [F1]

On (your/your household's) last payment, which of these things were included?

           Read each item on list

           Enter all that apply, separate with commas

1. Principal?
2. Interest?
3. Property taxes?
4. Property insurance?
5. Mortgage guarantee insurance (PMI)?
6. Any other payments - specify?
77. Don't know	IF 1 and 2 were not selected then goto CK_PAYINCL

ELSEIF 6 selected then goto PAYOTHF

ELSEIF FIXEDRTE = 1 then goto MRTPMTX

ELSE goto PAYMTX1	
03F	PAYOTHF	PAYOTHF	  Specify:	IF FIXEDRTE = 1 then goto MRTPMX

ELSE goto PAYMTX1	
03F	MRTPMTX	MRTPMTX	How much (is/was) (your/your household's) (mortgage/lump sum home equity loan) payment per month?	1-99999999:  IF MRTPMTX > ORGMRTX then goto CK_MRTPMTX
             ELSEIF entry < 125 or entry > 2700 OR
             (FIXEDRTE = 1 and MTERM = 1 and MRTPMTX*360 < ORGMRTX) 
          OR (FIXEDRTE = 1 and MTERM = 2 and MRTPMTX*180 < ORGMRTX) 
          OR MRTPMTX = ORGMRTX then goto ERR1_MRTPMTX
             ELSEIF any codes 3-6 are selected in PAYINCL 
                    then goto PRININTX
             ELSE goto S3FG_END

DK,RF:   IF any codes 3-6 are selected in PAYINCL 
            then goto PRININTX
         ELSE goto S3FG_END	
03F	PRININTX	PRININTX	How much of that amount was for (principal / interest/principal and interest)?	0-99999999:    IF PRININTX > MRTPMTX then goto ERR_PRININTX
               ELSEIF entry < 75 or entry > 2500 then
                     goto ERR1_PRININTX
               ELSE goto S3FG_END

DK,RF:  Goto S3FG_END	
03F	PAYMTX1	PAYMTX1	How much was (your/your household's) payment on this (mortgage/lump sum home equity loan) in (reference month)?	0:   Goto PAYMTX2

1-99999999,DK,RF:  IF entry < 125 or entry > 2700 then goto 
                      ERR1_PAYMTX1
                   ELSEIF any codes 3-6 selected in PAYINCL 
                          then goto PRNINTX1
                   ELSE goto PAYMTX2	
03F	PRNINTX1	PRNINTX1	How much of that amount was for (principal / interest/principal and interest)?	0-99999999:  IF PRNINTX1 > PAYMTX1 then goto CK_PRNINTX1
             ELSEIF entry < 75 or entry > 2500 then
                    goto ERR1_PRNINTX1
             ELSE goto PAYMTX2

DK,RF:  Goto PAYMTX2	
03F	PAYMTX2	PAYMTX2	How much was (your/your household's) payment on this (mortgage/lump sum home equity loan) in (month)?	0:   Goto PAYMTX3

1-99999999,DK,RF:  IF entry < 125 or entry > 2700 then
                      goto ERR1_PAYMTX2
                   ELSEIF any codes 3-6 selected in PAYINCL 
                          then goto PRNINTX2
                   ELSE goto PAYMTX3	
03F	PRNINTX2	PRNINTX2	How much of that amount was for (principal / interest/principal and interest)?	0-99999999:   IF PRNINTX2 > PAYMTX2 then goto ERR_PRNINTX2
              ELSEIF entry < 75 or entry > 2500 then
                     goto ERR1_PRNINTX2
              ELSE goto PAYMTX3

DK,RF:  Goto PAYMTX3	
03F	PAYMTX3	PAYMTX3	How much was (your/your household's) payment on this (mortgage/lump sum home equity loan) in (last month)?	0,DK,RF:   Goto S3FG_END

1-99999999:  IF entry < 125 or entry > 2700 then goto ERR1_PAYMTX3
             ELSEIF any codes 3-6 selected in PAYINCL 
                    then goto PRNINTX3
             ELSE goto S3FG_END	
03F	PRNINTX3	PRNINTX3	How much of that amount is for (principal / interest/principal and interest)?	0-99999999:  IF PRNINTX3 > PAYMTX3 then goto CK_PRNINTX3
             ELSEIF entry < 75 or entry > 2500 then
                    goto ERR1_PRNINTX3
             ELSE goto S3FG_END

DK,RF:  Goto S3FG_END	
03F		S3FG_END		Goto ORGMRTX for the next new loan with LOANTYPE = 1 or 2

IF no more new loans with LOANTYPE 1 or 2 AND NUMLCHEL (from 3E) gt 0 then goto Section 3H

ELSE goto Section 3I	
03F		NEWLOAN			
03F		PROPLNST			
03F		LOANTYPE			
03F		PAYPRINI			
03F		PAYPROTX			
03F		PAYPROIN			
03F		PAYMORIN			
03F		PAYOTHER			
03F		PAYINT			
03F		PROP_NOF			
03F		OWNYF			
03F		LOAN_NOF			
03F		ORGMRTX_			
03F		PAYMTX1_			
03F		PAYMTX2_			
03F		PAYMTX3_			
03F		PRNI_TX1			
03F		PRNI_TX2			
03F		PRNI_TX3			
03F		MRTPMTX_			
03F		PRIN_NTX			
03F		MORT_ERM			
03F		NEWMRRT_			
03F		VARRTE			
03F		INTONLY			
03F		OTHRTE			
03F		ORG_DEL			
03F		OPF_SEQ			
03F		OPF_STAT			
03F		OPF_ORIG			
03H		AuxPropDesc	** SHOW ONLY **		
03H	PAIDLOAN	PAIDLOAN	(I'd like to ask some questions about (your/your CUs) home equity line(s) of credit.)

Since the first of (reference month), (have/has) (you/your household) 
made any payments for (your/your household's) (this loan/1st/2nd/3rd/etc.)?

1. Yes
2. No
888. Delete this loan	1:  Goto PDAMTX1

2,DK,RF:    Goto TOTOWED

888:      Goto next loan	
03H	PDAMTX1	PDAMTX1	What was the total amount paid in (reference month)?	1-99999999:  IF (OWNYH = 100 and entry < 15 or entry > 6000)
                OR (OWNYH = 200-400 and entry < 35 or
                 entry > 35000) then goto ERR1_PDAMTX1
             ELSE goto PDAMTX2

0,DK,RF:   Goto PDAMTX2	
03H	PDAMTX2	PDAMTX2	What was the total amount paid in (month)?	1-99999999:   IF (OWNYH = 100 and entry < 15 or entry > 6000)
                 OR (OWNYH = 200-400 and entry < 35 or 
                   entry > 35000) then goto ERR1_PDAMTX2
              ELSE goto PDAMTX3
 
0,DK,RF:   Goto PDAMTX3	
03H	PDAMTX3	PDAMTX3	What was the total amount paid in (last month)?	1-99999999:  IF (OWNYH = 100 and entry < 15 or entry > 6000) 
                 OR (OWNYH = 200-400 and entry < 15 or 
                 entry > 6000) then goto ERR1_PDAMTX3
             ELSE goto TOTOWED

0:  IF PDAMTX1 = 0 and PDAMTX2 = 0 then goto CK_PDAMTX3
    ELSE goto TOTOWED

DK,RF:  Goto TOTOWED	
03H	TOTOWED	TOTOWED	^TOTOWED_FILL	0-99999999: IF (OWNYH = 100 and entry < 165 or entry > 
               104400) OR (OWNYH = 200-400 and entry < 2000 
               or entry > 100000) AND (entry <> 0 )then 
                  goto ERR1_TOTOWED
              IF (entry < PDAMTX3 AND PDAMTX3 = RESPONSE) 
                 then goto CK_TOTOWED
              ELSE goto S3H_END

DK,RF:    Goto S3H_END	
03H		S3H_END		Goto PAIDLOAN for next new loan with LOANTYPE = 3 for this 
     property.  

If no more new loans with LOANTYPE = 3 then exit block and 
   goto Section 3I	
03H		PROP_NOH			
03H		OWNYH			
03H		LOAN_NOH			
03H		PDAMTX1_			
03H		PDAMTX2_			
03H		PDAMTX3_			
03H		TOTOWED_			
03H		OPH_SEQ			
03H		OPH_STAT			
03H		OPH_ORIG			
03I	MORTSPEC	MORTSPEC	Now I'm going to ask about other ownership costs
for your (property description).

Since the first of (reference month) not including this month, have (you/you or any members of your household)
paid more than the amount required on any mortgage or 
lump sum home equity loan for this property?

1. Yes
2. No	1:       Goto SPECIALX

2,DK,RF:  If PROPTYPE (from 3B or 8500) = 1 then goto PAYCONDO
          Elseif PROPTYPE (from 3B or 8500) = 2 then 
                 goto COOPPRG3
          Elseif PROPTYPE (from 3B or 8500) = 3 AND 
               (TIMESHAR (from 3B or 8500) = 1) then 
                goto PAYHOASS
          Elseif PROPTYPE (from 3B or 8500) = 3 AND OWNYB = 
                 400 then goto PAYHOASS
          Else goto GRNDRENT	
03I	SPECIALX	SPECIALX	Since the first of (reference month) not including this month -

How much EXTRA did (you/your household) pay?	IF (entry < 8 or entry > 14000) and (entry <> DK or RF) then 
   goto ERR1_SPECIALX

ELSEIF PROPTYPE (from 3B or 8500) = 1 then goto PAYCONDO

ELSEIF PROPTYPE (from 3B or 8500) = 2 then goto COOPPRG3

ELSEIF PROPTYPE (from 3B or 8500) = 3 AND 
       (TIMESHAR (from 3B or 8500) = 1) then goto PAYHOASS

ELSEIF PROPTYPE (from 3B or 8500) = 3 AND OWNYB = 400 then 
       goto PAYHOASS

ELSE goto GRNDRENT	
03I	GRNDRENT	GRNDRENT	(Now I'm going to ask about ownership costs for your (property description)/  )

Since the first of (reference month) not including this month, (have/has) (you/your household) made any
payments for ground or land rent for (property description)?

1. Yes
2. No	1:       Goto GRNDRNTX

2,DK,RF: Goto PAYHOASS	
03I	GRNDRNTX	GRNDRNTX	Since the first of (reference month) not including this month -

What was the total amount paid?	1-99999999:   IF entry < 45 or entry > 2465 then 
                 goto ERR1_GRNDRNTX
              ELSE goto PAYHOASS

DK,RF:   Goto PAYHOASS	
03I	PAYHOASS	PAYHOASS	(Do/Does) (you/your household) make regular payments to a homeowner's association?

1. Yes
2. No	1:       Goto HORCORG

2,DK,RF:   Goto SPCLPAY2	
03I	PAYCONDO	PAYCONDO	(Are/Is) (you/your household) required to make regular payments of condominium fees for general maintenance or management services? 

1. Yes
2. No	1:  Goto HORCORG

2,DK,RF:   Goto SPCLPAY2	
03I	COOPRG3	COOPRG3	 10    ? [F1]

Now I'd like to ask you about payments (you/your household) (make/makes) directly to the cooperative for (your/your household's) share of its costs.    
Since the first of (reference month) not including this month, have (you/you or any members of your household)
made any payments for any of the following things -   

            Read each item on the list
            Enter all that apply, separate with commas
            Enter 12 for no payments made

1. Repayment of loans owed by cooperative
2. Property taxes
3. Property Insurance
4. Management
5. Repairs or maintenance, including lawn care or snow removal
6. Improvements
7. Recreational including swimming, golf or tennis facilities
8. Security including guards or alarm systems
9. Utilities such as gas, electricity, water, heat
10. Trash collection
11. Other
12. No payments made
77. Don't know	12,RF:   Goto SPCLPAY1

1-11,77:   IF 11 selected then goto CORGOTH
           ELSE goto MGOTHPPD	
03I	CORGOTH	CORGOTH	   Specify:	Goto MGOTHPPD	
03I	HORCORG	HORCORG	 11    ? [F1]

Which of the following services and privileges were included in those payments?
  
         Read each item on the list.
           Enter all that apply---separate with commas.

1. Management
2. Repairs or maintenance, including lawn care or snow removal
3. Improvements
4. Utilities such as gas, electricity, water, heat
5. Parking
6. Recreational including swimming, golf, or tennis facilities
7. Security including guards or alarm systems
8. Maid Services
9. Medical Services
10. Trash collection
11. Other
77. Don't Know	1-11,77:   IF 11 is selected then goto HORGOTH
           ELSEIF there is at least one loan of LOANTYPE = 1 
                  on this property then goto MGOTHER
           ELSE goto MGOTHPPD

RF:    Goto SPCLPAY2	
03I	HORGOTH	HORGOTH	   Specify:	IF at least one loan of LOANTYPE = 1 for this property then
   goto MGOTHER

ELSE goto MGOTHPPD	
03I	MGOTHER	MGOTHER	Since the first of (reference month) not including this month, have you made ANY regular payments for these services?

1. Yes
2. No	1,DK,RF:   Goto MGOTHPPD

2:    IF PROPTYPE (from 3B or 8500) = 2 then goto SPCLPAY1
      ELSE goto SPCLPAY2	
Section 3I	MGOTHPPD	MGOTHPPD	 How often (do/does) (you/your household) currently pay for these services?

1. Once a month
2. Every 2 months
3. Quarterly (every 3 months)
4. Every 4 months
5. Twice a year (every 6 months)
6. Once a year
7. Other	1-6:  Goto MGOTHPYX

7,DK,RF:  Goto MGOTHERX	
Section 3I	MGOTHPYX	MGOTHPYX	What is the amount currently paid (once a month/every two months/every three months/every four months/every six months/once a year)?	IF (MGOTHPPD = 1 and (entry = 1-5 or entry > 870)) or 
   (MGOTHPPD = 2 and (entry = 1-5 or entry > 1740)) or
   (MGOTHPPD = 3 and (entry < 10 or entry > 2610)) or
   (MGOTHPPD = 4 and (entry < 10 or entry > 3480)) or
   (MGOTHPPD = 5 and (entry < 10 or entry > 5220)) or
   (MGOTHPPD = 6 and (entry < 10 or entry > 10,440)) then 
      goto ERR1_MGOTHPYX

ELSEIF PROPTYPE (from 3B or 8500) = 2 then goto SPCLPAY1

ELSE goto SPCLPAY2	
03I	MGOTHERX	MGOTHERX	Since the first of (reference month) not including this month, how much (have/has) (you/your household) paid for these services?	1-99999999:   IF entry = 1-9 or entry > 2610 then goto
                 ERR1_MGOTHERX
              ELSEIF PROPTYPE (from 3B or 8500) = 2 then 
                     goto SPCLPAY1
              ELSE goto SPCLPAY2

0,DK,RF:     IF PROPTYPE (from 3B or 8500) = 2 then 
                goto SPCLPAY1
             ELSE goto SPCLPAY2	
03I	SPCLPAY1	SPCLPAY1	 10    ? [F1]

 (Have/Has) (you/your household) made any SPECIAL payments to a management service?

1. Yes
2. No	1:  Goto COOPSP3

2,DK,RF:   Goto ASSESSMT	
03I	SPCLPAY2	SPCLPAY2	 11    ? [F1]

(Have/Has) (you/your household) made any SPECIAL payments to a management service?

1. Yes
2. No	1:  Goto HOCOSP3

2,DK,RF:  Goto ASSESSMT	
03I	COOPSP3	COOPSP3	   10    ? [F1]     

Since the first of (reference month) not including this month, what services were provided?  

        Enter all that apply, separate with commas

1. Repayment of loans owed by the cooperative
2. Property taxes
3. Property insurance
4. Management
5. Repairs or maintenance, including lawn care or snow removal
6. Improvements
7. Recreational including swimming, golf, or tennis facilities
8. Security including guards or alarm systems
9. Utilities such as gas, electricity, water, heat
10. Trash collection
11. Other 
77. Don't Know	IF 11 is selected then goto COSPOTH

ELSE goto SPECLX	
03I	COSPOTH	COSPOTH	   Specify:	Goto SPECLX	
03I	HOCOSP3	HOCOSP3	 11    ? [F1]

Since the first of (reference month) not including this month, what services were provided?

      Enter all that apply, separate with commas

1. Management
2. Repairs or maintenance, including lawn care or snow removal
3. Improvements
4. Utilities such as gas, electricity, water, heat
5. Parking
6. Recreational including swimming, golf, or tennis facilities
7. Security including guards or alarm systems
8. Maid Services
9. Medical Services
10. Trash collection
11. Other
77. Don't Know	IF 11 is selected then goto HOSPOTH

ELSE goto SPECLX	
03I	HOSPOTH	HOSPOTH	   Specify:	Goto SPECLX	
03I	SPECLX	SPECLX	Since the first of (reference month) not including this month, how much were these 
special payments?	1-99999999:   IF entry > 6600 then goto ERR1_SPECLX
              ELSE goto ASSESSMT

DK,RF:  Goto ASSESSMT	
03I	ASSESSMT	ASSESSMT	Since the first of (reference month) not including this month, (have/has) (you/your household) paid any special assessments to a local government for construction or repair of roads, sidewalks, or other things like that?

1. Yes
2. No	1:  Goto ASSESSX

2,DK,RF:  IF OWNYB = 100 then goto RNTEQVX
          ELSEIFIF OWNYB = 300 then goto VAC_OCCQ
          ELSE goto S3I_END	
03I	ASSESSX	ASSESSX	Since the first of (reference month) not including this month -

What was the total amount paid?	1-99999999:    IF entry < 6 or entry > 77000 then 
                  goto ERR1_ASSESSX
               ELSEIF OWNYB = 100 then goto RNTEQVX
               ELSEIF OWNYB = 300 then goto VAC_OCCQ
               ELSE goto S3I_END

DK,RF:    IF OWNYB = 100 then goto RNTEQVX
          ELSEIF OWNYB = 300 then goto VAC_OCCQ
          ELSE goto S3I_END	
03I	VAC_OCCQ	VAC_OCCQ	Since the first of (reference month), how much time did you occupy this (timeshare/property)?

          Enter quantity and select period on next screen.	0,DK,RF:  IF ((TIMESHAR (from 3B or 8500) = 2, DK or RF))
             then goto VAC_SEC
          ELSEIF (TIMESHAR (from 3B or 8500) = 1) then 
                 goto TIME_RNT
          ELSE goto S3I_END

1-150:    Goto VAC_OCCY	
03I	VAC_OCCY	VAC_OCCY	  Enter time period.

1. Days
2. Weeks
3. Months
4. Percent
5. Other, specify	1-4,DK,RF:  IF (TIMESHAR (from 3B or 8500) = 2, DK or RF)
               then goto VAC_SEC
            ELSEIF (TIMESHAR (from 3B or 8500) = 1) then 
                  goto TIME_RNT
            ELSE goto S3I_END

5:    Goto VAC_OTH	
03I	VAC_OTH	VAC_OTH	  Specify:	IF (TIMESHAR (from 3B or 8500) = 2, DK or RF) then 
    goto VAC_SEC

ELSEIF (TIMESHAR (from 3B or 8500) = 1) then goto TIME_RNT

ELSE goto S3I_END	
03I	VAC_SEC	VAC_SEC	Since the first of (reference month), was this property either rented by someone outside your household or available to be rented?

1. Yes
2. No	1:       Goto VAC_RNTQ

2,DK,RF:  Goto RNTEQVX	
03I	VAC_RNTQ	VAC_RNTQ	Since the first of (reference month), how much time was this property rented by someone outside your household?

              Enter quantity and select period on next screen.	0,DK,RF:  Goto VAC_AVAQ

1-150:   Goto VAC_RNTY	
03I	VAC_RNTY	VAC_RNTY	  Enter time period.

1. Days
2. Weeks
3. Months
4. Percent
5. Other, specify	1:  IF VAC_RNTQ >= 91 AND OWNYB = 300 then goto RNTEQV2X
    ELSEIF VAC_RNTQ >= 91 then goto S3I_END
    ELSE goto VAC_AVAQ

2:  IF VAC_RNTQ >= 13 AND OWNYB = 300 then goto RNTEQV2X
    ELSEIF VAC_RNTQ >= 13 then goto S3I_END
    ELSE goto VAC_AVAQ

3:  IF VAC_RNTQ >= 3 AND OWNYB = 300 then goto RNTEQV2X
    ELSEIF VAC_RNTQ >= 3 then goto S3I_END
    ELSE goto VAC_AVAQ

4:  IF VAC_RNTQ = 100 AND OWNYB = 300 then goto RNTEQV2X
    ELSEIF VAC_RNTQ = 100 then goto S3I_END
    ELSE goto VAC_AVAQ

5:  Goto VAC_ROTH

DK,RF:    Goto VAC_AVAQ	
03I	VAC_ROTH	VAC_ROTH	  Specify:	Goto VAC_AVAQ	
03I	VAC_AVAQ	VAC_AVAQ	Since the first of  (reference month), how much time was this property available to be rented, but not rented out?

                  Enter quantity and select period on next screen.	0,DK,RF:  IF OWNYB = 300 then goto RNTEQV2X
          ELSE goto S3I_END

1-150:    Goto VAC_AVAY	
03I	VAC_AVAY	VAC_AVAY	  Specify

1. Days
2. Weeks
3. Months
4. Percent
5. Other, specify	1-4:  IF (VAC_RNTY = VAC_AVAY) AND (VAC_RNTQ <> DK and 
          <> RF) AND (VAC_AVAQ <> DK and <> RF) AND 
         [ (VAC_RNTY = 1 and ((VAC_RNTQ + VAC_AVAQ) > total 
             number of days from the 1st of the reference 
             month and today)) OR 
           (VAC_RNTY = 2 and ((VAC_RNTQ + VAC_AVAQ) > total 
             number of weeks from the 1st of the reference 
             month and today)) OR
          (VAC_RNTY = 3  and ((VAC_RNTQ + VAC_AVAQ) > 3) )
         OR
          (VAC_RNTY = 4 and ((VAC_RNTQ + VAC_AVAQ) > 100)) ]
          Then goto CK_RNTQ_AVAQ
       ELSEIF OWNYB = 300 then goto RNTEQV2X
       ELSE goto S3I_END

DK,RF:   IF OWNYB = 300 then goto RNTEQV2X
         ELSE goto S3I_END

5:    Goto VAC_AOTH	
03I	VACAOTH	VACAOTH	  Specify	IF OWNYB = 300 then goto RNTEQV2X

ELSE goto S3I_END	
03I	RNTEQV2X	RNTEQV2X	If someone were to rent this home today, how much do you think it would rent for?	IF (entry < 200 or entry > 800) AND (entry is not DK or RF) 
   then goto ERR1_RNTEQV2X
   
ELSE goto RENTPERD	
03I	RENTPERD	RENTPERD	   Ask if not already stated.

What period of time does this rental amount cover? 

1. Week
2. Month
3. Quarter
4. Other specify	1-3,DK,RF:  Goto RENTUTIL

4:   Goto RNPEROTH	
03I	RNPEROTH	RNPEROTH	  Specify:	Goto RENTUTIL	
03I	RENTUTIL	RENTUTIL	Does this amount include utilities?  

1. Yes
2. No	Goto PROPVALX	
03I	RNTEQVX	RNTEQVX	If someone were to rent this (including part of the property currently being used for business, farming, or rented/home today) how much do you think it 
would rent for monthly, unfurnished and without utilities?	1-999999: IF (OWNYB = 100 and entry < 300 or entry > 3000) OR
             (OWNYB = 200 and entry < 200 or entry > 4000) OR
             (OWNYB = 300 and entry < 200 or entry > 8000) 
                  then goto ERR1_RNTEQVX
           ELSEIF OWNYB = 100 OR (OWNYB = 300 AND 
             ((TIMESHAR (from 3B or 8500) = 2, DK or RF)) then
                  goto PROPVALX
           ELSE goto S3I_END

DK,RF:    IF OWNYB = 100 OR (OWNYB = 300 AND 
            ((TIMESHAR (from 3B or 8500) = 2, DK or RF)) then
                goto PROPVALX
          ELSE goto S3I_END	
03I	PROPVALX	PROPVALX	About how much do you think this property would sell for on today's market?	0-99999999: IF OWNYB = 100 and entry < 1000 or entry > 600000
           OR (OWNYB = 300 and entry < 3000 or entry >
              800000) OR (PROPVALX > RNTEQVX*1000) 
           OR (PROPVALX < ORGMRTX*0.5) then goto ERR1_PROPVALX
             ELSE goto S3I_END
             
DK,RF:    Goto S3I_END	
03I	TIME_RNT	TIME_RNT	Since the first of (reference month), did you rent this timeshare to someone outside your household?

1. Yes
2. No	Goto RNTEQV3X	
03I	RNTEQV3X	RNTEQV3X	If you were to rent this timeshare today to someone else, instead of using it yourself, how much would it rent for weekly?	1-99999:   IF entry < 200 or entry > 8000 then 
              goto ERR1_RNTEQV3X
           ELSE goto PRPVAL2X

DK,RF:   Goto PRPVAL2X	
03I	PRPVAL2X	PRPVAL2X	If you were able to sell this timeshare, about how much do you think it would sell for on today's market?	0-99999999:   IF OWNYB = 300 and entry < 3000 or entry > 
                 800000 OR (PRPVL2X > RNTEQV2X*1000) 
                 then goto ERR1_PRPVL2X
              ELSE goto S3I_END

DK,RF:    Goto S3I_END	
03I		S3I_END		Goto Section 3B for the next new property.

If no more new properties (OR NO New Properties) AND 
       OWNED = 1 then exit block and goto ANYRENT

ELSE exit section 3 block and goto Section 4 - BSECTION4	
03I		PROP_NOI			
03I		OWNYI			
03I		COOPRG01			
03I		COOPRG02			
03I		COOPRG03			
03I		COOPRG04			
03I		COOPRG05			
03I		COOPRG06			
03I		COOPRG07			
03I		COOPRG08			
03I		COOPRG09			
03I		COOPRG10			
03I		COOPRG11			
03I		COOPRG12			
03I		HOCORG21			
03I		HOCORG22			
03I		HOCORG23			
03I		HOCORG24			
03I		HOCORG25			
03I		HOCORG26			
03I		HOCORG27			
03I		HOCORG28			
03I		HOCORG29			
03I		HOCORG30			
03I		HOCORG31			
03I		COOPSP01			
03I		COOPSP02			
03I		COOPSP03			
03I		COOPSP04			
03I		COOPSP05			
03I		COOPSP06			
03I		COOPSP07			
03I		COOPSP08			
03I		COOPSP09			
03I		COOPSP10			
03I		COOPSP11			
03I		HOCOSP01			
03I		HOCOSP02			
03I		HOCOSP03			
03I		HOCOSP04			
03I		HOCOSP05			
03I		HOCOSP06			
03I		HOCOSP07			
03I		HOCOSP08			
03I		HOCOSP09			
03I		HOCOSP10			
03I		HOCOSP11			
03I		SPCLPAY			
03I		SPEC_ALX			
03I		GRND_NTX			
03I		MGOT_PYX 			
03I		MGOT_ERX			
03I		SPECLX_			
03I		ASSESSX_			
03I		RNTEQVX_			
03I		RNTE_V2X			
03I		RNTE_V3X			
03I		PROP_ALX			
03I		PRPV_L2X			
03I		OPI_STAT			
03I		OPI_ORIG			
03	ANYRENT	ANYRENT	Since the first of (reference month) have (you/you or any members of your household) rented any houses, apartments, or
temporary living quarters NOT used entirely for business or vacation?  

      Do NOT include college or university regulated housing.

1. Yes
2. No	1:     Goto RENTX1

2,DK,RF:   Goto Section 4	
		INCLUDE_02			
02		S2_END		Goto Section 4 - BSECTION4	
04A	S4A_INTRO	S4A_INTRO	Now I am going to ask about utilities including telephone bills.  Please refer to any billing statements or other records you have when answering these questions.  

Please remember to include any bills you receive or pay online or have automatically deducted.  

Report any bill you have received, even if the bill has not been paid.  

     Description  Amount1     Amount2    Amount3
   (TELCOMP)   (TELCHGX1)  (TELCHGX2) (TELCHGX3)

      

1. Enter 1 to Continue	Goto TELEBILL	
04A	TELEBILL	TELEBILL	 12    ? [F1]

Since the first of (reference month), have (you/you or any members of your household) received any bills for telephone, internet, cable TV, or satellite TV services, including cellular and Voice Over IP?  Do not include bills for telephones used entirely for business purposes.   

1. Yes
2. No	1:    Goto TblPhone Block

2,DK,RF:  Goto TblPhone.S4A_END	
04A	PREVCOMP	PREVCOMP	(What is the name of the first company you received a bill for/What is the name of the next company)?

     Description  Amount1     Amount2    Amount3
     (TELCOMP)   (TELCHGX1)  (TELCHGX2) (TELCHGX3)

1. (Previous phone company name)[1]
2. (Previous phone company name)[2]
3. (Previous phone company name)[3]
4. (Previous phone company name)[4]
5. (Previous phone company name)[5]
6. (Previous phone company name)[6]
7. (Previous phone company name)[7]
8. (Previous phone company name)[8]
9. (Previous phone company name)[9]
10. (Previous phone company name)[10]
11. (Previous phone company name)[11]
12. (Previous phone company name)[12]
13. (Previous phone company name)[13]
14. (Previous phone company name)[14]
15. (Previous phone company name)[15]
16. (Previous phone company name)[16]
17. (Previous phone company name)[17]
18. (Previous phone company name)[18]
19. (Previous phone company name)[19]
20. (Previous phone company name)[20]
55. Company name not listed
888. Delete the line	1-20:   IF BCeintro.BUSCREEN = 2 goto TELCHGX1
        ELSE goto TELBSNS

55:     Goto TELCOMP

888:    Goto TELOTH	
04A	TELCOMP	TELCOMP	(What is the name of the company you received a bill for?/* Enter company name)

  Enter 888 to delete the line

     Description  Amount1     Amount2    Amount3
     (TELCOMP)   (TELCHGX1)  (TELCHGX2) (TELCHGX3)

 	888:  Goto TELOTH

All others:  IF Uppercase version of the entry is "NETFLIX" or "HULU" then goto CK_TELCOMP
             ELSEIF BCeintro.BUSCREEN = 2 goto TELCHGX1
             ELSE goto TELBSNS	
04A	TELBSNS	TELBSNS	Will any of the charges be deducted as a business expense?

     Description  Amount1     Amount2    Amount3
     (TELCOMP)   (TELCHGX1)  (TELCHGX2) (TELCHGX3)

1. Yes
2. No	1:       Goto TELBSNZ

2,DK,RF:  Goto TELCHGX1	
04A	TELBSNZ	TELBSNZ	What percentage will be deducted?

     Description  Amount1     Amount2    Amount3
   (TELCOMP)   (TELCHGX1)  (TELCHGX2) (TELCHGX3)	1-99,DK,RF:  Goto TELCHGX1

100:   Goto CK_TELBSNZ	
04A	TELCHGX1	TELCHGX1	How much were you billed for in (reference month)?   
Do not include any unpaid charges from a previous billing period.
     
     Description  Amount1     Amount2    Amount3
     (TELCOMP)   (TELCHGX1)  (TELCHGX2) (TELCHGX3)	1-999999: IF TELCHGX1 < 7 or TELCHGX1 > 800 then goto ERR1_TELCHGX1
          ELSE goto TELCHGX2

0,DK,RF:    Goto TELCHGX2	
04A	TELCHGX2	TELCHGX2	How much were you billed for in (month)?
Do not include any unpaid charges from a previous billing period.

Description Amount1 Amount2 Amount3
(TELCOMP) (TELCHGX1) (TELCHGX2) (TELCHGX3)	1-999999: IF TELCHGX2 < 7 or TELCHGX2 > 800 then goto ERR1_TELCHGX2
          ELSE goto TELCHGX3

0,DK,RF:  Goto TELCHGX3	
04A	TELCHGX3	TELCHGX3	How much were you billed for in (last month)?   
Do not include any unpaid charges from a previous billing period.

    Description  Amount1     Amount2    Amount3
   (TELCOMP)   (TELCHGX1)  (TELCHGX2) (TELCHGX3)	1-999999: IF TELCHGX3 < 7 or TELCHGX3 > 800 then goto ERR1_TELCHGX3
          ELSEIF TELCHGX1 = 0 OR TELCHGX2 = 0 then
                 goto BILPERD
          ELSE goto TELSERV

0:   Goto BILPERD

DK,RF:  IF TELCHGX1 = 0 OR TELCHGX2 = 0 then goto BILPERD
        ELSE goto TELSERV	
04A	BILPERD	BILPERD	What is your usual billing period for this service?   

    Description  Amount1     Amount2    Amount3
   (TELCOMP)   (TELCHGX1)  (TELCHGX2) (TELCHGX3)

1. Month
2. 2 months
3. Quarter
4. Annual
5. Other	Goto TELSERV	
04A	TELSERV	TELSERV	 12    ? [F1]

Which of the following items were included in the bill(s) - 

  Read each item on list.
    Enter all that apply, separate with commas.

     Description      Amount1         Amount2         Amount3
     (TELCOMP)  (TELCHGX1)  (TELCHGX2)  (TELCHGX3)

1. Telephone service (mobile, residential, or Voiceover IP)?
2. Internet service (including broadband, DSL, and dial-up)?
3. Cable or satellite television service?	IF 1 is selected goto TYPETEL
ELSEIF more than one item is selected then goto TELBLPRS
ELSE goto TELOTH	
04A	TYPETEL	TYPETEL	 12    ? [F1]

What types of telephone services did the bill include -

   Read each item on list.  
   Enter all that apply, separate with commas.

     Description  Amount1     Amount2    Amount3
   (TELCOMP)   (TELCHGX1)  (TELCHGX2) (TELCHGX3)

1. Residential Service including Voice over IP?
2. Mobile or Cellular Service including prepaid?	IF more than 1 item is selected in TELSERV then goto TELBLPRS
ELSE goto TELOTH	
04A	TELBLPRS	TELBLPRS	  Is respondent referring to a detailed bill, including online or digital?
    Do not include checkbooks

1. Yes
2. No	1:   IF 2 selected in TELSERV and TELCHGX1 = 1-999999, DK or RF then goto TINTNTX1
     ELSEIF 2 selected in TELSERV and TELCHGX2 = 1-999999, DK or RF then goto TINTNTX2
     ELSEIF 2 selected in TELSERV and TELCHGX3 = 1-999999, DK or RF then goto TINTNTX3
     ELSEIF 3 selected in TELSERV and TELCHGX1 = 1-999999, DK or RF then goto TCABLEX1
     ELSEIF 3 selected in TELSERV and TELCHGX2 = 1-999999, DK or RF then goto TCABLEX2
     ELSEIF 3 selected in TELSERV and TELCHGX3 = 1-999999, DK or RF then goto TCABLEX3
     ELSE goto TELOTH

2:    Goto TELOTH	
04A	TINTNTX1	TINTNTX1	How much of the ($ (entry in TELCHGX1) charges/charges) in (reference month) were for internet access?

       (*  Do not include data plans for mobile phones./  )

    Description  Amount1     Amount2    Amount3
   (TELCOMP)   (TELCHGX1)  (TELCHGX2) (TELCHGX3)	IF TINTNTX1 = 1-5 OR TINTNTX1 > 150 then goto ERR1_TINTNTX1
ELSEIF TINTNTX1 > TELCHGX1 then goto CK_TINTNTX1
ELSEIF TELCHGX2 = 1-999999, DK or RF then goto TINTNTX2
ELSEIF TELCHGX3 = 1-999999, DK or RF then goto TINTNTX3
ELSEIF 3 selected in TELSERV and TELCHGX1 = 1-999999, DK or RF then goto TCABLEX1
ELSEIF 3 selected in TELSERV and TELCHGX2 = 1-999999, DK or RF then goto TCABLEX2
ELSEIF 3 selected in TELSERV and TELCHGX3 = 1-999999, DK or RF then goto TCABLEX3
ELSE goto TELOTH	
04A	TINTNTX2	TINTNTX2	How much of the ($ (entry in TELCHGX2) charges/charges) in (month) were for internet access?

(*  Do not include data plans for mobile phones./  )

Description Amount1 Amount2 Amount3
(TELCOMP) (TELCHGX1) (TELCHGX2) (TELCHGX3)	IF TINTNTX2 = 1-5 or TINTNTX2 > 150 then goto ERR1_TINTNTX2
ELSEIF TINTNTX2 > TELCHGX2 then goto CK_TINTNTX2
ELSEIF TELCHGX3 = 1-999999, DK or RF goto TINTNTX3
ELSEIF 3 selected in TELSERV and TELCHGX1 = 1-999999, DK or RF then goto TCABLEX1
ELSEIF 3 selected in TELSERV and TELCHGX2 = 1-999999, DK or RF then goto TCABLEX2
ELSEIF 3 selected in TELSERV and TELCHGX3 = 1-999999, DK or RF then goto TCABLEX3
ELSE goto TELOTH	
04A	TINTNTX3	TINTNTX3	How much of the ($ (entry in TELCHGX3) charges/charges) in (last month) were for internet access?

       (*  Do not include data plans for mobile phones./  )

   Description  Amount1     Amount2    Amount3
   (TELCOMP)   (TELCHGX1)  (TELCHGX2) (TELCHGX3)	IF TINTNTX3 = 1-5 or TINTNTX3 > 150 then goto ERR1_TINTNTX3
ELSEIF TINTNTX3 > TELCHGX3 then goto CK_TINTNTX3
ELSEIF 3 selected in TELSERV and TELCHGX1 = 1-999999, DK or RF then goto TCABLEX1
ELSEIF 3 selected in TELSERV and TELCHGX2 = 1-999999, DK or RF then goto TCABLEX2
ELSEIF 3 selected in TELSERV and TELCHGX3 = 1-999999, DK or RF then goto TCABLEX3
ELSE goto TELOTH	
04A	TCABLEX1	TCABLEX1	How much of the ($ (entry in TELCHGX1) charges/charges) in (reference month) were for cable or satellite television service?

    Description  Amount1     Amount2    Amount3
   (TELCOMP)   (TELCHGX1)  (TELCHGX2) (TELCHGX3)	IF TCABLEX1 = 1-5 or TCABLEX1 > 180 then goto ERR1_TCABLEX1
ELSEIF TCABLEX1 > TELCHGX1 then goto CK_TCABLEX1
ELSEIF (TCABLEX1 + TINTNTX1) > TELCHGX1 then goto CK2_TCABLEX1
ELSEIF TELCHGX2 = 1-999999, DK or RF then goto TCABLEX2
ELSEIF TELCHGX3 = 1-999999, DK or RF then goto TCABLEX3
ELSE goto TELOTH	
04A	TCABLEX2	TCABLEX2	How much of the ($ (entry in TELCHGX2) charges/charges) in (month) were for cable or satellite television service?

Description Amount1 Amount2 Amount3
(TELCOMP) (TELCHGX1) (TELCHGX2) (TELCHGX3)	IF TCABLEX2 = 1-5 or TCABLEX2 > 180 then goto ERR1_TCABLEX2
ELSEIF TCABLEX2 > TELCHGX2 then goto CK_TCABLEX2
ELSEIF TCABLEX2 + TINTNTX2 > TELCHGX2 then goto CK2_TCABLEX2
ELSEIF TELCHGX3 = 1-999999, DK or RF then goto TCABLEX3
ELSE goto TELOTH	
04A	TCABLEX3	TCABLEX3	How much of the ($ (entry in TELCHGX3) charges/charges) in (last month) were for cable or satellite television service?

    Description  Amount1     Amount2    Amount3
   (TELCOMP)   (TELCHGX1)  (TELCHGX2) (TELCHGX3)	1-999999:   IF TCABLEX3 = 1-5 or TCABLEX > 180 then goto ERR1_TCABLEX3
            ELSEIF TCABLEX3 > TELCHGX3 then goto CK_TCABLEX3
            ELSEIF TCABLEX3 + TINTNTX3 > TELCHGX3 then goto CK2_TCABLEX3
            ELSE goto TELOTH

0,DK,RF:   Goto TELOTH	
04A	TELOTH	TELOTH	Did (you/you or any members of your household) receive any other bills for telephones, internet, cable TV, or satellite TV services not used entirely for business purposes?

   Description  Amount1     Amount2    Amount3
   (TELCOMP)   (TELCHGX1)  (TELCHGX2) (TELCHGX3)

1. Yes
2. No	1:   IF row number = 20 then goto ERR_MAX
     ELSEIF any 850005.TELCOMP = 1-20 then goto PREVCOMP, 
            next row of the table
     ELSE goto TELCOMP, next row of the table

2:    IF Answer is changed from a 1 to a 2 then goto CK_TELOTH
      ELSE exit block goto TblPhone.S4A_END	
04A		TELRESD			
04A		TELCELL			
04A		TINTNET			
04A		TCABLE			
04A		TPHONE			
04A		TELC_GX1			
04A		TELC_GX2			
04A		TELC_GX3			
04A		TINT_TX1			
04A		TINT_TX2			
04A		TINT_TX3			
04A		TCAB_EX1			
04A		TCAB_EX2			
04A		TCAB_EX3			
04A		UTA_STAT			
04A		UTA_ORIG			
04A		S4A_END		Goto Section 4B - BSection04B	
04B	PRPYCELL	PRPYCELL	  12

Since the first of (reference month) not including this month, have (you/you or any members of your household) purchased any pre-paid cellular minutes, not already reported?     

1. Yes
2. No	1:        Goto PRPYCLX

2,DK,RF:  Goto INTAWAY	
04B	PRPYCLX	PRPYCLX	Since the first of (reference month) not including this month -

What was the total amount paid?	IF PRPYCLX < 5 or PRPYCLX > 300 then goto ERR1_PRPYCLX

ELSEIF RT10.POPGRP = 11 or 12 then goto FONSTORE

ELSE goto INTAWAY	
04B	FONSTORE	FONSTORE	What is the name of the business where these were purchased?

           Enter store, website, or company name
            If there are multiple stores, websites, or company names, enter the last/most recent	IF uppercase entry = "GROUPON" or "GROUPON.COM" then goto ERR_GROUPON

ELSEIF UPPERCASE ENTRY contains ".COM" then goto INTAWAY

ELSEIF ENTRY = DK or RF then goto INTAWAY

ELSE goto FONPURCH	
04B	FONPURCH	FONPURCH	 Were they paid for - 

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  Goto INTAWAY

2: Goto FONLOC	
04B	FONLOC	FONLOC	In what city is (store name) located?	Goto FONLOCST	
04B	FONLOCST	FONLOCST	? [F1]

In what state is (store name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_FONLOCST

ELSE goto INTAWAY	
04B	INTAWAY	INTAWAY	Since the first of (reference month) not including this month, have (you/you or any members of your household) paid for internet or wireless internet access away from home, at places such as cafés, hotels, or airplanes?      

1. Yes
2. No	1:        Goto INTAWYX

2,DK,RF:  Goto S4B_END	
04B	INTAWYX	INTAWYX	Since the first of (reference month) not including this month -

What was the total amount paid?	1-9999:   IF INTAWYX < 5 or INTAWYX > 150 then goto ERR1_INTAWYX
          ELSEIF RT10.POPGRP = 7, 07, 8 or 08 then 
                   goto INTSTORE
          ELSE goto S4B_END

DK,RF:   IF RT10.POPGRP = 7, 07, 8 or 08 then goto INTSTORE
         ELSE goto S4B_END	
04B	INTSTORE	INTSTORE	What is the name of the business where these were purchased?

           Enter store, website, or company name
            If there are multiple stores, websites, or company names, enter the last/most recent	IF UPPERCASE ENTRY contains ".COM" then goto S4B_END

ELSEIF ENTRY = DK or RF then goto S4B_END

ELSE goto INTPURCH	
04B	INTPURCH	INTPURCH	 Were they paid for - 

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  Goto S4B_END

2: Goto INTLOC	
04B	INTLOC	INTLOC	In what city is (Business Name) located?	Goto INTLOCST	
04B	INTLOCST	INTLOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_INTLOCST

ELSE goto S4B_END	
04B		S4B_END		Exit block and goto Section 4C - S4C_INTRO	
04B		PRPYCLX_			
04B		INTAWYX_			
04B		UTP_STAT			
04B		UTP_ORIG			
04C	S4C_INTRO	S4C_INTRO	Now I am going to ask about utility bills. 

Prop # Property Description  Company Name Utility  Amount1   Amount2  Amount3
(WHATPROP) (UTLPDESC)        (COMPNAME)  (UTILY)  (UTLCHGX1)(UTLCHGX2) (UTLCHGX3)

1. Enter 1 to Continue	Goto TBLPROPT.Bsection04C.UTC_ITEM	
04C	UTC_ITEM	UTC_ITEM	 12    ? [F1]

Since the first of (reference month), have (you/you or any members of your household) received any bills for any of the following utilities, fuels, or services?  Do not include bills for properties used entirely for business.

       Read each item on list:          

1. Electricity
2. Natural or utility gas
3. Fuel oil
4. Bottled or tank gas
5. Other fuels including wood
6. Piped-in water and sewerage maintenance
7. Garbage and recycling collection
8. Water softening service
9. Septic tank cleaning
99. None/No more entries
888. Delete the line	1-9:    IF ITEM <> Item2Shadow then goto CK_ITEM
        ELSE goto WHATPROP

99:      Goto S4C_END

888:     Goto next row of table	
04C		DESCPR_AX	** SHOW ONLY **		
04C	WHATPROP	WHATPROP	Which property was the bill for?

1. (Owned Property)[1]
2. (Owned Property)[2]
3. (Owned Property)[3]
4. (Owned Property)[4]
5. (Owned Property)[5]
6. (Owned Property)[6]
7. (Owned Property)[7]
8. (Owned Property)[8]
9. (Owned Property)[9]
10. (Owned Property)[10]
11. (Owned Property)[11]
12. (Owned Property)[12]
13. (Owned Property)[13]
14. (Owned Property)[14]
15. (Owned Property)[15]
16. (Owned Property)[16]
17. (Owned Property)[17]
18. (Owned Property)[18]
19. (Owned Property)[19]
20. (Owned Property)[20]
40. (Owned Property)[40]
41. (Owned Property)[41]
42. Rented vacation Property
43. Property not owned or rented by household	1-20,40:   IF entry greater than the number of owned 
              properties or deleted properties are selected. 
             (PROPDESC = 888 OR OPB_STAT = 3 from section 3)
              then goto CK_WHATPROP
          ELSEIF UTC_ITEM = 1-4, 6-7 and no data in any
                850007.COMPNAME [1]-[40] then goto COMPNAME
          ELSEIF UTC_ITEM = 1-4, 6-7 and any data in 
                850007.COMPNAME [1]-[40] then goto LASTCOMP
          ELSEIF BCeintro.BUSCREEN = 2 goto UTLCHGX1
          ELSE goto UTILBUSN

41,42,43,DK,RF:  Goto UTLPDESC	
04C	UTLPDESC	UTLPDESC	Briefly describe the property.	IF UTC_ITEM = 1-4, 6-7 AND no data in any
   850006.COMPNAME [1]-[40] then goto COMPNAME

ELSEIF UTC_ITEM = 1-4, 6-7 and any data in
       850006.COMPNAME [1]-[40] then goto LASTCOMP

ELSEIF BCeintro.BUSCREEN = 2 goto UTLCHGX1

ELSE goto UTILBUSN	
04C	LASTCOMP	LASTCOMP	What is the name of the company or government agency which provides (Utility description)?

Prop #  Property Description  Company Name  Utility Amount1    Amount2  Amount3
(WHATPROP)(UTLPDESC)          (COMPNAME)   (UTILY)  (UTLCHGX1)(UTLCHGX2)(UTLCHGX3)

1. (Company name)[1]
2. (Company name)[2]
3. (Company name)[3]
4. (Company name)[4]
5. (Company name)[5]
6. (Company name)[6]
7. (Company name)[7]
8. (Company name)[8]
9. (Company name)[9]
10. (Company name)[10]
11. (Company name)[11]
12. (Company name)[12]
13. (Company name)[13]
14. (Company name)[14]
15. (Company name)[15]
16. (Company name)[16]
17. (Company name)[17]
18. (Company name)[18]
19. (Company name)[19]
20. (Company name)[20]
55. Company name not listed	1-20:   IF BCeintro.BUSCREEN = 2 goto UTLCHGX1
        ELSE goto UTILBUSN

55:     Goto COMPNAME	
04C	COMPNAME	COMPNAME	What is the name of the company or government agency which provides (Utility description)?

Prop #    Property Description  Company Name Utility  Amount1   Amount2 Amount3
(WHATPROP) (UTLPDESC)          (COMPNAME)   (UTILY)  (UTLCHGX1)(UTLCHGX2) (UTLCHGX3)
 	IF BCeintro.BUSCREEN = 2 goto UTLCHGX1

ELSE goto UTILBUSN	
04C	UTILBUSN	UTILBUSN	Will any part of the (Utility Description) charges be deducted as a business expense?

Prop #    Property Description  Company Name Utility  Amount1 Amount2 Amount3
(WHATPROP) (UTLPDESC)          (COMPNAME)   (UTILY)  (UTLCHGX1)(UTLCHGX2) (UTLCHGX3)

1. Yes
2. No	Goto UTLCHGX1	
04C	UTLCHGX1	UTLCHGX1	How much were you billed for in (reference month)?

Prop #    Property Description  Company Name Utility  Amount1 Amount2 Amount3
(WHATPROP) (UTLPDESC)          (COMPNAME)   (UTILY)  (UTLCHGX1)(UTLCHGX2) (UTLCHGX3)	1-999999:  IF (UTC_ITEM = 1 and (UTLCHGX1 < 10 or UTLCHGX1 > 
              999)) or 
     (UTC_ITEM = 2 and (UTLCHGX1 < 8 or UTLCHGX1 > 999)) or  
     (UTC_ITEM = 3 and (UTLCHGX1 < 34 or UTLCHGX1 > 722)) or 
     (UTC_ITEM = 4 and (UTLCHGX1 < 7 or UTLCHGX1 > 600)) or
     (UTC_ITEM = 5 and (UTLCHGX1 < 19 or UTLCHGX1 > 700)) or 
     (UTC_ITEM = 6 and (UTLCHGX1 < 5 or UTLCHGX1 > 499)) or 
     (UTC_ITEM = 7 and (UTLCHGX1 < 5 or UTLCHGX1 > 299)) or
     (UTC_ITEM = 8 and (UTLCHGX1 < 5 or UTLCHGX1 > 299)) or
     (UTC_ITEM = 9 and (UTLCHGX1 < 5 or UTLCHGX1 > 600))
              then goto ERR1_UTLCHGX1
     ELSE goto UTILCHGX2

0,DK,RF:   Goto UTILCHGX2	
04C	UTLCHGX2	UTLCHGX2	How much were you billed for in (month)?

Prop #    Property Description  Company Name Utility  Amount1 Amount2 Amount3
(WHATPROP) (UTLPDESC)          (COMPNAME)   (UTILY)  (UTLCHGX1)(UTLCHGX2) (UTLCHGX3)	1-999999:  IF (UTC_ITEM = 1 and (UTLCHGX2 < 10 or UTLCHGX2 > 
               999)) or
       (UTC_ITEM = 2 and (UTLCHGX2 < 8 or UTLCHGX2 > 999)) or
       (UTC_ITEM = 3 and (UTLCHGX2 < 34 or UTLCHGX2 > 722)) or
       (UTC_ITEM = 4 and (UTLCHGX2 < 7 or UTLCHGX2 > 600)) or
       (UTC_ITEM = 5 and (UTLCHGX2 < 19 or UTLCHGX2 > 700)) or
       (UTC_ITEM = 6 and (UTLCHGX2 < 5 or UTLCHGX2 > 499)) or
       (UTC_ITEM = 7 and (UTLCHGX2 < 5 or UTLCHGX2 > 299)) or
       (UTC_ITEM = 8 and (UTLCHGX2 < 5 or UTLCHGX2 > 299)) or
       (UTC_ITEM = 9 and (UTLCHGX2 < 5 or UTLCHGX2 > 600)) 
            then goto ERR1_ UTLCHGX2
     ELSE goto UTILCHGX3

0,DK,RF:    Goto UTILCHGX3	
04C	UTLCHGX3	UTLCHGX3	How much were you billed for in (last month)?

Prop #    Property Description  Company Name Utility  Amount1 Amount2 Amount3
(WHATPROP) (UTLPDESC)          (COMPNAME)   (UTILY)  (UTLCHGX1)(UTLCHGX2) (UTLCHGX3)	1-999999: IF (UTC_ITEM = 1 and (UTLCHGX3 < 10 or UTLCHGX3 >
               999)) or
       (UTC_ITEM = 2 and (UTLCHGX3 < 8 or UTLCHGX3 > 999)) or
       (UTC_ITEM = 3 and (UTLCHGX3 < 34 or UTLCHGX3 > 722)) or
       (UTC_ITEM = 4 and (UTLCHGX3 < 7 or UTLCHGX3 > 600)) or
       (UTC_ITEM = 5 and (UTLCHGX3 < 19 or UTLCHGX3 > 700)) or
       (UTC_ITEM = 6 and (UTLCHGX3 < 5 or UTLCHGX3 > 499)) or
       (UTC_ITEM = 7 and (UTLCHGX3 < 5 or UTLCHGX3 > 299)) or
       (UTC_ITEM = 8 and (UTLCHGX3 < 5 or UTLCHGX3 > 299)) or
       (UTC_ITEM = 9 and (UTLCHGX3 < 5 or UTLCHGX3 > 600))
              then goto ERR1_UTLCHGX3
     ELSEIF UTLCHGX1 = 0 OR UTLCHGX2 = 0 then goto BLPERIOD
     ELSE goto UTILCMB_S

0:  Goto BLPERIOD

DK,RF:   Goto UTILCMB_S	
04C	BLPERIOD	BLPERIOD	What is your usual billing period for the service?                          
                                       
Prop #    Property Description  Company Name Utility  Amount1 Amount2 Amount3
(WHATPROP) (UTLPDESC)          (COMPNAME)   (UTILY)  (UTLCHGX1)(UTLCHGX2) (UTLCHGX3)

1. Month
2. 2 months
3. Quarter
4. Annual
5. Other	1-4,DK,RF:   Goto UTILCMB_S

5:   Goto BLPEROTH	
04C	BLPEROTH	BLPEROTH	   Specify:

Prop #    Property Description  Company Name Utility  Amount1 Amount2 Amount3
(WHATPROP) (UTLPDESC)          (COMPNAME)   (UTILY)  (UTLCHGX1)(UTLCHGX2) (UTLCHGX3)	Goto UTILCMB_S	
04C	UTILCMB_S	UTILCMB_S	  Enter 'C' for a combined expense	C:      Goto UTILCMB

EMPTY:  IF UTC_ITEM = 3, 4, 6, or 7 and (RT10.POPGRP = 13
           or 14) then goto UTLPURCH
        ELSE goto MOREBILL

IF anything other than a 'C' or empty is entered then 
   goto CK_C	
04C	UTILCMB	UTILCMB	 12    ? [F1] 

What other utilities, fuels, or services was (Utility Description) combined with?

        Enter all that apply, separate with commas.

 Prop #   Property Description Company Name Utility Amount1 Amount2 Amount3
(WHATPROP)(UTLPDESC)         (COMPNAME) (UTILY) (UTLCHGX1)(UTLCHGX2) (UTLCHGX3)

1. Electricity
2. Natural or utility gas
3. Fuel oil
4. Bottled or tank gas
5. Other fuels including wood
6. Piped-in water and sewerage maintenance
7. Garbage and recycling collection
8. Water softening service
9. Septic tank cleaning
77. Misc. combined (unable to specify/DK)	IF UTC_ITEM = 3, 4, 6, or 7 and (RT10.POPGRP = 13 or 14)
   then goto UTLPURCH

ELSE goto MOREBILL	
04C	UTLPURCH	UTLPURCH	Were they paid for - 

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  Goto MOREBILL

2:  Goto UTILLOC	
04C	UTILLOC	UTILLOC	In what city is (Bottled/Tank gas company name) located?	Goto UTILOCST	
04C	UTILOCST	UTILOCST	? [F1]

In what state is (Bottled/Tank gas company name) located?
 
              Enter the two character state abbreviation	IF entry is not a valid abbreviation then goto CK_UTILOCST

ELSE goto MOREBILL	
04C	MOREBILL	MOREBILL	Did you receive any other (Utility Description) bills?        

Prop #    Property Description  Company Name Utility  Amount1 Amount2 Amount3
(WHATPROP) (UTLPDESC)          (COMPNAME)   (UTILY)  (UTLCHGX1)(UTLCHGX2) (UTLCHGX3)

1. Yes
2. No	1:   IF ROW number = 40 then goto ERR_MAX
     ELSE goto UTC_ITEM, next row in the table

2,DK,RF:   IF ROW number = 40 then goto S4C_END
           ELSE goto UTC_ITEM, next row in the table	
04C		S4C_END		Exit block and goto S4_SectComp	
04C		UTILY			
04C		UTIL1			
04C		UTIL2			
04C		UTIL3			
04C		UTIL4			
04C		UTIL5			
04C		UTIL6			
04C		UTIL7			
04C		UTIL8			
04C		UTIL9			
04C		UTIL10			
04D		UTLC_GX1			
04D		UTLC_GX2			
04D		UTLC_GX3			
04D		UTC_STAT			
04D		UTC_ORIG			
04C		S4_SectComp		Exit block and goto Section 5 - BSECT5	
4A		LP4A_Flag	

1. Yes
2. No		
4C		LP4C_Flag	

1. Yes
2. No		
05	S5_INTRO	S5_INTRO	Now I am going to ask about expenses for construction, repairs, alterations and  maintenance of property.

         Prop. Description  Work Desc.  
        (PRP5DESC)         (WRKDESC)    

1. Enter 1 to Continue	Goto BBLOCKA.ITEM	
05	CRB_ITEM	ITEM	SCREEN 1 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
  13    ? [F1]

First, let's talk about the construction or alteration of property you (owned/rent/own or rent).  (You should not include jobs that have been or will be totally reimbursed by someone outside your household such as a landlord./  )

Since the first of (reference month), have (you/you or any members of your household) had expenses for -

            Read each item on list.

SCREEN 2 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
  14    ? [F1]

Now, let's talk about maintenance and repairs for property you (owned/rent/own or rent).  (You should not include jobs that have been or will be totally reimbursed by someone outside your household such as a landlord./  )2
    
        Read each item on list.                      

SCREEN 3 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 
  13-14    ? [F1]

Have there been any expenses for any other property, such as property that you do not (owned/rent/own or rent),
paid for by (you/you or any members of your household)?

           If Yes - 

       Which type of job were those expenses for?

1. (Homes under construction including a vacation home or second home?/Homes under construction)
2. (Building an addition to the house or a new structure, such as a porch, garage, or new rooms?/Building an addition)
3. (Finishing a basement or an attic or enclosing a porch?/Finishing a basement, etc.)
4. (Remodeling one or more rooms in the house?/Remodeling)
5. (Landscaping the ground or planting new shrubs or trees?/Landscaping)
6. (Building outdoor patios, walks, fences, or other enclosures, driveways, or permanent swimming pools or hot tubs?/Building outdoor patios, etc.)
7. (Repairing outdoor patios, walks, fences, driveways,or permanent swimming pools?/Repairing outdoor patios, etc.)
8. (Painting, either interior or exterior, or wallpapering?/Painting or wallpapering)
9. (Plastering or paneling)
10. (Plumbing or water heating installations or repairs? /Plumbing)
11. (Electrical work?/Electrical work)
12. (Heating or air conditioning jobs?/Heating or air conditioning)
13. (Flooring installation, repair or replacement, including carpeting, wood, vinyl, and tile?/Flooring install/repair/replace)
14. (Insulation?/Insulation)
15. (Roofing, gutters or downspouts?/Roofing, gutters or downspouts)
16. (Siding?/Siding)
17. (Installation, repair, or replacement of window panes, screens, storm doors, awnings, and the like?/Install/repair/replace windows, etc)
18. (Masonry, brick or stucco work?/Masonry, brick or stucco)
19. (Other improvements or repairs?/other improvements or repairs)
95. Continue List
99. None/No more entries
888. Delete the line	1-19:   IF ITEM <> Item2Shadow then goto CK_ITEM
        ELSE goto CRMPROPI

95:     Goto next row

99:     Exit block and goto S5A_END

888:    IF no more grid lines then exit block and goto S5A_END
        ELSE goto ITEM - next line of grid	
05		PreFill	** SHOW ONLY **		
05	CRMPROPI	CRMPROPI	On which property was the work done?

       Prop Description  Work Desc  
      (WRKDESC)          (PRP5DESC) 

1. ( PROPNUM and PROPDESC for all owned properties collected in Section 3.)
2. ( PROPNUM and PROPDESC for all owned properties collected in Section 3.)
3. ( PROPNUM and PROPDESC for all owned properties collected in Section 3.)
4. ( PROPNUM and PROPDESC for all owned properties collected in Section 3.)
5. ( PROPNUM and PROPDESC for all owned properties collected in Section 3.)
6. ( PROPNUM and PROPDESC for all owned properties collected in Section 3.)
7. ( PROPNUM and PROPDESC for all owned properties collected in Section 3.)
8. ( PROPNUM and PROPDESC for all owned properties collected in Section 3.)
9. ( PROPNUM and PROPDESC for all owned properties collected in Section 3.)
10. ( PROPNUM and PROPDESC for all owned properties collected in Section 3.)
11. ( PROPNUM and PROPDESC for all owned properties collected in Section 3.)
12. ( PROPNUM and PROPDESC for all owned properties collected in Section 3.)
13. ( PROPNUM and PROPDESC for all owned properties collected in Section 3.)
14. ( PROPNUM and PROPDESC for all owned properties collected in Section 3.)
15. ( PROPNUM and PROPDESC for all owned properties collected in Section 3.)
16. ( PROPNUM and PROPDESC for all owned properties collected in Section 3.)
17. ( PROPNUM and PROPDESC for all owned properties collected in Section 3.)
18. ( PROPNUM and PROPDESC for all owned properties collected in Section 3.)
19. ( PROPNUM and PROPDESC for all owned properties collected in Section 3.)
20. ( PROPNUM and PROPDESC for all owned properties collected in Section 3.)
97. ( PROPNUM and PROPDESC for all owned properties collected in Section 3.)
98. ( PROPNUM and PROPDESC for all owned properties collected in Section 3.)
99. Property not owned or rented by household	1-20:     IF entry > total number of properties then goto 
              CK_CRMPROPI
          ELSE goto WRKDESC

97:      Goto WRKDESC

98,99,DK,RF:    Goto PRP5DESC	
05	PRP5DESC	PRP5DESC	Briefly describe the property.

   Prop Description  Work Desc  
   (WRKDESC)         (PRP5DESC)  	Goto WRKDESC	
05	WRKDESC	WRKDESC	What work was done?
     
      The description should be adequate to classify "alteration", "repair", etc., and to identify in next    
        interview.

                Prop Description  Work Desc   
               (WRKDESC)         (PRP5DESC)  	IF ITEM = 1 or 3 then goto S5_INCL

ELSEIF ITEM = 5 then goto S5BCMB_S

ELSEIF ITEM = 2, 4, 6 or 8 then goto TEMPCODE

ELSE goto CRMTYPE	
05	CRMTYPE	CRMTYPE	? [F1]

  Enter the appropriate job classification code.

      Prop Description  Work Desc   
      (WRKDESC)         (PRP5DESC)  

2. Alteration
3. Replacement
4. Maintenance and repair	2:   IF ITEM = 9, 12, 14, or 16 then goto S5BCMB_S
     ELSE goto TEMPCODE

3:   IF ITEM = 9, 11-12, 16, 18, or 19 then goto S5BCMB_S
     ELSE goto TEMPCODE

4:   IF ITEM = 10-11, 16, or 18 then goto S5BCMB_S
     ELSE goto TEMPCODE

DK,RF:   Goto S5BCMB_S	
05	TEMPCODE	TEMPCODE	  Enter the appropriate detailed job code.

      Prop Description  Work Desc  
      (WRKDESC)         (PRP5DESC)  

1. (Bathroom/Bathroom remodeling/Driveways and walkways added or improved/Painting, interior or exterior (also includes varnish, sealant, lacquer, and wa
2. (Fences/Kitchen/Kitchen remodeling/Fences added or improved/Wallpaper (also includes combination of painting and wallpapering/Other, such as drywall p
3. (Other/Patios and terraces/Bedrooms, family rooms, general purpose rooms, basement, etc./Kitchen and bathroom remodeling/Detached building/Other plumb
4. (Recreational facilities/Decks and porches/Interior restructuring of other areas /Patios and terraces/External sprinkler systems, septic tanks, and we
5. (Attached garages, carports, breezeways, greenhouses, and sheds/Recreational facilities/Garage door opener(s)/  )
6. (Any combination of 1 through 5/Other alterations to structure/   )
7. (Detached garages or carports added or improved/Recreational facilities added or improved/   )
8. (All other detached outside buildings added or improved (sheds, greenhouses, storm cellars)/Other outside additions or alterations (boat docks, terrac
9. (Patio and terraces added or improved/   )
10. (Other outside additions or alterations (boat docks, terracing, grading and filling, retaining walls)/  )	If ITEM = 2 or 4 then goto S5_INCL
ELSE goto S5BCMB_S	
05	S5BCMB_S	S5BCMB_S	  Enter 'C'  for a combined expense	C:       Goto S5B_COMB

EMPTY:   Goto S5_INCL

IF any entry other than a 'C' or the enter key is entered, 
   then goto CK_C	
05	S5B_COMB	S5B_COMB	 13-14    ? [F1]

What other work was included in this job?

     Enter all that apply, separate with commas.

5. Landscaping
6. Building outdoor patios
7. Repair outdoor patios
8. Painting/wallpapering
9. Plastering or paneling
10. Plumbing
11. Electrical work
12. Heat or air conditioning
13. Flooring installation/repair/replacement
14. Insulation
15. Roofing, gutters or downspouts
16. Siding
17. Install/Repair/Replace windows, etc
18. Masonry, brick or stucco
19. Other improvements or repairs
77. Misc. combined (unable to specify/DK)	Goto S5_INCL	
05	S5_INCL	S5_INCL	Since the first of (reference month), did (you/your household) - 

  Read each item on list
    Enter all that apply, separate with commas.

1. Pay someone else to do all or part of the work?
2. Purchase any materials, supplies, tools or equipment for doing this job?
3. Rent any tools or equipment for doing this job?	IF 1 selected then goto CONTRCTX
ELSEIF 2 selected then goto SUPPLYX
ELSE goto TOOLX	
05	CONTRCTX	CONTRCTX	Since the first of (reference month), what is the total amount you paid to someone else for this job?

       Prop Description  Work Desc  
       (WRKDESC)         (PRP5DESC) 	0-999999:   IF (ITEM = 1 and CONTRCTX > 109445) OR
               (ITEM = 2-6 and CONTRCTX > 39999) OR
               (ITEM = 7-19 and CONTRCTX > 14999) 
                  then goto ERR1_CONTRCTX
           ELSE goto CONT_MO

DK,RF:   Goto CONT_MO	
05	CONT_MO	CONT_MO	In what month or months did you pay someone else for this job?

  Enter all that apply, separate with commas.

1. January
2. February
3. March
4. April
5. May
6. June
7. July
8. August
9. September
10. October
11. November
12. December	IF CONT_MO = RESPONSE and is not in reference period then
   goto ERR3_CONT_MO
ELSEIF [((ITEM = 3, 4, 8-12 or 17) and 
        (RT10.POPGRP = 1, 2, 01 or 02)) OR 
        (ITEM = 13 and (RT10.POPGRP = 7, 8, 07 or 08))] then 
          goto CONSTORE
ELSEIF ITEM = 1-4, 10-12, or 19 then goto MAJ_APPL
ELSEIF 2 selected in S5_INCL then goto SUPPLYX
ELSEIF 3 selected in S5_INCL then goto TOOLRTX
ELSE goto REIMBRS	
05B	CONSTORE	CONSTORE	What is the name of the business that provided the service, maintenance, or repair?

        Enter store, website, or company name
         If provided from a private individual, enter "private individual."	ENTRY:  Goto CONLOC

DK, RF:   IF ITEM = 3, 4 or 10-12 then goto MAJ_APPL
          ELSEIF 2 selected in S5_INCL then goto SUPPLYX
          ELSEIF 3 selected in S5_INCL then goto TOOLRTX
          ELSE goto REIMBRS	
05B	CONLOC	CONLOC	In what city is (name of business) located?	Goto CONLOCST	
05B	CONLOCST	CONLOCST	? [F1]

In what state is (name of business) located?

        Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_CONLOCST

ELSEIF ITEM = 3, 4 or 10-12 then goto MAJ_APPL

ELSEIF 2 selected in S5_INCL then goto SUPPLYX

ELSEIF 3 selected in S5_INCL then goto TOOLRTX

ELSE goto REIMBRS	
05	MAJ_APPL	MAJ_APPL	 15    ? [F1]

Did any of the cost since (reference month) include the cost of any appliances or equipment?

       Prop Description  Work Desc  
       (WRKDESC)         (PRP5DESC)        

1. Yes
2. No	1:      Goto APP_SCR

2,DK,RF:  IF 2 selected in S5_INCL then goto SUPPLYX
          ELSEIF 3 selected in S5_INCL then goto TOOLRTX
          ELSE goto REIMBRS	
05	APP_SCR	APP_SCR	 15    ? [F1]

Which of the following appliances or equipment were included?

                     Enter up to six, separate with commas.

       Prop Description  Work Desc 
       (WRKDESC)         (PRP5DESC)

1. Cooking stove, range, or oven
2. Microwave oven
3. Refrigerator or home freezer
4. Built-in dishwasher
5. Portable dishwasher
6. Garbage disposal
7. Clothes washer or dryer
8. Range hood
9. Smoke alarms and detectors
10. Window air conditioner
11. Portable cooling and heating equipment
12. Lamps, lighting fixtures, or ceiling fans
13. Other major home appliances and equipment	Goto APPL_X	
05	APPL_X	APPL_X	What was the total cost for (description)?

     Prop Description  Work Desc
     (WRKDESC)         (PRP5DESC)	IF APPL_X < 5 or APPL_X > 4000 (and not DK or RF) then 
   goto ERR1_APPLX

ELSEIF 2 is selected in S5_INCL then goto SUPPLYX

ELSEIF 3 is selected in S5_INCL then goto TOOLRTX

ELSE goto REIMBRS	
05	SUPPLYX	SUPPLYX	Since the first of (reference month), what was the total cost of all materials, supplies, tools, or equipment (you/your household) purchased for this job?

       Prop Description  Work Desc 
       (WRKDESC)         (PRP5DESC) 	0-999999:  IF (ITEM = 1 and SUPPLYX > 7000) OR 
              (ITEM = 2-6 and SUPPLYX > 2500) OR 
              (ITEM = 7-19 and SUPPLYX > 2500) 
                   then goto ERR1_SUPPLYX
           
            ELSE goto SUPPLYMO

DK,RF:    Goto SUPPLYMO	
05	SUPPLYM	SUPPLYM	In what month or months did you make these purchases?

   Enter all that apply, separate with commas.

1. January
2. February
3. March
4. April
5. May
6. June
7. July
8. August
9. September
10. October
11. November
12. December	IF SUPPLYM = RESPONSE and it is not in reference period then 
    goto ERR3_SUPPLYM

ELSEIF 3 selected in BSECT5.BBLOCKA.BROW.S5_INCL then goto TOOLRTX

ELSE goto REIMBRS	
05	TOOLRTX	TOOLRTX	Since the first of (reference month), what was the total cost for all tools or equipment (you/your household) rented for this job?

        Prop Description  Work Desc
       (WRKDESC)         (PRP5DESC) 	0-999999:   IF TOOLRTX > 518 then goto ERR1_TOOLRTX
            ELSE goto TOOL_MO

DK,RF:    Goto TOOL_MO	
05	TOOL_MO	TOOL_MO	In what month or months did you rent these items?

   Enter all that apply, separate with commas.

1. January
2. February
3. March
4. April
5. May
6. June
7. July
8. August
9. September
10. October
11. November
12. December	REF_MONTH - CUR_MONTH:  IF entry not in reference period then 
                           goto ERR3_TOOL_MO
                        ELSE goto REIMBRS

DK, RF:   Goto REIMBRS	
05	REIMBRS	REIMBRS	Was or will any of the total cost of this job be reimbursed or paid by someone outside of your household? 

        Prop Description  Work Desc  
       (WRKDESC)         (PRP5DESC)  

1. Yes
2. No	1:        Goto REIMBRSZ

2,DK,RF:   IF BCeintro.BUSCREEN = 2 then goto MORE
           ELSE goto CRMBSNSD	
05	REIMBRSZ	REIMBRSZ	What percent of the total cost was or will be reimbursed or paid by someone outside of your household?

        Prop Description  Work Desc 
       (WRKDESC)         (PRP5DESC)  	1-99,DK,RF:  IF BCeintro.BUSCREEN = 2 then goto MORE
               ELSE goto CRMBSNSD

100:  Goto ERR2_REIMBRSZ	
05	CRMBSNSD	CRMBSNSD	Were or will any of these expenses for this job be deducted as a business expense?

        Prop Description  Work Desc 
       (WRKDESC)         (PRP5DESC)  

1. Yes
2. No	1:         Goto CRMBSNSZ

2,DK,RF:    Goto BSECT5.BBLOCKA.BROW.MORE	
05	CRMBSNSZ	CRMBSNSZ	What percent was or will be deducted?

        Prop Description  Work Desc  
       (WRKDESC)         (PRP5DESC)  	1-99,DK,RF:  Exit block and goto MORE

100:  Goto ERR2_CRMBSNSZ	
05		SUPPLYX_			
05		TOOLRTX_			
05	ANY5MORE	MORE	Did you have any other expenses for (description)?

        Prop Description  Work Desc  
       (WRKDESC)         (PRP5DESC) 

1. Yes
2. No	1:     IF ROW number = 12 then goto ERR_MAX
       ELSE goto ITEM, next row

2,DK,RF:  IF ROW number = 12 then exit block and goto S5A_END
          ELSE goto ITEM, next row	
05		CRMCODEB			
05		CRMCODE			
05		APPCDE1			
05		APPCDE2			
05		APPCDE3			
05		APPCDE4			
05		APPCDE5			
05		APPCDE6			
05		CRMCDB1			
05		CRMCDB2			
05		CRMCDB3			
05		CRMCDB4			
05		CRMCDB5			
05		CRMCDB6			
05		CRMCDB7			
05		CRMCDB8			
05		CRMCDB9			
05		CRMCDB10			
05		CRMCDB11			
05		CRMCDB12			
05		CRMCDB13			
05		CRMCDB14			
05		CRMCDB15			
05		CRMCDB16			
05		CONT_CTX			
05		APPL_X_			
05		CRB_STAT			
05		CRB_ORIG			
Section 5		CONTRACT			
Section 5		CRMMATER			
Section 5		TOOLRENT			
05		S5A_END		Goto BROW5B	
05	ADVMATER	ADVMATER	  13-14

Since the first of (reference month), excluding this month, have (you/you or any members of your household) purchased
any materials or supplies for JOBS NOT YET STARTED?       

1. Yes
2. No	1:  Goto ADVDESC

2,DK,RF:  Goto MATNSPEC	
05	ADVDESC	ADVDESC	What kind of job will the materials be used for?

                  Enter a brief description.	Goto JOBCODE	
05	JOBCODE	JOBCODE	 13-14    ? [F1]

     Select a job type below.

1. Homes under construction
2. Building an addition
3. Finishing a basement
4. Remodeling
5. Landscaping
6. Build outdoor patios
7. Repair outdoor patios
8. Painting/wallpapering
9. Plastering or paneling
10. Plumbing
11. Electrical work
12. Heat or air conditioning
13. Flooring installation/repair/replacement
14. Insulation
15. Roofing, gutters or downspouts
16. Siding
17. Install/Repair/Replace windows, etc
18. Masonry, brick or stucco
19. Other improvements or repairs	Goto ADVMATX	
05	ADVMATX	ADVMATX	What was the total cost of these materials and supplies?	1-999999: IF entry < 8 or entry > 3865 then goto ERR1_ADVMATX
          ELSEIF JOBCODE = 5-19, DK or RF then goto S5ACMB_S
          ELSE goto MATNSPEC

DK,RF:  IF JOBCODE = 5-19, DK or RF then goto S5ACMB_S
        ELSE goto MATNSPEC	
05	S5ACMB_S	S5ACMB_S	  Enter 'C'  for a combined expense	C:  Goto S5A_COMB

Empty:  IF JOBCODE = 8 AND (RT10.POPGRP = 1, 2, 01 or 02) then 
           goto MATSTORE
        ELSE goto MATNSPEC

IF anything other than "C" or blank is entered then goto CK_C	
05	S5A_COMB	S5A_COMB	 13-14    ? [F1]

What other work will be included in this job?

         Enter all that apply, separate with commas.

5. Landscaping
6. Building outdoor patios
7. Repair outdoor patios
8. Painting/wallpapering
9. Plastering or paneling
10. Plumbing
11. Electrical work
12. Heat or air conditioning
13. Flooring installation/repair/replacement
14. Insulation
15. Roofing, gutters or downspouts
16. Siding
17. Install/Repair/Replace windows, etc
18. Masonry, brick or stucco
19. Other improvements or repairs
77. Misc. combined (unable to specify/DK)	IF JOBCODE = 8 AND (RT10.POPGRP = 1, 2, 01 or 02) then 
   goto MATSTORE

ELSE goto MATNSPEC	
05A	MATSTORE	MATSTORE	What is the name of the business where the materials were purchased?

           Enter store, website, or company name
 	ENTRY:  IF UPPERCASE ENTRY contains '.COM' then goto MATNSPEC
        ELSE goto MATPURCH

DK, RF: Goto MATNSPEC	
05A	MATPURCH	MATPURCH	Were they paid for - 

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  Goto MATNSPEC

2: Goto MATLOC	
05A	MATLOC	MATLOC	Is what city is MATSTORE_Fill located?	Goto MATLOCST	
05A	MATLOCST	MATLOCST	? [F1]

Is what state is MATSTORE_Fill located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_MATLOCST

ELSE goto MATNSPEC	
05	MATNSPEC	MATNSPEC	Since the first of (reference month), excluding this month, have (you/you or any members of your household) purchased
any materials or supplies NOT FOR ANY SPECIFIC JOB?      

1. Yes
2. No	1:      Goto MATNSPCX

2,DK,RF:  Goto S5B_END	
05	MATNSPCX	MATNSPCX	What was the total cost?	1-999999: IF entry < 5 or entry > 600 then goto ERR1_MATNSPCX
          ELSE goto S5B_END

DK,RF:   Goto S5B_END	
05B		S5B_END	

1. Yes
2. No	Exit block and goto S5_Sectcomp	
05		CRMCODEA			
05		CRMCDA1			
05		CRMCDA2			
05		CRMCDA3			
05		CRMCDA4			
05		CRMCDA5			
05		CRMCDA6			
05		CRMCDA7			
05		CRMCDA8			
05		CRMCDA9			
05		CRMCDA10			
05		CRMCDA11			
05		CRMCDA12			
05		CRMCDA13			
05		CRMCDA14			
05		CRMCDA15			
05		CRMCDA16			
05		CRA_STAT			
05		CRA_ORIG			
05		ADVMATX_			
05		MATN_PCX			
5		LP5_Flag	

1. Yes
2. No		
5		LP5trnt_Flag 	

1. Yes
2. No		
05		S5_Sectcomp		Goto Section 6 - BSECT6	
06A	S6A_INTRO	INTROA	Now I am going to ask about the purchase or rental of major household appliances.  
Please include any shipping and handling charges with the cost of any item that was shipped.

          Description  Type        Month    Amount  
       (MAJTYPE)   (Purchased/ (MAJ_MO) (MAJPURX/
                    Rented)              MAJRENTX)

1. Enter 1 to Continue	Goto BTABLEA.BROW.ITEM	
06A	APA_ITEM	Item	 16    ? [F1]

Since the first of (reference month), have (you/you or any members of your household)
purchased or rented any of the following items for your household
or for someone outside of your household?

         Read each item on list.    

1. Microwave oven
2. Cooking stove, range or oven
3. Range hood
4. Refrigerator or home freezer
5. Built-in dishwasher
6. Portable dishwasher
7. Garbage disposal
8. Clothes washer or dryer
99. None/No more entries
888. Delete the line	1-8:   IF Item <> Item2Shadow then goto CK_Item
       ELSE goto Description

99:    Exit the table and goto S6A_END

888:    IF no more rows then exit block and goto S6A_END
        ELSE goto Item for the next row	
		PreFill	** SHOW ONLY **		
06A	MAJTYPE	Description	What did you purchase(or rent/  )?                             
                    
         Enter brief description of the item

      Description  Type         Month    Amount  
      (MAJTYPE)   (Purchased/  (MAJ_MO) (MAJPURX/
                   Rented)               MAJRENTX	Goto Who	
06A	GFTC_MAJ	Who	Was this item - 

    Description  Type         Month    Amount  
    (MAJTYPE)   (Purchased/  (MAJ_MO) (MAJPURX/
                 Rented)               MAJRENTX

1. Purchased for someone inside the household?
2. (Rented?/  )
3. Purchased for someone outside your household?	1,3,DK,RF:  Goto Month

2:   Goto Amount	
06A	MAJ_MO	Month	When did you purchase it?

    Description  Type         Month    Amount  
    (MAJTYPE)   (Purchased/  (MAJ_MO) (MAJPURX/
                 Rented)               MAJRENTX

1. January
2. February
3. March
4. April
5. May
6. June
7. July
8. August
9. September
10. October
11. November
12. December	REF_MONTH - CUR_MONTH: IF entry is not in the reference 
                           period then goto ERR3_Month
                       ELSE goto Amount

DK,RF:    Goto Amount	
06A	MAJ_AMOUNT	Amount	(What was the total rental expense since the first of (reference month) not including (current month

   Description  Type         Month    Amount  
   (MAJTYPE)   (Purchased/  (MAJ_MO) (MAJPURX/
                Rented)               MAJRENTX	1-999999:   IF Who = 1, 3, DK or RF) AND 
             [(Item = 1 and (Amount < 20 or Amount > 473)) or
              (Item = 2 and (Amount <  27 or Amount > 2999)) or
              (Item = 3 and (Amount < 10 or Amount > 600)) or
              (Item = 4 and (Amount < 40 or Amount > 2999)) or
              (Item = 5 and (Amount < 81 or Amount > 1000)) or
              (Item = 6 and (Amount < 10 or Amount > 530)) or
              (Item = 7 and (Amount < 35 or Amount > 450)) or
              (Item = 8 and (Amount < 41 or Amount > 2999))]
                  then goto ERR1_Amount
           ELSEIF Who = 2 AND (Amount < 5 or > 362) then 
                   goto ERR1_Amount
           ELSEIF Item and the entry in Amount for this 
                  record are equal to any records data on 
                  the pre-chart/input then goto ERR_DUP
           ELSE goto Tax

DK,RF:   Goto Install	
06A	MAJTAX	Tax	 Did this include sales tax?

    Description  Type         Month    Amount  
    (MAJTYPE)   (Purchased/  (MAJ_MO) (MAJPURX/
                 Rented)               MAJRENTX

1. Yes
2. No	Goto Install	
06A	INSTALL	Install	Were there any extra charges for installation or delivery?

        Include charges for disposal of old appliances.

     Description  Type         Month    Amount  
     (MAJTYPE)   (Purchased/  (MAJ_MO) (MAJPURX/
                  Rented)               MAJRENTX   

1. Yes
2. No	1:       Goto INST

2,DK,RF:  Goto C	
06A	MAJINSTX	INST	How much?

    Description  Type         Month    Amount  
    (MAJTYPE)   (Purchased/  (MAJ_MO) (MAJPURX/
                 Rented)               MAJRENTX	1-999999:    IF [(Item = 1 and INST > 250) or 
                 (Item = 2 and INST > 800) or    
                 (Item = 3 and INST > 50) or
                 (Item = 4 and INST > 275) or
                 (Item = 5 and INST > 200) or
                 (Item = 6 and INST > 50) or
                 (Item = 7 and INST > 400) or
                 (Item = 8 and INST > 50)] THEN 
                  goto ERR1_INST
             ELSE goto C

DK,RF:  Goto C	
06A	MAJCMB_S	C	  Enter 'C' for a combined expense.	C:        Goto CombCode

EMPTY:    IF (Who = 1 or 3) and (Item = 1, 2, 4, or 8) and
             (RT10.POPGRP = 3, 4, 03 or 04) then 
              goto APASTORE
          ELSE goto More

IF anything other than a 'C' or the Enter key is entered
   then goto CK_C	
06A	MAJCMB	CombCode	 16    ? [F1]

What other appliances is the (Appliance description) combined with?

        Enter all that apply, separate with commas

1. Microwave oven
2. Cooking stove, range or oven
3. Range hood
4. Refrigerator or home freezer
5. Built-in dishwasher
6. Portable dishwasher
7. Garbage disposal
8. Clothes washer or dryer
77. Misc. combined (unable to specify/DK)	IF (Who = 1 or 3) and (Item = 1, 2, 4, or 8) and 
   (RT10.POPGRP = 3, 4, 03 or 04) then goto APASTORE

ELSE goto More	
06A	APASTORE	APASTORE	What is the name of the business where this was purchased?

           Enter store, website, or company name	IF uppercase entry = "GROUPON" or "GROUPON.COM" then 
   goto ERR_GROUPON 

ELSEIF UPPERCASE ENTRY contains ".COM" then goto More

IF ENTRY = DK or RF then goto More

ELSE goto APAPURCH	
06A	APAPURCH	APAPURCH	Were they paid for - 

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  Goto More

2:  Goto APALOC	
06A	APALOC	APALOC	In what city is APASTORE_Fill located?	Goto APALOCST	
06A	APALOCST	APALOCST	? [F1]

In what state is APASTORE_Fill located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_APALOCST

ELSE goto More	
06A	MAJOTHER	More	Did you purchase(or rent/  ) any other (Appliance Description)?

   Description  Type         Month    Amount  
   (MAJTYPE)   (Purchased/  (MAJ_MO) (MAJPURX/
                Rented)               MAJRENTX 

1. Yes
2. No	1:     IF Row number = 7 then goto ERR_MAX
       ELSE goto Item for the next row of table

2,DK,RF:  IF Row number = 7 then exit table and goto S6A_END
          ELSE goto Item for the next row of table	
06A		ITEMCODEOUT			
06A		MAJPURX			
06A		MAJRENTX			
06A		MJAPPL1			
06A		MJAPPL2			
06A		MJAPPL3			
06A		MJAPPL4			
06A		MJAPPL5			
06A		MJAPPL6			
06A		MJAPPL7			
06A		MJAPPL8			
06A		MJAPPL9			
06A		MAJPURX_			
06A		MAJR_NTX			
06A		MAJI_STX			
06A		APA_STAT			
06A		APA_ORIG			
06A		S6A_END		Goto Section 6B - S6B_INTRO	
06B	S6B_INTRO	INTROB	Now I am going to ask about expenses for the purchase or rental of household appliances and other selected items.  Please include any shipping and handling charges with the cost of any item that was shipped.

Description  Type        Month    Amount  
MINTYPE)   (Purchased/ (MIN_MO) (MINPURX/
            Rented)             MINRENTX)

1. Enter 1 to Continue	Goto BTableB.BROW.ITEM	
06B	APB_ITEM	ITEM	SCREEN 1 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
 17    ? [F1]

Since the first of (reference month), have (you/you or any members of your household) purchased or rented any of the following items?

  Read each item on list

SCREEN 2 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

 18    ? [F1]

Have (you/you or any members of your household) purchased or rented any -- 

        Read each item on list

SCREEN 3 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

  19    ? [F1]
Have (you/you or any members of your household)  purchased or rented any --

       Read each item on list     

SCREEN 4 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
 20    ? [F1]
Have (you/you or any members of your household) purchased or rented any --

       Read each item on list     

Screen 5----------------------------------------------------------------------------------------
 21    ? [F1]

Have (you/you or any members of your household) purchased or rented any --

             Read each item on list   
                                                                    
 Screen 6----------------------------------------------------------------------------------------
 22     ? [F1]

Have (you/you or any members of your household) purchased or rented any --

             Read each item on list                                                                

1. Small electrical kitchen appliances
2. Electrical personal care appliances
3. Electric floor cleaning equipment
4. Other household appliances
5. Sewing machines
6. GPS devices, calculators, and fax machine	1-37:    IF ITEM ne Item2Shadow then goto CK_ITEM
         ELSE goto DESCRIPTION

95:      Goto ITEM - next line of grid

99:      Exit block and goto S6B_END

888:     IF no more grid lines then Exit block and 
            goto S6B_END
         ELSE goto ITEM - next line of grid	
		PreFill	** SHOW ONLY **		
06B	MINTYPE	DESCRIPTION	What did you purchase(or rent/  )?

      Enter a brief description of item.

      (*  Report items such as flash drives, memory cards, recordable discs, and tapes as code 13, Portable memory cards, recordable discs, and tapes as cod

      Description  Type        Month    Amount  
      (MINTYPE)   (Purchased/ (MIN_MO) (MINPURX/
                   Rented)              MINRENTX)	Goto WHO	
06B	GFTCMIN	WHO	Was this item ...

1. Purchased for someone inside the household?
2. (Rented?/  )
3. Purchased for someone outside your household?	1,3,DK,RF:  Goto MONTH

2:         Goto AMOUNT	
06B	MIN_MO	MONTH	When did you purchase it?

   Description  Type        Month    Amount  
   (MINTYPE)   (Purchased/ (MIN_MO) (MINPURX/
                Rented)              MINRENTX)

1. January
2. February
3. March
4. April
5. May
6. June
7. July
8. August
9. September
10. October
11. November
12. December	REF_MONTH - CUR_MONTH: IF MONTH not in reference period then
                            goto ERR3_MONTH
                        ELSE goto AMOUNT

DK,RF:   Goto AMOUNT	
06B	MIN_AMOUNT	AMOUNT	(What was the total rental expense since the first of (reference month) not including (current month)?/What did it cost?)   

   Description  Type      Month    Amount  
  MINTYPE)   (Purchased/ (MIN_MO) (MINPURX/
               Rented)             MINRENTX          	1-999999:  IF (WHO = 1, 3, DK or RF)  AND 
              ( (ITEM = 1 and (AMOUNT < 6 or AMOUNT > 499)) or
                (ITEM = 2 and (AMOUNT < 5 or AMOUNT > 299)) or
                (ITEM = 3 and (AMOUNT < 15 or AMOUNT > 600)) or
                (ITEM = 4 and (AMOUNT < 6 or AMOUNT > 896)) or
                (ITEM = 5 and (AMOUNT < 8 or AMOUNT > 4000)) or
                (ITEM = 6 and (AMOUNT < 5 or AMOUNT > 705)) or                
                (ITEM = 7 and (AMOUNT < 6 or AMOUNT > 800)) or
                (ITEM = 8 and (AMOUNT < 12 or AMOUNT > 2500)) or
                (ITEM = 9 and (AMOUNT < 6 or AMOUNT > 403)) or
                (ITEM = 10 and (AMOUNT < 5 or AMOUNT > 403)) or
                (ITEM = 11 and (AMOUNT < 5 or AMOUNT > 200)) or
                (ITEM = 12 and (AMOUNT < 8 or AMOUNT > 699)) or
                (ITEM = 13 and (AMOUNT < 3 or AMOUNT > 1299)) or
                (ITEM = 14 and (AMOUNT < 6 or AMOUNT > 1068)) or
                (ITEM = 15 and (AMOUNT < 5 or AMOUNT > 1999))  or
                (ITEM = 16 and (AMOUNT < 5 or AMOUNT > 2999)) or
                (ITEM = 17 and (AMOUNT < 11 or AMOUNT > 700)) or
                (ITEM = 18 and (AMOUNT < 5 or AMOUNT > 250)) or
                (ITEM = 19 and (AMOUNT < 15 or AMOUNT > 940)) or
                (ITEM = 20 and (AMOUNT < 5 or AMOUNT > 400)) or
                (ITEM = 21 and (AMOUNT < 10 or AMOUNT > 4200)) or
                (ITEM = 22 and (AMOUNT < 25 or AMOUNT > 886)) or
                (ITEM = 23 and (AMOUNT < 25 or AMOUNT > 2800)) or
                (ITEM = 24 and (AMOUNT < 25 or AMOUNT > 650)) or
                (ITEM = 25 and (AMOUNT < 5 or AMOUNT > 1590)) or
                (ITEM = 26 and (AMOUNT < 5 or AMOUNT > 749)) or
                (ITEM = 27 and (AMOUNT < 5 or AMOUNT > 999)) or
                (ITEM = 28 and (AMOUNT < 5 or AMOUNT > 2999)) or
                (ITEM = 29 and (AMOUNT < 5 or AMOUNT > 999)) or                
                (ITEM = 30 and (AMOUNT < 5 or AMOUNT > 1999)) or
                (ITEM = 31 and (AMOUNT < 10 or AMOUNT > 1150)) or
                (ITEM = 32 and (AMOUNT < 5 or AMOUNT > 1870)) or
                (ITEM = 33 and (AMOUNT < 40 or AMOUNT > 8480)) or
                (ITEM = 34 and (AMOUNT < 5 or AMOUNT > 3999)) or
                (ITEM = 35 and (AMOUNT < 10 or AMOUNT > 700)) or
                (ITEM = 36 and (AMOUNT < 6 or AMOUNT > 1200)) or
                (ITEM = 37 and (AMOUNT < 5 or AMOUNT > 1000)))
                   then goto ERR1_AMOUNT

         ELSEIF (WHO = 2) AND AMOUNT < 8 or > 390 then 
                goto ERR1_AMOUNT
          ELSEIF ITEM and the entry in AMOUNT are equal 
                 to any records data on the pre-chart/input 
                 then goto ERR_DUP
          ELSE goto TAX

DK,RF:    Goto C	
06B	MINTAX	TAX	Did this include sales tax?

   Description  Type        Month    Amount  
   (MINTYPE)   (Purchased/ (MIN_MO) (MINPURX/
                Rented)              MINRENTX)

1. Yes
2. No	Goto C	
06B	MINCMB_S	C	  Enter 'C' for a combined expense.	C:       Goto COMBCODE

EMPTY:   IF ITEM = 8, 21, 23, 25, or 26 then goto INSTLSCR
         ELSEIF (WHO = 1 or 3) AND [([RT10.POPGRP = 1, 2,
             01 or 02] AND (ITEM = 12, 15, 17, 18, 27-37)) or
            ([RT10.POPGRP = 5, 6, 05 or 06] and (ITEM = 14, 
            22 or 24)) or ([RT10.POPGRP = 3, 4, 03 or 04] 
            and (ITEM = 1, 3, 19, 20)) or ([RT10.POPGRP = 
            11 or 12] and ITEM = 2) or ([RT10.POPGRP = 13 
            or 14] and ITEM = 5) or ([RT10.POPGRP = 7, 8, 
            07 or 08] and (ITEM = 6, 7, 9-11, 13)) or
           ([RT10.POPGRP = 9, 09 or 10] and ITEM = 16) ]  
              then goto APBSTORE

        ELSE goto MORE

If anything other than a 'C' or the Enter key is entered then goto CK_C	
06B	MINCMB	COMBCODE	 17-22    ?[F1]

What other item is the (Item description) combined with?

       Enter all that apply, separate with commas.

1. Small electrical kitchen appliances
2. Electrical personal care appliances
3. Electric floor cleaning equipment
4. Other household appliances
5. Sewing machines
6. GPS devices, calculators, and fax machines
7. Digital book readers or tablets
8. Computers, computer systems, or related hardware
9. Computer software including computer games( /, for non-business use)
10. Computer accessories
11. Portable memory such as flash drives, memory cards, and recordable discs and tapes
12. Video game hardware or accessories
13. Telephones or accessories
14. Photographic equipment
15. Musical instruments, supplies, or accessories
16. Lawn mowing machinery, or other yard equipment
17. Power Tools
18. Non-power tools
19. Window air conditioners
20. Portable cooling or heating equipment
21. Televisions, all types including those installed in vehicles
22. DVD Players, VCRs, DVRs, or video cameras
23. Satellite dishes, receivers or accessories
24. Handheld personal music players
25. Stereos, radios, speakers, and sound components, including those installed in vehicles
26. Other sound or video equipment, including accessories
27. General sports equipment (exclude athletic shoes for sports related use, such as football, baseball, soccer or bowling)
28. Health and exercise equipment
29. Camping equipment
30. Hunting and fishing equipment, including all guns
31. Winter sports equipment
32. Water sports equipment
33. Outboard motors
34. Bicycles or bicycle equipment
35. Tricycles or battery powered riders
36. Playground equipment
37. Other sports or recreation equipment
77. Misc. combined (unable to specify/DK)	IF ITEM = 8, 21, 23, 25, 26 then goto INSTLSCR

ELSEIF (WHO = 1 or 3) AND [([RT10.POPGRP = 1, 2, 01 or 02] 
      AND (ITEM = 12, 15, 17, 18 or 27-37)) or [RT10.POPGRP 
      = 5, 6, 05 or 06] and (ITEM = 14, 22 or 24)) or 
      ([RT10.POPGRP = 3, 4, 03 or 04] and (ITEM = 1, 3, 4, 
        19 or 20)) or ([RT10.POPGRP = 11 or 12] and 
        ITEM = 2) or ([RT10.POPGRP = 13 or 14] and ITEM = 
        5) or ([RT10.POPGRP = 7, 8, 07 or 08] and (ITEM = 
        6, 7, 9-11 or 13)) or
      ([RT10.POPGRP = 9, 09 or 10] and ITEM = 16) ] 
        then goto APBSTORE

ELSE goto MORE	
06B	INSTLSCR	INSTLSCR	Were there any additional charges for installation or set-up?

   Description  Type        Month    Amount
   (MINTYPE)   (Purchased/ (MIN_MO) (MINPURX/
                Rented)              MINRENTX)

1. Yes
2. No	1:      Goto INSTLLEX

2,DK,RF:  IF (WHO = 1 or 3) AND [ ((RT10.POPGRP = 5, 6, 05 
             or 06)and (ITEM = 21, 23, 25, or 26)) OR 
            ((RT10.POPGRP = 7, 8, 07 or 08) and ITEM = 8) ]
             then goto APBSTORE
          ELSE goto MORE	
06B	INSTLLEX	INSTLLEX	How much?

   Description  Type        Month    Amount 
   (MINTYPE)   (Purchased/ (MIN_MO) (MINPURX/
                Rented)              MINRENTX)	IF INSTLLEX < 40 or > 1000 AND (not DK or RF)
   then goto ERR1_INSTLLEX

ELSEIF (WHO = 1 or 3) AND [ ((RT10.POPGRP = 5, 6, 05 or 06) 
        and (ITEM = 21, 23, 25, or 26)) OR 
       ((RT10.POPGRP = 7, 8, 07 or 08) and ITEM = 8) ] 
        then goto APBSTORE

ELSE goto MORE	
06B	APBSTORE	APBSTORE	What is the name of the business where this was purchased?

           Enter store, website, or company name	IF uppercase entry = 'GROUPON' or 'GROUPON.COM' then goto ERR_GROUPON

ELSEIF UPPERCASE ENTRY contains '.COM' then goto MORE

ELSEIF ENTRY = DK or RF then goto MORE

ELSE goto APBPURCH	
06B	APBPURCH	APBPURCH	Was this item paid for - 

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  Goto MORE

2: Goto APBLOC	
06B	APBLOC	APBLOC	In what city is (Store) located?	Goto APBLOCST	
06B	APBLOCST	APBLOCST	? [F1]

In what state is (Store) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_APBLOCST

ELSE goto MORE	
06B	S6BOTHER	MORE	Did you purchase(or rent/  ) any other (description)?

     Description  Type        Month    Amount  
    (MINTYPE)   (Purchased/ (MIN_MO) (MINPURX/
                 Rented)              MINRENTX)

1. Yes
2. No	1:    IF Row number = 34 then goto ERR_MAX
      ELSE goto ITEM, next line on the grid

2,DK,RF:    IF row number = 34 then Exit block and 
               goto S6B_END
            ELSE goto ITEM, next line on the grid	
06B		CAMOUNT			
06B		RAMOUNT			
06B		ITEMCODEOUT			
06B		MNAPPL1			
06B		MNAPPL2			
06B		MNAPPL3		NOTE:  See COMBCODE for how to set this field

Valid Values: 230,240,250,260,270,280, 
              300,310,320,330,340,350,365,390,395
              425,440,460,470,480,490
              500,510,520,530,540,550,560,570
              620,640,645,655,650,660,670
              700,750,900	
06B		MNAPPL4		NOTE:  See COMBCODE for how to set this field

Valid Values: 230,240,250,260,270,280, 
              300,310,320,330,340,350,365,390,395
              425,440,460,470,480,490
              500,510,520,530,540,550,560,570
              620,640,645,655,650,660,670
              700,750,900	
06B		MNAPPL5		NOTE:  See COMBCODE for how to set this field

Valid Values: 230,240,250,260,270,280, 
              300,310,320,330,340,350,365,390,395
              425,440,460,470,480,490
              500,510,520,530,540,550,560,570
              620,640,645,655,650,660,670
              700,750,900	
06B		MNAPPL6		NOTE:  See COMBCODE for how to set this field

Valid Values: 230,240,250,260,270,280, 
              300,310,320,330,340,350,365,390,395
              425,440,460,470,480,490
              500,510,520,530,540,550,560,570
              620,640,645,655,650,660,670
              700,750,900	
06B		MNAPPL7			
06B		MNAPPL8			
06B		MNAPPL9			
06B		MNAPPL10			
06B		MNAPPL11			
06B		MNAPPL12			
06B		MNAPPL13			
06B		MNAPPL14			
06B		MNAPPL15			
06B		MNAPPL16			
06B		MNAPPL17			
06B		MNAPPL18			
06B		MNAPPL19			
06B		MNAPPL20			
06B		MNAPPL21			
06B		MNAPPL22			
06B		MNAPPL23			
06B		MNAPPL24			
06B		MNAPPL25			
06B		MNAPPL26			
06B		MNAPPL27			
06B		MNAPPL28			
06B		MNAPPL29			
06B		MNAPPL30		NOTE:  See COMBCODE for how to set this field

Valid Values: 230,240,250,260,270,280, 
              300,310,320,330,340,350,365,390,395
              425,440,460,470,480,490
              500,510,520,530,540,550,560,570
              620,640,645,655,650,660,670
              700,750,900	
06B		MNAPPL31			
06B		MNAPPL32			
06B		MNAPPL33			
06B		MNAPPL34			
06B		MNAPPL35			
06B		MNAPPL36			
06B		MNAPPL37			
06B		MNAPPL38			
06B		MINPURX_			
06B		MINR_NTX			
06B		INST_LEX			
06B		APB_STAT			
06B		APB_ORIG			
06B		S6B_END		Goto S6_Sectcomp	
6A		LP6A_Flag	

1. Yes
2. No		
6B		LP6B_Flag	

1. Yes
2. No		
06B		S6_Sectcomp		Exit block and goto Section 7 - BSECT7	
07	S7_INTRO	S7_INTRO	Now I will ask about expenditures for household item maintenance or repairs and service contracts.

    Description  Month     Amount 
   (RPRDESC)   (SRVCMOB) (REPAIRX)

1. Enter 1 to Continue	Goto BTable.Brow.ITEM	
07	EQB_ITEM	ITEM	  23    ? [F1]

Since the first of (reference month), did (you/you or any members of your household) have any expenses for service contracts, maintenance, or repairs for any of the following items?

     Read each item on list   

1. Garbage disposal, range hood, or built-in dishwasher
2. Other household appliances, such as washer, refrigerator, or range/oven
3. Television, radio, video, or sound equipment, including those installed in autos or other vehicles
4. Computers, computer systems, or related equipment for non-business use
5. Lawn or garden equipment
6. Musical instruments or accessories
7. Hand or power tools
8. Photographic equipment
9. Sport or recreational equipment
10. Termite or pest control
11. Heating or air conditioning service contracts
99. None/No more entries
888. Delete the line	1-11:   IF ITEM ne Item2Shadow then goto CK_ITEM
        ELSE goto DESCRIPTION

95:     Goto next row

99:     Exit block and goto S7_END

888:    IF ROW number = 13 then Exit block and goto S7_END 
        ELSE goto ITEM - next line of grid	
		PreFill	** SHOW ONLY **		
07	RPRDESC	DESCRIPTION	What did the service contract( or repair/  ) cover?

   Description   Month     Amount   
   (RPRDESC)    (SRVCMOB) (REPAIRX)	Goto MONTH	
07	SRVCMOB	MONTH	In what month was the expense?

  Enter 13 for same amount each month of the reference period.

   Description   Month     Amount   
   (RPRDESC)    (SRVCMOB) (REPAIRX)

1. January
2. February
3. March
4. April
5. May
6. June
7. July
8. August
9. September
10. October
11. November
12. December
13. ^CONTMO_Fill13	REF_MONTH-CUR_MONTH:   IF entry is not in the reference 
                           period then goto ERR3_MONTH
                       ELSE goto AMOUNT

13,DK,RF:    Goto AMOUNT	
07	REPAIRX	AMOUNT	What was the total cost?

   Description   Month     Amount   
   (RPRDESC)    (SRVCMOB) (REPAIRX)	1-999999:   IF (ITEM = 1 and (AMOUNT < 7 or AMOUNT > 285)) OR 
               (ITEM = 2 and (AMOUNT < 5 or AMOUNT > 324)) OR 
               (ITEM = 3 and (AMOUNT < 5 or AMOUNT > 478)) OR
               (ITEM = 4 and (AMOUNT < 11 or AMOUNT > 413)) OR
               (ITEM = 5 and (AMOUNT < 5 or AMOUNT > 400)) OR 
               (ITEM = 6 and (AMOUNT < 5 or AMOUNT > 600)) OR 
               (ITEM = 7 and (AMOUNT < or AMOUNT > 550)) OR 
               (ITEM = 8 and (AMOUNT < 20 or AMOUNT > 398)) OR
               (ITEM = 9 and (AMOUNT < 5 or AMOUNT > 1332)) OR 
               (ITEM = 10 and (AMOUNT < 16 or AMOUNT > 742)) OR 
               (ITEM = 11 and (AMOUNT < 8 or AMOUNT > 900))) 
                      then goto ERR1_AMOUNT
           ELSEIF ITEM and the entry in AMOUNT for this 
               record are equal to any records data in the 
               prechart/input then goto ERR_DUP
           ELSE goto REPAIRTX

DK,RF:   Goto C	
07	REPAIRTX	REPAIRTX	Did this include sales tax?

   Description   Month     Amount   
   (RPRDESC)    (SRVCMOB) (REPAIRX)

1. Yes
2. No	Goto C	
07	RPRCB_S	C	     Enter 'C' for a combined expense.	C:        Goto COMBCODE

EMPTY:    IF ((ITEM = 1 or 2) and [RT10.POPGRP = 1, 2, 01 
             or 02]) OR (ITEM = 5 and [RT10.POPGRP = 9, 09 
             or 10]) then goto EQBSTORE
          ELSE goto MORE

IF anything other than a 'C' or the Enter key is entered, goto CK_C	
07	REPAIRCM	COMBCODE	 23    ? [F1]

What other service contracts, maintenance, or repairs was (Description) combined with?

         Enter all that apply, separate with commas

    Description   Month     Amount   
   (RPRDESC)    (SRVCMOB) (REPAIRX)

1. Garbage disposal, range hood, or built-in dishwasher
2. Other household appliances, such as washer, refrigerator, or range/oven
3. Television, radio, video, or sound equipment, including those installed in autos or other vehicles
4. Computers, computer systems, or related equipment for non-business use
5. Lawn or garden equipment
6. Musical instruments or accessories
7. Hand or power tools
8. Photographic equipment
9. Sport or recreational equipment
10. Termite or pest control
11. Heating or air conditioning service contracts
77. Misc. Combined (unable to specify/DK)	IF ((ITEM = 1 or 2) and [RT10.POPGRP = 1, 2, 01 or 02]) OR 
   (ITEM = 5 and [RT10.POPGRP = 9, 09 or 10]) 
    then goto EQBSTORE

ELSE goto MORE	
07	EQBSTORE	EQBSTORE	What is the name of the business that provided the service contract, maintenance, or repair?

           Enter store, website, or company name
 	IF uppercase entry = 'GROUPON' or 'GROUPON.COM' then goto ERR_GROUPON

ELSEIF UPPERCASE ENTRY contains '.COM' then goto MORE

ELSEIF ENTRY = DK or RF then goto MORE

ELSE goto EQBPURCH	
07	EQBPURCH	EQBPURCH	Was this paid for - 

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  Goto MORE

2: Goto EQBLOC	
07	EQBLOC	EQBLOC	In what city is (Store) located?	Goto EQBLOCST	
07	EQBLOCST	EQBLOCST	? [F1]

In what state is (Store) located?
 
              Enter the two character state abbreviation	IF entry is not a valid state abbreviation then goto CK_EQBLOCST

ELSE goto MORE	
07	RPRMORE	MORE	Did you pay for any other (service contracts, maintenance, or repairs/service contracts) for (Description)?

   Description   Month     Amount   
   (RPRDESC)    (SRVCMOB) (REPAIRX)

1. Yes
2. No	1:    IF ROW number = 13 then goto ERR_MAX
      ELSE goto ITEM, next line on grid
  
2,DK,RF:  IF ROW number = 13 then exit block and goto S7_END
          ELSE goto ITEM, next line on grid	
07		APPRPRYB			
07		APPRPB1			
07		APPRPB2			
07		APPRPB3			
07		APPRPB4			
07		APPRPB5			
07		APPRPB6			
07		APPRPB7			
07		APPRPB8			
07		APPRPB9			
07		APPRPB10			
07		APPRPB11			
07		APPRPB12			
07		REPAIRX_			
07		EQB_STAT			
07		EQB_ORIG			
07		S7_END		Goto S7_Sectcomp	
7		LP7_Flag	

1. Yes
2. No		
07		S7_Sectcomp		Exit block and goto Section 8A - BSECT08	
08A	S8A_INTRO	INTROA	Now I am going to ask about expenses for home furnishings and related household items.
Please include any shipping and handling charges with the cost of any item that was shipped.

          Item        Month    Amount   
          (FURNDESC) (FURNMO) (FURNPURX)

1. Enter 1 to Continue	Goto BSect08L1.BTableA.Brow.ITEM	
08A	FRA_ITEM	ITEM	SCREEN 1 -----------------------------------------------------------------------------

 24    ? [F1]

Since the first of (reference month), have (you/you or any members of your household) purchased for (you/your household) or for someone outside of your household any --
  
         Read each item on list
          
SCREEN 2 ------------------------------------------------------------------------------

 25    ? [F1]
                                  
Have (you/you or any members of your household) purchased any --

       Read each item on list

SCREEN 3 -------------------------------------------------------------------------------

 26    ? [F1]

Have (you/you or any members of your household) purchased any --

       Read each item on list

SCREEN 4 -------------------------------------------------------------------------------

 27    ? [F1]

Have (you/you or any members of your household) purchased any --

       Read each item on list    

1. Sofas?
2. Living room chairs?
3. Living room tables?
4. Ping-pong, pool tables or other similar recreation room items?
5. Other living room, family, or recreation room furniture including desks, wall units, and shelving?
6. Living room furniture combinations?
7. Dining room or kitchen furniture?
8. Mattresses or box springs?
9. Bedroom furniture other than mattresses or box springs?
10. Infants furniture?
11. Infants equipment?
12. Patio, porch, or outdoor furniture?
13. Barbeque grills or outdoor decorative items?
14. Office furniture for home use?
15. Lamps, lighting fixtures, or ceiling fans?
16. Other household decorative items?
17. Closet and storage items	1-28:   IF ITEM <> Item2Shadow then goto CK_ITEM
        Goto DESCRIPTION

95:     Goto next row

99:     Goto S8A_END

888:    IF ROW number = 34 then goto S8A_END
        ELSE goto ITEM - next line of grid	
		PreFill	** SHOW ONLY **		
08A	FURNDESC	DESCRIPTION	What did you purchase?

     Item      Month     Amount                          
     (FURNDESC)(FURNMO)  (FURNPURX)	Goto MONTH	
08A	FURNMO	MONTH	In what month did you purchase it?

   Item       Month     Amount                          
   (FURNDESC)(FURNMO)  (FURNPURX)

1. January
2. February
3. March
4. April
5. May
6. June
7. July
8. August
9. September
10. October
11. November
12. December	REF_MONTH - CUR_MONTH:   IF entry is not in reference 
                            period then goto ERR3_MONTH
                         ELSE goto WHO

DK,RF:   Goto WHO	
08A	FURNGFTC	WHO	Was this purchased for your household or for someone outside of your household?

     Item          Month      Amount
     (FURNDESC)   (FURNMO)   (FURNPURX)

1. For use by household
2. For someone outside the household	Goto AMOUNT	
08A	FURNPURX	AMOUNT	What was the purchase price?

    Item      Month     Amount                          
   (FURNDESC)(FURNMO)  (FURNPURX)	1-999999:   IF (ITEM = 1 and (AMOUNT < 21 or AMOUNT > 4999))
             OR (ITEM = 2 and (AMOUNT < 10 or AMOUNT > 1939))
             OR (ITEM = 3 and (AMOUNT < 5 or AMOUNT > 1500))
             OR (ITEM = 4 and (AMOUNT < 21 or AMOUNT > 3500))
             OR (ITEM = 5 and (AMOUNT < 11 or AMOUNT > 2400))
             OR (ITEM = 6 and (AMOUNT < 73 or AMOUNT > 7000))
             OR (ITEM = 7 and (AMOUNT < 15 or AMOUNT > 4309))
             OR (ITEM = 8 and (AMOUNT < 25 or AMOUNT > 2999))
             OR (ITEM = 9 and (AMOUNT < 10 or AMOUNT > 3500))
             OR (ITEM = 10 and (AMOUNT < 10 or AMOUNT > 1065))
             OR (ITEM = 11 and (AMOUNT < 7 or AMOUNT > 500))
             OR (ITEM = 12 and (AMOUNT < 5 or AMOUNT > 2999))
             OR (ITEM = 13 and (AMOUNT < 6 or AMOUNT > 1000))
             OR (ITEM = 14 and (AMOUNT < 10 or AMOUNT > 1300))
             OR (ITEM = 15 and (AMOUNT < 5 or AMOUNT > 999))
             OR (ITEM = 16 and (AMOUNT < 5 or AMOUNT > 999))
             OR (ITEM = 17 and (AMOUNT < 5 or AMOUNT > 317))
             OR (ITEM = 18 and (AMOUNT < 5 or AMOUNT > 423))
             OR (ITEM = 19 and (AMOUNT < 5 or AMOUNT > 298))
             OR (ITEM = 20 and (AMOUNT < 5 or AMOUNT > 300))
             OR (ITEM = 21 and (AMOUNT < 3 or AMOUNT > 416))
             OR (ITEM = 22 and (AMOUNT < 5 or AMOUNT > 499))
             OR (ITEM = 23 and (AMOUNT < 5 or AMOUNT > 499))
             OR (ITEM = 24 and (AMOUNT < 5 or AMOUNT > 300))
             OR (ITEM = 25 and (AMOUNT < 5 or AMOUNT > 290))
             OR (ITEM = 26 and (AMOUNT < 5 or AMOUNT > 4999))
             OR (ITEM = 27 and (AMOUNT < 5 or AMOUNT > 4999))
             OR (ITEM = 28 and (AMOUNT < 5 or AMOUNT > 1643))
              then goto ERR1_AMOUNT
           ELSEIF ITEM and the entry in AMOUNT for 
               this record are equal to any records data on 
               the pre-chart/input then goto ERR_DUP
           ELSE goto TAX

DK,RF:     Goto C	
08A	FRNPURTX	TAX	Did this include sales tax?

    Item       Month     Amount                          
   (FURNDESC)(FURNMO)  (FURNPURX)

1. Yes
2. No	Goto C	
08A	S8ACMB_S	C	  Enter 'C' for a combined expense.	C:  IF [ ((ITEM = 1, 2, 3, 5, 7-10, 12, or 25-28) and 
       (Rt10.POPGRP = 7, 8, 07 or 08)) OR 
       ((ITEM = 4, 11 or 18) and (Rt10.POPGRP = 1, 2, 01 
        or 02)) OR (ITEM = 13 and (Rt10.POPGRP = 9, 10 or 
        09)) OR ((ITEM = 15, 16, or 19-21) and (Rt10.POPGRP
        = 3, 4, 03 or 04)) OR ((ITEM = 22-24) and 
       (Rt10.POPGRP = 15 or 16)) ] then goto FRASTORE
    ELSE goto COMBCODE

Empty:   Goto MORE

IF anything other than an 'C' or  the Enter key is entered 
   then goto CK_C	
08A	S8A_CMB	COMBCODE	 24-27    ? [F1]

What was combined with fill for COMBCODE?

         Enter all that apply, separate with commas.
 
      Item      Month     Amount  
      (FURNDESC)(FURNMO)  (FURNPURX)

1. Sofas
2. Living room chairs 
3. Living room tables
4. Ping-pong, pool tables or other similar recreation room items
5. Other living room, family, or recreation room furniture including desks, wall units, and shelving
6. Living room furniture combinations 
7. Dining room or kitchen furniture
8. Mattresses or box springs  
9. Bedroom furniture other than mattresses or box springs
10. Infants furniture  
11. Infants equipment    
12. Patio, porch, or outdoor furniture 
13. Barbeque grills or outdoor decorative items
14. Office furniture for home use 
15. Lamps, lighting fixtures, or ceiling fans
16. Other household decorative items
17. Closet and storage items
18. Travel items including luggage
19. Stainless, silver or other flatware 
20. Non-electric cookware
21. Dishes, glasses, or serving pieces
22. Bedroom linens
23. Bathroom linens
24. Kitchen, dining room, or other linens 
25. Slipcovers, decorative pillows or cushions
26. Rugs or other non-permanent floor coverings, including carpet squares
27. Curtains or drapes
28. Blinds, shades or other window coverings
77. Misc.  Combined  (unable to specify/DK)  	IF [ ((ITEM = 1, 2, 3, 5, 7-10, 12, or 25-28) and
   (Rt10.POPGRP = 7, 8, 07 or 08)) OR 
   ((ITEM = 4, 11 or 18) and (Rt10.POPGRP = 1, 2, 01 or 
   02)) OR (ITEM = 13 and (Rt10.POPGRP = 9, 10 or 09)) OR 
   ((ITEM = 15, 16, or 19-21) and (Rt10.POPGRP = 3, 4, 03 
    or 04)) OR ((ITEM = 22-24) and (Rt10.POPGRP = 15 or 
    16)) ] then goto FRASTORE

ELSE goto MORE	
08A	FRASTORE	FRASTORE	What is the name of the business where this was purchased?

           Enter store, website, or company name	ENTRY:  IF uppercase entry = 'GROUPON' or 'GROUPON.COM' then
           goto ERR_GROUPON
        ELSEIF UPPERCASE ENTRY contains '.COM' then goto MORE
        ELSE goto FRAPURCH

DK,RF: Goto MORE	
08A	FRAPURCH	FRAPURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  Goto MORE

2: Goto FRALOC	
08A	FRALOC	FRALOC	In what city is (Store name) located?	Goto FRALOCST	
08A	FRALOCST	FRALOCST	? [F1]

In what state is (Store name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_FRALOCST

ELSE goto MORE	
08A	ANYOTH8	MORE	Did you purchase any other (description)?

    Item      Month     Amount                          
   (FURNDESC)(FURNMO)  (FURNPURX)

1. Yes
2. No	1:    IF ROW number = 34 then goto ERR_MAX
      ELSE goto ITEM, for the next row
 
2,DK,RF:   IF ROW number = 34 then goto S8_END
           ELSE goto ITEM, for the next row	
08A		S8A_END		Exit block and goto Section 8B - BlkSect08_Furniture	
08A		FURNPURY			
08A		FRNPRY1			
08A		FRNPRY2			
08A		FRNPRY3			
08A		FRNPRY4			
08A		FRNPRY5			
08A		FRNPRY6			
08A		FRNPRY7			
08A		FRNPRY8			
08A		FRNPRY9			
08A		FRNPRY10			
08A		FRNPRY11			
08A		FRNPRY12			
08A		FRNPRY13			
08A		FRNPRY14			
08A		FRNPRY15			
08A		FRNPRY16			
08A		FRNPRY17			
08A		FRNPRY18			
08A		FRNPRY19			
08A		FRNPRY20			
08A		FRNPRY21			
08A		FRNPRY22			
08A		FRNPRY23			
08A		FRNPRY24			
08A		FRNPRY25			
08A		FRNPRY26			
08A		FRNPRY27			
08A		FRNPRY28			
08A		FRNPRY29			
08A		FURN_URX			
08A		FRA_STAT			
08A		FRA_ORIG			
08B	FURNRNTL	FURNRNTL	Since the first of (reference month) not including this month, have (you/you or any members of your household) rented or leased any furniture?

1. Yes
2. No	1:         Goto FURNRNTX

2,DK,RF:   Goto REPFURN	
08B	FURNRNTX	FURNRNTX	Since the first of (reference month) not including this month -

What was the total expense?	1-99999:   IF FURNRNTX < 5 or FURNRNTX > 1340 then goto ERR1_FURNRNTX
           ELSE goto REPFURN

DK,RF:  Goto REPFURN	
08B	REPFURN	REPFURN	Since the first of (reference month) not including this month, have (you/you or any members of your household) had any expenses for repairing, refinishing or reupholstering furniture, including the cost for fabric?

1. Yes
2. No	1:        Goto REPFURNX

2,DK,RF:  Goto S8B_END	
08B	REPFURNX	REPFURNX	Since the first of (reference month) not including this month -

What was the total expense?	1-999999:   IF REPFURNX < 5 or REPFURNX > 1900 then 
               goto ERR1_REPFURNX
            ELSEIF Rt10.POPGRP = 1, 2, 01 or 02 then 
                   goto REPSTORE
            ELSE goto S8B_END

DK,RF:   IF Rt10.POPGRP = 1, 2, 01 or 02 then goto REPSTORE   
         ELSE goto S8B_END	
08B	REPSTORE	REPSTORE	What is the name of the business that repaired, refinished, or reupholstered the furniture?

           Enter store, website, or company name	IF ENTRY = DK or RF then goto S8B_END

ELSEIF uppercase entry = 'GROUPON' or 'GROUPON.COM' then 
       goto ERR_GROUPON

ELSEIF UPPERCASE ENTRY contains '.COM' then goto S8B_END

ELSE goto REPPURCH	
08B	REPPURCH	REPPURCH	   Was this service paid for - 

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  Goto S8B_END

2: Goto REPLOC	
08B	REPLOC	REPLOC	In what city is (Store) located?	Goto REPLOCST	
08B	REPLOCST	REPLOCST	? [F1]

In what state is (Store) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_REPLOCST

ELSE goto S8B_END	
08B		S8B_END		Exit block and goto S8_Sectcomp	
08B		FURN_NTX			
08B		REPF_RNX			
08B		FRB_STAT			
08B		FRB_ORIG			
8A		LP8A_Flag	

1. Yes
2. No		
08B		S8_SectComp		Exit block and goto section 9 - BSECT09	
09	S9_INTRO	S9_INTRO	Now I am going to ask about expenses for vehicle rentals and leases.

   Vehicle number  Vehicle year  Vehicle make/model  Business
   (LSDNUM)        (MODELYR)     (MKMD_SCR)          (ANYBUSIN)

1. Enter 1 to Continue	Goto RLV_ITEM in BSect9L1 Block	
09	RLV_ITEM	ITEM	  28    ? [F1]
SCREEN 1 ------------------------------------------------------------------------------------

Since the first of (reference month), have (you/you or any members of your household) rented any automobiles, trucks, vans, minivans, or SUVs, which were not used entirely for business?  Do not include leased vehicles.

SCREEN 2 --------------------------------------------------------------------------

Since the first of (reference month), have (you/you or any members of your household) rented any other types of vehicles which were not used entirely for business?

 IF YES -  
     
     Did you rent any - 

1. Automobiles, trucks, minivans, vans, or SUVs'
2. Motor homes
3. Campers, including those attached to trucks
4. Motorcycles, motor scooters, or mopeds (motorized bicycles)
5. Boats, with a motor
6. Boats, without a motor
7. Trailers other than a camper type, such as for a boat or cycle
8. Private aircraft
9. Other vehicles
95. Continue list
99. None/No more entries
888. Delete the line	1-9:    IF ITEM <> Item2Shadow then goto CK_ITEM
        ELSE goto ANYVACAT

95:     Goto ITEM - next row

99:     IF no vehicles on inventory chart or all vehicles 
           have 8500.LSD_STAT = 3 then exit block and 
           goto BLEASE.BROW.ITEM
        ELSE exit block and goto the TblInventory block

888:   IF no more table rows THEN
          if no vehicles on inventory chart or all vehicles 
             have 8500.LSD_STAT = 3 then exit block and 
             goto BSECT9L2.BLEASE.BROW.ITEM
          else exit block and goto the TBLINVENTORY block
       ELSE goto ITEM - next row of table	
09		PreFill	** SHOW ONLY **		
09	ANYVACAT	ANYVACAT	Was the (description) rented solely for use on a vacation, overnight
trip, or a trip of 75 miles or more one way?

1. Yes
2. No	Goto AMOUNT	
09	RENTEXPX	AMOUNT	Since the first of (reference month), not including (current month), what has been your expense for renting this vehicle?	IF AMOUNT < 10 or AMOUNT >1200 then goto ERR1_AMOUNT

ELSEIF BCeintro.BUSCREEN = 2 and ITEM = 1 and 
      (Rt10.POPGRP = 5, 6, 05 or 06) then goto RLVSTORE

ELSEIF BCeintro.BUSCREEN = 2 then goto MORE

ELSE goto ANYBSNRM	
09	ANYBSNRM	ANYBSNRM	Were or will any of the rental expenses be deducted as business expenses, reimbursed, or paid by someone outside of the household?

1. Yes
2. No	1:  Goto BSNSPCTZ

2,DK,RF:   IF ITEM = 1 and [Rt10.POPGRP = 5, 6, 05 or 06] 
              then goto RLVSTORE
           ELSE goto MORE	
09	BSNSPCTZ	BSNSPCTZ	What percent of the total expense will this cover?	1-99,DK,RF:  IF ITEM = 1 and [Rt10.POPGRP = 5, 6, 05 or 06] 
                then goto RLVSTORE 
             ELSE goto MORE

100:    Goto ERR2_BSNSPCTZ	
09	RLVSTORE	RLVSTORE	What is the name of the rental car company used?
 
            Enter store, website, or company name	ENTRY:  IF uppercase entry = 'GROUPON' or 'GROUPON.COM' then
           goto ERR_GROUPON
        ELSE goto RLVPIKUP

DK,RF:  Goto MORE	
09	RLVPIKUP	RLVPIKUP	In what city was the vehicle picked up?	Goto RLVPIKST	
09	RLVPIKST	RLVPIKST	? [F1]

In what state was the vehicle picked up?
 
            Enter the two character state abbreviation	IF entry is not a valid state abbreviation then
   goto CK_RLVPIKST

ELSE goto RLVRSRV	
09	RLVRSRV	RLVRSRV	Was the reservation made directly with (Car company) or through a third party?

1. Direct
2. Third party	1,DK,RF:    IF uppercase entry in RLVSTORE contains '.COM' 
               then goto MORE
           ELSE goto RLVPURCH

2:    Goto THRDPRTY	
09	THRDPRTY	THRDPRTY	What is the name of the company you used to make your reservation?
 
            Enter store, website, or company name.	IF UPPERCASE ENTRY contains '.COM,' DK, or RF then goto MORE

ELSE goto RLVPURCH	
09	RLVPURCH	RLVPURCH	Was this reservation made -  

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4, DK,RF:  Goto MORE

2:  IF THRDPRTY = RESPONSE then goto THRDPLOC
    ELSE goto MORE	
09	THRDPLOC	THRDPLOC	In what city is (company name) located?	Goto THDPLCST	
09	THDPLCST	THDPLCST	? [F1]

In what state is (company name) located?
 
     Enter the two character state abbreviation	IF entry is not a valid state abbreviation then
    goto CK_THDPLCST

ELSE goto MORE	
09	RENT_MORE	MORE	Did you rent any other (description)? 

1. Yes
2. No	1:   IF ROW number = 10 then goto ERR_MAX
     ELSE goto ITEM

2,DK,RF:   IF row number = 10 then
              IF no vehicles on inventory chart or 
                 all vehicles have 8500.LSD_STAT = 3 then 
                 exit block and goto BLEASE.BROW.ITEM
              ELSE exit block and goto TblInventory block
           ELSE goto ITEM	
09		RENTCODE			
09		RENT_XPX			
09		RLV_STAT			
09		RLV_ORIG			
09		LSDNUM	**  SHOW VARIABLE  **		
09		MODELYR	**  SHOW ONLY  **		
09		MKMD_SCR	**  SHOW ONLY  **		
09		OTHMODEL	**  SHOW VARIABLE  **		
09		ANYBUSIN	**  SHOW ONLY  **

1. Yes
2. No		
09	LVIHAVE	LVIHAVE	Now I am going to ask about leased vehicles you mentioned previously.

Are you still leasing the  (model year) (vehicle make and model)? 

   If the vehicle was purchased at the end of the lease, collect the new vehicle in Section 10

   Vehicle Number  Vehicle Year  Vehicle Make/Model  Business
   (LSDNUM)        (MODELYR)     (MKMD_SCR)         (ANYBUSIN)

1. Yes
2. No	1,DK,RF:   Goto S09INV_END

2:         Goto LVIENDMO	
09	LVIENDMO	LVIENDMO	What month was the lease terminated?

   Vehicle Number  Vehicle Year  Vehicle Make/Model  Business
   (LSDNUM)        (MODELYR)     (MKMD_SCR)         (ANYBUSIN)

1. January
2. February
3. March
4. April
5. May
6. June
7. July
8. August
9. September
10. October
11. November
12. December	Goto TERMFEE	
09	TERMFEE	TERMFEE	? [F1]

Were any fees incurred at the termination of the lease?

   Vehicle Number  Vehicle Year  Vehicle Make/Model  Business
   (LSDNUM)        (MODELYR)     (MKMD_SCR)         (ANYBUSIN)

1. Yes
2. No	1:        Goto TERMFEEX

2,DK,RF:   Goto S09INV_END	
09	TERMFEEX	TERMFEEX	How much?

   Vehicle Number  Vehicle Year  Vehicle Make/Model  Business
   (LSDNUM)        (MODELYR)     (MKMD_SCR)         (ANYBUSIN)	1-99999:   IF TERMFEEX < 25 or TERMFEEX > 7000 then 
              goto ERR1_TERMFEEX
           ELSE goto S09INV_END

DK,RF:  Goto S09INV_END	
09		S09INV_END		IF no more vehicles on the inventory table then exit block and goto the BSECT09L2 Block

ELSE goto LVIHAVE for next appropriate vehicle on the 
     inventory table	
09		TERM_EEX			
09		MATCHID			
09	LSD_ITEM	ITEM	Since the first of (reference month), have (you/you or any members of your household) (made any lease payments or/  ) begun leasing any automobiles, trucks, vans, minivans, or SUVs not used entirely for business?

1. Automobiles, trucks, vans, minivans, or SUVs
99. None/No more entries
888. Delete the line	1:      Goto MODELYR

99:     Exit block and goto S9_END

888:    IF no more rows then exit block and goto S9_END
        ELSE goto ITEM - next row of the table	
09		LSDNUM	** SHOW/OUT Field **		
09		DESCRIPTION	** SHOW OWNLY **		
09	MODELYR	MODELYR	      Ask if necessary

What is the model year of the vehicle?	1900-current year + 1:  IF MODELYR < (current year + 1) 
                           then goto CK_MODELYR
                        ELSEIF MODELYR < current year - 5 then goto 
                        CK2_MODELYR
                        ELSE goto MKMD_SCR

DK,RF:    Goto MKMD_SCR	
09	MKMD_SCR	MKMD_SCR	What is the make and model of this vehicle?

     If vehicle make and model is not  found, key X	X:   Goto OTHMODEL

ENTRY besides X, DK, RF:   IF BCeintro.BUSCREEN = 2 then goto NUMPAY
                           ELSE goto ANYBUSIN	
09	OTHMODEL	OTHMODEL	  Specify other make and model	IF BCeintro.BUSCREEN = 2 then goto NUMPAY

ELSE goto ANYBUSIN	
09	ANYBUSIN	ANYBUSIN	Is it used for business?

1. Yes
2. No	1:  Goto PRCBSNSZ

2,DK,RF:  Goto NUMPAY	
09	PRCBSNSZ	PRCBSNSZ	What percentage of the mileage is counted as a business expense?	1-99,DK,RF:  Goto NUMPAY

100:   Goto ERR2_PRCBSNSZ	
09	NUMPAY	NUMPAY	What was the number of payments contracted for?	1-999:    IF NUMPAY < 12 or NUMPAY > 48 then goto ERR1_NUMPAY
          ELSE goto PMTMONTH

DK,RF:    Goto PMTMONTH	
09	PMTMONTH	PMTMONTH	In what month was or will the first payment be made?

1. January
2. February
3. March
4. April
5. May
6. June
7. July
8. August
9. September
10. October
11. November
12. December	Goto PMTYEAR	
09	PMTYEAR	PMTYEAR	In what year was or will the first payment be made?	IF pmtyear < current year + 1 then goto CK_PMTYEAR
ELSEIF PMTYEAR < (MODELYR - 2) then goto CK2_PMTYEAR
ELSE goto PAYEXPX	
09	PAYEXPX	PAYEXPX	(What is your monthly payment amount?/What is the amount of each payment?)	IF NUMPAY >= 12 AND (entry < 158 or entry > 700) then 
   goto ERR1_PAYEXPX

ELSEIF NUMPAY < 12 then goto PAYTIME

ELSE goto ANYEXTRA	
09	PAYTIME	PAYTIME	What period is covered by each payment?  

1. Week
2. 2 Weeks
3. Month
4. Quarter
5. Semiannually
6. Annually
7. One time payment
8. Other	1:    IF PAYEXPX < 40 or PAYEXPX > 189 then goto ERR1_PAYTIME
      ELSE goto ANYEXTRA

2:    IF PAYEXPX < 79 or PAYEXPX > 377 then goto ERR1_PAYTIME
      ELSE goto ANYEXTRA

3:    IF PAYEXPX < 158 or PAYEXPX > 700 then 
         goto ERR1_PAYTIME
      ELSE goto ANYEXTRA

4:    IF PAYEXPX < 474 or PAYEXPX > 2262 then 
         goto ERR1_PAYTIME
      ELSE goto ANYEXTRA

5:    IF PAYEXPX < 948 or PAYEXPX > 4524 then 
          goto ERR1_PAYTIME
      ELSE goto ANYEXTRA

6:    IF PAYEXPX < 1500 or PAYEXPX > 9000 then 
         goto ERR1_PAYTIME
      ELSE goto ANYEXTRA

7:    IF PAYEXPX < 5000 or PAYEXPX > 10000 then 
         goto ERR1_PAYTIME
      ELSE goto ANYEXTRA

8:    IF PAYEXPX < 5 or PAYEXPX > 9000 then goto ERR1_PAYTIME
      ELSE goto PAYOTH

DK,RF:  IF PAYEXPX < 5 or PAYEXPX > 9000 then 
           goto ERR1_PAYTIME
        ELSE goto ANYEXTRA	
09	PAYOTH	PAYOTH	  Specify:	Goto ANYEXTRA	
09	ANYEXTRA	ANYEXTRA	Does the ($(entry in PAYEXPX) payment / payment) include any charges other than the lease amount such as auto insurance or maintenance?

1. Yes
2. No	1:  Goto EXTRAEXP

2,DK,RF:   Goto ANYEMPLY	
09	EXTRAEXP	EXTRAEXP	How much of the payment is for these extra charges?	1-99999:  IF EXTRAEXP > PAYEXPX then goto CK_EXTRA
     ELSEIF (PAYTIME = 1 and (EXTRAEXP < 5 or EXTRAEXP > 100)) OR 
            (PAYTIME = 2 and (EXTRAEXP < 5 or EXTRAEXP > 200)) OR 
            (PAYTIME = 3 and (EXTRAEXP < 5 or EXTRAEXP > 400)) OR
            (PAYTIME = 4 and (EXTRAEXP < 5 or EXTRAEXP > 1200)) OR 
            (PAYTIME = 5 and (EXTRAEXP < 5 or EXTRAEXP > 2400)) OR
            (PAYTIME = 6 and (EXTRAEXP < 5 or EXTRAEXP > 4800)) OR
            (PAYTIME = 7 and (EXTRAEXP < 5 or EXTRAEXP > 3000)) OR
            (PAYTIME = 8 and (EXTRAEXP < 5 or EXTRAEXP > 3000)) OR 
          (PAYTIME = DK or RF and EXTRAEXP < 5 or EXTRAEXP > 3000))
                     then goto ERR1_EXTRAEXP
           ELSE goto ANYEMPLY

DK,RF:     Goto ANYEMPLY	
09	ANYEMPLY	ANYEMPLY	Is any of the ($ (amount in PAYEXPX) ) lease payment paid by an employer?

1. Yes
2. No	1:       Goto EMPLYEXP

2,DK,RF:   Goto ANYTRADE	
09	EMPLYEXP	EMPLYEXP	How much?	1-99999:  IF EMPLYEXP < 5 or EMPLYEXP > 525 then goto ERR1_EMPLYEXP
          ELSEIF EMPLYEXP > PAYEXPX then goto CK_EMPLYEXP
          ELSE goto ANYTRADE

DK,RF:    Goto ANYTRADE	
09	ANYTRADE	ANYTRADE	Was a trade-in allowance received?

1. Yes
2. No	1:      Goto TRADEEXP

2,DK,RF:  Goto ANYDOWN	
09	TRADEEXP	TRADEEXP	How much?	1-999999:  IF TRADEEXP < 400 or TRADEEXP > 26000 then 
              goto ERR1_TRADEEXP
           ELSE goto ANYDOWN

DK,RF:  Goto ANYDOWN	
09	ANYDOWN	ANYDOWN	Was a cash down payment made?

     Read if necessary -

     Your lease agreement may list this as a capitalized cost reduction.

1. Yes
2. No	1:   Goto DOWNEXP

2,DK,RF:   Goto ANYHAVE	
09	DOWNEXP	DOWNEXP	How much?	1-999999:   IF DOWNEXP < 262 or DOWNEXP > 10000 then goto ERR1_DOWNEXP
            ELSE goto ANYDNEMP

DK,RF:   Goto ANYDNEMP	
09	ANYDNEMP	ANYDNEMP	Was any portion of the cash down payment paid by an employer?

1. Yes
2. No	1:        Goto DNEMPEXP

2,DK,RF:   Goto ANYHAVE	
09	DNEMPEXP	DNEMPEXP	How much?	1-999999:   IF DNEMPEXP < 5 or DNEMPEXP > 2500 then 
               goto ERR1_DNEMPEXP
            ELSEIF DNEMPEXP > DOWNEXP then goto CK_DNEMPEXP
            ELSE goto ANYHAVE

DK,RF:   Goto ANYHAVE	
09	ANYHAVE	ANYHAVE	Are you still leasing this vehicle?

        If the vehicle was purchased at the end of the lease, collect the new vehicle in Section 10.

1. Yes
2. No	1,DK,RF:   Goto LSDSTORE

2:      Goto LSDENDMO	
09	LSDENDMO	LSDENDMO	In what month was the lease terminated?

1. January
2. February
3. March
4. April
5. May
6. June
7. July
8. August
9. September
10. October
11. November
12. December	Goto LSDENDYR	
09	LSDENDYR	LSDENDYR	In what year was the lease terminated?	IF lsdendyr gt current year + 1 then goto CK_LSDENDYR
ELSEIF LSDENDMO/ LSDENDYR is before PMTMONTH/PMTYEAR then goto CK2_LSDENDYR
ELSE goto ANYFEES	
09	ANYFEES	ANYFEES	? [F1]

Were any fees incurred at the termination of the lease?

1. Yes
2. No	1:       Goto FEESEXP

2,DK,RF:  IF RT10.POPGRP = 1-16 or 01-09 then goto LSDSTORE
          ELSE goto MORE	
09	FEESEXP	FEESEXP	How much?	IF FEESEXP < 50 or FEESEXP > 3000 then goto ERR1_FEESEXP
             
ELSEIF RT10.POPGRP = 1-16 or 01-09 then goto LSDSTORE

ELSE goto MORE	
09	LSDSTORE	LSDSTORE	What is the name of the business that provided this leased vehicle?
 
             Enter store, website, or company name	ENTRY:  IF UPPERCASE ENTRY contains ".COM" then goto MORE
         ELSE goto LSDPURCH

DK,RF:  Goto MORE	
09	LSDPURCH	LSDPURCH	Was this leased - 

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF: Goto MORE

2:  Goto LSDLOC	
09	LSDLOC	LSDLOC	In what city is (Business name) located?	Goto LSDLOCST	
09	LSDLOCST	LSDLOCST	? [F1]

In what state is (Business name) located?
 
            Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_LSDLOCST

ELSE goto MORE	
09	ANYOTH	MORE	Did you lease any other automobiles, trucks, vans, minivans, or SUVs?

1. Yes
2. No	1:   IF ROW number = 6 then goto ERR_MAX
     ELSE goto ITEM, next row

2,DK,RF:   Exit block and goto S09_END	
09		LSDCODE			
09		MKMDEL			
09		NUMPAY_			
09		PAYEXPX_			
09		EXTR_EXP			
09		EMPL_EXP			
09		TRAD_EXP			
09		DOWNEXP_			
09		DNEM_EXP			
09		FEESEXP_			
09		LSD_STAT			
09		LSD_ORIG			
09		MATCHID			
09		S9_END		Exit block and goto BSect10  (Section 10)	
09		LP9R_Flag	

1. Yes
2. No		
10	S10_INTRO	S10_INTRO	Now I'm going to ask about owned vehicles.

 Vehicle      Vehicle      Vehicle        Business          
 Number       Year         Make/Model     Use    
(VEHICIB)    (VEHICYR)    (MKMDL_SC)     (VEHBSNS)

1. Enter 1 to Continue	IF there are vehicles on the chart with 8500.OVB_STAT <> 3 
   then goto TBLInv.Binv.OVAHAVE

ELSE goto BVehicle.Brow.ITEM	
10		VEHICIB	** SHOW VARIABLE **		
10		VEHICYR	** SHOW Variable **		
10		OWNMAKEMODEL	** SHOW ONLY **		
10		VEHBSNS	** SHOW ONLY **		
10	OVAHAVE	OVAHAVE	(Do/Does) (you/your household) still have the (Car Description)?

 Vehicle     Vehicle       Vehicle       Business          
 Number      Year          Make/Model    Use    
(VEHICIB)   (VEHICYR)     (MKMDL_SC)    (VEHBSNS)

1. Yes
2. No	1,DK,RF:   Goto OVAHAVE for next appropriate vehicle on 
                chart, if no more vehicles exit block and 
                goto ITEM

2:   Goto BDisposed.VEHDISP	
09		MATCHID			
10		INCLUDE_DISPOSED			
10	OVB_ITEM	ITEM	 28    ? [F1]

SCREEN 1A -----------------------------------------------------------------------------------

(Since the first of  (REF_MONTH), (have/has) (you/your household) purchased or acquired any vehicle that is not used entirely for business? Include th

     IF YES - What kind of vehicle was it?

SCREEN 1B ----------------------------------------------------------------------------

(Do/Does) (you/your household) own any automobiles, trucks, minivans, vans or SUV's which were not used entirely for business?

SCREEN 2 ------------------------------------------------------------------------------------

(Do/Does) (you/your household) own any other types of vehicles including boats and planes which are not used entirely for business?

        IF YES-  Read each item on list
     
              Do you own any. . .
     
SCREEN 3-------------------------------------------------------------------------

(Have/Has) (you/your household) purchased any (other/  ) vehicles since the first of  (reference month) for someone outside of your household?

 IF YES - 

      What kind of vehicle(s) did you purchase?

SCREEN 4 ---------------------------------------------------------------------------

(Have/Has) (you/your household) disposed of (any/any automobiles or) other vehicles since the first of (reference month)?

     IF YES - 

         Which kind of vehicle(s) did you dispose of?

1. Automobiles, trucks, minivans, vans, or SUVs'
2. Motor homes
3. Campers, including those attached to trucks
4. Motorcycles, motor scooters, or mopeds (motorized bicycles)
5. Boats, with a motor
6. Boats, without a motor
7. Trailers other than a camper type, such as for a boat or cycle
8. Private aircraft
9. Other vehicles
95. Continue list
99. None/No more entries
888. Delete the line	1:       Goto VEHICYR

2-9:    IF BCeintro.BUSCREEN = 2 goto VEHNEWU
        ELSE goto VEHBSNS

95:      Goto ITEM, next screen

99:      Goto S10_END

888:     IF no more rows then goto S10_END
         ELSE goto ITEM - for the next row	
10		PreFill	** SHOW ONLY **		
10	VEHICYR	VEHICYR	What (Was/Is) the model year of the vehicle?	1900-current year + 2:   IF entry > (current year+2) then 
                               goto CK_VEHICYR
                         ELSE goto MKMDL_SC

DK,RF:    Goto MKMDL_SC	
10	MKMDL_SC	MKMDL_SC	What  (Was/Is) the make and model of this vehicle?

     If vehicle make and model is not found, key X.	30 characters: IF MKMDLY(4:5) = XX or ZZ then goto OTHMDLY
               ELSE goto FUELTYPE

DK,RF:  Goto AUTOTRK

X:   Goto OTHMDLY	
10	OTHMDLY	OTHMDLY	   Specify:	IF ITEM = 2-9 THEN:
     IF BCeintro.BUSCREEN = 2 goto VEHNEWU
        ELSE goto VEHBSNS

ELSE goto AUTOTRK	
10	AUTOTRK	AUTOTRK	Is this vehicle an automobile or a truck, minivan, van or SUV?

1. Automobile
2. Truck, van, minivan, or SUV	Goto FUELTYPE	
10	FUELTYPE	FUELTYPE	Is it fueled by -

    Read each item on list.

1. Gasoline only?
2. Diesel fuel?
3. Hybrid electric/gasoline?
4. Electric only?
5. FlexFuel/E85?
6. Other - specify?	1-5,DK,RF:  IF BCeintro.BUSCREEN = 2 goto VEHNEWU
             ELSE goto VEHBSNS

6:   Goto FUELOTH	
10	FUELOTH	FUELOTH	   Specify:	IF BCeintro.BUSCREEN = 2 goto VEHNEWU 

ELSE goto VEHBSNS	
10	VEHBSNS	VEHBSNS	(Was/Is) it used for business?

1. Yes
2. No	1:  Goto VEHBSNZ

2,DK,RF:  Goto VEHNEWU	
10	VEHBSNZ	VEHBSNZ	What percentage of the mileage (was/is) counted as a business expense?	1-99,DK,RF:    Goto VEHNEWU

100:   Goto ERR2_VEHBSNZ	
10	VEHNEWU	VEHNEWU	Was it new or used when acquired?  

1. New
2. Used	1:     IF Kind = 1, 2, or 4 then goto VEHGFTC
       ELSE goto VEHPURMO

2,DK,RF:    IF Kind = 1, 2, or 4 then goto VEHGFTC
            ELSE goto VPURINDV	
10	VEHGFTC	VEHGFTC	Was this vehicle - 

1. Purchase for own use?
2. Purchased for someone outside of your household?
3. Received as a gift?	1,2,DK,RF:  IF VEHNEWU = 1 then goto VEHPURMO
            ELSE goto VPURINDV

3:     IF DISPOSED = 1 then goto VEHDISP
       ELSE goto ANYOTHR	
10	VPURINDV	VPURINDV	Was this vehicle purchased from a private individual? 

1. Yes
2. No	IF ITEM = 1-2 or 4 AND VEHGFTC = 3 AND DISPOSED <> 1 then 
   goto ANYOTHR

ELSEIF ITEM = 1-2 or 4 AND VEHGFTC = 3 AND DISPOSED = 1 then
       goto VEHDISP

ELSE goto VEHPURMO	
10	VEHPURMO	VEHPURMO	In what month was it purchased?

1. January
2. February
3. March
4. April
5. May
6. June
7. July
8. August
9. September
10. October
11. November
12. December	Goto VEHPURYR	
10	VEHPURYR	VEHPURYR	In what year was it purchased?	1900-current year:  IF the month and year (VEHPURMO and 
                       VEHPURYR) are more than one month
                        in the future then goto CK_VEHPURYR
                    ELSEIF (VPURINDV = 2, DK or RF) AND 
                         (CURRENT YEAR - VEHPURYR <= 5) AND 
                         ((ITEM = 3, 5, 6, or 7) OR
                          (VEHNEWU = 1 and ITEM = 1 or 4))
                         AND (Rt10.POPGRP = 1-16 or 01-09)
                         then goto OVBSTORE
                       ELSE goto VFINANCE

DK,RF:   Goto VFINANCE	
10	OVBSTORE	OVBSTORE	What is the name of the business where this vehicle was purchased?

           Enter store, website, or company name	IF uppercase entry = "GROUPON" or "GROUPON.COM"
    then goto ERR_GROUPON

ELSEIF UPPERCASE ENTRY contains ".COM" then goto VFINANCE

ELSEIF ENTRY = DK or RF then goto VFINANCE

ELSE goto OVBPURCH	
10	OVBPURCH	OVBPURCH	Was this paid for - 

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  Goto VFINANCE

2: Goto OVBLOC	
10	OVBLOC	OVBLOC	In what city is (store) located?	Goto OVBLOCST	
10	OVBLOCST	OVBLOCST	? [F1]

In what state is (store) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_OVBLOCST

ELSE goto VFINANCE	
10	VFINANCE	VFINANCE	Was any portion of the purchase price financed?

1. Yes
2. No	1:           Goto VLOANST

2,DK,RF:  IF VEHPURMO + VEHPURYR is prior to 3 months ago AND
            DISPOSED = 1 then goto VEHDISP
          ELSIF VEHPURMO + VEHPURYR is prior to 3 months ago
                AND DISPOSED ne 1 then goto ANYOTHR
          ELSE goto TRADE	
10	VLOANST	VLOANST	On the first of (reference month), were there remaining loan payments?

1. Yes
2. No	1,DK,RF:   Goto TRADE

2:    IF VEHPURMO + VEHPURYR is prior to 3 months ago AND
         DISPOSED = 1 then goto VEHDISP
      ELSEIF VEHPURMO + VEHPURYR is prior to 3 months ago AND
             DISPOSED ne 1 then goto ANYOTHR
      ELSE goto TRADE	
10	TRADE	TRADE	Was a trade-in allowance received?

1. Yes
2. No	1:      Goto TRADEX

2,DK,RF:  Goto NETPURX	
10	TRADEX	TRADEX	How much?	0-999999:  IF TRADEX < 200 or TRADEX > 19000 then goto ERR1_TRADEX
           ELSE goto NETPURX

DK,RF:   Goto NETPURX	
10	NETPURX	NETPURX	What was the amount paid for the vehicle after (trade-in allowance, /  ) rebate, and discount?

           Include destination fee in the price.	0-999999:  IF (ITEM = 1 and (NETPURX < 500 or NETPURX > 99999))
           or (ITEM = 2 and (NETPURX < 2500 or NETPURX > 127500))
           or (ITEM = 3 and (NETPURX < 533 or NETPURX > 65000))
           or (ITEM = 4 and (NETPURX < 420 or NETPURX > 29999)) 
           or (ITEM = 5 and (NETPURX < 200 or NETPURX > 99999)) 
           or (ITEM = 6 and (NETPURX < 200 or NETPURX > 63000)) 
           or (ITEM = 7 and (NETPURX < 240 or NETPURX > 29999))
          or (ITEM = 8 and (NETPURX < 4000 or NETPURX > 120000))
          or (ITEM = 9 and (NETPURX lt 250 or gt 29999)) 
              then goto ERR1_NETPURX
         ELSE goto SALESTAX

DK,RF:   IF VLOANST = 1 then goto DNPAYMTX
         ELSE goto ANYOTHR	
10	SALESTAX	SALESTAX	Did this include sales tax?

1. Yes
2. No	IF VLOANST = 1 then goto DNPAYMTX
ELSE goto ANYOTHR	
10	DNPAYMTX	DNPAYMTX	What was the amount of the cash down payment?	0-999999:   IF (ITEM = 1 and DNPAYMTX > 25000) OR
               (ITEM = 2 and DNPAYMTX > 30000) OR
               (ITEM = 3 and DNPAYMTX > 50000) OR
               (ITEM = 4 and DNPAYMTX > 15000) OR
               (ITEM = 5 and DNPAYMTX > 26000) OR
               (ITEM = 6 and DNPAYMTX > 15000) OR
               (ITEM = 7 and DNPAYMTX > 10000) OR
               (ITEM = 8 and DNPAYMTX > 15000) OR
               (ITEM = 9 and DNPAYMTX > 15000) 
                   then goto ERR1_DNPAYMTX
            ELSEIF DNPAYMTX > NETPURX and (NETPURX <> DK or 
                   RF) then goto CK_DNPAYMTX
            ELSE goto VEHEQTLN

DK,RF:  Goto VEHEQTLN	
10	VEHEQTLN	VEHEQTLN	Was the source of credit a Home Equity Loan?

1. Yes
2. No	Goto PRINCIPX	
10	PRINCIPX	PRINCIPX	How much was borrowed, excluding any interest?	1-99:   Goto CK_PRINCIPX

100-999999:  IF [PRINCIPX > ((NETPURX * 1.10) - DNPAYMTX)] OR
                [PRINCIPX < ((NETPURX * 0.90) - DNPAYMTX)]
                 then goto ERR1_PRINCIPX 
              ELSE goto VINTRATE

DK,RF:  Goto VINTRATE	
10	VINTRATE	VINTRATE	What was the interest rate?

    Enter percent including decimal.	00.000-99.999:    IF VINTRATE > 12 then goto ERR1_VINTRATE
                  ELSE goto PMT1YR

DK,RF:    Goto PMT1YR	
10	PMT1YR	PMT1YR	In what year was or will the first payment be made?	IF PMT1YR is greater than current year +1 then
   goto CK_FutureDate

ELSE IF PMT1YR is less than VEHPURYR then goto CK_VEHPURYR

ELSE goto PMT1MO	
10	PMT1MO	PMT1MO	In what month was or will the first payment be made?

1. January
2. February
3. March
4. April
5. May
6. June
7. July
8. August
9. September
10. October
11. November
12. December	IF PMT1MO + PMT1YR is before VEHPURMO + VEHPURYR then
     goto CK_PMT1MO

ELSE goto VEHQPMT	
10	VEHQPMT	VEHQPMT	For how many months was the payment contract?	1-999:    IF VEHQPMT = 1-11, 13-23, 25-35, 37-47, 49-59, 61-71, 
             73-83, 85-95, 97-107, 109-119, 121-131, or 133-143 
             then goto ERR1_VEHQPMT 
          ELSE goto PAYMENTX

DK,RF:    Goto PAYMENTX	
10	PAYMENTX	PAYMENTX	What is your monthly payment amount?	1-99999:  IF (ITEM = 1 and (PAYMENTX < 150 or PAYMENTX > 1200))
            OR (ITEM = 2 and (PAYMENTX < 134 or PAYMENTX > 1200)) 
            OR (ITEM = 3 and (PAYMENTX < 59 or PAYMENTX > 721)) 
            OR (ITEM = 4 and (PAYMENTX < 70 or PAYMENTX > 721)) 
            OR (ITEM = 5 and (PAYMENTX < 100 or PAYMENTX > 721)) 
            OR (ITEM = 6 and (PAYMENTX < 77 or PAYMENTX > 721)) 
            OR (ITEM = 7 and (PAYMENTX < 77 or PAYMENTX > 340))
            OR (ITEM = 8 and (PAYMENTX < 77 or PAYMENTX > 721)) 
            OR (ITEM = 9 and (PAYMENTX < 100 or PAYMENTX > 362))
                 then goto ERR1_PAYMENTX
          ELSEIF PAYMENTX > PRINCIPX then goto CK_PAYMENTX
          ELSEIF DISPOSED = 1 then goto VEHDISP
          ELSE goto ANYOTHR

DK,RF:   IF DISPOSED = 1 then goto VEHDISP
         ELSE goto ANYOTHR	
10		PRIN_IPX			
10		VINT_ATE			
10		VEHQPMT_			
10		PAYM_NTX			
10	VEHDISP	VEHDISP	How did you dispose of the (Car description)?

1. Sold
2. Traded in
3. Given away or donated to someone outside the household, including students away at school
4. Totaled (damaged beyond repair)
5. Stolen
6. Other	1-5,DK,RF:   Goto VDISPMO

6:         Goto DISPOTHV	
10	DISPOTHV	DISPOTHV	  Specify:	Goto VDISPMO	
10	VDISPMO	VDISPMO	In what month was it (sold/traded in/given away to someone outside the CU/damaged beyond repair/stolen/disposed of)?

1. January
2. February
3. March
4. April
5. May
6. June
7. July
8. August
9. September
10. October
11. November
12. December	IF VDISPMO is not within the reference period then 
   goto ERR3_VDISPMO
ELSEIF VEHDISP = 1 then goto SALEX
ELSEIF VEHDISP = 2, 3, 6, DK or RF then goto LOANSTAT
ELSEIF VEHDISP = 4 or 5 then goto REIMBURS	
10	SALEX	SALEX	How much did you sell it for?	1-999999:   IF (ITEM = 1 and SALEX lt 5 or gt 17400) OR
               (ITEM = 2 and SALEX lt 35 or gt 23000) OR 
               (ITEM = 3 and SALEX lt 35 or gt 23000) OR 
               (ITEM = 4 and SALEX lt 35 or gt 23000) OR
               (ITEM = 5 and SALEX lt 35 or gt 23000) OR
               (ITEM = 6 and SALEX lt 35 or gt 23000) OR 
               (ITEM = 7 and SALEX lt 35 or gt 23000) OR
               (ITEM = 8 and SALEX lt 35 or gt 23000) OR 
               (ITEM = 9 and SALEX lt 35 or gt 23000)
                     then goto ERR1_SALEX
           ELSE goto LOANSTAT

DK,RF:   Goto LOANSTAT	
10	REIMBURS	REIMBURS	Were you reimbursed for the value of the (Car description)?

1. Yes
2. No	1:       Goto REIMBURX

2,DK,RF:   Goto EXREIMB	
10	REIMBURX	REIMBURX	How much did you receive?	1-999999:  IF lt 20 or gt 23742 then goto ERR1_REIMBURX
           ELSE goto LOANSTAT

DK,RF:   Goto LOANSTAT	
10	EXREIMB	EXREIMB	Do you expect to be reimbursed for the value of the (Car description)?

1. Yes
2. No	1:      Goto EXREIMBX

2,DK,RF:   Goto LOANSTAT	
10	EXREIMBX	EXREIMBX	How much will you receive?	1-999999:   IF lt 300 or gt 9000 then goto ERR1_EXTREIMBX
            ELSE goto LOANSTAT

DK,RF:  Goto LOANSTAT	
10	LOANSTAT	LOANSTAT	Were there any outstanding loans on the (Car description) when it was (sold/traded in/given away to someone outside the CU/damaged beyond repair/stolen/disposed of)?

1. Yes
2. No	1:      Goto FINPAYMT

2,DK,RF:   Goto ANYOTHR	
10	FINPAYMT	FINPAYMT	Were any final payments made on the loan?

1. Yes
2. No	1:       Goto FINPAYMX

2,DK,RF:  Goto ANYOTHR	
10	FINPAYMX	FINPAYMX	How much was the final payment?	1-999999:   IF lt 384 or gt 26500 then goto ERR1_FINPAYMX
            ELSE goto ANYOTHR

DK,RF:     Goto ANYOTHR	
10		VEHICIC			
10		VEHICYC			
10		SALEX_			
10		REIM_URX			
10		EXRE_MBX			
10		FINP_YMX			
10		VDISPMO_			
10		OVC_STAT			
10		OVC_ORIG			
10		DISPOSED			
10	ANYOTHR	ANYOTHR	(Did (you/you household) purchase or acquire any other (vehicle description)?/(Do/Does) (you/your household) own any other (vehicle description)?/Did  

1. Yes
2. No	1:    IF Row number = 25 then goto ERR_MAX
      ELSE goto ITEM, next screen as appropriate

2,DK,RF:  goto ITEM, next screen as appropriate	
10		S10_End		Goto section 11 - BSect11	
10		VEHICIB			
10		VEHICYB			
10		DISPOSED			
10		MKMDLY			
10		VFINSTAT			
10		TRADEX_			
10		NETPURX_			
10		DNPA_MTX			
10		OVB_STAT			
10		OVB_ORIG			
10		MATCHID			
		Kind			
10		LP10_Flag	

1. Yes
2. No		
11		S10FlexFuel_Flag			
11		S10Electric_Flag			
11A	S11A_INTRO	S11A_INTRO	I will now ask about expenses for vehicle services, parts, and equipment.  Please do not include expenses for vehicles used entirely for business.

    Description     Month         Amount
    (VOPDESC)      (VOPMOA)      (VOPEXPX)

1. Enter 1 to Continue	Goto BTABLEA.BROW.ITEM	
11A	VEQ_ITEM	ITEM	 29     ? [F1]

     Since the first of (reference month), have (you/you or any members of your household) had
     expenses for any of the following?

             Read each item on list

1. Oil change, lubrication, or oil filter
2. Motor tune-up
3. Battery purchases or installation
4. Repairs to tires, including patches and plugs
5. Tire purchases or mounting
6. Front end alignment, wheel balancing, or wheel rotation
7. Shock absorber replacement
8. Body work or painting
9. Any other vehicle or engine repairs
10. Vehicle accessories or customizing
11. Other vehicle services, parts, or equipment
12. Vehicle cleaning services including car washes
99. None/No more entries
888. Delete a line	1-12:   IF ITEM <> Item2Shadow then goto CK_ITEM
        ELSE goto DESCRIPTION

99:     Goto S11A_END

888:   IF no more rows then goto S11A_END
       ELSE goto ITEM - next row of the table	
11A	VOPDESC	DESCRIPTION	What was the expense for?

   Description    Month         Amount
   (VOPDESC)      (VOPMOA)      (VOPEXPX)	IF ITEM = 3, 4, or 5 then goto MONTH

ELSE goto VOPLABOR	
11A	VOPLABOR	VOPLABOR	Did this expense include labor?

   Description    Month         Amount
   (VOPDESC)      (VOPMOA)      (VOPEXPX)

1. Yes
2. No	Goto MONTH	
11A	VOPMOA	MONTH	In what month did you have this expense?

(*  Enter 13 for same amount each month of the reference period/   )

   Description    Month         Amount
   (VOPDESC)      (VOPMOA)      (VOPEXPX)

1. January
2. February
3. March
4. April
5. May
6. June
7. July
8. August
9. September
10. October
11. November
12. December
13. (Same amount each month/  )	REF_MONTH - CUR_MONTH:  IF MONTH not within reference period 
                           then goto ERR3_MONTH
                        ELSE goto AMOUNT

13,DK,RF:    Goto AMOUNT	
11A	VOPEXPX	AMOUNT	What was the total cost?

   Description  Month     Amount
   (VOPDESC)   (VOPMOA)  (VOPEXPX)	1-99999: IF (ITEM = 1 and (AMOUNT < 8 or AMOUNT > 199)) OR
            (ITEM = 2 and (AMOUNT < 10 or AMOUNT > 1500)) OR
            (ITEM = 3 and (AMOUNT < 16 or AMOUNT > 211)) OR
            (ITEM = 4 and (AMOUNT < 5 or AMOUNT > 100)) OR
            (ITEM = 5 and (AMOUNT < 20 or AMOUNT > 1000)) OR
            (ITEM = 6 and (AMOUNT < 8 or AMOUNT > 690)) OR
            (ITEM = 7 and (AMOUNT < 22 or AMOUNT > 1000)) OR
            (ITEM = 8 and (AMOUNT < 15 or AMOUNT > 4000)) OR
            (ITEM = 9 and (AMOUNT < 6 or AMOUNT > 3000)) OR
            (ITEM = 10 and (AMOUNT < 5 or AMOUNT > 1700)) OR
            (ITEM = 11 and (AMOUNT < 5 or AMOUNT > 1000)) OR
            (ITEM = 12 and (AMOUNT < 2 or AMOUNT > 100))
                then goto ERR1_AMOUNT
         ELSEIF (ITEM and the entry in AMOUNT for this 
                 record are equal to any records data on the 
                 pre-chart/input then goto ERR_DUP
         ELSE goto VOPTAX

DK,RF:   Goto C	
11A	VOPTAX	VOPTAX	Did this include sales tax?

   Description   Month     Amount
   (VOPDESC)     VOPMOA)  (VOPEXPX)

1. Yes
2. No	Goto C	
11A	VOPCMB_C	C	 Enter 'C' for combined expense	C:        Goto COMBCODE

EMPTY:    Goto VOPREIMB

IF anything other than a 'C' or blank is entered then
   goto CK_C	
11A	VOPCMB	COMBCODE	 29    ? [F1]

What expense was combined with the (description) expense?

  Enter all that apply, separate with commas.

    Description  Month     Amount
    (VOPDESC)   (VOPMOA)  (VOPEXPX)

1. Oil change, lubrication, or oil filter
2. Motor tune-up
3. Battery purchases or installation
4. Repairs to tires, including patches and plugs
5. Tire Purchases or mounting
6. Front end alignment, wheel balancing, or wheel rotation
7. Shock absorber replacement
8. Body work or painting
9. Any other vehicle or engine repairs
10. Vehicle accessories or customizing
11. Other vehicle services, parts, or equipment
12. Vehicle cleaning services including car washes
77. Misc combined (unable to specify/DK)	Goto VOPREIMB	
11A	VOPREIMB	VOPREIMB	Has any of this expense been, or will any of it be, reimbursed?

    Description    Month     Amount
    (VOPDESC)     (VOPMOA)  (VOPEXPX)

1. Yes
2. No	1:      Goto VOPRMBXA

2,DK,RF: IF [(VEQ_ITEM = 1, 2, 4, 6, 7, 8 or 9) and 
            (Rt10.POPGRP = 15 or 16)] OR 
            [(VEQ_ITEM = 3, 5, 10 or 11) and 
            (Rt10.POPGRP = 9, 09 or 10)] then goto VEQSTORE
         ELSE goto MORE	
11A	VOPRMBXA	VOPRMBXA	How much?

   Description  Month     Amount
   (VOPDESC)   (VOPMOA)  (VOPEXPX)	IF VOPRMBXA > 5000 and (not DK or RF) then 
   goto ERR1_VOPRMBXA

ELSEIF (VOPRMBXA > AMOUNT) then goto CK_VOPRMBXA

ELSEIF ((VEQ_ITEM = 1, 2, 4, 6, 7, 8 or 9) and 
        [Rt10.POPGRP = 15 or 16]) OR 
       ((VEQ_ITEM = 3, 5, 10 or 11) and 
       [Rt10.POPGRP = 9, 09 or 10]) then goto VEQSTORE 

ELSE goto MORE	
11A	VEQSTORE	VEQSTORE	What is the name of the business where you had this expense?

           Enter store, website, or company name	IF uppercase entry = 'GROUPON' or 'GROUPON.COM' then 
    goto ERR_GROUPON

ELSEIF UPPERCASE ENTRY contains '.COM' then goto MORE

ELSEIF ENTRY = DK or RF then goto MORE

ELSE goto VEQPURCH	
11A	VEQPURCH	VEQPURCH	Was this paid for - 

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  Goto MORE

2: Goto VEQLOC	
11A	VEQLOC	VEQLOC	In what city is (store) located?	Goto VEQLOCST	
11A	VEQLOCST	VEQLOCST	? [F1]

In what state is (store) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then
   goto CK_VEQLOCST

ELSE goto MORE	
11A	MOREVEOP	MORE	Did you have any other expenses for (description)?

   Description   Month    Amount
   (VOPDESC)    (VOPMOA) (VOPEXPX)

1. Yes
2. No	1:    IF ROW number = 26 then goto ERR_MAX
      ELSE goto ITEM, next row of the table

2,DK,RF:    IF Row number = 26 then goto S11A_END
            ELSE goto ITEM, next row of the table	
11A		S11A_END		IF INTNMBR = 1 or NEWCU = 1 then exit block and 
   goto BTABLEB.Brow.ITEM

ELSE exit block and goto INTROB	
11A		VOPSERVY			
11A		VPSRVY01			
11A		VPSRVY02			
11A		VPSRVY03			
11A		VPSRVY04			
11A		VPSRVY05			
11A		VPSRVY06			
11A		VPSRVY07			
11A		VPSRVY08			
11A		VPSRVY09			
11A		VPSRVY10			
11A		VPSRVY11			
11A		VPSRVY12			
11A		VPSRVY13			
11A		VOPEXPX_			
11A		VOPR_BXA			
11A		VEQ_STAT			
11A		VEQ_ORIG			
11A		LP11A_Flag	

1. Yes
2. No		
11B	S11B_INTRO	INTROB	  Drivers licenses, vehicle inspection, vehicle registration, and personal property taxes for vehicles
    collected in the previous interview:

      Description    Month       Amount  
      (VREGDESC)    (VOPMO_C)   (VOPREGX)

1. Enter 1 to Continue	Goto BTABLEB.BROW.ITEM	
11B	VLR_ITEM	ITEM	 30    ? [F1]

Since the first of (reference month), have (you/you or any members of your household) had any
expenses for -

             Read each item on list         

1. Driver's licenses?
2. Vehicle inspection?
3. State vehicle registration?
4. Local vehicle registration?
5. Personal property taxes for vehicles?
99. None/No more entries
888. Delete line	1-5:    IF ITEM <> Item2Shadow then goto CK_ITEM
        ELSE goto DESCRIPTION

99:     Goto S11B_END

888:    IF no more rows then goto S11B_END
        ELSE goto ITEM - next row of the table	
11B		PreFill	** SHOW ONLY **		
11B	VREGDESC	DESCRIPTION	What was the expense for?

    Description    Month       Amount  
    (VREGDESC)     (VOPMO_C)   (VOPREGX)	Goto MONTH	
11B	VOPMO_C	MONTH	In what month did you have this expense?

   Description    Month       Amount  
   (VREGDESC)     (VOPMO_C)   (VOPREGX)

1. January
2. February
3. March
4. April
5. May
6. June
7. July
8. August
9. September
10. October
11. November
12. December	REF_MONTH - CUR_MONTH:  IF MONTH not within reference period 
                           then goto ERR3_MONTH
                        ELSE goto AMOUNT

DK,RF:  Goto AMOUNT	
11B	VOPREGX	AMOUNT	What was the total amount of the expense?

   Description    Month       Amount  
   (VREGDESC)     (VOPMO_C)   (VOPREGX)	1-9999:   IF (ITEM = 1 and (AMOUNT < 5 or AMOUNT > 86)) OR
             (ITEM = 2 and (AMOUNT < 5 or AMOUNT > 120)) OR
             (ITEM = 3 and (AMOUNT < 10 or AMOUNT > 423)) OR
             (ITEM = 4 and (AMOUNT < 8 or AMOUNT > 442)) OR
             (ITEM = 5 and (AMOUNT < 18 or AMOUNT > 3213)) then 
                   goto ERR1_AMOUNT
         ELSEIF ITEM and the entry in AMOUNT for the record 
                are equal to any records data on the
                prechart/input) then goto ERR_DUP
         ELSE goto C

DK,RF:    Goto C	
11B	S11BCMB_C	C	 Enter 'C' for combined expense	C:  Goto COMBCODE

EMPTY:   Goto MORE

IF anything other than a 'C' or blank is entered then
   goto CK_C	
11B	S11B_CMB	COMBCODE	 30    ? [F1]

What was combined with the (Description) expense?

     Enter all that apply, separate with commas

   Description    Month       Amount  
   (VREGDESC)     (VOPMO_C)   (VOPREGX)

1. Driver's license
2. Vehicle inspection
3. State Vehicle registration
4. Local Vehicle registration
5. Personal property taxes for vehicles	Goto MORE	
11B	MOREREG	MORE	Did you have any other (Description) expenses?

    Description    Month       Amount  
    (VREGDESC)    (VOPMO_C)   (VOPREGX)

1. Yes
2. No	1:    IF ROW number = 11 then goto ERR_MAX
      ELSE goto ITEM, next row or the table

2,DK,RF:    IF ROW number = 11 then goto S11B_END
            ELSE goto ITEM, next row of the table	
11B		S11B_END		Goto Section 11C	
11B		VOPREGY			
11B		VOPRGY1			
11B		VOPRGY2			
11B		VOPRGY3			
11B		VOPRGY4			
11B		VOPRGY5			
11B		VOPREGX_			
11B		VLR_STAT			
11B		VLR_ORIG			
11C	VOPGASX	VOPGASX	Since the first of (reference month) not including this month --

What has been (your/your household's) AVERAGE MONTHLY expense for gasoline and other fuels for all vehicles? 	0,RF:    IF S10Electric_Flag = 1 then goto VOPELEC
         ELSE goto VOPOIL

1-9999:   IF VOPGASX > 800 then goto ERR1_VOPGASX
          ELSE goto VOPDIES

DK:       Goto VOPDIES	
11C	VOPDIES	VOPDIES	Was any of this expense for diesel fuel?        

1. Yes
2. No	1:         Goto VOPDIESX

2,DK,RF:  IF S10FlexFuel_Flag = 1 then goto VOPETH
          ELSEIF RT10.POPGRP = 11 or 12 then goto GASSTORE
          ELSEIF S10Electric_Flag = 1 and BCeintro.BUSCREEN = 
                 2 then goto VOPELEC
          ELSEIF BCeintro.BUSCREEN = 2 then goto VOPOIL
          ELSE goto VOPBSNS	
11C	VOPDIESX	VOPDIESX	How much?	IF VOPDIESX < 5 or VOPDIESX > 799 then goto ERR1_VOPDIESX

ELSEIF (VOPDIESX > VOPGASX) then goto CK_VOPDIESX

ELSEIF S10FlexFuel_Flag = 1 then goto VOPETH

ELSEIF RT10.POPGRP = 11 or 12 then goto GASSTORE

ELSEIF S10Electric_Flag = 1 and BCeintro.BUSCREEN = 2 then 
        goto VOPELEC

ELSEIF BCeintro.BUSCREEN = 2 then goto VOPOIL

ELSE goto VOPBSNS	
11C	VOPETH	VOPETH	Was any of this expense for the purchase of E85?

1. Yes
2. No	1:         Goto VOPETHX

2,DK,RF:  IF RT10.POPGRP = 11 or 12 then goto GASSTORE
          ELSEIF S10Electric_Flag = 1 and BCeintro.BUSCREEN =
                 2 then goto VOPELEC
          ELSEIF BCeintro.BUSCREEN = 2 then goto VOPOIL
          ELSE goto VOPBSNS	
11C	VOPETHX	VOPETHX	How much?	1-9999:   IF VOPETHX > 400 then goto ERR1_VOPETHX
          ELSEIF VOPDIES = 2 AND VOPETHX > VOPGASX then
                 goto CK_VOPETHX
          ELSEIF ((VOPDIESX + VOPETHX) > VOPGASX) then 
                   goto CK2_VOPETHX
          ELSEIF RT10.POPGRP = 11 or 12 then goto GASSTORE
          ELSEIF S10Electric_Flag = 1 and BCeintro.BUSCREEN =
                 2 then goto VOPELEC
          ELSEIF BCeintro.BUSCREEN = 2 then goto VOPOIL
          ELSE goto VOPBSNS

DK,RF:   IF RT10.POPGRP = 11 or 12 then goto GASSTORE
         ELSEIF S10Electric_Flag = 1 and BCeintro.BUSCREEN = 
                2 then goto VOPELEC
         ELSEIF BCeintro.BUSCREEN = 2 then goto VOPOIL
         ELSE goto VOPBSNS	
11C	GASSTORE	GASSTORE	At what station or store did (you/you or any members of your household) last purchase (gas, diesel, or E85?/gas or diesel?/gas or E85?/gas?)

           Enter store or station name	ENTRY:  Goto GASLOC

DK, RF:  IF S10Electric_Flag = 1 and BCeintro.BUSCREEN = 2 
            then goto VOPELEC
         ELSEIF BCeintro.BUSCREEN = 2 then goto VOPOIL
         ELSE goto VOPBSNS	
11C	GASLOC	GASLOC	In what city is (store) located?	Goto GASLOCST	
11C	GASLOCST	GASLOCST	? [F1]

In what state is (store) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_GASLOCST

ELSEIF S10Electric_Flag = 1 and BCeintro.BUSCREEN = 2 then 
       goto VOPELEC

ELSEIF BCeintro.BUSCREEN = 2 then goto VOPOIL

ELSE goto VOPBSNS	
11C	VOPBSNS	VOPBSNS	Was any of the AVERAGE MONTHLY cost counted as a business expense?       

1. Yes
2. No	1:       Goto VOPBSPER

2,DK,RF:  IF S10Electric_Flag = 1 then goto VOPELEC
          ELSE goto VOPOIL	
11C	VOPBSPER	VOPBSPER	What percentage of the AVERAGE MONTHLY COST was counted as a business expense?	1-99,DK,RF: IF S10Electric_Flag = 1 then goto VOPELEC
            ELSE goto VOPOIL

100:         Goto ERR2_VOPBSPER	
11C	VOPELEC	VOPELEC	Since the first of (reference month) not including this month --

Have (you/you or any members of your household) paid for electric vehicle charging away from home? 

1. Yes
2. No	1:  Goto VOPELECX

2,DK,RF:  Goto VOPOIL	
11C	VOPELECX	VOPELECX	How much?	1-9999:   IF VOPELECX > 400 then goto ERR1_VOPELECX
          ELSEIF (RT10.POPGRP = 11 or 12) and BCeintro.BUSCREEN = 2 then goto CHGPLACE
          ELSEIF BCeintro.BUSCREEN = 2 then goto VOPOIL
          ELSE goto VOPELBS

DK,RF:  IF (RT10.POPGRP = 11 or 12) and BCeintro.BUSCREEN = 2 then goto CHGPLACE
        ELSEIF BCeintro.BUSCREEN = 2 then goto VOPOIL
        ELSE goto VOPELBS	
11C	VOPELBS	VOPELBS	Was any of this amount counted as a business expense?        

1. Yes
2. No	1:   Goto VOPELBPR

2,DK,RF:  IF RT10.POPGRP = 11 or 12 then goto CHGPLACE
          ELSE Goto VOPOIL	
11C	VOPELBPR	VOPELBPR	What percentage of (the amount/(entry in VOPELECX)) was counted as a business expense?	1-99,DK,RF:   IF RT10.POPGRP = 11 or 12 then goto CHGPLACE
              ELSE Goto VOPOIL

100:   Goto ERR2_VOPELBPR	
11C	CHGPLACE	CHGPLACE	At what street intersection or location did (you/your household) charge your electric vehicle?

        Enter name of location (such as Anytown Shopping Center) or approximate address
         (such as First Street & Main Street).
         If there are multiple locations, enter the last/most recent.	ENTRY: Goto CHGLOC

DK,RF: Goto VOPOIL	
11C	CHGLOC	CHGLOC	And what is the city?	Goto CHGLOCST	
11C	CHGLOCST	CHGLOCST	? [F1]

And what is the state?

        Enter the two character state abbreviation.	IF entry is not a valid state abbreviation then goto CK_CHGLOCST

ELSE goto CHGSTORE	
11C	CHGSTORE	CHGSTORE	What is the name of the company that (you/your household) paid?

            Enter store, website, or company name.
             If there are multiple stores, websites, or company names, enter the last/most recent.	IF UPPERCASE ENTRY contains ".COM" then goto VOPOIL

ELSEIF ENTRY = DK or RF then goto VOPOIL

ELSE goto CHGPURCH	
11C	CHGPURCH	CHGPURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	Goto VOPOIL	
11C	VOPOIL	VOPOIL	Since the first of (reference month) not including this month --

Have (you/you or any members of your household) purchased any oil for operating vehicles?     

1. Yes
2. No	1:  Goto VOPOILX

2,DK,RF:   Goto VOPFLUID	
11C	VOPOILX	VOPOILX	? [F1]

What was the total cost? 	IF VOPOILX < 5 or VOPOILX > 150 then goto ERR1_VOPOILX

ELSEIF (RT10.POPGRP = 9, 09 or 10) then goto OILSTORE

Else goto VOPFLUID	
11C	OILSTORE	OILSTORE	What is the name of the business where this was purchased?

          Enter store, website, or company name
             If there are multiple stores, websites, or company names, enter the last/most recent
 	IF UPPERCASE ENTRY contains '.COM' then goto VOPFLUID

ELSE ENTRY = DK or RF then goto VOPFLUID

ELSE goto OILPURCH	
11C	OILPURCH	OILPURCH	Was this paid for - 

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  Goto VOPFLUID

2: Goto OILLOC	
11C	OILLOC	OILLOC	In what city is (Store) located?	Goto OILLOCST	
11C	OILLOCST	OILLOCST	? [F1]

In what state is (Store) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_OILLOCST

ELSE goto VOPFLUID	
11C	VOPFLUID	VOPFLUID	Since the first of (reference month), not including this month --

Have (you/you or any members of your household) purchased any antifreeze, brake fluid, transmission fluid, windshield wiper fluid, or additives, except if purchased with a tune-up?    

1. Yes
2. No	1:  Goto VOPFLUDX

2,DK,RF:   Goto VOPPARK	
11C	VOPFLUDX	VOPFLUDX	What was the total cost of these purchases?	IF VOPFLUDX < 5 or VOPFLUDX > 120 then goto ERR1_VOPFLUDX

ELSEIF (VOPOIL = 2, DK or RF) and (RT10.POPGRP = 9, 09
       or 10)] then goto FLDSTORE

ELSE goto VOPPARK	
11C	FLDSTORE	FLDSTORE	What is the name of the business where this was purchased?

      Enter store, website, or company name
         If there are multiple stores, websites, or company names, enter the last/most recent	IF UPPERCASE ENTRY contains '.COM' then goto VOPPARK

ELSEIF ENTRY = DK or RF then goto VOPPARK

ELSE Goto FLDPURCH	
11C	FLDPURCH	FLDPURCH	Was this paid for - 

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  Goto VOPPARK

2: Goto FLDLOC	
11C	FLDLOC	FLDLOC	In what city is FLDSTORE_Fill located?	Goto FLDLOCST	
11C	FLDLOCST	FLDLOCST	? [F1]

In what state is FLDSTORE_Fill located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_FLDLOCST

ELSE goto VOPPARK	
11C	VOPPARK	VOPPARK	Since the first of (reference month) not including this month --

Have (you/you or any members of your household) had expenses for parking, such as parking garages, parking lot fees, or parking meters?

Do not include expenses that are part of your property ownership or
rental costs, a business expense or expenses that will be totally reimbursed.     

1. Yes
2. No	1:   Goto VOPPARKX

2,DK,RF:   Goto VOPTOLL	
11C	VOPPARKX	VOPPARKX	How much was paid, not including any payments made this month?	1-99999:    IF VOPPARKX > 800 then goto ERR1_VOPPARKX
            ELSEIF Rt10.POPGRP = 13 or 14 then goto PRKPLACE
            ELSE goto VOPTOLL

DK,RF:      IF Rt10.POPGRP = 13 or 14 then goto PRKPLACE
            ELSE goto VOPTOLL	
11C	PRKPLACE	PRKPLACE	At what street intersection or location was the vehicle parked?

           Enter name of location (such as Anytown Shopping Center) or approximate address
           (such as First Street & Main Street)
           If there are multiple locations, enter the last/most recent	ENTRY:  Goto PRKLOC

DK,RF:  Goto VOPTOLL	
11C	PRKLOC	PRKLOC	And what is the city?	Goto PRKLOCST	
11C	PRKLOCST	PRKLOCST	? [F1]

And what is the state?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_PRKLOCST

ELSE goto PRKSTORE	
11C	PRKSTORE	PRKSTORE	What is the name of the company or institution that you paid?

    Enter store, website, or company name
        If there are multiple stores, websites, or company names, enter the last/most recent  	Goto VOPTOLL	
11C	VOPTOLL	VOPTOLL	Since the first of (reference month) not including this month, have (you/you or any members of your household) had expenses for - 

      Local tolls or electronic toll passes?

1. Yes
2. No	1:   Goto VOPTOLLX

2,DK,RF:   Goto VOPDOCK	
11C	VOPTOLLX	VOPTOLLX	How much was paid, not including any payments made this month?	1-99999:   IF VOPTOLLX > 500 then goto ERR1_VOPTOLLX
           ELSEIF Rt10.POPGRP = 13 or 14 then goto TOLPLACE
           ELSE goto VOPDOCK

DK,RF:     IF Rt10.POPGRP = 13 or 14 then goto TOLPLACE
           ELSE goto VOPDOCK	
11C	TOLPLACE	TOLPLACE	What is the last road, bridge, ferry, or tunnel (you/you or any members of your household) paid a toll for?

            Enter name or description of road, bridge, ferry, or tunnel	ENTRY:  Goto VTLLOC

DK,RF:  VOPDOCK	
11C	VTLLOC	VTLLOC	And what is the city?	Goto VTLLOCST	
11C	VTLLOCST	VTLLOCST	? [F1]

And what is the state?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_VTLLOCST

ELSE goto VOPDOCK	
11C	VOPDOCK	VOPDOCK	Since the first of (reference month) not including this month, have (you/you or any members of your household) had expenses for -

        Docking and landing fees for boats and planes?

1. Yes
2. No	1:    Goto VOPDOCKX

2,DK,RF:    Goto VOPPOLCY	
11C	VOPDOCKX	VOPDOCKX	How much was paid, not including any payments made this month?	1-9999:    IF VOPDOCKX > 1752 then goto ERR1_VOPDOCKX
           ELSE goto VOPPOLCY

DK,RF:     Goto VOPPOLCY	
11C	VOPPOLCY	VOPPOLCY	Since the first of (reference month) not including this month, have (you/you or any members of your household) had any expenses for --

Auto repair service policies such as extended warranties?  
Do not include service policies for vehicles used entirely for business.        

1. Yes
2. No	1:       Goto VOPPLCYX

2,DK,RF:   Goto VOPAUTO	
11C	VOPPLCYX	VOPPLCYX	How much?	1-9999:   IF entry < 5 or entry > 1800 then goto ERR1_VOPPLCYX
          ELSE goto VOPAUTO

DK,RF:    Goto VOPAUTO	
11C	VOPAUTO	VOPAUTO	Since the first of (reference month) not including this month, have (you/you or any members of your household) had any expenses
for --

     Automobile service clubs, such as AAA or services such as OnStar or LoJack?

1. Yes
2. No	1:       Goto VOPCLUBX

2,DK,RF:  Goto VOPTOW	
11C	VOPCLUBX	VOPCLUBX	How much?	1-9999:   IF VOPCLUBX < 6 or VOPCLUBX > 200 then goto ERR1_VOPCLUBX
          ELSEIF Rt10.POPGRP = 13 or 14 then goto CLUBNAME
          ELSE goto VOPTOW

DK,RF:    IF Rt10.POPGRP = 13 or 14 then goto CLUBNAME
          ELSE goto VOPTOW	
11C	CLUBNAME	CLUBNAME	What is the name of the club or service?	Goto VOPTOW	
11C	VOPTOW	VOPTOW	Since the first of (reference month) not including this month, have (you/you or any members of your household)
had expenses for -

       Towing charges, not already reported?

1. Yes
2. No	1:   Goto VOPTOWX

2,DK,RF:   Goto TANKGAS	
11C	VOPTOWX	VOPTOWX	How much was paid, not including any payments made this month?	1-9999:   IF VOPTOWX > 500 then goto ERR1_VOPTOWX
          ELSEIF Rt10.POPGRP = 15 or 16 then goto TOWSTORE
          ELSE goto TANKGAS

DK,RF:    IF Rt10.POPGRP = 15 or 16 then goto TOWSTORE
           ELSE Goto TANKGAS	
11C	TOWSTORE	TOWSTORE	What is the name of the towing company?

    Enter store, website, or company name	ENTRY:  Goto TOWLOC

DK,RF:  Goto TANKGAS	
11C	TOWLOC	TOWLOC	In what city is TOWSTORE_Fill located?	Goto TOWLOCST	
11C	TOWLOCST	TOWLOCST	? [F1]

In what state is TOWSTORE_Fill located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_TOWLOCST

ELSE goto TANKGAS	
11C	TANKGAS	TANKGAS	Since the first of (reference month) not including this month, have (you/you or any members of your household) had any expenses
for --

        Bottled or tank gas for recreational vehicles, including vans, campers, and boats? 

1. Yes
2. No	1:   Goto TANKGASX

2,DK,RF:  Goto S11C_END	
11C	TANKGASX	TANKGASX	How much?	1-9999:   IF TANKGASX < 5 or TANKGASX > 200 then goto ERR1_TANKGASX
          ELSE goto S11C_END

DK,RF:    Goto S11C_END	
12C		S11C_END		Goto section 12 - BSECT12	
11C		VOPGASX_			
11C		VOPD_ESX			
11C		VOPOILX_			
11C		VOPF_UDX			
11C		VOPP_RKX			
11C		VOPT_LLX			
11C		VOPTOWX_			
11C		VOPD_CKX			
11C		VOPP_CYX			
11C		VOPC_UBX			
11C		TANK_ASX			
11C		VOPE_ECX			
11C		VOPETHX_			
11C		VOT_STAT			
11C		VOT_ORIG			
12	S12_INTRO	S12_INTRO	The next questions are about health insurance.  Include health insurance obtained through employment or purchased directly as well as government programs like Medicare and Medicaid that provide Medical care or help pay medical bills.

1. Enter 1 to Continue	IF there are Medicare inventory records goto Medicare inventory block

ELSEIF there are 8500.MEDICAID = 1 OR 8500.CHIP = 1 OR 8500.IHS = 1 goto Medicaid/CHIP/IHS inventory block

ELSEIF there are single service or private insurance inventory records goto their inventory block

ELSEIF 8500.MILITARY = 1 goto their inventory block

ELSE goto screener block for new policies/coverage (detailed section)	
12A - Medicare		MEM_NAME	** SHOW ONLY **		
12A - Medicare	PQ_MCPRPTCX	PQ_MCPRPTCX	** SHOW ONLY **		
12A - Medicare	PQ_MCPRPTDX	PQ_MCPRPTDX	** SHOW ONLY**		
12A - Medicare	MDCRSTLL	MDCRSTLL	 (Are/Is) (you/NAME) still enrolled in Medicare?

1. Yes
2. No	1:  Goto MCCHOICA

2, DK, RF:  goto MDCRSTLL for next person with I_HIC_STAT = 1
            If no other active records then exit Medicare 
               inventory block and goto next appropriate block	
12A - Medicare	MCCHOICA	MCCHOICA	(Medicare Advantage is the new name for Medicare Plus Choice plans./ ) (are/is) (you/NAME) (still enrolled/enrolled) in a Medicare Advantage plan?

(* Enter 'Yes' if the member changed to a different Medicare Advantage plan./ )

1. Yes
2. No	1:  Goto MCPREMA

2,DK,RF:  Goto MCHMOPLA	
12A - Medicare	MCHMOPLA	MCHMOPLA	(are/is) (you/NAME) (still under/under) a Medicare managed care arrangement, such as an HMO, that is, a Health Maintenance Organization? (With an HMO, you must generally receive care from HMO doctors, otherwise the expense is not covered unless you were referred by the HMO or there was a medical emergency.)

(* Enter 'Yes' if the member changed to a different Medicare HMO plan./ )

1. Yes
2. No	1:  Goto MCPREMA

2,DK,RF:  Goto MCPARTDA	
12A - Medicare	MCPREMA	MCPREMA	Besides (your/NAME's) Medicare Part B payment, (are/is) (you/NAME) ^MCPREMA_still paying a premium for ^Yourhisher ^MCPREMA_advhmo plan?

1. Yes
2. No	1:  Goto MCPRPTCA

2,DK,RF:  Goto MCPARTDA	
12A - Medicare	MCPRPTCA	MCPRPTCA	What is (your/NAME's) monthly premium for ^Yourhisher ^MCPREMA_advhmo plan?	IF ENTRY < 5 or entry > 1080 then goto ERR1_MCPRPTCA

ELSE goto MCPARTDA	
12A - Medicare	MCPARTDA	MCPARTDA	(are/is) (you/NAME) (still enrolled/enrolled) in Medicare Part D, also known as the Medicare Prescription Drug Plan?

  Enter 'Yes' if the member changed to a different Medicare Part D plan.

1. Yes
2. No	1:  Goto MCPRPTDA

2,DK,RF:  Goto MDCRSTLL for next person with HIC_STAT = 1
          If no other active records then exit Medicare 
            inventory block and goto next appropriate block	
12A - Medicare	MCPRPTDA	MCPRPTDA	What is (your/NAME's) monthly premium for ^Yourhisher Medicare Part D prescription drug plan?	IF ENTRY < 5 or entry > 100 then goto ERR1_MCPRPTDA

ELSE goto MDCRSTLL for next person with HIC_STAT = 1
       If no other active records then exit Medicare 
         inventory block and goto next appropriate block	
12A - Medicare		MEMBNO			
12A - Medicare		MCPR_TCA			
12A - Medicare		MCPR_TDA			
12A - Medicare		MATCHID			
12A - Medicaid	MDCDSTLL	MDCDSTLL	 ^Areis_CU_C (you/your household) still covered by Medicaid(/state medicaid plan name)?

1. Yes
2. No	1:  Goto MEDPREMA

2,DK,RF:  IF InvTdata.Inv12Medicaid.CHIP = 1 then goto CHIPSTLL
          ELSEIF InvTdata.Inv12Medicaid.IHS = 1 then goto IHSSTLL
          ELSE exit Medicaid/CHIP/IHS block and goto 
               next appropriate block	
12A - Medicaid	MEDPREMA	MEDPREMA	(Do/A health insurance premium is the amount you or a family member pays each month for healthcare coverage.  Do) (you/you or any members of your household) (still pay/pay) a premium for your Medicaid plan?

1. Yes
2. No	1:  Goto MDCDPRXA

2,DK,RF:  IF InvTdata.Inv12Medicaid.CHIP = 1 then goto CHIPSTLL
          ELSEIF InvTdata.Inv12Medicaid.IHS = 1 then goto IHSSTLL
          ELSE exit Medicaid/CHIP/IHS block and goto 
               next appropriate block	
12A - Medicaid	MDCDPRXA	MDCDPRXA	What is the monthly premium for this Medicaid plan?	IF MDCDPRXA > 100 then goto ERR1_MDCDPRXA

ELSEIF InvTdata.Inv12Medicaid.CHIP = 1 then goto CHIPSTLL

ELSEIF InvTdata.Inv12Medicaid.IHS = 1 then goto IHSSTLL

ELSE exit Medicaid/CHIP/IHS block and goto next appropriate block	
12A - Medicaid	CHIPSTLL	CHIPSTLL	^Areis_CU_C (you/your household) still covered by the Children's Health Insurance Program (CHIP)^ST_CHIP?

1. Yes
2. No	1:  Goto CHIPRMA

2,DK,RF:  IF InvTdata.Inv12Medicaid.IHS = 1 then goto IHSSTLL
          ELSE exit Medicaid/CHIP/IHS block and goto 
               next appropriate block	
12A - Medicaid	CHIPRMA	CHIPRMA	(Do/A health insurance premium is the amount you or a family member pays each month for healthcare coverage.  Do) (you/you or any members of your household) (still pay/pay) a premium for your CHIP^ST_CHIP plan?

1. Yes
2. No	1:  Goto CHIPPRXA

2,DK,RF:  IF InvTdata.Inv12Medicaid.IHS = 1 then goto IHSSTLL
          ELSE exit Medicaid/CHIP/IHS block and goto 
               next appropriate block	
12A - Medicaid	CHIPPRXA	CHIPPRXA	What is the monthly premium for this CHIP^ST_CHIP plan?	IF CHIPPRXA > 100 then goto ERR1_CHIPPRXA

ELSEIF InvTdata.Inv12Medicaid.IHS = 1 then goto IHSSTLL

ELSE exit Medicaid/CHIP/IHS block and goto next appropriate block	
12A - Medicaid	IHSSTLL	IHSSTLL	^Areis_CU_C (you/your household) still covered by the Indian Health Service (IHS)?

1. Yes
2. No	Exit Medicaid/CHIP/IHS block and goto next appropriate block	
12A - Medicaid		MDCD_RXA			
12A - Medicaid		CHIP_RXA			
12A - Private		HHIPDLIB	** SHOW VARIABLE **		
12A - Private		PLNMGD	** SHOW Variable **		
12A - Private		HINSCMP	** SHOW Variable **		
12A - Private	HHISTILL	HHISTILL	 (Do/Does) (you/your household) still have your ^PLNMGD_fill from (insurance company name)?    

Policy|Insurance |Insurance|Payroll  |Time  |       |Paid |Paid
#     |Type      |Company  |Deduction|Period|Payment|Total|Non-CU

1. Yes
2. No	IF 8500.HHIPRYOU = 2 then goto HHISTILL for the next active
    policy.  If no more active policies, exit block and goto 
     the next appropriate inventory block. 

ELSE goto HHIANYPD	
12A - Private	HHIANYPD	HHIANYPD	Since the first of (reference month), have (you/you or any members of your household) made any payments on this policy (including payroll deductions/  )?

Policy|Insurance |Insurance|Payroll  |Time  |       |Paid |Paid
#     |Type      |Company  |Deduction|Period|Payment|Total|Non-CU

1. Yes
2. No	1:         IF 8500.HHIRPMPD.ORD = 1-9 then goto HHILSTTM
           ELSE goto HHIRPMPA

2,DK,RF:   Goto HHISTILL for the next active policy.  If no 
           more active policies, exit block and goto the next 
           appropriate inventory block.	
12A - Private	HHILSTTM	HHILSTTM	Last time, I recorded that payments are made (periodicity).  Is this still correct?

Policy|Insurance |Insurance|Payroll  |Time  |       |Paid |Paid
#     |Type      |Company  |Deduction|Period|Payment|Total|Non-CU

1. Yes
2. No	1:  Goto HHIREGXA

2, DK, RF:   Goto HHIRPMPA	
12A - Private	HHIRPMPA	HHIRPMPA	How often are payments made (including payroll deductions/  )?

Policy|Insurance |Insurance|Payroll  |Time  |       |Paid |Paid
#     |Type      |Company  |Deduction|Period|Payment|Total|Non-CU

1. Once a week
2. Once every 2 weeks
3. Twice a month
4. Once a month
5. Every 2 months
6. Quarterly (every 3 months)
7. Once every 4 months
8. Twice a year (every 6 months)
9. Once a year
10. Other	1-9:  Goto HHIREGXA

10,DK,RF: Goto HHIPDAMT	
12A - Private	HHIREGXA	HHIREGXA	What is the amount currently paid (periodicity)?  ^HHIRPMXB_fill

Policy|Insurance |Insurance|Payroll  |Time  |       |Paid |Paid
#     |Type      |Company  |Deduction|Period|Payment|Total|Non-CU	If HHIREGXA = 1 OR
   [((HHILSTTM = 1 and 8500.HHIRPMPD = 1) or HHIRPMPA = 1) 
      and HHIREGXA > 450] OR
   [((HHILSTTM = 1 and 8500.HHIRPMPD = 2) or HHIRPMPA = 2) and
    HHIREGXA > 900] OR
   [((HHILSTTM = 1 and 8500.HHIRPMPD = 3) or HHIRPMPA = 3) and
    HHIREGXA > 900] OR
   [((HHILSTTM = 1 and 8500.HHIRPMPD = 4) or HHIRPMPA = 4) and
    HHIREGXA > 1800] OR
   [((HHILSTTM = 1 and 8500.HHIRPMPD = 5) or HHIRPMPA = 5)
     and HHIREGXA > 3600] OR
  [((HHILSTTM = 1 and 8500.HHIRPMPD = 6) or HHIRPMPA = 6) and
    HHIREGXA > 7200] OR
  [((HHILSTTM = 1 and 8500.HHIRPMPD = 7) or HHIRPMPA = 7) and
     HHIREGXA > 5400] OR
  [((HHILSTTM = 1 and 8500.HHIRPMPD = 8) or HHIRPMPA = 8) and 
     HHIREGXA > 10800] OR
  [((HHILSTTM = 1 and 8500.HHIRPMPD = 9) or HHIRPMPA = 9) and
    HHIREGXA > 21600] then goto ERR1_HHIREGXA

ELSE goto HHISTILL for the next active policy.  If no more 
     active policies, exit block and goto the next 
     appropriate inventory block.	
12A - Private	HHIPDAMT	HHIPDAMT	How much was paid since the first of (reference month) not including this month?  ^HHIRPMXB_fill

Policy|Insurance |Insurance|Payroll  |Time  |       |Paid |Paid
#     |Type      |Company  |Deduction|Period|Payment|Total|Non-CU	IF HHIPDAMT > 864 then goto ERR1_HHIPDAMT

ELSE goto HHISTILL for the next active policy.  If no 
    more active policies, exit block and goto 
    the next appropriate inventory block.	
12A - Private		HHIR_GXA			
12A - Private		HHIP_AMT			
12A - Private		MATCHID			
12A - Single Service		SSPDLIB	** SHOW VARIABLE **		
12A - Single Service		SSNSDESC	** SHOW Variable **		
12A - Single Service		SSNSCMP	** SHOW Variable **		
12A - Single Service	SSSTILL	SSSTILL	 (Do/Does) (you/your household) still have your (dental care/long-term care/prescription/vision care/other) policy from (Single service insurance company name)?    

Policy|Insurance |Insurance|Payroll  |Time  |       |Paid |Paid
#     |Type      | Company |Deduction|Period|Payment|Total|Non-CU

1. Yes
2. No	IF 8500.SSPRYOU = 2 then 
    goto SSSTILL for the next active policy
    If no more active policies, exit block and goto next
        appropriate inventory block.
ELSE goto SSANYPD	
12A - Single Service	SSANYPD	SSANYPD	Since the first of (reference month), have (you/you or any members of your household) made any payments on this policy(including payroll deductions?/? )

Policy|Insurance |Insurance|Payroll  |Time  |       |Paid |Paid
#     |Type      | Company |Deduction|Period|Payment|Total|Non-CU

1. Yes
2. No	1:         IF I_SSRPMPD = 1-9 then goto SSLSTTM
           ELSE goto SSRPMPA

2,DK,RF:   Goto SSSTILL for the next active policy
           If no more active policies, exit block and 
              goto next appropriate inventory block.	
12A - Single Service	SSLSTTM	SSLSTTM	Last time, I recorded that payments are made (periodicity).  Is this still correct?

Policy|Insurance |Insurance|Payroll  |Time  |       |Paid |Paid
#     |Type      | Company |Deduction|Period|Payment|Total|Non-CU

1. Yes
2. No	1:         Goto SSREGXA

2,DK,RF:   Goto SSRPMPA	
12A - Single Service	SSRPMPA	SSRPMPA	How often are payments made(including payroll deductions?/? )

Policy|Insurance |Insurance|Payroll  |Time  |       |Paid |Paid
#     |Type      | Company |Deduction|Period|Payment|Total|Non-CU

1. Once a week
2. Once every 2 weeks
3. Twice a month
4. Once a month
5. Every 2 months
6. Quarterly (every 3 months)
7. Once every 4 months
8. Twice a year (every 6 months)
9. Once a year
10. Other	1-9:      Goto SSREGXA

10,DK,RF: Goto SSPDAMT	
12A - Single Service	SSREGXA	SSREGXA	What is the amount currently paid (periodicity)?

Policy|Insurance |Insurance|Payroll  |Time  |       |Paid |Paid
#     |Type      | Company |Deduction|Period|Payment|Total|Non-CU
 	1: Goto ERR1_ SSREGXA

2-99999: IF I_SSTYPE = 2 AND
            [((SSRPMPA = 1  or (SSLSTTM.ORD = 1 and I_SSRPMPD = 1)) and SSREGXA > 373) or
             ((SSRPMPA = 2  or (SSLSTTM.ORD = 1 and I_SSRPMPD = 2)) and SSREGXA > 745) or
             ((SSRPMPA = 3  or (SSLSTTM.ORD = 1 and I_SSRPMPD = 3)) and SSREGXA > 745) or
             ((SSRPMPA = 4  or (SSLSTTM.ORD = 1 and I_SSRPMPD = 4)) and SSREGXA > 1491) or
             ((SSRPMPA = 5  or (SSLSTTM.ORD = 1 and I_SSRPMPD = 5)) and SSREGXA > 2982) or
             ((SSRPMPA = 6  or (SSLSTTM.ORD = 1 and I_SSRPMPD = 6)) and SSREGXA > 4472) or
             ((SSRPMPA = 7  or (SSLSTTM.ORD = 1 and I_SSRPMPD = 7)) and SSREGXA > 5964) or
             ((SSRPMPA = 8  or (SSLSTTM.ORD = 1 and I_SSRPMPD = 8)) and SSREGXA > 8946) or
             ((SSRPMPA = 9  or (SSLSTTM.ORD = 1 and I_SSRPMPD = 9)) and SSREGXA > 17892)]
           THEN goto ERR1_ SSREGXA

       ELSEIF I_SSTYPE <> 2 AND
              [((SSRPMPA = 1  or (SSLSTTM.ORD = 1 and I_SSRPMPD = 1)) and SSREGXA > 81) or
               ((SSRPMPA = 2  or (SSLSTTM.ORD = 1 and I_SSRPMPD = 2)) and SSREGXA > 81) or
               ((SSRPMPA = 3  or (SSLSTTM.ORD = 1 and I_SSRPMPD = 3)) and SSREGXA > 195) or
               ((SSRPMPA = 4  or (SSLSTTM.ORD = 1 and I_SSRPMPD = 4)) and SSREGXA > 212) or
               ((SSRPMPA = 5  or (SSLSTTM.ORD = 1 and I_SSRPMPD = 5)) and SSREGXA > 212) or
               ((SSRPMPA = 6  or (SSLSTTM.ORD = 1 and I_SSRPMPD = 6)) and SSREGXA > 215) or
               ((SSRPMPA = 7  or (SSLSTTM.ORD = 1 and I_SSRPMPD = 7)) and SSREGXA > 215) or
               ((SSRPMPA = 8  or (SSLSTTM.ORD = 1 and I_SSRPMPD = 8)) and SSREGXA > 531) or
               ((SSRPMPA = 9  or (SSLSTTM.ORD = 1 and I_SSRPMPD = 9)) and SSREGXA > 675) ]
            THEN goto ERR1_SSREGXA
       ELSE goto SSSTILL for the next active policy
            If no more active policies, exit block and goto next
            appropriate inventory block.

DK,RF:   Goto SSSTILL for the next active policy
         If no more active policies, exit block and goto next
            appropriate inventory block.	
12A - Single Service	SSPDAMT	SSPDAMT	How much was paid since the first of (reference month) not including this month?

Policy|Insurance |Insurance|Payroll  |Time  |       |Paid |Paid
#     |Type      | Company |Deduction|Period|Payment|Total|Non-CU	1-99999: IF (I_SSTYPE = 2 and SSPDAMT greater than 1491) 
           OR (I_SSTYPE <> 2 and SSPDAMT greater than 133)
               then goto ERR1_SSPDAMT

        ELSE goto SSSTILL for the next active policy
           If no more active policies, exit block and 
              goto next appropriate inventory block.

DK,RF:  Goto SSSTILL for the next active policy
        If no more active policies, exit block and goto next
        appropriate inventory block.	
12A - Single Service		SSREGXA_			
12A - Single Service		SSPDAMT_			
12A - Single Service		MATCHID			
12A - Military	MILOTSTL	MILOTSTL	^Areis_CU_C (you/your household) still covered by ( (other military coverage description)/your other military coverage)?

1. Yes
2. No	IF I_VACHAMP = 1 then goto MILVASTL

ELSEIF I_TRICARE = 1 then goto TRICRSTL

ELSE exit military inventory block and goto Part B	
12A - Military	MILVASTL	MILVASTL	^Areis_CU_C (you/your household) still covered by (VA or CHAMP-VA/VA/CHAMP-VA/DK/RF)?

1. Yes
2. No	IF I_TRICARE = 1 then goto TRICRSTL

ELSE exit military inventory block and goto Part B	
12A - Military	TRICRSTL	TRICRSTL	^Areis_CU_C (you/your household) still covered by (TRICARE Prime/TRICARE Select/TRICARE for Life/(other name)TRICARE)?

1. Yes
2. No	1:  IF I_MILMAN = 3 then exit military inventory block 
        and goto Part B
    ELSE goto TRIANYPD

2,DK,RF:  Exit military inventory block and goto Part B	
12A - Military	TRIANYPD	TRIANYPD	Since the first of (reference month), have (you/you or any members of your household) made any payments for Tricare including payroll deductions?

1. Yes
2. No	1:         IF I_TRIRPMPD = 1-9 then goto TRILSTTM
           ELSE goto TRIRPMPA

2,DK,RF:   Exit military inventory block and goto Part B	
12A - Military	TRILSTTM	TRILSTTM	Last time, I recorded that payments are made (periodicity from previous quarter).  Is this still correct?

1. Yes
2. No	1:   Goto TRIREGXA

2,DK,RF:   Goto TRIRPMPA	
12A - Military	TRIRPMPA	TRIRPMPA	How often are payments made including any payroll deductions?

1. Once a week
2. Once every 2 weeks
3. Twice a month
4. Once a month
5. Every 2 months
6. Quarterly (every 3 months)
7. Once every 4 months
8. Twice a year (every 6 months)
9. Once a year
10. Other	1-9:        Goto TRIREGXA

10, DK, RF: Goto TRIPDAMT	
12A - Military	TRIREGXA	TRIREGXA	What is the amount currently paid (periodicity)?	IF ([(TRILSTTM = 1 and I_TRIRPMPD = 1) or TRIRPMPA = 1] and
    TRIREGXA greater than 125) OR
  ([(TRILSTTM = 1 and I_TRIRPMPD = 2) or TRIRPMPA = 2] and 
    TRIREGXA greater than 220) OR 
 ([(TRILSTTM = 1 and I_TRIRPMPD = 3) or TRIRPMPA = 3] and 
     TRIREGXA greater than 60) OR 
 ([(TRILSTTM = 1 and (I_TRIRPMPD = 4, 5, 6, 7 or 8)) or 
    (TRIRPMPA = 4, 5, 6, 7, or 8)] and TRIREGXA greater 
    than 758) OR 
 ([(TRILSTTM = 1 and I_TRIRPMPD = 9) or TRIRPMPA = 9] and
     TRIREGXA greater than 1200) ] then goto TRIREGXA

ELSE exit military inventory block and goto Part B	
12A - Military	TRIPDAMT	TRIPDAMT	How much was paid since the first of (reference month) not including this month?	IF ENTRY greater than 758 then goto ERR1_TRIPDAMT

ELSE exit military inventory block and goto Part B	
12A - Military		TRIR_GXA			
12A - Military		TRIP_AMT			
12A - Military		I_MILOTHR			
12A - Military		I_MILSPCOT			
12A - Military		I_VACHAMP			
12A - Military		I_TRICARE			
12A - Military		I_TRIRPMPD			
12A - Military		I_MILMAN			
12A - Military		I_MILMANOT			
12B - Military		I_VCDESC			
12 - Screener	FHICOV	FHICOV	(question text)

1. Yes
2. No	1, DK, RF:  Goto HIKIND

2:  IF NumPers65 ge 1 AND NumMCareInv = 0 then goto MCAREPRB
    ELSEIF AnyInv = 0 then goto MCAIDPRB
    ELSE goto Screener_END	
12 - Screener	HIKIND	HIKIND	 31    ? [F1]

What (other kind/kind) of health insurance or health care coverage (do/does) (you/your household) have or pay for?  INCLUDE those that pay for only one type of service (nursing home care, vision care, or dental care).  EXCLUDE private plans that only provide extra cash while hospitalized.

  Read each item on list
  Enter all that apply, separate with commas

1. Private health insurance, including employer and healthcare exchange plans?
2. (Medicare?/ )
3. Medicare Supplemental Insurance (Medi-Gap)?
4. (Medicaid(/state name)?/  )
5. (SCHIP (CHIP/Children's Health Insurance Program)(/state name)?/ )
6. Military health care (Tricare/VA/CHAMP-VA)?
7. (Indian Health Service?/  )
8. Single service plan (e.g., dental, vision, long-term care)?
9. No coverage of any type	DK,RF:  IF NumPers65 >= 1 AND NumMCareInv = 0 then 
           goto MCAREPRB
        ELSEIF AnyInv = 0 then goto MCAIDPRB
        ELSEIF NumSSInv = 0 then goto SINCOV
        ELSE goto Screener_END

1-8:  IF (3 selected without 2 AND NumMCareInv = 0 then 
          goto CK_HIKIND
     ELSEIF (NumPers65 >= 1) AND (2 not selected in HIKIND)
             AND (NumMCareInv = 0) then goto MCAREPRB
     ELSEIF (8 not selected in HIKIND) AND (NumSSInv = 0) 
             then goto SINCOV
     ELSE goto Screener_END

9:  IF 1-8 also selected in HIKIND then goto ERR_HIKIND
     ELSEIF (NumPers65 >= 1) AND (2 not selected in HIKIND)
             AND (NumMCareInv = 0) then goto MCAREPRB
     ELSEIF AnyInv = 0 then goto MCAIDPRB
     ELSEIF NumSSInv = 0 then goto SINCOV
     ELSE goto Screener_END	
12 - Screener	MCAREPRB	MCAREPRB	^Areyou_Isanyone covered by Medicare?

1. Yes
2. No	IF ((HIKIND = 9, DK, or RF) or FHICOV = 2) AND AnyInv = 0 
   then goto MCAIDPRB

ELSEIF (8 not selected in HIKIND) AND (HIKIND = RESPONSE, DK 
        or RF) AND NumSSInv = 0 then goto SINCOV

ELSE goto Screener_End	
12 - Screener	MCAIDPRB	MCAIDPRB	There is a program called Medicaid that pays for health care for persons in need. 
(In this state it is also called (program name). / )
^Areyou_Isanyone covered by Medicaid?

1. Yes
2. No	IF NumSSInv = 0 AND (8 not selected in HIKIND) AND 
   (HIKIND = RESPONSE, DK or RF) then goto SINCOV

ELSE goto Screener_END	
12 - Screener	SINCOV	SINCOV	^Doyou_Doesanyone have or pay for a separate insurance plan that pays for only one type of service such as dental, vision, or long-term care?

1. Yes
2. No	Goto Screener_End	
12 - Screener		Screener_End	** Not Displayed **	IF 2 selected in HIKIND OR MCAREPRB = 1 then goto MEDICARE
ELSEIF 4, 5, OR 7 selected in HIKIND OR MCAIDPRB = 1 then
       goto BlkMedicaid
ELSEIF 8 selected in HIKIND OR SINCOV = 1 then 
       goto Tblsingleserv
ELSEIF 1 OR 3 selected in HIKIND goto BlkPrivate
ELSEIF 6 selected in HIKIND goto BlkMilitary 
ELSE goto PartB_End	
12B - Medicare	MEDICARE	MEDICARE	Who (else is/else) enrolled in Medicare?

          Enter line numbers for all that apply, separate with commas.

1. Person 1
2. Person 2
3. Person 3
4. Person 4
5. Person 5
6. Person 6
7. Person 7
8. Person 8
9. Person 9
10. Person 10
11. Person 11
12. Person 12
13. Person 13
14. Person 14
15. Person 15
16. Person 16
17. Person 17
18. Person 18
19. Person 19
20. Person 20
21. Person 21
22. Person 22
23. Person 23
24. Person 24
25. Person 25
26. Person 26 
27. Person 27
28. Person 28
29. Person 29
30. Person 30	Goto TblMEDICARE	
12B - Medicare		MEMBNO			
12B - Medicare		MEM_NAME	** SHOW ONLY **		
12B - Medicare	MCCHOICE	MCCHOICE	?  [F1]

Medicare Advantage is the new name for Medicare Plus Choice plans.  (Are/Is) (you/NAME) enrolled in a Medicare Advantage plan?

1. Yes
2. No	1:  Goto MCPREM

2, DK, RF:  Goto MCHMOPLN	
12B - Medicare	MCHMOPLN	MCHMOPLN	(Are/Is) (you/NAME) under a Medicare managed care arrangement, such as an HMO, that is, a Health Maintenance Organization? (With an HMO, you must generally receive care from HMO doctors, otherwise the expense is not covered unless you were referred by the HMO or there was a medical emergency.)

1. Yes
2. No	1:  Goto MCPREM

2,DK,RF:  Goto MCPARTD	
12B - Medicare	MCPREM	MCPREM	Besides (your/NAME's) Medicare Part B payment, (are/is) (you/NAME) paying a premium for ^Yourhisher (Medicare Advantage/Medicare HMO) plan?

1. Yes
2. No	1:  Goto MCPRPTCX

2,DK,RF:  Goto MCPARTD	
12B - Medicare	MCPRPTCX	MCPRPTCX	What is (your/NAME's) monthly premium for ^Yourhisher (Medicare Advantage/Medicare HMO) plan?	IF entry < 5 or entry > 1080 then goto ERR1_MCPRPTCX

ELSE goto MCPARTD	
12B - Medicare	MCPARTD	MCPARTD	(Are/Is) (you/NAME) enrolled in Medicare Part D, also known as the Medicare Prescription Drug Plan?

1. Yes
2. No	1:  Goto MCPRPTDX

2,DK,RF:  Goto End_Person	
12B - Medicare	MCPRPTDX	MCPRPTDX	What is (your/NAME's) monthly premium for ^Yourhisher Medicare Part D prescription drug plan?	IF entry < 5 or entry > 100 then goto ERR1_MCPRPTDX

ELSE goto End_Person	
12B - Medicare		End_Person		Goto MCCHOICE for the next appropriate person.

If no more persons than exit the medicare block and 
   goto Medicare_Complete	
12B - Medicare		MATCHID	** Created in Post Processing **		
12B - Medicare		HIC_STAT	** Not Displayed **		
12B - Medicare		HIC_ORIG	** Not Displayed **		
12B - Medicare		MCPR_TCX	** Not Displayed **		
12B - Medicare		MCPR_TDX	** Not Displayed **		
12B - Medicare		MEDICARE	** Created in Processing **		
12B - Medicare		HIM_oninput	** Created in Processing **		
12B - Medicare		Medicare_Complete	** Not Displayed **	IF 4, 5, OR 7 selected in HIKIND OR MCAIDPRB = 1 then
       goto BlkMedicaid
ELSEIF 8 selected in HIKIND OR SINCOV = 1 then 
       goto Tblsingleserv
ELSEIF 1 OR 3 selected in HIKIND goto BlkPrivate
ELSEIF 6 selected in HIKIND goto BlkMilitary 
ELSE goto Partb_End	
12B - Medicare		MCHOICE_Flag			
12B - Medicare		MCHMOPLN_Flag			
12B - Medicaid	MEDICAID	MEDICAID	Earlier I recorded that (you/your household) (are/is) covered by Medicaid(/state medicaid plan name).  Is that correct?

1. Yes
2. No	1:  IF NUMHOUSE = 1 then goto MXCHNG
    ELSE goto MDCDCOV

2,DK,RF:  Goto Medicaid_Complete	
12B - Medicaid	MDCDCOV	MDCDCOV	How many members of your household are covered by Medicaid(/state medicaid plan name)?	IF MDCDCOV > number of CU members then goto CK_MDCDCOV

ELSE goto MXCHNG	
12B - Medicaid	MXCHNG	MXCHNG	Was (your/your household's) Medicaid obtained through Healthcare.gov or the (Health Insurance Marketplace, such as (state name)/Health Insurance Marketplace)?

1. Yes
2. No	Goto MEDPREM	
13B - Medicaid	MEDPREM	MEDPREM	A health insurance premium is the amount you or a family member pays each month for healthcare coverage.  Do (you/you or anyone in your household) pay a premium for your Medicaid(/state medicaid plan name) plan?

1. Yes
2. No	1:  Goto MDCDPRMX

2,DK,RF:  Goto Medicaid_Complete	
12B - Medicaid	MDCDPRMX	MDCDPRMX	What is the monthly premium for this Medicaid(/state medicaid plan name) plan?	IF entry > 100 then goto ERR1_MDCDPRMX

Else goto Medicaid_Complete	
12B - Medicaid	CHIP	CHIP	Earlier I recorded that (you/your household) (are/is) covered by the Children's Health Insurance Program (CHIP)^ST_CHIP.  Is that correct?

1. Yes
2. No	1:  IF NUMHOUSE = 1 then goto CHXCHNG
    ELSE goto CHIPCOV

2,DK,RF:  Goto Medicaid_Complete	
12B - Medicaid	CHIPCOV	CHIPCOV	How many members of your household are covered by CHIP^ST_CHIP?	IF CHIPCOV > number of CU members then goto CK_CHIPCOV

ELSE goto CHXCHNG	
12B - Medicaid	CHXCHNG	CHXCHNG	Was (your/your household's) CHIP plan obtained through Healthcare.gov or the (Health Insurance Marketplace, such as (state name)/Health Insurance Marketplace)?

1. Yes
2. No	Goto STRFPRM1	
12B - Medicaid	STRFPRM1	STRFPRM1	A health insurance premium is the amount you or a family member pays each month for healthcare coverage.  Do (you/you or anyone in your household) pay a premium for CHIP^ST_CHIP?

1. Yes
2. No	1:  Goto CHIPPRMX

2,DK,RF:  Goto Medicaid_Complete	
13B - Medicaid	CHIPPRMX	CHIPPRMX	What is the monthly premium for CHIP^ST_CHIP?	IF entry > 100 then goto ERR1_CHIPPRMX

ELSEIF 7 selected in HIKIND then goto IHS

ELSE goto Medicaid_Complete	
12B - Medicaid	IHS	IHS	Earlier I recorded that (you/your household) (are/is) covered by the Indian Health Service (IHS). 
Is that correct?

1. Yes
2. No	1:  IF NUMHOUSE = 1 then goto Medicaid_Complete
    ELSE goto IHSCOV

2,DK,RF:  Goto Medicaid_Complete	
12B - Medicaid	IHSCOV	IHSCOV	How many members of your household are covered by IHS?	IF IHSCOV > number of CU members then goto CK_IHSCOV

ELSE goto Medicaid_Complete	
12B - Medicaid		Medicaid_Complete		Exit Medicaid/CHIP/IHS block and
    IF 8 selected in HIKIND OR SINCOV = 1 then
         goto Tblsingleserv
    ELSEIF 1 OR 3 selected in HIKIND goto BlkPrivate
    ELSEIF 6 selected in HIKIND goto BlkMilitary 
    ELSE goto PartB_End	
12B - Medicaid		MDCD_RMX	** Not Displayed **		
12B - Medicaid		CHIP_RMX	** Not Displayed **		
12B - Medicaid		REC_STAT	** Created in Processing **		
12B - Medicaid		REC_ORIG	** Created in Processing **		
12B - Medicaid		HHD_oninput	** Created in Processing **		
12B - Medicaid		PQ_Medicaid	** Created in Processing **		
12B - Medicaid		PQ_CHIP	** Created in Processing **		
12B - Medicaid		PQ_IHS	** Created in Processing **		
12B - Single Service	SSTYPE	SSTYPE	(You mentioned that (you have/your household has) a single-service plan - that is, an insurance plan that provides one specific type of coverage.)  Let's talk about your (first/next) single-service plan.   
What type of service or care does your single-service plan pay for?

1. Dental care
2. Long-term care
3. Prescriptions
4. Vision care
5. Other (specify)
888. Delete the Line	1-4,DK,RF:  Goto SSNSCMP

5:  Goto SSOTHER

888:  Goto SSMORE	
12B - Single Service		PreFill	** SHOW ONLY **		
12B - Single Service	SSOTHER	SSOTHER	    Other type of single-service plan	Goto SSNSCMP	
12B - Single Service	SSNSCMP	SSNSCMP	 What is the name of the insurance company for this plan?

        Enter name of insurance company, not the insurance agent	IF NUMHOUSE = 1 then goto SSGROUP
ELSE goto SSCOVQ	
12B - Single Service	SSCOVQ	SSCOVQ	How many household members are/were covered by this plan?	1-30:   IF SSCOVQ gt NUMHOUSE then goto CK_SSCOVQ
        ELSE goto SSGROUP

0,DK,RF:  Goto SSGROUP	
12B - Single Service	SSGROUP	SSGROUP	Was the plan obtained on an individual or group basis?

1. Individually obtained
2. Group through place of employment
3. Group through other organization	Goto SSPRYOU	
12B - Single Service	SSPRYOU	SSPRYOU	(Do/Does) (you/your household) pay ANY portion of the premiums for this plan?

1. Yes
2. No	1,DK,RF:  Goto SSPRDED

2:        Goto SSPROUT	
12B - Single Service	SSPROUT	SSPROUT	Who pays the plan premiums?

1. An employer or union?
2. Another group or persons outside your household?	Goto SSMORE	
12B - Single Service	SSPRDED	SSPRDED	Are any premiums paid through payroll deductions?

1. Yes
2. No	Goto SSRPMPD	
12B - Single Service	SSRPMPD	SSRPMPD	How often are payments made for (entry for SSNSCMP/this plan )(including payroll deductions/  )?

1. Once a week
2. Once every 2 weeks
3. Twice a month
4. Once a month
5. Every 2 months
6. Quarterly (every 3 months)
7. Once every 4 months
8. Twice a year (every 6 months)
9. Once a year
10. Other	1-9:        Goto SSRPMXB

10,DK,RF:      Goto SSRGXB	
12B - Single Service	SSRPMXB	SSRPMXB	What is the amount currently paid (periodicity)?	1: goto ERR1_SSRPMXB
2-99999: IF SSTYPE = 2 AND
            [(SSRPMPD = 1 and SSRPMXB > 373) or
             (SSRPMPD = 2 and SSRPMXB > 745) or
             (SSRPMPD = 3 and SSRPMXB > 745) or
            (SSRPMPD = 4 and SSRPMXB > 1491) or  
            (SSRPMPD = 5 and SSRPMXB > 2982) or
            (SSRPMPD = 6 and SSRPMXB > 4472) or
            (SSRPMPD = 7 and SSRPMXB > 5964) or
            (SSRPMPD = 8 and SSRPMXB > 8946) or
            (SSRPMPD = 9 and SSRPMXB > 17892)] THEN
                  goto ERR1_SSRPMXB
        ELSEIF SSTYPE <> 2 AND
           [(SSRPMPD = 1 and SSRPMXB > 81) or
            (SSRPMPD = 2 and SSRPMXB > 81) or
            (SSRPMPD = 3 and SSRPMXB > 195) or
            (SSRPMPD = 4 and SSRPMXB > 212) or
            (SSRPMPD = 5 and SSRPMXB > 212) or
            (SSRPMPD = 6 and SSRPMXB > 215) or
            (SSRPMPD = 7 and SSRPMXB > 215) or
            (SSRPMPD = 8 and SSRPMXB > 531) or
            (SSRPMPD = 9 and SSRPMXB > 675) ] THEN
                goto ERR1_SSRPMXB
           ELSE goto SSMORE
 
DK,RF:  Goto SSMORE	
12B - Single Service	SSRGXB	SSRGXB	What was the total expense paid for this plan since (reference month) not including this month?	1-99999: IF (SSTYPE = 2 and SSRGXB greater than 1491) or
            (SSTYPE <> 2 and SSRGXB greater than 133) then
              goto ERR1_SSRGXB 
          ELSE goto SSMORE
 
DK,RF:     Goto SSMORE	
12B - Single Service	SSMORE	SSMORE	(Do/Does) (you/your household) have any other single-service plans - that is, any other insurance plans that provide one specific type of coverage?

1. Yes
2. No	1:      IF ROW number = 12 then goto ERR_MAX
        ELSE goto SSTYPE for next plan, next line of grid

2,DK,RF:   IF SSTYPE on the row below this one is not EMPTY
               then goto CK_SSMORE. 
           ELSE exit single service block and
               IF 1 OR 3 selected in HIKIND goto BlkPrivate
               ELSEIF 6 selected in HIKIND goto BlkMilitary 
               ELSE goto PartB_End	
12B - Single Service		SingleServ_Complete			
12B - Single Service		SSRPMXB_	** Not DIsplayed **		
12B - Single Service		SSRGXB_	** Not Displayed **		
12B - Single Service		HIS_STAT	** Not Displayed **		
12B - Single Service		HIS_ORIG	** Not Displayed **		
12B - Single Service		SSPDLIB	** Not Displayed **		
12B - Single Service		MATCHID	** Created in Post Processing **		
12B - Single		BLSLNO	**  Created in Processing  *		
12B - Private	HINSCMP	HINSCMP	^HINSCMP_fill
Let's talk about your (first/next) private health insurance plan.
What is the name of the insurance company for this plan?

                   Enter name of insurance company, not the insurance agent
                   Enter 888 to delete the line  	IF 888 then goto HHIMORE

ELSEIF 3 selected in HIKIND then goto MEDIGAP

ELSEIF NUMHOUSE = 1 then goto PLNMGD

ELSE goto HHICOVQ	
12B - Private	MEDIGAP	MEDIGAP	Is this a Medicare Supplemental Insurance plan?

  Medicare Supplemental Insurance is also known as "Medi-Gap" insurance

1. Yes
2. No	1:  IF MCCHOICE_Flag = 1 OR MCHMOPLN_Flag = 1 then
        goto CK_MEDIGAP
    ELSEIF NUMHOUSE = 1 then goto PLNMGD
    ELSE goto HHICOVQ

2,DK,RF:  IF NUMHOUSE = 1 then goto PLNMGD
          ELSE goto HHICOVQ	
12B - Private	HHICOVQ	HHICOVQ	How many household members are/were covered by this plan?	0-30:   IF HHICOVQ greater than NUMHOUSE then goto CK_HHICOVQ
        ELSEIF ((MEDIGAP = 1) AND (HHICOVQ gt TotalMedicare) 
               then goto CK_HHICOVQ2
        ELSE goto PLNMGD

DK,RF: Goto PLNMGD	
12B - Private	PLNMGD	PLNMGD	?  [F1]

Is this plan an HMO (Health Maintenance Organization), an IPA (Individual Practice Association), a PPO (Preferred Provider Organization), or fee-for-service?

1. HMO/IPA
2. PPO/Fee-for-service	1:       Goto FSA

2,DK,RF:  Goto HSAHRA	
12B - Private	HSAHRA	HSAHRA	With this plan, is there a special account or fund that can be used to pay for medical expenses?  The accounts are sometimes referred to as Health Savings Accounts (HSAs), Health Reimbursement Accounts (HRAs), Personal Care accounts, Personal Medical funds, or Choice funds, and are different from Flexible Spending Accounts.

1. Yes
2. No	Goto FSA	
12B - Private	FSA	FSA	Do (you/you or any members of your household) have a Flexible Spending Account for health expenses?  These accounts are offered by some employers to allow employees to set aside pre-tax dollars of their own money for their use throughout the year to reimburse themselves for their out-of-pocket expenses for health care.  With this type of account, any money remaining in the account at the end of the year, following a short grace period, is lost to the employee.

1. Yes
2. No	Goto HHIGROUP	
12B - Private	HHIGROUP	HHIGROUP	Was the plan obtained on an individual or group basis?       

1. Individually obtained
2. Group through place of employment
3. Group through other organization	1,3,DK,RF:  Goto PORTAL

2:  Goto HHIPRYOU	
12B - Private	PORTAL	PORTAL	Was the plan obtained through ^ST_PORTAL Healthcare.gov?

1. Yes
2. No	1:  Goto PORTPLAN

2,DK,RF:  Goto HHIPRYOU	
12B - Private	PORTPLAN	PORTPLAN	Is this plan a platinum, gold, silver, bronze, or catastrophic plan?

1. Platinum plan
2. Gold plan
3. Silver plan
4. Bronze plan
5. Catastrophic plan	Goto HHIPRYOU	
12B - Private	HHIPRYOU	HHIPRYOU	(Do/Does) (you/your household) pay ANY portion of the premiums for this plan?

1. Yes
2. No	1,DK,RF:  Goto HHIPRDED

2:        Goto HHIPROUT	
12B - Private	HHIPROUT	HHIPROUT	Who pays the policy premiums?

1. An employer or union?
2. Another group or persons outside your household?	IF PORTAL = 1 goto PREMSUBS
ELSE goto HHIMORE	
12B - Private	HHIPRDED	HHIPRDED	Are any premiums paid through payroll deductions?

1. Yes
2. No	Goto HHIRPMPD	
12B - Private	HHIRPMPD	HHIRPMPD	How often are payments made for (entry for HINSCMP/this plan ) (including payroll deductions/  )?

1. Once a week
2. Once every 2 weeks
3. Twice a month
4. Once a month
5. Every 2 months
6. Quarterly (every 3 months)
7. Once every 4 months
8. Twice a year (every 6 months)
9. Once a year
10. Other	1-9:        Goto HHIRPMXB

10,DK,RF:   Goto HHIIRGXB	
12B - Private	HHIRPMXB	HHIRPMXB	What is the amount currently paid ^PERIOD_PI?  ^HHIRPMXB_fill	1-99999:  IF HHIRPMXB =1 OR
          [(HHIRPMPD = 1 and HHIRPMXB > 450) OR
           (HHIRPMPD = 2 and HHIRPMXB > 900) OR
           (HHIRPMPD = 3 and HHIRPMXB > 900) OR
           (HHIRPMPD = 4 and HHIRPMXB > 1800) OR
           (HHIRPMPD = 5 and HHIRPMXB > 3600) OR
           (HHIRPMPD = 6 and HHIRPMXB > 7200) OR
           (HHIRPMPD = 7 and HHIRPMXB > 5400) OR
           (HHIRPMPD = 8 and HHIRPMXB > 10800) OR
           (HHIRPMPD = 9 and HHIRPMXB > 21600)]
              Then goto ERR1_HHIRPMXB
           ELSEIF PORTAL = 1 then goto PREMSUBS
           ELSE goto HHIMORE
 
DK,RF:     IF PORTAL = 1 then goto PREMSUBS
           ELSE goto HHIMORE	
12B - Private	HHIIRGXB	HHIIRGXB	What was the total expense paid for this plan since (reference month) not including this month?  ^HHIRPMXB_fill	1-99999:  IF HHIIRGXB greater than 864 then goto ERR1_HHIIRGXB
          ELSEIF PORTAL = 1 then goto PREMSUBS
          ELSE goto HHIMORE

DK,RF:    IF PORTAL = 1 then goto PREMSUBS
          ELSE goto HHIMORE	
12B - Private	PREMSUBS	PREMSUBS	Is the cost of the premium subsidized based on (your/your household's) income?

  Subsidized health coverage is insurance with a reduced premium.  Low
    and middle income families are eligible to receive tax credits that allow
    them to pay lower premiums for insurance bought through healthcare
    exchanges or marketplaces.

1. Yes
2. No	1:  goto HHISUBPD

2, DK, RF:  goto HHIMORE	
12B - Private	HHISUBPD	HHISUBPD	Is the subsidy paid directly to the health insurance company?

1. Yes
2. No	Goto HHIMORE	
12B - Private	HHIMORE	HHIMORE	Do (you/you or any members of your household) have any other private health insurance plans?

1. Yes
2. No	1:      IF ROW number = 12 then goto ERR_MAX
        ELSE goto HINSCMP for next plan, next line of grid

2,DK,RF:    IF HINSCMP on the row below this one is not EMPTY
               then goto CK_HHIMORE. 
            Else exit private insurance table and
               IF 6 selected in HIKIND goto BlkMilitary 
               ELSE goto PartB_End	
12B - Private		Private_Complete			
12B - Private		HHIPDLIB	** NOT DISPLAYED **		
12B - Private		HHIR_MXB	** Not Displayed **		
12B - Private		HHII_GXB	** Not Displayed **		
12B - Private		HIP_STAT	** Not Displayed **		
12B - Private		HIP_ORIG	** Not Displayed **		
12B - Private		HHICPMTB			
12B - Private		HHIBCBS			
12B - Private		MATCHID	** Created in Post Processing **		
12B - Private		BLSLNO	**  Created in Processing  *		
12B - Military	MILITARY	MILITARY	Earlier I recorded that (you/your household) are covered by military health care.  Is that correct?

1. Yes
2. No	1:  Goto MILSPC

2,DK,RF:  Goto Military_Complete	
12B - Military	MILSPC	MILSPC	What (other types/types) of military health care (are/is) (you/your household) covered by?

  Enter all that apply, separate with commas

1. (Tricare/  )
2. (VA/  )
3. (CHAMP-VA/  )
4. (Other military coverage (specify)/  )	1-4:  IF 4 selected then goto MILSPCOT
      ELSEIF 2 or 3 selected AND NUMHOUSE gt 1 then 
             goto MILVACOV
      ELSEIF 1 selected in MILSPC AND NUMHOUSE gt 1 then 
             goto TRICOV
      ELSEIF 1 selected then goto MILMAN
      ELSE goto Military_Complete

DK, RF:  Goto Military_Complete	
12B - Military	MILSPCOT	MILSPCOT	  Other military coverage - specify:	IF NUMHOUSE gt 1 then goto MILOTCOV

ELSEIF 1 selected in MILSPC AND NUMHOUSE gt 1 then goto TRICOV

ELSEIF 1 selected in MILSPC then goto MILMAN

ELSE goto Military_Complete	
12B - Military	MILOTCOV	MILOTCOV	How many members of your household are covered by ^MILSPCOT_fill?	IF MILOTCOV greater than NUMHOUSE then goto CK_MILOTCOV

ELSEIF 2 or 3 selected in MILSPC AND NUMHOUSE gt 1 then 
       goto MILVACOV

ELSEIF 1 selected in MILSPC AND NUMHOUSE gt 1 then goto TRICOV

ELSEIF 1 selected in MILSPC then goto MILMAN

ELSE goto Military_Complete	
12B - Military	MILVACOV	MILVACOV	How many members of your household are covered by (VA or CHAMP-VA/VA/CHAMP-VA)?	IF MILVACOV gt the number of CU members then goto CK_MILVACOV

ELSEIF 1 selected in MILSPC AND NUMHOUSE gt 1 then goto TRICOV

ELSEIF 1 selected in MILSPC then goto MILMAN

ELSE goto Military_Complete	
12B - Military	TRICOV	TRICOV	How many members of your household are covered by TRICARE?	IF TRICOV gt the number of CU members then goto CK_TRICOV

ELSE goto MILMAN

ELSE goto Military_Complete	
12B - Military	MILMAN	MILMAN	Is your TRICARE plan - TRICARE Prime, TRICARE Select, or TRICARE for Life?

               If more than one plan type, select "other (specify)"

1. TRICARE Prime
2. TRICARE Select
3. TRICARE for Life
4. TRICARE other (specify)	1,2,DK,RF:   Goto TRIRPMPD

3:     Goto Military_Complete

4:     Goto MILMANOT	
12B - Military	MILMANOT	MILMANOT	  Other type of TRICARE coverage - specify:	Goto TRIRPMPD	
12B - Military	TRIRPMPD	TRIRPMPD	How often are payments made for (TRICARE Prime/TRICARE Select/ (other name)/TRICARE ) including payroll deductions?

1. Once a week
2. Once every 2 weeks
3. Twice a month
4. Once a month
5. Every 2 months
6. Quarterly (every 3 months)
7. Once every 4 months
8. Twice a year (every 6 months)
9. Once a year
10. Other	1-9:  Goto TRIRPMXB

10,DK,RF: Goto TRIIRGXB	
12B - Military	TRIRPMXB	TRIRPMXB	What is the amount currently paid (periodicity)?	If (TRIRPMPD = 1 and TRIRPMXB greater than 125) or
  (TRIRPMPD = 2 and TRIRPMXB greater than 220) or
  (TRIRPMPD = 3 and TRIRPMXB greater than 60) or
  ((TRIRPMPD = 4-8) and TRIRPMXB greater than 758) or
  (TRIRPMPD = 9 and TRIRPMXB greater than 1200) ]
     then goto ERR1_TRIRPMXB

Else goto Military_Complete	
12B - Military	TRIIRGXB	TRIIRGXB	What was the total expense paid for (TRICARE Prime/TRICARE Select/ (other name)/TRICARE ) since (reference month) not including this month?	IF ENTRY greater than 758 then goto ERR1_TRIIRGXB

Else goto Military_Complete	
12B - Military		Military_Complete		Exit military block and goto PartB_End	
12B - Military		TRIR_MXB			
12B - Military		TRII_GXB			
12B - Military		REC_STAT	** Created in Processing **		
12B - Military		REC_ORIG	** Created in Processing **		
12B - Military		MILOTHR	** Created in Processing **		
12B - Military		VACHAMP	** Created in Processing **		
12B - Military		VCDESC	** Created in Processing **		
12B - Military		TRICARE	** Created in Processing **		
12B - Military		VA	** Created in Processing **		
12B - Military		CHAMP	** Created in Processing **		
12B - Military		HMT_oninput	** Created in Processing **		
12B - Military		PQ_Tricare	** Created in Processing **		
12B - Military		PQ_VACHAMP	** Created in Processing **		
12B - Military		PQ_MILOTHR	** Created in Processing **		
12B		PartB_END	**  Not displayed **	Exit Sect12 block and goto Section 13	
12 - Screener		REC_STAT	** Created in Processing **		
13 - Screener		REC_ORIG	** Created in Processing **		
Processing Only - Medicaid/Military Merged		MDCDSTLL	

1. Yes
2. No		
Processing Only - Medicaid/Military Merged		MEDPREMA	

1. Yes
2. No		
Processing Only - Medicaid/Military Merged		MDCDPRXA			
Processing Only - Medicaid/Military Merged		CHIPSTLL	

1. Yes
2. No		
Processing Only - Medicaid/Military Merged		CHIPRMA	

1. Yes
2. No		
Processing Only - Medicaid/Military Merged		CHIPPRXA			
Processing Only - Medicaid/Military Merged		IHSSTLL	

1. Yes
2. No		
Processing Only - Medicaid/Military Merged		MDCD_RXA			
Processing Only - Medicaid/Military Merged		CHIP_RXA			
Processing Only - Medicaid/Military Merged		MEDICAID	

1. Yes
2. No		
Processing Only - Medicaid/Military Merged		MDCDCOV			
Processing Only - Medicaid/Military Merged		MXCHNG	

1. Yes
2. No		
Processing Only - Medicaid/Military Merged		MEDPREM	

1. Yes
2. No		
Processing Only - Medicaid/Military Merged		MDCDPRMX			
Processing Only - Medicaid/Military Merged		CHIP	

1. Yes
2. No		
Processing Only - Medicaid/Military Merged		CHIPCOV			
Processing Only - Medicaid/Military Merged		CHXCHNG	

1. Yes
2. No		
Processing Only - Medicaid/Military Merged		STRFPRM1	

1. Yes
2. No		
Processing Only - Medicaid/Military Merged		CHIPPRMX			
Processing Only - Medicaid/Military Merged		IHS	

1. Yes
2. No		
Processing Only - Medicaid/Military Merged		IHSCOV			
Processing Only - Medicaid/Military Merged		MDCD_RMX			
Processing Only - Medicaid/Military Merged		CHIP_RMX			
Processing Only - Medicaid/Military Merged		REC_STAT			
Processing Only - Medicaid/Military Merged		REC_ORIG			
Processing Only - Medicaid/Military Merged		MILOTSTL	

1. Yes
2. No		
Processing Only - Medicaid/Military Merged		MILVASTL	

1. Yes
2. No		
Processing Only - Medicaid/Military Merged		TRICRSTL	

1. Yes
2. No		
Processing Only - Medicaid/Military Merged		TRIANYPD	

1. Yes
2. No		
Processing Only - Medicaid/Military Merged		TRILSTTM	

1. Yes
2. No		
Processing Only - Medicaid/Military Merged		TRIRPMPA	

1. Once a week
2. Once every 2 weeks
3. Twice a month
4. Once a month
5. Every 2 months
6. Quarterly (every 3 months)
7. Once every 4 months
8. Twice a year (every 6 months)
9. Once a year
10. Other		
Processing Only - Medicaid/Military Merged		TRIREGXA			
Processing Only - Medicaid/Military Merged		TRIPDAMT			
Processing Only - Medicaid/Military Merged		TRIR_GXA	** Not Displayed **		
Processing Only - Medicaid/Military Merged		TRIP_AMT	** Not Displayed **		
Processing Only - Medicaid/Military Merged		MILITARY	

1. Yes
2. No		
Processing Only - Medicaid/Military Merged		MILSPC	

1. (Tricare/  )
2. (VA/  )
3. (CHAMP-VA/  )
4. (Other military coverage (specify)/  )		
Processing Only - Medicaid/Military Merged		MILSPCOT			
Processing Only - Medicaid/Military Merged		MILOTCOV			
Processing Only - Medicaid/Military Merged		MILVACOV			
Processing Only - Medicaid/Military Merged		TRICOV			
Processing Only - Medicaid/Military Merged		MILMAN	

1. TRICARE Prime
2. TRICARE Select
3. TRICARE for Life
4. TRICARE other (specify)		
Processing Only - Medicaid/Military Merged		MILMANOT			
Processing Only - Medicaid/Military Merged		TRIRPMPD	

1. Once a week
2. Once every 2 weeks
3. Twice a month
4. Once a month
5. Every 2 months
6. Quarterly (every 3 months)
7. Once every 4 months
8. Twice a year (every 6 months)
9. Once a year
10. Other		
Processing Only - Medicaid/Military Merged		TRIRPMXB			
Processing Only - Medicaid/Military Merged		TRIIRGXB			
Processing Only - Medicaid/Military Merged		TRIR_MXB			
Processing Only - Medicaid/Military Merged		TRII_GXB			
Processing Only - Medicaid/Military Merged		MILOTHR			
Processing Only - Medicaid/Military Merged		VACHAMP			
Processing Only - Medicaid/Military Merged		TRICARE			
Processing Only - Private/Single Merged		HHISTILL	

1. Yes
2. No		
Processing Only - Private/Single Merged		HHIANYPD	

1. Yes
2. No		
Processing Only - Private/Single Merged		HHILSTTM	

1. Yes
2. No		
Processing Only - Private/Single Merged		HHIRPMPA	

1. Once a week
2. Once every 2 weeks
3. Twice a month
4. Once a month
5. Every 2 months
6. Quarterly (every 3 months)
7. Once every 4 months
8. Twice a year (every 6 months)
9. Once a year
10. Other		
Processing Only - Private/Single Merged		HHIREGXA			
Processing Only - Private/Single Merged		HHIPDAMT			
Processing Only - Private/Single Merged		HHIR_GXA			
Processing Only - Private/Single Merged		HHIP_AMT			
Processing Only - Private/Single Merged		MATCHID			
Processing Only - Private/Single Merged		HINSCMP			
Processing Only - Private/Single Merged		MEDIGAP	

1. Yes
2. No		
Processing Only - Private/Single Merged		HHICOVQ			
Processing Only - Private/Single Merged		PLNMGD	

1. HMO/IPA
2. PPO/Fee-for-service		
Processing Only - Private/Single Merged		HSAHRA	

1. Yes
2. No		
Processing Only - Private/Single Merged		FSA	

1. Yes
2. No		
Processing Only - Private/Single Merged		HHIGROUP	

1. Individually obtained
2. Group through place of employment
3. Group through other organization		
Processing Only - Private/Single Merged		PORTAL	

1. Yes
2. No		
Processing Only - Private/Single Merged		PORTPLAN	

1. Platinum plan
2. Gold plan
3. Silver plan
4. Bronze plan
5. Catastrophic plan		
Processing Only - Private/Single Merged		HHIPRYOU	

1. Yes
2. No		
Processing Only - Private/Single Merged		HHIPROUT	

1. An employer or union?
2. Another group or persons outside your household?		
Processing Only - Private/Single Merged		HHIPRDED	

1. Yes
2. No		
Processing Only - Private/Single Merged		HHIRPMPD	

1. Once a week
2. Once every 2 weeks
3. Twice a month
4. Once a month
5. Every 2 months
6. Quarterly (every 3 months)
7. Once every 4 months
8. Twice a year (every 6 months)
9. Once a year
10. Other		
Processing Only - Private/Single Merged		HHIRPMXB			
Processing Only - Private/Single Merged		HHIIRGXB			
Processing Only - Private/Single Merged		PREMSUBS	

1. Yes
2. No		
Processing Only - Private/Single Merged		HHISUBPD	

1. Yes
2. No		
Processing Only - Private/Single Merged		HHIPDLIB			
Processing Only - Private/Single Merged		HHIR_MXB			
Processing Only - Private/Single Merged		HHII_GXB			
Processing Only - Private/Single Merged		HIP_STAT			
Processing Only - Private/Single Merged		HIP_ORIG			
Processing Only - Private/Single Merged		HHIBCBS			
Processing Only - Private/Single Merged		BLSLNO			
Processing Only - Private/Single Merged		HHIPDLIB_orig			
Processing Only - Private/Single Merged		SSTYPE	

1. Dental care
2. Long-term care
3. Prescriptions
4. Vision care
5. Other (specify)
888. Delete the Line		
Processing Only - Private/Single Merged		SSOTHER			
13A	S13A_INTRO	S13AINTRO	Now I am going to ask some questions about medical payments and reimbursements.  I will begin with your payments.

By payments I mean any co-pays and out-of-pocket expenses.  
Include all payments, even those for persons who are outside of your household.

                    Description   Amount    Month                 
                   (MEDPDESC)    (MEDPMTX) (MEDPMTMO)

1. Enter 1 to Continue	Goto BSect13.BTABLEA.BROW.ITEM	
13A	MDB_ITEM	ITEM	SCREEN 1--------------------------------------------------------------
  32   ? [F1]

Since the first of (reference month), have (you/you or any members of your household) made any payments for the following?

       Read each item on list

SCREEN 2 -------------------------------------------------------------------------
  33  ? [F1]

Have (you/you or any members of your household) made any payments for --
         Read each item on list

1. Eye examinations, treatment, or surgery
2. Purchase of eye glasses or contact lenses
3. Dental care
4. Hospital room or hospital services
5. Services by medical professionals other than physicians
6. Physician services
7. Lab tests or x-rays
8. Care in convalescent or nursing homes
9. Care for invalids, convalescents, handicapped, or elderly persons in the home
10. Adult day care centers
11. Other medical care and services
12. Hearing aids
13. Prescription drugs
14. Purchase or rental of supportive or rehabilitative equipment
15. Purchase or rental of medical or surgical equipment for general use
95. Continue List
99. None/No more entries
888. Delete a line	1-15:   IF ITEM ne Item2Shadow then goto CK_ITEM
        ELSE goto DESCRIPTION

95:     Goto next ROW

99:      Goto S13A_END

888:    IF no more rows then goto S13A_END
        ELSE goto ITEM - next row of the table	
13A		ServiceOrItem	** SHOW ONLY **		
13A	MEDPDESC	DESCRIPTION	          Ask if not apparent

   Describe the care/service/item.

                    Description   Amount    Month                 
                   (MEDPDESC)    (MEDPMTX) (MEDPMTMO)	IF ITEM = 5 then goto MEDPNOUT

ELSEIF ITEM = 14 or 15 then goto MEDPPRNT

ELSE goto MEDPGFTC	
13A	MEDPNOUT	MEDPNOUT	Was this service provided inside or outside the home? 

                  Description    Amount    Month  
       (MEDPDESC)    (MEDPMTX) (MEDPMTMO)

1. Inside the home
2. Outside the home	Goto MEDPGFTC	
13A	MEDPPRNT	MEDPPRNT	         Ask if not apparent

Was this for a purchase or rental? 

                  Description    Amount    Month  
                  (MEDPDESC)    (MEDPMTX) (MEDPMTMO)

1. Purchase
2. Rental	Goto MEDPGFTC	
14A	MEDPGFTC	MEDPGFTC	    Ask if not apparent

 (Was/Were) the (description) for a member of your household or someone outside of your household?

                    Description   Amount    Month                 
                   (MEDPDESC)    (MEDPMTX) (MEDPMTMO)

1. Household member
2. Non-household member	Goto MONTH	
13A	MEDPMTMO	MONTH	  In what month was(were) the payment(s) made?

   ( * Enter 13 for same amount each month of the reference period./  ) 

                    Description   Amount    Month                 
                   (MEDPDESC)    (MEDPMTX) (MEDPMTMO)

1. January
2. February
3. March
4. April
5. May
6. June
7. July
8. August
9. September
10. October
11. November
12. December
13. (Same amount each month/  )	REF_MONTH - CUR_MONTH:  IF (MONTH is not within the 
                            reference period) then goto 
                             ERR3_MONTH
                         ELSE goto AMOUNT

13,DK,RF:    Goto AMOUNT	
13A	MEDPMTX	AMOUNT	(What was the total amount paid in (month)?/What was the total amount paid?/What is your monthly expense?)

   Description   Amount    Month                 
   (MEDPDESC)   (MEDPMTX) (MEDPMTMO)	1-999999:  IF [(ITEM = 1 and (AMOUNT < 5 or AMOUNT > 2000)) or
             (ITEM = 2 and (AMOUNT < 3 or AMOUNT > 999)) or
             (ITEM = 3 and (AMOUNT < 6 or AMOUNT > 4000)) or
             (ITEM = 4 and (AMOUNT < 5 or AMOUNT > 5000)) or 
             (ITEM = 5 and (AMOUNT < 5 or AMOUNT > 800)) or
             (ITEM = 6 and (AMOUNT < 5 or AMOUNT > 4999)) or
             (ITEM = 7 and (AMOUNT < 5 or AMOUNT > 1499)) or
             (ITEM = 8 and (AMOUNT < 15 or AMOUNT > 8000)) or
             (ITEM = 9 and (AMOUNT < 20 or AMOUNT > 10,700)) or
             (ITEM = 10 and (AMOUNT < 5 or AMOUNT > 1200)) or
             (ITEM = 11 and (AMOUNT < 5 or AMOUNT > 650)) or
             (ITEM = 12 and (AMOUNT < 5 or AMOUNT > 5000)) or
             (ITEM = 13 and (AMOUNT < 3 or AMOUNT > 999)) or
             (ITEM = 14 and (AMOUNT < 6 or AMOUNT > 1350)) or
             (ITEM = 15 and (AMOUNT < 5 or AMOUNT > 500))]
              AND (MONTH <> 13) then goto ERR1_AMOUNT

          ELSEIF ITEM and AMOUNT for this record = data on
               the prechart/input AND (that prechart records 
               MEDPMTMO <> 13) then goto ERR_DUP

          ELSE goto C

DK,RF:    Goto C	
13A	MEDPCB_S	C	  Enter 'C' for a combined expense	C:        Goto COMBCODE

EMPTY:  IF [(ITEM = 1, 2, 3, 6 or 12) and (RT10.POPGRP = 
           7, 8, 07 or 08)] OR [ITEM = 5 and MEDPNOUT= 2 
           and (RT10.POPGRP = 7, 8, 07 or 08)] OR 
           [ITEM = 10 and (RT10.POPGRP = 15 or 16)] OR 
           [(ITEM = 13, 14 or 15) and (RT10.POPGRP = 11 or 12)] 
             then goto MDBSTORE

        ELSE goto MORE

IF anything other than 'C' or blank is entered then
   goto CK_C	
13A	MEDPCMB	COMBCODE	 32-33    ? [F1]

What is (description) combined with?

        Enter all that apply, separate with commas

            Description    Amount    Month
          (MEDPDESC)    (MEDPMTX) (MEDPMTMO)

1. Eye examinations, treatments, or surgery
2. Purchase of eye glasses or contact lenses
3. Dental care
4. Hospital room or hospital services
5. Services by medical professionals other than physicians
6. Physician services
7. Lab tests or x-rays
8. Care in convalescent or nursing homes
9. Care for invalids, convalescents, handicapped, or elderly persons in the home
10. Adult day care centers
11. Other medical care and services
12. Hearing aids
13. Prescription drugs
14. Purchase or rental of supportive or rehabilitative equipment
15. Purchase or rental of medical or surgical equipment for general use
77. Misc. combined (unable to specify/DK)	IF [(ITEM = 1, 2, 3, 6 or 12) and (RT10.POPGRP = 7, 8,
   07 or 08)] OR [ITEM = 5 and MEDPNOUT= 2 and 
   (RT10.POPGRP = 7, 8, 07 or 08)] OR [ITEM = 10 and 
   (RT10.POPGRP = 15 or 16)] OR [(ITEM = 13, 14 or 15) 
   and (RT10.POPGRP = 11 or 12)] then goto MDBSTORE

ELSE goto MORE	
13A	MDBSTORE	MDBSTORE	What is the name of the business (that provided this service/where this was purchased)?	IF UPPERCASE ENTRY contains ".COM" then goto MORE

ELSEIF ENTRY = DK or RF then goto MORE

ELSE goto MDBPURCH	
13A	MDBPURCH	MDBPURCH	Was this paid for - 

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  Goto MORE

2:  Goto MDBLOC	
13A	MDBLOC	MDBLOC	In what city is (Store) located?	Goto MDBLOCST	
13A	MDBLOCST	MDBLOCST	? [F1]

In what state is (Store) located?
 
            Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_MDBLOCST

ELSE goto MORE	
13A	MEDPMORE	MORE	Did (you/you or any members of your household) make any other payments for (description)?
 
              Description   Amount    Month 
             (MEDPDESC)    (MEDPMTX) (MEDPMTMO)

1. Yes
2. No	1:     IF ROW number = 40 then goto ERR_MAX
       ELSE goto ITEM, next line on the grid

2,DK,RF:   IF ROW number = 40 then goto S13A_END
           ELSE goto ITEM, next line on the grid	
13A		S13A_END	** Not Displayed **	Exit block and goto S13B_INTRO	
13A		MEDPCARY	** OUT VARIABLE **		
13A		MEDPCY1	** OUT VARIABLE **		
13A		MEDPCY2	** OUT VARIABLE  **		
13A		MEDPCY3	** OUT VARIABLE  **		
13A		MEDPCY4	** OUT VARIABLE **		
13A		MEDPCY5	** OUT VARIABLE **		
13A		MEDPCY6	** OUT VARIABLE **		
13A		MEDPCY7	** OUT VARIABLE **		
13A		MEDPCY8	** OUT VARIABLE **		
13A		MEDPCY9	** OUT VARIABLE **		
13A		MEDPCY10	** OUT VARIABLE **		
13A		MEDPCY11	** OUT VARIABLE **		
13A		MEDPCY12	** OUT VARIABLE **		
13A		MEDPCY13	** OUT VARIABLE **		
13A		MEDPCY14	** OUT VARIABLE **		
13A		MEDPCY15	** OUT VARIABLE **		
13A		MEDPCY16	** OUT VARIABLE **		
13A		MEDPMTX_	** OUT VARIABLE **		
13A		MDB_STAT	** OUT VARIABLE **		
13A		MDB_ORIG	** OUT VARIABLE **		
13B	S13B_INTRO	S13B_INTRO	Now I am going to ask some questions about your reimbursements.

By reimbursements I mean any money received for any members of your household from an insurance company, medical care provider or non-household member for medical expenses which you previously paid or will pay. 

^HSAHRAFSA_Fill

                       Description  Amount    Month     
                      (MEDRDESC)   (MEDRMBX) (MEDRMBMO)

1. Enter 1 to Continue	Goto ITEM	
13B	MDC_ITEM	ITEM	SCREEN 1 ---------------------------------------------------------------------------------------

 32    ? [F1]

Since the first of (reference month), have (you/you or any members of your household) received any medical reimbursements for the items I just asked about?

                         IF YES - What did you get reimbursed for?

                         Read each item on list
                                                                                            
SCREEN 2 ----------------------------------------------------------------------------------------
 33     ? [F1]

   IF YES - Have you received any reimbursements for -- 

                        Read each item on list

1. Eye examinations, treatment, or surgery
2. Purchase of eye glasses or contact lenses
3. Dental care
4. Hospital room or hospital services
5. Services by medical professionals other than physicians
6. Physician services
7. Lab tests or x-rays
8. Care in convalescent or nursing homes
9. Care for invalids, convalescents, handicapped, or elderly persons in the home
10. Adult day care centers
11. Other medical care and services
12. Hearing aids
13. Prescription drugs
14. Purchase or rental of supportive or rehabilitative equipment
15. Purchase or rental of medical or surgical equipment for general use
95. Continue List
99. None/No more entries
888. Delete a line	1-15:   IF ITEM ne Item2Shadow then goto CK_ITEM
        ELSE goto DESCRIPTION

95:     Goto next ROW

99:     Goto S13B_END

888:    IF no more grid lines then goto S13B_END
        ELSE goto ITEM - next line of grid	
13B		ServiceOrItem	** SHOW ONLY **		
13B	MEDRDESC	DESCRIPTION	    Ask if not apparent

   Describe the care/service/item.

                       Description  Amount    Month     
                      (MEDRDESC)   (MEDRMBX) (MEDRMBMO)	IF ITEM = 5 then goto MEDRNOUT
ELSEIF ITEM = 14 or 15 then goto MEDRPRNT
ELSE goto MEDRGFTC	
13B	MEDRPNOUT	MEDRNOUT	Was this service provided inside or outside the home? 

                  Description    Amount    Month  
       (MEDPDESC)    (MEDPMTX) (MEDPMTMO)

1. Inside the home
2. Outside the home	Goto MEDRGFTC	
13B	MEDRPRNT	MEDRPRNT	         Ask if not apparent

Was this for a purchase or rental? 

                  Description  Amount    Month     
                 (MEDRDESC)   (MEDRMBX) (MEDRMBMO)

1. Purchase
2. Rental	Goto MEDRGFTC	
14B	MEDRGFTC	MEDRGFTC	    Ask if not apparent

 (Was/Were) the (description) for a member of your household or someone outside of your household?

                   Description  Amount    Month     
                  (MEDRDESC)   (MEDRMBX) (MEDRMBMO)    

1. Household member
2. Non-household member	Goto  MONTH	
13B	MEDRMBMO	MONTH	In what month was(were) the reimbursement(s) received?

                   Description  Amount    Month     
                  (MEDRDESC)   (MEDRMBX) (MEDRMBMO)

1. January
2. February
3. March
4. April
5. May
6. June
7. July
8. August
9. September
10. October
11. November
12. December	REF_MONTH - CUR_MONTH:  IF entry not within the reference 
                           period then goto ERR3_MONTH
                        ELSE goto AMOUNT

DK,RF:  Goto AMOUNT	
13B	MEDRMBX	AMOUNT	What was the total amount received (in month)?

                   Description  Amount    Month     
                  (MEDRDESC)   (MEDRMBX) (MEDRMBMO)	1-999999:  IF (ITEM = 1 and (AMOUNT , 5 or AMOUNT > 2300)) or
              (ITEM = 2 and (AMOUNT < 13 or AMOUNT > 450)) or 
              (ITEM = 3 and (AMOUNT < 20 or AMOUNT > 1400)) or
              (ITEM = 4 and (AMOUNT < 5 or AMOUNT > 5000)) or
              (ITEM = 5 and (AMOUNT < 8 or AMOUNT > 800)) or
              (ITEM = 6 and (AMOUNT < 5 or AMOUNT > 980)) or
              (ITEM = 7 and (AMOUNT < 5 or AMOUNT > 800)) or
              (ITEM = 8 and (AMOUNT < 5 or AMOUNT > 8000)) or 
              (ITEM = 9 and (AMOUNT < 20 or AMOUNT > 10700)) or
              (ITEM = 10 and (AMOUNT < 5 or AMOUNT > 1200)) or
              (ITEM = 11 and (AMOUNT < 5 or AMOUNT > 650)) or
              (ITEM = 12 and (AMOUNT < 10 or AMOUNT > 3208)) or
              (ITEM = 13 and (AMOUNT < 7 or AMOUNT > 850)) or
              (ITEM = 14 and (AMOUNT < 15 or AMOUNT > 1350)) or
              (ITEM = 15 and (AMOUNT < 32 or AMOUNT > 500))
                   then goto ERR1_AMOUNT
          ELSEIF ITEM and the entry in AMOUNT for this 
            record are equal to any records data in the pre-
            chart/input then goto ERR_DUP
          ELSE goto C

DK,RF:    Goto C	
13B	MEDRCB_S	C	  Enter 'C' for a combined reimbursement	C:       Goto COMBCODE

EMPTY:   Goto MORE

IF anything other than 'C' or the enter key is entered then
   goto CK_C	
13B	MEDRCMB	COMBCODE	   32-33   ? [F1]

What other medical reimbursement is (description) combined with?

       Enter all that apply, separate with commas

                   Description  Amount    Month     
                  (MEDRDESC)   (MEDRMBX) (MEDRMBMO)

1. Eye examinations, treatments, or surgery
2. Purchase of eye glasses or contact lenses
3. Dental care
4. Hospital room or hospital services
5. Services by medical professionals other than physicians
6. Physician services
7. Lab tests or x-rays
8. Care in convalescent or nursing homes
9. Care for invalids, convalescents, handicapped, or elderly persons in the home
10. Adult day care centers
11. Other medical care and services
12. Hearing aids
13. Prescription drugs
14. Purchase or rental of supportive or rehabilitative equipment
15. Purchase or rental of medical or surgical equipment for general use
77. Misc. combined (unable to specify/DK)	Goto MORE	
13B	MEDRMORE	MORE	Did (you/you or any members of your household) receive any other reimbursements for (description)?

                   Description  Amount    Month     
                  (MEDRDESC)   (MEDRMBX) (MEDRMBMO)

1. Yes
2. No	1:    IF ROW number = 22 then goto ERR_MAX
      ELSE goto ITEM, next line of grid

2,DK,RF:   IF ROW number = 22 then goto S13B_END
           ELSE goto ITEM, next line of grid	
13B		S13B_END	** Not Displayed **	Exit block and goto LP13A_FLAG	
13B		MEDRCARY	** OUT VARIABLE **		
13B		MEDRCY1	** OUT VARIABLE **		
13B		MEDRCY2	** OUT VARIABLE  **		
13B		MEDRCY3	** OUT VARIABLE  **		
13B		MEDRCY4	** OUT VARIABLE  **		
13B		MEDRCY5	** OUT VARIABLE  **		
13B		MEDRCY6	** OUT VARIABLE  **		
13B		MEDRCY7	** OUT VARIABLE  **		
13B		MEDRCY8	** OUT VARIABLE  **		
13B		MEDRCY9	** OUT VARIABLE  **		
13B		MEDRCY10	** OUT VARIABLE  **		
13B		MEDRCY11	** OUT VARIABLE  **		
13B		MEDRCY12	** OUT VARIABLE  **		
13B		MEDRCY13			
13B		MEDRCY14			
13B		MEDRCY15			
13B		MEDRCY16			
13B		MEDRMBX_			
13B		MDC_STAT			
13B		MDC_ORIG			
13A		LP13A_Flag	

1. Yes
2. No		
13		S13_Sectcomp		Exit block and goto Section 14 - BSECT14	
14A	S14A1_INTRO	S14A1_INTRO	Now I am going to ask about your non-health insurance policies.
(Include policies paid by your household for someone outside your household./  ) 

Policy|Insurance  |    |Insurance|Paid|Payroll  |Payment|Paid |Time
Number|Description|Type| Company | By |Deduction|Period |Total|Period |Payment

1. Enter 1 to Continue	IF there are any active Policies listed on the inventory 
   chart (8500.PLCYSTAB <> 1) then goto BSect14A Block

ELSE goto S14A_END	
14A		POLICYIB	** SHOW VARIABLE **		
14A		INSDESC	** SHOW Variable **		
14A		INSCOMP	** SHOW Variable **		
14A		TYPE_F	** SHOW ONLY Field **		
14A	PLCYSTIL	PLCYSTIL	Do (you/you or any members of your household) still have or make payments for the (Insurance Type Description) insurance policy from (Insurance Company)? 

Policy|Insurance  |    |Insurance|Paid|Payroll  |Payment|Paid |Time
Number|Description|Type| Company | By |Deduction|Period |Total|Period |Payment

1. Yes
2. No	IF 8500.PREMYOU = 2 then goto S14A_END
ELSE goto INSEX3A	
14A	INSEX3A	INSEX3A	Since the first of (reference month) not including this month, have you had any expenses for this policy?

Policy|Insurance  |    |Insurance|Paid|Payroll  |Payment|Paid |Time
Number|Description|Type| Company | By |Deduction|Period |Total|Period|Payment        

1. Yes
2. No	1:  IF I_INSRPMPD = 1-9 then goto INSLSTTM
    ELSE goto INSRPMPA

2,DK,RF:   Goto S14A_END	
14A	INSLSTTM	INSLSTTM	Last time, I recorded that payments are made (once a week/once every 2 weeks/twice a month/once a month/every 2 months/every 3 months/every 4 months/every 6 months/once a year). 
Is that still correct?

Policy|Insurance  |    |Insurance|Paid|Payroll  |Payment|Paid |Time
Number|Description|Type| Company | By |Deduction|Period |Total|Period|Payment

1. Yes
2. No	1:         Goto INSREGXA

2,DK,RF:   Goto INSRPMPA	
14A	INSRPMPA	INSRPMPA	How often are payments made( including payroll deductions?/?)

Policy   |Insurance  |         |Insurance |Paid|Payroll     |Payment|Paid  | Time
Number|Description|Type| Company | By  |Deduction|Period    |Total | Period |Payment

1. Once a week
2. Once every 2 weeks
3. Twice a month
4. Once a month
5. Every 2 months
6. Quarterly (every 3 months)
7. Once every 4 months
8. Twice a year (every 6 months)
9. Once a year
10. Other	1-9:        Goto INSREGXA

10,DK,RF:   Goto INSEX3AX	
14A	INSREGXA	INSREGXA	What is the amount currently paid(Periodicity)?/?)

Policy|Insurance  |    |Insurance|Paid|Payroll  |Payment|Paid |Time
Number|Description|Type| Company | By |Deduction|Period |Total|Period|Payment
 	IF INSREGXA = 1 or 2 then goto ERR1_INSREGXA

ELSEIF POLICYYB = 100 and 
[ (((INSLSTTM = 1 and I_INSRPMPD = 1) or INSRPMPA = 1) and INSREGXA > 120) or 
(((INSLSTTM = 1 and I_INSRPMPD = 2) or INSRPMPA = 2) and INSREGXA > 61) or 
(((INSLSTTM = 1 and I_INSRPMPD = 3) or INSRPMPA = 3) and INSREGXA > 300) or 
(((INSLSTTM = 1 and I_INSRPMPD = 4) or INSRPMPA = 4) and INSREGXA > 1120) or 
(((INSLSTTM = 1 and I_INSRPMPD = 5) or INSRPMPA = 5) and INSREGXA > 1120) or 
(((INSLSTTM = 1 and I_INSRPMPD = 6) or INSRPMPA = 6) and INSREGXA > 3999) or 
(((INSLSTTM = 1 and I_INSRPMPD = 7) or INSRPMPA = 7) and INSREGXA > 3999) or 
(((INSLSTTM = 1 and I_INSRPMPD = 8) or INSRPMPA = 8) and INSREGXA > 3999) or 
(((INSLSTTM = 1 and I_INSRPMPD = 9) or INSRPMPA = 9) and INSREGXA > 6628) ] then goto ERR1_INSREGXA

ELSEIF POLICYYB = 200 and 
[ (((INSLSTTM = 1 and I_INSRPMPD = 1) or INSRPMPA = 1) and INSREGXA > 299) or 
(((INSLSTTM = 1 and I_INSRPMPD = 2) or INSRPMPA = 2) and INSREGXA > 299) or 
(((INSLSTTM = 1 and I_INSRPMPD = 3) or INSRPMPA = 3) and INSREGXA > 299) or 
(((INSLSTTM = 1 and I_INSRPMPD = 4) or INSRPMPA = 4) and INSREGXA > 700) or 
(((INSLSTTM = 1 and I_INSRPMPD = 5) or INSRPMPA = 5) and INSREGXA > 700) or 
(((INSLSTTM = 1 and I_INSRPMPD = 6) or INSRPMPA = 6) and INSREGXA > 1500) or 
(((INSLSTTM = 1 and I_INSRPMPD = 7) or INSRPMPA = 7) and INSREGXA > 1500) or 
(((INSLSTTM = 1 and I_INSRPMPD = 8) or INSRPMPA = 8) and INSREGXA > 3409) or 
(((INSLSTTM = 1 and I_INSRPMPD = 9) or INSRPMPA = 9) and INSREGXA > 4200) ] then goto ERR1_INSREGXA

ELSEIF POLICYYB = 300 and 
[ (((INSLSTTM = 1 and I_INSRPMPD = 1) or INSRPMPA = 1) and INSREGXA > 99) or 
(((INSLSTTM = 1 and I_INSRPMPD = 2) or INSRPMPA = 2) and INSREGXA > 99) or 
(((INSLSTTM = 1 and I_INSRPMPD = 3) or INSRPMPA = 3) and INSREGXA > 99) or 
(((INSLSTTM = 1 and I_INSRPMPD = 4) or INSRPMPA = 4) and INSREGXA > 798) or 
(((INSLSTTM = 1 and I_INSRPMPD = 5) or INSRPMPA = 5) and INSREGXA > 798) or 
(((INSLSTTM = 1 and I_INSRPMPD = 6) or INSRPMPA = 6) and INSREGXA > 1576) or 
(((INSLSTTM = 1 and I_INSRPMPD = 7) or INSRPMPA = 7) and INSREGXA > 1576) or 
(((INSLSTTM = 1 and I_INSRPMPD = 8) or INSRPMPA = 8) and INSREGXA > 3180) or 
(((INSLSTTM = 1 and I_INSRPMPD = 9) or INSRPMPA = 9) and INSREGXA > 6170) ] then goto ERR1_INSREGXA

ELSEIF POLICYYB = 400 and 
[ (((INSLSTTM = 1 and I_INSRPMPD = 1) or INSRPMPA = 1) and INSREGXA > 11) or 
(((INSLSTTM = 1 and I_INSRPMPD = 2) or INSRPMPA = 2) and INSREGXA > 29) or 
(((INSLSTTM = 1 and I_INSRPMPD = 3) or INSRPMPA = 3) and INSREGXA > 29) or 
(((INSLSTTM = 1 and I_INSRPMPD = 4) or INSRPMPA = 4) and INSREGXA > 461) or 
(((INSLSTTM = 1 and I_INSRPMPD = 5) or INSRPMPA = 5) and INSREGXA > 461) or 
(((INSLSTTM = 1 and I_INSRPMPD = 6) or INSRPMPA = 6) and INSREGXA > 461) or 
(((INSLSTTM = 1 and I_INSRPMPD = 7) or INSRPMPA = 7) and INSREGXA > 461) or 
(((INSLSTTM = 1 and I_INSRPMPD = 8) or INSRPMPA = 8) and INSREGXA > 461) or 
(((INSLSTTM = 1 and I_INSRPMPD = 9) or INSRPMPA = 9) and INSREGXA > 798) ] then goto ERR1_INSREGXA

ELSEIF POLICYYB = 500 and 
[ (((INSLSTTM = 1 and I_INSRPMPD = 1) or INSRPMPA = 1) and INSREGXA > 50) or 
(((INSLSTTM = 1 and I_INSRPMPD = 2) or INSRPMPA = 2) and INSREGXA > 60) or 
(((INSLSTTM = 1 and I_INSRPMPD = 3) or INSRPMPA = 3) and INSREGXA > 85) or 	
	 (((INSLSTTM = 1 and I_INSRPMPD = 4) or INSRPMPA = 4) and INSREGXA > 250) or 
(((INSLSTTM = 1 and I_INSRPMPD = 5) or INSRPMPA = 5) and INSREGXA > 280) or 
(((INSLSTTM = 1 and I_INSRPMPD = 6) or INSRPMPA = 6) and INSREGXA > 497) or 
(((INSLSTTM = 1 and I_INSRPMPD = 7) or INSRPMPA = 7) and INSREGXA > 497) or 
(((INSLSTTM = 1 and I_INSRPMPD = 8) or INSRPMPA = 8) and INSREGXA > 986) or 
(((INSLSTTM = 1 and I_INSRPMPD = 9) or INSRPMPA = 9) and INSREGXA > 3837) ] then goto ERR1_INSREGXA

ELSE goto S14A_END				
14A	INSEX3AX	INSEX3AX	Since the first of (reference month) not including this month, how much was paid?

Policy|Insurance  |    |Insurance|Paid|Payroll  |Payment|Paid |Time
Number|Description|Type| Company | By |Deduction|Period |Total|Period|Payment	1,2:  Goto ERR1_INSEX3AX

3-99999:   IF (POLICYYB = 100 and INSEX3AX > 3999) OR
              (POLICYYB = 200 and INSEX3AX > 1500) OR 
              (POLICYYB = 300 and INSEX3AX > 1576) OR
              (POLICYYB = 400 and INSEX3AX > 461) OR 
              (POLICYYB = 500 and INSEX3AX > 497) 
                 then goto ERR1_INSEX3AX
           ELSE goto S14A_END

DK,RF:   Goto S14A_END	
14A		S14A_END	** Not Displayed **	IF no more active policies in the table then exit block and 
   goto BTableB - S14B

ELSE goto PLCYSTIL for then next active policy	
14A		INSE_3AX	** OUT VARIABLE **		
14A		INSR_GXA	** OUT VARIABLE **		
14A		POLICYYB	

100. Life/disability
200. Automobile/other veh.
300. Homeowner's
400. Tenant's
500. Other 		
14A		PLCYSTAB			
14A		MATCHID			
14A		I_PAYDEDPR			
14A		I_INSRPMPD			
14B	INB_ITEM	ITEM	 34    ? [F1]

(Do ^YOU_ANYMEM have any or pay for any -/Since the first of ^REF_MONTH have ^YOU_ANYMEM purchased o 

      Read each item on list

1. Life insurance or other policies which provide benefits in case of death or disability?
2. Homeowners' insurance?
3. Renters' insurance?
4. Automobile or other vehicle insurance?
5. Other types of non-health insurance?
99. None/No more entries
888. Delete a line	1-5:   IF ITEM ne Item2Shadow then goto CK_ITEM
       ELSE goto INSCOMP

99:    Goto S14B_END

888:  IF no more rows in the table then goto S14B_END
      ELSE goto ITEM - next row of the table	
14B		PreFill	** SHOW ONLY **		
14B	INSCOMP	INSCOMP	What is the name of the insurance company for your (life or disability/homeowners'/tenants'/vehicle/other type of insurance) policy?

       Enter name of insurance company, not the insurance agent.	Goto INSDESC	
14B	INSDESC	DESCRIPTION	Briefly describe the policy.	IF ITEM = 2 then goto INSPROP
ELSE goto PREMYOU	
14B	INSPROP	INSPROP	Which property (ies) does this policy cover?

      Enter number of each property covered, separate with commas.

1. PROPDESC[1]
2. PROPDESC[2]
3. PROPDESC[3]
4. PROPDESC[4]
5. PROPDESC[5]
6. PROPDESC[6]
7. PROPDESC[7]
8. PROPDESC[8]
9. PROPDESC[9]
10. PROPDESC[10]
11. PROPDESC[11]
12. PROPDESC[12]
13. PROPDESC[13
14. PROPDESC[14]
15. PROPDESC[15]
16. PROPDESC[16]
17. PROPDESC[17]
18. PROPDESC[18]
19. PROPDESC[19]
20. PROPDESC[20]
99. Property not owned or rented by the household	1-20:  IF any entry is higher than the number of properties
            or a blank answer list option then goto CK_INSPROP
       ELSE goto PREMYOU

99,DK,RF:      Goto PREMYOU	
14B	PREMYOU	PREMYOU	(Do/Does) (you/your household) pay ANY portion of the premiums for this policy?

1. Yes
2. No	1, DK, RF:  Goto PAYDEDPR

2:   Goto PREMOUT	
14B	PREMOUT	PREMOUT	Who pays the policy premiums?

1. An employer or union?
2. Another group or persons outside your household?	Goto C	
14B	PAYDEDPR	PAYDEDPR	Are any premiums paid through payroll deductions?

1. Yes
2. No	Goto INSRPMPD	
14B	INSRPMPD	INSRPMPD	How often are payments made( including payroll deductions?/?)

1. Once a week
2. Once every 2 weeks
3. Twice a month
4. Once a month
5. Every 2 months
6. Quarterly (every 3 months)
7. Once every 4 months
8. Twice a year (every 6 months)
9. Once a year
10. Other	1-9:       Goto INSRPMXB

10,DK,RF:   Goto INSEXPBX	
14B	INSRPMXB	INSRPMXB	What is the amount currently paid (once a week/once every 2 weeks/twice a month/once a month/every 2 months/every 3 months/every 4 months/every 6 months/once a year)( including payroll deductions?/?)	IF INSRPMXB = 1 or 2 then goto ERR1_INSRPMXB

ELSEIF ITEM = 1 AND
	( (INSRPMPD = 1 and INSRPMXB > 120) or 
 	  (INSRPMPD = 2 and INSRPMXB > 61) or 
   	  (INSRPMPD = 3 and INSRPMXB > 300) or 
	  ((INSRPMPD = 4 or 5) and INSRPMXB > 1120) or 
	  ((INSRPMPD = 6-8) and INSRPMXB > 3999) or 
	  (INSRPMPD = 9 and INSRPMXB > 6628) )  THEN
           goto ERR1_INSRPMXB

ELSEIF ITEM = 2 AND
	( ((INSRPMPD = 1-3) and INSRPMXB > 99) or 
	  ((INSRPMPD = 4 or 5) and INSRPMXB > 798) or 
	  ((INSRPMPD = 6 or 7) and INSRPMXB > 1576) or 
	  (INSRPMPD = 8 and INSRPMXB > 3180) or 
	  (INSRPMPD = 9 and INSREGXA > 6170) ) THEN
           goto ERR1_INSRPMXB

ELSEIF ITEM = 3 and 
	( (INSRPMPD = 1 and INSRPMXB > 11) or 
	((INSRPMPD = 2 or 3) and INSRPMXB > 29) or 
	((INSRPMPD = 4-8) and INSRPMXB > 461)  or 
	(INSRPMPD = 9 and INSRPMXB > 798) ) THEN
           goto ERR1_INSRPMXB

ELSEIF ITEM = 4 AND
	( ((INSRPMPD = 1-3) and INSRPMXB > 299)  or 
	((INSRPMPD = 4 or 5) and INSRPMXB > 700)  or 
	((INSRPMPD = 6 or 7) and INSRPMXB > 1500)  or 
	(INSRPMPD = 8 and INSRPMXB > 3409) or
        (INSRPMPD = 9 and INSREGXA > 4200) ) THEN
           goto ERR1_INSRPMXB

ELSEIF ITEM = 5 AND
	( (INSRPMPD = 1 and INSRPMXB > 50) or 
	(INSRPMPD = 2 and INSRPMXB > 60) or 
	(INSRPMPD = 3 and INSRPMXB > 85) or 
	(INSRPMPD = 4 and INSRPMXB > 250) or 
	(INSRPMPD = 5 and INSRPMXB > 280) or 
	((INSRPMPD = 6 or 7) and INSRPMXB > 497) or 
	(INSRPMPD = 8 and INSRPMXB > 986) or 
	(INSRPMPD = 9 and INSRPMXB > 3837) ) THEN
           goto ERR1_INSRPMXB

ELSE Goto C	
14B	INSEXPBX	INSEXPBX	Since the first of (reference month) not including this month, what was (your/your household's) total expense for this insurance policy?
    
      Enter the actual amount the household paid.  Do not include any expenses paid for the household by others.	IF INSEXPBX = 1 or 2 then goto ERR1_INSEXPBX
ELSEIF (ITEM = 1 and INSEXPBX > 3999) OR 
       (ITEM = 2 and INSEXPBX > 1500) OR 
       (ITEM = 3 and INSEXPBX > 1576) OR 
       (ITEM = 4 and INSEXPBX > 461) OR 
       (ITEM = 5 and INSEXPBX > 497) 
            then goto ERR1_INSEXPBX
ELSE goto C	
14B	S14_S	C	  Enter "C" for a combined expense	C:      Goto COMBCODE

EMPTY:   Goto MORE

IF anything other than a 'C' or the enter key is entered
   then goto CK_C	
14B	S14CMB	COMBCODE	 34    ? [F1]

What other type of policy is the (Insurance type) combined with?

     Enter all that apply, separate with commas.

1. Life insurance or other policies which provide benefits in case of death or disability
2. Homeowners' insurance
3. Renters' insurance
4. Automobile or other vehicle insurance
5. Other types of non-health insurance
77. Misc. combined (unable to specify/DK)	IF 2 is selected then goto COMBPROP
ELSE goto MORE	
14B	S14CMBPROP	COMBPROP	Which property (ies) did this policy cover?

      Enter number of each property covered, separate with commas.

1. PROPDESC[1]
2. PROPDESC[2]
3. PROPDESC[3]
4. PROPDESC[4]
5. PROPDESC[5]
6. PROPDESC[6]
7. PROPDESC[7]
8. PROPDESC[8]
9. PROPDESC[9]
10. PROPDESC[10]
11. PROPDESC[11]
12. PROPDESC[12]
13. PROPDESC[13
14. PROPDESC[14]
15. PROPDESC[15]
16. PROPDESC[16]
17. PROPDESC[17]
18. PROPDESC[18]
19. PROPDESC[19]
20. PROPDESC[20]
99. Property not owned or rented by the household	1-20:  IF any entry is higher than the number of properties
          or a blank answer list option then goto CK_COMBPROP
       ELSE goto MORE

99,DK,RF:    Goto MORE	
14B	INSMORE	MORE	(Do ^You_Anymem have any or make payments for any other ^inbdescription policy?/Did ^you_Anymem purchase or begin paying for any other ^inbdescritpion

1. Yes
2. No	1:    IF Row number = 100 then goto ERR_MAX
      ELSE goto ITEM, next row of the table

2,DK,RF:    IF Row number = 100 then goto S14B_END
            ELSE goto ITEM, next row of the table	
14B		S14B_END	** Not Displayed **	Goto section 15 - BSect15	
14B		POLICYYB	** OUT VARIABLE **

100. Life/disability
200. Automobile/other veh.
300. Homeowner's
400. Tenant's
500. Other 		
14B		POLICYIB	** OUT VARIABLE **		
14B		PLCYSTAB	** OUT VARIABLE **		
14B		INSPRPY1	** OUT VARIABLE **		
14B		INSPRPY2	** OUT VARIABLE **		
14B		INSPRPY3			
14B		INSPRPY4	** OUT VARIABLE **		
14B		INSPRPY5	** OUT VARIABLE **		
14B		INSPRPY6	** OUT VARIABLE **		
14B		INSE_PBX			
15B		INSR_MXB			
15B		INSCMB1	** OUT VARIABLE **		
15B		INSCMB2	** OUT VARIABLE **		
15B		INSCMB3	** OUT VARIABLE **		
15B		INSCMB4	** OUT VARIABLE **		
15B		INSCMB5	** OUT VARIABLE **		
15B		INSCMB6	** OUT VARIABLE **		
15B		INSCMBP1	** OUT VARIABLE **		
15B		INSCMBP2	** OUT VARIABLE **		
15B		INSCMBP3	** OUT VARIABLE **		
15B		INSCMBP4	** OUT VARIABLE **		
15B		INSCMBP5	** OUT VARIABLE **		
15B		INSCMBP6	** OUT VARIABLE **		
15B		INB_STAT	** OUT VARIABLE **		
15B		INB_ORIG	** OUT VARIABLE **		
15	EDA_INTRO	EDA_INTRO	Now I am going to ask about education expenses.  Please
include any direct payments made for any members of your
household or for anyone outside your household and any payments you
made online or had automatically deducted.

        Do NOT include payments made on student loans

            Description  Type      Month      Amount  
            (EDUDESC)   (EDSHL_A) (EDMONTHA) (EDEXOXA)

1. Enter 1 to Continue	Goto BTableA.Brow.ITEM	
15	EDA_ITEM	ITEM	 35    ? [F1]

Since the first of (reference month), have (you/you or any members of your household) paid for any -

        Read each item on list.
        Baby sitting and in home day care are collected in Section 19A
        Do not include payments on student loans.  They are collected in Section 22.

1. Recreational lessons or other instructions?
2. Preschool or child day care centers?
3. Tuition, including pre-paid tuition?
4. Housing while attending school?
5. Food or board while attending school?
6. Private school bus service?
7. Test preparation or tutoring services?
8. Purchase of school books?
9. Purchase of school supplies or equipment not already reported?
10. Other school related expenses not already reported including the rental of any school books or equipment?
99. None/No more entries
888. Delete the line	1-10:   IF ITEM <> Item2Shadow then goto CK_ITEM
        ELSE goto DESCRIPTION

99:    Goto S15_END

888:   IF no more grid lines then goto S15_END
       ELSE goto ITEM - next line of grid	
15		PreFill	** SHOW ONLY **		
15	EDUDESC	DESCRIPTION	What was the expense for?

            Description  Type      Month      Amount  
            (EDUDESC)   (EDSHL_A) (EDMONTHA) (EDEXOXA)	Goto WHO	
15	EDUCGFTC	WHO	Was this expense for -

            Description  Type      Month      Amount  
            (EDUDESC)   (EDSHL_A) (EDMONTHA) (EDEXOXA)

1. Someone inside the household?
2. Someone outside the household?	IF ITEM = 3, 8, or 10 then goto SCHOOL
ELSE goto MONTH	
15	EDSCHL_A	SCHOOL	        Ask if not apparent.

What kind of school or facility was it?

            Description  Type      Month      Amount  
            (EDUDESC)   (EDSHL_A) (EDMONTHA) (EDEXOXA)   

1. College or university
2. Elementary through high school
3. Child day care center
4. Nursery school or preschool
5. Vocational or technical school
6. Other	Goto MONTH	
15	EDMONTHA	MONTH	In what month was the payment made?

      Enter 13 for same amount each month of the reference period.

            Description  Type      Month      Amount   
            (EDUDESC)   (EDSHL_A) (EDMONTHA) (EDEXOXA)

1. January
2. February
3. March
4. April
5. May
6. June
7. July
8. August
9. September
10. October
11. November
12. December
13. ^CONTMO_Fill13	REF_MONTH - CUR_MONTH:  IF entry not in reference period 
                             then goto ERR3_MONTH
                        ELSE goto AMOUNT

13,DK,RF:    Goto AMOUNT	
15	EDEXOXA	AMOUNT	(How much was paid?/How much is paid monthly?)

    Description  Type      Month      Amount  
    (EDUDESC)   (EDSHL_A) (EDMONTHA) (EDEXOXA)	1-999999:  IF (ITEM = 1 and (AMOUNT < 10 or AMOUNT > 544)) 
             OR (ITEM = 2 and (AMOUNT < 20 or AMOUNT > 2500)) 
             OR (ITEM = 3 and (AMOUNT < 28 or AMOUNT > 6000)) 
             OR (ITEM = 4 and (AMOUNT < 35 or AMOUNT > 3000)) 
             OR (ITEM = 5 and (AMOUNT < 10 or AMOUNT > 2500))
             OR (ITEM = 6 and (AMOUNT < 10 or AMOUNT > 465))
             OR (ITEM = 7 and (AMOUNT < 5 or AMOUNT > 1200))
             OR (ITEM = 8 and (AMOUNT < 5 or AMOUNT > 500)) 
             OR (ITEM = 9 and (AMOUNT < 5 or AMOUNT > 500))
             OR (ITEM = 10 and (AMOUNT < 5 or AMOUNT > 600)) 
                then goto ERR1_AMOUNT
          ELSEIF EDUC_AY and the entry in AMOUNT for this
                 record are equal to any records data in the
                 prechart/input  AND (that prechart records
                 EDMONTHA does not equal 13) then 
                 goto ERR_DUP
          ELSE goto C

DK,RF:   Goto C	
15	EDUCMB_S	C	   Enter 'C' for a combined expense	C:         Goto COMBCODE

EMPTY:    Goto REIMB

IF any entry other than a 'C' or the enter key is entered
   then goto CK_C	
15	EDUCMB	COMBCODE	 35    ? [F1]

What was combined with (Description)?

         Enter all that apply, separate with commas

            Description  Type      Month      Amount  
            (EDUDESC)   (EDSHL_A) (EDMONTHA) (EDEXOXA)

1. Recreational lessons or other instructions
2. Preschool or child day care centers
3. Tuition, including pre-paid tuition
4. Housing while attending school
5. Food or board while attending school
6. Private school bus service
7. Test preparation or tutoring services
8. Purchase of school books
9. Purchase of school supplies or equipment which has not already been reported
10. Other school related expenses not already reported including the rental of any school books or equipment
77. Misc. combined (unable to specify/DK)	Goto REIMB	
15	EDREIMB	REIMB	Has any of this amount been or will any of it be reimbursed
by an employer, agency, or other person?

         Do not include reimbursements from dependent flexible spending accounts (FSA).

            Description  Type      Month      Amount  
            (EDUDESC)   (EDSHL_A) (EDMONTHA) (EDEXOXA)      

1. Yes
2. No	1:    Goto REIMBX

2,DK,RF: IF (ITEM = 1 and (RT10.POPGRP = 15 or 16)) OR
           ((ITEM = 2 or 10) and (RT10.POPGRP = 03, 04, 3, 
            or 4)) OR (ITEM = 5 and (RT10.POPGRP = 15 or 
            16)) OR (ITEM = 8 and (SCHOOL = 1 or 2) and 
            (RT10.POPGRP = 03, 04, 3 or 4)) OR
            (ITEM = 3 and (SCHOOL = 1-5) and (RT10.POPGRP = 
             03, 04, 3 or 4)) then goto EDASTORE

         ELSE Goto MORE	
15	EDREIMBX	REIMBX	How much was or will be reimbursed?

       Do not include reimbursements from dependent flexible spending accounts (FSA).

             Description Type      Month      Amount  
            (EDUDESC)   (EDSHL_A) (EDMONTHA) (EDEXOXA)	IF REIMBX < 15 or REIMBX > AMOUNT then goto ERR1_REIMBX

ELSEIF (ITEM = 1 and (RT10.POPGRP = 15 or 16)) OR
      ((ITEM = 2 or 10) and (RT10.POPGRP = 03, 04, 3, or 4)) 
      OR (ITEM = 5 and (RT10.POPGRP = 15 or 16)) OR
      (ITEM = 8 and (SCHOOL = 1 or 2) and (RT10.POPGRP = 
      03, 04, 3 or 4)) OR (ITEM = 3 and (SCHOOL = 1-5) and 
      (RT10.POPGRP = 03, 04, 3 or 4)) then goto EDASTORE

ELSE goto MORE	
15	EDASTORE	EDASTORE	What is the name of the (Description)?
 	ENTRY:  IF ITEM = 1, 2, 3, or 5 then goto EDALOC
	ELSEIF ITEM = 8 or 10 then goto EDAPURCH

DK, RF:  Goto MORE	
15	EDAPURCH	EDAPURCH	Was this paid for - 

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  Goto MORE

2:  Goto EDALOC	
15	EDALOC	EDALOC	In what city is ^EDASTORE_fill located?	Goto EDALOCST	
15	EDALOCST	EDALOCST	? [F1]

In what state is ^EDASTORE_fill located?
 
           Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_EDALOCST

ELSE goto MORE	
15	EDUMORE	MORE	Did you make any other payments for (Description)?

            Description  Type      Month      Amount  
            (EDUDESC)   (EDSHL_A) (EDMONTHA) (EDEXOXA)        

1. Yes
2. No	1:    IF ROW number = 34 then goto ERR_MAX
      ELSE goto ITEM, next line of grid

2,DK,RF:   IF ROW number = 34 then goto S15_END
           ELSE goto ITEM, next line of grid	
15		S15_END	**  Non displayed **	Goto Section 16 - BSECT16	
15		ITEMCODEOUT			
15		EDUC_A1			
15		EDUC_A2			
15		EDUC_A3			
15		EDUC_A4			
15		EDUC_A5			
15		EDUC_A6			
15		EDUC_A7			
15		EDUC_A8			
15		EDUC_A9			
15		EDUC_A10			
15		EDUC_A11			
15		EDEXOXA_			
15		EDRE_MBX			
15		EDA_STAT			
15		EDA_ORIG			
15		LP15_Flag	

1. Yes
2. No		
15		LP15a1_Flag	

1. Yes
2. No		
15		LP15a2_Flag	

1. Yes
2. No		
15		LP15a3_Flag	

1. Yes
2. No		
16		LP15a4_Flag	

1. Yes
2. No		
15		LP15a5_Flag	

1. Yes
2. No		
16	SUB_INTRO	SUB_INTRO	Now I am going to ask about expenses for subscriptions, memberships, books, and entertainment.  Please remember to include any payments you made online or had automatically deducted.  Also, include any shipping and handling charges with the cost of any item that was shipped.

       Description  Month     Amount
       (SUBDESC)    (SUBMO)   (SUBEXPX)

1. Enter 1 to Continue	Goto BTableA.Brow.ITEM	
16	SUB_ITEM	ITEM	SCREEN 1 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 

 36    ? [F1]

Since the first of (reference month) have (you/you or any members of your household) had any membership costs or other expenses related to any of the following?  Do not include contributions to or membership in religious, professional, business, or other tax deductible organizations.

              Read each item on list.

SCREEN 2 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

 36    ? [F1]

Since the first of (reference month), have (you/you or any members of your household) purchased any of the following items for your household or for someone outside your household?

       Read each item on list

SCREEN 3 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

 37    ? [F1]

Have you purchased any - 

       Read each item on list
       Report blank tapes, CDs, and DVDs in Section 6B under item code 11

1. Golf courses or country clubs
2. Health clubs, fitness centers, swimming pools, weight loss centers, or other sports or recreational organizations
3. Fees for participating in sports such as golf, bowling, biking, hockey, football, or swimming
4. Fees for bike, electric scooter, or moped -sharing or rental
5. Vacation clubs
6. Civic, service, fraternal, or other social organizations
7. Credit card membership fees
8. Shopping club memberships including warehouse clubs like Sam's Club and discount memberships like Amazon Prime
9. Direct or online dating services
10. Single or season tickets to spectator sports events such as football, baseball, hockey racing, or track events
11. Single or season tickets to plays, operas, or concerts
12. Movie tickets
13. Tickets to parks or museums
14. Single copies of newspapers, magazines, or periodicals, including digital
15. Subscriptions to newspapers, magazines, or periodicals, including digital
16. Books, digital books, or book subscriptions.  Do not include school books or reference books.
17. Photo printing or processing
18. Photographic film or disposable cameras
19. Purchased music files, CDs, or records
20. Sirius or XM satellite radio service
21. Subscription music services such as Spotify or Pandora
22. Purchased video files, Blu-Ray discs, or DVDs
23. Rented video files or DVDs or streaming video subscription	1-27:   IF ITEM <> Item2Shadow then goto CK_ITEM
        ELSE goto DESCRIPTION

95:    Goto next row

99:    Goto S16_END

888:   IF no more grid lines goto S16_END
       ELSE goto ITEM - next line of grid	
16		PreFill	** SHOW ONLY **		
16	SUBDESC	DESCRIPTION	(What is the name of the (Description))? /  )

(* Ask if not apparent: Describe the item./  )

       Description  Month     Amount
       (SUBDESC)    (SUBMO)   (SUBEXPX)	Goto WHO	
16	S16GFTCA	WHO	Was this purchase for your household or someone outside your household?

       Description  Month     Amount
       (SUBDESC)    (SUBMO)   (SUBEXPX)        

1. For household
2. For someone outside your household	Goto MONTH	
16	SUBMO	MONTH	In what month did you have this expense?

(*  Enter 13 for same amount each month of the reference period/   )

       Description  Month     Amount
       (SUBDESC)    (SUBMO)   (SUBEXPX)

1. January
2. February
3. March
4. April
5. May
6. June
7. July
8. August
9. September
10. October
11. November
12. December
13. (Same amount each month/  )	REF_MONTH - CUR_MONTH: IF entry not in reference period 
                             then goto ERR3_MONTH
                       ELSE goto AMOUNT

13:  IF ITEM = 3, 5-7, 10-13, 17-19, 22, 24, 26, or 27 then 
        goto CK_MONTH 
     ELSE goto AMOUNT

DK,RF: Goto AMOUNT	
16	SUBEXPX	AMOUNT	(What was the total amount of this expense?/What is (your/your household) monthly expense?) ((Include shipping and handling fees./  ))

(Include ticket/admission service fees and surcharges/  )

       Description  Month     Amount
       (SUBDESC)    (SUBMO)   (SUBEXPX)	If (ITEM =  1 or 2 and (AMOUNT < 5 or AMOUNT > 1060)) OR 
   (ITEM = 3 or 4 and (AMOUNT < 6 or AMOUNT > 750)) OR 
   (ITEM = 5 and (AMOUNT < 301 or AMOUNT > 10000)) OR 
   (ITEM = 6-8 and (AMOUNT < 5 or AMOUNT > 300)) OR 
   (ITEM = 9 and (AMOUNT < 5 or AMOUNT > 1200)) OR 
   (ITEM = 10 and (AMOUNT < 5 or AMOUNT > 2500)) OR 
   (ITEM = 11 and (AMOUNT < 5 or AMOUNT > 1999)) OR 
   (ITEM = 12 and (AMOUNT < 1 or AMOUNT > 100)) OR 
   (ITEM = 13 and (AMOUNT < 5 or AMOUNT > 320)) OR 
   (ITEM = 14 and (AMOUNT < 5 or AMOUNT > 250)) OR 
   (ITEM = 15 and (AMOUNT < 3 or AMOUNT > 499)) OR 
   (ITEM = 16 and (AMOUNT < 5 or AMOUNT > 300)) OR 
   (ITEM = 17 and (AMOUNT < 3 or AMOUNT > 499)) OR 
   (ITEM = 18 and (AMOUNT < 5 or AMOUNT > 100)) OR
   (ITEM = 19 and (AMOUNT < 1 or AMOUNT > 250)) OR
   (ITEM = 20 and (AMOUNT < 5 or AMOUNT > 500)) OR
   (ITEM = 21 and (AMOUNT < 1 or AMOUNT > 100)) OR
   (ITEM = 22 and (AMOUNT < 1 or AMOUNT > 209)) OR
   (ITEM = 23 and (AMOUNT < 1 or AMOUNT > 150)) OR
   (ITEM = 24 and (AMOUNT < 8 or AMOUNT > 200)) OR
   (ITEM = 25 and (AMOUNT < 8 or AMOUNT > 390)) OR
   (ITEM = 26 and (AMOUNT < 1 or AMOUNT > 99)) OR
   (ITEM = 27 and (AMOUNT < 1 or AMOUNT > 199)) then 
        goto ERR1_AMOUNT

ELSEIF ITEMCODEOUT and AMOUNT for this record 
       are equal to any records data on the pre-chart/Input 
       then goto ERR_DUP

ELSEIF ITEM = 19, 22, 23, or 26, goto C

ELSEIF (ITEM = 1, 2, 5, 6, or 8) AND (RT10.POPGRP = 13 or
        14) then goto SUBPURCH

ELSEIF ((ITEM = 3, 7, 10-16) and (RT10.POPGRP = 13 or 14)) OR
       ((ITEM = 17 or 18) and (RT10.POPGRP = 5, 6, 05 or 
        06)) OR (ITEM = 24 and (RT10.POPGRP = 1, 2, 01 or 
        02)) OR (ITEM = 4, 20, or 25 and (RT10.POPGRP = 11 or 12)) 
           then goto SUBSTORE

ELSE goto MORE	
16	S16CM_S	C	  Enter a 'C' for a combined expense.

       Description  Month     Amount
       (SUBDESC)    (SUBMO)   (SUBEXPX)	C:  Goto COMBCODE

EMPTY:   IF (ITEM = 19, 22 or 23) AND (RT10.POPGRP = 11 or 
           12) OR (ITEM = 26 and (RT10.POPGRP = 7, 8, 07 or 
           08))then goto SUBSTORE
         ELSE goto MORE

If anything other than a 'C' or the Enter key is entered goto CK_C	
16	S16CMB	COMBCODE	 37    ? [F1]

What other expense is the (music files or discs/videos or discs/streaming or rented videos/apps, games, or ringtones) combined with?

         Enter all that apply, separate with commas.

       Description  Month     Amount
       (SUBDESC)    (SUBMO)   (SUBEXPX)

19. Purchased music files, CDs, or records
22. Purchased video files, Blu-Ray discs, or DVDs
23. Rented video files or DVDs or streaming video subscriptions
26. Applications, games, or ringtones for a cellphone or mobile device not already reported	IF (ITEM = 19, 22 or 23) AND (RT10.POPGRP = 11 or 12) OR 
   (ITEM = 26 and (RT10.POPGRP = 7, 8, 07 or 08)) then 
      goto SUBSTORE

ELSE goto MORE	
16	SUBSTORE	SUBSTORE	What is the name of the (Description)?

           Enter store, website, or company name	IF uppercase entry = 'GROUPON' or 'GROUPON.COM' then goto ERR_GROUPON

ELSEIF UPPERCASE ENTRY contains '.COM' then goto MORE

ELSEIF (ENTRY = DK or RF) OR ITEM = 7 then goto MORE

ELSEIF ITEM = 10-13 then goto SUBLOC

ELSE goto SUBPURCH	
16	SUBPURCH	SUBPURCH	   Was this paid for - 

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  Goto MORE

2: Goto SUBLOC	
16	SUBLOC	SUBLOC	In what city is (Description) located?	Goto SUBLOCST	
16	SUBLOCST	SUBLOCST	? [F1]

In what state is (Description) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_SUBLOCST

ELSEIF ITEM = 10-13 then goto SUBTIC

ELSE goto MORE	
16	SUBTIC	SUBTIC	Were the tickets purchased directly from (Description) or through a third party?

1. Direct
2. Third party	1,DK,RF:  Goto TCKPURCH

2:  Goto TCKTCOMP	
16	TCKTCOMP	TCKTCOMP	What is the name of the company you used to purchase the tickets?

           Enter store, website, or company name	Goto TCKPURCH	
16	TCKPURCH	TCKPURCH	   Were the tickets paid for - 

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  Goto MORE

2:  IF SUBTIC = 2 then goto TCKTLOC
    ELSE goto MORE	
16	TCKTLOC	TCKTLOC	In what city is (Ticket Company/this company) located?	Goto TKTLOCST	
16	TKTLOCST	TKTLOCST	? [F1]

In what state is (Ticket Company/this company) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_TKTLOCST

ELSE goto MORE	
16	S16OTHR	MORE	Did you (purchase/pay for renting/pay for) any other (description)?

       Description  Month     Amount
       (SUBDESC)    (SUBMO)   (SUBEXPX) 

1. Yes
2. No	1:   IF ROW number = 40 then goto ERR_MAX
     ELSE goto ITEM, next line of grid

2,DK,RF:   Goto ITEM, next line of grid	
16		S16_END	** Non Displayed **	Goto Section 17 - BSect17	
16		ITEMCODEOUT			
16		S16CODE1			
16		S16CODE2			
16		S16CODE3			
16		S16CODE4			
16		SUBEXPX_			
16		SUB_STAT			
16		SUB_ORIG			
16		LP16_Flag	

1. Yes
2. No		
17A	ANYOUTSD	ANYOUTSD	Now I am going to ask about trips and vacations.  
Since the first of (reference month) have (you/you or any members of your household) taken any trips entirely 
paid for by anyone outside your household,  such as a business, employer, or relative?     

1. Yes
2. No	1:       Goto NUMOUTSD

2,DK,RF:   IF I_17Acoun gt 0 then goto TBLSECT17A_1
           ELSE goto ANYTRIPS	
17A	NUMOUTSD	NUMOUTSD	How many?	Goto ANYYUPD	
17A	ANYYUPD	ANYYUPD	Even on trips entirely paid for by someone outside of your household there are sometimes 
miscellaneous expenses which are not paid for.   Did (you/your household) have any expenses 
on (this trip/these trips) that will not be covered by a business, employer or other non-household member?

1. Yes
2. No	1:        Goto FOODYUPD

2,DK,RF:   IF I_17Acoun gt 0 then goto TBLSECT17A_1
           ELSE goto ANYTRIPS	
17A	FOODYUPD	FOODYUPD	Did these expenses include anything for . . .

     . . . Food and beverages?    

1. Yes
2. No	Goto LODGYUPD	
17A	LODGYUPD	LODGYUPD	Did these expenses include anything for . . .

     . . . Lodging?    

1. Yes
2. No	Goto TRANYUPD	
17A	TRANYUPD	TRANYUPD	Did these expenses include anything for . . .

    . . . Transportation?

1. Yes
2. No	Goto ELSEYUPD	
17A	ELSEYUPD	ELSEYUPD	Did these expenses include . . .

    . . . Anything else?

1. Yes
2. No	1:       Goto TRAELSE

2,DK,RF:   Goto TOTYUPDX	
17A	TRAELSE	TRAELSE	     Specify:	Goto TOTYUPDX	
17A	TOTYUPDX	TOTYUPDX	What was the total amount of these expenses?	1-99999999:  IF TOTYUPDX < 5 or TOTYUPDX > 1200 then 
                 goto ERR1_TOTYUPDX
             ELSEIF I_17Acoun > 0 then goto TBLSECT17A_1
             ELSE goto ANYTRIPS

DK,RF:   IF I_17Acoun > 0 then goto TBLSECT17A_1
         ELSE goto ANYTRIPS	
17A		NUMYUPD			
17A		TOTY_PDX			
17A		TRD_STAT			
17A		TRD_ORIG			
17A1		PLACENAME	** SHOW ONLY **		
17A1	ENDTRP1	ENDTRP1	(Last interview you reported (# of unfinished trips) (trip/trips) which had not yet ended.   I'd like to ask about (that trip/those trips) now. /   ) 

In what month did your trip to (place word for 8500.TRIPPLAC) end?

    Destination  Ended     How paid   Number of trips
    (TRPPLACE)   (ENDTRP2) (ANYBOTH2) (NUMTRIPS)

0. Trip not ended
1. January
2. February
3. March
4. April
5. May
6. June
7. July
8. August
9. September
10. October
11. November
12. December	0:  IF no more unended trips then exit block and 
       goto ANYTRIPS
    ELSE goto next line on grid

REF_MONTH - CUR_MONTH: IF ENDTRP1 is not within reference 
                            period then goto ERR3_ENDTRP1
                       ELSE goto ANYBOTH1

DK,RF:   Goto ANYBOTH1	
17A1	ANYBOTH1	ANYBOTH1	Did a business, employer, or any other non-household member pay any of 
the costs for this trip?

1. Yes
2. No	IF no more unended trips then exit the block and 
   goto ANYTRIPS

ELSE goto ENDTRP1, next line of grid	
17A		Tripline			
17A1		MATCHID			
17A2	ANYTRIPS	ANYTRIPS	 38    ? [F1]

Since the first of (reference month), have (you/you or any members of your household)
taken (any trips/any other trips) for reasons such as:

    * Visiting relatives or friends?
    * Business?
    * Recreational trips?
    * Other trips overnight or longer?
    * Day trips of at least 75 miles away from home?

1. Yes
2. No	1:        Goto TRPPLACE

2,DK,RF:    Goto S17A_END	
17A2	TRIPPLAC	TRIPPLAC	Where did (you/your household)  go?

      Enter 888 to delete the trip

      Destination   Ended    How paid   Number of trips
      (TRPPLACE)   (ENDTRP2) (ANYBOTH2) (NUMTRIPS)	30 characters:   Goto DESTCODE

888:              Goto S18MORE	
17A2	DESTCODE	DESTCODE	? [F1]

    Type state abbreviation for a U.S. destination or X for foreign country destination

      Destination   Ended    How paid   Number of trips
      (TRPPLACE)   (ENDTRP2) (ANYBOTH2) (NUMTRIPS)	2 character state abbrev.,DK,RF:   Goto ENDTRP2

X:      Goto FOREIGN	
17A2		PLACE	** SHOW ONLY **		
17A2	FOREIGN	FOREIGN	  Select the country or region.

1. Africa
2. Asia
3. Australia
4. Canada
5. Caribbean
6. Central America
7. Europe
8. Mexico
9. Middle East
10. South America
11. South Pacific	Goto ENDTRP2	
17A2	ENDTRP2	ENDTRP2	In what month did this trip end?

        (0) Trip not ended

      Destination   Ended    How paid   Number of trips
      (TRPPLACE)   (ENDTRP2) (ANYBOTH2) (NUMTRIPS)

0. Trip not ended
1. January
2. February
3. March
4. April
5. May
6. June
7. July
8. August
9. September
10. October
11. November
12. December	0:      Goto S18MORE

REF_MONTH-CUR_MONTH:  IF trip is not within the reference
                         period, then goto ERR3_ENDTRP2
                      ELSE goto MORTHONE

DK,RF:  Goto MORTHONE	
17A2	MORTHONE	MORTHONE	Did you take more than one trip to (trip destination) in (month trip ended)?

      Destination   Ended    How paid   Number of trips
      (TRPPLACE)   (ENDTRP2) (ANYBOTH2) (NUMTRIPS)

1. Yes
2. No	1:       Goto NUMTRIPS

2,DK,RF:  Goto ANYBOTH2	
17A2	NUMTRIPS	NUMTRIPS	  How many times did you go to (trip destination) 
  in (month trip ended)?

      Destination   Ended    How paid   Number of trips
      (TRPPLACE)   (ENDTRP2) (ANYBOTH2) (NUMTRIPS)	Goto ANYBOTH2	
17A2	ANYBOTH2	ANYBOTH2	Were any of the expenses for (this trip/these trips) paid for
by anyone outside of your household?

      Destination   Ended    How paid   Number of trips
      (TRPPLACE)   (ENDTRP2) (ANYBOTH2) (NUMTRIPS)

1. Yes
2. No	Goto S18MORE	
17A2	S17MORE	S17MORE	 38    ? [F1]

Since the first of  (reference month) , have you taken any other trips for reasons such as:

    * Visiting relatives or friends?
    * Business?
    * Recreational trips?
    * Other trips overnight or longer?
    * Day trips of at least 75 miles away from home?

1. Yes
2. No	1:       Goto TRIPPLAC, next line on the grid

2,DK,RF:   Goto S17A_END	
17A2		TRIPLINE			
17A2		TRPDSTN			
17A2		TR2_STAT			
17A2		TR2_ORIG			
17A		S17A_END	** Non Displayed **	IF (ANYBOTH1 = 1,2,DK or RF) or (ANYBOTH2 = 1,2,DK or RF)
        for any trips goto Section 17BC

ELSE goto Section 17E	
17BC		TRIPNUM	** SHOW ONLY **		
17BC		TRIPPLACE	** SHOW ONLY **		
17BC	NUMNIGHT	NUMNIGHT	(Now I'm going to ask you about the (trip/trips) that (you/your household) took to (place) ending in (days)/You 

(Since (you/your CU) took a set of similar trips to (Trip destination) in (month trip ended) , I wil 

How many nights did (you/you or any members of your household) spend away from home on (these trips/this trip)?

       Enter 0 for none
       Enter 888 to delete this trip	0-800:   IF NUMNIGHT > 90 then goto ERR1_NUMNIGHT
         ELSE goto PKGTRIP

DK,RF:    Goto PKGTRIP

888:    Goto S18BC_END	
17BC	PKGTRIP	PKGTRIP	(Sometimes when people take a trip they have some sort of package deal that covers some or all of the costs./  ) 
    
Was all or part of (these trips/this trip) covered by a package deal?

1. Yes
2. No	1:        Goto FOODDEAL

2,DK,RF:   Goto TRPTRNS	
17BC	FOODDEAL	FOODDEAL	Did the package deal include . . .

  . . . Food and beverages?             

1. Yes
2. No	Goto LODGDEAL	
17BC	LODGDEAL	LODGDEAL	Did the package deal include . . .

   . . . Lodging?   

1. Yes
2. No	Goto TRANDEAL	
17BC	TRANDEAL	TRANDEAL	Did the package deal include  . . .

   . . . Transportation?                    

1. Yes
2. No	Goto ELSEDEAL	
17BC	ELSEDEAL	ELSEDEAL	Did the package deal include . . .

  . . . Anything else?           

1. Yes
2. No	1:       Goto TRBELSE

2,DK,RF:  Goto PKGTRIPX	
17BC	TRBELSE	TRBELSE	  Specify:	Goto PKGTRIPX	
17BC	PKGTRIPX	PKGTRIPX	How much did (you/your household) pay for the package deal?	1-999999:  IF PKGTRIPX < 5 or PKGTRIPX > 7000 then 
              goto ERR1_PKGTRIPX
           ELSE goto TRPTRNS

DK,RF:     Goto TRPTRNS	
17BC	TRPTRNS	TRPTRNS	 38    ?  [F1]

Starting at the beginning of this trip, please tell me all the kinds of transportation 
(you/you or any members of your household) used from the time you (they) left home to the time you (they) got back home.     

         Enter all that apply, separate with commas

1. Local (taxi, etc.)
2. Airplane
3. Train
4. Bus
5. Ship
6. Automobile, truck, van  (Rented)
7. Motorcycle, moped (Rented)
8. Private plane (Rented)
9. Boat, trailer (Rented)
10. Camper (Rented)
11. Other vehicles (Rented)
12. Automobiles or other vehicles privately owned or leased by household
13. Vehicle owned by someone else (Private)
14. Other transport (Private)	1-14:    IF 1 is selected then goto CMLOCALX
         ELSEIF 2 is selected then goto CMPLANEX
         ELSEIF 3 is selected then goto CMTRAINX
         ELSEIF 4 is selected then goto CMBUSX
         ELSEIF 5 is selected then goto CMSHIPX
         ELSEIF 6 is selected then goto RTCARX
         ELSEIF 7 is selected then goto RTMOPEDX
         ELSEIF 8 is selected then goto RTPLANEX
         ELSEIF 9 is selected then goto RTBOATX
         ELSEIF 10 is selected then goto RTCAMPX
         ELSEIF 11 is selected then goto RTOTHERX
         ELSEIF 12-14 is selected then goto ANYGAS

DK,RF:   Goto LODGING	
17BC	CMLOCALX	CMLOCALX	How much did (you/you or any members of your household) spend for local transportation (taxi, etc.)
(other than what the package deal covered/    )?	IF CMLOCALX > 640 then goto ERR1_CMLOCALX
ELSEIF 2 is selected in TRPTRNS then goto CMPLANEX
ELSEIF 3 is selected in TRPTRNS then goto CMTRAINX
ELSEIF 4 is selected in TRPTRNS then goto CMBUSX
ELSEIF 5 is selected in TRPTRNS then goto CMSHIPX
ELSEIF 6 is selected in TRPTRNS then goto RTCARX
ELSEIF 7 is selected in TRPTRNS then goto RTMOPEDX
ELSEIF 8 is selected in TRPTRNS then goto RTPLANEX
ELSEIF 9 is selected in TRPTRNS then goto RTBOATX
ELSEIF 10 is selected in TRPTRNS then goto RTCAMPX
ELSEIF 11 is selected in TRPTRNS then goto RTOTHERX
ELSEIF 12-14 are selected in TRPTRNS then goto ANYGAS
ELSE goto LODGING	
17BC	CMPLANEX	CMPLANEX	How much did (you/you or any members of your household) spend for airfare (other than what the package deal covered/    )?	IF entry = 1-25 or CMPLANEX > 7500 then goto ERR1_COMPLANEX
ELSEIF 3 is selected in TRPTRNS then goto CMTRAINX
ELSEIF 4 is selected in TRPTRNS then goto CMBUSX
ELSEIF 5 is selected in TRPTRNS then goto CMSHIPX
ELSEIF 6 is selected in TRPTRNS then goto RTCARX
ELSEIF 7 is selected in TRPTRNS then goto RTMOPEDX
ELSEIF 8 is selected in TRPTRNS then goto RTPLANEX
ELSEIF 9 is selected in TRPTRNS then goto RTBOATX
ELSEIF 10 is selected in TRPTRNS then goto RTCAMPX
ELSEIF 11 is selected in TRPTRNS then goto RTOTHERX
ELSEIF 12-14 are selected in TRPTRNS then goto ANYGAS
ELSE goto LODGING	
17BC	CMTRAINX	CMTRAINX	How much did (you/you or any members of your household) spend for train fare (other than what the package deal covered/    )?	IF CMTRAINX > 800 then goto ERR1_CMTRAINX     
ELSEIF 4 is selected in TRPTRNS then goto CMBUSX
ELSEIF 5 is selected in TRPTRNS then goto CMSHIPX
ELSEIF 6 is selected in TRPTRNS then goto RTCARX
ELSEIF 7 is selected in TRPTRNS then goto RTMOPEDX
ELSEIF 8 is selected in TRPTRNS then goto RTPLANEX
ELSEIF 9 is selected in TRPTRNS then goto RTBOATX
ELSEIF 10 is selected in TRPTRNS then goto RTCAMPX
ELSEIF 11 is selected in TRPTRNS then goto RTOTHERX
ELSEIF 12-14 are selected in TRPTRNS then goto ANYGAS
ELSE goto LODGING	
17BC	CMBUSX	CMBUSX	How much did (you/you or any members of your household) spend for bus fare (other than what the package deal covered/    )?	IF CMBUSX > 315 then goto ERR1_CMBUSX
ELSEIF 5 is selected in TRPTRNS then goto CMSHIPX
ELSEIF 6 is selected in TRPTRNS then goto RTCARX
ELSEIF 7 is selected in TRPTRNS then goto RTMOPEDX
ELSEIF 8 is selected in TRPTRNS then goto RTPLANEX
ELSEIF 9 is selected in TRPTRNS then goto RTBOATX
ELSEIF 10 is selected in TRPTRNS then goto RTCAMPX
ELSEIF 11 is selected in TRPTRNS then goto RTOTHERX
ELSEIF 12-14 are selected in TRPTRNS then goto ANYGAS
ELSE goto LODGING	
17BC	CMSHIPX	CMSHIPX	How much did (you/you or any members of your household) spend for ship fare (other than what the package deal covered/    )?	IF CMSHIPX > 2800 then goto ERR1_CMSHIPX     
ELSEIF (RT10.POPGRP = 1, 2, 01 or 02) AND (DESTCODE <> X or 
       (DESTCODE = X and FOREIGN = 5)) then goto SHPSTORE
ELSEIF 6 is selected in TRPTRNS then goto RTCARX
ELSEIF 7 is selected in TRPTRNS then goto RTMOPEDX
ELSEIF 8 is selected in TRPTRNS then goto RTPLANEX
ELSEIF 9 is selected in TRPTRNS then goto RTBOATX
ELSEIF 10 is selected in TRPTRNS then goto RTCAMPX
ELSEIF 11 is selected in TRPTRNS then goto RTOTHERX
ELSEIF 12-14 are selected in TRPTRNS then goto ANYGAS
ELSE goto LODGING	
17B	SHPSTORE	SHPSTORE	What is the name of the cruise line or ship travel company?

           Enter store, website, or company name	ENTRY:   Goto SHPRSRV

DK, RF:    IF 6 is selected in TRPTRNS then goto RTCARX
           ELSEIF 7 is selected in TRPTRNS then goto RTMOPEDX
           ELSEIF 8 is selected in TRPTRNS then goto RTPLANEX
           ELSEIF 9 is selected in TRPTRNS then goto RTBOATX
           ELSEIF 10 is selected in TRPTRNS then goto RTCAMPX
           ELSEIF 11 is selected in TRPTRNS then goto RTOTHERX
           ELSEIF 12-14 are selected in TRPTRNS then 
                  goto ANYGAS
           ELSE goto LODGING	
17BC	SHPRSRV	SHPRSRV	Was the reservation made directly with (cruise line or ship travel company) or through a third party?

1. Direct
2. Third party	1,DK,RF:  IF uppercase entry in SHPSTORE contains .COM then  
             IF 6 is selected in TRPTRNS then goto RTCARX
            ELSEIF 7 is selected in TRPTRNS then goto RTMOPEDX
            ELSEIF 8 is selected in TRPTRNS then goto RTPLANEX
            ELSEIF 9 is selected in TRPTRNS then goto RTBOATX
            ELSEIF 10 is selected in TRPTRNS then goto RTCAMPX
           ELSEIF 11 is selected in TRPTRNS then goto RTOTHERX
             ELSEIF 12-14 are selected in TRPTRNS then 
                  goto ANYGAS
             ELSE goto LODGING
          ELSE goto SHPPURCH

2:   Goto SHPRCOMP	
17B	SHPRCOMP	SHPRCOMP	What is the name of the company you used to make the reservation?

           Enter store, website, or company name	IF uppercase entry contains ".COM" then 
   IF 6 is selected in TRPTRNS then goto RTCARX
   ELSEIF 7 is selected in TRPTRNS then goto RTMOPEDX
   ELSEIF 8 is selected in TRPTRNS then goto RTPLANEX
   ELSEIF 9 is selected in TRPTRNS then goto RTBOATX
   ELSEIF 10 is selected in TRPTRNS then goto RTCAMPX
   ELSEIF 11 is selected in TRPTRNS then goto RTOTHERX
   ELSEIF 12-14 are selected in TRPTRNS then goto ANYGAS
   ELSE goto LODGING

ELSE goto SHPPURCH	
17BC	SHPPURCH	SHPPURCH	   Was this reservation made - 

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF 6 is selected in TRPTRNS then goto RTCARX
           ELSEIF 7 is selected in TRPTRNS then goto RTMOPEDX
           ELSEIF 8 is selected in TRPTRNS then goto RTPLANEX
           ELSEIF 9 is selected in TRPTRNS then goto RTBOATX
           ELSEIF 10 is selected in TRPTRNS then goto RTCAMPX
           ELSEIF 11 is selected in TRPTRNS then goto RTOTHERX
           ELSEIF 12-14 are selected in TRPTRNS then 
                  goto ANYGAS
           ELSE goto LODGING

2:   Goto SHPRLOC	
17BC	SHPRLOC	SHPRLOC	In what city is (Company name) located?	Goto SPRLOCST	
17BC	SPRLOCST	SPRLOCST	? [F1]

In what state is (Company name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_SPRLOCST
ELSEIF 6 is selected in TRPTRNS then goto RTCARX
ELSEIF 7 is selected in TRPTRNS then goto RTMOPEDX
ELSEIF 8 is selected in TRPTRNS then goto RTPLANEX
ELSEIF 9 is selected in TRPTRNS then goto RTBOATX
ELSEIF 10 is selected in TRPTRNS then goto RTCAMPX
ELSEIF 11 is selected in TRPTRNS then goto RTOTHERX
ELSEIF 12-14 are selected in TRPTRNS then goto ANYGAS

ELSE goto LODGING	
17BC	RTCARX	RTCARX	How much did (you/you or any members of your household) spend for rented automobiles, trucks or vans, not including
gas (you/you or any members of your household) bought (other than what the package deal covered/    )?

       (*  Do not include any rental costs already collected in Section 9 / )	IF RTCARX > 1400 then goto ERR1_RTCARX
ELSEIF ((RT10.POPGRP = 5, 6, 05 or 06) AND DESTCODE ne X) 
        then goto RTCSTORE
ELSEIF 7 is selected in TRPTRNS then goto RTMOPEDX
ELSEIF 8 is selected in TRPTRNS then goto RTPLANEX
ELSEIF 9 is selected in TRPTRNS then goto RTBOATX
ELSEIF 10 is selected in TRPTRNS then goto RTCAMPX
ELSEIF 11 is selected in TRPTRNS then goto RTOTHERX
ELSE goto ANYGAS	
17BC	RTCSTORE	RTCSTORE	What is the name of the rental car company used?

       Enter store, website, or company name	ENTRY:   Goto RTCPKUP

DK, RF:    IF 7 is selected in TRPTRNS then goto RTMOPEDX
           ELSEIF 8 is selected in TRPTRNS then goto RTPLANEX
           ELSEIF 9 is selected in TRPTRNS then goto RTBOATX
           ELSEIF 10 is selected in TRPTRNS then goto RTCAMPX
           ELSEIF 11 is selected in TRPTRNS then goto RTOTHERX
           ELSE goto ANYGAS	
17BC	RTCPKUP	RTCPKUP	In what city was the vehicle picked up?	Goto RTPKUPST	
17BC	RTPKUPST	RTPKUPST	? [F1]

In what state was the vehicle picked up?

         Enter the two character state abbreviation or "XX" for foreign country	IF entry is not a valid state abbreviation then
   goto CK_RTPKUPST

ELSEIF entry is not XX then goto RTCRSRV

ELSE 
   IF 7 is selected in TRPTRNS then goto RTMOPEDX
   ELSEIF 8 is selected in TRPTRNS then goto RTPLANEX
   ELSEIF 9 is selected in TRPTRNS then goto RTBOATX
   ELSEIF 10 is selected in TRPTRNS then goto RTCAMPX
   ELSEIF 11 is selected in TRPTRNS then goto RTOTHERX
   ELSE goto ANYGAS	
17BC	RTCRSRV	RTCRSRV	Was the reservation made directly with (rental car company) or through a third party?

1. Direct
2. Third party	1,DK,RF:  IF uppercase entry in RTCSTORE does not 
             contain ".COM' then goto RTCPURCH
          ELSEIF 7 is selected in TRPTRNS then goto RTMOPEDX
          ELSEIF 8 is selected in TRPTRNS then goto RTPLANEX
          ELSEIF 9 is selected in TRPTRNS then goto RTBOATX
          ELSEIF 10 is selected in TRPTRNS then goto RTCAMPX
          ELSEIF 11 is selected in TRPTRNS then goto RTOTHERX
          ELSE goto ANYGAS 

2:   Goto RTCRCOMP	
17BC	RTCRCOMP	RTCRCOMP	What is the name of the company you used to make your reservation?

           Enter store, website, or company name	IF uppercase entry contains does not ".COM" and is not DK or 
   RF then goto RTCPURCH

ELSEIF 7 is selected in TRPTRNS then goto RTMOPEDX
ELSEIF 8 is selected in TRPTRNS then goto RTPLANEX
ELSEIF 9 is selected in TRPTRNS then goto RTBOATX
ELSEIF 10 is selected in TRPTRNS then goto RTCAMPX
ELSEIF 11 is selected in TRPTRNS then goto RTOTHERX
ELSE goto ANYGAS	
17BC	RTCPURCH	RTCPURCH	   Was this reservation made - 

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF 7 is selected in TRPTRNS then goto RTMOPEDX
             ELSEIF 8 is selected in TRPTRNS then goto RTPLANEX
             ELSEIF 9 is selected in TRPTRNS then goto RTBOATX
             ELSEIF 10 is selected in TRPTRNS then goto RTCAMPX
             ELSEIF 11 is selected in TRPTRNS then goto RTOTHERX
             ELSE goto ANYGAS 

2:   IF RTCRCOMP = RESPONSE then goto RTCRLOC
     ELSEIF 7 is selected in TRPTRNS then goto RTMOPEDX
     ELSEIF 8 is selected in TRPTRNS then goto RTPLANEX
     ELSEIF 9 is selected in TRPTRNS then goto RTBOATX
     ELSEIF 10 is selected in TRPTRNS then goto RTCAMPX
     ELSEIF 11 is selected in TRPTRNS then goto RTOTHERX
     ELSE goto ANYGAS	
17BC	RTCRLOC	RTCRLOC	In what city is (Reservation company) located?	Goto RTRLOCST	
17BC	RTRLOCST	RTRLOCST	? [F1]

In what state is (Reservation company) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then
   goto CK_RTRLOCST
ELSEIF 7 is selected in TRPTRNS then goto RTMOPEDX
ELSEIF 8 is selected in TRPTRNS then goto RTPLANEX
ELSEIF 9 is selected in TRPTRNS then goto RTBOATX
ELSEIF 10 is selected in TRPTRNS then goto RTCAMPX
ELSEIF 11 is selected in TRPTRNS then goto RTOTHERX
ELSE goto ANYGAS	
17BC	RTMOPEDX	RTMOPEDX	How much did (you/you or any members of your household) spend for rented motorcycles or mopeds, not including gas (you/you or any members of your household) bought (other than what the package deal covered/    )?

       (*  Do not include any rental costs already collected in Section 9/   )	IF RTMOPEDX > 250 then goto ERR1_RTMOPEDX
ELSEIF 8 is selected in TRPTRNS then goto RTPLANEX
ELSEIF 9 is selected in TRPTRNS then goto RTBOATX
ELSEIF 10 is selected in TRPTRNS then goto RTCAMPX
ELSEIF 11 is selected in TRPTRNS then goto RTOTHERX
ELSE goto ANYGAS	
17BC	RTPLANEX	RTPLANEX	How much did (you/you or any members of your household) spend for rented private planes,
not including gas (you/you or any members of your household) bought (other than what the package deal covered/    )?

       (*Do not include any rental costs already collected in Section 9 /  )	IF RTPLANEX > 6000 then goto ERR1_RTPLANEX
ELSEIF 9 is selected in TRPTRNS then goto RTBOATX
ELSEIF 10 is selected in TRPTRNS then goto RTCAMPX
ELSEIF 11 is selected in TRPTRNS then goto RTOTHERX
ELSE goto ANYGAS	
17BC	RTBOATX	RTBOATX	How much did (you/you or any members of your household) spend for rented boats or trailers,
not including gas (you/you or any members of your household) bought (other than what the package deal covered/    )?

       (*  Do not include any rental costs already collected in Section 9 /   )	IF RTBOATX > 400 then goto ERR1_RTBOATX
ELSEIF 10 is selected in TRPTRNS then goto RTCAMPX
ELSEIF 11 is selected in TRPTRNS then goto RTOTHERX
ELSE goto ANYGAS	
17BC	RTCAMPX	RTCAMPX	How much did (you/you or any members of your household) spend for rented campers,
not including gas (you/you or any members of your household) bought (other than what the package deal covered/    )?

       (*  Do not include any rental costs already collected in Section 9 /   )	IF RTCAMPX > 1375 then goto ERR1_RTCAMPX
ELSEIF 11 is selected in TRPTRNS then goto RTOTHERX
ELSE goto ANYGAS	
17BC	RTOTHERX	RTOTHERX	How much did (you/you or any members of your household) spend for other rented vehicle transportation,
not including gas (you/you or any members of your household) bought (other than what the package deal covered/    )?

       (*  Do not include any rental costs already collected in Section 9 /   )	IF RTOTHERX > 870 then goto ERR1_RTOTHERX
ELSE goto ANYGAS	
17BC	ANYGAS	ANYGAS	While on the trip did (you/you or any members of your household) stop to buy any gasoline, diesel fuel, or any other fuels?

1. Yes
2. No	1:       Goto GASOILX

2,DK,RF:   Goto ANYTOLL	
17BC	GASOILX	GASOILX	(How much did ^YOU_ANYMEM spend for that?/What costs for gasoline or other fuels won't be reimbursed?)	IF GASOILX = 1 or GASOILX > 499 then goto ERR1_GASOILX

ELSEIF POPGROUP = (11 or 12) AND DESTCODE <> 'X' then
     goto GTRSTORE

ELSE goto ANYTOLL	
	GTRSTORE	GTRSTORE	At what station or store did (you/you or any members of your household) last purchase gasoline on your trip?
 
  Enter store or station name	ENTRY: Goto GTRLOC

DK,RF: Goto ANYTOLL	
	GTRLOC	GTRLOC	In what city is (Gas Store) located?	Goto GTRLOCST	
17BC	GTRLOCST	GTRLOCST	? [F1]

In what state is (Gas Store) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then goto CK_GTRLOCST

ELSE Goto ANYTOLL	
17BC	ANYTOLL	ANYTOLL	While on the trip, did (you/you or any members of your household) spend anything for tolls, not already reported?

1. Yes
2. No	1:        Goto TRPTOLLX

2,DK,RF   Goto ANYPARK	
17BC	TRPTOLLX	TRPTOLLX	(How much did ^YOU_ANYMEM spend for tolls?/What costs for tolls won't be reimbursed?)	IF TRPTOLLX > 50 then goto ERR1_TRPTOLLX

ELSEIF (RT10.POPGRP = 13 or 14) and DESTCODE <> X then 
     goto TOLSTORE

ELSE goto ANYPARK	
17B	TOLSTORE	TOLSTORE	What is the last road, bridge, ferry or tunnel you paid a toll for on this trip?

           Enter name	ENTRY:   Goto TOLLOC

DK,RF:   Goto ANYPARK	
17BC	TOLLOC	TOLLOC	What is the city?	Goto TOLLOCST	
17BC	TOLLOCST	TOLLOCST	? [F1]

What is the state?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then
   goto CK_TOLLOCST

ELSE goto ANYPARK	
17BC	ANYPARK	ANYPARK	Did (you/you or any members of your household) have any parking fees?

1. Yes
2. No	1:      Goto PARKINGX

2,DK,RF:  Goto LODGING	
17BC	PARKINGX	PARKINGX	(How much were they?/What cost for parking fees won't be reimbursed?)	IF PARKINGX > 100 then goto ERR1_PARKINGX

ELSEIF (RT10.POPGRP = 13 or 14) AND DESTCODE <> X then 
      goto TRPPKLOC

ELSE goto LODGING	
17BC	TRPPKLOC	TRPPKLOC	At what street intersection or location was the vehicle parked?

         Enter intersection or location	Goto TRPKLC	
17BC	TRPKLC	TRPKLC	What is the city?	Goto TRPKLCST	
17BC	TRPKLCST	TRPKLCST	? [F1]

What is the state?

     Enter the two character state abbreviation	IF not a valid state abbreviation then goto CK_TRPKLCST

ELSE goto TRPPKSTR	
17BC	TRPPKSTR	TRPPKSTR	What is the name of the company or institution that you paid?

           Enter name of company or institution	Goto LODGING	
17BC		NUMSAME			
17BC		NUMN_GHT			
17BC		PKGT_IPX			
17BC		CMLO_ALX			
17BC		CMPL_NEX			
17BC		CMTR_INX			
17BC		CMBUSX_			
17BC		CMSHIPX_			
17BC		RTCARX_			
17BC		RTMO_EDX			
17BC		RTPL_NEX			
17BC		RTBOATX_			
17BC		RTCAMPX_			
17BC		RTOT_ERX			
17BC		GASOILX_			
17BC		TRPT_LLX			
17BC		PARK_NGX			
17BC		TRIPDSTN			
17BC		TRIPNUM	** SHOW ONLY **		
17BC		TRIPPLACE	** SHOW ONLY **		
17BC	LODGING	LODGING	Did (you/you or any members of your household) spend anything for hotels, cottages, trailer camps,
or other lodging (not counting what the package deal covered/  )?
(Do not include expenses previously reported for vacation clubs.)

1. Yes
2. No	1:       Goto LDGCOSTX

2,DK,RF:  Goto TRPFOOD	
17BC	LDGCOSTX	LDGCOSTX	(What was the cost, including taxes and tips?/What costs for lodging, including taxes and tips, won't be reimbursed?)	IF LDGCOSTX = 1-25 or LDGCOSTX > 2500 then goto ERR1_LDGCOSTX

ELSEIF (RT10.POPGRP = 13 or 14) AND DESTCODE <> X then 
      goto HOTEL

ELSE goto TRPFOOD	
17B	HOTEL	HOTEL	What is the name of the hotel or place that you stayed?

           Enter name	ENTRY:   Goto HOTLOC

DK,RF:   Goto TRPFOOD	
17BC	HOTLOC	HOTLOC	In what city did you stay?	Goto HOTLOCST	
17BC	HOTLOCST	HOTLOCST	? [F1]

In what state did you stay?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_HOTLOCST

ELSE goto HOTRSRV	
17BC	HOTRSRV	HOTRSRV	Was the reservation made directly with (Hotel name) or through a third party?

1. Direct
2. Third party	1,DK,RF:  Goto HOTPURCH

2:   Goto HOTRVCOM	
17B	HOTRVCOM	HOTRVCOM	What is the name of the company you used to make your reservation?

           Enter store, website, or company name	Goto HOTPURCH	
17BC	HOTPURCH	HOTPURCH	   Was the reservation made - 

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF: Goto TRPFOOD

2:   IF HOTRSRV = 2 then goto HOTRVLOC
     ELSE goto TRPFOOD	
17BC	HOTRVLOC	HOTRVLOC	In what city is (Hotel reservation company) located?	Goto HTRVLCST	
17BC	HTRVLCST	HTRVLCST	? [F1]

In what state is (Hotel reservation company) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then
   goto CK_HTRVLCST

ELSE goto TRPFOOD	
17BC	TRPFOOD	TRPFOOD	Did (you/you or any members of your household) spend anything for meals, snacks, or drinks at restaurants,
bars, or fast food places (not counting what the package deal covered/      )?

1. Yes
2. No	1:       Goto TRPFOODX

2,DK,RF:   Goto ANYGROC	
17BC	TRPFOODX	TRPFOODX	(What was the cost, including taxes and tips?/What costs for these things won't be reimbursed?)	IF TRPFOODX > 700 then goto ERR1_TRPFOODX
ELSE goto TRPALCIN	
17BC	TRPALCIN	TRPALCIN	Was any of the (amount/$ (entry in TRPFOODX) for alcoholic beverages?      

1. Yes
2. No	1:         Goto TRPALCHX

2,DK,RF:   Goto ANYGROC	
17BC	TRPALCHX	TRPALCHX	(What was the cost for alcoholic beverages, including taxes and trips?/What costs for alcoholic beverages, including taxes and tips, won't be reimburs	IF TRPALCHX > 210 then goto ERR1_TRPALCHX
ELSE goto ANYGROC	
17BC	ANYGROC	ANYGROC	Did (you/you or any members of your household) spend anything for food or beverages at grocery stores,
convenience stores, or liquor stores on this trip?     

1. Yes
2. No	1:        Goto TRPGROCX

2,DK,RF:   Goto ANYSPEQP	
17BC	TRPGROCX	TRPGROCX	(What were the expenses, including taxes?/What costs, including taxes, won't be reimbursed?)	IF TRPGROCX > 300 then goto ERR1_TRPGROCX
ELSE goto ANYALC	
17BC	ANYALC	ANYALC	Was any of the (amount/$ (entry in TRPGROCX) ) for alcoholic beverages?

1. Yes
2. No	1:        Goto TRPALCGX

2,DK,RF:  Goto ANYSPEQP	
17BC	TRPALCGX	TRPALCGX	(What was the cost for alcoholic beverages, including taxes?/What costs for alcoholic beverages, including taxes, won't be reimbursed?)	IF TRPALCGX > 150 then goto ERR1_TRPALCGX
ELSE goto ANYSPEQP	
17BC	ANYSPEQP	ANYSPEQP	 39    ? [F1]

Did (you/you or any members of your household) pay any fees to play sports, exercise, or rent any sports equipment
(not counting what the package deal covered/   )?

1. Yes
2. No	1:      Goto TRPSPRTX

2,DK,RF:   Goto ANYENTER	
17BC	TRPSPRTX	TRPSPRTX	(How much did  (you/you or any member of your CU) pay?/What costs for playing sports or renting sports equipment won't be reimbursed?) 	IF TRPSPRTX > 600 then goto ERR1_TRPSPRTX
ELSE goto ANYENTER	
17BC	ANYENTER	ANYENTER	 39    ? [F1]

Did (you/you or any members of your household) spend anything on this trip for entertainment or admissions  (not counting what the package deal covered/  )?     

1. Yes
2. No	1:        Goto TRPETRTX

2,DK,RF:   Exit block and goto BlkSection17_BC_3.CHKTCOMB	
17BC	TRPETRTX	TRPETRTX	(How much did (you/you or any member of your CU) spend?/What costs for entertainment and admissions won't be reimbursed?)	IF TRPETRTX > 682 then goto ERR1_TRPETRTX

ELSE exit block and goto BlkSection17_BC_3.CHKTCOMB	
17BC		LDGC_STX			
17BC		TRPF_ODX			
17BC		TRPA_CHX			
17BC		TRPG_OCX			
17BC		TRPA_CGX			
17BC		TRPS_RTX			
17BC		TRPE_RTX			
17BC		TRIPNUM	** SHOW ONLY **		
17BC		TRIPPLACE	** SHOW ONLY **		
17BC	CHKTCOMB	CHKTCOMB	  Are there combined expenses for this trip the respondent
    was not able to separate?

1. Yes
2. No	1:    Goto TCOMBEST

2:    Goto TRPGFTC	
17BC	TCOMBEST	TCOMBEST	  (Only those expenses the respondent could not provide individual expenses for should be combined and entered here./  	IF TCOMBEST > 6000 then goto ERR1_TCOMBEST
ELSE goto FOODCOMB	
17BC	FOODCOMB	FOODCOMB	Does this ($ (entry in TCOMBEST) ) include anything for . . .

    . . . Food?                

1. Yes
2. No	Goto LODGCOMB	
17BC	LODGCOMB	LODGCOMB	Does this ($ (entry in TCOMBEST) ) include anything for . . .

   . . . Lodging        

1. Yes
2. No	Goto TRANCOMB	
17BC	TRANCOMB	TRANCOMB	Does this ($ (entry in TCOMBEST) )  include anything for . . .

            . . .Transportation?                    

1. Yes
2. No	Goto ELSECOMB	
17BC	ELSECOMB	ELSECOMB	Does this ($ (entry in TCOMBEST) )  include anything for . . .

             . . .  Other expenses?                   

1. Yes
2. No	Goto OTHRCOMB	
17BC	OTHRCOMB	OTHRCOMB	Does this ($ (entry in TCOMBEST) )  include . . . 

       . . . Any expenses for others?

1. Yes
2. No	Goto TRPGFTC	
17BC	TRPGFTC	TRPGFTC	(You've told me about many expenses (you/you or your CU) had on this trip.  Were any of these expens

1. Yes
2. No	1:      Goto TRPGTCX

2,DK,RF:    Goto S17BC_END	
17BC	TRPGFTCX	TRPGFTCX	(How much of the total expenses for this trip were for persons outside your CU?/How much of the tota	IF TRPGFTCX > 1100 then goto ERR1_TRPGFTCX
ELSE goto S17BC_END	
17BC		S17BC_END		IF more trips with flganyboth = 2 then go to NUMNIGHT for the next trip

ELSEIF more trips with flganyboth = 1 then go to NUMNIGHT for the next trip

ELSE goto Section 17E - BlkSect17_E	
17BC		TCOM_EST			
17BC		TRPG_TCX			
17BC		WHATPART			
17BC		TRIPIDBC			
17BC		CMLOCALY			
17BC		CMPLANEY			
17BC		CMTRAINY			
17BC		CMBUSY			
17BC		CMSHIPY			
17BC		PVCARY			
17BC		PVELSEY			
17BC		PVTRANSY			
17BC		RTCARY			
17BC		RTMOPEDY			
17BC		RTPLANEY			
17BC		RTBOATY			
17BC		RTCAMPY			
17BC		RTOTHERY			
17BC		EOTRIPMO			
17BC		TRPPLACE			
17BC		TRB_STAT			
17BC		TRB_ORIG			
17BC		flganyboth	

1. Yes
2. No		
17E	ANYNONCU	ANYNONCU	Sometimes people in a household don't take a trip themselves, but pay for 
part or all of a trip that someone else takes.  Since the first of 
(reference month), have (you/you or any members of your household) paid for part or all of 
such a trip for any non-household members?  

1. Yes
2. No	1:       Goto FOODNOCU

2,DK,RF:   Goto S17E_END	
17E	FOODNOCU	FOODNOCU	Did these expenses include anything for...

          . . . Food and beverages?

1. Yes
2. No	Goto LODGNOCU	
17E	LODGNOCU	LODGNOCU	Did these expenses include anything for...

      . . . Lodging?                          

1. Yes
2. No	Goto TRANNOCU	
17E	TRANNOCU	TRANNOCU	Did these expenses include anything for...

     . . . Transportation?                          

1. Yes
2. No	Goto ELSENOCU	
17E	ELSENOCU	ELSENOCU	Did these expenses include ...

     . . . Anything else?                          

1. Yes
2. No	Goto TRNONCUX	
17E	TRNONCUX	TRNONCUX	What was the total amount that (you/your household) paid for those trips?	IF TRNONCUX < 25 or TRNONCUX > 3000 then goto ERR1_TRNONCUX

ELSE goto S17E_END	
17E		S17E_END		Exit block and goto ANYLOC	
17E		TRNO_CUX			
17E		TRE_STAT			
17E		TRE_ORIG			
17F	ANYLOC	ANYLOC	Sometimes people stay overnight in a local hotel or motel during holidays, family 
getaways, moves, or home repair.  Since the first of (reference month), have 
(you/you or any members of your household) stayed overnight in a local hotel or motel?    

1. Yes
2. No	1:       Goto BlkSect17_F.NUMLOC

2,DK,RF:   Goto S17F_END	
18F	NUMLOC	NUMLOC	How many nights did (you/you or any members of your household) spend away from home on this stay?	Goto ANYLOCDL	
18F	ANYLOCDL	ANYLOCDL	Sometimes when people stay away from home overnight they have some 
sort of package deal that covers some or all of the costs.  Was all 
or part of this stay covered by anything like that?

1. Yes
2. No	1:        Goto FOODLCDL

2,DK,RF:   Goto ANYLODGE	
18F	FOODLCDL	FOODLCDL	Did the package deal include anything for. . .

     . . . Food and beverages?        

1. Yes
2. No	Goto LODGLCDL	
18F	LODGLCDL	LODGLCDL	     Did the package deal include anything for. . .

     . . .Lodging?  

1. Yes
2. No	Goto ENTRLCDL	
18F	ENTRLCDL	ENTRLCDL	     Did the package deal include anything for. . .

     . . . Entertainment?

1. Yes
2. No	Goto ELSELCDL	
18F	ELSELCDL	ELSELCDL	Did the package deal include . . .

     . . . Anything else?

1. Yes
2. No	1:      Goto TRFELSE

2,DK,RF:  Goto LOCDEALX	
18F	TRFELSE	TRFELSE	  Specify:	Goto LOCDEALX	
18F	LOCDEALX	LOCDEALX	How much did (you/you or any members of your household) pay for the package deal?	IF LOCDEALX > 1500 then goto ERR1_LOCDEALX
ELSE goto ANYLODGE	
18F	ANYLODGE	ANYLODGE	Did (you/you or any members of your household) spend anything for hotels, motels, 
cottages, trailer camps, or other lodging (not counting what the package deal covered/   )?

1. Yes
2. No	1:      Goto LOCLODGX

2,DK,RF:  Goto ANYMEAL	
18F	LOCLODGX	LOCLODGX	What was the cost, including taxes and tips?	IF LOCLODGX < 22 or LOCLODGX > 648 then goto ERR1_LOCLODGX

ELSEIF RT10.POPGRP = 13 or 14 then goto LHTLSTOR

ELSE goto ANYMEAL	
18F	LHTLSTOR	LHTLSTOR	What is the name of the hotel or place that you stayed?

           Enter name of hotel	ENTRY:   Goto LHTLLOC

DK,RF:   Goto ANYMEAL	
18F	LHTLLOC	LHTLLOC	In what city did you stay?	Goto LHTLOCST	
18F	LHTLOCST	LHTLOCST	? [F1]

In what state did you stay?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then
   goto CK_LHTLOCST

ELSE goto LOCSTRSV	
18F	LOCSTRSV	LOCSTRSV	Was the reservation made directly with (Hotel name) or through a third party?

1. Direct
2. Third party	1,DK,RF:  Goto LHTPURCH

2:   Goto LHTRCOMP	
18F	LHTRCOMP	LHTRCOMP	What is the name of the company you used to make your reservation?

           Enter company name or website	Goto LHTPURCH	
18F	LHTPURCH	LHTPURCH	   Was the reservation made - 

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF: Goto ANYMEAL

2:   IF LOCSTRSV = 2 then goto LHRCOLOC
     ELSE goto ANYMEAL	
18F	LHRCOLOC	LHRCOLOC	In what city is (Reservation company name) located?	Goto LHRLOCST	
18F	LHRLOCST	LHRLOCST	? [F1]

In what state is (Reservation company name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then
   goto CK_ LHRLOCST

ELSE gGoto ANYMEAL	
18F	ANYMEAL	ANYMEAL	Did (you/you or any members of your household) spend anything for meals, snacks, or drinks 
at restaurants, bars, or fast food places (not counting what the package deal covered/ )?

1. Yes
2. No	1:         Goto LOCMEALX

2,DK,RF:   Goto ANYLCGR	
18F	LOCMEALX	LOCMEALX	What was the cost, including taxes and tips?	IF LOCMEALX < 6 or LOCMEALX > 1000 then goto ERR1_LOCMEALX

ELSE goto ANYALCML	
18F	ANYALCML	ANYALCML	Was any of the (amount/(entry in LOCMEALX)) for alcoholic beverages?

1. Yes
2. No	1:          Goto ALCMEALX

2,DK,RF:   Goto ANYLCGR	
18F	ALCMEALX	ALCMEALX	What was the cost for alcoholic beverages, including taxes and tips?	IF ALCMEALX < 5 or ALCMEALX > 388 then goto ERR1_ALCMEALX

ELSE goto ANYLCGR	
18F	ANYLCGR	ANYLCGR	Did (you/you or any members of your household) spend anything for food or beverages at 
grocery stores, convenience stores, or liquor stores?

1. Yes
2. No	1:         Goto LOCGROCX

2,DK,RF:   Goto ANYADMIS	
18F	LOCGROCX	LOCGROCX	What were the expenses, including taxes?	IF LOCGROCX < 5 or LOCGROCX > 600 then goto ERR1_LOCGROCX

ELSE goto ANYALCGR	
18F	ANYALCGR	ANYALCGR	 Was any of the (amount/ entry in LOCGROCX) for alcoholic beverages?

1. Yes
2. No	1:         Goto ALCGROCX

2,DK,RF:   Goto ANYADMIS	
18F	ALCGROCX	ALCGROCX	What was the cost for alcoholic beverages, including taxes?	IF ALCGROCX < 5 or ALCGROCX > 270 then goto ERR1_ALCGROCX

ELSE goto ANYADMIS	
18F	ANYADMIS	ANYADMIS	 39    ? [F1]   

Did (you/you or any members of your household) spend anything on this stay for entertainment or admissions (not counting what the package deal covered/   )?

1. Yes
2. No	1:        Goto LOCADMSX

2,DK,RF:   Goto LOCCOMBX	
18F	LOCADMSX	LOCADMSX	How much did (you/you or any members of your household) pay?	IF LOCADMSX < 5 or LOCADMSX > 290 then goto ERR1_LOCADMSX

ELSE goto LOCCOMBX	
18F	CHKFCOMB	CHKFCOMB	  Are there combined expenses for food/beverages, lodging,
    transportation, or other things?

1. Yes
2. No	1:    Goto LOCCOMBX

2:    Goto DIDYOU	
18F	LOCCOMBX	LOCCOMBX	   Only those things the respondent could not provide individual expenses
      for should be combined and entered here.	1-99999999: IF LOCCOMBX < 5 or LOCCOMBX > 210 then 
                goto ERR1_LOCCOMBX
            ELSE goto FOODLCCM

DK,RF:   Goto FOODLCCM	
18F	FOODLCCM	FOODLCCM	Does this include anything for. . .

            . . . Food and beverages?

1. Yes
2. No	Goto LODGLCCM	
18F	LODGLCCM	LODGLCCM	Does this include anything for . . 

      . . . Lodging?

1. Yes
2. No	Goto ENTRLCCM	
18F	ENTRLCCM	ENTRLCCM	Does this include anything for . . 

         . . . Entertainment?

1. Yes
2. No	Goto ELSELCCM	
18F	ELSELCCM	ELSELCCM	Does this include any . . .

      . . . Other expenses?

1. Yes
2. No	Goto DIDYOU	
18F	DIDYOU	DIDYOU	Did (you/you or any members of your household) have any other stays at local hotels or motels?

1. Yes
2. No	1:       Goto NUMLOC, next row

2,DK,RF:   Exit block and goto S18F_END	
18F		LOCD_ALX			
18F		LOCL_DGX			
18F		LOCM_ALX			
18F		ALCM_ALX			
18F		LOCG_OCX			
18F		ALCG_OCX			
18F		LOCA_MSX			
18F		LOCC_MBX			
17F		S17F_END		Goto Section 18 - BSECT18	
17F		TRF_STAT			
17F		TRF_ORIG			
17BC		S17BC_Flag	

1. Yes
2. No		
17F		S17Fldg_Flag	

1. Yes
2. No		
18A	S18A_INTRO	S18A_INTRO	Now I am going to ask about clothing and related expenses.  First, let's start with some selected items and services.  You may find it helpful to refer to receipts, credit card statements or other records to answer the questions.  Please include any shipping and handling charges with the cost of any item that was shipped.

    Description   Month       Amount   
   (CLODESCD)    (CLOTHMOD)  (CLOTHXD)

1. Enter 1 to Continue	Goto BSECT18.BTABLEA.BROW.ITEM	
18A	CLD_ITEM	ITEM	 40    ? [F1]

Since the first of (reference month), have (you/you or any members of your household) had expenses for any of the following items, either for members of your household or for someone outside your household?
      
              Read each item on list.

1. Purchase of any suits or tuxedos for men, 16 or older?
2. Purchase of any watches?
3. Purchase of any jewelry?
4. Shoe repair or other shoe services?
5. Watch or jewelry repair?
6. Repairs, alterations, or tailoring for clothing and accessories?
7. Rental of any clothing or accessories, including tuxedos?
8. Storage outside the home, just for clothing?
99. None/No more entries
888. Delete the line	1-8:   IF ITEM <> Item2Shadow then goto CK_ITEM
       IF ITEM = 1-3 then goto WHO
       ELSE goto DESCRIPTION

99:    Goto S18A_END

888:   IF no more row then goto S18A_END
       ELSE goto ITEM - next row in the table	
09B		PreFill	** SHOW ONLY **		
18A	CLODESCD	DESCRIPTION	What kind of service was this?

       Describe briefly the service.

      Description   Month     Amount
      (CLODESCD)   (CLOTHMOD) (CLSRVCX)	Goto WHO	
18A	CLSVGFTC	WHO	Was this for (you/your household) or for someone outside your household?

     Description    Month      Amount
     (CLODESCD)    (CLOTHMOD) (CLSRVCX)

1. Your household
2. Someone outside your household	Goto MONTH	
18A	CLOTHMOD	MONTH	When did you purchase (this/this service)?

    Description   Month      Amount
   (CLODESCD)    (CLOTHMOD) (CLSRVCX)

1. January
2. February
3. March
4. April
5. May
6. June
7. July
8. August
9. September
10. October
11. November
12. December	REF_MONTH-CUR_MONTH:   IF Entry is not within reference 
                           period then goto ERR3_MONTH
                       ELSE goto AMOUNT

DK,RF:    Goto AMOUNT	
18A	CLSRVCX	AMOUNT	How much did it cost?

  Description    Month      Amount
  (CLODESCD)    (CLOTHMOD) (CLSRVCX)	1-999999:    IF (ITEM = 1 and entry < 18 or entry > 1000) OR
                (ITEM = 2 and entry < 5 or entry > 450) OR
                (ITEM = 3 and entry < 5 or entry > 1800) OR
                (ITEM = 4-8 and entry < 5 or entry > 249) 
                  then goto ERR1_AMOUNT
             ELSEIF CLOTHYD and entry in AMOUNT for this 
                 record are equal to any record data in the
                 prechart/input then goto ERR_DUP
             ELSE goto TAX

DK,RF:  Goto C	
18A	CLSRVCTX	TAX	Did this include sales tax?

    Description    Month      Amount
    (CLODESCD)    (CLOTHMOD) (CLSRVCX)

1. Yes
2. No	Goto C	
18A	CLOCMBD_S	C	  Enter 'C' for a combined expense.	C:       Goto COMBCODE

EMPTY:   IF (ITEM = 1 and [RT10.POPGRP = 5, 6, 05 or 06]) OR 
            ((ITEM = 2-7) and [RT10.POPGRP = 7, 8, 07 or 08]) OR 
            (ITEM = 8 and [RT10.POPGRP = 15 or 16])
             then goto CLBSTORE

          ELSE goto MORE

IF anything other than a 'C' or the enter key is entered
    then goto CK_C	
18A	CLOCMBD	COMBCODE	 40    ? [F1] 

     What (is/other clothing services is) (Item Description) combined with?

       Enter all that apply, separate with commas.

       Description   Month      Amount
       CLODESCD)    (CLOTHMOD) (CLSRVCX)

1. Purchase of any suits or tuxedos for men, 16 or older
2. Purchase of any watches
3. Purchase of any Jewelry
4. Shoe repair or other shoe services
5. Watch or jewelry repair
6. Repairs, alterations, or tailoring for clothing or accessories
7. Rental of any clothing or accessories, including tuxedos.
8. Storage outside the home, just for clothing
77. Misc. combined (unable to specify/ DK)	IF (ITEM = 1 and [RT10.POPGRP = 5, 6, 05 or 06]) or
   ((ITEM = 2-7) and [RT10.POPGRP = 7, 8, 07 or 08]) or
   (ITEM = 8 and [RT10.POPGRP = 15 or 16])
      then goto CLBSTORE

ELSE goto MORE	
18A	CLBSTORE	CLBSTORE	What is the name of the business where you had this expense?
 
              Enter store, website, or company name.
 	IF uppercase entry = 'GROUPON' or 'GROUPON.COM' then 
   goto ERR_GROUPON

ELSEIF UPPERCASE ENTRY contains '.COM' then goto MORE

ELSEIF ENTRY = DK or RF then goto MORE

ELSE goto CLBPURCH	
18A	CLBPURCH	CLBPURCH	Was this paid for - 

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  Goto MORE

2: Goto CLBLOC	
18A	CLBLOC	CLBLOC	In what city is (Store Description) located?	Goto CLBLOCST	
18A	CLBLOCST	CLBLOCST	? [F1]

In what state is (Store Description) located?

                    Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_CLBLOCST

ELSE goto MORE	
18A	CLOMORED	MORE	Did you have any other expenses for (Clothing Service Description)?

    Description   Month      Amount
    (CLODESCD)    (CLOTHMOD) (CLSRVCX)

1. Yes
2. No	1:    IF ROW number = 15 then goto ERR_MAX
      ELSE goto ITEM next row in the table

2,DK,RF:   IF ROW number = 15 then goto S18A_END
           ELSE goto ITEM next row in the table	
18A		S18A_END		Exit block and goto ADLTCLOX	
18A		ITEMCODEOUT			
18A		CLOTHD1			
18A		CLOTHD2			
18A		CLOTHD3			
18A		CLOTHD4			
18A		CLOTHD5			
18A		CLOTHD6			
18A		CLSRVCX_			
18A		CLD_STAT			
18A		CLD_ORIG			
18B	ADLTCLOX	ADLTCLOX	Now I am going to ask about clothing, footwear, and accessory expenses for your household.
 
Since the first of (reference month), how much (have/has) (you/your household) spent on ALL OTHER clothing, footwear, and accessories for (yourself/the following people in your household)?
 
(Names of person 18+)	IF ADLTCLOX = 1-4 or ADLTCLOX > 2500 then goto ERR1_ADLTCLOX
ELSEIF HHCount17 > 0 then goto CHLDCLOX
ELSE goto CLOGFTX	
18B	CHLDCLOX	CHLDCLOX	Since the first of (reference month), how much (have/has) (you/your household) spent on ALL OTHER clothing, footwear, and accessories for (Childs name/the following people in your household)?
 
(Names of person 0-17)	IF CHLDCLOX = 1-4 or CHLDCLOX > 1000 then goto ERR1_CHLDCLOX

ELSE goto CLOGFTX	
18B	CLOGFTX	CLOGFTX	Since the first of (reference month), how much (have/has) (you/your household) spent on ALL OTHER clothing, footwear, and accessories for those outside of your household?	IF CLOGFTX = 1-4 or CLOGFTX > 1000 then goto ERR1_CLOGFTX

ELSE goto S18_SectComp	
		HHCount17			
18B		ADLT_LOX			
18B		CHLD_LOX			
18B		CLOGFTX_			
18B		REC_STAT			
18B		REC_ORIG			
18A		LP18A_Flag	

1. Yes
2. No		
18		S18_SectComp		Exit block and goto Section 19 - BSECT19	
19A	S19A_INTRO	S19A_INTRO	Now I am going to ask about miscellaneous expenses which have not been collected anywhere
else in this survey.  Please remember to include any payments you made online or had 
automatically deducted.  Also, please include any shipping and handling charges with the cost of any item that was shipped.

             Description    Amount       Month   
            (MISCDESC)     (MISCEXPX)   (MISCMO)    

1. Enter 1 to Continue	Goto BTableA.Brow.ITEM	
19A	MIS_ITEM	ITEM	Screen 1 ------------------------------------------------------------

 41    ? [F1]

Since the first of (reference month), have (you/you or any members of your household) had expenses for any of the
following, either for (you/your household) or for someone outside your household?

         Read each item on list.
 
SCREEN 2 ------------------------------------------------------------------

 42    ? [F1]

Have (you/you or any members of your household) had expenses for --

          Read each item on list.
            Do not include pet food.  It is a Diary-only item.

1. Fresh flowers or potted plants?
2. Professional photography?
3. Services of lawyers or other legal professionals?
4. Accounting fees?
5. Occupational expenses, such as union dues or professional licenses?
6. Gardening or lawn care services?
7. Housekeeping services?
8. Home security system service fees?
9. Other home services or small repair jobs around the house, not previously reported?
10. Moving, storage, or freight?
11. Stamp or coin collecting?
12. Lotteries or games of chance?
13. Babysitting, nanny services, or other child care inside or outside of your home?
14. Toys or games?
15. Arts or crafts kits?
16. Sewing, knitting, or quilting materials and items?
17. Purchase of pets, pet supplies, or medicine for pets?   Do not include pet food.
18. Pet services?
19. Veterinarian expenses for pets?
20. Catering?
21. Arrangement of live entertainment for special occasions?
22. Rental of party supplies?
23. Purchase or upkeep of cemetery lots or vaults?
24. Funerals, burials, or cremation?
95. Continue List
99. None/No more entries
888. Delete the line	1-24:    IF ITEM ne Item2Shadow then goto CK_ITEM
         ELSE goto DESCRIPTION

95:     Goto ITEM - next line of grid

99:     Goto S19A_END

888:    IF no more grid lines then goto S19A_END
        ELSE goto ITEM - next line of grid	
19A		PreFill	** SHOW ONLY **		
19A	MISCDESC	DESCRIPTION	What was the expense for?

            Description     Amount      Month 
            (MISCDESC)     (MISCEXPX)  (MISCMO)	Goto MONTH	
19A	MISCMO	MONTH	In what month did you have this expense?

(*  Enter 13 for same amount each month of the reference period)

            Description    Amount       Month   
            (MISCDESC)     (MISCEXPX)   (MISCMO)    

1. January
2. February
3. March
4. April
5. May
6. June
7. July
8. August
9. September
10. October
11. November
12. December
13. ^S19A_13Option	REF_MONTH - CUR_MONTH:  IF month not in the reference period 
                           then goto ERR3_MONTH
                        ELSE goto WHO

13:  IF ITEM = 2, 9, 11, 14-16, 20-22 then goto CK_MONTH
     ELSE goto WHO

DK,RF:     Goto WHO	
19A	MISCGFTC	WHO	Was this expense for someone inside or outside your household?                 

            Description    Amount       Month   
            (MISCDESC)     (MISCEXPX)   (MISCMO)         

1. For household
2. For someone outside your household	Goto AMOUNT	
19A	MISCEXPX	AMOUNT	(What was the total amount of this expense?/What is your monthly expense?)

(*  Do not include legal fees related to real estate closing costs reported in Section 3./  )     

    Description    Amount       Month   
    (MISCDESC)     (MISCEXPX)   (MISCMO)    	1-999999:   IF (ITEM = 1 and (AMOUNT < 5 or AMOUNT > 1000))
              or (ITEM = 2 and (AMOUNT < 8 or AMOUNT > 5000)) 
              or (ITEM = 3 and (AMOUNT < 13 or AMOUNT > 5000))
              or (ITEM = 4 and (AMOUNT < 25 or AMOUNT > 1800))
              or (ITEM = 5 and (AMOUNT < 3 or AMOUNT > 900)) 
              or (ITEM = 6 and (AMOUNT < 15 or AMOUNT > 600))
              or (ITEM = 7 and (AMOUNT < 20 or AMOUNT > 1260))
              or (ITEM = 8 and (AMOUNT < 10 or AMOUNT > 300))
              or (ITEM = 9 and (AMOUNT < 5 or AMOUNT > 557))
              or (ITEM = 10 and (AMOUNT < 9 or AMOUNT > 1800))
              or (ITEM = 11 and AMOUNT > 1300) 
              or (ITEM = 12 and AMOUNT > 600) 
              or (ITEM = 13 and (AMOUNT < 10 or AMOUNT > 10700))
              or (ITEM = 14 and (AMOUNT < 2 or AMOUNT > 550))
              or (ITEM = 15 and (AMOUNT < 6 or AMOUNT > 800)) 
              or (ITEM = 16 and (AMOUNT < 5 or AMOUNT > 214))
              or (ITEM = 17 and (AMOUNT < 3 or AMOUNT > 800))
              or (ITEM = 18 and (AMOUNT < 8 or AMOUNT > 700))
              or (ITEM = 19 and (AMOUNT < 12 or AMOUNT > 3000))
              or (ITEM = 20 and (AMOUNT < 14 or AMOUNT > 6840))
              or (ITEM = 21 and (AMOUNT < 14 or AMOUNT > 7000))
              or (ITEM = 22 and (AMOUNT < 14 or AMOUNT > 7000))
              or (ITEM = 23 and (AMOUNT < 10 or AMOUNT > 3208))
              or (ITEM = 24 and (AMOUNT < 5 or AMOUNT > 9000)) 
               then goto ERR1_AMOUNT
          ELSEIF MISCCODE and the entry in AMOUNT for this
                  record are equal to any records data on the
                  prechart/input AND (that prechart records 
                  MISCMO does not equal 13) then goto ERR_DUP
         ELSEIF ITEM = 14-24 then goto C
         ELSEIF (ITEM = 1 and (VAL(Rt10.POPGRP = 3 or 4))) OR
                (ITEM = 2 and (VAL(Rt10.POPGRP = 5 or 6))) OR
                ((ITEM = 3, 6, 7, or 10) and (VAL(Rt10.POPGRP = 1               
                  or 2)) OR (ITEM = 4 and (Rt10.POPGRP = 11 or 12)) 
                 then goto MISSTORE
         ELSE goto MORE

DK,RF:   IF ITEM = 14-24 then goto C
         ELSEIF (ITEM = 1 and (VAL(Rt10.POPGRP = 3 or 4))) OR
                (ITEM = 2 and (VAL(Rt10.POPGRP = 5 or 6))) OR
                ((ITEM = 3, 6, 7, or 10) and (VAL(Rt10.POPGRP = 1
                  or 2)) OR (ITEM = 4 and (Rt10.POPGRP = 11 or 12)) 
                  then goto MISSTORE
         ELSE goto MORE	
19A	S19ACM_S	C	  Enter a 'C' for a combined expense.	C:    Goto CombCode

EMPTY:   IF ((ITEM = 14, 15, 23 or 24) and (RT800.POPGRP = 
             1, 2, 01 or 02) OR 
            (ITEM = 16 and (RT10.POPGRP = 13 or 14)) OR
            (ITEM = 17 and (RT10.POPGRP = 11 or 12)) OR
            ((ITEM = 18 or 19) and (RT10.POPGRP = 9, 10 
             or 09)) OR
            (ITEM = 20 and (RT10.POPGRP = 15 or 16)) then
                goto MISSTORE
          ELSE goto MORE

IF anything other than a 'C' or the Enter key is entered then goto CK_C	
19A	S19ACMB	CombCode	 42    ? [F1]

What other expense is the (description) combined with? 

        Enter all that apply, separate with commas.

            Description    Amount       Month   
            (MISCDESC)     (MISCEXPX)   (MISCMO)    

14. Toys or games
15. Arts or craft kits
16. Sewing, knitting, or quilting materials and items
17. Purchase of pets, pet supplies, or medicine for pets; Do not include pet food
18. Pet services
19. Veterinary expenses for pets
20. Catering
21. Arrangement of live entertainment for special occasions
22. Rental of party supplies
23. Purchase or upkeep of cemetery lots or vaults
24. Funerals, burials, or cremations	IF ((ITEM = 14, 15, 23 or 24) and (RT10.POPGRP = 1, 2, 01
    or 02) OR (ITEM = 16 and (RT10.POPGRP = 13 or 14)) OR
   (ITEM = 17 and (RT10.POPGRP = 11 or 12)) OR
   ((ITEM = 18 or 19) and (RT10.POPGRP = 9, 10 or 09)) OR
   (ITEM = 20 and (RT10.POPGRP = 15 or 16)) then 
      goto MISSTORE 

ELSE goto MORE	
19A	MISSTORE	MISSTORE	What is the name of the business where you had this expense?

           Enter store, website, or company name
 	IF uppercase entry = 'GROUPON' or 'GROUPON.COM' then goto 
   ERR_GROUPON

ELSEIF UPPERCASE ENTRY contains '.COM' then goto MORE

ELSEIF ENTRY = DK or RF then goto MORE

ELSE goto MISPURCH	
19A	MISPURCH	MISPURCH	Was this paid for - 

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  Goto MORE

2: Goto MISLOC	
19A	MISLOC	MISLOC	In what city is ^MISSTORE_fill located?	Goto MISLOCST	
019A	MISLOCST	MISLOCST	? [F1]

In what state is ^MISSTORE_fill located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then goto CK_MISLOCST

ELSE goto MORE	
19A	MISCMORE	MORE	Did you have any other expenses for (description)?

            Description    Amount       Month   
            (MISCDESC)     (MISCEXPX)   (MISCMO)    

1. Yes
2. No	1:       IF ROW number = 43 then goto ERR_MAX
         ELSE goto ITEM, next line of grid

2,DK,RF:    IF ROW number = 43 then goto S19A_END
            ELSE goto ITEM, next line of grid	
19A		S19A_END		Goto S19ALP_Flags	
19A		MISCCODE			
19A		MISCODE1			
19A		MISCODE2			
19A		MISCODE3			
19A		MISC_XPX			
19A		MIS_STAT			
19A		MIS_ORIG			
		S19A_END	

1. Yes
2. No		
19B	S19B_INTRO	S19B_INTRO	Now I am going to ask about payments and contributions to persons outside of your household.

       Description   Month     Amount    
       (CONTDESC)    (CONTMO)  (CONTEXPX)

1. Enter 1 to Continue	Goto BSECT19.BTABLEB.BROW.ITEM	
19B	CNT_ITEM	ITEM	 43    ? [F1]

SCREEN 1 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

Since the first of (reference month), have (you/you or any members of your household) given any money by cash, checks,
or given any gift cards to . . .

       Read each item on list

SCREEN 2 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

Since the first of (reference month), have (you/you or any members of your household) paid any of the following . . .   

      Read each item on list

SCREEN 3 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

Since the first of (reference month), have (you/you or any members of your household) given any money by cash, checks,
money orders, or credit cards to benefit . . .

       Read each item on list  

SCREEN 4 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

Since the first of (reference month), have (you/you or any members of your household) given any . . .

       Read item on list

1. College students living away from home?
2. Any other people not in your household, such as friends, co-workers, or homeless persons?
3. Child support?
4. Alimony?
5. Educational institutions?
6. Political organizations?
7. Religious organizations, including churches, temples and mosques?
8. Charities or other organizations?
9. Stocks, bonds, or mutual funds to persons or organizations outside of your household?
95. Continue list
99. None/No more entries
888. Delete the line	1-9:    IF ITEM <> Item2Shadow then goto CK_ITEM
        ELSE goto DESCRIPTION

95:     Goto next row

99:     Goto S19B_END

888:   IF no more grid lines then goto S19B_END
       ELSE goto ITEM - next line of grid	
19B		PreFill	** SHOW ONLY **		
19B	CONTDESC	DESCRIPTION	What was the (payment/contribution) for?

        Description   Month    Amount
       (CONTDESC)    (CONTMO) (CONTEXPX)	Goto MONTH	
19B	CONTMO	MONTH	In what month (did you make the payment/did you make the contribution)?

    (did you make the payment/did you make the contribution)2

        Description   Month    Amount
       (CONTDESC)    (CONTMO) (CONTEXPX)

1. January
2. February
3. March
4. April
5. May
6. June
7. July
8. August
9. September
10. October
11. November
12. December
13. ^CONTMO_Fill13	REF_MONTH-CUR_MONTH:  IF entry is not within the reference
                           period then goto ERR3_MONTH
                      ELSE goto AMOUNT

13,DK,RF:    Goto AMOUNT	
19B	CONTEXPX	AMOUNT	(What was the total amount of the (payment/contribution)/What is the monthly (payment/contribution))?

   Description   Month    Amount
   (CONTDESC)    (CONTMO) (CONTEXPX)	1-999999:  IF (ITEM = 1 and (AMOUNT < 20 or AMOUNT > 3000)) OR  
              (ITEM = 2 and (AMOUNT < 5 or AMOUNT > 2300)) OR
              (ITEM = 3 and (AMOUNT < 55 or AMOUNT > 3600)) OR
              (ITEM = 4 and (AMOUNT < 40 or AMOUNT > 8000)) OR
              (ITEM = 5 and (AMOUNT < 5 or AMOUNT > 1500)) OR
              (ITEM = 6 and (AMOUNT < 5 or AMOUNT > 1000)) OR
              (ITEM = 7 and (AMOUNT < 10 or AMOUNT > 2300)) OR
              (ITEM = 8 and (AMOUNT < 5 or AMOUNT > 1000)) OR
              (ITEM = 9 and (AMOUNT < 5 or AMOUNT > 10000)) 
           then goto ERR1_AMOUNT
        ELSEIF CONTCODE and the entry in AMOUNT for this
                record are equal to any records data on the
                pre-chart/input AND (that prechart records 
                CONTMO does not equal 13) then goto ERR_DUP
        ELSE goto MORE

DK,RF:  Goto MORE	
19B	CONTMORE	MORE	Did you (make any other (payments/contributions) (expenditure description))?

   Description   Month    Amount
   (CONTDESC)    (CONTMO) (CONTEXPX)

1. Yes
2. No	1:    IF Row number = 43 then goto ERR_MAX
      ELSE goto ITEM, next line in grid

2,DK,RF:   IF Row number = 43 then goto S19B_END
           ELSE goto ITEM, next line in grid	
19B		S19B_END		Exit block and goto S19_Sectcomp	
19B		ITEMCODEOUT			
19B		CONT_XPX			
19B		CNT_STAT			
19B		CNT_ORIG			
		S19B_END	

1. Yes
2. No		
19A		LP19A_Flag	

1. Yes
2. No		
19B		S19_Sectcomp		Goto section 20A - BSECT20	
20A	GROCWEKX	GROCWEKX	 44

Now I am going to ask about expenses for food, beverages and other items (you/your household) (have/has) purchased since the first of (reference month).

What has been (you/your household) usual WEEKLY expense for grocery shopping?  

       Include grocery home delivery service fees and drinking water delivery fees.	0,DK,RF:  Goto OTHSTOR

1-9999:  IF GROCWEKX > 550 then goto ERR1_GROCWEKX
         ELSE OTHSTUFX	
20A	OTHSTUFX	OTHSTUFX	About how much of this amount was for nonfood items, such as paper
products, detergents, home cleaning supplies, pet foods, and alcoholic
beverages?	0-9999:  IF OTHSTUFX > 200 then goto ERR1_OTHSTUFX
         ELSEIF OTHSTUFX > GROCWEKX then goto CK_OTHSTUFX
         ELSEIF (Rt10.POPGRP = 1-16 or 01-09) then goto GROSTORE
         ELSE goto OTHSTOR

DK,RF: IF (Rt10.POPGRP = 1-16 or 01-09) then goto GROSTORE 
       ELSE goto OTHSTOR	
20A	GROSTORE	GROSTORE	What is the name of the business where (you/your household) last purchased groceries?

           Enter store, website, or company name
 	ENTRY:  IF UPPERCASE ENTRY contains ".COM" then goto OTHSTOR
        ELSE goto GROPURCH

DK,RF: Goto OTHSTOR	
20A	GROPURCH	GROPURCH	Were they paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  Goto OTHSTOR

2: Goto GROLOC	
20A	GROLOC	GROLOC	In what city is (Grocery store name) located?	Goto GROLOCST	
20A	GROLOCST	GROLOCST	? [F1]

In what state is (Grocery store name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then
   goto CK_GROLOCST

ELSE goto OTHSTOR	
20A	OTHSTOR	OTHSTOR	Other than your regular grocery shopping already reported, have (you/you or any members of your household) purchased any food or nonalcoholic beverages from places such as grocery stores, convenience stores, specialty stores, home delivery, or farmer's markets?

1. Yes
2. No	1:         Goto OSTORWKX

2,DK,RF:    Goto DINE_WKX	
20A	OSTORWKX	OSTORWKX	What was your usual WEEKLY expense at these places?	0-9999:   IF OSTORWKX < 5 or OSTORWKX > 199 then goto ERR1_OSTORWKX
          ELSE goto DINE_WKX

DK,RF:   Goto DINE_WKX	
20A	DINE_WKX	DINE_WKX	What has been (your/your household's) usual WEEKLY expense for meals or snacks from restaurants, fast food places, cafeterias, carryouts or other such places?  (Do not include meals purchased at school./  )	1-9999: IF DINE_WKX = 1-10 or DINE_WKX > 250 then goto ERR1_DINEWKX
        ELSE goto CIGARETT

0,DK,RF: Goto CIGARETT	
20A	CIGARETT	CIGARETT	Since the first of (reference month), have (you/you or any members of your household) purchased cigarettes?
 Do not include e-cigarettes.

1. Yes
2. No	1:         Goto CIGARETX

2,DK,RF:   Goto OTHTOBAC	
20A	CIGARETX	CIGARETX	What is the usual WEEKLY expense for cigarettes?	0-999:   IF CIGARETX < 5 or CIGARETX > 299 then goto ERR1_CIGARETX
         ELSEIF Rt10.POPGRP = 11 or 12 then goto CIGSTORE
         ELSE goto OTHTOBAC

DK,RF:   IF Rt10.POPGRP = 11 or 12 then goto CIGSTORE  
         ELSE goto OTHTOBAC	
20A	CIGSTORE	CIGSTORE	What is the name of the business where they were purchased?

           Enter store, website, or company name
 	ENTRY:   IF UPPERCASE ENTRY contains ".COM" then 
            goto OTHTOBAC
         ELSE goto CIGPURCH

DK, RF:   Goto OTHTOBAC	
20A	CIGPURCH	CIGPURCH	Were they paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  Goto OTHTOBAC

2: Goto CIGLOC	
20A	CIGLOC	CIGLOC	In what city is (Store name) located?	Goto CIGLOCST	
20A	CIGLOCST	CIGLOCST	? [F1]

In what state is (Store name) located?

         Enter the two character state aabreviation	IF entry is not a valid state abbreviation then
   goto CK_CIGLOCST

ELSE goto OTHTOBAC	
20A	OTHTOBAC	OTHTOBAC	   44    ? [F1]

Have (you/you or any members of your household) purchased other tobacco products such as cigars, pipe tobacco, chewing tobacco, or vaping products?      

1. Yes
2. No	1:        Goto OTHTBACX

2,DK,RF:   Goto ALC_HOMX	
20A	OTHTBACX	OTHTBACX	? [F1]

What is the usual WEEKLY expense?	0-999:   IF OTHTBACX < 5 or OTHTBACX > 80 then goto ERR1_OTHTBACX
         ELSEIF Rt10.POPGRP = 11 or 12 then goto TOBSTORE
         ELSE goto ALC_HOMX

DK,RF:   IF Rt10.POPGRP = 11 or 12 then goto TOBSTORE
         ELSE goto ALC_HOMX	
20A	TOBSTORE	TOBSTORE	What is the name of the business where they were purchased?

           Enter store, website, or company name
 	ENTRY:   IF UPPERCASE ENTRY contains ".COM" then 
            goto ALC_HOMX
         ELSE goto TOBPURCH

DK, RF:   Goto ALC_HOMX	
20A	TOBPURCH	TOBPURCH	Were they paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  Goto ALC_HOMX

2: Goto TOBLOC	
20A	TOBLOC	TOBLOC	In what city is (Store name) located?	Goto TOBLOCST	
20A	TOBLOCST	TOBLOCST	? [F1]

In what state is (Store name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then
   goto CK_TOBLOCST

ELSE goto ALC_HOMX	
20A	ALC_HOMX	ALC_HOMX	What has been (your/your household's) usual MONTHLY expense for alcohol, including beer and wine to be served at home?	0-9999:  IF ALC_HOMX = 2 or ALC_HOMX > 999 then goto ERR1_ALCHOMX
         ELSE goto ALC_OUTX

DK,RF:   Goto ALC_OUTX	
20A	ALC_OUTX	ALC_OUTX	What has been your usual MONTHLY expense for alcohol, including beer and wine at restaurants, bars and recreational events?	1-9999:   IF ALC_OUTX = 2 or ALC_OUTX > 400 then goto ERR1_ALCOUTX
          ELSEIF any "active" CU member has AGE < 22 then 
                goto ANYMEALS
          ELSE goto S20A_END

0,DK,RF: IF any "active" CU member has AGE < 22 then 
            goto ANYMEALS
         ELSE goto S20A_END	
20A	ANYMEALS	ANYMEALS	Since the first of (reference month), not including (current month), have (you/you or any members of your household) purchased any meals at school for preschool through high school age children?

1. Yes
2. No	1:   Goto FBPERSN

2,DK,RF:   Goto 20A_END	
20A	FBPERSON	FBPERSON	What are the names of all household members who purchased meals at school?

          Enter line numbers for all that apply, separate with commas.

1. Person 1
2. Person 2
3. Person 3
4. Person 4
5. Person 5
6. Person 6
7. Person 7
8. Person 8
9. Person 9
10. Person 10
11. Person 11
12. Person 12
13. Person 13
14. Person 14
15. Person 15
16. Person 16
17. Person 17
18. Person 18
19. Person 19
20. Person 20
21. Person 21
22. Person 22
23. Person 23
24. Person 24
25. Person 25
26. Person 26 
27. Person 27
28. Person 28
29. Person 29
30. Person 30	Goto TblSCHMEAL	
20A		MEM_NAME	** SHOW ONLY **		
20A	SCHLMLX	SCHLMLX	Since the first of (reference month), not including (current month), what has been the usual expense for the meals (Name) purchased at school?

         Select time period on the next screen.	Goto SCHMLPD	
20A	SCHLMLPD	SCHLMLPD	  Specify time period

1. Day
2. Week
3. Two Weeks
4. Month
5. Quarterly (every 3 months)
6. Other	1:     IF SCHLMLX > 10 goto ERR1_SCHLMLPD
       ELSE goto SCHMLWKQ

2:     IF SCHLMLX < 5 or SCHLMLX > 30 goto ERR1_SCHLMLPD
       ELSE goto SCHMLWKQ

3:     IF SCHLMLX < 5 or SCHLMLX > 60 go to ERR1_SCHLMLPD
       ELSE goto SCHMLWKQ

4:     IF SCHLMLX < 5 or SCHLMLX > 120 goto ERR1_SCHLMLPD
       ELSE goto SCHMLWKQ

5:     IF SCHLMLX < 5 or SCHLMLX > 400 goto ERR1_SCHLMLPD
       ELSE goto SCHMLWKQ

6:  Goto SCHLMLRX 

DK,RF:  Goto SCHMLWKQ	
20A	SCHLMLRX	SCHLMLRX	How much was paid since the first of (reference month), not including this month?
 	IF SCHLMLRX = 1 or 2 or SCHLMLRX > 90 then goto ERR1_SCHLMLRX

ELSE goto SCHMLWKQ	
20A	SCHMLWKQ	SCHMLWKQ	How many WEEKS did (Name) purchase meals?	IF no more persons then goto S20_END
ELSE goto SCHLMLX for next person	
20A		MEMBNUM			
20A		ERR1_SCHLMLPD	

1. Passed
2. Hard
3. Soft
4. Suppressed		
20A		ERR1_SCHLMLRX	

1. Passed
2. Hard
3. Soft
4. Suppressed		
20A		SML_ORIG			
20A		SML_STAT			
20A		SCHLMLX			
		SCHLMLPD	

1. Day
2. Week
3. Two Weeks
4. Month
5. Quarterly (every 3 months)
6. Other		
20A		SCHLMLRX	
 		
		SCHMLWKQ			
		SCHL_LPD			
20A		SCHL_LRX	
 		
20A		MEMBNUM			
20A		S20A_END			
20A		GROC_EKX			
20A		OTHS_UFX			
20A		OSTO_WKX			
20A		ALC__UTX			
20A		DINE0WKX			
20A		CIGA_ETX			
20A		OTHT_ACX			
20A		ALC__OMX			
20A		XPA_STAT			
20A		XPA_ORIG			
20B	LNDROMAT	LNDROMAT	 44    ? [F1]

Since the first of (reference month), not including (current month) have (you/you or any members of your household) had any expenses for self-service laundry machines?

1. Yes
2. No	1:       Goto LNDRYX

2,DK,RF:    Goto DRYCLEAN	
20B	LNDRYX	LNDRYX	? [F1]

What was the total cost?	IF LNDRYX < 5 or LNDRYX > 260 then goto ERR1_LNDRYX

ELSEIF Rt10.POPGRP = 15 or 16 then goto LNDSTORE

ELSE goto OTHLNDRY	
20B	LNDSTORE	LNDSTORE	What is the name of the business where (you/your household) last paid for self-service laundry machines?

           Enter store or company name
 	ENTRY:   Goto LNDRYLOC

DK, RF:   Goto OTHLNDRY	
20B	LNDRYLOC	LNDRYLOC	In what city is (Laundromat Name) located?	Goto LDYLOCST	
20B	LDYLOCST	LDYLOCST	? [F1]

In what state is (Laundromat Name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then
   goto CK_LDYLOCST

ELSE goto OTHLNDRY	
20B	OTHLNDRY	OTHLNDRY	Was any of this amount for items other than clothes, such as linens or drapes?

1. Yes
2. No	1:          Goto OTHLNDRX

2,DK,RF:     Goto DRYCLEAN	
20B	OTHLNDRX	OTHLNDRX	 ? [F1]

How much?	0-9999:  IF OTHLNDRX < 5 or OTHLNDRX > 100 then goto ERR1_OTHLNDRX
         ELSEIF OTHLNDRX > LNDRYX then goto CK_OTHLNDRX
         ELSE goto DRYCLEAN

DK,RF:      Goto DRYCLEAN	
20B	DRYCLEAN	DRYCLEAN	 44    ? [F1]   

Have (you/you or any members of your household) had any expenses for dry cleaning or laundry service?

1. Yes
2. No	1:         Goto DRYCLNX

2,DK,RF:   Goto SALONS	
20B	DRYCLNX	DRYCLNX	 ? [F1]

What was the total cost?	1-9999:  IF DRYCLNX < 6 or DRYCLNX > 390 then goto ERR1_DRYCLNX
         ELSEIF Rt10.POPGRP = 15 or 16 then goto DRYSTORE
         ELSE goto OTHDRCLN

DK,RF: IF RTt0.POPGRP = 15 or 16 then goto DRYSTORE 
       ELSE goto OTHDRCLN	
20B	DRYSTORE	DRYSTORE	What is the name of the business where (you/your household) last paid for dry cleaning or laundry services?

           Enter store, website, or company name
 	ENTRY:  IF UPPERCASE ENTRY contains ".COM" then goto OTHDRCLN
        ELSE goto DRYPURCH

DK,RF: Goto OTHDRCLN	
20B	DRYPURCH	DRYPURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  Goto OTHDRCLN

2: Goto DRYLOC	
20B	DRYLOC	DRYLOC	In what city is (Dry cleaner name) located?	Goto DRYLOCST	
20B	DRYLOCST	DRYLOCST	? [F1]

In what state is (Dry cleaner name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then
   goto CK_DRYLOCST

ELSE goto OTHDRCLN	
20B	OTHDRCLN	OTHDRCLN	Was any of this amount for items other than clothes, such as linens, drapes, or rugs?

1. Yes
2. No	1:   Goto OTHDCLNX

2,DK,RF:    Goto SALONS	
20B	OTHDCLNX	OTHDCLNX	 ? [F1]

How much?	1-9999: IF OTHDCLNX < 5 or OTHDCLNX > 200 then goto ERR1_OTHDRCLNX
        ELSEIF OTHDCLNX > DRYCLNX then goto CK_OTHDCLNX
        ELSE goto SALONS

DK,RF:  Goto SALONS	
20B	SALONS	SALONS	 44    ? [F1]

Since the first of (reference month), not including (current month) have (you/you or any members of your household) had any expenses for haircutting, styling, attached hair pieces, manicures, massages or other salon services? 

1. Yes
2. No	1:   Goto SALONX

2,DK,RF:  Goto WIGS	
20B	SALONX	SALONX	 ?   [F1]

What was the total expense for these services since the first of (reference month), not including (current month)?	0-9999:   IF SALONX = 1-3 or SALONX > 998 then goto ERR1_SALONX
          ELSEIF Rt10.POPGRP = 13 or 14 then goto SALNNAME
          ELSE goto WIGS

DK,RF:  IF RTt0.POPGRP = 13 or 14 then goto SALNNAME
        ELSE goto WIGS	
20B	SALNNAME	SALNNAME	What is the name of the business where (you/you or any members of your household) paid for salon services?

           Enter name of establishment, not name of salon technician
 	RESPONSE:  IF uppercase entry = "GROUPON" or "GROUPON.COM" 
                 then goto ERR_GROUPON 
           ELSEIF UPPERCASE ENTRY contains ".COM" then 
                  goto WIGS
           ELSE goto SALPURCH

DK,RF:  Goto WIGS	
20B	SALPURCH	SALPURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  Goto WIGS

2: Goto SALNLOC	
20B	SALNLOC	SALNLOC	In what city is ^SALNNAME_fill located?	Goto SALLOCST	
20B	SALLOCST	SALLOCST	? [F1]

In what state is ^SALNNAME_fill located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then
   goto CK_SALLOCST

ELSE goto WIGS	
20B	WIGS	WIGS	 44    ? [F1]

Since the first of (reference month), not including (current month) have (you/you or any members of your household) had any expenses for removable hairpieces, wigs or toupees?

1. Yes
2. No	1:        Goto WIGSX

2,DK,RF:    Goto SAFEDPST	
20B	WIGSX	WIGSX	? [F1]

What was the total expense for these items since the first of (reference month), not including (current month)?	0-9999:   IF WIGSX = 1-5 or WIGSX > 300 then goto ERR1_WIGSX
          ELSE goto SAFEDPST

DK,RF:  Goto SAFEDPST	
20B	SAFEDPST	SAFEDPST	Have (you/you or any members of your household) had any expenses for the rental of a safe deposit box located in a bank or similar financial institution?

1. Yes
2. No	1:  Goto SAFDPSTX

2,DK,RF:   Goto BANKSRVC	
20B	SAFDPSTX	SAFDPSTX	What was the total rental expense for the safe deposit box since the first of (reference month), not including (current month)?	1-999:    IF SAFDPSTX > 100 then goto ERR1_SAFEDPSTX
          ELSEIF Rt10.POPGRP = 11 or 12 then goto SAFSTORE
          ELSE goto BANKSRVC

DK,RF:    IF Rt10.POPGRP = 11 or 12 then goto SAFSTORE  
          ELSE goto BANKSRVC	
20B	SAFSTORE	SAFSTORE	What is the name of the bank or institution?

           Enter bank or institution name
 	ENTRY:  IF UPPERCASE ENTRY contains '.COM' then goto BANKSRVC
        ELSE goto SAFPURCH

DK,RF: Goto BANKSRVC	
20B	SAFPURCH	SAFPURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  Goto BANKSRVC

2: Goto SAFDPLOC	
20B	SAFDPLOC	SAFDPLOC	In what city is (Bank or institution name) located?	Goto SAFLOCST	
20B	SAFLOCST	SAFLOCST	? [F1]

In what state is (Bank or institution name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then
   goto CK_SAFLOCST

ELSE goto BANKSRVC	
20B	BANKSRVC	BANKSRVC	 44    ? [F1]

Have (you/you or any members of your household) paid any charges or fees for bank services such as ATM or overdraft fees or account service charges from a bank or similar financial institution?  

1. Yes
2. No	1:  Goto BANKMOX

2,DK,RF:   Goto TXLIMSRV	
20B	BANKMOX	BANKMOX	? [F1]

What is the usual MONTHLY charge?	1-9999:  IF BANKMOX = 1 or BANKMOX > 300 then goto ERR1_BANKMOX
         ELSEIF Rt10.POPGRP = 11 or 12 then goto BNKNAME
         ELSE goto TXLIMSRV

DK,RF:  IF Rt10.POPGRP = 11 or 12 then goto BNKNAME
        ELSE goto TXLIMSRV	
20B	BNKNAME	BNKNAME	What is the name of the bank or institution?

           Enter bank or institution name
 	ENTRY:  IF UPPERCASE ENTRY contains '.COM' then goto TXLIMSRV
        ELSE goto BNKPURCH

DK,RF: Goto TXLIMSRV	
20B	BNKPURCH	BNKPURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  Goto TXLIMSRV

2: Goto BANKLOC	
20B	BANKLOC	BANKLOC	In what city is (Bank name) located?	Goto BNKLOCST	
20B	BNKLOCST	BNKLOCST	? [F1]

In what state is (Bank name) located?

         Enter the two character state abbeviation	IF entry is not a valid state abbreviation then 
   goto CK_BNKLOCST

ELSE goto TXLIMSRV	
20B	TXLIMSRV	TXLIMSRV	 44    ? [F1]

Since the first of (reference month) not including (current month), have (you/you or any members of your household) had expenses for taxis, limousine service, or car rides booked through an app?  Do not include expenses entirely reimbursed for business purposes or expenses incurred on a trip.

1. Yes
2. No	1:  Goto TXLIMX

2,DK,RF:   Goto MASSTRAN	
20B	TXLIMX	TXLIMX	? [F1]

What was the total expense?	IF TXLIMX < 5 or TXLIMX > 520 then goto ERR1_TXLIMX

ELSEIF Rt10.POPGRP = 11 or 12 then goto LIMO

ELSE goto MASSTRAN	
20B	LIMO	LIMO	Was the $^TXLIMX_fill solely for limousine service?  

1. Yes
2. No	1:  Goto MASSTRAN

2,DK,RF:   Goto TAXINAME	
20B	TAXINAME	TAXINAME	What is the name of the taxi company or ride service app that was used?

              If cost is for more than one company, enter only one	IF uppercase entry = 'GROUPON' or 'GROUPON.COM' then 
   goto ERR_GROUPON
           
ELSE goto TXIPURCH	
20B	TXIPURCH	TXIPURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  Goto MASSTRAN

2: Goto TAXILOC	
20B	TAXILOC	TAXILOC	In what city is (Cab company name/the company) located?	Goto TAXLOCST	
20B	TAXLOCST	TAXLOCST	? [F1]

In what state is (Cab company name/the company) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then
   goto CK_TAXLOCST

ELSE goto MASSTRAN	
20B	MASSTRAN	MASSTRAN	Do (you/you or any members of your household) pay out-of-pocket for public transportation services such as bus, subway, train, or passenger ferry?  

  Include all forms of public transportation

1. Yes
2. No	1:  IF Rt10.POPGRP = 11 or 12 then goto MASSNAME
    ELSEIF NUMHOUSE = 1 then goto TBLMSTRAN 
    ELSE goto TRANST

2,DK,RF:   Goto S20B_END	
20B	MASSNAME	MASSNAME	What is the name of the public transportation system?	IF NUMHOUSE = 1 then goto TBLMSTRAN
           
ELSE goto TRANSIT	
Section 20B	TRANST	TRANST	What are the names of all household members who use mass transit?

  Enter line numbers for all that apply, separate with commas

1. Person1
2. Person2
3. Person3
4. Person4
5. Person5
6. Person6
7. Person7
8. Person8
9. Person9
10. Person10
11. Person11
12. Person12
13. Person13
14. Person14
15. Person15
16. Person16
17. Person17
18. Person18
19. Person19
20. Person20
21. Person21
22. Person22
23. Person23
24. Person24
25. Person25
26. Person26
27. Person27
28. Person28
29. Person29
30. Person30	Goto TBLMSTRAN	
Section 20B		MEMBNO	** Non-Displayed**		
20A		MEM_NAME	** SHOW ONLY **		
Section 20B	TRANAMTX	TRANAMTX	What is (your/NAME's) usual out-of-pocket cost?

  Select time period (per day, week, or month) on next screen	1-9999:  Goto TRANPD

0,DK,RF:   Goto TRANSUB	
Section 20B	TRANPD	TRANPD	  Select time period

1. Day
2. Week
3. Month	1:  IF TRANAMTX > 10 then goto ERR1_TRANAMTX
    ELSE goto TRANDAYX

2:  IF TRANAMTX > 72 then goto ERR1_TRANAMTX
    ELSE goto AMTRAK

3,DK,RF:  IF TRANAMTX > 285 then goto ERR1_TRANAMTX
          ELSE goto AMTRAK	
Section 20B	TRANDAYX	TRANDAYX	How many days per week usually?	Goto AMTRAK	
Section 20B	AMTRAK	AMTRAK	Is any of the ^TRANAMTX_Fill^TRANPD_Fill Amtrak?

1. Yes
2. No	1:    Goto AMTRAKX

2,DK,RF:  Goto TRANSUB	
Section 20B	AMTRAKX	AMTRAKX	How much?

  Enter dollar amount ^TRANPD_Fill2	IF AMTRAKX > TRANAMTX then goto CK_AMTRAKX

ELSE goto TRANSUB	
Section 20B	TRANSUB	TRANSUB	Did (you/NAME) receive a transit subsidy?

1. Yes
2. No	1:         Goto TRANSUBX

2,DK,RF:   IF no more persons, exit block and goto S20B_END
           ELSE goto TRANAMTX for the next person	
Section 20B	TRANSUBX	TRANSUBX	What is the usual monthly amount?	0-9999:   IF TRANSUBX > 250 then goto ERR1_TRANSUBX
          ELSEIF no more persons, exit block and goto S20B_END
          ELSE goto TRANAMTX for the next person

DK,RF:  IF no more persons, exit block and goto S20B_END
        ELSE goto TRANAMTX for the next person	
Section 20B		TRAN_MTX			
Section 20B		TRAN_UBX			
20B		S20B_END		Exit block and goto 20C	
20B		LNDRYX_			
20B		OTHL_DRX			
20B		DRYCLNX_			
20B		OTHD_LNX			
20B		SALONX_			
20B		WIGSX_			
20B		SAFD_STX			
20B		BANKMOX_			
20B		TXLIMX_			
20B		XPB_STAT			
20B		XPB_ORIG			
		POP1_AskFlags			
20C	PGRP1_INTRO	PGRP1_INTRO	The next few questions are about expenses made by (you/you or anyone in your household) during the last five years, that is, as far back as (year, 5 years ago).  We have used the responses that you've already given us to shorten this part of the interview, so I'll only be asking you about expenses that you told me that you did not have in the last three months.

1. Enter 1 to Continue	IF Ask_R[22] = 1 then goto PSCATR22
ELSEIF Ask_R[21] = 1 then goto PSCATR21
ELSEIF Ask_H[29] = 1 then goto PSCATH29
ELSEIF Ask_H[27] = 1 then goto PSCATH27
ELSEIF Ask_R[16] = 1 then goto PSCATR16
ELSEIF Ask_R[15] = 1 then goto PSCATR15
ELSEIF Ask_H[40] = 1 then goto PSCATH40
ELSEIF Ask_H[38] = 1 then goto PSCATH38
ELSEIF Ask_H[28] = 1 then goto PSCATH28
ELSEIF Ask_R[14] = 1 then goto PSCATR14
ELSEIF Ask_H[39] = 1 then goto PSCATH39
ELSEIF Ask_R[12] = 1 then goto PSCATR12
ELSEIF Ask_R[13] = 1 then goto PSCATR13
ELSE goto END_POPGRP1	
20C	PSCATR22	PSCATR22	Now, please think about the last six months, since the first of (Month and Year, six month ago) have (you/you or anyone in your household) purchased any video game hardware, games, or accessories?

1. Yes
2. No	1:  Goto R22_COST

2,DK,RF:  IF Ask_R[21] = 1 then goto PSCATR21
          ELSEIF Ask_H[29] = 1 then goto PSCATH29
          ELSEIF Ask_H[27] = 1 then goto PSCATH27
          ELSEIF Ask_R[16] = 1 then goto PSCATR16
          ELSEIF Ask_R[15] = 1 then goto PSCATR15
          ELSEIF Ask_H[40] = 1 then goto PSCATH40
          ELSEIF Ask_H[38] = 1 then goto PSCATH38
          ELSEIF Ask_H[28] = 1 then goto PSCATH28
          ELSEIF Ask_R[14] = 1 then goto PSCATR14
          ELSEIF Ask_H[39] = 1 then goto PSCATH39
          ELSEIF Ask_R[12] = 1 then goto PSCATR12
          ELSEIF Ask_R[13] = 1 then goto PSCATR13
          ELSE goto END_POPGRP1	
20C	R22_COST	R22_COST	In the last SIX MONTHS, how much did (you/your household) spend on your last purchase of video game hardware, games, or accessories?	IF R22_COST < 8 or R22_COST > 450 then goto ERR1_R22COST

ELSE goto R22STORE	
20C	R22STORE	R22STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains '.COM' and is not a DK 
   or RF then goto R22PURCH

ELSEIF Ask_R[21] = 1 then goto PSCATR21
ELSEIF Ask_H[29] = 1 then goto PSCATH29
ELSEIF Ask_H[27] = 1 then goto PSCATH27
ELSEIF Ask_R[16] = 1 then goto PSCATR16
ELSEIF Ask_R[15] = 1 then goto PSCATR15
ELSEIF Ask_H[40] = 1 then goto PSCATH40
ELSEIF Ask_H[38] = 1 then goto PSCATH38
ELSEIF Ask_H[28] = 1 then goto PSCATH28
ELSEIF Ask_R[14] = 1 then goto PSCATR14
ELSEIF Ask_H[39] = 1 then goto PSCATH39
ELSEIF Ask_R[12] = 1 then goto PSCATR12
ELSEIF Ask_R[13] = 1 then goto PSCATR13
ELSE goto END_POPGRP1	
20C	R22PURCH	R22PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_R[21] = 1 then goto PSCATR21
              ELSEIF Ask_H[29] = 1 then goto PSCATH29
              ELSEIF Ask_H[27] = 1 then goto PSCATH27
              ELSEIF Ask_R[16] = 1 then goto PSCATR16
              ELSEIF Ask_R[15] = 1 then goto PSCATR15
              ELSEIF Ask_H[40] = 1 then goto PSCATH40
              ELSEIF Ask_H[38] = 1 then goto PSCATH38
              ELSEIF Ask_H[28] = 1 then goto PSCATH28
              ELSEIF Ask_R[14] = 1 then goto PSCATR14
              ELSEIF Ask_H[39] = 1 then goto PSCATH39
              ELSEIF Ask_R[12] = 1 then goto PSCATR12
              ELSEIF Ask_R[13] = 1 then goto PSCATR13
              ELSE goto END_POPGRP1

2:  Goto R22LOC	
20C	R22LOC	R22LOC	In what city is (Business Name) located?	Goto R22LOCST	
20C	R22LOCST	R22LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_R22LOCST

ELSEIF Ask_R[21] = 1 then goto PSCATR21
ELSEIF Ask_H[29] = 1 then goto PSCATH29
ELSEIF Ask_H[27] = 1 then goto PSCATH27
ELSEIF Ask_R[16] = 1 then goto PSCATR16
ELSEIF Ask_R[15] = 1 then goto PSCATR15
ELSEIF Ask_H[40] = 1 then goto PSCATH40
ELSEIF Ask_H[38] = 1 then goto PSCATH38
ELSEIF Ask_H[28] = 1 then goto PSCATH28
ELSEIF Ask_R[14] = 1 then goto PSCATR14
ELSEIF Ask_H[39] = 1 then goto PSCATH39
ELSEIF Ask_R[12] = 1 then goto PSCATR12
ELSEIF Ask_R[13] = 1 then goto PSCATR13
ELSE goto END_POPGRP1	
20C	PSCATR21	PSCATR21	(Now, please think about the last six months, since the first of (Six Months Ago)./In the last SIX MONTHS) have (you/you or anyone in your household) purchased any toys, games, hobby supplies, or playground equipment, excluding video games?

1. Yes
2. No	1:  Goto R21_COST

2,DK,RF:  IF Ask_H[29] = 1 then goto PSCATH29
          ELSEIF Ask_H[27] = 1 then goto PSCATH27
          ELSEIF Ask_R[16] = 1 then goto PSCATR16
          ELSEIF Ask_R[15] = 1 then goto PSCATR15
          ELSEIF Ask_H[40] = 1 then goto PSCATH40
          ELSEIF Ask_H[38] = 1 then goto PSCATH38
          ELSEIF Ask_H[28] = 1 then goto PSCATH28
          ELSEIF Ask_R[14] = 1 then goto PSCATR14
          ELSEIF Ask_H[39] = 1 then goto PSCATH39
          ELSEIF Ask_R[12] = 1 then goto PSCATR12
          ELSEIF Ask_R[13] = 1 then goto PSCATR13
          ELSE goto END_POPGRP1	
20C	R21_COST	R21_COST	In the last SIX MONTHS, how much did (you/your household) spend on your last purchase of toys, games, hobby supplies, or playground equipment?	IF R21_COST < 5 or R21_COST > 1200 then goto ERR1_R21COST

ELSE goto R21STORE	
20C	R21STORE	R21STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains '.COM' and is not a DK 
   or RF then goto R21PURCH

ELSEIF Ask_H[29] = 1 then goto PSCATH29
ELSEIF Ask_H[27] = 1 then goto PSCATH27
ELSEIF Ask_R[16] = 1 then goto PSCATR16
ELSEIF Ask_R[15] = 1 then goto PSCATR15
ELSEIF Ask_H[40] = 1 then goto PSCATH40
ELSEIF Ask_H[38] = 1 then goto PSCATH38
ELSEIF Ask_H[28] = 1 then goto PSCATH28
ELSEIF Ask_R[14] = 1 then goto PSCATR14
ELSEIF Ask_H[39] = 1 then goto PSCATH39
ELSEIF Ask_R[12] = 1 then goto PSCATR12
ELSEIF Ask_R[13] = 1 then goto PSCATR13
ELSE goto END_POPGRP1	
20C	R21PURCH	R21PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_H[29] = 1 then goto PSCATH29
              ELSEIF Ask_H[27] = 1 then goto PSCATH27
              ELSEIF Ask_R[16] = 1 then goto PSCATR16
              ELSEIF Ask_R[15] = 1 then goto PSCATR15
              ELSEIF Ask_H[40] = 1 then goto PSCATH40
              ELSEIF Ask_H[38] = 1 then goto PSCATH38
              ELSEIF Ask_H[28] = 1 then goto PSCATH28
              ELSEIF Ask_R[14] = 1 then goto PSCATR14
              ELSEIF Ask_H[39] = 1 then goto PSCATH39
              ELSEIF Ask_R[12] = 1 then goto PSCATR12
              ELSEIF Ask_R[13] = 1 then goto PSCATR13
              ELSE goto END_POPGRP1

2:  Goto R21LOC	
20C	R21LOC	R21LOC	In what city is (Business name) located?	Goto R21LOCST	
20C	R21LOCST	R21LOCST	? [F1]

In what state is (Business name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_R21LOCST

ELSEIF Ask_H[29] = 1 then goto PSCATH29
ELSEIF Ask_H[27] = 1 then goto PSCATH27
ELSEIF Ask_R[16] = 1 then goto PSCATR16
ELSEIF Ask_R[15] = 1 then goto PSCATR15
ELSEIF Ask_H[40] = 1 then goto PSCATH40
ELSEIF Ask_H[38] = 1 then goto PSCATH38
ELSEIF Ask_H[28] = 1 then goto PSCATH28
ELSEIF Ask_R[14] = 1 then goto PSCATR14
ELSEIF Ask_H[39] = 1 then goto PSCATH39
ELSEIF Ask_R[12] = 1 then goto PSCATR12
ELSEIF Ask_R[13] = 1 then goto PSCATR13
ELSE goto END_POPGRP1	
20C	PSCATH29	PSCATH29	(Now, please think about the last six months, since the first of (six months ago)./In the last SIX MONTHS) have (you/you or anyone in your household) purchased any nonpowered tools or miscellaneous hardware?

1. Yes
2. No	1:  Goto H29_COST

2,DK,RF:  IF Ask_H[27] = 1 then goto PSCATH27
          ELSEIF Ask_R[16] = 1 then goto PSCATR16
          ELSEIF Ask_R[15] = 1 then goto PSCATR15
          ELSEIF Ask_H[40] = 1 then goto PSCATH40
          ELSEIF Ask_H[38] = 1 then goto PSCATH38
          ELSEIF Ask_H[28] = 1 then goto PSCATH28
          ELSEIF Ask_R[14] = 1 then goto PSCATR14
          ELSEIF Ask_H[39] = 1 then goto PSCATH39
          ELSEIF Ask_R[12] = 1 then goto PSCATR12
          ELSEIF Ask_R[13] = 1 then goto PSCATR13
          ELSE goto END_POPGRP1	
20C	H29_COST	H29_COST	In the last SIX MONTHS, how much did (you/your household) spend on your last purchase of nonpowered tools or miscellaneous hardware?	IF H29_COST < 5 or H29_COST > 250 then goto ERR1_H29COST

ELSE goto H29STORE	
20C	H29STORE	H29STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains '.COM' and is not a DK 
   or RF then goto H29PURCH

ELSEIF Ask_H[27] = 1 then goto PSCATH27
ELSEIF Ask_R[16] = 1 then goto PSCATR16
ELSEIF Ask_R[15] = 1 then goto PSCATR15
ELSEIF Ask_H[40] = 1 then goto PSCATH40
ELSEIF Ask_H[38] = 1 then goto PSCATH38
ELSEIF Ask_H[28] = 1 then goto PSCATH28
ELSEIF Ask_R[14] = 1 then goto PSCATR14
ELSEIF Ask_H[39] = 1 then goto PSCATH39
ELSEIF Ask_R[12] = 1 then goto PSCATR12
ELSEIF Ask_R[13] = 1 then goto PSCATR13
ELSE goto END_POPGRP1	
20C	H29PURCH	H29PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_H[27] = 1 then goto PSCATH27
              ELSEIF Ask_R[16] = 1 then goto PSCATR16
              ELSEIF Ask_R[15] = 1 then goto PSCATR15
              ELSEIF Ask_H[40] = 1 then goto PSCATH40
              ELSEIF Ask_H[38] = 1 then goto PSCATH38
              ELSEIF Ask_H[28] = 1 then goto PSCATH28
              ELSEIF Ask_R[14] = 1 then goto PSCATR14
              ELSEIF Ask_H[39] = 1 then goto PSCATH39
              ELSEIF Ask_R[12] = 1 then goto PSCATR12
              ELSEIF Ask_R[13] = 1 then goto PSCATR13
              ELSE goto END_POPGRP1

2:  Goto H29LOC	
20C	H29LOC	H29LOC	In what city is (Business Name) located?	Goto H29LOCST	
20C	H29LOCST	H29LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_H29LOCST

ELSEIF Ask_H[27] = 1 then goto PSCATH27
ELSEIF Ask_R[16] = 1 then goto PSCATR16
ELSEIF Ask_R[15] = 1 then goto PSCATR15
ELSEIF Ask_H[40] = 1 then goto PSCATH40
ELSEIF Ask_H[38] = 1 then goto PSCATH38
ELSEIF Ask_H[28] = 1 then goto PSCATH28
ELSEIF Ask_R[14] = 1 then goto PSCATR14
ELSEIF Ask_H[39] = 1 then goto PSCATH39
ELSEIF Ask_R[12] = 1 then goto PSCATR12
ELSEIF Ask_R[13] = 1 then goto PSCATR13
ELSE goto END_POPGRP1	
20C	PSCATH27	PSCATH27	(Now, please think about the last six months, since the first of (six months ago)./In the last SIX MONTHS) have (you/you or anyone in your household) purchased any materials or supplies for any paint or wallpaper jobs?

1. Yes
2. No	1:  Goto H27_COST

2,DK,RF:  IF Ask_R[16] = 1 then goto PSCATR16
          ELSEIF Ask_R[15] = 1 then goto PSCATR15
          ELSEIF Ask_H[40] = 1 then goto PSCATH40
          ELSEIF Ask_H[38] = 1 then goto PSCATH38
          ELSEIF Ask_H[28] = 1 then goto PSCATH28
          ELSEIF Ask_R[14] = 1 then goto PSCATR14
          ELSEIF Ask_H[39] = 1 then goto PSCATH39
          ELSEIF Ask_R[12] = 1 then goto PSCATR12
          ELSEIF Ask_R[13] = 1 then goto PSCATR13
          ELSE goto END_POPGRP1	
20C	H27_COST	H27_COST	In the last SIX MONTHS, how much did (you/your household) spend on your last purchase of materials or supplies for any paint or wallpaper jobs?	IF H27_COST > 1000 then goto ERR1_H27COST

Goto H27STORE	
20C	H27STORE	H27STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains '.COM' and is not a DK
   or RF then goto H27PURCH

ELSEIF Ask_R[16] = 1 then goto PSCATR16
ELSEIF Ask_R[15] = 1 then goto PSCATR15
ELSEIF Ask_H[40] = 1 then goto PSCATH40
ELSEIF Ask_H[38] = 1 then goto PSCATH38
ELSEIF Ask_H[28] = 1 then goto PSCATH28
ELSEIF Ask_R[14] = 1 then goto PSCATR14
ELSEIF Ask_H[39] = 1 then goto PSCATH39
ELSEIF Ask_R[12] = 1 then goto PSCATR12
ELSEIF Ask_R[13] = 1 then goto PSCATR13
ELSE goto END_POPGRP1	
20C	H27PURCH	H27PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_R[16] = 1 then goto PSCATR16
              ELSEIF Ask_R[15] = 1 then goto PSCATR15
              ELSEIF Ask_H[40] = 1 then goto PSCATH40
              ELSEIF Ask_H[38] = 1 then goto PSCATH38
              ELSEIF Ask_H[28] = 1 then goto PSCATH28
              ELSEIF Ask_R[14] = 1 then goto PSCATR14
              ELSEIF Ask_H[39] = 1 then goto PSCATH39
              ELSEIF Ask_R[12] = 1 then goto PSCATR12
              ELSEIF Ask_R[13] = 1 then goto PSCATR13
              ELSE goto END_POPGRP1

2:  Goto H27LOC	
20C	H27LOC	H27LOC	In what city is (Business Name) located?	Goto H27LOCST	
20C	H27LOCST	H27LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_H27LOCST

ELSEIF Ask_R[16] = 1 then goto PSCATR16
ELSEIF Ask_R[15] = 1 then goto PSCATR15
ELSEIF Ask_H[40] = 1 then goto PSCATH40
ELSEIF Ask_H[38] = 1 then goto PSCATH38
ELSEIF Ask_H[28] = 1 then goto PSCATH28
ELSEIF Ask_R[14] = 1 then goto PSCATR14
ELSEIF Ask_H[39] = 1 then goto PSCATH39
ELSEIF Ask_R[12] = 1 then goto PSCATR12
ELSEIF Ask_R[13] = 1 then goto PSCATR13
ELSE goto END_POPGRP1	
20C	PSCATR16	PSCATR16	(Now, please think about the last six months, since the first of (Six Months Ago)./In the last SIX MONTHS) have (you/you or anyone in your household) purchased any hunting, fishing, or camping equipment?

1. Yes
2. No	1:  Goto R16_COST

2,DK,RF:  IF Ask_R[15] = 1 then goto PSCATR15
          ELSEIF Ask_H[40] = 1 then goto PSCATH40
          ELSEIF Ask_H[38] = 1 then goto PSCATH38
          ELSEIF Ask_H[28] = 1 then goto PSCATH28
          ELSEIF Ask_R[14] = 1 then goto PSCATR14
          ELSEIF Ask_H[39] = 1 then goto PSCATH39
          ELSEIF Ask_R[12] = 1 then goto PSCATR12
          ELSEIF Ask_R[13] = 1 then goto PSCATR13
          ELSE goto END_POPGRP1	
20C	R16_COST	R16_COST	In the last SIX MONTHS, how much did (you/your household) spend on your last purchase of hunting, fishing, or camping equipment?	IF R16_COST < 5 or R16_COST > 650 then goto ERR1_R16COST

ELSE goto R16STORE	
20C	R16STORE	R16STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains '.COM' and is not a DK 
   or RF then goto R16PURCH

ELSEIF Ask_R[15] = 1 then goto PSCATR15
ELSEIF Ask_H[40] = 1 then goto PSCATH40
ELSEIF Ask_H[38] = 1 then goto PSCATH38
ELSEIF Ask_H[28] = 1 then goto PSCATH28
ELSEIF Ask_R[14] = 1 then goto PSCATR14
ELSEIF Ask_H[39] = 1 then goto PSCATH39
ELSEIF Ask_R[12] = 1 then goto PSCATR12
ELSEIF Ask_R[13] = 1 then goto PSCATR13
ELSE goto END_POPGRP1	
20C	R16PURCH	R16PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_R[15] = 1 then goto PSCATR15
              ELSEIF Ask_H[40] = 1 then goto PSCATH40
              ELSEIF Ask_H[38] = 1 then goto PSCATH38
              ELSEIF Ask_H[28] = 1 then goto PSCATH28
              ELSEIF Ask_R[14] = 1 then goto PSCATR14
              ELSEIF Ask_H[39] = 1 then goto PSCATH39
              ELSEIF Ask_R[12] = 1 then goto PSCATR12
              ELSEIF Ask_R[13] = 1 then goto PSCATR13
              ELSE goto END_POPGRP1

2:  Goto R16LOC	
20C	R16LOC	R16LOC	In what city is (Business Name) located?	Goto R16LOCST	
20C	R16LOCST	R16LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_R16LOCST

ELSEIF Ask_R[15] = 1 then goto PSCATR15
ELSEIF Ask_H[40] = 1 then goto PSCATH40
ELSEIF Ask_H[38] = 1 then goto PSCATH38
ELSEIF Ask_H[28] = 1 then goto PSCATH28
ELSEIF Ask_R[14] = 1 then goto PSCATR14
ELSEIF Ask_H[39] = 1 then goto PSCATH39
ELSEIF Ask_R[12] = 1 then goto PSCATR12
ELSEIF Ask_R[13] = 1 then goto PSCATR13
ELSE goto END_POPGRP1	
20C	PSCATR15	PSCATR15	(Now, please think about the last six months, since the first of (Six Months Ago)./In the last SIX MONTHS,) have (you/you or anyone in your household) purchased any sport, recreation, or health and exercise equipment?

1. Yes
2. No	1:  Goto R15_COST

2,DK,RF:  IF Ask_H[40] = 1 then goto PSCATH40
          ELSEIF Ask_H[38] = 1 then goto PSCATH38
          ELSEIF Ask_H[28] = 1 then goto PSCATH28
          ELSEIF Ask_R[14] = 1 then goto PSCATR14
          ELSEIF Ask_H[39] = 1 then goto PSCATH39
          ELSEIF Ask_R[12] = 1 then goto PSCATR12
          ELSEIF Ask_R[13] = 1 then goto PSCATR13
          ELSE goto END_POPGRP1	
20C	R15_COST	R15_COST	In the last SIX MONTHS, how much did (you/your household) spend on your last purchase of sport, recreation, or health and exercise equipment?	IF R15_COST < 5 or R15_COST > 1850 then goto ERR1_R15COST

ELSE goto R15STORE	
20C	R15STORE	R15STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains '.COM' and is not a DK 
   or RF then goto R15PURCH

ELSEIF Ask_H[40] = 1 then goto PSCATH40
ELSEIF Ask_H[38] = 1 then goto PSCATH38
ELSEIF Ask_H[28] = 1 then goto PSCATH28
ELSEIF Ask_R[14] = 1 then goto PSCATR14
ELSEIF Ask_H[39] = 1 then goto PSCATH39
ELSEIF Ask_R[12] = 1 then goto PSCATR12
ELSEIF Ask_R[13] = 1 then goto PSCATR13
ELSE goto END_POPGRP1	
20C	R15PURCH	R15PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_H[40] = 1 then goto PSCATH40
              ELSEIF Ask_H[38] = 1 then goto PSCATH38
              ELSEIF Ask_H[28] = 1 then goto PSCATH28
              ELSEIF Ask_R[14] = 1 then goto PSCATR14
              ELSEIF Ask_H[39] = 1 then goto PSCATH39
              ELSEIF Ask_R[12] = 1 then goto PSCATR12
              ELSEIF Ask_R[13] = 1 then goto PSCATR13
              ELSE goto END_POPGRP1

2:  Goto R15LOC	
20C	R15LOC	R15LOC	In what city is (Business Name) located?	Goto R15LOCST	
20C	R15LOCST	R15LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_R15LOCST

ELSEIF Ask_H[40] = 1 then goto PSCATH40
ELSEIF Ask_H[38] = 1 then goto PSCATH38
ELSEIF Ask_H[28] = 1 then goto PSCATH28
ELSEIF Ask_R[14] = 1 then goto PSCATR14
ELSEIF Ask_H[39] = 1 then goto PSCATH39
ELSEIF Ask_R[12] = 1 then goto PSCATR12
ELSEIF Ask_R[13] = 1 then goto PSCATR13
ELSE goto END_POPGRP1	
20C	PSCATH40	PSCATH40	Now, please think about the last two years, since the first of (Month and Year, two years ago) have (you/you or anyone in your household) had any expenses for inside home maintenance and repair, excluding exterior work?

1. Yes
2. No	1:  Goto H40CONT

2,DK,RF:  IF Ask_H[38] = 1 then goto PSCATH38
          ELSEIF Ask_H[28] = 1 then goto PSCATH28
          ELSEIF Ask_R[14] = 1 then goto PSCATR14
          ELSEIF Ask_H[39] = 1 then goto PSCATH39
          ELSEIF Ask_R[12] = 1 then goto PSCATR12
          ELSEIF Ask_R[13] = 1 then goto PSCATR13
          ELSE goto END_POPGRP1	
20C	H40CONT	H40CONT	Did you do this job yourself or did you pay someone else to do all or part of the work?

1. Self only
2. Paid or contracted with someone else
3. Both	1,DK,RF:  IF Ask_H[38] = 1 then goto PSCATH38
          ELSEIF Ask_H[28] = 1 then goto PSCATH28
          ELSEIF Ask_R[14] = 1 then goto PSCATR14
          ELSEIF Ask_H[39] = 1 then goto PSCATH39
          ELSEIF Ask_R[12] = 1 then goto PSCATR12
          ELSEIF Ask_R[13] = 1 then goto PSCATR13
          ELSE goto END_POPGRP1

2,3:  H40_COST	
20C	H40_COST	H40_COST	In the last TWO YEARS, how much was (your/your household's) last expense for inside home maintenance and repair, excluding exterior work?	IF H40_COST > 10000 then goto ERR1_H40COST

ELSE goto H40STORE	
20C	H40STORE	H40STORE	What is the name of the business where (you/your household) had this expense?

           Enter store, website, or company name	IF uppercase entry does not contains '.COM' and is not a DK 
    or RF then goto H40PURCH

ELSEIF Ask_H[38] = 1 then goto PSCATH38
ELSEIF Ask_H[28] = 1 then goto PSCATH28
ELSEIF Ask_R[14] = 1 then goto PSCATR14
ELSEIF Ask_H[39] = 1 then goto PSCATH39
ELSEIF Ask_R[12] = 1 then goto PSCATR12
ELSEIF Ask_R[13] = 1 then goto PSCATR13
ELSE goto END_POPGRP1	
20C	H40PURCH	H40PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_H[38] = 1 then goto PSCATH38
              ELSEIF Ask_H[28] = 1 then goto PSCATH28
              ELSEIF Ask_R[14] = 1 then goto PSCATR14
              ELSEIF Ask_H[39] = 1 then goto PSCATH39
              ELSEIF Ask_R[12] = 1 then goto PSCATR12
              ELSEIF Ask_R[13] = 1 then goto PSCATR13
              ELSE goto END_POPGRP1

2:  Goto H40LOC	
20C	H40LOC	H40LOC	In what city is (Business Name) located?	Goto H40LOCST	
20C	H40LOCST	H40LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_H40LOCST

ELSEIF Ask_H[38] = 1 then goto PSCATH38
ELSEIF Ask_H[28] = 1 then goto PSCATH28
ELSEIF Ask_R[14] = 1 then goto PSCATR14
ELSEIF Ask_H[39] = 1 then goto PSCATH39
ELSEIF Ask_R[12] = 1 then goto PSCATR12
ELSEIF Ask_R[13] = 1 then goto PSCATR13
ELSE goto END_POPGRP1	
20C	PSCATH38	PSCATH38	(Now, please think about the last two years, since the first of (two years ago)./In the last TWO YEARS) have (you/you or anyone in your household) had any expenses for service contracts, maintenance, or repairs for major appliances?  Do not include expenses for repairs you did yourself.

1. Yes
2. No	1:  Goto H38COST

2,DK,RF:  IF Ask_H[28] = 1 then goto PSCATH28
          ELSEIF Ask_R[14] = 1 then goto PSCATR14
          ELSEIF Ask_H[39] = 1 then goto PSCATH39
          ELSEIF Ask_R[12] = 1 then goto PSCATR12
          ELSEIF Ask_R[13] = 1 then goto PSCATR13
          ELSE goto END_POPGRP1	
20C	H38_COST	H38_COST	In the last TWO YEARS, how much was (your/your household's) last expense for service contracts, maintenance, or repairs for major appliances?	IF H38_COST < 5 or H38_COST > 325 then goto ERR1_H38COST

ELSE goto H38TORE	
20C	H38STORE	H38STORE	What is the name of the business where (you/your household) had this expense?

           Enter store, website, or company name	IF uppercase entry does not contains '.COM' and is not a DK 
    or RF then goto H38PURCH

ELSEIF Ask_H[28] = 1 then goto PSCATH28
ELSEIF Ask_R[14] = 1 then goto PSCATR14
ELSEIF Ask_H[39] = 1 then goto PSCATH39
ELSEIF Ask_R[12] = 1 then goto PSCATR12
ELSEIF Ask_R[13] = 1 then goto PSCATR13
ELSE goto END_POPGRP1	
20C	H38PURCH	H38PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_H[28] = 1 then goto PSCATH28
              ELSEIF Ask_R[14] = 1 then goto PSCATR14
              ELSEIF Ask_H[39] = 1 then goto PSCATH39
              ELSEIF Ask_R[12] = 1 then goto PSCATR12
              ELSEIF Ask_R[13] = 1 then goto PSCATR13
              ELSE goto END_POPGRP1

2:  Goto H38LOC	
20C	H38LOC	H38LOC	In what city is Business name located?	Goto H38LOCST	
20C	H38LOCST	H38LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_H38LOCST

ELSEIF Ask_H[28] = 1 then goto PSCATH28
ELSEIF Ask_R[14] = 1 then goto PSCATR14
ELSEIF Ask_H[39] = 1 then goto PSCATH39
ELSEIF Ask_R[12] = 1 then goto PSCATR12
ELSEIF Ask_R[13] = 1 then goto PSCATR13
ELSE goto END_POPGRP1	
20C	PSCATH28	PSCATH28	(Now, please think about the last two years, since the first of (two years ago)./In the last TWO YEARS) have (you/you or anyone in your household) purchased any power tools?

1. Yes
2. No	1:  Goto H28COST

2,DK,RF:  IF Ask_R[14] = 1 then goto PSCATR14
          ELSEIF Ask_H[39] = 1 then goto PSCATH39
          ELSEIF Ask_R[12] = 1 then goto PSCATR12
          ELSEIF Ask_R[13] = 1 then goto PSCATR13
          ELSE goto END_POPGRP1	
20C	H28_COST	H28_COST	In the last TWO YEARS, how much did (you/your household) last spend on power tools?	IF H28_COST < 11 or H28_COST > 700 then goto ERR1_H28COST

ELSE goto H28TORE	
20C	H28STORE	H28STORE	What is the name of the business where this was last purchased?
 
          Enter store, website, or company name	IF uppercase entry does not contains '.COM' and is not a DK 
    or RF then goto H28PURCH

ELSEIF Ask_R[14] = 1 then goto PSCATR14
ELSEIF Ask_H[39] = 1 then goto PSCATH39
ELSEIF Ask_R[12] = 1 then goto PSCATR12
ELSEIF Ask_R[13] = 1 then goto PSCATR13
ELSE goto END_POPGRP1	
20C	H28PURCH	H28PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_R[14] = 1 then goto PSCATR14
              ELSEIF Ask_H[39] = 1 then goto PSCATH39
              ELSEIF Ask_R[12] = 1 then goto PSCATR12
              ELSEIF Ask_R[13] = 1 then goto PSCATR13
              ELSE goto END_POPGRP1

2:  Goto H28LOC	
20C	H28LOC	H28LOC	In what city is (Business Name) located?	Goto H28LOCST	
20C	H28LOCST	H28LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_H28LOCST

ELSEIF Ask_R[14] = 1 then goto PSCATR14
ELSEIF Ask_H[39] = 1 then goto PSCATH39
ELSEIF Ask_R[12] = 1 then goto PSCATR12
ELSEIF Ask_R[13] = 1 then goto PSCATR13
ELSE goto END_POPGRP1	
20C	PSCATR14	PSCATR14	(Now, please think about the last two years, since the first of (two years ago)./In the last TWO YEARS) have (you/you or anyone in your household) purchased any bicycles or bicycle equipment?

1. Yes
2. No	1:  Goto R14COST

2,DK,RF:  IF Ask_H[39] = 1 then goto PSCATH39
          ELSEIF Ask_R[12] = 1 then goto PSCATR12
          ELSEIF Ask_R[13] = 1 then goto PSCATR13
          ELSE goto END_POPGRP1	
20C	R14_COST	R14_COST	In the last TWO YEARS, how much did (you/your household) last spend on bicycles or bicycle equipment?	IF R14_COST < 5 or R14_COST > 924 then goto ERR1_R14COST

ELSE goto R14TORE	
20C	R14STORE	R14STORE	What is the name of the business where this was last purchased?
 
          Enter store, website, or company name	IF uppercase entry does not contains '.COM' and is not a DK 
    or RF then goto R14PURCH

ELSEIF Ask_H[39] = 1 then goto PSCATH39
ELSEIF Ask_R[12] = 1 then goto PSCATR12
ELSEIF Ask_R[13] = 1 then goto PSCATR13
ELSE goto END_POPGRP1	
20C	R14PURCH	R14PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_H[39] = 1 then goto PSCATH39
              ELSEIF Ask_R[12] = 1 then goto PSCATR12
              ELSEIF Ask_R[13] = 1 then goto PSCATR13
              ELSE goto END_POPGRP1

2:  Goto R14LOC	
20C	R14LOC	R14LOC	In what city is (Business Name) located?	Goto R14LOCST	
20C	R14LOCST	R14LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_R14LOCST

ELSEIF Ask_H[39] = 1 then goto PSCATH39
ELSEIF Ask_R[12] = 1 then goto PSCATR12
ELSEIF Ask_R[13] = 1 then goto PSCATR13
ELSE goto END_POPGRP1	
20C	PSCATH39	PSCATH39	Now, please think about the last five years, since the first of (Month and Year, five years ago) have (you/you or anyone in your household) had any expenses for repairing, refinishing, or reupholstering furniture?  Do not include expenses for repairs you did yourself.

1. Yes
2. No	1:  Goto H39_COST

2,DK,RF:  IF Ask_R[12] = 1 then goto PSCATR12
          ELSEIF Ask_R[13] = 1 then goto PSCATR13
          ELSE goto END_POPGRP1	
20C	H39_COST	H39_COST	In the last FIVE YEARS, how much was (your/your household's) last expense for repairing, refinishing, or reupholstering furniture?	IF H39_COST < 5 or H39_COST > 1900 then goto ERR1_H39COST

ELSE goto H39STORE	
20C	H39STORE	H39STORE	What is the name of the business where (you/your household) had this expense?

           Enter store, website, or company name	IF uppercase entry does not contains '.COM' and is not a DK 
   or RF then goto H39PURCH

ELSEIF Ask_R[12] = 1 then goto PSCATR12
ELSEIF Ask_R[13] = 1 then goto PSCATR13
ELSE goto END_POPGRP1	
20C	H39PURCH	H39PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_R[12] = 1 then goto PSCATR12
              ELSEIF Ask_R[13] = 1 then goto PSCATR13
              ELSE goto END_POPGRP1

2:  Goto H39LOC	
20C	H39LOC	H39LOC	In what city is (Business Name) located?	Goto H39LOCST	
20C	H39LOCST	H39LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_H39LOCST

ELSEIF Ask_R[12] = 1 then goto PSCATR12
ELSEIF Ask_R[13] = 1 then goto PSCATR13
ELSE goto END_POPGRP1	
20C	PSCATR12	PSCATR12	(Now, please think about the last five years, since the first of five years ago)./In the last FIVE YEARS) have (you/you or anyone in your household) purchased any outboard motors or powered sports vehicles?

1. Yes
2. No	1:  Goto R12_COST

2,DK,RF:  IF Ask_R[13] = 1 then goto PSCATR13
          ELSE goto END_POPGRP1	
20C	R12_COST	R12_COST	In the last FIVE YEARS, how much did (you/your household) spend on your last purchase of an outboard motor or powered sports vehicle?	IF R12_COST < 40 or R12_COST > 50000 then goto ERR1_R12COST

ELSE goto R12STORE	
20C	R12STORE	R12STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains '.COM' and is not a DK 
   or RF then goto R12PURCH

ELSEIF Ask_R[13] = 1 then goto PSCATR13
ELSE goto END_POPGRP1	
20C	R12PURCH	R12PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_R[13] = 1 then goto PSCATR13
              ELSE goto END_POPGRP1

2:  Goto R12LOC	
20C	R12LOC	R12LOC	In what city is (Business Name) located?	Goto R12LOCST	
20C	R12LOCST	R12LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_R12LOCST

ELSEIF Ask_R[13] = 1 then goto PSCATR13

ELSE goto END_POPGRP1	
20C	PSCATR13	PSCATR13	(Now, please think about the last five years, since the first of five years ago)./In the last FIVE YEARS) have (you/you or anyone in your household) purchased any unpowered boats, trailers, or campers?

1. Yes
2. No	1:  Goto R13_COST

2,DK,RF:  Goto END_POPGRP1	
20C	R13_COST	R13_COST	In the last FIVE YEARS, how much did (you/your household) spend on your last purchase of any unpowered boats, trailers, or campers?	IF R13_COST < 200 or R13_COST > 63000 then goto ERR1_R13COST

ELSE goto R13STORE	
20C	R13STORE	R13STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains '.COM' and is not a DK
   or RF then goto R13PURCH

ELSE goto END_POPGRP1	
20C	R13PURCH	R13PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  Goto END_POPGRP1

2:  Goto R13LOC	
20C	R13LOC	R13LOC	In what city is (Business Name) located?	Goto R13LOCST	
20C	R13LOCST	R13LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_R13LOCST

ELSE goto END_POPGRP1	
		END_POPGRP1		Exit section 20C and goto the next appropriate section	
		POP2_AskFlags			
20C	PGRP2_INTRO	PGRP2_INTRO	The next few questions are about expenses made by (you/you or anyone in your household) during the last five years, that is, as far back as (year, 5 years ago).  We have used the responses that you've already given us to shorten this part of the interview, so I'll only be asking you about expenses that you told me that you did not have in the last three months.

1. Enter 1 to Continue	IF Ask_A[21] = 1 then goto PSCATA21
ELSEIF Ask_A[20] = 1 then goto PSCATA20
ELSEIF Ask_G[20] = 1 then goto PSCATG20
ELSEIF Ask_R[24] = 1 then goto PSCATR24
ELSEIF Ask_G[19] = 1 then goto PSCATG19
ELSEIF Ask_H[35] = 1 then goto PSCATH35
ELSEIF Ask_H[36] = 1 then goto PSCATH36
ELSEIF Ask_H[37] = 1 then goto PSCATH37
ELSEIF Ask_G[09] = 1 then goto PSCATG09
ELSEIF Ask_G[10] = 1 then goto PSCATG10
ELSEIF Ask_T[17] = 1 then goto PSCATT17
ELSE goto END_POPGRP2	
20C	PSCATA21	PSCATA21	Now, please think about the last six months, since the first of (Month and Year, six month ago) have (you/you or anyone in your household) purchased any infants' or toddlers' underwear or diapers?

1. Yes
2. No	1:  Goto A21_COST

2,DK,RF:  IF Ask_A[20] = 1 then goto PSCATA20
          ELSEIF Ask_G[20] = 1 then goto PSCATG20
          ELSEIF Ask_R[24] = 1 then goto PSCATR24
          ELSEIF Ask_G[19] = 1 then goto PSCATG19
          ELSEIF Ask_H[35] = 1 then goto PSCATH35
          ELSEIF Ask_H[36] = 1 then goto PSCATH36
          ELSEIF Ask_H[37] = 1 then goto PSCATH37
          ELSEIF Ask_G[09] = 1 then goto PSCATG09
          ELSEIF Ask_G[10] = 1 then goto PSCATG10
          ELSEIF Ask_T[17] = 1 then goto PSCATT17
          ELSE goto END_POPGRP2	
20C	A21_COST	A21_COST	In the last SIX MONTHS, how much did (you/your household) spend on your last purchase of infants' or toddlers' underwear or diapers?	IF ENTRY < 5 or ENTRY > 150 then goto ERR1_A21COST

ELSE goto A21STORE	
20C	A21STORE	A21STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" or is not a DK or 
   RF then goto A21PURCH

ELSEIF Ask_A[20] = 1 then goto PSCATA20
ELSEIF Ask_G[20] = 1 then goto PSCATG20
ELSEIF Ask_R[24] = 1 then goto PSCATR24
ELSEIF Ask_G[19] = 1 then goto PSCATG19
ELSEIF Ask_H[35] = 1 then goto PSCATH35
ELSEIF Ask_H[36] = 1 then goto PSCATH36
ELSEIF Ask_H[37] = 1 then goto PSCATH37
ELSEIF Ask_G[09] = 1 then goto PSCATG09
ELSEIF Ask_G[10] = 1 then goto PSCATG10
ELSEIF Ask_T[17] = 1 then goto PSCATT17
ELSE goto END_POPGRP2	
20C	A21PURCH	A21PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_A[20] = 1 then goto PSCATA20
              ELSEIF Ask_G[20] = 1 then goto PSCATG20
              ELSEIF Ask_R[24] = 1 then goto PSCATR24
              ELSEIF Ask_G[19] = 1 then goto PSCATG19
              ELSEIF Ask_H[35] = 1 then goto PSCATH35
              ELSEIF Ask_H[36] = 1 then goto PSCATH36
              ELSEIF Ask_H[37] = 1 then goto PSCATH37
              ELSEIF Ask_G[09] = 1 then goto PSCATG09
              ELSEIF Ask_G[10] = 1 then goto PSCATG10
              ELSEIF Ask_T[17] = 1 then goto PSCATT17
              ELSE goto END_POPGRP2

2:  Goto A21LOC	
20C	A21LOC	A21LOC	In what city is Business name located?	Goto A21LOCST	
20C	A21LOCST	A21LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_A21LOCST

ELSEIF Ask_A[20] = 1 then goto PSCATA20
ELSEIF Ask_G[20] = 1 then goto PSCATG20
ELSEIF Ask_R[24] = 1 then goto PSCATR24
ELSEIF Ask_G[19] = 1 then goto PSCATG19
ELSEIF Ask_H[35] = 1 then goto PSCATH35
ELSEIF Ask_H[36] = 1 then goto PSCATH36
ELSEIF Ask_H[37] = 1 then goto PSCATH37
ELSEIF Ask_G[09] = 1 then goto PSCATG09
ELSEIF Ask_G[10] = 1 then goto PSCATG10
ELSEIF Ask_T[17] = 1 then goto PSCATT17
ELSE goto END_POPGRP2	
20C	PSCATA20	PSCATA20	(Now, please think about the last six months, since the first of (Six Months Ago)./In the last SIX MONTHS) have (you/you or anyone in your household) purchased any infants' or toddlers' clothing or accessories, excluding jewelry, underwear and diapers?

1. Yes
2. No	1:  Goto A20_COST

2,DK,RF:  IF Ask_G[20] = 1 then goto PSCATG20
          ELSEIF Ask_R[24] = 1 then goto PSCATR24
          ELSEIF Ask_G[19] = 1 then goto PSCATG19
          ELSEIF Ask_H[35] = 1 then goto PSCATH35
          ELSEIF Ask_H[36] = 1 then goto PSCATH36
          ELSEIF Ask_H[37] = 1 then goto PSCATH37
          ELSEIF Ask_G[09] = 1 then goto PSCATG09
          ELSEIF Ask_G[10] = 1 then goto PSCATG10
          ELSEIF Ask_T[17] = 1 then goto PSCATT17
          ELSE goto END_POPGRP2	
20C	A20_COST	A20_COST	In the last SIX MONTHS, how much did (you/your household) spend on your last purchase of infants' or toddlers' clothing or accessories, excluding jewelry, underwear and diapers?	IF ENTRY lt 5 or gt 500 then goto ERR1_A20COST

ELSE goto A20STORE	
20C	A20STORE	A20STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK 
    or RF then goto A20PURCH

ELSEIF Ask_G[20] = 1 then goto PSCATG20
ELSEIF Ask_R[24] = 1 then goto PSCATR24
ELSEIF Ask_G[19] = 1 then goto PSCATG19
ELSEIF Ask_H[35] = 1 then goto PSCATH35
ELSEIF Ask_H[36] = 1 then goto PSCATH36
ELSEIF Ask_H[37] = 1 then goto PSCATH37
ELSEIF Ask_G[09] = 1 then goto PSCATG09
ELSEIF Ask_G[10] = 1 then goto PSCATG10
ELSEIF Ask_T[17] = 1 then goto PSCATT17
ELSE goto END_POPGRP2	
20C	A20PURCH	A20PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_G[20] = 1 then goto PSCATG20
              ELSEIF Ask_R[24] = 1 then goto PSCATR24
              ELSEIF Ask_G[19] = 1 then goto PSCATG19
              ELSEIF Ask_H[35] = 1 then goto PSCATH35
              ELSEIF Ask_H[36] = 1 then goto PSCATH36
              ELSEIF Ask_H[37] = 1 then goto PSCATH37
              ELSEIF Ask_G[09] = 1 then goto PSCATG09
              ELSEIF Ask_G[10] = 1 then goto PSCATG10
              ELSEIF Ask_T[17] = 1 then goto PSCATT17
              ELSE goto END_POPGRP2

2:  Goto A20LOC	
20C	A20LOC	A20LOC	In what city is Business name located?	Goto A20LOCST	
20C	A20LOCST	A20LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_A20LOCST

ELSEIF Ask_G[20] = 1 then goto PSCATG20
ELSEIF Ask_R[24] = 1 then goto PSCATR24
ELSEIF Ask_G[19] = 1 then goto PSCATG19
ELSEIF Ask_H[35] = 1 then goto PSCATH35
ELSEIF Ask_H[36] = 1 then goto PSCATH36
ELSEIF Ask_H[37] = 1 then goto PSCATH37
ELSEIF Ask_G[09] = 1 then goto PSCATG09
ELSEIF Ask_G[10] = 1 then goto PSCATG10
ELSEIF Ask_T[17] = 1 then goto PSCATT17
ELSE goto END_POPGRP2	
20C	PSCATG20	PSCATG20	Now please think about the last two years, since the first of (Month and Year, two years ago), have (you/you or anyone in your household) purchased any infants' equipment such as strollers, car seats, bottles, or dishes?

1. Yes
2. No	1:  Goto G20_COST

2,DK,RF:  IF Ask_R[24] = 1 then goto PSCATR24
          ELSEIF Ask_G[19] = 1 then goto PSCATG19
          ELSEIF Ask_H[35] = 1 then goto PSCATH35
          ELSEIF Ask_H[36] = 1 then goto PSCATH36
          ELSEIF Ask_H[37] = 1 then goto PSCATH37
          ELSEIF Ask_G[09] = 1 then goto PSCATG09
          ELSEIF Ask_G[10] = 1 then goto PSCATG10
          ELSEIF Ask_T[17] = 1 then goto PSCATT17
          ELSE goto END_POPGRP2	
20C	G20_COST	G20_COST	In the last TWO YEARS, how much did (you/your household) spend on your last purchase of infants' equipment such as strollers, car seats, bottles, or dishes?	IF ENTRY lt 7 or gt 500 then goto ERR1_G20COST

ELSE goto G20STORE	
20C	G20STORE	G20STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK 
   or RF then goto G20PURCH

ELSEIF Ask_R[24] = 1 then goto PSCATR24
ELSEIF Ask_G[19] = 1 then goto PSCATG19
ELSEIF Ask_H[35] = 1 then goto PSCATH35
ELSEIF Ask_H[36] = 1 then goto PSCATH36
ELSEIF Ask_H[37] = 1 then goto PSCATH37
ELSEIF Ask_G[09] = 1 then goto PSCATG09
ELSEIF Ask_G[10] = 1 then goto PSCATG10
ELSEIF Ask_T[17] = 1 then goto PSCATT17
ELSE goto END_POPGRP2	
20C	G20PURCH	G20PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_R[24] = 1 then goto PSCATR24
              ELSEIF Ask_G[19] = 1 then goto PSCATG19
              ELSEIF Ask_H[35] = 1 then goto PSCATH35
              ELSEIF Ask_H[36] = 1 then goto PSCATH36
              ELSEIF Ask_H[37] = 1 then goto PSCATH37
              ELSEIF Ask_G[09] = 1 then goto PSCATG09
              ELSEIF Ask_G[10] = 1 then goto PSCATG10
              ELSEIF Ask_T[17] = 1 then goto PSCATT17
              ELSE goto END_POPGRP2

2:  Goto G20LOC	
20C	G20LOC	G20LOC	In what city is Business name located?	Goto G20LOCST	
20C	G20LOCST	G20LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_G20LOCST

ELSEIF Ask_R[24] = 1 then goto PSCATR24
ELSEIF Ask_G[19] = 1 then goto PSCATG19
ELSEIF Ask_H[35] = 1 then goto PSCATH35
ELSEIF Ask_H[36] = 1 then goto PSCATH36
ELSEIF Ask_H[37] = 1 then goto PSCATH37
ELSEIF Ask_G[09] = 1 then goto PSCATG09
ELSEIF Ask_G[10] = 1 then goto PSCATG10
ELSEIF Ask_T[17] = 1 then goto PSCATT17
ELSE goto END_POPGRP2	
20C	PSCATR24	PSCATR24	(Now, please think about the last two years, since the first of (two years ago)./In the last TWO YEARS) have (you/you or anyone in your household) purchased any musical instruments or musical accessories?

1. Yes
2. No	1:  Goto R24_COST

2,DK,RF:  IF Ask_G[19] = 1 then goto PSCATG19
          ELSEIF Ask_H[35] = 1 then goto PSCATH35
          ELSEIF Ask_H[36] = 1 then goto PSCATH36
          ELSEIF Ask_H[37] = 1 then goto PSCATH37
          ELSEIF Ask_G[09] = 1 then goto PSCATG09
          ELSEIF Ask_G[10] = 1 then goto PSCATG10
          ELSEIF Ask_T[17] = 1 then goto PSCATT17
          ELSE goto END_POPGRP2	
20C	R24_COST	R24_COST	In the last TWO YEARS, how much did (you/your household) spend on your last purchase of musical instruments or musical accessories?	IF ENTRY lt 5 or gt 950 then goto ERR1_R24COST

ELSE goto R24STORE	
20C	R24STORE	R24STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK 
   or RF then goto R24PURCH

ELSEIF Ask_G[19] = 1 then goto PSCATG19
ELSEIF Ask_H[35] = 1 then goto PSCATH35
ELSEIF Ask_H[36] = 1 then goto PSCATH36
ELSEIF Ask_H[37] = 1 then goto PSCATH37
ELSEIF Ask_G[09] = 1 then goto PSCATG09
ELSEIF Ask_G[10] = 1 then goto PSCATG10
ELSEIF Ask_T[17] = 1 then goto PSCATT17
ELSE goto END_POPGRP2	
20C	R24PURCH	R24PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_G[19] = 1 then goto PSCATG19
              ELSEIF Ask_H[35] = 1 then goto PSCATH35
              ELSEIF Ask_H[36] = 1 then goto PSCATH36
              ELSEIF Ask_H[37] = 1 then goto PSCATH37
              ELSEIF Ask_G[09] = 1 then goto PSCATG09
              ELSEIF Ask_G[10] = 1 then goto PSCATG10
              ELSEIF Ask_T[17] = 1 then goto PSCATT17
              ELSE goto END_POPGRP2

2:  Goto R24LOC	
20C	R24LOC	R24LOC	In what city is Business name located?	Goto R24LOCST	
20C	R24LOCST	R24LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_R24LOCST

ELSEIF Ask_G[19] = 1 then goto PSCATG19
ELSEIF Ask_H[35] = 1 then goto PSCATH35
ELSEIF Ask_H[36] = 1 then goto PSCATH36
ELSEIF Ask_H[37] = 1 then goto PSCATH37
ELSEIF Ask_G[09] = 1 then goto PSCATG09
ELSEIF Ask_G[10] = 1 then goto PSCATG10
ELSEIF Ask_T[17] = 1 then goto PSCATT17
ELSE goto END_POPGRP2	
20C	PSCATG19	PSCATG19	(Now, please think about the last two years, since the first of (two years ago)./In the last TWO YEARS) have (you/you or anyone in your household) purchased any luggage, briefcases, or other carrying cases?

1. Yes
2. No	1:  Goto G19_COST

2,DK,RF:  IF Ask_H[35] = 1 then goto PSCATH35
          ELSEIF Ask_H[36] = 1 then goto PSCATH36
          ELSEIF Ask_H[37] = 1 then goto PSCATH37
          ELSEIF Ask_G[09] = 1 then goto PSCATG09
          ELSEIF Ask_G[10] = 1 then goto PSCATG10
          ELSEIF Ask_T[17] = 1 then goto PSCATT17
          ELSE goto END_POPGRP2	
20C	G19_COST	G19_COST	In the last TWO YEARS, how much did (you/your household) spend on your last purchase of luggage, briefcases, or other carrying cases?	IF ENTRY lt 5 or gt 425 then goto ERR1_G19COST

ELSE goto G19STORE	
20C	G19STORE	G19STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK 
   or RF then goto G19PURCH

ELSEIF Ask_H[35] = 1 then goto PSCATH35
ELSEIF Ask_H[36] = 1 then goto PSCATH36
ELSEIF Ask_H[37] = 1 then goto PSCATH37
ELSEIF Ask_G[09] = 1 then goto PSCATG09
ELSEIF Ask_G[10] = 1 then goto PSCATG10
ELSEIF Ask_T[17] = 1 then goto PSCATT17
ELSE goto END_POPGRP2	
20C	G19PURCH	G19PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_H[35] = 1 then goto PSCATH35
              ELSEIF Ask_H[36] = 1 then goto PSCATH36
              ELSEIF Ask_H[37] = 1 then goto PSCATH37
              ELSEIF Ask_G[09] = 1 then goto PSCATG09
              ELSEIF Ask_G[10] = 1 then goto PSCATG10
              ELSEIF Ask_T[17] = 1 then goto PSCATT17
              ELSE goto END_POPGRP2

2:  Goto G19LOC	
20C	G19LOC	G19LOC	In what city is Business name located?	Goto G19LOCST	
20C	G19LOCST	G19LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_G19LOCST

ELSEIF Ask_H[35] = 1 then goto PSCATH35
ELSEIF Ask_H[36] = 1 then goto PSCATH36
ELSEIF Ask_H[37] = 1 then goto PSCATH37
ELSEIF Ask_G[09] = 1 then goto PSCATG09
ELSEIF Ask_G[10] = 1 then goto PSCATG10
ELSEIF Ask_T[17] = 1 then goto PSCATT17
ELSE goto END_POPGRP2	
20C	PSCATH35	PSCATH35	(Now, please think about the last two years, since the first of (two years ago)./In the last TWO YEARS) have (you/you or anyone in your household) had any expenses for housekeeping services?

1. Yes
2. No	1:  Goto H35_COST

2,DK,RF:  IF Ask_H[36] = 1 then goto PSCATH36
          ELSEIF Ask_H[37] = 1 then goto PSCATH37
          ELSEIF Ask_G[09] = 1 then goto PSCATG09
          ELSEIF Ask_G[10] = 1 then goto PSCATG10
          ELSEIF Ask_T[17] = 1 then goto PSCATT17
          ELSE goto END_POPGRP2	
20C	H35_COST	H35_COST	In the last TWO YEARS, how much was (your/your household's) last expense for housekeeping services?	IF ENTRY lt 20 or gt 1260 then goto ERR1_H35COST

ELSE goto H35STORE	
20C	H35STORE	H35STORE	What is the name of the business where (you/your household) had this expense?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK 
   or RF then goto H35PURCH

ELSEIF Ask_H[36] = 1 then goto PSCATH36
ELSEIF Ask_H[37] = 1 then goto PSCATH37
ELSEIF Ask_G[09] = 1 then goto PSCATG09
ELSEIF Ask_G[10] = 1 then goto PSCATG10
ELSEIF Ask_T[17] = 1 then goto PSCATT17
ELSE goto END_POPGRP2	
20C	H35PURCH	H35PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_H[36] = 1 then goto PSCATH36
              ELSEIF Ask_H[37] = 1 then goto PSCATH37
              ELSEIF Ask_G[09] = 1 then goto PSCATG09
              ELSEIF Ask_G[10] = 1 then goto PSCATG10
              ELSEIF Ask_T[17] = 1 then goto PSCATT17
              ELSE goto END_POPGRP2

2:  Goto H35LOC	
20C	H35LOC	H35LOC	In what city is Business name located?	Goto H35LOCST	
20C	H35LOCST	H35LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_H35LOCST

ELSEIF Ask_H[36] = 1 then goto PSCATH36
ELSEIF Ask_H[37] = 1 then goto PSCATH37
ELSEIF Ask_G[09] = 1 then goto PSCATG09
ELSEIF Ask_G[10] = 1 then goto PSCATG10
ELSEIF Ask_T[17] = 1 then goto PSCATT17
ELSE goto END_POPGRP2	
20C	PSCATH36	PSCATH36	(Now, please think about the last two years, since the first of (two years ago)./In the last TWO YEARS) have (you/you or anyone in your household) had any expenses for gardening or lawncare services?

1. Yes
2. No	1:  Goto H36_COST

2,DK,RF:  IF Ask_H[37] = 1 then goto PSCATH37
          ELSEIF Ask_G[09] = 1 then goto PSCATG09
          ELSEIF Ask_G[10] = 1 then goto PSCATG10
          ELSEIF Ask_T[17] = 1 then goto PSCATT17
          ELSE goto END_POPGRP2	
20C	H36_COST	H36_COST	In the last TWO YEARS, how much was (your/your household's) last expense for gardening or lawncare services?	IF ENTRY lt 15 or gt 600 then goto ERR1_H36COST

ELSE goto H36STORE	
20C	H36STORE	H36STORE	What is the name of the business where (you/your household) had this expense?

           Enter store, website, or company name	If uppercase entry does not contain.com and is not DK or RF 
   then goto H36PURCH

ELSEIF Ask_H[37] = 1 then goto PSCATH37
ELSEIF Ask_G[09] = 1 then goto PSCATG09
ELSEIF Ask_G[10] = 1 then goto PSCATG10
ELSEIF Ask_T[17] = 1 then goto PSCATT17
ELSE goto END_POPGRP2	
20C	H36PURCH	H36PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_H[37] = 1 then goto PSCATH37
              ELSEIF Ask_G[09] = 1 then goto PSCATG09
              ELSEIF Ask_G[10] = 1 then goto PSCATG10
              ELSEIF Ask_T[17] = 1 then goto PSCATT17
              ELSE goto END_POPGRP2

2:  Goto H36LOC	
20C	H36LOC	H36LOC	In what city is Business name located?	Goto H36LOCST	
20C	H36LOCST	H36LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_H36LOCST

ELSEIF Ask_H[37] = 1 then goto PSCATH37
ELSEIF Ask_G[09] = 1 then goto PSCATG09
ELSEIF Ask_G[10] = 1 then goto PSCATG10
ELSEIF Ask_T[17] = 1 then goto PSCATT17
ELSE goto END_POPGRP2	
20C	PSCATH37	PSCATH37	(Now, please think about the last two years, since the first of (two years ago)./In the last TWO YEARS) have (you/you or anyone in your household) had any expenses for moving, storage, or freight services?

1. Yes
2. No	1:  Goto H37_COST

2,DK,RF:  IF Ask_G[09] = 1 then goto PSCATG09
          ELSEIF Ask_G[10] = 1 then goto PSCATG10
          ELSEIF Ask_T[17] = 1 then goto PSCATT17
          ELSE goto END_POPGRP2	
20C	H37_COST	H37_COST	In the last TWO YEARS, how much was (your/your household's) last expense for moving, storage, or freight services?	GIF ENTRY lt 9 or gt 1800 then goto ERR1_H37COST

ELSE gto H37STORE	
20C	H37STORE	H37STORE	What is the name of the business where (you/your household) had this expense?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK 
   or RF then goto H37PURCH

ELSEIF Ask_G[09] = 1 then goto PSCATG09
ELSEIF Ask_G[10] = 1 then goto PSCATG10
ELSEIF Ask_T[17] = 1 then goto PSCATT17
ELSE goto END_POPGRP2	
20C	H37PURCH	H37PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_G[09] = 1 then goto PSCATG09
              ELSEIF Ask_G[10] = 1 then goto PSCATG10
              ELSEIF Ask_T[17] = 1 then goto PSCATT17
              ELSE goto END_POPGRP2

2:  Goto H37LOC	
20C	H37LOC	H37LOC	In what city is Business name located?	Goto H37LOCST	
20C	H37LOCST	H37LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_H37LOCST

ELSEIF Ask_G[09] = 1 then goto PSCATG09
ELSEIF Ask_G[10] = 1 then goto PSCATG10
ELSEIF Ask_T[17] = 1 then goto PSCATT17
ELSE goto END_POPGRP2	
20C	PSCATG09	PSCATG09	(Now, please think about the last two years, since the first of (two years ago)./In the last TWO YEARS) have (you/you or anyone in your household) had any expenses for legal services?

1. Yes
2. No	1:  Goto G09_COST

2,DK,RF:  IF Ask_G[10] = 1 then goto PSCATG10
          ELSEIF Ask_T[17] = 1 then goto PSCATT17
          ELSE goto END_POPGRP2	
20C	G09_COST	G09_COST	In the last TWO YEARS, how much was (your/your household's) last expense for legal services?	IF ENTRY lt 13 or gt 5000 then goto ERR1_G09COST

ELSE goto G09STORE	
20C	G09STORE	G09STORE	What is the name of the business where (you/your household) had this expense?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
    or RF then goto G09PURCH

ELSEIF Ask_G[10] = 1 then goto PSCATG10
ELSEIF Ask_T[17] = 1 then goto PSCATT17
ELSE goto END_POPGRP2	
20C	G09PURCH	G09PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_G[10] = 1 then goto PSCATG10
              ELSEIF Ask_T[17] = 1 then goto PSCATT17
              ELSE goto END_POPGRP2

2:  Goto G09LOC	
20C	G09LOC	G09LOC	In what city is Business name located?	Goto G09LOCST	
20C	G09LOCST	G09LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_G09LOCST

ELSEIF Ask_G[10] = 1 then goto PSCATG10
ELSEIF Ask_T[17] = 1 then goto PSCATT17
ELSE goto END_POPGRP2	
20C	PSCATG10	PSCATG10	(Now, please think about the last two years, since the first of (two years ago)./In the last TWO YEARS) have (you/you or anyone in your household) had any expenses for funeral services?

1. Yes
2. No	1:  Goto G10_COST

2,DK,RF:  IF Ask_T[17] = 1 then goto PSCATT17
          ELSE goto END_POPGRP2	
20C	G10_COST	G10_COST	In the last TWO YEARS, how much was (your/your household's) last expense for funeral services?	IF ENTRY lt 10 or gt 7000 then goto ERR1_G10COST

ELSE goto G10STORE	
20C	G10STORE	G10STORE	What is the name of the business where (you/your household) had this expense?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK 
   or RF then goto G10PURCH

ELSEIF Ask_T[17] = 1 then goto PSCATT17

ELSE goto END_POPGRP2	
20C	G10PURCH	G10PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_T[17] = 1 then goto PSCATT17
              ELSE goto END_POPGRP2

2:  Goto G10LOC	
20C	G10LOC	G10LOC	In what city is Business name located?	Goto G10LOCST	
20C	G10LOCST	G10LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_G10LOCST

ELSEIF Ask_T[17] = 1 then goto PSCATT17

ELSE goto END_POPGRP2	
20C	PSCATT17	PSCATT17	Now, please think about the last five years, since the first of (Month and Year, five years ago) have (you/you or anyone in your household) had any expenses for ship travel or passenger cruises? 

1. Yes
2. No	1:  Goto T17_COST

2,DK,RF:  Goto END_POPGRP2	
20C	T17_COST	T17_COST	In the last FIVE YEARS, how much did (you/your household) spend on your last expense for ship travel or passenger cruises?	IF ENTRY gt 2800 then goto ERR1_T17COST

ELSE goto T17STORE	
20C	T17STORE	T17STORE	What is the name of the cruise line or ship travel company?

        Enter store, website, or company name	RESPONSE:  Goto T17DIR

DK,RF: Goto END_POPGRP2	
20C	T17DIR	T17DIR	Was the reservation made directly with Business name?

1. Direct
2. Third party	1,DK,RF:   IF uppercase entry in T17STORE contains .COM then  
              goto END_POPGRP2
           ELSE goto T17PURCH

2:  Goto T17THRDP	
20C	T17THRDP	T17THRDP	What is the name of the company you used to make the reservation?

             Enter company name	IF uppercase entry contains ".COM", DK or RF then 
   goto END_POPGRP2

ELSE goto T17PURCH	
20C	T17PURCH	T17PURCH	Was this reservation made -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF: Goto END_POPGRP2

2:  Goto T17LOC	
20C	T17LOC	T17LOC	In what city is (Company name) located?	Goto T17LOCST	
20C	T17LOCST	T17LOCST	? [F1]

In what state is (Company name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_T17LOCST

ELSE goto END_POPGRP2	
		END_POPGRP2		Exit section 20C and goto the next appropriate section	
		POP3_AskFlags			
20C	PGRP3_INTRO	PGRP3_INTRO	The next few questions are about expenses made by (you/you or anyone in your household) during the last 12 months, that is, as far back as (Month and Year, twelve months ago).  We have used the responses that you've already given us to shorten this part of the interview, so I'll only be asking you about expenses that you told me that you did not have in the last three months.

1. Enter 1 to Continue	IF Ask_H[26] = 1 then goto PSCATH26
ELSEIF Ask_H[25] = 1 then goto PSCATH25
ELSEIF Ask_H[17] = 1 then goto PSCATH17
ELSEIF Ask_H[19] = 1 then goto PSCATH19
ELSEIF Ask_H[18] = 1 then goto PSCATH18
ELSEIF Ask_H[20] = 1 then goto PSCATH20
ELSEIF Ask_H[21] = 1 then goto PSCATH21
ELSEIF Ask_H[22] = 1 then goto PSCATH22
ELSEIF Ask_H[23] = 1 then goto PSCATH23
ELSEIF Ask_H[24] = 1 then goto PSCATH24
ELSE goto END_POPGRP3	
20C	PSCATH26	PSCATH26	Now, please think about the last six months, since the first of (Month and Year, six month ago) have (you/you or anyone in your household) purchased any indoor plants or fresh cut flowers?

1. Yes
2. No	1:  Goto H26_COST

2,DK,RF:  IF Ask_H[25] = 1 then goto PSCATH25
          ELSEIF Ask_H[17] = 1 then goto PSCATH17
          ELSEIF Ask_H[19] = 1 then goto PSCATH19
          ELSEIF Ask_H[18] = 1 then goto PSCATH18
          ELSEIF Ask_H[20] = 1 then goto PSCATH20
          ELSEIF Ask_H[21] = 1 then goto PSCATH21
          ELSEIF Ask_H[22] = 1 then goto PSCATH22
          ELSEIF Ask_H[23] = 1 then goto PSCATH23
          ELSEIF Ask_H[24] = 1 then goto PSCATH24
          ELSE goto END_POPGRP3	
20C	H26_COST	H26_COST	In the last SIX MONTHS, how much did (you/your household) spend on your last purchase of indoor plants or fresh cut flowers?	IF ENTRY lt 5 or gt 300 then goto ERR1_H26COST

ELSE goto H26STORE	
20C	H26STORE	H26STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF Uppercase Entry does not contains ".COM" and is not a DK
   or RF then goto H26PURCH

ELSEIF Ask_H[25] = 1 then goto PSCATH25
ELSEIF Ask_H[17] = 1 then goto PSCATH17
ELSEIF Ask_H[19] = 1 then goto PSCATH19
ELSEIF Ask_H[18] = 1 then goto PSCATH18
ELSEIF Ask_H[20] = 1 then goto PSCATH20
ELSEIF Ask_H[21] = 1 then goto PSCATH21
ELSEIF Ask_H[22] = 1 then goto PSCATH22
ELSEIF Ask_H[23] = 1 then goto PSCATH23
ELSEIF Ask_H[24] = 1 then goto PSCATH24
ELSE goto END_POPGRP3	
20C	H26PURCH	H26PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_H[25] = 1 then goto PSCATH25
              ELSEIF Ask_H[17] = 1 then goto PSCATH17
              ELSEIF Ask_H[19] = 1 then goto PSCATH19
              ELSEIF Ask_H[18] = 1 then goto PSCATH18
              ELSEIF Ask_H[20] = 1 then goto PSCATH20
              ELSEIF Ask_H[21] = 1 then goto PSCATH21
              ELSEIF Ask_H[22] = 1 then goto PSCATH22
              ELSEIF Ask_H[23] = 1 then goto PSCATH23
              ELSEIF Ask_H[24] = 1 then goto PSCATH24
              ELSE goto END_POPGRP3

2:  Goto H26LOC	
20C	H26LOC	H26LOC	In what city is (Business Name) located?	Goto H26LOCST	
20C	H26LOCST	H26LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_H26LOCST

ELSEIF Ask_H[25] = 1 then goto PSCATH25
ELSEIF Ask_H[17] = 1 then goto PSCATH17
ELSEIF Ask_H[19] = 1 then goto PSCATH19
ELSEIF Ask_H[18] = 1 then goto PSCATH18
ELSEIF Ask_H[20] = 1 then goto PSCATH20
ELSEIF Ask_H[21] = 1 then goto PSCATH21
ELSEIF Ask_H[22] = 1 then goto PSCATH22
ELSEIF Ask_H[23] = 1 then goto PSCATH23
ELSEIF Ask_H[24] = 1 then goto PSCATH24
ELSE goto END_POPGRP3	
20C	PSCATH25	PSCATH25	(Now, please think about the last six months, since the first of (Six Months Ago)./In the last SIX MONTHS,) have (you/you or anyone in your household) purchased any non-electric kitchen utensils, cookingware, or bakeware?

1. Yes
2. No	1:  Goto H25_COST

2,DK,RF:  IF Ask_H[17] = 1 then goto PSCATH17
          ELSEIF Ask_H[19] = 1 then goto PSCATH19
          ELSEIF Ask_H[18] = 1 then goto PSCATH18
          ELSEIF Ask_H[20] = 1 then goto PSCATH20
          ELSEIF Ask_H[21] = 1 then goto PSCATH21
          ELSEIF Ask_H[22] = 1 then goto PSCATH22
          ELSEIF Ask_H[23] = 1 then goto PSCATH23
          ELSEIF Ask_H[24] = 1 then goto PSCATH24
          ELSE goto END_POPGRP3	
20C	H25_COST	H25_COST	In the last SIX MONTHS, how much did (you/your household) spend on your last purchase of non-electric kitchen utensils, cookingware, or bakeware?	IF ENTRY lt 5 or gt 300 then goto ERR1_H25COST

ELSE goto H25STORE	
20C	H25STORE	H25STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF Uppercase Entry does not contains ".COM" and is not a DK
    or RF then goto H25PURCH

ELSEIF Ask_H[17] = 1 then goto PSCATH17
ELSEIF Ask_H[19] = 1 then goto PSCATH19
ELSEIF Ask_H[18] = 1 then goto PSCATH18
ELSEIF Ask_H[20] = 1 then goto PSCATH20
ELSEIF Ask_H[21] = 1 then goto PSCATH21
ELSEIF Ask_H[22] = 1 then goto PSCATH22
ELSEIF Ask_H[23] = 1 then goto PSCATH23
ELSEIF Ask_H[24] = 1 then goto PSCATH24
ELSE goto END_POPGRP3	
20C	H25PURCH	H25PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_H[17] = 1 then goto PSCATH17
              ELSEIF Ask_H[19] = 1 then goto PSCATH19
              ELSEIF Ask_H[18] = 1 then goto PSCATH18
              ELSEIF Ask_H[20] = 1 then goto PSCATH20
              ELSEIF Ask_H[21] = 1 then goto PSCATH21
              ELSEIF Ask_H[22] = 1 then goto PSCATH22
              ELSEIF Ask_H[23] = 1 then goto PSCATH23
              ELSEIF Ask_H[24] = 1 then goto PSCATH24
              ELSE goto END_POPGRP3

2:  Goto H25LOC	
20C	H25LOC	H25LOC	In what city is (Business Name) located?	Goto H25LOCST	
20C	H25LOCST	H25LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_H25LOCST

ELSEIF Ask_H[17] = 1 then goto PSCATH17
ELSEIF Ask_H[19] = 1 then goto PSCATH19
ELSEIF Ask_H[18] = 1 then goto PSCATH18
ELSEIF Ask_H[20] = 1 then goto PSCATH20
ELSEIF Ask_H[21] = 1 then goto PSCATH21
ELSEIF Ask_H[22] = 1 then goto PSCATH22
ELSEIF Ask_H[23] = 1 then goto PSCATH23
ELSEIF Ask_H[24] = 1 then goto PSCATH24
ELSE goto END_POPGRP3	
20C	PSCATH17	PSCATH17	Now, please think about the last 12 months, since the first of (Month and Year, twelve months ago) have (you/you or anyone in your household) purchased any refrigerators or home freezers?

1. Yes
2. No	1:  Goto H17_COST

2,DK,RF:  IF Ask_H[19] = 1 then goto PSCATH19
          ELSEIF Ask_H[18] = 1 then goto PSCATH18
          ELSEIF Ask_H[20] = 1 then goto PSCATH20
          ELSEIF Ask_H[21] = 1 then goto PSCATH21
          ELSEIF Ask_H[22] = 1 then goto PSCATH22
          ELSEIF Ask_H[23] = 1 then goto PSCATH23
          ELSEIF Ask_H[24] = 1 then goto PSCATH24
          ELSE goto END_POPGRP3	
20C	H17_COST	H17_COST	In the last 12 MONTHS, how much did (you/your household) spend on your last purchase of refrigerators or home freezers?	IF ENTRY lt 40 or gt 1825 then goto ERR1_H17COST

ELSE goto H17STORE	
20C	H17STORE	H17STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF Uppercase Entry does not contains ".COM" and is not a DK
   or RF then goto H17PURCH

ELSEIF Ask_H[19] = 1 then goto PSCATH19
ELSEIF Ask_H[18] = 1 then goto PSCATH18
ELSEIF Ask_H[20] = 1 then goto PSCATH20
ELSEIF Ask_H[21] = 1 then goto PSCATH21
ELSEIF Ask_H[22] = 1 then goto PSCATH22
ELSEIF Ask_H[23] = 1 then goto PSCATH23
ELSEIF Ask_H[24] = 1 then goto PSCATH24
ELSE goto END_POPGRP3	
20C	H17PURCH	H17PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_H[19] = 1 then goto PSCATH19
              ELSEIF Ask_H[18] = 1 then goto PSCATH18
              ELSEIF Ask_H[20] = 1 then goto PSCATH20
              ELSEIF Ask_H[21] = 1 then goto PSCATH21
              ELSEIF Ask_H[22] = 1 then goto PSCATH22
              ELSEIF Ask_H[23] = 1 then goto PSCATH23
              ELSEIF Ask_H[24] = 1 then goto PSCATH24
              ELSE goto END_POPGRP3

2:  Goto H17LOC	
20C	H17LOC	H17LOC	In what city is (Business Name) located?	Goto H17LOCST	
20C	H17LOCST	H17LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_H17LOCST

ELSEIF Ask_H[19] = 1 then goto PSCATH19
ELSEIF Ask_H[18] = 1 then goto PSCATH18
ELSEIF Ask_H[20] = 1 then goto PSCATH20
ELSEIF Ask_H[21] = 1 then goto PSCATH21
ELSEIF Ask_H[22] = 1 then goto PSCATH22
ELSEIF Ask_H[23] = 1 then goto PSCATH23
ELSEIF Ask_H[24] = 1 then goto PSCATH24
ELSE goto END_POPGRP3	
20C	PSCATH19	PSCATH19	(Now, please think about the last 12 months, since the first of (12 Months Ago)./In the last 12 MONTHS,) have (you/you or anyone in your household) purchased any stoves, ovens, or microwave ovens?

1. Yes
2. No	1:  Goto H19_COST

2,DK,RF:  IF Ask_H[18] = 1 then goto PSCATH18
          ELSEIF Ask_H[20] = 1 then goto PSCATH20
          ELSEIF Ask_H[21] = 1 then goto PSCATH21
          ELSEIF Ask_H[22] = 1 then goto PSCATH22
          ELSEIF Ask_H[23] = 1 then goto PSCATH23
          ELSEIF Ask_H[24] = 1 then goto PSCATH24
          ELSE goto END_POPGRP3	
20C	H19_COST	H19_COST	In the last 12 MONTHS, how much did (you/your household) spend on your last purchase of stoves, ovens, or microwave ovens?	IF ENTRY lt 20 or gt 1915 then goto ERR1_H19COST

ELSE goto H19STORE	
20C	H19STORE	H19STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF Uppercase Entry does not contains ".COM" and is not a DK
   or RF then goto H19PURCH

ELSEIF Ask_H[18] = 1 then goto PSCATH18
ELSEIF Ask_H[20] = 1 then goto PSCATH20
ELSEIF Ask_H[21] = 1 then goto PSCATH21
ELSEIF Ask_H[22] = 1 then goto PSCATH22
ELSEIF Ask_H[23] = 1 then goto PSCATH23
ELSEIF Ask_H[24] = 1 then goto PSCATH24
ELSE goto END_POPGRP3	
20C	H19PURCH	H19PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_H[18] = 1 then goto PSCATH18
              ELSEIF Ask_H[20] = 1 then goto PSCATH20
              ELSEIF Ask_H[21] = 1 then goto PSCATH21
              ELSEIF Ask_H[22] = 1 then goto PSCATH22
              ELSEIF Ask_H[23] = 1 then goto PSCATH23
              ELSEIF Ask_H[24] = 1 then goto PSCATH24
              ELSE goto END_POPGRP3

2:  Goto H19LOC	
20C	H19LOC	H19LOC	In what city is (Business Name) located?	Goto H19LOCST	
20C	H19LOCST	H19LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_H19LOCST

ELSEIF Ask_H[18] = 1 then goto PSCATH18
ELSEIF Ask_H[20] = 1 then goto PSCATH20
ELSEIF Ask_H[21] = 1 then goto PSCATH21
ELSEIF Ask_H[22] = 1 then goto PSCATH22
ELSEIF Ask_H[23] = 1 then goto PSCATH23
ELSEIF Ask_H[24] = 1 then goto PSCATH24
ELSE goto END_POPGRP3	
20C	PSCATH18	PSCATH18	(Now, please think about the last 12 months, since the first of (12 Months Ago)./In the last 12 MONTHS,) have (you/you or anyone in your household) purchased any washers or dryers?

1. Yes
2. No	1:  Goto H18_COST

2,DK,RF:  IF Ask_H[20] = 1 then goto PSCATH20
          ELSEIF Ask_H[21] = 1 then goto PSCATH21
          ELSEIF Ask_H[22] = 1 then goto PSCATH22
          ELSEIF Ask_H[23] = 1 then goto PSCATH23
          ELSEIF Ask_H[24] = 1 then goto PSCATH24
          ELSE goto END_POPGRP3	
20C	H18_COST	H18_COST	In the last 12 MONTHS, how much did (you/your household) spend on your last purchase of washers or dryers?	IF ENTRY lt 40 or gt 1185 then goto ERR1_H18COST

ELSE goto H18STORE	
20C	H18STORE	H18STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF Uppercase Entry does not contains ".COM" and is not a DK
   or RF then goto H18PURCH

ELSEIF Ask_H[20] = 1 then goto PSCATH20
ELSEIF Ask_H[21] = 1 then goto PSCATH21
ELSEIF Ask_H[22] = 1 then goto PSCATH22
ELSEIF Ask_H[23] = 1 then goto PSCATH23
ELSEIF Ask_H[24] = 1 then goto PSCATH24
ELSE goto END_POPGRP3	
20C	H18PURCH	H18PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_H[20] = 1 then goto PSCATH20
              ELSEIF Ask_H[21] = 1 then goto PSCATH21
              ELSEIF Ask_H[22] = 1 then goto PSCATH22
              ELSEIF Ask_H[23] = 1 then goto PSCATH23
              ELSEIF Ask_H[24] = 1 then goto PSCATH24
              ELSE goto END_POPGRP3

2:  Goto H18LOC	
20C	H18LOC	H18LOC	In what city is Business name located?	Goto H18LOCST	
20C	H18LOCST	H18LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_H18LOCST

ELSEIF Ask_H[20] = 1 then goto PSCATH20
ELSEIF Ask_H[21] = 1 then goto PSCATH21
ELSEIF Ask_H[22] = 1 then goto PSCATH22
ELSEIF Ask_H[23] = 1 then goto PSCATH23
ELSEIF Ask_H[24] = 1 then goto PSCATH24
ELSE goto END_POPGRP3	
20C	PSCATH20	PSCATH20	(Now, please think about the last 12 months, since the first of (12 Months Ago)./In the last 12 MONTHS,) have (you/you or anyone in your household) purchased any vacuums or other electric floor cleaning equipment?

1. Yes
2. No	1:  Goto H20_COST

2,DK,RF:  IF Ask_H[21] = 1 then goto PSCATH21
          ELSEIF Ask_H[22] = 1 then goto PSCATH22
          ELSEIF Ask_H[23] = 1 then goto PSCATH23
          ELSEIF Ask_H[24] = 1 then goto PSCATH24
          ELSE goto END_POPGRP3	
20C	H20_COST	H20_COST	In the last 12 MONTHS, how much did (you/your household) spend on your last purchase of vacuums or other electric floor cleaning equipment?	IF ENTRY lt 15 or gt 600 then goto ERR1_H20COST

ELSE goto H20STORE	
20C	H20STORE	H20STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF Uppercase Entry does not contains ".COM" and is not a DK
   or RF then goto H20PURCH

ELSEIF Ask_H[21] = 1 then goto PSCATH21
ELSEIF Ask_H[22] = 1 then goto PSCATH22
ELSEIF Ask_H[23] = 1 then goto PSCATH23
ELSEIF Ask_H[24] = 1 then goto PSCATH24
ELSE goto END_POPGRP3	
20C	H20PURCH	H20PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_H[21] = 1 then goto PSCATH21
              ELSEIF Ask_H[22] = 1 then goto PSCATH22
              ELSEIF Ask_H[23] = 1 then goto PSCATH23
              ELSEIF Ask_H[24] = 1 then goto PSCATH24
              ELSE goto END_POPGRP3

2:  Goto H20LOC	
20C	H20LOC	H20LOC	In what city is Business name located?	Goto H20LOCST	
20C	H20LOCST	H20LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_H20LOCST

ELSEIF Ask_H[21] = 1 then goto PSCATH21
ELSEIF Ask_H[22] = 1 then goto PSCATH22
ELSEIF Ask_H[23] = 1 then goto PSCATH23
ELSEIF Ask_H[24] = 1 then goto PSCATH24
ELSE goto END_POPGRP3	
20C	PSCATH21	PSCATH21	(Now, please think about the last 12 months, since the first of (12 Months Ago)./In the last 12 MONTHS,) have (you/you or anyone in your household) purchased any small electric appliances or clothing irons?

1. Yes
2. No	1:  Goto H21_COST

2,DK,RF:  IF Ask_H[21] = 1 then goto PSCATH21
          ELSEIF Ask_H[22] = 1 then goto PSCATH22
          ELSEIF Ask_H[23] = 1 then goto PSCATH23
          ELSEIF Ask_H[24] = 1 then goto PSCATH24
          ELSE goto END_POPGRP3	
20C	H21_COST	H21_COST	In the last 12 MONTHS, how much did (you/your household) spend on your last purchase of small electric appliances or clothing irons?	IF ENTRY lt 6 or gt 200 then goto ERR1_H21COST

ELSE goto H21STORE	
20C	H21STORE	H21STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF Uppercase Entry does not contains ".COM" and is not a DK
   or RF then goto H21PURCH

ELSEIF Ask_H[22] = 1 then goto PSCATH22
ELSEIF Ask_H[23] = 1 then goto PSCATH23
ELSEIF Ask_H[24] = 1 then goto PSCATH24
ELSE goto END_POPGRP3	
20C	H21PURCH	H21PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_H[22] = 1 then goto PSCATH22
              ELSEIF Ask_H[23] = 1 then goto PSCATH23
              ELSEIF Ask_H[24] = 1 then goto PSCATH24
              ELSE goto END_POPGRP3

2:  Goto H21LOC	
20C	H21LOC	H21LOC	In what city is (Business Name) located?	Goto H21LOCST	
20C	H21LOCST	H21LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_H21LOCST

ELSEIF Ask_H[22] = 1 then goto PSCATH22
ELSEIF Ask_H[23] = 1 then goto PSCATH23
ELSEIF Ask_H[24] = 1 then goto PSCATH24
ELSE goto END_POPGRP3	
20C	PSCATH22	PSCATH22	(Now, please think about the last 12 months, since the first of (12 Months Ago)./In the last 12 MONTHS,) have (you/you or anyone in your household) purchased any home heating or cooling equipment or home safety devices?

1. Yes
2. No	1:  Goto H22_COST

2,DK,RF:  IF Ask_H[23] = 1 then goto PSCATH23
          ELSEIF Ask_H[24] = 1 then goto PSCATH24
          ELSE goto END_POPGRP3	
20C	H22_COST	H22_COST	In the last 12 MONTHS, how much did (you/your household) spend on your last purchase of home heating or cooling equipment or home safety devices?	IF ENTRY lt 5 or gt 940 then goto ERR1_H22COST

ELSE goto H22STORE	
20C	H22STORE	H22STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF Uppercase Entry does not contains ".COM" and is not a DK
   or RF then goto H22PURCH

ELSEIF Ask_H[23] = 1 then goto PSCATH23
ELSEIF Ask_H[24] = 1 then goto PSCATH24
ELSE goto END_POPGRP3	
20C	H22PURCH	H22PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_H[23] = 1 then goto PSCATH23
              ELSEIF Ask_H[24] = 1 then goto PSCATH24
              ELSE goto END_POPGRP3

2:  Goto H22LOC	
20C	H22LOC	H22LOC	In what city is (Business Name) located?	Goto H22LOCST	
20C	H22LOCST	H22LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_H22LOCST

ELSEIF Ask_H[23] = 1 then goto PSCATH23
ELSEIF Ask_H[24] = 1 then goto PSCATH24
ELSE goto END_POPGRP3	
20C	PSCATH23	PSCATH23	(Now, please think about the last 12 months, since the first of (12 Months Ago)./In the last 12 MONTHS,) have (you/you or anyone in your household) purchased any household decorative items including clocks and lamps?

1. Yes
2. No	1:  Goto H23_COST

2,DK,RF:  IF Ask_H[24] = 1 then goto PSCATH24
          ELSE goto END_POPGRP3	
20C	H23_COST	H23_COST	In the last 12 MONTHS, how much did (you/your household) spend on your last purchase of household decorative items including clocks and lamps?	IF ENTRY lt 5 or gt 530 then goto ERR1_H23COST

ELSE goto H23STORE	
20C	H23STORE	H23STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF Uppercase Entry does not contains ".COM" and is not a DK
   or RF then goto H23PURCH

ELSEIF Ask_H[24] = 1 then goto PSCATH24
ELSE goto END_POPGRP3	
20C	H23PURCH	H23PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_H[24] = 1 then goto PSCATH24
              ELSE goto END_POPGRP3

2:  Goto H23LOC	
20C	H23LOC	H23LOC	In what city is Business name located?	Goto H23LOCST	
20C	H23LOCST	H23LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_H23LOCST

ELSEIF Ask_H[24] = 1 then goto PSCATH24
ELSE goto END_POPGRP3	
20C	PSCATH24	PSCATH24	(Now, please think about the last 12 months, since the first of 12 Months Ago)./In the last 12 MONTHS,) have (you/you or anyone in your household) purchased any dishes, glasses, or flatware?

1. Yes
2. No	1:  Goto H24_COST

2,DK,RF:   Goto END_POPGRP3	
20C	H24_COST	H24_COST	In the last 12 MONTHS, how much did (you/your household) spend on your last purchase of dishes, glasses, or flatware?	IF ENTRY lt 5 or gt 415 then goto ERR1_H24COST

ELSE goto H24STORE	
20C	H24STORE	H24STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF Uppercase Entry does not contains ".COM" and is not a DK
   or RF then goto H24PURCH

ELSE goto END_POPGRP3	
20C	H24PURCH	H24PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF: Goto END_POPGRP3

2:  Goto H24LOC	
20C	H24LOC	H24LOC	In what city is Business name located?	Goto H24LOCST	
20C	H24LOCST	H24LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_H24LOCST

ELSE goto END_POPGRP3	
		END_POPGRP3			
		POP4_AskFlags			
20C	PGRP4_INTRO	PGRP4_INTRO	The next few questions are about expenses made by (you/you or anyone in your household) during the last five years, that is, as far back as (year, 5 years ago).  We have used the responses that you've already given us to shorten this part of the interview, so I'll only be asking you about expenses that you told me that you did not have in the last three months.

1. Enter 1 to Continue	IF Ask_E[01] = 1 then goto PSCATE01

ELSEIF Ask_E[02] = 1 then goto PSCATE02

ELSEIF Ask_E[06] = 1 then goto PSCATE06

ELSEIF Ask_E[05] = 1 then goto PSCATE05

ELSEIF Ask_E[04] = 1 then goto PSCATE04

ELSEIF Ask_E[07] = 1 then goto PSCATE07

ELSE goto END_POPGRP4	
20C	PSCATE01	PSCATE01	Now, please think about the last 12 months, since the first of (Month and Year, twelve months ago) have (you/you or anyone in your household) purchased any college or university textbooks?

1. Yes
2. No	1:  Goto E01_COST

2,DK,RF:  IF Ask_E[02] = 1 then goto PSCATE02
          ELSEIF Ask_E[06] = 1 then goto PSCATE06
          ELSEIF Ask_E[05] = 1 then goto PSCATE05
          ELSEIF Ask_E[04] = 1 then goto PSCATE04
          ELSEIF Ask_E[07] = 1 then goto PSCATE07
          ELSE goto END_POPGRP4	
20C	E01_COST	E01_COST	In the last 12 MONTHS, how much did (you/your household) spend on your last purchase of college or university textbooks?	IF ENTRY lt 5 or gt 500 then goto ERR1_E01COST

ELSE goto E01STORE	
20C	E01STORE	E01STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF Uppercase Entry does not contains ".COM" and is not a DK
   or RF then goto E01PURCH

ELSEIF Ask_E[02] = 1 then goto PSCATE02

ELSEIF Ask_E[06] = 1 then goto PSCATE06

ELSEIF Ask_E[05] = 1 then goto PSCATE05

ELSEIF Ask_E[04] = 1 then goto PSCATE04

ELSEIF Ask_E[07] = 1 then goto PSCATE07

ELSE goto END_POPGRP4	
20C	E01PURCH	E01PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_E[02] = 1 then goto PSCATE02
              ELSEIF Ask_E[06] = 1 then goto PSCATE06
              ELSEIF Ask_E[05] = 1 then goto PSCATE05
              ELSEIF Ask_E[04] = 1 then goto PSCATE04
              ELSEIF Ask_E[07] = 1 then goto PSCATE07
              ELSE goto END_POPGRP4

2:  Goto E01LOC	
20C	E01LOC	E01LOC	In what city is (Business Name) located?	Goto E01LOCST	
20C	E01LOCST	E01LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_E01LOCST

ELSEIF Ask_E[02] = 1 then goto PSCATE02

ELSEIF Ask_E[06] = 1 then goto PSCATE06

ELSEIF Ask_E[05] = 1 then goto PSCATE05

ELSEIF Ask_E[04] = 1 then goto PSCATE04

ELSEIF Ask_E[07] = 1 then goto PSCATE07

ELSE goto END_POPGRP4	
20C	PSCATE02	PSCATE02	(Now, please think about the last 12 months, since the first of (12 Months Ago)./In the last 12 MONTHS,) have (you/you or anyone in your household) purchased any textbooks for elementary through high school?

1. Yes
2. No	1:  Goto E02_COST

2,DK,RF:  IF Ask_E[06] = 1 then goto PSCATE06
          ELSEIF Ask_E[05] = 1 then goto PSCATE05
          ELSEIF Ask_E[04] = 1 then goto PSCATE04
          ELSEIF Ask_E[07] = 1 then goto PSCATE07
          ELSE goto END_POPGRP4	
20C	E02_COST	E02_COST	In the last 12 MONTHS, how much did (you/your household) spend on your last purchase of textbooks for elementary through high school?	IF ENTRY lt 5 or gt 500 then goto ERR1_E02COST

ELSE goto E02STORE	
20C	E02STORE	E02STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF Uppercase Entry does not contains ".COM" and is not a DK or RF then goto E02PURCH

ELSEIF Ask_E[06] = 1 then goto PSCATE06

ELSEIF Ask_E[05] = 1 then goto PSCATE05

ELSEIF Ask_E[04] = 1 then goto PSCATE04

ELSEIF Ask_E[07] = 1 then goto PSCATE07

ELSE goto END_POPGRP4	
20C	E02PURCH	E02PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_E[06] = 1 then goto PSCATE06
              ELSEIF Ask_E[05] = 1 then goto PSCATE05
              ELSEIF Ask_E[04] = 1 then goto PSCATE04
              ELSEIF Ask_E[07] = 1 then goto PSCATE07
              ELSE goto END_POPGRP4

2:  Goto E02LOC	
20C	E02LOC	E02LOC	In what city is (Business Name) located?	Goto E02LOCST	
20C	E02LOCST	E02LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_E02LOCST

ELSEIF Ask_E[06] = 1 then goto PSCATE06

ELSEIF Ask_E[05] = 1 then goto PSCATE05

ELSEIF Ask_E[04] = 1 then goto PSCATE04

ELSEIF Ask_E[07] = 1 then goto PSCATE07

ELSE goto END_POPGRP4	
20C	PSCATE06	PSCATE06	(Now, please think about the last 12months, since the first of (12 Months Ago)./In the last 12 MONTHS,) have (you/you or anyone in your household) had any expenses for day care providers including nursery school?

1. Yes
2. No	1:  Goto E06_COST

2,DK,RF:  IF Ask_E[05] = 1 then goto PSCATE05
          ELSEIF Ask_E[04] = 1 then goto PSCATE04
          ELSEIF Ask_E[07] = 1 then goto PSCATE07
          ELSE goto END_POPGRP4	
20C	E06_COST	E06_COST	In the last 12 MONTHS, how much was (your/your household's) last expense for day care providers including nursery school?	IF ENTRY lt 30 or gt 6000 then goto ERR1_E06COST

ELSE goto E06STORE	
20C	E06STORE	E06STORE	What is the name of the business where (you/your household) had this expense?

           Enter store, website, or company name	IF Uppercase Entry does not contains ".COM" and is not a DK or RF then goto E06PURCH

ELSEIF Ask_E[05] = 1 then goto PSCATE05

ELSEIF Ask_E[04] = 1 then goto PSCATE04

ELSEIF Ask_E[07] = 1 then goto PSCATE07

ELSE goto END_POPGRP4	
20C	E06PURCH	E06PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_E[05] = 1 then goto PSCATE05
              ELSEIF Ask_E[04] = 1 then goto PSCATE04
              ELSEIF Ask_E[07] = 1 then goto PSCATE07
              ELSE goto END_POPGRP4

2:  Goto E06LOC	
20C	E06LOC	E06LOC	In what city is (Business Name) located?	Goto E06LOCST	
20C	E06LOCST	E06LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_E06LOCST

ELSEIF Ask_E[05] = 1 then goto PSCATE05

ELSEIF Ask_E[04] = 1 then goto PSCATE04

ELSEIF Ask_E[07] = 1 then goto PSCATE07

ELSE goto END_POPGRP4	
20C	PSCATE05	PSCATE05	(Now, please think about the last 12 months, since the first of (12 Months Ago)./In the last 12 MONTHS,) have (you/you or anyone in your household) had any expenses for tuition or fixed fees for elementary through high school?

1. Yes
2. No	1:  Goto E05_COST

2,DK,RF:  IF Ask_E[04] = 1 then goto PSCATE04
          ELSEIF Ask_E[07] = 1 then goto PSCATE07
          ELSE goto END_POPGRP4	
20C	E05_COST	E05_COST	In the last 12 MONTHS, how much was (your/your household's) last expense for tuition or fixed fees for elementary through high school? 	IF ENTRY lt 5 or gt 6000 then goto ERR1_E05COST

ELSE goto E05STORE	
20C	E05STORE	E05STORE	What is the name of the business where (you/your household) had this expense?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK 
   or RF then goto E05PURCH

ELSEIF Ask_E[04] = 1 then goto PSCATE04

ELSEIF Ask_E[07] = 1 then goto PSCATE07

ELSE goto END_POPGRP4	
20C	E05PURCH	E05PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_E[04] = 1 then goto PSCATE04
              ELSEIF Ask_E[07] = 1 then goto PSCATE07
              ELSE goto END_POPGRP4

2:  Goto E05LOC	
20C	E05LOC	E05LOC	In what city is (Business Name) located?	Goto E05LOCST	
20C	E05LOCST	E05LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_E05LOCST

ELSEIF Ask_E[04] = 1 then goto PSCATE04

ELSEIF Ask_E[07] = 1 then goto PSCATE07

ELSE goto END_POPGRP4	
20C	PSCATE04	PSCATE04	(Now, please think about the last 12 months, since the first of (12 Months Ago)./In the last 12 MONTHS,) have (you/you or anyone in your household) had any expenses for tuition or fixed fees for college or university?

1. Yes
2. No	1:  Goto E04_COST

2,DK,RF:  IF Ask_E[07] = 1 then goto PSCATE07
          ELSE goto END_POPGRP4	
20C	E04_COST	E04_COST	In the last 12 MONTHS, how much was (your/your household's) last expense for tuition or fixed fees for college or university? 	IF ENTRY lt 5 or gt 6000 then goto ERR1_E04COST

ELSE goto E04STORE	
20C	E04STORE	E04STORE	What is the name of the business where  (you/your household) had this expense?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK 
   or RF then goto E04PURCH

ELSEIF Ask_E[07] = 1 then goto PSCATE07

ELSE goto END_POPGRP4	
20C	E04PURCH	E04PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_E[07] = 1 then goto PSCATE07
              ELSE goto END_POPGRP4

2:  Goto E04LOC	
20C	E04LOC	E04LOC	In what city is (Business Name) located?	Goto E04LOCST	
20C	E04LOCST	E04LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_E04LOCST

ELSEIF Ask_E[07] = 1 then goto PSCATE07

ELSE goto END_POPGRP4	
20C	PSCATE07	PSCATE07	Now please think about the last five years, since the first (Month and Year, five years ago) have (you/you or anyone in your household) had any expenses for tuition or fixed fees for technical or vocational school?

1. Yes
2. No	1:  Goto E07_COST

2,DK,RF:  Goto END_POPGRP4	
20C	E07_COST	E07_COST	In the last FIVE YEARS, how much was (your/your household's) last expense for tuition or fixed fees for technical or vocational school? 	IF ENTRY lt 5 or gt 6000 then goto ERR1_E07COST

ELSE goto E07STORE	
20C	E07STORE	E07STORE	What is the name of the business where (you/your household) had this expense?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK 
   or RF then goto E07PURCH

ELSE goto END_POPGRP4	
20C	E07PURCH	E07PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  Goto END_POPGRP4

2:  Goto E07LOC	
20C	E07LOC	E07LOC	In what city is (Business Name) located?	Goto E07LOCST	
20C	E07LOCST	E07LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_E07LOCST

ELSE goto END_POPGRP4	
		END_POPGRP4		Exit section 20C and goto the next appropriate section	
		POP5_AskFlags			
20C	PGRP5_INTRO	PGRP5_INTRO	The next few questions are about expenses made by (you/you or anyone in your household) during the last 12 months, that is, as far back as (Month and Year, twelve months ago).  We have used the responses that you've already given us to shorten this part of the interview, so I'll only be asking you about expenses that you told me that you did not have in the last three months.

1. Enter 1 to Continue	IF Ask_A[06] = 1 then goto PSCATA06
ELSEIF Ask_A[07] = 1 then goto PSCATA07
ELSEIF Ask_A[01] = 1 then goto PSCATA01
ELSEIF Ask_A[02] = 1 then goto PSCATA02
ELSEIF Ask_R[01] = 1 then goto PSCATR01
ELSEIF Ask_R[03] = 1 then goto PSCATR03
ELSEIF Ask_R[06] = 1 then goto PSCATR06
ELSE goto END_POPGRP5	
20C	PSCATA06	PSCATA06	Now, please think about the last six months, since the first of (Month and Year, six month ago) have (you/you or anyone in your household) purchased any men's shirts, sweaters, or vests?

1. Yes
2. No	1:  Goto A06_COST

2,DK,RF:  IF Ask_A[07] = 1 then goto PSCATA07
          ELSEIF Ask_A[01] = 1 then goto PSCATA01
          ELSEIF Ask_A[02] = 1 then goto PSCATA02
          ELSEIF Ask_R[01] = 1 then goto PSCATR01
          ELSEIF Ask_R[03] = 1 then goto PSCATR03
          ELSEIF Ask_R[06] = 1 then goto PSCATR06
          ELSE goto END_POPGRP5	
20C	A06_COST	A06_COST	In the last SIX MONTHS, how much did (you/your household) spend on your last purchase of men's shirts, sweaters, or vests?	IF ENTRY lt 5 or gt 300 then goto ERR1_A06COST

ELSE goto A06STORE	
20C	A06STORE	A06STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK 
    or RF then goto A06PURCH

ELSEIF Ask_A[07] = 1 then goto PSCATA07
ELSEIF Ask_A[01] = 1 then goto PSCATA01
ELSEIF Ask_A[02] = 1 then goto PSCATA02
ELSEIF Ask_R[01] = 1 then goto PSCATR01
ELSEIF Ask_R[03] = 1 then goto PSCATR03
ELSEIF Ask_R[06] = 1 then goto PSCATR06
ELSE goto END_POPGRP5	
20C	A06PURCH	A06PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:   IF Ask_A[07] = 1 then goto PSCATA07
               ELSEIF Ask_A[01] = 1 then goto PSCATA01
               ELSEIF Ask_A[02] = 1 then goto PSCATA02
               ELSEIF Ask_R[01] = 1 then goto PSCATR01
               ELSEIF Ask_R[03] = 1 then goto PSCATR03
               ELSEIF Ask_R[06] = 1 then goto PSCATR06
               ELSE goto END_POPGRP5
                    
2:  Goto A06LOC	
20C	A06LOC	A06LOC	In what city is (Business Name) located?	Goto A06LOCST	
20C	A06LOCST	A06LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_A06LOCST

ELSEIF Ask_A[07] = 1 then goto PSCATA07
ELSEIF Ask_A[01] = 1 then goto PSCATA01
ELSEIF Ask_A[02] = 1 then goto PSCATA02
ELSEIF Ask_R[01] = 1 then goto PSCATR01
ELSEIF Ask_R[03] = 1 then goto PSCATR03
ELSEIF Ask_R[06] = 1 then goto PSCATR06
ELSE goto END_POPGRP5	
20C	PSCATA07	PSCATA07	(Now, please think about the last six months, since the first of (Six Months Ago)./In the last SIX MONTHS,) have (you/you or anyone in your household) purchased any men's pants, jeans, or shorts?

1. Yes
2. No	1:  Goto A07_COST

2,DK,RF:  IF Ask_A[01] = 1 then goto PSCATA01
          ELSEIF Ask_A[02] = 1 then goto PSCATA02
          ELSEIF Ask_R[01] = 1 then goto PSCATR01
          ELSEIF Ask_R[03] = 1 then goto PSCATR03
          ELSEIF Ask_R[06] = 1 then goto PSCATR06
          ELSE goto END_POPGRP5	
20C	A07_COST	A07_COST	In the last SIX MONTHS, how much did (you/your household) spend on your last purchase of men's pants, jeans, or shorts?	IF ENTRY lt 10 or gt 270 then goto ERR1_A07COST

ELSE goto A07STORE	
20C	A07STORE	A07STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
   or RF then goto A07PURCH

ELSEIF Ask_A[01] = 1 then goto PSCATA01
ELSEIF Ask_A[02] = 1 then goto PSCATA02
ELSEIF Ask_R[01] = 1 then goto PSCATR01
ELSEIF Ask_R[03] = 1 then goto PSCATR03
ELSEIF Ask_R[06] = 1 then goto PSCATR06
ELSE goto END_POPGRP5	
20C	A07PURCH	A07PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:   IF Ask_A[01] = 1 then goto PSCATA01
               ELSEIF Ask_A[02] = 1 then goto PSCATA02
               ELSEIF Ask_R[01] = 1 then goto PSCATR01
               ELSEIF Ask_R[03] = 1 then goto PSCATR03
               ELSEIF Ask_R[06] = 1 then goto PSCATR06
               ELSE goto END_POPGRP5
                    
2:  Goto A07LOC	
20C	A07LOC	A07LOC	In what city is (Business Name) located?	Goto A07LOCST	
20C	A07LOCST	A07LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_A07LOCST

ELSEIF Ask_A[01] = 1 then goto PSCATA01
ELSEIF Ask_A[02] = 1 then goto PSCATA02
ELSEIF Ask_R[01] = 1 then goto PSCATR01
ELSEIF Ask_R[03] = 1 then goto PSCATR03
ELSEIF Ask_R[06] = 1 then goto PSCATR06
ELSE goto END_POPGRP5	
20C	PSCATA01	PSCATA01	Now, please think about the last 12 months, since the first of (Month and Year, twelve months ago) have (you/you or anyone in your household) purchased any men's suits or blazers?

1. Yes
2. No	1:  Goto A01_COST

2,DK,RF:  IF Ask_A[02] = 1 then goto PSCATA02
          ELSEIF Ask_R[01] = 1 then goto PSCATR01
          ELSEIF Ask_R[03] = 1 then goto PSCATR03
          ELSEIF Ask_R[06] = 1 then goto PSCATR06
          ELSE goto END_POPGRP5	
20C	A01_COST	A01_COST	In the last 12 MONTHS, how much did (you/your household) spend on your last purchase of men's suits or blazers?	IF ENTRY lt 10 or gt 1000 then goto ERR1_A01COST

ELSE goto A01STORE	
20C	A01STORE	A01STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK 
   or RF then goto A01PURCH

ELSEIF Ask_A[02] = 1 then goto PSCATA02
ELSEIF Ask_R[01] = 1 then goto PSCATR01
ELSEIF Ask_R[03] = 1 then goto PSCATR03
ELSEIF Ask_R[06] = 1 then goto PSCATR06
ELSE goto END_POPGRP5	
20C	A01PURCH	A01PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:   IF Ask_A[02] = 1 then goto PSCATA02
               ELSEIF Ask_R[01] = 1 then goto PSCATR01
               ELSEIF Ask_R[03] = 1 then goto PSCATR03
               ELSEIF Ask_R[06] = 1 then goto PSCATR06
               ELSE goto END_POPGRP5
                  
2:  Goto A01LOC	
20C	A01LOC	A01LOC	In what city is (Business Name) located?	Goto A01LOCST	
20C	A01LOCST	A01LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_A01LOCST

ELSEIF Ask_A[02] = 1 then goto PSCATA02
ELSEIF Ask_R[01] = 1 then goto PSCATR01
ELSEIF Ask_R[03] = 1 then goto PSCATR03
ELSEIF Ask_R[06] = 1 then goto PSCATR06
ELSE goto END_POPGRP5	
20C	PSCATA02	PSCATA02	(Now, please think about the last 12 months, since the first of (12 Months Ago)./In the last 12 MONTHS,) have (you/you or anyone in your household) purchased any men's coats or jackets?

1. Yes
2. No	1:  Goto A02_COST

2,DK,RF:  IF Ask_R[01] = 1 then goto PSCATR01
          ELSEIF Ask_R[03] = 1 then goto PSCATR03
          ELSEIF Ask_R[06] = 1 then goto PSCATR06
          ELSE goto END_POPGRP5	
20C	A02_COST	A02_COST	In the last 12 MONTHS, how much did (you/your household) spend on your last purchase of men's coats or jackets?	IF ENTRY lt 10 or gt 400 then goto ERR1_A02COST

ELSE goto A02STORE	
20C	A02STORE	A02STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK 
   or RF then goto A02PURCH

ELSEIF Ask_R[01] = 1 then goto PSCATR01
ELSEIF Ask_R[03] = 1 then goto PSCATR03
ELSEIF Ask_R[06] = 1 then goto PSCATR06
ELSE goto END_POPGRP5	
20C	A02PURCH	A02PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:   IF Ask_R[01] = 1 then goto PSCATR01
               ELSEIF Ask_R[03] = 1 then goto PSCATR03
               ELSEIF Ask_R[06] = 1 then goto PSCATR06
               ELSE goto END_POPGRP5
                  
2:  Goto A02LOC	
20C	A02LOC	A02LOC	In what city is (Business Name) located?	Goto A02LOCST	
20C	A02LOCST	A02LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_A02LOCST

ELSEIF Ask_R[01] = 1 then goto PSCATR01
ELSEIF Ask_R[03] = 1 then goto PSCATR03
ELSEIF Ask_R[06] = 1 then goto PSCATR06
ELSE goto END_POPGRP5	
20C	PSCATR01	PSCATR01	(Now, please think about the last 12 months, since the first of 12 Months Ago)./In the last 12 months) have (you/you or anyone in your household) purchased any televisions?

1. Yes
2. No	1:  Goto R01_COST

2,DK,RF:  IF Ask_R[03] = 1 then goto PSCATR03
          ELSEIF Ask_R[06] = 1 then goto PSCATR06
          ELSE goto END_POPGRP5	
20C	R01_COST	R01_COST	In the last 12 MONTHS, how much did (you/your household) spend on your last purchase of televisions?	IF ENTRY lt 10 or gt 4200 then goto ERR1_R01COST

ELSE goto R01STORE	
20C	R01STORE	R01STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK 
   or RF then goto R01PURCH
 
ELSEIF Ask_R[03] = 1 then goto PSCATR03
ELSEIF Ask_R[06] = 1 then goto PSCATR06
ELSE goto END_POPGRP5	
20C	R01PURCH	R01PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:   IF Ask_R[03] = 1 then goto PSCATR03
               ELSEIF Ask_R[06] = 1 then goto PSCATR06
               ELSE goto END_POPGRP5 
                  
2:  Goto R01LOC	
20C	R01LOC	R01LOC	In what city is (Business Name) located?	Goto R01LOCST	
20C	R01LOCST	R01LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_R01LOCST

ELSEIF Ask_R[03] = 1 then goto PSCATR03
ELSEIF Ask_R[06] = 1 then goto PSCATR06
ELSE goto END_POPGRP5	
20C	PSCATR03	PSCATR03	(Now, please think about the last 12 months, since the first of (12 Months Ago)./In the last 12 months) have (you/you or anyone in your household) purchased any DVD players, camcorders, or other video equipment?

1. Yes
2. No	1:  Goto R03_COST

2,DK,RF:  IF Ask_R[06] = 1 then goto PSCATR06
          ELSE goto END_POPGRP5	
20C	R03_COST	R03_COST	In the last 12 MONTHS, how much did (you/your household) spend on your last purchase of DVD players, camcorders, or other video equipment?	IF ENTRY lt 25 or gt 2800 then goto ERR1_R03COST

ELSE goto R03STORE	
20C	R03STORE	R03STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK 
   or RF then goto R03PURCH

ELSEIF Ask_R[06] = 1 then goto PSCATR06
ELSE goto END_POPGRP5	
20C	R03PURCH	R03PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:   IF Ask_R[06] = 1 then goto PSCATR06
               ELSE goto END_POPGRP5
                  
2:  Goto R03LOC	
20C	R03LOC	R03LOC	In what city is (Business Name) located?	Goto R03LOCST	
20C	R03LOCST	R03LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_R03LOCST

ELSEIF Ask_R[06] = 1 then goto PSCATR06
ELSE goto END_POPGRP5	
20C	PSCATR06	PSCATR06	(Now, please think about the last 12 months, since the first of (12 Months Ago)./In the last 12 months) have (you/you or anyone in your household) purchased any audio equipment for automobiles or home?

1. Yes
2. No	1:  Goto R06_COST

2,DK,RF:  Goto END_POPGRP5	
20C	R06_COST	R06_COST	In the last 12 MONTHS, how much did (you/your household) spend on your last purchase of audio equipment for automobiles or home?	IF ENTRY lt 5 or gt 1590 then goto ERR1_R06COST

ELSE goto R06STORE	
20C	R06STORE	R06STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK 
   or RF then goto R06PURCH

ELSE goto END_POPGRP5	
20C	R06PURCH	R06PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF: Goto END_POPGRP5  
                  
2:  Goto R06LOC	
20C	R06LOC	R06LOC	In what city is (Business Name) located?	Goto R06LOCST	
20C	R06LOCST	R06LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_R06LOCST

ELSE goto END_POPGRP5	
		END_POPGRP5		Exit section 20C and goto the next appropriate section	
		POP6_AskFlags			
20C	PGRP6_INTRO	PGRP6_INTRO	The next few questions are about expenses made by (you/you or anyone in your household) during the last two years, that is, as far back as (Month and Year, two years ago).  We have used the responses that you've already given us to shorten this part of the interview, so I'll only be asking you about expenses that you told me that you did not have in the last three months.

1. Enter 1 to Continue	IF Ask_R[20] = 1 then goto PSCATR20
ELSEIF Ask_R[17] = 1 then goto PSCATR17
ELSEIF Ask_R[18] = 1 then goto PSCATR18
ELSEIF Ask_R[19] = 1 then goto PSCATR19
ELSEIF Ask_T[04] = 1 then goto PSCATT04
ELSE goto END_POPGRP6	
20C	PSCATR20	PSCATR20	Now, please think about the last six months, since the first of (Month and Year, six month ago)
have (you/you or anyone in your household) purchased any digital photo printing or film development services?

1. Yes
2. No	1:  Goto R20_COST

2,DK,RF:  IF Ask_R[17] = 1 then goto PSCATR17
          ELSEIF Ask_R[18] = 1 then goto PSCATR18
          ELSEIF Ask_R[19] = 1 then goto PSCATR19
          ELSEIF Ask_T[04] = 1 then goto PSCATT04
          ELSE goto END_POPGRP6	
20C	R20_COST	R20_COST	In the last SIX MONTHS, how much did (you/your household) spend on your last purchase of digital photo printing or film development services?	IF ENTRY lt 5 or gt 150 then goto ERR1_R20COST

ELSE goto R20STORE	
20C	R20STORE	R20STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
   or RF then goto R20PURCH

ELSEIF Ask_R[17] = 1 then goto PSCATR17

ELSEIF Ask_R[18] = 1 then goto PSCATR18

ELSEIF Ask_R[19] = 1 then goto PSCATR19

ELSEIF Ask_T[04] = 1 then goto PSCATT04

ELSE goto END_POPGRP6	
20C	R20PURCH	R20PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF LP17_Flag[18] = no then goto PSCATR17
              ELSEIF LP6B_Flag[14] = no then goto PSCATR18
              ELSEIF LP19A_Flag[2] = no then goto PSCATR19
              ELSEIF LP10R_Flag[1] = no AND LP18B_Flag = no 
                     then goto PSCATT04
              ELSE goto END_POPGRP6
                    
2:  Goto R20LOC	
20C	R20LOC	R20LOC	In what city is (Business Name) located?	Goto R20LOCST	
20C	R20LOCST	R20LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_R20LOCST

ELSEIF Ask_R[17] = 1 then goto PSCATR17

ELSEIF Ask_R[18] = 1 then goto PSCATR18

ELSEIF Ask_R[19] = 1 then goto PSCATR19

ELSEIF Ask_T[04] = 1 then goto PSCATT04

ELSE goto END_POPGRP6	
20C	PSCATR17	PSCATR17	(Now, please think about the last six months, since the first of (Six Months Ago)./In the last six months) have (you/you or anyone in your household) purchased any film, film development supplies, or disposable cameras?

1. Yes
2. No	1:  Goto R17_COST

2,DK,RF:  IF Ask_R[18] = 1 then goto PSCATR18
          ELSEIF Ask_R[19] = 1 then goto PSCATR19
          ELSEIF Ask_T[04] = 1 then goto PSCATT04
          ELSE goto END_POPGRP6	
20C	R17_COST	R17_COST	In the last SIX MONTHS, how much did (you/your household) spend on your last purchase of any film, film developing supplies, or disposable cameras?	IF ENTRY lt 5 or gt 100 then goto ERR1_R17COST

ELSE goto R17STORE	
20C	R17STORE	R17STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
   or RF then goto R17PURCH

ELSEIF Ask_R[18] = 1 then goto PSCATR18

ELSEIF Ask_R[19] = 1 then goto PSCATR19

ELSEIF Ask_T[04] = 1 then goto PSCATT04

ELSE goto END_POPGRP6	
20C	R17PURCH	R17PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF: IF LP6B_Flag[14] = no then goto PSCATR18
             ELSEIF LP19A_Flag[2] = no then goto PSCATR19
             ELSEIF LP10R_Flag[1] = no AND LP18B_Flag = no 
                    then goto PSCATT04
             ELSE goto END_POPGRP6
                    
2:  Goto R17LOC	
20C	R17LOC	R17LOC	In what city is (Business Name) located?	Goto R17LOCST	
20C	R17LOCST	R17LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_R17LOCST

ELSEIF Ask_R[18] = 1 then goto PSCATR18

ELSEIF Ask_R[19] = 1 then goto PSCATR19

ELSEIF Ask_T[04] = 1 then goto PSCATT04

ELSE goto END_POPGRP6	
20C	PSCATR18	PSCATR18	Now, please think about the last two years, since the first of  (Month and Year, two years ago) have (you/you or anyone in your household) purchased any cameras or other photography equipment excluding film?

1. Yes
2. No	1:  Goto R18_COST

2,DK,RF:  IF Ask_R[19] = 1 then goto PSCATR19
          ELSEIF Ask_T[04] = 1 then goto PSCATT04
          ELSE goto END_POPGRP6	
20C	R18_COST	R18_COST	In the last TWO YEARS, how much did (you/your household) spend on your last purchase of any cameras or other photography equipment excluding film?	IF ENTRY lt 6 or gt 1068 then goto ERR1_R18COST

ELSE goto R18STORE	
20C	R18STORE	R18STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
   or RF then goto R18PURCH

ELSEIF Ask_R[19] = 1 then goto PSCATR19

ELSEIF Ask_T[04] = 1 then goto PSCATT04

ELSE goto END_POPGRP6	
20C	R18PURCH	R18PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF LP19A_Flag[2] = no then goto PSCATR19
              ELSEIF LP10R_Flag[1] = no AND LP18B_Flag = no 
                 then goto PSCATT04
              ELSE goto END_POPGRP6
                    
2:  Goto R18LOC	
20C	R18LOC	R18LOC	In what city is (Business Name) located?	Goto R18LOCST	
20C	R18LOCST	R18LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_R18LOCST

ELSEIF Ask_R[19] = 1 then goto PSCATR19

ELSEIF Ask_T[04] = 1 then goto PSCATT04

ELSE goto END_POPGRP6	
20C	PSCATR19	PSCATR19	(Now, please think about the last two years, since the first of (two years ago)./In the last TWO YEARS) have (you/you or anyone in your household) had any expenses for photographer's fees?

1. Yes
2. No	1:  Goto R19_COST

2,DK,RF:  IF Ask_T[04] = 1 then goto PSCATT04
          ELSE goto END_POPGRP6	
20C	R19_COST	R19_COST	In the last TWO YEARS, how much was (your/your household's) last expense for photographer's fees?	IF ENTRY lt 8 or gt 800 then goto ERR1_R19COST

ELSE goto R19STORE	
20C	R19STORE	R19STORE	What is the name of the business where (you/your household) had this expense?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
   or RF then goto R19PURCH

ELSEIF Ask_T[04] = 1 then goto PSCATT04

ELSE goto END_POPGRP6	
20C	R19PURCH	R19PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_T[04] = 1 then goto PSCATT04
              ELSE goto END_POPGRP6
                    
2:  Goto R19LOC	
20C	R19LOC	R19LOC	In what city is (Business Name) located?	Goto R19LOCST	
20C	R19LOCST	R19LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_R19LOCST

ELSEIF Ask_T[04] = 1 then goto PSCATT04

ELSE goto END_POPGRP6	
20C	PSCATT04	PSCATT04	(Now, please think about the last two years, since the first of (two years ago)./In the last TWO YEARS) have (you/you or anyone in your household) had any expenses for car, truck, or van rentals?

1. Yes
2. No	1:  Goto T04_COST

2,DK,RF:  Goto END_POPGRP6	
20C	T04_COST	T04_COST	In the last TWO YEARS, how much was (your/your household's) last expense for car, truck, or van rentals?	IF ENTRY lt 10 or gt 1200 then goto ERR1_T04COST

ELSE goto T04STORE	
20C	T04STORE	T04STORE	What is the name of the business where (you/your household) had this expense?

           Enter store, website, or company name	RESPONSE:  Goto T04PKCTY

DK,RF: Goto END_POPGRP6	
20C	T04PKCTY	T04PKCTY	In what city was the vehicle picked up?	Goto T04PKST	
20C	T04PKST	T04PKST	? [F1]

In what state was the vehicle picked up?

         Enter the two character state abbreviation or "XX" for foreign country
 	IF entry is not a valid state abbreviation then 
   goto CK_T04PKST

ELSEIF entry = XX then goto END_POPGRP6

ELSE goto T04DIR	
20C	T04DIR	T04DIR	Was the reservation made directly with (Business Name) or through a third party?

1. Direct
2. Third party	1,DK,RF:   IF Uppercase entry in T04STORE contains ".COM" 
              then goto END_POPGRP6
           ELSE goto T04PURCH

2:  Goto T04THRDP	
20C	T04THRDP	T04THRDP	What is the name of the company you used to make the reservation?

           Enter company name	IF uppercase entry contains ".COM" or is DK or RF then 
    goto END_POPGRP6

ELSE goto T04PURCH	
20C	T04PURCH	T04PURCH	Was the reservation made -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  Goto END_POPGRP6
                    
2:  IF T04THRDP = RESPONSE then goto T04LOC
    ELSE goto END_POPGRP6	
20C	T04LOC	T04LOC	In what city is (3rd party Business Name) located?	Goto T04LOCST	
20C	T04LOCST	T04LOCST	? [F1]

In what state is (3rd party Business Name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_T04LOCST

ELSE goto END_POPGRP6	
20C		END_POPGRP6			
		POP7_AskFlags			
20C	PGRP7_INTRO	PGRP7_INTRO	The next few questions are about expenses made by (you/you or anyone in your household) during the last two years, that is, as far back as (Month and Year, two years ago).  We have used the responses that you've already given us to shorten this part of the interview, so I'll only be asking you about expenses that you told me that you did not have in the last three months.

1. Enter 1 to Continue	IF Ask_A[23] = 1 then goto PSCATA23
ELSEIF Ask_E[12] = 1 then goto PSCATE12
ELSEIF Ask_E[13] = 1 then goto PSCATE13
ELSEIF Ask_A[22] = 1 then goto PSCATA22
ELSEIF Ask_E[15] = 1 then goto PSCATE15
ELSEIF Ask_G[12] = 1 then goto PSCATG12
ELSEIF Ask_G[13] = 1 then goto PSCATG13
ELSEIF Ask_G[14] = 1 then goto PSCATG14
ELSEIF Ask_E[11] = 1 then goto PSCATE11
ELSEIF Ask_E[14] = 1 then goto PSCATE14
ELSE goto END_POPGRP7	
20C	PSCATA23	PSCATA23	Now, please think about the last six months, since the first of (Month and Year, six month ago) have (you/you or anyone in your household) purchased any jewelry?

1. Yes
2. No	1:  Goto A23_COST

2,DK,RF:  IF Ask_E[12] = 1 then goto PSCATE12
          ELSEIF Ask_E[13] = 1 then goto PSCATE13
          ELSEIF Ask_A[22] = 1 then goto PSCATA22
          ELSEIF Ask_E[15] = 1 then goto PSCATE15
          ELSEIF Ask_G[12] = 1 then goto PSCATG12
          ELSEIF Ask_G[13] = 1 then goto PSCATG13
          ELSEIF Ask_G[14] = 1 then goto PSCATG14
          ELSEIF Ask_E[11] = 1 then goto PSCATE11
          ELSEIF Ask_E[14] = 1 then goto PSCATE14
          ELSE goto END_POPGRP7	
20C	A23_COST	A23_COST	In the last SIX MONTHS, how much did (you/your household) spend on your last purchase of jewelry?	IF ENTRY lt 5 or gt 1800 then goto ERR1_A23COST

ELSE goto A23STORE	
20C	A23STORE	A23STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK 
   or RF then goto A23PURCH

ELSEIF Ask_E[12] = 1 then goto PSCATE12
ELSEIF Ask_E[13] = 1 then goto PSCATE13
ELSEIF Ask_A[22] = 1 then goto PSCATA22
ELSEIF Ask_E[15] = 1 then goto PSCATE15
ELSEIF Ask_G[12] = 1 then goto PSCATG12
ELSEIF Ask_G[13] = 1 then goto PSCATG13
ELSEIF Ask_G[14] = 1 then goto PSCATG14
ELSEIF Ask_E[11] = 1 then goto PSCATE11
ELSEIF Ask_E[14] = 1 then goto PSCATE14
ELSE goto END_POPGRP7	
20C	A23PURCH	A23PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:   IF Ask_E[12] = 1 then goto PSCATE12
               ELSEIF Ask_E[13] = 1 then goto PSCATE13
               ELSEIF Ask_A[22] = 1 then goto PSCATA22
               ELSEIF Ask_E[15] = 1 then goto PSCATE15
               ELSEIF Ask_G[12] = 1 then goto PSCATG12
               ELSEIF Ask_G[13] = 1 then goto PSCATG13
               ELSEIF Ask_G[14] = 1 then goto PSCATG14
               ELSEIF Ask_E[11] = 1 then goto PSCATE11
               ELSEIF Ask_E[14] = 1 then goto PSCATE14
               ELSE goto END_POPGRP7
                    
2:  Goto A23LOC	
20C	A23LOC	A23LOC	In what city is (Business Name) located?	Goto A23LOCST	
20C	A23LOCST	A23LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_A23LOCST

ELSEIF Ask_E[12] = 1 then goto PSCATE12
ELSEIF Ask_E[13] = 1 then goto PSCATE13
ELSEIF Ask_A[22] = 1 then goto PSCATA22
ELSEIF Ask_E[15] = 1 then goto PSCATE15
ELSEIF Ask_G[12] = 1 then goto PSCATG12
ELSEIF Ask_G[13] = 1 then goto PSCATG13
ELSEIF Ask_G[14] = 1 then goto PSCATG14
ELSEIF Ask_E[11] = 1 then goto PSCATE11
ELSEIF Ask_E[14] = 1 then goto PSCATE14
ELSE goto END_POPGRP7	
20C	PSCATE12	PSCATE12	(Now, please think about the last six months, since the first of (Six Months Ago)./In the last SIX MONTHS) have (you/you or anyone in your household) purchased any computer software, accessories, online games, or blank media?

1. Yes
2. No	1:  Goto E12_COST

2,DK,RF:  IF Ask_E[13] = 1 then goto PSCATE13
          ELSEIF Ask_A[22] = 1 then goto PSCATA22
          ELSEIF Ask_E[15] = 1 then goto PSCATE15
          ELSEIF Ask_G[12] = 1 then goto PSCATG12
          ELSEIF Ask_G[13] = 1 then goto PSCATG13
          ELSEIF Ask_G[14] = 1 then goto PSCATG14
          ELSEIF Ask_E[11] = 1 then goto PSCATE11
          ELSEIF Ask_E[14] = 1 then goto PSCATE14
          ELSE goto END_POPGRP7	
20C	E12_COST	E12_COST	In the last SIX MONTHS, how much did (you/your household) spend on your last purchase of computer software, accessories, online games, or blank media?	IF ENTRY gt 400 then goto ERR1_E12COST

ELSE goto E12STORE	
20C	E12STORE	E12STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
   or RF then goto E12PURCH

ELSEIF Ask_E[13] = 1 then goto PSCATE13
ELSEIF Ask_A[22] = 1 then goto PSCATA22
ELSEIF Ask_E[15] = 1 then goto PSCATE15
ELSEIF Ask_G[12] = 1 then goto PSCATG12
ELSEIF Ask_G[13] = 1 then goto PSCATG13
ELSEIF Ask_G[14] = 1 then goto PSCATG14
ELSEIF Ask_E[11] = 1 then goto PSCATE11
ELSEIF Ask_E[14] = 1 then goto PSCATE14
ELSE goto END_POPGRP7	
20C	E12PURCH	E12PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:   IF Ask_E[13] = 1 then goto PSCATE13
               ELSEIF Ask_A[22] = 1 then goto PSCATA22
               ELSEIF Ask_E[15] = 1 then goto PSCATE15
               ELSEIF Ask_G[12] = 1 then goto PSCATG12
               ELSEIF Ask_G[13] = 1 then goto PSCATG13
               ELSEIF Ask_G[14] = 1 then goto PSCATG14
               ELSEIF Ask_E[11] = 1 then goto PSCATE11
               ELSEIF Ask_E[14] = 1 then goto PSCATE14
               ELSE goto END_POPGRP7
                    
2:  Goto E12LOC	
20C	E12LOC	E12LOC	In what city is (Business Name) located?	Goto E12LOCST	
20C	E12LOCST	E12LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_E12LOCST

ELSEIF Ask_E[13] = 1 then goto PSCATE13
ELSEIF Ask_A[22] = 1 then goto PSCATA22
ELSEIF Ask_E[15] = 1 then goto PSCATE15
ELSEIF Ask_G[12] = 1 then goto PSCATG12
ELSEIF Ask_G[13] = 1 then goto PSCATG13
ELSEIF Ask_G[14] = 1 then goto PSCATG14
ELSEIF Ask_E[11] = 1 then goto PSCATE11
ELSEIF Ask_E[14] = 1 then goto PSCATE14
ELSE goto END_POPGRP7	
20C	PSCATE13	PSCATE13	(Now, please think about the last six months, since the first of (six months ago)./In the last SIX MONTHS) have (you/you or anyone in your household) had any expenses for accessing the internet at home or away from home?  Do not include mobile data charges.

1. Yes
2. No	1:  Goto E13_COST

2,DK,RF:  IF Ask_A[22] = 1 then goto PSCATA22
          ELSEIF Ask_E[15] = 1 then goto PSCATE15
          ELSEIF Ask_G[12] = 1 then goto PSCATG12
          ELSEIF Ask_G[13] = 1 then goto PSCATG13
          ELSEIF Ask_G[14] = 1 then goto PSCATG14
          ELSEIF Ask_E[11] = 1 then goto PSCATE11
          ELSEIF Ask_E[14] = 1 then goto PSCATE14
          ELSE goto END_POPGRP7	
20C	E13_COST	E13_COST	In the last SIX MONTHS, how much was (your/your household's) last expense for accessing the internet at home and away, including separate or bundled charges?	IF ENTRY lt 5 or gt 60 then goto ERR1_E13COST

ELSE goto E13STORE	
20C	E13STORE	E13STORE	What is the name of the business where YOU_YRCU had this expense?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
    or RF then goto E13PURCH

ELSEIF Ask_A[22] = 1 then goto PSCATA22
ELSEIF Ask_E[15] = 1 then goto PSCATE15
ELSEIF Ask_G[12] = 1 then goto PSCATG12
ELSEIF Ask_G[13] = 1 then goto PSCATG13
ELSEIF Ask_G[14] = 1 then goto PSCATG14
ELSEIF Ask_E[11] = 1 then goto PSCATE11
ELSEIF Ask_E[14] = 1 then goto PSCATE14
ELSE goto END_POPGRP7	
20C	E13PURCH	E13PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:   IF Ask_A[22] = 1 then goto PSCATA22
               ELSEIF Ask_E[15] = 1 then goto PSCATE15
               ELSEIF Ask_G[12] = 1 then goto PSCATG12
               ELSEIF Ask_G[13] = 1 then goto PSCATG13
               ELSEIF Ask_G[14] = 1 then goto PSCATG14
               ELSEIF Ask_E[11] = 1 then goto PSCATE11
               ELSEIF Ask_E[14] = 1 then goto PSCATE14
               ELSE goto END_POPGRP7
                    
2:  Goto E13LOC	
20C	E13LOC	E13LOC	In what city is (Business Name) located?	Goto E13LOCST	
20C	E13LOCST	E13LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_E13LOCST

ELSEIF Ask_A[22] = 1 then goto PSCATA22
ELSEIF Ask_E[15] = 1 then goto PSCATE15
ELSEIF Ask_G[12] = 1 then goto PSCATG12
ELSEIF Ask_G[13] = 1 then goto PSCATG13
ELSEIF Ask_G[14] = 1 then goto PSCATG14
ELSEIF Ask_E[11] = 1 then goto PSCATE11
ELSEIF Ask_E[14] = 1 then goto PSCATE14
ELSE goto END_POPGRP7	
20C	PSCATA22	PSCATA22	Now, please think about the last 12 months, since the first of (Month and Year, twelve months ago) have (you/you or anyone in your household) purchased any watches?

1. Yes
2. No	1:  Goto A22_COST

2,DK,RF:  IF Ask_E[15] = 1 then goto PSCATE15
          ELSEIF Ask_G[12] = 1 then goto PSCATG12
          ELSEIF Ask_G[13] = 1 then goto PSCATG13
          ELSEIF Ask_G[14] = 1 then goto PSCATG14
          ELSEIF Ask_E[11] = 1 then goto PSCATE11
          ELSEIF Ask_E[14] = 1 then goto PSCATE14
          ELSE goto END_POPGRP7	
20C	A22_COST	A22_COST	In the last 12 MONTHS, how much did (you/your household) spend on your last purchase of watches?	IF ENTRY lt 5 or gt 450 then goto ERR1_A22COST

ELSE goto A22STORE	
20C	A22STORE	A22STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
   or RF then goto A22PURCH

ELSEIF Ask_E[15] = 1 then goto PSCATE15
ELSEIF Ask_G[12] = 1 then goto PSCATG12
ELSEIF Ask_G[13] = 1 then goto PSCATG13
ELSEIF Ask_G[14] = 1 then goto PSCATG14
ELSEIF Ask_E[11] = 1 then goto PSCATE11
ELSEIF Ask_E[14] = 1 then goto PSCATE14
ELSE goto END_POPGRP7	
20C	A22PURCH	A22PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:   IF Ask_E[15] = 1 then goto PSCATE15
               ELSEIF Ask_G[12] = 1 then goto PSCATG12
               ELSEIF Ask_G[13] = 1 then goto PSCATG13
               ELSEIF Ask_G[14] = 1 then goto PSCATG14
               ELSEIF Ask_E[11] = 1 then goto PSCATE11
               ELSEIF Ask_E[14] = 1 then goto PSCATE14
               ELSE goto END_POPGRP7
                  
2:  Goto A22LOC	
20C	A22LOC	A22LOC	In what city is (Business Name) located?	Goto A22LOCST	
20C	A22LOCST	A22LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_A22LOCST

ELSEIF Ask_E[15] = 1 then goto PSCATE15
ELSEIF Ask_G[12] = 1 then goto PSCATG12
ELSEIF Ask_G[13] = 1 then goto PSCATG13
ELSEIF Ask_G[14] = 1 then goto PSCATG14
ELSEIF Ask_E[11] = 1 then goto PSCATE11
ELSEIF Ask_E[14] = 1 then goto PSCATE14
ELSE goto END_POPGRP7	
20C	PSCATE15	PSCATE15	(Now, please think about the last 12 months, since the first of (12 Months Ago)./In the last 12 MONTHS) have (you/you or anyone in your household) purchased any calculators, typewriters, or fax machines?

1. Yes
2. No	1:  Goto E15_COST

2,DK,RF:  IF Ask_G[12] = 1 then goto PSCATG12
          ELSEIF Ask_G[13] = 1 then goto PSCATG13
          ELSEIF Ask_G[14] = 1 then goto PSCATG14
          ELSEIF Ask_E[11] = 1 then goto PSCATE11
          ELSEIF Ask_E[14] = 1 then goto PSCATE14
          ELSE goto END_POPGRP7	
20C	E15_COST	E15_COST	In the last 12 MONTHS, how much did (you/your household) spend on your last purchase of calculators, typewriters, or fax machines?	IF ENTRY lt 5 or gt 700 then goto ERR1_E15COST

ELSE goto E15STORE	
20C	E15STORE	E15STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
   or RF then goto E15PURCH

ELSEIF Ask_G[12] = 1 then goto PSCATG12
ELSEIF Ask_G[13] = 1 then goto PSCATG13
ELSEIF Ask_G[14] = 1 then goto PSCATG14
ELSEIF Ask_E[11] = 1 then goto PSCATE11
ELSEIF Ask_E[14] = 1 then goto PSCATE14
ELSE goto END_POPGRP7	
20C	E15PURCH	E15PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:   IF Ask_G[12] = 1 then goto PSCATG12
               ELSEIF Ask_G[13] = 1 then goto PSCATG13
               ELSEIF Ask_G[14] = 1 then goto PSCATG14
               ELSEIF Ask_E[11] = 1 then goto PSCATE11
               ELSEIF Ask_E[14] = 1 then goto PSCATE14
               ELSE goto END_POPGRP7
                  
2:  Goto E15LOC	
20C	E15LOC	E15LOC	In what city is (Business Name) located?	Goto E15LOCST	
20C	E15LOCST	E15LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_E15LOCST

ELSEIF Ask_G[12] = 1 then goto PSCATG12
ELSEIF Ask_G[13] = 1 then goto PSCATG13
ELSEIF Ask_G[14] = 1 then goto PSCATG14
ELSEIF Ask_E[11] = 1 then goto PSCATE11
ELSEIF Ask_E[14] = 1 then goto PSCATE14
ELSE goto END_POPGRP7	
20C	PSCATG12	PSCATG12	(Now, please think about the last 12 months, since the first of (12 Months Ago)./In the last 12 MONTHS) have (you/you or anyone in your household) had any expenses for shoe repair or other shoe services?

1. Yes
2. No	1:  Goto G12_COST

2,DK,RF:  IF Ask_G[13] = 1 then goto PSCATG13
          ELSEIF Ask_G[14] = 1 then goto PSCATG14
          ELSEIF Ask_E[11] = 1 then goto PSCATE11
          ELSEIF Ask_E[14] = 1 then goto PSCATE14
          ELSE goto END_POPGRP7	
20C	G12_COST	G12_COST	In the last 12 MONTHS, how much was (your/your household's) last expense for shoe repair or other shoe services?	IF ENTRY lt 5 or gt 249 then goto ERR1_G12COST

ELSE goto G12STORE	
20C	G12STORE	G12STORE	What is the name of the business where (you/your household) had this expense?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK 
   or RF then goto G12PURCH

ELSEIF Ask_G[13] = 1 then goto PSCATG13
ELSEIF Ask_G[14] = 1 then goto PSCATG14
ELSEIF Ask_E[11] = 1 then goto PSCATE11
ELSEIF Ask_E[14] = 1 then goto PSCATE14
ELSE goto END_POPGRP7	
20C	G12PURCH	G12PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:   IF Ask_G[13] = 1 then goto PSCATG13
               ELSEIF Ask_G[14] = 1 then goto PSCATG14
               ELSEIF Ask_E[11] = 1 then goto PSCATE11
               ELSEIF Ask_E[14] = 1 then goto PSCATE14
               ELSE goto END_POPGRP7
                  
2:  Goto G12LOC	
20C	G12LOC	G12LOC	In what city is (Business Name) located?	Goto G12LOCST	
20C	G12LOCST	G12LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_G12LOCST

ELSEIF Ask_G[13] = 1 then goto PSCATG13
ELSEIF Ask_G[14] = 1 then goto PSCATG14
ELSEIF Ask_E[11] = 1 then goto PSCATE11
ELSEIF Ask_E[14] = 1 then goto PSCATE14
ELSE goto END_POPGRP7	
20C	PSCATG13	PSCATG13	(Now, please think about the last 12 months, since the first of (12 Months Ago)./In the last 12 MONTHS) have (you/you or anyone in your household) had any expenses for clothing rental, alterations or repairs?

1. Yes
2. No	1:  Goto G13_COST

2,DK,RF:  IF Ask_G[14] = 1 then goto PSCATG14
          ELSEIF Ask_E[11] = 1 then goto PSCATE11
          ELSEIF Ask_E[14] = 1 then goto PSCATE14
          ELSE goto END_POPGRP7	
20C	G13_COST	G13_COST	In the last 12 MONTHS, how much was (your/your household's) last expense for clothing rental, alterations or repairs?	IF ENTRY lt 5 or gt 249 then goto ERR1_G13COST

ELSE goto G13STORE	
20C	G13STORE	G13STORE	What is the name of the business where  (you/your household) had this expense?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK 
   or RF then goto G13PURCH

ELSEIF Ask_G[14] = 1 then goto PSCATG14
ELSEIF Ask_E[11] = 1 then goto PSCATE11
ELSEIF Ask_E[14] = 1 then goto PSCATE14
ELSE goto END_POPGRP7	
20C	G13PURCH	G13PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:   IF Ask_G[14] = 1 then goto PSCATG14
               ELSEIF Ask_E[11] = 1 then goto PSCATE11
               ELSEIF Ask_E[14] = 1 then goto PSCATE14
               ELSE goto END_POPGRP7
                  
2:  Goto G13LOC	
20C	G13LOC	G13LOC	In what city is (Business Name) located?	Goto G13LOCST	
20C	G13LOCST	G13LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_G13LOCST

ELSEIF Ask_G[14] = 1 then goto PSCATG14
ELSEIF Ask_E[11] = 1 then goto PSCATE11
ELSEIF Ask_E[14] = 1 then goto PSCATE14
ELSE goto END_POPGRP7	
20C	PSCATG14	PSCATG14	(Now, please think about the last 12 months, since the first of (12 Months Ago)./In the last 12 MONTHS) have (you/you or anyone in your household) had any expenses for watch or jewelry repair?

1. Yes
2. No	1:  Goto G14_COST

2,DK,RF:  IF Ask_E[11] = 1 then goto PSCATE11
          ELSEIF Ask_E[14] = 1 then goto PSCATE14
          ELSE goto END_POPGRP7	
20C	G14_COST	G14_COST	In the last 12 MONTHS, how much was (your/your household's) last expense for watch or jewelry repair?	IF ENTRY lt 5 or gt 249 then goto ERR1_G14COST

ELSE goto G14STORE	
20C	G14STORE	G14STORE	What is the name of the business where (you/your household) had this expense?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK 
   or RF then goto G14PURCH

ELSEIF Ask_E[11] = 1 then goto PSCATE11
ELSEIF Ask_E[14] = 1 then goto PSCATE14
ELSE goto END_POPGRP7	
20C	G14PURCH	G14PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:   IF Ask_E[11] = 1 then goto PSCATE11
               ELSEIF Ask_E[14] = 1 then goto PSCATE14
               ELSE goto END_POPGRP7
                  
2:  Goto G14LOC	
20C	G14LOC	G14LOC	In what city is (Business Name) located?	Goto G14LOCST	
20C	G14LOCST	G14LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_G14LOCST

ELSEIF Ask_E[11] = 1 then goto PSCATE11
ELSEIF Ask_E[14] = 1 then goto PSCATE14
ELSE goto END_POPGRP7	
20C	PSCATE11	PSCATE11	Now, please think about the last two years, since the first of (Month and Year, two years ago) have (you/you or anyone in your household) purchased any personal computers or peripheral equipment?

1. Yes
2. No	1:  Goto E11_COST

2,DK,RF:  IF Ask_E[14] = 1 then goto PSCATE14
          ELSE goto END_POPGRP7	
20C	E11_COST	E11_COST	In the last TWO YEARS, how much did (you/your household) spend on your last purchase of personal computers or peripheral equipment?	IF ENTRY lt 12 or gt 2500 then goto ERR1_E11COST

ELSE goto E11STORE	
20C	E11STORE	E11STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK 
   or RF then goto E11PURCH

ELSEIF Ask_E[14] = 1 then goto PSCATE14
ELSE goto END_POPGRP7	
20C	E11PURCH	E11PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:   IF Ask_E[14] = 1 then goto PSCATE14
               ELSE goto END_POPGRP7
                    
2:  Goto E11LOC	
20C	E11LOC	E11LOC	In what city is (Business Name) located?	Goto E11LOCST	
20C	E11LOCST	E11LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_E11LOCST

ELSEIF Ask_E[14] = 1 then goto PSCATE14
ELSE goto END_POPGRP7	
20C	PSCATE14	PSCATE14	(Now, please think about the last two years, since the first of (two years ago)./In the last TWO YEARS) have (you/you or anyone in your household) purchased any home or cellular telephones, answering machines, or other phone accessories?

1. Yes
2. No	1:  Goto E14_COST

2,DK,RF:  Goto END_POPGRP7	
20C	E14_COST	E14_COST	In the last TWO YEARS, how much did (you/your household) spend on your last purchase of home or cellular telephones, answering machines, or other phone accessories?	IF ENTRY lt 5 or gt 300 then goto ERR1_E14COST

ELSE goto E14STORE	
20C	E14STORE	E14STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK 
   or RF then goto E14PURCH

ELSE goto END_POPGRP7	
20C	E14PURCH	E14PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  Goto END_POPGRP7
                    
2:  Goto E14LOC	
20C	E14LOC	E14LOC	In what city is (Business Name) located?	Goto E14LOCST	
20C	E14LOCST	E14LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_E14LOCST

ELSE goto END_POPGRP7	
		END_POPGRP7		Exit section 20C and goto the next appropriate section	
		POP8_AskFlags			
20C	PGRP8_INTRO	PGRP8_INTRO	The next few questions are about expenses made by (you/you or anyone in your household) during the last two years, that is, as far back as (Month and Year, two years ago).  We have used the responses that you've already given us to shorten this part of the interview, so I'll only be asking you about expenses that you told me that you did not have in the last three months.

1. Enter 1 to Continue	IF Ask_H[16] = 1 then goto PSCATH16
ELSEIF Ask_H[10] = 1 then goto PSCATH10
ELSEIF Ask_H[15] = 1 then goto PSCATH15
ELSEIF Ask_M[04] = 1 then goto PSCATM04
ELSEIF Ask_M[05] = 1 then goto PSCATM05
ELSEIF Ask_M[06] = 1 then goto PSCATM06
ELSEIF Ask_M[07] = 1 then goto PSCATM07
ELSEIF Ask_H[41] = 1 then goto PSCATH41
ELSEIF Ask_H[14] = 1 then goto PSCATH14
ELSEIF Ask_H[07] = 1 then goto PSCATH07
ELSEIF Ask_H[08] = 1 then goto PSCATH08
ELSE goto END_POPGRP8	
20C	PSCATH16	PSCATH16	Now, please think about the last 12 months, since the first of (Month and Year, twelve months ago) have (you/you or anyone in your household) purchased any entertainment centers, bookcases, desks, or barstools?

1. Yes
2. No	1:  Goto H16_COST

2,DK,RF:  IF Ask_H[10] = 1 then goto PSCATH10
          ELSEIF Ask_H[15] = 1 then goto PSCATH15
          ELSEIF Ask_M[04] = 1 then goto PSCATM04
          ELSEIF Ask_M[05] = 1 then goto PSCATM05
          ELSEIF Ask_M[06] = 1 then goto PSCATM06
          ELSEIF Ask_M[07] = 1 then goto PSCATM07
          ELSEIF Ask_H[41] = 1 then goto PSCATH41
          ELSEIF Ask_H[14] = 1 then goto PSCATH14
          ELSEIF Ask_H[07] = 1 then goto PSCATH07
          ELSEIF Ask_H[08] = 1 then goto PSCATH08
          ELSE goto END_POPGRP8	
20C	H16_COST	H16_COST	In the last 12 MONTHS, how much did (you/your household) spend on your last purchase of living room, family, or recreation room furniture?	IF ENTRY lt 11 or gt 2400 then goto ERR1_H16COST

ELSE goto H16STORE	
20C	H16STORE	H16STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
   or RF then goto H16PURCH

ELSEIF Ask_H[10] = 1 then goto PSCATH10
ELSEIF Ask_H[15] = 1 then goto PSCATH15
ELSEIF Ask_M[04] = 1 then goto PSCATM04
ELSEIF Ask_M[05] = 1 then goto PSCATM05
ELSEIF Ask_M[06] = 1 then goto PSCATM06
ELSEIF Ask_M[07] = 1 then goto PSCATM07
ELSEIF Ask_H[41] = 1 then goto PSCATH41
ELSEIF Ask_H[14] = 1 then goto PSCATH14
ELSEIF Ask_H[07] = 1 then goto PSCATH07
ELSEIF Ask_H[08] = 1 then goto PSCATH08
ELSE goto END_POPGRP8	
20C	H16PURCH	H16PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_H[10] = 1 then goto PSCATH10
              ELSEIF Ask_H[15] = 1 then goto PSCATH15
              ELSEIF Ask_M[04] = 1 then goto PSCATM04
              ELSEIF Ask_M[05] = 1 then goto PSCATM05
              ELSEIF Ask_M[06] = 1 then goto PSCATM06
              ELSEIF Ask_M[07] = 1 then goto PSCATM07
              ELSEIF Ask_H[41] = 1 then goto PSCATH41
              ELSEIF Ask_H[14] = 1 then goto PSCATH14
              ELSEIF Ask_H[07] = 1 then goto PSCATH07
              ELSEIF Ask_H[08] = 1 then goto PSCATH08
              ELSE goto END_POPGRP8
                   
2:  Goto H16LOC	
20C	H16LOC	H16LOC	In what city is (Business Name) located?	Goto H16LOCST	
20C	H16LOCST	H16LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_H16LOCST

ELSEIF Ask_H[10] = 1 then goto PSCATH10
ELSEIF Ask_H[15] = 1 then goto PSCATH15
ELSEIF Ask_M[04] = 1 then goto PSCATM04
ELSEIF Ask_M[05] = 1 then goto PSCATM05
ELSEIF Ask_M[06] = 1 then goto PSCATM06
ELSEIF Ask_M[07] = 1 then goto PSCATM07
ELSEIF Ask_H[41] = 1 then goto PSCATH41
ELSEIF Ask_H[14] = 1 then goto PSCATH14
ELSEIF Ask_H[07] = 1 then goto PSCATH07
ELSEIF Ask_H[08] = 1 then goto PSCATH08
ELSE goto END_POPGRP8	
20C	PSCATH10	PSCATH10	(Now, please think about the last 12 months, since the first of (12 months ago)./In the last 12 MONTHS) have (you/you or anyone in your household) purchased any bedroom furniture including mattresses or box springs?

1. Yes
2. No	1:  Goto H10_COST

2,DK,RF:  IF Ask_H[15] = 1 then goto PSCATH15
          ELSEIF Ask_M[04] = 1 then goto PSCATM04
          ELSEIF Ask_M[05] = 1 then goto PSCATM05
          ELSEIF Ask_M[06] = 1 then goto PSCATM06
          ELSEIF Ask_M[07] = 1 then goto PSCATM07
          ELSEIF Ask_H[41] = 1 then goto PSCATH41
          ELSEIF Ask_H[14] = 1 then goto PSCATH14
          ELSEIF Ask_H[07] = 1 then goto PSCATH07
          ELSEIF Ask_H[08] = 1 then goto PSCATH08
          ELSE goto END_POPGRP8	
20C	H10_COST	H10_COST	In the last 12 MONTHS, how much did (you/your household) spend on your last purchase of  bedrrom furniture including mattresses or box springs?	IF ENTRY lt 10 or gt 3500 then goto ERR1_H10COST

ELSE goto H10STORE	
20C	H10STORE	H10STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK 
   or RF then goto H10PURCH

ELSEIF Ask_H[15] = 1 then goto PSCATH15
ELSEIF Ask_M[04] = 1 then goto PSCATM04
ELSEIF Ask_M[05] = 1 then goto PSCATM05
ELSEIF Ask_M[06] = 1 then goto PSCATM06
ELSEIF Ask_M[07] = 1 then goto PSCATM07
ELSEIF Ask_H[41] = 1 then goto PSCATH41
ELSEIF Ask_H[14] = 1 then goto PSCATH14
ELSEIF Ask_H[07] = 1 then goto PSCATH07
ELSEIF Ask_H[08] = 1 then goto PSCATH08
ELSE goto END_POPGRP8	
20C	H10PURCH	H10PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_H[15] = 1 then goto PSCATH15
              ELSEIF Ask_M[04] = 1 then goto PSCATM04
              ELSEIF Ask_M[05] = 1 then goto PSCATM05
              ELSEIF Ask_M[06] = 1 then goto PSCATM06
              ELSEIF Ask_M[07] = 1 then goto PSCATM07
              ELSEIF Ask_H[41] = 1 then goto PSCATH41
              ELSEIF Ask_H[14] = 1 then goto PSCATH14
              ELSEIF Ask_H[07] = 1 then goto PSCATH07
              ELSEIF Ask_H[08] = 1 then goto PSCATH08
              ELSE goto END_POPGRP8
                  
2:  Goto H10LOC	
20C	H10LOC	H10LOC	In what city is (Business Name) located?	Goto H10LOCST	
20C	H10LOCST	H10LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_H10LOCST

ELSEIF Ask_H[15] = 1 then goto PSCATH15
ELSEIF Ask_M[04] = 1 then goto PSCATM04
ELSEIF Ask_M[05] = 1 then goto PSCATM05
ELSEIF Ask_M[06] = 1 then goto PSCATM06
ELSEIF Ask_M[07] = 1 then goto PSCATM07
ELSEIF Ask_H[41] = 1 then goto PSCATH41
ELSEIF Ask_H[14] = 1 then goto PSCATH14
ELSEIF Ask_H[07] = 1 then goto PSCATH07
ELSEIF Ask_H[08] = 1 then goto PSCATH08
ELSE goto END_POPGRP8	
20C	PSCATH15	PSCATH15	(Now, please think about the last 12 months, since the first of (12 Months Ago)./In the last 12 MONTHS) have (you/you or anyone in your household) purchased any outdoor furniture?

1. Yes
2. No	1:  Goto H15_COST

2,DK,RF:  IF Ask_M[04] = 1 then goto PSCATM04
          ELSEIF Ask_M[05] = 1 then goto PSCATM05
          ELSEIF Ask_M[06] = 1 then goto PSCATM06
          ELSEIF Ask_M[07] = 1 then goto PSCATM07
          ELSEIF Ask_H[41] = 1 then goto PSCATH41
          ELSEIF Ask_H[14] = 1 then goto PSCATH14
          ELSEIF Ask_H[07] = 1 then goto PSCATH07
          ELSEIF Ask_H[08] = 1 then goto PSCATH08
          ELSE goto END_POPGRP8	
20C	H15_COST	H15_COST	In the last 12 MONTHS, how much did (you/your household) spend on your last purchase of outdoor furniture?	IF ENTRY lt 5 or gt 900 then goto ERR1_H15COST

ELSE goto H15STORE	
20C	H15STORE	H15STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
    or RF then goto H15PURCH

ELSEIF Ask_M[04] = 1 then goto PSCATM04
ELSEIF Ask_M[05] = 1 then goto PSCATM05
ELSEIF Ask_M[06] = 1 then goto PSCATM06
ELSEIF Ask_M[07] = 1 then goto PSCATM07
ELSEIF Ask_H[41] = 1 then goto PSCATH41
ELSEIF Ask_H[14] = 1 then goto PSCATH14
ELSEIF Ask_H[07] = 1 then goto PSCATH07
ELSEIF Ask_H[08] = 1 then goto PSCATH08
ELSE goto END_POPGRP8	
20C	H15PURCH	H15PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_M[04] = 1 then goto PSCATM04
              ELSEIF Ask_M[05] = 1 then goto PSCATM05
              ELSEIF Ask_M[06] = 1 then goto PSCATM06
              ELSEIF Ask_M[07] = 1 then goto PSCATM07
              ELSEIF Ask_H[41] = 1 then goto PSCATH41
              ELSEIF Ask_H[14] = 1 then goto PSCATH14
              ELSEIF Ask_H[07] = 1 then goto PSCATH07
              ELSEIF Ask_H[08] = 1 then goto PSCATH08
              ELSE goto END_POPGRP8
                  
2:  Goto H15LOC	
20C	H15LOC	H15LOC	In what city is (Business Name) located?	Goto H15LOCST	
20C	H15LOCST	H15LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_H15LOCST

ELSEIF Ask_M[04] = 1 then goto PSCATM04
ELSEIF Ask_M[05] = 1 then goto PSCATM05
ELSEIF Ask_M[06] = 1 then goto PSCATM06
ELSEIF Ask_M[07] = 1 then goto PSCATM07
ELSEIF Ask_H[41] = 1 then goto PSCATH41
ELSEIF Ask_H[14] = 1 then goto PSCATH14
ELSEIF Ask_H[07] = 1 then goto PSCATH07
ELSEIF Ask_H[08] = 1 then goto PSCATH08
ELSE goto END_POPGRP8	
20C	PSCATM04	PSCATM04	(Now, please think about the last 12 months, since the first of (12 Months Ago)./In the last 12 MONTHS) have (you/you or anyone in your household) had any expenses for physicians' services?

1. Yes
2. No	1:  Goto M04_COST

2,DK,RF:  IF Ask_M[05] = 1 then goto PSCATM05
          ELSEIF Ask_M[06] = 1 then goto PSCATM06
          ELSEIF Ask_M[07] = 1 then goto PSCATM07
          ELSEIF Ask_H[41] = 1 then goto PSCATH41
          ELSEIF Ask_H[14] = 1 then goto PSCATH14
          ELSEIF Ask_H[07] = 1 then goto PSCATH07
          ELSEIF Ask_H[08] = 1 then goto PSCATH08
          ELSE goto END_POPGRP8	
20C	M04_COST	M04_COST	In the last 12 MONTHS, how much was (your/your household's) last expense for physicians' services?	IF ENTRY lt 5 or gt 379 then goto ERR1_M04COST

ELSE goto M04STORE	
20C	M04STORE	M04STORE	What is the name of the business where (you/your household) had this expense?

           Enter store, website, or company name	IF Uppercase Entry does not contains ".COM" and is not a DK 
   or RF then goto M04PURCH

ELSEIF Ask_M[05] = 1 then goto PSCATM05
ELSEIF Ask_M[06] = 1 then goto PSCATM06
ELSEIF Ask_M[07] = 1 then goto PSCATM07
ELSEIF Ask_H[41] = 1 then goto PSCATH41
ELSEIF Ask_H[14] = 1 then goto PSCATH14
ELSEIF Ask_H[07] = 1 then goto PSCATH07
ELSEIF Ask_H[08] = 1 then goto PSCATH08
ELSE goto END_POPGRP8	
20C	M04PURCH	M04PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_M[05] = 1 then goto PSCATM05
              ELSEIF Ask_M[06] = 1 then goto PSCATM06
              ELSEIF Ask_M[07] = 1 then goto PSCATM07
              ELSEIF Ask_H[41] = 1 then goto PSCATH41
              ELSEIF Ask_H[14] = 1 then goto PSCATH14
              ELSEIF Ask_H[07] = 1 then goto PSCATH07
              ELSEIF Ask_H[08] = 1 then goto PSCATH08
              ELSE goto END_POPGRP8
                  
2:  Goto M04LOC	
20C	M04LOC	M04LOC	In what city is (Business Name) located?	Goto M04LOCST	
20C	M04LOCST	M04LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_M04LOCST

ELSEIF Ask_M[05] = 1 then goto PSCATM05
ELSEIF Ask_M[06] = 1 then goto PSCATM06
ELSEIF Ask_M[07] = 1 then goto PSCATM07
ELSEIF Ask_H[41] = 1 then goto PSCATH41
ELSEIF Ask_H[14] = 1 then goto PSCATH14
ELSEIF Ask_H[07] = 1 then goto PSCATH07
ELSEIF Ask_H[08] = 1 then goto PSCATH08
ELSE goto END_POPGRP8	
20C	PSCATM05	PSCATM05	(Now, please think about the last 12 months, since the first of (12 Months Ago)./In the last 12 MONTHS) have (you/you or anyone in your household) had any expenses for dental services?

1. Yes
2. No	1:  Goto M05_COST

2,DK,RF:  IF Ask_M[06] = 1 then goto PSCATM06
          ELSEIF Ask_M[07] = 1 then goto PSCATM07
          ELSEIF Ask_H[41] = 1 then goto PSCATH41
          ELSEIF Ask_H[14] = 1 then goto PSCATH14
          ELSEIF Ask_H[07] = 1 then goto PSCATH07
          ELSEIF Ask_H[08] = 1 then goto PSCATH08
          ELSE goto END_POPGRP8	
20C	M05_COST	M05_COST	In the last 12 MONTHS, how much was (your/your household's) last expense for dental services?	IF ENTRY lt 6 or gt 1400 then goto ERR1_M05COST

ELSE goto M05STORE	
20C	M05STORE	M05STORE	What is the name of the business where (you/your household) had this expense?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK 
   or RF then goto M05PURCH

ELSEIF Ask_M[06] = 1 then goto PSCATM06
ELSEIF Ask_M[07] = 1 then goto PSCATM07
ELSEIF Ask_H[41] = 1 then goto PSCATH41
ELSEIF Ask_H[14] = 1 then goto PSCATH14
ELSEIF Ask_H[07] = 1 then goto PSCATH07
ELSEIF Ask_H[08] = 1 then goto PSCATH08
ELSE goto END_POPGRP8	
20C	M05PURCH	M05PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_M[06] = 1 then goto PSCATM06
              ELSEIF Ask_M[07] = 1 then goto PSCATM07
              ELSEIF Ask_H[41] = 1 then goto PSCATH41
              ELSEIF Ask_H[14] = 1 then goto PSCATH14
              ELSEIF Ask_H[07] = 1 then goto PSCATH07
              ELSEIF Ask_H[08] = 1 then goto PSCATH08
              ELSE goto END_POPGRP8
                 
2:  Goto M05LOC	
20C	M05LOC	M05LOC	In what city is Business name located?	Goto M05LOCST	
20C	M05LOCST	M05LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_M05LOCST

ELSEIF Ask_M[06] = 1 then goto PSCATM06
ELSEIF Ask_M[07] = 1 then goto PSCATM07
ELSEIF Ask_H[41] = 1 then goto PSCATH41
ELSEIF Ask_H[14] = 1 then goto PSCATH14
ELSEIF Ask_H[07] = 1 then goto PSCATH07
ELSEIF Ask_H[08] = 1 then goto PSCATH08
ELSE goto END_POPGRP8	
20C	PSCATM06	PSCATM06	(Now, please think about the last 12 months, since the first of (12 Months Ago)./In the last 12 MONTHS) have (you/you or anyone in your household) had any expenses for eyeglasses or eye care?

1. Yes
2. No	1:  Goto M06_COST

2,DK,RF:  IF Ask_M[07] = 1 then goto PSCATM07
          ELSEIF Ask_H[41] = 1 then goto PSCATH41
          ELSEIF Ask_H[14] = 1 then goto PSCATH14
          ELSEIF Ask_H[07] = 1 then goto PSCATH07
          ELSEIF Ask_H[08] = 1 then goto PSCATH08
          ELSE goto END_POPGRP8	
20C	M06_COST	M06_COST	In the last 12 MONTHS, how much was (your/your household's)  last expense for eyeglasses or eye care?	IF ENTRY lt 5 or gt 2000 then goto ERR1_M06COST

ELSE goto M06STORE	
20C	M06STORE	M06STORE	What is the name of the business where (you/your household) had this expense?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
    or RF then goto M06PURCH

ELSEIF Ask_M[07] = 1 then goto PSCATM07
ELSEIF Ask_H[41] = 1 then goto PSCATH41
ELSEIF Ask_H[14] = 1 then goto PSCATH14
ELSEIF Ask_H[07] = 1 then goto PSCATH07
ELSEIF Ask_H[08] = 1 then goto PSCATH08
ELSE goto END_POPGRP8	
20C	M06PURCH	M06PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_M[07] = 1 then goto PSCATM07
              ELSEIF Ask_H[41] = 1 then goto PSCATH41
              ELSEIF Ask_H[14] = 1 then goto PSCATH14
              ELSEIF Ask_H[07] = 1 then goto PSCATH07
              ELSEIF Ask_H[08] = 1 then goto PSCATH08
              ELSE goto END_POPGRP8
                   
2:  Goto M06LOC	
20C	M06LOC	M06LOC	In what city is Business name located?	Goto M06LOCST	
20C	M06LOCST	M06LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_M06LOCST

ELSEIF Ask_M[07] = 1 then goto PSCATM07
ELSEIF Ask_H[41] = 1 then goto PSCATH41
ELSEIF Ask_H[14] = 1 then goto PSCATH14
ELSEIF Ask_H[07] = 1 then goto PSCATH07
ELSEIF Ask_H[08] = 1 then goto PSCATH08
ELSE goto END_POPGRP8	
20C	PSCATM07	PSCATM07	(Now, please think about the last 12 months, since the first of (12 Months Ago)./In the last 12 MONTHS) have (you/you or anyone in your household) had any expenses for services by medical professionals excluding physicians, dentists, and ophthalmologists or opticians?

1. Yes
2. No	1:  Goto M07_COST

2,DK,RF:  IF Ask_H[41] = 1 then goto PSCATH41
          ELSEIF Ask_H[14] = 1 then goto PSCATH14
          ELSEIF Ask_H[07] = 1 then goto PSCATH07
          ELSEIF Ask_H[08] = 1 then goto PSCATH08
          ELSE goto END_POPGRP8	
20C	M07_COST	M07_COST	In the last 12 MONTHS, how much was (your/your household's)  last expense for services by medical professionals excluding physicians, dentists, ophthalmologists or opticians?	IF ENTRY lt 5 or gt 800 then goto ERR1_M07COST

ELSE goto M07STORE	
20C	M07STORE	M07STORE	What is the name of the business where (you/your household) had this expense?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
    or RF then goto M07PURCH

ELSEIF Ask_H[41] = 1 then goto PSCATH41
ELSEIF Ask_H[14] = 1 then goto PSCATH14
ELSEIF Ask_H[07] = 1 then goto PSCATH07
ELSEIF Ask_H[08] = 1 then goto PSCATH08
ELSE goto END_POPGRP8	
20C	M07PURCH	M07PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_H[41] = 1 then goto PSCATH41
              ELSEIF Ask_H[14] = 1 then goto PSCATH14
              ELSEIF Ask_H[07] = 1 then goto PSCATH07
              ELSEIF Ask_H[08] = 1 then goto PSCATH08
              ELSE goto END_POPGRP8
                  
2:  Goto M07LOC	
20C	M07LOC	M07LOC	In what city is (Business Name) located?	Goto M07LOCST	
20C	M07LOCST	M07LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_M07LOCST

ELSEIF Ask_H[41] = 1 then goto PSCATH41
ELSEIF Ask_H[14] = 1 then goto PSCATH14
ELSEIF Ask_H[07] = 1 then goto PSCATH07
ELSEIF Ask_H[08] = 1 then goto PSCATH08
ELSE goto END_POPGRP8	
20C	PSCATH41	PSCATH41	Now, please think about the last TWO YEARS, since the first of (Month and Year, two years ago), have (you/you or anyone in your household) purchased any living room, dining room, or kitchen furniture?

1. Yes
2. No	1:  Goto H41_COST

2,DK,RF:  IF Ask_H[14] = 1 then goto PSCATH14
          ELSEIF Ask_H[07] = 1 then goto PSCATH07
          ELSEIF Ask_H[08] = 1 then goto PSCATH08
          ELSE goto END_POPGRP8	
20C	H41_COST	H41_COST	In the last TWO YEARS, how much did (you/your household) spend on your last purchase of living room, dining room, or kitchen furniture?	IF ENTRY lt 5 or gt 7000 then goto ERR1_H41COST

ELSE goto H41STORE	
20C	H41STORE	H41STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK 
   or RF then goto H41PURCH

ELSEIF Ask_H[14] = 1 then goto PSCATH14
ELSEIF Ask_H[07] = 1 then goto PSCATH07
ELSEIF Ask_H[08] = 1 then goto PSCATH08
ELSE goto END_POPGRP8	
20C	H41PURCH	H41PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_H[14] = 1 then goto PSCATH14
              ELSEIF Ask_H[07] = 1 then goto PSCATH07
              ELSEIF Ask_H[08] = 1 then goto PSCATH08
              ELSE goto END_POPGRP8

2:  Goto H41LOC	
20C	H41LOC	H41LOC	In what city is (Business Name) located?	Goto H41LOCST	
20C	H41LOCST	H41LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_H41LOCST

ELSEIF Ask_H[14] = 1 then goto PSCATH14
ELSEIF Ask_H[07] = 1 then goto PSCATH07
ELSEIF Ask_H[08] = 1 then goto PSCATH08
ELSE goto END_POPGRP8	
20C	PSCATH14	PSCATH14	(Now, please think about the last TWO YEARS, since the first of (two years ago)./In the last TWO YEARS) have (you/you or anyone in your household) purchased any infants' furniture?

1. Yes
2. No	1:  Goto H14_COST

2,DK,RF:  IF Ask_H[07] = 1 then goto PSCATH07
          ELSEIF Ask_H[08] = 1 then goto PSCATH08
          ELSE goto END_POPGRP8	
20C	H14_COST	H14_COST	In the last TWO YEARS, how much did (you/your household) spend on your last purchase of infants' furniture?	IF ENTRY lt 10 or gt 1065 then goto ERR1_H14COST

ELSE goto H14STORE	
20C	H14STORE	H14STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
    or RF then goto H14PURCH

ELSEIF Ask_H[07] = 1 then goto PSCATH07
ELSEIF Ask_H[08] = 1 then goto PSCATH08
ELSE goto END_POPGRP8	
20C	H14PURCH	H14PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_H[07] = 1 then goto PSCATH07
              ELSEIF Ask_H[08] = 1 then goto PSCATH08
              ELSE goto END_POPGRP8

2:  Goto H14LOC	
20C	H14LOC	H14LOC	In what city is (Business Name) located?	Goto H14LOCST	
20C	H14LOCST	H14LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_H14LOCST

ELSEIF Ask_H[07] = 1 then goto PSCATH07
ELSEIF Ask_H[08] = 1 then goto PSCATH08
ELSE goto END_POPGRP8	
20C	PSCATH07	PSCATH07	(Now, please think about the last TWO YEARS, since the first of (two years ago)./In the last TWO YEARS) have (you/you or anyone in your household) purchased any flooring coverings, such as hard surface tiling, carpets, or scatter rugs?

1. Yes
2. No	1:  Goto H07_COST

2,DK,RF:  IF Ask_H[08] = 1 then goto PSCATH08
          ELSE goto END_POPGRP8	
20C	H07_COST	H07_COST	In the last TWO YEARS, how much did (you/your household) spend on your last purchase of flooring coverings, such as hard surface tiling, carpets, or scatter rugs?	IF ENTRY lt 5 or gt 1100 then goto ERR1_H07COST

ELSE goto H07STORE	
20C	H07STORE	H07STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK 
   or RF then goto H07PURCH

ELSEIF Ask_H[08] = 1 then goto PSCATH08
ELSE goto END_POPGRP8	
20C	H07PURCH	H07PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_H[08] = 1 then goto PSCATH08
              ELSE goto END_POPGRP8

2:  Goto H07LOC	
20C	H07LOC	H07LOC	In what city is (Business Name) located?	Goto H07LOCST	
20C	H07LOCST	H07LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_H07LOCST

ELSEIF Ask_H[08] = 1 then goto PSCATH08
ELSE goto END_POPGRP8	
20C	PSCATH08	PSCATH08	(Now, please think about the last two years, since the first of (two years ago)./In the last TWO YEARS) have (you/you or anyone in your household) purchased any window coverings, such as curtains, drapes, or blinds?

1. Yes
2. No	1:  Goto H08_COST

2,DK,RF:  Goto END_POPGRP8	
20C	H08_COST	H08_COST	In the last TWO YEARS, how much did (you/your household) spend on your last purchase of window coverings, such as curtains, drapes, or blinds?	IF ENTRY lt 5 or gt 1650 then goto ERR1_H08COST

ELSE goto H08STORE	
20C	H08STORE	H08STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK 
   or RF then goto H08PURCH

ELSE goto END_POPGRP8	
20C	H08PURCH	H08PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF: Goto END_POPGRP8

2:  Goto H08LOC	
20C	H08LOC	H08LOC	In what city is (Business Name) located?	Goto H08LOCST	
20C	H08LOCST	H08LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_H08LOCST

ELSE goto END_POPGRP8	
		END_POPGRP8		Exit section 20C and goto the next appropriate section	
		POP9_AskFlags			
20C	PGRP9_INTRO	PGRP9_INTRO	The next few questions are about expenses made by (you/you or anyone in your household) during the last 12 months, that is, as far back as (Month and Year, twelve months ago).  We have used the responses that you've already given us to shorten this part of the interview, so I'll only be asking you about expenses that you told me that you did not have in the last three months.

1. Enter 1 to Continue	IF Ask_A[03] = 1 then goto PSCATA03
ELSEIF Ask_A[13] = 1 then goto PSCATA13
ELSEIF Ask_A[14] = 1 then goto PSCATA14
ELSEIF Ask_A[04] = 1 then goto PSCATA04
ELSEIF Ask_R[10] = 1 then goto PSCATR10
ELSEIF Ask_R[11] = 1 then goto PSCATR11
ELSEIF Ask_H[30] = 1 then goto PSCATH30
ELSE goto END_POPGRP9	
20C	PSCATA03	PSCATA03	(Now, please think about the last six months, since the first of (six months ago)./In the last SIX MONTHS) have (you/you or anyone in your household) purchased any men's socks, underwear, nightwear, or swimwear?

1. Yes
2. No	1:  Goto A03_COST

2,DK,RF:  IF Ask_A[13] = 1 then goto PSCATA13
          ELSEIF Ask_A[14] = 1 then goto PSCATA14
          ELSEIF Ask_A[04] = 1 then goto PSCATA04
          ELSEIF Ask_R[10] = 1 then goto PSCATR10
          ELSEIF Ask_R[11] = 1 then goto PSCATR11
          ELSEIF Ask_H[30] = 1 then goto PSCATH30
          ELSE goto END_POPGRP9	
20C	A03_COST	A03_COST	In the last SIX MONTHS, how much did (you/your household) spend on your last purchase of men's socks, underwear, nightwear, or swimwear?	IF ENTRY lt 5 or gt 200 then goto ERR1_A03COST

ELSE goto A03STORE	
20C	A03STORE	A03STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK 
   or RF then goto A03PURCH

ELSEIF Ask_A[13] = 1 then goto PSCATA13
ELSEIF Ask_A[14] = 1 then goto PSCATA14
ELSEIF Ask_A[04] = 1 then goto PSCATA04
ELSEIF Ask_R[10] = 1 then goto PSCATR10
ELSEIF Ask_R[11] = 1 then goto PSCATR11
ELSEIF Ask_H[30] = 1 then goto PSCATH30
ELSE goto END_POPGRP9	
20C	A03PURCH	A03PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_A[13] = 1 then goto PSCATA13
              ELSEIF Ask_A[14] = 1 then goto PSCATA14
              ELSEIF Ask_A[04] = 1 then goto PSCATA04
              ELSEIF Ask_R[10] = 1 then goto PSCATR10
              ELSEIF Ask_R[11] = 1 then goto PSCATR11
              ELSEIF Ask_H[30] = 1 then goto PSCATH30
              ELSE goto END_POPGRP9
                 
2:  Goto A03LOC	
20C	A03LOC	A03LOC	In what city is (business name) located?	Goto A03LOCST	
20C	A03LOCST	A03LOCST	? [F1]

In what state is (business name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_A03LOCST

ELSEIF Ask_A[13] = 1 then goto PSCATA13
ELSEIF Ask_A[14] = 1 then goto PSCATA14
ELSEIF Ask_A[04] = 1 then goto PSCATA04
ELSEIF Ask_R[10] = 1 then goto PSCATR10
ELSEIF Ask_R[11] = 1 then goto PSCATR11
ELSEIF Ask_H[30] = 1 then goto PSCATH30
ELSE goto END_POPGRP9	
20C	PSCATA13	PSCATA13	(Now, please think about the last six months, since the first of (six months ago)./In the last SIX MONTHS) have (you/you or anyone in your household) purchased any women's underwear, nightwear, or swimwear?

1. Yes
2. No	1:  Goto A13_COST

2,DK,RF:  IF Ask_A[14] = 1 then goto PSCATA14
          ELSEIF Ask_A[04] = 1 then goto PSCATA04
          ELSEIF Ask_R[10] = 1 then goto PSCATR10
          ELSEIF Ask_R[11] = 1 then goto PSCATR11
          ELSEIF Ask_H[30] = 1 then goto PSCATH30
          ELSE goto END_POPGRP9	
20C	A13_COST	A13_COST	In the last SIX MONTHS, how much did (you/your household) spend on your last purchase of women's underwear, nightwear, or swimwear?	IF ENTRY lt 5 or gt 200 then goto ERR1_A13COST

ELSE goto A13STORE	
20C	A13STORE	A13STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK 
   or RF then goto A13PURCH

ELSEIF Ask_A[14] = 1 then goto PSCATA14
ELSEIF Ask_A[04] = 1 then goto PSCATA04
ELSEIF Ask_R[10] = 1 then goto PSCATR10
ELSEIF Ask_R[11] = 1 then goto PSCATR11
ELSEIF Ask_H[30] = 1 then goto PSCATH30
ELSE goto END_POPGRP9	
20C	A13PURCH	A13PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_A[14] = 1 then goto PSCATA14
              ELSEIF Ask_A[04] = 1 then goto PSCATA04
              ELSEIF Ask_R[10] = 1 then goto PSCATR10
              ELSEIF Ask_R[11] = 1 then goto PSCATR11
              ELSEIF Ask_H[30] = 1 then goto PSCATH30
              ELSE goto END_POPGRP9

2:  Goto A13LOC	
20C	A13LOC	A13LOC	In what city is Business name located?	Goto A13LOCST	
20C	A13LOCST	A13LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_A13LOCST

ELSEIF Ask_A[14] = 1 then goto PSCATA14
ELSEIF Ask_A[04] = 1 then goto PSCATA04
ELSEIF Ask_R[10] = 1 then goto PSCATR10
ELSEIF Ask_R[11] = 1 then goto PSCATR11
ELSEIF Ask_H[30] = 1 then goto PSCATH30
ELSE goto END_POPGRP9	
20C	PSCATA14	PSCATA14	(Now, please think about the last six months, since the first of (six months ago)./In the last SIX MONTHS) have (you/you or anyone in your household) purchased any women's hosiery or accessories?

1. Yes
2. No	1:  Goto A14_COST

2,DK,RF:  IF Ask_A[04] = 1 then goto PSCATA04
          ELSEIF Ask_R[10] = 1 then goto PSCATR10
          ELSEIF Ask_R[11] = 1 then goto PSCATR11
          ELSEIF Ask_H[30] = 1 then goto PSCATH30
          ELSE goto END_POPGRP9	
20C	A14_COST	A14_COST	In the last SIX MONTHS, how much did (you/your household) spend on your last purchase of women's hosiery or accessories?	IF ENTRY lt 5 or gt 160 then goto ERR1_A14COST

ELSE goto A14STORE	
20C	A14STORE	A14STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
    or RF then goto A14PURCH

ELSEIF Ask_A[04] = 1 then goto PSCATA04
ELSEIF Ask_R[10] = 1 then goto PSCATR10
ELSEIF Ask_R[11] = 1 then goto PSCATR11
ELSEIF Ask_H[30] = 1 then goto PSCATH30
ELSE goto END_POPGRP9	
20C	A14PURCH	A14PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_A[04] = 1 then goto PSCATA04
              ELSEIF Ask_R[10] = 1 then goto PSCATR10
              ELSEIF Ask_R[11] = 1 then goto PSCATR11
              ELSEIF Ask_H[30] = 1 then goto PSCATH30
              ELSE goto END_POPGRP9
                  
2:  Goto A14LOC	
20C	A14LOC	A14LOC	In what city is Business name located?	Goto A14LOCST	
20C	A14LOCST	A14LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_A14LOCST

ELSEIF Ask_A[04] = 1 then goto PSCATA04
ELSEIF Ask_R[10] = 1 then goto PSCATR10
ELSEIF Ask_R[11] = 1 then goto PSCATR11
ELSEIF Ask_H[30] = 1 then goto PSCATH30
ELSE goto END_POPGRP9	
20C	PSCATA04	PSCATA04	(Now, please think about the last six months, since the first of (six months ago)./In the last SIX MONTHS) have (you/you or anyone in your household) purchased any men's accessories, including hats, ties, belts, or wallets?

1. Yes
2. No	1:  Goto A04_COST

2,DK,RF:  IF Ask_R[10] = 1 then goto PSCATR10
          ELSEIF Ask_R[11] = 1 then goto PSCATR11
          ELSEIF Ask_H[30] = 1 then goto PSCATH30
          ELSE goto END_POPGRP9	
20C	A04_COST	A04_COST	In the last SIX MONTHS, how much did (you/your household) spend on your last purchase of men's accessories, including hats, ties, belts, or wallets?	IF ENTRY lt 5 or gt 160 then goto ERR1_A04COST

ELSE goto A04STORE	
20C	A04STORE	A04STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK 
   or RF then goto A04PURCH

ELSEIF Ask_R[10] = 1 then goto PSCATR10
ELSEIF Ask_R[11] = 1 then goto PSCATR11
ELSEIF Ask_H[30] = 1 then goto PSCATH30
ELSE goto END_POPGRP9	
20C	A04PURCH	A04PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_R[10] = 1 then goto PSCATR10
              ELSEIF Ask_R[11] = 1 then goto PSCATR11
              ELSEIF Ask_H[30] = 1 then goto PSCATH30
              ELSE goto END_POPGRP9
                 
2:  Goto A04LOC	
20C	A04LOC	A04LOC	In what city is (business name) located?	Goto A04LOCST	
20C	A04LOCST	A04LOCST	? [F1]

In what state is (business name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_A04LOCST

ELSEIF Ask_R[10] = 1 then goto PSCATR10
ELSEIF Ask_R[11] = 1 then goto PSCATR11
ELSEIF Ask_H[30] = 1 then goto PSCATH30
ELSE goto END_POPGRP9	
20C	PSCATR10	PSCATR10	(Now, please think about the last six months, since the first of (six months ago)./In the last SIX MONTHS) have (you/you or anyone in your household) had any expenses for pet services such as grooming, boarding, or training?

1. Yes
2. No	1:  Goto R10_COST

2,DK,RF:  IF Ask_R[11] = 1 then goto PSCATR11
          ELSEIF Ask_H[30] = 1 then goto PSCATH30
          ELSE goto END_POPGRP9	
20C	R10_COST	R10_COST	In the last SIX MONTHS, how much was (your/your household's) last expense for pet services such as grooming, boarding, or training?	IF ENTRY lt 8 or gt 500 then goto ERR1_R10COST

ELSE goto R10STORE	
20C	R10STORE	R10STORE	What is the name of the business where (you/your household) had this expense?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
    or RF then goto R10PURCH

ELSEIF Ask_R[11] = 1 then goto PSCATR11
ELSEIF Ask_H[30] = 1 then goto PSCATH30
ELSE goto END_POPGRP9	
20C	R10PURCH	R10PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_R[11] = 1 then goto PSCATR11
              ELSEIF Ask_H[30] = 1 then goto PSCATH30
              ELSE goto END_POPGRP9
                  
2:  Goto R10LOC	
20C	R10LOC	R10LOC	In what city is Business name located?	Goto R10LOCST	
20C	R10LOCST	R10LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_R10LOCST

ELSEIF Ask_R[11] = 1 then goto PSCATR11
ELSEIF Ask_H[30] = 1 then goto PSCATH30
ELSE goto END_POPGRP9	
20C	PSCATR11	PSCATR11	(Now, please think about the last six months, since the first of (six months ago)./In the last SIX MONTHS) have (you/you or anyone in your household) had any expenses for veterinarian services?

1. Yes
2. No	1:  Goto R11_COST

2,DK,RF:  IF Ask_H[30] = 1 then goto PSCATH30
          ELSE goto END_POPGRP9	
20C	R11_COST	R11_COST	In the last SIX MONTHS, how much was (your/your household's) last expense for veterinarian services?	IF ENTRY lt 12 or gt 700 then goto ERR1_R11COST

ELSE goto R11STORE	
20C	R11STORE	R11STORE	What is the name of the business where (you/your household) had this expense?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
   or RF then goto R11PURCH

ELSEIF Ask_H[30] = 1 then goto PSCATH30
ELSE goto END_POPGRP9	
20C	R11PURCH	R11PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_H[30] = 1 then goto PSCATH30
              ELSE goto END_POPGRP9
                  
2:  Goto R11LOC	
20C	R11LOC	R11LOC	In what city is Business name located?	Goto R11LOCST	
20C	R11LOCST	R11LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_R11LOCST

ELSEIF Ask_H[30] = 1 then goto PSCATH30
ELSE goto END_POPGRP9	
20C	PSCATH30	PSCATH30	Now, please think about the last 12 months, since the first of (Month and Year, twelve months ago), have (you/you or anyone in your household) purchased any barbeque grills, powered lawn or garden equipment, or outdoor decorations?

1. Yes
2. No	1:  Goto H30_COST

2,DK,RF:  Goto END_POPGRP9	
20C	H30_COST	H30_COST	In the last 12 MONTHS, how much did (you/your household) spend on your last purchase of barbeque grills, powered lawn or garden equipment, or outdoor decorations?	IF ENTRY lt 5 or gt 2500 then goto ERR1_H30COST

ELSE goto H30STORE	
20C	H30STORE	H30STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
   or RF then goto H30PURCH

ELSE goto END_POPGRP9	
20C	H30PURCH	H30PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  Goto END_POPGRP9 
                  
2:  Goto H30LOC	
20C	H30LOC	H30LOC	In what city is Business name located?	Goto H30LOCST	
20C	H30LOCST	H30LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_H30LOCST

ELSE goto END_POPGRP9	
		END_POPGRP9		Exit section 20C and goto the next appropriate section	
		POP10_AskFlags			
20C	PGRP10_INTRO	PGRP10_INTRO	The next few questions are about expenses made by (you/you or anyone in your household) during the last 12 months, that is, as far back as (Month and Year, twelve months ago).  We have used the responses that you've already given us to shorten this part of the interview, so I'll only be asking you about expenses that you told me that you did not have in the last three months.

1. Enter 1 to Continue	IF Ask_A[12] = 1 then goto PSCATA12
ELSEIF Ask_A[10] = 1 then goto PSCATA10
ELSEIF Ask_A[11] = 1 then goto PSCATA11
ELSEIF Ask_A[16] = 1 then goto PSCATA16
ELSEIF Ask_A[08] = 1 then goto PSCATA08
ELSEIF Ask_T[09] = 1 then goto PSCATT09
ELSEIF Ask_T[08] = 1 then goto PSCATT08
ELSEIF Ask_T[07] = 1 then goto PSCATT07
ELSEIF Ask_A[09] = 1 then goto PSCATA09
ELSE goto END_POPGRP10	
20C	PSCATA12	PSCATA12	Now, please think about the last six months, since the first of (Month and Year, six month ago), have (you/you or anyone in your household) purchased any women's suits or suit components?

1. Yes
2. No	1:  Goto A12_COST

2,DK,RF:  IF Ask_A[10] = 1 then goto PSCATA10
          ELSEIF Ask_A[11] = 1 then goto PSCATA11
          ELSEIF Ask_A[16] = 1 then goto PSCATA16
          ELSEIF Ask_A[08] = 1 then goto PSCATA08
          ELSEIF Ask_T[09] = 1 then goto PSCATT09
          ELSEIF Ask_T[08] = 1 then goto PSCATT08
          ELSEIF Ask_T[07] = 1 then goto PSCATT07
          ELSEIF Ask_A[09] = 1 then goto PSCATA09
          ELSE goto END_POPGRP10	
20C	A12_COST	A12_COST	In the last SIX MONTHS, how much did (you/your household) spend on your last purchase of women's suits or suit components?	IF ENTRY lt 18 or gt 1000 then goto ERR1_A12COST

ELSE goto A12STORE	
20C	A12STORE	A12STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
    or RF then goto A12PURCH

ELSEIF Ask_A[10] = 1 then goto PSCATA10
ELSEIF Ask_A[11] = 1 then goto PSCATA11
ELSEIF Ask_A[16] = 1 then goto PSCATA16
ELSEIF Ask_A[08] = 1 then goto PSCATA08
ELSEIF Ask_T[09] = 1 then goto PSCATT09
ELSEIF Ask_T[08] = 1 then goto PSCATT08
ELSEIF Ask_T[07] = 1 then goto PSCATT07
ELSEIF Ask_A[09] = 1 then goto PSCATA09
ELSE goto END_POPGRP10	
20C	A12PURCH	A12PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_A[10] = 1 then goto PSCATA10
              ELSEIF Ask_A[11] = 1 then goto PSCATA11
              ELSEIF Ask_A[16] = 1 then goto PSCATA16
              ELSEIF Ask_A[08] = 1 then goto PSCATA08
              ELSEIF Ask_T[09] = 1 then goto PSCATT09
              ELSEIF Ask_T[08] = 1 then goto PSCATT08
              ELSEIF Ask_T[07] = 1 then goto PSCATT07
              ELSEIF Ask_A[09] = 1 then goto PSCATA09
              ELSE goto END_POPGRP10

2:  Goto A12LOC	
20C	A12LOC	A12LOC	In what city is Business name located?	Goto A12LOCST	
20C	A12LOCST	A12LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_A12LOCST

ELSEIF Ask_A[10] = 1 then goto PSCATA10
ELSEIF Ask_A[11] = 1 then goto PSCATA11
ELSEIF Ask_A[16] = 1 then goto PSCATA16
ELSEIF Ask_A[08] = 1 then goto PSCATA08
ELSEIF Ask_T[09] = 1 then goto PSCATT09
ELSEIF Ask_T[08] = 1 then goto PSCATT08
ELSEIF Ask_T[07] = 1 then goto PSCATT07
ELSEIF Ask_A[09] = 1 then goto PSCATA09
ELSE goto END_POPGRP10	
20C	PSCATA10	PSCATA10	(Now, please think about the last six months, since the first of (six months ago)./In the last SIX MONTHS) have (you/you or anyone in your household) purchased any women's dresses?

1. Yes
2. No	1:  Goto A10_COST

2,DK,RF:  IF Ask_A[11] = 1 then goto PSCATA11
          ELSEIF Ask_A[16] = 1 then goto PSCATA16
          ELSEIF Ask_A[08] = 1 then goto PSCATA08
          ELSEIF Ask_T[09] = 1 then goto PSCATT09
          ELSEIF Ask_T[08] = 1 then goto PSCATT08
          ELSEIF Ask_T[07] = 1 then goto PSCATT07
          ELSEIF Ask_A[09] = 1 then goto PSCATA09
          ELSE goto END_POPGRP10	
20C	A10_COST	A10_COST	In the last SIX MONTHS, how much did (you/your household) spend on your last purchase of women's dresses?	IF ENTRY lt 8 or gt 455 then goto ERR1_A10COST

ELSE goto A10STORE	
20C	A10STORE	A10STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
   or RF then goto A10PURCH

ELSEIF Ask_A[11] = 1 then goto PSCATA11
ELSEIF Ask_A[16] = 1 then goto PSCATA16
ELSEIF Ask_A[08] = 1 then goto PSCATA08
ELSEIF Ask_T[09] = 1 then goto PSCATT09
ELSEIF Ask_T[08] = 1 then goto PSCATT08
ELSEIF Ask_T[07] = 1 then goto PSCATT07
ELSEIF Ask_A[09] = 1 then goto PSCATA09
ELSE goto END_POPGRP10	
20C	A10PURCH	A10PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_A[11] = 1 then goto PSCATA11
              ELSEIF Ask_A[16] = 1 then goto PSCATA16
              ELSEIF Ask_A[08] = 1 then goto PSCATA08
              ELSEIF Ask_T[09] = 1 then goto PSCATT09
              ELSEIF Ask_T[08] = 1 then goto PSCATT08
              ELSEIF Ask_T[07] = 1 then goto PSCATT07
              ELSEIF Ask_A[09] = 1 then goto PSCATA09
              ELSE goto END_POPGRP10

2:  Goto A10LOC	
20C	A10LOC	A10LOC	In what city is Business name located?	Goto A10LOCST	
20C	A10LOCST	A10LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_A10LOCST

ELSEIF Ask_A[11] = 1 then goto PSCATA11
ELSEIF Ask_A[16] = 1 then goto PSCATA16
ELSEIF Ask_A[08] = 1 then goto PSCATA08
ELSEIF Ask_T[09] = 1 then goto PSCATT09
ELSEIF Ask_T[08] = 1 then goto PSCATT08
ELSEIF Ask_T[07] = 1 then goto PSCATT07
ELSEIF Ask_A[09] = 1 then goto PSCATA09
ELSE goto END_POPGRP10	
20C	PSCATA11	PSCATA11	(Now, please think about the last six months, since the first of (six months ago)./In the last SIX MONTHS) have (you/you or anyone in your household) purchased any women's tops, skirts, pants, or shorts?

1. Yes
2. No	1:  Goto A11_COST

2,DK,RF:  IF Ask_A[16] = 1 then goto PSCATA16
          ELSEIF Ask_A[08] = 1 then goto PSCATA08
          ELSEIF Ask_T[09] = 1 then goto PSCATT09
          ELSEIF Ask_T[08] = 1 then goto PSCATT08
          ELSEIF Ask_T[07] = 1 then goto PSCATT07
          ELSEIF Ask_A[09] = 1 then goto PSCATA09
          ELSE goto END_POPGRP10	
20C	A11_COST	A11_COST	In the last SIX MONTHS, how much did (you/your household) spend on your last purchase of women's tops, skirts, pants, or shorts?	IF ENTRY lt 5 or gt 500 then goto ERR1_A11COST

ELSE goto A11STORE	
20C	A11STORE	A11STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
   or RF then goto A11PURCH

ELSEIF Ask_A[16] = 1 then goto PSCATA16
ELSEIF Ask_A[08] = 1 then goto PSCATA08
ELSEIF Ask_T[09] = 1 then goto PSCATT09
ELSEIF Ask_T[08] = 1 then goto PSCATT08
ELSEIF Ask_T[07] = 1 then goto PSCATT07
ELSEIF Ask_A[09] = 1 then goto PSCATA09
ELSE goto END_POPGRP10	
20C	A11PURCH	A11PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_A[16] = 1 then goto PSCATA16
              ELSEIF Ask_A[08] = 1 then goto PSCATA08
              ELSEIF Ask_T[09] = 1 then goto PSCATT09
              ELSEIF Ask_T[08] = 1 then goto PSCATT08
              ELSEIF Ask_T[07] = 1 then goto PSCATT07
              ELSEIF Ask_A[09] = 1 then goto PSCATA09
              ELSE goto END_POPGRP10

2:  Goto A11LOC	
20C	A11LOC	A11LOC	In what city is Business name located?	Goto A11LOCST	
20C	A11LOCST	A11LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_A11LOCST

ELSEIF Ask_A[16] = 1 then goto PSCATA16
ELSEIF Ask_A[08] = 1 then goto PSCATA08
ELSEIF Ask_T[09] = 1 then goto PSCATT09
ELSEIF Ask_T[08] = 1 then goto PSCATT08
ELSEIF Ask_T[07] = 1 then goto PSCATT07
ELSEIF Ask_A[09] = 1 then goto PSCATA09
ELSE goto END_POPGRP10	
20C	PSCATA16	PSCATA16	(Now, please think about the last six months, since the first of (six months ago)./In the last SIX MONTHS) have (you/you or anyone in your household) purchased any girls' clothing or accessories?

1. Yes
2. No	1:  Goto A16_COST

2,DK,RF:  IF Ask_A[08] = 1 then goto PSCATA08
          ELSEIF Ask_T[09] = 1 then goto PSCATT09
          ELSEIF Ask_T[08] = 1 then goto PSCATT08
          ELSEIF Ask_T[07] = 1 then goto PSCATT07
          ELSEIF Ask_A[09] = 1 then goto PSCATA09
          ELSE goto END_POPGRP10	
20C	A16_COST	A16_COST	In the last SIX MONTHS, how much did (you/your household) spend on your last purchase of girls' clothing or accessories?	IF ENTRY lt 5 or gt 500 then goto ERR1_A16COST

ELSE goto A16STORE	
20C	A16STORE	A16STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK 
   or RF then goto A16PURCH

ELSEIF Ask_A[08] = 1 then goto PSCATA08
ELSEIF Ask_T[09] = 1 then goto PSCATT09
ELSEIF Ask_T[08] = 1 then goto PSCATT08
ELSEIF Ask_T[07] = 1 then goto PSCATT07
ELSEIF Ask_A[09] = 1 then goto PSCATA09
ELSE goto END_POPGRP10	
20C	A16PURCH	A16PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_A[08] = 1 then goto PSCATA08
              ELSEIF Ask_T[09] = 1 then goto PSCATT09
              ELSEIF Ask_T[08] = 1 then goto PSCATT08
              ELSEIF Ask_T[07] = 1 then goto PSCATT07
              ELSEIF Ask_A[09] = 1 then goto PSCATA09
              ELSE goto END_POPGRP10

2:  Goto A16LOC	
20C	A16LOC	A16LOC	In what city is Business name located?	Goto A16LOCST	
20C	A16LOCST	A16LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_A16LOCST

ELSEIF Ask_A[08] = 1 then goto PSCATA08
ELSEIF Ask_T[09] = 1 then goto PSCATT09
ELSEIF Ask_T[08] = 1 then goto PSCATT08
ELSEIF Ask_T[07] = 1 then goto PSCATT07
ELSEIF Ask_A[09] = 1 then goto PSCATA09
ELSE goto END_POPGRP10	
20C	PSCATA08	PSCATA08	(Now, please think about the last six months, since the first of (six months ago)./In the last SIX MONTHS) have (you/you or anyone in your household) purchased any boys' clothing or accessories?

1. Yes
2. No	1:  Goto A08_COST

2,DK,RF:  IF Ask_T[09] = 1 then goto PSCATT09
          ELSEIF Ask_T[08] = 1 then goto PSCATT08
          ELSEIF Ask_T[07] = 1 then goto PSCATT07
          ELSEIF Ask_A[09] = 1 then goto PSCATA09
          ELSE goto END_POPGRP10	
20C	A08_COST	A08_COST	In the last SIX MONTHS, how much did (you/your household) spend on your last purchase of boys' clothing or accessories?	IF ENTRY lt 5 or gt 500 then goto ERR1_A08COST

ELSE goto A08STORE	
20C	A08STORE	A08STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
    or RF then goto A08PURCH

ELSEIF Ask_T[09] = 1 then goto PSCATT09
ELSEIF Ask_T[08] = 1 then goto PSCATT08
ELSEIF Ask_T[07] = 1 then goto PSCATT07
ELSEIF Ask_A[09] = 1 then goto PSCATA09
ELSE goto END_POPGRP10	
20C	A08PURCH	A08PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_T[09] = 1 then goto PSCATT09
              ELSEIF Ask_T[08] = 1 then goto PSCATT08
              ELSEIF Ask_T[07] = 1 then goto PSCATT07
              ELSEIF Ask_A[09] = 1 then goto PSCATA09
              ELSE goto END_POPGRP10

2:  Goto A08LOC	
20C	A08LOC	A08LOC	In what city is Business name located?	Goto A08LOCST	
20C	A08LOCST	A08LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_A08LOCST

ELSEIF Ask_T[09] = 1 then goto PSCATT09
ELSEIF Ask_T[08] = 1 then goto PSCATT08
ELSEIF Ask_T[07] = 1 then goto PSCATT07
ELSEIF Ask_A[09] = 1 then goto PSCATA09
ELSE goto END_POPGRP10	
20C	PSCATT09	PSCATT09	(Now, please think about the last six months, since the first of (six months ago)./In the last SIX MONTHS) have (you/you or anyone in your household) purchased any motor oil, coolants, or fluids?

1. Yes
2. No	1:  Goto T09_COST

2,DK,RF:  IF Ask_T[08] = 1 then goto PSCATT08
          ELSEIF Ask_T[07] = 1 then goto PSCATT07
          ELSEIF Ask_A[09] = 1 then goto PSCATA09
          ELSE goto END_POPGRP10	
20C	T09_COST	T09_COST	In the last SIX MONTHS, how much did (you/your household) spend on your last purchase of motor oil, coolants, or fluids?	IF ENTRY lt 5 or gt 65 then goto ERR1_T09COST

ELSE goto T09STORE	
20C	T09STORE	T09STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK 
   or RF then goto T09PURCH

ELSEIF Ask_T[08] = 1 then goto PSCATT08
ELSEIF Ask_T[07] = 1 then goto PSCATT07
ELSEIF Ask_A[09] = 1 then goto PSCATA09
ELSE goto END_POPGRP10	
20C	T09PURCH	T09PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_T[08] = 1 then goto PSCATT08
              ELSEIF Ask_T[07] = 1 then goto PSCATT07
              ELSEIF Ask_A[09] = 1 then goto PSCATA09
              ELSE goto END_POPGRP10

2:  Goto T09LOC	
20C	T09LOC	T09LOC	In what city is Business name located?	Goto T09LOCST	
20C	T09LOCST	T09LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_T09LOCST

ELSEIF Ask_T[08] = 1 then goto PSCATT08
ELSEIF Ask_T[07] = 1 then goto PSCATT07
ELSEIF Ask_A[09] = 1 then goto PSCATA09
ELSE goto END_POPGRP10	
20C	PSCATT08	PSCATT08	(Now, please think about the last six months, since the first of (six months ago)./In the last SIX MONTHS) have (you/you or anyone in your household) purchased any vehicle parts or accessories?  Do not include tires.

1. Yes
2. No	1:  Goto T08_COST

2,DK,RF:  IF Ask_T[07] = 1 then goto PSCATT07
          ELSEIF Ask_A[09] = 1 then goto PSCATA09
          ELSE goto END_POPGRP10	
20C	T08_COST	T08_COST	In the last SIX MONTHS, how much did (you/your household) spend on your last purchase of vehicle parts or accessories?  Do not include tires.	IF ENTRY lt 5 or gt 1700 then goto ERR1_T08COST

ELSE goto T08STORE	
20C	T08STORE	T08STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
   or RF then goto T08PURCH

ELSEIF Ask_T[07] = 1 then goto PSCATT07
ELSEIF Ask_A[09] = 1 then goto PSCATA09
ELSE goto END_POPGRP10	
20C	T08PURCH	T08PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_T[07] = 1 then goto PSCATT07
              ELSEIF Ask_A[09] = 1 then goto PSCATA09
              ELSE goto END_POPGRP10

2:  Goto T08LOC	
20C	T08LOC	T08LOC	In what city is Business name located?	Goto T08LOCST	
20C	T08LOCST	T08LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_T08LOCST

ELSEIF Ask_T[07] = 1 then goto PSCATT07
ELSEIF Ask_A[09] = 1 then goto PSCATA09
ELSE goto END_POPGRP10	
20C	PSCATT07	PSCATT07	Now, please think about the last 12 months, since the first of (Month and Year, twelve months ago), have (you/you or anyone in your household) purchased any tires?

1. Yes
2. No	1:  Goto T07_COST

2,DK,RF:  IF Ask_A[09] = 1 then goto PSCATA09
          ELSE goto END_POPGRP10	
20C	T07_COST	T07_COST	In the last 12 MONTHS, how much did (you/your household) spend on your last purchase of tires?	IF ENTRY lt 5 or gt 700 then goto ERR1_T07COST

ELSE goto T07STORE	
20C	T07STORE	T07STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
    or RF then goto T07PURCH

ELSEIF Ask_A[09] = 1 then goto PSCATA09
ELSE goto END_POPGRP10	
20C	T07PURCH	T07PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_A[09] = 1 then goto PSCATA09
              ELSE goto END_POPGRP10

2:  Goto T07LOC	
20C	T07LOC	T07LOC	In what city is Business name located?	Goto T07LOCST	
20C	T07LOCST	T07LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_T07LOCST

ELSEIF Ask_A[09] = 1 then goto PSCATA09
ELSE goto END_POPGRP10	
20C	PSCATA09	PSCATA09	(Now, please think about the last 12 months, since the first of (12 months ago)./In the last 12 MONTHS) have (you/you or anyone in your household) purchased any women's coats or jackets?

1. Yes
2. No	1:  Goto A09_COST

2,DK,RF:  Goto END_POPGRP10	
20C	A09_COST	A09_COST	In the last 12 MONTHS, how much did (you/your household) spend on your last purchase of women's coats or jackets?	IF ENTRY lt 9 or gt 400 then goto ERR1_A09COST

ELSE goto A09STORE	
20C	A09STORE	A09STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
   or RF then goto A09PURCH

ELSE goto END_POPGRP10	
20C	A09PURCH	A09PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  Goto END_POPGRP10

2:  Goto A09LOC	
20C	A09LOC	A09LOC	In what city is Business name located?	Goto A09LOCST	
20C	A09LOCST	A09LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_A09LOCST

ELSE goto END_POPGRP10	
		END_POPGRP10		Exit section 20C and goto the next appropriate section	
		POP11_AskFlags			
20C	PGRP11_INTRO	PGRP11_INTRO	The next few questions are about expenses made by (you/you or anyone in your household) during the last six months, that is, as far back as (Month and Year, six month ago).  We have used the responses that you've already given us to shorten this part of the interview, so I'll only be asking you about expenses that you told me that you did not have in the last three months.

1. Enter 1 to Continue	IF Ask_T[05] = 1 then goto PSCATT05
ELSEIF Ask_E[16] = 1 then goto PSCATE16
ELSEIF Ask_E[17] = 1 then goto PSCATE17
ELSEIF Ask_R[02] = 1 then goto PSCATR02
ELSEIF Ask_R[09] = 1 then goto PSCATR09
ELSEIF Ask_R[05] = 1 then goto PSCATR05
ELSEIF Ask_R[07] = 1 then goto PSCATR07
ELSEIF Ask_R[04] = 1 then goto PSCATR04
ELSEIF Ask_M[03] = 1 then goto PSCATM03
ELSEIF Ask_T[18] = 1 then goto PSCATT18
ELSEIF Ask_T[19] = 1 then goto PSCATT19
ELSE goto END_POPGRP11	
20C	PSCATT05	PSCATT05	Now, please think about the last six months, since the first of (Month and Year, six month ago) have (you/you or anyone in your household) purchased any gasoline, diesel, or alternative fuels?

1. Yes
2. No	1:  Goto T05_COST

2,DK,RF:  IF Ask_E[16] = 1 then goto PSCATE16
          ELSEIF Ask_E[17] = 1 then goto PSCATE17
          ELSEIF Ask_R[02] = 1 then goto PSCATR02
          ELSEIF Ask_R[09] = 1 then goto PSCATR09
          ELSEIF Ask_R[05] = 1 then goto PSCATR05
          ELSEIF Ask_R[07] = 1 then goto PSCATR07
          ELSEIF Ask_R[04] = 1 then goto PSCATR04
          ELSEIF Ask_M[03] = 1 then goto PSCATM03
          ELSEIF Ask_T[18] = 1 then goto PSCATT18
          ELSEIF Ask_T[19] = 1 then goto PSCATT19
          ELSE goto END_POPGRP11	
20C	T05_COST	T05_COST	In the last SIX MONTHS, how much did (you/your household) spend on your last purchase of gasoline, diesel or alternative fuels?	IF ENTRY gt 400 then goto ERR1_T05COST

ELSE goto T05STORE	
20C	T05STORE	T05STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK 
   or RF then goto T05PURCH

ELSEIF Ask_E[16] = 1 then goto PSCATE16
ELSEIF Ask_E[17] = 1 then goto PSCATE17
ELSEIF Ask_R[02] = 1 then goto PSCATR02
ELSEIF Ask_R[09] = 1 then goto PSCATR09
ELSEIF Ask_R[05] = 1 then goto PSCATR05
ELSEIF Ask_R[07] = 1 then goto PSCATR07
ELSEIF Ask_R[04] = 1 then goto PSCATR04
ELSEIF Ask_M[03] = 1 then goto PSCATM03
ELSEIF Ask_T[18] = 1 then goto PSCATT18
ELSEIF Ask_T[19] = 1 then goto PSCATT19
ELSE goto END_POPGRP11	
20C	T05PURCH	T05PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:   IF Ask_E[16] = 1 then goto PSCATE16
               ELSEIF Ask_E[17] = 1 then goto PSCATE17
               ELSEIF Ask_R[02] = 1 then goto PSCATR02
               ELSEIF Ask_R[09] = 1 then goto PSCATR09
               ELSEIF Ask_R[05] = 1 then goto PSCATR05
               ELSEIF Ask_R[07] = 1 then goto PSCATR07
               ELSEIF Ask_R[04] = 1 then goto PSCATR04
               ELSEIF Ask_M[03] = 1 then goto PSCATM03
               ELSEIF Ask_T[18] = 1 then goto PSCATT18
               ELSEIF Ask_T[19] = 1 then goto PSCATT19
               ELSE goto END_POPGRP11

2:  Goto T05LOC	
20C	T05LOC	T05LOC	In what city is (Business Name) located?	Goto T05LOCST	
20C	T05LOCST	T05LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_T05LOCST

ELSEIF Ask_E[16] = 1 then goto PSCATE16
ELSEIF Ask_E[17] = 1 then goto PSCATE17
ELSEIF Ask_R[02] = 1 then goto PSCATR02
ELSEIF Ask_R[09] = 1 then goto PSCATR09
ELSEIF Ask_R[05] = 1 then goto PSCATR05
ELSEIF Ask_R[07] = 1 then goto PSCATR07
ELSEIF Ask_R[04] = 1 then goto PSCATR04
ELSEIF Ask_M[03] = 1 then goto PSCATM03
ELSEIF Ask_T[18] = 1 then goto PSCATT18
ELSEIF Ask_T[19] = 1 then goto PSCATT19
ELSE goto END_POPGRP11	
20C	PSCATE16	PSCATE16	(Now, please think about the last six months, since the first of (Six Months Ago)./In the last SIX MONTHS) have (you/you or anyone in your household) had any expenses for cellular telephone service?

1. Yes
2. No	1:  Goto E16_COST

2,DK,RF:  IF Ask_E[17] = 1 then goto PSCATE17
          ELSEIF Ask_R[02] = 1 then goto PSCATR02
          ELSEIF Ask_R[09] = 1 then goto PSCATR09
          ELSEIF Ask_R[05] = 1 then goto PSCATR05
          ELSEIF Ask_R[07] = 1 then goto PSCATR07
          ELSEIF Ask_R[04] = 1 then goto PSCATR04
          ELSEIF Ask_M[03] = 1 then goto PSCATM03
          ELSEIF Ask_T[18] = 1 then goto PSCATT18
          ELSEIF Ask_T[19] = 1 then goto PSCATT19
          ELSE goto END_POPGRP11	
20C	E16_COST	E16_COST	In the last SIX MONTHS, how much was (your/your household's) last expense for cellular telelphone service?	IF ENTRY lt 7 or gt 400 then goto ERR1_E16COST

ELSE goto E16STORE	
20C	E16STORE	E16STORE	What is the name of the business where (you/your household) had this expense?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK 
   or RF then goto E16PURCH

ELSEIF Ask_E[17] = 1 then goto PSCATE17
ELSEIF Ask_R[02] = 1 then goto PSCATR02
ELSEIF Ask_R[09] = 1 then goto PSCATR09
ELSEIF Ask_R[05] = 1 then goto PSCATR05
ELSEIF Ask_R[07] = 1 then goto PSCATR07
ELSEIF Ask_R[04] = 1 then goto PSCATR04
ELSEIF Ask_M[03] = 1 then goto PSCATM03
ELSEIF Ask_T[18] = 1 then goto PSCATT18
ELSEIF Ask_T[19] = 1 then goto PSCATT19
ELSE goto END_POPGRP11	
20C	E16PURCH	E16PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:   IF Ask_E[17] = 1 then goto PSCATE17
               ELSEIF Ask_R[02] = 1 then goto PSCATR02
               ELSEIF Ask_R[09] = 1 then goto PSCATR09
               ELSEIF Ask_R[05] = 1 then goto PSCATR05
               ELSEIF Ask_R[07] = 1 then goto PSCATR07
               ELSEIF Ask_R[04] = 1 then goto PSCATR04
               ELSEIF Ask_M[03] = 1 then goto PSCATM03
               ELSEIF Ask_T[18] = 1 then goto PSCATT18
               ELSEIF Ask_T[19] = 1 then goto PSCATT19
               ELSE goto END_POPGRP11

2:  Goto E16LOC	
20C	E16LOC	E16LOC	In what city is (Business Name) located?	Goto E16LOCST	
20C	E16LOCST	E16LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_E16LOCST

ELSEIF Ask_E[17] = 1 then goto PSCATE17
ELSEIF Ask_R[02] = 1 then goto PSCATR02
ELSEIF Ask_R[09] = 1 then goto PSCATR09
ELSEIF Ask_R[05] = 1 then goto PSCATR05
ELSEIF Ask_R[07] = 1 then goto PSCATR07
ELSEIF Ask_R[04] = 1 then goto PSCATR04
ELSEIF Ask_M[03] = 1 then goto PSCATM03
ELSEIF Ask_T[18] = 1 then goto PSCATT18
ELSEIF Ask_T[19] = 1 then goto PSCATT19
ELSE goto END_POPGRP11	
20C	PSCATE17	PSCATE17	(Now, please think about the last six months, since the first of (six months ago)./In the last SIX MONTHS) have (you/you or anyone in your household) had any expenses for local or long distance landline telephone service including prepaid phone cards?

1. Yes
2. No	1:  Goto E17_COST

2,DK,RF:  IF Ask_R[02] = 1 then goto PSCATR02
          ELSEIF Ask_R[09] = 1 then goto PSCATR09
          ELSEIF Ask_R[05] = 1 then goto PSCATR05
          ELSEIF Ask_R[07] = 1 then goto PSCATR07
          ELSEIF Ask_R[04] = 1 then goto PSCATR04
          ELSEIF Ask_M[03] = 1 then goto PSCATM03
          ELSEIF Ask_T[18] = 1 then goto PSCATT18
          ELSEIF Ask_T[19] = 1 then goto PSCATT19
          ELSE goto END_POPGRP11	
20C	E17_COST	E17_COST	In the last SIX MONTHS, how much was (your/your household's) last expense for local or long distance landline telephone service including prepaid phone cards?	IF ENTRY lt 7 or gt 400 then goto ERR1_E17COST

ELSE goto E17STORE	
20C	E17STORE	E17STORE	What is the name of the business where (you/your household) had this expense?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK 
   or RF then goto E17PURCH

ELSEIF Ask_R[02] = 1 then goto PSCATR02
ELSEIF Ask_R[09] = 1 then goto PSCATR09
ELSEIF Ask_R[05] = 1 then goto PSCATR05
ELSEIF Ask_R[07] = 1 then goto PSCATR07
ELSEIF Ask_R[04] = 1 then goto PSCATR04
ELSEIF Ask_M[03] = 1 then goto PSCATM03
ELSEIF Ask_T[18] = 1 then goto PSCATT18
ELSEIF Ask_T[19] = 1 then goto PSCATT19
ELSE goto END_POPGRP11	
20C	E17PURCH	E17PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:   IF Ask_R[02] = 1 then goto PSCATR02
               ELSEIF Ask_R[09] = 1 then goto PSCATR09
               ELSEIF Ask_R[05] = 1 then goto PSCATR05
               ELSEIF Ask_R[07] = 1 then goto PSCATR07
               ELSEIF Ask_R[04] = 1 then goto PSCATR04
               ELSEIF Ask_M[03] = 1 then goto PSCATM03
               ELSEIF Ask_T[18] = 1 then goto PSCATT18
               ELSEIF Ask_T[19] = 1 then goto PSCATT19
               ELSE goto END_POPGRP11

2:  Goto E17LOC	
20C	E17LOC	E17LOC	In what city is Business name located?	Goto E17LOCST	
20C	E17LOCST	E17LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_E17LOCST

ELSEIF Ask_R[02] = 1 then goto PSCATR02
ELSEIF Ask_R[09] = 1 then goto PSCATR09
ELSEIF Ask_R[05] = 1 then goto PSCATR05
ELSEIF Ask_R[07] = 1 then goto PSCATR07
ELSEIF Ask_R[04] = 1 then goto PSCATR04
ELSEIF Ask_M[03] = 1 then goto PSCATM03
ELSEIF Ask_T[18] = 1 then goto PSCATT18
ELSEIF Ask_T[19] = 1 then goto PSCATT19
ELSE goto END_POPGRP11	
20C	PSCATR02	PSCATR02	(Now, please think about the last six months, since the first of (six months ago)./In the last SIX MONTHS) have (you/you or anyone in your household) had any expenses for any cable or satellite television or radio service?

1. Yes
2. No	1:  Goto R02_COST

2,DK,RF:  IF Ask_R[09] = 1 then goto PSCATR09
          ELSEIF Ask_R[05] = 1 then goto PSCATR05
          ELSEIF Ask_R[07] = 1 then goto PSCATR07
          ELSEIF Ask_R[04] = 1 then goto PSCATR04
          ELSEIF Ask_M[03] = 1 then goto PSCATM03
          ELSEIF Ask_T[18] = 1 then goto PSCATT18
          ELSEIF Ask_T[19] = 1 then goto PSCATT19
          ELSE goto END_POPGRP11	
20C	R02_COST	R02_COST	In the last SIX MONTHS, how much was (your/your household's) last expense for cable or satellite television or radio service?	IF ENTRY lt 5 or gt 100 then goto ERR1_R02COST

ELSE goto R02STORE	
20C	R02STORE	R02STORE	What is the name of the business where (you/your household) had this expense?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK 
   or RF then goto R02PURCH

ELSEIF Ask_R[09] = 1 then goto PSCATR09
ELSEIF Ask_R[05] = 1 then goto PSCATR05
ELSEIF Ask_R[07] = 1 then goto PSCATR07
ELSEIF Ask_R[04] = 1 then goto PSCATR04
ELSEIF Ask_M[03] = 1 then goto PSCATM03
ELSEIF Ask_T[18] = 1 then goto PSCATT18
ELSEIF Ask_T[19] = 1 then goto PSCATT19
ELSE goto END_POPGRP11	
20C	R02PURCH	R02PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:   IF Ask_R[09] = 1 then goto PSCATR09
               ELSEIF Ask_R[05] = 1 then goto PSCATR05
               ELSEIF Ask_R[07] = 1 then goto PSCATR07
               ELSEIF Ask_R[04] = 1 then goto PSCATR04
               ELSEIF Ask_M[03] = 1 then goto PSCATM03
               ELSEIF Ask_T[18] = 1 then goto PSCATT18
               ELSEIF Ask_T[19] = 1 then goto PSCATT19
               ELSE goto END_POPGRP11

2:  Goto R02LOC	
20C	R02LOC	R02LOC	In what city is (Business Name) located?	Goto R02LOCST	
20C	R02LOCST	R02LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_R02LOCST

ELSEIF Ask_R[09] = 1 then goto PSCATR09
ELSEIF Ask_R[05] = 1 then goto PSCATR05
ELSEIF Ask_R[07] = 1 then goto PSCATR07
ELSEIF Ask_R[04] = 1 then goto PSCATR04
ELSEIF Ask_M[03] = 1 then goto PSCATM03
ELSEIF Ask_T[18] = 1 then goto PSCATT18
ELSEIF Ask_T[19] = 1 then goto PSCATT19
ELSE goto END_POPGRP11	
20C	PSCATR09	PSCATR09	(Now, please think about the last six months, since the first of (six months ago)./In the last SIX MONTHS) have (you/you or anyone in your household) purchased any pets, pet supplies or accessories?

1. Yes
2. No	1:  Goto R09_COST

2,DK,RF:  IF Ask_R[05] = 1 then goto PSCATR05
          ELSEIF Ask_R[07] = 1 then goto PSCATR07
          ELSEIF Ask_R[04] = 1 then goto PSCATR04
          ELSEIF Ask_M[03] = 1 then goto PSCATM03
          ELSEIF Ask_T[18] = 1 then goto PSCATT18
          ELSEIF Ask_T[19] = 1 then goto PSCATT19
          ELSE goto END_POPGRP11	
20C	R09_COST	R09_COST	In the last SIX MONTHS, how much did (you/your household) spend on your last purchase of pets, pet supplies or accessories?	IF ENTRY lt 5 or gt 300 then goto ERR1_R09COST

ELSE goto R09STORE	
20C	R09STORE	R09STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK 
   or RF then goto R09PURCH

ELSEIF Ask_R[05] = 1 then goto PSCATR05
ELSEIF Ask_R[07] = 1 then goto PSCATR07
ELSEIF Ask_R[04] = 1 then goto PSCATR04
ELSEIF Ask_M[03] = 1 then goto PSCATM03
ELSEIF Ask_T[18] = 1 then goto PSCATT18
ELSEIF Ask_T[19] = 1 then goto PSCATT19
ELSE goto END_POPGRP11	
20C	R09PURCH	R09PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:   IF Ask_R[05] = 1 then goto PSCATR05
               ELSEIF Ask_R[07] = 1 then goto PSCATR07
               ELSEIF Ask_R[04] = 1 then goto PSCATR04
               ELSEIF Ask_M[03] = 1 then goto PSCATM03
               ELSEIF Ask_T[18] = 1 then goto PSCATT18
               ELSEIF Ask_T[19] = 1 then goto PSCATT19
               ELSE goto END_POPGRP11

2:  Goto R09LOC	
20C	R09LOC	R09LOC	In what city is (Business Name) located?	Goto R09LOCST	
20C	R09LOCST	R09LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_R09LOCST

ELSEIF Ask_R[05] = 1 then goto PSCATR05
ELSEIF Ask_R[07] = 1 then goto PSCATR07
ELSEIF Ask_R[04] = 1 then goto PSCATR04
ELSEIF Ask_M[03] = 1 then goto PSCATM03
ELSEIF Ask_T[18] = 1 then goto PSCATT18
ELSEIF Ask_T[19] = 1 then goto PSCATT19
ELSE goto END_POPGRP11	
20C	PSCATR05	PSCATR05	(Now, please think about the last six months, since the first of (six months ago)./In the last SIX MONTHS) have (you/you or anyone in your household) had any expenses for DVD or video game rentals?

1. Yes
2. No	1:  Goto R05_COST

2,DK,RF:  IF Ask_R[07] = 1 then goto PSCATR07
          ELSEIF Ask_R[04] = 1 then goto PSCATR04
          ELSEIF Ask_M[03] = 1 then goto PSCATM03
          ELSEIF Ask_T[18] = 1 then goto PSCATT18
          ELSEIF Ask_T[19] = 1 then goto PSCATT19
          ELSE goto END_POPGRP11	
20C	R05_COST	R05_COST	In the last SIX MONTHS, how much was (your/your household's) last expense for DVD or video game rental?	IF ENTRY lt 5 or gt 390 then goto ERR1_R05COST

ELSE goto R05STORE	
20C	R05STORE	R05STORE	What is the name of the business where (you/your household) had this expense?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK 
   or RF then goto R05PURCH

ELSEIF Ask_R[07] = 1 then goto PSCATR07
ELSEIF Ask_R[04] = 1 then goto PSCATR04
ELSEIF Ask_M[03] = 1 then goto PSCATM03
ELSEIF Ask_T[18] = 1 then goto PSCATT18
ELSEIF Ask_T[19] = 1 then goto PSCATT19
ELSE goto END_POPGRP11	
20C	R05PURCH	R05PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:   IF Ask_R[07] = 1 then goto PSCATR07
               ELSEIF Ask_R[04] = 1 then goto PSCATR04
               ELSEIF Ask_M[03] = 1 then goto PSCATM03
               ELSEIF Ask_T[18] = 1 then goto PSCATT18
               ELSEIF Ask_T[19] = 1 then goto PSCATT19
               ELSE goto END_POPGRP11

2:  Goto R05LOC	
20C	R05LOC	R05LOC	In what city is (Business Name) located?	Goto R05LOCST	
20C	R05LOCST	R05LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_R05LOCST

ELSEIF Ask_R[07] = 1 then goto PSCATR07
ELSEIF Ask_R[04] = 1 then goto PSCATR04
ELSEIF Ask_M[03] = 1 then goto PSCATM03
ELSEIF Ask_T[18] = 1 then goto PSCATT18
ELSEIF Ask_T[19] = 1 then goto PSCATT19
ELSE goto END_POPGRP11	
20C	PSCATR07	PSCATR07	(Now, please think about the last six months, since the first of (six months ago)./In the last SIX MONTHS) have (you/you or anyone in your household) purchased any CDs or audio downloads?  Do not include fees for streaming services.

1. Yes
2. No	1:  Goto R07_COST

2,DK,RF:  IF Ask_R[04] = 1 then goto PSCATR04
          ELSEIF Ask_M[03] = 1 then goto PSCATM03
          ELSEIF Ask_T[18] = 1 then goto PSCATT18
          ELSEIF Ask_T[19] = 1 then goto PSCATT19
          ELSE goto END_POPGRP11	
20C	R07_COST	R07_COST	In the last SIX MONTHS, how much did (you/your household) spend on your last purchase of CDs or audio downloads?  Do not incude fees for streaming services.	IF ENTRY gt 250 then goto ERR1_R07COST

ELSE goto R07STORE	
20C	R07STORE	R07STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
    or RF then goto R07PURCH

ELSEIF Ask_R[04] = 1 then goto PSCATR04
ELSEIF Ask_M[03] = 1 then goto PSCATM03
ELSEIF Ask_T[18] = 1 then goto PSCATT18
ELSEIF Ask_T[19] = 1 then goto PSCATT19
ELSE goto END_POPGRP11	
20C	R07PURCH	R07PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:   IF Ask_R[04] = 1 then goto PSCATR04
               ELSEIF Ask_M[03] = 1 then goto PSCATM03
               ELSEIF Ask_T[18] = 1 then goto PSCATT18
               ELSEIF Ask_T[19] = 1 then goto PSCATT19
               ELSE goto END_POPGRP11

2:  Goto R07LOC	
20C	R07LOC	R07LOC	In what city is Business name located?	Goto R07LOCST	
20C	R07LOCST	R07LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_R07LOCST

ELSEIF Ask_R[04] = 1 then goto PSCATR04
ELSEIF Ask_M[03] = 1 then goto PSCATM03
ELSEIF Ask_T[18] = 1 then goto PSCATT18
ELSEIF Ask_T[19] = 1 then goto PSCATT19
ELSE goto END_POPGRP11	
20C	PSCATR04	PSCATR04	(Now, please think about the last six months, since the first of (six months ago)./In the last SIX MONTHS) have (you/you or anyone in your household) purchased DVDs or video downloads?

1. Yes
2. No	1:  Goto R04_COST

2,DK,RF:  IF Ask_M[03] = 1 then goto PSCATM03
          ELSEIF Ask_T[18] = 1 then goto PSCATT18
          ELSEIF Ask_T[19] = 1 then goto PSCATT19
          ELSE goto END_POPGRP11	
20C	R04_COST	R04_COST	In the last SIX MONTHS, how much did (you/your household) spend on your last purchase of DVDs or video downloads?	IF ENTRY gt 210 then goto ERR1_R04COST

ELSE goto R04STORE	
20C	R04STORE	R04STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK 
   or RF then goto R04PURCH

ELSEIF Ask_M[03] = 1 then goto PSCATM03
ELSEIF Ask_T[18] = 1 then goto PSCATT18
ELSEIF Ask_T[19] = 1 then goto PSCATT19
ELSE goto END_POPGRP11	
20C	R04PURCH	R04PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:   IF Ask_M[03] = 1 then goto PSCATM03
               ELSEIF Ask_T[18] = 1 then goto PSCATT18
               ELSEIF Ask_T[19] = 1 then goto PSCATT19
               ELSE goto END_POPGRP11

2:  Goto R04LOC	
20C	R04LOC	R04LOC	In what city is (Business name) located?	Goto R04LOCST	
20C	R04LOCST	R04LOCST	? [F1]

In what state is (Business name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_R04LOCST

ELSEIF Ask_M[03] = 1 then goto PSCATM03
ELSEIF Ask_T[18] = 1 then goto PSCATT18
ELSEIF Ask_T[19] = 1 then goto PSCATT19
ELSE goto END_POPGRP11	
20C	PSCATM03	PSCATM03	(Now, please think about the last six months, since the first of (six months ago)./In the last SIX MONTHS) have (you/you or anyone in your household) purchased any medical equipment, supplies, or dressings?

1. Yes
2. No	1:  Goto M03_COST

2,DK,RF:  IF Ask_T[18] = 1 then goto PSCATT18
          ELSEIF Ask_T[19] = 1 then goto PSCATT19
          ELSE goto END_POPGRP11	
20C	M03_COST	M03_COST	In the last SIX MONTHS, how much did (you/your household) spend on your last purchase of medical equipment, supplies, or dressings?	IF ENTRY lt 5 or gt 1350 then goto ERR1_M03COST

ELSE goto M03STORE	
20C	M03STORE	M03STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK 
   or RF then goto M03PURCH

ELSEIF Ask_T[18] = 1 then goto PSCATT18
ELSEIF Ask_T[19] = 1 then goto PSCATT19
ELSE goto END_POPGRP11	
20C	M03PURCH	M03PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:   IF Ask_T[18] = 1 then goto PSCATT18
               ELSEIF Ask_T[19] = 1 then goto PSCATT19
               ELSE goto END_POPGRP11

2:  Goto M03LOC	
20C	M03LOC	M03LOC	In what city is (Business name) located?	Goto M03LOCST	
20C	M03LOCST	M03LOCST	? [F1]

In what state is (Business name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_M03LOCST

ELSEIF Ask_T[18] = 1 then goto PSCATT18
ELSEIF Ask_T[19] = 1 then goto PSCATT19
ELSE goto END_POPGRP11	
20C	PSCATT18	PSCATT18	(Now, please think about the last six months, since the first of (six months ago)./In the last SIX MONTHS) have (you/you or anyone in your household) had any expenses for intracity mass transit?

1. Yes
2. No	1:  Goto T18_COST

2,DK,RF:  IF Ask_T[19] = 1 then goto PSCATT19
          ELSE goto END_POPGRP11	
20C	T18_COST	T18_COST	In the last SIX MONTHS, how much was (your/your household's) last expense for intracity mass transit?	IF ENTRY gt 300 then goto ERR1_T18COST

ELSE goto T18STORE	
20C	T18STORE	T18STORE	What is the name of the business where (you/your household) had this expense?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK 
   or RF then goto T18PURCH

ELSEIF Ask_T[19] = 1 then goto PSCATT19
ELSE goto END_POPGRP11	
20C	T18PURCH	T18PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:   IF Ask_T[19] = 1 then goto PSCATT19
               ELSE goto END_POPGRP11

2:  Goto T18LOC	
20C	T18LOC	T18LOC	In what city is (Business name) located?	Goto T18LOCST	
20C	T18LOCST	T18LOCST	? [F1]

In what state is (Business name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_T18LOCST

ELSEIF Ask_T[19] = 1 then goto PSCATT19
ELSE goto END_POPGRP11	
20C	PSCATT19	PSCATT19	(Now, please think about the last six months, since the first of (six months ago)./In the last SIX MONTHS) have (you/you or anyone in your household) had any expenses for taxi or cab fares?

1. Yes
2. No	1:  Goto T19_COST

2,DK,RF:  Goto END_POPGRP11	
20C	T19_COST	T19_COST	In the last SIX MONTHS, how much was (your/your household's) last expense for taxi or cab fares?	IF ENTRY lt 5 or gt 520 then goto ERR1_T19COST

ELSE goto T19STORE	
20C	T19STORE	T19STORE	What is the name of the business where (you/your household) had this expense?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK 
   or RF then goto T19PURCH

ELSE goto END_POPGRP11	
20C	T19PURCH	T19PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF: Goto END_POPGRP11

2:  Goto T19LOC	
20C	T19LOC	T19LOC	In what city is (Business name) located?	Goto T19LOCST	
20C	T19LOCST	T19LOCST	? [F1]

In what state is (Business name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_T19LOCST

ELSE goto END_POPGRP11	
		END_POPGRP11		Exit section 20C and goto the next appropriate section	
		POP12_AskFlags			
20C	PGRP12_INTRO	PGRP12_INTRO	The next few questions are about expenses made by (you/you or anyone in your household) during the last 12 months, that is, as far back as (Month and Year, twelve months ago).  We have used the responses that you've already given us to shorten this part of the interview, so I'll only be asking you about expenses that you told me that you did not have in the last three months.

1. Enter 1 to Continue	IF Ask_G[01] = 1 then goto PSCATG01
ELSEIF Ask_G[02] = 1 then goto PSCATG02
ELSEIF Ask_M[01] = 1 then goto PSCATM01
ELSEIF Ask_G[15] = 1 then goto PSCATG15
ELSEIF Ask_G[16] = 1 then goto PSCATG16
ELSEIF Ask_G[06] = 1 then goto PSCATG06
ELSE goto END_POPGRP12	
20C	PSCATG01	PSCATG01	Now, please think about the last six months, since the first of (Month and Year, six month ago) have (you/you or anyone in your household) purchased any cigarettes? 

1. Yes
2. No	1:  Goto G01_COST

2,DK,RF:  IF Ask_G[02] = 1 then goto PSCATG02
          ELSEIF Ask_M[01] = 1 then goto PSCATM01
          ELSEIF Ask_G[15] = 1 then goto PSCATG15
          ELSEIF Ask_G[16] = 1 then goto PSCATG16
          ELSEIF Ask_G[06] = 1 then goto PSCATG06
          ELSE goto END_POPGRP12	
20C	G01_COST	G01_COST	In the last SIX MONTHS, how much did (you/your household) spend on your last purchase of cigarettes?	IF ENTRY lt 5 or gt 80 then goto ERR1_G01COST

ELSE goto G01STORE	
20C	G01STORE	G01STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
   or RF then goto G01PURCH

ELSEIF Ask_G[02] = 1 then goto PSCATG02
ELSEIF Ask_M[01] = 1 then goto PSCATM01
ELSEIF Ask_G[15] = 1 then goto PSCATG15
ELSEIF Ask_G[16] = 1 then goto PSCATG16
ELSEIF Ask_G[06] = 1 then goto PSCATG06
ELSE goto END_POPGRP12	
20C	G01PURCH	G01PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:   IF Ask_G[02] = 1 then goto PSCATG02
               ELSEIF Ask_M[01] = 1 then goto PSCATM01
               ELSEIF Ask_G[15] = 1 then goto PSCATG15
               ELSEIF Ask_G[16] = 1 then goto PSCATG16
               ELSEIF Ask_G[06] = 1 then goto PSCATG06
               ELSE goto END_POPGRP12

2:  Goto G01LOC	
20C	G01LOC	G01LOC	In what city is (Business Name) located?	Goto G01LOCST	
20C	G01LOCST	G01LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_G01LOCST

ELSEIF Ask_G[02] = 1 then goto PSCATG02
ELSEIF Ask_M[01] = 1 then goto PSCATM01
ELSEIF Ask_G[15] = 1 then goto PSCATG15
ELSEIF Ask_G[16] = 1 then goto PSCATG16
ELSEIF Ask_G[06] = 1 then goto PSCATG06
ELSE goto END_POPGRP12	
20C	PSCATG02	PSCATG02	(Now, please think about the last six months, since the first of (six months ago)./In the last SIX MONTHS) have (you/you or anyone in your household) purchased any cigars, smoking tobacco, or chewing tobacco?

1. Yes
2. No	1:  Goto G02_COST

2,DK,RF:  IF Ask_M[01] = 1 then goto PSCATM01
          ELSEIF Ask_G[15] = 1 then goto PSCATG15
          ELSEIF Ask_G[16] = 1 then goto PSCATG16
          ELSEIF Ask_G[06] = 1 then goto PSCATG06
          ELSE goto END_POPGRP12	
20C	G02_COST	G02_COST	In the last SIX MONTHS, how much did (you/your household) spend on your last purchase of cigars, smoking tobacco, or chewing tobacco?	IF ENTRY lt 5 or gt 80 then goto ERR1_G02COST

ELSE goto G02STORE	
20C	G02STORE	G02STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
   or RF then goto G02PURCH

ELSEIF Ask_M[01] = 1 then goto PSCATM01
ELSEIF Ask_G[15] = 1 then goto PSCATG15
ELSEIF Ask_G[16] = 1 then goto PSCATG16
ELSEIF Ask_G[06] = 1 then goto PSCATG06
ELSE goto END_POPGRP12	
20C	G02PURCH	G02PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:   IF Ask_M[01] = 1 then goto PSCATM01
               ELSEIF Ask_G[15] = 1 then goto PSCATG15
               ELSEIF Ask_G[16] = 1 then goto PSCATG16
               ELSEIF Ask_G[06] = 1 then goto PSCATG06
               ELSE goto END_POPGRP12

2:  Goto G02LOC	
20C	G02LOC	G02LOC	In what city is (Business Name) located?	Goto G02LOCST	
20C	G02LOCST	G02LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_G02LOCST

ELSEIF Ask_M[01] = 1 then goto PSCATM01
ELSEIF Ask_G[15] = 1 then goto PSCATG15
ELSEIF Ask_G[16] = 1 then goto PSCATG16
ELSEIF Ask_G[06] = 1 then goto PSCATG06
ELSE goto END_POPGRP12	
20C	PSCATM01	PSCATM01	(Now, please think about the last six months, since the first of (Six Months Ago)./In the last SIX MONTHS) have (you/you or anyone in your household) purchased any prescription drugs?

1. Yes
2. No	1:  Goto M01_COST

2,DK,RF:  IF Ask_G[15] = 1 then goto PSCATG15
          ELSEIF Ask_G[16] = 1 then goto PSCATG16
          ELSEIF Ask_G[06] = 1 then goto PSCATG06
          ELSE goto END_POPGRP12	
20C	M01_COST	M01_COST	In the last SIX MONTHS, how much did (you/your household) spend on your last purchase of prescription drugs?	IF ENTRY lt 5 or gt 340 then goto ERR1_M01COST

ELSE goto M01STORE	
20C	M01STORE	M01STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
   or RF then goto M01PURCH

ELSEIF Ask_G[15] = 1 then goto PSCATG15
ELSEIF Ask_G[16] = 1 then goto PSCATG16
ELSEIF Ask_G[06] = 1 then goto PSCATG06
ELSE goto END_POPGRP12	
20C	M01PURCH	M01PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:   IF Ask_G[15] = 1 then goto PSCATG15
               ELSEIF Ask_G[16] = 1 then goto PSCATG16
               ELSEIF Ask_G[06] = 1 then goto PSCATG06
               ELSE goto END_POPGRP12

2:  Goto M01LOC	
20C	M01LOC	M01LOC	In what city is (Business Name) located?	Goto M01LOCST	
20C	M01LOCST	M01LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_M01LOCST

ELSEIF Ask_G[15] = 1 then goto PSCATG15
ELSEIF Ask_G[16] = 1 then goto PSCATG16
ELSEIF Ask_G[06] = 1 then goto PSCATG06
ELSE goto END_POPGRP12	
20C	PSCATG15	PSCATG15	(Now, please think about the last six months, since the first of (six months ago)./In the last SIX MONTHS) have (you/you or anyone in your household) had any expenses for checking account fees, annual credit card fees, or other bank services?

1. Yes
2. No	1:  Goto G15_COST

2,DK,RF:  IF Ask_G[16] = 1 then goto PSCATG16
          ELSEIF Ask_G[06] = 1 then goto PSCATG06
          ELSE goto END_POPGRP12	
20C	G15_COST	G15_COST	In the last SIX MONTHS, how much was (your/your household's) last expense for checking account fees, annual credit card fees, or other bank services?	IF ENTRY lt 5 or gt 300 then goto ERR1_G15COST

ELSE goto G15STORE	
20C	G15STORE	G15STORE	What is the name of the business where (you/your household) had this expense?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
   or RF then goto G15PURCH

ELSEIF Ask_G[16] = 1 then goto PSCATG16
ELSEIF Ask_G[06] = 1 then goto PSCATG06
ELSE goto END_POPGRP12	
20C	G15PURCH	G15PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:   IF Ask_G[16] = 1 then goto PSCATG16
               ELSEIF Ask_G[06] = 1 then goto PSCATG06
               ELSE goto END_POPGRP12

2:  Goto G15LOC	
20C	G15LOC	G15LOC	In what city is Business name located?	Goto G15LOCST	
20C	G15LOCST	G15LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_G15LOCST

ELSEIF Ask_G[16] = 1 then goto PSCATG16
ELSEIF Ask_G[06] = 1 then goto PSCATG06
ELSE goto END_POPGRP12	
20C	PSCATG16	PSCATG16	Now, please think about the last 12 months, since the first of (Month and Year, twelve months ago) have (you/you or anyone in your household) had any expenses for tax return preparation or other accounting services?

1. Yes
2. No	1:  Goto G16_COST

2,DK,RF:  IF Ask_G[06] = 1 then goto PSCATG06
          ELSE goto END_POPGRP12	
20C	G16_COST	G16_COST	In the last 12 MONTHS, how much was (your/your household's) last expense for tax return preparation or other accounting services?	IF ENTRY lt 25 or gt 1000 then goto ERR1_G16COST

ELSE goto G16STORE	
20C	G16STORE	G16STORE	What is the name of the business where (you/your household) had this expense?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
   or RF then goto G16PURCH

ELSEIF Ask_G[06] = 1 then goto PSCATG06
ELSE goto END_POPGRP12	
20C	G16PURCH	G16PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:   IF Ask_G[06] = 1 then goto PSCATG06
               ELSE goto END_POPGRP12

2:  Goto G16LOC	
20C	G16LOC	G16LOC	In what city is Business name located?	Goto G16LOCST	
20C	G16LOCST	G16LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_G16LOCST

ELSEIF Ask_G[06] = 1 then goto PSCATG06
ELSE goto END_POPGRP12	
20C	PSCATG06	PSCATG06	(Now, please think about the last 12 months, since the first of (12 Months Ago)./In the last 12 MONTHS) have (you/you or anyone in your household) purchased any electrical personal care appliances such as shavers or hair dryers?

1. Yes
2. No	1:  Goto G06_COST

2,DK,RF:  Goto END_POPGRP12	
20C	G06_COST	G06_COST	In the last 12 MONTHS, how much did (you/your household) spend on your last purchase of electrical personal care appliances such as shavers or hair dryers?	IF ENTRY lt 5 or gt 125 then goto ERR1_G06COST

ELSE goto G06STORE	
20C	G06STORE	G06STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
   or RF then goto G06PURCH

ELSE goto END_POPGRP12	
20C	G06PURCH	G06PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF: Goto END_POPGRP12

2:  Goto G06LOC	
20C	G06LOC	G06LOC	In what city is (Business Name) located?	Goto G06LOCST	
20C	G06LOCST	G06LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_G06LOCST

ELSE goto END_POPGRP12	
		END_POPGRP12		Exit section 20C and goto the next appropriate section	
		POP13_AskFlags			
20C	PGRP13_INTRO	PGRP13_INTRO	The next few questions are about expenses made by (you/you or anyone in your household) during the last 12 months, that is, as far back as (Month and Year, twelve months ago).  We have used the responses that you've already given us to shorten this part of the interview, so I'll only be asking you about expenses that you told me that you did not have in the last three months.

1. Enter 1 to Continue	IF Ask_R[32] = 1 then goto PSCATR32
ELSEIF Ask_R[29] = 1 then goto PSCATR29
ELSEIF Ask_R[30] = 1 then goto PSCATR30
ELSEIF Ask_R[23] = 1 then goto PSCATR23                 
ELSEIF Ask_R[25] = 1 then goto PSCATR25
ELSE goto END_POPGRP13	
20C	PSCATR32	PSCATR32	Now, please think about the last six months, since the first of (Month and Year, six month ago) have (you/you or anyone in your household) purchased any books, audio books, or ebooks?

1. Yes
2. No	1:  Goto R32_COST

2,DK,RF:  IF Ask_R[29] = 1 then goto PSCATR29
          ELSEIF Ask_R[30] = 1 then goto PSCATR30
          ELSEIF Ask_R[23] = 1 then goto PSCATR23
          ELSEIF Ask_R[25] = 1 then goto PSCATR25
          ELSE goto END_POPGRP13	
20C	R32_COST	R32_COST	In the last SIX MONTHS, how much did (you/your household) spend on your last purchase of books, audio books, or ebooks?	IF ENTRY lt 5 or gt 300 then goto ERR1_R32COST

ELSE goto R32STORE	
20C	R32STORE	R32STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
   or RF then goto R32PURCH

ELSEIF Ask_R[29] = 1 then goto PSCATR29
ELSEIF Ask_R[30] = 1 then goto PSCATR30
ELSEIF Ask_R[23] = 1 then goto PSCATR23                 
ELSEIF Ask_R[25] = 1 then goto PSCATR25
ELSE goto END_POPGRP13	
20C	R32PURCH	R32PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_R[29] = 1 then goto PSCATR29
              ELSEIF Ask_R[30] = 1 then goto PSCATR30
              ELSEIF Ask_R[23] = 1 then goto PSCATR23
              ELSEIF Ask_R[25] = 1 then goto PSCATR25
              ELSE goto END_POPGRP13

2:  Goto R32LOC	
20C	R32LOC	R32LOC	In what city is (Business Name) located?	Goto R32LOCST	
20C	R32LOCST	R32LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_R32LOCST

ELSEIF Ask_R[29] = 1 then goto PSCATR29
ELSEIF Ask_R[30] = 1 then goto PSCATR30
ELSEIF Ask_R[23] = 1 then goto PSCATR23                 
ELSEIF Ask_R[25] = 1 then goto PSCATR25
ELSE goto END_POPGRP13	
20C	PSCATR29	PSCATR29	(Now, please think about the last six months, since the first of (six months ago)./In the last SIX MONTHS) have (you/you or anyone in your household) purchased any single copy newspapers or magazines?

1. Yes
2. No	1:  Goto R29_COST

2,DK,RF:  IF Ask_R[30] = 1 then goto PSCATR30
          ELSEIF Ask_R[23] = 1 then goto PSCATR23
          ELSEIF Ask_R[25] = 1 then goto PSCATR25
          ELSE goto END_POPGRP13	
20C	R29_COST	R29_COST	In the last SIX MONTHS, how much did (you/your household) spend on your last purchase of single copy newspapers or magazines?	IF ENTRY lt 5 or gt 250 then goto ERR1_R29COST

ELSE goto R29STORE	
20C	R29STORE	R29STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
   or RF then goto R29PURCH

ELSEIF Ask_R[30] = 1 then goto PSCATR30
ELSEIF Ask_R[23] = 1 then goto PSCATR23                 
ELSEIF Ask_R[25] = 1 then goto PSCATR25
ELSE goto END_POPGRP13	
20C	R29PURCH	R29PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_R[30] = 1 then goto PSCATR30
              ELSEIF Ask_R[23] = 1 then goto PSCATR23
              ELSEIF Ask_R[25] = 1 then goto PSCATR25
              ELSE goto END_POPGRP13

2:  Goto R29LOC	
20C	R29LOC	R29LOC	In what city is (Business Name) located?	Goto R29LOCST	
20C	R29LOCST	R29LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_R29LOCST

ELSEIF Ask_R[30] = 1 then goto PSCATR30
ELSEIF Ask_R[23] = 1 then goto PSCATR23                 
ELSEIF Ask_R[25] = 1 then goto PSCATR25
ELSE goto END_POPGRP13	
20C	PSCATR30	PSCATR30	Now, please think about the last 12 months, since the first of (Month and Year, twelve months ago) have (you/you or anyone in your household) purchased any newspaper or magazine subscriptions?

1. Yes
2. No	1:  Goto R30_COST

2,DK,RF:  IF Ask_R[23] = 1 then goto PSCATR23
          ELSEIF Ask_R[25] = 1 then goto PSCATR25
          ELSE goto END_POPGRP13	
20C	R30_COST	R30_COST	In the last 12 MONTHS, how much did (you/your household) spend on your last purchase of newspaper or magazine subscriptions?	IF ENTRY lt 7 or gt 145 then goto ERR1_R30COST

ELSE goto R30STORE	
20C	R30STORE	R30STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
   or RF then goto R30PURCH

ELSEIF Ask_R[23] = 1 then goto PSCATR23                 
ELSEIF Ask_R[25] = 1 then goto PSCATR25
ELSE goto END_POPGRP13	
20C	R30PURCH	R30PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_R[23] = 1 then goto PSCATR23
              ELSEIF Ask_R[25] = 1 then goto PSCATR25
              ELSE goto END_POPGRP13

2:  Goto R30LOC	
20C	R30LOC	R30LOC	In what city is Business name located?	Goto R30LOCST	
20C	R30LOCST	R30LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_R30LOCST

ELSEIF Ask_R[23] = 1 then goto PSCATR23                 
ELSEIF Ask_R[25] = 1 then goto PSCATR25
ELSE goto END_POPGRP13	
20C	PSCATR23	PSCATR23	(Now, please think about the last 12 months, since the first of 12 Months Ago)./In the last 12 MONTHS) have (you/you or anyone in your household) purchased any sewing machines, fabric, or sewing supplies?

1. Yes
2. No	1:  Goto R23_COST

2,DK,RF:  IF Ask_R[25] = 1 then goto PSCATR25
          ELSE goto END_POPGRP13	
20C	R23_COST	R23_COST	In the last 12 MONTHS, how much did (you/your household) spend on your last purchase of sewing machines, fabric, or sewing supplies?	IF ENTRY lt 8 or gt 400 then goto ERR1_R23COST

ELSE goto R23STORE	
20C	R23STORE	R23STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
   or RF then goto R23PURCH
                            
ELSEIF Ask_R[25] = 1 then goto PSCATR25
ELSE goto END_POPGRP13	
20C	R23PURCH	R23PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_R[25] = 1 then goto PSCATR25
              ELSE goto END_POPGRP13

2:  Goto R23LOC	
20C	R23LOC	R23LOC	In what city is Business name located?	Goto R23LOCST	
20C	R23LOCST	R23LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_R23LOCST
              
ELSEIF Ask_R[25] = 1 then goto PSCATR25
ELSE goto END_POPGRP13	
20C	PSCATR25	PSCATR25	(Now, please think about the last 12 months, since the first of (12 Months Ago)./In the last 12 MONTHS) have (you/you or anyone in your household) had any expenses for membership fees for sport or health clubs, fraternal organizations, shopping clubs, or online discount memberships?

1. Yes
2. No	1:  Goto R25_COST

2,DK,RF:  Goto END_POPGRP13	
20C	R25_COST	R25_COST	In the last 12 MONTHS, how much was (your/your household's) last expense for membership fees for sport or health clubs, fraternal organizations, shopping clubs, or online discount memberships?	IF ENTRY lt 5 or gt 10000 then goto ERR1_R25COST

ELSE Goto R25STORE	
20C	R25STORE	R25STORE	What is the name of the business where (you/your household) had this expense?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
   or RF then goto R25PURCH
             
ELSE goto END_POPGRP13	
20C	R25PURCH	R25PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  Goto END_POPGRP13

2:  Goto R25LOC	
20C	R25LOC	R25LOC	In what city is (Business Name) located?	Goto R25LOCST	
20C	R25LOCST	R25LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_R25LOCST
              
ELSE goto END_POPGRP13	
		END_POPGRP13		Exit section 20C and goto the next appropriate section	
		POP14_AskFlags			
20C	PGRP14_INTRO	PGRP14_INTRO	The next few questions are about expenses made by (you/you or anyone in your household) during the last 12 months, that is, as far back as (Month and Year, twelve months ago).  We have used the responses that you've already given us to shorten this part of the interview, so I'll only be asking you about expenses that you told me that you did not have in the last three months.

1. Enter 1 to Continue	IF Ask_G[08] = 1 then goto PSCATG08
ELSEIF Ask_T[15] = 1 then goto PSCATT15
ELSEIF Ask_R[26] = 1 then goto PSCATR26
ELSEIF Ask_R[27] = 1 then goto PSCATR27
ELSEIF Ask_T[16] = 1 then goto PSCATT16
ELSEIF Ask_H[02] = 1 then goto PSCATH02
ELSEIF Ask_H[03] = 1 then goto PSCATH03
ELSEIF Ask_H[04] = 1 then goto PSCATH04
ELSEIF Ask_H[05] = 1 then goto PSCATH05
ELSEIF Ask_H[06] = 1 then goto PSCATH06
ELSE goto END_POPGRP14	
20C	PSCATG08	PSCATG08	Now, please think about the last six months, since the first of (Month and Year, six month ago) have (you/you or anyone in your household) had any expenses for personal care services such as haircuts, nail services, or tanning?

1. Yes
2. No	1:  Goto G08_COST

2,DK,RF:  IF Ask_T[15] = 1 then goto PSCATT15
          ELSEIF Ask_R[26] = 1 then goto PSCATR26
          ELSEIF Ask_R[27] = 1 then goto PSCATR27
          ELSEIF Ask_T[16] = 1 then goto PSCATT16
          ELSEIF Ask_H[02] = 1 then goto PSCATH02
          ELSEIF Ask_H[03] = 1 then goto PSCATH03
          ELSEIF Ask_H[04] = 1 then goto PSCATH04
          ELSEIF Ask_H[05] = 1 then goto PSCATH05
          ELSEIF Ask_H[06] = 1 then goto PSCATH06
          ELSE goto END_POPGRP14	
20C	G08_COST	G08_COST	In the last SIX MONTHS, how much was (your/your household's) last expense for personal care services such as haircuts, nail services, or tanning?	IF ENTRY lt 5 or gt 300 then goto ERR1_G08COST

ELSE goto G08STORE	
20C	G08STORE	G08STORE	What is the name of the business where (you/your household) had this expense?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
   or RF then goto G08PURCH

ELSEIF Ask_T[15] = 1 then goto PSCATT15
ELSEIF Ask_R[26] = 1 then goto PSCATR26
ELSEIF Ask_R[27] = 1 then goto PSCATR27
ELSEIF Ask_T[16] = 1 then goto PSCATT16
ELSEIF Ask_H[02] = 1 then goto PSCATH02
ELSEIF Ask_H[03] = 1 then goto PSCATH03
ELSEIF Ask_H[04] = 1 then goto PSCATH04
ELSEIF Ask_H[05] = 1 then goto PSCATH05
ELSEIF Ask_H[06] = 1 then goto PSCATH06
ELSE goto END_POPGRP14	
20C	G08PURCH	G08PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:   IF Ask_T[15] = 1 then goto PSCATT15
               ELSEIF Ask_R[26] = 1 then goto PSCATR26
               ELSEIF Ask_R[27] = 1 then goto PSCATR27
               ELSEIF Ask_T[16] = 1 then goto PSCATT16
               ELSEIF Ask_H[02] = 1 then goto PSCATH02
               ELSEIF Ask_H[03] = 1 then goto PSCATH03
               ELSEIF Ask_H[04] = 1 then goto PSCATH04
               ELSEIF Ask_H[05] = 1 then goto PSCATH05
               ELSEIF Ask_H[06] = 1 then goto PSCATH06
               ELSE goto END_POPGRP14

2:  Goto G08LOC	
20C	G08LOC	G08LOC	In what city is (Business Name) located?	Goto G08LOCST	
20C	G08LOCST	G08LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_G08LOCST

ELSEIF Ask_T[15] = 1 then goto PSCATT15
ELSEIF Ask_R[26] = 1 then goto PSCATR26
ELSEIF Ask_R[27] = 1 then goto PSCATR27
ELSEIF Ask_T[16] = 1 then goto PSCATT16
ELSEIF Ask_H[02] = 1 then goto PSCATH02
ELSEIF Ask_H[03] = 1 then goto PSCATH03
ELSEIF Ask_H[04] = 1 then goto PSCATH04
ELSEIF Ask_H[05] = 1 then goto PSCATH05
ELSEIF Ask_H[06] = 1 then goto PSCATH06
ELSE goto END_POPGRP14	
20C	PSCATT15	PSCATT15	(Now, please think about the last six months, since the first of (six months ago)./In the last SIX MONTHS) have (you/you or anyone in your household) had any expenses for parking fees or tolls?

1. Yes
2. No	1:  Goto T15_COST

2,DK,RF:  IF Ask_R[26] = 1 then goto PSCATR26
          ELSEIF Ask_R[27] = 1 then goto PSCATR27
          ELSEIF Ask_T[16] = 1 then goto PSCATT16
          ELSEIF Ask_H[02] = 1 then goto PSCATH02
          ELSEIF Ask_H[03] = 1 then goto PSCATH03
          ELSEIF Ask_H[04] = 1 then goto PSCATH04
          ELSEIF Ask_H[05] = 1 then goto PSCATH05
          ELSEIF Ask_H[06] = 1 then goto PSCATH06
          ELSE goto END_POPGRP14	
20C	T15_COST	T15_COST	In the last SIX MONTHS, how much was (your/your household's) last expense for parking fees or tolls?	IF ENTRY gt 390 then goto ERR1_T15COST

ELSE goto T15STORE	
20C	T15STORE	T15STORE	What is the name of the business where (you/your household) had this expense?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
   or RF then goto T15PURCH

ELSEIF Ask_R[26] = 1 then goto PSCATR26
ELSEIF Ask_R[27] = 1 then goto PSCATR27
ELSEIF Ask_T[16] = 1 then goto PSCATT16
ELSEIF Ask_H[02] = 1 then goto PSCATH02
ELSEIF Ask_H[03] = 1 then goto PSCATH03
ELSEIF Ask_H[04] = 1 then goto PSCATH04
ELSEIF Ask_H[05] = 1 then goto PSCATH05
ELSEIF Ask_H[06] = 1 then goto PSCATH06
ELSE goto END_POPGRP14	
20C	T15PURCH	T15PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:   IF Ask_R[26] = 1 then goto PSCATR26
               ELSEIF Ask_R[27] = 1 then goto PSCATR27
               ELSEIF Ask_T[16] = 1 then goto PSCATT16
               ELSEIF Ask_H[02] = 1 then goto PSCATH02
               ELSEIF Ask_H[03] = 1 then goto PSCATH03
               ELSEIF Ask_H[04] = 1 then goto PSCATH04
               ELSEIF Ask_H[05] = 1 then goto PSCATH05
               ELSEIF Ask_H[06] = 1 then goto PSCATH06
               ELSE goto END_POPGRP14

2:  Goto T15LOC	
20C	T15LOC	T15LOC	In what city is Business name located?	Goto T15LOCST	
20C	T15LOCST	T15LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_T15LOCST

ELSEIF Ask_R[26] = 1 then goto PSCATR26
ELSEIF Ask_R[27] = 1 then goto PSCATR27
ELSEIF Ask_T[16] = 1 then goto PSCATT16
ELSEIF Ask_H[02] = 1 then goto PSCATH02
ELSEIF Ask_H[03] = 1 then goto PSCATH03
ELSEIF Ask_H[04] = 1 then goto PSCATH04
ELSEIF Ask_H[05] = 1 then goto PSCATH05
ELSEIF Ask_H[06] = 1 then goto PSCATH06
ELSE goto END_POPGRP14	
20C	PSCATR26	PSCATR26	(Now, please think about the last six months, since the first of (Six Months Ago)./In the last SIX MONTHS) have (you/you or anyone in your household) purchased any movie, concert, museum, or theme park tickets?

1. Yes
2. No	1:  Goto R26_COST

2,DK,RF:  IF Ask_R[27] = 1 then goto PSCATR27
          ELSEIF Ask_T[16] = 1 then goto PSCATT16
          ELSEIF Ask_H[02] = 1 then goto PSCATH02
          ELSEIF Ask_H[03] = 1 then goto PSCATH03
          ELSEIF Ask_H[04] = 1 then goto PSCATH04
          ELSEIF Ask_H[05] = 1 then goto PSCATH05
          ELSEIF Ask_H[06] = 1 then goto PSCATH06
          ELSE goto END_POPGRP14	
20C	R26_COST	R26_COST	In the last SIX MONTHS, how much did (you/your household) last spend for movie, concert, museum, or theme park tickets?	IF ENTRY lt 5 or gt 720 then goto ERR1_R26COST

ELSE goto R26STORE	
20C	R26STORE	R26STORE	What is the name of the theater, park, or museum?	ENTRY:  Goto R26LOC

DK,RF:  IF Ask_R[27] = 1 then goto PSCATR27
        ELSEIF Ask_T[16] = 1 then goto PSCATT16
        ELSEIF Ask_H[02] = 1 then goto PSCATH02
        ELSEIF Ask_H[03] = 1 then goto PSCATH03
        ELSEIF Ask_H[04] = 1 then goto PSCATH04
        ELSEIF Ask_H[05] = 1 then goto PSCATH05
        ELSEIF Ask_H[06] = 1 then goto PSCATH06
        ELSE goto END_POPGRP14	
20C	R26LOC	R26LOC	In what city is Business name located?	Goto R26LOCST	
20C	R26LOCST	R26LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_R26LOCST

ELSE goto R26DIR	
20C	R26DIR	R26DIR	Were the tickets purchased directly from Business name or from a third party?

1. Direct
2. Third party	1,DK,RF:  Goto R26PURCH

2:  Goto R26THRDP	
20C	R26THRDP	R26THRDP	What is the name of the company used to purchase the tickets?

             Enter store, website, or company name	IF uppercase entry does not contain .COM and is not DK or RF 
   then goto R26PURCH

ELSEIF Ask_R[27] = 1 then goto PSCATR27
ELSEIF Ask_T[16] = 1 then goto PSCATT16
ELSEIF Ask_H[02] = 1 then goto PSCATH02
ELSEIF Ask_H[03] = 1 then goto PSCATH03
ELSEIF Ask_H[04] = 1 then goto PSCATH04
ELSEIF Ask_H[05] = 1 then goto PSCATH05
ELSEIF Ask_H[06] = 1 then goto PSCATH06
ELSE goto END_POPGRP14	
20C	R26PURCH	R26PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	IF ENTRY = 2 and R26DIR = 2 then goto R26THDLC

ELSEIF Ask_R[27] = 1 then goto PSCATR27
ELSEIF Ask_T[16] = 1 then goto PSCATT16
ELSEIF Ask_H[02] = 1 then goto PSCATH02
ELSEIF Ask_H[03] = 1 then goto PSCATH03
ELSEIF Ask_H[04] = 1 then goto PSCATH04
ELSEIF Ask_H[05] = 1 then goto PSCATH05
ELSEIF Ask_H[06] = 1 then goto PSCATH06
ELSE goto END_POPGRP14	
20C	R26THDLC	R26THDLC	In what city is (3rd party name) located?	Goto R26THDST	
20C	R26THDST	R26THDST	? [F1]

In what state is (3rd party name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_R26THDST

ELSEIF Ask_R[27] = 1 then goto PSCATR27
ELSEIF Ask_T[16] = 1 then goto PSCATT16
ELSEIF Ask_H[02] = 1 then goto PSCATH02
ELSEIF Ask_H[03] = 1 then goto PSCATH03
ELSEIF Ask_H[04] = 1 then goto PSCATH04
ELSEIF Ask_H[05] = 1 then goto PSCATH05
ELSEIF Ask_H[06] = 1 then goto PSCATH06
ELSE goto END_POPGRP14	
20C	PSCATR27	PSCATR27	Now, please think about the last 12 months, since the first of (Month and Year, twelve months ago), have (you/you or anyone in your household) purchased any admissions to sporting events?

1. Yes
2. No	1:  Goto R27_COST

2,DK,RF:  IF Ask_T[16] = 1 then goto PSCATT16
          ELSEIF Ask_H[02] = 1 then goto PSCATH02
          ELSEIF Ask_H[03] = 1 then goto PSCATH03
          ELSEIF Ask_H[04] = 1 then goto PSCATH04
          ELSEIF Ask_H[05] = 1 then goto PSCATH05
          ELSEIF Ask_H[06] = 1 then goto PSCATH06
          ELSE goto END_POPGRP14	
20C	R27_COST	R27_COST	In the last 12 MONTHS, how much did (you/your household) last spend for admissions to sporting events?	IF ENTRY lt 5 or gt 2500 then goto ERR1_R27COST

ELSE goto R27STORE	
20C	R27STORE	R27STORE	What is the name of the stadium, arena, or sporting venue?	ENTRY:  Goto R27LOC

DK,RF:  IF Ask_T[16] = 1 then goto PSCATT16
        ELSEIF Ask_H[02] = 1 then goto PSCATH02
        ELSEIF Ask_H[03] = 1 then goto PSCATH03
        ELSEIF Ask_H[04] = 1 then goto PSCATH04
        ELSEIF Ask_H[05] = 1 then goto PSCATH05
        ELSEIF Ask_H[06] = 1 then goto PSCATH06
        ELSE goto END_POPGRP14	
20C	R27LOC	R27LOC	In what city is Business name located?	Goto R27LOCST	
20C	R27LOCST	R27LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_R27LOCST

ELSE goto R27DIR	
20C	R27DIR	R27DIR	Were the tickets purchased directly from Business name or from a third party?

1. Direct
2. Third party	1,DK,RF:  Goto R27PURCH

2:  Goto R27THRDP	
20C	R27THRDP	R27THRDP	What is the name of the company used to purchase the tickets?

             Enter store, website, or company name	IF uppercase entry does not contain .COM and is not DK or RF 
   then goto R27PURCH

ELSEIF Ask_T[16] = 1 then goto PSCATT16
ELSEIF Ask_H[02] = 1 then goto PSCATH02
ELSEIF Ask_H[03] = 1 then goto PSCATH03
ELSEIF Ask_H[04] = 1 then goto PSCATH04
ELSEIF Ask_H[05] = 1 then goto PSCATH05
ELSEIF Ask_H[06] = 1 then goto PSCATH06
ELSE goto END_POPGRP14	
20C	R27PURCH	R27PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	IF ENTRY = 2 and R27DIR = 2 then goto R27THDLC

ELSEIF Ask_T[16] = 1 then goto PSCATT16
ELSEIF Ask_H[02] = 1 then goto PSCATH02
ELSEIF Ask_H[03] = 1 then goto PSCATH03
ELSEIF Ask_H[04] = 1 then goto PSCATH04
ELSEIF Ask_H[05] = 1 then goto PSCATH05
ELSEIF Ask_H[06] = 1 then goto PSCATH06
ELSE goto END_POPGRP14	
20C	R27THDLC	R27THDLC	In what city is (3rd party name) located?	Goto R27THDST	
20C	R27THDST	R27THDST	? [F1]

In what state is (3rd party name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_R27THDST

ELSEIF Ask_T[16] = 1 then goto PSCATT16
ELSEIF Ask_H[02] = 1 then goto PSCATH02
ELSEIF Ask_H[03] = 1 then goto PSCATH03
ELSEIF Ask_H[04] = 1 then goto PSCATH04
ELSEIF Ask_H[05] = 1 then goto PSCATH05
ELSEIF Ask_H[06] = 1 then goto PSCATH06
ELSE goto END_POPGRP14	
20C	PSCATT16	PSCATT16	(Now, please think about the last 12 months, since the first of (12 Months Ago)./In the last 12 MONTHS) have (you/you or anyone in your household) had any expenses for automobile service clubs?

1. Yes
2. No	1:  Goto T16_COST

2,DK,RF:  IF Ask_H[02] = 1 then goto PSCATH02
          ELSEIF Ask_H[03] = 1 then goto PSCATH03
          ELSEIF Ask_H[04] = 1 then goto PSCATH04
          ELSEIF Ask_H[05] = 1 then goto PSCATH05
          ELSEIF Ask_H[06] = 1 then goto PSCATH06
          ELSE goto END_POPGRP14	
20C	T16_COST	T16_COST	In the last 12 MONTHS, how much was (your/your household's) last expense for automobile service clubs?	IF ENTRY lt 6 or gt 155 then goto ERR1_T16COST

ELSE goto T16STORE	
20C	T16STORE	T16STORE	What is the name of the business where (you/your household) had this expense?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
   or RF then goto T16PURCH

ELSEIF Ask_H[02] = 1 then goto PSCATH02
ELSEIF Ask_H[03] = 1 then goto PSCATH03
ELSEIF Ask_H[04] = 1 then goto PSCATH04
ELSEIF Ask_H[05] = 1 then goto PSCATH05
ELSEIF Ask_H[06] = 1 then goto PSCATH06
ELSE goto END_POPGRP14	
20C	T16PURCH	T16PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:   IF Ask_H[02] = 1 then goto PSCATH02
               ELSEIF Ask_H[03] = 1 then goto PSCATH03
               ELSEIF Ask_H[04] = 1 then goto PSCATH04
               ELSEIF Ask_H[05] = 1 then goto PSCATH05
               ELSEIF Ask_H[06] = 1 then goto PSCATH06
               ELSE goto END_POPGRP14

2:  Goto T16LOC	
20C	T16LOC	T16LOC	In what city is Business name located?	Goto T16LOCST	
20C	T16LOCST	T16LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_T16LOCST

ELSEIF Ask_H[02] = 1 then goto PSCATH02
ELSEIF Ask_H[03] = 1 then goto PSCATH03
ELSEIF Ask_H[04] = 1 then goto PSCATH04
ELSEIF Ask_H[05] = 1 then goto PSCATH05
ELSEIF Ask_H[06] = 1 then goto PSCATH06
ELSE goto END_POPGRP14	
20C	PSCATH02	PSCATH02	(Now, please think about the last 12 months, since the first of (12 Months Ago)./In the last 12 MONTHS) have (you/you or anyone in your household) had any expenses for lodging while away from home such as hotels, motels, or vacation rentals?

1. Yes
2. No	1:  Goto H02_COST

2,DK,RF:  IF Ask_H[03] = 1 then goto PSCATH03
          ELSEIF Ask_H[04] = 1 then goto PSCATH04
          ELSEIF Ask_H[05] = 1 then goto PSCATH05
          ELSEIF Ask_H[06] = 1 then goto PSCATH06
          ELSE goto END_POPGRP14	
20C	H02_COST	H02_COST	In the last 12 MONTHS, how much was (your/your household's) last expense for lodging away from home such as hotels, motels, or vacation rentals?	IF ENTRY lt 5 or gt 1200 then goto ERR1_H02COST

ELSE goto H02STORE	
20C	H02STORE	H02STORE	What is the name of the hotel or place that you stayed?	RESPONSE:  Goto H02LOC

DK,RF:  IF Ask_H[03] = 1 then goto PSCATH03
        ELSEIF Ask_H[04] = 1 then goto PSCATH04
        ELSEIF Ask_H[05] = 1 then goto PSCATH05
        ELSEIF Ask_H[06] = 1 then goto PSCATH06
        ELSE goto END_POPGRP14	
20C	H02LOC	H02LOC	In what city did you stay?	Goto H02LOCST	
20C	H02LOCST	H02LOCST	? [F1]

In what state did you stay?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_H02LOCST

ELSE goto H02DIR	
20C	H02DIR	H02DIR	Was the reservation made directly from Business name or from a third party?

1. Direct
2. Third party	1,DK,RF:  Goto H02PURCH

2:  Goto H02THRDP	
20C	H02THRDP	H02THRDP	What is the name of the company used to make the reservation?

     Enter store, website, or company name	IF uppercase entry does not contain .COM and is not DK or RF 
   then goto H02PURCH

ELSEIF Ask_H[03] = 1 then goto PSCATH03
ELSEIF Ask_H[04] = 1 then goto PSCATH04
ELSEIF Ask_H[05] = 1 then goto PSCATH05
ELSEIF Ask_H[06] = 1 then goto PSCATH06
ELSE goto END_POPGRP14	
20C	H02PURCH	H02PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	IF ENTRY = 2 and H02DIR = 2 then goto H02THDLC

ELSEIF Ask_H[03] = 1 then goto PSCATH03
ELSEIF Ask_H[04] = 1 then goto PSCATH04
ELSEIF Ask_H[05] = 1 then goto PSCATH05
ELSEIF Ask_H[06] = 1 then goto PSCATH06
ELSE goto END_POPGRP14	
20C	H02THDLC	H02THDLC	In what city is (3rd party name( located?	Goto H02THDST	
20C	H02THDST	H02THDST	? [F1]

In what state is (3rd party name( located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_H02THDST

ELSEIF Ask_H[03] = 1 then goto PSCATH03
ELSEIF Ask_H[04] = 1 then goto PSCATH04
ELSEIF Ask_H[05] = 1 then goto PSCATH05
ELSEIF Ask_H[06] = 1 then goto PSCATH06
ELSE goto END_POPGRP14	
20C	PSCATH03	PSCATH03	(Now, please think about the last 12 months, since the first of (12 Months Ago)./In the last 12 MONTHS) have (you/you or anyone in your household) had any expenses for fuel oil for household heating?

1. Yes
2. No	1:  Goto H03_COST

2,DK,RF:  IF Ask_H[04] = 1 then goto PSCATH04
          ELSEIF Ask_H[05] = 1 then goto PSCATH05
          ELSEIF Ask_H[06] = 1 then goto PSCATH06
          ELSE goto END_POPGRP14	
20C	H03_COST	H03_COST	In the last 12 MONTHS, how much was (your/your household's) last expense for fuel oil for household heating?	IF ENTRY lt 34 or gt 722 then goto ERR1_H03COST

ELSE goto H03STORE	
20C	H03STORE	H03STORE	What is the name of the business where (you/your household) had this expense?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
   or RF then goto H03PURCH

ELSEIF Ask_H[04] = 1 then goto PSCATH04
ELSEIF Ask_H[05] = 1 then goto PSCATH05
ELSEIF Ask_H[06] = 1 then goto PSCATH06
ELSE goto END_POPGRP14	
20C	H03PURCH	H03PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:   IF Ask_H[04] = 1 then goto PSCATH04
               ELSEIF Ask_H[05] = 1 then goto PSCATH05
               ELSEIF Ask_H[06] = 1 then goto PSCATH06
               ELSE goto END_POPGRP14

2:  Goto H03LOC	
20C	H03LOC	H03LOC	In what city is Business name located?	Goto H03LOCST	
20C	H03LOCST	H03LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_H03LOCST

ELSEIF Ask_H[04] = 1 then goto PSCATH04
ELSEIF Ask_H[05] = 1 then goto PSCATH05
ELSEIF Ask_H[06] = 1 then goto PSCATH06
ELSE goto END_POPGRP14	
20C	PSCATH04	PSCATH04	(Now, please think about the last 12 months, since the first of (12 Months Ago)./In the last 12 MONTHS) have (you/you or anyone in your household) had any expenses for propane, firewood, coal, or charcoal used for household heating or cooking?

1. Yes
2. No	1:  Goto H04_COST

2,DK,RF:  IF Ask_H[05] = 1 then goto PSCATH05
          ELSEIF Ask_H[06] = 1 then goto PSCATH06
          ELSE goto END_POPGRP14	
20C	H04_COST	H04_COST	In the last 12 MONTHS, how much was (your/your household's) last expense for propane, firewood, coal, or charcoal used for household heating or cooking?	IF ENTRY lt 7 or gt 700 then goto ERR1_H04COST

ELSE goto H04STORE	
20C	H04STORE	H04STORE	What is the name of the business where (you/your household) had this expense?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
   or RF then goto H04PURCH

ELSEIF Ask_H[05] = 1 then goto PSCATH05
ELSEIF Ask_H[06] = 1 then goto PSCATH06
ELSE goto END_POPGRP14	
20C	H04PURCH	H04PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:   IF Ask_H[05] = 1 then goto PSCATH05
               ELSEIF Ask_H[06] = 1 then goto PSCATH06
               ELSE goto END_POPGRP14

2:  Goto H04LOC	
20C	H04LOC	H04LOC	In what city is Business name located?	Goto H04LOCST	
20C	H04LOCST	H04LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_H04LOCST

ELSEIF Ask_H[05] = 1 then goto PSCATH05
ELSEIF Ask_H[06] = 1 then goto PSCATH06
ELSE goto END_POPGRP14	
20C	PSCATH05	PSCATH05	(Now, please think about the last 12 months, since the first of 12 Months Ago)./In the last 12 MONTHS) have (you/you or anyone in your household) had any expenses for residential water and sewer service?

1. Yes
2. No	1:  Goto H05_COST

2,DK,RF:  IF Ask_H[06] = 1 then goto PSCATH06
          ELSE goto END_POPGRP14	
20C	H05_COST	H05_COST	In the last 12 MONTHS, how much was (your/your household's) last expense for residential water or sewer service?	IF ENTRY lt 6 or gt 250 then goto ERR1_H05COST

ELSE goto H05STORE	
20C	H05STORE	H05STORE	What is the name of the business where (you/your household) had this expense?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
   or RF then goto H05PURCH

ELSEIF Ask_H[06] = 1 then goto PSCATH06
ELSE goto END_POPGRP14	
20C	H05PURCH	H05PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:   IF Ask_H[06] = 1 then goto PSCATH06
               ELSE goto END_POPGRP14

2:  Goto H05LOC	
20C	H05LOC	H05LOC	In what city is Business name located?	Goto H05LOCST	
20C	H05LOCST	H05LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_H05LOCST

ELSEIF Ask_H[06] = 1 then goto PSCATH06
ELSE goto END_POPGRP14	
20C	PSCATH06	PSCATH06	(Now, please think about the last 12 months, since the first of (12 Months Ago)./In the last 12 MONTHS) have (you/you or anyone in your household) had any expenses for garbage or trash collection service?

1. Yes
2. No	1:  Goto H06_COST

2,DK,RF:  Goto END_POPGRP14	
20C	H06_COST	H06_COST	In the last 12 MONTHS, how much was (your/your household's) last expense for garbage or trash collection service?	IF ENTRY lt 6 or gt 150 then goto ERR1_H06COST

ELSE goto H06STORE	
20C	H06STORE	H06STORE	What is the name of the business where (you/your household) had this expense?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
   or RF then goto H06PURCH

ELSE goto END_POPGRP14	
20C	H06PURCH	H06PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  Goto END_POPGRP14

2:  Goto H06LOC	
20C	H06LOC	H06LOC	In what city is Business name located?	Goto H06LOCST	
20C	H06LOCST	H06LOCST	? [F1]

In what state is Business name located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_H06LOCST

ELSE goto END_POPGRP14	
		END_POPGRP14		Exit section 20C and goto the next appropriate section	
		POP15_AskFlags			
20C	PGRP15_INTRO	PGRP15_INTRO	The next few questions are about expenses made by (you/you or anyone in your household) during the last two years, that is, as far back as (Month and Year, two years ago).  We have used the responses that you've already given us to shorten this part of the interview, so I'll only be asking you about expenses that you told me that you did not have in the last three months.

1. Enter 1 to Continue	IF Ask_G[11] = 1 then goto PSCATG11
ELSEIF Ask_R[28] = 1 then goto PSCATR28
ELSEIF Ask_T[11] = 1 then goto PSCATT11
ELSEIF Ask_T[12] = 1 then goto PSCATT12
ELSEIF Ask_T[10] = 1 then goto PSCATT10
ELSE goto END_POPGRP15	
20C	PSCATG11	PSCATG11	Now, please think about the last six months, since the first of (Month and Year, six month ago) have (you/you or anyone in your household) had any expenses for laundry or dry cleaning services?

1. Yes
2. No	1:  Goto G11_COST

2,DK,RF:  IF Ask_R[28] = 1 then goto PSCATR28
          ELSEIF Ask_T[11] = 1 then goto PSCATT11
          ELSEIF Ask_T[12] = 1 then goto PSCATT12
          ELSEIF Ask_T[10] = 1 then goto PSCATT10
          ELSE goto END_POPGRP15	
20C	G11_COST	G11_COST	In the last SIX MONTHS, how much was (your/your household's) last expenses for laundry or dry cleaning services?	IF ENTRY lt 5 or gt 260 then goto ERR1_G11COST

ELSE goto G11STORE	
20C	G11STORE	G11STORE	What is the name of the business where (you/your household) had this expense?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
   or RF then goto G11PURCH

ELSEIF Ask_R[28] = 1 then goto PSCATR28
ELSEIF Ask_T[11] = 1 then goto PSCATT11
ELSEIF Ask_T[12] = 1 then goto PSCATT12
ELSEIF Ask_T[10] = 1 then goto PSCATT10
ELSE goto END_POPGRP15	
20C	G11PURCH	G11PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_R[28] = 1 then goto PSCATR28
              ELSEIF Ask_T[11] = 1 then goto PSCATT11
              ELSEIF Ask_T[12] = 1 then goto PSCATT12
              ELSEIF Ask_T[10] = 1 then goto PSCATT10
              ELSE goto END_POPGRP15

2:  Goto G11LOC	
20C	G11LOC	G11LOC	In what city is (Business Name) located?	Goto G11LOCST	
20C	G11LOCST	G11LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_G11LOCST

ELSEIF Ask_R[28] = 1 then goto PSCATR28
ELSEIF Ask_T[11] = 1 then goto PSCATT11
ELSEIF Ask_T[12] = 1 then goto PSCATT12
ELSEIF Ask_T[10] = 1 then goto PSCATT10
ELSE goto END_POPGRP15	
20C	PSCATR28	PSCATR28	(Now, please think about the last six months, since the first of (six months ago)./In the last SIX MONTHS) have (you/you or anyone in your household) had any expenses for recreational lessons, classes, or instruction?

1. Yes
2. No	1:  Goto R28_COST

2,DK,RF:  IF Ask_T[11] = 1 then goto PSCATT11
          ELSEIF Ask_T[12] = 1 then goto PSCATT12
          ELSEIF Ask_T[10] = 1 then goto PSCATT10
          ELSE goto END_POPGRP15	
20C	R28_COST	R28_COST	In the last SIX MONTHS, how much was (your/your household's) last expense for recreational lessons, classes, or instruction?	IF ENTRY lt 10 or gt 544 then goto ERR1_R28COST

ELSE goto R28STORE	
20C	R28STORE	R28STORE	What is the name of the business where (you/your household) had this expense?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
   or RF then goto R28PURCH

ELSEIF Ask_T[11] = 1 then goto PSCATT11
ELSEIF Ask_T[12] = 1 then goto PSCATT12
ELSEIF Ask_T[10] = 1 then goto PSCATT10
ELSE goto END_POPGRP15	
20C	R28PURCH	R28PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_T[11] = 1 then goto PSCATT11
              ELSEIF Ask_T[12] = 1 then goto PSCATT12
              ELSEIF Ask_T[10] = 1 then goto PSCATT10
              ELSE goto END_POPGRP15

2:  Goto R28LOC	
20C	R28LOC	R28LOC	In what city is (Business Name) located?	Goto R28LOCST	
20C	R28LOCST	R28LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_R28LOCST

ELSEIF Ask_T[11] = 1 then goto PSCATT11
ELSEIF Ask_T[12] = 1 then goto PSCATT12
ELSEIF Ask_T[10] = 1 then goto PSCATT10
ELSE goto END_POPGRP15	
20C	PSCATT11	PSCATT11	Now, please think about the last 12 months, since the first of (Month and Year, twelve months ago) have (you/you or anyone in your household) had any expenses for motor vehicle maintenance, inspections, or towing?

1. Yes
2. No	1:  Goto T11_COST

2,DK,RF:  IF Ask_T[12] = 1 then goto PSCATT12
          ELSEIF Ask_T[10] = 1 then goto PSCATT10
          ELSE goto END_POPGRP15	
20C	T11_COST	T11_COST	In the last 12 MONTHS, how much was (your/your household's) last expense for motor vehicle maintenance, inspections, or towing?	IF ENTRY lt 5 or gt 1500 then goto ERR1_T11COST

ELSE goto T11STORE	
20C	T11STORE	T11STORE	What is the name of the business where (you/your household) has this expense?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
   or RF then goto T11PURCH

ELSEIF Ask_T[12] = 1 then goto PSCATT12
ELSEIF Ask_T[10] = 1 then goto PSCATT10
ELSE goto END_POPGRP15	
20C	T11PURCH	T11PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_T[12] = 1 then goto PSCATT12
              ELSEIF Ask_T[10] = 1 then goto PSCATT10
              ELSE goto END_POPGRP15

2:  Goto T11LOC	
20C	T11LOC	T11LOC	In what city is (Business Name) located?	Goto T11LOCST	
20C	T11LOCST	T11LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_T11LOCST

ELSEIF Ask_T[12] = 1 then goto PSCATT12
ELSEIF Ask_T[10] = 1 then goto PSCATT10
ELSE goto END_POPGRP15	
20C	PSCATT12	PSCATT12	(Now, please think about the last 12 months, since the first of (12 Months Ago)./In the last 12 MONTHS) have (you/you or anyone in your household) had any expenses for motor vehicle repair?

1. Yes
2. No	1:  Goto T12_COST

2,DK,RF:  IF Ask_T[10] = 1 then goto PSCATT10
          ELSE goto END_POPGRP15	
20C	T12_COST	T12_COST	In the last 12 MONTHS, how much was (your/your household's) last expense for motor vehicle repair?	IF ENTRY lt 6 or gt 3000 then goto ERR1_T12COST

ELSE goto T12STORE	
20C	T12STORE	T12STORE	What is the name of the business where (you/your household) had this expense?

           Enter store, website, or company name	IF uppercase entry does not contains ".COM" and is not a DK
   or RF then goto T12PURCH

ELSEIF Ask_T[10] = 1 then goto PSCATT10
ELSE goto END_POPGRP15	
20C	T12PURCH	T12PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_T[10] = 1 then goto PSCATT10
              ELSE goto END_POPGRP15

2:  Goto T12LOC	
20C	T12LOC	T12LOC	In what city is (Business Name) located?	Goto T12LOCST	
20C	T12LOCST	T12LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_T12LOCST

ELSEIF Ask_T[10] = 1 then goto PSCATT10
ELSE goto END_POPGRP15	
20C	PSCATT10	PSCATT10	Now, please think about the last two years, since the first of (Month and Year, two years ago), have (you/you or anyone in your household) had any expenses for motor vehicle body work or paint?

1. Yes
2. No	1:  Goto T10_COST

2,DK,RF:  Goto END_POPGRP15	
20C	T10_COST	T10_COST	In the last TWO YEARS, how much was (your/your household's) last expense for motor vehicle body work or paint?	IF ENTRY lt 15 or gt 4000 then goto ERR1_T10COST

ELSE goto T10STORE	
20C	T10STORE	T10STORE	What is the name of the business where (you/your household) had this expense?

           Enter store, website, or company name	IF Uppercase Entry does not contains ".COM" and is not a DK 
   or RF then goto T10PURCH

ELSE goto END_POPGRP15	
20C	T10PURCH	T10PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF: Goto END_POPGRP15

2:  Goto T10LOC	
20C	T10LOC	T10LOC	In what city is (Business Name) located?	Goto T10LOCST	
20C	T10LOCST	T10LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation
 	IF entry is not a valid state abbreviation then 
   goto CK_T10LOCST

ELSE goto END_POPGRP15	
		END_POPGRP15		Exit section 20C and goto the next appropriate section	
		POP16_AskFlags			
20C	PGRP16_INTRO	PGRP16_INTRO	The next few questions are about expenses made by (you/you or anyone in your household) during the last 12 months, that is, as far back as (Month and Year, twelve months ago).  We have used the responses that you've already given us to shorten this part of the interview, so I'll only be asking you about expenses that you told me that you did not have in the last three months.

1. Enter 1 to Continue	IF Ask_A[17] = 1 then goto PSCATA17
ELSEIF Ask_A[19] = 1 then goto PSCATA19
ELSEIF Ask_A[18] = 1 then goto PSCATA18
ELSEIF Ask_H[9] = 1 then goto PSCATA09
ELSEIF Ask_F54 = 1 then goto PSCATF54
ELSEIF Ask_M[9] = 1 then goto PSCATM09
ELSE goto END_POPGRP16	
20C	PSCATA17	PSCATA17	Now, please think about the last six months, since the first of (Month and Year, six month ago) have (you/you or anyone in your household) purchase any men's footwear?

1. Yes
2. No	1:  Goto A17_COST

2,DK,RF:  IF Ask_A[19] = 1 then goto PSCATA19
          ELSEIF Ask_A[18] = 1 then goto PSCATA18
          ELSEIF Ask_H[09] = 1 then goto PSCATA09
          ELSEIF Ask_F54 = 1 then goto PSCATF54
          ELSEIF Ask_M[09] = 1 then goto PSCATM09
          ELSE goto END_POPGRP16	
20C	A17_COST	A17_COST	In the last SIX MONTHS, how much did (you/your household) last spend for men's footwear?	IF ENTRY lt 5 or gt 210 then goto ERR1_A17COST

ELSE goto A17STORE	
20C	A17STORE	A17STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF Uppercase Entry does not contains ".COM" and is not a DK
   or RF then goto A17PURCH

ELSEIF Ask_A[19] = 1 then goto PSCATA19
ELSEIF Ask_A[18] = 1 then goto PSCATA18
ELSEIF Ask_H[09] = 1 then goto PSCATA09
ELSEIF Ask_F54 = 1 then goto PSCATF54
ELSEIF Ask_M[09] = 1 then goto PSCATM09
ELSE goto END_POPGRP16	
20C	A17PURCH	A17PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_A[19] = 1 then goto PSCATA19
              ELSEIF Ask_A[18] = 1 then goto PSCATA18
              ELSEIF Ask_H[09] = 1 then goto PSCATA09
              ELSEIF Ask_F54 = 1 then goto PSCATF54
              ELSEIF Ask_M[09] = 1 then goto PSCATM09
              ELSE goto END_POPGRP16

2:  Goto A17LOC	
20C	A17LOC	A17LOC	In what city is (Business Name) located?	Goto A17LOCST	
20C	A17LOCST	A17LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_A17LOCST

ELSEIF Ask_A[19] = 1 then goto PSCATA19
ELSEIF Ask_A[18] = 1 then goto PSCATA18
ELSEIF Ask_H[09] = 1 then goto PSCATA09
ELSEIF Ask_F54 = 1 then goto PSCATF54
ELSEIF Ask_M[09] = 1 then goto PSCATM09
ELSE goto END_POPGRP16	
20C	PSCATA19	PSCATA19	(Now, please think about the last six months, since the first of (six months ago)./In the last SIX MONTHS) have (you/you or anyone in your household) purchased any women's footwear?

1. Yes
2. No	1:  Goto A19_COST

2,DK,RF:  IF Ask_A[18] = 1 then goto PSCATA18
          ELSEIF Ask_H[09] = 1 then goto PSCATA09
          ELSEIF Ask_F54 = 1 then goto PSCATF54
          ELSEIF Ask_M[09] = 1 then goto PSCATM09
          ELSE goto END_POPGRP16	
20C	A19_COST	A19_COST	In the last SIX MONTHS, how much did (you/your household) last spend for women's footwear?	IF ENTRY lt 5 or gt 210 then goto ERR1_A19COST

ELSE goto A19STORE	
20C	A19STORE	A19STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF Uppercase Entry does not contains ".COM" and is not a DK
   or RF then goto A19PURCH

ELSEIF Ask_A[18] = 1 then goto PSCATA18
ELSEIF Ask_H[09] = 1 then goto PSCATA09
ELSEIF Ask_F54 = 1 then goto PSCATF54
ELSEIF Ask_M[09] = 1 then goto PSCATM09
ELSE goto END_POPGRP16	
20C	A19PURCH	A19PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_A[18] = 1 then goto PSCATA18
              ELSEIF Ask_H[09] = 1 then goto PSCATA09
              ELSEIF Ask_F54 = 1 then goto PSCATF54
              ELSEIF Ask_M[09] = 1 then goto PSCATM09
              ELSE goto END_POPGRP16

2:  Goto A19LOC	
20C	A19LOC	A19LOC	In what city is (Business Name) located?	Goto A19LOCST	
20C	A19LOCST	A19LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_A19LOCST

ELSEIF Ask_A[18] = 1 then goto PSCATA18
ELSEIF Ask_H[09] = 1 then goto PSCATA09
ELSEIF Ask_F54 = 1 then goto PSCATF54
ELSEIF Ask_M[09] = 1 then goto PSCATM09
ELSE goto END_POPGRP16	
20C	PSCATA18	PSCATA18	(Now, please think about the last six months, since the first of (six months ago)./In the last SIX MONTHS) have (you/you or anyone in your household) purchased any boys' or girls' footwear?

1. Yes
2. No	1:  Goto A18_COST

2,DK,RF:  IF Ask_H[09] = 1 then goto PSCATA09
          ELSEIF Ask_F54 = 1 then goto PSCATF54
          ELSEIF Ask_M[09] = 1 then goto PSCATM09
          ELSE goto END_POPGRP16	
20C	A18_COST	A18_COST	In the last SIX MONTHS, how much did (you/your household) last spend for boys' or girls' footwear?	IF ENTRY lt 5 or gt 210 then goto ERR1_A18COST

ELSE goto A18STORE	
20C	A18STORE	A18STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF Uppercase Entry does not contains ".COM" and is not a DK
   or RF then goto A18PURCH

ELSEIF Ask_H[09] = 1 then goto PSCATA09
ELSEIF Ask_F54 = 1 then goto PSCATF54
ELSEIF Ask_M[09] = 1 then goto PSCATM09
ELSE goto END_POPGRP16	
20C	A18PURCH	A18PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_H[09] = 1 then goto PSCATA09
              ELSEIF Ask_F54 = 1 then goto PSCATF54
              ELSEIF Ask_M[09] = 1 then goto PSCATM09
              ELSE goto END_POPGRP16

2:  Goto A18LOC	
20C	A18LOC	A18LOC	In what city is (Business Name) located?	Goto A18LOCST	
20C	A18LOCST	A18LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_A18LOCST

ELSEIF Ask_H[09] = 1 then goto PSCATA09
ELSEIF Ask_F54 = 1 then goto PSCATF54
ELSEIF Ask_M[09] = 1 then goto PSCATM09
ELSE goto END_POPGRP16	
20C	PSCATH09	PSCATH09	(Now, please think about the last six months, since the first of (six months ago)./In the last SIX MONTHS) have (you/you or anyone in your household) purchased any household linens such as kitchen or bathroom towels, bedding, or tablecloths?

1. Yes
2. No	1:  Goto H09_COST

2,DK,RF:  IF Ask_F54 = 1 then goto PSCATF54
          ELSEIF Ask_M[09] = 1 then goto PSCATM09
          ELSE goto END_POPGRP16	
20C	H09_COST	H09_COST	In the last SIX MONTHS, how much did (you/your household) last spend for household linens such as kitchen or bathroom towels, bedding, or tablecloths?	IF ENTRY lt 5 or gt 374 then goto ERR1_H09COST

ELSE goto H09STORE	
20C	H09STORE	H09STORE	What is the name of the business where this was last purchased?

           Enter store, website, or company name	IF Uppercase Entry does not contains ".COM" and is not a DK
   or RF then goto H09PURCH

ELSEIF Ask_F54 = 1 then goto PSCATF54
ELSEIF Ask_M[09] = 1 then goto PSCATM09
ELSE goto END_POPGRP16	
20C	H09PURCH	H09PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:  IF Ask_F54 = 1 then goto PSCATF54
              ELSEIF Ask_M[09] = 1 then goto PSCATM09
              ELSE goto END_POPGRP16

2:  Goto H09LOC	
20C	H09LOC	H09LOC	In what city is (Business Name) located?	Goto H09LOCST	
20C	H09LOCST	H09LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_H09LOCST

ELSEIF Ask_F54 = 1 then goto PSCATF54
ELSEIF Ask_M[09] = 1 then goto PSCATM09
ELSE goto END_POPGRP16	
20C	PSCATF54	PSCATF54	Now, please think about the last 12 months, since the first of (Month and Year, twelve months ago) have (you/you or anyone in your household) had any expenses for catered events or board? 

1. Yes
2. No	1:  Goto F54_COST

2,DK,RF:  IF Ask_M[09] = 1 then goto PSCATM09
          ELSE goto END_POPGRP16	
20C	F54_COST	F54_COST	In the last 12 MONTHS, how much was (your/your household's) last expense for catered events or board?	IF ENTRY lt 10 or gt 6500 then goto ERR1_F54COST

ELSE goto F54_STORE	
20C	F54STORE	F54STORE	What is the name of the business where (you/your household) had this expense?

           Enter store, website, or company name	IF Uppercase Entry does not contains ".COM" and is not a DK
   or RF then goto F54PURCH

ELSEIF Ask_M[09] = 1 then goto PSCATM09
ELSE goto END_POPGRP16	
20C	F54PURCH	F54PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF: IF Ask_M[09] = 1 then goto PSCATM09
             ELSE goto END_POPGRP16

2:  Goto F54LOC	
20C	F54LOC	F54LOC	In what city is (Business Name) located?	Goto F54LOCST	
20C	F54LOCST	F54LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_F54LOCST

ELSEIF Ask_M[09] = 1 then goto PSCATM09
ELSE goto END_POPGRP16	
20C	PSCATM09	PSCATM09	(Now, please think about the last 12 months, since the first of (12 Months Ago)./In the last 12 MONTHS) have (you/you or anyone in your household) had any expenses for adult day care? 

1. Yes
2. No	1:  Goto M09_COST

2,DK,RF: Goto END_POPGRP16	
20C	M09_COST	M09_COST	In the last 12 MONTHS, how much was (your/your household's) last expense for adult day care?	IF ENTRY lt 5 or gt 1200 then goto ERR1_M09COST

ELSE goto M09_STORE	
20C	M09STORE	M09STORE	What is the name of the business where (you/your household) had this expense?

           Enter store, website, or company name	IF Uppercase Entry does not contains ".COM" and is not a DK
   or RF then goto M09PURCH

ELSE goto END_POPGRP16	
20C	M09PURCH	M09PURCH	Was this paid for -

1. Online?
2. In person?
3. By mail or telephone order? 
4. Other	1,3,4,DK,RF:   Goto END_POPGRP16

2:  Goto M09LOC	
20C	M09LOC	M09LOC	In what city is (Business Name) located?	Goto M09LOCST	
20C	M09LOCST	M09LOCST	? [F1]

In what state is (Business Name) located?

         Enter the two character state abbreviation	IF entry is not a valid state abbreviation then 
   goto CK_M09LOCST

ELSE goto END_POPGRP16	
		END_POPGRP16		Exit section 20C and goto the next appropriate section	
20C		Ask_A	

1. Yes
2. No		
20C		Ask_E	

1. Yes
2. No		
20C		Ask_F54	

1. Yes
2. No		
20C		Ask_G	

1. Yes
2. No		
20C		Ask_H	

1. Yes
2. No		
20C		Ask_M	

1. Yes
2. No		
20C		Ask_R	

1. Yes
2. No		
20C		Ask_T	

1. Yes
2. No		
20C		POPSCAT			
20C		OTLTCON			
20C		OTLTCOST			
20C		OTLTSTOR			
20C		OTLTTYPE			
20C		OTLTCITY			
20C		OTLTSTE			
20C		OTLTPOS			
20C		OTLTPSTO			
20C		OTLTPCTY			
20C		OTLTPSTE			
20C		OTLT_OST			
20B		S20_END		Goto Section 21 - BSECT21	
21a	ANYWORK	ANYWORK	Since the first of (reference month), did (you/NAME) earn any income from wages or salary?

1. Yes
2. No	1:      Goto 21A_INTRO

2,DK,RF:  Goto S21A_CHECK	
21A	S21A_INTRO	S21A_INTRO	The next few questions are about income.  We know people aren't used to discussing their income, but please be assured that, like all other information you have provided, these answers will be kept strictly confidential.

1. Enter 1 to Continue	Goto INCWEEKQ	
21A	INCWEEKQ	INCWEEKQ	(Now I am going to ask about (Your/Name's) work experience and income/  )

In the past 12 months, including paid vacation and sick leave, how many weeks did (you/NAME) work?
   
        If household member did not work, enter zero.	0:         Goto INCNONWK 

1-52,DK,RF:  Goto INC_HRSQ	
21A	INC_HRSQ	INC_HRSQ	In the weeks that (you/NAME) worked, how many hours did (you/he/she) usually work per week?	Goto OCCUCODE	
21A	OCCUCODE	OCCUCODE	 45    ? [F1]

Which of the following categories best describes the job in which (you/NAME) received the most earnings during the past 12 months?

1. Administrator, manager
2. Teacher
3. Professional
4. Administrative support, including clerical
5. Sales, retail
6. Sales, business goods and services
7. Technician
8. Protective service
9. Private household service
10. Other service
11. Machine or transportation operator, laborer
12. Construction workers, mechanics
13. Farming
14. Forestry, fishing, groundskeeping
15. Armed Forces	Goto INCOMEY	
21A	INCOMEY	INCOMEY	(Were/Was) (you/NAME):   

1. An employee of a PRIVATE company, business, or individual working for wages or salary?
2. A Federal government employee?
3. A State government employee?
4. A local government employee?
5. Self-employed ^YourHisHer OWN business, partnership, professional practice, or farm?
6. Working WITHOUT PAY in a family business or farm?	Goto SALARYST	
21A	INCNONWK	INCNONWK	What was the main reason (you/NAME) did not work during the past 12 months?  

(Were/Was) (you/he/she) -          

1. Retired?
2. Taking care of home/family?
3. Going to school?
4. Ill, disabled, unable to work?
5. Unable to find work?
6. Doing something else?	Goto SALARYST	
21A	SALARYST	SALARYST	? [F1]

The next few questions are about income DURING THE PAST 12 MONTHS, that is from (Date - one year ago) to (Yesterdays date)...

Did (you/NAME) receive any wages, salary, tips, bonuses, or commissions? 

1. Yes
2. No	1:  Goto SALARYX

2,DK,RF:   Goto  SEMPFRM	
21A	SALARYX	SALARYX	? [F1]

How much did (you/NAME) receive before taxes?	1-99999999:  IF SALARYX < 500 or SALARYX > 200000 then
                goto ERR1_SALARYX
             ELSE goto GROSPAYX

DK,RF:  Goto SALARYB	
21A	SALARYB	SALARYB	 46    ? [F1]

Could you tell me which range on CARD A best reflects (your/NAME's) total wages and salaries for ALL JOBS during the PAST 12 MONTHS?                        

1. $1-$4,999
2. $5,000-$9,999
3. $10,000-$14,999
4. $15,000-$19,999
5. $20,000-$29,999
6. $30,000-$39,999
7. $40,000-$49,999
8. $50,000-$69,999
9. $70,000-$89,999
10. $90,000-$119,999
11. $120,000 and over	Goto GROSPAYX	
21A	GROSPAYX	GROSPAYX	What was the amount of (your/NAME's) last pay before any deductions?	Goto PAYPERD	
21A	PAYPERD	PAYPERD	What period of time did this cover?

1. One week
2. Two weeks
3. Month
4. Quarter
5. Year
6. Twice a month
7. Other	1:   IF GROSPAYX < 50 or GROSPAYX > 1635 then goto ERR1_PAYPERD
     ELSE goto PAYSTUB

2:   IF GROSPAYX < 120 or GROSPAYX > 4800 then goto ERR1_PAYPERD
     ELSE goto PAYSTUB

3:   IF GROSPAYX < 100 or GROSPAYX > 12000 then goto ERR1_PAYPERD
     ELSE goto PAYSTUB

4:   IF GROSPAYX < 51 or GROSPAYX > 14583 then goto ERR1_PAYPERD
     ELSE goto PAYSTUB

5:   IF GROSPAYX < 250 or GROSPAYX > 155000 then goto ERR1_PAYPERD
     ELSE goto PAYSTUB

6:   IF GROSPAYX < 15 or GROSPAYX > 12838 then goto ERR1_PAYPERD
     ELSE goto PAYSTUB

7:   IF GROSPAYX < 200 or GROSPAYX > 10000 then goto ERR1_PAYPERD
     ELSE goto PAYPRDOT

DK,RF: IF GROSPAYX < 8 or GROSPAYX > 200000 then goto ERR1_PAYPERD
         ELSE goto PAYSTUB	
21A	PAYPRDOT	PAYPRDOT	    Specify:	Goto PAYSTUB	
21A	PAYSTUB	PAYSTUB	  Does the respondent have a paper or electronic pay check record present for (his / her / his/her) last paycheck?

1. Yes
2. No	Goto PRIVPENS	
21A	PRIVPENS	PRIVPENS	?  [F1]

Was there any money deducted from (your/NAME's) pay for -

Private pension fund?

1. Yes
2. No	1:  Goto PRIVPENX

2,DK,RF:   Goto GOVRET	
21A	PRIVPENX	PRIVPENX	How much?	1-99999999:   IF PAYPERD = DK or RF and (PRIVPENX < 5 or PRIVPENX > 
                  147000) OR
                PAYPERD = 1 and (PRIVPENX < 5 or PRIVPENX > 275) OR
                PAYPERD = 2 and (PRIVPENX < 8 or PRIVPENX > 644) OR
                PAYPERD = 3 and (PRIVPENX < 32 or PRIVPENX > 6000) OR
                PAYPERD = 4 and (PRIVPENX < 5 or PRIVPENX > 4500) OR
                PAYPERD = 5 and (PRIVPENX < 7 or PRIVPENX > 20000) OR
                PAYPERD = 6 and (PRIVPENX < 30 or PRIVPENX > 1000) OR
                PAYPERD = 7 and (PRIVPENX < 12 or PRIVPENX > 3000)
                  THEN goto ERR1_PRIVPENX
            ELSE goto GOVRET

DK,RF:   Goto GOVRET	
21A	GOVRET	GOVRET	Was there any money deducted from (your/NAME's) pay for -

Government retirement?

1. Yes
2. No	1:   Goto GOVRETX

2,DK,RF:   Goto RRRDED	
21A	GOVRETX	GOVRETX	How much?	1-99999999:  IF GOVRETX < 5 or GOVRETX > 590 then goto ERR1_GOVRETX
             ELSE goto RRRDED

DK,RF:   Goto RRRDED	
21A	RRRDED	RRRDED	Was there any money deducted from (your/NAME's) pay for -

Railroad retirement?

1. Yes
2. No	1:   Goto RRRDEDX

2,DK,RF:  Goto SSDED	
21A	RRRDEDX	RRRDEDX	How much?	1-99999999:   IF RRRDEDX < 5 or RRRDEDX > 444 then goto ERR1_RRRDEDX
              ELSE goto SSDED

DK,RF:  Goto SSDED	
21A	SSDED	SSDED	?  [F1]

Was there any money deducted from (your/NAME's) pay for -

Social Security including Medicare?

1. Yes
2. No	1:      Goto MEDICOV

2,DK,RF:  Goto SSNORM	
21A	SSNORM	SSNORM	Are Social Security payments NORMALLY deducted from (your/NAME's) pay?

1. Yes
2. No	1:      Goto MEDICOV

2,DK,RF:  Goto EMPLCONT	
21A	MEDICOV	MEDICOV	Does the money deducted for Social Security cover only the Medicare portion of Social Security?

1. Yes
2. No	Goto EMPLCONT	
21A	EMPLCONT	EMPLCONT	Other than Social Security, did any employer or union contribute to (your/NAME's) pension or retirement plan in the past 12 months?

1. Yes
2. No	Goto SEMPFRM	
21A	SEMPFRM	SEMPFRM	? [F1]
DURING THE PAST 12 MONTHS -

Did (you/NAME) receive any self-employment income or have a loss?

(Report income from own businesses (farm or non-farm) including proprietorships and partnerships)

1. Yes
2. No	1:        Goto SEMPFRMX

2,DK,RF:   Goto SOCSRRET	
21A	SEMPFRMX	SEMPFRMX	? [F1]

What was the amount?

(Report net income after operating expenses.  Include earning as a tenant farmer or sharecropper.)

         If net income was a loss, precede amount with a '-'
           Breakeven = 1	-999999999-999999999:  IF SEMPFRMX = 0 then goto CK_SEMPFRMX
                       ELSEIF SEMPFRMX < 1 or SEMPFRMX > 200000 
                         then goto ERR1_SEMPFRMX
                       ELSE goto SOCSRRET

DK,RF:  Goto SEMPFRMB	
21A	SEMPFRMB	SEMPFRMB	 46    ? [F1]

Could you tell me which range on CARD A best reflects (your/NAME's) income or loss from self-employment during the PAST 12 MONTHS?

0. Loss
1. $1-$4,999
2. $5,000-$9,999
3. $10,000-$14,999
4. $15,000-$19,999
5. $20,000-$29,999
6. $30,000-$39,999
7. $40,000-$49,999
8. $50,000-$69,999
9. $70,000-$89,999
10. $90,000-$119,999
11. $120,000 and over	Goto SOCSRRET	
21A	SOCSRRET	SOCSRRET	? [F1]

DURING THE PAST 12 MONTHS -

Did (you/NAME) receive any Social Security or Railroad Retirement benefits?

1. Yes
2. No	1:   Goto RRRETIRX

2,DK,RF:   Goto SUPPLINC	
21A	RRRETIRX	RRRETIRX	? [F1]

What was the amount of the last Social Security or Railroad Retirement payment received?	1-99999999:  IF RRRETIRX < 139 or RRRETIRX > 6000 then
                goto  ERR1_RRRETIRX
             ELSE goto INCMEDCR

DK,RF:   Goto RRRETIRB	
21A	RRRETIRB	RRRETIRB	 47    ? [F1]

Could you tell me which range on CARD B best reflects the amount of (your/NAME's) last Social Security or Railroad Retirement payment during the PAST 12 MONTHS?

1. Less than $500
2. $500-$699
3. $700-$999
4. $1,000-$1,299
5. $1,300-$1,699
6. $1,700 and over	Goto INCMEDCR	
21A	INCMEDCR	INCMEDCR	Is this amount AFTER the deduction for a Medicare premium?

1. Yes
2. No	Goto SS_RRQ	
21A	SS_RRQ	SS_RRQ	During the past 12 months, how many Social Security or Railroad Retirement payments did (you/NAME) receive?	IF SS_RRQ > 12 then goto ERR1_SSRRQ

ELSE goto SUPPLINC	
21A	SUPPLINC	SUPPLINC	? [F1]

DURING THE PAST 12 MONTHS -

Did (you/NAME) receive any -

Supplemental Security Income (SSI) payments?

1. Yes
2. No	1:  Goto SSIX

2,DK,RF:  Goto INDRETAC	
21A	SSIX	SSIX	? [F1]

What was the amount?	1-99999999:   IF SSIX < 5 or SSIX > 15180 then goto ERR1_SSIX
              ELSE goto INDRETAC

DK,RF:  Goto SSIB	
21A	SSIB	SSIB	 48    ? [F1]

Could you tell me which range on CARD C best reflects the amount (you/NAME) received in Supplemental Security income during the past 12 months?

1. $1-$999
2. $1,000-$1,999
3. $2,000-$2,999
4. $3,000-$3,999
5. $4,000-$4,999
6. $5,000-$9,999
7. $10,000-$14,999
8. $15,000-$19,999
9. $20,000-$29,999
10. $30,000-$39,999
11. $40,000-$49,999
12. $50,000 and over	Goto INDRETAC	
21A	INDRETAC	INDRETAC	DURING THE PAST 12 MONTHS -

Did (you/NAME) contribute any money to retirement plans such as 401(k)s or Individual Retirement Accounts, also known as IRAs?   Do not include rollovers.

1. Yes
2. No	1:        Goto INDRETX

2,DK,RF:   Goto S21A_CHECK	
21A	INDRETX	INDRETX	How much?	IF INDRETX < 75 or INDRETX > 32000 then goto ERR1_INDRETX

ELSE goto S21A_CHECK	
21A		S21A_CHECK		IF no more persons with 8500.INCWEEKQ = 0 or 
    8500.ANYWORK = 2,DK or RF then goto S21A_END

ELSE goto ANYWORK for the next person	
21A		S21A_END		Goto Section 21B	
21A		GROS_AYX			
21A		SALARYX_			
21a		PRIV_ENX			
21a		GOVRETX_			
21a		RRRDEDX_			
21A		SEMP_RMX			
21A		RRRE_IRX			
21A		SS_RRQ_			
21A		SSIX_			
21A		INDRETX_			
21A		MEMBNO			
21A		MIN_STAT			
21A		MIN_ORIG			
21B	INTERDIV	INTERDIV	? [F1]

fill for INTERDIV

DURING THE PAST 12 MONTHS -

Did (you/you or any members of your household) receive any interest or dividends?  Report even small amounts credited to an account.

1. Yes
2. No	1:        Goto INTRDVX

2,DK,RF:   Goto NETRENT	
21B	INTRDVX	INTRDVX	? [F1]

What was the amount?	1-99999999:   IF INTRDVX > 18000 then goto ERR1_INTRDVX
              ELSE goto NETRENT

DK,RF:   Goto INTRDVB	
21B	INTRDVB	INTRDVB	 48    ? [F1]

Could you tell me which range on CARD C best reflects the amount (you/you or any members of your household) received in interest or dividends during the PAST 12 MONTHS?

1. $1-$999
2. $1,000-$1,999
3. $2,000-$2,999
4. $3,000-$3,999
5. $4,000-$4,999
6. $5,000-$9,999
7. $10,000-$14,999
8. $15,000-$19,999
9. $20,000-$29,999
10. $30,000-$39,999
11. $40,000-$49,999
12. $50,000 and over	Goto NETRENT	
21B	NETRENT	NETRENT	? [F1]

DURING THE PAST 12 MONTHS -

Did (you/you or any members of your household) receive any net rental income or loss?

         Net rental income is the total amount after expenses.

1. Yes
2. No	1:          Goto NETRENTX

2,DK,RF:    Goto ROYEST	
21B	NETRENTX	NETRENTX	? [F1]

What was the amount?

  The net amount is the total amount after expenses.

    If income was a loss, precede amount with a '-'.
    Breakeven = 1.	-999999999-999999999:  IF NETRENTX = 0 then goto CK_NETRENTX
                       ELSEIF (NETRENTX < -150,000 or NETRENTX
                        > 48,000) then goto ERR1_NETRENTX
                       ELSE goto ROYEST

DK,RF:   Goto NETRENTB	
21B	NETRENTB	NETRENTB	 48    ? [F1]

Could you tell me which range on CARD C best reflects the total net rental income or loss during the PAST 12 MONTHS?

0. Loss
1. $1-$999
2. $1,000-$1,999
3. $2,000-$2,999
4. $3,000-$3,999
5. $4,000-$4,999
6. $5,000-$9,999
7. $10,000-$14,999
8. $15,999-$19,999
9. $20,000-$29,999
10. $30,000-$39,999
11. $40,000-$49,999
12. $50,000 and over	Goto ROYEST	
21B	ROYEST	ROYEST	? [F1]

DURING THE PAST 12 MONTHS -

Did (you/you or any members of your household) receive any royalty income or income from estates and trusts?

1. Yes
2. No	1:       Goto ROYESTX

2,DK,RF:   Goto RETSURV	
21B	ROYESTX	ROYESTX	? [F1]

What was the amount?	1-99999999:  IF ROYESTX < 11 or ROYESTX > 57926 then
                goto ERR1_ROYESTX
             ELSE goto RETSURV

DK,RF:  Goto ROYESTB	
21B	ROYESTB	ROYESTB	 48    ? [F1]

Could you tell me which range on CARD C best reflects the total amount received in royalty income or income from estates and trusts during the PAST 12 MONTHS?

1. $1-$999
2. $1,000-$1,999
3. $2,000-$2,999
4. $3,000-$3,999
5. $4,000-$4,999
6. $5,000-$9,999
7. $10,000-$14,999
8. $15,000-$19,999
9. $20,000-$29,999
10. $30,000-$39,999
11. $40,000-$49,999
12. $50,000 and over	Goto RETSURV	
21B	RETSURV	RETSURV	? [F1]

DURING THE PAST 12 MONTHS -

Did (you/you or any members of your household) receive any retirement, survivor, or disability pensions?

1. Yes
2. No	1:         Goto RETSURVX

2,DK,RF:    Goto OTHREG	
21B	RETSURVX	RETSURVX	? [F1]

What was the amount?

(Do not include Social Security.)	1-99999999:  IF RETSURVX < 125 or RETSURVX > 50000 then
                goto ERR1_RETSURVX
             ELSE goto OTHREG

DK,RF:  Goto RETSURVB	
21B	RETSURVB	RETSURVB	 48    ? [F1]

Could you tell me which range on CARD C best reflects the total amount received in retirement, survivor, or disability pensions during the PAST 12 MONTHS?

1. $1-$999
2. $1,000-$1,999
3. $2,000-$2,999
4. $3,000-$3,999
5. $4,000-$4,999
6. $5,000-$9,999
7. $10,000-$14,999
8. $15,000-$19,999
9. $20,000-$29,999
10. $30,000-$39,999
11. $40,000-$49,999
12. $50,000 and over	Goto OTHREG	
21B	OTHREG	OTHREG	? [F1]

DURING THE PAST 12 MONTHS -

Did (you/you or any members of your household) receive income on a REGULAR basis from any other source such as Veteran's Administration (VA) payments, unemployment compensation, child support, or alimony?

1. Yes
2. No	1:      Goto OTHREGX

2,DK,RF:  Goto LUMPSUM	
21B	OTHREGX	OTHREGX	? [F1]

What was the amount from all sources?

(Do not include lump sum payments such as money from an inheritance or sale of a home.)	1-99999999:  IF OTHREGX < 58 or OTHREGX > 29812 then goto 
                  ERR1_OTHREGX        
             ELSE goto LUMPSUM

DK,RF:   Goto OTHREGB	
21B	OTHREGB	OTHREGB	 48    ? [F1]

Could you tell me which range on CARD C best reflects the total amount received in Veteran's Administration (VA) payments, unemployment compensation, child support, or alimony during the PAST 12 MONTHS?

1. $1-$999
2. $1,000-$1,999
3. $2,000-$2,999
4. $3,000-$3,999
5. $4,000-$4,999
6. $5,000-$9,999
7. $10,000-$14,999
8. $15,000-$19,999
9. $20,000-$29,999
10. $30,000-$39,999
11. $40,000-$49,999
12. $50,000 and over	Goto LUMPSUM	
21B	LUMPSUM	LUMPSUM	? [F1]

DURING THE PAST 12 MONTHS - 

Did (you/you or any members of your household) receive any lump sum payments from insurance, estates, trusts, royalties, child support, alimony, prizes or games of chance, or from persons outside your household?

1. Yes
2. No	1:       Goto LUMPSUMX

2,DK,RF:   Goto OTHERINC	
21B	LUMPSUMX	LUMPSUMX	? [F1]

What was the total amount received (by all household members/  )?	1-99999999:  IF LUMPSUMX < 5 or LUMPSUMX > 106000 then 
                goto ERR1_LUMPSUMX
             ELSE goto OTHERINC

DK,RF:  Goto LUMPSUMB	
21B	LUMPSUMB	LUMPSUMB	 48    ? [F1]

Could you tell me which range on CARD C best reflects the total lump sum payments during the PAST 12 MONTHS?

1. $1-$999
2. $1,000-$1,999
3. $2,000-$2,999
4. $3,000-$3,999
5. $4,000-$4,999
6. $5,000-$9,999
7. $10,000-$14,999
8. $15,000-$19,999
9. $20,000-$29,999
10. $30,000-$39,999
11. $40,000-$49,999
12. $50,000 and over	Goto OTHERINC	
21B	OTHERINC	OTHERINC	? [F1]

DURING THE PAST 12 MONTHS - 

Did (you/you or any members of your household) receive any other money income, including money received from cash scholarship and fellowships, stipends not based on working, or from the care of foster children, not already reported?

1. Yes
2. No	1:        Goto OTHRINCX

2,DK,RF:  Goto MISCTAX	
21B	OTHRINCX	OTHRINCX	? [F1]

What was the total amount received (by all household members/    )?	1-99999999:  IF ROTHRINCX < 100 or ROTHRINCX > 23404 then
                  goto ERR1_OTHRINCX
               ELSE goto MISCTAX

DK,RF:  Goto OTHRINCB	
21B	OTHRINCB	OTHRINCB	 48    ? [F1]

Could you tell me which range on CARD C best reflects the total amount of other money income received during the PAST 12 MONTHS?

1. $1-$999
2. $1,000-$1,999
3. $2,000-$2,999
4. $3,000-$3,999
5. $4,000-$4,999
6. $5,000-$9,999
7. $10,000-$14,999
8. $15,000-$19,999
9. $20,000-$29,999
10. $30,000-$39,999
11. $40,000-$49,999
12. $50,000 and over	Goto MISCTAX	
21B	MISCTAX	MISCTAX	DURING THE PAST 12 MONTHS - 

Did  (you/you or any members of your household) PAY any inheritance or estate tax? 

1. Yes
2. No	1:        Goto MISCTAXX

2,DK,RF:    Goto FOODSMP	
21B	MISCTAXX	MISCTAXX	What was the total amount PAID (by all household members/    )?	IF MISCTAXX < 35 or MISCTAXX > 6500 then goto ERR1_MISCTAXX

ELSE goto FOODSMP	
21B	FOODSMP	FOODSMP	DURING THE PAST 12 MONTHS - 

Did anyone in this household receive Food Stamps or a Food Stamp benefit card?  Include government benefits from the Supplemental Nutritional Assistance Program (SNAP).  Do NOT include WIC or the National School Lunch Program.

1. Yes
2. No	1:        Goto FS_MTHI

2,DK,RF:   Goto WELFARE	
21B	FS_MTHI	FS_MTHI	In how many of the past 12 months were food stamps or EBTs received?	Goto FS_AMT	
21B	FS_AMT	FS_AMT	What was the dollar value of the last food stamps or EBT received?	1-99999999: IF (NUMHOUSE = 1 and (FS_AMT < 10 or FS_AMT > 350)) OR
               (NUMHOUSE = 2 and (FS_AMT <10 or FS_AMT > 600)) OR
               (NUMHOUSE = 3 and (FS_AMT <10 or FS_AMT > 800)) OR
               (NUMHOUSE = 4 and (FS_AMT <10 or FS_AMT > 1000)) OR
               (NUMHOUSE = 5 and (FS_AMT <10 or FS_AMT > 1200)) OR
               (NUMHOUSE > 5 and (FS_AMT <10 or FS_AMT > 1500)) then
                goto ERR1_FS_AMT
             
ELSE goto WELFARE

DK,RF:  Goto WELFARE	
21B	WELFARE	WELFARE	? [F1]

DURING THE PAST 12 MONTHS -

Did (you/you or any members of this household, including children,) receive any welfare payments or cash assistance from the state or local welfare office?

Please include even if only for one month.  Do NOT include benefits from food, energy, or rental assistance programs.

1. Yes
2. No	1:         Goto WELFAREX

2,DK,RF:   Goto MEALSPAY	
21B	WELFAREX	WELFAREX	? [F1]

What was the amount for the PAST 12 MONTHS?	1-99999999:   IF WELFAREX < 120 or WELFAREX > 11064 then 
                 goto ERR1_WELFAREX
              ELSE goto MEALSPAY

DK,RF: Goto WELFAREB	
21B	WELFAREB	WELFAREB	 48    ? [F1]

Could you tell me which range on CARD C best reflects the total amount of income from cash assistance from state or local government welfare programs during the PAST 12 MONTHS?

1. $1-$999
2. $1,000-$1,999
3. $2,000-$2,999
4. $3,000-$3,999
5. $4,000-$4,999
6. $5,000-$9,999
7. $10,000-$14,999
8. $15,000-$19,999
9. $20,000-$29,999
10. $30,000-$39,999
11. $40,000-$49,999
12. $50,000 and over	Goto MEALSPAY	
21B	MEALSPAY	MEALSPAY	DURING THE PAST 12 MONTHS -

Have (you/you or any members of your household) received any free meals at work as part of your pay?

1. Yes
2. No	1:         Goto MLPAYWKX

2,DK,RF:   Goto S21B_END	
21B	MLPAYWKX	MLPAYWKX	About what was the WEEKLY dollar value of these meals?	IF MLPAYWKX < 18 or MLPAYWKX > 3213 then goto ERR1_MLPAYWKX

ELSE goto MLPYQWKS	
21B	MLPYQWKS	MLPYQWKS	How many weeks did (you/you or any members of your household) receive such meals during the past 12 months?	Goto S21B_END	
21B		S21B_END		Exit block and goto Set21CompleteFlag	
21B		INTRDVX_			
21B		NETR_NTX			
21B		ROYESTX_			
21B		RETS_RVX			
21B		OTHREGX_			
21B		LUMP_UMX			
21B		OTHR_NCX			
21B		MISC_AXX			
21B		FS_AMT_			
21B		WELF_REX			
21B		MLPA_WKX			
21B		FIN_STAT			
21B		FIN_ORIG			
		Set21CompleteFlag		IF INTNMBR = 4 then goto Section 22

ELSE goto the BBACK block	
22	LIAINTRO	LIAINTRO	The next few questions are about financial assets, credit, and loans.  We know people aren't used to discussing their debt and financial assets, but we use this information to get a picture of how spending relates to changes in debt and savings.  Be assured that, like all other information you have provided, these answers will be kept strictly confidential.

1. Enter 1 to Continue	Goto IRA	
22	IRA	IRA	Do (you/you or any members of your household) have any retirement accounts such as 401(k)s, IRAs, or Thrift Savings Plans?

1. Yes
2. No	1:       Goto IRAX

2,DK,RF:  Goto DEFBENRP	
22	IRAX	IRAX	? [F1]

As of TODAY -- 

What is the total value of all retirement accounts such as 401(k)s, IRAs, or Thrift Savings Plans that (you/your household) (own/owns)?	1-999999999999:  IF IRAX > 600000 then goto ERR1_IRAX
		 ELSE goto IRAYRX

DK,RF:  Goto IRAB	
22	IRAB	IRAB	 49     ? [F1]

Could you tell me which range on CARD D best reflects the total value of all retirement accounts such as 401(k)s, IRAs, and Thrift Savings Plans? 

1. $1-$1,999
2. $2,000-$9,999
3. $10,000-$49,999
4. $50,000-$199,999
5. $200,000-$449,999
6. $450,000 and over	1-6:  Goto IRAYRX

DK,RF:  Goto DEFBENRP	
22	IRAYRX	IRAYRX	? [F1]

What was the total value of all retirement accounts ONE YEAR AGO TODAY?	0:  Goto IRAYR

1-999999999999: IF (IRAX = DK or IRAX = RF) and IRAYRX > 999999 
                    then goto ERR1_IRAYRX
                ELSEIF (IRAX <> DK and IRAX <> RF) and 
                      ((IRAYRX <= (0.6 x IRAX)) or 
                       (IRAYRX >= (1.4 x IRAX))) then 
                         goto ERR2_IRAYRX
                ELSE goto DEFBENRP

DK,RF:  Goto IRAYRB	
22	IRAYRB	IRAYRB	 49    ? [F1]

Could you tell me which range on CARD D best reflects the total value of all retirement accounts ONE YEAR AGO TODAY?

1. $1-$1,999
2. $2,000-$9,999
3. $10,000-$49,999
4. $50,000-$199,999
5. $200,000-$449,999
6. $450,000 and over	Goto DEFBENRP	
22	IRAYR	IRAYR	Did (you/you or any members of your household) have any retirement accounts such as 401(k)s, IRAs, or Thrift Savings Plans ONE YEAR AGO TODAY?

1. Yes
2. No	Goto DEFBENRP	
22	DEFBENRP	DEFBENRP	? [F1]

Do (you/you or any members of your household) have a defined benefit retirement plan, such as a pension from an employer?

1. Yes
2. No	Goto STOCK	
22	STOCK	STOCK	? [F1]

Do (you/you or any members of your household) have any directly-held stocks, bonds, or mutual funds (Not in Retirement accounts/  )?

        Include U.S. savings bonds

1. Yes
2. No	1:   Goto STOCKX

2,DK,RF:     Goto LIQUID	
22	STOCKX	STOCKX	? [F1]

As of TODAY -- 

What is the total value of all directly-held stocks, bonds, and mutual funds (Not in Retirement accounts/  ) that (you/your household) (own/owns)?

        Include US savings bonds	1-999999999999:   IF STOCKX < 5 or STOCKX > 999999 then 
                     goto ERR1_STOCKX
                   ELSE goto STOCKYRX

DK,RF:  Goto STOCKB	
22	STOCKB	STOCKB	 49    ? [F1]

Could you tell me which range on CARD D best reflects the total value of all directly-held stocks, bonds, and mutual funds (Not in Retirement accounts/  )?

        Include US savings bonds

1. $1-$1,999
2. $2,000-$9,999
3. $10,000-$49,999
4. $50,000-$199,999
5. $200,000-$449,999
6. $450,000 and over	1-6:  Goto STOCKYRX

DK,RF:  Goto LIQUID	
22	STOCKYRX	STOCKYRX	? [F1]

What was the total value of all directly-held stocks, bonds, and mutual funds (Not in Retirement accounts/  ) ONE YEAR AGO TODAY?

        Include US savings bonds	0:   Goto STOCKYR

1-999999999999:  IF (STOCKX = DK or STOCKX = RF) and 
                    STOCKYRX > 999999 then goto ERR1_STOCKYRX
                 ELSEIF (STOCKX <> DK and STOCKX <> RF) and 
                        ((STOCKYRX <= (0.6 x STOCKX)) or 
                         (STOCKYRX >= (1.4 x IRAX))) then 
                               goto ERR2_STOCKYRX
                   ELSE goto LIQUID

DK,RF:  Goto STOCKYRB	
22	STOCKYRB	STOCKYRB	 49    ? [F1]

Could you tell me which range on CARD D best reflects the total value of all directly-held stocks, bonds, and mutual funds (Not in Retirement accounts/  ) ONE YEAR AGO TODAY?

        Include US savings bonds

1. $1-$1,999
2. $2,000-$9,999
3. $10,000-$49,999
4. $50,000-$199,999
5. $200,000-$449,999
6. $450,000 and over	Goto LIQUID	
22	STOCKYR	STOCKYR	Did (you/you or any members of your household) have any directly-held stocks, bonds, or mutual funds (Not in Retirement accounts/  ) ONE YEAR AGO TODAY? 

        Include U.S. savings bonds

1. Yes
2. No	Goto LIQUID	
22	LIQUID	LIQUID	Do (you/you or any members of your household) have any checking, savings, money market accounts, or certificates of deposit or CDs?

1. Yes
2. No	1:  Goto LIQUIDX

2,DK,RF:  Goto WHOLIF	
22	LIQUIDX	LIQUIDX	? [F1]

As of TODAY --

What is the total value of all checking, savings, money market accounts, and certificates of deposit or CDs (you/your household) (have/has)?	1-999999999999:   IF LIQUIDX > 499999 then goto ERR1_LIQUIDX
                  ELSE goto LIQUDYRX

DK,RF:  Goto LIQUIDB	
22	LIQUIDB	LIQUIDB	 50    ? [F1]

Could you tell me which range on CARD E best reflects the total value of checking, savings, money market accounts, and certificates of deposit or CDs?

1. $1-$499
2. $500-$999
3. $1,000-$2,499
4. $2,500-$9,999
5. $10,000-$34,999
6. $35,000 and over	1-6:   Goto LIQUDYRX

DK, RF:  Goto WHOLIF	
22	LIQUDYRX	LIQUDYRX	? [F1]

What was the total value of all checking, savings, money market accounts, and certificates of deposit or CDs ONE YEAR AGO TODAY?	0:  Goto LIQUDYR

1-999999999999: IF (LIQUIDX = DK or LIQUIDX = RF) and 
                   LIQUDYRX > 499999  then goto ERR1_LIQUDYRX
                ELSEIF (LIQUIDX <> DK and LIQUIDX <> RF) and 
                      ((LIQUDYRX <= (0.6 x LIQUIDX)) or 
                       (LIQUDYRX >= (1.4 x LIQUIDX))) 
                        then goto ERR2_ LIQUDYRX
                ELSE goto WHOLIF

DK,RF: Goto LIQUDYRB	
22	LIQUDYRB	LIQUDYRB	 50    ? [F1]

Could you tell me which range on CARD E best reflects the total value of all checking, savings, money market accounts, and certificates of deposit or CDs ONE YEAR AGO TODAY?

1. $1-$499
2. $500-$999
3. $1,000-$2,499
4. $2,500-$9,999
5. $10,000-$34,999
6. $35,000 and over	Goto WHOLIF	
22	LIQUDYR	LIQUDYR	Did (you/you or any members of your household) have any checking, savings, money market accounts, or certificates of deposit or CDs ONE YEAR AGO TODAY?

1. Yes
2. No	Goto WHOLIF	
22	WHOLIF	WHOLIF	? [F1]
(Do/Does) (you/your household) own any whole life insurance or other life insurance policies that can be surrendered for cash or borrowed against prior to the death of the person insured?

        Also include universal life and variable life insurance
        Do NOT include term life insurance or other policies that only have a benefit upon death or disability

1. Yes
2. No	1:    Goto WHOLIFX

2,DK,RF:    Goto OTHAST	
22	WHOLIFX	WHOLIFX	? [F1]

As of TODAY --

What is the total surrender value of these policies?

        Surrender value is also known as the cash value

        Enter the amount that can be borrowed or withdrawn prior to death, NOT the benefit upon
           death of the insured	1-999999999999:   IF WHOLIFX > 70000 then goto ERR1_WHOLIFX
                  ELSE goto WHLFYRX

DK,RF:  Goto WHOLIFB	
22	WHOLIFB	WHOLIFB	 50    ? [F1]

Could you tell me which range on CARD E best reflects the total surrender value of these policies?

         Surrender value is also known as the cash value
         Enter the amount that can be borrowed or withdrawn prior to death, NOT the benefit upon
           death of the insured 

1. $1-$499
2. $500-$999
3. $1,000-$2,499
4. $2,500-$9,999
5. $10,000-$34,999
6. $35,000 and over	1-6:   Goto WHLFYRX

DK,RF:    Goto OTHAST	
22	WHLFYRX	WHLFYRX	? [F1]

What was the total surrender value of these policies ONE YEAR AGO TODAY?

         Surrender value is also known as the cash value

         Enter the amount that can be borrowed or withdrawn prior to death, NOT the benefit upon
           death of the insured	0:  Goto WHLFYR

1-999999999999:   IF WHLFYRX > 70000 then goto ERR1_WHLFYRX
                  ELSE goto OTHAST

DK,RF:  Goto WHLFYRB	
22	WHLFYRB	WHLFYRB	 50    ? [F1]
Could you tell me which range on CARD E best reflects the total surrender value of these policies ONE YEAR AGO TODAY?

        Surrender value is also known as the cash value
         Enter the amount that can be borrowed or withdrawn prior to death, NOT the benefit upon
            death of the insured

1. $1-$499
2. $500-$999
3. $1,000-$2,499
4. $2,500-$9,999
5. $10,000-$34,999
6. $35,000 and over	Goto OTHAST	
22	WHLFYR	WHLFYR	Did (you/your household) own any whole life insurance or other life insurance policies that can be surrendered for cash or borrowed against prior to the death of the person insured ONE YEAR AGO TODAY? 

           Also include universal life and variable life insurance
 
           Do NOT include term life insurance or other policies that only have a benefit upon death or disability

1. Yes
2. No	Goto OTHAST	
22	OTHAST	OTHAST	(Do/Does) (you/your household) have any other financial assets, such as annuities, trusts, and royalties?

1. Yes
2. No	1:    Goto OTHASTX

2,DK,RF:   Goto CREDIT	
22	OTHASTX	OTHASTX	As of TODAY --

What is the total value of these other financial assets?	1-999999999999:   IF OTHASTX < 5 or OTHASTX > 600000 then 
                     goto ERR1_OTHASTX
                   ELSE goto OTHSTYRX

DK,RF:  Goto OTHASTB	
22	OTHASTB	OTHASTB	 49

Could you tell me which range on CARD D best reflects the total value of these other financial assets? 

1. $1-$1,999
2. $2,000-$9,999
3. $10,000-$49,999
4. $50,000-$199,999
5. $200,000-$449,999
6. $450,000 and over	1-6:  Goto OTHSTYRX

DK, RF:  Goto CREDIT	
22	OTHSTYRX	OTHSTYRX	What was the total value of these other financial assets ONE YEAR AGO TODAY?	0:  Goto OTHSTYR

1-999999999999:   IF OTHSTYRX = 1-5 or OTHSTYRX > 600000 then 
                     goto ERR1_OTHSTYRX
                  ELSE goto CREDIT

DK,RF:   Goto OTHSTYRB	
22	OTHSTYRB	OTHSTYRB	 49

Could you tell me which range on CARD D best reflects the total value of these other financial assets ONE YEAR AGO TODAY?

1. $1-$1,999
2. $2,000-$9,999
3. $10,000-$49,999
4. $50,000-$199,999
5. $200,000-$449,999
6. $450,000 and over	Goto CREDIT	
22	OTHSTYR	OTHSTYR	Did (you/your household) have any other financial assets, such as annuities, trusts, and royalties ONE YEAR AGO TODAY? 

1. Yes
2. No	Goto CREDIT	
22	CREDIT	CREDIT	? [F1]

(Do/Does) (you/your household) have any credit cards including store cards and gas cards?

1. Yes
2. No	1:   Goto CREDITX

2,DK,RF:   Goto STUDNT	
22	CREDITX	CREDITX	? [F1]

What is the total amount owed on all cards as of TODAY?	0-999999999999:   IF CREDITX = 1-9 or CREDITX > 30000 then
                     goto ERR1_CREDITX
                  ELSE goto CREDTYRX

DK,RF:  Goto CREDITB	
22	CREDITB	CREDITB	 50    ? [F1]

Could you tell me which range on CARD E best reflects the total amount owed on all credit cards including store cards and gas cards? 

1. $1-$499
2. $500-$999
3. $1,000-$2,499
4. $2,500-$9,999
5. $10,000-$34,999
6. $35,000 and over	1-6:    Goto CREDTYRX

DK,RF:     Goto CREDFINX	
22	CREDTYRX	CREDTYRX	? [F1]

What was the total amount owed on all cards ONE YEAR AGO TODAY?	0:  Goto CREDYR

1-999999999999:   IF CREDTYRX = 1-9 or CREDTYRX > 30000 then 
                     goto ERR1_CREDTYRX
                   ELSE goto CREDFINX

DK,RF:  Goto CREDYRB	
22	CREDYRB	CREDYRB	 50   ? [F1]

Could you tell me which range on CARD E best reflects the total amount owed on all credit cards including store cards and gas cards ONE YEAR AGO TODAY?

1. $1-$499
2. $500-$999
3. $1,000-$2,499
4. $2,500-$9,999
5. $10,000-$34,999
6. $35,000 and over	Goto CREDFINX	
22	CREDYR	CREDYR	Did (you/your household) have any credit cards including store cards and gas cards ONE YEAR AGO TODAY? 

1. Yes
2. No	Goto CREDFINX	
22	CREDFINX	CREDFINX	What was the total amount paid in finance, late charges, and interest for all cards in (last month)?	0-999999999999:  IF CREDFINX > 700 then goto ERR1_CREDFINX
                 ELSE goto STUDNT

DK,RF:  Goto STUDNT	
22	STUDNT	STUDNT	? [F1]

As of TODAY --

(Do/Does) (you/your household) have any student loans?

1. Yes
2. No	1:    Goto STUDNTX

2, DK, RF:   Goto OTHLOAN	
22	STUDNTX	STUDNTX	? [F1]

What is the total amount owed on all student loans?	1-999999999999:   IF entry < 50 or entry > 199999 then
                     goto ERR1_STUDNTX
                  ELSE goto STDNTYRX

DK, RF:  Goto STUDNTB	
22	STUDNTB	STUDNTB	 50    ? [F1]

Could you tell me which range on CARD E best reflects the total amount owed on all student loans?

1. $1-$499
2. $500-$999
3. $1,000-$2,499
4. $2,500-$9,999
5. $10,000-$34,999
6. $35,000 and over	1-6:   Goto STDNTYRX

DK, RF:  Goto STUDFINX	
22	STDNTYRX	STDNTYRX	? [F1]

What was the total amount owed on all student loans ONE YEAR AGO TODAY?	0:  Goto STDNTYR

1-999999999999:   IF (STUDNTX = DK or RF) and STDNTYRX > 
                    499,999 then goto ERR1_STDNTYRX
                  ELSEIF (STUDNTX <> DK or RF) and ((STDNTYRX 
                     <= (0.6 x STUDNTX)) or (STDNTYRX >= (1.4 x 
                     STUDNTX))) then goto ERR2_ STDNTYRX
                    ELSE goto STUDFINX

DK, RF:   Goto STDNTYRB	
22	STDNTYRB	STDNTYRB	 50    ? [F1]

Could you tell me which range on CARD E best reflects the total amount owed on all student loans ONE YEAR AGO TODAY?

1. $1-$499
2. $500-$999
3. $1,000-$2,499
4. $2,500-$9,999
5. $10,000-$34,999
6. $35,000 and over	Goto STUDFINX	
22	STDNTYR	STDNTYR	Did (you/your household) have any student loans ONE YEAR AGO TODAY? 

1. Yes
2. No	Goto STUDFINX	
22	STUDFINX	STUDFINX	What was the total amount paid in finance, late charges, and interest for all student loans in (last month)?	0-999999999999:   IF entry > 375 then goto ERR1_STUDFINX
                  ELSE goto OTHLOAN

DK, RF:  Goto OTHLOAN	
22	OTHLOAN	OTHLOAN	? [F1]
As of TODAY --

(Do/Does) (you/your household) have any other debt such as medical loans or personal loans?

        Do not include mortgages, home equity loans, or vehicle loans

1. Yes
2. No	1:   Goto OTHLONX

2,DK,RF:   Goto S22_END	
22	OTHLONX	OTHLONX	? [F1]

What is the total amount owed on all other loans?

        Do not include mortgages, home equity loans, or vehicle loans	1-999999999999: IF entry < 50 or entry > 72000 then 
                    goto ERR1_OTHLONX
                 ELSE goto OTHLNYRX

DK,RF:  Goto OTHLONB	
22	OTHLONB	OTHLONB	 50    ? [F1]

Could you tell me which range on CARD E best reflects the total amount owed on all other loans?

        Do not include mortgages, home equity loans, or vehicle loans

1. $1-$499
2. $500-$999
3. $1,000-$2,499
4. $2,500-$9,999
5. $10,000-$34,999
6. $35,000 and over	1-6:  Goto OTHLNYRX

DK,RF:  Goto OTHFINX	
22	OTHLNYRX	OTHLNYRX	? [F1]

What was the total amount owed on all other loans ONE YEAR AGO TODAY?

        Do not include mortgages, home equity loans, or vehicle loans	0:  Goto OTHLNYR

1-999999999999:   IF entry = 1-49 or entry > 72000 then
                     goto ERR1_OTHLNYRX
                  ELSE goto OTHFINX

DK,RF:   Goto OTHLNYRB	
22	OTHLNYRB	OTHLNYRB	 50    ? [F1]

Could you tell me which range on CARD E best reflects the total amount owed on all other loans ONE YEAR AGO TODAY?

        Do not include mortgages, home equity loans, or vehicle loans

1. $1-$499
2. $500-$999
3. $1,000-$2,499
4. $2,500-$9,999
5. $10,000-$34,999
6. $35,000 and over	Goto OTHFINX	
22	OTHLNYR	OTHLNYR	Did (you/your household) have any other debt such as medical loans or personal loans ONE YEAR AGO TODAY? 

          Do not include mortgages, home equity loans, or vehicle loans

1. Yes
2. No	Goto OTHFINX	
22	OTHFINX	OTHFINX	What was the total amount paid in finance, late charges, and interest for all other loans in (last month)?

        Do not include mortgages, home equity loans, or vehicle loans	0-999999999999:  IF entry > 375 then goto ERR1_OTHFINX
                  ELSE goto S22_END

DK, RF:   Goto S22_END	
22		S22_END			
22		IRAX_			
22		IRAYRX_			
22		STOCKX_			
22		STOC_YRX			
22		LIQUIDX_			
22		LIQU_YRX			
22		WHOLIFX_			
22		WHLFYRX_			
22		OTHASTX_			
22		OTHS_YRX			
22		CREDITX_			
22		CRED_YRX			
22		CRED_INX			
22		STUDNTX_			
22		STDN_YRX			
22		STUD_INX			
22		OTHLONX_			
22		OTHL_YRX			
22		OTHFINX_			
22		FAS_STAT			
22		FAS_ORIG			
BACK		AFTERMID		IF COMPLETE_FLAG = 1 and NOCONTACT = 0 and INTNMBR = 4 then 
    goto BlkAPPT.BResearch

IF COMPLETE_FLAG = 1  then goto DK_THANK

IF START = 4 then goto VERIFY_INFO

IF START = 3 then goto TRANS

IF REPLACE_VER2 = 1 OR REPLACE_SPAWN = 1 then goto DONE

IF (TYPEC = 3, 7, 10-12) then goto DONE

IF NONTYP = 1-3 then goto THANK2

ELSE goto BLkAPPT.APPTDATE	
	RES_INTRO	RES_INTRO	We would like to improve the survey taking experience for others and your feedback can help us do that.  Please think of your involvement in this survey as a whole when answering these next few questions.

1. Enter 1 to Continue	Goto RES01	
Back	RES01	RES01	How burdensome was this survey to you?  Would you say:

1. Not at all burdensome?
2. A little burdensome?
3. Somewhat burdensome?
4. Very burdensome?
5. Extremely burdensome?	Goto RES02	
Back	RES02	RES02	How difficult was it for you to answer the questions in this survey?

1. Not at all difficult
2. A little difficult
3. Somewhat difficult
4. Very difficult
5. Extremely difficult	Goto RES03	
Back	RES03	RES03	How sensitive did you feel the questions I asked today were?

1. Not at all sensitive
2. A little sensitive
3. Somewhat sensitive
4. Very sensitive
5. Extremely sensitive	Goto RES04	
Back	RES04	RES04	In thinking about the length of today's survey, would you say that it was...

1. Very short?
2. Somewhat short?
3. Neither short nor long?
4. Somewhat long?
5. Very long?	Exit BResearch block and goto DK_CHECK	
BACK	DK_CHECK	DK_CHECK	   Are there any Don't Know items that you need to callback for?

              Press Ctrl-M to review all Don't Knows

1. Yes
2. No	1:   Goto APPTDATE

2:   Goto THANKYOU	
BACK	APPTDATE	APPTDATE	I'd like to schedule a DATE to complete the (missing items/interview).
What DATE AND TIME would be best to visit you again?

   Enter date in the format MM/DD/YYYY         Today is (current date)

 (DK Items:  Press Ctrl-M to review all Don&rsquo;t knows/ *  Missing Sections:  Press shift-F5 to view the status table)	EMPTY,RF:  Goto APPTOTH

DATE:  IF apptdate.DAY > 1 or apptdate.DAY < 31 then goto 
          CK_ApptDATE
       ELSEIF apptdate.MONTH < 1 or apptdate.MONTH > 12 then
              goto CK_ApptDate
       ELSEIF apptdate.YEAR < INTDATE.YEAR or apptdate.YEAR >
              INTDATE.YEAR + 1 then goto CK_ApptDate
       ELSEIF apptdate.MONTH <> INTPER[5:6] then goto 
              CK_ApptMonth
       ELSEIF apptdate < SYSDATE then goto CK_ApptPast
       ELSE goto APPTTIME	
	APPTTIME	APPTTIME	What TIME would be best to visit you again?

   Enter time in the format  HH:MM AM/PM
 	IF (APPTDATE = SYSDATE) AND (APPTTIME <= SYSTIME) then 
   goto CK_APPTTIME

ELSE goto APPTOTH	
BACK	APPTOTH	APPTOTH	  Enter any appointment notes	IF AskPhone2 = EMPTY then goto PHONENUMBER2

ELSE goto THANKCB	
BACK	THANKYOU	THANKYOU	This concludes the interview.  Thank you for your patience, and for taking the time to answer
our questions.

Let me remind you that the information you provide is very valuable because it is used to
update the Consumer Price Index, which is one of our nation's leading economic indicators.

That is why we sincerely appreciate your participation in this survey(and look forward to your continued support when we contact you again in 3 months.).      
      
      Interview number: (1/2/3/4/5) 
      NOTE:  Inform the respondent that a supervisor may call them to conduct re-interview.
       Explain re-interview as needed.

1. Enter 1 to Continue	IF INTNMBR = 1-3 then goto QTRAPPT

ELSE goto HOW_INTV	
BACK	QTRAPPT	QTRAPPT	Today is (current date). I would like to return during the first week of (month) to conduct your next interview. What day and time works best with your schedule?

 Enter date and time of the next quarter appointment.

 Give respondent an appointment card with the filled-in date and time with Regional Office or Field Representative contact information.

 NOTE : If you are not making an appointment for the next interview, press Enter.
 	IF AskPhone2 = EMPTY then goto PHONENUMBER2

ELSE goto HOW_INTV	
FRONT	PHONENUMBER2	PHONENUMBER2	  Ask or verify, if necessary.

In case I need to contact you about this appointment, is there (a / a secondary) phone number and/or e-mail where I can reach you?

  Enter phone number or 0 for None/Refused	IF PHONENUMBER2 lt 10 digits and <> 0 then goto CK_PHONENUMBER2

ELSEIF PHONENUMBER2 = 0 then goto EMAILADDR

ELSE goto PHTYP2	
Front	PHTYP2	PHTYP2	  Is this a home, work, or cell number?

1. Home
2. Work
3. Cell	Goto EMAILADDR	
FRONT	EMAILADDR	EMAILADDR	          Enter E-Mail or press ENTER for None/Same	IF THANKYOU = 1 then goto HOW_INTV

ELSE goto THANKCB	
BACK	THANKCB	THANKCB	(Thank you, I will come back at the time suggested./Thank you for your time.)

      Revisit:   (Appointment information)

1. Enter 1 to Continue	Goto VERIFY_INFO	
BACK	THANK2	THANK2	Thank you for your time.  You've been very helpful.

            NOTE:  Inform the respondent that a supervisor
                      may call them to conduct re-interview.
                      Explain re-interview as needed.

                                                Interview number:  (1/2/3/4/5)

        

1. Enter 1 to Continue	Goto TELPV	
BACK	TRANS	TRANS	
           Are you ready to transmit this case?

1. Yes
2. No	1:     Goto MISS_SEC

2:     Goto VERIFY_INFO	
BACK	MISS_SEC	MISS_SEC	           No survey data were collected for a required section(s).
       
          Press F5 to view status table 

        Enter the reason that best describes why survey data was not collected.	Goto HOW_INTV	
BACK	HOW_INTV	HOW_INTV	   How did you collect the data for this (first/second/third/fourth) interview for this household?

1. Personal visit for all sections
2. Personal visit for all sections, but telephone followup for some questions
3. Personal visit for more than half of the sections, the rest by telephone
4. Equally split between personal visit and telephone
5. Telephone for more than half of the sections, the rest by personal visit
6. Telephone for all sections	1,6:   Goto SNGL_INT

2:     Goto TEL_RESN

3,4,5:   Goto TEL_SECT	
BACK	SNGL_INT	SNGL_INT	  Were you able to conduct the interview in a single (visit/call)?

1. Yes
2. No	IF HOW_INTV = 6 then goto TEL_RESN
ELSE goto TRVLTIME	
BACK	TEL_SECT	TEL_SECT	  Which of these sections did you collect entirely by telephone?    

          Enter all that apply, separate with commas.   
   
           Do not select 5 or 6 if any part of the section was collected in person.

1. Sections 2 and 3  Housing - rent, mortgage, home equity loans.
2. Section 4  Utilities/Communications (electricity, heating, telephone, cable, internet).
3. Section 6  Appliances
4. Section 8  Home Furnishings
5. Sections 9, 10, and 11  Vehicle Expenses
6. Sections 12 and 14  Insurance
7. Section 13  Medical/Health Expenses
8. Section 17  Trips and Vacations
9. Section 18  Clothing
10. Section 21   Work Experience and Income	Goto TEL_RESN	
BACK	TEL_RESN	TEL_RESN	  What was the main reason for collecting data by telephone?

1. Barriers to reaching the sample unit (i.e., doorman, security, dog).
2. Collecting data from additional respondent(s) in household
3. Excessive distance or travel time to sample unit.
4. Respondent called FR to do interview.
5. Respondent only available by telephone (scheduling issues).
6. Respondent refused personal visit.
7. Respondent requested telephone interview.
8. Other (Specify).	1-7:   Goto TRVLTIME

8:     Goto OTHTLRSN	
BACK	OTHTLRSN	OTHTLRSN	  Specify	Goto TRVLTIME	
BACK	TELPV	TELPV	          How did you collect MOST of the data for this case?  
            (Include follow-ups)             

1. By personal visit
2. By phone	Goto TRVLTIME	
Back	TRVLTIME	TRVLTIME	            FOR BLS RESEARCH ONLY

We would like to understand the time required to collect CEQ interviews. 
Your responses will be used for sample planning and research only, and will not be used for evaluation.
 
What was the TOTAL time (in minutes) you spent this month to complete this interview for:
     Traveling to and from the sample unit? 
      Exclude travel from another sample unit.	0-240:   Goto INTVTIME

241-999:    Goto CK_TRVLTIME	
Back	INTVTIME	INTVTIME	            FOR BLS RESEARCH ONLY

What was the TOTAL time (in minutes) you spent this month to complete this interview for:
     Interviewing the respondent?     	0-240:   Goto OTHTIME

241-999:    Goto CK_INTVTIME	
Back	OTHTIME	OTHTIME	            FOR BLS RESEARCH ONLY

What was the TOTAL time (in minutes) you spent this month to complete this interview for:
         All other activities, such as non-interview contact attempts, finding
         phone numbers, or closing the case?	0-240:  IF Bcoverage.NONTYP = 1 AND SECTCOMP[2 or 3] = 1 AND
           BCeintro.CE_INTRO = 1 then goto RESPON
        ELSEIF BCoverage.NONTYP = 1-3 then goto DONE
        ELSE goto CONVREF

241-999:    Goto CK_OTHTIME	
BACK	CONVREF	CONVREF	? [F1]

      Was this a converted refusal?

1. Yes
2. No	Goto RESPON	
BACK	RESPON	RESPON	       Enter the line number of the MAIN respondent.      

1. ^NAME[1]
2. ^NAME[2]
3. ^NAME[3]
4. ^NAME[4]
5. ^NAME[5]
6. ^NAME[6]
7. ^NAME[7]
8. ^NAME[8]
9. ^NAME[9]
10. ^NAME[10]
11. ^NAME[11]
12. ^NAME[12]
13. ^NAME[13]
14. ^NAME[14]
15. ^NAME[15]
16. ^NAME[16]
17. ^NAME[17]
18. ^NAME[18]
19. ^NAME[19]
20. ^NAME[20]
21. ^NAME[21]
22. ^NAME[22]
23. ^NAME[23]
24. ^NAME[24]
25. ^NAME[25]
26. ^NAME[26]
27. ^NAME[27]
28. ^NAME[28]
29. ^NAME[29]
30. ^NAME[30]
95. Proxy Respondent	If (BControlcard.TUnit1.Person.HH_MEM[RESPON] = 2) OR 
   (BControlcard.TUnit2.Person.AGERNG[RESPON] = 1) OR
  (BControlcard.TUnit1.Person.PERSTAT[RESPON] = 7, 8 or 99) OR
   (BControlcard.TUnit1.Person.MEMBSTAT[RESPON] = 1, 3 or 5) 
     then goto CK_RESPON

ELSE goto OTHRSP	
BACK	OTHRSP	OTHRSP	       Enter the line number of ALL OTHER respondents.           
              
       Enter  0  For None                                                          

 (Display Names of persons in the household)

0. None
1. ^NAMEonly(1)
2. ^NAMEonly(2)
3. ^NAMEonly(3)
4. ^NAMEonly(4)
5. ^NAMEonly(5)
6. ^NAMEonly(6)
7. ^NAMEonly(7)
8. ^NAMEonly(8)
9. ^NAMEonly(9)
10. ^NAMEonly(10)
11. ^NAMEonly(11)
12. ^NAMEonly(12)
13. ^NAMEonly(13)
14. ^NAMEonly(14)
15. ^NAMEonly(15)
16. ^NAMEonly(16)
17. ^NAMEonly(17)
18. ^NAMEonly(18)
19. ^NAMEonly(19)
20. ^NAMEonly(20)
21. ^NAMEonly(21)
22. ^NAMEonly(22)
23. ^NAMEonly(23)
24. ^NAMEonly(24)
25. ^NAMEonly(25)
26. ^NAMEonly(26)
27. ^NAMEonly(27)
28. ^NAMEonly(28)
29. ^NAMEonly(29)
30. ^NAMEonly(30)
95. Proxy respondent	IF OTHRSP = RESPON then goto CK_OTHRSP
ELSEIF (BControlcard.Tunit1.Person.FNAME[Othrsp] = 999 or 
        EMPTY) or 
       (BControlcard.Tunit1.Person.HH_MEM[othrsp] = 2) OR
     (BControlcard.Tunit1.Person.MEMBSTAT[othrsp] = 1, 3 or 5)
      OR (BControlcard.Tunit1.Person.PERSTAT[othrsp] = 7, 8 
      or 99) then goto CK2_OTHRSP
ELSEIF 0 is selected with other answer list options then 
       goto CK3_OTHRSP
ELSE goto USERECS	
BACK	USERECS	USERECS	    In this interview, how often did the respondent consult records?

1. Always or almost always
2. Most of the time 
3. Occasionally or used at least one record
4. Never, no records used	1-3:    Goto TYPERECS

4:      IF (INTNMBR = 4 or HOMEFILE8500 = 1) then 
            goto INFOBOOK
        ELSE goto HOMEFILE	
BACK	TYPERECS	TYPERECS	       What types of bills, receipts, or records did the respondent(s) use to answer expenditure questions?

        Enter all that apply, separate with commas.             

1. Bills
2. Checkbook ledger or check stubs
3. Personal finance or budgeting software records
4. Receipts or e-mail receipts
5. Home file (provided by Census Bureau)
6. Contracts or agreements
7. Credit card, bank, or online bill-paying statements
8. Pay stub
9. Other- specify	1-8:   Goto RSECTN

9:     Goto SPECRECS	
BACK	SPECRECS	SPECRECS	  Specify	Goto RSECTN	
	RSECTN	RSECTN	  Which of these sections did the respondent(s) use bills, receipts, or other resources to answer
    expenditure  questions?
 
             Enter all that apply, separate with commas.

1. Section 1 - General Housing Characteristics
2. Section 2 - Rental Living Quarters
3. Sections 3 - Owned Living Quarters & Other Owned Real Estate
4. Section 4 - Utilities and Fuels
5. Section 5 - Construction, Repairs, Alterations, and Maintenance of Property
6. Section 6 - Appliances, Household Equipment, and Other Selected Items
7. Section 7 - Household Item Repairs, Service Contracts, and Extended Warranties
8. Section 8 - Home Furnishings and Related Household Items
9. Section 9 - Rented and Leased Vehicles
10. Section 10 - Owned vehicles
11. Section 11 - Vehicle Operating Expenses
12. Section 12 - Health Insurance
13. Section 13 - Medical and Health Expenses
14. Section 14 - Insurance Other than Health
15. Section 15 - Educational Expenses
16. Section 16 - Subscriptions, Memberships, Books, and Entertainment Expenses
17. Section 17 - Trips and Vacations
18. Section 18 - Clothing and Clothing Services
19. Section 19 - Miscellaneous Expenses
20. Section 20 - Expense Patterns for Selected Goods and Services
21. Section 21 - Work Experience and Income
22. Section 22 - Assets and Liabilities	IF (INTNMBR = 4 or HOMEFILE8500 = 1) then goto INFOBOOK

ELSE goto HOMEFILE	
BACK	HOMEFILE	HOMEFILE	
     Did you give the respondent a Home File this quarter?

1. Yes
2. No	Goto INFOBOOK	
BACK	INFOBOOK	INFOBOOK	
        In the interview, how often did the respondent consult the information booklet?

       If reading the book to the respondent, enter 5.

1. Almost always (90% of the time or more)
2. Most of the time (50% to 89% of the time)
3. Occasionally (10% to 49% of the time)
4. Never or almost never (less than 10% of the time)
5. The respondent did not have access to the information booklet.	Goto LANGUAGE	
BACK	LANGUAGE	LANGUAGE	
    In what language was the interview conducted?

1. English
2. Spanish
3. Other - specify	1,2:   Goto VERIFY_INFO

3:     Goto LANG_SP	
BACK	LANG_SP	LANG_SP	    Specify	Goto VERIFY_INFO	
BACK	VERIFY_INFO	VERIFY_INFO	
         Verify/change any of the information listed below
        
      Phone number:    ((area)) (phone number)   (Extension)    Type: (Home/Work/Cell)
     Second phone: (2nd phone number)   (2nd phone extension)     Type:  (Home/Work/Cell)
       Email address:  (Email address)
      Best time to call :  (Bestime code description)
     Specific best time:  (best time specify)

               No Sunday:  ((No Sunday Interview/Sunday interview okay))       

1. Enter 1 to Continue
2. Change something	1:    Goto DONE

2:     Goto V_CHGWHAT	
	V_CHGWHAT	V_CHGWHAT	            What would you like to update?
             Enter all that apply, separate with commas

     Phone number:    ((area)) (phone number)   (Extension)    Type: (Home/Work/Cell)
     Second phone: (2nd phone number)   (2nd phone extension)     Type:  (Home/Work/Cell)
     Email address:  (Email address)
     Best time to call :  (Bestime code description)
     Specific best time:  (best time specify)

               No Sunday:  ((No Sunday Interview/Sunday interview okay))      

1. Primary phone
2. Secondary phone
3. E-mail address
4. Best time to call
5. No Sunday	1:    Goto V_PHONE

2:    Goto V_PHONE2

3:    Goto V_EMAIL

4:    Goto V_BSTTI

5:    Goto V_NOSUN	
BACK	V_PHONE	V_PHONE	           Update phone number or press enter if same
              Enter 0 for none.	IF entry lt 10 digits and ne 0 then goto CK_VPHONE

ELSEIF V_PHONE = 0 or EMPTY then 
        If 2 selected in V_ChgWhat then goto V_PHONE2
        Elseif 3 selected in V_ChgWhat then goto V_EMAIL
        Elseif 4 selected in V_ChgWhat then goto V_BSTTI
        Elseif 5 selected in V_ChgWhat then goto V_NOSUN
        Else goto DONE

ELSE goto V_PHTYP1	
Back	V_PHTYP1	V_PHTYP1	  Is this a home, work, or cell number?

1. Home
2. Work
3. Cell	IFf 2 selected in V_ChgWhat then goto V_PHONE2

ELSEIF 3 selected in V_ChgWhat then goto V_EMAIL

ELSEIF 4 selected in V_ChgWhat then goto V_BSTTI

ELSEIF 5 selected in V_ChgWhat then goto V_NOSUN

ELSE goto DONE	
Back	V_PHONE2	V_PHONE2	    Update second phone or press enter if same
      Enter 0 for none	IF entry lt 10 digits and <> 0 and <> EMPTY then goto CK_VPHONE2

ELSEIF V_PHONE2 = 0 or EMPTY then 
        if 3 selected in V_ChgWhat then goto V_EMAIL
        Elseif 4 selected in V_ChgWhat then goto V_BSTTI
        Elseif 5 selected in V_ChgWhat then goto V_NOSUN
        Else goto DONE

ELSE goto V_PHTYP2	
Back	V_PHTYP2	V_PHTYP2	  Is this a home, work, or cell number?

1. Home
2. Work
3. Cell	IF 3 selected in V_ChgWhat then goto V_EMAIL

ELSEIF 4 selected in V_ChgWhat then goto V_BSTTI

ELSEIF 5 selected in V_ChgWhat then goto V_NOSUN

ELSE goto DONE	
Back	V_EMAIL	V_EMAIL	          Enter E-Mail or press enter if Same	IF 4 selected in V_ChgWhat then goto V_BSTTI

ELSEIF 5 selected in V_ChgWhat then goto V_NOSUN

ELSE goto DONE	
	V_BSTTI	V_BSTTI	   Best time to contact

1. Morning (9am-12noon) 
2. Noon/lunchtime (11am-1pm) 
3. Afternoon (12noon-4pm)
4. Suppertime/early evening/dinnertime(4pm-7pm) 
5. Evening (6pm-9pm)   
6. Anytime (9am-9pm)
7. Late evening/night (7pm-9pm)
8. Daytime (9am-4pm)
9. After 5pm	Goto V_BSTTI2	
BACK	V_BSTTI2	V_BSTTI2	     Enter specific best time to contact	IF 5 selected in V_ChgWhat then goto V_NOSUN

ELSE goto DONE	
BACK	V_NOSUN	V_NOSUN	 Would a Sunday interview be acceptable?

1. Yes
2. No
3. battery problem	Goto DONE	
BACK		DONE		Goto SET_REINT	
BACK		SET_REINT		Exit Instrument	
BACK		TYPEREC1			
BACK		TYPEREC2	** OUT VARIABLE  **		
BACK		TYPEREC3	** OUT VARIABLE  **		
BACK		TYPEREC4	** OUT VARIABLE  **		
BACK		TYPEREC5	** OUT VARIABLE  **		
BACK		TYPEREC6	** OUT VARIABLE  **		
BACK		TYPEREC7	** OUT VARIABLE  **		
BACK		TYPEREC8	** OUT VARIABLE  **		
BACK		TYPEREC9	** OUT VARIABLE  **		
BACK		TELSCT01	** OUT VARIABLE **		
BACK		TELSCT02	** OUT VARIABLE **		
BACK		TELSCT03	** OUT VARIABLE **		
BACK		TELSCT04	** OUT VARIABLE **		
BACK		TELSCT05	** OUT VARIABLE **		
BACK		TELSCT06	** OUT VARIABLE **		
BACK		TELSCT07	** OUT VARIABLE **		
BACK		TELSCT08	** OUT VARIABLE **		
BACK		TELSCT09	** OUT VARIABLE **		
BACK		TELSCT10	** OUT VARIABLE **		
		INTMOST			
		INTMETH			
		RECSECT			
		BOOK			
		Language_CP			
		CARI_LanguageFlag			
BACK		FINCONDT	** OUT VARIABLE **		
BACK		FINFRCDE	** OUT VARIABLE **		
CHI	CTATEMPT	CTATEMPT	  CONTACT HISTORY INSTRUMENT

  Describe this contact attempt.

1. Personal visit
2. Telephone (outgoing)
3. Telephone (incoming)
4. Not attempting contact	1-3:   Goto TIMEOFCT

4:   Goto NOATTEMPT	
	TIMEOFCT	TIMEOFCT	  TIME OF CONTACT

  Are you entering the Contact History Instrument at the time of a contact attempt?

1. Yes
2. No	1:   Goto CASECONTACT

2:    Goto FR_DATE	
CHI	FR_DATE	FR_DATE	  DATE OF CONTACT
  Enter the date of the contact attempt in MM/DD/YYYY format	Goto FRTIME	
CHI	FRTIME	FRTIME	  TIME OF CONTACT
  Enter the time of the contact attempt in HH:MM am/pm format	Goto CASECONTACT	
	NOATTEMPT	NOATTEMPT	  NOT ATTEMPTING CONTACT

  What were you doing?
  Enter all that apply, separate with commas.

1. Reviewing or changing case information
2. Readying case for transmission
3. Locating activities (canvassing, management or government office, FastData, LiMA, etc.)
4. Verification of Type B/C
5. Opened case/ CHI by mistake
99. Other - specify	1-6:  Exit CHI
99:  Goto SPECNOATTEMPT	
	SPECNOATTEMPT	SPECNOATTEMPT	  OTHER NOT ATTEMPTING CONTACT

   Specify other activites you were doing	Exit CHI	
CHI	CASECONTACT	CASECONTACT	  CONTACT OR NONCONTACT

  Select the category that best describes this attempt.

1. Contact with sample unit member
2. Contact with NON-SAMPLE unit member
3. Noncontact	1:     Goto CTTYPE

2,3:   IF CTATEMPT = 1 then goto NCTPER
       ELSE goto NCTTEL	
CHI	CTTYPE	CTTYPE	 CONTACT

 Select the category that best describes this contact attempt.

1. Completed Case (Interview, Sufficient Partial, Type A/B/C/D, Vacant Interview, Temp Occupied Interview) - Ready to Transmit
2. Partial interview - follow-up required
3. Unable to conduct interview	1:   Goto RSPNDENT

2,3:   Goto NONINTER	
	NONINTER	NONINTER	  PARTIAL INTERVIEW OR UNABLE TO CONDUCT INTERVIEW

  Select the categories that describe why you were not able to conduct or complete the interview during this
     contact attempt.
  Enter all that apply, separate with commas.

1. Eligible person not available
2. Inconvenient time
3. Respondent is reluctant
4. Language problem - specify
5. Health problem
6. Successful paper questionnaire placement / pick-up
99. Other - specify	1-3,5,6:    Goto RSPNDENT

4:   Goto cLANGUAGE

99:   Goto CTOTHER	
	CTOTHER	CTOTHER	  OTHER Contact Category
  Specify the reason for not completing the interview during this contact attempt.
	Goto RSPNDENT	
CHI	cLANGUAGE	cLANGUAGE	  LANGUAGE

  Select the categories that descrige this language situation.
  Enter all that apply, separate with commas.

1. Specify language or dialect
2. No household member able to translate
3. Contact RO/FS about language problem
4. Unable to find translator
5. No time left to find translator	IF 1 selected then goto LANGLIST

ELSE goto RSPNDENT	
CHI	LANGLIST	LANGLIST	  LANGUAGE LIST 

  Specify language or dialect

11. Spanish
12. Arabic
13. Chinese
14. French
15. German
16. Greek
17. Italian
18. Japanese
19. Korean
20. Polish
21. Portuguese
22. Russian
23. Tagalog
24. Urdu
25. Vietnamese
97. Other problem - hard of hearing
98. Unknown language
99. Other	11-25, 97, 98:  Goto RSPNDENT

99:  Goto SPECLANG	
	SPECLANG	SPECLANG	   SPECIFY LANGUAGE OR DIALECT.	Goto RSPNDENT	
CHI	RSPNDENT	RSPNDENT	  CONCERN / BEHAVIOR / RELUCTANCE

  Select the categories that describe respondent concerns, behaviors, or reluctance during this contact
     attempt.
  Enter all that apply, separate with commas.

1. Not interested
2. Too busy
3. Interview takes too much time
4. Scheduling difficulties
5. Survey is voluntary
6. Privacy concerns
7. Local / State / Federal government concerns
8. Asks questions about the survey
9. Hang-up / slams door on Fr
10. Hostile or threatens FR
11. Family issues (death, illness, block participation in survey)
12. Gave that information last time
13. Asked too many personal questions last time
14. Too many interviews
15. Intends to quit survey
98. No concerns
99. Other - specify	IF 99 selected then goto RSPNDOTH
ELSE goto STRATEGS	
	RSPNDOTH	RSPNDOTH	  OTHER CONCERNS/BEHAVIORS/RELUCTANCE

  Specify other concerns/behaviors/reluctance during this contact attempt.	Goto STRATEGS	
	NCTTEL	NCTTEL	  CONTACT-NONCONTACT / TELEPHONE

  Select the categories that describe this telephone contact/noncontact.
  Enter all that apply, separate with commas.

1. Got answering machine/voicemail 
2. Ring, no answer
3. Busy Signal
4. Disconnected
5. Wrong number
6. Spoke with ineligible person
7. Respondent left message (voicemail, text message, etc.)
99. Other - specify	IF 99 selected then goto NCTTELOT

ELSE goto STRATEGS	
	NCTTELOT	NCTTELOT	  OTHER Noncontact Telephone Attempt Category

  Specify the details about this telephone noncontact.	Goto STRATEGS	
	NCTPER	NCTPER	  CONTACT-NONCONTACT / PERSONAL VISIT

  Select the categories that describe this personal visit contact/noncontact.
  Enter all that apply, separate with commas.

1. No one home / No eligible person home
2. No one home - pervious note / letter taken
3. Household does not answer door - - evidence someone is home
4. Observe HH from vehicle
5. Unable to reach / locked gate / buzzer entry
6. Address does not exist / unable to locate
7. On vacation, away from home / at second home
8. Spoke with neighbor
9. Building management / doorman contact
10. Completed case (Type B/C, Vacant interview, or Temporarily Occupied Interview)
99. Other - specify	IF 99 selected then goto NCTPEROT

ELSE goto STRATEGS	
	NCTPEROT	NCTPEROT	  OTHER Noncontact Personal Visit Category

  Specify the details about this personal visit noncontact.	Goto STRATEGS	
	STRATEGS	STRATEGS	  STRATEGIES USED ON THIS CONTACT ATTEMPTED

  Select the categories that describe the strategies used on this contact attempt.
  Enter all that apply, separate with commas.

1. Advance letter given
2. Scheduled appointment
3. Left note / appointment card
4. Left promotional packet / informational brochure
5. Called household
6. Left message on answering machine/voicemail
7. Waited for respondent
8. Checked with neighbors
9. Contacted other family members
10. Contacted property manager doorman
11. Offered incentive
98. No Strategies
99. Other - specify	IF 99 selected then goto STRATOTH
ELSE exit CHI	
	STRATOTH	STRATOTH	  OTHER STRATEGY

  Specify the strategy used on this contact attempt.	Exit CHI	
CHI		CTRLNUM	** CREATED in Post-Processing **		
CHI		CASEID	
		
CHI		INTPERIOD	** OUT VARIABLE **		
CHI		INTNMBR			
CHI		CALLDATE	** OUT VARIABLE **		
CHI		CALLMNTH	** OUT VARIABLE **		
CHI		CALLDAY	** OUT VARIABLE **		
CHI		CALLYEAR	** OUT VARIABLE **		
CHI		CALLTIME	** OUT VARIABLE **		
CHI		FRMNTH	** OUT VARIABLE **		
CHI		FRDAY	** OUT VARIABLE **		
CHI		FRYEAR	** OUT VARIABLE **		
CHI		NOATTEMPT_1	** CREATED in Post-Processing **		
CHI		NOATTEMPT_2	** CREATED in Post-Processing **		
CHI		NOATTEMPT_3	** CREATED in Post-Processing **		
CHI		NOATTEMPT_4	** CREATED in Post-Processing **		
CHI		NOATTEMPT_5	** CREATED in Post-Processing **		
CHI		NOATTEMPT_6	** CREATED in Post-Processing **		
CHI		NOATTEMPT_99	** CREATED in Post-Processing **		
CHI		NONINTER_1	** CREATED in Post-Processing **		
CHI		NONINTER_2	** CREATED in Post-Processing **		
CHI		NONINTER_3	** CREATED in Post-Processing **		
CHI		NONINTER_4	** CREATED in Post-Processing **		
CHI		NONINTER_5	** CREATED in Post-Processing **		
CHI		NONINTER_6	** CREATED in Post-Processing **		
CHI		NONINTER_99	** CREATED in Post-Processing **		
CHI		cLANGUAGE_1	** CREATED in Post-Processing **		
CHI		cLANGUAGE_2	** CREATED in Post-Processing **		
CHI		cLANGUAGE_3	** CREATED in Post-Processing **		
CHI		cLANGUAGE_4	** CREATED in Post-Processing **		
CHI		cLANGUAGE_5	** CREATED in Post-Processing **		
CHI		RSPNDENT_1	** CREATED in Post-Processing **		
CHI		RSPNDENT_2	** CREATED in Post-Processing **		
CHI		RSPNDENT_3	** CREATED in Post-Processing **		
CHI		RSPNDENT_4	** CREATED in Post-Processing **		
CHI		RSPNDENT_5	** CREATED in Post-Processing **		
CHI		RSPNDENT_6	** CREATED in Post-Processing **		
CHI		RSPNDENT_7	** CREATED in Post-Processing **		
CHI		RSPNDENT_8	** CREATED in Post-Processing **		
CHI		RSPNDENT_9	** CREATED in Post-Processing **		
CHI		RSPNDENT_10	** CREATED in Post-Processing **		
CHI		RSPNDENT_11	** CREATED in Post-Processing **		
CHI		RSPNDENT_12	** CREATED in Post-Processing **		
CHI		RSPNDENT_13	** CREATED in Post-Processing **		
CHI		RSPNDENT_14	** CREATED in Post-Processing **		
CHI		RSPNDENT_15	** CREATED in Post-Processing **		
CHI		RSPNDENT_98	** CREATED in Post-Processing **		
CHI		RSPNDENT_99	** CREATED in Post-Processing **		
CHI		NCTTEL_1	** CREATED in Post-Processing **		
CHI		NCTTEL_2	** CREATED in Post-Processing **		
CHI		NCTTEL_3	** CREATED in Post-Processing **		
CHI		NCTTEL_4	** CREATED in Post-Processing **		
CHI		NCTTEL_5	** CREATED in Post-Processing **		
CHI		NCTTEL_6	** CREATED in Post-Processing **		
CHI		NCTTEL_7	** CREATED in Post-Processing **		
CHI		NCTTEL_99	** CREATED in Post-Processing **		
CHI		NCTPER_1	** CREATED in Post-Processing **		
CHI		NCTPER_2	** CREATED in Post-Processing **		
CHI		NCTPER_3	** CREATED in Post-Processing **		
CHI		NCTPER_4	** CREATED in Post-Processing **		
CHI		NCTPER_5	** CREATED in Post-Processing **		
CHI		NCTPER_6	** CREATED in Post-Processing **		
CHI		NCTPER_7	** CREATED in Post-Processing **		
CHI		NCTPER_8	** CREATED in Post-Processing **		
CHI		NCTPER_9	** CREATED in Post-Processing **		
CHI		NCTPER_10	** CREATED in Post-Processing **		
CHI		NCTPER_99	** CREATED in Post-Processing **		
CHI		STRATEGS_1	** CREATED in Post-Processing **		
CHI		STRATEGS_2	** CREATED in Post-Processing **		
CHI		STRATEGS_3	** CREATED in Post-Processing **		
CHI		STRATEGS_4	** CREATED in Post-Processing **		
CHI		STRATEGS_5	** CREATED in Post-Processing **		
CHI		STRATEGS_6	** CREATED in Post-Processing **		
CHI		STRATEGS_7	** CREATED in Post-Processing **		
CHI		STRATEGS_8	** CREATED in Post-Processing **		
CHI		STRATEGS_9	** CREATED in Post-Processing **		
CHI		STRATEGS_10	** CREATED in Post-Processing **		
CHI		STRATEGS_11	** CREATED in Post-Processing **		
CHI		STRATEGS_12	** CREATED in Post-Processing **		
CHI		STRATEGS_98	** CREATED in Post-Processing **		
CHI		STRATEGS_99	** CREATED in Post-Processing **		
CHI		ACTCODE			
CHI		FINALOUTCOME			
CHI		LAUNCH			
CHI		OUTCOME			
CHI		TIMER			
CHI		VISITDATE			
		JBID			
03A		PROP_NOA			
03A		OWNYA			
03A		STILOWN			
03A		BSNSEXPA			
03A		OBSNSZBA			
03A		REC_STAT			
03A		REC_ORIG			
03A		PROP_NOJ			
03A		LOANTYPJ			
03A1		MCHANGE			
03A		MORTCHNG			
03A		ORWHAT			
03A		MRTTERMJ			
03A		FIXEDRTJ			
03A		PAYTOTHJ			
03A		ORGMRTJX			
03A		NEWMRRTJ			
03A		PYJOTH			
03A		MRTPMTJX			
03A		PRININJX			
03A		MORTCHMO			
03A		PYMTJX1			
03A		PRNINJX1			
03A		PYMTJX2			
03A		PRNINJX2			
03A		PYMTJX3			
03A		PRNINJX3			
03A		PYPRINIJ			
03A		PYINTSTJ			
03A		PYPROTXJ			
03A		PYPROINJ			
03A		PYMORINJ			
03A		PYOTHERJ			
03A		LOAN_NOJ			
03A		ORGM_TJX			
03A		MRTP_TJX			
03A		PRIN_NJX			
03A		NEWM_RTJ			
03A		PYMTJX1_			
03A		PYMTJX2_			
03A		PYMTJX3_			
03A		PRNI_JX1			
03A		PRNI_JX2			
03A		PRNI_JX3			
03A		VARRTJ			
03A		INTONLJ			
03A		OTHRTJ	** OUT VARIABLE **		
03A		OWNYJ			
3A1		REC_STAT			
3A1		REC_ORIG			
03A		PDLOAN2			
03A		PD2AMTX1			
03A		PD2AMTX2			
03A		PD2AMTX3			
03A		TOTOWED2			
03A		PROP_NO2			
03A		LOAN_NO2			
03A		PD2A_TX1			
03A		PD2A_TX2			
03A		PD2A_TX3			
03A		TOTO_ED2			
03A		OWNY2			
3A1		REC_STAT			
3A1		REC_ORIG			
10A		LVINUM			
10A		LVICODE			
10A		LVIHAVE			
10A		LVIENDMO			
10A		TERMFEE			
10A		TERMFEEX			
10A		TERM_EEX			
10A		REC_STAT			
10A		REC_ORIG			
11		OVANUM			
11		OVACODE			
11		OVAHAVE			
11		REC_STAT			
11		REC_ORIG			
15A		POLICYIA			
15A		POLICYYA			
15A		PLCYSTIL			
15A		INSEX3A			
15A		INSLSTTM			
15A		INSRPMPA			
15A		INSREGXA			
15A		INSEX3AX			
15A		INSE_3AX			
15A		REC_STAT			
15A		REC_ORIG			
		BACK			
		BACK_ORG			
		CONTROL			
		CTRL_ORG			
		COVERAGE			
		CVRG_ORG			
		FRONT			
		FRNT_ORG			
		SECT_01			
		S01_ORG			
		SECT_02			
		S02_ORG			
		SECT_03			
		S03_ORG			
		SECT_04			
		S04_ORG			
		SECT_05			
		S05_ORG			
		SECT_06			
		S06_ORG			
		SECT_07			
		S07_ORG			
		SECT_08			
		S08_ORG			
		SECT_09			
		S09_ORG			
		SECT_10			
		S10_ORG			
		SECT_11			
		S11_ORG			
		SECT_12			
		S12_ORG			
		SECT_13			
		S13_ORG			
		SECT_14			
		S14_ORG			
		SECT_15			
		S15_ORG			
		SECT_16			
		S16_ORG			
		SECT_17			
		S17_ORG			
		SECT_18			
		S18_ORG			
		SECT_19			
		S19_ORG			
		SECT_20			
		S20_ORG			
		SECT_20C			
		S20C_ORG			
		SECT_21			
		S21_ORG			
		SECT_22			
		S22_ORG			
		TOT_TIME			
		TOT_ORG			
		OUTCOME			
		BLSNAME			
		CAPIRECT			
		FLDNOTE			
		FULLNAME			
		INSTNME			
		INSTNOTE			
		OUTCOME			
		BLSOUT			
		CAPIIN			
		MCDOUT			
		RAWDATA			
		RAWDATA1			
		RAWDATA2			
		memname			
FRONT		NEW_CTRL	** Created in Post-processing **		
FRONT		CTRLNO	** Created in Post Processing **		
BACK		NUMHOUSE			
BACK		NROSIZE			
MCD		HNO			
MCD		HNOSUF			
MCD		STRNAME			
MCD		UNITDES			
MCD		GQUNITINFO			
MCD		NONCITYADD			
MCD		PHYSDES			
MCD		PO			
MCD		ST			
MCD		ZIP5			
MCD		ZIP4			
MCD		BLDGNAME			
MCD		MHNO			
MCD		MHNOSUF			
MCD		MSTRNAME			
MCD		MUNITDES			
MCD		MGQUNITINFO			
MCD		MNONCITYADD			
MCD		MPO			
MCD		MST			
MCD		MZIP5			
MCD		MZIP4			
FRONT		PHONENUM			
		EXTN			
		PHONETYP			
FRONT		PHONENUM2			
		EXTN2			
		PHONETYP2			
		EMAILADDRESS			
FRONT		MARK			
FRONT		MARKTWO			
FRONT		REASSG			
FRONT		CONREF			
FRONT		INSTVER			
FRONT		OUTCOME			
FRONT		FIRCODT			
FRONT		FIRFRCDE			
FRONT		SITE			
FRONT		INTNMBR			
FRONT		INTPER			
FRONT		POUT1			
FRONT		POUT2			
FRONT		POUT3			
FRONT		POUT4			
FRONT		PSU			
FRONT		SAMP_DES	** OUT VARIABLE **		
FRONT		HH_NUM			
FRONT		GQTYPE			
FRONT		USERID			
COVERAGE		TOTAL_CU			
COVERAGE		SECTCOMP			
BACK		SECTNO			
		RESPLINE			
		RESPNAME			
		BESTTIME			
		BESTTIM2			
		NOSUNDAY			
		CP1PHON			
		CP1EXT			
		CP1TYPE			
		CP1ZP5			
		CP1ZP4			
FRONT		SSFTEAMCODE			
FRONT		FSTEAMCODE			
Front		POPGRP			
		MIXED_CONSENT_ctf	

1. Yes
2. No