DataMuseum.dk

Presents historical artifacts from the history of:

IBM System/36

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

See our Wiki for more about IBM System/36

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - metrics - download

⟦376f9fcbd⟧

    Length: 768 (0x300)
    Notes: MEMBER_S, Member_Text
    Names: »KRE610  «

Derivation

└─⟦2142406c2⟧ Bits:30009842 APAR ÅÅBOG ØLIBRARY - Seebach Data Aps
    └─⟦b16ff4453⟧ 
        └─⟦this⟧ ».KRE610  « 

Text Member

                                                                                                
                Kontoudskrift er forkert.                                                       
                -------------------------                                                       
         Fejlen h{nger sammen med fejl i KRE600. Se forklaring der.                             
                                                                                                
    Rettelse pr. 31/12 1984:                                                                    
                                                                                                
     I                                      107 107 KONTUD                                      
add  I*   Kontantrabatbel¦b                                                                     
add  I                                    P  88  912KONRAB                                      
add  I*   Udligningsdato - $MD                                                                  
add  I                                      108 1130UDLDAT                                      
                                                                                                
add  C                     Z-ADDKONRAB    KONRAB     80     UDNYTTET                            
add  C   80                ADD  KONRAB    GLSALD              KONTANTRABAT                      
     C                     MOVE '1'       KONTUD            MARKER FOR KTO UDSK                 
     C*                                                                                         
     C           TSTUDL    TAG                                                                  
     C           UDLKOD    COMP '9'                      80 HVIS UDLIGNET                       
add  C   80      UDLDAT    COMP UDSDAT                 8080                                     
     C   80                MOVE '9'       KONTUD            EJ MERE P$ KT O.UDS                 
                                                                                                

Full view