|
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: 1024 (0x400)
Notes: MEMBER_S, Member_Text
Names: »DEB130 «
└─⟦2142406c2⟧ Bits:30009842 APAR ÅÅBOG ØLIBRARY - Seebach Data Aps
└─⟦b16ff4453⟧
└─⟦this⟧ ».DEB130 «
@reafrundingskonto skal ikke bruges mere.
Rettelse pr. 6/8 1984:
Registrering af debitorposter i fremmed valuta kunne, hvis der var
integration til finans, give anledning til ¦reafrundingsdifferencer,
der blev posteret p} s{rskilt konto.
slet I* Diff konto
slet I 580 587 KTODIF
slet C* Opsummer af hensyn til evt. diff med modkonti for fr. valuta
{ndr C Z-ADDBELDKK DIFF 102
slet C* Opsummer af hensyn til evt. diff med modkonti for fr. valuta
{ndr C Z-ADDBELDKK DIFF
slet CLR Z-SUBDIFF DIFF 102 7878
C 44 ADD PBELD4 DIFF Summer til diff
add C 41 SUB DIFF PBELD1
add C 41 GOTO ENDKT
add C 42 SUB DIFF PBELD2
add C 42 GOTO ENDKT
add C 43 SUB DIFF PBELD3
add C 43 GOTO ENDKT
add C 44 SUB DIFF PBELD4
{ndr C ENDKT ENDSR
OSYSCTL E SYSOPD
slet O* Postering af evt ¦reafrunding
slet OTRANS TADD LR 78
slet O 2 'TA'
slet O D$MD 8
slet O KTODIF 16
slet O 36 '@reafrunding debitor'
slet O DIFF 56
slet O POSJOU 62