/* LAYOUT PARA LEITURA DOS DADOS DE DOMICILIO DA PNAD 99 */
DATA DOMICS;
     INFILE 'nome do arquivo a ser lido' LRECL=154 MISSOVER;
     INPUT
     @1          V0101   $CHAR2.   /* ANO DA PESQUISA                */
     @3          UF      $CHAR2.   /* CODIGO DA UNIDADE DA FEDERACAO */
     @5          v0102   $CHAR6.   /* NUMERO DE CONTROLE             */
     @11         V0103   $CHAR3.   /* NUMERO DE SERIE                */
     @14         V0104   $CHAR2.   /* TIPO DE ENTREVISTA             */
     @16         V0105        2.   /* TOTAL DE MORADORES             */
     @18         V0106        2.   /* TOTAL MORADORES 10 ANOS OU +   */
     @20         V0201   $CHAR1.   /* ESPECIE DE DOMICILIO           */
     @21         V0202   $CHAR1.   /* TIPO DE DOMICILIO              */
     @22         V0203   $CHAR1.   /* MATERIAL PAREDES EXTERNAS      */
     @23         V0204   $CHAR1.   /* MATERIAL DO TELHADO            */
     @24         V0205        2.   /* NUMERO DE COMODOS              */
     @26         V0206        2.   /* NUMERO COMODOS (DORMITORIOS)   */
     @28         V0207   $CHAR1.   /* DOMICILIO E                    */
     @29         V0208        12.  /* ALUGUEL PAGO EM 09/99          */
     @41         V2081   $CHAR1.   /* CODIGO VALOR DO ALUGUEL        */
     @42         V0209        12.  /* PRESTACAO PAGA EM 09/99      */
     @54         V2091   $CHAR1.   /* CODIGO VALOR DA PRESTACAO      */
     @55         V0210   $CHAR1.   /* TERRENO E PROPRIO ?            */
     @56         V0211   $CHAR1.   /* AGUA CANALIZ.EM ALGUM CÔMODO?  */
     @57         V0212   $CHAR1.   /* AGUA E PROVENIENTE DE:         */
     @58         V0213   $CHAR1.   /* AGUA CANALIZ. DE REDE GERAL  ? */
     @59         V0214   $CHAR1.   /* AGUA DE POCO OU NASCENTE ?     */
     @60         V0215   $CHAR1.   /* EXISTE BANHEIRO  OU  SANITARIO */
     @61         V0216   $CHAR1.   /* BANHEIRO/SANITARIO E DE USO:   */
     @62         V0217   $CHAR1.   /* ESCOADOURO  BANHEIRO/SANITARIO */
     @63         V0218   $CHAR1.   /* O LIXO DESTE DOMICILIO E:      */
     @64         V0219   $CHAR1.   /* QUAL A FORMA DE ILUMINACAO ?   */
     @65         V0220   $CHAR1.   /* TEM TELEFONE ?                 */
     @66         V0221   $CHAR1.   /* TEM FOGAO DE 2 OU + BOCAS ?    */
     @67         V0222   $CHAR1.   /* TEM FOGAO DE UMA BOCA ?        */
     @68         V0223   $CHAR1.   /* FOGAO USA PREDOMINANTEMENTE:   */
     @69         V0224   $CHAR1.   /* TEM FILTRO DAGUA ?             */
     @70         V0225   $CHAR1.   /* TEM RADIO ?                    */
     @71         V0226   $CHAR1.   /* TEM TELEVISAO EM CORES ?       */
     @72         V0227   $CHAR1.   /* TEM TV EM PRETO E BRANCO ?     */
     @73         V0228   $CHAR1.   /* TEM GELADEIRA ?                */
     @74         V0229   $CHAR1.   /* TEM FREEZER ?                  */
     @75         V0230   $CHAR1.   /* TEM MAQUINA DE LAVAR ROUPA ?   */
     @76         V4105   $CHAR1.   /* COD SITUACAO CENSITARIA        */
     @77         V4106   $CHAR1.   /* COD TIPO DE SETOR              */
     @78         V4107   $CHAR1.   /* COD TIPO DE AREA               */
     @79         V4600   $CHAR2.   /* DIA DE REFERENCIA              */
     @81         V4601   $CHAR2.   /* MES DE REFERENCIA              */
     @83         V4602   $CHAR2.   /* ESTRATO                        */
     @85	 UPA	      3.   /* DELIMITAÇÃO DO MUNICÍPIO       */
     @88         V4604        2.   /* N. MUNICIPIOS SELEC. NO ESTRATO*/
     @90         V4605    12.10    /* PROBABILIDADE DO MUNICIPIO     */
     @102        V4606        3.   /* N. SETORES SELEC NO MUNICIPIO  */
     @105        V4607    12.10    /* PROBABILIDADE DO SETOR         */
     @117        V4608      9.2    /* INTERVALO SELECAO DO DOMICILIO */
     @126        V4609        9.   /* PROJECAO DE POPULACAO DEPOP    */
     @135        V4610        3.   /* INVERSO DA FRACAO              */
     @138        V4611        5.   /* PESO(TOTAL PESSOAS AMOSTRA)    */
     @143        V4614       12.   /* Rendimento mensal domiciliar   */
     
;
   
  RUN;
  /* Entre com seu programa abaixo */