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

⟦27bbaaab6⟧ TextFile

    Length: 384 (0x180)
    Types: TextFile
    Names: »DCUS.PRG«

Derivation

└─⟦71c82d5c0⟧ Bits:30004214 LISTAID - Partslist management system
    └─ ⟦this⟧ »DCUS.PRG« 

TextFile

IF FILE($(CONFIGNAME,1,2)-'CUS_'-$(CONFIGNAME,3,4)-'.DBF')
   STORE 'CUSTOM DESGNED PARTSLIST ALLREADY CREATED' TO STATUS
ELSE
   USE CUS_STRU
   STORE $(CONFIGNAME,1,2)-'CUS_'-$(CONFIGNAME,3,4)-'.DBF' TO FILE
   COPY TO &FILE
   RELEASE FILE
   USE
   STORE 'CREATED-- NOW USE UCUS TO EDIT' TO STATUS
ENDIF
«eof»