Re: Embedded SQL date in DS array problem

I asked because I did copy/paste to try the compile :-) and I wanted to be sure I was not missing something. I had figured the reference was to both the DS field and the DB field, but I was not sure. For some reason my brain was stuck on the word /variable/ for the DS field. For a column it is moot, as SQL DDL always creates the date column with *ISO attribute. However there was no indication that I could see, why the RPG field in the DS would have been defined as *ISO; understand, I am only somewhat literate in RPG. I ignored the SET OPTION because I was thinking that was /just the SQL/; I see the implication now... The expectation that the pre-compiler would force the *ISO definition in the DS [or whatever it needs to do to function without error], given the SET OPTION was coded as the first SQL statement.

So with my less experienced perspective, for lack of seeing the Date Format coming from an External definition, I inferred the internal definition must be defaulting to *JOB. Thus I changed the source to add the DatFmt(*ISO) on the DS field and *it compiled*! But apparently it compiled only because I have additionally specified the DATFMT(*ISO) on the compile. That is...

The slightly modified source shown below actually does compile fine for me on v5r3 when specifying DATFMT(*ISO) on the compile [which is my default]. I also experienced that the unchanged source _does not_ compile with the default DATFMT(*JOB); neither does the modified source The changed source per CMPPFM:

I - D MyDate d DatFmt(*ISO)
D - D MyDate d

Sometimes it pays to be somewhat confused or even clueless, to circumvent a problem. ;-) At least I hope my unwitting changes prove functional [for compile; not tested functionally for run-time] for you also.

Regards, Chuck