DataMuseum.dk

Presents historical artifacts from the history of:

CP/M

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about CP/M

Excavated with: AutoArchaeologist - Free & Open Source Software.

top - download

⟦ca95325ce⟧ TextFile

    Length: 256 (0x100)
    Types: TextFile
    Names: »UDSKRIV.BAK«

Derivation

└─⟦65142c8de⟧ Bits:30004652 KnowledgeMan vers. 1.07h
    └─ ⟦this⟧ »UDSKRIV.BAK«

TextFile

use ansat
use afdnavn
e.supd=true
obtain first from ansat
while pstend(ansat)=false do 
   obtain from afdnavnØ
          where afdnavn.afdnr=ansat.afdnr
   print etikette
   obtain next from ansat
endwhile
          «eof»