identification division.

program$-$id$.$ A$2$START.

date$-$written. date.

author. name.

sDescription:

$8$

environment division.

configuration section.

$***$

input$-$output section.

$**$

file$-$control.

input$-$file declaration

select input$-$file

assign to $??????$

organization is sequential.

$8$

output$-$file declaration

select output$-$file

assign to $??????$

organization is sequential.

$s$

data division.

file section.

$8$

fd input$-$file

recording mode is $F$

data record is input$-$line

record contains $29$ characters.

$8$

$01$ input$-$line.

$85????$

$85????$

$s$

fd output$-$file

recording mode is $F$

data record is output$-$line

record contains $???$ characters.

$**$

$81$ output$-$line

PIC $x(???).$

working$-$storage section.

procedure division.

$$e$0-$main.

$8$

goback.

end program A$2$START.