From: arne@vajhoej.dk   
      
   On 2/2/2025 8:37 PM, Arne Vajhøj wrote:   
   > On 2/2/2025 8:30 PM, Arne Vajhøj wrote:   
   >  > On 1/14/2025 11:06 AM, Arne Vajhøj wrote:   
   >  >> On 1/13/2025 9:11 PM, John Reagan wrote:   
   >  >>> COBOL paragraphs behave like C.  First routine/PARAGRAPH gets a WEAK   
   >  >>> transfer address.  Linker finds the first one.   
   >  >>   
   >  >> I have many prejudices about COBOL developers.   
   >  >>   
   >  >> One of them is that they don't create shareable images.   
   >  >>   
   >  >> :-)   
   >  >   
   >  > But let us say that someone wanted to create a shareable   
   >  > image in Cobol.   
   >  >   
   >  > A typical Cobol program just have all the paragraphs that   
   >  > get performed and they share state. Simple.   
   >  >   
   >  > To make them entry points with arguments in a shareable image,   
   >  > then I assume one need to make them programs with linkage section   
   >  > and procedure division using.   
   >  >   
   >  > Normal variables are just passed as arguments. Seems entirely   
   >  > unproblematic to me.   
   >  >   
   >  > But how does one share open files between modules?   
   >  >   
   >  > Fortran and Basic numeric identifiers work across modules.   
   >  > Pascal can share via inherit. C can use global variables   
   >  > or just pass as argument.   
   >  >   
   >  > But how does one do that in Cobol?   
   >  >   
   >  > Can one mark an fd as global or can one pass a fd as argument?   
   >   
   > Did some reading.   
   >   
   > IS GLOBAL in one module and IS EXTERNAL in the other modules?   
      
   And what to put in SELECT if FD is EXTERNAL?   
      
   Arne   
      
   --- SoupGate-DOS v1.05   
    * Origin: you cannot sedate... all the things you hate (1:229/2)