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

⟦b56d9ae4d⟧

    Length: 1024 (0x400)
    Notes: MEMBER_S, Member_Text
    Names: »FAK312  «

Derivation

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

Text Member

                                                                                                
             Postering p} fejlkonto.                                                            
             -----------------------                                                            
      Hvis der rettes i teksterne i filen med kontonumre til finans, s}                         
      tekstfeltet i sidste position indeholder et af bogstaverne J til R,                       
      vil programmet ikke kunne finde kontonummeret.                                            
                                                                                                
      Felter i programmet til kontonumre skal defineres alfanumerisk,                           
      uanset at det selvf¦lgelig er numeriske data.                                             
                                                                                                
      Rettelse pr. 31/12 1984.                                                                  
                                                                                                
{ndr E                    KT        100  8               SALGSNR KTO VGR                        
{ndr E                    DK         25  8               DIVERSEKONTI                           
                                                                                                
{ndr C                     MOVELTXT,1     FRKONT  8        FAKTURABATKONTO                      
{ndr C                     MOVELTXT,3     KRKONT  8        DEBITORRABAT                         
{ndr C                     MOVELTXT,10    DKKONT  8        DEBITORKASSE                         
{ndr C                     MOVELTXT,11    MKONT   8        UDG$ENDE MOMS                        
{ndr C                     MOVELTXT,13    DKONT   8        SAMLEDEBITORER                       
add  C                     MOVE DKONT     UKONT                                                 
{ndr C                     ADD  1         UKONT   80       SAMLEDEB. U.MOMS                     
{ndr C                     MOVELTXT,24    FEKONT  8        FEJL @REAFRUND                       
                                                                                                
     C           OMDIV     TAG                                                                  
     C                     ADD  1         Z1                                                    
{ndr C                     MOVELTXT,Z1    DK,Z1            DIVERSE                              
                                                                                                

Full view