DataMuseum.dk

Presents historical artifacts from the history of:

IBM System/3

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

See our Wiki for more about IBM System/3

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - metrics - download

⟦0216df402⟧ s3xseg

    Length: 1270 (0x4f6)
    Types: s3xseg
    Names: »S$AUSPB«

Derivation

└─⟦811594a0b⟧ Bits:30009185 5702-sc1.V16.pgm
    └─⟦8223a6838⟧ 
        └─⟦this⟧ »S$AUSPB« 
└─⟦990ba7470⟧ Bits:30009182 5702-PP1
    └─⟦efad88270⟧ 
        └─⟦this⟧ »S$AUSPB« 

TextSegment

     H                                                                    SAMPLE                
0101 I/COPY F1,$AUSP1                                                     S/3ARP                
0102 I/COPY F1,$AUSP2                                                     S/3ARP                
  01 I                                        1   1 REGIONL1              S/3ARP                
  01 C           DISTAK    SUB  DISCAL    DIFF    42                      S/3ARP                
  02 C           DIFF      COMP 1.00                 10  10               S/3ARP                
  03 C           AMTOWD    SUB  DISTAK    NETOWD  62                      S/3ARP                
0204 C           NETOWD    SUB  AMTPD     BAL     62                      S/3ARP                
0301 OCSHRECRGH                *AUTO                                      S/3ARP                
0302 O                                      'CASH RECEIPTS REGISTER'      S/3ARP                
0303 O        D        01      *AUTO                                      S/3ARP                
  035O                         REGION       'REGION'                      S/3ARP                
0304 O                         ACCTNO       'ACCOUNT'                     S/3ARP                
0305 O                                C     'NUMBER'                      S/3ARP                
0306 O                         ACCTNM       'ACCOUNT NAME'                S/3ARP                
0310 O                         INVNO 3      'INVOICE'                     S/3ARP                
0311 O                                C     'NUMBER'                      S/3ARP                
0312 O                         INVDATY      'INVOICE'                     S/3ARP                
0313 O                                C     'DATE'                        S/3ARP                
0314 O                         DATPD Y      'DATE PAID'                   S/3ARP                
  14 O                         AMTOWDJA     'AMOUNT'                      S/3ARP                
0402 O                                C     'OWED'                        S/3ARP                
     O                         DISTAK A     'DISCOUNT'                    S/3ARP                
0404 O                                C     'TAKEN'                       S/3ARP                
0405 O                         AMTPD  A     'AMOUNT'                      S/3AR                 
0406 O                                C     'PAID'                        S/3ARP                
     O                         BAL    A     'BALANCE'                     S/3ARP                
0408 O                                C     'DUE'                         S/3ARP                
0409 O                 10      DIFF   A     'EXCESS'                      S/3ARP                
0410 O                                C     'DISCOUNT'                    S/3ARP                
0411 O                                1     'REGION TOTALS'               S/3ARP                
0412 O                                R     'COMPANY TOTALS'              S/3ARP                
                                                             ôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôô
ôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôôô2aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
aaaaaaaaaaaaÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅ@@@@@@@@@@@@@@
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@}}}}}}}}}}}}}}}}
}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}ØØØØØØØØØØØØØØØØØØØØØØØØØØØØ
ØØØØØØØl@ÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅÅ}EFAULT DEFER OFF                00400000            
           TEXT                                                             00410000            
           AIF   (T'&LABEL EQ 'O').A       HAS LABEL BENN GIVEN             00420000            
    &LABEL EQU   *                         YES. MAKE PART OF USER GENERATED 00430000            
    .A