>On Tue, 21 May 2024 15:01:12 +0000 "Schmitt, Michael" ><[email protected]> wrote: > >:>3. Depends on the language. IMS can have variable length segments but not= > variable length fields, so any variable length fields are defined by the a= >pplication. If the application is in COBOL, there's no native variable leng= >th field format. Applications can simulate variable length fields but how t= >hey do it is in application logic. > >Well, I don't know about that. > > >01 var-field-length pic s9(4) comp. > >01 var-field. > 05 var-field-character pic x occurs 1 to 1000 times depending on >var-field-length.
>When a MOVE is performed to or from VAR-FIELD the length from VAR-FIELD-LEN >GTH is used. And now COBOL on z/OS has dynamic-length data items! 1 DL-A PIC X DYNAMIC VALUE 'abcd '. Cheers, Tom Ross >> COBOL is the Language of the Future! << ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
