|
|
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: »FAK312 «
└─⟦2142406c2⟧ Bits:30009842 APAR ÅÅBOG ØLIBRARY - Seebach Data Aps
└─⟦b16ff4453⟧
└─⟦this⟧ ».FAK312 «
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