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

⟦3cf9f789a⟧

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

Derivation

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

Text Member

                                                                                                
         M}nedsk¦rsel vil blive blokeret af en eventuel tom integrationsfile.                   
         Situationen kan opst}, hvis man fortryder en indtastning af posteringer.               
                                                                                                
         Rettelse pr. 4/6 1984.                                                                 
                                                                                                
     // IFF DATAF1-$$.INT?1? PAUSE '* DER FINDES INGEN $$.INT?1?-FILE P$ DISKEN *'              
add  // IF DATAF1-$$.INT?1? IF ?F'A,$$.INT?1?'?/00000000 DELETE $$.INT?1?,F1                    
     // IFF DATAF1-$$.INT?1? CANCEL                                                             
slet // IF ?F'A,$$.INT?1?'?/00000000 PAUSE 'DER ER INGEN POSTERINGER'                           
slet // IF ?F'A,$$.INT?1?'?/00000000 RETURN                                                     
                                                                                                
         NB. Husk at rette $$ til eget suffix.                                                  
                                                                                                
--------------------------------------------------------------------------------                
--------------------------------------------------------------------------------                
                                                                                                
         I forbindelse med ovenst}ende kan det ske at kun den f¦rste                            
         af de to files overf¦res ved brug af punkt 10 p} menu KOBL                             
         Fejlen rettes ved i det midterste af de 5 ovest}ende statements                        
         at {ndre CANCEL til RETURN                                                             
                                                                                                
         Rettet pr. 31/12 1984.                                                                 
                                                                                                

Full view