|
|
DataMuseum.dkPresents historical artifacts from the history of: IBM System/36 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about IBM System/36 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 768 (0x300)
Notes: MEMBER_P, Member_Text
Names: »BOGNY «
└─⟦2142406c2⟧ Bits:30009842 APAR ÅÅBOG ØLIBRARY - Seebach Data Aps
└─⟦1fc10e824⟧
└─⟦this⟧ ».BOGNY «
* PROCEDURE B O G N Y * OPRETTELSE AF NY KONTOPLAN MED ALLE FELTER 0-STILLET // MEMBER USER1-BOGMSG // IFF DATAF1-GLB.PLAN PAUSE 'BEGYND MED RENAME FRA `ZZB` TIL `GLB`' // IFF DATAF1-GLB.PLAN RETURN // IF DATAF1-ZZB.PLAN PAUSE 'BEGYND MED RENAME FRA `ZZB` TIL `GLB`' // IF DATAF1-ZZB.PLAN RETURN // * '** OPRET NY KONTOPLAN' // LOAD BOGNY // FILE NAME-PLAN,LABEL-GLB.PLAN // FILE NAME-SIPL,LABEL-ZZB.PLAN,RECORDS-?F'A,GLB.PLAN'? // RUN // BOGSOR ZZB COPYDATA GLB.KODE,,ZZB.KODE COPYDATA GLB.BUDG,,ZZB.BUDG