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

⟦66b7c6b65⟧

    Length: 1536 (0x600)
    Notes: MEMBER_S, Member_Text
    Names: »KRE575  «

Derivation

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

Text Member

                                                                                                
             Overf¦rsel til FINANS.                                                             
             ----------------------                                                             
         Kursdifference posteres med forkert fortegn i finansregnskabet.                        
         Det har den f¦lgefejl, at det dobbelte bel¦b modposteres p}                            
         fejlkontoen.                                                                           
                                                                                                
    Rettelse pr. 31/12 1984:                                                                    
                                                                                                
{ndr CLR                   Z-ADDKURDIT    KURDIT     7878                                       
     CLR                   EXCPTBETOPD                                                          
     C/SPACE                                                                                    
     C*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*                                     
     C*                 S U B R U T I N E R                                                     
                                                                                                
-------------------------------------------------------------------------------                 
-------------------------------------------------------------------------------                 
                                                                                                
         Desuden er der byttet om p} debet og kredit p} totalsiden (sidste                      
         side af posteringsjournalen).                                                          
         End-position 55 er erstattet af 40 og omvendt, som f¦lger:                             
                                                                                                
     O                                   25 'ANTAL POSTERINGER.......'                          
{ndr O                         ANTDB 2   55                                                     
     O        T  1     LR                                                                       
     O                                   25 'UDBETALINGER............'                          
{ndr O                         TOTUDB2   55                                                     
     O        T  1     LR                                                                       
     O                                   25 'HERAF KASSE.......'                                
{ndr O                         PBKAS 2   55                                                     
     O        T  1     LR                                                                       
     O                                   25 'BANK........'                                      
{ndr O                         PBBANK2   55                                                     
     O        T  2     LR                                                                       
     O                                   25 'GIRO........'                                      
{ndr O                         PBGIRO2   55                                                     
     O        T  2     LR                                                                       
     O                                   25 'RABAT...................'                          
{ndr O                         PBKONR2   55                                                     
     O        T  2     LR                                                                       
     O                                   25 'KURSDIFFERENCE..........'                          
{ndr O                    80   KURDIT2   55                                                     
{ndr O                   N80   KURDIT2   40                                                     
     O        T 22     LR                                                                       
     O                                    6 'BETALT'                                            
     O        T  2     LR                                                                       
     O                                   25 'KREDITORER M/MOMS.......'                          
{ndr O                         PBKRM 2   40                                                     
     O        T  2     LR                                                                       
     O                                   25 'KREDITORER U/MOMS.......'                          
{ndr O                         PBKRU 2   40                                                     
     O*  Postering p} kreditor samlekonto - Med moms                                            
                                                                                                

Full view