|
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: 4096 (0x1000)
Notes: MEMBER_S, Member_Text
Names: »KRE550 «
└─⟦2142406c2⟧ Bits:30009842 APAR ÅÅBOG ØLIBRARY - Seebach Data Aps
└─⟦b16ff4453⟧
└─⟦this⟧ ».KRE550 «
Samlergiro med ******** i bel¦bsfelt.
-------------------------------------
Postgirokontoret anerkender ikke giroblanketter uden bel¦b.
Hvis der er flere poster til en enkelt betaling end der kan
specificeres p} en blanket, vil denne rettelse fors¦ge at dele
betalingen op p} flere afsluttede blanketter.
Afh{ngig af kombinationen af posternes st¦rrelse og fortegn
kan det ikke altid lade sig g¦re at f} positive del-betalinger
ud af det. Der vil derfor i givet fald blive udskrevet en eller
flere giroblanketter med p}lydende 1 ¦re som vil blive fratrukket
den sidste, s} den samlede betaling bliver korrekt.
Eksempel: en kreditnota p} 500 kr. og 6 fakturaer p} hver 100 kr.
vil blive skrevet ud p} to giro`er p} henholdsvis 1 ¦re og 99,99 kr.
Rettelse pr. 31/12 1984:
{ndr FKPOS2 IF F 128 128 DISK
slet I* KEY TIL POSTER
slet I DS
slet I 1 9 K$KEY2
slet I 1 50PFNR
slet I 6 90PLIN
slet C Z-ADDFNR PFNR
slet C Z-ADD1 PLIN
slet C K$KEY2 SETLLKPOS2
C N41 GOTO TAG2A
C IX COMP 6 69 SKRIV SAMLER
add C EXSR POSPOS
C 69 EXCPTSAML VED FLERE END
C TAG2A TAG
C N42 GOTO TAG2Z
C IX COMP 4 69 SKRIV SUDB KORT
add C EXSR POSPOS
C 69 EXCPTGIRUDB VED FLERE END
C TAG2Z TAG
{ndr C SETOF 6968
C READ KPOS2 80
slet C N80 BETFOR COMP PFNR 8080
C TOTALK BEGSR
C SUMKRE SUB SUMKRB NETKRE 112
C ADD NETKRE SUMNET
C ADD 1 ANTUDB
slet C Z-ADDSUMKRB SUMKRB 6868
add C SETON 51
add C EXSR POSPOS
C 41 EXCPTSAML
C 42 EXCPTGIRUDB
C MOVE *BLANKS KB
C Z-ADD0 BL
slet C N41 GOTO TOTAK3
slet C OF SETON 66
slet C OF
slet CORN49 EXCPTOVERH
slet C SETOF OF66
slet C SETON 49
slet C EXCPTOVERL
slet C ADD NETKRE SUMOVS 112
slet C TOTAK3 TAG
C SETOF 68
C ENDSR
O 16 'OVERF@RT'
O SUMOVS1 31
O E 1 OVERL
{ndr O PARTTO1 31
O E 2 SAML
O 68 15 'Kontantrabat'
{ndr O 68 RABUD LB 26
O E 2 SAML
{ndr O PARTTO B 43 ' *&& '
slet O 69 43 '*************'
OGIROUDB E 04 GIRUDB
O E 1 GIRUDB
O 68 15 'Kontantrabat'
{ndr O 68 RABUD LB 26
.
.
{ndr O E 1 GIRUDB
{ndr O PARTTO B 17 ' *&& '
O *PLACE 42
O *PLACE 75
slet O E 1 69 GIRUDB
slet O 17 '*************'
slet O *PLACE 42
slet O *PLACE 75
OLISTE H 202 1P
Nedenst}ende subrutine indl{gges mellem de ¦vrige subrutiner
C*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-* P O S P O S
C* -----------
C*
C POSPOS BEGSR
C 69 GOTO CLOSE
C N51 52
CORN51 GOTO DONE
C COUNT COMP 0 5050
C 50 GOTO CLOSE
C Z-SUBNETKRE PARTTO 112
C SUB ADDONE PARTTO
C Z-ADDSUMRAB RABUD 6868
C GOTO DONE
C CLOSE TAG
C COUNT COMP 0 50
C 50 GOTO ANOTH
C Z-ADDSUMRAB RABUD 92 6868
C Z-ADDSUMMA PARTTO
C ADD RABUD PARTTO 52
C Z-ADD0 SUMRAB 92
C 52 GOTO DONE
C ANOTH TAG
C ADD 1 COUNT
C ADD .01 ADDONE
C Z-ADD.01 PARTTO
C DONE TAG
C 69
COR 51 Z-ADD0 SUMMA 112
C 51 Z-ADD0 ADDONE 32
C 51 Z-ADD0 COUNT 30
C 51 Z-ADD0 SUMRAB 92
C N51 ADD RABATL SUMRAB
C N51 SUB BEL@B SUMMA
C N41 GOTO TOTAK3
C N51N69 GOTO TOTAK3
C OF SETON 66
C OF
CORN49 EXCPTOVERH
C SETOF OF66
C SETON 49
C EXCPTOVERL
C ADD PARTTO SUMOVS 112
C TOTAK3 TAG
C SETOF 51
C ENDSR
C*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*
Endelig indl{gges en sortering til en hj{lpefile $$.KPOS3 i
procedure KREBET$$:
// TAG VALG3
// REGION SIZE-64 tilf¦jet
// LOAD #GSORT -
// FILE NAME-INPUT,LABEL-$$.KPOST,DISP-SHR -
// FILE NAME-OUTPUT,LABEL-$$.KPOS3,RECORDS-?F'A,$$.KPOST'?,RETAIN-J -
// RUN -
0001 HSORTR 17A 3X 128 -
0002 I C 114 118EQC?L'2,5'? -
0004 FNC 63 66 VALUTA -
0005 FND 1 8 LEVERAND@R -
0004 FND 23 23 DEBET-KREDIT -
0005 FND 119 122 LINIENR. -
0006 FDC 1 128 POST -
// END tilf¦jet
// * 'Godkendelse af forslag'
// LOAD KRE550
// FILE NAME-KPOS2,LABEL-$$.KPOS3,DISP-SHRRM {ndret
0x0000…0001 0x60
0x0001…0002 0x0d
0x0002…0003 0xa5
0x0003…0028 »Samlergiro med ******** i bel¦bsfelt.«
0x0028…0029 0x2e
0x0029…002a 0x0d
0x002a…002b 0xa5
0x002b…0050 »-------------------------------------«
0x0050…0051 0x2e
0x0051…0052 0x09
0x0052…0053 0xbb
0x0053…008e »Postgirokontoret anerkender ikke giroblanketter uden bel¦b.«
0x008e…008f 0x1c
0x008f…0090 0x09
0x0090…0091 0xbb
0x0091…00cc »Hvis der er flere poster til en enkelt betaling end der kan«
0x00cc…00cd 0x1c
0x00cd…00ce 0x09
0x00ce…00cf 0xbe
0x00cf…010d »specificeres p} en blanket, vil denne rettelse fors¦ge at dele«
0x010d…010e 0x19
0x010e…010f 0x09
0x010f…0110 0xad
0x0110…013d »betalingen op p} flere afsluttede blanketter.«
0x013d…013e 0x2a
0x013e…013f 0x09
0x013f…0140 0xbb
0x0140…017b »Afh{ngig af kombinationen af posternes st¦rrelse og fortegn«
0x017b…017c 0x1c
0x017c…017d 0x09
0x017d…017e 0xbe
0x017e…01bc »kan det ikke altid lade sig g¦re at f} positive del-betalinger«
0x01bc…01bd 0x19
0x01bd…01be 0x09
0x01be…01bf 0xbf
0x01bf…01fe »ud af det. Der vil derfor i givet fald blive udskrevet en eller«
0x01fe…01ff 0x18
0x01ff…0200 0x09
0x0200…0201 0xc1
0x0201…0242 »flere giroblanketter med p}lydende 1 ¦re som vil blive fratrukket«
0x0242…0243 0x16
0x0243…0244 0x09
0x0244…0245 0xb3
0x0245…0278 »den sidste, s} den samlede betaling bliver korrekt.«
0x0278…0279 0x24
0x0279…027a 0x09
0x027a…027b 0xc1
0x027b…02bc »Eksempel: en kreditnota p} 500 kr. og 6 fakturaer p} hver 100 kr.«
0x02bc…02bd 0x16
0x02bd…02be 0x09
0x02be…02bf 0xc4
0x02bf…0303 »vil blive skrevet ud p} to giro`er p} henholdsvis 1 ¦re og 99,99 kr.«
0x0303…0304 0x13
0x0304…0305 0x60
0x0305…0306 0x04
0x0306…0307 0x98
0x0307…031f »Rettelse pr. 31/12 1984:«
0x031f…0320 0x44
0x0320…0321 0x60
0x0321…0322 0x8b
0x0322…032d »{ndr FKPOS2«
0x032d…032e 0x03
0x032e…032f 0x82
0x032f…0331 »IF«
0x0331…0332 0x02
0x0332…0333 0x89
0x0333…033c »F 128 128«
0x033c…033d 0x0c
0x033d…033e 0x84
0x033e…0342 »DISK«
0x0342…0343 0x35
0x0343…0344 0x60
0x0344…0345 0x96
0x0345…035b »slet I* KEY TIL POSTER«
0x035b…035c 0x4a
0x035c…035d 0x86
0x035d…0363 »slet I«
0x0363…0364 0x0c
0x0364…0365 0x82
0x0365…0367 »DS«
0x0367…0368 0x4c
0x0368…0369 0x86
0x0369…036f »slet I«
0x036f…0370 0x28
0x0370…0371 0x81
0x0371…0372 »1«
0x0372…0373 0x03
0x0373…0374 0x88
0x0374…037c »9 K$KEY2«
0x037c…037d 0x26
0x037d…037e 0x86
0x037e…0384 »slet I«
0x0384…0385 0x28
0x0385…0386 0x81
0x0386…0387 »1«
0x0387…0388 0x03
0x0388…0389 0x86
0x0389…038f »50PFNR«
0x038f…0390 0x28
0x0390…0391 0x86
0x0391…0397 »slet I«
0x0397…0398 0x28
0x0398…0399 0x81
0x0399…039a »6«
0x039a…039b 0x03
0x039b…039c 0x86
0x039c…03a2 »90PLIN«
0x03a2…03a3 0x28
0x03a3…03a4 0x60
0x03a4…03a5 0x86
0x03a5…03ab »slet C«
0x03ab…03ac 0x15
0x03ac…03ad 0x88
0x03ad…03b5 »Z-ADDFNR«
0x03b5…03b6 0x07
0x03b6…03b7 0x84
0x03b7…03bb »PFNR«
0x03bb…03bc 0x32
0x03bc…03bd 0x86
0x03bd…03c3 »slet C«
0x03c3…03c4 0x15
0x03c4…03c5 0x86
0x03c5…03cb »Z-ADD1«
0x03cb…03cc 0x09
0x03cc…03cd 0x84
0x03cd…03d1 »PLIN«
0x03d1…03d2 0x32
0x03d2…03d3 0x86
0x03d3…03d9 »slet C«
0x03d9…03da 0x0b
0x03da…03db 0x86
0x03db…03e1 »K$KEY2«
0x03e1…03e2 0x04
0x03e2…03e3 0x8a
0x03e3…03ed »SETLLKPOS2«
0x03ed…03ee 0x3b
0x03ee…03ef 0x60
0x03ef…03f0 0x05
0x03f0…03f1 0x81
0x03f1…03f2 »C«
0x03f2…03f3 0x02
0x03f3…03f4 0x83
0x03f4…03f7 »N41«
0x03f7…03f8 0x10
0x03f8…03f9 0x8a
0x03f9…0403 »GOTO TAG2A«
0x0403…0404 0x3b
0x0404…0405 0x05
0x0405…0406 0x81
0x0406…0407 »C«
0x0407…0408 0x0b
0x0408…0409 0x82
0x0409…040b »IX«
0x040b…040c 0x08
0x040c…040d 0x86
0x040d…0413 »COMP 6«
0x0413…0414 0x14
0x0414…0415 0x82
0x0415…0417 »69«
0x0417…0418 0x05
0x0418…0419 0x8c
0x0419…0425 »SKRIV SAMLER«
0x0425…0426 0x18
0x0426…0427 0x83
0x0427…042a »add«
0x042a…042b 0x02
0x042b…042c 0x81
0x042c…042d »C«
0x042d…042e 0x15
0x042e…042f 0x8b
0x042f…043a »EXSR POSPOS«
0x043a…043b 0x3a
0x043b…043c 0x05
0x043c…043d 0x81
0x043d…043e »C«
0x043e…043f 0x03
0x043f…0440 0x82
0x0440…0442 »69«
0x0442…0443 0x10
0x0443…0444 0x89
0x0444…044d »EXCPTSAML«
0x044d…044e 0x19
0x044e…044f 0x8d
0x044f…045c »VED FLERE END«
0x045c…045d 0x16
0x045d…045e 0x60
0x045e…045f 0x05
0x045f…0460 0x81
0x0460…0461 »C«
0x0461…0462 0x0b
0x0462…0463 0x85
0x0463…0468 »TAG2A«
0x0468…0469 0x05
0x0469…046a 0x83
0x046a…046d »TAG«
0x046d…046e 0x42
0x046e…046f 0x05
0x046f…0470 0x81
0x0470…0471 »C«
0x0471…0472 0x02
0x0472…0473 0x83
0x0473…0476 »N42«
0x0476…0477 0x10
0x0477…0478 0x8a
0x0478…0482 »GOTO TAG2Z«
0x0482…0483 0x3b
0x0483…0484 0x05
0x0484…0485 0x81
0x0485…0486 »C«
0x0486…0487 0x0b
0x0487…0488 0x82
0x0488…048a »IX«
0x048a…048b 0x08
0x048b…048c 0x86
0x048c…0492 »COMP 4«
0x0492…0493 0x14
0x0493…0494 0x82
0x0494…0496 »69«
0x0496…0497 0x05
0x0497…0498 0x8f
0x0498…04a7 »SKRIV SUDB KORT«
0x04a7…04a8 0x15
0x04a8…04a9 0x83
0x04a9…04ac »add«
0x04ac…04ad 0x02
0x04ad…04ae 0x81
0x04ae…04af »C«
0x04af…04b0 0x15
0x04b0…04b1 0x8b
0x04b1…04bc »EXSR POSPOS«
0x04bc…04bd 0x3a
0x04bd…04be 0x05
0x04be…04bf 0x81
0x04bf…04c0 »C«
0x04c0…04c1 0x03
0x04c1…04c2 0x82
0x04c2…04c4 »69«
0x04c4…04c5 0x10
0x04c5…04c6 0x8b
0x04c6…04d1 »EXCPTGIRUDB«
0x04d1…04d2 0x17
0x04d2…04d3 0x8d
0x04d3…04e0 »VED FLERE END«
0x04e0…04e1 0x16
0x04e1…04e2 0x60
0x04e2…04e3 0x05
0x04e3…04e4 0x81
0x04e4…04e5 »C«
0x04e5…04e6 0x0b
0x04e6…04e7 0x85
0x04e7…04ec »TAG2Z«
0x04ec…04ed 0x05
0x04ed…04ee 0x83
0x04ee…04f1 »TAG«
0x04f1…04f2 0x42
0x04f2…04f3 0x86
0x04f3…04f9 »{ndr C«
0x04f9…04fa 0x15
0x04fa…04fb 0x85
0x04fb…0500 »SETOF«
0x0500…0501 0x15
0x0501…0502 0x84
0x0502…0506 »6968«
0x0506…0507 0x27
0x0507…0508 0x05
0x0508…0509 0x81
0x0509…050a »C«
0x050a…050b 0x15
0x050b…050c 0x8a
0x050c…0516 »READ KPOS2«
0x0516…0517 0x14
0x0517…0518 0x82
0x0518…051a »80«
0x051a…051b 0x25
0x051b…051c 0x86
0x051c…0522 »slet C«
0x0522…0523 0x02
0x0523…0524 0x83
0x0524…0527 »N80«
0x0527…0528 0x06
0x0528…0529 0x86
0x0529…052f »BETFOR«
0x052f…0530 0x04
0x0530…0531 0x89
0x0531…053a »COMP PFNR«
0x053a…053b 0x11
0x053b…053c 0x84
0x053c…0540 »8080«
0x0540…0541 0x27
0x0541…0542 0x60
0x0542…0543 0x05
0x0543…0544 0x81
0x0544…0545 »C«
0x0545…0546 0x0b
0x0546…0547 0x86
0x0547…054d »TOTALK«
0x054d…054e 0x04
0x054e…054f 0x85
0x054f…0554 »BEGSR«
0x0554…0555 0x40
0x0555…0556 0x05
0x0556…0557 0x81
0x0557…0558 »C«
0x0558…0559 0x0b
0x0559…055a 0x86
0x055a…0560 »SUMKRE«
0x0560…0561 0x04
0x0561…0562 0x83
0x0562…0565 »SUB«
0x0565…0566 0x02
0x0566…0567 0x86
0x0567…056d »SUMKRB«
0x056d…056e 0x04
0x056e…056f 0x8a
0x056f…0579 »NETKRE 112«
0x0579…057a 0x2c
0x057a…057b 0x05
0x057b…057c 0x81
0x057c…057d »C«
0x057d…057e 0x15
0x057e…057f 0x83
0x057f…0582 »ADD«
0x0582…0583 0x02
0x0583…0584 0x86
0x0584…058a »NETKRE«
0x058a…058b 0x04
0x058b…058c 0x86
0x058c…0592 »SUMNET«
0x0592…0593 0x30
0x0593…0594 0x05
0x0594…0595 0x81
0x0595…0596 »C«
0x0596…0597 0x15
0x0597…0598 0x83
0x0598…059b »ADD«
0x059b…059c 0x02
0x059c…059d 0x81
0x059d…059e »1«
0x059e…059f 0x09
0x059f…05a0 0x86
0x05a0…05a6 »ANTUDB«
0x05a6…05a7 0x30
0x05a7…05a8 0x86
0x05a8…05ae »slet C«
0x05ae…05af 0x15
0x05af…05b0 0x8b
0x05b0…05bb »Z-ADDSUMKRB«
0x05bb…05bc 0x04
0x05bc…05bd 0x86
0x05bd…05c3 »SUMKRB«
0x05c3…05c4 0x05
0x05c4…05c5 0x84
0x05c5…05c9 »6868«
0x05c9…05ca 0x27
0x05ca…05cb 0x83
0x05cb…05ce »add«
0x05ce…05cf 0x02
0x05cf…05d0 0x81
0x05d0…05d1 »C«
0x05d1…05d2 0x15
0x05d2…05d3 0x85
0x05d3…05d8 »SETON«
0x05d8…05d9 0x15
0x05d9…05da 0x82
0x05da…05dc »51«
0x05dc…05dd 0x29
0x05dd…05de 0x83
0x05de…05e1 »add«
0x05e1…05e2 0x02
0x05e2…05e3 0x81
0x05e3…05e4 »C«
0x05e4…05e5 0x15
0x05e5…05e6 0x8b
0x05e6…05f1 »EXSR POSPOS«
0x05f1…05f2 0x3a
0x05f2…05f3 0x05
0x05f3…05f4 0x81
0x05f4…05f5 »C«
0x05f5…05f6 0x03
0x05f6…05f7 0x82
0x05f7…05f9 »41«
0x05f9…05fa 0x10
0x05fa…05fb 0x89
0x05fb…0604 »EXCPTSAML«
0x0604…0605 0x3c
0x0605…0606 0x05
0x0606…0607 0x81
0x0607…0608 »C«
0x0608…0609 0x03
0x0609…060a 0x82
0x060a…060c »42«
0x060c…060d 0x10
0x060d…060e 0x8b
0x060e…0619 »EXCPTGIRUDB«
0x0619…061a 0x3a
0x061a…061b 0x05
0x061b…061c 0x81
0x061c…061d »C«
0x061d…061e 0x15
0x061e…061f 0x8c
0x061f…062b »MOVE *BLANKS«
0x062b…062c 0x03
0x062c…062d 0x82
0x062d…062f »KB«
0x062f…0630 0x34
0x0630…0631 0x05
0x0631…0632 0x81
0x0632…0633 »C«
0x0633…0634 0x15
0x0634…0635 0x86
0x0635…063b »Z-ADD0«
0x063b…063c 0x09
0x063c…063d 0x82
0x063d…063f »BL«
0x063f…0640 0x34
0x0640…0641 0x86
0x0641…0647 »slet C«
0x0647…0648 0x02
0x0648…0649 0x83
0x0649…064c »N41«
0x064c…064d 0x10
0x064d…064e 0x8b
0x064e…0659 »GOTO TOTAK3«
0x0659…065a 0x3a
0x065a…065b 0x86
0x065b…0661 »slet C«
0x0661…0662 0x03
0x0662…0663 0x82
0x0663…0665 »OF«
0x0665…0666 0x10
0x0666…0667 0x85
0x0667…066c »SETON«
0x066c…066d 0x15
0x066d…066e 0x82
0x066e…0670 »66«
0x0670…0671 0x29
0x0671…0672 0x86
0x0672…0678 »slet C«
0x0678…0679 0x03
0x0679…067a 0x82
0x067a…067c »OF«
0x067c…067d 0x55
0x067d…067e 0x8b
0x067e…0689 »slet CORN49«
0x0689…068a 0x10
0x068a…068b 0x8a
0x068b…0695 »EXCPTOVERH«
0x0695…0696 0x3b
0x0696…0697 0x86
0x0697…069d »slet C«
0x069d…069e 0x15
0x069e…069f 0x85
0x069f…06a4 »SETOF«
0x06a4…06a5 0x15
0x06a5…06a6 0x84
0x06a6…06aa »OF66«
0x06aa…06ab 0x27
0x06ab…06ac 0x86
0x06ac…06b2 »slet C«
0x06b2…06b3 0x15
0x06b3…06b4 0x85
0x06b4…06b9 »SETON«
0x06b9…06ba 0x15
0x06ba…06bb 0x82
0x06bb…06bd »49«
0x06bd…06be 0x29
0x06be…06bf 0x86
0x06bf…06c5 »slet C«
0x06c5…06c6 0x15
0x06c6…06c7 0x8a
0x06c7…06d1 »EXCPTOVERL«
0x06d1…06d2 0x3b
0x06d2…06d3 0x86
0x06d3…06d9 »slet C«
0x06d9…06da 0x15
0x06da…06db 0x83
0x06db…06de »ADD«
0x06de…06df 0x02
0x06df…06e0 0x86
0x06e0…06e6 »NETKRE«
0x06e6…06e7 0x04
0x06e7…06e8 0x8a
0x06e8…06f2 »SUMOVS 112«
0x06f2…06f3 0x2c
0x06f3…06f4 0x86
0x06f4…06fa »slet C«
0x06fa…06fb 0x0b
0x06fb…06fc 0x86
0x06fc…0702 »TOTAK3«
0x0702…0703 0x04
0x0703…0704 0x83
0x0704…0707 »TAG«
0x0707…0708 0x42
0x0708…0709 0x05
0x0709…070a 0x81
0x070a…070b »C«
0x070b…070c 0x15
0x070c…070d 0x85
0x070d…0712 »SETOF«
0x0712…0713 0x15
0x0713…0714 0x82
0x0714…0716 »68«
0x0716…0717 0x29
0x0717…0718 0x05
0x0718…0719 0x81
0x0719…071a »C«
0x071a…071b 0x15
0x071b…071c 0x85
0x071c…0721 »ENDSR«
0x0721…0722 0x40
0x0722…0723 0x60
0x0723…0724 0x05
0x0724…0725 0x81
0x0725…0726 »O«
0x0726…0727 0x23
0x0727…0728 0x8d
0x0728…0735 »16 'OVERF@RT'«
0x0735…0736 0x2a
0x0736…0737 0x05
0x0737…0738 0x81
0x0738…0739 »O«
0x0739…073a 0x19
0x073a…073b 0x87
0x073b…0742 »SUMOVS1«
0x0742…0743 0x03
0x0743…0744 0x82
0x0744…0746 »31«
0x0746…0747 0x35
0x0747…0748 0x05
0x0748…0749 0x81
0x0749…074a »O«
0x074a…074b 0x08
0x074b…074c 0x81
0x074c…074d »E«
0x074d…074e 0x02
0x074e…074f 0x81
0x074f…0750 »1«
0x0750…0751 0x0d
0x0751…0752 0x85
0x0752…0757 »OVERL«
0x0757…0758 0x3c
0x0758…0759 0x86
0x0759…075f »{ndr O«
0x075f…0760 0x19
0x0760…0761 0x87
0x0761…0768 »PARTTO1«
0x0768…0769 0x03
0x0769…076a 0x82
0x076a…076c »31«
0x076c…076d 0x35
0x076d…076e 0x60
0x076e…076f 0x05
0x076f…0770 0x81
0x0770…0771 »O«
0x0771…0772 0x08
0x0772…0773 0x81
0x0773…0774 »E«
0x0774…0775 0x02
0x0775…0776 0x81
0x0776…0777 »2«
0x0777…0778 0x0d
0x0778…0779 0x84
0x0779…077d »SAML«
0x077d…077e 0x3d
0x077e…077f 0x05
0x077f…0780 0x81
0x0780…0781 »O«
0x0781…0782 0x14
0x0782…0783 0x82
0x0783…0785 »68«
0x0785…0786 0x0d
0x0786…0787 0x91
0x0787…0798 »15 'Kontantrabat'«
0x0798…0799 0x26
0x0799…079a 0x86
0x079a…07a0 »{ndr O«
0x07a0…07a1 0x14
0x07a1…07a2 0x82
0x07a2…07a4 »68«
0x07a4…07a5 0x03
0x07a5…07a6 0x88
0x07a6…07ae »RABUD LB«
0x07ae…07af 0x02
0x07af…07b0 0x82
0x07b0…07b2 »26«
0x07b2…07b3 0x35
0x07b3…07b4 0x05
0x07b4…07b5 0x81
0x07b5…07b6 »O«
0x07b6…07b7 0x08
0x07b7…07b8 0x83
0x07b8…07bb »E 2«
0x07bb…07bc 0x0e
0x07bc…07bd 0x84
0x07bd…07c1 »SAML«
0x07c1…07c2 0x3d
0x07c2…07c3 0x86
0x07c3…07c9 »{ndr O«
0x07c9…07ca 0x19
0x07ca…07cb 0x88
0x07cb…07d3 »PARTTO B«
0x07d3…07d4 0x02
0x07d4…07d5 0x84
0x07d5…07d9 »43 '«
0x07d9…07da 0x08
0x07da…07db 0x83
0x07db…07de »*&&«
0x07de…07df 0x02
0x07df…07e0 0x81
0x07e0…07e1 »'«
0x07e1…07e2 0x25
0x07e2…07e3 0x86
0x07e3…07e9 »slet O«
0x07e9…07ea 0x11
0x07ea…07eb 0x82
0x07eb…07ed »69«
0x07ed…07ee 0x10
0x07ee…07ef 0x92
0x07ef…0801 »43 '*************'«
0x0801…0802 0x25
0x0802…0803 0x05
0x0803…0804 0x8a
0x0804…080e »OGIROUDB E«
0x080e…080f 0x03
0x080f…0810 0x82
0x0810…0812 »04«
0x0812…0813 0x0b
0x0813…0814 0x86
0x0814…081a »GIRUDB«
0x081a…081b 0x3b
0x081b…081c 0x60
0x081c…081d 0x05
0x081d…081e 0x81
0x081e…081f »O«
0x081f…0820 0x08
0x0820…0821 0x81
0x0821…0822 »E«
0x0822…0823 0x02
0x0823…0824 0x81
0x0824…0825 »1«
0x0825…0826 0x0d
0x0826…0827 0x86
0x0827…082d »GIRUDB«
0x082d…082e 0x3b
0x082e…082f 0x05
0x082f…0830 0x81
0x0830…0831 »O«
0x0831…0832 0x14
0x0832…0833 0x82
0x0833…0835 »68«
0x0835…0836 0x0d
0x0836…0837 0x91
0x0837…0848 »15 'Kontantrabat'«
0x0848…0849 0x26
0x0849…084a 0x86
0x084a…0850 »{ndr O«
0x0850…0851 0x14
0x0851…0852 0x82
0x0852…0854 »68«
0x0854…0855 0x03
0x0855…0856 0x88
0x0856…085e »RABUD LB«
0x085e…085f 0x02
0x085f…0860 0x82
0x0860…0862 »26«
0x0862…0863 0x35
0x0863…0864 0x05
0x0864…0865 0x81
0x0865…0866 ».«
0x0866…0867 0x5a
0x0867…0868 0x05
0x0868…0869 0x81
0x0869…086a ».«
0x086a…086b 0x5a
0x086b…086c 0x86
0x086c…0872 »{ndr O«
0x0872…0873 0x08
0x0873…0874 0x81
0x0874…0875 »E«
0x0875…0876 0x02
0x0876…0877 0x81
0x0877…0878 »1«
0x0878…0879 0x0d
0x0879…087a 0x86
0x087a…0880 »GIRUDB«
0x0880…0881 0x3b
0x0881…0882 0x86
0x0882…0888 »{ndr O«
0x0888…0889 0x19
0x0889…088a 0x88
0x088a…0892 »PARTTO B«
0x0892…0893 0x02
0x0893…0894 0x84
0x0894…0898 »17 '«
0x0898…0899 0x08
0x0899…089a 0x83
0x089a…089d »*&&«
0x089d…089e 0x02
0x089e…089f 0x81
0x089f…08a0 »'«
0x08a0…08a1 0x25
0x08a1…08a2 0x05
0x08a2…08a3 0x81
0x08a3…08a4 »O«
0x08a4…08a5 0x19
0x08a5…08a6 0x86
0x08a6…08ac »*PLACE«
0x08ac…08ad 0x04
0x08ad…08ae 0x82
0x08ae…08b0 »42«
0x08b0…08b1 0x35
0x08b1…08b2 0x05
0x08b2…08b3 0x81
0x08b3…08b4 »O«
0x08b4…08b5 0x19
0x08b5…08b6 0x86
0x08b6…08bc »*PLACE«
0x08bc…08bd 0x04
0x08bd…08be 0x82
0x08be…08c0 »75«
0x08c0…08c1 0x35
0x08c1…08c2 0x86
0x08c2…08c8 »slet O«
0x08c8…08c9 0x08
0x08c9…08ca 0x81
0x08ca…08cb »E«
0x08cb…08cc 0x02
0x08cc…08cd 0x81
0x08cd…08ce »1«
0x08ce…08cf 0x05
0x08cf…08d0 0x82
0x08d0…08d2 »69«
0x08d2…08d3 0x06
0x08d3…08d4 0x86
0x08d4…08da »GIRUDB«
0x08da…08db 0x3b
0x08db…08dc 0x86
0x08dc…08e2 »slet O«
0x08e2…08e3 0x23
0x08e3…08e4 0x92
0x08e4…08f6 »17 '*************'«
0x08f6…08f7 0x25
0x08f7…08f8 0x86
0x08f8…08fe »slet O«
0x08fe…08ff 0x19
0x08ff…0900 0x86
0x0900…0906 »*PLACE«
0x0906…0907 0x04
0x0907…0908 0x82
0x0908…090a »42«
0x090a…090b 0x35
0x090b…090c 0x86
0x090c…0912 »slet O«
0x0912…0913 0x19
0x0913…0914 0x86
0x0914…091a »*PLACE«
0x091a…091b 0x04
0x091b…091c 0x82
0x091c…091e »75«
0x091e…091f 0x35
0x091f…0920 0x05
0x0920…0921 0x86
0x0921…0927 »OLISTE«
0x0927…0928 0x03
0x0928…0929 0x81
0x0929…092a »H«
0x092a…092b 0x02
0x092b…092c 0x83
0x092c…092f »202«
0x092f…0930 0x03
0x0930…0931 0x82
0x0931…0933 »1P«
0x0933…0934 0x47
0x0934…0935 0x60
0x0935…0936 0x09
0x0936…0937 0xbc
0x0937…0973 »Nedenst}ende subrutine indl{gges mellem de ¦vrige subrutiner«
0x0973…0974 0x1b
0x0974…0975 0x60
0x0975…0976 0x05
0x0976…0977 0xb6
0x0977…09ad »C*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*«
0x09ad…09ae 0x03
0x09ae…09af 0x8b
0x09af…09ba »P O S P O S«
0x09ba…09bb 0x17
0x09bb…09bc 0x05
0x09bc…09bd 0x82
0x09bd…09bf »C*«
0x09bf…09c0 0x37
0x09c0…09c1 0x8b
0x09c1…09cc »-----------«
0x09cc…09cd 0x17
0x09cd…09ce 0x05
0x09ce…09cf 0x82
0x09cf…09d1 »C*«
0x09d1…09d2 0x59
0x09d2…09d3 0x05
0x09d3…09d4 0x81
0x09d4…09d5 »C«
0x09d5…09d6 0x0b
0x09d6…09d7 0x86
0x09d7…09dd »POSPOS«
0x09dd…09de 0x04
0x09de…09df 0x85
0x09df…09e4 »BEGSR«
0x09e4…09e5 0x40
0x09e5…09e6 0x05
0x09e6…09e7 0x81
0x09e7…09e8 »C«
0x09e8…09e9 0x03
0x09e9…09ea 0x82
0x09ea…09ec »69«
0x09ec…09ed 0x10
0x09ed…09ee 0x8a
0x09ee…09f8 »GOTO CLOSE«
0x09f8…09f9 0x3b
0x09f9…09fa 0x05
0x09fa…09fb 0x81
0x09fb…09fc »C«
0x09fc…09fd 0x02
0x09fd…09fe 0x86
0x09fe…0a04 »N51 52«
0x0a04…0a05 0x52
0x0a05…0a06 0x05
0x0a06…0a07 0x86
0x0a07…0a0d »CORN51«
0x0a0d…0a0e 0x10
0x0a0e…0a0f 0x89
0x0a0f…0a18 »GOTO DONE«
0x0a18…0a19 0x3c
0x0a19…0a1a 0x05
0x0a1a…0a1b 0x81
0x0a1b…0a1c »C«
0x0a1c…0a1d 0x0b
0x0a1d…0a1e 0x85
0x0a1e…0a23 »COUNT«
0x0a23…0a24 0x05
0x0a24…0a25 0x86
0x0a25…0a2b »COMP 0«
0x0a2b…0a2c 0x16
0x0a2c…0a2d 0x84
0x0a2d…0a31 »5050«
0x0a31…0a32 0x25
0x0a32…0a33 0x05
0x0a33…0a34 0x81
0x0a34…0a35 »C«
0x0a35…0a36 0x03
0x0a36…0a37 0x82
0x0a37…0a39 »50«
0x0a39…0a3a 0x10
0x0a3a…0a3b 0x8a
0x0a3b…0a45 »GOTO CLOSE«
0x0a45…0a46 0x3b
0x0a46…0a47 0x05
0x0a47…0a48 0x81
0x0a48…0a49 »C«
0x0a49…0a4a 0x15
0x0a4a…0a4b 0x8b
0x0a4b…0a56 »Z-SUBNETKRE«
0x0a56…0a57 0x04
0x0a57…0a58 0x8a
0x0a58…0a62 »PARTTO 112«
0x0a62…0a63 0x2c
0x0a63…0a64 0x05
0x0a64…0a65 0x81
0x0a65…0a66 »C«
0x0a66…0a67 0x15
0x0a67…0a68 0x83
0x0a68…0a6b »SUB«
0x0a6b…0a6c 0x02
0x0a6c…0a6d 0x86
0x0a6d…0a73 »ADDONE«
0x0a73…0a74 0x04
0x0a74…0a75 0x86
0x0a75…0a7b »PARTTO«
0x0a7b…0a7c 0x30
0x0a7c…0a7d 0x05
0x0a7d…0a7e 0x81
0x0a7e…0a7f »C«
0x0a7f…0a80 0x15
0x0a80…0a81 0x8b
0x0a81…0a8c »Z-ADDSUMRAB«
0x0a8c…0a8d 0x04
0x0a8d…0a8e 0x85
0x0a8e…0a93 »RABUD«
0x0a93…0a94 0x06
0x0a94…0a95 0x84
0x0a95…0a99 »6868«
0x0a99…0a9a 0x27
0x0a9a…0a9b 0x05
0x0a9b…0a9c 0x81
0x0a9c…0a9d »C«
0x0a9d…0a9e 0x15
0x0a9e…0a9f 0x89
0x0a9f…0aa8 »GOTO DONE«
0x0aa8…0aa9 0x3c
0x0aa9…0aaa 0x05
0x0aaa…0aab 0x81
0x0aab…0aac »C«
0x0aac…0aad 0x0b
0x0aad…0aae 0x85
0x0aae…0ab3 »CLOSE«
0x0ab3…0ab4 0x05
0x0ab4…0ab5 0x83
0x0ab5…0ab8 »TAG«
0x0ab8…0ab9 0x42
0x0ab9…0aba 0x05
0x0aba…0abb 0x81
0x0abb…0abc »C«
0x0abc…0abd 0x0b
0x0abd…0abe 0x85
0x0abe…0ac3 »COUNT«
0x0ac3…0ac4 0x05
0x0ac4…0ac5 0x86
0x0ac5…0acb »COMP 0«
0x0acb…0acc 0x14
0x0acc…0acd 0x82
0x0acd…0acf »50«
0x0acf…0ad0 0x29
0x0ad0…0ad1 0x05
0x0ad1…0ad2 0x81
0x0ad2…0ad3 »C«
0x0ad3…0ad4 0x03
0x0ad4…0ad5 0x82
0x0ad5…0ad7 »50«
0x0ad7…0ad8 0x10
0x0ad8…0ad9 0x8a
0x0ad9…0ae3 »GOTO ANOTH«
0x0ae3…0ae4 0x3b
0x0ae4…0ae5 0x05
0x0ae5…0ae6 0x81
0x0ae6…0ae7 »C«
0x0ae7…0ae8 0x15
0x0ae8…0ae9 0x8b
0x0ae9…0af4 »Z-ADDSUMRAB«
0x0af4…0af5 0x04
0x0af5…0af6 0x85
0x0af6…0afb »RABUD«
0x0afb…0afc 0x03
0x0afc…0afd 0x87
0x0afd…0b04 »92 6868«
0x0b04…0b05 0x27
0x0b05…0b06 0x05
0x0b06…0b07 0x81
0x0b07…0b08 »C«
0x0b08…0b09 0x15
0x0b09…0b0a 0x8a
0x0b0a…0b14 »Z-ADDSUMMA«
0x0b14…0b15 0x05
0x0b15…0b16 0x86
0x0b16…0b1c »PARTTO«
0x0b1c…0b1d 0x30
0x0b1d…0b1e 0x05
0x0b1e…0b1f 0x81
0x0b1f…0b20 »C«
0x0b20…0b21 0x15
0x0b21…0b22 0x83
0x0b22…0b25 »ADD«
0x0b25…0b26 0x02
0x0b26…0b27 0x85
0x0b27…0b2c »RABUD«
0x0b2c…0b2d 0x05
0x0b2d…0b2e 0x86
0x0b2e…0b34 »PARTTO«
0x0b34…0b35 0x05
0x0b35…0b36 0x82
0x0b36…0b38 »52«
0x0b38…0b39 0x29
0x0b39…0b3a 0x05
0x0b3a…0b3b 0x81
0x0b3b…0b3c »C«
0x0b3c…0b3d 0x15
0x0b3d…0b3e 0x86
0x0b3e…0b44 »Z-ADD0«
0x0b44…0b45 0x09
0x0b45…0b46 0x86
0x0b46…0b4c »SUMRAB«
0x0b4c…0b4d 0x02
0x0b4d…0b4e 0x82
0x0b4e…0b50 »92«
0x0b50…0b51 0x2c
0x0b51…0b52 0x05
0x0b52…0b53 0x81
0x0b53…0b54 »C«
0x0b54…0b55 0x03
0x0b55…0b56 0x82
0x0b56…0b58 »52«
0x0b58…0b59 0x10
0x0b59…0b5a 0x89
0x0b5a…0b63 »GOTO DONE«
0x0b63…0b64 0x3c
0x0b64…0b65 0x05
0x0b65…0b66 0x81
0x0b66…0b67 »C«
0x0b67…0b68 0x0b
0x0b68…0b69 0x85
0x0b69…0b6e »ANOTH«
0x0b6e…0b6f 0x05
0x0b6f…0b70 0x83
0x0b70…0b73 »TAG«
0x0b73…0b74 0x42
0x0b74…0b75 0x05
0x0b75…0b76 0x81
0x0b76…0b77 »C«
0x0b77…0b78 0x15
0x0b78…0b79 0x83
0x0b79…0b7c »ADD«
0x0b7c…0b7d 0x02
0x0b7d…0b7e 0x81
0x0b7e…0b7f »1«
0x0b7f…0b80 0x09
0x0b80…0b81 0x85
0x0b81…0b86 »COUNT«
0x0b86…0b87 0x31
0x0b87…0b88 0x05
0x0b88…0b89 0x81
0x0b89…0b8a »C«
0x0b8a…0b8b 0x15
0x0b8b…0b8c 0x83
0x0b8c…0b8f »ADD«
0x0b8f…0b90 0x02
0x0b90…0b91 0x83
0x0b91…0b94 ».01«
0x0b94…0b95 0x07
0x0b95…0b96 0x86
0x0b96…0b9c »ADDONE«
0x0b9c…0b9d 0x30
0x0b9d…0b9e 0x05
0x0b9e…0b9f 0x81
0x0b9f…0ba0 »C«
0x0ba0…0ba1 0x15
0x0ba1…0ba2 0x88
0x0ba2…0baa »Z-ADD.01«
0x0baa…0bab 0x07
0x0bab…0bac 0x86
0x0bac…0bb2 »PARTTO«
0x0bb2…0bb3 0x30
0x0bb3…0bb4 0x05
0x0bb4…0bb5 0x81
0x0bb5…0bb6 »C«
0x0bb6…0bb7 0x0b
0x0bb7…0bb8 0x84
0x0bb8…0bbc »DONE«
0x0bbc…0bbd 0x06
0x0bbd…0bbe 0x83
0x0bbe…0bc1 »TAG«
0x0bc1…0bc2 0x42
0x0bc2…0bc3 0x05
0x0bc3…0bc4 0x81
0x0bc4…0bc5 »C«
0x0bc5…0bc6 0x03
0x0bc6…0bc7 0x82
0x0bc7…0bc9 »69«
0x0bc9…0bca 0x55
0x0bca…0bcb 0x05
0x0bcb…0bcc 0x86
0x0bcc…0bd2 »COR 51«
0x0bd2…0bd3 0x10
0x0bd3…0bd4 0x86
0x0bd4…0bda »Z-ADD0«
0x0bda…0bdb 0x09
0x0bdb…0bdc 0x85
0x0bdc…0be1 »SUMMA«
0x0be1…0be2 0x02
0x0be2…0be3 0x83
0x0be3…0be6 »112«
0x0be6…0be7 0x2c
0x0be7…0be8 0x05
0x0be8…0be9 0x81
0x0be9…0bea »C«
0x0bea…0beb 0x03
0x0beb…0bec 0x82
0x0bec…0bee »51«
0x0bee…0bef 0x10
0x0bef…0bf0 0x86
0x0bf0…0bf6 »Z-ADD0«
0x0bf6…0bf7 0x09
0x0bf7…0bf8 0x86
0x0bf8…0bfe »ADDONE«
0x0bfe…0bff 0x02
0x0bff…0c00 0x82
0x0c00…0c02 »32«
0x0c02…0c03 0x2c
0x0c03…0c04 0x05
0x0c04…0c05 0x81
0x0c05…0c06 »C«
0x0c06…0c07 0x03
0x0c07…0c08 0x82
0x0c08…0c0a »51«
0x0c0a…0c0b 0x10
0x0c0b…0c0c 0x86
0x0c0c…0c12 »Z-ADD0«
0x0c12…0c13 0x09
0x0c13…0c14 0x85
0x0c14…0c19 »COUNT«
0x0c19…0c1a 0x03
0x0c1a…0c1b 0x82
0x0c1b…0c1d »30«
0x0c1d…0c1e 0x2c
0x0c1e…0c1f 0x05
0x0c1f…0c20 0x81
0x0c20…0c21 »C«
0x0c21…0c22 0x03
0x0c22…0c23 0x82
0x0c23…0c25 »51«
0x0c25…0c26 0x10
0x0c26…0c27 0x86
0x0c27…0c2d »Z-ADD0«
0x0c2d…0c2e 0x09
0x0c2e…0c2f 0x86
0x0c2f…0c35 »SUMRAB«
0x0c35…0c36 0x02
0x0c36…0c37 0x82
0x0c37…0c39 »92«
0x0c39…0c3a 0x2c
0x0c3a…0c3b 0x05
0x0c3b…0c3c 0x81
0x0c3c…0c3d »C«
0x0c3d…0c3e 0x02
0x0c3e…0c3f 0x83
0x0c3f…0c42 »N51«
0x0c42…0c43 0x10
0x0c43…0c44 0x83
0x0c44…0c47 »ADD«
0x0c47…0c48 0x02
0x0c48…0c49 0x86
0x0c49…0c4f »RABATL«
0x0c4f…0c50 0x04
0x0c50…0c51 0x86
0x0c51…0c57 »SUMRAB«
0x0c57…0c58 0x30
0x0c58…0c59 0x05
0x0c59…0c5a 0x81
0x0c5a…0c5b »C«
0x0c5b…0c5c 0x02
0x0c5c…0c5d 0x83
0x0c5d…0c60 »N51«
0x0c60…0c61 0x10
0x0c61…0c62 0x83
0x0c62…0c65 »SUB«
0x0c65…0c66 0x02
0x0c66…0c67 0x85
0x0c67…0c6c »BEL@B«
0x0c6c…0c6d 0x05
0x0c6d…0c6e 0x85
0x0c6e…0c73 »SUMMA«
0x0c73…0c74 0x31
0x0c74…0c75 0x05
0x0c75…0c76 0x81
0x0c76…0c77 »C«
0x0c77…0c78 0x02
0x0c78…0c79 0x83
0x0c79…0c7c »N41«
0x0c7c…0c7d 0x10
0x0c7d…0c7e 0x8b
0x0c7e…0c89 »GOTO TOTAK3«
0x0c89…0c8a 0x3a
0x0c8a…0c8b 0x05
0x0c8b…0c8c 0x81
0x0c8c…0c8d »C«
0x0c8d…0c8e 0x02
0x0c8e…0c8f 0x86
0x0c8f…0c95 »N51N69«
0x0c95…0c96 0x0d
0x0c96…0c97 0x8b
0x0c97…0ca2 »GOTO TOTAK3«
0x0ca2…0ca3 0x3a
0x0ca3…0ca4 0x05
0x0ca4…0ca5 0x81
0x0ca5…0ca6 »C«
0x0ca6…0ca7 0x03
0x0ca7…0ca8 0x82
0x0ca8…0caa »OF«
0x0caa…0cab 0x10
0x0cab…0cac 0x85
0x0cac…0cb1 »SETON«
0x0cb1…0cb2 0x15
0x0cb2…0cb3 0x82
0x0cb3…0cb5 »66«
0x0cb5…0cb6 0x29
0x0cb6…0cb7 0x05
0x0cb7…0cb8 0x81
0x0cb8…0cb9 »C«
0x0cb9…0cba 0x03
0x0cba…0cbb 0x82
0x0cbb…0cbd »OF«
0x0cbd…0cbe 0x55
0x0cbe…0cbf 0x05
0x0cbf…0cc0 0x86
0x0cc0…0cc6 »CORN49«
0x0cc6…0cc7 0x10
0x0cc7…0cc8 0x8a
0x0cc8…0cd2 »EXCPTOVERH«
0x0cd2…0cd3 0x3b
0x0cd3…0cd4 0x05
0x0cd4…0cd5 0x81
0x0cd5…0cd6 »C«
0x0cd6…0cd7 0x15
0x0cd7…0cd8 0x85
0x0cd8…0cdd »SETOF«
0x0cdd…0cde 0x15
0x0cde…0cdf 0x84
0x0cdf…0ce3 »OF66«
0x0ce3…0ce4 0x27
0x0ce4…0ce5 0x05
0x0ce5…0ce6 0x81
0x0ce6…0ce7 »C«
0x0ce7…0ce8 0x15
0x0ce8…0ce9 0x85
0x0ce9…0cee »SETON«
0x0cee…0cef 0x15
0x0cef…0cf0 0x82
0x0cf0…0cf2 »49«
0x0cf2…0cf3 0x29
0x0cf3…0cf4 0x05
0x0cf4…0cf5 0x81
0x0cf5…0cf6 »C«
0x0cf6…0cf7 0x15
0x0cf7…0cf8 0x8a
0x0cf8…0d02 »EXCPTOVERL«
0x0d02…0d03 0x3b
0x0d03…0d04 0x05
0x0d04…0d05 0x81
0x0d05…0d06 »C«
0x0d06…0d07 0x15
0x0d07…0d08 0x83
0x0d08…0d0b »ADD«
0x0d0b…0d0c 0x02
0x0d0c…0d0d 0x86
0x0d0d…0d13 »PARTTO«
0x0d13…0d14 0x04
0x0d14…0d15 0x8a
0x0d15…0d1f »SUMOVS 112«
0x0d1f…0d20 0x2c
0x0d20…0d21 0x05
0x0d21…0d22 0x81
0x0d22…0d23 »C«
0x0d23…0d24 0x0b
0x0d24…0d25 0x86
0x0d25…0d2b »TOTAK3«
0x0d2b…0d2c 0x04
0x0d2c…0d2d 0x83
0x0d2d…0d30 »TAG«
0x0d30…0d31 0x42
0x0d31…0d32 0x05
0x0d32…0d33 0x81
0x0d33…0d34 »C«
0x0d34…0d35 0x15
0x0d35…0d36 0x85
0x0d36…0d3b »SETOF«
0x0d3b…0d3c 0x15
0x0d3c…0d3d 0x82
0x0d3d…0d3f »51«
0x0d3f…0d40 0x29
0x0d40…0d41 0x05
0x0d41…0d42 0x81
0x0d42…0d43 »C«
0x0d43…0d44 0x15
0x0d44…0d45 0x85
0x0d45…0d4a »ENDSR«
0x0d4a…0d4b 0x40
0x0d4b…0d4c 0x05
0x0d4c…0d4d 0xc2
0x0d4d…0d8f »C*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*«
0x0d8f…0d90 0x19
0x0d90…0d91 0x60
0x0d91…0d92 0x09
0x0d92…0d93 0xbb
0x0d93…0dce »Endelig indl{gges en sortering til en hj{lpefile $$.KPOS3 i«
0x0dce…0dcf 0x1c
0x0dcf…0dd0 0x09
0x0dd0…0dd1 0x93
0x0dd1…0de4 »procedure KREBET$$:«
0x0de4…0de5 0x44
0x0de5…0de6 0x60
0x0de6…0de7 0x8c
0x0de7…0df3 »// TAG VALG3«
0x0df3…0df4 0x54
0x0df4…0df5 0x91
0x0df5…0e06 »// REGION SIZE-64«
0x0e06…0e07 0x3e
0x0e07…0e08 0x88
0x0e08…0e10 »tilf¦jet«
0x0e10…0e11 0x09
0x0e11…0e12 0x8e
0x0e12…0e20 »// LOAD #GSORT«
0x0e20…0e21 0x41
0x0e21…0e22 0x81
0x0e22…0e23 »-«
0x0e23…0e24 0x10
0x0e24…0e25 0xaa
0x0e25…0e4f »// FILE NAME-INPUT,LABEL-$$.KPOST,DISP-SHR«
0x0e4f…0e50 0x25
0x0e50…0e51 0x81
0x0e51…0e52 »-«
0x0e52…0e53 0x10
0x0e53…0e54 0xc3
0x0e54…0e97 »// FILE NAME-OUTPUT,LABEL-$$.KPOS3,RECORDS-?F'A,$$.KPOST'?,RETAIN-J«
0x0e97…0e98 0x0c
0x0e98…0e99 0x81
0x0e99…0e9a »-«
0x0e9a…0e9b 0x10
0x0e9b…0e9c 0x86
0x0e9c…0ea2 »// RUN«
0x0ea2…0ea3 0x49
0x0ea3…0ea4 0x81
0x0ea4…0ea5 »-«
0x0ea5…0ea6 0x10
0x0ea6…0ea7 0x8b
0x0ea7…0eb2 »0001 HSORTR«
0x0eb2…0eb3 0x04
0x0eb3…0eb4 0x83
0x0eb4…0eb7 »17A«
0x0eb7…0eb8 0x08
0x0eb8…0eb9 0x86
0x0eb9…0ebf »3X 128«
0x0ebf…0ec0 0x2f
0x0ec0…0ec1 0x81
0x0ec1…0ec2 »-«
0x0ec2…0ec3 0x10
0x0ec3…0ec4 0x9b
0x0ec4…0edf »0002 I C 114 118EQC?L'2,5'?«
0x0edf…0ee0 0x34
0x0ee0…0ee1 0x81
0x0ee1…0ee2 »-«
0x0ee2…0ee3 0x10
0x0ee3…0ee4 0x88
0x0ee4…0eec »0004 FNC«
0x0eec…0eed 0x02
0x0eed…0eee 0x82
0x0eee…0ef0 »63«
0x0ef0…0ef1 0x02
0x0ef1…0ef2 0x82
0x0ef2…0ef4 »66«
0x0ef4…0ef5 0x17
0x0ef5…0ef6 0x86
0x0ef6…0efc »VALUTA«
0x0efc…0efd 0x22
0x0efd…0efe 0x81
0x0efe…0eff »-«
0x0eff…0f00 0x10
0x0f00…0f01 0x88
0x0f01…0f09 »0005 FND«
0x0f09…0f0a 0x03
0x0f0a…0f0b 0x81
0x0f0b…0f0c »1«
0x0f0c…0f0d 0x03
0x0f0d…0f0e 0x81
0x0f0e…0f0f »8«
0x0f0f…0f10 0x17
0x0f10…0f11 0x8a
0x0f11…0f1b »LEVERAND@R«
0x0f1b…0f1c 0x1e
0x0f1c…0f1d 0x81
0x0f1d…0f1e »-«
0x0f1e…0f1f 0x10
0x0f1f…0f20 0x88
0x0f20…0f28 »0004 FND«
0x0f28…0f29 0x02
0x0f29…0f2a 0x82
0x0f2a…0f2c »23«
0x0f2c…0f2d 0x02
0x0f2d…0f2e 0x82
0x0f2e…0f30 »23«
0x0f30…0f31 0x17
0x0f31…0f32 0x8c
0x0f32…0f3e »DEBET-KREDIT«
0x0f3e…0f3f 0x1c
0x0f3f…0f40 0x81
0x0f40…0f41 »-«
0x0f41…0f42 0x10
0x0f42…0f43 0x90
0x0f43…0f53 »0005 FND 119 122«
0x0f53…0f54 0x17
0x0f54…0f55 0x88
0x0f55…0f5d »LINIENR.«
0x0f5d…0f5e 0x20
0x0f5e…0f5f 0x81
0x0f5f…0f60 »-«
0x0f60…0f61 0x10
0x0f61…0f62 0x88
0x0f62…0f6a »0006 FDC«
0x0f6a…0f6b 0x03
0x0f6b…0f6c 0x85
0x0f6c…0f71 »1 128«
0x0f71…0f72 0x17
0x0f72…0f73 0x84
0x0f73…0f77 »POST«
0x0f77…0f78 0x24
0x0f78…0f79 0x81
0x0f79…0f7a »-«
0x0f7a…0f7b 0x10
0x0f7b…0f7c 0x86
0x0f7c…0f82 »// END«
0x0f82…0f83 0x49
0x0f83…0f84 0x88
0x0f84…0f8c »tilf¦jet«
0x0f8c…0f8d 0x09
0x0f8d…0f8e 0x9d
0x0f8e…0fab »// * 'Godkendelse af forslag'«
0x0fab…0fac 0x43
0x0fac…0fad 0x8e
0x0fad…0fbb »// LOAD KRE550«
0x0fbb…0fbc 0x52
0x0fbc…0fbd 0xac
0x0fbd…0fe9 »// FILE NAME-KPOS2,LABEL-$$.KPOS3,DISP-SHRRM«
0x0fe9…0fea 0x23
0x0fea…0feb 0x86
0x0feb…0ff1 »{ndret«
0x0ff1…0ff2 0x0b
0x0ff2…0ff3 0x60
0x0ff3…0ff4 0x00
0x0ff4…1000 91 61 61 40 d9 c5 c7 c9 d6 d5 40 e2 ┆j// REGION S┆