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 - metrics - download

⟦a3efa3f60⟧ RcTekst, TextFile

    Length: 2688 (0xa80)
    Types: RcTekst, TextFile
    Names: »CORN202.WP«

Derivation

└─⟦1ce066637⟧ Bits:30005845 Dokumenter - Per Cornelius #135 - #236
    └─⟦this⟧ »CORN202.WP«

RcTekst


╱04002d4e0a0006000000000201503100000000000000000000000000000000000000000000000000050f19232d37414b555f69737d8791ff04╱
corn                                       86.03.20               edb.corn202↲
↲
↲
┆a1┆┆b0┆SIDSTE OVERFØRSEL AF DPA-REGISTER.↲
↲
↲
De sædvanlige overførsler om tirsdagen skal køres UÆNDRET indtil gammel↲
dokumentations system nedlægges.↲
↲
Alle DPA'er trækkes ud, hele recorden, og hvis nummer findes i BIB så opdater↲
┆a1┆KUN┆e1┆ nedenstående BIB felter, og ┆a1┆resten af BIB felter må ikke ændres.↲
↲
Hvis nummer IKKE findes, så print-meddelelse og INGEN oprettelse !!↲
↲
↲
DPA feltnavn     indhold                                BIB feltnr.↲
-------------------------------------------------------------------------------↲
↲
↲
DPA???     PLSNR (99xxxxxx)     -----hovednøgle------:(001 00 a PLS partnr)↓
↲
DPALGD     længdefelt↲
↲
DPASPROG   sprogkode 0-3↲
↲
DPAMK      mediekode            ---------------------: 141 00 a medie kode↲
↲
DPAINIT    forfatters initialer↲
↲
DPADATO    oprettelsesdato↲
↲
DPAPART1   nøgle1              )↲
DPAPART2   nøgle2              )---------------------:(002 00 a nøgle RCSL)↲
DPAPART3   nøgle3              )↲
↲
DPAERST1   erstatter1          ----------------------: 120 00 a erstatter 1↲
DPAERST2   erstatter2          ----------------------: 120 00 b erstatter 2↲
DPAERST3   erstatter3          ----------------------: 120 00 c erstatter 3↲
↲
DPAERSTA1  erstattes af 1      ----------------------: 121 00 a erstattes af 1↲
DPAERSTA2  erstattes af 2      ----------------------: 121 00 b erstattes af 2↲
DPAERSTA3  erstattes af 3      ----------------------: 121 00 c erstattes af 3↲
↲
DPASTATUS  statuskode          ----------------------: 140 00 a status↲
↲
DPASB      sidst brugt (dato)↲
↲
DPADA      arkiv for master    ----------------------: 306 00 a arkiv↲
↲
           Konvertering med test↲
           på de 3 første cifre↲
           ┆a1┆i BIB-PART NUMMER:↲
↲
           990 så sæt BIB.ARKIV = 'ÅRH',↲
           992 så sæt BIB.ARKIV = 'GLO',↲
           991 & status kode < 5 så sæt BIB.ARKIV = 'GLO',↲
           991 & status > 4 så sæt BIB.ARKIV = 'BAL'.↲
↲
DPARIDATO  rettedato↲
↲
DPAREDATO  særlig rettedato    ----------------------: 140 00 b dato status ret↲

════════════════════════════════════════════════════════════════════════
↓
↲
↲
DPALEV     leverandør lager↲
↲
DPATEXT1   tekst↲
DPATEXT2   tekst↲
↲
DPATEXT3   etikettetekst↲
DPADOKMED  manual nr.↲
↲
DPANG1     nøgleord:system↲
DPANG2     nøgleord:salgsnr↲
DPANG3     nøgleord:modulnr↲
↲
DPAGRP     gruppe (s,p,d,t)↲
↲
DPAPRIS    priskode (sider ?)  ----------------------: 180 00 a antal sider↲
↲
↲
┆b0┆BEMÆRK:   Ikke markerede DPA-felter skal ikke overføres !!!↓

════════════════════════════════════════════════════════════════════════
↓
┆1a┆┆1a┆ i ???↲
↓
┆1a┆↓
┆1a┆ a anvendes i ???↲
↓
┆1a┆        *         *↲
bemærkning: H

TextFile

B▶01◀▶01◀N▶04◀-N
▶06◀▶02◀▶01◀P1▶05◀▶0f◀▶19◀#-7AKU_iså▶87◀▶91◀▶ff◀▶04◀corn                                       86.03.20               edb.corn202


▶a1◀▶b0◀SIDSTE OVERFØRSEL AF DPA-REGISTER.


De sædvanlige overførsler om tirsdagen skal køres UÆNDRET indtil gammel
dokumentations system nedlægges.

Alle DPA'er trækkes ud, hele recorden, og hvis nummer findes i BIB så opdater
▶a1◀KUN▶e1◀ nedenstående BIB felter, og ▶a1◀resten af BIB felter må ikke ændres.

Hvis nummer IKKE findes, så print-meddelelse og INGEN oprettelse !!


DPA feltnavn     indhold                                BIB feltnr.
-------------------------------------------------------------------------------


DPA???     PLSNR (99xxxxxx)     -----hovednøgle------:(001 00 a PLS partnr)

DPALGD     længdefelt

DPASPROG   sprogkode 0-3

DPAMK      mediekode            ---------------------: 141 00 a medie kode

DPAINIT    forfatters initialer

DPADATO    oprettelsesdato

DPAPART1   nøgle1              )
DPAPART2   nøgle2              )---------------------:(002 00 a nøgle RCSL)
DPAPART3   nøgle3              )

DPAERST1   erstatter1          ----------------------: 120 00 a erstatter 1
DPAERST2   erstatter2          ----------------------: 120 00 b erstatter 2
DPAERST3   erstatter3          ----------------------: 120 00 c erstatter 3

DPAERSTA1  erstattes af 1      ----------------------: 121 00 a erstattes af 1
DPAERSTA2  erstattes af 2      ----------------------: 121 00 b erstattes af 2
DPAERSTA3  erstattes af 3      ----------------------: 121 00 c erstattes af 3

DPASTATUS  statuskode          ----------------------: 140 00 a status

DPASB      sidst brugt (dato)

DPADA      arkiv for master    ----------------------: 306 00 a arkiv

           Konvertering med test
           på de 3 første cifre
           ▶a1◀i BIB-PART NUMMER:

           990 så sæt BIB.ARKIV = 'ÅRH',
           992 så sæt BIB.ARKIV = 'GLO',
           991 & status kode < 5 så sæt BIB.ARKIV = 'GLO',
           991 & status > 4 så sæt BIB.ARKIV = 'BAL'.

DPARIDATO  rettedato

DPAREDATO  særlig rettedato    ----------------------: 140 00 b dato status ret
\f

▶83◀▶e8◀


DPALEV     leverandør lager

DPATEXT1   tekst
DPATEXT2   tekst

DPATEXT3   etikettetekst
DPADOKMED  manual nr.

DPANG1     nøgleord:system
DPANG2     nøgleord:salgsnr
DPANG3     nøgleord:modulnr

DPAGRP     gruppe (s,p,d,t)

DPAPRIS    priskode (sider ?)  ----------------------: 180 00 a antal sider


▶b0◀BEMÆRK:   Ikke markerede DPA-felter skal ikke overføres !!!
\f

▶81◀▶a0◀
«eof»

Full view