DataMuseum.dk

Presents historical artifacts from the history of:

Christian Rovsing CR7, CR8 & CR16 CP/M

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

See our Wiki for more about Christian Rovsing CR7, CR8 & CR16 CP/M

Excavated with: AutoArchaeologist - Free & Open Source Software.

top - download

⟦946d91932⟧ TextFile

    Length: 512 (0x200)
    Types: TextFile
    Names: »BCKTRACE.PRG«

Derivation

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

TextFile


SELE PRIM
USE CON_SMCA
GO TOP
SET LINKAGE OFF
SET TALK OFF
DO WHILE .NOT.EOF
   STORE 'SMCA'-P.SOURCE-'.PLS' TO MOD
   SELE SECO
   USE &MOD
   ERASE
   LOCATE FOR REF:CODE=MREF
   IF .NOT.EOF
       ? (MOD+'  '+P.MODULE)
       LIST FOR REF:CODE=MREF
       *SET STEP ON
       WAIT
   ENDIF
   SELE PRIM
   SKIP
ENDDO

«eof»