RosettaCodeData/Task/Create-a-file/I/create-a-file.i

18 lines
268 B
OpenEdge ABL

function create( ""filename ) {
! var file = open(filename)
file("")
issues {
print("Failed to create "+filename)
return
}
print(filename+" created!")
close(file)
}
software {
create("output.txt")
create("docs/")
create("/output.txt")
create("/docs/")
}