*pbp_b9_vbid.sas;

libname out '.\sas_data_sets\PBP';
options pageno=1 linesize = 200 nocenter;

data pbp_b9_vbid;

length
	pbp_a_hnumber                    $5
	pbp_a_plan_identifier            $3
	pbp_a_ben_cov                    $1
	pbp_a_plan_type                  $2
	orgtype                          $2
	bid_id                           $13
	pbp_vbid_group_id                $2
	pbp_b9a_maxenr_yn                $1
	pbp_b9a_maxenr_per               $1
	pbp_b9a_coins_yn                 $1
	pbp_b9a_ded_yn                   $1
	pbp_b9a_copay_yn                 $1
	pbp_b9a_auth_yn                  $1
	pbp_b9a_refer_yn                 $1
	pbp_b9b_maxenr_yn                $1
	pbp_b9b_maxenr_type              $1
	pbp_b9b_maxenr_per               $1
	pbp_b9b_coins_yn                 $1
	pbp_b9b_ded_yn                   $1
	pbp_b9b_copay_yn                 $1
	pbp_b9b_auth_yn                  $1
	pbp_b9b_refer_yn                 $1
	pbp_b9c_maxenr_yn                $1
	pbp_b9c_maxenr_type              $1
	pbp_b9c_maxenr_per               $1
	pbp_b9c_coins_yn                 $1
	pbp_b9c_coins_ehc                $2
	pbp_b9c_ded_yn                   $1
	pbp_b9c_copay_yn                 $1
	pbp_b9c_copay_ehc                $2
	pbp_b9c_auth_yn                  $1
	pbp_b9c_refer_yn                 $1
	pbp_b9d_bendesc_yn               $1
	pbp_b9d_bendec                   $1
	pbp_b9d_bendesc_amo              $1
	pbp_b9d_maxenr_yn                $1
	pbp_b9d_maxenr_per               $1
	pbp_b9d_coins_yn                 $1
	pbp_b9d_ded_yn                   $1
	pbp_b9d_copay_yn                 $1
	pbp_b9d_auth_yn                  $1
	pbp_b9d_refer_yn                 $1
;

infile '.\pbp\pbp_b9_outpat_hosp_vbid.txt' delimiter = '09'x
dsd lrecl = 30000 firstobs=2 missover;


input
	pbp_a_hnumber
	pbp_a_plan_identifier
	segment_id
	pbp_a_ben_cov
	pbp_a_plan_type
	orgtype
	bid_id
	version
	pbp_vbid_group_id
	pbp_b9a_maxenr_yn
	pbp_b9a_maxenr_amt
	pbp_b9a_maxenr_per
	pbp_b9a_coins_yn
	pbp_b9a_coins_pct_mc
	pbp_b9a_coins_pct_mcmax
	pbp_b9a_ded_yn
	pbp_b9a_ded_amt
	pbp_b9a_copay_yn
	pbp_b9a_copay_mc_amt
	pbp_b9a_copay_mc_amt_max
	pbp_b9a_auth_yn
	pbp_b9a_refer_yn
	pbp_b9b_maxenr_yn
	pbp_b9b_maxenr_type
	pbp_b9b_maxenr_amt
	pbp_b9b_maxenr_per
	pbp_b9b_coins_yn
	pbp_b9b_coins_pct_mc
	pbp_b9b_coins_pct_mcmax
	pbp_b9b_ded_yn
	pbp_b9b_ded_amt
	pbp_b9b_copay_yn
	pbp_b9b_copay_mc_amt
	pbp_b9b_copay_mc_amt_max
	pbp_b9b_auth_yn
	pbp_b9b_refer_yn
	pbp_b9c_maxenr_yn
	pbp_b9c_maxenr_type
	pbp_b9c_maxenr_amt
	pbp_b9c_maxenr_per
	pbp_b9c_coins_yn
	pbp_b9c_coins_ehc
	pbp_b9c_coins_mcis_minpct
	pbp_b9c_coins_mcis_maxpct
	pbp_b9c_coins_mcgs_minpct
	pbp_b9c_coins_mcgs_maxpct
	pbp_b9c_ded_yn
	pbp_b9c_ded_amt
	pbp_b9c_copay_yn
	pbp_b9c_copay_ehc
	pbp_b9c_copay_mcis_minamt
	pbp_b9c_copay_mcis_maxamt
	pbp_b9c_copay_mcgs_minamt
	pbp_b9c_copay_mcgs_maxamt
	pbp_b9c_auth_yn
	pbp_b9c_refer_yn
	pbp_b9d_bendesc_yn
	pbp_b9d_bendec
	pbp_b9d_bendesc_amo
	pbp_b9d_maxenr_yn
	pbp_b9d_maxenr_amt
	pbp_b9d_maxenr_per
	pbp_b9d_coins_yn
	pbp_b9d_coins_pct_mc_min
	pbp_b9d_coins_pct_mc_max
	pbp_b9d_ded_yn
	pbp_b9d_ded_amt
	pbp_b9d_copay_yn
	pbp_b9d_copay_mc_amt_min
	pbp_b9d_copay_mc_amt_max
	pbp_b9d_auth_yn
	pbp_b9d_refer_yn
;


label
	pbp_a_hnumber                    = 'H Number'
	pbp_a_plan_identifier            = 'Plan ID'
	segment_id                       = 'Segment ID'
	pbp_a_ben_cov                    = 'Coverage Criteria'
	pbp_a_plan_type                  = 'Plan Type'
	orgtype                          = 'Organization Type'
	bid_id                           = 'Bid ID'
	version                          = 'Version Number'
	pbp_vbid_group_id                = 'B19 VBID Group (Package) ID'
	pbp_b9a_maxenr_yn                = 'Outpnt Hosp Max Enr YN'
	pbp_b9a_maxenr_amt               = 'Outpnt Hosp Max Enr Amt'
	pbp_b9a_maxenr_per               = 'Outpnt Hosp Max Enr Per'
	pbp_b9a_coins_yn                 = 'Outpnt Hosp Coinsurance YN'
	pbp_b9a_coins_pct_mc             = 'Outpnt Hosp MC Min Coins Pct'
	pbp_b9a_coins_pct_mcmax          = 'Outpnt Hosp MC Max Coins Pct'
	pbp_b9a_ded_yn                   = 'Outpnt Hosp Deductible YN'
	pbp_b9a_ded_amt                  = 'Outpnt Hosp Deductible Amt'
	pbp_b9a_copay_yn                 = 'Outpnt Hosp Copayment YN'
	pbp_b9a_copay_mc_amt             = 'Outpnt Hosp MC Min Copay Amt'
	pbp_b9a_copay_mc_amt_max         = 'Outpnt Hosp MC Max Copay Amt'
	pbp_b9a_auth_yn                  = 'Outpnt Hosp Enrollee Auth'
	pbp_b9a_refer_yn                 = 'Outpnt Hosp Referral YN'
	pbp_b9b_maxenr_yn                = 'ASC Services Max Enr YN'
	pbp_b9b_maxenr_type              = 'ASC Services Max Enr Type'
	pbp_b9b_maxenr_amt               = 'ASC Services Max Enr Amt'
	pbp_b9b_maxenr_per               = 'ASC Services Max Enr Per'
	pbp_b9b_coins_yn                 = 'ASC Services Coinsurance YN'
	pbp_b9b_coins_pct_mc             = 'ASC Services MC Min Coins Pct'
	pbp_b9b_coins_pct_mcmax          = 'ASC Services MC Max Coins Pct'
	pbp_b9b_ded_yn                   = 'ASC Services Deductible YN'
	pbp_b9b_ded_amt                  = 'ASC Services Deductible Amt'
	pbp_b9b_copay_yn                 = 'ASC Services Copayment YN'
	pbp_b9b_copay_mc_amt             = 'ASC Services MC Min Copay Amt'
	pbp_b9b_copay_mc_amt_max         = 'ASC Services MC Max Copay Amt'
	pbp_b9b_auth_yn                  = 'ASC Services Enrollee Auth'
	pbp_b9b_refer_yn                 = 'ASC Services Referral YN'
	pbp_b9c_maxenr_yn                = 'Outpnt SA Svcs Max Enr YN'
	pbp_b9c_maxenr_type              = 'Outpnt SA Svcs Max Enr Type'
	pbp_b9c_maxenr_amt               = 'Outpnt SA Svcs Max Enr Amt'
	pbp_b9c_maxenr_per               = 'Outpnt SA Svcs Max Enr Per'
	pbp_b9c_coins_yn                 = 'Outpnt SA Svcs Coinsurance YN'
	pbp_b9c_coins_ehc                = 'Outpat Substance Abuse Coins'
	pbp_b9c_coins_mcis_minpct        = 'Min Coins MC Individual'
	pbp_b9c_coins_mcis_maxpct        = 'Max Coins for MC Individual'
	pbp_b9c_coins_mcgs_minpct        = 'Min Coins for MC Group Session'
	pbp_b9c_coins_mcgs_maxpct        = 'Max Coins MC Group Session'
	pbp_b9c_ded_yn                   = 'OSA Svcs Deductible YN'
	pbp_b9c_ded_amt                  = 'OSA Svcs Deductible Amt'
	pbp_b9c_copay_yn                 = 'OSA Svcs Copayment YN'
	pbp_b9c_copay_ehc                = 'Outpat Substance Abuse Copay'
	pbp_b9c_copay_mcis_minamt        = 'Min Copay MC Individual'
	pbp_b9c_copay_mcis_maxamt        = 'Max Copay for MC Individual'
	pbp_b9c_copay_mcgs_minamt        = 'Min Copay MC Group Session'
	pbp_b9c_copay_mcgs_maxamt        = 'Max Copay MC Group Session'
	pbp_b9c_auth_yn                  = 'OSA Svcs Enrollee Auth'
	pbp_b9c_refer_yn                 = 'OSA Svcs Referral YN'
	pbp_b9d_bendesc_yn               = 'Outpnt Blood Ben Desc YN'
	pbp_b9d_bendec                   = 'Outpnt Blood Ben Desc Enhance'
	pbp_b9d_bendesc_amo              = 'Outpnt Blood Ben Desc MO'
	pbp_b9d_maxenr_yn                = 'Outpnt Blood Max Enr YN'
	pbp_b9d_maxenr_amt               = 'Outpnt Blood Max Enr Amt'
	pbp_b9d_maxenr_per               = 'Outpnt Blood Max Enr Per'
	pbp_b9d_coins_yn                 = 'Outpnt Blood Coinsurance YN'
	pbp_b9d_coins_pct_mc_min         = 'Outpnt Blood MC Coins Min Pct'
	pbp_b9d_coins_pct_mc_max         = 'Outpnt Blood MC Coins Max Pct'
	pbp_b9d_ded_yn                   = 'Outpnt Blood Deductible YN'
	pbp_b9d_ded_amt                  = 'Outpnt Blood Deductible Amt'
	pbp_b9d_copay_yn                 = 'Outpnt Blood Copayment YN'
	pbp_b9d_copay_mc_amt_min         = 'Outpnt Blood MC Copay Min Amt'
	pbp_b9d_copay_mc_amt_max         = 'Outpnt Blood MC Copay Max Amt'
	pbp_b9d_auth_yn                  = 'Outpnt Blood Enrollee Auth'
	pbp_b9d_refer_yn                 = 'Outpnt Blood Referral YN'
;

run;

proc sort data = pbp_b9_vbid out=out.pbp_b9_vbid;
  by Pbp_a_hnumber pbp_a_plan_identifier segment_id;
run;

proc print data = out.pbp_b9_vbid(obs = 10);
  title 'pbp_b9_outpat_hosp_vbid file ';
run;

proc means data = out.pbp_b9_vbid;
  title 'pbp_b9_outpat_hosp_vbid file ';
run;

proc freq data = out.pbp_b9_vbid;
table
	pbp_a_ben_cov
	pbp_a_plan_type
	orgtype
	pbp_vbid_group_id
	pbp_b9a_maxenr_yn
	pbp_b9a_maxenr_per
	pbp_b9a_coins_yn
	pbp_b9a_ded_yn
	pbp_b9a_copay_yn
	pbp_b9a_auth_yn
	pbp_b9a_refer_yn
	pbp_b9b_maxenr_yn
	pbp_b9b_maxenr_type
	pbp_b9b_maxenr_per
	pbp_b9b_coins_yn
	pbp_b9b_ded_yn
	pbp_b9b_copay_yn
	pbp_b9b_auth_yn
	pbp_b9b_refer_yn
	pbp_b9c_maxenr_yn
	pbp_b9c_maxenr_type
	pbp_b9c_maxenr_per
	pbp_b9c_coins_yn
	pbp_b9c_coins_ehc
	pbp_b9c_ded_yn
	pbp_b9c_copay_yn
	pbp_b9c_copay_ehc
	pbp_b9c_auth_yn
	pbp_b9c_refer_yn
	pbp_b9d_bendesc_yn
	pbp_b9d_bendec
	pbp_b9d_bendesc_amo
	pbp_b9d_maxenr_yn
	pbp_b9d_maxenr_per
	pbp_b9d_coins_yn
	pbp_b9d_ded_yn
	pbp_b9d_copay_yn
	pbp_b9d_auth_yn
	pbp_b9d_refer_yn
/ missing;
run;

proc contents data = out.pbp_b9_vbid;
  title 'pbp_b9_vbid data';
run;
