I'm trying to create a Master from a COBOL copybook, and I need to redefine a segment to match what COBOL is doing. Below is what I put together from reading Focus documentation, but it doesn't work. Can someone point out where I'm going wrong?

Thanks

GROUP=SR_BUREAU_INFO ,154-181 ,USAGE=A28 ,ACT=A28 ,$
FIELD=SR_BUREAU ,154-154 ,USAGE=A01 ,ACT=A01 ,$
FIELD=SR_CEDED_CO ,155-157 ,USAGE=A03 ,ACT=A03 ,$
FIELD=SR_BROKER_NUMBER ,158-163 ,USAGE=A06 ,ACT=A06 ,$
FIELD=SR_REIN_FEE ,164-167 ,USAGE=P08.2 ,ACT=P04 ,$
FIELD=SR_FAC_PERCENT ,168-170 ,USAGE=P06.4 ,ACT=P03 ,$
FIELD= ,171-181 ,USAGE=A11 ,ACT=A11 ,$

SEGNAME=TWO,SEGTYPE=U, POSITION=SR_BUREAU_INFO, OCCURS=1 ,PARENT=ONE,$
GROUP=SR_BUREAU_INFOMOD1 ,154-181 ,USAGE=A28 ,ACT=A28 ,$
FIELD=SR_BUREAU_ID_INFO1 ,154-154 ,USAGE=A01 ,ACT=A01 ,$
FIELD=SR_PLAN_ID_INFO1 ,155-155 ,USAGE=A01 ,ACT=A01 ,$
FIELD=SR_PREMIUM_CLASS_CODE ,156-158 ,USAGE=A03 ,ACT=A03 ,$
FIELD=SR_GOVERNING_AGY_INFO1 ,159-160 ,USAGE=A02 ,ACT=A02 ,$
FIELD=SR_ALTERNATE_AGY_INFO1 ,161-162 ,USAGE=A02 ,ACT=A02 ,$

This message has been edited. Last edited by: <Emily McAllister>,

  
 GROUP=SR_BUREAU_INFO            ,154-181  ,USAGE=A28     ,ACT=A28  ,$
  FIELD=SR_BUREAU                ,154-154  ,USAGE=A01     ,ACT=A01  ,$
  FIELD=SR_CEDED_CO              ,155-157  ,USAGE=A03     ,ACT=A03  ,$
  FIELD=SR_BROKER_NUMBER         ,158-163  ,USAGE=A06     ,ACT=A06  ,$
  FIELD=SR_REIN_FEE              ,164-167  ,USAGE=P08.2   ,ACT=P04  ,$
  FIELD=SR_FAC_PERCENT           ,168-170  ,USAGE=P06.4   ,ACT=P03  ,$
  FIELD=FILLER                   ,171-181  ,USAGE=A11     ,ACT=A11  ,$
                                                                      
SEGNAME=TWO,SEGTYPE=U, POSITION=SR_BUREAU_INFO, OCCURS=1 ,PARENT=ONE,$
  GROUP=SR_BUREAU_INFOMOD1       ,154-181  ,USAGE=A28     ,ACT=A28  ,$
   FIELD=SR_BUREAU_ID_INFO1      ,154-154  ,USAGE=A01     ,ACT=A01  ,$
   FIELD=SR_PLAN_ID_INFO1        ,155-155  ,USAGE=A01     ,ACT=A01  ,$
   FIELD=SR_PREMIUM_CLASS_CODE   ,156-158  ,USAGE=A03     ,ACT=A03  ,$
   FIELD=SR_GOVERNING_AGY_INFO1  ,159-160  ,USAGE=A02     ,ACT=A02  ,$
   FIELD=SR_ALTERNATE_AGY_INFO1  ,161-162  ,USAGE=A02     ,ACT=A02  ,$
   FIELD=FILLER                  ,171-181  ,USAGE=A11     ,ACT=A11  ,$

You have to account for all characters defined in the redefine position.

Also, you can't just do a sample data here. You have to be very careful how to select the columns. If you select the SR_FAC_PERCENT, but the source is SR_ALTERNATE_AGY_INFO1 then you will generate an error.

This message has been edited. Last edited by: dhagen,