class-id HelloWorld as "Hello.Helloworld". method-id main static. local-storage section. 01 helloString string value "COBOL". procedure division using by value args as string occurs any. if length of args > 0 set helloString to args(1) end-if display "Hello, " & helloString & "!" end method. end class.