Assembler language example

MVC SPMODE,=CL6'INPUT'
 MVC SPFORMAT,=C'DB2'
 CALL OPENPIPE,SPAREA