Navigation:  Documentazione SCREENS > Files generati > 'NOMEPRG'.PRC > Gestione files > SEARCH-FILES-GEN

Routine che contiene l'apertura dei files di un programma.

 

Esempio della chiamata alla routine

 

Questa routine viene chiamata automaticamente dalla funzione generica di apertura dei files OPEN-FILES.

 

Esempio della routine

 

     **---------------------------------------------------------------**

     ** Apertura files standard

     **---------------------------------------------------------------**

      search-file-gen.

          go to

            f-cp-001

            f-cp-003

            f-cp-004

            f-cp-006

            f-cp-007

            f-cp-017

            depending on w-ind-fl.

      f-cp-001.

          open input  crmtipcl

          go to ex-search-file-gen.

      f-cp-003.

          open i-o    crminfor

          go to ex-search-file-gen.

      f-cp-004.

          open input  crminftt

          go to ex-search-file-gen.

      f-cp-006.

          open i-o    crminfvf

          go to ex-search-file-gen.

      f-cp-007.

          open input  crmskinf

          go to ex-search-file-gen.

      f-cp-017.

          open input  crminfgr

          go to ex-search-file-gen.

      ex-search-file-gen.  exit.