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

⟦f4fa6585a⟧ 

    Length: 512 (0x200)
    Notes: MEMBER_P, Member_Text
    Names: »PSGKON  «

Derivation

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

Text Member

// * '* KONVERTERING AF POSTERINGER'                                                                                    
// * 'INDTAST FILEGROUP (3 BOGSTAVER)'                                                                                  
// EVALUATE P1=?R?                                                                                                      
// LOAD PSGKON                                                                                                          
// FILE NAME-NYPOST,LABEL-?1?.WORK,RECORDS-?F'S,?1?.POST'?,DBLOCK-100,DUPKEYS-YES,DFILE-YES                             
// FILE NAME-POST,LABEL-?1?.POST,DBLOCK-100                                                                             
// RUN                                                                                                                  
// BOGDEL ?1?.POST                                                                                                      
// BOGREN ?1?.WORK,?1?.POST                                                                                             
// * 'OPT#LLING AF POSTER'                                                                                              
// LOAD PSG940                                                                                                          
// FILE NAME-PLAN,LABEL-?1?.PLAN                                                                                        
// FILE NAME-POST,LABEL-?1?.POST                                                                                        
// RUN

Full view