|
|
DataMuseum.dkPresents historical artifacts from the history of: Philips Data Systems |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Philips Data Systems Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metricsIndex: / A B C D E G H K L M O P R S T V X p ½
Length: 4702560 (0x47c160)
Description: Bits:30009689 Philips computer tape "600325"
Types: SimhTapContainer, ½" Magnetic Tape
| name | artifact |
|---|---|
| DK3270 | «none» |
| DK3270//OBJCT.OB | ⟦616adb530⟧ pts_type |
| DK3270/A:267.UF | ⟦f4d3e22ee⟧ pts_type |
| DK3270/A:3270.LM | ⟦12ac6bc87⟧ pts_type |
| DK3270/C267.UF | ⟦85a5614f6⟧ pts_type |
| DK3270/DATDIV.SC | ⟦b62c8993b⟧ pts_type |
| DK3270/KMD08.SC | ⟦92658237c⟧ pts_type |
| DK3270/OBDIR.UF | ⟦b8c85db90⟧ pts_type |
| DK3270/PRT.SC | ⟦b71f9cba0⟧ pts_type |
| DK3270/START.SC | ⟦1407d71a2⟧ pts_type |
| DK3270/TB3270.SC | ⟦7d0d3779c⟧ pts_type |
| DK3270/TEMP.SC | ⟦4048b5f91⟧ pts_type |
| DK3270/TEST.UF | ⟦078a32c2d⟧ pts_type |
| DK3270/VDUPRT.SC | ⟦a002b5ea7⟧ pts_type |
| REMIT2 | «none» |
| REMIT2//OBJCT.OB | ⟦c90da7d1b⟧ pts_type |
| REMIT2/ADM5.SC | ⟦4958c75aa⟧ pts_type |
| REMIT2/ADM5D.SC | ⟦146ab3b43⟧ pts_type |
| REMIT2/ADM5X.SC | ⟦b2e7e66b7⟧ pts_type |
| REMIT2/ADM6D.SC | ⟦0346d9083⟧ pts_type |
| REMIT2/BUDGET.SC | ⟦b02f75dc6⟧ pts_type |
| REMIT2/C080T.UF | ⟦5ede5c2d6⟧ pts_type |
| REMIT2/C167.UF | ⟦e3db5d976⟧ pts_type |
| REMIT2/C173.UF | ⟦fffafb283⟧ pts_type |
| REMIT2/C173X.UF | ⟦0697a6ca8⟧ pts_type |
| REMIT2/C221.UF | ⟦4fd84cf29⟧ pts_type |
| REMIT2/C235.UF | ⟦4fd84cf29⟧ pts_type |
| REMIT2/C261.UF | ⟦dd39a23c7⟧ pts_type |
| REMIT2/C267.UF | ⟦2e5101150⟧ pts_type |
| REMIT2/C267T.UF | ⟦a955ba3da⟧ pts_type |
| REMIT2/C305.UF | ⟦881fdf947⟧ pts_type |
| REMIT2/C379.UF | ⟦2f992d79d⟧ pts_type |
| REMIT2/C539.UF | ⟦0743f988f⟧ pts_type |
| REMIT2/C569.UF | ⟦76293d45a⟧ pts_type |
| REMIT2/C805.UF | ⟦ee6f62da0⟧ pts_type |
| REMIT2/C805T.UF | ⟦e7a9a6ca2⟧ pts_type |
| REMIT2/C821.UF | ⟦8ce88037b⟧ pts_type |
| REMIT2/C821X.UF | ⟦79ab16b15⟧ pts_type |
| REMIT2/C975.UF | ⟦1e1a95a32⟧ pts_type |
| REMIT2/C976.UF | ⟦1d022e824⟧ pts_type |
| REMIT2/C976A.UF | ⟦50edb8185⟧ pts_type |
| REMIT2/C980.UF | ⟦fc2d15f35⟧ pts_type |
| REMIT2/C999.UF | ⟦ab294b465⟧ pts_type |
| REMIT2/CONRD.UF | ⟦df57af75a⟧ pts_type |
| REMIT2/CONRT.UF | ⟦bcfffa7f4⟧ pts_type |
| REMIT2/CTAB02.SC | ⟦5503eb2c4⟧ pts_type |
| REMIT2/CTAB03.SC | ⟦b6de2c647⟧ pts_type |
| REMIT2/CTAB04.SC | ⟦05e245324⟧ pts_type |
| REMIT2/CTST.UF | ⟦ece0586ad⟧ pts_type |
| REMIT2/D539.UF | ⟦2a018495d⟧ pts_type |
| REMIT2/D569.UF | ⟦63074951a⟧ pts_type |
| REMIT2/DC82.SC | ⟦103aa399a⟧ pts_type |
| REMIT2/DCTSK.SC | ⟦4f23ac942⟧ pts_type |
| REMIT2/DIV167.SC | ⟦d036ae71f⟧ pts_type |
| REMIT2/DIV259.SC | ⟦619233d6e⟧ pts_type |
| REMIT2/DIV267.SC | ⟦fc7127009⟧ pts_type |
| REMIT2/DIV461.SC | ⟦8cbeb0a71⟧ pts_type |
| REMIT2/DIV499.SC | ⟦dfb3fcc0c⟧ pts_type |
| REMIT2/DIV525.SC | ⟦0b08e7aaa⟧ pts_type |
| REMIT2/DIV539.SC | ⟦6070b929f⟧ pts_type |
| REMIT2/DIV569.SC | ⟦f0d022fe6⟧ pts_type |
| REMIT2/DIV743.SC | ⟦d12b9c379⟧ pts_type |
| REMIT2/DIV805.SC | ⟦ec1cb8dc1⟧ pts_type |
| REMIT2/DIVFMT.SC | ⟦8b25753ea⟧ pts_type |
| REMIT2/DKSUBS.SC | ⟦d15e7c358⟧ pts_type |
| REMIT2/DUMMY.SC | ⟦994add402⟧ pts_type |
| REMIT2/EQUATE.SC | ⟦741cd4bca⟧ pts_type |
| REMIT2/EQULST.SC | ⟦2ccf9c6ec⟧ pts_type |
| REMIT2/GEN.UF | ⟦0b474ffe5⟧ pts_type |
| REMIT2/KEY167.SC | ⟦fc82b4531⟧ pts_type |
| REMIT2/KEY221.SC | ⟦d50fbf8b3⟧ pts_type |
| REMIT2/KEY235.SC | ⟦9017666ee⟧ pts_type |
| REMIT2/KEY261.SC | ⟦b46b7684f⟧ pts_type |
| REMIT2/KEY461.SC | ⟦fb32c10a3⟧ pts_type |
| REMIT2/KEY525.SC | ⟦6b6680a55⟧ pts_type |
| REMIT2/KEY539.SC | ⟦4f0608fae⟧ pts_type |
| REMIT2/KEY569.SC | ⟦4f0608fae⟧ pts_type |
| REMIT2/KEY787.SC | ⟦55716102b⟧ pts_type |
| REMIT2/KEY821.SC | ⟦56c2fc56c⟧ pts_type |
| REMIT2/KEYCOP.SC | ⟦d50fbf8b3⟧ pts_type |
| REMIT2/KM080T.UF | ⟦a42ab3b93⟧ pts_type |
| REMIT2/KM167.UF | ⟦da0ed2547⟧ pts_type |
| REMIT2/KM173.UF | ⟦f8c816b6e⟧ pts_type |
| REMIT2/KM173X.UF | ⟦31720648c⟧ pts_type |
| REMIT2/KM221.UF | ⟦d9e33003f⟧ pts_type |
| REMIT2/KM235.UF | ⟦4d8d84ea2⟧ pts_type |
| REMIT2/KM261.UF | ⟦ea09fb0a0⟧ pts_type |
| REMIT2/KM267.UF | ⟦2a1f2f5ad⟧ pts_type |
| REMIT2/KM305.UF | ⟦53a24a15f⟧ pts_type |
| REMIT2/KM379.UF | ⟦ba93a777f⟧ pts_type |
| REMIT2/KM441.UF | ⟦ca5616423⟧ pts_type |
| REMIT2/KM499.UF | ⟦2e293edce⟧ pts_type |
| REMIT2/KM539.UF | ⟦a3901d625⟧ pts_type |
| REMIT2/KM539D.UF | ⟦aeaea81c5⟧ pts_type |
| REMIT2/KM569.UF | ⟦380246843⟧ pts_type |
| REMIT2/KM569D.UF | ⟦d5becf952⟧ pts_type |
| REMIT2/KM569X.UF | ⟦34a802369⟧ pts_type |
| REMIT2/KM805.UF | ⟦36166756e⟧ pts_type |
| REMIT2/KM821.UF | ⟦6042d2229⟧ pts_type |
| REMIT2/KM821X.UF | ⟦b4d09c2db⟧ pts_type |
| REMIT2/KM975.UF | ⟦aa449d20c⟧ pts_type |
| REMIT2/KM976.UF | ⟦7cf9b74ae⟧ pts_type |
| REMIT2/KM980.UF | ⟦dbd3dd59d⟧ pts_type |
| REMIT2/KM999.UF | ⟦040f8c433⟧ pts_type |
| REMIT2/KMD08.SC | ⟦2233f8b8e⟧ pts_type |
| REMIT2/KMDFIL.UF | ⟦4f37a16bc⟧ pts_type |
| REMIT2/KMDIO.SC | ⟦210bc85f6⟧ pts_type |
| REMIT2/KMREMD.UF | ⟦062cd51a2⟧ pts_type |
| REMIT2/KMREMP.UF | ⟦6238c773c⟧ pts_type |
| REMIT2/KMREMT.UF | ⟦ac34419c8⟧ pts_type |
| REMIT2/KT805.UF | ⟦cc73dd3d4⟧ pts_type |
| REMIT2/KTOPR.SC | ⟦d244089da⟧ pts_type |
| REMIT2/KTOPRD.SC | ⟦f61236ae0⟧ pts_type |
| REMIT2/KTPLN.SC | ⟦f16fca2b2⟧ pts_type |
| REMIT2/KTPLND.SC | ⟦cc41a4d5f⟧ pts_type |
| REMIT2/KY6272.SC | ⟦a2d86f45a⟧ pts_type |
| REMIT2/LEDFIL.UF | ⟦862eaec8f⟧ pts_type |
| REMIT2/M:PROC.UF | ⟦1028c0a03⟧ pts_type |
| REMIT2/OBDIR.UF | ⟦9a2df3cc7⟧ pts_type |
| REMIT2/PRTX.SC | ⟦532263810⟧ pts_type |
| REMIT2/RAADUM.SC | ⟦d421b24cb⟧ pts_type |
| REMIT2/REMBDS.SC | ⟦7d11284e0⟧ pts_type |
| REMIT2/REMBDT.SC | ⟦758174c1d⟧ pts_type |
| REMIT2/REMDUM.SC | ⟦5efd50c1f⟧ pts_type |
| REMIT2/REMFMS.SC | ⟦ae38d70fa⟧ pts_type |
| REMIT2/REMFMT.SC | ⟦9ffd4ccd7⟧ pts_type |
| REMIT2/REMLEV.SC | ⟦c57713587⟧ pts_type |
| REMIT2/REMPRT.SC | ⟦4a340bcb1⟧ pts_type |
| REMIT2/REMSUB.SC | ⟦525d634ec⟧ pts_type |
| REMIT2/REMTR.SC | ⟦6a1e19832⟧ pts_type |
| REMIT2/REMTXT.SC | ⟦b855169cb⟧ pts_type |
| REMIT2/RGADM.SC | ⟦c87caed30⟧ pts_type |
| REMIT2/RGFRMT.SC | ⟦528d0ec75⟧ pts_type |
| REMIT2/RGKLAR.SC | ⟦3385e6621⟧ pts_type |
| REMIT2/RGL080.LM | ⟦7a20f21ec⟧ pts_type |
| REMIT2/RGLIST.UF | ⟦74bf51561⟧ pts_type |
| REMIT2/RGLOAD.LM | ⟦f688c812b⟧ pts_type |
| REMIT2/RGMAIN.SC | ⟦28b38b078⟧ pts_type |
| REMIT2/RGMND.SC | ⟦321679fb4⟧ pts_type |
| REMIT2/RGSTRT.SC | ⟦34dfd104c⟧ pts_type |
| REMIT2/RGSUB1.SC | ⟦002853d70⟧ pts_type |
| REMIT2/RGSUB2.SC | ⟦a007ec7c4⟧ pts_type |
| REMIT2/RGSUB3.SC | ⟦80645bd8c⟧ pts_type |
| REMIT2/RGSUB4.SC | ⟦8b61dc1c0⟧ pts_type |
| REMIT2/RGSUBS.SC | ⟦130ab3759⟧ pts_type |
| REMIT2/SCREEN.SC | ⟦c05f90bef⟧ pts_type |
| REMIT2/SL167.SC | ⟦1667164ec⟧ pts_type |
| REMIT2/SL261.SC | ⟦a2fbabfd3⟧ pts_type |
| REMIT2/SL461.SC | ⟦4dfd4d6ac⟧ pts_type |
| REMIT2/SL525.SC | ⟦b5fdb1c98⟧ pts_type |
| REMIT2/SL6272.SC | ⟦810381712⟧ pts_type |
| REMIT2/SL787.SC | ⟦0c0021f4f⟧ pts_type |
| REMIT2/SLCOP.SC | ⟦b04bd0f61⟧ pts_type |
| REMIT2/STARTX.SC | ⟦ebefe5e63⟧ pts_type |
| REMIT2/SUBAPL.SC | ⟦87d392eef⟧ pts_type |
| REMIT2/T539.UF | ⟦b0695fe7a⟧ pts_type |
| REMIT2/T805.UF | ⟦591fb11a0⟧ pts_type |
| REMIT2/T821.UF | ⟦a235fe458⟧ pts_type |
| REMIT2/TB3270.SC | ⟦9786c0325⟧ pts_type |
| REMIT2/TST221.UF | ⟦91a8dd8cb⟧ pts_type |
| REMIT2/VDUPRX.SC | ⟦878553586⟧ pts_type |
| REMIT2 | «none» |
| REMIT2//OBJCT.OB | ⟦b4c958de3⟧ pts_type |
| REMIT2/ADM6.SC | ⟦84a9568ba⟧ pts_type |
| REMIT2/ADM6D.SC | ⟦0346d9083⟧ pts_type |
| REMIT2/C173.UF | ⟦c2f8a4963⟧ pts_type |
| REMIT2/C379.UF | ⟦2f992d79d⟧ pts_type |
| REMIT2/C805.UF | ⟦582f3d4bf⟧ pts_type |
| REMIT2/C805T.UF | ⟦e7a9a6ca2⟧ pts_type |
| REMIT2/CONNJ.UF | ⟦267e8d6e3⟧ pts_type |
| REMIT2/CONNJ1.UF | ⟦cd4fd823e⟧ pts_type |
| REMIT2/CONNJ2.UF | ⟦051f29719⟧ pts_type |
| REMIT2/CONNJ3.UF | ⟦baf246cab⟧ pts_type |
| REMIT2/CONNJ4.UF | ⟦c34d42540⟧ pts_type |
| REMIT2/CONNJ5.UF | ⟦aa8f0851f⟧ pts_type |
| REMIT2/CONNJ6.UF | ⟦796b816f7⟧ pts_type |
| REMIT2/CONNJ7.UF | ⟦051f29719⟧ pts_type |
| REMIT2/CONNJ8.UF | ⟦ec965d600⟧ pts_type |
| REMIT2/CONNJ9.UF | ⟦abafe4c5e⟧ pts_type |
| REMIT2/CONNJT.UF | ⟦a7d9ee75a⟧ pts_type |
| REMIT2/CONREM.UF | ⟦b5d49e6dc⟧ pts_type |
| REMIT2/CONRF.UF | ⟦2d95148e9⟧ pts_type |
| REMIT2/CONRS2.UF | ⟦0593819a0⟧ pts_type |
| REMIT2/CONRST.UF | ⟦245287894⟧ pts_type |
| REMIT2/CONRT.UF | ⟦24c194bfa⟧ pts_type |
| REMIT2/DC82.SC | ⟦103aa399a⟧ pts_type |
| REMIT2/DCTSK.SC | ⟦321b69bc3⟧ pts_type |
| REMIT2/DIV167.SC | ⟦f950bbddf⟧ pts_type |
| REMIT2/DIV259.SC | ⟦619233d6e⟧ pts_type |
| REMIT2/DIV461.SC | ⟦ccdcb071c⟧ pts_type |
| REMIT2/DIV525.SC | ⟦0b08e7aaa⟧ pts_type |
| REMIT2/DIV743.SC | ⟦8892e8f49⟧ pts_type |
| REMIT2/DIV805.SC | ⟦8444f2469⟧ pts_type |
| REMIT2/DIVFMT.SC | ⟦eda8a50ad⟧ pts_type |
| REMIT2/DKEBCD.SC | ⟦3ce4ce33a⟧ pts_type |
| REMIT2/DKLD.LM | ⟦7b7e91148⟧ pts_type |
| REMIT2/DKLICO.SC | ⟦5461ec3e2⟧ pts_type |
| REMIT2/DKSUBS.SC | ⟦544e7b827⟧ pts_type |
| REMIT2/DUMMY.SC | ⟦81b924b44⟧ pts_type |
| REMIT2/EQUATE.SC | ⟦611578ae7⟧ pts_type |
| REMIT2/EQULST.SC | ⟦2ccf9c6ec⟧ pts_type |
| REMIT2/HELP.UF | ⟦ebcac101f⟧ pts_type |
| REMIT2/KEY167.SC | ⟦d62c95a92⟧ pts_type |
| REMIT2/KEY461.SC | ⟦fb32c10a3⟧ pts_type |
| REMIT2/KEY525.SC | ⟦6b6680a55⟧ pts_type |
| REMIT2/KEY787.SC | ⟦55716102b⟧ pts_type |
| REMIT2/KEYCOP.SC | ⟦d50fbf8b3⟧ pts_type |
| REMIT2/KM080.UF | ⟦332d2cb51⟧ pts_type |
| REMIT2/KM0801.UF | ⟦810f26fe6⟧ pts_type |
| REMIT2/KM0802.UF | ⟦f007c1d7b⟧ pts_type |
| REMIT2/KM0803.UF | ⟦bdb0a34a8⟧ pts_type |
| REMIT2/KM0804.UF | ⟦b15799e94⟧ pts_type |
| REMIT2/KM0805.UF | ⟦b3d2d39ee⟧ pts_type |
| REMIT2/KM0806.UF | ⟦0d259af94⟧ pts_type |
| REMIT2/KM0807.UF | ⟦5d69cb820⟧ pts_type |
| REMIT2/KM0808.UF | ⟦cb7dafcf8⟧ pts_type |
| REMIT2/KM0809.UF | ⟦e811577ff⟧ pts_type |
| REMIT2/KM173.UF | ⟦b80572544⟧ pts_type |
| REMIT2/KM379.UF | ⟦21f638059⟧ pts_type |
| REMIT2/KM805.UF | ⟦d4ed3811f⟧ pts_type |
| REMIT2/KMD08.SC | ⟦92658237c⟧ pts_type |
| REMIT2/KMD08T.SC | ⟦77235c22a⟧ pts_type |
| REMIT2/KMDFIL.UF | ⟦286c36eba⟧ pts_type |
| REMIT2/KMDIO.SC | ⟦e13ca7ea1⟧ pts_type |
| REMIT2/KMDNR.UF | ⟦20192f93f⟧ pts_type |
| REMIT2/KMREMF.UF | ⟦65f1af8c4⟧ pts_type |
| REMIT2/KMREMP.UF | ⟦a8b3a5981⟧ pts_type |
| REMIT2/KMREMT.UF | ⟦ba820be71⟧ pts_type |
| REMIT2/KT805.UF | ⟦cc73dd3d4⟧ pts_type |
| REMIT2/KTOPR.SC | ⟦45f4d65ef⟧ pts_type |
| REMIT2/KTOPRD.SC | ⟦efb8768aa⟧ pts_type |
| REMIT2/KTPLN.SC | ⟦87829e542⟧ pts_type |
| REMIT2/KTPLND.SC | ⟦cc41a4d5f⟧ pts_type |
| REMIT2/LEDFIL.UF | ⟦b587b026d⟧ pts_type |
| REMIT2/LEDLS.UF | ⟦7d208e152⟧ pts_type |
| REMIT2/LISTE.UF | ⟦fcc4e0bfe⟧ pts_type |
| REMIT2/M:PROC.UF | ⟦5f6e10d6f⟧ pts_type |
| REMIT2/OBDIR.UF | ⟦0da740ff5⟧ pts_type |
| REMIT2/PRT.SC | ⟦33f86b330⟧ pts_type |
| REMIT2/RELUP.UF | ⟦51d2ec5e0⟧ pts_type |
| REMIT2/REMFMT.SC | ⟦511bc663a⟧ pts_type |
| REMIT2/REMLEV.SC | ⟦24bac634d⟧ pts_type |
| REMIT2/REMTXT.SC | ⟦25e8a241b⟧ pts_type |
| REMIT2/REORG.UF | ⟦67117c415⟧ pts_type |
| REMIT2/RGADM.SC | ⟦cccf90423⟧ pts_type |
| REMIT2/RGFRMT.SC | ⟦706cdf173⟧ pts_type |
| REMIT2/RGLIST.UF | ⟦32c90c650⟧ pts_type |
| REMIT2/RGLOAD.LM | ⟦df105ab5b⟧ pts_type |
| REMIT2/RGMAIN.SC | ⟦00bd9881e⟧ pts_type |
| REMIT2/RGMND.SC | ⟦321679fb4⟧ pts_type |
| REMIT2/RGOBJ.UF | ⟦0b6c6c7de⟧ pts_type |
| REMIT2/RGSTRT.SC | ⟦83d9c60e6⟧ pts_type |
| REMIT2/RGSUB1.SC | ⟦f63387f0e⟧ pts_type |
| REMIT2/RGSUB2.SC | ⟦a52a08f57⟧ pts_type |
| REMIT2/RGSUB3.SC | ⟦b84ce9ab9⟧ pts_type |
| REMIT2/RGSUBS.SC | ⟦0785f92c1⟧ pts_type |
| REMIT2/RGTEST.LM | ⟦b7b25c246⟧ pts_type |
| REMIT2/RUNOBX.UF | ⟦8410c5bf0⟧ pts_type |
| REMIT2/SCREEN.SC | ⟦b1c710bb4⟧ pts_type |
| REMIT2/SL167.SC | ⟦1667164ec⟧ pts_type |
| REMIT2/SL461.SC | ⟦b45eead5e⟧ pts_type |
| REMIT2/SL525.SC | ⟦b5fdb1c98⟧ pts_type |
| REMIT2/SL787.SC | ⟦0c0021f4f⟧ pts_type |
| REMIT2/SLCOP.SC | ⟦25ca56959⟧ pts_type |
| REMIT2/START.SC | ⟦1407d71a2⟧ pts_type |
| REMIT2/SUBAPL.SC | ⟦ca992d767⟧ pts_type |
| REMIT2/TB3270.SC | ⟦7d0d3779c⟧ pts_type |
| REMIT2/TEST.SC | ⟦6a5045703⟧ pts_type |
| REMIT2/TEST.UF | ⟦e33d1d73b⟧ pts_type |
| REMIT2/VDUPRT.SC | ⟦a002b5ea7⟧ pts_type |
| REMIT2/X.UF | ⟦d0c538b29⟧ pts_type |
0x000000…000ca0 (0, 0) DirGranule ((0, 0)) {
0x000000…000ca0 DirEnt {nam=»REMIT2«, typ=» «, f00=0x0000, f01=0x0000, f02=0x0010, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KM080T«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0a08, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»C080T «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0a18, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»RGL080«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0a20, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KMD08 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0ad0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»DUMMY «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0b30, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»M:PROC«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0b38, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»EQUATE«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0b48, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»DKSUBS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0b58, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»EQULST«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0ba8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KEY569«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0bb0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CTST «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0bb8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»SCREEN«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0bc0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»/OBJCT«, typ=»OB«, f00=0x0000, f01=0x0000, f02=0x0bf8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»LEDFIL«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1118, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»SL461 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1128, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»SUBAPL«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1138, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»RGMAIN«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1198, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»RGFRMT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x11c0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»RGSUBS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1208, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»DIVFMT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1248, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KMDIO «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x12a0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»RGSUB1«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x12e0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»RGSUB2«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1308, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»GEN «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1318, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»RGLIST«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1328, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CONRT «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1330, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KM173 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1338, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KM261 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1350, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»RGSTRT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1360, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»C261 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1398, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KEY235«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x13a0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»RGLOAD«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x13a8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»RGADM «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1448, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»C999 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x14b8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KM221 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x14c0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KMDFIL«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x14d0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KY6272«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x14e0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»SL6272«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x14e8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»DIV539«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x14f8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»RGSUB3«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1558, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»C221 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1570, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KTPLN «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1578, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KM267 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1590, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»DIV267«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x15a0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»C267 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1600, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KTPLND«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1610, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KTOPR «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1618, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KTOPRD«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1630, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»RGMND «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1638, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»DCTSK «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1640, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»ADM6D «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1650, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KEY461«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1658, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»TB3270«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1660, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KM569X«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1670, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»D569 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1680, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KM999 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1688, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»TST221«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1698, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KM975 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x16a8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»C975 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x16c0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KM976 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x16c8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»C976 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x16d8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»C976A «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x16e0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»REMTXT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x16e8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»REMFMT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1708, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»DIV461«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1728, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»DIV167«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1780, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»DIV259«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x17d0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»DIV805«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1820, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»DIV525«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1880, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»DIV743«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x18d0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»SL525 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1920, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»SL167 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1938, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»SL787 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1950, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KEY525«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1968, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KEY167«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1970, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KEY787«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1978, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»REMLEV«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1980, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»ADM5 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x19d8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»ADM5X «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x19e8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CONRD «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x19f8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KMREMT«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1a00, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KMREMP«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1a10, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»RGKLAR«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1a20, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KMREMD«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1a70, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»OBDIR «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1a80, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»DC82 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1aa0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KEYCOP«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1ab0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»SLCOP «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1ab8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»C173 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1ac8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KM379 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1ad0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»C379 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1ae0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KM805 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1ae8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»C805 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1af8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KT805 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1b00, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»T805 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1b10, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»T821 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1b18, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»C805T «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1b20, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KM821 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1b28, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»C821 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1b38, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KEY821«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1b40, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KM821X«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1b48, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»RGSUB4«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1b58, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KM173X«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1b70, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»REMTR «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1b80, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KM539 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1bd8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»C539 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1be8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KM569 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1bf0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»C569 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1c00, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CTAB02«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c08, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CTAB04«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c10, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CTAB03«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c18, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»T539 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1c20, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KM539D«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1c28, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»D539 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1c38, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KEY221«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c40, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»REMBDT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c48, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»REMPRT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c80, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»REMSUB«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c98, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KM167 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1ca8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»BUDGET«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1cb8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KM235 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1d00, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»C173X «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1d10, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»C821X «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1d18, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»C235 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1d20, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KEY539«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1d28, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»REMBDS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1d30, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»REMFMS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1d48, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»ADM5D «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1d60, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KM569D«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1d68, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»C167 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1d78, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»STARTX«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1d80, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»VDUPRX«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1e10, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»REMDUM«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1e70, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»PRTX «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1e80, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KM305 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1eb0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»C305 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1ec0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»DIV499«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1ec8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KM441 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1f18, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KM499 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1f28, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»DIV569«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0758, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KEY261«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1f90, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»SL261 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1fa0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»C267T «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1fb8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»KM980 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1fc0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»C980 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1fd0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»RAADUM«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1fd8, f03=0x0000}
0x000000…000ca0 }
0x000ca0…000e34 (0, 1) Opaque[0x194]
0x000e34…000fc8 # DirEnt {nam=»KM080T«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0a08, f03=0x0000}
0x000e34…000fc8 IdxSect {
0x000e34…000fc8 f00 = 0x0050 // 0xe34 @0x0
0x000e34…000fc8 f01 = 0x0004 // 0xe36 @0x2
0x000e34…000fc8 gno = [ // 0xe38 @0x4
0x000e34…000fc8 [0x00]: C0x0050.0x1.0
0x000e34…000fc8 [0x01]: C0x0050.0x2.0
0x000e34…000fc8 ]
0x000e34…000fc8 }
0x000fc8…00115c Dummy {f00=0x0050, f01=0x0190, f02=» PPRT KM080T PPRT C080T PMES TEST NJ-AMT, REMITTERING ( PMES BUDGET L PSCR ^ PLED KMD08 j P!!CH $$EJECT$$ $$ | P!!CH $$'26'$$'22'$$ P!!CH $$(26)$$(22)$$ P!!CH $$-4$$4$$ P!!RE 41,$$56$$100$$ P!!RE 58,
0x00115c…0012f0 Dummy {f00=0x0050, f01=0x0190, f02=»,$$FALSE$$TRUE$$ CKTFLAG & P!!RE 242,$$FALSE$$FALSE$$ CCLKTFLG & P!!RE 243,$$FALSE$$FALSE$$ CTESTFLG J & P!!RE 244,$$FALSE$$FALSE$$ CTRVALG t $ P!!RE 245,$$FALSE$$FALSE$$ CFLT46 $ P!!RE 246,$$FALSE$$FALSE$$ CFLT48 $ P!!RE 247,$$TRUE$$FALSE$$ C
0x0012f0…001484 Dummy {f00=0x0050, f01=0x0190, f02=» & P!!RE 251,$$FALSE$$FALSE$$ C5MDISK $ P!!RE 252,$$TRUE$$FALSE$$ CKASFLG . $ P!!RE 253,$$TRUE$$TRUE$$ CSLDFLG V & P!!RE 254,$$FALSE$$FALSE$$CGLREGFL ~ & P!!RE 255,$$FALSE$$FALSE$$ CCONVERT & P!!RE 279,$$FALSE$$TRUE$$ CREMITFL P!!RE 287,$$F
0x001484…001618 Dummy {f00=0x0050, f01=0x0190, f02=»LG r P!!DL 331 6 PCFLAG BINI (12,2),X'00F1',X'0000',X'00E8',X'0000' $ P!!RE 361,$$FALSE$$TRUE$$ BUDGET T $ P!!RE 362,$$FALSE$$TRUE$$ FAKT10 | " P!!RE 363,$$FALSE$$TRUE$$ 90-94 , P!!RE 366,$$FALSE$$TRUE$$ HJORRING CHECKS 0 P!!RE 416,$$010
0x001618…0017ac Dummy {f00=0x0050, f01=0x018e, f02=»J-AMT$$ | P!!RE 495,$$5$$1$$ CKTTOP P!!DL 496,497 0 PFROMTX STRGI (12)2C' ' D P!!DL 817,1091 RK d P!!DL 1095,1105 | P!!DL 1107 RK P!!DL 1109,1112 P!!DL 1115 P!!DL 1120 P!!DL 1132,1152 P!!DL 1153,1172 RK
0x0017ac…001940 Dummy {f00=0x0050, f01=0x0190, f02=» PINC DIV539 PNOD R PINC SCREEN ( PINC RGSUB4 : PINC RGSTRT L PNOD R ^ PINC RGMAIN l PINC RGSUBS ~ PINC RGSUB1 PINC RGSUB2 PINC RGSUB3 PNOD R PINC RGKLAR PINC KTPLN PINC KTOPR
0x001940…001ad4 (0, 2) Dummy {f00=0x0050, f01=0x0190, f02=»KMDIO PINC DKSUBS PINC RAADUM PNOD R 2 PINC RGFRMT @ PINC REMFMT R PNOD R d PINC REMLEV r PINC ADM6D PNOD R PINC REMTR PLED REMBDT " P!!DL 120,172 BCHK00 -> BCHK90 P!!EN PTRA /S,NL
0x001ad4…001c68 Dummy {f00=0x0050, f01=0x003e, f02=»S $PDISC M=M:92NA,MU=M:92NA,A=RGL080,C=C080T P$ASG2 4 PINC RGFRMT @ PINC REMFMT R PNOD R d PINC REMLEV r PINC ADM6D PNOD R PINC REMTR PLED REMBDT " P!!DL 120,172 BCHK00 -> BCHK90 P!!EN PTRA /S,NL
0x001c68…001dfc Dummy {f00=0x0050, f01=0x2008, f02=» M=M:92NA,MU=M:92NA,A=RGL080,C=C080T P$ASG2 4 PINC RGFRMT @ PINC REMFMT R PNOD R d PINC REMLEV r PINC ADM6D PNOD R PINC REMTR PLED REMBDT " P!!DL 120,172 BCHK00 -> BCHK90 P!!EN PTRA /S,NL
0x001dfc…001f90 Dummy {f00=0x0050, f01=0x0190, f02=»
[…0x2…]
0x0022b8…00244c Dummy {f00=0x0050, f01=0x0190, f02=» M e m 1
0x00244c…0025e0 Dummy {f00=0x0050, f01=0x0190, f02=»
0x0025e0…002774 (0, 3) Opaque[0x194]
0x002774…002908 # DirEnt {nam=»C080T «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0a18, f03=0x0000}
0x002774…002908 IdxSect {
0x002774…002908 f00 = 0x0050 // 0x2774 @0x0
0x002774…002908 f01 = 0x0002 // 0x2776 @0x2
0x002774…002908 gno = [ // 0x2778 @0x4
0x002774…002908 [0x00]: C0x0050.0x3.0
0x002774…002908 ]
0x002774…002908 }
0x002908…002a9c Dummy {f00=0x0050, f01=0x017c, f02=» PT; P01; TID=TC; TCL=TC; * LEV=60; : 01; J PTDC=T02; V PLC=01L; f P00; v PT; P01; PTID=TD; PTCL=TC; PLEV=60; P02; PTDC=T03; PLC=02L; PTDC=T04; PLC=0
0x002a9c…002c30 Dummy {f00=0x0050, f01=0x2008, f02=» P01; TID=TC; TCL=TC; * LEV=60; : 01; J PTDC=T02; V PLC=01L; f P00; v PT; P01; PTID=TD; PTCL=TC; PLEV=60; P02; PTDC=T03; PLC=02L; PTDC=T04; PLC=0
0x002c30…002dc4 Dummy {f00=0x0050, f01=0x0190, f02=» & P!!RE 251,$$FALSE$$FALSE$$ C5MDISK $ P!!RE 252,$$TRUE$$FALSE$$ CKASFLG . $ P!!RE 253,$$TRUE$$TRUE$$ CSLDFLG V & P!!RE 254,$$FALSE$$FALSE$$CGLREGFL ~ & P!!RE 255,$$FALSE$$FALSE$$ CCONVERT & P!!RE 279,$$FALSE$$TRUE$$ CREMITFL P!!RE 287,$$F
0x002dc4…002f58 Dummy {f00=0x0050, f01=0x0190, f02=»LG r P!!DL 331 6 PCFLAG BINI (12,2),X'00F1',X'0000',X'00E8',X'0000' $ P!!RE 361,$$FALSE$$TRUE$$ BUDGET T $ P!!RE 362,$$FALSE$$TRUE$$ FAKT10 | " P!!RE 363,$$FALSE$$TRUE$$ 90-94 , P!!RE 366,$$FALSE$$TRUE$$ HJORRING CHECKS 0 P!!RE 416,$$010
0x002f58…0030ec Dummy {f00=0x0050, f01=0x018e, f02=»J-AMT$$ | P!!RE 495,$$5$$1$$ CKTTOP P!!DL 496,497 0 PFROMTX STRGI (12)2C' ' D P!!DL 817,1091 RK d P!!DL 1095,1105 | P!!DL 1107 RK P!!DL 1109,1112 P!!DL 1115 P!!DL 1120 P!!DL 1132,1152 P!!DL 1153,1172 RK
0x0030ec…003280 Dummy {f00=0x0050, f01=0x0190, f02=» PINC DIV539 PNOD R PINC SCREEN ( PINC RGSUB4 : PINC RGSTRT L PNOD R ^ PINC RGMAIN l PINC RGSUBS ~ PINC RGSUB1 PINC RGSUB2 PINC RGSUB3 PNOD R PINC RGKLAR PINC KTPLN PINC KTOPR
0x003280…003414 (0, 4) Opaque[0x194]
0x003414…0035a8 # DirEnt {nam=»RGL080«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0a20, f03=0x0000}
0x003414…0035a8 IdxSect {
0x003414…0035a8 f00 = 0x0051 // 0x3414 @0x0
0x003414…0035a8 f01 = 0x002c // 0x3416 @0x2
0x003414…0035a8 gno = [ // 0x3418 @0x4
0x003414…0035a8 [0x00]: C0x0051.0x0.0
0x003414…0035a8 [0x01]: C0x0051.0x1.0
0x003414…0035a8 [0x02]: C0x0051.0x2.0
0x003414…0035a8 [0x03]: C0x0051.0x3.0
0x003414…0035a8 [0x04]: C0x0052.0x0.0
0x003414…0035a8 [0x05]: C0x0052.0x1.0
0x003414…0035a8 [0x06]: C0x0052.0x2.0
0x003414…0035a8 [0x07]: C0x0052.0x3.0
0x003414…0035a8 [0x08]: C0x0053.0x0.0
0x003414…0035a8 [0x09]: C0x0053.0x1.0
0x003414…0035a8 [0x0a]: C0x0053.0x2.0
0x003414…0035a8 [0x0b]: C0x0053.0x3.0
0x003414…0035a8 [0x0c]: C0x0054.0x0.0
0x003414…0035a8 [0x0d]: C0x0054.0x1.0
0x003414…0035a8 [0x0e]: C0x0054.0x2.0
0x003414…0035a8 [0x0f]: C0x0054.0x3.0
0x003414…0035a8 [0x10]: C0x0055.0x0.0
0x003414…0035a8 [0x11]: C0x0055.0x1.0
0x003414…0035a8 [0x12]: C0x0055.0x2.0
0x003414…0035a8 [0x13]: C0x0055.0x3.0
0x003414…0035a8 [0x14]: C0x0056.0x0.0
0x003414…0035a8 [0x15]: C0x0056.0x1.0
0x003414…0035a8 ]
0x003414…0035a8 }
0x0035a8…00373c Dummy {f00=0x0051, f01=0x0190, f02=»Md a CR 3, R C &R N <R Y R d R o R z R jR R FR b f z 0
0x00373c…0038d0 Dummy {f00=0x0051, f01=0x0190, f02=» P d 2 0 F 1 d
0x0038d0…003a64 Dummy {f00=0x0051, f01=0x0190, f02=» - TB2 0 * F lp 8
0x003a64…003bf8 Dummy {f00=0x0051, f01=0x0190, f02=» F 8 : N
0x003bf8…003d8c Dummy {f00=0x0051, f01=0x0190, f02=»
[…0x7…]
0x004898…004a2c Dummy {f00=0x0051, f01=0x0190, f02=» e m 1
0x004a2c…004bc0 Dummy {f00=0x0051, f01=0x0190, f02=»
[…0x1…]
0x004d54…004ee8 Dummy {f00=0x0051, f01=0x0190, f02=» E F G H I P Q R S T * B 0 0 0 0 0 ( x P OD-KOM
0x004ee8…00507c Dummy {f00=0x0051, f01=0x0190, f02=» 0 J 0
0x00507c…005210 Dummy {f00=0x0051, f01=0x0190, f02=» B 0 0 0 0 0 0 0 &0 -0 4 ; < > v F
0x005210…0053a4 Dummy {f00=0x0051, f01=0x0190, f02=» * B 0 0 0 0 0 # ! D M 0 * 6 0 0 0 0 0 %
0x0053a4…005538 Dummy {f00=0x0051, f01=0x0190, f02=» 0 0 0 0 9 Y m z0 0 0 .
0x005538…0056cc Dummy {f00=0x0051, f01=0x0190, f02=» F % &0 0 0 0 F 0 < < 0 0 < F
0x0056cc…005860 Dummy {f00=0x0051, f01=0x0190, f02=» L 0 Md 3 x3$ 3 k3( 3, Md ? _ ! B 0 0 4 @0 0 @0 0 _ 0 0 4 0 4 0 4 0 4 0 4 0 4 0 4 0 4 0 n4 0 4 0 4 0 4 0 j4 ,G G HJG(a 3,: :": 9 ; D 9 9n6"8 : : : : : : : I :x9 3 3TH G F EB
0x005860…0059f4 (0, 7) Dummy {f00=0x0051, f01=0x0190, f02=» D X [ h i m s - AF FIL SUMADVIDATODEN SIDETRP TESTADM ARKIVCHECKDEBETGIRO SALDOSTARTTOTAL KVIT SLUT CHECKKREDITSLISTETEKST T[LLERKONTONRTOTAL EKS.LBNRDAGS-DATOKONTOKORTMASKIN NRPOST-DATOUDSKRIFT BEV.PERIODEFRA/TIL NR KASSELUKNINGSPECIFIKATION D
0x0059f4…005b88 Dummy {f00=0x0051, f01=0x0190, f02=» 9X99BZXXZZ99999BB**BBXBBZBXBBXXBZZXXXZZ9ZZZ9999999BB**BB99.B999B99BBBZBBBZZBXX.BZZZZZZ9ZZZZ****9***99B999BBBBZZBZZZZBBB**BBBZ999BB****9XX.XXPPZZZZZZZ99V99V99XXVXXVXXZZ.ZZ.ZZZZ99999999.99.99BB99.99.99BXX.XX.XXBZZ.ZZ.ZZBZZZZZZZZZZ.ZZ.ZZB99E-99E-999B99
0x005b88…005d1c Dummy {f00=0x0051, f01=0x0190, f02=»**XXXXXXE-XXXXXXXXXXXXE-XXZZZZ9999.99B9B9999B999B99BBZZ.ZZ.ZZBBBE-9999999999BXXX.XXXXX.XXB999E-99999E-99B999.99999.99BBZZZZVZZZVZZ9-BZZZZVZZZVZZX-BZZZZVZZZVZZZ-XE-XXE-XXE-XXBXXXE-XXXXXE-XXZZZ.ZZZ.ZZ9.ZZ-ZZZZZZZVZZ9,99-999E-99999E-99BB999E-999E-99E-99*.***.***.**9,
0x005d1c…005eb0 Dummy {f00=0x0051, f01=0x0190, f02=»E-999E-99E-99BBBZZZE-ZZZE-ZZE-ZZZZZVZZZVZZZVZZ9E,99-BBZZZ.ZZZ.ZZZ.ZZ9,99-BBZZZ.ZZZ.ZZZ.ZZ9.99- & &
0x005eb0…006044 Dummy {f00=0x0051, f01=0x0190, f02=» g U K d z k % + ^ T ^ # E ) * 0 = 7 d B B _ } f -E V R K R E +b D r c T H Y t + w f 2 E u W u o W +b * a D V # V # V # X # w 0 f h R 0 c ` 2 j j -
0x006044…0061d8 Dummy {f00=0x0051, f01=0x0190, f02=» J R 5 j j h * ! W & @ * ^ W " + " c< ) d ; Y/ Y + t 2 j j j 2* d L + " c< { L * * g G G = #= $ + , + M 3 ` { s 5 v 2
0x0061d8…00636c Dummy {f00=0x0051, f01=0x0190, f02=»DIVERSE FORMATER +" C - A c _ a $ $ < ] N E S [ +A c e * : > 3M { # @ # g h 2 E 3 * e Z O W 9 H ? 1 !> #> $ " *I I I !I "I #I $I %I &
0x00636c…006500 Dummy {f00=0x0051, f01=0x0190, f02=» g 1 b C Y D A~ d - h E 9 30 ( ' 2 S 2Z i i i h E 9 3 " < i 2 * 4 Z [ c Q ) I S S IALT SIDE(R) 4T PRIMOj 2 BEV j j
0x006500…006694 (0, 8) Dummy {f00=0x0052, f01=0x0190, f02=» N P G A I, + D 3}4 - c 2 * * 4 [ Z NETTO O W * VERSNR ^ a ` ] FC A~ A . k ] ] [ * + 0 Y 8 j B h X F X f H7 BEL B LEV-NR NAVN I, V UL4`*)QQ)*)(()%**
0x006694…006828 Dummy {f00=0x0052, f01=0x0190, f02=» " $ & ( * , . 0 2 4 6 8 : < > @ B D F H J L N P R T V X Z ^ ` b c e h k o s w {
0x006828…0069bc Dummy {f00=0x0052, f01=0x0190, f02=»0 0 0 0 0 0 0 0 " % ( + / 3 7 ; ? C G K O S W [ ` e j o t z ( 3 >
0x0069bc…006b50 Dummy {f00=0x0052, f01=0x0190, f02=» * ' A ^ ' ~ ' ! # % ' ) + - / 1 3 5 7 9 ; = ? B E H L P T X ` d h l p t x |
0x006b50…006ce4 Dummy {f00=0x0052, f01=0x0190, f02=» 8 ? G O X a j s } ! . ; H W f v & : N b v , G b ~ " # % & " * H * r 4 9 ; < D K
0x006ce4…006e78 Dummy {f00=0x0052, f01=0x0190, f02=» ! T P & ! X T C M 8f 8 <n Y ( x P Y * 5 x y Wz X " 4 X X . 8 9& D X 0P X T 5 ! Y * 5 y X V* X ( <J x C ( D Y * X Y , <8 X X C & C C ( D
0x006e78…00700c Dummy {f00=0x0052, f01=0x0190, f02=»8 _ B U C Q C D5 5 5 5.5z7v7 5 X X * $" ~_> @ Y X * 44_R X !@XX y X # x V y X X * <J P P 1 _ 1 5 X * 4 X X * $" X D % " X # X * <J y _< X # X * y <J X 1 1 X !@T X $ " P
0x00700c…0071a0 Dummy {f00=0x0052, f01=0x0190, f02=» C C X ( D x Tf B 7 9 R 9 7h X ! T 8 _` y C Q " T <n <J X ! 8R X X ! x Y Y _ X "@P B R y C B P 9 V 8 _F9 VV X ! T X !@X y C _d y C C X !? x P Q( B y " y $
0x0071a0…007334 (0, 9) Dummy {f00=0x0052, f01=0x0190, f02=» C y XR X x <8 8R 6 x X X # <J_ B 8 C < : + <n X <8 <J ( E P8 ( E* DD : B 8b C _J + . D X 9 V ! P @ Y P8 Y Y . : O P8 P8 " P8 $ : D 2! Y "
0x007334…0074c8 Dummy {f00=0x0052, f01=0x0190, f02=» ! Y 0T V E* T : D 2' P8 R P P X ' ' M X _ X ' _ X '?_ D P8 X ' D X ! D D D X " 9b! X :c 2" H9 D @ W W W W W W W D Y ( Y 09H Y * Y 4 Y 2 Y 69h Q X :h
0x0074c8…00765c Dummy {f00=0x0052, f01=0x0190, f02=» P P Y +W^ ; Y + ; = WL T ; ;ZW> Q W Y + U Q P W W Y ( = C D X *! P V L ! D M X 0 Y 8 ; P D Y 0 X 0 X 2] X 8 Y 0 ; : X 0 :H* D : X 2T Y 2 : C 1 B ] I : ;
0x00765c…0077f0 Dummy {f00=0x0052, f01=0x0190, f02=» C B _, _ X <8 <n P <J B _R ( E X D D : K + Q 2 P. P8 O `$ ( E* B X # V : P8 N_0 Q _>]@]>P8]>]>]>] ],]( [ [z>r?r?r]>>d]> W W X 0Q = = Y ( Y *P I
0x0077f0…007984 Dummy {f00=0x0052, f01=0x0190, f02=» (_t " X _. I X *# P B 1 I W " P X X$ C : X *! P I D8 C W @ X (T W X y 6 Y ( : X (;n D ]@ N`$ N 6? ] ],]( [ [z>r?D?D >d]> D Y . Y ,W D Y . X ( X ." PV X 0RzT$ Y *P U :H D >> K
0x007984…007b18 Dummy {f00=0x0052, f01=0x0190, f02=» *T " T ! 1 W ! ) d : D 6 Y *T ?^ : d C d : D V Y " X .9H $ P & X ( " Qv Y +Q R " P W " U A Y , " Q X . X 0RvP X *:h P P4) Y (W X *:h Pl Pf P P A P< B(WZ X ! X $" P<Q
0x007b18…007cac Dummy {f00=0x0052, f01=0x0190, f02=» X , X 0P@ A T, X *:h XF XL X (!@T @ Y ( X , Y t X 0 l B(_r X ( P Y (_ P. B P Y 8 ?^ D X 8 X $ D Wh_ " P X ( T X & V H "@TF B P6 V Y X (P C BP X (P A DD 8 Y 0 X 2P X 0
0x007cac…007e40 Dummy {f00=0x0052, f01=0x0190, f02=»T : : Y ( X $ Y X " Y X & Y X < Y @ : Y : D X : X ( T X & V H " V Y : X $ D X : D : X Y " X Y $ X Y & X @W X < Y = " E ! T W ]D ! P =H ]D C^ X *! T" X y 4 @ X (T y 6W4 X
0x007e40…007fd4 (0, 10) Dummy {f00=0x0052, f01=0x0190, f02=» D Y D :H Y ! P V Y P8W Y ! P O W V Y C V Y : P8 N : 2' " P T Q W O `$ : C : D I D8 C D X D : "0P ' Q W ' Y : W O V [ D Y Y Y < V
0x007fd4…008168 Dummy {f00=0x0052, f01=0x0190, f02=» D P M X =' V W V Y =P D : F F G Jt/ E W Jt/ E I I Jt/ E I I ' / P8 C I P8 C P8 &P C P8 & C : @E P ( D _ AE
0x008168…0082fc Dummy {f00=0x0052, f01=0x0190, f02=»E M & # T : Y _ Jt F P8 &P C K./ I Jt F K./ I P8 C : Jt "R V I M Jt ( T _& @M X, @M _6 P8 ( D M P8 P8 V M 2 ;B P4 J T G
0x0082fc…008490 Dummy {f00=0x0052, f01=0x0190, f02=» I I Jt K J J P P8 / W Jt J P8 / W Jt J C C W J C C JH` ' W 781"&$ 39#$;< '()*+,-! J K J P8 P _B Jt B P8 'W Jt ( D Wj P8 Jt J W Jt ^ (
0x008490…008624 Dummy {f00=0x0052, f01=0x0190, f02=» P B % P C + L< M Jt I Z I C I C B B P C I : V I C B : ( D ' P JB I : Jt J % Y O C P8 & R V C P8 : B T T T V : 2 ' W 2 6
0x008624…0087b8 Dummy {f00=0x0052, f01=0x0190, f02=»P C W $0 P C K2 : "!@P ") # B C B % C C : O #0 T & C C : C C V W V Q 0W Q W Q W K L0 4 ! P T 0P(W$ 8 C S W C C 0 P C ;a 6 4 ZH T
0x0087b8…00894c Dummy {f00=0x0052, f01=0x0190, f02=» PM M PP LM R R _ R _ # Q R V > _V ' P _d P & 1 P 1_ , @ - R T U :B@ ' d M M M M N`OLM ODT R8R>S V X X N N N N O M N N Z ^.] ]v] ^.]POlOhOrOt W
0x00894c…008ae0 Dummy {f00=0x0052, f01=0x0190, f02=» 2 P V W8 _ 2 # ;B V T W V P L , V 2P " 2 P V D ! R T V P V D W V _ 8^n DMN 2 ! 9B V T W V P D $ V 6 V % V E @ ' T 2 % 7_ 2 # L P8 2"
0x008ae0…008c74 (0, 11) Dummy {f00=0x0052, f01=0x0190, f02=» V & M HMl 'W 'W '_6 :l:d:h P8 W W P W 6 2# Q W4 @ EO " T> ; [ # Q :H 2 T Z L LOv D V, W # Q LOv E V $ W D V LO~ , Wn 6 2 Q W " P " # Q
0x008c74…008e08 Dummy {f00=0x0052, f01=0x0190, f02=» P8 z ;AV$ Z H # Q ; P8 : & Z 4 Q : Z 4 " 2@P : [ [ P8 & @ ! P [ 6 [ Z 7 O Z 7 : ( :A ( :mT @ " P [ :;H 2 P ;h
0x008e08…008f9c Dummy {f00=0x0052, f01=0x0190, f02=» " T & T + : * & !@P `1` P T Q [ ; 8 V W Q P [ ! X # P 4 V W Q P [ " X $ P TF R R ` ; <( Q P # W " <! =# T6W = Z P _ V ^< `_@
0x008f9c…009130 Dummy {f00=0x0052, f01=0x0190, f02=» +_ +Q T _0 , V W R V W R XV W 1 ^ _0 R W ( V W Q P W ! W V P , V W Q P W $ W V P T V W Z :$0#0;b U P P PN P 0 - P: V W Z _
0x009130…0092c4 Dummy {f00=0x0052, f01=0x0190, f02=» d V W V 4! P < X 4 9d $ & ! R + : V W R 4 0R Y 7 Y& P Z,;D 9_8 8 _< V W YL T 9 : &9d! + P & T 9d! T 7 V Y P _$ SZ Q V P
0x0092c4…009458 Dummy {f00=0x0052, f01=0x0190, f02=»S W P 9 S W _ V P W T V E + : & [ [ [ [ $ [ [ >h [ [ Z T Z T Z R> Z PP [ 9a Z $" T 9d! P6 P( [ Z w [ P Z R8 V H )_ Z W _X z R z ! P 1` { V
0x009458…0095ec Dummy {f00=0x0052, f01=0x0190, f02=» PP= ;@ R P W ;a=a P " R & R V T W V E + : V & [ [ [ [ $ [ [ Z T Z T Z R> z " ! ! R 2` { z " P ! R 2` { 1 ! { [ Z
0x0095ec…009780 Dummy {f00=0x0052, f01=0x0190, f02=» %_N [ Q* Z R8 Z T R [ Z { Z R8 z 9e! W Z : V I _ , " -! 9H X" ,9 -9d_ Z H D & H D % [ ( !! gg++ L ]BO O Q ]DQ O P8]@ N`$
0x009780…009914 (0, 12) Dummy {f00=0x0053, f01=0x0190, f02=» V [ [ V Z P 2 " T W "@T '?W "? HZJ" K :e J J " J _Z Z [ [ Z P D [ V 7_ Z @ ! P D Z 7 Z Z P D : V R (Q V :
0x009914…009aa8 Dummy {f00=0x0053, f01=0x0190, f02=»W. _& X I W X & I J K : V : 1 6 : ! P ! P ! P ! P P8 ! P O W : ! )P9H # T &W &" :I : ]D : P & _ &X _ : : : : ^ Z : { : ^ ^ PX 9
0x009aa8…009c3c Dummy {f00=0x0053, f01=0x0190, f02=» R # P W ) V E ^ WV ^ [ ^ : Z !0P. 4 R :d" 8 R ! :DW ! 9 R R Y, : T : P8 P8 jP kT T : & 9! " : $ : ^ O $ : 2 & >A >A 2 $ P8 & V
0x009c3c…009dd0 Dummy {f00=0x0053, f01=0x0190, f02=» X ( 9 8 ? X Q , V ( - 4T V 5 ( W, V P& W$ U V X 9T I Y M : + P8 [ [ < !AAP !TTT W !**T * [ R !FFP !EET W Ia 6 * B
0x009dd0…009f64 Dummy {f00=0x0053, f01=0x0190, f02=» !00T ; _ 9P F " X6# ; W )0_: J R( Z R 4! P ;)0 9U ? Z ] 49d_. _BU ; :X _ _ z 9d! ) ^ _ ,_ 8 _ : W 8W ` 8 !++P !-- z ;$# + ^" _( T tX. PT*AXYZ9( >A >A 2 $ P8 & V
0x009f64…00a0f8 Dummy {f00=0x0053, f01=0x0190, f02=» & X " 4 4 4 4 4 4 @ 8 I 6 L0 0 WC0 W<6 0 W 0 6 0 W 0 W 0 W 0 W 0 W 0 : 0 P : _ 0 0 P 0 + P Rq WlWj6 0 W 0 W 0 W 0 W : @
0x00a0f8…00a28c Dummy {f00=0x0053, f01=0x0190, f02=» 3 2 I W 0 ( _ 0 FI{ W 2 W50 A H x ( 2 4 90 _;0 W 0 W 0 W 0 W 0 W 0 W 0 W 0 8 : ; 8 7 GG;GG;7;;;7;7? I I W 1 1 & W 1 1 ' W ? 0 T b ! ~ A ? WO0 ( ?
0x00a28c…00a420 Dummy {f00=0x0053, f01=0x0190, f02=» 0 6 0 W 0 W 0 W 0 W 0 6 8 2 _D - x 0 0 2 4 A ? 0 0 ? 4 1 4 0 P 0 W 0! ( W 4 {0 $ 1 W{1 B n 6 0 W 0 W 0 W 0
0x00a420…00a5b4 (0, 13) Dummy {f00=0x0053, f01=0x0190, f02=»HZ I H+ |0 1 0 KZ 4 4 e e% l* e af 0" 0# f eP & 4 @Z 4 6 ovx( v Ww Tp Ti Tb T[H u TN u H1 ( TAH,> ! T7H-4 " T- # T& $ T H. % T W W W W 4 4 AZH" 0 %6 CMOWO0"
0x00a5b4…00a748 Dummy {f00=0x0053, f01=0x0190, f02=» r 0% ? _ 0& 0 ? :~ @$A 0" A 1' 6 _/ 4@)6 o _D 1~ # ,` l1 Y_ A)WR@) @ ? ; 6 + _ @ ? , l 1< , _3 @ ; oRc; ? _F @ W )| | eI) -}lYA&A 0" 1' 6 _ K
0x00a748…00a8dc Dummy {f00=0x0053, f01=0x0190, f02=» g 0" A 1' 6 _ ?! m D D <! <! <! <!I ! t Xl ; " ma t T |! o # ~ 1b a I " | 3I 0" A 1' 6 _ _ ?" o$ | W $<! # W 0" A 1' 6 _ _ X t @' t t ; " ma tT I' oP h a P ~b a
0x00a8dc…00aa70 Dummy {f00=0x0053, f01=0x0190, f02=» 'K W: # A 1' 6 _ _ t @'_ A'_ @'I A$ (?# g I"R_ 0 ? 0 _ ) E # y ) o ) o _% XlA" " r 0 ? _ (}0" + s A * + , - @ A . ?$ g ?% < " l T 4 4 ! l 4 /1 T4 /2 T. /3 T( /4 T"
0x00aa70…00ac04 Dummy {f00=0x0053, f01=0x0190, f02=» T l9 T lB 4 I " r 0& _ 0& 4 / 0 0 0 0 0 0 0 0 4 @ 0( P A W W 4 ( % o n @ W u 4 7 ] l
0x00ac04…00ad98 Dummy {f00=0x0053, f01=0x0190, f02=» 6 { t { < 1TFDBILAGFEJL SLUTDDAG NRASSIGN KORREKTLINIE NROPSTART SUBTOTAL KOMMUNE NRVOLUME NR OPRET LEV. STRAKS-CHECKSKIFT JOURNALEJ-EDB T[LLER VOL 2 VOL 3 VOL 4 B9999
0x00ad98…00af2c Dummy {f00=0x0053, f01=0x0190, f02=» NY SIDE. o OK ? l| ^ A~ f m ,} START VOLUME= DATASET= z ` g i g h ] m X
0x00af2c…00b0c0 Dummy {f00=0x0053, f01=0x0190, f02=» ! & + 1 9 B K W c p & - . @ @ & SLUTDDAG NRASSIGN KORREKTLINIE NROPSTART SUBTOTAL KOMMUNE NRVOLUME NR OPRET LEV. STRAKS-CHECKSKIFT JOURNALEJ-EDB T[LLER VOL 2 VOL 3 VOL 4 B9999
0x00b0c0…00b254 (0, 14) Dummy {f00=0x0053, f01=0x0190, f02=» < 4 0 4 8 A @ l H A W @ A @ I @ W I @ @ @ @ @ @ @ @ @ @ W I " A 6 _I W @ _ _YA 4 A 6 <MW _n @ _BK ( @ _U$ 0 0 A _nI 0 @ @ _ K P @ _W A _ 6 */5;CMWfou
0x00b254…00b3e8 Dummy {f00=0x0053, f01=0x0190, f02=» T 4 T W TyW TsWy 4 2 TLWR TEWK T>WD T8 4 I 0 4 I % 4 I 4 H 4 4 ! 4 4 6 '1 4 4 I T 6 4 4 4 0 4 4 A @ @ 6 4 A 4 A
0x00b3e8…00b57c Dummy {f00=0x0053, f01=0x0190, f02=» @ @ 4 @ 4 H H 0" @ ! "H ^H [) W # 0 *0 0! 0" !0 P 0 0" ^ W 0! # , 6 l: 0 # 0 l4 - l l r r l% l 4 H # I H @ A $@ ( 4 4 H I I H % & @ 4
0x00b57c…00b710 Dummy {f00=0x0053, f01=0x0190, f02=»W(_4( 'T#W $T @ ! W W ) T 4 4 6 N + ! ( W H3 W5H3 W- W( W# ! ( W W W W 4 6 * S]W I I A *W W I I A *W W H I I I A +0 WrWu WlH WdWgH ]I ) C@ @
0x00b710…00b8a4 Dummy {f00=0x0053, f01=0x0190, f02=» H " @ WY @ l A @ 6 _(@ @ _Q% l L A I @ 4 @ @ @ @ 0" 4 I 5I A A / 0 W 0! / 00 @ @ 4 4 I II H ZA @ WMI OI L , A - A &0! 0"
0x00b8a4…00ba38 Dummy {f00=0x0053, f01=0x0190, f02=» # } ( q 0 - 0 20" I K 4 I &I A A W W I @ @ @ W 4 4 ( 4 I , H I ) " ' # H l l 3T2 4H 5 6 &H / 0 7A 6 @ A @ @ 4 l
0x00ba38…00bbcc Dummy {f00=0x0053, f01=0x0190, f02=» 6 - W + " NI KI" C > H " $ : ; W H : ; W 4 ~ x o k < o ; 4 =(2 ) W ) l W ) m C 8 < IQ R : 8
0x00bbcc…00bd60 Dummy {f00=0x0053, f01=0x0190, f02=» W W # $ W ~ ~ ! n " ! " # $ % & Wq > ! gWj > ) ` > ! > %&') L) "l ! % B! 8) 8W1) >%&' ) ') ) ! ) W ! ) W 4 4 ! ,! ! !
0x00bd60…00bef4 (0, 15) Dummy {f00=0x0053, f01=0x0190, f02=» L , . ,HP 0 $ _ AP b `b @ nb T @P 4 @P 4 I ,I A ! " H 0 , A m0! _ 4 BT m% o 4 J - BA 4 ,A 4 CP ; D nb T 1 @PW @P 2 4 0! 2 4 H XI 0@ @ ,0! 0" @ J - L BT W"@ A !
0x00bef4…00c088 Dummy {f00=0x0053, f01=0x0190, f02=» ; Q & 3 > + I y ! x _ n V f X q ^ Q C w f / J P D j 5 U
0x00c088…00c21c Dummy {f00=0x0053, f01=0x0190, f02=» & , 20 ;0 <0 =0 >0 @0 B0 D0 F0 H0 J0 L0 N0 P0 R F , , ,A 4 CP ; D nb T 1 @PW @P 2 4 0! 2 4 H XI 0@ @ ,0! 0" @ J - L BT W"@ A !
0x00c21c…00c3b0 Dummy {f00=0x0053, f01=0x0190, f02=» 6 D z x | A 1' 2 _ K _!K $J 'K(*@ A A # l 1' 2 _G g ) l l X A s s _~ A 1' 2 _ @ @ @ @ @ @ @ @ @ @ @ @ @ 0! 0" m ( l " x Q x k o
0x00c3b0…00c544 Dummy {f00=0x0053, f01=0x0190, f02=» ~ T T ! ~ T T+! ' T ! ~ T l p A ! , ! ~ 2 ~ l g @ X @ 4 4 ? x
0x00c544…00c6d8 Dummy {f00=0x0053, f01=0x0190, f02=» k '# 0" _:0" 4 @ @ W4 A % @ % l pa A A %@ @ %0" I ' W l p 4 I
0x00c6d8…00c86c Dummy {f00=0x0053, f01=0x0190, f02=» " _ I / % W % W 0" 4 v P v 1' A 6 _.K 1 W K < W W ) 0 0 l v " < i i
0x00c86c…00ca00 Dummy {f00=0x0053, f01=0x0190, f02=» H @ 4 1 0 ) 0 4 0 l4 A* H" Xl X ! mat " # $@ |lA/ %> &J/ ' $@ t X H" ( ! )H" Xl " @$@*@ 4 *| ! matT t + tT 4 4 A)!W; @) aa aa a xba 4 A)!W; @)aa X aa 4 t Xl |l ) |l P $@ %? %; % H,
0x00ca00…00cb94 (0, 16) Dummy {f00=0x0054, f01=0x0190, f02=» h a P ! pauX* % u @ 0" _ J- $@ %= ,"r < ,#s =; ,$t >2J. ,%v J0_ J, $@ %3 ,!q ;( _ $@ %; , oRc; _ $@ ' T ' T |l (P |l % W 4 " 4 1' 4 " R %Z l ,Z _ P( X WS 9 ; cD . oc TF lj c " % { _/
0x00cb94…00cd28 Dummy {f00=0x0054, f01=0x0190, f02=» Z " R Z _ ^+ _ 4 ; cD . oc {hc D P / R" PRW# hc D T P ; cD . oc P /4 I ? s < A( A A 1' 2 _ @) $ A)@ 1' 6 _ _0H) % l jc ! oc _Hfc ( P8j %c ( D" ! oc b P ; . oc P x /_| ! oc /
0x00cd28…00cebc Dummy {f00=0x0054, f01=0x0190, f02=»_ * R & u 0? ; cD . oc < j j {j c dc S P ! oc T6 /? ( P PRV P ! oc T / cD ; . oc T b _R@(? H j(s f0! 1 " PP 9 ; cD . oc T8 l l Dj c j c j c D 0! 1 ;0 1 2@9_U@9 1 24 /
0x00cebc…00d050 Dummy {f00=0x0054, f01=0x0190, f02=» n V Q ; I ] t [ # { & C ( 2 3 x *BELBFO DEB KREKVITBILAGKLAR SLET SLUTDZ300 DAG NRSALDO DATAS[TPERIODE DISCFEJL SUBTOTAL REGKONTONRKASSE]BNINGSLET
0x00d050…00d1e4 Dummy {f00=0x0054, f01=0x0190, f02=»NR REMIT %BBBZ999999999999B9999999999999E-99BTTTVTTTVTTTVTT9V99-n~o mX e 1p l k 1 e ) L !} 2 m 1 p L [ 1 e [ B p q L ^ A~ f m a
0x00d1e4…00d378 Dummy {f00=0x0054, f01=0x0190, f02=» $ ) . 3 8 = C I P X a j t 0 0 0 0 0 " ) 5 A P f } - / @ x D H < ~PERIODE DISCFEJL SUBTOTAL REGKONTONRKASSE]BNINGSLET
0x00d378…00d50c Dummy {f00=0x0054, f01=0x0190, f02=» { I I q H H 02 + !"#$%&'()*+WC2 -(( (( ((( ((( (((((((((((((((((((((((,)*+((W 8 '2 ?- 2 ?-A I A A 1' 6 _ H @ _ @ @ ?-A I I VI SA A 1' 6 DD _ m i i @ A 1' 6
0x00d50c…00d6a0 Dummy {f00=0x0054, f01=0x0190, f02=»t Xl @I 3 , 6 _ _1K ?/_8_ ? DW K PW @A @(?-?0 ?-@ I A A s 1' 6 _% E ?- A 6 _ @ ?-H I A }W D@ A ?-I 1' A A 2 112?1 H 0I I 2 3456789:;<=>?@ABC
0x00d6a0…00d834 (0, 17) Dummy {f00=0x0054, f01=0x0190, f02=» l p" A 1' ?1I %C P @ A 1' 6 _ A I tW u * I , t m W , u} p " w&0 T R P _=! TW ! ! + y _b + k | {@ D P A } A @ ?1 @ @ DW H H A _ W C T C T C P
0x00d834…00d9c8 Dummy {f00=0x0054, f01=0x0190, f02=» @ DI A q | 0 0 m , ) l_ H @ D D0! 0" @ W&H I I H A _ W W W W !W "W #W @ D?-I AH A 1' 6 11 W/A$ $W)H$&H"# 0 %K$ % 0 0 0" 0 %0 ?-I A &W @ ?-A A A # l ' 2 E_ @ @ ?- (?- )?-I A
0x00d9c8…00db5c Dummy {f00=0x0054, f01=0x0190, f02=» G_ ?-I } A @ 1' 6 aa _! ) - 9 W A 1' 2 H_ # W ?- * +1' A W @ 2 IIJK _ * +_% * +_2 * +A 1' _W A 0! 1' ( ! u
0x00db5c…00dcf0 Dummy {f00=0x0054, f01=0x0190, f02=»&W^ 1WZ 2WV0" )$ 0 3!0 _ 0" W, 4 W' 4 W" 4 W W 4 W 5W W W W W 6W ?L?M?N4 x hI x j I ( fI j I dI W 4 x z hI T! fI j I dI x _*4 7 4 A 1' 2 OPQR_ W
0x00dcf0…00de84 Dummy {f00=0x0054, f01=0x0190, f02=» v % K O S W [ _ c C @ ` Y F K [ ` e 7
0x00de84…00e018 Dummy {f00=0x0054, f01=0x0190, f02=» V X m 6 ! Q C y Q H DKST NR BFO BILAGFEJL KLAR EJ EDBLBNR TOTAL DIVERSEBEREGNINGSUBTOTAL CHECK LBNRCPR/CIR/NRREGKONTONRCHECKCIFFERLOKAL REMITPENGE-KONTOKASSE-KONTO ]BNE
0x00e018…00e1ac Dummy {f00=0x0054, f01=0x0190, f02=»E-ZZZZZZZZZZZE-9TTTTTTTTTTTTX-TVTTTVTTTVTTX,XX-TTTVTTTVTTTVTT9V99-ZZZVZZZVZZZVZZ9V99- BEL K g SP RGE k y k v . - . z t r =m r l L n SGR
0x00e1ac…00e340 Dummy {f00=0x0054, f01=0x0190, f02=» pk [ Q p v v - v v * ] FRA n TIL n og og og og og og og og og og og og L " [ p u L i [ Q e q
0x00e340…00e4d4 (0, 18) Dummy {f00=0x0054, f01=0x0190, f02=» ! ' - 3 ; D M W a k v 0 0 0 0 0 ) 5 C T g % . : F T b t # ( + - - X / @ F H :
0x00e4d4…00e668 Dummy {f00=0x0054, f01=0x0190, f02=» | ?0 S < 0" ? > < > @ 3 ; ma P | W } Dba % laTk@' t t t ; ma tTbI'_! o h a P?H - + ha % T b a ba laXc @ ? la ? A 1' 6 _ _ t @'_ A'
0x00e668…00e7fc Dummy {f00=0x0054, f01=0x0190, f02=» b # w % l b # % l W 4 # w % l W 4 ( # 4 # &! " m ) % , ) $ * 4 4 4 % l 4 H[ W< I pb u 8 ) u u 4 0 ! G !6
0x00e7fc…00e990 Dummy {f00=0x0054, f01=0x0190, f02=»2 W 4 % # W ( + ? 2 !"# $%&'() *+,-. /0123456 m$ Tn 6 <A? 6 ? %? 6 ? $ A _
0x00e990…00eb24 Dummy {f00=0x0054, f01=0x0190, f02=» ? ? d ? ? +8 z8 I # W % W N N ? # " ? I @ @ % A W$% A W H 4W I w=W C% _I # W W A A .? @ ) A ( ! j! f b M D * " :hM b M (
0x00eb24…00ecb8 Dummy {f00=0x0054, f01=0x0190, f02=» m" ? ? # p % ? ? # % ? ? :7 " x % l x %k l ? #? I ? ? ? x k ? $ ' ? 88( H ?9 < ? +8 z8 ? " ? A % A # @ W @ < ? & (
0x00ecb8…00ee4c Dummy {f00=0x0054, f01=0x0190, f02=» T# 88( H ?9 %? ? ? Y ? & _ . I ? ? ? @ @ " ? < "? A D D D D D j ' ? A j ' ? A j ' j ? A j # j #? A j ! j !? $ " x x ? ? % l " v v ?
0x00ee4c…00efe0 Dummy {f00=0x0054, f01=0x0190, f02=» ? x # ~ x x ? ? "< b v v - l v v W ( ~ W A W pW qW sW # W W T ! u % l @ yH I H + WC W~ (_ x_" /_' |_, ~ ~ l l $
0x00efe0…00f174 (0, 19) Dummy {f00=0x0054, f01=0x0190, f02=» l m 4 J # " 4 W 6 W 6 $ A W $ 4 .A 4 H.PA 1' 6 CC WAI^>A^% l A0 I I W H - T W @^@0 ?:I^ A^H. I I W @YA 1' 6 ww Wu@8) m A8- l % q p TK 1'
0x00f174…00f308 Dummy {f00=0x0054, f01=0x0190, f02=» % q p u T W @^?: : & r D W s $ G * I e K X ] b g x
0x00f308…00f49c Dummy {f00=0x0054, f01=0x0190, f02=» & ( < = T Z d r 0NR&04BFOVAL DEB KRE51 52 DAN PRINTSLET SLUTD (0-1)KORREKTRUTINE FRA LEV. SAMLERLISTE ( 0 1 H I P Q R p 9 2 9 BXXXXXXXXXX 8 k ? k h h b G l
0x00f49c…00f630 Dummy {f00=0x0054, f01=0x0190, f02=» ! $ ' + / 3 7 ; @ E J P W ^ g0 s0 t0 u0 v0 x0 z0 |0 ~0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 $ 1 : U | 0 d
0x00f630…00f7c4 Dummy {f00=0x0054, f01=0x0190, f02=» H* H* 4 @ @ @ @ @ 6 W lW q@! p A)!W; @)aa aa N W ha D W ! wkI! , (a a +h @!" ba _:ba ba f A! matT K p t Xl_ I JI VI bI tI ba matT I
0x00f7c4…00f958 Dummy {f00=0x0054, f01=0x0190, f02=»W j ! j $ A @ _ @!@ 4 tp p X A*@ A 4 @ # w dl# u ) v A 4 # dn_ # dp_ # do_ dm_"I I BW I I H W I o T Td T @ TUWN 0 _@ P A I *I H T, P T W T W I W T W 4
0x00f958…00faec Dummy {f00=0x0054, f01=0x0190, f02=» I 0 H3u$ q" mH j ' 0) H j ' 0) H j 'j & 0) H j # xj 0) H j ! *j 0) 0" P A 4 0 4 0! 0! 0 4 1 4 1 4 I } @ # { WW | 6 &@ yW= W5 W- " /W%0" _M A
0x00faec…00fc80 Dummy {f00=0x0054, f01=0x0190, f02=» A 4 0! 0" 4 I 0 T$0! ! " ( 8" 4 # : ' W10 % { W W 0" 0" 4 _6 4 0! 6 W$ W W gW W W 0! : a " 0! % zb a W ( % 'b a W " D |a $ $ 0! W "
0x00fc80…00fe14 (0, 20) Dummy {f00=0x0055, f01=0x0190, f02=» T m l l 4 " I 0* 0+ Q P 4 4 I 0* 0 Q P m 4 4 0, P Q I 0" 4 I 0) Q P 4 6 -JWs W= }W# } W ~ X KD
0x00fe14…00ffa8 Dummy {f00=0x0055, f01=0x0190, f02=» W ~ XjK uK T @X 4 @X 4 @'A ! T I ! TzW 0 0" " ? P ! u/W ! o I T _. " w X5W2 # A'I _E D_ I' I 0" W 0" 0" 0" @ 4 # I 0" W 0" 0" 0" @'@ 4 @'A ! T I ! T W 0 $
0x00ffa8…01013c Dummy {f00=0x0055, f01=0x0190, f02=»4 # I 0" W 0" @'@ 4 I" t@% % 6 &(W & p ; a < o8 Db a ! _= b a < b a b a v8 R : 9 N N 8 _ WC%< ha W ha T b a - ^ b a
0x01013c…0102d0 Dummy {f00=0x0055, f01=0x0190, f02=» 3 '(_ ha T A%_ ha T^fa a p I" t l ; p a pT<fa D!W; h $ da l? I" ? I" ? @ @ 4 @ A 4 @ A @ 4 H 0 _ A 4 4 ( # & N
0x0102d0…010464 Dummy {f00=0x0055, f01=0x0190, f02=» d y !& 90&01&02&03&04&90 &91 &92 &93 &94 FEJL BACKUP OPSTART DISCFEJL KONVERTERING DATATRANSMISSION @ B G I P 99999999999B99999TTTTTTTTTTTTT9TTTTTTTTTTTTT9-l~m ) & o n G dkX ! !} l k
0x010464…0105f8 Dummy {f00=0x0055, f01=0x0190, f02=» u0 w0 y0 {0 }0 0 0 & & V ? j m D!W; h $ da l? I" ? I" ? @ @ 4 @ A 4 @ A @ 4 H 0 _ A 4 4 ( # & N
0x0105f8…01078c Dummy {f00=0x0055, f01=0x0190, f02=» j . . ^ b f1' 4 1' 4 1' 4 0 I 4 1' 4 'NRADRBY ]R DEBNAVNOPL KODE PRIMON[STE VEDL. -DISTR BET-ARTDEBITORFAKTURAGIRONR POSTNR ALT.ADR HOVEDBOGLINIE NRBET.FORM LEVERAND REG.KNT. SKYLDIGT UDB. ]TD CPR/CIR/NRKREDITNOTAREGKONTONR NORMALPOSTPRINTENHED?SIDSTE UD
0x01078c…010920 Dummy {f00=0x0055, f01=0x0190, f02=»LLE OPLYSNINGER (1) BTTXTTTXXXXXZZZZ9XXXXXXXXXXXXXTTTTTTTX9999999999TTTTTTTTTXXXE-XXE-XXXXXXXXXXXXB99E-99E-99ZZZZZVZZ9,99+TTTTTTTVTTX,XX-ZZVZZZVZZ9E,99-ZZZVZZZVZZ9E,99- BEL B VAL R VAL R G y k TXT v # p # u t t t
0x010920…010ab4 (0, 21) Dummy {f00=0x0055, f01=0x0190, f02=» @ X . " X " X X FEJL FORMAT ! XX ! XX XX MTB - x BUNDT % # 8 # & $ 8 $ STRAKS
0x010ab4…010c48 Dummy {f00=0x0055, f01=0x0190, f02=» SALDOOVERF 2 r t 8 Y A BKO OMR A-ADR BFO NR-1 NR-2 DATO 1 DATO 2
0x010c48…010ddc Dummy {f00=0x0055, f01=0x0190, f02=» Y D A~ d - XX XX XX X NR U N V M W M + 7 b C D A~ G u d v v
0x010ddc…010f70 Dummy {f00=0x0055, f01=0x0190, f02=»INIE N y XX UDB.OPL.1-5 1 Z@ 2 [@ 3 @ 4 ]@ 5 ^@ M/P-NR BKO BFO x v w z Y # & Y ~G G s { o '
0x010f70…011104 Dummy {f00=0x0055, f01=0x0190, f02=» 9 GL. SALDO CHECK p y XX X _ XX FAKTNR FAKTDATO LEVKONTO TXT ' BRILLE POST.
0x011104…011298 Dummy {f00=0x0055, f01=0x0190, f02=» POST. F]R RE] REM OPK DIVERSE EJ EDB TNR [ L N N O N DIVERSE Y XXXXXXXXXX ! BRILLE FAKTNR FAKTDATO LEVKONTO TXT
0x011298…01142c Dummy {f00=0x0055, f01=0x0190, f02=»+ x v v v } y @ z @ n
0x01142c…0115c0 Dummy {f00=0x0055, f01=0x0190, f02=» " ( . 5 < C J Q X ` h p y $ 6 I & 0 : D N Y f u
0x0115c0…011754 (0, 22) Dummy {f00=0x0055, f01=0x0190, f02=» j } ' E " c & & & + . " 4 P 4 4 7 8 # < [ ? B C G [ K M P : V W _ 7 _ d g Y m r - @@ @ @ @ @ F . & v v } y @ z @ n
0x011754…0118e8 Dummy {f00=0x0055, f01=0x0190, f02=» 4 B h { @ @ @ A 6 _ + , % W 4 ~ |A A 6 {{ _ RkT Te@ @ 2 _ <@ @ 2 _ 6 W # l _B R#T T _x | T T _ _ 4 4 zA A 6 GG _ % :
0x0118e8…011a7c Dummy {f00=0x0055, f01=0x0190, f02=» W_ += ,=. $=4 =5 =6 + , % =7 =8 =9 l =:@T 4 @T 4 T =D = = + =., =4$ =5 =6 =7 =8 =9 ~ =: R T #s= T @T 4 @T 4 D D D } D } } } ~4 yA A A H I H
0x011a7c…011c10 Dummy {f00=0x0055, f01=0x0190, f02=» _+H I I _s4 I H A @ ( v) l A - l ~, @ A ! l @ H 1 TB" > T4 $ H T$I A W @ I 1 W 1 H H } T P _F4 U R T 2 >D $t> Tr > W_ l > > > >' >+
0x011c10…011da4 Dummy {f00=0x0055, f01=0x0190, f02=» >/ >1 R T $t> T @U 4 @U 4 } } } } } } 4 x " S % l W T 4 x V x$ c <D "r< TX l j < ) P R Q _F _N j < @V 4 @V 4 @V 4
0x011da4…011f38 Dummy {f00=0x0055, f01=0x0190, f02=» 4 <D "r< ! o h< D P lj < ) l W! <D j< "r< X S T <D "r< ! o ! u h< D P _/ T <D "r< 4 RcTa V # $ , T "r< T@ "r< T5 _% T <D < "r<T T
0x011f38…0120cc Dummy {f00=0x0055, f01=0x0190, f02=»r< ! u ! o!_ S S 1 x " }_ <D j< "r< X _54 l R#T W$# ~ T P T l_ _ 4 4 R/P V , T <D "r< T l < @V 4 @V 4 l 4 j 4 ? Q 9 m
0x0120cc…012260 Dummy {f00=0x0055, f01=0x0190, f02=» V # P 0FORESPG. SLETNING STRAKSLEVVEDLIGEH. XXXXXXX9999999999XXXXXXXXXXBZZZVZZZVZZ9E,99- A~ l A ! k m , A n n A n n n ! 0 &0 '0 )0 +0 1
0x012260…0123f4 (0, 23) Dummy {f00=0x0055, f01=0x0190, f02=» F : > B H0 P 8 < < < % l p * - = @Y@5@ < " - AY ' " pI6 $ A5% l H5YIY @5) lPH4MA5I0X % l@ t # o T @ % l T T T + p pH5 u
0x0123f4…012588 Dummy {f00=0x0055, f01=0x0190, f02=» T2 ? 6 W m @)? < _BH0 4 4 6 b 2 ? < l 8 8 @ < % P l l% o l ' _> ? < 8 8 @ < U% A) 8 u P ~ P
0x012588…01271c Dummy {f00=0x0055, f01=0x0190, f02=» % @7@7 P lA7A7 lI6 % o l ' _N@7 Wt Z Qk Tl l ] PY@ TW" : %% 6 oW l P l% r l ' _T! l W 4 4 % W $ T 4
0x01271c…0128b0 Dummy {f00=0x0055, f01=0x0190, f02=» ' @ T5 T* T# T @_W @_W W 4 u " P W ) o W7 P2! u Ww "A T ' T u T T W{ u # $ &n ' 'l@ T@ " _ P u _ ! " P _
0x0128b0…012a44 Dummy {f00=0x0055, f01=0x0190, f02=» W @W 4 W 0 JD %vJ T !@W W @W 4 ' A T ' T W ' T W W 4 A TN ' ' TA T<W5 T/ ') u l $ v & " T W 4 I # J. % l # J l # J # J" # J$ & # J%
0x012a44…012bd8 Dummy {f00=0x0055, f01=0x0190, f02=»l # J # W4 l # J # # J $ W l # J # J # # J- ' @W4 I # #J. #J #J #J" #J$ #J% #J) #J* 6 )/@WOWM #J W@ #J #J W( #_' # #J $_ #
0x012bd8…012d6c Dummy {f00=0x0055, f01=0x0190, f02=»* i e% l[ El $ % |H6 0 E 1 L H6 0 & 0" W @P W 4 H6 'W 4 6 ;;rW9 ( ~ ) Wr ( ) ) ) a ) ) ) ( ~ ) * I l_; W
0x012d6c…012f00 Dummy {f00=0x0055, f01=0x0190, f02=» )% + Wy + Wo + Wea ) ) ) )# ( ) a ' ) + W7 + W- + W a { ) ,a ) , * I 4 6 4> HW I0 H8 |W ( ) a ) + Wj + W` + W @) A) WB! l>a ) ,"
0x012f00…013094 (0, 24) Dummy {f00=0x0056, f01=0x0190, f02=» ) ) ) W 6 3AO ) ) ) Ws ) ) )$ We x ) z ) * ) WN ) ) ) W@ ) )" )' W2 y ) ) ) + ) W 6 ) W ) W ) W 4 } } 6 $1a W7 a W. a W! #a W # $a W #a a 4
0x013094…013228 Dummy {f00=0x0056, f01=0x0190, f02=» > { & / n U _ k ( XDISKFEJL % P ZZZZBB****9BB9999999999ZZZZZZZZZ9*******V**9,99-BZZVZZZVZZ9,99-ZZZZZZVZZ9BB99-*.***.***.**9,99-, m p 7 n n n 7 7 n 7 8 m
0x013228…0133bc Dummy {f00=0x0056, f01=0x0190, f02=» 0 0 0 0 0 0 0 0 !0 % ! 0 ? N ! ) 2 ; H D ) W 4 } } 6 $1a W7 a W. a W! #a W # $a W #a a 4
0x0133bc…013550 Dummy {f00=0x0056, f01=0x0190, f02=» b * V Z ^C18 C(< s < @ A 1' 2 _ 02 _*1' l l 2 _ 1' l l 2 _ 1' l l 2 _ 1' l 2 @ _ 1' l 2 @ _ 1' l 2 @ _ 1' l 2 @ _ 1' l 2 @
0x013550…0136e4 Dummy {f00=0x0056, f01=0x0190, f02=»( r Wl1' ( a W[WY1' ( L WF1' ( 9 W31' ( & W 1' ( W 1' ( _ 0 ? T V ; (w= VT =! ) V _ f= 6 @@@@@@@ ~ ;h= T. a= ; f= C =D ; b= a @ C V @T0 T
0x0136e4…013878 Dummy {f00=0x0056, f01=0x0190, f02=»T =} V ; (w= VT[ =! } ! & V ; (w= VTA =! V _ = (w=VT*@T ~ ~ m l ' W V @T 4 " 4 " ! 4 " " 4 " # " #4 " # " $4 " # " %4 " # & 4 " # ' 4
0x013878…013a0c Dummy {f00=0x0056, f01=0x0190, f02=» 4 0 4 T`= =) I *@ V = (w=VT! V `= (w=VT V =) A @T W @T 4 o " z { 4 W W " 4 ; ma T% aA !W; @ aa ba % ba% ma T , ; ma b a _=@ 4
0x013a0c…013ba0 Dummy {f00=0x0056, f01=0x0190, f02=» m 6 _ ! l A W W % Tt! oM) u Wc% lC 6 2@ " +6 BW W y @ l lW A & 0 P 0 l" _n0! 4 4 @ 6 W FW 6 W FW W 4 H,- A A $ ( % T ! u @ ' ' T _.@ ( 4 @ (
0x013ba0…013d34 (0, 25) Dummy {f00=0x0056, f01=0x0190, f02=» 1 W H 1 W 4 6 H 0 W H 0 W H 0 W 4 S ( ;D !q; T ! u * @S W @S 4 S + !q; T @S W @S 4 #g 4 4 N j $ - + I h u x
0x013d34…013ec8 Dummy {f00=0x0056, f01=0x0190, f02=» & + 0 4 * **SLMED 40 41 42 45 46 47 48 49 UDEN B ]R: SLUTD TOTAL:LINNR: BUDG.BELBUDGET]RBUDGETBEL BUDGET]RBUDGETTAL PROJEKT NR REGKONTONR REGKONTONR: OMPLACERINGER PRISREG.KODE: DET.KODE/LBNR: PLUS REGKONTONR BUDGETTERINGSKODETILL[GSBEV.DATO: AN
0x013ec8…01405c Dummy {f00=0x0056, f01=0x0190, f02=»LL[GSBEV. BUDGET [NDRING/SLETNING AF INDTAST TRANSAKTIONSKODE: ELLER TRYK "KVIT" ELLER "KRE" B99XXXXZZZZZZZVZZX-XBXXXXBXXXBXXZZZZZZZVZZ9-BZZZZZZZVZZX-BXXXE-XXXE-XXE-XXZZZE-ZZZE-ZZE-ZZ * B x
0x01405c…0141f0 Dummy {f00=0x0056, f01=0x0190, f02=» ) r q 9 m " l 8 m 7@ + ! q k k 7 p 8 p k ! k " k # k $ k % k & 9 p : p ;
0x0141f0…014384 Dummy {f00=0x0056, f01=0x0190, f02=» $ ( , 0 4 9 ? E K R Z b k u " 5 H [ n 0 0 0 - : J ' 0 9 B L W c o ~
0x014384…014518 Dummy {f00=0x0056, f01=0x4016, f02=» PNOD R @ ` ( ( 0 8 @ H P X ` h p
0x014518…0146ac Dummy {f00=0x0056, f01=0x0190, f02=» : H IDENT ADM5 TRA 4.2 81-05-06 F1 O1111 04.01.XXX.1 A5KONV B $$$TRAM T A5KONV f > : A5RET1M A5RET2A ASGVOL1 LAMPOFF LAMPON RAREADX SLUTID z > : SPCLRA SPLIN8 SQWRIT STRTID T:ATTF T:DSC0 T:DSC1 WRITIDM
0x0146ac…014840 Dummy {f00=0x0056, f01=0x0190, f02=» & 6 F X h " z # @ ) + -0 4 7 = J F " D R
0x014840…0149d4 (0, 26) Opaque[0x194]
0x0149d4…014b68 # DirEnt {nam=»KMD08 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0ad0, f03=0x0000}
0x0149d4…014b68 IdxSect {
0x0149d4…014b68 f00 = 0x0056 // 0x149d4 @0x0
0x0149d4…014b68 f01 = 0x0018 // 0x149d6 @0x2
0x0149d4…014b68 gno = [ // 0x149d8 @0x4
0x0149d4…014b68 [0x00]: C0x0056.0x2.0
0x0149d4…014b68 [0x01]: C0x0056.0x3.0
0x0149d4…014b68 [0x02]: C0x0057.0x0.0
0x0149d4…014b68 [0x03]: C0x0057.0x1.0
0x0149d4…014b68 [0x04]: C0x0057.0x2.0
0x0149d4…014b68 [0x05]: C0x0057.0x3.0
0x0149d4…014b68 [0x06]: C0x0058.0x0.0
0x0149d4…014b68 [0x07]: C0x0058.0x1.0
0x0149d4…014b68 [0x08]: C0x0058.0x2.0
0x0149d4…014b68 [0x09]: C0x0058.0x3.0
0x0149d4…014b68 [0x0a]: C0x0059.0x0.0
0x0149d4…014b68 [0x0b]: C0x0059.0x1.0
0x0149d4…014b68 ]
0x0149d4…014b68 }
0x014b68…014cfc Dummy {f00=0x0056, f01=0x0190, f02=» P IDENT KMD08 04.01.XXX.1 < P******************************************************** & P* f 4 P* THIS IS THE MAIN MODULE FOR KMDAPLICATION p 2 P* CONTAINING THE CWB'S, TWB'S AND INITIAL P* START POINTS P* P*
0x014cfc…014e90 Dummy {f00=0x0056, f01=0x0190, f02=»* 8 P**************************************************** P* F $ P* TRANSACTION TASK TC P P* x 8 P**************************************************** P TERM TC P* P CWB CB1 P CWB CB2 P CWB CB3 P
0x014e90…015024 Dummy {f00=0x0056, f01=0x0190, f02=» P TWB GB4 P TWB TB1 P UWB TB2 $ P DWB TD2(TB2) 4 PFD01 DSET FC=F8 VOL 999001 J PFD02 DSET FC=F9 VOL 999002 l & PKVOUCH DSET FC=31,DEV=TV,BUFL=100 2 PKJTAPE DSET FC=30,DEV=TJ,BUFL=70,BUFDS=KVOUCH 2 PKTALLY DSET FC=32,DEV=TR,B
0x015024…0151b8 Dummy {f00=0x0056, f01=0x0190, f02=»T FC=C2 FD999002 REGSET & PDK03 DSET FC=C3 FD999003 CYCLE SET $ PDK04 DSET FC=C4 FD999004 KT PLAN J PDSSOPI DSET FC=10 r PDSSOPO DSET FC=11 PDCOMM DSET FC=61 PKCASS DSET FC=12 PDK10 DSET FC=CA KONTOFILE PDK05 DSET FC=C5
0x0151b8…01534c Dummy {f00=0x0056, f01=0x018e, f02=» DSET FC=C9 VAR.REG. LEV. PDK11 DSET FC=CB POST. REG. " & PDSHCGP DSET FC=33,DEV=GP,BUFL=180 D & PDSHCLP DSET FC=80,DEV=LP,BUFL=180 n $ PDK12 DSET FC=CC BUDGET LOG FILE PFD03 DSET FC=FA VOL 999003 PFD04 DSET FC=FB VOL 999004 " P FMT
0x01534c…0154e0 Dummy {f00=0x0056, f01=0x018e, f02=» P CWB CB2 P CWB CBA P CWB CBC ( P CWB CB6 8 P CWB CBD H P TWB TBB X P TWB GB1 h P TWB GB2 x P TWB GB3 P TWB TBC P* PFDRK01 DSET FC=F9 PFDRK02 DSET FC=FB PKVOUCH DSET FC=31 PKGENP DS
0x0154e0…015674 (0, 27) Dummy {f00=0x0056, f01=0x0190, f02=» l $ PDK02 DSET FC=C2 FD999002 REGSET & PDK03 DSET FC=C3 FD999003 CYCLE SET 0 $ PDK04 DSET FC=C4 FD999004 KT PLAN Z PDSSOPI DSET FC=10 PDSSOPO DSET FC=11 PDCOMM DSET FC=61 PKCASS DSET FC=12 PDK10 DSET FC=CA KONTOFILE P
0x015674…015808 Dummy {f00=0x0056, f01=0x0190, f02=»LEV. v " PDK09 DSET FC=C9 VAR.REG. LEV. PDK11 DSET FC=CB POST. REG. 2 & PDSHCGP DSET FC=33,DEV=GP,BUFL=140 T * PDSHCLP DSET FC=80,DEV=LP,BUFDS=DSHCGP ~ " P FMTCTL INDS=KEYB,OUTDS=SCREEN P REENTER REENRK P START RAGO P* P
0x015808…01599c Dummy {f00=0x0056, f01=0x0190, f02=»KA P* P CWB CB9 P TWB TB9 $ P* 4 P START KBVGO > P REENTER REENKA R P* j PDSDC DSET FC=61 t $ PDSICR DSET FC=E0,DEV=II COPCMD=1 PDSICW DSET FC=E1,DEV=IO $ PDSVDU DSET FC=50,DEV=DY,BUFL=162 $ PDSKBAN DSET
0x01599c…015b30 Dummy {f00=0x0056, f01=0x0190, f02=» P TERM GA P* P CWB CB9 " P TWB TB9 2 P* B P START GTPGO L P REENTER REENGA ` P* x PDSDC DSET FC=61 PDSICR DSET FC=E0,DEV=II $ PDSICW DSET FC=E1,DEV=IO COPCMD=1 $ PDSGTP DSET FC=30,DEV=GP,BUFL=162
0x015b30…015cc4 Dummy {f00=0x0056, f01=0x0190, f02=»* P START LPGO P REENTER REENLA P* 6 PDSDC DSET FC=61 @ PDSICR DSET FC=E0,DEV=II X $ PDSICW DSET FC=E1,DEV=IO COPCMD=1 x $ PDSLP DSET FC=80,DEV=LP,BUFL=162 P P* P* P* DCTASK P* P* P
0x015cc4…015e58 Dummy {f00=0x0056, f01=0x0190, f02=» P* 4 P* WORK AREA FOR KEYBOARD AND DISPLAY TASKS P* J P* T PTB9 BLK ^ P* n & PTCT01 BIN 4X'0' TID AND STACKBASE x * PPRINTER STRG 4X'0' KEYBARD/VDU/PRINTER & PBVDU STRG 3840X'0' VDU SCREEN BUFF ( PPCURS STRG 4X'
0x015e58…015fec Dummy {f00=0x0056, f01=0x0190, f02=» WCC/CCC CHARACTER , PKBINH STRG 4X'0' KEYBOARD INHIBIT INDIC. PLINCNT STRG 4X'0' J . PDCLENG STRG 4X'0' DC READ EFFECTIVE LENGTH d PICWORK STRG 4X'0' * PINTATT STRG 4X'0' INTENSITY ATTRIBUTE " POFFFLG STRG 4X'0' OFFLINE FLAG PCOPN
0x015fec…016180 Dummy {f00=0x0056, f01=0x0190, f02=»CT P P**************************** P* 6 ( P* COMMON WORK BLOCK FOR ALL TASKS @ P* l . P***************************************** v P PCB9 BLK P* PCNFIGD BOOL PCNFBSY BOOL P* P* CONFIGURA
0x016180…016314 (0, 28) Dummy {f00=0x0057, f01=0x0190, f02=»C5C6C7' DV ADDRESSES KB/VDU v 6 PMF1GTP STRG 32X'C8C94A4B4C4D4E4F' DV ADDRESSES GTP $ H P* THE LENGTH OR PLACE OF THE CONFIG DATA ABOVE SHOULD NOT BE CHANGED ^ P* ( PMF1CU STRG X'6040' CU-ADDRESS MF # 1 P* > PCNFHC STRGI (16),'GA','GB','GC
0x016314…0164a8 Dummy {f00=0x0057, f01=0x018e, f02=»F','TG','TH', C l $ P 'TI','TJ','TK','TL','TM','TN' P EJECT @ PCB1 BLK N P* ^ . PCBKOFLG BOOL FALSE T=ALL BKO-CODES ALLOWED h 0 PCKTFLAG BOOL FALSE F=NO SALDO AT ALL IN KORT . PCCLKTFLG BOOL FALSE T=KONTOKORT I KASSELUK 0 PCTESTFLG
0x0164a8…01663c Dummy {f00=0x0057, f01=0x018e, f02=» d . PCFLT48 BOOL FALSE T=SPECIAL FIELD 48,TR=3 , PCKTAUTO BOOL TRUE T=ASK KORT AFTER TR 4 : 2 PCDCFLAG BOOL FALSE T=INCLUDES DATATRANSMISSION j . PCCYWRTF BOOL FALSE T=DO NOT USE CYCLE SET 2 PCADM22F BOOL FALSE T=ALLOWED FUNCTION (ADM 22) P
0x01663c…0167d0 Dummy {f00=0x0057, f01=0x0190, f02=» , PCGLREGFL BOOL FALSE T=GL REGSET PRESENT * PCCONVERT BOOL FALSE T=CONVERSION MODE 4 P* b P* l PCBIN0 BIN '0' v PCBIN1 BIN '1' PCBIN2 BIN '2' PCBIN3 BIN '3' PCBIN4 BIN '4' PCBIN5 BIN '5' PCBIN6 BIN '6'
0x0167d0…016964 Dummy {f00=0x0057, f01=0x0190, f02=»' PCBIN13 BIN '13' PCBIN14 BIN '14' " J PWEIGTH1 BCDI (13),'7','6','5','4','3','2','7','6','5','4','3','2','1' : PCB2 BLK P* & PCPFLG BOOL FALSE T: DISK OCCUPIED ( PCSPLITFL BOOL FALSE T: SPLIT RECORD " PCWFLAG BOOL FALS
0x016964…016af8 Dummy {f00=0x0057, f01=0x0190, f02=»RD n 0 PCCOLDFLG BOOL FALSE T=VERY FIRST COLD START . PCERRORFL BOOL FALSE T=ERROR IN COLD START > . PCCONVFLG BOOL FALSE T=CONVERSION GOING ON p $ PCSWFLAG BOOL FALSE SCRATCH FLAG 2 PCSKIFTWN BOOL FALSE T=WARNING ABOUT FD CHANGE & PCDUOVL B
0x016af8…016c8c Dummy {f00=0x0057, f01=0x0190, f02=»UDTFLG BOOL FALSE T=BUNDT CHECKS (POST REG) 6 PCRKCOPY BOOL FALSE T=FD2 EMPTY (RESET BY R-TASKS) 4 P* n P* x PCBIN15 BIN '15' PCBIN16 BIN '16' PCBIN17 BIN '17' PCBIN18 BIN '18' PCBIN19 BIN '19' PCBIN20 BIN '20
0x016c8c…016e20 Dummy {f00=0x0057, f01=0x0190, f02=»CT @ P*********************************************************** P* N : P* TABLE GIVING INDEXES FOR TRANSACTIONFIELDS X 4 P* FIELD NR GIVES DISPLACEMENT IN TABLE P* @ P************************************************
0x016e20…016fb4 (0, 29) Dummy {f00=0x0057, f01=0x0190, f02=»12','10','11','12','13', 11-20 C x > P '10','11','12','13','14','15','16','1','8','9', 21-30 C ( < P '10','5','12','13','14','5','18','19','7','7', 31-40 C j @ P '18','14','20','21','22','17','12','15','10','1', 41-50 C 6 P '2','3','4','2','3','4',
0x016fb4…017148 Dummy {f00=0x0057, f01=0x0190, f02=»26','26','26', 71-80 C j @ P '19','26','26','26','26','26','26','26','26','26', 81-90 C > P '26','26','26','26','26','26','26','26','26','26', C b > P '26','26','26','26','26','26','26','26','26','26', C < P '26','26','26','26','15','13','1
0x017148…0172dc Dummy {f00=0x0057, f01=0x0190, f02=»','5','1','5','6','6','5','0', C P '1','1','1','1' * * P* ITEM (N,1) := REGISTR. (TC,TD,....) D * P* ITEM (N,2) := R]KONV. (RA,RB,....) r > PCFLAG BINI (12,2),X'0011',X'0069',X'0010',X'0068',X'0000' : P* BITS NUMBERED : 15, 14, 13,...,5
0x0172dc…017470 Dummy {f00=0x0057, f01=0x0190, f02=» F=LOKAL P* BIT 2 T=LP P* F=NO LP , P* BIT 3 T=GTP H P* F=NO GTP b P* BIT 4 T=TTP ~ P* F=NO TTP P* BIT 5 T=VDU P* F=PDU P* BIT 6 T=KBN+KBA (KBAN)
0x017470…017604 Dummy {f00=0x0057, f01=0x0190, f02=» BIT 9 P* P* BIT 10 P* . P* 8 P EJECT B PCB3 BLK P P* ` * PCADVIS BOOL F T=ADVISLISTE IN PROGRESS j , PCBUDGET BOOL FALSE T=TRANS 40-49 ALLOWED , PCFAKT10 BOOL FALSE T=FAKTNR 10 FALSEIGS * PCF9094 BOOL FALS
0x017604…017798 Dummy {f00=0x0057, f01=0x0190, f02=»JORRING z & PCWORK1 BOOL F WORKFLAG REMITTERING 0 PCBDTGIR BOOL FALSE T=LIST GIRO, F=LISTCHECK : . PCKFLAG BOOL FALSE T=EXCL ACCESS, KNT. PLAN n P* P* P* P* P* P* P* ( PDUMBC3 STRG 404 =4+128+128+128+2+6
0x017798…01792c Dummy {f00=0x0057, f01=0x0190, f02=»F4 STRG 398X'FF' PCCONBUF5 STRG 398X'FF' PCCONBUF6 STRG 398X'FF' 6 PCCONBUF7 STRG 398X'FF' T PCCONBUF8 STRG 398X'FF' r PCTRANBUF STRG 698 PCTXBUF STRG 24 " PCIXBUF STRG 8 IDX.FILE BUFFER PCLEVBUF STRG 128 LEV BUFFER
0x01792c…017ac0 Dummy {f00=0x0057, f01=0x018e, f02=» EJECT PCB4 BLK P* P* ( P* 2 P* < P* F P* P P* Z P* d P* n P* x P* P* P* P* P* P* P* P* PDUMCB4 BINI (6) PCCONBUF9 STRG 398X'FF' , P
0x017ac0…017c54 (0, 30) Dummy {f00=0x0057, f01=0x0190, f02=» PCDUM2 BCD 11D'0' PCDUM3 BCD 11D'0' ( PEDITBUF STRG 732 FORMATEDITING BUNDT 4 PCTRBUF STRG 40 ` PCKFBUF STRG 7 v PCCYSIZE BIN '36' & P* ONLY RELEVANT IF EITHER ( P* CBKOFLG=F (CHECK BKO) OR , P* CKT
0x017c54…017de8 Dummy {f00=0x0057, f01=0x018e, f02=»-01', C P '03','-01', C P '04','-01', C ( P '05','-01', C @ P '06','-01', C X P '07','-01', C p P '08','-01', C P '09','-01', C P '10','-01', C P '12','-01', C P '18','-01', C P '19','
0x017de8…017f7c Dummy {f00=0x0057, f01=0x0190, f02=» | P '-45','-01', C P '-46','-01', C " P '-47','-01', C < P '-48','-01', C V P '-49','-01', C p P '-50','-01', C P '-51','-01', C P '-52','-01', C P '-53','-01', C P '-54','-01', C
0x017f7c…018110 Dummy {f00=0x0057, f01=0x018e, f02=»G BOOL FALSE T=KMD167 (HVIDOVRE) $ PCTALLY BOOL F T: OUTPUT ON TALLY ! ( & PCTXTFLG BOOL F T: TEXTBUF OCCUPIED ! P , PCLEVFLG BOOL FALSE T=LEV BUFFER RESERVED ! z , PCVARFLG BOOL FALSE T=VAR BUFFER RESERVED ! . PCIDXFLG BOOL FALSE T=INDEX BUFFER RESERVED !
0x018110…0182a4 Dummy {f00=0x0057, f01=0x0190, f02=» ( PCDKOFF BOOL FALSE T=DISK SWITCH OFF " * PCLEV8FLG BOOL FALSE T=GENERATE LEV NR " 0 * PC539FLG BOOL FALSE T=KMD539 (TINGLEV) " ^ 0 PCVALFLG BOOL TRUE T=CHECK VALORDATO, TR 3,4 " & PCAD41FLG BOOL FALSE T=IN ADM 41/43 " 6 PCVAREXFL BOOL FALSE T=EXCLUSIV
0x0182a4…018438 Dummy {f00=0x0057, f01=0x0190, f02=»L REGSET " h & PCKTMAX BIN '21' MAX SIZE KONTOPLAN # * PCIXLAST BIN LAST RECORD IN INDEXFILE # : " PCIXFREE BIN FIRST FREE RECORD # h PCREMPT1 BIN # PCBUDPT BIN # PCRECLGD BIN W'128' # & PCRECBCD BCD 6D LOGICAL RECORD NR. # PCKMDNAM STRG 6'O
0x018438…0185cc Dummy {f00=0x0057, f01=0x0190, f02=»ST LINE KORT (DEFAULT) # | > PFROMTX STRGI (12)2C'KA','KB','KC','KD','KE','KF','KG', C $ P 'KH','KI','KJ','KK','KL' $ ` P EJECT $ PTB1 BLK $ P* $ " PTTCY1FLG BOOL FALSE IN CYCLE? $ " PTTCY2FLG BOOL FALSE IN STABEL? $ PTTLSTFLG BOOL FALS
0x0185cc…018760 Dummy {f00=0x0057, f01=0x0190, f02=» $ l & PTTJTEND BOOL FALSE END OF JOURNAL % * PTTEORFLG BOOL FALSE *-- END OF RECORD % 2 ( PTTSUPFLG BOOL FALSE SUPPLEMENT POST % ` , PTTSMALL BOOL FALSE *-- SMALL GIRO KVIT? % & PTTR11FLG BOOL FALSE T: KASSE CLOSE % , PTTKORTFL BOOL FALSE T: IN KONTOKOR
0x018760…0188f4 (0, 31) Dummy {f00=0x0057, f01=0x0190, f02=» PTTDKDEX BIN & " PTTSTYRDX BIN '1' HBOG/DEBP/REM & PTTTROLD BIN NO OF OLD TRANS & > PGTLINE BIN CURRENT LINE & b PTTDKBCD BCD 2 D/K VALUE & $ PTTARKSAV BCD 12 SAVED ARK KT NR & & PTTCYKTOT BCD 14 SAVED CYKLE TOTAL & & PTTCYKPOS BCD 4 SAVED
0x0188f4…018a88 Dummy {f00=0x0057, f01=0x0190, f02=» PGTMSK BCD 6D'999' ' PGTDATO BCD 8X'FFFFFFFF' ' PTSWBCD2 BCD 2 *-- ' > & PTTCYM STRG 1 CYKLE MARK ON JOURNAL ' X . PGTREGF BCDI (26),16X'F' TRANSACTION FIELDS ' P EJECT ' PGB1 BLK ' P* ' PGTEXFLAG BOOL FALSE ' PGTADUPFL BOOL FA
0x018a88…018c1c Dummy {f00=0x0057, f01=0x0190, f02=»OOL FALSE *-- SPCLRN OR SPCLRA ' PGTTYPE2 BOOL FALSE *-- ( & PGTTYPE3 BOOL FALSE *-- ( D 4 PGTKASSE BOOL FALSE *-- TRUE- IN KASSE FUNCTIONS ( b 4 PGTSLUTFL BOOL TRUE FALSE: SLUT KEY IS SIMULATED ( ( PGTDIVTR BOOL FALSE T: DIVERSE TRANS ( . PGTTRSEL BO
0x018c1c…018db0 Dummy {f00=0x0057, f01=0x0190, f02=»L FALSE T=SUBTOTAL ( P* ) P* ) $ PGSWBIN5 BIN ) . PGSWBIN6 BIN ) B PGSWBIN7 BIN ) V PGSWBIN8 BIN ) j PGSWBCD1 BCD 14 ) ~ PGSWBCD2 BCD 14 ) PGSWBCD3 BCD 6 ) PGSWBCD4 BCD 6D ) PGSWBCD5 BCD 6 ) PGSWBCD6 BCD 14 ) PGSWBCD
0x018db0…018f44 Dummy {f00=0x0057, f01=0x018e, f02=»ATS ) p P EJECT * PGB2 BLK * P* * * PSPPROMPT BOOL FALSE * 4 PSPCHANGE BOOL FALSE * P 2 PSPDUPL BOOL FALSE TRUE: FIELD HAS BEEN DUPPED * l 2 PSPME BOOL FALSE FALSE: NO CHECK FOR ME FIELDS * 0 PSPKEYFLG BOOL TRUE FALSE NO KOR-KEY IN SPERR *
0x018f44…0190d8 Dummy {f00=0x0057, f01=0x0190, f02=» PTTKEY4 BOOL FALSE KEY4 + ( PTTKEYFLG BOOL FALSE T=KB: 6271,6272 + " ( PTTSUMFLG BOOL FALSE SUM ON SCREEN ? + N PGTGTPFLG BOOL FALSE T=GTP + z PGTLPFLG BOOL FALSE T=LP + P* + P* + P* + P* + PSPBINW1 BIN + PSPBINW2 BIN +
0x0190d8…01926c Dummy {f00=0x0057, f01=0x018e, f02=» BIN + PGTRETUR BIN , $ PGTREGDEX BIN '0' TRANSTYPE INDEX , ( PGTDFLIN BIN '27' DEFAULT LINE NUMBER , H & PGTHCDEV BIN HARDCOPY 1=GTP, 2=LP , t PTTASKNR BIN , PGSSWITCH BINI (26) , PGTUSED BINI (26) , P EJECT , PGB3 BLK , P* ,
0x01926c…019400 Dummy {f00=0x0057, f01=0x0190, f02=» , r PGTSPGFLG BOOL FALSE - 2 PGTKORTFL BOOL FALSE T=KONTO FOUND IN KONTOPLAN - $ & PGTTESTFL BOOL FALSE T=IN TEST MODE - Z $ PGTSWFLAG BOOL FALSE SCRATCH FLAG - & PGTSUMKEY BOOL FALSE SUM INDIKATOR - " PGTNWFLG BOOL FALSE T= USE .NW - , PGTADMFLG BOO
0x019400…019594 (0, 32) Dummy {f00=0x0058, f01=0x0190, f02=» 0 PGTGLSPG BOOL FALSE T=INQUIRIES ON GL REGSET . . PGTRKMFLG BOOL F T=R]KONV. MASTER TERMINAL . 8 4 PTTCYTRFL BOOL FALSE F: BEFORE 1. TRANS IN CYKEL . j P* . P* . PGSWBIN1 BIN . PGSWBIN2 BIN . PGSWBIN3 BIN . PGSWBIN4 BIN . PGT
0x019594…019728 Dummy {f00=0x0058, f01=0x0190, f02=»GTLBNRIN BCD 6D EKSP.LB.NR ASKED FOR . PGTANTAL BCD 4 / , PGTREGNR BCD 3 TRANSTYPE / B " PGTDBKRS BCD 2 SIGN FOR AMOUNT / b " PGTL8TXT STRG 8 TEXT FOR LINE 8 / PSPINPUT STRG 35 / PGSWSTR9 STRG 9 / PGSWSTR20 STRG 20 / P EJECT / PGB4 BL
0x019728…0198bc Dummy {f00=0x0058, f01=0x0190, f02=»RANS 28/29 / | * PGTCHKPR BOOL F T= FIRST CHECK ON PAGE 0 " PGTSTRFLG BOOL F T= TRANS 18/19 0 @ , PGTASTFLG BOOL F T=LAST REC '**' (BUDGET) 0 f . PGTZERO BOOL F ZERO LEVAMOUNT (ONCE A YEAR) 0 P* 0 P* 0 P* 0 P* 0 P* 0 P* 0 P* 0
0x0198bc…019a50 Dummy {f00=0x0058, f01=0x0190, f02=»' LINENR. ON CYSET FOR CHECK 0 PGSWBIN9 BIN '0' 1 $ PGSWBIN10 BIN 1 < $ PGTSCHLOW BIN '0' USED IN IDXGET 1 P $ PGTSCHMID BIN '0' USED IN IDXGET 1 x $ PGTSCHHGH BIN '0' USED IN IDXGET 1 PGTKTTYP BCD 4D KTPLAN TYPE 1 " PGTKFVAL BCD 14 VALUE-KONTOFILE
0x019a50…019be4 Dummy {f00=0x0058, f01=0x0190, f02=»K 1 P* 2 & PGTKBAFLG BOOL FALSE T=INCLUDES KBA 2 $ PGTVDUFLG BOOL FALSE T=VDU, F=PDU 2 > & PGTTTPFLG BOOL TRUE T=TTP,F=NO TTP 2 f PTREMFLG BOOL F T=REMOTE 2 PTFELT90 BOOL F 2 PTFELT91 BOOL F 2 PTFELT92 BOOL F 2 PTFELT93 BOOL 2 PTF
0x019be4…019d78 Dummy {f00=0x0058, f01=0x0190, f02=» P* 3 P* 3 P* 3 PGTLEVNR BCD 12 3 " PGTLEVPNR BCD 6 3 8 PGTLEVBFO BCD 2 3 N PGTLEVGI BCD 8 3 d PGTLEVALT BCD 12 3 z PGTLEVTKO BCD 2 3 PGTLEVDAT BCD 8 OPRET DATO 3 PGTTXTTKO BCD 4 TEXT KODE 3 PGTLEVNVN STRG 30 3 PGTLEVA
0x019d78…019f0c Dummy {f00=0x0058, f01=0x0190, f02=» 12 LEV FRA 3 PGTPRTTIL BCD 12 LEV TIL 4 P EJECT 4 4 PTB2 BLK 4 B P* 4 R P* 4 P* 4 f P* 4 p P* 4 z P* 4 P* 4 P* 4 P* 4 P* 4 P* 4 P* 4 P* 4 P* 4 P* 4 P* 4 P* 4 P* 4 PDU
0x019f0c…01a0a0 Dummy {f00=0x0058, f01=0x0190, f02=»SUM MARK 4 PGTTEXT STRG 6 5 PTTSPARE3 STRG 1C'.' 5 & PTCONBUF STRG 398X'FF' 5 B & PTTCYKST BCD 4 1. LINE CYCLE/STABEL 5 ` $ PTTKTSLD BCD 14 KONTOKORT, SALDO 5 & PTTKTLIN BCD 4 KONTOKORT, LINIE NR 5 ( PTTKTCHK BCD 2 KONTOKORT, CHECKCIFFER 5 . P
0x01a0a0…01a234 (0, 33) Dummy {f00=0x0058, f01=0x0190, f02=»6),16X'F' DUP FIELDS 5 P EJECT 6 PCD3 DBLK 6 * P* 6 : P* 6 D P* 6 N P* 6 X P* 6 b PSOPINP STRG 4 6 l PCPCKBUF STRG 128 PACKBUFFER 6 PCCYBUF STRG 128 CYSET BUFFER 6 " PCKTBUF STRG 128 KTPLAN BUFFER 6 PCEDATNR BCD 4 DATASET NR
0x01a234…01a3c8 Dummy {f00=0x0058, f01=0x0190, f02=»),12D EJ-EDB ACCOUNT NOS. 6 PCRELDAY BCD 4X'FFFF' 7 " PCCONFREC BCD 6 7 > * PC12ACC BCDI (60,2),14D EJ-EDB COUNTERS 7 T P EJECT 7 P* 7 PCD4 DBLK 7 P* 7 P* 7 P* 7 P* 7 P* 7 PCTWBIN1 BIN 7 PCTWBIN2 BIN 7 PCMAX
0x01a3c8…01a55c Dummy {f00=0x0058, f01=0x0190, f02=» GL REGSET 7 t . PCBEH BINI (12,2) FIRST AND SIZE OF BEHLDN. 8 . PCTR12 BINI (12,2) FIRST AND SIZE OF TR 12 8 D PCFNAME STRGI (8),8 8 v PCVOLNO BCD 6 VOLUME NUMBER 8 PCKMDNR BCD 6D KOMMUNE NR 8 PCMASKDAT BCD 8X'FFFFFFFF' 8 PCVOL STRGI (4),6 8
0x01a55c…01a6f0 Dummy {f00=0x0058, f01=0x0190, f02=»D 6 1. NUMBER FOR SUM FUNCTION 8 , PGTSUMCNT BCD 14 COUNTER FOR SUMFUNCTION 9 & PTTINF1 STRG 14 9 V . PTTRECOPN BCD 6 REC. NO. FOR OPEN OR CLOSE 9 l * PTTRECCHN BCD 6 REC. NO. FOR FD CHANGE 9 $ PTTSTLBNR BCD 6D FIRST EKSP. LBNR 9 & PTTSTCASH BCD 14D PRI
0x01a6f0…01a884 Dummy {f00=0x0058, f01=0x0190, f02=» $ PTTLBNR BCD 6D CURRENT EKSP.LBNR : ( PTTACC BCDI (8,2),16D'0' EDB COUNTERS : , , PTTGLREC BCD 6 SAVE RECORD NO, GL REGSET : X P EJECT : PCBA BLK : P* : & PCRKKLAR BOOL F R]KONV CAN COMMENCE : PFDBUSY BOOL FALSE : PCOPYFLG BOOL F :
0x01a884…01aa18 Dummy {f00=0x0058, f01=0x0190, f02=»NG : x PFORSKUD BOOL F ; PLONOPL BOOL F ; PCHFLAG BOOL F ; 6 PTTPBUSY BOOL F ; L P* ; b P* ; l P* ; v P* ; P* ; P* ; P* ; PLENGTH BIN '128' ; PHEX31 BIN X'0031' ; PHEX82 BIN X'0082' ; PHEX86 BIN X'0086' ;
0x01aa18…01abac Dummy {f00=0x0058, f01=0x0190, f02=»LASTREC BIN '1950' ; PCENTRAL BIN 1=BBY, 2=REST < PRKKMNR BCD 3 KOMMUNENR < < PSTR25 STRG X'2525' < Z PSTR7F STRG X'7F7F' < t " PKEYTAB STRGI (6),' ' < P EJECT < PCBC BLK < P* < P* < P* < P* < P* < P* <
0x01abac…01ad40 Dummy {f00=0x0058, f01=0x0190, f02=»* < PCSLUTFLD BINI (100,2), C = $ P '93','6', HENVISNINGSNUMMER C = , & P '101','8', SAMBESKATNINGSKODE C = T ( P '106','9', SAKTTEPLIGTENS OMFANG C = ~ & P '113','1', PERSONFRADRAGSKODE C = " P '118','8', KIRKESKATTEKODE C = ( P '120','10',
0x01ad40…01aed4 (0, 34) Dummy {f00=0x0058, f01=0x0190, f02=»'168','12', ERKL[RINGSKODE C = P '170','17', ENKEKODE C > $ * P '175','0', LIGNINGSMYNDIGHEDSKODE C > D " P '182','0', UDSOGNINGSKODE C > r & P '187','18', S[RBEHANDLINGSKODE C > P '194','0', ]RSAGSKODE C > P '199','16', SLETTEKODE C > P
0x01aed4…01b068 Dummy {f00=0x0058, f01=0x0190, f02=»KSOMHED C > t * P '233','2', RENTEINDT[GTER AF BANKB C ? ( P '238','2', RENTEINDT[GT IOVRIGT C ? @ $ P '240','2', OBLIGATIONSRENTER C ? l P '245','3', AKTIEUDBYTTE C ? $ P '252','2', SKATTEGODTGORELSE C ? 0 P '264','2', INDKOMST SOM MEDHJ [GTEF[LL
0x01b068…01b1fc Dummy {f00=0x0058, f01=0x0190, f02=»','2', LONMODT FRAGDRAG C ? $ P '411','2', UNDERHOLDSBIDRAG C @ " ( P '416','2', FORSIKR FULD FRADRAG C @ J P '423','2', FRADRAG B C @ v ( P '428','2', UNDERSKUD AF EJENDOM C @ P '430','2', FRADRAG A C @ * P '435','2', UNDERSKUD AF VIRKSOMHED C
0x01b1fc…01b390 Dummy {f00=0x0058, f01=0x0190, f02=»LLE C @ j P '480','2', RENTEUDGIFTER C A , P '505','0', SELVANGIVEN ALM INDKOMST C A 2 & P '517','0', ANSAT ALM INDKOMST C A b & P '555','4', RENTENEDSLAGSBELOB C A P '567','2', SOC YDELSER C A P '579','0', EENGANGSBELOB C A P '586','4',
0x01b390…01b524 Dummy {f00=0x0058, f01=0x018e, f02=»', ANSAT FORMUE C A $ P '625','0', UDENLANDSK FORMUE C B P '632','0', FRIV[RDI C B B " P '651','0', S[RLIG INDKOMST C B b , P '656','23', FRADRAG S[RLIG INDKOMST C B . P '663','0', SELVANGIVEN S[RLIG INDKOMST C B ( P '668','2', ANSAT S[RLIG INDK
0x01b524…01b6b8 Dummy {f00=0x0058, f01=0x0190, f02=» B b $ P '699','0', AFST]ELSESAFGIFT C C & P '702','13', SKATTEPL INDTR]DEN C C 0 " P '707','13', SKATTEPL OPHOR C C Z P '714','13', KIRKEDATO C C & P '719','21', ANTAL DAGE SOMAND C C $ P '726','0', BEREGNET SLUTSKAT C C $ P '733','0', FORMUES
0x01b6b8…01b84c Dummy {f00=0x0058, f01=0x0190, f02=»OVSTILL[G SI C C z P '764','2', PRIVATFORBRUG C D $ P '771','0', SLUTOPG ALM INDK C D : P '776','0', SLUTOPG SI C D b P '783','0', SLUTOPG TI C D P '790','0', SEKRET[R C D P '795','0', STILLING C D P '803','2', STATSSKAT C D & P
0x01b84c…01b9e0 Dummy {f00=0x0058, f01=0x0190, f02=»AT C D z P '827','2', KIRKESKAT C E P '834','2', FORMUESKAT C E , & P '839','2', S[RLIG INDKOMSTSKAT C E N P '841','2', TILL[GSSKAT C E x & P '846','2', S[RLIG UDBYTTEKSAT C E " P '853','2', HENSTANDSBELOB C E P '865','2', SAMMENT[LLING C E
0x01b9e0…01bb74 (0, 35) Dummy {f00=0x0058, f01=0x0190, f02=» C E ~ P '973','0', NY A-SKAT C F P '978','0', C F * P '980','0', C F B P '985','0', C F Z P '992','0', C F r P '997','0', C F P '1000','0' LAST ENTRY F PMEDHJ BCD 7D F PFORMUE BCD 7D F PDATE BCD 7 F PSTARTIX BC
0x01bb74…01bd08 Dummy {f00=0x0058, f01=0x0190, f02=»,'KE','KF', C F j P 'KG','KH','KI','KJ','KL' G P* G 8 P EJECT G B PCBD BLK G P P* G ` P* G j P* G t P* G ~ P* G P* G P* G P* G P* G P* G P* G P* G P* G P* G P* G P* G P* G
0x01bd08…01be9c Dummy {f00=0x0058, f01=0x018e, f02=»FFORSK STRG 'BG30100D' G PFLONOPL STRG 'BG99999D' H PVALFFLD BCDI (1),'0' H > PCPRKEY STRGI (9),10C H Z PCPRIX BCDI (9),6D H v PWORK0 BCDI (4),11D'0' H P* H P* H P* H P* H P* H P EJECT H PTBC BLK H P* H , P
0x01be9c…01c030 Dummy {f00=0x0058, f01=0x0190, f02=» PSLUTFLAG BOOL F I PINQ1 BOOL I PINQ2 BOOL I . PINQ3 BOOL I @ PCPRFLAG BOOL I R P* I f P* I p P* I z P* I P* I P* I P* I P* I PCARDPT BIN I PCPRNR BCD 12 I PSAMSKAT BCD 2 I POMF BCD 2 I PBCDW
0x01c030…01c1c4 Dummy {f00=0x0058, f01=0x0190, f02=»B BLK I P* J $ PTBOOL1 BOOL F USED IN INPUTTEST J PTBOOL2 BOOL F - J @ PTBOOL3 BOOL F - J X PTBOOL4 BOOL F - J p PTBOOL5 BOOL F - J PTBOOL6 BOOL F - J PTBOOL7 BOOL F J PTBOOL8 BOOL F - J PTBOOL9 BOOL F - J PTBOOL10 BO
0x01c1c4…01c358 Dummy {f00=0x0058, f01=0x0190, f02=» PWORK6 BCD 3 K PWORK7 BCD 13 K PGSWSTR3 STRG 3 K , PGSWSTR80 STRG 80 K B PTEDBUF STRG 128 K Z PWORK12 STRG 3 K r PWORK13 STRG 10 K PWORK14 STRG 10 K PCOPYBUF STRG 85 K PFIELD BCDI (12,4),3D K PSAVEF STRGI (12,4),12C K P*
0x01c358…01c4ec Dummy {f00=0x0058, f01=0x0190, f02=» ENTRY REENGA K P ENTRY DC1GO L P ENTRY REEND0 L * P ENTRY LPGO L @ P ENTRY REENLA L T P ENTRY RAGO L j P ENTRY REENRK L ~ P ENTRY RAEXIT L P EXT SETFLG L P EXT RKGO L P EXT T1GO L P EXT DCTASK L P EXT VDUKB L P
0x01c4ec…01c680 Dummy {f00=0x0058, f01=0x0190, f02=» P ENTRY ONLINE M P EXT DKTEST M P INCLUDE EQUATE M . P M F & P DSC0 DSDC,2 DUMMY REFERENCE T:IO M N , P**************************************** M x P* M P* START OF REGISTRATION M P* M , P****************************************
0x01c680…01c814 (0, 36) Dummy {f00=0x0059, f01=0x0190, f02=»T ADDRESS FOR KEYBOARD TASK M , P**************************************** N $ PKBVGO N T P ADD NBRKBV,='1' N b P CALL GETTID,TCT01 N z P SUB TCT01,=X'4B40' N * P* PERF CONF READ & CONVERT CONFIG DATA N P MOVE COPNO,CNFHC(TCT01) N 2 P MOVE STRG
0x01c814…01c9a8 Dummy {f00=0x0059, f01=0x0190, f02=»0 N z $ P B KB050 R]KONV. DEFAULT OFFLINE O PKB030 O 2 " P PAUSE YES, WAIT FOR RESTART O @ PKB050 O f P CALL VDUKB,TCT01 O t & P PERF OFFLNE BRANCH TO CREDIT CODE O * P B KB050 RETURN TO IBM-3270 EMULATION O P O P O P O * P**********
0x01c9a8…01cb3c Dummy {f00=0x0059, f01=0x0190, f02=»***** O p P P PRAGO P P SET GTRKONV P " P CALL GETTID,TTASKNR P 6 , P SUB TTASKNR,=X'5240' ADJUST TO TASKNBR P R P PERF SETFLG,CBIN2 P P PAUSE P PRA010 P P B RKGO P PRAEXIT P P PERF RKSWITCH P P B RA010 P P P P P
0x01cb3c…01ccd0 Dummy {f00=0x0059, f01=0x0190, f02=»********************************************* P P Q 6 PGTPGO Q > P ADD NBRGTP,='1' Q L P CALL GETTID,TCT01 Q d P SUB TCT01,=X'4740' Q ~ P MOVE PRINTER,=X'0001' Q P* PERF CONF Q P CALL PRINT,TCT01 Q P Q P Q P Q 4 P**********
0x01ccd0…01ce64 Dummy {f00=0x0059, f01=0x0190, f02=»************************ Q x P R PLPGO R ( P MOVE PRINTER,=X'001' R 4 P MOVE TCT01,=W'2' R R P CALL PRINT,TCT01 R l P R P R 4 P*********************************************** R P* R " P* START ADDRESS FOR DC-TASK R P* R & P
0x01ce64…01cff8 Dummy {f00=0x0059, f01=0x018e, f02=»************************* R P* S " P* RESTART OFF LINE TASK S , P* S P P**************************** S Z P S ~ POFFLNE PROC S 4 P MOVE STRG2,FROMKX(TCT01) GET OFF LINE TASK NAME S * P CBE STRG2,=C' ',RETOFF ANY OFFLINE ? S P RSTRT S
0x01cff8…01d18c Dummy {f00=0x0059, f01=0x0190, f02=» P* T P* RESTART ON LINE TASK T P* T 0 " P****************************** T : PONLINE PROC T ` 6 P MOVE GSWSTR2,FROMTX(TTASKNR) GET ONLINE TASK NAME T t , P CBE GSWSTR2,=C' ',RETON ANY ON LINE ? T P RSTRT GSWSTR2 YES T P PAUSE T P P
0x01d18c…01d320 Dummy {f00=0x0059, f01=0x0190, f02=» RESTART TASK AFTER RKONV EXIT T P************************* U ( PRKSWITCH PROC U J " P MOVE GSWSTR2,FROMRX(TTASKNR) U ` P CBE GSWSTR2,=C' ',RETRK U P RSTRT GSWSTR2 U P PAUSE U PRETRK U P RET U P PEND U P EJECT U PREENTC
0x01d320…01d4b4 (0, 37) Dummy {f00=0x0059, f01=0x40b0, f02=» DSC1 DSSOPO,OFF,GSWBIN2 U P DELAY CBIN10 V P B REENTC V 6 P* V H PREENKA V R PREENGA V ` PREENLA V n PREEND0 V | P EXIT V P V P END V @ V
0x01d4b4…01d648 Dummy {f00=0x0059, f01=0x2008, f02=» W CBE GSWSTR2,CBLANKS,RETON ANY ON LINE ? 3 P RSTRT GSWSTR2 YES 3 8 P PAUSE 3 R PRETON 3 ` P RET 3 n P PEND 3 z P* 3 P 3 P END 3 @ 3 P* 2 P 2 P 2 P************************** 2 P* 2 P* RESTART ON LINE
0x01d648…01d7dc Dummy {f00=0x0059, f01=0x0190, f02=»RI %C P @ A 1XF R6 _ A I tW u * I , t R K X B M0 R S0 d V & v q0 w0 J F " D @L W , u} R L " L&0R T R P _=! LTW ! L! +
0x01d7dc…01d970 Dummy {f00=0x0059, f01=0x018e, f02=»A L P l G . ` > J F " D RA @ ?R @ @ DW H H A _ W C T C T C P @ A 1XF R6 _ A @ N X 0 @ ' X )0 @ /0 J F " D I tW u *
0x01d970…01db04 Dummy {f00=0x0059, f01=0x0190, f02=» o r0 u K * z r < ( L J F " D @ _< L LA L( @ DI A R R R L L 0X R t 0 0 v p
0x01db04…01dc98 Dummy {f00=0x0059, f01=0x0190, f02=» l ' , ` < Z L f n l J F " D RW RW RW RW @ D?RI AH A 1XF R6 11 W/A$ RW)H$&H"# R 0X% | * t p
0x01dc98…01de2c Dummy {f00=0x0059, f01=0x0190, f02=» =0 W ? 8 J F " D K$ R 0X 0R 0X R0X%0R ?RI A RW @ ?RA A A L# L L R B b n F . ~ G . H K P R H T V F X b T
0x01de2c…01dfc0 Dummy {f00=0x0059, f01=0x018e, f02=» L@ @ 1XF R6 jj _# b 4 l 0 @ b P Y ` Y p 6 0 2 6 J F " D + 6 R 7 A 1XF R2 RRR_ R L R W!
0x01dfc0…01e154 (0, 38) Opaque[0x194]
0x01e154…01e2e8 # DirEnt {nam=»DUMMY «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0b30, f03=0x0000}
0x01e154…01e2e8 IdxSect {
0x01e154…01e2e8 f00 = 0x0059 // 0x1e154 @0x0
0x01e154…01e2e8 f01 = 0x0002 // 0x1e156 @0x2
0x01e154…01e2e8 gno = [ // 0x1e158 @0x4
0x01e154…01e2e8 [0x00]: C0x0059.0x2.0
0x01e154…01e2e8 ]
0x01e154…01e2e8 }
0x01e2e8…01e47c Dummy {f00=0x0059, f01=0x0190, f02=» IDENT DUMMY 77-04-21 * " & "* DUMMY MODULE TO REPLACE TRABUG , * V * ` j ENTRY TC:CHK r ENTRY TC:ERR P ENTRY I:ERR9 P ENTRY I:ERRA P ENTRY I:ERRB EXTRN I:ECB EXTRN I:BUF
0x01e47c…01e610 Dummy {f00=0x0059, f01=0x4082, f02=» TC:ERR EQU * PI:ERR9 EQU * PI:ERRA EQU * 4 PI:ERRB EQU * H RB * j END r@ ~ r ENTRY TC:ERR P ENTRY I:ERR9 P ENTRY I:ERRA P ENTRY I:ERRB EXTRN I:ECB EXTRN I:BUF
0x01e610…01e7a4 Dummy {f00=0x0059, f01=0x2008, f02=» NT DUMMY 77-04-21 * " & "* DUMMY MODULE TO REPLACE TRABUG , * V * ` j ENTRY TC:CHK r ENTRY TC:ERR EXTRN I:ECB EXTRN I:BUF PS EQU A14 WK1 EQU 1 WAIT EQU X'80'
0x01e7a4…01e938 Dummy {f00=0x0059, f01=0x018e, f02=» R<R?R _ ?R T# R 8R( H ?R F V f v $ 51 52 J F " D %?R?R ?R
0x01e938…01eacc Dummy {f00=0x0059, f01=0x018e, f02=» 0 $ J F " D " L?R <R "?R L $ " x x ?R ?R % L " v 6 0 " 0 " .0 " 10 0 :0 0 A0
0x01eacc…01ec60 Dummy {f00=0x0059, f01=0x018e, f02=» w | J F " D @ L" W L?R v # L v v ?R ?R $ < r 0 < 0 < J F " D x # L x x ?R ?R
0x01ec60…01edf4 (0, 39) Opaque[0x194]
0x01edf4…01ef88 # DirEnt {nam=»M:PROC«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0b38, f03=0x0000}
0x01edf4…01ef88 IdxSect {
0x01edf4…01ef88 f00 = 0x0059 // 0x1edf4 @0x0
0x01edf4…01ef88 f01 = 0x0004 // 0x1edf6 @0x2
0x01edf4…01ef88 gno = [ // 0x1edf8 @0x4
0x01edf4…01ef88 [0x00]: C0x0059.0x3.0
0x01edf4…01ef88 [0x01]: C0x005a.0x0.0
0x01edf4…01ef88 ]
0x01edf4…01ef88 }
0x01ef88…01f11c Dummy {f00=0x0059, f01=0x0190, f02=» P$KMDALL PSKF 1 @ P$KMDGEN KMD=080,VER=@VER=02$$,REL=@REL=03$$,MOD=0801$$ @080= " B P$KMDGEN KMD=0801,VER=@VER=02$$,REL=@REL=03$$,MOD=0802$$ @0801= f B P$KMDGEN KMD=080T,VER=@VER=02$$,REL=@REL=03$$,MOD=0802$$ @080T= B P$KMDGEN KMD=0802,VER=@
0x01f11c…01f2b0 Dummy {f00=0x0059, f01=0x018e, f02=»ER=@VER=02$$,REL=@REL=03$$,MOD=0802$$ @0804= ~ B P$KMDGEN KMD=0805,VER=@VER=02$$,REL=@REL=03$$,MOD=0802$$ @0805= 4 B P$KMDGEN KMD=0806,VER=@VER=02$$,REL=@REL=03$$,MOD=0802$$ @0806= z B P$KMDGEN KMD=0807,VER=@VER=02$$,REL=@REL=03$$,MOD=0802$$ @0807= B P$K
0x01f2b0…01f444 Dummy {f00=0x0059, f01=0x018e, f02=» PEND P$KMDNR PPRT KMDNR PEND 0 P$HELP < PPRT HELP J PEND Z P$LEDLS f PLED LEDLS,/A t PKPF /A,LEDFIL PASG /E0,DK,LEDFIL PEND P$KMDGEN PLED KM@KMD=,/A,/EE P!!CH $$%VER$$@VER=02$$
0x01f444…01f5d8 Dummy {f00=0x0059, f01=0x0190, f02=» P$INCGEN PINC FMOVE,INT:PROD PINC EMPTYT,INT:PROD . PINC T:EDFL,INT:PROD J PINC T:DYKI,INT:PROD f PINC T:UPDF,INT:PROD PINC T:DUPL,INT:PROD PINC T:GETC,INT:PROD PINC T:GETA,INT:PROD PINC T:TSTC,INT:PROD
0x01f5d8…01f76c Dummy {f00=0x0059, f01=0x0190, f02=»D ~ PINC T:ENLI,INT:PROD PINC T:EINP,INT:PROD & PINC T:ENIN,INT:PROD B PINC T:SETC,INT:PROD ^ PINC T:CLMI,INT:PROD z PINC T:ATTF,INT:PROD PINC T:LSEG,INT:PROD PINC T:TEI0,INT:PROD PINC T:GTI0,INT:PROD PIN
0x01f76c…01f900 Dummy {f00=0x0059, f01=0x0190, f02=»MSK0,INT:PROD PINC T:SCD,INT:PROD PINC T:GTID,INT:PROD 0 PINC T:IO,INT:PROD L PINC I:NTP,INT:PROD f PINC I:EVA,INT:PROD PINC I:ADS,INT:PROD PINC I:CMP,INT:PROD PINC I:CPA,INT:PROD PINC I:MOV,INT:PROD PINC I:
0x01f900…01fa94 (0, 40) Dummy {f00=0x005a, f01=0x018e, f02=»INT:PROD PINC I:STR,INT:PROD PINC I:EVS,INT:PROD * PINC T:USE,INT:PROD D PINC I:EPIC,INT:PROD ^ PEND z P$REL PMES @NAM PLED @NAM,/S,/EE,## P##DL 0 P IDENT @NAM 02.03.XXX.1 P##EN PKPF /S,@NAM
0x01fa94…01fc28 Dummy {f00=0x005a, f01=0x0190, f02=» | PRDS PKPF /S,@NAM=TEST PEND , P$LED 8 PLED @NAM=,@FC=/S,@CC D PKPF @FC=/S,@NAM= ` PEND x P$MOVE PMOV @NAM=,@FC=/S,@ID=KMDPRO8 PKPF @FC=/S,@NAM PEND P$COMPEV > PMES PARAMETERS NAME=@NAM=/S, L
0x01fc28…01fdbc Dummy {f00=0x005a, f01=0x0190, f02=»ONFIG j PTRA @NAM=/S,@NL PKPF /O & PSCR /7D 4 PASG /7D,DK D PASG /02,NO @TLK= V PTLK M,X n PASG /02,TY10 @TLK= ~ PSCR /7D PBEA DUMMY,NL @BUG= PASG /02,NO @LKE= PLKE M PASG /02,TY10 @LKE= PKPF /L
0x01fdbc…01ff50 Dummy {f00=0x005a, f01=0x0190, f02=»NAM=,L=@LS= P$TRA1 N=@NAM PEND ( P$TRA 4 PTRA @N=,@L= @ PKPF /O T PEND b P$TRA1 n PTRA @N= | PKPF /O PEND P$LINK PASG /02,NO PTRA KONVER,NL PASG /7D,DK PASG /02,TY10 P$TLK2
0x01ff50…0200e4 Dummy {f00=0x005a, f01=0x0190, f02=»DUMMY,NL PLKE M PKPF /L,@N= , P$PCAS M=M:KONV,MU=M:KONV,A=@N=,C=KONFIG 0 PEND ` P$TLK1 l PTLK z PSCR /7D PBEA DUMMY,NL PLKE PKPF /L,@N= , P$PCAS M=M:KONV,MU=M:KONV,A=@N=,C=KONFIG PEND P$TLK
0x0200e4…020278 Dummy {f00=0x005a, f01=0x009e, f02=»SG1 PASG /E1,TY10 PRDA /A PEND . P$ASG2 : PASG /E0,TY10 H PEND P$TLK3 h PTLK U,X v PSCR /7D PEND Y,NL PLKE PKPF /L,@N= , P$PCAS M=M:KONV,MU=M:KONV,A=@N=,C=KONFIG PEND P$TLK
0x020278…02040c Dummy {f00=0x005a, f01=0x2008, f02=» PASG /E1,TY10 PRDA /A PEND . P$ASG2 : PASG /E0,TY10 H PEND P$TLK3 h PTLK U,X v PSCR /7D PEND Y,NL PLKE PKPF /L,@N= , P$PCAS M=M:KONV,MU=M:KONV,A=@N=,C=KONFIG PEND P$TLK
0x02040c…0205a0 Dummy {f00=0x005a, f01=0x0190, f02=»DK A3,0 D P LDKL A4,BVDU WRAP AROUND E P ADR A4,TCABAS E 2 PERAS65 EQU * E H " P CWK A1,/0F00 EUA COMMAND? DK3 E $ P RF(L) ERAS67 NO, EUA ORDER DK3 E ( P CWK A3,0 FINISHED EUA COMMAND? DK3 E " P RF(NZ) ERAS70 NO,CONTINUE DK3 E P LDK A1,0 YY
0x0205a0…020734 (0, 41) Opaque[0x194]
0x020734…0208c8 # DirEnt {nam=»EQUATE«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0b48, f03=0x0000}
0x020734…0208c8 IdxSect {
0x020734…0208c8 f00 = 0x005a // 0x20734 @0x0
0x020734…0208c8 f01 = 0x0004 // 0x20736 @0x2
0x020734…0208c8 gno = [ // 0x20738 @0x4
0x020734…0208c8 [0x00]: C0x005a.0x1.0
0x020734…0208c8 [0x01]: C0x005a.0x2.0
0x020734…0208c8 ]
0x020734…0208c8 }
0x0208c8…020a5c Dummy {f00=0x005a, f01=0x0190, f02=» P* 6 P************************************************** P* H P* EQUATES R P* p 6 P************************************************** z P* P* LITERAL EQUATES P* * P* BINARY EQUATES=====
0x020a5c…020bf0 Dummy {f00=0x005a, f01=0x0190, f02=»U 5 PBLIT6 EQU 6 PBLIT7 EQU 7 PBLIT8 EQU 8 4 PBLIT9 EQU 9 H PBLIT10 EQU 10 P* r P* | P* DECIMAL LITERALS P* P* PDLIT0 EQU 0 PDLIT1 EQU 1 PDLIT2 EQU 2 PDLIT3 EQU 3
0x020bf0…020d84 Dummy {f00=0x005a, f01=0x018e, f02=»0 P* 2 P********************************************* P* J " P* EQUATES FOR SOPLAMPS T P* z 2 P********************************************** P* P* $ P* EQUATES FOR DATASET CONTROL P* P*
0x020d84…020f18 Dummy {f00=0x005a, f01=0x0190, f02=» PSKIB EQU 2 SKIP BUFFER PWTM EQU 3 WRITE TAPE MARK " PCLOSE EQU 3 CLOSE FILE D PLOCK EQU 4 LOCK CASSETTE b PTSTAT EQU 7 TEST STATUS ( PRACCS EQU 9 RELEASE EXCLUSIVE ACCESS $ PBSP EQU 10 B10CKSP10CE ONE BLOCK P* P*
0x020f18…0210ac Dummy {f00=0x005a, f01=0x409a, f02=»OFF EQU 1 TURN OFF INDICATOR & PPOS EQU 6 POSITION VOUCHER/CURSOR $ PDEL EQU 8 RANDOM DELETE N P* n P* x P* P* @ ( PRACCS EQU 9 RELEASE EXCLUSIVE ACCESS $ PBSP EQU 10 B10CKSP10CE ONE BLOCK P* P*
0x0210ac…021240 Dummy {f00=0x005a, f01=0x2008, f02=»
0x021240…0213d4 (0, 42) Dummy {f00=0x005a, f01=0x0190, f02=»1 INITIAL ERRORCODE ~ & P MOVE GSWBCD3,=D'1' BLANK GSWBCD3 " P MOVE GSWBCD6,SPINPUT GET DATE F . P MOVE GSWBIN2,=W'10' SET POINTER TO MONTH l 8 P COPY GSWBCD3,CBIN4,CBIN2,GSWBCD6,GSWBIN2 GET MONTH ( P CBG GSWBCD3,=D'12',CH29 CHECK MONTH P C
0x0213d4…021568 Dummy {f00=0x005a, f01=0x0190, f02=» CBG GSWBCD3,=D'31',CH29 P CBL GSWBCD3,=D'1',CH29 P B CH2RET @ PCH29 R & P MOVE SPBINW3,CBIN3 INDICATE ERROR ^ & P MOVE SPBINW4,=W'7' SET ERRORCODE PCH2RET P MOVE GSWBCD3,=X'FF' P RET P PEND P EJECT PSPCH
0x021568…0216fc Dummy {f00=0x005a, f01=0x0190, f02=»* MONTH IS IN THE FORM MM " P* INPUT FIELD: SPINPUT , P* R 8 P* IF ERROR, ERRORCODE 7 IS MOVED TO SPBINW4 P* P****************** $ P MOVE GSWBCD3,SPINPUT GET MONTH ( P CBG GSWBCD3,=D'12',CH39 CHECK MONTH
0x0216fc…021890 Dummy {f00=0x005a, f01=0x0190, f02=»DICATE ERROR z & P MOVE SPBINW4,=W'7' SET ERRORCODE PCH3RET > P RET L P PEND X P EJECT f PSPCHK4 PROC t P******************** P* < P* SPCHK4 - CHANGE SIGN ON VALUE, IF KREDIT KEY P* P****************
0x021890…021a24 Dummy {f00=0x005a, f01=0x0190, f02=»-1' P MOVE SPINPUT,GSWBCD7 ( P MOVE SPBINW2,=W'3' SIMULATE EOI-KEY * PCH4RET V P RET d P PEND p P EJECT ~ PSPCHK5 PROC P******************** P* * P* SPCHK5 - CHECK LINE NUMBER P* P**********
0x021a24…021bb8 Dummy {f00=0x005a, f01=0x018e, f02=»? d P CBE GSWBCD3,=D'91',CH510 P MUL GSWBCD3,=D'2' , . P MOVE GSWBCD4,CVOUTOP GET NO OF LINES/PAGE F P SUB GSWBCD4,GSWBCD3 x , P CBL GSWBCD4,=D'0',CH5ERR LINE NEGATIVE? P MOVE GSWBIN1,GSWBCD4 P CBG GSWBIN1,CMAXLIN,CH5ERR P C
0x021bb8…021d4c Dummy {f00=0x005a, f01=0x0190, f02=» P MOVE GSWBIN1,GSWBCD3 P RET & P PEND 2 P EJECT @ PSPCHK6 PROC N P******************** b P* ~ B P* SPCHK6 - CHECK THE SPCHK6 - CHECKDIGIT IN LINE NO, P* KONTOKORT P* P*******************
0x021d4c…021ee0 Dummy {f00=0x005a, f01=0x0190, f02=» f " P CBE GSWBCD3,TTKTCHK,CH6RET OK P MOVE SPBINW3,CBIN3 ERROR . P MOVE SPBINW4,=W'13' P PCH6RET l P RET z P PEND P EJECT PSPCHK7 PROC P RET P PEND P EJECT PSPTCHK PROC P********************
0x021ee0…022074 (0, 43) Opaque[0x194]
0x022074…022208 # DirEnt {nam=»DKSUBS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0b58, f03=0x0000}
0x022074…022208 IdxSect {
0x022074…022208 f00 = 0x005a // 0x22074 @0x0
0x022074…022208 f01 = 0x0014 // 0x22076 @0x2
0x022074…022208 gno = [ // 0x22078 @0x4
0x022074…022208 [0x00]: C0x005a.0x3.0
0x022074…022208 [0x01]: C0x005b.0x0.0
0x022074…022208 [0x02]: C0x005b.0x1.0
0x022074…022208 [0x03]: C0x005b.0x2.0
0x022074…022208 [0x04]: C0x005b.0x3.0
0x022074…022208 [0x05]: C0x005c.0x0.0
0x022074…022208 [0x06]: C0x005c.0x1.0
0x022074…022208 [0x07]: C0x005c.0x2.0
0x022074…022208 [0x08]: C0x005c.0x3.0
0x022074…022208 [0x09]: C0x005d.0x0.0
0x022074…022208 ]
0x022074…022208 }
0x022208…02239c Dummy {f00=0x005a, f01=0x0190, f02=» P IDENT DKSUBS 03.01.XXX.1 P DDUM KMD08 & P PDIV D P ENTRY RAREAD Z P ENTRY RAWRIT p P ENTRY SQWRIT P ENTRY RGREAD P ENTRY RADEL P ENTRY GETBIT P ENTRY BACKUP P ENTRY RSTORE P
0x02239c…022530 Dummy {f00=0x005a, f01=0x0190, f02=» P EXT SETKRE P EXT SETDEB P EXT SPERR , P EXT WRITJT > P EXT LAMPON R P INCLUDE EQUATE f 6 P************************************************** P* 4 P* THIS MODULE CONTAINS ALL DISC HANDLING * P*
0x022530…0226c4 Dummy {f00=0x005a, f01=0x0190, f02=» ASSIGN ROUTINE * P* DISK ERROR ROUTINE " < P* GET STATUS FROM EXTENDED STATUSWORD P 0 P* READ RECORD FROM REGSET 6 P************************************************** P EJECT
0x0226c4…022858 Dummy {f00=0x005a, f01=0x0190, f02=»F RAREAD,<DATASET>,<SETNR>,<BUFFER>,<LENGTH>,<RECNR> ~ P* RETURN: < 0 P* CR=0 > OK CR = 4 NOK OK P P* * P* IN CASE OF ERROR ERDK IS CALLED : P* EXCLUSIVE ACCES IS RELEASED IF GTEXFLAG IS FALSE P* H P*
0x022858…0229ec Dummy {f00=0x005a, f01=0x0190, f02=»RRED Z T P* SPBINW4 - OK - 0 NOK - ALTERED BY DISERRORROUTINE & P* GTWBCD1 - 0 d P* 8 P**************************************************** 0 PRAREAD PROC DSET,$NR,BUF,LENG,RECNR P
0x0229ec…022b80 Dummy {f00=0x005a, f01=0x0190, f02=» P MOVE GTWBCD1,=D'0' < P RREAD DSET,BUF,GSWBIN1,RECNR READ RECORD 4 P BEOF RAR10 OK ? ` P BOK RAR10 2 P PERF ERDK,DSET,$NR NO PRAR10 & P
0x022b80…022d14 (0, 44) Dummy {f00=0x005b, f01=0x0190, f02=» 8 P CMP CBIN0,SPBINW4 SET CR P RET @ P PEND V P EJECT l > P********************************************************* P* * P* DISC ERROR ROUTINE ERDK P* CALL:
0x022d14…022ea8 Dummy {f00=0x005b, f01=0x0190, f02=»F ERROR ON DISC 8 P* THE ERRORCODE IS FOUND WITH ROUTINE GETBIT : P* AND THE TEXT IS DISPLAYED WITH SCREENPACKAGE T P* ENTRY SPERR P* P* ALTERED PARAMETERS: NONE P* : P* ALTERED FIELDS: SPBINW4 - NO-DAT
0x022ea8…02303c Dummy {f00=0x005b, f01=0x0190, f02=»KEYFLG - TRUE | P* P* B P************************************************************* * PERDK PROC DSET,$NR p P PLIT $NR $ P PERF GETBIT,DSET & P CBE GTWBCD1,=D'4',ERDKRET NO DATA & P CBE GTWBCD1,=D'
0x02303c…0231d0 Dummy {f00=0x005b, f01=0x018e, f02=» DATASET NR j 4 P MOVE GSWSTR9,=C'DISCFEJL ' TEXT P TBF GTTTPFLG,ERDK10 P $ P CLEAR SPKEYFLG NO KORKEY IF TTP l PERDK10 < P PERF SPERR DISPLAY TEXT P SET SPKEYFLG P SET GTNWFLG
0x0231d0…023364 Dummy {f00=0x005b, f01=0x018e, f02=» PERDKRET ( P MOVE SPBINW4,CBIN0 PREPARE FOR OK PERDKEND D P CMP SPBINW4,CBIN0 SET CR T P RET x P PEND P EJECT > P********************************************************** P* P
0x023364…0234f8 Dummy {f00=0x005b, f01=0x0190, f02=» Z P* STATUSWORD P* RETURN: < P* THE BITNR IN GTWBCD1 UNDEFINED GTWBCD1=1 4 P* t P* ALTERED FIELDS: ~ 2 P* GSWBIN1 - EXTENDED STATUSWORD P* GTWBCD1 - 1 P* GSWBIN
0x0234f8…02368c Dummy {f00=0x005b, f01=0x0190, f02=»************************************ z PGETBIT PROC DSET , 6 P XSTAT DSET,GSWBIN1 GET STATUS H : P MOVE GTWBCD1,=D'15' BIT NR IN BCD : P MOVE GSWBIN2,CBIN1 BIT NR IN BIN > PGET10
0x02368c…023820 Dummy {f00=0x005b, f01=0x018e, f02=»CD2,GSWBIN2 x 6 P MUL GSWBCD2,=D'2' NEXT BIT 6 P MOVE GSWBIN2,GSWBCD2 CONVERT N > P SUB GTWBCD1,=D'1' UPDATE BCD BITNR : P CBG GTWBCD1,=D'1',GET10 NO BIT FOUND P
0x023820…0239b4 (0, 45) Dummy {f00=0x005b, f01=0x0190, f02=» P* P* RANDOM WRITE P* CALL: . > P* PERF RAWRIT,<DATASET>,<SETNR>,<BUFFER>,<RECNR> @ P* > P* WRITES RECORD RANDOM AND PERFORMS THE NECESSARY P* ERROR HANDLING P* RETURN ( P*
0x0239b4…023b48 Dummy {f00=0x005b, f01=0x0190, f02=»ARS TRANSFERRED l > P********************************************************** & PRAWRIT PROC DSET,$NR,BUF,RECNR Z P PLIT $NR " P MOVE SPBINW4,CBIN0 P MOVE GSWBIN1,$NR P CBG GSWBIN1,CBIN2,RAW10 P TBT GTTESTFL,RAWR
0x023b48…023cdc Dummy {f00=0x005b, f01=0x0190, f02=»SET,BUF,RECNR WRITE RECORD ~ 4 P BEOF RAWRET OK? . P BOK RAWRET f " P PERF ERDK,DSET,$NR P CMP SPBINW4,CBIN0 SET CR=4 P RET PRAWRET 8 P CMP CBIN0,CBIN0
0x023cdc…023e70 Dummy {f00=0x005b, f01=0x0190, f02=»*********** ` P* $ P* RADEL - RANDOM DELETE ROUTINE P* F * P* CALL: PERF RADEL,<DATASET>,<RECNR> P P* ~ 4 P* THE ROUTINE DELETES ANY RECORD IN ANY DATASET P* " P* ALTERED FIELDS: SPBINW4 - 0 " P* GSWBIN
0x023e70…024004 Dummy {f00=0x005b, f01=0x0190, f02=»DEL PROC DSET,RECNR P MOVE SPBINW4,CBIN0 P MOVE GSWBIN1,CBIN6 8 P TBT GTTESTFL,RADELRET T 0 P RREAD DSET,GSWSTR9,GSWBIN1,RECNR DUMMY READ r ( P DSC1 DSET,DEL,RECNR DELETE RECORD " P BEOF RADELRET IF EOF, RETURN P BOK RADELRET I
0x024004…024198 Dummy {f00=0x005b, f01=0x0190, f02=» CMP CBIN0,CBIN0 CR := OK P RET " P PEND . P EJECT < @ P*********************************************************** T P* P* SEQ READ P* CALL: < P* PERF SQREAD,<DSET>,<SETNR>,<BUFFER>,<LENGTH>
0x024198…02432c Dummy {f00=0x005b, f01=0x018e, f02=»WBIN1 - NUMBER OF CHAR TRANSFERRED | 0 P* GSWBIN4 - LENGTH FROM CALL * P* ^ P**** RETURN: h 6 P* CR=0 OK CR=1 EOF CR=4 NOT OK | P* @ P*********************************************************** * PSQRE
0x02432c…0244c0 Dummy {f00=0x005b, f01=0x0190, f02=» n B P READ DSET,BUF,GSWBIN1 READ RECORD 8 P BOK SQRRET OK N P BEOF SQR10 8 P PERF ERDK,DSET,$NR NO PSQRRET J P TBT
0x0244c0…024654 (0, 46) Dummy {f00=0x005b, f01=0x018e, f02=» CMP CBIN0,SPBINW4 SET CR PSQR10 B P RET P P PEND f P EJECT | @ P*********************************************************** P* P* SEQ WRITE P* CAL
0x024654…0247e8 Dummy {f00=0x005b, f01=0x0190, f02=» P* " P* ALTERED FIELDS: SPBINW4 - 0 P* 4 @ P*********************************************************** > $ PSQWRIT PROC DSET,$NR,BUF P PLIT $NR P MOVE SPBINW4,CBIN0 P TBT GTTESTFL,SQWRET > P WRITE
0x0247e8…02497c Dummy {f00=0x005b, f01=0x0190, f02=» OK n 4 P PERF ERDK,DSET,$NR NO PSQWRET N 8 P CMP SPBINW4,CBIN0 SET CR PSQW10 8 P RET RETURN P PEND P EJECT " KF
0x02497c…024b10 Dummy {f00=0x005b, f01=0x0190, f02=» = 1 EJ-EDB COUNTERS * ( #* ART = 1 KREDIT COUNTER ( & "* 2 DEBET COUNTER T & "* NR = EJ-EDB COUNTER NO ~ * ( $* RECORD INDEX = NR*2+ART-2 * * TYPE = 2 PENGE KONTI
0x024b10…024ca4 Dummy {f00=0x005b, f01=0x0190, f02=»4) r * : 6* RECORD INDEX = 121 +(TTASKNR*24)+(NR*2)+ART : 5* ((TTASKNR*12)+NR)*2+121+ART R * " * TYPE = 3 VERSUR CONTI * $ * ART = 0 ACCOUNT NO ( #* 1 K
0x024ca4…024e38 Dummy {f00=0x005b, f01=0x018e, f02=»X = 121+(TTASKNR*24)+7+(NR*3)+ART z : 6* = ((TTASKNR*8)+NR)*3+ART+121+7 * * h P* TYPE = 4 ECH LBNR r & P* RECORD INDEX= 140 + ART P* * ( #* OUTPUT VALUE = VALUE (BCD 14) * **
0x024e38…024fcc Dummy {f00=0x005b, f01=0x0190, f02=» * MOVE GSWBIN8,TYPE $ MOVE VALUE,=D'0' INITIAL VALUE , , P IB GSWBIN8,KFR100,KFR200,KFR300,KFR400 T B KFRRET * * EJ-EDB KFR100 MOVE GSWBIN8,NR MUL GSWBIN8,CBIN2 P MOVE GSWBIN1,ART
0x024fcc…025160 Dummy {f00=0x005b, f01=0x0190, f02=»R200 MOVE GSWBIN8,TTASKNR MUL GSWBIN8,CBIN12 * P MOVE GSWBIN1,NR F P ADD GSWBIN8,GSWBIN1 ^ MUL GSWBIN8,CBIN2 z P MOVE GSWBIN1,ART P ADD GSWBIN8,GSWBIN1 . ) ADD GSWBIN8,=W'121' GSWBIN8=RECORD INDEX B KFR500
0x025160…0252f4 (0, 47) Dummy {f00=0x005b, f01=0x0190, f02=» ADD GSWBIN8,GSWBIN1 MUL GSWBIN8,CBIN3 P MOVE GSWBIN1,ART 6 P ADD GSWBIN8,GSWBIN1 P ADD GSWBIN8,=W'121' l ADD GSWBIN8,CBIN7 GSWBIN8=RECORD INDEX B KFR500 P* P* DIVERSE TYPE 4 PKFR400 P
0x0252f4…025488 Dummy {f00=0x005b, f01=0x0190, f02=» READ VALUE & ! MOVE CKFBUF,CBLANKS CLEAR BUFFER MOVE GSWBIN1,CBIN7 LENGTH > 4 / PERF RAREAD,DK10,=D'10',CKFBUF,GSWBIN1,GSWBIN8 ` BNOK KFRNOK & ! CBE GTWBCD1,=D'4',KFR550 NO DATA 0 , XCOPY VALUE,CBIN0,CBIN7,CKFBUF,CBIN0 UNPACK
0x025488…02561c Dummy {f00=0x005b, f01=0x0190, f02=»KFRNOK CLEAR CKFFLG KFRRET $ CMP CBIN1,CBIN0 NOK 2 RET N PEND Z P EJECT h " PKFWRIT PROC TYPE,ART,NR,VALUE v P********** 0 P* WRITE TO KONTOFILE, DEPENDING ON TYPE * $ * TYPE = 1 EJ-EDB COUNT
0x02561c…0257b0 Dummy {f00=0x005b, f01=0x0190, f02=»TER NO t * ! ( $* RECORD INDEX = NR*2+ART-2 ! * ! D * TYPE = 2 PENGE KONTI ! N * ! r $ * ART = 0 ACCOUNT NO ! | 0 ,* 1 MOVEMENT ON THE ACCOUNT ! $ * NR = BET-FORM (0-4) ! * ! :
0x0257b0…025944 Dummy {f00=0x005b, f01=0x0190, f02=»* TYPE = 3 VERSUR CONTI ! * " & $ * ART = 0 ACCOUNT NO " 0 ( #* 1 KREDIT COUNTER " X & "* 2 DEBET COUNTER " $ * NR = BET-FORM (1-4) " * " < 7* RECORD INDEX = 121+(TTASKNR*2
0x025944…025ad8 Dummy {f00=0x005b, f01=0x0190, f02=» RECORD INDEX = 140 + ART " P* # & * # 0 4 P* INPUT VALUE TO BE STORED = VALUE (BCD 14) # : ********** # r * # * THIS PROCEDURE CHANGES # * GSWBIN1 # * GSWBIN8 # * # ********** # MOVE
0x025ad8…025c6c Dummy {f00=0x005b, f01=0x018e, f02=»GSWBIN8,NR # MUL GSWBIN8,CBIN2 $ P MOVE GSWBIN1,ART $ , P ADD GSWBIN8,GSWBIN1 $ F , ' SUB GSWBIN8,CBIN2 GSWBIN8=RECORD INDEX $ b P B KFW500 $ P* $ P* PENGEKONTI $ PKFW200 $ MOVE GSWBIN8,TTASKNR $ MUL GSWBIN8,CBIN12 $
0x025c6c…025e00 Dummy {f00=0x005b, f01=0x0190, f02=» . ) ADD GSWBIN8,=W'121' GSWBIN8=RECORD INDEX % P B KFW500 % 6 P* VERSUR KONTI % H PKFW300 % b MOVE GSWBIN8,TTASKNR % p MUL GSWBIN8,CBIN8 % P MOVE GSWBIN1,NR % P ADD GSWBIN8,GSWBIN1 % MUL GSWBIN8,CBIN3 % P MOVE GSWBIN1,ART
0x025e00…025f94 (0, 48) Dummy {f00=0x005c, f01=0x018e, f02=» P* DIVERSE TYPE 4 & PKFW400 & P MOVE GSWBIN8,ART & . P ADD GSWBIN8,=W'140' & H P* RESERVE BUFFER & d PKFW500 & P PERF WAITF,CKFFLG & P* PACK AND WRITE VALUE & * P XCOPY CKFBUF,CBIN0,CBIN7,VALUE,CBIN0 & , P PERF RAWRIT,DK1
0x025f94…026128 Dummy {f00=0x005c, f01=0x0190, f02=» & z RET ' * NOK ' PKFWNOK ' & P CLEAR CKFFLG ' 4 PKFWRET ' J CMP CBIN1,CBIN0 NOK ' X RET ' t PEND ' P EJECT ' * PBACKUP PROC DSET,$DNR,FDSIZE,BUF,$LENG ' P PLIT $DNR ' P PLIT $LENG ' P******************** '
0x026128…0262bc Dummy {f00=0x005c, f01=0x0190, f02=»,<DSET>,<$DSET-NR>,<NO-OF-RECORDS>, ' z 2 P* <BUFFER>,<$RECORD-SIZE> ( , , P* IF FDSIZE=0, CONTINUE TO EOM ( b P* ( P******************** ( P CLEAR CERRORFL ( P SET CPFLG RESERVE DISK ( * P MOVE GSWBIN3,$DNR ASSIG
0x0262bc…026450 Dummy {f00=0x005c, f01=0x0190, f02=»NR ASSIGN BACKUP FILE ( " P PERF ASSG,CBIN3,DK02,GSWBIN3 ) P BNOK BKUPNOK ) D P B BKUP60 ) Z P* ) l PBKUP50 ) v P LOAD CASSETT ) P MOVE GSWBIN1,CBIN1 ) P DSC1 KCASS,LOAD,GSWBIN1 ) P WRITE TAPE MARK ) P DSC0 KCASS,WTM )
0x026450…0265e4 Dummy {f00=0x005c, f01=0x0190, f02=»BKUP120 ) ~ & P CBG GSWBIN3,FDSIZE,BKUPOK FINISH? * PBKUP120 * : P MOVE GSWBIN1,$LENG * J . P PERF RAREAD,DSET,$DNR,BUF,GSWBIN1,GSWBIN3 * f P BOK BKUP130 * P CBE GTWBCD1,=D'10',BKUPOK * P B BKUP200 * PBKUP130 * P* * & P CBE GTWBCD1,=
0x0265e4…026778 Dummy {f00=0x005c, f01=0x0190, f02=»00 OK, CONTINUE * P* + PBKUP150 ON CASSETTE + " " P PERF SQWRIT,KCASS,=D'12',BUF + @ P BOK BKUP100 + f P B BKUPNOK + z P* + PBKUP200 ERROR + P PERF LAMPON,=W'2' LAMP 10 + P SET CERRORFL INDICATE ERROR + PBKUP210 + P TBT
0x026778…02690c Dummy {f00=0x005c, f01=0x0190, f02=»P150 + P* , PBKUPOK , P TBT CERRORFL,BKUPNOK , $ P TBT CKASFLG,BKUP300 , B P DSC0 DK02,CLOSE , ^ P B BKUP310 , v PBKUP300 , P DSC0 KCASS,WTM , P DSC0 KCASS,WTM , P DSC0 KCASS,UNLOD , PBKUP310 , P CLEAR CPFLG , P C
0x02690c…026aa0 Dummy {f00=0x005c, f01=0x0190, f02=»,CLOSE , P B BKUP360 - PBKUP350 - P DSC0 KCASS,WTM - 0 P DSC0 KCASS,WTM - H P DSC0 KCASS,UNLOD - ` PBKUP360 - z P CLEAR CERRORFL - P CLEAR CPFLG - P CMP CBIN1,CBIN0 - P RET - P PEND - P EJECT - * PRSTORE PROC DSET,$
0x026aa0…026c34 (0, 49) Dummy {f00=0x005c, f01=0x0190, f02=»T FROM BACKUP FILE - p P* . P* CALL: . $ P* . < > P* PERF RSTORE,<DSET>,<$DSET-NO>,<NO-OF-RECORDS>, . F 2 P* <BUFFER>,<$RECORD-SIZE> . , P* IF FDSIZE=0, CONTINUE TO EOM . P* . P****************
0x026c34…026dc8 Dummy {f00=0x005c, f01=0x0190, f02=»GSWBIN3 . z P BNOK RSTRNOK / P TBT CKASFLG,RSTR50 / & 0 P MOVE GSWBIN3,$DNR ASSIGN BACKUP FILE, DISK / B " P PERF ASSG,CBIN3,DK02,GSWBIN3 / v P BNOK RSTRNOK / P B RSTR60 / PRSTR50 / P BACKUP FILE, CASSETTE / P LOAD CASSETTE /
0x026dc8…026f5c Dummy {f00=0x005c, f01=0x018e, f02=»CASS,=D'12',BUF,GSWBIN1 / PRSTR60 0 P LOOP THROUGH FILE 0 . P MOVE GSWBIN3,CBIN0 0 J PRSTR100 0 f P ADD GSWBIN3,CBIN1 0 v P CBE FDSIZE,CBIN0,RSTR120 0 & P CBG GSWBIN3,FDSIZE,RSTROK FINISH? 0 PRSTR120 0 P MOVE GSWBIN1,$LENG 0 P
0x026f5c…0270f0 Dummy {f00=0x005c, f01=0x0190, f02=» 0 l P B RSTR160 1 PRSTR150 1 * P PERF SQREAD,KCASS,=D'12',BUF,GSWBIN3 1 * P BEOF RSTR210 1 X P BNOK RSTR200 1 n P* 1 PRSTR160 1 & P PERF RAWRIT,DSET,$DNR,BUF,GSWBIN3 1 P BOK RSTR100 1 P CBNE GTWBCD1,=D'10',RSTR200 1 P B RSTRO
0x0270f0…027284 Dummy {f00=0x005c, f01=0x0190, f02=» DELETE RECORD 1 x " P CBE GTWBCD1,=D'10',RSTROK EOM 2 P ADD GSWBIN3,CBIN1 2 < P CBE FDSIZE,CBIN0,RSTR210 2 V P CBNG GSWBIN3,FDSIZE,RSTR210 2 x P TBT CERRORFL,RSTRNOK 2 P B RSTROK 2 P* 2 PRSTROK 2 P TBT CKASFLG,RSTR300 2 , P DSC0 DK
0x027284…027418 Dummy {f00=0x005c, f01=0x0190, f02=» 2 P CLEAR CERRORFL 3 P CLEAR CPFLG 3 P CMP CBIN0,CBIN0 OK 3 4 P RET 3 P P* 3 PRSTRNOK 3 f P PERF LAMPON,=W'2' LAMP 10 3 v P TBT CKASFLG,RSTR350 3 , P DSC0 DK02,CLOSE CLOSE BACKUP FILE, DISK 3 P B RSTR360 3 PRSTR350 3 " P
0x027418…0275ac Dummy {f00=0x005c, f01=0x0190, f02=»N1 3 P RET 4 P PEND 4 P EJECT 4 $ PRGREAD PROC DSET,$DNR,P 4 2 P PLIT $DNR 4 R P******************** 4 d P* 4 0 P* RGREAD - READ RECORD FROM REGSET 4 8 P* AND PUT THE FIELDS IN GTREGF AND GTDUPF. 4 @ P* THE
0x0275ac…027740 Dummy {f00=0x005c, f01=0x0190, f02=», GTDBKRC, TTDKDEX, TTDBKRM, 4 p P* GTREGDEX 5 $ , P* GSWBCD3 = LOG. RECORD NR 5 D P* 5 t 2 P* CR=0 CORRECT TRANS, INCL TR 12 5 ~ 6 P* CR=1 TR=11 AND SETS FLAG GTSWFLAG 5 8 P* CR=2 NOT SA
0x027740…0278d4 (0, 50) Dummy {f00=0x005c, f01=0x0190, f02=»R,CRECNR IN KOLDSTART 5 PRGR005 6 P CLEAR CEORFLG 6 , P MOVE GSWBCD3,=D'0' 6 B P PERF PACKCL 6 ^ P MOVE GSWBIN1,P 6 r P IB GSWBIN1,RGR002,RGR003 6 PRGR002 6 P PERF PACKST,CBINMAX 6 P B RGR004 6 PRGR003 6 $ P PERF PACKST,CBIN1
0x0278d4…027a68 Dummy {f00=0x005c, f01=0x0190, f02=»TRECNR 6 h P BNOK RGRRET2 7 P CMP GTWBCD1,=D'4' 7 $ P BE RGRRET2 7 > P MOVE GSWSTR20,CBLANKS 7 R . P COPY GSWSTR20,CBIN0,CBIN3,CPCKBUF,CBIN13 7 p 0 P CBE GSWSTR20,=C'&01',RGR008 ADJUST TO FIRST 7 P SUB GTRECNR,CBIN1 7 P B RGR005 7 PRGR008
0x027a68…027bfc Dummy {f00=0x005c, f01=0x0190, f02=»NO 7 d , P COPY GSWSTR20,CBIN0,CBIN3,CPCKBUF,CBIN0 8 " P MOVE GSWBCD5,GSWSTR20 CONVERT 8 : P CMP GTMSK,GSWBCD5 8 ` P BNE RGRRET2 8 z P* 8 * P MOVE GSWSTR20,=X'00' CHECK TRANSTYPE 8 . P COPY GSWSTR20,CBIN0,CBIN2,CPCKBUF,CBIN11 8 P MOVE GSWBCD5,GS
0x027bfc…027d90 Dummy {f00=0x005c, f01=0x0190, f02=» CMP GSWBCD5,=D'11' IF TRANS 11 8 P BE RGRRET1 9 ( P* 9 < $ P MOVE GTREGNR,GSWBCD5 TRANSTYPE 9 F P CMP GTREGNR,=D'18' 9 n P BL RGR009 9 P CMP GTREGNR,=D'40' 9 P BL RGRRET 9 P CMP GTREGNR,=D'49' 9 P BG RGRRET 9 PRGR009 9 , P M
0x027d90…027f24 Dummy {f00=0x005c, f01=0x0190, f02=» ( P CMP CREGTAB(GTREGDEX,CBIN1),=D'-1' : P BE RGRRET2 : 0 P B RGR010 : D PRGR020 UNPACK FIELDS : V P MOVE GSWBIN6,CBIN2 : t P MOVE GSWBIN5,CRECLGD : PRGR030 : P TEST CEORFLG : P BNE RGRRET BRANCH IF TRUE : P MOVE GSWSTR1,=C'&'
0x027f24…0280b8 Dummy {f00=0x005c, f01=0x0190, f02=»E GSWBIN4,GSWBIN6 POINTER FIELD NR : P MOVE GSWBIN5,CRECLGD ; * P SUB GSWBIN5,GSWBIN6 ; H 6 P MATCH CPCKBUF,GSWBIN6,GSWBIN5,GSWSTR1,CBIN0,CBIN1 ; d P FIND LENGTH FIELD ; P BNE RGR100 LAST FIELD ; PRGR035 ; P MOVE GSWBIN3,GSWBIN6 ; * P SUB
0x0280b8…02824c Dummy {f00=0x005c, f01=0x0190, f02=»N3,CBIN2 ; , P CBNL GSWSTR2,=C'90',RGR037 FIELD 90-94 < P MOVE GSWSTR20,=X'00' < @ 0 P COPY GSWSTR20,CBIN0,GSWBIN3,CPCKBUF,GSWBIN4 < ^ " P NOW FIELD NR IS IN GSWSTR2 < & P AND FIELD CONTENTS IN GSWSTR20 < P ADJUST POINTERS < P ADD GSWBIN6
0x02824c…0283e0 Dummy {f00=0x005c, f01=0x0190, f02=» < r P CMP GSWBIN3,CBIN2 = P BE RGR210 DATE = " P CBL GSWBIN3,CBIN4,RGR030 = : P CMP GSWBIN3,CBIN4 = P BE RGR200 = v . P CBNE GSWBIN3,CBIN13,RGR036 ARKIV.KNT.NO. = $ P TBT CWFLAG,RGR030 NOT KOLDSTART = PRGR036 = " P UPDATE GTDUPF,GTREGF,
0x0283e0…028574 (0, 51) Dummy {f00=0x005c, f01=0x0190, f02=» = r " P MOVE GTREGF(GSWBIN4),GSWSTR20 > ( P CBE GSWBIN3,CBIN9,RGR060 D/K MARK? > . P CHECK IF WITH SIGN > Z P MOVE GSWBIN3,CBIN0 > x P MOVE GSWSTR2,=C'-' > 6 P MATCH GSWSTR20,GSWBIN3,CBIN20,GSWSTR2,CBIN0,CBIN1 > P BNE RGR040 > P MUL GTUSE
0x028574…028708 Dummy {f00=0x005c, f01=0x0190, f02=»0-94, ONLY THE POINTERS SHOULD BE ADJUSTED > P ADD GSWBIN6,CBIN1 ? 2 P SUB GSWBIN5,GSWBIN3 ? L P SUB GSWBIN5,CBIN3 &<FLDNR> ? h P B RGR030 ? PRGR040 ? P MOVE GSWBIN3,CBIN0 ? 6 P MATCH GSWSTR20,GSWBIN3,CBIN20,CBLANKS,CBIN0,CBIN1 ? P BNE R
0x028708…02889c Dummy {f00=0x005c, f01=0x0190, f02=» PERFI GSWBIN3,SETKRE,SETDEB ? P B RGR030 @ $ PRGR100 @ 6 P END OF RECORD @ D P MOVE GSWSTR2,=X'7F' @ " P MOVE GSWBIN6,GSWBIN4 RESTORE @ x 6 P MATCH CPCKBUF,GSWBIN6,GSWBIN5,GSWSTR2,CBIN0,CBIN1 @ P BNE RGR110 @ P SET CEORFLG @ P B RGR03
0x02889c…028a30 Dummy {f00=0x005c, f01=0x0190, f02=»BIN0,CBIN1 @ h P BNE RGRRET2 A P DLETE CPCKBUF,CBIN0,GSWBIN4 A & P MOVE GSWSTR20,CPCKBUF A J P ADD CTWBIN1,CBIN1 A h P TBT CWFLAG,RGR113 A P ADD CRECNR,CBIN1 KOLDSTART A PRGR113 A P ADD GSWBCD2,=D'1' A P MOVE GSWBIN1,=W'128' A 2 P M
0x028a30…028bc4 Dummy {f00=0x005c, f01=0x0190, f02=»E HEADER A P DLETE CPCKBUF,CBIN0,CBIN11 B * P MOVE GSWBIN6,CBIN0 INSERT SAVED INFO B 4 P MOVE GSWSTR2,CBLANKS B b P CBE CRECLGD,=W'128',RGR115 B P MOVE GSWSTR2,=X'00' B PRGR115 B 6 P MATCH GSWSTR20,GSWBIN6,CBIN19,GSWSTR2,CBIN0,CBIN1 B P
0x028bc4…028d58 Dummy {f00=0x005c, f01=0x0190, f02=» REC. NO B r P B RGR032 C PRGR200 C " P MOVE GTLBNR,GSWSTR20 C 0 P TBT CWFLAG,RGR205 C N $ P MOVE TTLBNR,GTLBNR IN KOLDSTART C h PRGR205 C P B RGR030 C PRGR210 C P TBT CWFLAG,RGR220 C & P MOVE GTDATO,GSWSTR20 IF COLDSTART C PRGR220
0x028d58…028eec Dummy {f00=0x005c, f01=0x0190, f02=» RET C PRGRRET1 D P CLEAR CPFLG DISK FREE D P SET GTSWFLAG D < P CMP CBIN1,CBIN0 CR=1, TR=11 D R P RET D v PRGRRET D P CLEAR CPFLG DISK FREE D P SET TTEORFLG D P CLEAR GTSWFLAG D P CMP CBIN0,CBIN0 CR=0, OK D P RET D
0x028eec…029080 Dummy {f00=0x005c, f01=0x40aa, f02=» TBF BOO,WAIT90 D P DELAY CBIN2 WAIT 200 MS E P B WAIT10 TRY ONCE MORE E 8 PWAIT90 E X P SET BOO E f P RET E v P PEND E P END E @ E P SET TTEORFLG D P CLEAR GTSWFLAG D P CMP CBIN0,CBIN0 CR=0, OK D P RET D
0x029080…029214 (0, 52) Dummy {f00=0x005d, f01=0x2008, f02=» F PERF ERDK,DSET,$NR NO PSQWRET 6 8 P CMP SPBINW4,CBIN0 SET CR D PSQW10 8 P RET RETURN P PEND P EJECT P END
0x029214…0293a8 Dummy {f00=0x005d, f01=0x0190, f02=»OK . x RET / / IGETNOK1 / MOVE LEVDEX,CBIN0 / . & " MOVE INDX,GSWBIN4 PLACE TO INSERT / H " P CLEAR CIDXFLG RELEASE BUFFER / r CMP CBIN1,CBIN0 NOK / RET / PIGET300 SET COND = ERR / MOVE LEVDEX,CBIN0 / MOVE INDX,CBI
0x0293a8…02953c Dummy {f00=0x005d, f01=0x0190, f02=» ********** 0 * 0 & !* INSERT GTLEVNR IN INDEXFILE 0 * 0 J ********** 0 T ( $ PERF IDXGET,GTLEVNR,GSWBIN4,GSWBIN5 0 f GSWBIN5 LEV INDEX 0 GSWBIN4 INDEX 0 BERR XINSNOK DISK ERROR 0 BOK XINSNOK ALREADY PRESENT 0
0x02953c…0296d0 Dummy {f00=0x005d, f01=0x018e, f02=»E FOR INSERTION 0 v P MOVE GSWBIN1,CBIN7 1 2 P PERF RAREAD,DK07,=D'7',CIXBUF,GSWBIN1,CIXFREE 1 4 0 P PERF XCOP,GSWBIN7,=W'0',=W'2',CIXBUF,=W'5' 1 j ( # MOVE GSWBIN4,CIXFREE START OF LOOP 1 & ! ADD CIXFREE,CBIN1 NEW FIRST FREE 1 * 1 XINS100 1
0x0296d0…029864 Dummy {f00=0x005d, f01=0x0190, f02=» 1 z 2 . PERF RAREAD,DK07,=D'7',CIXBUF,GSWBIN1,GSWBIN4 2 BNOK XINSNOK 2 > ADD GSWBIN4,CBIN1 2 T * & PERF RAWRIT,DK07,=D'7',CIXBUF,GSWBIN4 2 n BNOK XINSNOK 2 $ PERF RESTIX RESET MASTER INDEX 2 SUB GSWBIN4,CBIN1 2 B XINS100 2 *
0x029864…0299f8 Dummy {f00=0x005d, f01=0x0190, f02=»F,=W'5',=W'2',GSWBIN7,=W'0' 2 * & PERF RAWRIT,DK07,=D'7',CIXBUF,GSWBIN8 3 $ . P MOVE GSWBIN4,GSWBIN8 PLACE FOR INSERTION 3 R P PERF RESTIX 3 " CLEAR CIDXFLG RELEASE BUFFER 3 CMP CBIN0,CBIN0 OK 3 RET 3 XINSNOK 3 " CLEAR CIDXFLG REL
0x0299f8…029b8c Dummy {f00=0x005d, f01=0x0190, f02=»******************* 3 ~ * 4 , (* INITIATE MASTER INDEX FOR LEV-REGISTER 4 & , (* IF INDEX EMPTY, SET UP ALL ENTRIES AND 4 V * INITIATE SPECIAL ENTRIES 4 * 4 P* SETS: 4 $ P* CIXLAST - LAST RECORD NO. 4 $ P* CIXFREE - FIRST FREE
0x029b8c…029d20 Dummy {f00=0x005d, f01=0x0190, f02=»OVE CIXBUF,CBLANKS 4 2 P PERF RAREAD,DK07,=D'7',CIXBUF,GSWBIN5,GSWBIN4 5 ( P CBE GTWBCD1,=D'4',SIDX005 NO DATA ? 5 P MOVE GSWBIN5,CBIN0 5 | @ ; MATCH CIXBUF,GSWBIN5,CBIN2,CBLANKS,CBIN0,CBIN2 1.LEV=BLANK 5 BE SIDX005 5 MOVE GSWBIN5,CBIN0 5
0x029d20…029eb4 (0, 53) Opaque[0x194]
0x029eb4…02a048 # DirEnt {nam=»EQULST«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0ba8, f03=0x0000}
0x029eb4…02a048 IdxSect {
0x029eb4…02a048 f00 = 0x005d // 0x29eb4 @0x0
0x029eb4…02a048 f01 = 0x0002 // 0x29eb6 @0x2
0x029eb4…02a048 gno = [ // 0x29eb8 @0x4
0x029eb4…02a048 [0x00]: C0x005d.0x1.0
0x029eb4…02a048 ]
0x029eb4…02a048 }
0x02a048…02a1dc Dummy {f00=0x005d, f01=0x4068, f02=» IDENT EQULST DDUM KMD08 PDIV . INCLUDE EQUATE,LIST < END X@ d
0x02a1dc…02a370 Dummy {f00=0x005d, f01=0x2008, f02=» NT EQULST DDUM KMD08 PDIV . INCLUDE EQUATE,LIST < END X@ d
0x02a370…02a504 Dummy {f00=0x005d, f01=0x0190, f02=»MPTY COMP. FIELD FOUND 4 P MOVE SPBINW2,='3' INDICATE ENTER KEY DEPRESSED P RET V P* b " P* EMPTY COMPULSORY FIELD FOUND l P* PKENT10 6 P GETFLD 0,SPBINW3,SPBINW2 GET THE COMPULSORY FIELD P* P EJECT PERRPRT *
0x02a504…02a698 Dummy {f00=0x005d, f01=0x0190, f02=»C ALARME t 0 P CBE SPBINW4,='0',CNDTAB JUMP IF NO PRINTOUT ( P MOVE SPBINW3,=X'1801' ROW 24 COL. 1 D 2 P DSC1 SPDSSCRN,6,SPBINW3 SET CURSOR ON ROW 24 p P* : P* WRITING FROM SPFTBERR SHOULD BE INSERTED HERE LATER P* $ P****************
0x02a698…02a82c Dummy {f00=0x005d, f01=0x0190, f02=»***** v P* P* READ AFTER ERROR P* 2 PERREAD < ( P SETCUR SET CURSOR AT THE BEGINNING J P OF THE CURRENT FIELD v PERR100 * P MOVE SPBINW3,=W'14' REQUESTED LENGTH 6 P NKIA .NE,SPDSDYKB,SPINPUT,SPKTAB1,SPBINW3,SPBINW2
0x02a82c…02a9c0 Dummy {f00=0x005d, f01=0x0190, f02=»ERRCONT,ERRCONT P B ERR100 CONTINUE P* 2 P* CLEAR ERROR PRINTOUT < P* Z PERRCONT d * P MOVE SPBINW3,='24' INDICATE LAST LINE t , P ERASE 0,SPBINW3,SPBINW3 ERASE LAST LINE P IB SPBINW2,DUMMY,CLER,CLER 0 P SUB SPBINW2,='3'
0x02a9c0…02ab54 (0, 54) Opaque[0x194]
0x02ab54…02ace8 # DirEnt {nam=»KEY569«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0bb0, f03=0x0000}
0x02ab54…02ace8 IdxSect {
0x02ab54…02ace8 f00 = 0x005d // 0x2ab54 @0x0
0x02ab54…02ace8 f01 = 0x0002 // 0x2ab56 @0x2
0x02ab54…02ace8 gno = [ // 0x2ab58 @0x4
0x02ab54…02ace8 [0x00]: C0x005d.0x2.0
0x02ab54…02ace8 ]
0x02ab54…02ace8 }
0x02ace8…02ae7c Dummy {f00=0x005d, f01=0x0190, f02=» PNOKEY EQU X'FF' PBSPKY1 EQU X'87' PCANKY1 EQU X'91' 4 PMACKY1 EQU X'95' L PEORKY1 EQU X'90' d PFTABKY1 EQU X'8B' | PBTABKY1 EQU X'83' PDUPKY1 EQU X'A2' PSLUTKY1 EQU X'A3' PREGKY1 EQU X'A1' PCOPKY1 EQU X'F
0x02ae7c…02b010 Dummy {f00=0x005d, f01=0x0190, f02=»Y1 EQU X'FF' PCY2KY1 EQU X'FF' PCYCKY1 EQU X'89' , PINVKY1 EQU X'82' D PKONKY1 EQU X'85' PKVITKY1 EQU X'86' t PSUPLKY1 EQU X'FF' PSUMKY1 EQU X'81' PADMKY1 EQU X'A0' PDIVKY1 EQU X'84' PHBOGKY1 EQU X'80'
0x02b010…02b1a4 Dummy {f00=0x005d, f01=0x0190, f02=»BKY1 EQU X'87' PINSKY1 EQU X'81' PDELKY1 EQU X'82' . PCL1KY1 EQU X'89' F PCL2KY1 EQU X'8A' ^ PCL3KY1 EQU X'8B' v POUTKY1 EQU X'A0' P* PBSPKY2 EQU X'C7' PCANKY2 EQU X'D1' PEORKY2 EQU X'D0' PMACKY2 EQU X'D5'
0x02b1a4…02b338 Dummy {f00=0x005d, f01=0x40c4, f02=»EKY2 EQU X'D2' PREGKY2 EQU X'E1' PADMKY2 EQU X'E0' . PSPGKY2 EQU X'FF' F PKONKY2 EQU X'FF' ^ PKVITKY2 EQU X'C6' v PONKY2 EQU X'D9' PCOPKY2 EQU X'C5' @ PCANKY2 EQU X'D1' PEORKY2 EQU X'D0' PMACKY2 EQU X'D5'
0x02b338…02b4cc Dummy {f00=0x005d, f01=0x2008, f02=» * ERRFMT FRMT FSL , " FMEL 'ZZ9B',GTWBCD1 FILE NR. 8 FCOPY ERRTXT ^ " FMEL 'BZZ9',GTWBCD2 ERRORNR. t FCOPY =X'07' FMEND @ 8SPKTAB2 KTAB BSPKY1,CANKY1,NOKEY,MACKY1,NOKEY,EORKY1, C D ? FT
0x02b4cc…02b660 Dummy {f00=0x005d, f01=0x0190, f02=»
0x02b660…02b7f4 (0, 55) Opaque[0x194]
0x02b7f4…02b988 # DirEnt {nam=»CTST «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0bb8, f03=0x0000}
0x02b7f4…02b988 IdxSect {
0x02b7f4…02b988 f00 = 0x005d // 0x2b7f4 @0x0
0x02b7f4…02b988 f01 = 0x0002 // 0x2b7f6 @0x2
0x02b7f4…02b988 gno = [ // 0x2b7f8 @0x4
0x02b7f4…02b988 [0x00]: C0x005d.0x3.0
0x02b7f4…02b988 ]
0x02b7f4…02b988 }
0x02b988…02bb1c Dummy {f00=0x005d, f01=0x018e, f02=» T; P01; TID=TC; TCL=TC; * LEV=60; : P02; J PTDC=T03; V PLC=01L; f PTDC=T07; v PLC=01L; P01; PSCL=S04; PT; P01; PTID=TD; PTCL=TC; PLEV=60; P02; PTDC=
0x02bb1c…02bcb0 Dummy {f00=0x005d, f01=0x018e, f02=» 01; PTDC=T04; PLC=02L; $ P03; 4 PSCL=S02; @ PSCL=S03; P PSCL=S04; ` PT; p P01; z PTID=GA; PTCL=GA; PLEV=60; P01; PTDC=T05; PLC=02L; P03; PSCL=S02; PSCL=S03;
0x02bcb0…02be44 Dummy {f00=0x005d, f01=0x004a, f02=» P01; PSCL=S01; U; 001; * TB2; 6 P001; B @ PSCL=S03; P PSCL=S04; ` PT; p P01; z PTID=GA; PTCL=GA; PLEV=60; P01; PTDC=T05; PLC=02L; P03; PSCL=S02; PSCL=S03;
0x02be44…02bfd8 Dummy {f00=0x005d, f01=0x2008, f02=» PSCL=S01; U; 001; * TB2; 6 P001; B @ PSCL=S03; P PSCL=S04; ` PT; p P01; z PTID=GA; PTCL=GA; PLEV=60; P01; PTDC=T05; PLC=02L; P03; PSCL=S02; PSCL=S03;
0x02bfd8…02c16c Dummy {f00=0x005d, f01=0x0190, f02=»
[…0x1…]
0x02c300…02c494 (0, 56) Opaque[0x194]
0x02c494…02c628 # DirEnt {nam=»SCREEN«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0bc0, f03=0x0000}
0x02c494…02c628 IdxSect {
0x02c494…02c628 f00 = 0x005e // 0x2c494 @0x0
0x02c494…02c628 f01 = 0x000e // 0x2c496 @0x2
0x02c494…02c628 gno = [ // 0x2c498 @0x4
0x02c494…02c628 [0x00]: C0x005e.0x0.0
0x02c494…02c628 [0x01]: C0x005e.0x1.0
0x02c494…02c628 [0x02]: C0x005e.0x2.0
0x02c494…02c628 [0x03]: C0x005e.0x3.0
0x02c494…02c628 [0x04]: C0x005f.0x0.0
0x02c494…02c628 [0x05]: C0x005f.0x1.0
0x02c494…02c628 [0x06]: C0x005f.0x2.0
0x02c494…02c628 ]
0x02c494…02c628 }
0x02c628…02c7bc Dummy {f00=0x005e, f01=0x0190, f02=» P IDENT SCREEN 03.01.XXX.1 P 1.1,78-04-20,870138040310 & P* J , P* A STANDARD PROGRAM PACKAGE HANDLING T 0 P* A COMPLETE PICTURE ON A DISPLAY SCREEN P* ( P* RUNNING UNDER: CREDIT REL 3.1 ( P* TOSS
0x02c7bc…02c950 Dummy {f00=0x005e, f01=0x0190, f02=»EAR SOME VARIABLE FIELDS * P ENTRY SPCLRN CLEAR NO VARIABLE FIELDS ( P ENTRY SPERR DISPLAY ERROR PRINTOUT N P AND CONTINUE HANDLING z $ P ENTRY SPLIN8 MESSAGE ON LINE 8 P ENTRY SPCA AS SPCLRA-- P ENTRY SPCN AS SPCLRN-- P ENTRY
0x02c950…02cae4 Dummy {f00=0x005e, f01=0x0190, f02=»8 $ P ENTRY DKTEST TEST IF DISK READY & P ENTRY KBTEST TEST KB FOR MAK-KEY 2 P* , P EXT SPCHK1 STANDARD CHECK ROUTINE NO. 1 f , P EXT SPCHK2 STANDARD CHECK ROUTINE NO. 2 , P EXT SPCHK3 STANDARD CHECK ROUTINE NO. 3 , P EXT SPCHK4 STANDA
0x02cae4…02cc78 Dummy {f00=0x005e, f01=0x018e, f02=»7 STANDARD CHECK ROUTINE NO. 7 & P EXT SPAPPL USER ROUTINE TO HANDLE & P APPL VALUES P . P EXT RKAPPL APPLVALUES FOR R]KONVERTERING f ( P EXT SPTCHK USER ROUTINE TO EVALUATE P CONDITIONAL TABULATION P EXT ABORT P EXT GETTID
0x02cc78…02ce0c Dummy {f00=0x005e, f01=0x0190, f02=» $ P* FIRST INCLUDE KEY VALUES, . P* THEN INCLUDE SPECIAL SCREEN FORMATS , P INCLUDE SL6272,LIST ^ P z PSPCLRA PROC P* D P* SPCLRA - CLEAR ALL VARABLE FIELDS BEFORE HANDLING THE PICTURE P* P MOVE SPERASE,CBIN0
0x02ce0c…02cfa0 Dummy {f00=0x005e, f01=0x0190, f02=»DLING THE PICTURE ` P* P MOVE SPERASE,CBIN0 $ P PERF SCREEN,=W'2' @ P RET Z P PEND f PSPCLRN PROC t P* D P* SPCLRN - CLEAR NO VARIABLE FIELDS BEFORE HANDLING THE PICTURE P* P MOVE SPERASE,CBIN0 P PERF SC
0x02cfa0…02d134 (0, 57) Dummy {f00=0x005e, f01=0x0190, f02=»ERF SCREEN,=W'0' P RET P PEND $ PSPCA PROC 2 P* D P* N P MOVE SPERASE,CBIN4 X P PERF SCREEN,=W'1' t P RET P PEND PSPCN PROC P* P* P MOVE SPERASE,CBIN4 P PERF SCREEN,=W'3' P RET
0x02d134…02d2c8 Dummy {f00=0x005e, f01=0x0190, f02=»OPT> z P* P PLIT $OPT OPTIO SELECTOR P 8 & P CLEAR SPWARNFL CLEAR WARNING FLAG @ ( P MOVE SPBINW2,$OPT MOVE TO VARIABLE j " P TO ALLOW INSTR.S CMP AND IB & P CMP SPBINW2,CBIN0 "SPERR" ENTRY ? P BE ERRPRINT YES ! P . P
0x02d2c8…02d45c Dummy {f00=0x005e, f01=0x018e, f02=»B SPBINW2,CLEARA,CLEARS,CONT JUMP ON ROUTINE INDEX P* : PCLEARA D 2 P ERASE 10,CBIN1,CBIN0 ERASE ALL FROM 1 AND UP R P THOME P B CONT P* PCLEARS 2 P ERASE 5,CBIN1,CBIN0 ERASE SOME FROM 1 AND UP P B CONT P
0x02d45c…02d5f0 Dummy {f00=0x005e, f01=0x0190, f02=» P* CLEAR ALL VARIABLES P* ( PECLRA 2 $ P ERASE 11,CBIN1,CBIN0 CLEAR ALL @ P IN MEMORY h P B ECLRN | P* P* CLEAR SOME VARIABLES P* PECLRS 0 P ERASE 6,CBIN1,CBIN0 CLEAR SOME FIELDS FROM P 1
0x02d5f0…02d784 Dummy {f00=0x005e, f01=0x0190, f02=»CLRN4 n P DISPLAY 0,CBIN1,CBIN0 P B CONT , PECLRN1 < P DISPLAY 1,CBIN1,CBIN0 J P B CONT h PECLRN2 x P DISPLAY 2,CBIN1,CBIN0 P B CONT PECLRN3 P DISPLAY 3,CBIN1,CBIN0 P B CONT PECLRN4 P DISPLAY 4
0x02d784…02d918 Dummy {f00=0x005e, f01=0x0190, f02=» l PCONT5 6 P GETFLD 0,SPBINW4,SPBINW3 SEARCH CURRENT POSITION P BZ SETCREAD JUMP IF FOUND P " P BL KTHOME POSITION NOT FOUND r P* P* COMPULSORY FIELD FOUND P* & P MOVE SPBINW4,SPBINW3 CHANGE INDEX P B CONT5 SEARC
0x02d918…02daac Dummy {f00=0x005e, f01=0x0190, f02=»URRENT FIELD x P P* * P* READ TO CURRENT FIELD ON DISPLAY & P* T PREADIN ^ P* SET FLAG IF AUTODUP l P* USES VERIF-FIELD P MOVE SPBINW2,CBIN3 P MOVE SPBINW1,CBIN1 P TSTCTL 6 P BOK DYKIN P
0x02daac…02dc40 Dummy {f00=0x005e, f01=0x0190, f02=»1 ~ P BL DYK20 P MOVE SPBINW2,CBIN15 P B DYK20 8 P B DYK20 H P* X PDYKIN b & P IB SPKEY,DYK05,DYK10,DYK15,DYK16 p PDYK05 . P DYKI SPINPUT,SPKTAB1,SPKTAB2,SPBINW1, C P SPBINW2,SPBINW4 P B DYKOUT PDY
0x02dc40…02ddd4 (0, 58) Dummy {f00=0x005e, f01=0x0190, f02=»SPKTAB13,SPKTAB23,SPBINW1, C P SPBINW2,SPBINW4 & P B DYKOUT @ PDYK16 R 0 P DYKI SPINPUT,SPKTAB14,SPKTAB24,SPBINW1, C ` P SPBINW2,SPBINW4 P B DYKOUT PDYKOUT P BL ERRPRT ERROR P CLEAR SPDUPL P CMP SPBINW2
0x02ddd4…02df68 Dummy {f00=0x005e, f01=0x0190, f02=»,SET4,CLR1,CLR2,CLR3,CLR4 v P B RETUR " PSET1 2 P SET TTKEY1 > P B DYKIN R PSET2 b P SET TTKEY2 n P B DYKIN PSET3 P SET TTKEY3 P B DYKIN PSET4 P SET TTKEY4 P B DYKIN PCLR1 P CLEAR TTK
0x02df68…02e0fc Dummy {f00=0x005e, f01=0x0190, f02=» P CLEAR TTKEY4 P B DYKIN P* * PDYK20 4 P* B P PERF DKTEST L P BNOK SETCREAD ` P* v P TBF TTKEYFLG,DYK80 P* P KEY SWITCHES $ P TBF TTKEY1,DYKRET KEYBOARD OFF & P IB SPKEY,DYK30,DYK40,DYK50,DYK40
0x02e0fc…02e290 Dummy {f00=0x005e, f01=0x0190, f02=»POS 2 ON 6234 r PDYKRET P PERF BELL $ P B SETCREAD 6 PDYK50 J PDYK80 X ( P IB SPBINW2,UPD300,CLEA20 JUMP ON C f P UPDATE,CANC,CANC, C . P UPDATE,UPDATE,UPDATE,UPDATE CONVERTED C 4 P UPDATE,UPDATE,UPDATE,UPDATE END-OF-I
0x02e290…02e424 Dummy {f00=0x005e, f01=0x0190, f02=»TE 0 P CBE SPBINW1,CBIN0,UPD350 JUMP IF LENGTH = 0 & P GETCTL 3,SPBINW4 GET SCHK-NUMBER > 8 P CBE SPBINW4,CBIN0,UPD050 JUMP IF NOT STANDARD CHECK h * P PERFI SPBINW4,SPCHK1,SPCHK2,SPCHK3 C " P SPCHK4,SPCHK5,SPCHK6,SPCHK7 & P IB SPBINW3,UPD0
0x02e424…02e5b8 Dummy {f00=0x005e, f01=0x0190, f02=»CBIN1 INDICATE COND. DISPL P B UPD200 " PUPD070 4 $ P GETCTL 0,SPBINW3 GET APPL-VALUE B 2 P CBNE SPBINW3,CBIN0,UPD210 JUMP IF APPL VALUE j P B SETCREAD P* " P* UNCONDITIONAL DISPLAYING P* PUPD100 6 P MOVE SPBINW
0x02e5b8…02e74c Dummy {f00=0x005e, f01=0x0190, f02=» APPL VALUE l P* ( P* APPL-VALUE DIFFERENT FROM ZERO P* J PUPD210 T P TBT GTRKONV,UPD211 b P PERF SPAPPL ~ P B UPD212 PUPD211 P PERF RKAPPL PUPD212 ( P IB SPBINW3,UPD400,SETCREAD,ERRPRINT P B UPD40
0x02e74c…02e8e0 Dummy {f00=0x005e, f01=0x0190, f02=»DATE FIELD WITH DISPLAYING | PUPD300 " 6 P CBE SPBINW1,CBIN0,UPD350 SKIP NEXT IF LENGTH = 0 0 ( P SET SPCHANGE INDICATE CHANGED ITEM j PUPD350 P* TAKE CARE OF WARNING P TBF SPWARNFL,UPD360 * P MOVE SPBINW1,SPBINW2 STORE KEY VALUE
0x02e8e0…02ea74 (0, 59) Dummy {f00=0x005e, f01=0x0190, f02=»SET OLD KEYVALUE x PUPD360 $ P* JUMP ON FUNCTION KEY INDEX & P IB SPBINW2,READIN,DUMMY, C N P KEOI,DUMMY,DUMMY,KTFWD, C r . P KTBWD,KTHOME,KTLDOWN,KTLEFT,KTRIGHT, C * P KTDOWN,KTUP,KCOPY,DUMMY,DUMMY,KENTER , P SUB SPBINW2,CBIN1
0x02ea74…02ec08 Dummy {f00=0x005e, f01=0x0190, f02=»IONAL DISPL f 0 P UPDFLD 0,SPINPUT UPDATE FIELD DISPL. COND. P B UPD300 H P* Z P d " PKEOI COMMON END-OF-ITEM KEY l PKTFWD TAB. FORWARD 1 STEP P TFWD P B TSTTAB P* $ PKTBWD TABULATION 1 STEP BACKW. P
0x02ec08…02ed9c Dummy {f00=0x005e, f01=0x0190, f02=» TO FIRST ON NEXT LINE P TLDOWN P B TSTTAB . P* @ PKTLEFT TAB. TO LEFTMOST J P TLEFT l P B TSTTAB z P* PKTRIGHT TAB. TO RIGHTMOST P TRIGHT P B TSTTAB P* PKTDOWN TAB 1 DOWN P TDOWN
0x02ed9c…02ef30 Dummy {f00=0x005e, f01=0x0190, f02=»L READIN NOT FOUND * P BOFL SETCREAD EMPTY COMPULSORY FIELD P* H P* R P* CONDITIONAL TABULATION P* P PERF SPTCHK P CMP SPBINW3,CBIN0 P BE SETCREAD P IB SPBINW2,DUMMY,DUMMY, C " P KTFWD,DUMMY,DUMMY,KTFW
0x02ef30…02f0c4 Dummy {f00=0x005e, f01=0x0190, f02=» X P P B SETCREAD P $ PKCOPY HARD COPY . P MOVE SPBINW3,CBIN1 H P TBT GTGTPFLG,KCOPY05 d P TBT GTLPFLG,KCOPY08 P B KCOPY10 PKCOPY05 P EDWRT DSHCGP,ERAFMT " P PRINT DSHCGP,SPBINW3,='0' GTP P B KCO
0x02f0c4…02f258 Dummy {f00=0x005e, f01=0x0190, f02=»EAD SET CURSOR AND READ P* PKDUPL DUPLICATION * 0 P MOVE SPBINW2,CBIN3 INDICATE COMMON EOI-KEY F P DUPL SPINPUT DUPLICATION z P BNZ KDUPL2 6 P COPY GSWSTR1,CBIN0,CBIN1,SPINPUT,CBIN1 GET BYTE 1 P CBE GSWSTR1,=X'00',KDUPL2
0x02f258…02f3ec Dummy {f00=0x005e, f01=0x018e, f02=»IN4 INDICATE ILLEGAL EOI-KEY P B ERRPRINT DUPL NOT ALLOWED $ P H P* P P* EDIT FIELD Z P* r PKEDIT | P GETCTL 1,SPBINW3 GET MAXL P CBNE SPBINW3,CBIN0,KED100 P PERF BELL P B SETCREAD PKED100 & P EDFLD
0x02f3ec…02f580 Dummy {f00=0x005e, f01=0x0190, f02=» PKENTER ( P TBT SPCHANGE,KENT00 NO TESTS ON ME P TBF SPME,KENT05 FIELDS ? B PKENT00 d 2 P MOVE SPBINW4,CBIN5 INDICATE COMP.FIELD FOUND r , P MOVE SPBINW1,CBIN0 INDICATE NO CLEARING 4 P MOVE SPBINW2,CBIN0 SET INDEX TO SEARCHED FIELD
0x02f580…02f714 (0, 60) Dummy {f00=0x005f, f01=0x0190, f02=»MPULSORY FIELD | P BZ KENT05 NO! . P CALL EMPTYT,:FMTITEM LOOK IF EMPTY FIELD , P BP KENT10 YES! ^ PKENT05 v 4 P MOVE SPBINW2,CBIN3 INDICATE ENTER KEY DEPRESSED P RET P* & P* EMPTY COMPULSORY FIELD FOUND P* PKE
0x02f714…02f8a8 Dummy {f00=0x005f, f01=0x018e, f02=»BE SPBINW2,CBIN16,KEDIT JUMP IF EDIT , P CBE SPBINW2,CBIN4,CANC JUMP IF CANCEL1 , , P CBE SPBINW2,CBIN5,CANC JUMP IF CANCEL2 P* P* ERROR HANDLING P* PERRPRINT P* P MOVE SPBINW2,=X'40' P XSTAT KEYB,SPBINW3
0x02f8a8…02fa3c Dummy {f00=0x005f, f01=0x0190, f02=» P CBE SPBINW4,CBIN0,ERRC20 P PERF BELL & ( P MOVE SPBINW3,=X'1801' ROW 24 COL. 1 8 2 P DSC1 SCREEN,6,SPBINW3 SET CURSOR ON LAST ROW d P TBT GTRKONV,ERRPRT30 $ P MOVE GSWBCD4,SPBINW4 ERRORCODE PERRPRT30 $ P EDWRT SCREEN,SPFTBERR(S
0x02fa3c…02fbd0 Dummy {f00=0x005f, f01=0x0190, f02=» BEGINNING v P OF THE CURRENT FIELD ! PERR100 ! 2 * P MOVE SPBINW3,CBIN14 REQUESTED LENGTH ! @ * P IB SPKEY,ERR105,ERR110,ERR115,ERR116 ! n PERR105 ! 2 P NKI .NE,KEYB,SPINPUT,SPKTAB1,SPBINW3,SPBINW2 ! P B ERR120 ! PERR110 ! 2 P NKI .NE
0x02fbd0…02fd64 Dummy {f00=0x005f, f01=0x0190, f02=»RR120 ! PERR116 " 2 P NKI .NE,KEYB,SPINPUT,SPKTAB14,SPBINW3,SPBINW2 " P B ERR120 " R PERR120 " d P BNZ ERR100 JUMP IF NOT OK " r P PERF DKTEST " P BNOK ERREAD " ( P CMP SPBINW2,CBIN0 JUMP IF POWER OFF " P BE RETUR " " P IB SPBINW2,ER
0x02fd64…02fef8 Dummy {f00=0x005f, f01=0x0190, f02=» " PERRCONT # P PERF CLEAR8 ERASE LAST LINE # ( P CBNL SPBINW4,=W'26',CANC IF WARNING # < ( P SUB SPBINW2,CBIN1 ADJUST KEY INDEX # h PCANC # 0 P CBE SPBINW1,CBIN0,ERRC10 JUMP IF LENGTH = 0 # 0 P MOVE SPINPUT,:FMTITEM SAVE CURRENT CONTENTS # 4 P
0x02fef8…03008c Dummy {f00=0x005f, f01=0x0190, f02=» # j PERRC10 $ $ P IB SPBINW2,CLEAR1,CLEAR2,DUMMY $ 2 P SUB SPBINW2,CBIN3 ADJUST FOR CANCEL1,CANCEL2 $ > P RET $ t PCLEAR1 $ 0 P CBE SPBINW1,CBIN0,ERRC20 JUMP IF LENGTH = 0 $ ( P SET SPCHANGE INDICATE CHANGED FIELD $ PERRC20 $ & P MOVE SPBINW
0x03008c…030220 Dummy {f00=0x005f, f01=0x0190, f02=»NPUT RESTORE CURRENT CONTENTS $ ~ PCLEA20 % & * P GETABX SPBINW4 GET CURRENT TAB INDEX % 4 , P DISPLAY 1,SPBINW4,SPBINW4 DISPLAY FIELD % b & P MOVE SPBINW5,$OPT CHECK IF SPERR % P CBE SPBINW5,CBIN0,SPERRRET % P B SETCREAD CONTINUE % P* % PSP
0x030220…0303b4 (0, 61) Dummy {f00=0x005f, f01=0x0190, f02=» P RET & P* & PBELLFMT FRMT & P FSL & . P FILLR X'07',1 & : P FMEND & P P & ^ P PEND & f P* & t PERAFMT FRMT & ~ P FILLR '1',2 & P FMEND & P EJECT & PKBTEST PROC & ( P* THE PROCEDURE SENSES THE KEYBOARD. & 6 P* IF T
0x0303b4…030548 Dummy {f00=0x005f, f01=0x0190, f02=»ISTING (OR FOR ANY OTHER PURPOSE) & z P PERF SPLIN8,CBIN0,CBIN0 ' * P TESTIO KEYB ' J P BOK KBT10 ' ^ P CALL ABORT,KEYB ' p P B KBT20 ' PKBT10 ' P WAIT KEYB ' P CBNE SPBINW2,CBIN6,KBT20 ' P CMP CBIN0,CBIN0 ' P B KBT99 ' PKBT20
0x030548…0306dc Dummy {f00=0x005f, f01=0x018e, f02=»**** ' P* ( ( P* SPLIN8 - WRITE ON LINE 24 ( P* ( B 6 P* MESSAGE DEFINED AS FORMAT NUMBER WRTMES ( L ( P* IN FORMAT TABLE SPFTBMES ( P* ( $ P* WRTTYP: =0 NO WAIT ( " P* =1 WAIT ( $
0x0306dc…030870 Dummy {f00=0x005f, f01=0x0190, f02=» P MOVE SPBINW1,=X'1801' ) 2 P DSC1 SCREEN,6,SPBINW1 SET CURSOR ON LAST ROW ) " P MOVE SPBINW1,CBIN0 ) X P CBE WRTMES,CBIN0,LIN800 ) t P CBL WRTTYP,CBIN3,LIN801 ) & P EDWRT .NW,SCREEN,SPFTBMES(WRTMES) ) P B LINRET ) PLIN801 ) " P EDWRT SCR
0x030870…030a04 Dummy {f00=0x005f, f01=0x0190, f02=»OVE SPBINW1,CBIN3 REQUESTED LENGTH ) * P IB SPKEY,LIN805,LIN810,LIN815,LIN816 * * PLIN805 * X . P NKI KEYB,SPINPUT,SPKTAB1,SPBINW1,SPBINW2 * f P B LIN820 * PLIN810 * . P NKI KEYB,SPINPUT,SPKTAB12,SPBINW1,SPBINW2 * P B LIN820 * PLIN815 * .
0x030a04…030b98 Dummy {f00=0x005f, f01=0x0190, f02=» LIN820 * PLIN820 + P BNOK LIN8IN JUMP IF NOT OK + P PERF DKTEST + B $ P IB SPBINW2,LIN8IN,LIN8CT,LIN8IN + V P B LIN8IN + ~ P* CLEAR LINE + PLIN8CT + P PERF CLEAR8 ERASE LAST LINE + P RET + P* READ WITH NO WAIT + PLIN8NW +
0x030b98…030d2c Dummy {f00=0x005f, f01=0x018e, f02=»1,SPBINW1,SPBINW2 + t P B LIN870 , PLIN860 , , 2 P NKI .NW,KEYB,SPINPUT,SPKTAB12,SPBINW1,SPBINW2 , : P B LIN870 , p PLIN865 , 2 P NKI .NW,KEYB,SPINPUT,SPKTAB13,SPBINW1,SPBINW2 , P B LIN870 , PLIN866 , 2 P NKI .NW,KEYB,SPINPUT,SPKTAB14,SPB
0x030d2c…030ec0 Dummy {f00=0x005f, f01=0x0190, f02=» , P******************** - P* - $ 0 P* SPINF1 - WRITE INF ON FIRST LINE - . P* - b P******************** - l P MOVE SPBINW1,=X'0117' - 4 P DSC1 SCREEN,6,SPBINW1 SET CURSOR ON FIRST LINE - P MOVE SPBINW1,CBIN0 - 2 P EDWRT SCREEN,
0x030ec0…031054 (0, 62) Dummy {f00=0x005f, f01=0x0190, f02=» - | P* . . P* SPINF8 - WRITE INF ON LAST LINE . P* . D P******************** . N P PERF SPLIN8,CBIN4,CBIN2 . j P RET . P PEND . P* . P* . PCLEAR8 PROC . $ P* DELETE FIRST 14 CHARACTERS . P* OF LINE 24 .
0x031054…0311e8 Dummy {f00=0x005f, f01=0x0190, f02=»2 ERASE 14 CHARS . z P RET / P PEND / & P* / 4 P* / > PDKTEST PROC / H $ P* TEST IF DISK IS SWITCHED OFF, / P* / P TBF CDKOFF,DKTRET / P TBT GTMASTFL,DKTRET / 2 P TBF CDUOVL,DKTRET NO KI IF DISKOVERLAY ON DU / 0 P* WRITE MESSA
0x0311e8…03137c Dummy {f00=0x005f, f01=0x4114, f02=»FTBMES(CBIN14) / | PDKT10 0 P DELAY CBIN10 0 $ P TBT CDKOFF,DKT10 0 : P PERF CLEAR8 0 T P CMP CBIN1,CBIN0 NOK 0 h P RET 0 PDKTRET 0 P CMP CBIN0,CBIN0 OK 0 P RET 0 P PEND 0 P* 0 P* 0 P* 0 P* 0 P 0 P END
0x03137c…031510 Dummy {f00=0x005f, f01=0x2008, f02=» 1
0x031510…0316a4 Dummy {f00=0x005f, f01=0x0190, f02=» m" ? ? # p % ? ? # % ? ? :7 " x % l x %k l ? #? I ? ? ? x k ? $ ' ? 88( H ?9 < ? +8 z8 ? " ? A % A # @ W @ < ? & (
0x0316a4…031838 Dummy {f00=0x005f, f01=0x0190, f02=» T# 88( H ?9 %? ? ? Y ? & _ . I ? ? ? @ @ " ? < "? A D D D D D j ' ? A j ' ? A j ' j ? A j # j #? A j ! j !? $ " x x ? ? % l " v v ?
0x031838…0319cc Dummy {f00=0x005f, f01=0x0190, f02=» ? x # ~ x x ? ? "< b v v - l v v W ( ~ W A W pW qW sW # W W T ! u % l @ yH I H + WC W~ (_ x_" /_' |_, ~ ~ l l $
0x0319cc…031b60 Dummy {f00=0x005f, f01=0x0190, f02=» l m 4 J # " 4 W 6 W 6 $ A W $ 4 .A 4 H.PA 1' 6 CC WAI^>A^% l A0 I I W H - T W @^@0 ?:I^ A^H. I I W @YA 1' 6 ww Wu@8) m A8- l % q p TK 1'
0x031b60…031cf4 (0, 63) Opaque[0x194]
0x031cf4…031e88 # DirEnt {nam=»/OBJCT«, typ=»OB«, f00=0x0000, f01=0x0000, f02=0x0bf8, f03=0x0000}
0x031cf4…031e88 IdxSect {
0x031cf4…031e88 f00 = 0x005f // 0x31cf4 @0x0
0x031cf4…031e88 f01 = 0x0148 // 0x31cf6 @0x2
0x031cf4…031e88 gno = [ // 0x31cf8 @0x4
0x031cf4…031e88 [0x00]: C0x005f.0x3.0
0x031cf4…031e88 [0x01]: C0x0060.0x0.0
0x031cf4…031e88 [0x02]: C0x0060.0x1.0
0x031cf4…031e88 [0x03]: C0x0060.0x2.0
0x031cf4…031e88 [0x04]: C0x0060.0x3.0
0x031cf4…031e88 [0x05]: C0x0061.0x0.0
0x031cf4…031e88 [0x06]: C0x0061.0x1.0
0x031cf4…031e88 [0x07]: C0x0061.0x2.0
0x031cf4…031e88 [0x08]: C0x0061.0x3.0
0x031cf4…031e88 [0x09]: C0x0062.0x0.0
0x031cf4…031e88 [0x0a]: C0x0062.0x1.0
0x031cf4…031e88 [0x0b]: C0x0062.0x2.0
0x031cf4…031e88 [0x0c]: C0x0062.0x3.0
0x031cf4…031e88 [0x0d]: C0x0063.0x0.0
0x031cf4…031e88 [0x0e]: C0x0063.0x1.0
0x031cf4…031e88 [0x0f]: C0x0063.0x2.0
0x031cf4…031e88 [0x10]: C0x0063.0x3.0
0x031cf4…031e88 [0x11]: C0x0064.0x0.0
0x031cf4…031e88 [0x12]: C0x0064.0x1.0
0x031cf4…031e88 [0x13]: C0x0064.0x2.0
0x031cf4…031e88 [0x14]: C0x0064.0x3.0
0x031cf4…031e88 [0x15]: C0x0065.0x0.0
0x031cf4…031e88 [0x16]: C0x0065.0x1.0
0x031cf4…031e88 [0x17]: C0x0065.0x2.0
0x031cf4…031e88 [0x18]: C0x0065.0x3.0
0x031cf4…031e88 [0x19]: C0x0066.0x0.0
0x031cf4…031e88 [0x1a]: C0x0066.0x1.0
0x031cf4…031e88 [0x1b]: C0x0066.0x2.0
0x031cf4…031e88 [0x1c]: C0x0066.0x3.0
0x031cf4…031e88 [0x1d]: C0x0067.0x0.0
0x031cf4…031e88 [0x1e]: C0x0067.0x1.0
0x031cf4…031e88 [0x1f]: C0x0067.0x2.0
0x031cf4…031e88 [0x20]: C0x0067.0x3.0
0x031cf4…031e88 [0x21]: C0x0068.0x0.0
0x031cf4…031e88 [0x22]: C0x0068.0x1.0
0x031cf4…031e88 [0x23]: C0x0068.0x2.0
0x031cf4…031e88 [0x24]: C0x0068.0x3.0
0x031cf4…031e88 [0x25]: C0x0069.0x0.0
0x031cf4…031e88 [0x26]: C0x0069.0x1.0
0x031cf4…031e88 [0x27]: C0x0069.0x2.0
0x031cf4…031e88 [0x28]: C0x0069.0x3.0
0x031cf4…031e88 [0x29]: C0x006a.0x0.0
0x031cf4…031e88 [0x2a]: C0x006a.0x1.0
0x031cf4…031e88 [0x2b]: C0x006a.0x2.0
0x031cf4…031e88 [0x2c]: C0x006a.0x3.0
0x031cf4…031e88 [0x2d]: C0x006b.0x0.0
0x031cf4…031e88 [0x2e]: C0x006b.0x1.0
0x031cf4…031e88 [0x2f]: C0x006b.0x2.0
0x031cf4…031e88 [0x30]: C0x006b.0x3.0
0x031cf4…031e88 [0x31]: C0x006c.0x0.0
0x031cf4…031e88 [0x32]: C0x006c.0x1.0
0x031cf4…031e88 [0x33]: C0x006c.0x2.0
0x031cf4…031e88 [0x34]: C0x006c.0x3.0
0x031cf4…031e88 [0x35]: C0x006d.0x0.0
0x031cf4…031e88 [0x36]: C0x006d.0x1.0
0x031cf4…031e88 [0x37]: C0x006d.0x2.0
0x031cf4…031e88 [0x38]: C0x006d.0x3.0
0x031cf4…031e88 [0x39]: C0x006e.0x0.0
0x031cf4…031e88 [0x3a]: C0x006e.0x1.0
0x031cf4…031e88 [0x3b]: C0x006e.0x2.0
0x031cf4…031e88 [0x3c]: C0x006e.0x3.0
0x031cf4…031e88 [0x3d]: C0x006f.0x0.0
0x031cf4…031e88 [0x3e]: C0x006f.0x1.0
0x031cf4…031e88 [0x3f]: C0x006f.0x2.0
0x031cf4…031e88 [0x40]: C0x006f.0x3.0
0x031cf4…031e88 [0x41]: C0x0070.0x0.0
0x031cf4…031e88 [0x42]: C0x0070.0x1.0
0x031cf4…031e88 [0x43]: C0x0070.0x2.0
0x031cf4…031e88 [0x44]: C0x0070.0x3.0
0x031cf4…031e88 [0x45]: C0x0071.0x0.0
0x031cf4…031e88 [0x46]: C0x0071.0x1.0
0x031cf4…031e88 [0x47]: C0x0071.0x2.0
0x031cf4…031e88 [0x48]: C0x0071.0x3.0
0x031cf4…031e88 [0x49]: C0x0072.0x0.0
0x031cf4…031e88 [0x4a]: C0x0072.0x1.0
0x031cf4…031e88 [0x4b]: C0x0072.0x2.0
0x031cf4…031e88 [0x4c]: C0x0072.0x3.0
0x031cf4…031e88 [0x4d]: C0x0073.0x0.0
0x031cf4…031e88 [0x4e]: C0x0073.0x1.0
0x031cf4…031e88 [0x4f]: C0x0073.0x2.0
0x031cf4…031e88 [0x50]: C0x0073.0x3.0
0x031cf4…031e88 [0x51]: C0x0074.0x0.0
0x031cf4…031e88 [0x52]: C0x0074.0x1.0
0x031cf4…031e88 [0x53]: C0x0074.0x2.0
0x031cf4…031e88 [0x54]: C0x0074.0x3.0
0x031cf4…031e88 [0x55]: C0x0075.0x0.0
0x031cf4…031e88 [0x56]: C0x0075.0x1.0
0x031cf4…031e88 [0x57]: C0x0075.0x2.0
0x031cf4…031e88 [0x58]: C0x0075.0x3.0
0x031cf4…031e88 [0x59]: C0x0076.0x0.0
0x031cf4…031e88 [0x5a]: C0x0076.0x1.0
0x031cf4…031e88 [0x5b]: C0x0076.0x2.0
0x031cf4…031e88 [0x5c]: C0x0076.0x3.0
0x031cf4…031e88 [0x5d]: C0x0077.0x0.0
0x031cf4…031e88 [0x5e]: C0x0077.0x1.0
0x031cf4…031e88 [0x5f]: C0x0077.0x2.0
0x031cf4…031e88 [0x60]: C0x0077.0x3.0
0x031cf4…031e88 [0x61]: C0x0078.0x0.0
0x031cf4…031e88 [0x62]: C0x0078.0x1.0
0x031cf4…031e88 [0x63]: C0x0078.0x2.0
0x031cf4…031e88 [0x64]: C0x0078.0x3.0
0x031cf4…031e88 [0x65]: C0x0079.0x0.0
0x031cf4…031e88 [0x66]: C0x0079.0x1.0
0x031cf4…031e88 [0x67]: C0x0079.0x2.0
0x031cf4…031e88 [0x68]: C0x0079.0x3.0
0x031cf4…031e88 [0x69]: C0x007a.0x0.0
0x031cf4…031e88 [0x6a]: C0x007a.0x1.0
0x031cf4…031e88 [0x6b]: C0x007a.0x2.0
0x031cf4…031e88 [0x6c]: C0x007a.0x3.0
0x031cf4…031e88 [0x6d]: C0x007b.0x0.0
0x031cf4…031e88 [0x6e]: C0x007b.0x1.0
0x031cf4…031e88 [0x6f]: C0x007b.0x2.0
0x031cf4…031e88 [0x70]: C0x007b.0x3.0
0x031cf4…031e88 [0x71]: C0x007c.0x0.0
0x031cf4…031e88 [0x72]: C0x007c.0x1.0
0x031cf4…031e88 [0x73]: C0x007c.0x2.0
0x031cf4…031e88 [0x74]: C0x007c.0x3.0
0x031cf4…031e88 [0x75]: C0x007d.0x0.0
0x031cf4…031e88 [0x76]: C0x007d.0x1.0
0x031cf4…031e88 [0x77]: C0x007d.0x2.0
0x031cf4…031e88 [0x78]: C0x007d.0x3.0
0x031cf4…031e88 [0x79]: C0x007e.0x0.0
0x031cf4…031e88 [0x7a]: C0x007e.0x1.0
0x031cf4…031e88 [0x7b]: C0x007e.0x2.0
0x031cf4…031e88 [0x7c]: C0x007e.0x3.0
0x031cf4…031e88 [0x7d]: C0x007f.0x0.0
0x031cf4…031e88 [0x7e]: C0x007f.0x1.0
0x031cf4…031e88 [0x7f]: C0x007f.0x2.0
0x031cf4…031e88 [0x80]: C0x007f.0x3.0
0x031cf4…031e88 [0x81]: C0x0080.0x0.0
0x031cf4…031e88 [0x82]: C0x0080.0x1.0
0x031cf4…031e88 [0x83]: C0x0080.0x2.0
0x031cf4…031e88 [0x84]: C0x0080.0x3.0
0x031cf4…031e88 [0x85]: C0x0081.0x0.0
0x031cf4…031e88 [0x86]: C0x0081.0x1.0
0x031cf4…031e88 [0x87]: C0x0081.0x2.0
0x031cf4…031e88 [0x88]: C0x0081.0x3.0
0x031cf4…031e88 [0x89]: C0x0082.0x0.0
0x031cf4…031e88 [0x8a]: C0x0082.0x1.0
0x031cf4…031e88 [0x8b]: C0x0082.0x2.0
0x031cf4…031e88 [0x8c]: C0x0082.0x3.0
0x031cf4…031e88 [0x8d]: C0x0083.0x0.0
0x031cf4…031e88 [0x8e]: C0x0083.0x1.0
0x031cf4…031e88 [0x8f]: C0x0083.0x2.0
0x031cf4…031e88 [0x90]: C0x0083.0x3.0
0x031cf4…031e88 [0x91]: C0x0084.0x0.0
0x031cf4…031e88 [0x92]: C0x0084.0x1.0
0x031cf4…031e88 [0x93]: C0x0084.0x2.0
0x031cf4…031e88 [0x94]: C0x0084.0x3.0
0x031cf4…031e88 [0x95]: C0x0085.0x0.0
0x031cf4…031e88 [0x96]: C0x0085.0x1.0
0x031cf4…031e88 [0x97]: C0x0085.0x2.0
0x031cf4…031e88 [0x98]: C0x0085.0x3.0
0x031cf4…031e88 [0x99]: C0x0086.0x0.0
0x031cf4…031e88 [0x9a]: C0x0086.0x1.0
0x031cf4…031e88 [0x9b]: C0x0086.0x2.0
0x031cf4…031e88 [0x9c]: C0x0086.0x3.0
0x031cf4…031e88 [0x9d]: C0x0087.0x0.0
0x031cf4…031e88 [0x9e]: C0x0087.0x1.0
0x031cf4…031e88 [0x9f]: C0x0087.0x2.0
0x031cf4…031e88 [0xa0]: C0x0087.0x3.0
0x031cf4…031e88 [0xa1]: C0x0088.0x0.0
0x031cf4…031e88 [0xa2]: C0x0088.0x1.0
0x031cf4…031e88 [0xa3]: C0x0088.0x2.0
0x031cf4…031e88 ]
0x031cf4…031e88 }
0x031e88…03201c Dummy {f00=0x005f, f01=0x0190, f02=» J F IDENT PRT 2.1DK 4 800930 870150540210 SNBUSYK PRINT ICREAD R PRINT r I:EVA0 EMULA , ( @ . V P ! DC1INQ , ( O O N T N
0x03201c…0321b0 Dummy {f00=0x005f, f01=0x0190, f02=» C n GTRBUF DCGETM , ( y ( : P O W 2 UPDATE b , ( @ O B O N T N t , ( O : O ( : , ( O 8 O N Z_ (@P , (
0x0321b0…032344 Dummy {f00=0x005f, f01=0x018e, f02=» RFMDUP , ( S X }T 9 ~T 5 aR , ( q = _X = R F , ( 0" ZZ_" R v , ( V 0" 1 V " 2 P W X , ( {T * = ~X@ |XF } , (
0x032344…0324d8 Dummy {f00=0x005f, f01=0x0190, f02=» f , ( Q C 0 O W " |T , ( q ] N C Z 0 O 8 SNBUSYK h , ( B : | * & C ( : ( B : H D !,u )T 3T A ` UP| ] ~ P WF T
0x0324d8…03266c Dummy {f00=0x005f, f01=0x4030, f02=» aW8 mT r @ , , ( q ] N C Z 0 O 8 SNBUSYK h , ( B : | * & C ( : ( B : H D !,u )T 3T A ` UP| ] ~ P WF T
0x03266c…032800 Dummy {f00=0x005f, f01=0x0190, f02=» J F IDENT VDUPRT 2.1DK 5 79-10-20 870150540210 D @ TRPFY TRPAY ERASE SETCUR ERASUPA DISPL ERASUAL WCHAR UPDATE R , ( RFMDUP DCINP RLRBUF DCGETM GTRBUF DCINP , ( O N T B O N
0x032800…032994 (0, 64) Dummy {f00=0x0060, f01=0x018e, f02=» N " P N " O N " P SNBUSY $ , ( [@ N " O W B 6 DCGETM | f REQTIM` z , ( y : C C C ( :
0x032994…032b28 Dummy {f00=0x0060, f01=0x0190, f02=» f , ( $ _ Q = : $ : <" T TEBCDI 8 , ( $ _ $ H !?9F $ H "? J , ( % : X N / z , ( %1 O ( $ B P N ' O LSAVOF , ( %QH
0x032b28…032cbc Dummy {f00=0x0060, f01=0x0190, f02=»% !`P V 0 !`P X $ , ( % _ " T V 0 !` V _ , UPDATE % , ( $ % $ %r_J : O B p , ( & $ T $ 1P 5P ?P , ( &% 7 W N W , ( &E
0x032cbc…032e50 Dummy {f00=0x0060, f01=0x0190, f02=» & P P P P T |_X , ( & T }_b T ~_l T 0_v 0 , ( & T _ T _ B $ : ` , ( ' $ H ! :a" _ $ ^, , ( '# _ O _ T ^ , ( 'C 0 " R 1
0x032e50…032fe4 Dummy {f00=0x0060, f01=0x0190, f02=»$ ^ &Z N & , ( ' $ H V L 1P , ( ' Y & ( K@ V O P ICWRTE: , ( ( & $ H O , ( ( " P N T B + I I , ( (= I C
0x032fe4…033178 Dummy {f00=0x0060, f01=0x0190, f02=» , ( ( O O N T ; 1 B ERASUPA( 4 , ( ( E C ( : : O H , ( ( O P " R x , ( ( V 0" ^ " O P ERASUAL)2 , ( ) W P
0x033178…03330c Dummy {f00=0x0060, f01=0x0190, f02=» 1 _8 " T | , ( ) ZF P " Q _R R , ( ) R T _ X 0" ZF _2 L TRPAY) | TRPFY) , ( TU) $ $ % : : $ $ %l % DISPL) , ( ) _ C
0x03330c…0334a0 Dummy {f00=0x0060, f01=0x0190, f02=» ~T 5 | r , ( *} T < ] _V" 2 O P " P W , ( * ] _v PR V 0 B SETCUR * r , ( * " 1 ZJ_, C , ( * N C PR C P_ WCHAR+ RFMDUP +
0x0334a0…033634 (0, 65) Dummy {f00=0x0060, f01=0x0190, f02=» : l , ( +] % P 7 P R C ( B ! , ( +} PV B + E E :h E T C < , ( + ( C C _ N P l , ( + " P W = : R P + T - : : H D ! $ | TT 3% 7) GP Y
0x033634…0337c8 Dummy {f00=0x0060, f01=0x0190, f02=»( &_V &iR &sP & T & Ph& Pv& P & P & P & P & T & T & T H D ! & T & T & T '7T$'MR ' P ' R ' )2' P ( P4(%T.([T (qT ( V ( T(( R > H D ! ( V ) P )!W )%P )1WH)9R )ET4)QV()UTv)WW")]R )kR )qT ) R ) P ) T H D ! ) R ) R ) T * +.*%Q */Pz*3+ *9R *=+Z*A+ *GV *M
0x0337c8…03395c Dummy {f00=0x0060, f01=0x4014, f02=» + @ Ph& Pv& P & P & P & P & T & T & T H D ! & T & T & T '7T$'MR ' P ' R ' )2' P ( P4(%T.([T (qT ( V ( T(( R > H D ! ( V ) P )!W )%P )1WH)9R )ET4)QV()UTv)WW")]R )kR )qT ) R ) P ) T H D ! ) R ) R ) T * +.*%Q */Pz*3+ *9R *=+Z*A+ *GV *M
0x03395c…033af0 Dummy {f00=0x0060, f01=0x018e, f02=» J F IDENT START 2.1DK 6 79-10-20 870150540210 J F " LINHONK LINHOF ATMASB LSAVOF LSAVON EMULA LIOLON LIOLOFC VDUKB R . * DCTASK DC1INQN DC2INQ REQTIM ICWRTE@ , ( , ( !
0x033af0…033c84 Dummy {f00=0x0060, f01=0x0190, f02=» , ( , ( 4 , ( d , ( , ( , ( !
0x033c84…033e18 Dummy {f00=0x0060, f01=0x018e, f02=»CGETM , ( _ ( ( RLRBUFV > EMULA P VDUKB b , ( { B _ C ( : t , ( O O . V P ERASE , ( ! O
0x033e18…033fac Dummy {f00=0x0060, f01=0x018e, f02=» , ( @ P P _J DC1INQN > 8 , ( 1 C C W L DC2INQ V | , ( Q ( : O ," 2 X N , ( q N ! O _ O B P B KEYCNV , (
0x033fac…034140 Dummy {f00=0x0060, f01=0x0190, f02=» REQTIM , ( O ( : C ( : : N , ( V W N R W N H , ( / P R W N PV W x SETCUR , ( O O : N P R , ( m PR P_ O
0x034140…0342d4 (0, 66) Dummy {f00=0x0060, f01=0x0190, f02=» _ % Q _ _6 N z , ( @ { V - : N ` , ( V - : P " V " J , ( D ) L O : N U z , ( I P P P R W # , ( i O : Y2 ,
0x0342d4…034468 Dummy {f00=0x0060, f01=0x0190, f02=» j , ( N P N $ P v , ( N T 9 N P N + : , ( ' 9 N P <! T = + V E j WCHAR , ( G % # P & P W % N , ( e {P T O ,
0x034468…0345fc Dummy {f00=0x0060, f01=0x0190, f02=» j , ( P %W O : , ( T W P P : DISPL j , ( # H + ) _ O N z TASCII * & A _ P $# P _ : . H TRPAN , ( _
0x0345fc…034790 Dummy {f00=0x0060, f01=0x0190, f02=»P j , ( Q W O 0R Q <_8 O , ( : O 1R Q 9_R : _ : , ( j I:RT1 * & O - H , ( 3 : N # P , (
0x034790…034924 Dummy {f00=0x0060, f01=0x0190, f02=» () ) : P _@ Z: _H , ( " N P R O * , ( : N - O B + I Z , ( I C ( : W W LIOLON LIOLOFC LINHONK LINHOF
0x034924…034ab8 Dummy {f00=0x0060, f01=0x0190, f02=» C ( : v , ( C Q O O : P _ , ( c ]$ O O : F , ( N O : v , ( Q T O O : R : , ( _* 0 : O O
0x034ab8…034c4c Dummy {f00=0x0060, f01=0x0190, f02=» v H D ! ! # % ' ) + - / 1 3 5 7 9 ; = ? 2 H D ! A C E G I K M O Q S U W Y [ ] _ ~ H D ! a c e g i k m o q s u w y { }
0x034c4c…034de0 Dummy {f00=0x0060, f01=0x0190, f02=» b H D ! j Z . H D ! j H D ! < ( 6 B H D ! !
0x034de0…034f74 (0, 67) Dummy {f00=0x0060, f01=0x0190, f02=»Pj N H D !1 P8 =W M u P P P P V W6 #R 'W& 5R ;W EV H D !HC KW U @ iR sR @ P T T T Q P T Q V H D ! %V ? EU KP( SP Y @ ]P _R cW P T PF H D ! P P
0x034f74…035108 Dummy {f00=0x0060, f01=0x4134, f02=» m t {Rn Qj P W W( R6 P Q0 W R" H D !O Q R Q . $ 7 KP O [ _ B H D ! eQ, P P @ P R W, W, W$ W$ W W W W W @ < W #W 'W +W /W E KQ [P i
0x035108…03529c Dummy {f00=0x0060, f01=0x0190, f02=» J F IDENT TB3270 2.1DK 1 79-05-23 870150540210 TASCIIK TEBCDI KEYCNV R TASCIIK t , ( ABCDEFGHI#.<(+!&JKLMNOPQR$]*);^ TEBCDI @ , ( ! -/STUVWXYZ@,%_>?0123456789:[ '=" , ( A
0x03529c…035430 Dummy {f00=0x0060, f01=0x4126, f02=»EYCNV , ( , ( pR wQ PW R R W @ , ( H : & p , ( 01234567 ! 89 $ R Q W R R W
0x035430…0355c4 Dummy {f00=0x0060, f01=0x0190, f02=» J F IDENT DCTSK REL2.1 DK 800317 870150540210 ! DCTSK ! R DCTSK ! b I:EVA0 ! t , ( @ & C ( ( ! , ( B _ C ! $ 0 ? C C ( : T v !
0x0355c4…035758 Dummy {f00=0x0060, f01=0x4020, f02=»P ! v " @ " REL2.1 DK 800317 870150540210 ! DCTSK ! R DCTSK ! b I:EVA0 ! t , ( @ & C ( ( ! , ( B _ C ! $ 0 ? C C ( : T v !
0x035758…0358ec Dummy {f00=0x0060, f01=0x0190, f02=» J F IDENT EBCDIC 9.2DK 2 79-11-16 870105040920 TASCIIK TEBCDI R TASCIIK l , ( , ( ! , ( A ABCDEFGHI#.<(+!&JKLMNOPQR$]*);^
0x0358ec…035a80 Dummy {f00=0x0060, f01=0x416e, f02=»89:#@'=" p , ( ABCDEFGHI[.<(+!&JKLMNOPQR]$*);^ TEBCDI @ , ( /STUVWXYZ|,%_>?0123456789:#@'= T , ( 7- <=2&p ?' , ( ! @O JZlP}M] Nk`Ka z^L~no , ( A j {
0x035a80…035c14 (0, 68) Dummy {f00=0x0061, f01=0x412e, f02=» H F IDENT RKIO R]KONVERTERING 9.2 790129 EV RKIOY P RKIOY ` T:FDSP r I:EVA0 * & H & T:IO3 , ( & C & C
0x035c14…035da8 Dummy {f00=0x0061, f01=0x0190, f02=» : H IDENT RGMAIN TRA 4.2 81-05-06 F1 O1111 03.01.XXX.1 C INITRG TRPAGE C B $$$TRAM C INITRG TRPAGE C C n D @ hADM BELLIhCYK DIVTR ENTER FMSTYR FRMTSP0 KORTX KVIT LSTINT C @ < MODPR PACKCLP SETDEB SETKRE SPCA SPCLRA SPCLR
0x035da8…035f3c Dummy {f00=0x0061, f01=0x0190, f02=» # C + D - D 3 D 0 J F " D A @ L R RH RA W @ A L@ I L R@ W RI @ @ @ @ @ D @ O D V " D [ D i & D s D } D J F " D @ @ @ @ @ @ RW
0x035f3c…0360d0 Dummy {f00=0x0061, f01=0x0190, f02=» D $ E . E . E , E < J F " D 6 <MW R_n R @ R_BK R( @ R R R_U$ 0X 0X A E L E . E E E E J F " D R R_nI 0X L@ @ _ K
0x0360d0…036264 Dummy {f00=0x0061, f01=0x0190, f02=» E 3 F 9 * F ? F ( J F " D W @ 4 I /C P R R R 4 C P R R R 4 4 RT W RT W R F 8 G F Q F [ F j F s F y F , F J F " D @ 4 R T
0x036264…0363f8 Dummy {f00=0x0061, f01=0x0190, f02=» G G G $ G 4 G D G T G d G t G J F " D RTsWy R 4 2 RRRRRRRRR R TLWR R TEWK R T>WD RT8 G C G G J F " D
0x0363f8…03658c Dummy {f00=0x0061, f01=0x4088, f02=» RT 6 4 4 4 0X 4 G p @ ; 9 @ 4 A @ @ 6 4 A 4 A 4 H . u H r@ H G J F " D RTsWy R 4 2 RRRRRRRRR R TLWR R TEWK R T>WD RT8 G C G G J F " D
0x03658c…036720 Dummy {f00=0x0061, f01=0x40a0, f02=» : H IDENT RGMND TRA 4.2 81-05-06 F1 O1111 03.01.XXX.1 INITRG B $$$TRAM T INITRG f 4 z NI @
0x036720…0368b4 (0, 69) Dummy {f00=0x0061, f01=0x0190, f02=» : H IDENT RGSTRT TRA 4.2 81-05-13 F1 O1111 03.01.XXX.1 < 8 CNFWRT CONFWR CONRDX SETFLG T1GO TCONFR TCONFW B $$$TRAS @ < CNFWRT z CONFWRC ' CONRDXT SETFLG T1GO TCONFR TCONFWS B > hADM ASGVOLC CLBEH CLEAR8D
0x0368b4…036a48 Dummy {f00=0x0061, f01=0x0190, f02=»MK SKIFT SOPRD SPCLRAK SPCLRNO SPLIN8A z D @ STRTWRS T:ATTFA T:DSC0R T:GETIR T:PAUSR T:RSTRR T:USE UPDAKK . WRITIDG ZEROD v : @ # 2 ' < ) ' , G .
0x036a48…036bdc Dummy {f00=0x0061, f01=0x0190, f02=»$A 0X P D 6 E G . . Z > p N y ` | r ~0 J F " D @ A 1XF R 6 _/ R 4@)6 o _D 1L # L` R L1
0x036bdc…036d70 Dummy {f00=0x0061, f01=0x0190, f02=» . $ @ 0 P b t J F " D Y_ A)WR@) RL RL RL RL R6 + _ RL RL L R L 1L , R_3 R
0x036d70…036f04 Dummy {f00=0x0061, f01=0x0190, f02=» 0 0 0 0 8 B 6 R b 0 r J F " D L RL R LRcL ? R_F RL R W R )|L |L eI) -}LYA&A 0X 1XF R6 $ 8 * @ / 6 0
0x036f04…037098 Dummy {f00=0x0061, f01=0x0190, f02=» B @ G ' I * ]0 0 b0 B d @ T i d n @ t s * u @ ~ J F " D @+0X R<R qr s " r -g L g L0X R X 0X ?R0X g R
0x037098…03722c Dummy {f00=0x0061, f01=0x0190, f02=» * * $ 4 * D T * d & t ( J F " D R R 0X A 1XF R6 _ ?R L D D R <R R <R R <R R <RI R R 0
0x03722c…0373c0 Dummy {f00=0x0061, f01=0x0190, f02=» J F " D t XL L R La t T |! L R L Lb a I " | 3I 0X A 1X . l 0 X | 4 ! * # D ) 8 / 6 0 2 . ?0 X
0x0373c0…037554 (0, 70) Dummy {f00=0x0061, f01=0x018e, f02=» U0 `0 e SLUTD $ t L : J F " D @ t @' t R t L R La tT I' LP L h a P Lb a L 0 @ > < " 0 @ 0 0
0x037554…0376e8 Dummy {f00=0x0061, f01=0x0190, f02=» B 0 0 & 0 8 J ' Z F j D z 6 . J F " D X R R@ ,Xn A R@ W + L L L X R R RK W: R A 1XF
0x0376e8…03787c Dummy {f00=0x0061, f01=0x018e, f02=»$ R?R g I"R_ 0X? 0X_ R R h K < & N 8 H m0 < X { > j J F " D @ E # L R o R o _% XLA" " r 0X? _ z 8 0 SUBT
0x03787c…037a10 Dummy {f00=0x0061, f01=0x0190, f02=» * 0 : J F " D (L0X + L s A L R R R R L@ A R ?R g L?R L R L L TL 0 L
0x037a10…037ba4 Dummy {f00=0x0061, f01=0x0190, f02=» , > !0 N + ` -0 p 3 50 ; =0 J F " D T R7 T R8 T R9 T RB 4 L R L 4 nX R L1 TF R L2 T> R
0x037ba4…037d38 Dummy {f00=0x0061, f01=0x018e, f02=»0 c e0 k . m0 > s P u0 ` J F " D @T6 R L4 T. R L5 T& R L6 T R L7 T R L8 T R L9 T R LB 4 I r @ 0 R @
0x037d38…037ecc Dummy {f00=0x0061, f01=0x0190, f02=» J F " D " r 0X L R _ 0X R4 / R R R R R R R R 4 @ R b & r & B " ( - & & START & & VO
0x037ecc…038060 Dummy {f00=0x0061, f01=0x0190, f02=» & & z KOMMUNE NR $ 2 & A B ZZZZ T " } h & x VOL 2 VOL 3 VOL 4X $ & & A & & A &
0x038060…0381f4 (0, 71) Dummy {f00=0x0061, f01=0x0190, f02=»MASKIN NRL $ & A " 999E 4 " g H & X BEHOLDNINGST[LLERE f $ & g 99 " & EJ-EDB T[LLER $
0x0381f4…038388 Dummy {f00=0x0061, f01=0x0190, f02=»ZZ9= " ( ( & 8 VOLUME NR F $ ` 99999= p " | & DAGS-DATO $ & 99E-99E-99 " ~
0x038388…03851c Dummy {f00=0x0061, f01=0x0190, f02=» & VOLUME NR $ ( & OK 8 & ? H & V $ K d ( t & OPSTART $ K & ? & $ K (
0x03851c…0386b0 Dummy {f00=0x0061, f01=0x4030, f02=» W W 4 | @ , ( & OK 8 & ? H & V $ K d ( t & OPSTART $ K & ? & $ K (
0x0386b0…038844 Dummy {f00=0x0061, f01=0x0190, f02=» : H IDENT DKSUBS TRA 4.2 81-05-06 F1 O1111 03.01.XXX.1 D @ BACKUP GETBIT KFREAD KFWRIT RADEL RAREAD RAWRIT RGREAD B RSTORES SQWRITA WAITF $$$TRA @ < BACKUPS GETBITW Y KFREAD- KFWRIT1 RADEL RAREAD 6 2 RAWRI
0x038844…0389d8 Dummy {f00=0x0061, f01=0x0190, f02=» T:DSC1T T:READS T:RREA T:RWRIv T:WRITR ~ T:XSTAL WRITJTM 0 0 L J % l | & Y *0 L .0 L 8 DISCFEJL ? J F " D L0X Q P R I
0x0389d8…038b6c Dummy {f00=0x0061, f01=0x0190, f02=»0 t0 w0 J F " D @A A H RL@ &W 4 0X L 0R T L L L 4 0 ~ % J F " D " I 0X 0X Q P R 4 4 I 0X
0x038b6c…038d00 Dummy {f00=0x0061, f01=0x0190, f02=» D R L 4 4 0X P Q R I 0X 4 I 0X Q P R 0 L L < y ^ J F " D 4 L6 -JWs W= LW# p V y ^ c v l n
0x038d00…038e94 (0, 72) Dummy {f00=0x0062, f01=0x0190, f02=» @X 4 6 -JWh W= y D V v h { x 0 J F " D LW# L W L RXjK R LK T @X 4 @X
0x038e94…039028 Dummy {f00=0x0062, f01=0x0190, f02=» P0 V { ` * b0 : i L j q n J F " D @R P ! L/W ! L I R T _. R L X5W2 RLA'I R _E D_ I' I ~
0x039028…0391bc Dummy {f00=0x0062, f01=0x0190, f02=»LI 0X W 0X 0X 0X @'@ 4 @'A n , < L 0 l ~ J F " D R T I R T W 0X R L " J I R 0 R 0
0x0391bc…039350 Dummy {f00=0x0062, f01=0x0190, f02=»T R X2) L W A' RL R ! L I' W v E 4 K D X T Y d ^ v d q v }0 J F " D @ I 0X W 0X @'@ 4 RLI 0X W 0X @'@ 4 R I" t@
0x039350…0394e4 Dummy {f00=0x0062, f01=0x0190, f02=» &01X 0 J F " D 6 R(W R p L R a <R L8R Db a ! L _= Lb Y n 6 ~ 6 0 b 0 0 @ k 0 I
0x0394e4…039678 Dummy {f00=0x0062, f01=0x0190, f02=» k &a J F " D N N L8R_ WC%<R L ha W ha T Q 90 j U 0 | J F " D @ b a - L^ Lb a P ] P ( K"i -b 0
0x039678…03980c Dummy {f00=0x0062, f01=0x0190, f02=» ! & J F " D %D L_ 3 RR_ L ha T A%_ L ha T^fa 8 0 D ) - J F " D a p I" t L L p R a pT<fa
0x03980c…0399a0 Dummy {f00=0x0062, f01=0x4062, f02=» ?RI" ?R@ @ 4 @ A 4 @ A @ 4 H 0X _ A ~ 4 < @ L@ ^ T A%_ L ha T^fa 8 0 D ) - J F " D a p I" t L L p R a pT<fa
0x0399a0…039b34 (0, 73) Dummy {f00=0x0062, f01=0x0190, f02=» : H IDENT SCREEN TRA 4.2 81-05-21 F1 O1111 03.01.XXX.1 B > BELL CLEAR8 DKTEST KBTEST SCREEN SPCA SPCLRA SPCLRN B 2 . SPCLRSR SPCNT SPERR SPINF1- SPINF81 SPLIN8. $$$TRAC > : BELLR t CLEAR8S H DKTESTF Z KBTEST1 z SCREEN1 - SPCA
0x039b34…039cc8 Dummy {f00=0x0062, f01=0x0190, f02=»L SPCHK1% SPCHK2 SPCHK3S SPCHK4 r > : SPCHK5t SPCHK6N SPCHK7S SPTCHKT T:DELAS T:DISP- T:DSC1 * > : T:DUPLE T:DYKIR T:EDFLS T:EDWRS T:ERASS T:GETAS T:GETCS l D @ T:GETFt T:NKI T:PRINK T:SETCH T:TBWDL T:TDOWS T:TESTC T:TFWD D @ T:THOME T:TLDOR
0x039cc8…039e5c Dummy {f00=0x0062, f01=0x018e, f02=»& S 0 & " J & " t * % # , ( &
0x039e5c…039ff0 Dummy {f00=0x0062, f01=0x0190, f02=» " " " " . " < " J " X " f " t " " " " " " " " " "
0x039ff0…03a184 Dummy {f00=0x0062, f01=0x0190, f02=» " " " & " 4 " B " ! P " # ^ " % l " & z ( & FEJL $ ZZ9 " (
0x03a184…03a318 Dummy {f00=0x0062, f01=0x0190, f02=» & SKIFT JOURNAL $ 0 ( @ L & LINIE NR j $ & . ( & . & NY SIDE. ( &
0x03a318…03a4ac Dummy {f00=0x0062, f01=0x0190, f02=»& BILAG. $ Y " ( 2 > & N KONTOKORT, $ Y v ( & & ( & DISKETTE SKIFT
0x03a4ac…03a640 Dummy {f00=0x0062, f01=0x018e, f02=» & " TTTTTTTTTTTT9- " " Y , ( < # H & " X $ OPRET LEV. f $ $Y ( % & ( & & ' STRAKS-CHECK $ 'Y
0x03a640…03a7d4 (0, 74) Dummy {f00=0x0062, f01=0x018e, f02=» ! - " & ) - 8 * H 6 Z J F " D RL4 RL4 RL4 RL4 RL4 RL4 @ 8RI 6 L j A ( F > J ( W ( ^ (
0x03a7d4…03a968 Dummy {f00=0x0062, f01=0x018e, f02=» H * ( . 8 H 4 X F h , x J F " D W 0X W 0X :R0X P :R _ 0X 0X P 0X + P Rq "
0x03a968…03aafc Dummy {f00=0x0062, f01=0x0190, f02=» J F " D WlWj6 0X KK W 0X KK W 0X KK W 0X KK W :R@ P Q0 1 Z f J F " D 6 W A _NA _RA _VA _Z@ _^@ _b@ _f@ _j R H H 6 v J t P Q a R `
0x03aafc…03ac90 Dummy {f00=0x0062, f01=0x018e, f02=» ` ] ` ^ I $ _ g 4 e , D o T p d q t r s t u y | z { J F " D @ H W I R_ 2
0x03ac90…03ae24 Dummy {f00=0x0062, f01=0x0190, f02=» J $ 4 F J F " D W 0X ( _ 0X FI{ RW R2 RRRW50X A H L R( V
0x03ae24…03afb8 Dummy {f00=0x0062, f01=0x018e, f02=» | J $ < 4 6 D > T @ d B t D J F " D 2 RRRRRRRRRRRRRRRRR 4 90X _;0XW 0XW 0XW 0XW 0XW 0XW 8 H
0x03afb8…03b14c Dummy {f00=0x0062, f01=0x018e, f02=» 9 = & ? ) & J F " D 0XW 0X8R:R;R R 8R7 GG;GG;7;;;7;7?R I I W 1X F1X& LW 1X F 6 A 2 D H M Y a ` h , p t
0x03b14c…03b2e0 Dummy {f00=0x0062, f01=0x0190, f02=» H . F ( . 8 Z H X @ h N z J F " D 0X S 0X P 0R Q 4 0X R<R !G | L0X ( & ) t
0x03b2e0…03b474 (0, 75) Dummy {f00=0x0062, f01=0x0190, f02=» J F " D 1X FW R L0X I{ 1X F H 0X 6 0X K W 0X K W 0 X h 0 x Z ! " ) # ) $ % )
0x03b474…03b608 Dummy {f00=0x0062, f01=0x0190, f02=»2 RRRRRR_D R- L L0X 0 l G O * H ^ : I J ] Z b * j e z q u & w ( ( & & ( ) & 1
0x03b608…03b79c Dummy {f00=0x0062, f01=0x0190, f02=» L , & < L & l J F " D P 0R W 0X ( W 4 L0X $ 1X F W{1X F B n | 0 0
0x03b79c…03b930 Dummy {f00=0x0062, f01=0x0190, f02=» H J F " D 6 0X K W 0X K W 0X K W 0X K W 0 R2 RRR_: R4 0 X h 0 x 0 $ 0 ' - Z 2 4
0x03b930…03bac4 Dummy {f00=0x0062, f01=0x4100, f02=» L T e * g < l & L n q l w H | J F " D @4 R 4 L0X 0X 4 HZ I H+ L0X 1X F 0X KZ R 4 4 @ @
0x03bac4…03bc58 Dummy {f00=0x0062, f01=0x0190, f02=» : H IDENT RGFRMT TRA 4.2 81-05-06 F1 O1111 03.01.XXX.1 FMSTYR FRMTSP FRMXSP B $$$TRAF d $ FMSTYR FRMTSPF FRMXSP v T:ATTFF
0x03bc58…03bdec Dummy {f00=0x0062, f01=0x018e, f02=» " + " 0 " 3 " 9 * " = 8 " C F " J T " O b " U p " V ~ " X " Y " " " " " " "
0x03bdec…03bf80 Dummy {f00=0x0062, f01=0x018e, f02=» " " " $ " 2 " @ " N " " j ( x 4 & & HOVEDBOG $ $ h & REGKONTONR
0x03bf80…03c114 (0, 76) Dummy {f00=0x0063, f01=0x0190, f02=» & & P XXXXXXXXE-XX & " B & Q R XXXXXXE-XXXX f " & R XXXXXXE-XXXX " ( B & &
0x03c114…03c2a8 Dummy {f00=0x0063, f01=0x0190, f02=» & NR & BET-ART ( $ R @ & P & S ^ XXXXXXE-XXXX r " & T & XX & X & XX ( 8 &
0x03c2a8…03c43c Dummy {f00=0x0063, f01=0x0190, f02=» & LEVERAND $ X * & NR : & J YDELSESMODTG X $ R t & & U XXXXXXXXE-XX " & V XXXXXXE-XXXX "
0x03c43c…03c5d0 Dummy {f00=0x0063, f01=0x0190, f02=» & 99 " * NORMALPOSTX : $ V & M/P-NR f $ hM | & REGKONTONR $ M & CPR/CIR/NR $ M &
0x03c5d0…03c764 Dummy {f00=0x0063, f01=0x0190, f02=»& & & $ oM ( & 8 $ uM F & V & BKOP d & v $ nK & & BFOP & $ tF $ wF $ {F $ iF (
0x03c764…03c8f8 Dummy {f00=0x0063, f01=0x0190, f02=»hF & " REGKONTONR $ "F 2 & B $ pF P & ` & F n & ~ # HOVEDBOG $ #F $ hF & & & $ oF &
0x03c8f8…03ca8c Dummy {f00=0x0063, f01=0x0190, f02=» " % F & & DEBITORG " $ &F : & INDB J $ hN & l & z ' CPR/CIR/NR $ 'N & ( BET-ART/ $ (N & $ rN
0x03ca8c…03cc20 Dummy {f00=0x0063, f01=0x0190, f02=» $ hP & & " & 0 $ oP > & N & ]R & l $ nR z & $ uR $ |R $ yR & & RTE/GEB & * DEB
0x03cc20…03cdb4 (0, 77) Dummy {f00=0x0063, f01=0x0190, f02=» + d & & *F & , 99 6 " , F H & SD-INCASSO X $ hS r & & - CPR/CIR/NR $ -S & . BET-ART/ $ .S &
0x03cdb4…03cf48 Dummy {f00=0x0063, f01=0x0190, f02=» & POST. $ hP & ( & 6 & D $ oP R & b $ uP p & & F]R RE] REM OPK & $ n] & $ ~] $ y] $ i]
0x03cf48…03d0dc Dummy {f00=0x0063, f01=0x0190, f02=» 2 REGKONTONR $ 2S & & $ pS 4 & D $ oS R & b $ uS p & & $ iS ( 3 _ & & 'S 4 99 " 4 S
0x03d0dc…03d270 Dummy {f00=0x0063, f01=0x0190, f02=»VERAND $ 6P & 7 YDELSESMODTP , $ 7P H & X $ pP f $ rP v $ P & & P & 8 HOVEDBOG $ 8P $ hP &
0x03d270…03d404 Dummy {f00=0x0063, f01=0x0190, f02=» & & BFOS & & MTBS . & @ $ tT N $ wT ^ $ {T n $ T ~ $ iT ( 9 & : 99 " : T ; PRIMO $ ;T
0x03d404…03d598 Dummy {f00=0x0063, f01=0x018e, f02=» $ oA & $ uA & & 6 & D $ iA R ( b = _ n & ~ & A > 99 " > A ? REMITTERING $ ?A $ hA &
0x03d598…03d72c Dummy {f00=0x0063, f01=0x0190, f02=» & & A & & B REMITTERING 4 $ BA P $ hA ` & p & ~ & $ oA & & FAKTNR & & FAKTDATO & $ uA
0x03d72c…03d8c0 Dummy {f00=0x0063, f01=0x018e, f02=»$ X $ X $ yX $ iX . ( > C m J & Z & !X h D 99 x " D X E REMITTERING $ EX & BRILLE $ hR & F REGKONTO
0x03d8c0…03da54 (0, 78) Dummy {f00=0x0063, f01=0x0190, f02=» & $ pR $ rR " $ R 2 & B & R P & ` I REMITTERING n $ IR $ hR & & & $ oR & & FAKTNR
0x03da54…03dbe8 Dummy {f00=0x0063, f01=0x0190, f02=»TXTK & $ nX & * $ X 8 $ X H $ yX X $ iX h ( x J 4 & K 99 " K X & POST T/GL. ]R $ hP & L RE
0x03dbe8…03dd7c Dummy {f00=0x0063, f01=0x018e, f02=» MP & $ uP & * N XXXXXXE-XXXX > " N Z & N j & N x $ i ( O g & P 99 " P & DIVERSE &
0x03dd7c…03df10 Dummy {f00=0x0063, f01=0x0190, f02=» R XXXB " R & N ( S XXXXXXXXE-XX : " S V & O f T XXXXXXXXE-XX x " T & T $ o & & DIVERSE & $ uD &
0x03df10…03e0a4 Dummy {f00=0x0063, f01=0x0190, f02=» $ fX & $ uX & $ X 6 $ gX F ( V V b $ `X r & W YDELSESMODTR $ WX $ eX $ X $ fX & $ uX
0x03e0a4…03e238 Dummy {f00=0x0063, f01=0x0190, f02=» & $ uX $ X " $ yX 2 $ gX B ( R Y ^ $ [X n & ~ Z YDELSESMODTR $ ZX $ eX $ X $ fX & $ nX
0x03e238…03e3cc Dummy {f00=0x0063, f01=0x0190, f02=» " X ] REMITTERING $ ]X , & BUNDT < $ hB P & ` ^ REGKONTONR n $ ^B & _ LEVERAND $ _B ( ` & a 99
0x03e3cc…03e560 Dummy {f00=0x0063, f01=0x0190, f02=» $ cS & d LEVERAND " $ dS : ( J e V & f $ pS t $ rS ( f & $ oS & & TXTR ( g .
0x03e560…03e6f4 (0, 79) Dummy {f00=0x0063, f01=0x018e, f02=» & 2 & 2 $ A $ $ A 4 $ A D $ A T $ iA d ( t h & & ( i & & A & j ****9X
0x03e6f4…03e888 Dummy {f00=0x0063, f01=0x018e, f02=» ( l & & y . m B @ " m R ( b n n & VAL RK ~ ( o & BEL BK ( p & q XXXXXXXXE-XX
0x03e888…03ea1c Dummy {f00=0x0063, f01=0x0190, f02=» & & XX ( . u : & J v TTTTTTTVTTX,XX- ^ " v ~ ( w & x XXVXXVXX " x ( y &
0x03ea1c…03ebb0 Dummy {f00=0x0063, f01=0x0190, f02=» | & & X ( 2 } > & @ N & X b ( t ~ 7 & & XX & & XX & & XX &
0x03ebb0…03ed44 Dummy {f00=0x0063, f01=0x0190, f02=» & & XX $ ( 6 & B & 2 X R & b TTTTTTTX v " & & TTTTTTTTTX " & XX
0x03ed44…03eed8 Dummy {f00=0x0063, f01=0x0190, f02=»& & TTTTTTTTTX " : ( J V & f TTTX z " ( & ! & XX ! ( & % #
0x03eed8…03f06c Dummy {f00=0x0063, f01=0x0190, f02=» & . " & X " ! ( ! & ! 2 & 0 ! B TTX ! V " ! j ( ! z ! & s ! TTTX ! " ! ( ! ! & t ! TT
0x03f06c…03f200 Dummy {f00=0x0063, f01=0x0190, f02=» ! & v # " XXXXXX " " " # " 8 ( " H " T & w $ " d XXXXXX " x " $ " ( " " & " $ $ " & " $ $ " $ i$ "
0x03f200…03f394 (0, 80) Dummy {f00=0x0064, f01=0x0190, f02=»$ iT " ( # + # & # * & # 8 & # F & BKO # T & # f & OMR # t & # & A-ADR # & # & BFOD # & # $ tF # $ F # $ F #
0x03f394…03f528 Dummy {f00=0x0064, f01=0x018e, f02=» # & $ ( $ $ $ & $ 4 ( $ B $ N & $ ^ ( $ l G $ x & $ & UDB.OPL.1-5 $ & $ & 1 $ & Z@ $ & $ & $ & 2 $
0x03f528…03f6bc Dummy {f00=0x0064, f01=0x0190, f02=» & % & % & 5 % & ^@ % . & % @ $ l@ % N ( % ^ % j $ @ % z ( % % & % & FEJL FORMAT % ( % C % & % & %
0x03f6bc…03f850 Dummy {f00=0x0064, f01=0x018e, f02=» E % & & & KONTROLSUM & & & 2 & LINIEO & @ & & T & I & b & I & r XXXXXXXXE-XX & " & & I & TTTTTTTVTTX,XX- & " & & I & &
0x03f850…03f9e4 Dummy {f00=0x0064, f01=0x0190, f02=» & & 9X ' & ' & GL. SALDOM ' & & ' > LINIE NR ' L $ L ' d & CHECKD ' t & ' & p ' TTTTTTTVTTX,XX- ' " ' & ' & XX ' &
0x03f9e4…03fb78 Dummy {f00=0x0064, f01=0x018e, f02=»E NR ' $ ( & ( & ( * & XX ( < $ lX ( N ( ( ^ ( j & ( z & ( & ( & ( & ( & ( & ( & FAST ( LINIE NR (
0x03fb78…03fd0c Dummy {f00=0x0064, f01=0x400c, f02=» ( @ ) $ ( & ( & ( * & XX ( < $ lX ( N ( ( ^ ( j & ( z & ( & ( & ( & ( & ( & ( & FAST ( LINIE NR (
0x03fd0c…03fea0 Dummy {f00=0x0064, f01=0x018e, f02=» : H IDENT DIVFMT TRA 4.2 81-05-06 F1 O1111 03.01.XXX.1 > : FRMTGP FRMTJT FRMTKT FRMTKV FRMTTA FRMTVO FRMXGP B & " FRMXJTV FRMXKTA FRMXTA1 FRMXVOF $$$TRA B > FRMTGPV ? FRMTJTF FRMTKTM 1 FRMTKV1 * FRMTTAX FRMTVO 8 4
0x03fea0…040034 (0, 81) Dummy {f00=0x0064, f01=0x0190, f02=» > $ ? 4 D y T $ d & t + - " 2 4 $ 9 ; 8 @ B I J F " D
0x040034…0401c8 Dummy {f00=0x0064, f01=0x0190, f02=» " " " " * " 8 " F " T " b " p " ~ " " " " ( $ $ &
0x0401c8…04035c Dummy {f00=0x0064, f01=0x0190, f02=» $ + & & " X 0 " B & R $ ' ` $ 5 p & ( $ ( ( $ & & $
0x04035c…0404f0 Dummy {f00=0x0064, f01=0x0190, f02=» " BBZ " ( $ 5 8 & H XX V " h & x ZZZ " & ( $ ( % $
0x0404f0…040684 Dummy {f00=0x0064, f01=0x0190, f02=» ZZ.ZZ.ZZ " & 0 $ 5 > BBBZZ N " d BBZZ t " BZZ " BBZB " ( $
0x040684…040818 Dummy {f00=0x0064, f01=0x018e, f02=» $ ( , $ < $ % L B999 " p & & $ + & & BZZZZZZZZZZ " & (
0x040818…0409ac Dummy {f00=0x0064, f01=0x0190, f02=» 99B " $ ( ( 8 D $ % T $ ' d $ + t ( & & ZZ " BZZ.ZZ.ZZZ "
0x0409ac…040b40 Dummy {f00=0x0064, f01=0x0190, f02=» $ BXX " $ ( % , & B999E-99E-999E-99B < " & ^ ( n ' z & ( XE-XXE-XXE-XXB " ( & & ) XXXXXXE-XXXX " )
0x040b40…040cd4 (0, 82) Dummy {f00=0x0064, f01=0x0190, f02=» , & ( - & . XXXXXXXXE-XX 6 " . R ( b / n & ~ 0 XXX " 0 1 BXXXXXXXXXXX " 1 2 BXXXXXXXXXXX " 2
0x040cd4…040e68 Dummy {f00=0x0064, f01=0x0190, f02=»ZZ x " 6 ( 7 & & 6 8 ZZ.ZZ.ZZ D " 8 9 BZZZZZZZZZZZ l " 9 : BZZZZZZZZZZZ " : ; BZZZZ " ; < BZZ " < !
0x040e68…040ffc Dummy {f00=0x0064, f01=0x018e, f02=» * @ " A " C " G , " I : " K H " Z V " ` d " w r " e " g " i " " k " q " " t ( A
0x040ffc…041190 Dummy {f00=0x0064, f01=0x0190, f02=» D $ " & ( E KONTOKORTZ 6 $ E" P & " ` F B*.***.***.**9.99- p " F " ( G & H START SUM* $ H" ( I
0x041190…041324 Dummy {f00=0x0064, f01=0x0190, f02=»& & * & * & ( & VERSNR 6 M DAGS-DATO J $ ME d & t N POST-DATO $ NE & O MASKIN NR $ OE P EKS.LBNR $ PE
0x041324…0414b8 Dummy {f00=0x0064, f01=0x0190, f02=» R~E & S 99E-99E-99 " S E 4 & D T 999R R " T E f & v U ***99 " U E & & & 6 2 0 V *VERSURKONTONR KASSEKONTONR PRIMO KASSE
0x0414b8…04164c Dummy {f00=0x0064, f01=0x0190, f02=»" X E Y ZZZ.ZZZ.ZZ9.ZZ-B " Y E . & Y > & L & * Z ( h Z t $ [E ( [ & & * & * & KASSELUKNING $
0x04164c…0417e0 Dummy {f00=0x0064, f01=0x0190, f02=» & _ KREDIT $ _E , ( < ` H $ aE X ( h a t & b ZZ " b E " c BBZZZ.ZZZ.ZZZ.ZZ9.99-O " c S " d BBZZZ.ZZZ.ZZZ.ZZ9.99
0x0417e0…041974 (0, 83) Dummy {f00=0x0064, f01=0x0190, f02=» SLUT TESTT $ h ( $ i 0 & @ j DISKETTE SKIFT N $ j l ( | k & $ l ( l $ % m BZZZ " m
0x041974…041b08 Dummy {f00=0x0064, f01=0x0190, f02=»( q & p r 99BR ( " r < & L s 99 Z " s l ( | t & u ****9 " uE v CHECK $ v ( w
0x041b08…041c9c Dummy {f00=0x0064, f01=0x018e, f02=» " " " " * " z 8 " F " T " b " p " ~ " z " z " z " z " " " " "
0x041c9c…041e30 Dummy {f00=0x0064, f01=0x0190, f02=» $ {I ( { $ $ I 4 & I D & T | B**B b " | v } ZZ.ZZ.ZZBM " } & ~ B**B " ~ $ ' $ (
0x041e30…041fc4 Dummy {f00=0x0064, f01=0x0190, f02=» & * & & * " $ 0 ( @ L $ ( l x $ BBB**B " & ZZZZZZZZZZB* " &
0x041fc4…042158 Dummy {f00=0x0064, f01=0x0190, f02=» $ ( $ , ( < H & + X & f & t 999B " $ B99.99.999 " & 99 "
0x042158…0422ec Dummy {f00=0x0064, f01=0x018e, f02=»( $ $ * $ : ( J V $ f $ v $ ( ( ( (
0x0422ec…042480 Dummy {f00=0x0064, f01=0x0190, f02=» ( ( , ( < H ( X d ( t & + & & 999B " $ B99.99.99Z
0x042480…042614 (0, 84) Dummy {f00=0x0065, f01=0x018e, f02=» *.***.***.**9.99- " & & 6 & D ( R ^ & n & | 99.99.99B. " & Y B999B " 99BS "
0x042614…0427a8 Dummy {f00=0x0065, f01=0x018e, f02=» B99B " ( & 8 & H & V ZZ.ZZ.ZZB* d " ~ ( & $ ' B*.***.***.**9.99- " &
0x0427a8…04293c Dummy {f00=0x0065, f01=0x0190, f02=» B99.99.99* " BXX. . " B ( R ^ XX n " E-9999999999B9 " XX.XXPPO " BXBS "
0x04293c…042ad0 Dummy {f00=0x0065, f01=0x018e, f02=»E-9999999999B9 " XX.XXPPO & " > & N ( h *.***.***.**9.99-- x " & & ( & ****9
0x042ad0…042c64 Dummy {f00=0x0065, f01=0x0190, f02=» " " " " . " < " J " X " f " t " " " " " " " " " (
0x042c64…042df8 Dummy {f00=0x0065, f01=0x0190, f02=» 5 & & *.***.***.**9.99+- ( " J & Z ( h t $ $ ( & + $ ( $
0x042df8…042f8c Dummy {f00=0x0065, f01=0x0190, f02=»& & 0 & 0 & 0 ( & 0 6 $ # D ( T ` $ p ( & + 999B " B99.99.99B " ****9
0x042f8c…043120 Dummy {f00=0x0065, f01=0x0190, f02=»*.***.**9,99+- " & & ( 4 @ $ P ( ` < l & + | & 999S " BB99.99.99 " BBZ999 " }
0x043120…0432b4 (0, 85) Dummy {f00=0x0065, f01=0x0190, f02=» & 2 ! & * ! & * ! & & * ! 4 & 4 ! B KONTONRO ! P $ - ! h & ! x T[LLER ! $ - ! & ! & NETTOS ! & ! DEBET ! $ E ! &
0x0432b4…043448 Dummy {f00=0x0065, f01=0x0190, f02=» BXXX.XX.XXX.XXB9 ! " " & " , 99 " : " " L " BBZZZ.ZZZ.ZZZ.ZZ9.99- " " " " BBZZZ.ZZZ.ZZZ.ZZ9.99- " " o T " " BBZZZ.ZZZ.ZZZ.ZZ9.99- " " o T " ( "
0x043448…0435dc Dummy {f00=0x0065, f01=0x0190, f02=»ZZ9.99- " z " # " BBZZZ.ZZZ.ZZZ.ZZ9.99- # " T # F " BBZZZ.ZZZ.ZZZ.ZZ9.99- # X " T # ~ ( # # $ # ( # 9 # & 4 # & TOTALS # " BBZZZ.
0x0435dc…043770 Dummy {f00=0x0065, f01=0x0190, f02=» # & $ & 4 $ & SUPL $ ( " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ : " $ ` " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ p " L $ " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ " L $ & $ & 2 $ & KORL $
0x043770…043904 Dummy {f00=0x0065, f01=0x0190, f02=» $ % $ % ( % ( 4 % 4 & 4 % D 999E-99E-999E-99 % R " % r & % & PRIMO % " BBZZZ.ZZZ.ZZZ.ZZ9.99- % " P % & % & % & 2 % &
0x043904…043a98 Dummy {f00=0x0065, f01=0x0190, f02=»ZZZ.ZZZ.ZZ9.99- % " & & & ( & 2 & 6 & ULTIMO & D " BBZZZ.ZZZ.ZZZ.ZZ9.99- & X " L & ~ & & ( & & $ L & ( & * & & & & &
0x043a98…043c2c Dummy {f00=0x0065, f01=0x0190, f02=»& & & ' & ' & ' ( & 2 ' 6 & * ' D & * ' R & 4 ' ` T[LLER ' n $ L ' & ' KONTONRI ' $ L ' & ' BEV.PERIODET ' $ L ' &
0x043c2c…043dc0 Dummy {f00=0x0065, f01=0x018e, f02=»& 2 ' ZZ ( " L ( & ( . BXXX.XX.XXX.XXBE ( < " i I ( " BBZZZ.ZZZ.ZZZ.ZZ9.99- ( n " i I ( " BBZZZ.ZZZ.ZZZ.ZZ9.99- ( " i I ( ( ( ( & 2 (
0x043dc0…043f54 (0, 86) Dummy {f00=0x0065, f01=0x0190, f02=» ( & < ) & ] ) & N ) $ & N ) 2 & N ) @ & E ) N & S ) & S ) j & S ) x & [ ) & ) ( ) ) $ ) ( ) ) & + ) 99E-99E-
0x043f54…0440e8 Dummy {f00=0x0065, f01=0x018e, f02=»& ) ZZ999999 * " * $ & * 4 ( * B * N $ * ^ ( * n * z & 2 * & * " BBZZZ.ZZZ.ZZZ.ZZ9.99- * " * " BBZZZ.ZZZ.ZZZ.ZZ9.99- * "
0x0440e8…04427c Dummy {f00=0x0065, f01=0x0190, f02=» * & 2 + & + TOTAL + & $ + < & + L & + Z & 2 + h XXXE-XXXXXE-XX + v " + & + XX + " + & + " BBZZZ.ZZZ.ZZZ.ZZ9,99- +
0x04427c…044410 Dummy {f00=0x0065, f01=0x0190, f02=»ZZ9,99- + z " ! , ( , * " , , " z , < " , J " # , X " # , f " , t " z , " , " , " , " , " , " z , " z , " z , " z ,
0x044410…0445a4 Dummy {f00=0x0065, f01=0x018e, f02=» " ) , " - - " % - " & - * " % - 8 " & - F " & - T " ' - b " ( - p " & - ~ " & - " & - " & - ( - % - ( - & - $ z - $ 3 -
0x0445a4…044738 Dummy {f00=0x0065, f01=0x0190, f02=» ) . $ * . ( . $ * . 0 $ . @ $ . P & . ` + XX.XXPPO . p " + . , BXXO . " , . & . $ . ( . - . $ . .
0x044738…0448cc Dummy {f00=0x0065, f01=0x0190, f02=» B**O . " 0 / 1 B**O / " 1 / 2 & / B & / P 2 B**O / ^ " 2 / r $ / ( / 3 / & / & / & / & / 4 *.***.***.**9.99-, /
0x0448cc…044a60 Dummy {f00=0x0065, f01=0x0190, f02=» ( 0 * 8 0 " 9 0 ( 0 . 9 0 : $ : 0 J ( 0 Z : 0 f & + 0 v ; BB99.99.99 0 " ; 0 & 0 < *.***.***.**9.99-, 0 " < 0 & 0 = TRP
0x044a60…044bf4 (0, 87) Dummy {f00=0x0065, f01=0x0190, f02=» " D 0 " F 1 " 1 " H 1 * ( 1 8 @ 1 D & 1 T & 1 b & 1 p & * 1 ~ & 1 ( 1 A 1 $ B 1 ( 1 B 1 & 0 1 & 1 C *.
0x044bf4…044d88 Dummy {f00=0x0065, f01=0x018c, f02=» E 1 & 2 ( 2 F 2 & & + 2 6 G Z.ZZZ.ZZZ.ZZ9.99-B 2 D " G 2 f & 2 v ( 2 H 2 & 2 & 2 & 2 & 2 & 2 & 2 & 2 ( 2
0x044d88…044f1c Dummy {f00=0x0065, f01=0x4008, f02=»@ 3 & 2 ( 2 F 2 & & + 2 6 G Z.ZZZ.ZZZ.ZZ9.99-B 2 D " G 2 f & 2 v ( 2 H 2 & 2 & 2 & 2 & 2 & 2 & 2 & 2 ( 2
0x044f1c…0450b0 Dummy {f00=0x0065, f01=0x018e, f02=» : H IDENT DIV461 TRA 4.2 81-05-06 F1 O1111 03.01.XXX.1 > : FRMTGP FRMTJT FRMTKT FRMTKV FRMTTA FRMTVO FRMXGP B & " FRMXJTV FRMXKTA FRMXTA1 FRMXVOF $$$TRA B > FRMTGPV ? FRMTJTF FRMTKTM 1 FRMTKV1 * FRMTTAX FRMTVO 8 4
0x0450b0…045244 Dummy {f00=0x0065, f01=0x0190, f02=» = $ > 4 D y T $ d & t + - ! 2 4 # 9 ; 7 @ B H J F " D
0x045244…0453d8 Dummy {f00=0x0065, f01=0x0190, f02=» " " " " * " 8 " F " T " b " p " ~ " " " " ( $ $ &
0x0453d8…04556c Dummy {f00=0x0065, f01=0x0190, f02=» $ + & & " X 0 " B & R $ ' ` $ 5 p & ( $ ( ( $ & & $
0x04556c…045700 Dummy {f00=0x0065, f01=0x0190, f02=» " BBZ " ( $ 5 8 & H XX V " h & x ZZZ " & ( $ ( % $
0x045700…045894 (0, 88) Dummy {f00=0x0066, f01=0x0190, f02=» ZZ.ZZ.ZZ " & 0 $ 5 > BBBZZ N " d BBZZ t " BZZ " BBZB " ( $
0x045894…045a28 Dummy {f00=0x0066, f01=0x018e, f02=» $ ( , $ < $ % L B999 " p & & $ + & & BZZZZZZZZZZ " & (
0x045a28…045bbc Dummy {f00=0x0066, f01=0x0190, f02=» 99B " $ ( ( 8 D $ % T $ ' d $ + t ( & & ZZ " BZZ.ZZ.ZZZ "
0x045bbc…045d50 Dummy {f00=0x0066, f01=0x0190, f02=» $ BXX " $ ( % , & B999E-999E-99E-99B < " & ^ ( n ' z & ( XE-XXE-XXE-XXB " ( & & ) XXXXXXE-XXXX " )
0x045d50…045ee4 Dummy {f00=0x0066, f01=0x0190, f02=» , & ( - & . XXXXXXXXE-XX 6 " . R ( b / n & ~ 0 XXX " 0 1 BXXXXXXXXXXX " 1 2 BXXXXXXXXXXX " 2
0x045ee4…046078 Dummy {f00=0x0066, f01=0x0190, f02=»ZZ x " 6 ( 7 & & 6 8 ZZ.ZZ.ZZ D " 8 9 BZZZZZZZZZZ- l " 9 : BZZZZZZZZZZ- " : ; BZZZZ " ; < BZZ " < !
0x046078…04620c Dummy {f00=0x0066, f01=0x018e, f02=» * @ " A " C " G , " I : " K H " Z V " ` d " w r " e " g " i " " k " q " " t ( A
0x04620c…0463a0 Dummy {f00=0x0066, f01=0x0190, f02=» D $ " & ( E KONTOKORTZ 6 $ E" P & " ` F B*.***.***.**9.99- p " F " ( G & H START SUM* $ H" ( I
0x0463a0…046534 (0, 89) Dummy {f00=0x0066, f01=0x0190, f02=»& & * & * & ( & VERSNR 6 M DAGS-DATO J $ ME d & t N POST-DATO $ NE & O MASKIN NR $ OE P EKS.LBNR $ PE
0x046534…0466c8 Dummy {f00=0x0066, f01=0x0190, f02=» R~E & S 99E-99E-99 " S E 4 & D T 999R R " T E f & v U ***99 " U E & & & 6 2 0 V *VERSURKONTONR KASSEKONTONR PRIMO KASSE
0x0466c8…04685c Dummy {f00=0x0066, f01=0x0190, f02=» E Y ZZZ.ZZZ.ZZ9.ZZ-B " Y E * & Y : & H & * V ( d Z p $ [E ( [ & & * & * & KASSELUKNING $ E
0x04685c…0469f0 Dummy {f00=0x0066, f01=0x0190, f02=» & _ KREDIT $ _E ( ( 8 ` D $ aE T ( d a p & b ZZ " b E " c BBZZZ.ZZZ.ZZZ.ZZ9.99-O " c S " d BBZZZ.ZZZ.ZZZ.ZZ9.99-O
0x0469f0…046b84 Dummy {f00=0x0066, f01=0x018e, f02=»UT TESTT $ h ( i , & < j DISKETTE SKIFT J $ j h ( x k & $ l ( l $ % m BZZZ " m n
0x046b84…046d18 Dummy {f00=0x0066, f01=0x0190, f02=» q & p r 99BR & " r : & J s 99 X " s j ( z t & u ****9 " uE v CHECK $ v ( w
0x046d18…046eac Dummy {f00=0x0066, f01=0x0190, f02=»" " " " ( " z 6 " D " R " ` " n " | " z " z " z " z " " " " "
0x046eac…047040 Dummy {f00=0x0066, f01=0x0190, f02=» $ {I ( { $ I 0 & I @ & P | B**B ^ " | r } ZZ.ZZ.ZZBM " } & ~ B**B " ~ $ ' $ (
0x047040…0471d4 (0, 90) Dummy {f00=0x0066, f01=0x0190, f02=» & * & & * $ , ( < H $ X ( h t $ BBB**B " & ZZZZZZZZZZB* " & &
0x0471d4…047368 Dummy {f00=0x0066, f01=0x018e, f02=» ( $ ( ( 8 D & + T & b & p 999B ~ " $ B99.99.999 " & 99 "
0x047368…0474fc Dummy {f00=0x0066, f01=0x0190, f02=» $ $ ( $ 8 ( H T $ d $ t $ ( ( ( ( (
0x0474fc…047690 Dummy {f00=0x0066, f01=0x0190, f02=» ( ( ( ( 8 D ( T ` ( p | & + & & 999B " $ B99.99.99Z "
0x047690…047824 Dummy {f00=0x0066, f01=0x0190, f02=» *.***.***.**9.99- " & 0 & > ( L X & h & v 99.99.99B. " & Y B999B " 99BS "
0x047824…0479b8 Dummy {f00=0x0066, f01=0x0190, f02=» B99B " & 0 & @ & N ZZ.ZZ.ZZB* " v ( & $ ' B*.***.***.**9.99- " & &
0x0479b8…047b4c Dummy {f00=0x0066, f01=0x0190, f02=» B99.99.99* " BXX. $ " 8 ( H T XX d " v E-9999999999B9 " XX.XXPPO " BXBS " (
0x047b4c…047ce0 Dummy {f00=0x0066, f01=0x018e, f02=»99B9 ~ " XX.XXPPO " 4 & D ( R ^ *.***.***.**9.99-- n " & & ( & ****9 "
0x047ce0…047e74 (0, 91) Dummy {f00=0x0066, f01=0x018e, f02=» " " " $ " 2 " @ " N " " j " x " " " " " " " ( $
0x047e74…048008 Dummy {f00=0x0066, f01=0x0190, f02=» & *.***.***.**9.99+- " 4 & D ( R ^ $ n $ ~ ( & + $ ( $ & & 0
0x048008…04819c Dummy {f00=0x0066, f01=0x0190, f02=» & 0 & 0 & 0 $ " . ( > J $ Z ( j v & + 999B " B99.99.99B " ****9 "
0x04819c…048330 Dummy {f00=0x0066, f01=0x018e, f02=» " & ( * $ : ( J < V & + f & t 999S " BB99.99.99 " BBZ999 " } BB****9.
0x048330…0484c4 Dummy {f00=0x0066, f01=0x018e, f02=» & * ! & * ! & * ! & 4 ! . KONTONRO ! < $ - ! T & ! d T[LLER ! r $ - ! & ! & NETTOS ! & ! DEBET ! $ E ! & ! KRED
0x0484c4…048658 Dummy {f00=0x0066, f01=0x0190, f02=» ! x " " & " 99 " & " " 8 " BBZZZ.ZZZ.ZZZ.ZZ9.99- " H " " n " BBZZZ.ZZZ.ZZZ.ZZ9.99- " ~ " o T " " BBZZZ.ZZZ.ZZZ.ZZ9.99- " " o T " ( " "
0x048658…0487ec Dummy {f00=0x0066, f01=0x018e, f02=» " " BBZZZ.ZZZ.ZZZ.ZZ9.99- # " T # 2 " BBZZZ.ZZZ.ZZZ.ZZ9.99- # D " T # j ( # | # $ # ( # 9 # & 4 # & TOTALS # " BBZZZ.ZZZ.ZZZ.ZZ9.99- #
0x0487ec…048980 Dummy {f00=0x0066, f01=0x018e, f02=» # & 4 $ & SUPL $ " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ ( " $ N " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ ^ " L $ " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ " L $ & $ & 2 $ & KORL $ & $ "
0x048980…048b14 (0, 92) Dummy {f00=0x0067, f01=0x018e, f02=» $ $ % ( % 4 % $ & 4 % 4 999E-99999E-99 % B " % ` & % p & PRIMO % ~ " BBZZZ.ZZZ.ZZZ.ZZ9.99- % " P % & % & % & 2 % & BEV % "
0x048b14…048ca8 Dummy {f00=0x0067, f01=0x0190, f02=» % p " & & & & 2 & & & ULTIMO & 4 " BBZZZ.ZZZ.ZZZ.ZZ9.99- & H " L & n & & ~ ( & & $ L & ( & * & & & & & 999B & "
0x048ca8…048e3c Dummy {f00=0x0067, f01=0x0190, f02=» & & ' & ' & 2 ' & & * ' 4 & * ' B & 4 ' P T[LLER ' ^ $ L ' t & ' KONTONRI ' $ L ' & ' BEV.PERIODET ' $ L ' & '
0x048e3c…048fd0 Dummy {f00=0x0067, f01=0x018e, f02=» ZZ ' " L ( & ( XXXE-XXXXXE-XX ( , " i I ( J " BBZZZ.ZZZ.ZZZ.ZZ9.99- ( " i I ( " BBZZZ.ZZZ.ZZZ.ZZ9.99- ( " i I ( ( ( ( & 2 ( & ( (
0x048fd0…049164 Dummy {f00=0x0067, f01=0x0190, f02=» & ] ) & N ) & N ) & N ) . & E ) < & S ) J & S ) X & S ) f & [ ) t & ) ( ) ) $ ) ( ) ) & + ) 99E-99E-99 ) "
0x049164…0492f8 Dummy {f00=0x0067, f01=0x0190, f02=» ZZ999999 ) " * & * " ( * 0 * < $ * L ( * * h & 2 * x & * " BBZZZ.ZZZ.ZZZ.ZZ9.99- * " * " BBZZZ.ZZZ.ZZZ.ZZ9.99- * " * ( *
0x0492f8…04948c Dummy {f00=0x0067, f01=0x0190, f02=» * & + & 2 + XXXE-XXXXXE-XX + & " + D & + T XX + b " + t & + " BBZZZ.ZZZ.ZZZ.ZZ9,99- + " + & + & + & + " BBZZZ.ZZZ.ZZ
0x04948c…049620 Dummy {f00=0x0067, f01=0x0190, f02=» + " " , " " , " , $ " z , 2 " , @ " , N " , " , j " , x " z , " z , " z , " z , ( , " , & + , $ , $ ,
0x049620…0497b4 (0, 93) Dummy {f00=0x0067, f01=0x0190, f02=» " % - " & - " ' - " % - . " % - < " % - J " % - X ( - f $ - r ( - % - $ z - $ 2 - ( - & - $ - $ 2 - ( -
0x0497b4…049948 Dummy {f00=0x0067, f01=0x0190, f02=»$ - & . * XX.XXPPO . " * . 6 + BXXO . F " + . Z & . j $ . x ( . , . $ - . ( . - . $ . $ . & . .
0x049948…049adc Dummy {f00=0x0067, f01=0x0190, f02=»& . 1 B**O / " 1 / $ / 0 ( / @ 2 / L & / & / l & / | & / 3 *.***.***.**9.99-, / " 3 / 4 B99. / " 4 / 5 9I / " 5
0x049adc…049c70 Dummy {f00=0x0067, f01=0x018e, f02=» / ( 0 9 0 & + 0 $ : BB99.99.99 0 2 " : 0 L & 0 ; *.***.***.**9.99-, 0 j " ; 0 & 0 < TRP 0 $ < 0 ( 0 * = 0 " w 0 ( 0 *
0x049c70…049e04 Dummy {f00=0x0067, f01=0x0190, f02=» & 1 & 1 & 1 & * 1 . & 1 < ( 1 J @ 1 V $ A 1 f ( 1 v A 1 & 0 1 & 1 B *.***.***.**9.99+B 1 " B 1 $ G 1 ( 1 C 1
0x049e04…049f98 Dummy {f00=0x0067, f01=0x4144, f02=»Z.ZZZ.ZZ9.99-B 1 " F 2 & 2 & ( 2 4 G 2 @ & 2 P & 2 ^ & 2 l & 2 z & 2 & 2 & 2 ( 2 * H 2 " w 2 ( 2 * I 2 " w 2
0x049f98…04a12c Dummy {f00=0x0067, f01=0x018e, f02=» : H IDENT DIV167 TRA 4.2 81-05-06 F1 O1111 03.01.XXX.1 > : FRMTGP FRMTJT FRMTKT FRMTKV FRMTTA FRMTVO FRMXGP B & " FRMXJTV FRMXKTA FRMXTA1 FRMXVOF $$$TRA B > FRMTGPV ? FRMTJTF FRMTKTM 1 FRMTKV1 * FRMTTAX FRMTVO 8 4
0x04a12c…04a2c0 Dummy {f00=0x0067, f01=0x0190, f02=» ; $ < 4 D w T $ d & t + - 2 4 ! 9 ; 5 @ B F J F " D
0x04a2c0…04a454 (0, 94) Dummy {f00=0x0067, f01=0x0190, f02=» " " " " * " 8 " F " T " b " p " ~ " " " " ( $ $ &
0x04a454…04a5e8 Dummy {f00=0x0067, f01=0x0190, f02=» $ + & & " X 0 " B & R $ ' ` $ 3 p & ( $ ( ( $ & & $
0x04a5e8…04a77c Dummy {f00=0x0067, f01=0x0190, f02=» " BBZ " ( $ 3 8 & H XX V " h & x ZZZ " & ( $ ( % $
0x04a77c…04a910 Dummy {f00=0x0067, f01=0x0190, f02=» ZZ.ZZ.ZZ " & 0 $ 3 > BBBZZ N " d BBZZ t " BZZ " BBZB " ( $
0x04a910…04aaa4 Dummy {f00=0x0067, f01=0x018e, f02=» $ ( , $ < $ % L B999 " p & & $ + & & BZZZZZZZZZZ " & (
0x04aaa4…04ac38 Dummy {f00=0x0067, f01=0x0190, f02=» 99B " $ ( ( 8 D $ % T $ ' d $ + t ( & & ZZ " BZZ.ZZ.ZZZ "
0x04ac38…04adcc Dummy {f00=0x0067, f01=0x0190, f02=» $ BXX " $ ( % , & B999V99V999E-99B < " & ( l ' x & ( XE-XXE-XXE-XXB " ( & & ) XXXXXXE-XXXX " )
0x04adcc…04af60 Dummy {f00=0x0067, f01=0x0190, f02=» & ( - " & 2 . XXX @ " . T / BXXXXXXXXXX* d " / 0 BXXXXXXXXXX* " 0 1 BXX.XX.XXX " 1 # 2 BXX.XX.XXX " 2 $
0x04af60…04b0f4 (0, 95) Dummy {f00=0x0067, f01=0x0190, f02=».ZZ.ZZ " 6 7 BZZZZZZZZZZZ " 7 : 8 BZZZZZZZZZZZ J " 8 f 9 BZZZZ v " 9 : BZZ " : ! ; BZZ.ZZ.ZZZ " ; # < BZZ.ZZ.ZZZ "
0x04b0f4…04b288 Dummy {f00=0x0067, f01=0x0190, f02=» " X " ^ " u $ " c 2 " e @ " g N " " i j " o x " " r ( ? & $ " @ KVIT $ @" (
0x04b288…04b41c Dummy {f00=0x0067, f01=0x0190, f02=» $ C" & " D B*.***.***.**9.99- " D " B ( R E ^ & n F START SUM* | $ F" ( G $ " H SUM $ H" ( I
0x04b41c…04b5b0 Dummy {f00=0x0067, f01=0x018e, f02=» DAGS-DATO $ KE & $ L POST-DATO 2 $ LE L & M MASKIN NR j $ ME N EKS.LBNR $ NE & & & O 99.99.999.9 "
0x04b5b0…04b744 Dummy {f00=0x0067, f01=0x0190, f02=» R 999R " R E & ( S ***99 6 " S E L & & j & x 6 2 0 T *VERSURKONTONR KASSEKONTONR PRIMO KASSE $ TE & & U 999V99V999E-99BK
0x04b744…04b8d8 Dummy {f00=0x0067, f01=0x018e, f02=» & * ( X " $ YE 2 ( B Y N & ^ & * l & * z & Z KASSELUKNING $ ZE & & & [ T[LLER $
0x04b8d8…04ba6c Dummy {f00=0x0067, f01=0x0190, f02=» $ _E ( _ $ & 4 ` ZZ B " ` E T " a BBZZZ.ZZZ.ZZZ.ZZ9.99-O d " a S " b BBZZZ.ZZZ.ZZZ.ZZ9.99-O " b S ( c d START TEST
0x04ba6c…04bc00 Dummy {f00=0x0067, f01=0x0190, f02=» h DISKETTE SKIFT $ h ( , i 8 & H $ j V ( f j r $ % k BZZZ " k l B*.***.***.**9.99- " l & m ADM
0x04bc00…04bd94 (0, 96) Dummy {f00=0x0068, f01=0x0190, f02=» q 99 " q ( , r 8 & H s ****9 V " sE l t CHECK | $ t ( u $ v ( v & & DIVERSE FO
0x04bd94…04bf28 Dummy {f00=0x0068, f01=0x018e, f02=» " " " } " . " x < " x J " x X " x f " t " " " " " " " " " "
0x04bf28…04c0bc Dummy {f00=0x0068, f01=0x0190, f02=» & z BE " z $ { ZZ.ZZ.ZZBM 4 " { N & ^ | BE l " | ~ $ ' $ ( } $ ~ ( ~ $
0x04c0bc…04c250 Dummy {f00=0x0068, f01=0x018e, f02=» $ ( $ $ 4 B**S D " X & h ZZZZZZZZZZB* x " & & BBZZ.ZZ.ZZBBBR " & ZZ
0x04c250…04c3e4 Dummy {f00=0x0068, f01=0x018e, f02=» & + & & 999B . " B $ R B99.99.999 b " | B999 " BZZZZZZZZZZB " & & * $
0x04c3e4…04c578 Dummy {f00=0x0068, f01=0x0190, f02=» $ ( ( 0 < ( L X ( h t ( ( ( ( (
0x04c578…04c70c Dummy {f00=0x0068, f01=0x018e, f02=» & + & & ( 999B 6 " J $ Z B99.99.99Z j " & 99 " ( B999V99V999E-99B "
0x04c70c…04c8a0 Dummy {f00=0x0068, f01=0x0190, f02=» 99.99.99B. " " & Y 2 B999B @ " V 99BS f " z ( $ B*.***.***.**9.99- " & & (
0x04c8a0…04ca34 (0, 97) Dummy {f00=0x0068, f01=0x0190, f02=» ( & & $ ' 4 B*.***.***.**9.99- D " f & v & $ 0 ( & + & 999B " $
0x04ca34…04cbc8 Dummy {f00=0x0068, f01=0x0190, f02=» E-9999999999B9 " ( XX.XXPPO 8 " P BXBS ` " t ( & XX " & XX "
0x04cbc8…04cd5c Dummy {f00=0x0068, f01=0x0190, f02=»***.**9.99-- " & $ & 2 ( @ L & ****9 l " & ****9 " ( * " u " "
0x04cd5c…04cef0 Dummy {f00=0x0068, f01=0x0190, f02=» " " " $ " 2 " @ " N " " j ( x $ ( & + & ARKIV $ $
0x04cef0…04d084 Dummy {f00=0x0068, f01=0x018e, f02=» $ ( ( & + 8 $ F ( V b $ r & & 0 $ ( $ ( $
0x04d084…04d218 Dummy {f00=0x0068, f01=0x018e, f02=» & + 999B " " 6 B99.99.99B F " ` ****9 p " -E $ $ & TOTAL $ *.**
0x04d218…04d3ac Dummy {f00=0x0068, f01=0x0190, f02=» & 999S " & BB99.99.99 6 " P BBZ999 ` " } v BB****9. " & - $ - & & & &
0x04d3ac…04d540 Dummy {f00=0x0068, f01=0x0190, f02=» T[LLER $ - ! & ! & & NETTOS ! 4 & ! H DEBET ! V $ E ! l & ! | KREDIT ! $ E ! ( ! ! $ E ! ( ! ! & 2 !
0x04d540…04d6d4 (0, 98) Dummy {f00=0x0068, f01=0x0190, f02=» ! " BBZZZ.ZZZ.ZZZ.ZZ9.99- " " o T " 0 " BBZZZ.ZZZ.ZZZ.ZZ9.99- " B " o T " h ( " z " $ " ( " " & 2 " ZZ " " " " BBZZZ.ZZZ.ZZZ.
0x04d6d4…04d868 Dummy {f00=0x0068, f01=0x0190, f02=» " ( # # $ # $ ( # 4 9 # @ & 4 # P & TOTALS # ^ " BBZZZ.ZZZ.ZZZ.ZZ9.99- # r " # " BBZZZ.ZZZ.ZZZ.ZZ9.99- # " # " BBZZZ.ZZZ.ZZZ.ZZ9.99- # "
0x04d868…04d9fc Dummy {f00=0x0068, f01=0x018e, f02=»9.99- # x " L $ " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ " L $ F & $ X & 2 $ f & KORL $ t & $ " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ " L $ " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ " L $ (
0x04d9fc…04db90 Dummy {f00=0x0068, f01=0x018e, f02=» $ & PRIMO % " BBZZZ.ZZZ.ZZZ.ZZ9.99- % " P % B & % R & % ` & 2 % n & BEV % | " BBZZZ.ZZZ.ZZZ.ZZ9.99- % " % " BBZZZ.ZZZ.ZZZ.ZZ9.99- % " % " BBZZZ.
0x04db90…04dd24 Dummy {f00=0x0068, f01=0x0190, f02=» % & & ( & & " $ L & 2 ( & B * & N & & ^ & & l 999B & z " L & B99.99.99. & " L & & & BEHOLDNINGST[LLERE & $ L &
0x04dd24…04deb8 Dummy {f00=0x0068, f01=0x0190, f02=»$ L & & ' KONTONRI ' $ L ' 4 & ' D BEV.PERIODET ' R $ L ' n & ' ~ SALDO ' $ L ' & ' ( ' ' $ L ' ( ' '
0x04deb8…04e04c Dummy {f00=0x0068, f01=0x0190, f02=»99- ' v " i I ( " BBZZZ.ZZZ.ZZZ.ZZ9.99- ( " i I ( D ( ( V ( b & 2 ( r & ( ( ( ( & ( $ ( ( ( ( & $ ( & < ( & < (
0x04e04c…04e1e0 Dummy {f00=0x0068, f01=0x0190, f02=» [ ( & ) ( ) ) $ $ ) 4 ( ) D ) P & + ) ` 99E-99E-99 ) n " ) & ) $ ) & ) B*.***.***.**9E,99 ) " ) & * ) &
0x04e1e0…04e374 (0, 99) Dummy {f00=0x0068, f01=0x0190, f02=» & 2 ) & * " BBZZZ.ZZZ.ZZZ.ZZ9.99- * " * B " BBZZZ.ZZZ.ZZZ.ZZ9.99- * R " * x ( * * $ * $ * ( * * $ * ( * % *
0x04e374…04e508 Dummy {f00=0x0068, f01=0x0190, f02=» * z " + & + XX + & " + 8 & + H " BBZZZ.ZZZ.ZZZ.ZZ9,99- + X " + ~ & + & + & + " BBZZZ.ZZZ.ZZZ.ZZ9,99- + " + " BBZZZ.ZZZ.ZZZ.ZZ9,
0x04e508…04e69c Dummy {f00=0x0068, f01=0x0190, f02=» " } , " , " , " } , . " , < " x , J " x , X " x , f " x , t ( , , & + , $ , $ , ( , * ! , " # , " $ , "
0x04e69c…04e830 Dummy {f00=0x0068, f01=0x0190, f02=» " # , " # - " # - ( - * " - 6 ( - F # - R $ x - b $ 0 - r ( - $ - $ } - $ 0 - ( - % - $ - $ 0 - ( -
0x04e830…04e9c4 Dummy {f00=0x0068, f01=0x0190, f02=» - ) BXXO . " ) . & . . $ . < ( . L * . X $ + . h ( . x + . $ . $ . & . , XX.XXPPO . " , . & . - B**O
0x04e9c4…04eb58 Dummy {f00=0x0068, f01=0x0190, f02=» ( / 0 / & / & / 0 & / @ & / N 1 *.***.***.**9.99-, / " 1 / ~ 2 B99. / " 2 / 3 9I / " 3 / & / 4 99BO / " 4 /
0x04eb58…04ecec Dummy {f00=0x0068, f01=0x0190, f02=»99.99.99 / " 8 0 & 0 9 *.***.***.**9.99-, 0 . " 9 0 P & 0 ` : TRP 0 n $ : 0 ( 0 * ; 0 " u 0 ( 0 * < 0 " = 0 " > 0 " > 0 " A
0x04ecec…04ee80 Dummy {f00=0x0068, f01=0x018e, f02=»& 0 ( 1 > 1 $ ? 1 ( ( 1 8 ? 1 D & 0 1 T & 1 b @ *.***.***.**9.99+B 1 p " @ 1 $ E 1 ( 1 A 1 & + 1 B Z.ZZZ.ZZZ.ZZ9.99-B 1 " B 1
0x04ee80…04f014 (0, 100) Dummy {f00=0x0069, f01=0x4108, f02=» E 2 & 2 & 2 " & 2 0 & 2 > & 2 L & 2 Z & 2 h ( 2 v * F 2 " u 2 ( 2 * G 2 " u 2 ( 2 @R F 4 0R F 4 F 2 M 2 @ 2
0x04f014…04f1a8 Dummy {f00=0x0069, f01=0x018e, f02=» : H IDENT DIV259 TRA 4.2 81-05-06 F1 O1111 03.01.XXX.1 > : FRMTGP FRMTJT FRMTKT FRMTKV FRMTTA FRMTVO FRMXGP B & " FRMXJTV FRMXKTA FRMXTA1 FRMXVOF $$$TRA B > FRMTGPV ? FRMTJTF FRMTKTM 1 FRMTKV1 * FRMTTAX FRMTVO 8 4
0x04f1a8…04f33c Dummy {f00=0x0069, f01=0x0190, f02=» + $ , 4 D o T $ d & t + - 2 4 9 ; % @ B 6 J F " D
0x04f33c…04f4d0 Dummy {f00=0x0069, f01=0x0190, f02=» " " " " * " 8 " F " T " b " p " ~ ( $ $ & $ ( $
0x04f4d0…04f664 Dummy {f00=0x0069, f01=0x0190, f02=»X " & $ & ( $ . 8 & H ( V b $ r ( ( $ & & $ & $ * & &
0x04f664…04f7f8 Dummy {f00=0x0069, f01=0x018e, f02=» $ . & XX " 0 & @ ZZZ N " b & r ( $ ( % $ & $ & $ *
0x04f7f8…04f98c Dummy {f00=0x0069, f01=0x018e, f02=» $ . BBBZZ " . BBZZ > " R BZZ b " v BBZB " ( $ ( $ $
0x04f98c…04fb20 Dummy {f00=0x0069, f01=0x0190, f02=» $ $ $ B999 ( " < & L & Z $ * h & x & BZZZZZZZZZZ " & ( & &
0x04fb20…04fcb4 (0, 101) Dummy {f00=0x0069, f01=0x0190, f02=» ( & & . ZZ < " N BZZ.ZZ.ZZZ ^ " x BBX " ! BBX " ! $ . " XXXXXXE-XXXX " "
0x04fcb4…04fe48 Dummy {f00=0x0069, f01=0x0190, f02=» & & ' XE-XXE-XXE-XXB " ' : & J & X ( XXXXXXE-XXXX h " ( & ) XXX.XXXXX.XXBB " ) ( * + B*.***.***.**9.99-
0x04fe48…04ffdc Dummy {f00=0x0069, f01=0x0190, f02=» / BBZZZE-ZZZE-ZZE-ZZ " / " ( 2 0 > & N 1 ZZ.ZZ.ZZ " 1 t 2 BZZZZZZZZZ " 2 3 BZZZZZZZZZ " 3 4 BZZZZ " 4 5 BZ
0x04ffdc…050170 Dummy {f00=0x0069, f01=0x0190, f02=» ( * 9 " : $ " < 2 " @ @ " B N " D " S j " Y x " m " ^ " ` " b " " d " j " ( :
0x050170…050304 Dummy {f00=0x0069, f01=0x018e, f02=» ( = $ " & , > KONTOKORTZ : $ >" T & " d ? B*.***.***.**9.99- t " ? " ( @ & A START SUM* $ A" (
0x050304…050498 Dummy {f00=0x0069, f01=0x018e, f02=» & & * & * & . & VERSNR < F DAGS-DATO P $ FE j & z G POST-DATO $ GE & H MASKIN NR $ HE I EKS.LBNR $
0x050498…05062c Dummy {f00=0x0069, f01=0x018e, f02=» " K~E & L 99E-99E-99 " " L E < & L M 999R Z " M E n & ~ N ***99 " N E & & & 6 2 0 O *VERSURKONTONR KASSEKONTONR PRIMO
0x05062c…0507c0 Dummy {f00=0x0069, f01=0x018e, f02=» t " Q E R ZZZ.ZZZ.ZZ9.ZZ-B " R E 8 & R H & V & * d ( r S ~ $ TE ( T & & * & * & U KASSELUKNING
0x0507c0…050954 (0, 102) Dummy {f00=0x0069, f01=0x0190, f02=» $ WE & X KREDIT " $ XE 8 ( H Y T $ ZE d ( t Z & [ ZZ " [ E " BBZZZ.ZZZ.ZZZ.ZZ9.99-O " S " ] BBZZZ.ZZ
0x050954…050ae8 Dummy {f00=0x0069, f01=0x0190, f02=» a SLUT TESTT $ a ( 0 b < & L c DISKETTE SKIFT Z $ c x ( d & $ e ( e $ $ f BZZZ " f
0x050ae8…050c7c Dummy {f00=0x0069, f01=0x018e, f02=» ( j & i & k 99BR 4 " k H & X l 99 f " l x ( m $ n ( n & & DIVERSE FORMATER (
0x050c7c…050e10 Dummy {f00=0x0069, f01=0x0190, f02=» " u " ~ " $ " 2 " @ " N " " j " x " " " " " " ( p $ qI
0x050e10…050fa4 Dummy {f00=0x0069, f01=0x0190, f02=»" s & t B**B " t 0 $ & @ $ P ( ` u l $ v | ( v $ & w ******E-**** " w & * &
0x050fa4…051138 Dummy {f00=0x0069, f01=0x0190, f02=»B**B " z & { BZZZZZZZZBB* , " { H & X & f | BBZZ.ZZ.ZZBBBR v " | & } ZZZZ9999.99B " } $ , $ (
0x051138…0512cc Dummy {f00=0x0069, f01=0x0190, f02=» $ B99.99.999 " . & > 99 L " ^ B999 n " BZZZZZZZZZZB " & & * $ (
0x0512cc…051460 Dummy {f00=0x0069, f01=0x0190, f02=» ( ( , 8 ( H T ( d p ( ( ( ( (
0x051460…0515f4 (0, 103) Dummy {f00=0x0069, f01=0x0190, f02=» & 999B " * $ : B99.99.99Z J " d & t 99 " ( B99.99.99.99.99B " *.***.***.**9.99
0x0515f4…051788 Dummy {f00=0x0069, f01=0x0190, f02=» " & Y B999B " 4 99BS D " X ( h t $ B*.***.***.**9.99- " & & ( B9
0x051788…05191c Dummy {f00=0x0069, f01=0x0190, f02=» & $ & B*.***.***.**9.99- " " D & T & b $ p ( ~ & + & 999B " $ B99.99.99* "
0x05191c…051ab0 Dummy {f00=0x0069, f01=0x0190, f02=» " XX.XXPPO " , BXBS < " P ( ` l & | XX " & XX " E-9999999999B9 "
0x051ab0…051c44 Dummy {f00=0x0069, f01=0x0190, f02=» & & ( ( & 8 ****9 H " ^ & n ****9 | " ( * " m " " " " "
0x051c44…051dd8 Dummy {f00=0x0069, f01=0x0190, f02=» " " " ( * 6 $ F ( V b & + r & ARKIV $ $ . & & *.***.***.**9.99+- "
0x051dd8…051f6c Dummy {f00=0x0069, f01=0x0190, f02=» ( $ $ & 4 & 0 B $ P ( ` l $ | ( $ & & 0 & 0 & 0 & 0 $
0x051f6c…052100 Dummy {f00=0x0069, f01=0x0190, f02=»B99.99.99B " ****9 " " 8 -E H $ Z $ j & z TOTAL $ *.***.***.**9,99+- " & (
0x052100…052294 (0, 104) Dummy {f00=0x006a, f01=0x018e, f02=» " BBZ999 " } & BB****9. 6 " N & - ^ $ - n & ~ & & & & & 2 & * & * & * & 4
0x052294…052428 Dummy {f00=0x006a, f01=0x0190, f02=» DEBET $ E & . KREDIT < $ E R ( b n $ E ~ ( & 2 XX.XX.XX.XX.XXBB " & 99
0x052428…0525bc Dummy {f00=0x006a, f01=0x0190, f02=»ZZZ.ZZZ.ZZZ.ZZ9.99- " o T ! ( ! . ! : $ ! J ( ! Z ! f & 2 ! v ZZ ! " ! " BBZZZ.ZZZ.ZZZ.ZZ9.99- ! " ! " BBZZZ.ZZZ.ZZZ.ZZ9.99- ! "
0x0525bc…052750 Dummy {f00=0x006a, f01=0x0190, f02=» & 4 " & TOTALS " " BBZZZ.ZZZ.ZZZ.ZZ9.99- " & " " L " BBZZZ.ZZZ.ZZZ.ZZ9.99- " " " " BBZZZ.ZZZ.ZZZ.ZZ9.99- " " " & " & 4 " & SUPL " " BBZZZ.ZZZ.
0x052750…0528e4 Dummy {f00=0x006a, f01=0x018e, f02=» L " & # & 2 # & KORL # ( & # : " BBZZZ.ZZZ.ZZZ.ZZ9.99- # H " L # n " BBZZZ.ZZZ.ZZZ.ZZ9.99- # " L # ( # # $ # ( # 4 # & 4 #
0x0528e4…052a78 Dummy {f00=0x006a, f01=0x018e, f02=» # & $ & $ & 2 $ $ & BEV $ 2 " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ D " $ j " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ z " $ " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ " $ & $ & 2 $ &
0x052a78…052c0c Dummy {f00=0x006a, f01=0x0190, f02=» * % & % & % " 999B % 0 " L % D B99.99.99. % T " L % n & % ~ BEHOLDNINGST[LLERE % $ L % & % & % & % & % & 2 % &
0x052c0c…052da0 Dummy {f00=0x006a, f01=0x0190, f02=» % BEV.PERIODET & $ L & $ & & 4 SALDO & B $ L & X & & h ( & v & $ L & ( & & & 2 & ZZ & " L & & & XX.X
0x052da0…052f34 (0, 105) Dummy {f00=0x006a, f01=0x0190, f02=» i I & ( ' ' & 2 ' * & ' 8 ( ' F ' R & ' b $ ' p ( ' ' & $ ' & < ' & < ' & < ' & ] ' & N ' & N ' & N '
0x052f34…0530c8 Dummy {f00=0x006a, f01=0x0190, f02=» ' ( & + ( 99E-99E-99 ( & " ( @ & ( P $ ( ^ & ( n B*.***.***.**9E,99 ( | " ( & * ( & ( ZZ999999 ( " ( & ( ( (
0x0530c8…05325c Dummy {f00=0x006a, f01=0x0190, f02=» ( " BBZZZ.ZZZ.ZZZ.ZZ9.99- ) " ) 0 ( ) @ * ) L " p ) " u ) j " ) x " ) " u ) " p ) " u ) " x ) " x ) " u ) " ~ ) ( )
0x05325c…0533f0 Dummy {f00=0x006a, f01=0x0190, f02=» " * " * " * " * . " * < " * J " * X ( * f * r ( * * $ p * $ * ( * * $ u * $ * ( *
0x0533f0…053584 Dummy {f00=0x006a, f01=0x018e, f02=» * & + XX.XXPPZ + " + 0 BXXO + @ " + T & + d $ + r ( + + $ + ( + + $ + $ + & + XX.XXP
0x053584…053718 Dummy {f00=0x006a, f01=0x0190, f02=» + B**O , " , $ , , ( , < , H & , X & , h & , x & , ! *.***.***.**9.99-. , " ! , " B99. , " " , # 9I , " # ,
0x053718…0538ac Dummy {f00=0x006a, f01=0x0190, f02=» ( - ' - & + - ( BB99.99.99 - . " ( - H & - X ) *.***.***.**9.99-. - f " ) - & - * TRP - $ * - ( - * + - " m - ( - * ,
0x0538ac…053a40 Dummy {f00=0x006a, f01=0x0190, f02=»& - & . & . & * . ( & . 6 ( . D . . P $ / . ` ( . p / . | & 0 . & . 0 *.***.***.**9.99+B . " 0 . $ 5 . ( . 1 .
0x053a40…053bd4 (0, 106) Dummy {f00=0x006a, f01=0x413e, f02=»ZZ9.99-B . ~ " 4 / & / ( / . 5 / : & / J & / X & / f & / t & / & / & / ( / * 6 / " m / ( / * 7 / " m / ( /
0x053bd4…053d68 Dummy {f00=0x006a, f01=0x018e, f02=» : H IDENT DIV525 TRA 4.2 81-05-06 F1 O1111 03.01.XXX.1 > : FRMTGP FRMTJT FRMTKT FRMTKV FRMTTA FRMTVO FRMXGP B & " FRMXJTV FRMXKTA FRMXTA1 FRMXVOF $$$TRA B > FRMTGPV ? FRMTJTF FRMTKTM 1 FRMTKV1 * FRMTTAX FRMTVO 8 4
0x053d68…053efc Dummy {f00=0x006a, f01=0x0190, f02=» " $ # 4 D o T $ d & t + - 2 4 9 ; @ B - J F " D
0x053efc…054090 Dummy {f00=0x006a, f01=0x0190, f02=» " " " " * " 8 " F " T " b " p " ~ ( $ $ & $ ( $
0x054090…054224 Dummy {f00=0x006a, f01=0x0190, f02=»X " & $ & ( $ . 8 & H ( V b $ r ( ( $ & & $ & $ * & &
0x054224…0543b8 Dummy {f00=0x006a, f01=0x018e, f02=» $ . & XX " 0 & @ ZZZ N " b & r ( $ ( % $ & $ & $ *
0x0543b8…05454c Dummy {f00=0x006a, f01=0x018e, f02=» $ . BBBZZ " . BBZZ > " R BZZ b " v BBZB " ( $ ( $ $
0x05454c…0546e0 Dummy {f00=0x006a, f01=0x018e, f02=» $ $ $ B999 ( " < & L & Z $ * h & x & BZZZZZZZZZZ " & ( & &
0x0546e0…054874 (0, 107) Dummy {f00=0x006a, f01=0x0190, f02=» $ * ( & 0 & > ZZ L " ^ BZZ.ZZ.ZZZ n " BBX " ! BBX " ! $ . " XXXXXXE-XXXX
0x054874…054a08 Dummy {f00=0x006a, f01=0x018e, f02=»( & & ' BBBX.XX.XX.XXE * " ' H & X & f ( XX.XX.XX.XXXXE v " ( & ) XX.XX.XX.XX.XX " ) ( * + B*.*
0x054a08…054b9c Dummy {f00=0x006a, f01=0x0190, f02=» . / BBZZZE-ZZZE-ZZE-ZZ " / 6 ( F 0 R & b 1 ZZ.ZZ.ZZ p " 1 2 BZZZZZZZZZ " 2 3 BZZZZZZZZZ " 3 4 BZZZZ " 4
0x054b9c…054d30 Dummy {f00=0x006a, f01=0x0190, f02=» BZ " 8 " ( * 9 ( " : 8 " < F " @ T " B b " D p " S ~ " Y " m " ^ " ` " b " " d " j "
0x054d30…054ec4 Dummy {f00=0x006a, f01=0x018e, f02=» $ =" ( = $ " 0 & @ > KONTOKORTZ N $ >" h & " x ? B*.***.***.**9.99- " ? " ( @ & A START SUM* $ A"
0x054ec4…055058 Dummy {f00=0x006a, f01=0x0190, f02=» E K & & * & & * 4 & B & VERSNR P F DAGS-DATO d $ FE ~ & G POST-DATO $ GE & H MASKIN NR $ HE I E
0x055058…0551ec Dummy {f00=0x006a, f01=0x0190, f02=» K 99E-99E-99 " K~E & & L 99E-99E-99 4 " L E N & ^ M 999R l " M E & N ***99 " N E & & & 6 2 0 O *VERSURKONTONR KAS
0x0551ec…055380 Dummy {f00=0x006a, f01=0x0190, f02=»9E-999E-99.99BBS " Q E R ZZZ.ZZZ.ZZ9.ZZ-B ( " R E H & R X & f & * t ( S $ TE ( T & & * & * & U
0x055380…055514 (0, 108) Dummy {f00=0x006b, f01=0x018e, f02=» W DEBET $ WE & " X KREDIT 0 $ XE F ( V Y b $ ZE r ( Z & [ ZZ " [ E " BBZZZ.ZZZ.ZZZ.ZZ9.99-O " S "
0x055514…0556a8 Dummy {f00=0x006b, f01=0x0190, f02=» ` a SLUT TESTT $ a 0 ( @ b L & c DISKETTE SKIFT j $ c ( d & $ e ( e $ $ f BZ
0x0556a8…05583c Dummy {f00=0x006b, f01=0x0190, f02=»ZR " i ( j & & i 6 k 99BR D " k X & h l 99 v " l ( m $ n ( n & & DIVERSE FORMATER
0x05583c…0559d0 Dummy {f00=0x006b, f01=0x0190, f02=» " w " p " | $ " 2 " @ " N " " j " x " " " " " " " ( p $
0x0559d0…055b64 Dummy {f00=0x006b, f01=0x0190, f02=» I ( r $ sI & ( 6 s B $ I R & b & I p & $ I ( t $ uI ( u $ I & I
0x055b64…055cf8 Dummy {f00=0x006b, f01=0x0190, f02=» w $ x ( x ( $ 8 & H & X & f y PPPX.XX.XX.XXR t " y & z BZZZZZZZZB " z & & { XX.XX.XX
0x055cf8…055e8c Dummy {f00=0x006b, f01=0x0190, f02=» & ~ 999B " ~ , $ < B99.99.99X L " f & v 99 " B999 " BXX.XX.XX.XXXX " &
0x055e8c…056020 Dummy {f00=0x006b, f01=0x0190, f02=»$ $ $ ( . : ( J V ( f r ( ( ( ( (
0x056020…0561b4 (0, 109) Dummy {f00=0x006b, f01=0x018e, f02=» ( & + & & 4 & B 999B P " d $ t B99.99.99. " & 99 " & (
0x0561b4…056348 Dummy {f00=0x006b, f01=0x0190, f02=» & & " 99.99.99B. 0 " J & Y Z B999B h " ~ 99BS " ( $ B*.***.***.**9.99- "
0x056348…0564dc Dummy {f00=0x006b, f01=0x0190, f02=» ZZ.ZZ.ZZB* " " ( 2 > & N $ & B*.***.***.**9.99- l " & & $ ( & + &
0x0564dc…056670 Dummy {f00=0x006b, f01=0x0190, f02=» " ( $ PXBS 4 " H $ & X BXX.XX.XX* h " BXBS " ( & XB " &
0x056670…056804 Dummy {f00=0x006b, f01=0x018e, f02=» & & *.***.***.**9.99-- ( " J & Z & h ( v & ****9 " & ****9 " (
0x056804…056998 Dummy {f00=0x006b, f01=0x0190, f02=» " " " $ " 2 " @ " N " " j " x ( $ ( & + & ARKIV $
0x056998…056b2c Dummy {f00=0x006b, f01=0x018e, f02=» $ $ ( * 6 & + F $ T ( d p $ & & 0 $ ( $ ( $
0x056b2c…056cc0 Dummy {f00=0x006b, f01=0x0190, f02=» ( & + $ 999B 2 " F B99.99.99B V " p ****9 " -E $ $ & TOTAL $
0x056cc0…056e54 (0, 110) Dummy {f00=0x006b, f01=0x0190, f02=» & + & 999S " 4 BB99.99.99 D " ^ BBZ999 n " } BB****9. " & - $ - & & &
0x056e54…056fe8 Dummy {f00=0x006b, f01=0x0190, f02=» & T[LLER $ - $ & 4 & NETTOS B & V DEBET d $ E z & KREDIT $ E ( $ E (
0x056fe8…05717c Dummy {f00=0x006b, f01=0x018e, f02=»- t " ! " BBZZZ.ZZZ.ZZZ.ZZ9.99- ! " o T ! @ " BBZZZ.ZZZ.ZZZ.ZZ9.99- ! R " o T ! x ( ! ! $ ! ( ! ! & 2 ! ZZ ! " ! "
0x05717c…057310 Dummy {f00=0x006b, f01=0x0190, f02=» ! p " T " ( " " & $ " 6 ( " F 9 " R & 4 " b & TOTALS " p " BBZZZ.ZZZ.ZZZ.ZZ9.99- " " " " BBZZZ.ZZZ.ZZZ.ZZ9.99- " " " " BBZZZ.ZZZ.ZZZ.ZZ
0x057310…0574a4 Dummy {f00=0x006b, f01=0x0190, f02=» BBZZZ.ZZZ.ZZZ.ZZ9.99- " " L # " BBZZZ.ZZZ.ZZZ.ZZ9.99- # 2 " L # X & # j & 2 # x & KORL # & # " BBZZZ.ZZZ.ZZZ.ZZ9.99- # " L # " BBZZZ.ZZZ.ZZZ.ZZ9.99- # "
0x0574a4…057638 Dummy {f00=0x006b, f01=0x0190, f02=» # & $ & PRIMO $ " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ . " P $ T & $ d & $ r & 2 $ & BEV $ " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ " $ " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ " $
0x057638…0577cc Dummy {f00=0x006b, f01=0x0190, f02=» $ r " L % & % ( % & % 2 $ L % B ( % R * % ^ & % n & % | 999B % " L % B99.99.99. % " L % & % BEHOLDNINGST[LLERE %
0x0577cc…057960 Dummy {f00=0x006b, f01=0x0190, f02=»T[LLER % $ L & & & KONTONRI & , $ L & D & & T BEV.PERIODET & b $ L & ~ & & SALDO & $ L & & & ( & & $ L & ( &
0x057960…057af4 (0, 111) Dummy {f00=0x006b, f01=0x0190, f02=»BBZZZ.ZZZ.ZZZ.ZZ9.99- & " i I ' " BBZZZ.ZZZ.ZZZ.ZZ9.99- ' 0 " i I ' V ( ' h ' t & 2 ' & ' ( ' ' & ' $ ' ( ' ' & $ ' &
0x057af4…057c88 Dummy {f00=0x006b, f01=0x018e, f02=» & S ' & [ ( & ( ( ( * ( 6 $ ( F ( ( V ( b & + ( r 99E-99E-99 ( " ( & ( $ ( & ( B*.***.***.**9E,99 ( " (
0x057c88…057e1c Dummy {f00=0x006b, f01=0x0190, f02=» ) & 2 ) & ) " " BBZZZ.ZZZ.ZZZ.ZZ9.99- ) 0 " ) V " BBZZZ.ZZZ.ZZZ.ZZ9.99- ) f " ) ( ) * ) " p ) " r ) " ) " ) " r ) " t )
0x057e1c…057fb0 Dummy {f00=0x006b, f01=0x018e, f02=» ) ( * * * " * ( " * 6 " * D " * R " * ` " * n " * | " * " * " * " * ( * * ( * * $ p *
0x057fb0…058144 Dummy {f00=0x006b, f01=0x018e, f02=» ( + + $ w + $ + 0 ( + @ + L $ | + $ + l ( + | + $ + $ + ( + + $ + $ + ( +
0x058144…0582d8 Dummy {f00=0x006b, f01=0x0190, f02=» " , 9I , " , & & , 6 99BO , D " , X ( , h * , t " , ( , , $ , ( , , & + , BB99.99.99 , "
0x0582d8…05846c Dummy {f00=0x006b, f01=0x0190, f02=» * " , " m - ( - * # - * " $ - : " % - H " % - V " ( - d " * - r " - " , - ( - $ - & - & - & - & * - & - ( -
0x05846c…058600 Dummy {f00=0x006b, f01=0x0190, f02=» $ , . ( . ( . & + . 0 ) Z.ZZZ.ZZZ.ZZ9.99-B . > " ) . ` & . p ( . ~ * . & + . + Z.ZZZ.ZZZ.ZZ9.99-B . " + . & . ( . , . &
0x058600…058794 (0, 112) Dummy {f00=0x006c, f01=0x4068, f02=» ( . * . / " m / ( / * @R F 4 0R F 4 F / 6 M / R@ / d . ` & . p ( . ~ * . & + . + Z.ZZZ.ZZZ.ZZ9.99-B . " + . & . ( . , . &
0x058794…058928 Dummy {f00=0x006c, f01=0x018e, f02=» : H IDENT DIV743 TRA 4.2 81-05-06 F1 O1111 03.01.XXX.1 > : FRMTGP FRMTJT FRMTKT FRMTKV FRMTTA FRMTVO FRMXGP B & " FRMXJTV FRMXKTA FRMXTA1 FRMXVOF $$$TRA B > FRMTGPV ? FRMTJTF FRMTKTM 1 FRMTKV1 * FRMTTAX FRMTVO 8 4
0x058928…058abc Dummy {f00=0x006c, f01=0x0190, f02=» # $ $ 4 D o T $ d & t + - 2 4 9 ; @ B . J F " D
0x058abc…058c50 Dummy {f00=0x006c, f01=0x0190, f02=» " " " " * " 8 " F " T " b " p " ~ ( $ $ & $ ( $
0x058c50…058de4 Dummy {f00=0x006c, f01=0x0190, f02=»X " & $ & ( $ . 8 & H ( V b $ r ( ( $ & & $ & $ * & &
0x058de4…058f78 Dummy {f00=0x006c, f01=0x018e, f02=» $ . & XX " 0 & @ ZZZ N " b & r ( $ ( % $ & $ & $ *
0x058f78…05910c Dummy {f00=0x006c, f01=0x018e, f02=» $ . BBBZZ " . BBZZ > " R BZZ b " v BBZB " ( $ ( $ $
0x05910c…0592a0 Dummy {f00=0x006c, f01=0x0190, f02=» $ $ $ B999 ( " < & L & Z $ * h & x & BZZZZZZZZZZ " & ( & &
0x0592a0…059434 (0, 113) Dummy {f00=0x006c, f01=0x0190, f02=» ( & & . ZZ < " N BZZ.ZZ.ZZZ ^ " x BBX " ! BBX " ! $ . " XXXXXXE-XXXX " "
0x059434…0595c8 Dummy {f00=0x006c, f01=0x0190, f02=» & ' XE-XXE-XXE-XXB " ' 8 & H & V ( XXXXXXE-XXXX f " ( & ) XXX.XXXXX.XXBB " ) ( * + B*.***.***.**9.99-
0x0595c8…05975c Dummy {f00=0x006c, f01=0x0190, f02=» / BBZZZE-ZZZE-ZZE-ZZ " / ( 0 0 < & L 1 ZZ.ZZ.ZZ Z " 1 r 2 BZZZZZZZZZZ- " 2 3 BZZZZZZZZZZ- " 3 4 BZZZZ " 4 5
0x05975c…0598f0 Dummy {f00=0x006c, f01=0x018e, f02=» " ( * 9 " : & " < 4 " @ B " B P " D ^ " S l " Y z " m " ^ " ` " b " " d " j " (
0x0598f0…059a84 Dummy {f00=0x006c, f01=0x018e, f02=» ( = $ " & 0 > KONTOKORTZ > $ >" X & " h ? B*.***.***.**9.99- x " ? " ( @ & A START SUM* $ A" (
0x059a84…059c18 Dummy {f00=0x006c, f01=0x018e, f02=» & & * & * $ & 2 & VERSNR @ F DAGS-DATO T $ FE n & ~ G POST-DATO $ GE & H MASKIN NR $ HE I EKS.LBNR
0x059c18…059dac Dummy {f00=0x006c, f01=0x018e, f02=» | " K~E & L 99E-99E-99 & " L E @ & P M 999R ^ " M E r & N ***99 " N E & & & 6 2 0 O *VERSURKONTONR KASSEKONTONR PR
0x059dac…059f40 Dummy {f00=0x006c, f01=0x018e, f02=» v " Q E R ZZZ.ZZZ.ZZ9.ZZ-B " R E 8 & R H & V & * d ( r S ~ $ TE ( T & & * & * & U KASSELUKNING
0x059f40…05a0d4 (0, 114) Dummy {f00=0x006c, f01=0x0190, f02=» $ WE & X KREDIT " $ XE 8 ( H Y T $ ZE d ( t Z & [ ZZ " [ E " BBZZZ.ZZZ.ZZZ.ZZ9.99-O " S " ] BBZZZ.ZZ
0x05a0d4…05a268 Dummy {f00=0x006c, f01=0x0190, f02=» a SLUT TESTT $ a ( 0 b < & L c DISKETTE SKIFT Z $ c x ( d & $ e ( e $ $ f BZZZ " f
0x05a268…05a3fc Dummy {f00=0x006c, f01=0x018e, f02=» ( j & i & k 99BR 4 " k H & X l 99 f " l x ( m $ n ( n & & DIVERSE FORMATER (
0x05a3fc…05a590 Dummy {f00=0x006c, f01=0x0190, f02=» " u " ~ " $ " 2 " @ " N " " j " x " " " " " " ( p $ qI
0x05a590…05a724 Dummy {f00=0x006c, f01=0x0190, f02=»" s & t **BS " t 0 $ & @ $ P ( ` u l $ v | ( v $ & w ******E-**** " w & * &
0x05a724…05a8b8 Dummy {f00=0x006c, f01=0x018e, f02=»**B " z & { ZZZZZZZZZZB* , " { H & X & f | BBZZ.ZZ.ZZBBBR v " | & } ZZZZ9999.99B " } $ , $ (
0x05a8b8…05aa4c Dummy {f00=0x006c, f01=0x018e, f02=» z " & & * ( $ 6 ( F R $ b $ r $ ( $ $ $ ( (
0x05aa4c…05abe0 Dummy {f00=0x006c, f01=0x0190, f02=» ( ( 0 < ( L X ( h t ( ( ( & + & &
0x05abe0…05ad74 (0, 115) Dummy {f00=0x006c, f01=0x0190, f02=» B999B " " ( 2 > & N *.***.***.**9.99- " ~ & & ( & & 99.99.99B. "
0x05ad74…05af08 Dummy {f00=0x006c, f01=0x0190, f02=» B*.***.***.**9.99- " " & 2 & @ ( N Z B99B j " ~ & & & ZZ.ZZ.ZZB* " ( &
0x05af08…05b09c Dummy {f00=0x006c, f01=0x018e, f02=» & + & $ & $ B99.99.99* 4 " N B99B ^ " r $ B999 " BXXB " ( XXBS
0x05b09c…05b230 Dummy {f00=0x006c, f01=0x018e, f02=» XX " & & XX 4 " F & V XX.XXPPO d " | & ( *.***.***.**9.99-- " & & (
0x05b230…05b3c4 Dummy {f00=0x006c, f01=0x0190, f02=» * " m " & " 4 " B " P " ^ " l " z " " " " " " " " "
0x05b3c4…05b558 Dummy {f00=0x006c, f01=0x0190, f02=» $ $ . & & . *.***.***.**9.99+- < " ^ & n ( | & + $ ( & $ & B99.99.99.
0x05b558…05b6ec Dummy {f00=0x006c, f01=0x0190, f02=» $ $ ( , & + < $ J ( Z f $ v & & 0 $ ( $ ( $
0x05b6ec…05b880 Dummy {f00=0x006c, f01=0x018e, f02=» & + 999B & " : B99.99.99B J " d ****9 t " -E $ $ & TOTAL $
0x05b880…05ba14 (0, 116) Dummy {f00=0x006d, f01=0x0190, f02=» & 999S " * BB99.99.99 : " T BBZ999 d " } z BB****9. " & - $ - & & & &
0x05ba14…05bba8 Dummy {f00=0x006d, f01=0x0190, f02=» T[LLER $ - & * & NETTOS 8 & L DEBET Z $ E p & KREDIT $ E ( $ E ( & 2
0x05bba8…05bd3c Dummy {f00=0x006d, f01=0x0190, f02=»" " BBZZZ.ZZZ.ZZZ.ZZ9.99- ! " o T ! 4 " BBZZZ.ZZZ.ZZZ.ZZ9.99- ! F " o T ! l ( ! ~ ! $ ! ( ! ! & 2 ! ZZ ! " ! " BBZZZ.ZZZ.
0x05bd3c…05bed0 Dummy {f00=0x006d, f01=0x0190, f02=» T ! ( " " $ " ( ( " 8 9 " D & 4 " T & TOTALS " b " BBZZZ.ZZZ.ZZZ.ZZ9.99- " v " " " BBZZZ.ZZZ.ZZZ.ZZ9.99- " " " " BBZZZ.ZZZ.ZZZ.ZZ9.99- "
0x05bed0…05c064 Dummy {f00=0x006d, f01=0x0190, f02=»Z.ZZ9.99- " | " L # " BBZZZ.ZZZ.ZZZ.ZZ9.99- # $ " L # J & # & 2 # j & KORL # x & # " BBZZZ.ZZZ.ZZZ.ZZ9.99- # " L # " BBZZZ.ZZZ.ZZZ.ZZ9.99- # " L #
0x05c064…05c1f8 Dummy {f00=0x006d, f01=0x0190, f02=» # & PRIMO $ " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ " P $ D & $ T & $ b & 2 $ p & BEV $ ~ " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ " $ " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ " $ " BBZZ
0x05c1f8…05c38c Dummy {f00=0x006d, f01=0x0190, f02=» $ & % ( % % " $ L % 2 ( % B * % N & % ^ & % l 999B % z " L % B99.99.99. % " L % & % BEHOLDNINGST[LLERE % $ L %
0x05c38c…05c520 Dummy {f00=0x006d, f01=0x0190, f02=»$ L % & & KONTONRI & $ L & 4 & & D BEV.PERIODET & R $ L & n & & ~ SALDO & $ L & & & ( & & $ L & ( & &
0x05c520…05c6b4 (0, 117) Dummy {f00=0x006d, f01=0x0190, f02=»99- & v " i I ' " BBZZZ.ZZZ.ZZZ.ZZ9.99- ' " i I ' D ( ' V ' b & 2 ' r & ' ( ' ' & ' $ ' ( ' ' & $ ' & < ' & < '
0x05c6b4…05c848 Dummy {f00=0x006d, f01=0x0190, f02=» [ ' & ( ( ( ( $ $ ( 4 ( ( D ( P & + ( ` 99E-99E-99 ( n " ( & ( $ ( & ( B*.***.***.**9E,99 ( " ( & * ( &
0x05c848…05c9dc Dummy {f00=0x006d, f01=0x0190, f02=» & 2 ( & ) " BBZZZ.ZZZ.ZZZ.ZZ9.99- ) " ) B " BBZZZ.ZZZ.ZZZ.ZZ9.99- ) R " ) x ( ) * ) " p ) " u ) " ) " ) " u ) " p ) " u )
0x05c9dc…05cb70 Dummy {f00=0x006d, f01=0x0190, f02=» * * " * " * " " * 0 " * > " * L " * Z " * h " * v " * " * " * ( * * ( * * $ p * $ *
0x05cb70…05cd04 Dummy {f00=0x006d, f01=0x018e, f02=» * $ + $ + ( + * + 6 $ + F $ + V ( + f + r & + & + & + & + *.***.***.**9.99-. + " + B99. + "
0x05cd04…05ce98 Dummy {f00=0x006d, f01=0x0190, f02=» ( , , $ , ( , 0 , < & + , L BB99.99.99 , Z " , t & , ! *.***.***.**9.99-. , " ! , & , " TRP , $ " , ( , * #
0x05ce98…05d02c Dummy {f00=0x006d, f01=0x0190, f02=» " - , ( - % - & - * & - 8 & - F & * - T & - b ( - p & - | $ ' - ( - ' - & 0 - & - ( *.***.***.**9.99+B - " ( -
0x05d02c…05d1c0 Dummy {f00=0x006d, f01=0x416a, f02=» + - & + . , Z.ZZZ.ZZZ.ZZ9.99-B . " , . < & . L ( . Z - . f & . v & . & . & . & . & . & . ( . * . . " m . ( .
0x05d1c0…05d354 (0, 118) Dummy {f00=0x006d, f01=0x0190, f02=» : H IDENT DIV805 TRA 4.2 81-05-06 F1 O1111 03.01.XXX.1 > : FRMBUD FRMBUP FRMTGP FRMTJT FRMTKT FRMTKV FRMTTA B 6 2 FRMTVOV FRMXGPA FRMXJT1 FRMXKTF FRMXTA FRMXVOX $$$TRA B > FRMBUDV M FRMBUPF T FRMTGPM ? FRMTJTT FRMTKTX 1 FRM
0x05d354…05d4e8 Dummy {f00=0x006d, f01=0x0190, f02=» @ 0 = @ P > ` p y $ & + - ! 2 4 # 9 ; 7
0x05d4e8…05d67c Dummy {f00=0x006d, f01=0x018e, f02=» I N P H U . W > * N " ^ " l " z " " " " " " " " "
0x05d67c…05d810 Dummy {f00=0x006d, f01=0x0190, f02=» $ ( ( 4 $ D $ % T & d $ + r & & X " & $ ' $ 5 & (
0x05d810…05d9a4 Dummy {f00=0x006d, f01=0x0190, f02=» & & & 99 * " < & L ZZ.ZZ.ZZ Z " r BBZ " $ 5 & XX " & ZZZ
0x05d9a4…05db38 Dummy {f00=0x006d, f01=0x018e, f02=» ' $ + & & * & 8 99 F " X & h ZZ.ZZ.ZZ v " & $ 5 BBBZZ " BBZZ "
0x05db38…05dccc Dummy {f00=0x006d, f01=0x0190, f02=» $ $ & ( $ 6 & F $ 7 T ( d p $ ( $ $ % B999 " & &
0x05dccc…05de60 Dummy {f00=0x006d, f01=0x0190, f02=»$ & $ / ( , 8 & H & V & d 99B r " $ ( $ % $ ' $ + (
0x05de60…05dff4 (0, 119) Dummy {f00=0x006d, f01=0x0190, f02=» " BBX " " $ 5 . # XXXXXXE-XXXX > " # Z $ BXX j " $ ~ ( % & B999V99V999E-99B " & ( ' &
0x05dff4…05e188 Dummy {f00=0x006d, f01=0x0190, f02=» * XXX.XXXXX.XXBB " * ( * + 6 , B*.***.***.**9.99- F " , h & x ( - . XXXXXXXXE-XX " . ( / & 0 XXX
0x05e188…05e31c Dummy {f00=0x006d, f01=0x0190, f02=»" 3 # 4 BXX.XX.XXX " 4 $ ( ( 8 5 D 6 BBZZZVZZVZZZE-ZZ T " 6 t ( 7 & 8 ZZ.ZZ.ZZ " 8 9 BZZZZZZZZZZZ " 9 :
0x05e31c…05e4b0 Dummy {f00=0x006d, f01=0x018e, f02=» " = # > BZZ.ZZ.ZZZ " > $ * ? BZ : " ? " L ( * @ h " A x " C " G " I " K " Z " ` " w " e " g "
0x05e4b0…05e644 Dummy {f00=0x006d, f01=0x0190, f02=» B KVIT $ B" ( * C 6 & F $ D" T ( d D p $ " & E KONTOKORTZ $ E" & " F B*.***.***.**9.99- " F "
0x05e644…05e7d8 Dummy {f00=0x006d, f01=0x018e, f02=» SUM $ J" ( K * $ L" : ( J L K V & f & * t & * & & VERSNR M DAGS-DATO $ ME & N POST-DATO $
0x05e7d8…05e96c Dummy {f00=0x006d, f01=0x018e, f02=» & Q 99.99.999.9 " QCE . & > R 99E-99E-99 L " R~E f & v S 99E-99E-99 " S E & T 999R " T E & U ***99 "
0x05e96c…05eb00 Dummy {f00=0x006d, f01=0x0190, f02=» & W 999V99V999E-99BK " W E 6 X 999V99V999E-99BK F " X E f Y ZZZ.ZZZ.ZZ9.ZZ-K v " Y E & Y & & * ( Z $ [E (
0x05eb00…05ec94 (0, 120) Dummy {f00=0x006e, f01=0x0190, f02=» & ] T[LLER $ ]E , & < ^ DEBET J $ ^E ` & p _ KREDIT ~ $ _E ( ` $ aE ( a & b ZZ
0x05ec94…05ee28 Dummy {f00=0x006e, f01=0x0190, f02=» e f START TEST $ f 4 ( D g P h SLUT TESTT ` $ h | ( i & j DISKETTE SKIFT $ j ( k &
0x05ee28…05efbc Dummy {f00=0x006e, f01=0x018e, f02=» " n & o ADM $ o 2 p BZZR B " p V ( f q r & p r 99BR " r & s 99 " s ( t &
0x05efbc…05f150 Dummy {f00=0x006e, f01=0x0190, f02=» x & & DIVERSE FORMATER " ( @ * y L " z " j " x " " " z " " " " " " z "
0x05f150…05f2e4 Dummy {f00=0x006e, f01=0x018e, f02=» " " " " * " 8 " F ( T z ` $ {I p ( { $ I & I & | B**B " | } ZZ.ZZ.ZZBM
0x05f2e4…05f478 Dummy {f00=0x006e, f01=0x0190, f02=» ( $ $ & 4 ******E-**** B " ^ & * n & | & * $ ( $ ( $
0x05f478…05f60c Dummy {f00=0x006e, f01=0x0190, f02=»Z.ZZBBBR " & ZZZZ9999.99B . " J $ - Z $ j ( z $ ( & + & & 99.99.99B9
0x05f60c…05f7a0 Dummy {f00=0x006e, f01=0x0190, f02=»" BZZZZZZZZZZB " * & : & * J $ X ( h t $ $ $ ( $ $ $ (
0x05f7a0…05f934 (0, 121) Dummy {f00=0x006e, f01=0x0190, f02=» ( $ ( 4 @ ( P ( l x ( ( ( ( & +
0x05f934…05fac8 Dummy {f00=0x006e, f01=0x0190, f02=» 99 " ( , B999.99.999.99B < " *.***.***.**9.99- l " & & ( & & 99.99.99B.
0x05fac8…05fc5c Dummy {f00=0x006e, f01=0x0190, f02=» $ B*.***.***.**9.99- " 2 & B & P ( ^ j B99B z " & & & ZZ.ZZ.ZZB* " (
0x05fc5c…05fdf0 Dummy {f00=0x006e, f01=0x0190, f02=» & + & & 99.99.99B* 4 " N 999B ^ " r $ BXX. " ( XX " E-9999999999
0x05fdf0…05ff84 Dummy {f00=0x006e, f01=0x0190, f02=» XX " & , XX : " L E-9999999999B9 " z XX.XXPPO " & ( *.***.***.**9.99-- "
0x05ff84…060118 Dummy {f00=0x006e, f01=0x0190, f02=» ****9 " ( * , " w < " J " X " f " t " " " " " " " " " "
0x060118…0602ac Dummy {f00=0x006e, f01=0x018e, f02=» & + & ARKIV * $ @ $ 5 P & ` & n *.***.***.**9.99+- | " & ( $ $ (
0x0602ac…060440 Dummy {f00=0x006e, f01=0x018e, f02=» $ ( ( 4 $ D & T & 0 b & 0 p & 0 ~ & 0 $ " ( $ ( & +
0x060440…0605d4 (0, 122) Dummy {f00=0x006e, f01=0x0190, f02=» $ & TOTAL & $ < *.***.***.**9,99+- L " n & ~ ( $ ( < & + & 999S "
0x0605d4…060768 Dummy {f00=0x006e, f01=0x0190, f02=» - $ - ! & ! & ! * & ! 8 & ! F & ! T & 2 ! b & * ! p & * ! ~ & * ! & 4 ! KONTONRO ! $ - ! & ! T[LLER ! $ - ! &
0x060768…0608fc Dummy {f00=0x006e, f01=0x0190, f02=»( ! " $ E " ( " * " 6 & 2 " F XXXVXXVXXX.XX, " T " " r & " 99 " " " " BBZZZ.ZZZ.ZZZ.ZZ9.99- " " " " BBZZZ.ZZZ.ZZZ.ZZ9.99- "
0x0608fc…060a90 Dummy {f00=0x006e, f01=0x0190, f02=» " & 2 # ZZ # " # 0 " BBZZZ.ZZZ.ZZZ.ZZ9.99- # @ " # f " BBZZZ.ZZZ.ZZZ.ZZ9.99- # v " T # " BBZZZ.ZZZ.ZZZ.ZZ9.99- # " T # ( # # $
0x060a90…060c24 Dummy {f00=0x006e, f01=0x0190, f02=»ZZZ.ZZZ.ZZZ.ZZ9.99- # " $ " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ , " $ R & $ b & 4 $ p & SUPL $ ~ " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ " $ " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ " L $ " BB
0x060c24…060db8 Dummy {f00=0x006e, f01=0x0190, f02=» $ r " L % " BBZZZ.ZZZ.ZZZ.ZZ9.99- % " L % @ ( % R % ^ $ % n ( % ~ 4 % & 4 % 999E-99999E-99 % " % & % & PRIMO % " BBZZZ.ZZ
0x060db8…060f4c Dummy {f00=0x006e, f01=0x018e, f02=» " % " BBZZZ.ZZZ.ZZZ.ZZ9.99- & " & 6 " BBZZZ.ZZZ.ZZZ.ZZ9.99- & F " & l & & | & 2 & & ULTIMO & " BBZZZ.ZZZ.ZZZ.ZZ9.99- & " L & & & ( & &
0x060f4c…0610e0 Dummy {f00=0x006e, f01=0x0190, f02=» " L ' & ' BEHOLDNINGST[LLERE ' " $ L ' D & ' T & ' b & ' p & ' ~ & 2 ' & * ' & * ' & 4 ' T[LLER ' $ L ' & ' KONTONRI
0x0610e0…061274 (0, 123) Dummy {f00=0x006e, f01=0x0190, f02=»& ' ( ( ( $ L ( ( ( ( 8 ( D & 2 ( T ZZ ( b " L ( t & ( XXXVXXVXXX.XXL ( " i I ( " BBZZZ.ZZZ.ZZZ.ZZ9.99- ( " i I ( " BBZZZ.
0x061274…061408 Dummy {f00=0x006e, f01=0x018e, f02=» $ ) ( ) ) & $ ) 0 & < ) > & < ) L & < ) Z & ] ) h & N ) v & N ) & N ) & E ) & S ) & S ) & S ) & [ ) & ) ( )
0x061408…06159c Dummy {f00=0x006e, f01=0x018e, f02=» & * B*.***.***.**9E,99 * " * 4 & * * D & * R ZZ999999 * ` " * x & * ( * * $ * ( * * & 2 * & * " BBZZZ.
0x06159c…061730 Dummy {f00=0x006e, f01=0x018e, f02=» ( + % + & 2 + & + . TOTAL + > $ + T & + d & + r & 2 + XXXE-XXXXXE-XX + " + & + XX + " + & + " BBZZ
0x061730…0618c4 Dummy {f00=0x006e, f01=0x0190, f02=» " BBZZZ.ZZZ.ZZZ.ZZ9,99- , " , * ( , : * ! , F " z , V " , d " " , r " " , " , " z , " , " , " , " , " , " z , " z ,
0x0618c4…061a58 Dummy {f00=0x006e, f01=0x0190, f02=»" % , " & - " ( - " , - ( " $ - 6 " % - D " $ - R " % - ` " % - n " & - | " ' - " % - " % - " % - " % - ( - $ - ( - % -
0x061a58…061bec Dummy {f00=0x006e, f01=0x018e, f02=» $ 2 - ( . ( . $ ) . , ( . < ) . H $ . X $ . h & . x * XX.XXPPO . " * . + BXXO . " + . & . $ . ( . , .
0x061bec…061d80 Dummy {f00=0x006e, f01=0x0190, f02=» & / / B**O / " / / ( 0 B**O / 8 " 0 / L & / & / j 1 B**O / x " 1 / $ / ( / 2 / & / & / & / & /
0x061d80…061f14 (0, 124) Dummy {f00=0x006f, f01=0x0190, f02=» 99BO / " 6 0 ( 0 * 7 0 * " 8 0 : ( 0 H 8 0 T $ 9 0 d ( 0 t 9 0 & + 0 : BB99.99.99 0 " : 0 & 0 ; *.***.***.**9.99-, 0 " ; 0
0x061f14…0620a8 Dummy {f00=0x006f, f01=0x0190, f02=»" @ 0 " @ 1 " C 1 " E 1 ( " 1 6 " G 1 D ( 1 R ? 1 ^ & 1 n & 1 | & 1 & * 1 & 1 ( 1 @ 1 $ A 1 ( 1 A 1 & 0 1
0x0620a8…06223c Dummy {f00=0x006f, f01=0x0190, f02=»Z.ZZZ.ZZ9.99-B 1 " D 2 & 2 & ( 2 4 E 2 @ & + 2 P F Z.ZZZ.ZZZ.ZZ9.99-B 2 ^ " F 2 & 2 ( 2 G 2 & 2 & 2 & 2 & 2 & 2 & 2
0x06223c…0623d0 Dummy {f00=0x006f, f01=0x0190, f02=» R 2 " V 3 " Z 3 " ] 3 & " J 3 4 " L 3 B " N 3 P " w 3 ^ " w 3 l " P 3 z " T 3 " X 3 " [ 3 " ^ 3 ( 3 I 3 $ ` 3 $ b 3 $ e 3
0x0623d0…062564 Dummy {f00=0x006f, f01=0x0190, f02=» L 3 $ ` 4 $ z 4 ( 4 0 M 4 < $ ` 4 L $ x 4 ( 4 l N 4 x $ ` 4 $ z 4 ( 4 O 4 $ ` 4 $ s 4 $ n 4 ( 4 P
0x062564…0626f8 Dummy {f00=0x006f, f01=0x0190, f02=» 4 & 5 S ZZZ9 5 " S 5 * & 5 : $ n 5 H ( 5 X T 5 d $ ` 5 t & 5 U BZZZZVZZZVZZ9- 5 " U # 5 ( 5 V 5 $ `# 5 W 99 5 " W 5
0x0626f8…06288c Dummy {f00=0x006f, f01=0x0190, f02=» ( 6 Z 6 $ `# 6 $ q# 6 0 $ u# 6 @ ( 6 P [ 6 $ `# 6 l & 6 | BZZZZVZZZVZZ9- 6 " # 6 ( 6 ] 6 $ `# 6 $ q# 6 $ u# 6 (
0x06288c…062a20 Dummy {f00=0x006f, f01=0x0190, f02=»99 6 " a # 7 ( 7 b 7 & c 9I 7 6 " c 7 H d B999E-99E-999E-99B 7 X " d 7 z ( 7 e 7 & * 7 f ZZZZZZZZZX-9 7 " f 7 g ZZZZZZZZZX-9 7 " g 7
0x062a20…062bb4 (0, 125) Dummy {f00=0x006f, f01=0x018e, f02=» k ZZZZZZZZZX-9 7 " k 8 l ZZZZZZZZZX-9 8 , " l 8 H m ZZZZZZZZZX-9 8 X " m 8 t & m 8 ( 8 n 8 & * 8 & 8 o 999E-99E-999E-99 8 " o 8 & 8
0x062bb4…062d48 Dummy {f00=0x006f, f01=0x0190, f02=» 8 ( 9 s 9 $ q 9 $ t 99 9 4 " t 9 F & 9 V ( 9 d u 9 p & * 9 & 9 v 9999 9 " v 9 & 9 w BZZZZVZZZVZZX- 9 " w 9 & w 9
0x062d48…062edc Dummy {f00=0x006f, f01=0x018e, f02=» z 9 & * : { ZZZZZZZZZ9-9 : " { : 8 | ZZZZZZZZZ9-9 : H " | : d } ZZZZZZZZZ9-9 : t " } ! : ~ ZZZZZZZZZ9-9 : " ~ " : ZZZZZZZZZ9-9 : " # : ZZZZZZZZ
0x062edc…063070 Dummy {f00=0x006f, f01=0x4132, f02=» : ; & + ; & ; & & ; 4 XXVXXVXX ; B " ~& ; Z & ; j & ; x & ; ( ; * ; " w ; ( ; * ; " w ; ( ; $ @R F 4 0R F 4 0
0x063070…063204 Dummy {f00=0x006f, f01=0x0190, f02=» : H IDENT DIV539 TRA 4.2 - - F1 O1111 03.01.XXX.1 > : FRMBUD FRMBUP FRMTGP FRMTJT FRMTKT FRMTKV FRMTTA B 6 2 FRMTVOV FRMXGPA FRMXJT FRMXKTF FRMXTA FRMXVOX $$$TRA B > FRMBUDV I FRMBUPF P FRMTGPM = FRMTJTT FRMTKTX 0 FRM
0x063204…063398 Dummy {f00=0x006f, f01=0x0190, f02=» @ 0 z @ P 0 ` p { # % * , 1 3 8 : ,
0x063398…06352c Dummy {f00=0x006f, f01=0x018e, f02=» F z J L : Q . S u > * N " ^ " l " z " " " " " " " " "
0x06352c…0636c0 Dummy {f00=0x006f, f01=0x0190, f02=» $ ( ( 4 $ D $ % T & d $ + r & & X " & $ ' $ 5 & (
0x0636c0…063854 (0, 126) Dummy {f00=0x006f, f01=0x0190, f02=» & & 99 " . & > ZZ.ZZ.ZZ L " d BBZ t " $ 5 & XX " & ZZZ "
0x063854…0639e8 Dummy {f00=0x006f, f01=0x0190, f02=»$ + & & 99 * " < & L ZZ.ZZ.ZZ Z " r & $ 5 BBBZZ " BBZZ " BZZ "
0x0639e8…063b7c Dummy {f00=0x006f, f01=0x0190, f02=» & $ & ( $ 7 6 ( F R $ b ( r ~ $ $ % B999 " & $ + & &
0x063b7c…063d10 Dummy {f00=0x006f, f01=0x0190, f02=» ( & & * & 8 99B F " Z $ j ( z $ % $ ' $ + ( & ZZ "
0x063d10…063ea4 Dummy {f00=0x006f, f01=0x0190, f02=» # XXXXXXE-XXXX " # $ BXX 0 " $ D ( T % ` & B999E-999E-99E-99B p " & ( ' & ( XE-XXE-XXE-XXB " ( &
0x063ea4…064038 Dummy {f00=0x006f, f01=0x0190, f02=» + , B*.***.***.**9.99- " , 0 & @ ( N - Z . XXXXXXXXE-XX j " . ( / & 0 XXX " 0 1 BXXXXXXXXXXX " 1
0x064038…0641cc Dummy {f00=0x006f, f01=0x0190, f02=» ( 5 6 BBZZZE-ZZZE-ZZE-ZZ " 6 > ( N 7 Z & j 8 ZZ.ZZ.ZZ x " 8 9 BZZZZZZZZZZ- " 9 : BZZZZZZZZZ " : ; BZZZZ
0x0641cc…064360 Dummy {f00=0x006f, f01=0x0190, f02=» ? BZ " ? " ( & * @ 2 " A B " C P " G ^ " J l " L z " [ " a " z " f " i " l " " n " t
0x064360…0644f4 (0, 127) Dummy {f00=0x006f, f01=0x018e, f02=» C & $ D" ( , D 8 $ " H & X E KONTOKORTZ f $ E" & " F B*.***.***.**9.99- " F " ( G & H STAR
0x0644f4…064688 Dummy {f00=0x006f, f01=0x0190, f02=» ( L $ M" $ ( 4 M K @ & P & * ^ & * l & z & VERSNR N DAGS-DATO $ NE & O POST-DATO $ OE &
0x064688…06481c Dummy {f00=0x006f, f01=0x0190, f02=» 99.99.999.9 " RCE & & S 99E-99E-99 4 " S~E N & ^ T 99E-99E-99 l " T E & U 999R " U E & V ***99 " V E &
0x06481c…0649b0 Dummy {f00=0x006f, f01=0x0190, f02=» X 999E-99999E-99BB " X E Y 999E-99999E-99BB , " Y E L Z ZZZ.ZZZ.ZZ9.ZZ-B " Z E | & Z & & * ( [ $ E ( &
0x0649b0…064b44 Dummy {f00=0x006f, f01=0x0190, f02=» ^ T[LLER $ ^E & " _ DEBET 0 $ _E F & V ` KREDIT d $ `E z ( a $ bE ( b & c ZZ " c E " d
0x064b44…064cd8 Dummy {f00=0x006f, f01=0x018e, f02=»& g START $ g " h TEST 2 $ h H ( X i d j SLUT t $ j k TEST $ k ( l & m DISKETTE SKIFT
0x064cd8…064e6c Dummy {f00=0x006f, f01=0x0190, f02=» " p q B*.***.***.**9.99- " q 6 & F r ADM T $ r h s BZZR x " s ( t & s u 99BR " u & v 99
0x064e6c…065000 Dummy {f00=0x006f, f01=0x0190, f02=» ( z & & DIVERSE FORMATER * ( H * { T " | d " r " " " " | " " " " " " |
0x065000…065194 (0, 128) Dummy {f00=0x0070, f01=0x018e, f02=»& I & ~ B**B " ~ 0 ZZ.ZZ.ZZBM @ " Z & j B**B x " $ ' $ ( $ ( $
0x065194…065328 Dummy {f00=0x0070, f01=0x0190, f02=» $ ( ( 4 $ D BBB**B T " j & z ZZZZZZZZZZB* " & & BBZZ.ZZ.ZZBBBR " &
0x065328…0654bc Dummy {f00=0x0070, f01=0x018e, f02=» & + & " & 0 999B > " R $ b B99.99.999 r " & 99 " B999 " BZZZZZZZZZZB
0x0654bc…065650 Dummy {f00=0x0070, f01=0x0190, f02=» ( $ $ $ 4 $ D ( T ` & + p & ~ & 999B " $ B99.99.99Z " &
0x065650…0657e4 Dummy {f00=0x0070, f01=0x0190, f02=» " & & " ( 0 < & L & Z 99.99.99B. h " & Y B999B " 99BS " (
0x0657e4…065978 Dummy {f00=0x0070, f01=0x0190, f02=» " & & $ & 2 ZZ.ZZ.ZZB* @ " Z ( j v & $ ' B*.***.***.**9.99- " & & $ ' (
0x065978…065b0c Dummy {f00=0x0070, f01=0x0190, f02=» BXX. " ( , 8 XX H " Z E-9999999999B9 j " XX.XXPPO " BXBS " ( &
0x065b0c…065ca0 Dummy {f00=0x0070, f01=0x018e, f02=» XX.XXPPO " & ( ( 6 B *.***.***.**9.99-- R " t & & ( & ****9 " &
0x065ca0…065e34 (0, 129) Dummy {f00=0x0070, f01=0x0190, f02=» " " " $ " 2 " @ " N " " j " x " " " " " ( $ (
0x065e34…065fc8 Dummy {f00=0x0070, f01=0x018e, f02=»*.***.**9.99+- " & & ( 4 @ $ P $ ` ( p | & + $ ( $ & & 0 $ (
0x065fc8…06615c Dummy {f00=0x0070, f01=0x018e, f02=» & 0 $ ( " . $ > ( N Z & + j 999B x " B99.99.99B " ****9 " -E $
0x06615c…0662f0 Dummy {f00=0x0070, f01=0x0190, f02=» ( $ ( 0 < < & + L & Z 999S h " | BB99.99.99 " BBZ999 " } BB****9. " &
0x0662f0…066484 Dummy {f00=0x0070, f01=0x0190, f02=» & * & 4 KONTONRO $ - 8 & H T[LLER V $ - l & | & NETTOS & DEBET $ E & KREDIT $ E
0x066484…066618 Dummy {f00=0x0070, f01=0x0190, f02=» 99 ! " ! " BBZZZ.ZZZ.ZZZ.ZZ9.99- ! * " ! P " BBZZZ.ZZZ.ZZZ.ZZ9.99- ! ` " o T ! " BBZZZ.ZZZ.ZZZ.ZZ9.99- ! " o T ! ( ! ! $ ! ( !
0x066618…0667ac Dummy {f00=0x0070, f01=0x0190, f02=»ZZZ.ZZ9.99- ! ~ " T " " BBZZZ.ZZZ.ZZZ.ZZ9.99- " & " T " L ( " ^ " j $ " z ( " 9 " & 4 " & TOTALS " " BBZZZ.ZZZ.ZZZ.ZZ9.99- " " " " BB
0x0667ac…066940 Dummy {f00=0x0070, f01=0x018e, f02=» " " BBZZZ.ZZZ.ZZZ.ZZ9.99- # " # . " BBZZZ.ZZZ.ZZZ.ZZ9.99- # > " L # d " BBZZZ.ZZZ.ZZZ.ZZ9.99- # v " L # & # & 2 # & KORL # & # " BBZZZ.ZZZ.ZZZ.ZZ9.99-
0x066940…066ad4 (0, 130) Dummy {f00=0x0070, f01=0x0190, f02=» 4 $ & 4 $ 999E-99999E-99 $ " " $ @ & $ P & PRIMO $ ^ " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ r " P $ & $ & $ & 2 $ & BEV $ " BBZZZ.ZZZ.ZZZ.ZZ9.99- $
0x066ad4…066c68 Dummy {f00=0x0070, f01=0x0190, f02=» & 2 % & ULTIMO % " BBZZZ.ZZZ.ZZZ.ZZ9.99- % & " L % L & % ( % j % v $ L % ( % * % & % & % 999B % " L % B99.99.99. %
0x066c68…066dfc Dummy {f00=0x0070, f01=0x0190, f02=» & 2 & & * & & * & & 4 & . T[LLER & < $ L & R & & b KONTONRI & p $ L & & & BEV.PERIODET & $ L & & & SALDO & $ L &
0x066dfc…066f90 Dummy {f00=0x0070, f01=0x0190, f02=» & XXXE-XXXXXE-XX ' " i I ' ( " BBZZZ.ZZZ.ZZZ.ZZ9.99- ' : " i I ' ` " BBZZZ.ZZZ.ZZZ.ZZ9.99- ' r " i I ' ( ' ' & 2 ' & ' ( ' ' & '
0x066f90…067124 Dummy {f00=0x0070, f01=0x0190, f02=» N ' & N ( & E ( & S ( & & S ( 4 & S ( B & [ ( P & ( ^ ( ( l ( x $ ( ( ( ( & + ( 99E-99E-99 ( " ( & ( $ (
0x067124…0672b8 Dummy {f00=0x0070, f01=0x018e, f02=»& ( ( ) ) $ ) ( ( ) 8 ) D & 2 ) T & ) b " BBZZZ.ZZZ.ZZZ.ZZ9.99- ) p " ) " BBZZZ.ZZZ.ZZZ.ZZ9.99- ) " ) ( ) ) $ )
0x0672b8…06744c Dummy {f00=0x0070, f01=0x018e, f02=» XXXE-XXXXXE-XX * " * " & * 2 XX * @ " * R & * b " BBZZZ.ZZZ.ZZZ.ZZ9,99- * r " * & * & * & * " BBZZZ.ZZZ.ZZZ.ZZ9,99- * " * "
0x06744c…0675e0 Dummy {f00=0x0070, f01=0x0190, f02=» " + " | + " + " + . " + < " + J " + X " | + f " | + t " | + " | + ( + + & + + $ + $ + ( + * + "
0x0675e0…067774 (0, 131) Dummy {f00=0x0070, f01=0x0190, f02=» " + " , " , " , * " , 8 ( , F , R ( , b , n $ | , ~ $ ' , ( , , $ , $ ' , ( , , $ ,
0x067774…067908 Dummy {f00=0x0070, f01=0x0190, f02=» XX.XXPPO , " - BXXO - & " - : & - J $ - X ( - h ! - t $ " - ( - " - $ - $ - & - # XX.XXPPO - " # -
0x067908…067a9c Dummy {f00=0x0070, f01=0x0190, f02=» " & - $ . ( . ' . , & . < & . L & . & . j ( *.***.***.**9.99-, . x " ( . ) B99. . " ) . * 9I . " * . & . + 99
0x067a9c…067c30 Dummy {f00=0x0070, f01=0x0190, f02=»*.***.**9.99-, . " . / & / & / TRP / 4 $ / / H ( / X * 0 / d " 1 / t " 2 / " 2 / " 5 / " 7 / " / " 9 / ( / 1 / & / & /
0x067c30…067dc4 Dummy {f00=0x0070, f01=0x018e, f02=»& / 4 *.***.***.**9.99+B 0 " 4 0 . $ 9 0 > ( 0 N 5 0 Z & + 0 j 6 Z.ZZZ.ZZZ.ZZ9.99-B 0 x " 6 0 & 0 ( 0 7 0 & + 0 8 Z.ZZZ.ZZZ.ZZ9.99-B 0 "
0x067dc4…067f58 Dummy {f00=0x0070, f01=0x018e, f02=» & 1 ( 1 * : 1 " ; 1 . " = 1 < " ? 1 J " z 1 X " z 1 f " A 1 t " D 1 " H 1 " L 1 " O 1 " < 1 " > 1 " @ 1 " z 1 " z 1 " B 1
0x067f58…0680ec Dummy {f00=0x0070, f01=0x0190, f02=» ( 2 < 2 $ R 2 $ l 2 0 ( 2 @ = 2 L $ R 2 $ j 2 l ( 2 | > 2 $ R 2 $ l 2 ( 2 ? 2 $ R 2 $ j 2 ( 2 @
0x0680ec…068280 Dummy {f00=0x0070, f01=0x018e, f02=» 2 $ R 3 & 3 C BZZZZVZZZVZZZ- 3 & " C # 3 D ( 3 T D 3 ` $ R# 3 p $ e# 3 & 3 E ZZZ9 3 " E 3 & 3 $ ` 3 ( 3 F 3 $ R 3
0x068280…068414 (0, 132) Dummy {f00=0x0071, f01=0x0190, f02=» 3 & 4 $ ` 4 ( 4 & J 4 2 $ R 4 B & 4 R K BZZZZVZZZVZZ9- 4 ` " K # 4 ~ ( 4 L 4 $ R# 4 $ c# 4 $ g# 4 ( 4 M 4 $ R# 4
0x068414…0685a8 Dummy {f00=0x0071, f01=0x018e, f02=»( 4 P 5 $ R# 5 & 5 * Q BZZZZVZZZVZZ9- 5 8 " Q # 5 V ( 5 f R 5 r S 99 5 " S # 5 ( 5 T 5 U 9I 5 " U 5 V B999E-999E-99E-99B 5 "
0x0685a8…06873c Dummy {f00=0x0071, f01=0x0190, f02=» 5 Z ZZZZZZZZZX-9 6 " Z 6 $ [ ZZZZZZZZZX-9 6 4 " [ 6 P ZZZZZZZZZX-9 6 ` " 6 | ] ZZZZZZZZZX-9 6 " ] 6 ^ ZZZZZZZZZX-9 6 " ^ 6 _ ZZZZZZZZZX-9 6 " _
0x06873c…0688d0 Dummy {f00=0x0071, f01=0x0190, f02=» b BZZZZVZZZVZZX- 7 " b " 7 " & b 7 2 ( 7 @ c 7 L d 99V99V99 7 " d 7 t & 7 ( 7 e 7 $ c 7 f 99 7 " f 7 & 7 ( 7 g 7
0x0688d0…068a64 Dummy {f00=0x0071, f01=0x0190, f02=» ( 8 j 8 $ T 8 k 9B9999B999B99- 8 0 " k 8 N & 8 ^ $ W 8 l ( 8 | l 8 & * 8 m ZZZZZZZZZ9-9 8 " m 8 n ZZZZZZZZZ9-9 8 " n 8 o ZZ
0x068a64…068bf8 Dummy {f00=0x0071, f01=0x4162, f02=»ZZZ9-9 8 " r $ 9 s ZZZZZZZZZ9-9 9 " s % 9 : t ZZZZZZZZZ9-9 9 J " t & 9 f & t 9 v ( 9 u 9 & + 9 & 9 & 9 v XXVXXVXX 9 " v~& 9 & v 9 & v 9
0x068bf8…068d8c Dummy {f00=0x0071, f01=0x0190, f02=» : H IDENT DIV267 TRA 4.2 81-05-06 F1 O1111 03.01.XXX.1 > : FRMBUD FRMBUP FRMTGP FRMTJT FRMTKT FRMTKV FRMTTA B 6 2 FRMTVOV FRMXGPA FRMXJT1 FRMXKTF FRMXTA FRMXVOX $$$TRA B > FRMBUDV M FRMBUPF T FRMTGPM ? FRMTJTT FRMTKTX 1 FRM
0x068d8c…068f20 Dummy {f00=0x0071, f01=0x0190, f02=» @ 0 = @ P > ` p y $ & + - ! 2 4 # 9 ; 7
0x068f20…0690b4 (0, 133) Dummy {f00=0x0071, f01=0x018e, f02=» I N P H U . W > * N " ^ " l " z " " " " " " " " "
0x0690b4…069248 Dummy {f00=0x0071, f01=0x0190, f02=» $ ( ( 4 $ D $ % T & d $ + r & & X " & $ ' $ 5 & (
0x069248…0693dc Dummy {f00=0x0071, f01=0x0190, f02=» & & & 99 * " < & L ZZ.ZZ.ZZ Z " r BBZ " $ 5 & XX " & ZZZ
0x0693dc…069570 Dummy {f00=0x0071, f01=0x018e, f02=» ' $ + & & * & 8 99 F " X & h ZZ.ZZ.ZZ v " & $ 5 BBBZZ " BBZZ "
0x069570…069704 Dummy {f00=0x0071, f01=0x0190, f02=» $ $ & ( $ 6 & F $ 7 T ( d p $ ( $ $ % B999 " & &
0x069704…069898 Dummy {f00=0x0071, f01=0x0190, f02=»$ & $ / ( , 8 & H & V & d 99B r " $ ( $ % $ ' $ + (
0x069898…069a2c Dummy {f00=0x0071, f01=0x0190, f02=» " BBX " " $ 5 . # XXXXXXE-XXXX > " # Z $ BXX j " $ ~ ( % & B999E-99E-999E-99B " & ( ' &
0x069a2c…069bc0 Dummy {f00=0x0071, f01=0x0190, f02=» * XXX.XXXXX.XXBB " * ( , + 8 , B*.***.***.**9.99- H " , j & z ( - . XXXXXXXXE-XX " . ( / & 0 XXX
0x069bc0…069d54 (0, 134) Dummy {f00=0x0071, f01=0x0190, f02=» " 3 # 4 BXX.XX.XXX " 4 $ * ( : 5 F 6 BBZZZE-ZZE-ZZZE-ZZ V " 6 x ( 7 & 8 ZZ.ZZ.ZZ " 8 9 BZZZZZZZZZZZ " 9
0x069d54…069ee8 Dummy {f00=0x0071, f01=0x018e, f02=» " = # > BZZ.ZZ.ZZZ " > $ . ? BZ > " ? " P ( ` * @ l " A | " C " G " I " K " Z " ` " w " e " g
0x069ee8…06a07c Dummy {f00=0x0071, f01=0x0190, f02=» B KVIT $ B" ( . C : & J $ D" X ( h D t $ " & E KONTOKORTZ $ E" & " F B*.***.***.**9.99- " F "
0x06a07c…06a210 Dummy {f00=0x0071, f01=0x018e, f02=» J SUM $ J" ( " K . $ L" > ( N L K Z & j & * x & * & & VERSNR M DAGS-DATO $ ME & N POST-DATO
0x06a210…06a3a4 Dummy {f00=0x0071, f01=0x0190, f02=» & Q 99.99.999.9 " QCE 2 & B R 99E-99E-99 P " R~E j & z S 99E-99E-99 " S E & T 999R " T E & U ***99
0x06a3a4…06a538 Dummy {f00=0x0071, f01=0x0190, f02=» & W 999E-99999E-99BB " W E 8 X 999E-99999E-99BB H " X E h Y ZZZ.ZZZ.ZZ9.ZZ-B x " Y E & Y & & * ( Z $ [E (
0x06a538…06a6cc Dummy {f00=0x0071, f01=0x0190, f02=» & ] T[LLER $ ]E . & > ^ DEBET L $ ^E b & r _ KREDIT $ _E ( ` $ aE ( a & b ZZ
0x06a6cc…06a860 Dummy {f00=0x0071, f01=0x018e, f02=»( e f START TEST $ f 6 ( F g R h SLUT TESTT b $ h ~ ( i & j DISKETTE SKIFT $ j ( k &
0x06a860…06a9f4 (0, 135) Dummy {f00=0x0071, f01=0x018e, f02=» " n & o ADM " $ o 6 p BZZR F " p Z ( j q v & p r 99BR " r & s 99 " s ( t &
0x06a9f4…06ab88 Dummy {f00=0x0071, f01=0x0190, f02=» x & & DIVERSE FORMATER & ( D * y P " z ` " n " | " " " z " " " " " " z
0x06ab88…06ad1c Dummy {f00=0x0071, f01=0x0190, f02=» " " " " . " < " J ( X z d $ {I t ( { $ I & I & | B**B " | } ZZ.ZZ.ZZBM
0x06ad1c…06aeb0 Dummy {f00=0x0071, f01=0x0190, f02=» ( $ & & 6 ******E-**** D " ` & * p & ~ & * $ ( $ ( $
0x06aeb0…06b044 Dummy {f00=0x0071, f01=0x0190, f02=».ZZ.ZZBBBR " & " ZZZZ9999.99B 0 " L $ - $ l ( | $ ( & + & & 999B "
0x06b044…06b1d8 Dummy {f00=0x0071, f01=0x0190, f02=» " BZZZZZZZZZZB " , & < & * L $ Z ( j v $ $ $ ( $ $ $ (
0x06b1d8…06b36c Dummy {f00=0x0071, f01=0x0190, f02=»( ( & ( 6 B ( R ^ ( n z ( ( ( ( & +
0x06b36c…06b500 Dummy {f00=0x0071, f01=0x0190, f02=» 99 " ( " . B999.99999.99B > " *.***.***.**9.99- l " & & ( & & 99.99.99B.
0x06b500…06b694 (0, 136) Dummy {f00=0x0072, f01=0x0190, f02=» $ B*.***.***.**9.99- " 2 & B & P ( ^ j B99B z " & & & ZZ.ZZ.ZZB* " (
0x06b694…06b828 Dummy {f00=0x0072, f01=0x0190, f02=» & + & & 999B 4 " H $ X B99.99.99* h " BXX. " ( XX " E-9999999999
0x06b828…06b9bc Dummy {f00=0x0072, f01=0x0190, f02=» XX " & , XX : " L E-9999999999B9 " z XX.XXPPO " & ( *.***.***.**9.99-- "
0x06b9bc…06bb50 Dummy {f00=0x0072, f01=0x0190, f02=» ****9 " ( * , " w < " J " X " f " t " " " " " " " " " "
0x06bb50…06bce4 Dummy {f00=0x0072, f01=0x018e, f02=» & + & ARKIV * $ @ $ 5 P & ` & n *.***.***.**9.99+- | " & ( $ $ (
0x06bce4…06be78 Dummy {f00=0x0072, f01=0x018e, f02=» $ ( ( 4 $ D & T & 0 b & 0 p & 0 ~ & 0 $ " ( $ ( & +
0x06be78…06c00c Dummy {f00=0x0072, f01=0x0190, f02=» $ & TOTAL & $ < *.***.***.**9,99+- L " n & ~ ( $ ( < & + & 999S "
0x06c00c…06c1a0 Dummy {f00=0x0072, f01=0x0190, f02=» - $ - ! & ! & ! * & ! 8 & ! F & ! T & 2 ! b & * ! p & * ! ~ & * ! & 4 ! KONTONRO ! $ - ! & ! T[LLER ! $ - ! &
0x06c1a0…06c334 (0, 137) Dummy {f00=0x0072, f01=0x0190, f02=»( ! " $ E " ( " * " 6 & 2 " F XXXE-XXXXXE-XX " T " " r & " 99 " " " " BBZZZ.ZZZ.ZZZ.ZZ9.99- " " " " BBZZZ.ZZZ.ZZZ.ZZ9.99- "
0x06c334…06c4c8 Dummy {f00=0x0072, f01=0x0190, f02=» " & 2 # ZZ # " # 0 " BBZZZ.ZZZ.ZZZ.ZZ9.99- # @ " # f " BBZZZ.ZZZ.ZZZ.ZZ9.99- # v " T # " BBZZZ.ZZZ.ZZZ.ZZ9.99- # " T # ( # # $
0x06c4c8…06c65c Dummy {f00=0x0072, f01=0x0190, f02=»ZZZ.ZZZ.ZZZ.ZZ9.99- # " $ " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ , " $ R & $ b & 4 $ p & SUPL $ ~ " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ " $ " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ " L $ " BB
0x06c65c…06c7f0 Dummy {f00=0x0072, f01=0x0190, f02=» $ r " L % " BBZZZ.ZZZ.ZZZ.ZZ9.99- % " L % @ ( % R % ^ $ % n ( % ~ 4 % & 4 % 999E-99999E-99 % " % & % & PRIMO % " BBZZZ.ZZ
0x06c7f0…06c984 Dummy {f00=0x0072, f01=0x018e, f02=» " % " BBZZZ.ZZZ.ZZZ.ZZ9.99- & " & 6 " BBZZZ.ZZZ.ZZZ.ZZ9.99- & F " & l & & | & 2 & & ULTIMO & " BBZZZ.ZZZ.ZZZ.ZZ9.99- & " L & & & ( & &
0x06c984…06cb18 Dummy {f00=0x0072, f01=0x0190, f02=» " L ' & ' BEHOLDNINGST[LLERE ' " $ L ' D & ' T & ' b & ' p & ' ~ & 2 ' & * ' & * ' & 4 ' T[LLER ' $ L ' & ' KONTONRI
0x06cb18…06ccac Dummy {f00=0x0072, f01=0x0190, f02=»& ' ( ( ( $ L ( ( ( ( 8 ( D & 2 ( T ZZ ( b " L ( t & ( XXXE-XXXXXE-XX ( " i I ( " BBZZZ.ZZZ.ZZZ.ZZ9.99- ( " i I ( " BBZZZ.
0x06ccac…06ce40 Dummy {f00=0x0072, f01=0x018e, f02=» $ ) ( ) ) & $ ) 0 & < ) > & < ) L & < ) Z & ] ) h & N ) v & N ) & N ) & E ) & S ) & S ) & S ) & [ ) & ) ( )
0x06ce40…06cfd4 (0, 138) Dummy {f00=0x0072, f01=0x018e, f02=» & * B*.***.***.**9E,99 * " * 4 & * * D & * R ZZ999999 * ` " * x & * ( * * $ * ( * * & 2 * & * " BBZZZ.
0x06cfd4…06d168 Dummy {f00=0x0072, f01=0x018e, f02=» ( + % + & 2 + & + . TOTAL + > $ + T & + d & + r & 2 + XXXE-XXXXXE-XX + " + & + XX + " + & + " BBZZ
0x06d168…06d2fc Dummy {f00=0x0072, f01=0x0190, f02=» " BBZZZ.ZZZ.ZZZ.ZZ9,99- , " , * ( , : * ! , F " z , V " , d " " , r " " , " , " z , " , " , " , " , " , " z , " z ,
0x06d2fc…06d490 Dummy {f00=0x0072, f01=0x0190, f02=»" % , " & - " ( - " , - ( " $ - 6 " % - D " $ - R " % - ` " % - n " & - | " ' - " % - " % - " % - " % - ( - $ - ( - % -
0x06d490…06d624 Dummy {f00=0x0072, f01=0x018e, f02=» $ 2 - ( . ( . $ ) . , ( . < ) . H $ . X $ . h & . x * XX.XXPPO . " * . + BXXO . " + . & . $ . ( . , .
0x06d624…06d7b8 Dummy {f00=0x0072, f01=0x0190, f02=» & / / B**O / " / / ( 0 B**O / 8 " 0 / L & / & / j 1 B**O / x " 1 / $ / ( / 2 / & / & / & / & /
0x06d7b8…06d94c Dummy {f00=0x0072, f01=0x0190, f02=» 99BO / " 6 0 ( 0 * 7 0 * " 8 0 : ( 0 H 8 0 T $ 9 0 d ( 0 t 9 0 & + 0 : BB99.99.99 0 " : 0 & 0 ; *.***.***.**9.99-, 0 " ; 0
0x06d94c…06dae0 Dummy {f00=0x0072, f01=0x0190, f02=»" @ 0 " @ 1 " C 1 " E 1 ( " 1 6 " G 1 D ( 1 R ? 1 ^ & 1 n & 1 | & 1 & * 1 & 1 ( 1 @ 1 $ A 1 ( 1 A 1 & 0 1
0x06dae0…06dc74 (0, 139) Dummy {f00=0x0072, f01=0x0190, f02=»Z.ZZZ.ZZ9.99-B 1 " D 2 & 2 & ( 2 4 E 2 @ & + 2 P F Z.ZZZ.ZZZ.ZZ9.99-B 2 ^ " F 2 & 2 ( 2 G 2 & 2 & 2 & 2 & 2 & 2 & 2
0x06dc74…06de08 Dummy {f00=0x0072, f01=0x0190, f02=» R 2 " V 3 " Z 3 " ] 3 & " J 3 4 " L 3 B " N 3 P " w 3 ^ " w 3 l " P 3 z " T 3 " X 3 " [ 3 " ^ 3 ( 3 I 3 $ ` 3 $ b 3 $ e 3
0x06de08…06df9c Dummy {f00=0x0072, f01=0x0190, f02=» L 3 $ ` 4 $ z 4 ( 4 0 M 4 < $ ` 4 L $ x 4 ( 4 l N 4 x $ ` 4 $ z 4 ( 4 O 4 $ ` 4 $ s 4 $ n 4 ( 4 P
0x06df9c…06e130 Dummy {f00=0x0072, f01=0x0190, f02=» 4 & 5 S ZZZ9 5 " S 5 * & 5 : $ n 5 H ( 5 X T 5 d $ ` 5 t & 5 U BZZZZVZZZVZZ9- 5 " U # 5 ( 5 V 5 $ `# 5 W 99 5 " W 5
0x06e130…06e2c4 Dummy {f00=0x0072, f01=0x0190, f02=» ( 6 Z 6 $ `# 6 $ q# 6 0 $ u# 6 @ ( 6 P [ 6 $ `# 6 l & 6 | BZZZZVZZZVZZ9- 6 " # 6 ( 6 ] 6 $ `# 6 $ q# 6 $ u# 6 (
0x06e2c4…06e458 Dummy {f00=0x0072, f01=0x0190, f02=»99 6 " a # 7 ( 7 b 7 & c 9I 7 6 " c 7 H d B999E-99E-999E-99B 7 X " d 7 z ( 7 e 7 & * 7 f ZZZZZZZZZX-9 7 " f 7 g ZZZZZZZZZX-9 7 " g 7
0x06e458…06e5ec Dummy {f00=0x0072, f01=0x018e, f02=» k ZZZZZZZZZX-9 7 " k 8 l ZZZZZZZZZX-9 8 , " l 8 H m ZZZZZZZZZX-9 8 X " m 8 t & m 8 ( 8 n 8 & * 8 & 8 o 999E-99E-999E-99 8 " o 8 & 8
0x06e5ec…06e780 Dummy {f00=0x0072, f01=0x0190, f02=» 8 ( 9 s 9 $ q 9 $ t 99 9 4 " t 9 F & 9 V ( 9 d u 9 p & * 9 & 9 v 9999 9 " v 9 & 9 w BZZZZVZZZVZZX- 9 " w 9 & w 9
0x06e780…06e914 (0, 140) Dummy {f00=0x0073, f01=0x018e, f02=» z 9 & * : { ZZZZZZZZZ9-9 : " { : 8 | ZZZZZZZZZ9-9 : H " | : d } ZZZZZZZZZ9-9 : t " } ! : ~ ZZZZZZZZZ9-9 : " ~ " : ZZZZZZZZZ9-9 : " # : ZZZZZZZZ
0x06e914…06eaa8 Dummy {f00=0x0073, f01=0x4132, f02=» : ; & + ; & ; & & ; 4 XXVXXVXX ; B " ~& ; Z & ; j & ; x & ; ( ; * ; " w ; ( ; * ; " w ; ( ; $ @R F 4 0R F 4 0
0x06eaa8…06ec3c Dummy {f00=0x0073, f01=0x0190, f02=» : H IDENT SUBAPL TRA 4.2 81-05-06 F1 O1111 03.01.XXX.1 D @ SELTR SETDEB SETKRE SPAPPL SPCHK1 SPCHK2 SPCHK3 SPCHK4 B & " SPCHK5B SPCHK6A SPCHK71 SPTCHKF $$$TRAS @ < SELTR > SETDEBA 0 SETKRES " SPAPPL1 SPCHK11 SPCHK2 X B
0x06ec3c…06edd0 Dummy {f00=0x0073, f01=0x0190, f02=» TXTRD 0 S $0 S & (0 S 8 J F " D $ L$ B ( : L I % L* Lb J E0 H0 N0 ]0 l0 p0
0x06edd0…06ef64 Dummy {f00=0x0073, f01=0x0190, f02=» 0 0 J F " D L W L4 # L % L W 4 ( # L 4 . 0 | 0 0 0 0 J F " D # L&! L" L ) % L ,
0x06ef64…06f0f8 Dummy {f00=0x0073, f01=0x018e, f02=» 4 H[ RW< I Lb L L R C0 H G0 P Z J0 l W ~ T j = r & J F " D @ ) L L L 4 0X ! LG !6 L6 ' L6 0>LZ 4
0x06f0f8…06f28c Dummy {f00=0x0073, f01=0x0190, f02=» z ( 8 H X J F " D W^J WY L x WK L" x ?_+J .W8 2 RRRRRRW* 2 RR h z z
0x06f28c…06f420 Dummy {f00=0x0073, f01=0x0190, f02=» r * : J Z j z
0x06f420…06f5b4 (0, 141) Dummy {f00=0x0073, f01=0x0190, f02=» * : J Z j ! z " # $ % & ' ( )
0x06f5b4…06f748 Dummy {f00=0x0073, f01=0x0190, f02=» 3 4 5 * 6 : 7 Y J 8 m Z 9 m j : m z ; m < m = m > m ? m @ A B
0x06f748…06f8dc Dummy {f00=0x0073, f01=0x0190, f02=» L M N + * O > : P C J Q Z Z R j S z T U V . W k X { Y Z [
0x06f8dc…06fa70 Dummy {f00=0x0073, f01=0x0190, f02=» e f 0 g L * h : i J j Z k j l 2 z m ? n D o I p N q r s t _
0x06fa70…06fc04 Dummy {f00=0x0073, f01=0x0190, f02=» ~ * : J Z J F " D RRRRW 2 RRRRRRW 2 RRRRRRW 4 % L # L W ( + ?R2 j J F " D RRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRR J F "
0x06fc04…06fd98 Dummy {f00=0x0073, f01=0x018e, f02=» m$ Tn R 6 <A?R6 ?R B R b r 0 H 0 I J F " D %?R6 ?R$ A _ $?R L?R
0x06fd98…06ff2c Dummy {f00=0x0073, f01=0x0190, f02=» 5 80 9 @ & J F " D ?R ?R $ aA % L A # L @ W @ I I ?R RP A ?R# L W 6 E0 I0 S X [ 0 l n w
0x06ff2c…0700c0 Dummy {f00=0x0073, f01=0x0190, f02=» 0 0 0 0 0 0 2 B 0 ( R J F " D I # L W % L W N N L ?R # " ?RI @ @ % L d 0 0 ( 0 0 0 (
0x0700c0…070254 (0, 142) Dummy {f00=0x0073, f01=0x0190, f02=» 0 Q 0 Q 0 R 0 J F " D L?R@ ) L A ( ! Lj! Lf b M D * B k0 R p0 t0 z0 J F " D @" :hM b M ( , Db M
0x070254…0703e8 Dummy {f00=0x0073, f01=0x0190, f02=» 0 p J F " D ?R?R H H ?RJ] R R =R ?R % L 0 j 0 | 0 0 0 9 R
0x0703e8…07057c Dummy {f00=0x0073, f01=0x0190, f02=» 0 0 "0 , % > * N 6 51 ^ 8 r ; 52 = J F " D :R L " x % L x %k L ?R #?R I L?R L?R B
0x07057c…070710 Dummy {f00=0x0073, f01=0x018e, f02=» 8R( V > $ 4 D T f v 0 0 2 J F " D H ?R R<R?R L8R L8R ?R
0x070710…0708a4 Dummy {f00=0x0073, f01=0x0190, f02=» 0 < 0 2 > 0 @ J F " D R<R?R & ( " R<R?R V$ ! A % L A # L @ W @ R< P 0 Q !0 R $ > & (
0x0708a4…070a38 Dummy {f00=0x0073, f01=0x018e, f02=» ^ c e j 0 z @ J F " D @ T# R 8R( H ?R %?R?R ?R Y ?R & P $ 51 52
0x070a38…070bcc Dummy {f00=0x0073, f01=0x0190, f02=» ( 8 H X h J F " D D D Rj ' ?RA Rj ' ?RA Rj ' j ?RA Rj # j #?RA x 0 *
0x070bcc…070d60 Dummy {f00=0x0073, f01=0x018e, f02=» Q0 j T0 j l0 j , o0 0 > x0 0 P 0 b J F " D @ v ?R ?R ~ L L b b L L L$ L t 0 <
0x070d60…070ef4 (0, 143) Dummy {f00=0x0073, f01=0x0190, f02=» 0 < 0 < * J F " D x # L x x ?R ?R "<R L L < 0 0 %0 )0 ,0 A0 J F " D b
0x070ef4…071088 Dummy {f00=0x0073, f01=0x0190, f02=» f l0 p0 v 0 J F " D @ LW LW LW # L LW W R T ! L % L @ LH I H B % & 0 0 0
0x071088…07121c Dummy {f00=0x0073, f01=0x018e, f02=» 0 " 2 J F " D " W W@H L R RA + W&H L R RA I B # $ KRE '0 K *0 K 2 DEB
0x07121c…0713b0 Dummy {f00=0x0073, f01=0x40aa, f02=» W 0 J F " D @ J # " 4 RW R 6 W 6 $ A W $ 4 $ b LA 4 t @ # $ KRE '0 K *0 K 2 DEB
0x0713b0…071544 Dummy {f00=0x0073, f01=0x0190, f02=» : H IDENT KMDIO TRA 4.2 81-05-06 F1 O1111 03.01.XXX.1 3 B > CRKJ CRVO GRASPV LINOPT WCHECK WCHUPD WRITFD WRITID 3 B WRITJTD WRITVOA WTALLY1 3 $$$TRAC 3 > : CRKJJ CRVOV GRASPV1 ` LINOPT i WCHECK. WCHUPD r 3 8 4 WRITFDC
0x071544…0716d8 Dummy {f00=0x0073, f01=0x018e, f02=»EVIN LEVRD RADEL RAWRITW SPCHK5{ SPERR 3 | > : SPLIN8A T:DELAT T:DSC0R T:DSC1T T:EDWRH T:TESTW T:WAITr 4 . 8 4 T:WRITC TRGETFI TRINS VARRD VARWRTR WAITF WSTRCH{ 4 p 4 : 4 ,0 C 4 10 C 4 8 4 @
0x0716d8…07186c Dummy {f00=0x0073, f01=0x0190, f02=» } 5 J F " D @L @)aaFaaF N W ha D W ! LkI! , (a L 5 5 d ) 5 t 5 ! 5 J F " D a F L Lh @!" ba _:ba L ba f A 5 5
0x07186c…071a00 Dummy {f00=0x0073, f01=0x0190, f02=»a R LatT I p t 5 ` 0 6 6 0 0 6 @ 0 P 6 R DISCFEJL 6 d 6 | & &90 6 5 &91 6 J F " D XL R tT $tQt@ @! & L L L R 4 Lj ' @ A WL Lj ' @ A 6 D
0x071a00…071b94 (0, 144) Dummy {f00=0x0074, f01=0x0190, f02=» 0 6 0 7 0 7 0 7 2 0 B 7 D 0 B 7 V J F " D @!@ 4 tp p X A*@ A 4 @ # L dL# L ) L A 4 # L 7 h 0 G 7 0 G 7 0 I 7 0 I 7 0 I
0x071b94…071d28 Dummy {f00=0x0074, f01=0x0190, f02=» 4 7 " 8 $ 8 ( 6 8 . ; r 8 > = < 8 N J F " D T R Td RT @ R TUWN R 0X _@ RP A I *I H R R T 8 ^ B 8 I 8 M < 8 T < 8 ` r 8 b < 8
0x071d28…071ebc Dummy {f00=0x0074, f01=0x0190, f02=» 0 P 8 0 9 9 " 9 2 J F " D H D% L W ! % L # L R R" 9 B 9 . 9 . 9 9 9 * 9 9 J F " D
0x071ebc…072050 Dummy {f00=0x0074, f01=0x0190, f02=» / 0 : 8 : A : & J F " D j ' 0X H Lj ' 0X H Lj 'j & 0X H Lj # : 8 I 0 : R ' : [ : c 0 : h & : n " : v * : | . :
0x072050…0721e4 Dummy {f00=0x0074, f01=0x0190, f02=» : ; & ; & ; & ( ; 4 * ; @ ; P ; ` & ; p & ; ~ ( ; " ; ` ; i ; Z ; d ; ; J F " D 0X 4
0x0721e4…072378 Dummy {f00=0x0074, f01=0x0190, f02=» % ; & < " < ` < . i < > Z < N < ` J F " D LW= R W5 R W- R" LW%0X _M R RA R L @ R$W < p ( < * < < & < <
0x072378…07250c Dummy {f00=0x0074, f01=0x0190, f02=»X R0X 4 A I RT 4 I A R R R 0X 0X L% L 4 < D . = @ J ( = P P TRP = ` R = t U * = Y & = a . = d & = m , = r . = v = J F " D @I 0X 0X
0x07250c…0726a0 Dummy {f00=0x0074, f01=0x0190, f02=» = & > & > J F " D # L: R ' W10R % L W R W 0X 0X 4 > ( > v . > FEJL > OPSTART > DISKETTE SKIFT > KONVERTERING > DATA
0x0726a0…072834 (0, 145) Dummy {f00=0x0074, f01=0x0190, f02=» R4 0X 6 W$ LW LW LW LW LW L RL R R0X > ? B ? R ? d { ? t . ? " ( ? 4 ? J F " D : a RL" R R0X % Lb a W ( % Lb a W " ?
0x072834…0729c8 Dummy {f00=0x0074, f01=0x0190, f02=» ? @ & @ & @ & & ) @ 4 & @ D & @ R & @ ` ( @ n @ z 999999 @ " ~ @ B99999 @ " @ ( @ & @ 999 @
0x0729c8…072b5c Dummy {f00=0x0074, f01=0x0190, f02=»" @ &01 A $ A " 9999 A 2 " } A F & A V & A f &02 A v $ A 999999 A " A &03 A $ A 999 A " A
0x072b5c…072cf0 Dummy {f00=0x0074, f01=0x40f8, f02=» 99 A " B & B TTTTTTTTTTTTT9- B . " B N & B ^ TTTTTTTTTTTTT9 B l " B ( B 8 3 1 @ D |a F RL$ $ R R0X W " R R0X 4 B m B @ B " A
0x072cf0…072e84 Dummy {f00=0x0074, f01=0x0190, f02=» : H IDENT RGKLAR TRA 4.2 81-05-06 F1 O1111 03.01.XXX.1 B > BCKUP CLBEH CLEDB CLEJ CLKF KLRFMT RGA120 RGKLAR SKIFT B $ SLUTIDK STRTIDA STRTWR1 ZERO6 $$$TRAC B > BCKUP CLBEH CLEDB CLEJ6 CLKF1 KLRFMTX RGA120 s > :
0x072e84…073018 Dummy {f00=0x0074, f01=0x0190, f02=» CRKJA FRMXVOI GRASPVU INITRGS KFREAD KFWRIT KORTR KTPLANT D @ LAMPOFG LAMPONC PACKCLE RADEL RAREADC RAWRITC SETDEBC SETKRE F B > SLUTA SOPRD SPCLRAP SPCLRNR SPLIN8A T:ATTFI T:DSC0R T:DSC1T < 8 T:EDWRG T:WAITC TCONFWE WAITF WRITFDC WRITIDC WRI
0x073018…0731ac Dummy {f00=0x0074, f01=0x0190, f02=» e $ 4 D T 20 G d 50 G v 90 G ; < < > 8 B C D G J F " D A 1XF
0x0731ac…073340 Dummy {f00=0x0074, f01=0x018e, f02=» Z0 `0 e m $ g F 4 j D l N T m d t v v ~ J F " D @ RRR_G L L g L ) L L L X R R R RLA s R R s _~ <
0x073340…0734d4 (0, 146) Dummy {f00=0x0074, f01=0x0190, f02=» > 0 R J F " D A 1XF R2 RRR_ @ @ @ @ @ @ @ @ @ @ @ @ @ L L L L0X 0X L * & x 0 1 0 1 0 1 0 1 0 1 J F " D R L ( L L " x
0x0734d4…073668 Dummy {f00=0x0074, f01=0x0190, f02=» ( EJ-EDB T[LLER - " 5 TOTAL 2 7 H :0 O X @0 O j J F " D L L R 6 x o LL L L R "_] L R LH- | G P0 L [ d0 L
0x073668…0737fc Dummy {f00=0x0074, f01=0x0190, f02=» L R T R 0 , VERSUR KONTO > Z j 0 E z 0 E J F " D T ! L L L R T R T+! L' R T ! L
0x0737fc…073990 Dummy {f00=0x0074, f01=0x0190, f02=» 0 VERSUR KONTONR REMIT J F " D L L R T L L A ! L, ! L L L : 0 KASSE-KONTO #0 A % + TOTAL
0x073990…073b24 Dummy {f00=0x0074, f01=0x018e, f02=» L L L R L R L R R L z D0 8 K m J M F Z P j W * z Y N Z i l J F " D @L g L@ X R R R @ L RL 4 4 R ?R x
0x073b24…073cb8 Dummy {f00=0x0074, f01=0x0190, f02=» 0 % EJ-EDB T[LLER 8 J F " D o L o L L R R _" L L 4 L L x D R H 0 0 0 0 > 0 %
0x073cb8…073e4c Dummy {f00=0x0074, f01=0x0190, f02=»TTERING ~ 0 O 0 O 2 0 O D 0 O V # h - x ; J F " D 4 L@ @ R L L L LW4 R R R Q W
0x073e4c…073fe0 Dummy {f00=0x0074, f01=0x0190, f02=» J 0 0 , < > L 0 0 n J F " D L L A A R%@ @ R%0X I ' L LW R R 0 L
0x073fe0…074174 (0, 147) Dummy {f00=0x0074, f01=0x018e, f02=» 0 0 0 ( J F " D R L L 4 L RL R L L LI L L " W : & * 2 2 60 2 : 3 < > J J F " D
0x074174…074308 Dummy {f00=0x0074, f01=0x0190, f02=» h J F " D @P RL R _g R R " 0 b 0 t 0 J F " D _ I / % L W L% L W 0 0
0x074308…07449c Dummy {f00=0x0074, f01=0x0190, f02=» v P v 1XFA R6 l SLET SALDO * SLET PERIODE D ! SUBTOTAL ` )0 U x ,0 U /0 U 1 9 @ > @ J F " D _.K 1 L W
0x07449c…074630 Dummy {f00=0x0074, f01=0x0190, f02=» ~0 0 J F " D @R 0X L v " < i L i i R 0X I 6 W i L $ 0 X r 0 X > 0 % B >
0x074630…0747c4 Dummy {f00=0x0074, f01=0x0190, f02=»RR L B * 2 : J B Z j : z @ B B J F " D 1X F
0x0747c4…074958 Dummy {f00=0x0074, f01=0x0190, f02=» , 0 F L . " > % " N & ^ )0 p - $ . 0 4 9 > " ? J F " D L4 R A* R H" XL RX R La
0x074958…074aec Dummy {f00=0x0074, f01=0x0190, f02=» N ] g * j , : l0 J u ( J F " D @ t XLH" R ! RH" XL R R RL@$@*@ 4 R| R LatT t R tT 4 l # * $ (
0x074aec…074c80 Dummy {f00=0x0074, f01=0x0190, f02=»A)!WL @)aaF X aaF4 t XL d " 0 2 " D T $ f v $ $ $ @ $
0x074c80…074e14 (0, 148) Dummy {f00=0x0075, f01=0x0190, f02=» |L P RL RL RL RLH, RLH- RLH RL R6 x* _ RL R D V 0 f x 0 L 0 ' " ( * $
0x074e14…074fa8 Dummy {f00=0x0075, f01=0x0190, f02=» < RL RLA R T6 u u L R L f G0 L $ K SLUTDL 6 Y , L [0 L a $ n b ~ g F l > u " v x $ y {
0x074fa8…07513c Dummy {f00=0x0075, f01=0x0190, f02=» 0 * 1 < N 0 ^ ' p " $ @ 0 @ "
0x07513c…0752d0 Dummy {f00=0x0075, f01=0x0190, f02=»L_ J, RL RL R!L ;L _ RL RL R LRcL _ r " 0 @ R b 0 r f 0 $ L * " (
0x0752d0…075464 Dummy {f00=0x0075, f01=0x018e, f02=» & ADM $ " & 2 & B KASSE]BNING> P $ l & | & DAGS-DATON $ & 99E-99E-99 " ~ &
0x075464…0755f8 Dummy {f00=0x0075, f01=0x0190, f02=» $ & k 99E-99E-99 & " @ ( P & l KASSELUKNING z $ & $ ( & 1 KASSELUKNING
0x0755f8…07578c Dummy {f00=0x0075, f01=0x018e, f02=»RK $ & BEL ( $ < & L & B Z & B h 99999999E-99 v " BTTTVTTTVTTTVTT9V99- " ( & 1 &
0x07578c…075920 Dummy {f00=0x0075, f01=0x0190, f02=» KASSELUKNING $ & 0 BEHOLDNINGST[LLERE > $ ` & p & ~ & SLET $ PERIODE $ & DEB
0x075920…075ab4 (0, 149) Dummy {f00=0x0075, f01=0x0190, f02=» $ & SUBTOTAL " $ : & H ! KVIT V $ ! j & z & & & " BILAG $ " $ ( # &
0x075ab4…075c48 Dummy {f00=0x0075, f01=0x0190, f02=» %~ & B99999 " & " ( 2 ' > ( SLUTD N $ ( d ) 99999 t " )X ( * + Z300 $ + , 9999 " ,} & 2
0x075c48…075ddc Dummy {f00=0x0075, f01=0x40d2, f02=»AR $ / 0 ADM $ 0 . & > 1 ZZ P " 1 b ( r : 6 4 RL R T R T |L RP |L RLW 4 R 4 1XF 4 ~ @
0x075ddc…075f70 Dummy {f00=0x0075, f01=0x0190, f02=» : H IDENT RGADM TRA 4.2 81-05-06 F1 O1111 03.01.XXX.1 " A5RET1 A5RET2 hADM ADMRET B $$$TRAA h * & A5RET1 A5RET2A hADM ADMRET z B > A5KONVA ABORT AD4100 AD42006 AD43001 ADM6001 ASGVOL BCKUP @ < BUDREG CLBEH CLEAR8A C
0x075f70…076104 Dummy {f00=0x0075, f01=0x018e, f02=»FMTC KORTC KTOPR KTPRT KVIT LAMPOFC z D @ LAMPONE LEVDELF LEVOPRF LEVPRTF LEVSPGF LSTINTF MODP ONLINE , B > PACKCL RAWRITC RGREADC SKIFT SLUTIDK SOPRD SPCLRAM SPCLRN t B > SPINF1E SPLIN8F SUBTOTFhSUM T:ATTFV T:DELAT T:DSC0D T:DSC1N > : T:EDW
0x076104…076298 Dummy {f00=0x0075, f01=0x0190, f02=» ! $ # 4 ' D T d t ! " ; # $ % . & Q ' U
0x076298…07642c Dummy {f00=0x0075, f01=0x018e, f02=» 1 I 2 M 3 Q $ 4 U 4 5 D 6 T 7 d 8 t 9 : ; < = > ? @
0x07642c…0765c0 Dummy {f00=0x0075, f01=0x0190, f02=» J ! K # L $ M 4 N D O T P d Q t R ; S T U V Q W U X Y
0x0765c0…076754 (0, 150) Dummy {f00=0x0075, f01=0x018e, f02=» c d e $ f 4 g D h T i d j t k l m n o p q r
0x076754…0768e8 Dummy {f00=0x0075, f01=0x0190, f02=» A E $ ' 4 D T l d t b J F " D '2 RRR?R 2 RR?RA I A A 1XF R6 _ H @ _ @ @ ?RA I l
0x0768e8…076a7c Dummy {f00=0x0075, f01=0x0190, f02=» _ R L i i @ A 1XF R6 _C t 0 2 D T f " < v $ ~ & ? l @ J F " D i i L i i RL@ @ ?R?R R?RA(@ C T T s T|A
0x076a7c…076c10 Dummy {f00=0x0075, f01=0x018e, f02=» g n0 i p B , q < v D N w @ ^ y D p z | D } D J F " D @F R6 ll _$I XL RX XL R Lat 8 R R R t
0x076c10…076da4 Dummy {f00=0x0075, f01=0x0190, f02=» B * < L J F " D L R6 _ _1K ?R_8_ R ? RL DW R K RL PW RLA @(?R?R R 0 6 0 6 0 6 4
0x076da4…076f38 Dummy {f00=0x0075, f01=0x0190, f02=»L R 1XF R6 _% R E RL r T 0 @ , P b ` p * SR 5 d : ? l @ ) J F " D R?R R A R6 _ @ ?RH I A LW D
0x076f38…0770cc Dummy {f00=0x0075, f01=0x0190, f02=» b c d ( e 8 f H g X h h i x j k l m n o p q
0x0770cc…077260 Dummy {f00=0x0075, f01=0x018e, f02=» ( 8 H X h x J F " D @FA A L R2 RRR?R H 0I I 2 RRRRRRRRRRRRRRRRR_62 RRRRRRRRR
0x077260…0773f4 (0, 151) Dummy {f00=0x0075, f01=0x0190, f02=» ( 8 H X h x l - ` >
0x0773f4…077588 Dummy {f00=0x0075, f01=0x0190, f02=» J 0 R 4 4 * 4 : 0 R J 0 R 0 R n 0 R l O J F " D LH-* LW R R R L L" L L A 1XF `
0x077588…07771c Dummy {f00=0x0075, f01=0x0190, f02=»RI %C P @ A 1XF R6 _ A I tW u * I , t R K X B M0 R S0 d V & v q0 w0 J F " D @L W , u} R L " L&0R T R P _=! LTW ! L! +
0x07771c…0778b0 Dummy {f00=0x0075, f01=0x018e, f02=»A L P l G . ` > J F " D RA @ ?R @ @ DW H H A _ W C T C T C P @ A 1XF R6 _ A @ N X 0 @ ' X )0 @ /0 J F " D I tW u *
0x0778b0…077a44 Dummy {f00=0x0075, f01=0x0190, f02=» o r0 u K * z r < ( L J F " D @ _< L LA L( @ DI A R R R L L 0X R t 0 0 v p
0x077a44…077bd8 Dummy {f00=0x0075, f01=0x0190, f02=» l ' , ` < Z L f n l J F " D RW RW RW RW @ D?RI AH A 1XF R6 11 W/A$ RW)H$&H"# R 0X% | * t p
0x077bd8…077d6c Dummy {f00=0x0075, f01=0x0190, f02=» =0 W ? 8 J F " D K$ R 0X 0R 0X R0X%0R ?RI A RW @ ?RA A A L# L L R B b n F . ~ G . H K P R H T V F X b T
0x077d6c…077f00 Dummy {f00=0x0075, f01=0x018e, f02=» L@ @ 1XF R6 jj _# b 4 l 0 @ b P Y ` Y p 6 0 2 6 J F " D + 6 R 7 A 1XF R2 RRR_ R L R W!
0x077f00…078094 (0, 152) Dummy {f00=0x0076, f01=0x0190, f02=» T T $ 0 4 0 F l X h ` x J F " D A A 1XF R2 RRR_ RL R?RI } A R L L@ 1XF R6 4 , l -
0x078094…078228 Dummy {f00=0x0076, f01=0x0190, f02=» E 6 N0 a P 6 & V 6 6 b F c V e T h g x m0 p0 r . u w l x Z | ` J F " D @ R
0x078228…0783bc Dummy {f00=0x0076, f01=0x0190, f02=» 0 . , SUBTOTAL < . T d TOTAL t . l ] J F " D R2 RRRR _ L R R_% L R R_2 L
0x0783bc…078550 Dummy {f00=0x0076, f01=0x0190, f02=» k l f ` * : J J F " D F R _W A 0X 1XF R( ! L 1X F@ 1XF R W A _ @ W I I I RL z T x %0
0x078550…0786e4 Dummy {f00=0x0076, f01=0x0190, f02=»1XF R6 _ L Wn RW b B : F @ 0 J j @ N N P R h ` V p p Z f ^ 2 ` i r n 0 q t z p " J F " D @j
0x0786e4…078878 Dummy {f00=0x0076, f01=0x0190, f02=» . > & N & B n " ( & KONVERTERING $ & $ (
0x078878…078a0c Dummy {f00=0x0076, f01=0x0190, f02=»$ & NR $ . & > KONTONRT L $ d & t & & d ZZZ " & & 99999999E-99
0x078a0c…078ba0 Dummy {f00=0x0076, f01=0x0190, f02=»NINGST[LLERE $ & $ NR 2 $ D & T KONTONRI b $ z & SALDO $ & & & e ZZ "
0x078ba0…078d34 (0, 153) Dummy {f00=0x0076, f01=0x018e, f02=» & & & ( TTTVTTTVTTTVTT9V99-0 : " ^ $ n ( ~ & & ADM $ & CHECK LBNR $
0x078d34…078ec8 Dummy {f00=0x0076, f01=0x0190, f02=» @ & & & ADM 6 $ J & Z PENGE-KONTOV h $ & BFO $ & & " X "
0x078ec8…07905c Dummy {f00=0x0076, f01=0x0190, f02=»E-99 " & & , & : & J TTTVTTTVTTTVTT9V99-0 " & $ ( # & ! ADM $ ! " VE
0x07905c…0791f0 Dummy {f00=0x0076, f01=0x0190, f02=» " $ & & ( % KONTONR 6 $ % N & ^ & l & 99999999E-99 ~ " & ( ' & & ( DISKETTE SKIFT $ ( &
0x0791f0…079384 Dummy {f00=0x0076, f01=0x0190, f02=» + ZZ " + ! ( ! " , ! . & SP RGE ! > ( ! R - / ! ^ & ! n & ! | . 99 ! " . P ! / ]BNE KASSERT ! $ /P ! & ! 0 BBZZZ- ! " 0g !
0x079384…079518 Dummy {f00=0x0076, f01=0x018e, f02=» 4 BBZZZ- ! " 4g " 5 BBZZZ- " $ " 5g " : 6 BBZZZ- " J " 6g " ` 7 BBZZZ- " p " 7g " & 7 " 8 BBZZZ- " " 8g " 9 BBZZZ- " " 9g " : BBZZZ- "
0x079518…0796ac Dummy {f00=0x0076, f01=0x0190, f02=» " & * # & * # = EKS.LBNRS # $ $ = # > & R # N > XXXXX # ` " > # v & > # ? REGKONTONR # $ ? # & l # @ XXXXXXXXE-XX # " @ # & @ #
0x0796ac…079840 Dummy {f00=0x0076, f01=0x0190, f02=» & n # C TVTTTVTTTVTTX,XX-M $ " C $ 4 & C $ D D DIVERSE $ R $ D $ j & o $ z E XX $ " E $ & $ F TTTTTTTTTTTTX- $ " F $ & F $ $ M $
0x079840…0799d4 (0, 154) Dummy {f00=0x0076, f01=0x0190, f02=» $ I EKS.LBNRT % $ I % " & % 2 & FRA % @ & % R J XXXXX % d " J % z & J % & % & TIL % & % K XXXXX % " K % & K % $ M %
0x0799d4…079b68 Dummy {f00=0x0076, f01=0x0190, f02=» N % ( & O + & & N & ( & & 6 P KASSE-KONTO & D $ P & ` & & p Q KONTONRO & ~ $ Q & & & R SALDO & $ R & & & S 99999999E-99 & "
0x079b68…079cfc Dummy {f00=0x0076, f01=0x0190, f02=» & V ZZZVZZZVZZZVZZ9V99-T ' " V ' , & V ' < & - ' J W LOKAL REMITV ' Z $ W ' v & ' X ZZZVZZZVZZZVZZ9V99-T ' " X ' & X ' & ' Y ZZZVZZZVZZZVZZ9V99-T '
0x079cfc…079e90 Dummy {f00=0x0076, f01=0x0190, f02=»& ' & z E ( TVTTTVTTTVTTX,XX-9 ( " ( B ( ( R ] ( ^ & ( n ^ REGNEFUNKTION, ( | $ ^ ( & ( & ( _ TOTAL ( $ _ ( & ( ` ZZZVZZ
0x079e90…07a024 Dummy {f00=0x0076, f01=0x0190, f02=» c BEREGNINGE ) $ c ) & ) . & ) < d BEREGNINGE ) J $ d ) d & SGRUNDLAG ) t & ) & i ) e ZZZZZZZZZE-9 ) " e ) ( ) f ) & e ) g
0x07a024…07a1b8 Dummy {f00=0x0076, f01=0x0190, f02=» & * i CHECKCIFFER9 * $ i * . & * > j FEJL * L $ j * ` $ * p ( * k * & * & * l ZZZZZZZZZE-9 * " l * & * & * m
0x07a1b8…07a34c Dummy {f00=0x0076, f01=0x4142, f02=» * p 9B + " p + ( + * q + 6 & p + F r LBNR + T $ r + h s ***99A + x " s + & - + & + t ***99A + " t + ( + 8 3 1 R W' R W" R W W R
0x07a34c…07a4e0 Dummy {f00=0x0076, f01=0x0190, f02=» : H IDENT RGSUBS TRA 4.2 81-05-06 F1 O1111 03.01.XXX.1 > : hCYK DIVTR ENTER KKCH KORT KVIT LSTINT MODP SUBTOT B hSUM $$$TRAV > : hCYK u DIVTR ENTER y KKCH- KORT1 KVIT. Q LSTINT MODPR & SUBTOTR 3hSUM @ <
0x07a4e0…07a674 (0, 155) Dummy {f00=0x0076, f01=0x0190, f02=» SETKREC SLUT SPCHK5C SPCLRAP SPERR SPINF1F SPLIN8F T:DSC0 > : T:DSC1& T:EDWRR T:ERAS T:TESTI T:WAITN WCHECK WRITJT D WRITVOC WTALLYS 0 C 0 C ! & . ( 7 J F " D
0x07a674…07a808 Dummy {f00=0x0076, f01=0x0190, f02=» T Y W 0 a0 Y & c 8 e H g 2 X k . h , x J F " D @ _7 RL R R L,0X L R R0X 0X @ @ 4 @ 4 R .
0x07a808…07a99c Dummy {f00=0x0076, f01=0x018e, f02=» . J F " D H H 0X @ R RH ^H [) LW R 0X *0X R 0X 0X R0X P 0R 0X ( 8 v 0 $ 0 $ $ 0 2 0 $ 0 $
0x07a99c…07ab30 Dummy {f00=0x0076, f01=0x0190, f02=» 0 ^ 0 ^ 0 ^ ( 0 ^ : 0 ^ L <0 ^ ^ > " p J F " D L L L L L% L L 4 H # I H @ A L R@ F a < b e
0x07ab30…07acc4 Dummy {f00=0x0076, f01=0x0190, f02=» " 0 @ " P J F " D " RT RT I H s( o R @ Wf( K )A R WZ RT[ RTWK % ` " 0 R J F " D
0x07acc4…07ae58 Dummy {f00=0x0076, f01=0x0190, f02=» 6 N + ! L W H3 W5H3 p Z . q @ J F " D @ W- W( W# ! L W W W W R 4 6 * P C CYKLE K SY STABEL K
0x07ae58…07afec Dummy {f00=0x0076, f01=0x0190, f02=» 3 0 0 0 8 @ 0 P TOTAL ` J F " D R0X RWrWu RWlH LWdWgH ]I ) LC@ @ H 0 R@ 0X 0X v 2 . <
0x07afec…07b180 Dummy {f00=0x0076, f01=0x018e, f02=» < * J F " D L R 0X 0X IQ RL% L A R @ R@ @ RW R2 RR0X RW W R u f W v |0 R 0 R J F " D @ 4 4 H I R 4 R4 A A H " @ WY L L 0
0x07b180…07b314 (0, 156) Dummy {f00=0x0077, f01=0x018e, f02=» J F " D L L@ L R A R@ 6 R_(@ @ _Q% L L R R b 0 r 0 . J F " D L A I @ 4 L L L L@ @ @ @ 0X 4 I 5I A A 0
0x07b314…07b4a8 Dummy {f00=0x0077, f01=0x0190, f02=» & ( * 5 SUBTOTAL $ J F " D L R R LW 0X L R R0X @ @ L R 4 4 LI II H ZA < B N V [ > ] 8 ` . h0 w
0x07b4a8…07b63c Dummy {f00=0x0077, f01=0x0190, f02=» @ 4 * < , < * N 0 ` 0 r < , J F " D W 0X R R0X R 4 4 I RL LA L LWL RLI
0x07b63c…07b7d0 Dummy {f00=0x0077, f01=0x411e, f02=» . J F " D R H 0X @ R@ R # L ( L 0X R 0X R0X I K ( * v J F " D R 4 I &I A A RW RW I @ @ @ W 4 4 @ ( 4
0x07b7d0…07b964 Dummy {f00=0x0077, f01=0x0190, f02=» : H IDENT RGSUB1 TRA 4.2 81-05-06 F1 O1111 03.01.XXX.1 " FLDIN FLDTST SLUT UPDAKK B $$$TRAS h * & FLDIN m FLDTSTS SLUTD UPDAKK z > : FRMTJTS FRMTVOA FRMXTA1 KFREADF KFWRIT KTPLANX PACKST 4 0 SPERR SPINF8S WRITFDU WRITJ
0x07b964…07baf8 Dummy {f00=0x0077, f01=0x0190, f02=»' # X M0 0 ( ^ : b J g Z i j j z l n s v x J F " D @ H L L RT2 RH
0x07baf8…07bc8c Dummy {f00=0x0077, f01=0x0190, f02=» 4 L 0 | 0 0 , < > J F " D ) L RW # L H I $ i (i i i L P 0 L 0 L J F " D ! - 6 - L W + L " NI KI" C >
0x07bc8c…07be20 Dummy {f00=0x0077, f01=0x0190, f02=» R R W 4 b 0 @ c P c ` p $ c c c B c V c
0x07be20…07bfb4 (0, 157) Dummy {f00=0x0077, f01=0x0190, f02=» c c 0 @ P 2 ` W p J F " D L x o k R o R 4 R(2 RRRRRRRRRRRRRRRRR 0 RAT 0 A
0x07bfb4…07c148 Dummy {f00=0x0077, f01=0x0190, f02=»RRRRR ) L LW ) L LW ) L LC 8R L<RIQ LR 0 & B c T 0 F d c v 0 V c 0 F c 0 !0 0 # c *
0x07c148…07c2dc Dummy {f00=0x0077, f01=0x018e, f02=» L8R L8RW L<R L L?RI L8R?R R L<R L<R A h B E c R I b K c t O . S0 . U c b c f n s u
0x07c2dc…07c470 Dummy {f00=0x0077, f01=0x0190, f02=» 0 J F " D W W L # $ W ~ ~ L L 0 d m v m J F " D ! L " ! " # $ % & Wq R ! LgWj R
0x07c470…07c604 Dummy {f00=0x0077, f01=0x0190, f02=» 5 8 m ? & J F " D ) L` R ! L R %&') LL) "L ! %LB! L8) L8W1) L R%&' ) L 8 D I N S Z _ o
0x07c604…07c798 Dummy {f00=0x0077, f01=0x40e0, f02=»L L . @ R d v , ( & ! L L! L ! L L! L ! L L4 @ _ o
0x07c798…07c92c Dummy {f00=0x0077, f01=0x4190, f02=» : H IDENT RGSUB2 TRA 4.2 81-05-06 F1 O1111 03.01.XXX.1 PACKCL PACKST B $$$TRAS PACKCL / PACKST n CYTRP EMPTYTT 0 E %0 E 0 A J F " D 0R
0x07c92c…07cac0 Dummy {f00=0x0077, f01=0x0190, f02=» : H IDENT RGSUB3 TRA 4.2 81-05-06 F1 O1111 03.01.XXX.1 CYOUT CYRD CYTRP CYWRT B $$$TRAS d & " CYOUT = CYRDC CYTRP CYWRT n v D @ CLEAR8S CRVOT FRMXVO GRASPV6 RAREAD1 RAWRIT1 SPLIN8 T:DELA , ( T:DSC0= T:DSC1 T:EDWR T:WAI
0x07cac0…07cc54 (0, 158) Dummy {f00=0x0077, f01=0x018e, f02=»AP bL`b R Lb T @P 4 @P 4 I , n F , J < L L Z c l f0 | h o t0 w0 TRP J F " D @I A R R R H 0X
0x07cc54…07cde8 Dummy {f00=0x0077, f01=0x0190, f02=» 0 * : J Z J F " D L R RA 4 RA 4 RP L R Lb T 1X F@PW @P R 4 0X R j & b ( =
0x07cde8…07cf7c Dummy {f00=0x0077, f01=0x40c2, f02=» $ TRP 4 H X 0 R h . ) ' R R 0X L R 0X L4 T z # @ & b ( =
0x07cf7c…07d110 Dummy {f00=0x0077, f01=0x0190, f02=» : H IDENT RGSUB4 TRA 4.2 81-05-06 F1 O1111 03.01.XXX.1 2 . ASGVOL ASSG CLSVOL LAMPOF LAMPON SOPRD B $$$TRAS x > : ASGVOL B ASSGC CLSVOLM LAMPOFO 9 LAMPON / SOPRD C 2 . SPERR T:ASSIT T:DELA T:DSC06 T:DSC11 T:KI.
0x07d110…07d2a4 Dummy {f00=0x0077, f01=0x0190, f02=» f eP & L R 4 @Z j ( FD 8 $ J 999PPP Z " p 999 " ( N U c j u
0x07d2a4…07d438 Dummy {f00=0x0077, f01=0x0190, f02=» 0 @ J F " D H1 R ( TAH,> R ! T7H-4 R " T- R # T& R $ T H. R % T W R W W P
0x07d438…07d5cc Dummy {f00=0x0077, f01=0x4122, f02=» , $ < 3 L = J F " D X 0X 0X H. 0X H1 0X 0X W 0X 0X W W W 4 0X 4 0X l G J @ 4 0X `K 4
0x07d5cc…07d760 Dummy {f00=0x0077, f01=0x0190, f02=» : H IDENT ADM6 TRA 4.2 81-05-18 F1 O1111 03.01.XXX.1 ADM600 B $$$TRAM T ADM600 f D @ ADMRETM ASGVOLA BCKUP CLSVOL8 GETBIT1 LAMPOF1 LAMPON RAREAD z B > RAWRIT SLUTID SOPRD SPCLRS SPERR SPLIN8 T:ATTF T:DCRE > :
0x07d760…07d8f4 (0, 159) Dummy {f00=0x0077, f01=0x0190, f02=» ) + 6 @ 8 & . ? > @ N J F " D L0X 0X A(@ C Tw Tr s TmA 1XF R6 ]] _4 L0X A 1X ^ B R0 0 T X0 0 Z 0
0x07d8f4…07da88 Dummy {f00=0x0077, f01=0x0190, f02=» { | ~ & 6 J F " D @F R6 _ _MI XL RX XL R Lat a R RT RL RT R RX R RL RL H 6 & 2
0x07da88…07dc1c Dummy {f00=0x0077, f01=0x018e, f02=» D I RT R L h: d ( " 2 0 ` B TRANSMIT T 0 l ~ . 0 @
0x07dc1c…07ddb0 Dummy {f00=0x0077, f01=0x0190, f02=» H * : L l | " # ' ( * / 0 4
0x07ddb0…07df44 Dummy {f00=0x0077, f01=0x018e, f02=»RL_A RL R P RL_N RL 4 RL R h F & G 6 I H J X P j Q z X Y [ @ b d f0
0x07df44…07e0d8 Dummy {f00=0x0077, f01=0x0190, f02=» * : J 0 l 0 ~ SLUTDL J F " D % :La:F L RT RT 4 4 t t L R La tT LP L h
0x07e0d8…07e26c Dummy {f00=0x0077, f01=0x0190, f02=» L_ + L t W# ! L L Lda % r 0 @ P ` ) p - 5 9 > J F " D % m: F_i t R RTF RTB_ RT5 RT1 :Lm: F # RT
0x07e26c…07e400 Dummy {f00=0x0077, f01=0x0190, f02=» z ~ J F " D @ R RI L Lh: T 4 4 :L aL m: F RT R4 l CSSF | X " X
0x07e400…07e594 (0, 160) Dummy {f00=0x0078, f01=0x0190, f02=»ANSMIT . . 5 @ $ R 5 b t J F " D & L L R RL 4 4 % :L0X 4 Lh: T :L 4 * DFHL
0x07e594…07e728 Dummy {f00=0x0078, f01=0x0190, f02=» o 4 s . J F " D @ T ba : 1X F )W W+4 % L" Lh: D T aL @ ( 4 4 (
0x07e728…07e8bc Dummy {f00=0x0078, f01=0x018e, f02=» AAAAAAAAAAAAAAAAAAA9 " & . & KENDEORD < & D R & TTT9 O d & x ( " & & ' & CSSN PS= & 9999 P & ,NAME= AA
0x07e8bc…07ea50 Dummy {f00=0x0078, f01=0x0190, f02=» & 1 DATATRANSMISSION $ 6 & F ( T ` & p & & ' & & a ( & a DATATRANSMISSION
0x07ea50…07ebe4 Dummy {f00=0x0078, f01=0x4076, f02=» & & a ( 4 / - ba : 1X F aL% L Lba : 1X F4 ( `@ r p & & ' & & a ( & a DATATRANSMISSION
0x07ebe4…07ed78 Dummy {f00=0x0078, f01=0x40c2, f02=» : H IDENT ADM6D TRA 4.2 81-05-06 F1 O1111 03.01.XXX.1 ADM600 B $$$TRAM T ADM600 f ADMRETM z ?R @
0x07ed78…07ef0c Dummy {f00=0x0078, f01=0x0190, f02=» : H IDENT ADM5 TRA 4.2 81-05-06 F1 O1111 04.01.XXX.1 A5KONV B $$$TRAM T A5KONV f > : A5RET1M A5RET2A ASGVOL1 LAMPOFF LAMPON RAREADX SLUTID z > : SPCLRA SPLIN8 SQWRIT STRTID T:ATTF T:DSC0 T:DSC1 WRITIDM
0x07ef0c…07f0a0 Dummy {f00=0x0078, f01=0x0190, f02=» & 6 F X h " z # @ ) + -0 4 7 = J F " D R
0x07f0a0…07f234 (0, 161) Dummy {f00=0x0078, f01=0x0190, f02=» b j l & n0 6 y0 H } SLUTD Z J F " D @ L Dba % R LaTk@' L t t R t L R La tTbI'_! L L p &04L
0x07f234…07f3c8 Dummy {f00=0x0078, f01=0x0190, f02=» * 0 : L l | J F " D c RL RL?R R La R ?R R A 1XF R6 _ _ t @'_ A'_ @'W 0 L
0x07f3c8…07f55c Dummy {f00=0x0078, f01=0x405e, f02=» B " ( " t L R _B . H@ Z l | J F " D c RL RL?R R La R ?R R A 1XF R6 _ _ t @'_ A'_ @'W 0 L
0x07f55c…07f6f0 Dummy {f00=0x0078, f01=0x40c2, f02=» : H IDENT ADM5D TRA 4.2 81-05-06 F1 O1111 04.01.XXX.1 A5KONV B $$$TRAM T A5KONV f A5RET2M z ?R @
0x07f6f0…07f884 Dummy {f00=0x0078, f01=0x0190, f02=» : H IDENT KTPLN TRA 4.2 81-05-06 F1 O1111 03.01.XXX.1 KTPLAN RESTMK SETMK B $$$TRAP b " KTPLAN RESTMKS SETMK t RAREADP WAITF 0 P / 3 8 :0 J F
0x07f884…07fa18 Dummy {f00=0x0078, f01=0x0190, f02=» }0 x J F " D @ Lj c " % L _/ Lj c @9 4 @9 L 0 n x 0 x x J F " D L 4 @9 L 4 P TL L Lj c Z W: P 1
0x07fa18…07fbac Dummy {f00=0x0078, f01=0x40f8, f02=»+ _ 4 L cD x , 3 < 8 N :0 ^ J F " D R Lc Lhc D P R R" PRW# hc D T P L cD R Lc P p B @ R4 c B E @ 1
0x07fbac…07fd40 Dummy {f00=0x0078, f01=0x40c8, f02=» : H IDENT KTPLND TRA 4.2 81-05-06 F1 O1111 03.01.XXX.1 KTPLAN SETMK B $$$TRAP Z KTPLAN SETMK l 0 L 4 4 @
0x07fd40…07fed4 (0, 162) Dummy {f00=0x0078, f01=0x0190, f02=» : H IDENT KTOPR TRA 4.2 81-05-06 F1 O1111 03.01.XXX.1 KTOPR KTPRT B $$$TRAO X KTOPR KTPRT j > : ADMRETO FRMXTAA KTPLAN1 RAREADF RAWRIT RESTMKX SPCLRA : 6 SPCLRN SPERR T:ATTF T:EDWR T:WAIT WAITF WTALLY
0x07fed4…080068 Dummy {f00=0x0078, f01=0x0190, f02=» 1 2 4 $ J F " D I ?R s <RA( A A 1XF R2 RRR_ @) R $ A)@ 1XF R6 _ _0H 4 D0 ? P R0 ? j l0 ? } 0
0x080068…0801fc Dummy {f00=0x0078, f01=0x0190, f02=» 0 . x @ R 0 x b J F " D Lc P x R_| R Lc R_ bD L R Lb T Ljc b R Lc T t 0
0x0801fc…080390 Dummy {f00=0x0078, f01=0x0190, f02=»0 0 DISCFEJL 6 F V % h '0 x , > x J F " D ! L _ * R & L L L R?R L cD R Lc <R j j Lj Q
0x080390…080524 Dummy {f00=0x0078, f01=0x0190, f02=» }0 J F " D @ c dc S P R Lc T6 R?R( P PRV P R Lc T R cD L R Lc ` p 0 0 J F " D T b
0x080524…0806b8 Dummy {f00=0x0078, f01=0x018e, f02=» ( 8 J F " D L L Dj c j c j c D 0X 1X F L0 R R@9_U@9 R R4 H $ & & 99999999E-99 " &
0x0806b8…08084c Dummy {f00=0x0078, f01=0x0190, f02=» & DATAS[T $ . & > REGKONTONR L $ f & v & KONTONRO $ & BFO $ & &
0x08084c…0809e0 Dummy {f00=0x0078, f01=0x4040, f02=» & ( *@ <& > REGKONTONR L $ f & v & KONTONRO $ & BFO $ & &
0x0809e0…080b74 (0, 163) Dummy {f00=0x0078, f01=0x40ce, f02=» : H IDENT KTOPRD TRA 4.2 81-05-06 F1 O1111 03.01.XXX.1 KTOPR KTPRT B $$$TRAO X KTOPR KTPRT j ADMRETO ?R4 @
0x080b74…080d08 Dummy {f00=0x0078, f01=0x0190, f02=» : H IDENT REMFMT TRA 4.2 81-05-13 F1 O1111 03.01.XXX.1 FMREMP FMTREM B $$$TRAM FMREMP FMTREM n FMOVE T:ATTFT * " ^ " b " c " `
0x080d08…080e9c Dummy {f00=0x0078, f01=0x0190, f02=»" 9 ( & ( & 6 & D LEVERAND R $ j & z NR $ & & & XXXXXXXXXX "
0x080e9c…081030 Dummy {f00=0x0078, f01=0x0190, f02=» XXXXXXXXXX " & ( NAVN 6 $ J & Z & h & x & & ADR $ & & & @ &
0x081030…0811c4 Dummy {f00=0x0078, f01=0x0190, f02=»NR $ & & * XXXX < " P & ` -DISTR n $ & & @ & & BET.FORM $ &
0x0811c4…081358 Dummy {f00=0x0078, f01=0x0190, f02=» XXXXXXX " & , ALT.ADR : $ R & b & r XXXXXXXXXX " & XXVXXVXX " & &
0x081358…0814ec Dummy {f00=0x0078, f01=0x0190, f02=» & & & & , LEVERAND : $ R & b NR p $ & XXXXXXXXXX " & SIDSTE UDB $
0x0814ec…081680 Dummy {f00=0x0078, f01=0x0190, f02=» $ & ZZZVZZZVZZ9E,99- " " B & R N[STE ` $ v $ I & 99E-99E-99 " & ! FAKTURA $ ! $
0x081680…081814 (0, 164) Dummy {f00=0x0079, f01=0x018e, f02=»K & $ ZZZVZZZVZZ9E,99- " $ 8 & $ H % SKYLDIGT V $ % n $ K ~ & & ZZZVZZZVZZ9E,99- " & ! ( ' M & & & &
0x081814…0819a8 Dummy {f00=0x0079, f01=0x018e, f02=» | " * & * $ I & + B99E-99E-99E 6 " + R & + b $ K p & , ZZVZZZVZZ9E,99-- " , & , - TEKST $ - . ZZ9
0x0819a8…081b3c Dummy {f00=0x0079, f01=0x0190, f02=» 1 OPL $ 1& 2 BXXXXXXXXXX, , " 2 H 3 BXXXXXXXXXX, X " 3 t & 3 4 REG.KNT. $ 4 5 9999999999 " 5 & 6 ]R $
0x081b3c…081cd0 Dummy {f00=0x0079, f01=0x0190, f02=» & 8 : UDSKRIFT $ :' * ; AF : $ ;' L < LEVERAND $ <' t = FIL $ =' & > 99E-99E-99 " >~' & > ? VEDL. $
0x081cd0…081e64 Dummy {f00=0x0079, f01=0x0190, f02=»L NR $ B & C XXXXXXXXXX . " C H & X D XXXXXXXXXX j " D & D E ALLE OPLYSNINGER (1) $ E & F X " F
0x081e64…081ff8 Dummy {f00=0x0079, f01=0x0190, f02=» I & VAL R J DATO , $ JA @ ( P K & BEL B l ( L 4 & & E M UDSKRIFT $ ME N AF $ NE
0x081ff8…08218c Dummy {f00=0x0079, f01=0x0190, f02=» R FRA/TIL NR $ RE & . S ZZ9 @ " S T & - d & r T ZZ9 " T & T & T & U PRINTENHED?D $ U &
0x08218c…082320 Dummy {f00=0x0079, f01=0x0190, f02=» & W Y REMIT.TEKST NR $ Y . & > & N Z XXX ` " Z t & & & [ TEKST $ [ & A & & &
0x082320…0824b4 (0, 165) Dummy {f00=0x0079, f01=0x0190, f02=» & & & $ & 2 & @ & P & ^ _ 99V99V99 l " _ & & & & & & & &
0x0824b4…082648 Dummy {f00=0x0079, f01=0x018e, f02=» & & & & * & : & H & X & f & t & & & & & & ( ` < & +
0x082648…0827dc Dummy {f00=0x0079, f01=0x0190, f02=» & a 99V99V99 " a * & : & H & X & f & t & & & & & & & & & &
0x0827dc…082970 Dummy {f00=0x0079, f01=0x018e, f02=» & & ( b , & + < & J & Z & h & x & & & & & & & & &
0x082970…082b04 Dummy {f00=0x0079, f01=0x0190, f02=» & & & " & 0 & > & N & & j & x & & & & & & & & &
0x082b04…082c98 Dummy {f00=0x0079, f01=0x0190, f02=» & & & " & 0 & @ & N & ^ & l & | & & & & & & & & &
0x082c98…082e2c Dummy {f00=0x0079, f01=0x40ba, f02=» & & & " & 0 & @ & N & ^ & l ( | 0RIF 4 1XF 4 @ & & & & &
0x082e2c…082fc0 Dummy {f00=0x0079, f01=0x0190, f02=» : H IDENT REMFMS TRA 4.2 81-05-06 F1 O1111 03.01.XXX.1 FMREMP FMTREM B $$$TRAM FMREMP FMTREM n T:ATTFM * " 9 " E " "
0x082fc0…083154 (0, 166) Dummy {f00=0x0079, f01=0x0190, f02=» & NR $ & 0 & @ & P XXXXXXXXXX b " | & & XXXXXXXXXX " & & & &
0x083154…0832e8 Dummy {f00=0x0079, f01=0x0190, f02=»& & & ADR , $ @ & P & ^ & @ n & & BY $ & & & @ & &
0x0832e8…08347c Dummy {f00=0x0079, f01=0x0190, f02=»TR $ & & @ * & < & J BET.FORM X $ p & & X " & GIRONR $ &
0x08347c…083610 Dummy {f00=0x0079, f01=0x0190, f02=» XXXXXXXXXX " $ & 4 XXVXXVXX B " Z & j & x SLETNING EJ TILLADT0 $ & & & $ (
0x083610…0837a4 Dummy {f00=0x0079, f01=0x0190, f02=» $ & XXXXXXXXXX * " D & T SIDSTE UDB b $ | 99E-99E-99 " & ZZZVZZZVZZ9E,99- " &
0x0837a4…083938 Dummy {f00=0x0079, f01=0x018e, f02=» $ 7 & 99E-99E-99 * " D & T FAKTURA b $ z $ 8 & ! ZZZVZZZVZZ9E,99- " ! & ! " KREDITNOTA $ "
0x083938…083acc Dummy {f00=0x0079, f01=0x0190, f02=» $ 8 & % ZZZVZZZVZZ9E,99- " " % ! B ( R & ^ & % n ( | ' ? & % ( UDSKRIFT $ (! ) AF $ )! * LEVERAND
0x083acc…083c60 Dummy {f00=0x0079, f01=0x0190, f02=» $ -! . DATO $ .! , & < / XXE-XXE-XX N " / h & / x 0 FRA/TIL NR $ 0 & 1 XXXXXXXXXX " 1 & 2 XX
0x083c60…083df4 (0, 167) Dummy {f00=0x0079, f01=0x0190, f02=»" 4 & 4 & 4 5 NULSTIL SALDO (1) * $ 5 L & 6 X n " 6 ( 7 & VAL & & RDATO ( 8 & BELT
0x083df4…083f88 Dummy {f00=0x0079, f01=0x0190, f02=» ; AF $ ;E < TEKST $ <E 4 = FIL D $ =E X & h > 99E-99E-99 v " >~E & > ? FRA/TIL NR $ ?E & T @ ZZ9 " @
0x083f88…08411c Dummy {f00=0x0079, f01=0x0190, f02=»?D ~ $ B & * % # C JOURNALSKRIVER=1,REGNERULLE=21 ( $ C V & # T f D 9T x " D ( E & & D F REMIT.TEKST NR $ F & &
0x08411c…0842b0 Dummy {f00=0x0079, f01=0x40c8, f02=» A T & & & * I KODE 8 $ I L & T J XT n " J ( 4 1XF 4 @ F REMIT.TEKST NR $ F & &
0x0842b0…084444 Dummy {f00=0x0079, f01=0x0190, f02=» : H IDENT REMLEV TRA 4.2 81-05-13 F1 O1111 03.01.XXX.1 B > CHDATO GETNXT IDXGET LEVDEL LEVIN LEVOPR LEVPRT LEVRD B * & LEVSPGM SETIDXA VARRD VARWRT3 XCOP1 $$$TRA @ < CHDATOM GETNXTV IDXGETR LEVDEL1 LEVIN LEVOPR C
0x084444…0845d8 Dummy {f00=0x0079, f01=0x0190, f02=» RAWRIT REPL00 ` D @ SETKEY! SPCLRAX SPCLRNX SPERR SPLIN81 T:EDWRN TRINITP TRREAD TXTRD WAITF ` STRAKSLEVD v # % * ,
0x0845d8…08476c Dummy {f00=0x0079, f01=0x0190, f02=»EH. Q T ^ , g @ < o L r v C l w C | x }0 J F " D @ 4 ~ LA A R R6 {{ _ R RkT RTe@ @ R R2 RRR_ L<@
0x08476c…084900 Dummy {f00=0x0079, f01=0x018e, f02=» a J F " D @ R R2 RRR_ 6 W # L R_B R R#T RT _x R | l | SLETNING 0
0x084900…084a94 (0, 168) Dummy {f00=0x007a, f01=0x0190, f02=» ( & 8 ' H ( + X / h 3 x : J F " D ! R RA " @ W ) !L R@ @ A R R@ 2 RRR_ I RW R 4 R 4 A $ D
0x084a94…084c28 Dummy {f00=0x007a, f01=0x0190, f02=» q r t $ v ! 6 x F y X { $ j } ! | D J F " D @ RT R R T L =D R#L= Tr R LL=L W_ R LL=L R LL=L R L
0x084c28…084dbc Dummy {f00=0x007a, f01=0x0190, f02=» [ . @ P ` ! p h ! i !
0x084dbc…084f50 Dummy {f00=0x007a, f01=0x0190, f02=» s J F " D L=L R LL=L R LL=L L R L R R % R R LL=L R LL=L R LL=L L $ X ! h x ! !
0x084f50…0850e4 Dummy {f00=0x007a, f01=0x0190, f02=» X $ ! 6 [ F X j J F " D R LL=L@T 4 @T 4 RT =D R=LL L R=LL L R=LL L R=LL L R=LL L R= | ! h
0x0850e4…085278 Dummy {f00=0x007a, f01=0x0190, f02=» ! s . " @ $ R - b /0 r J F " D LL L R=LL L R=LL L R=LL L ~ R=LL L R R T R#L= T @T 4 @T M0 L S0 L V0 L
0x085278…08540c Dummy {f00=0x007a, f01=0x0190, f02=»R R6 u R @ 0 @ P _ ` _ p J F " D u _% R RlTj RTf
0x08540c…0855a0 Dummy {f00=0x007a, f01=0x0190, f02=» R W R R6 _ ' _+H I I R _s4 I H A ~ < L 0 $ 0 $ n 0 0 &0 . 0 5 = J F " D R @ R
0x0855a0…085734 (0, 169) Dummy {f00=0x007a, f01=0x0190, f02=» k m w0 ( y : } J J F " D @" > RT4 R$ H RT$I A W @ I 1X FW 1X FH H L RT RP Z $ 1 0 1 !
0x085734…0858c8 Dummy {f00=0x007a, f01=0x018e, f02=» J F " D _F4 RU R R T L >D R$L> Tr R LL>L W_ L R LL>L ! X h z ! !
0x0858c8…085a5c Dummy {f00=0x007a, f01=0x0190, f02=» % ( J F " D R LL>L R LL>L R LL>L R LL>L ! ! L R LL>L : ! / $ ! ! "
0x085a5c…085bf0 Dummy {f00=0x007a, f01=0x018e, f02=» 8 : @ ! B 0 C B E T J F " D R LL>L@U 4 @U 4 RU >D R>LL L R>LL L R>LL L f K ! M N P V !
0x085bf0…085d84 Dummy {f00=0x007a, f01=0x0190, f02=» j / k m , o > x N z0 ^ J F " D @R>LL L R>LL L R>LL L R>LL L R>LL L R R T R$L> T @ p 0 L 0 L 0 L 0 L
0x085d84…085f18 Dummy {f00=0x007a, f01=0x0190, f02=» L N 0 $ 0 . @ 0 0 P 0 0 b J F " D W T 4 L RV L$ c <D R"L< TX L t 0 0 J F " D j < ) L L P R
0x085f18…0860ac Dummy {f00=0x007a, f01=0x0190, f02=» J F " D @ 4 @V 4 @V 4 R RhPf RV"TS_ R"L< T R 0 ~ 0 0 !
0x0860ac…086240 Dummy {f00=0x007a, f01=0x0190, f02=» $ R"L< T2 R"L< T' R _% R<LL L R<LL L R > N 0 < ^ 0 < p 0 < J F " D "L< R@V 4 @V 4 <D R"L< ! L h< D P Lj 0
0x086240…0863d4 (0, 170) Dummy {f00=0x007a, f01=0x0190, f02=» C0 ) I0 ) M0 ( : s J u0 Z z l | | ~ J F " D @ R"L< ! L ! L h< D P R _/ T <D R"L< R R R4 $
0x0863d4…086568 Dummy {f00=0x007a, f01=0x0190, f02=»V R# R$ , T R"L< T@ R"L< T5 R _% T ~ ! < L ^ p 0 0 / 0 J F " D <D R<LL
0x086568…0866fc Dummy {f00=0x007a, f01=0x0190, f02=» L Ty Lj < Wg T Lj < "S ~ H < J0 T L P0 ^ T0 p c / f 0 q0 0 J F " D @ R"L< ! L ! L!_ S S L L " L_ <D j<
0x0866fc…086890 Dummy {f00=0x007a, f01=0x0190, f02=» 0 , > J F " D R"L< X _54 L R R#T W$# L RT RP R R R RT L_ R_ 4 N $ 0 0 !
0x086890…086a24 Dummy {f00=0x007a, f01=0x0190, f02=» 0 ! & 8 J ! l ~ ! g &
0x086a24…086bb8 Dummy {f00=0x007a, f01=0x0190, f02=»99E-99 " & & , & : & H & V & d & r & & & & 9999 " & & &
0x086bb8…086d4c Dummy {f00=0x007a, f01=0x0190, f02=» " & & " & , 0 & @ & N 99E-99E-99 " v BZZZVZZZVZZ9E,99- " & & BZZZVZZZVZZ9E,99- "
0x086d4c…086ee0 Dummy {f00=0x007a, f01=0x4188, f02=» & BZZZVZZZVZZ9E,99- " : & J & X BZZZVZZZVZZ9E,99- f " ! & & & & & & ! & (
0x086ee0…087074 (0, 171) Dummy {f00=0x007a, f01=0x018e, f02=» : H IDENT REMTXT TRA 4.2 81-05-06 F1 O1111 03.01.XXX.1 B > GENWRF GENWRS REPL00 SETKEY SKIP TXTOPR TXTPRT TXTRD B $$$TRAM @ < GENWRF | GENWRSR REPL00T SETKEY SKIP TXTOPRT TXTPRTM TXTRD D @ ABORT FMTRE
0x087074…087208 Dummy {f00=0x007a, f01=0x0190, f02=» 0 0 , "0 < ' | N ) ^ 0 | n 2 ~ 9 ?0 J F " D I, W L R @ L L L R6 _ ! L A R FW R FW R Tt! L C0
0x087208…08739c Dummy {f00=0x007a, f01=0x018e, f02=» ~0 0 | & J F " D @M) L Wc% LC 6 2@ R F " +6 R FW R FW L @ L 6 0 L | 0 L
0x08739c…087530 Dummy {f00=0x007a, f01=0x0190, f02=» | | ( 8 H X h 0 x J F " D W R FW 6 W R FW R FW 4 H,- A A R R( R T ! L @
0x087530…0876c4 Dummy {f00=0x007a, f01=0x0190, f02=» d o0 J F " D @4 j ; j '; ;) L L4 j; ' R j; ' - L Dj; ' 4 6 , z J F " D H 1X W H 1X W H 1X W 4 6 H
0x0876c4…087858 Dummy {f00=0x007a, f01=0x0190, f02=» Z 0 . J F " D 4 RS L ;D R!L; T ! L R @S W @S 4 RS R R!L; T @S W @ @ 0 R " & 1 UDSKRIFT $ AF $
0x087858…0879ec Dummy {f00=0x007a, f01=0x0190, f02=» 99E-99E-99 " ~ & & FRA/TIL NR 4 $ N & ^ ZZ9 l " & - ZZ9 " & & ( &
0x0879ec…087b80 Dummy {f00=0x007a, f01=0x414c, f02=» & & & $ & 2 ( @ L & & j & x & ( $ $ & ( & 1
0x087b80…087d14 (0, 172) Dummy {f00=0x007b, f01=0x018e, f02=» . H IDENT REMBDT TRA 4.2 81-05-13 F1 O1111 . * BCHKPR BGIRPR BSAMPR STREDT WSTRCH 6 $$$TRAM h 8 4 BCHKPR BGIRPRB BSAMPRR STREDTC L WSTRCH z B > CLEAR8M CYRDT FMOD2 FMREMP- FSOLVE1 GENWRF GENWRS GRASPV D @ KFWRIT L
0x087d14…087ea8 Dummy {f00=0x007b, f01=0x0190, f02=» ! L $ ' * & : (0 J J F " D = L L( L RP bL RabF R Lb T @P * pH6 * G0 = K0 = M & N P T
0x087ea8…08803c Dummy {f00=0x007b, f01=0x0190, f02=» LH6 0X E R 1X F L t 2 B R 0 b t J F " D L H6 0X R 0X L R W @P W 4 K X
0x08803c…0881d0 Dummy {f00=0x007b, f01=0x018e, f02=» 6 <FPWu R L ! R WI R R R R a F R R u B u R u b !0 r % ' + / 20 4 8 > J F "
0x0881d0…088364 Dummy {f00=0x007b, f01=0x0190, f02=» e s0 u * x : | J Z J F " D @@ W A 4 6 ;;rW9 R R R L R Wr L R R R j 0 %
0x088364…0884f8 Dummy {f00=0x007b, f01=0x0190, f02=» D R a F R R ) L R L R R I L_; R R R F L 0 a 0 % n 0 % 0 % 0 % J F "
0x0884f8…08868c Dummy {f00=0x007b, f01=0x0190, f02=» 0 * # : ' J + Z / j 4 z 6 > u J F " D R L R # L _ R La F R R R R! R& a F R% R H u
0x08868c…088820 Dummy {f00=0x007b, f01=0x0190, f02=» v x u , J F " D @ Wy R Wo R Wea F R R R R# L R a F L R < u u
0x088820…0889b4 (0, 173) Dummy {f00=0x007b, f01=0x018e, f02=»F R R L L R I R 4 b 0 ( @ ( P b r u J F " D 6 4> HW I0 H8 R R F LW R R a F R R u
0x0889b4…088b48 Dummy {f00=0x007b, f01=0x018e, f02=» 4 8 @ $ B 4 4 J F " D Wj R W` R W @) R FA) R F R WB! L>a F R R" !@) D D P U W ( Z0 j ] ( _
0x088b48…088cdc Dummy {f00=0x007b, f01=0x0190, f02=» ( 8 H X h x J F " D 6 3 6 R R R W R R R W R R R W 6
0x088cdc…088e70 Dummy {f00=0x007b, f01=0x0190, f02=» J F " D 3AO R R R Ws R R R$ We L R L R L R WN R R , z %
0x088e70…089004 Dummy {f00=0x007b, f01=0x0190, f02=» B N Q ` 2 i B v R b J F " D @ R W 4 L L 6 $1a FW7 a FW. a FW! #a F r
0x089004…089198 Dummy {f00=0x007b, f01=0x018e, f02=» " & ( * ZZZZZZZZZ9 : " T & d ZZZZZZZZZ9 r " ( 99V99V99 " & (
0x089198…08932c Dummy {f00=0x007b, f01=0x0190, f02=» ZZZZZZZZZ9 " & . 99V99V99 < " T & d ( r ~ ****9 " ( ZZZZZZZVZZ9,99-L " (
0x08932c…0894c0 Dummy {f00=0x007b, f01=0x0190, f02=» ( & 8 & *******V**9,99-L 6 " V & f ZZZZZZVZZ9BB99-L t " ( & 8 9999999999 " &
0x0894c0…089654 (0, 174) Dummy {f00=0x007b, f01=0x0190, f02=»& + 99V99V99 " $ & 4 ! *.***.***.**9,99- B " ! d & t & & 3 " *.***.***.**9,99- " " & & & 4 &
0x089654…0897e8 Dummy {f00=0x007b, f01=0x0190, f02=» & 2 # ZZZZBB " # ( & 8 & F & T & 4 b & 4 p & 4 ~ & 4 & 4 & $ 999E-999E-99E-99 " $ & % 999E-999E-
0x0897e8…08997c Dummy {f00=0x007b, f01=0x0190, f02=» & 7 $ & $ & 2 & @ & N & & j ( x ( W & + & 0 & Y & 8 " ) SAMLERGIRO-FORTEGNELSE $ )
0x08997c…089b10 Dummy {f00=0x007b, f01=0x0190, f02=» x $ + , SLISTE $ , . & > - ADVI L $ - ` . SLISTE p $ . & & / SPECIFIKATION $ / & & 0 DEN
0x089b10…089ca4 Dummy {f00=0x007b, f01=0x0190, f02=» & LEV-NR & & NAVN & & 8 & F 2 SIDE T $ 2A h 3 ZZZZ x " 3 A & 3 ( 4 * & 3 & ) A & ) 5 ZZZZZZZVZZ9,99
0x089ca4…089e38 Dummy {f00=0x007b, f01=0x4118, f02=»ZZZZZZZVZZ9,99-G " 8 A & ( 9 TOTAL 6 $ 9A L & IALTR : ZZ9R p " : I & SIDE(R) & & ( , ( & W # $a FW #a Fa F 4
0x089e38…089fcc Dummy {f00=0x007b, f01=0x018e, f02=» . H IDENT REMBDS TRA 4.2 81-05-06 F1 O1111 . * BCHKPR BGIRPR BSAMPR STREDT WSTRCH 6 $$$TRAM h 8 4 BCHKPR BGIRPRB BSAMPRR STREDTC WSTRCH z D @ CLEAR8M CYRDT GRASPV KFWRIT6 RAWRIT1 SPLIN8 T:DELA T:DSC0 T:DSC1
0x089fcc…08a160 Dummy {f00=0x007b, f01=0x0190, f02=» /0 J F " D = L L( LHP 0X _ AP bL RabF R Lb Tx @P * G0 = h K0 = z M N P T W ( Y a g
0x08a160…08a2f4 (0, 175) Dummy {f00=0x007b, f01=0x018e, f02=» 0 2 J F " D 0X R 0X L R W @P W @P W 4 4 4 B J F " D 4 L L 6 $1 DW7
0x08a2f4…08a488 Dummy {f00=0x007b, f01=0x0190, f02=» " ( ZZZZZZZZZ9 0 " J & Z ( h t ZZZZZZZZZ9 " & ZZZZZZZZZ9 " (
0x08a488…08a61c Dummy {f00=0x007b, f01=0x0190, f02=» 99V99V99 " & " ( 0 < ZZZZZZZZZ9 L " f & v 99V99V99 " & ( ****9 " (
0x08a61c…08a7b0 Dummy {f00=0x007b, f01=0x0190, f02=»& & & 3 *.***.***.**9,99- ( " J & Z & h & 4 v & & & & 2 & & & & 2 & &
0x08a7b0…08a944 Dummy {f00=0x007b, f01=0x0190, f02=» & 4 & 4 & 4 $ & 2 999E-999E-99E-99 B " b & r 999E-999E-99E-99 " & ****9BB9 " E & (
0x08a944…08aad8 Dummy {f00=0x007b, f01=0x403c, f02=» $a FW #a Fa F 4 &@ 8 2 999E-999E-99E-99 B " b & r 999E-999E-99E-99 " & ****9BB9 " E & (
0x08aad8…08ac6c Dummy {f00=0x007b, f01=0x0190, f02=» . H IDENT REMTR TRA 4.2 81-05-11 F1 O1111 B > BDTDEL BDTPRT BDTSCA TRGET TRGETF TRINIT TRINS TRREAD 6 TRRMV | $$$TRA @ < BDTDELM BDTPRT4 BDTSCA- TRGET 0 TRGETF TRINIT TRINS TRREAD TRRMV > :
0x08ac6c…08ae00 Dummy {f00=0x007b, f01=0x0190, f02=» RAWRITM SPERR SPLIN8P STREDTT TXTRD VARRD VARWRTG WAITF WCHUPD XCOPS B Z j z $ * ! '
0x08ae00…08af94 (0, 176) Dummy {f00=0x007c, f01=0x0190, f02=»* - L R B N0 0 2 _ B h0 0 R J F " D @ R = L @Y@5@ R <R" - L AY ' " pI d 0 0 0 0 0
0x08af94…08b128 Dummy {f00=0x007c, f01=0x0190, f02=» * * 0 . 0 @ 0 R 0 d 0 x J F " D L R T @ % L RT R T RT + L LH5 L L L
0x08b128…08b2bc Dummy {f00=0x007c, f01=0x0190, f02=» J O j0 n0 , t , > y0 N { b J F " D @ W " R $ W ' ^I0 ) L L RT2 L?R 6 r 0 "
0x08b2bc…08b450 Dummy {f00=0x007c, f01=0x0190, f02=» * 0 0 @ R b r 0 j 0
0x08b450…08b5e4 Dummy {f00=0x007c, f01=0x0190, f02=» * * : & J ( Z * j . z 1 90 > J F " D L% L L ' _> R R ?R R<R 8R R8R@ R <R U% L A) R
0x08b5e4…08b778 Dummy {f00=0x007c, f01=0x0190, f02=» i k p t j . | > ~ N ^ n J F " D @ R F R 8R L L RP R R F RP R R F ~
0x08b778…08b90c Dummy {f00=0x007c, f01=0x018e, f02=» D R F R F LW " R _= R R R F ' _x R R RZ Q 0 L ^ n 0 ~ j 0 J F " D RT L P RP @ R T " 4 % L @7@7 R
0x08b90c…08baa0 Dummy {f00=0x007c, f01=0x018e, f02=» - * 20 ; * J F " D R LI6 % L L ' _N@7 R Wt R RZ Qk RTl L ] RPY@ : A Q0 a0 e i0 o s j x
0x08baa0…08bc34 (0, 177) Dummy {f00=0x007c, f01=0x0190, f02=» 0 T 0 T & J F " D L ' _T! L R W 4 4 % L W $ 8 , 0 L * J F " D R
0x08bc34…08bdc8 Dummy {f00=0x007c, f01=0x0190, f02=» 0 0 0 $0 2 (0 D ,0 V 00 h 40 z 80 <0 @0 J F " D LA R T L L L L #L $L L &L L L L L% '
0x08bdc8…08bf5c Dummy {f00=0x007c, f01=0x018e, f02=» }0 0 J F " D @L @ R TY '_H L R_ RT@ ' @ R T5 RT* RT# L L ( 0 v 0 0 , 0 0 0
0x08bf5c…08c0f0 Dummy {f00=0x007c, f01=0x0190, f02=» 0 0 & * 8 , H $ X 0 h J F " D R P2! L Ww "A R T 'L R T L RT RT W{ R z 0 P 0 P 0 P 0 P
0x08c0f0…08c284 Dummy {f00=0x007c, f01=0x018e, f02=» 5 J F " D L L L L #L $L L &L L L L ' 'L@ R T@ " F L0 l Y ~ h s z J F " D @_ R P L _ ! " R P _ ' ! R !_ R W R 4
0x08c284…08c418 Dummy {f00=0x007c, f01=0x0190, f02=» 0 J F " D ' R T R) L L RT W 4 R_ L RT R T @_ W @_ . b r 0 . ' 0 J F " D 4 RW R R%
0x08c418…08c5ac Dummy {f00=0x007c, f01=0x0190, f02=» A R T ' R T W ' RT W W 4 A R TN ' D D I T V d `0 t e0 l0 t0 z0 P } DISKFEJL " J F " D @ ' R TA R T
0x08c5ac…08c740 Dummy {f00=0x007c, f01=0x0190, f02=» $ 0 $ 2 , > P 0 b 2 t 2 J F " D R
0x08c740…08c8d4 (0, 178) Dummy {f00=0x007c, f01=0x0190, f02=» 2 & 8 0 J 2 l ~ 0 2 0
0x08c8d4…08ca68 Dummy {f00=0x007c, f01=0x0190, f02=» 0 0 ! 2 $ # 4 $ F & X /0 j 1 2 | 3 4 6 < 2 > ? A J F
0x08ca68…08cbfc Dummy {f00=0x007c, f01=0x018e, f02=» Q Z0 2 0 ^ @ _ R a d g 2 v i j l u0 w 2 y z |
0x08cbfc…08cd90 Dummy {f00=0x007c, f01=0x0190, f02=» 2 * < " N 0 ` 2 r $ 2 J F " D R
0x08cd90…08cf24 Dummy {f00=0x007c, f01=0x0190, f02=» 2 " 4 F 2 X h z 2 2
0x08cf24…08d0b8 Dummy {f00=0x007c, f01=0x0190, f02=»JLL L RJLL L RJLL L RJLL L p 2 . > P b " 2 t $ % ' - 2 / 0 2 @ 2
0x08d0b8…08d24c Dummy {f00=0x007c, f01=0x0190, f02=» Q 2 S T & V 8 b 2 J d " Z e l g ~ o q 2 s t v J F " D @RJLL L $_ RJLL L #_
0x08d24c…08d3e0 Dummy {f00=0x007c, f01=0x0190, f02=» & & & ( & 6 & D ZZZVZZZVZZZVZZ9E,99- R " v ( * & & ) & ) ZZZZZZZVZZ9,99-E " &
0x08d3e0…08d574 (0, 179) Dummy {f00=0x007c, f01=0x0190, f02=» & TOTAL $ ( & IALT 8 ZZ9 L " I ` & SIDE(R) p & & ( & + & & & & &
0x08d574…08d708 Dummy {f00=0x007c, f01=0x0190, f02=» ZZZ9999999 " S " & 2 ZZZZZZZ9 @ " S X & h & v ( ; & & & & SPECIFIKATION $ S
0x08d708…08d89c Dummy {f00=0x007c, f01=0x4130, f02=» GIRO $ & DATO , $ @ & P 99E-99E-99 ^ " x & SIDE $ ZZZZ " & & (
0x08d89c…08da30 Dummy {f00=0x007c, f01=0x0190, f02=» : H IDENT REMPRT TRA 4.2 81-05-19 F1 O1111 04.01.XXX.1 AD4100 AD4200 AD4300 B $$$TRAM d $ AD4100 AD4200A U AD4300 v > : ADMRETM BDTDELA BDTPRT1 BDTSCAF CHDATO SPCLRAX T:ATTF
0x08da30…08dbc4 Dummy {f00=0x007c, f01=0x0190, f02=» H.PA 1XF R6 CC WAI^>A^% L A0 L L LI I W H - L L R A J L0 A Z O0 A l R0 A ~ T j k m z0 A 0 A J F " D @ RT W @^@0 L
0x08dbc4…08dd58 Dummy {f00=0x007c, f01=0x018e, f02=» 0 0 " SAMLERLISTE 2 N ^ n 0 A ~ 0 A 0 A J F " D L L % L L L L L R TK L1XF R6 == W; L L L R
0x08dd58…08deec Dummy {f00=0x007c, f01=0x0190, f02=» 0 * : J Z J F " D * L1XF R6 W AY L L L L R T @YW @8@^?RI^7A^H.0A 1XF R j 0 L 0 L 0 L 0 L
0x08deec…08e080 Dummy {f00=0x007c, f01=0x018e, f02=»T $ FIL $ . & > BUNDTREMITTERING L $ l & | VAL $ & & R DATO $ $ # &
0x08e080…08e214 (0, 180) Dummy {f00=0x007d, f01=0x018e, f02=» SLISTE $ (0-1) . $ D & T X f " x & FRA LEV. $ NR $ & XXXXXXXXXX
0x08e214…08e3a8 Dummy {f00=0x007d, f01=0x0190, f02=» BUNDTREMITTERING $ $ & 4 UDSKRIFT B $ Z DATO j $ ~ $ # & BFO $ & X " &
0x08e3a8…08e53c Dummy {f00=0x007d, f01=0x018e, f02=» ( & $ & 2 & @ & N B ` " r ( & SLET $ RUTINE $ BUNDTREMIT
0x08e53c…08e6d0 Dummy {f00=0x007d, f01=0x40b0, f02=» # & $ XXVXXVXX * " $ B ( R 8 3 1 6 ## W! % L L RT % L L L RT W @^?R ^ - @ SLET $ RUTINE $ BUNDTREMIT
0x08e6d0…08e864 Dummy {f00=0x007d, f01=0x0190, f02=» . H IDENT REMSUB TRA 4.2 81-05-06 F1 O1111 , ( FMOD FSOLVE KBTEST NEWLIN PRTADJ 6 $$$TRAM f 6 2 FMOD FSOLVEK H KBTESTW NEWLIND PRTADJ x < 8 ABORT GENWRFT SPCLRA SPLIN86 T:ATTF1 T:TEST T:WAIT
0x08e864…08e9f8 Dummy {f00=0x007d, f01=0x0190, f02=» P x J F " D @ W 4 L L L hI T! fI j I dI L _*4 , z
0x08e9f8…08eb8c Dummy {f00=0x007d, f01=0x40f4, f02=» J & & PAPIRINDSTILLING OK ? & & J & I X XI j " | ( & ( ( W 4 @
0x08eb8c…08ed20 Dummy {f00=0x007d, f01=0x0190, f02=» . H IDENT BUDGET TRA 4.2 81-05-06 F1 O1111 BUDREG 6 $$$TRAD H BUDREG Z D @ FMOVE FRMBUDT FRMBUP GENWRF6 GENWRS1 NEWLIN PACKCL PACKST n B > RAREAD RAWRIT RGREAD SETDEB SKIP SPCLRA SPCLRN SPERR $ T:ATTFF T
0x08ed20…08eeb4 (0, 181) Dummy {f00=0x007d, f01=0x0190, f02=» & $ 4 D T ! d " t # ' *0 F 0 ' 4 @ 5 6 x 7
0x08eeb4…08f048 Dummy {f00=0x007d, f01=0x0190, f02=»RR_ R L L2 RRRRRRRRRR_* h A " & B 6 K0 R F N0 R X P j R z V W Y Z ] " ^ " g0 R j0 R l
0x08f048…08f1dc Dummy {f00=0x007d, f01=0x0190, f02=»1XF L L R R2 RR R_ 1XF n 0 , > 0 N ` p t " & 0
0x08f1dc…08f370 Dummy {f00=0x007d, f01=0x0190, f02=» " - $ J F " D L R L R2 RR R_ 1XF L R R2 RR R@ _ 1XF L R R2 RR R@ _ 1X 4 0 L " 0
0x08f370…08f504 Dummy {f00=0x007d, f01=0x0190, f02=» ( 8 H J F " D F L R R2 RR R@ _ 1XF L R R2 RR R@ _ 1XF L R R2 RR R@ _ X o z o
0x08f504…08f698 Dummy {f00=0x007d, f01=0x0190, f02=» J F " D L R R0R F R_ 1XFA R2 RRR_ t * R L P _ R B ' X S " j T z V X ^ Z ` d " e " g i
0x08f698…08f82c Dummy {f00=0x007d, f01=0x0190, f02=»n 1XF R R( R RW}1XF R R( r R RWl1XF R R( a z 8 " H & X h x " )
0x08f82c…08f9c0 Dummy {f00=0x007d, f01=0x0190, f02=» J F " D R RW[WY1XF R R R( L R RWF1XF R R R( 9 R RW31XF R R R( & R RW " V 0 f v " 3
0x08f9c0…08fb54 (0, 182) Dummy {f00=0x007d, f01=0x018e, f02=» SL J F " D 1XF R R( R RW 1XF R R( R R_ 0R F R?R RT V L R(L= VT =! ** j | ! ** ' 2 & < J F " D L ) L V _ Rf= 6 @@@@@@@ L Lh= T
0x08fb54…08fce8 Dummy {f00=0x007d, f01=0x0190, f02=» s u w0 & J F " D @f= R F =D L b= a @ R F V @T0X RT L R(L= VTL = 8 SL ** + ' 0 ' SL
0x08fce8…08fe7c Dummy {f00=0x007d, f01=0x018e, f02=»! L L V _ L R _ =L R(L= T n , < & L l ~ 0 SLUTD J F " D V @T W V @T ?R s R@ 4 (V H RT =L V L R(L= VT[ =! L
0x08fe7c…090010 Dummy {f00=0x007d, f01=0x0190, f02=» -0 00 90 , J F " D V L R(L= VTA =! L V _ =L R(L=VT*@T ~ L L ~ L > F0 _ a c b d b l n c o
0x090010…0901a4 Dummy {f00=0x007d, f01=0x0190, f02=» " R RL R4 " R RL R4 d " b 2 c B R d b t c b J F " D " R # " R RL4 " R # " R RL4 " R # " R
0x0901a4…090338 Dummy {f00=0x007d, f01=0x0190, f02=» b J F " D RL4 " # RL R4 " # RL R4 ! " # ' X j 3 BUDGETTAL z 8 BUDGETTAL = BUDGETTAL J F " D $ % & 4 = L L 6 (( %W& LW! LW
0x090338…0904cc Dummy {f00=0x007d, f01=0x0190, f02=»B x V ANL[GSINDT[GTER-TB X , Z < g ' L i ^ l o n p & ~ z ** J F " D @ LW LW LW LW L R R 4 L R R4 RT`= =) L I *@ SLUTD
0x0904cc…090660 Dummy {f00=0x007d, f01=0x018e, f02=»V =) L A @T W @T 4 l 4 * < J F " D L " L L 4 W W " N & 0 & , { 5
0x090660…0907f4 (0, 183) Dummy {f00=0x007d, f01=0x0190, f02=» O Q0 J F " D @a T , L R La b a _=@ 4 ! " # $ % * x ( 0 0 0 0 0
0x0907f4…090988 Dummy {f00=0x007d, f01=0x018e, f02=» BUDGETTAL $ UDEN $ $ 8 BUDGETTERINGSKODE H $ j & z 41 $ BUDGETTAL $ MED $ BUDGET
0x090988…090b1c Dummy {f00=0x007d, f01=0x0190, f02=» BUDGETTAL $ MED . $ B BUDGETTERINGSKODEA R $ t & 45 $ TILL[GSBEV. BUDGET $ & 46
0x090b1c…090cb0 Dummy {f00=0x007d, f01=0x0190, f02=»DSB. z $ & 48 * $ > ANL[GSUDGIFTER-TB N $ p & 49 $ ANL[GSINDT[GTER-TB $ & & & # !
0x090cb0…090e44 Dummy {f00=0x007d, f01=0x0190, f02=» ELLER TRYK "KVIT" ELLER "KRE"@ $ ( ( 8 D & T INDTAST TRANSKODE: b $ & & ZZ " & PLUS REGKONTONR $
0x090e44…090fd8 Dummy {f00=0x007d, f01=0x0190, f02=» $ ! $ ; $ C $ ( 4 " @ & P # 41 ^ $ # r $ ; $ e $ C ( $ & % 42 $ % $ ;
0x090fd8…09116c Dummy {f00=0x007d, f01=0x0190, f02=». BUDGET ~ $ ( $ h $ j 0 ( @ ) L & * 46 j $ * ~ + OMPLACERINGER $ + $ h & , DET.KODE/LBNR: $ ,
0x09116c…091300 Dummy {f00=0x007d, f01=0x018e, f02=» v $ / & $ 6 & $ s 6 $ j F ( V 0 b & r 1 48 $ 1 2 ANL[GSUDGIFTER-TB $ 2 $ n $ u ( 3
0x091300…091494 (0, 184) Dummy {f00=0x007e, f01=0x018e, f02=» ( 6 7 BUDGETBELT $ $ 7 > & N 8 B ]R: $ 8 r ( 9 : BUDG.BEL $ : & & B ( ; & < IN
0x091494…091628 Dummy {f00=0x007e, f01=0x018e, f02=» " > & > & > " ? LINNR: 0 $ ? F @ ZZZ9 V " @ j & z A REGKONTONR: $ A & ! B XXXE-XXXE-XXE-XX " B (
0x091628…0917bc Dummy {f00=0x007e, f01=0x0190, f02=» | $ F G B99 " G , & G < & 7 J H ZZZZZZZVZZX-B- " H z & 8 I ZZZZZZZVZZX-B- " I & I & I J BUDGET]R $ J
0x0917bc…091950 Dummy {f00=0x007e, f01=0x0190, f02=»ET]R $ N" O B99 " O # 0 P BUDGET]R @ $ P# Z Q B99 j " Q $ ~ R BUDGET]R $ R$ S B99 " S % T BUDGET]R $ T%
0x091950…091ae4 Dummy {f00=0x007e, f01=0x018e, f02=» W ZZZZZZZVZZX-B- " W & ; , X ZZZZZZZVZZX-B- @ " X ^ & (< n Y ZZZZZZZVZZX-B- " Y & 5= Z ZZZZZZZVZZX-B- " Z & B>
0x091ae4…091c78 Dummy {f00=0x007e, f01=0x0190, f02=» & ] ZZZZZZZVZZ9-B- " ] 0 ^ ZZZZZZZVZZ9-B- @ " ^ ^ & ^ n _ ZZZZZZZVZZ9-B- | " _ ! ` ZZZZZZZVZZ9-B- " ` " a ZZZZZZZVZZ9-B- " a #
0x091c78…091e0c Dummy {f00=0x007e, f01=0x0190, f02=» ( e & f BUDGETTERINGSKODE: * $ f& L & C6 g XBXXXXBXXXBXXK p " g ( h $ n & $ 6 & 4x i XX
0x091e0c…091fa0 Dummy {f00=0x007e, f01=0x018e, f02=» & & l XXXE-XXXE-XXE-XX " l @ & 9 P m ZZZZZZZVZZX- b " m " ~ ( n & m & m o TILL[GSBEV.DATO: $ o" & ?
0x091fa0…092134 (0, 185) Dummy {f00=0x007e, f01=0x018e, f02=» s ! & x ! t XX ! ( " t ! : ( ! J u ! V & t ! f v PROJEKT NR ! t $ v ! & ! $ 9 ! & ! & ! w XXXX ! " w ! &
0x092134…0922c8 Dummy {f00=0x007e, f01=0x4102, f02=» z " & * " ( " " { " . & " > & " L & " Z & " j & " x & " ( " H D ! B & " R RP " RW R4 L L !L "L #L $L %L &L4 " " @ " &
0x0922c8…09245c Dummy {f00=0x007e, f01=0x40a8, f02=» B H IDENT BUDD TRA 4.2 81-05-06 F1 O1111 BUDGET DUMMY MODULE BUDREG J $$$TRAD BUDREG n 4 UD @ P ? PBUSUB10 FRMT ? P FILLR '0',2 ? P FCOPY CLEVBUF ? P FEOR ? P FMEND ?
0x09245c…0925f0 Dummy {f00=0x007e, f01=0x0190, f02=» L H IDENT RKONV TRA 4.2 81-05-06 F1 O1111 R]KONVERTERING 9.2 810218 NJ 6 2 hASG ATTHD1 DKIO DKREAD DKWRIT RKASSG RKGO T $$$TRAO D @ hASG ATTHD1D DKIOR ' DKREADI DKWRIT RKASSG RKGO > : COPYDKO GENWRFA INIT KBTEST6
0x0925f0…092784 Dummy {f00=0x007e, f01=0x0190, f02=» DIV. INFO 2 B R b r ! $ RUTINEVALG & ' C *0 U ,
0x092784…092918 Dummy {f00=0x007e, f01=0x0190, f02=» H Q I J & K E . L > M N N H ^ U n W ~ Y [ h SLUTLIGNING m FORSKUDSREG. r LONOPL. x
0x092918…092aac Dummy {f00=0x007e, f01=0x0190, f02=» ' ' , < L , ( & 11IKKE STARTET OP P] HOVEDSK[RM " J F " D a8 b @0 R<R?R@0
0x092aac…092c40 Dummy {f00=0x007e, f01=0x0190, f02=» * [NDRING : R b r J F " D ?R?R R<R?R R?R?R?RA9@ A0 L R?RW ?R?RA R_ W W"W) a8 b @0 a8 '
0x092c40…092dd4 (0, 186) Dummy {f00=0x007e, f01=0x018e, f02=» % ' * / FORESP RG 0 1 J 3 Z 7 j ; z @ ' J F " D b @0 R<R R<R?R R<R?R R<R?R R <R@9 L R?RW ?RW ?R B D
0x092dd4…092f68 Dummy {f00=0x007e, f01=0x0190, f02=» } ~ ( J F " D @R<R?RA2 L R <R RT RW W W W W W W R<R2 RRRR 8 0 ? INDSTIL PRINTER N
0x092f68…0930fc Dummy {f00=0x007e, f01=0x0190, f02=» * : L J J F " D ?R L sL1XF R R <R R<R st R F R<R st R F L R<R st R F Z L 0 **
0x0930fc…093290 Dummy {f00=0x007e, f01=0x018e, f02=» 0 0 0 0 2 D - T # f % v & L . 0 P 5 7 L : < = L J F "
0x093290…093424 Dummy {f00=0x007e, f01=0x018e, f02=» v O P N R ( X 8 ^ H ` X b L h g x u P { !P J F " D @ RTpW L sL1XF R R TU sL R F RT/ st t L Lhs
0x093424…0935b8 Dummy {f00=0x007e, f01=0x0190, f02=» ' J F " D = T js R F RP L1W 7 _= L_B RT WY sLWO sLWJ R L[SEFEJL b ' z SKRIVEFEJL ' ' REWINDFEJL ' DISKETTE FYLDT OP
0x0935b8…09374c Dummy {f00=0x007e, f01=0x0190, f02=» RT sLW T 2 . , &RUTINE IKKE TILLADT P] DENNE TERMINAL H N X h " x ! b '0 / 5 J F " D sLW 1XF
0x09374c…0938e0 Dummy {f00=0x007e, f01=0x0190, f02=» I9 _>K IA 4 4 4 y L { L 4 z $ 8 H X J F " D 0X 0R P- 0R T ( W S _ 4 4 h ' 0 p ' J F " D R Y 4
0x0938e0…093a74 (0, 187) Dummy {f00=0x007e, f01=0x0190, f02=»a 4 L 4 6 )8GVe 4 x C P 6 E H M X U P j W | _ d f n s u } J F "
0x093a74…093c08 Dummy {f00=0x007e, f01=0x0190, f02=» P , > P ` r J F " D 0L0R 4t0 LW 0L0R 4t0 LW xt tG 0Lbt 0x 0L0R 5t0 LWz 0L0 P
0x093c08…093d9c Dummy {f00=0x007e, f01=0x0190, f02=» " D R 2t0 LWk 0L0R 2t0 LWa 0L xt tGbt 0x 0L0R 3t0 LW> 0L0R 3t N ` r " ' ) 1 7
0x093d9c…093f30 Dummy {f00=0x007e, f01=0x0190, f02=» c0 i 0 , J F " D @ RP A R@ W H1 0X _ A1@ tG L LW * " ` y > Y B 0 B J F " D L G y a F h G # L b _A <b ! L
0x093f30…0940c4 Dummy {f00=0x007e, f01=0x0190, f02=» W atF RT7 L L_` =b ! L d t W atF RT " ' @ ! P ' ` ) r 1 ** 5 8 A J F " D a% A @14 @14 4 ( a8 ` R4 R T1 L RT* t L ) L RW W
0x0940c4…094258 Dummy {f00=0x007e, f01=0x0190, f02=» 99E-99E-99 " D " & 2 SKATTE]R @ $ X & h & v 99 " H & * & &$ INDTAST GR[NSE FOR MEDHJ.HUSTRU & " T ZZZVZZZR
0x094258…0943ec Dummy {f00=0x007e, f01=0x018e, f02=» " & & DATOU * $ @ & P & ^ 99E-99E-99 l " D & DATAS[TE $ & * & F & RECOR
0x0943ec…094580 Dummy {f00=0x007e, f01=0x0190, f02=» & & RECORD NR & I . & I < 9999 J " E ^ & n & | & E & O 999999E-9999 " & & &
0x094580…094714 (0, 188) Dummy {f00=0x007f, f01=0x0190, f02=»INDHOLDR $ & FNR FELTINDHOLDR . $ N & ^ & l ZZZD ~ " y & A & { & ZZZD " y & A
0x094714…0948a8 Dummy {f00=0x007f, f01=0x0190, f02=» ZZZD " y & D A " & { 4 & { D & R ZZZD d " y x & A & { & ZZZD " y & A & {
0x0948a8…094a3c Dummy {f00=0x007f, f01=0x0190, f02=» & D A & { & { * & 8 ZZZD J " y ^ & A p & { & ZZZD " y & A & { & + ZZ
0x094a3c…094bd0 Dummy {f00=0x007f, f01=0x0190, f02=» & { & { & ZZZD 0 " y D & A V & { h & x ZZZD " y & A & { & + ! ZZZD " !y
0x094bd0…094d64 Dummy {f00=0x007f, f01=0x0190, f02=» & # ZZZD " #y * & A < & { N & ^ $ ZZZD p " $y & A & { & + % ZZZD " %y & / A & {
0x094d64…094ef8 Dummy {f00=0x007f, f01=0x0190, f02=» ' ZZZD " 'y & A " & { 4 & D ( ZZZD V " (y j & A | & { & + ) ZZZD " )y & / A & { & @
0x094ef8…09508c Dummy {f00=0x007f, f01=0x0190, f02=» & A & { & * , ZZZD < " ,y P & A b & { t & + - ZZZD " -y & / A & { & @ . ZZZD "
0x09508c…095220 Dummy {f00=0x007f, f01=0x0190, f02=» & { & 0 ZZZD " " 0y 6 & A H & { Z & + j 1 ZZZD | " 1y & / A & { & @ 2 ZZZD " 2y & D A
0x095220…0953b4 (0, 189) Dummy {f00=0x007f, f01=0x018e, f02=» 4 ZZZD " 4y & A . & { @ & + P 5 ZZZD b " 5y v & / A & { & @ 6 ZZZD " 6y & D A & { &
0x0953b4…095548 Dummy {f00=0x007f, f01=0x0190, f02=» " 8y & A & { ( & + 8 9 ZZZD J " 9y ^ & / A p & { & @ : ZZZD " :y & D A & { & { &
0x095548…0956dc Dummy {f00=0x007f, f01=0x0190, f02=» A & { & + = ZZZD 0 " =y D & / A V & { h & @ x > ZZZD " >y & D A & { & { & ? ZZZD
0x0956dc…095870 Dummy {f00=0x007f, f01=0x0190, f02=» & + A ZZZD " Ay * & / A < & { N & @ ^ B ZZZD p " By & D A & { & { ( C & { & D D
0x095870…095a04 Dummy {f00=0x007f, f01=0x0190, f02=» & F ! & ! G RECORDS FRI ! $ $ G ! @ & I ! P H 99999N ! ^ " H ! t & H ! I SKATTE]R ! $ I ! J Z99D ! " JH ! & J ! 0 + &) %01*- SLUTLIGNING/FORSK
0x095a04…095b98 Dummy {f00=0x007f, f01=0x018e, f02=»KKOPIERING ! & " & 05 - LIST CPRNRI " & " > $ & 06 - [NDRING AF KONSTANTER " L & " t & # &! 07 - UDSKRIVNING AF DISKETTE " & " & - " K ZZZU " " K " ( " L "
0x095b98…095d2c Dummy {f00=0x007f, f01=0x018e, f02=» & # & s # & s # & - # . O Z- # @ " O # R ( # b P # n & + # ~ & # Q 99E-99E-99E-9999 # " Qn # & # R 99E-99E-99E-9999 # " Rn #
0x095d2c…095ec0 Dummy {f00=0x007f, f01=0x417a, f02=» & $ ( $ U $ & * $ . V 999U $ < " V; $ P & $ ` & $ n ( $ | W $ X 9999999999 $ " X $ & $ ( $ Y $ & & $ Z T99U $
0x095ec0…096054 (0, 190) Dummy {f00=0x007f, f01=0x0190, f02=» L H IDENT RKTEST TRA 4.2 81-05-06 F1 O1111 R]KONVERTERING 9.2 810309 NJ RKTEST T $$$TRAT f RKTEST x 0 0 ' 0 ) *0 , /0
0x096054…0961e8 Dummy {f00=0x007f, f01=0x0190, f02=»L L J K0 M , | < J F " D @ApW H| Ap RL<R 6 ArW AsW AtW AuW AvW AwW AxW AyW R( L J F " D ?R@zHp7
0x0961e8…09637c Dummy {f00=0x007f, f01=0x0190, f02=» g ^ ( 8 D H X h x / a g
0x09637c…096510 Dummy {f00=0x007f, f01=0x018e, f02=»RCw<RCy<RCv<R?R R R R R R R R R R R R R R R?R R R R R R R R R F V f v / a w g
0x096510…0966a4 Dummy {f00=0x007f, f01=0x018e, f02=» , . 0 ( 2 8 4 H 6 / X 8 a h : x < g > ^ @ J F " D R R R R R R R R?R R R?R R R R R R R R R R R R R R R R R R?R R R
0x0966a4…096838 Dummy {f00=0x007f, f01=0x0190, f02=» T / V a X ( Z g 8 ^ H ^ X ` h b D x d f h j l n p r
0x096838…0969cc Dummy {f00=0x007f, f01=0x0190, f02=»R R R R R R R R R R R?R_j R R h & D 6 F V f v / a g
0x0969cc…096b60 Dummy {f00=0x007f, f01=0x018e, f02=» D ( 8 H X h x J F " D R R R R R R R R R R R R?R R R R R R R R R R RLP R R R R R R R R / a
0x096b60…096cf4 (0, 191) Dummy {f00=0x007f, f01=0x018e, f02=» D ( 8 H X h x / a g ^
0x096cf4…096e88 Dummy {f00=0x007f, f01=0x0190, f02=» ( 8 H X h x / a g ! # J % ^
0x096e88…09701c Dummy {f00=0x007f, f01=0x018e, f02=» 9 ; = ( ? 8 J F " D R R R R R R R R R R R R RW R R R R R R R R R R R R R R R R R R H A / C a G g I K M J O ^
0x09701c…0971b0 Dummy {f00=0x007f, f01=0x018e, f02=» c e g / ( i a 8 m g H o X q h s J x u ^ w y { } J F " D @ R RWv R R R R R R R R R R
0x0971b0…097344 Dummy {f00=0x007f, f01=0x0190, f02=» / a ( g 8 H X J h ^ x
0x097344…0974d8 Dummy {f00=0x007f, f01=0x0190, f02=» R R RW _(Hz W X 0 R 0 R ( 0 R : 0 R L 0 R ^ 0 r J F " D LW LW LW LW 4 L 4 L y " ! "0 '
0x0974d8…09766c Dummy {f00=0x007f, f01=0x018e, f02=» k l0 R p , q0 E < u N v0 ^ }0 4P p 0 4 J F " D @ Y W 4 ! L L 4 Iz RLT RLP RLP Az L 0 p
0x09766c…097800 Dummy {f00=0x007f, f01=0x0190, f02=» 0 s 0 Q 0 u , J F " D L4 Izr RLTm) Li y ! L4! LN! L;! LF! LB! L>! L:! L6! L2! > 0 0 0 0 0 4Pr 0 4
0x097800…097994 (0, 192) Dummy {f00=0x0080, f01=0x0190, f02=» 0 0 d 0 q " #0 s 4 '0 F +0 X /0 e j J F " D TF) LB y ! L ! L'! L#! L ! L ! L ! L ! L Y* Y2W | D0 4PB G0 4 N O0
0x097994…097b28 Dummy {f00=0x0080, f01=0x018e, f02=» l m0 h q r0 u . y0 4pB @ |0 4 T J F " D @Az L L4 Iz RLT RLT Az L4 Iz RLP RLP RLT RLP Az L L4 I f 0 h 0
0x097b28…097cbc Dummy {f00=0x0080, f01=0x0190, f02=» 0 0 & 8 0 p H 0 4p Z 0 4 n J F " D z@ RLT; 6 ''' ' RLP" RLP RLP RLP RL) L RL) L RLT Az L 0 d 0
0x097cbc…097e50 Dummy {f00=0x0080, f01=0x0190, f02=» 0 5 T 0 5 J F " D L4 Iz RLP RLT Az L4 Iz RLT * B Az L L4 Iz RLT * B Az L & t 0 p 0 5 z # $0 s ( )0 ! - .0 5
0x097e50…097fe4 Dummy {f00=0x0080, f01=0x0190, f02=» RLP W Az L X H I0 & N 8 O0 H T Z U0 j Z X | ] X d e0 g X q0 5 z t0 5 |0 5
0x097fe4…098178 Dummy {f00=0x0080, f01=0x0190, f02=»0 0 0 0 0 0 u B 0 T 0 f 0 x J F " D L ! L W@ y ! L"! L ! L ! L ! L ! L ! L ! L ! L W Y0 0 5G 0 5
0x098178…09830c Dummy {f00=0x0080, f01=0x0190, f02=»0 0 J F " D Y8W Az L4 Iz 4 Iz ) L RLP RLT Az L L4 Iz, RLT' L L 0 l 0 ~ 0 5`8 0 5 %0 5 ( )0 00 5`8 30 5
0x09830c…0984a0 Dummy {f00=0x0080, f01=0x0190, f02=» T0 E X0 U 0 q ( `0 : d0 L h0 % ^ l0 u p p0 R J F " D @ WF y ! L ! L+! L'! L#! L ! L ! L ! L ! L Y. Y6W 0 5p 0 5
0x0984a0…098634 (0, 193) Dummy {f00=0x0080, f01=0x0190, f02=» 0 5 0 & 0 8 0 J 0 J F " D Az L L4 Iz RLP RLP RLP Az L L4 Iz ) L RLT ! L ! L ! L A n 0 5 L 0 5 0
0x098634…0987c8 Dummy {f00=0x0080, f01=0x0190, f02=»L4 Iz RLT ! L ! L W ! L Az L L4 Iz L y ! Li 0 B 0 T 0 E f 0 x 0 ! 0 3 0 @ !0 d %0 q )0 -0
0x0987c8…09895c Dummy {f00=0x0080, f01=0x0190, f02=» LK! LG! LC! L?! L@! L<! b E0 I0 B 2 M0 D Q0 0 V U0 T h Y0 # z ]0 T a0 e0 s J F " D @ L8! L4! L0! L,! L(! L$! L ! L ! L ! L Yw Y W _ _
0x09895c…098af0 Dummy {f00=0x0080, f01=0x0190, f02=» 0 5 0 U * 0 L < 0 L P 0 P L d J F " D R RL R RLT R Az L L4 Iz< RLT7 L L - L$ x 0 L 0 0 0 h
0x098af0…098c84 Dummy {f00=0x0080, f01=0x0190, f02=» 0 6 L 0 6 J F " D L L L H - L Az L L4 Iz RLT + L RLP Az L L4 I " p 0 0 0 6 0 6 0 0
0x098c84…098e18 Dummy {f00=0x0080, f01=0x018e, f02=» V ? X J F " D z RLT RLP Az L L4 Iz RL! L RLP Az L L4 Iz- RL RL R B h C0 c x E X L M0 h Q X ^0 6 T f0 6 i j
0x098e18…098fac Dummy {f00=0x0080, f01=0x4008, f02=»@
0x098fac…099140 Dummy {f00=0x0080, f01=0x018e, f02=» L H IDENT RKAPPL TRA 4.2 81-05-06 F1 O1111 R]KONVERTERING 9.2 810126 NJ RKAPPL T $$$TRAA f RKAPPL x . * SPCHK1A T:DSC1A T:GETA1 T:TBWDF T:TFWD ,0 56T 1 6
0x099140…0992d4 (0, 194) Dummy {f00=0x0080, f01=0x0190, f02=» X _ a & f 6 p F r X t h z x J F " D @R y @ _ ) L 0X0X R y { L0X0X LW&
0x0992d4…099468 Dummy {f00=0x0080, f01=0x0190, f02=» 4 E O ( ` 8 u H { X h x Sy
0x099468…0995fc Dummy {f00=0x0080, f01=0x018e, f02=» @ 2 RRRRRRRRRRRRRRRRRRRRRRRR ?R L 2 RRRRRRRRR?R 0 H Z 0 j 0 P | 0 P 0 0 0 0 5@
0x0995fc…099790 Dummy {f00=0x0080, f01=0x0190, f02=» 0 ! 0 ! S! , 0 ! > #0 P , S b 00 t 9 S =0 A0 J F " D W % L # L _i% L # L _s Lz% L # L _ L ) L _ L L
0x099790…099924 Dummy {f00=0x0080, f01=0x0190, f02=»0 1 q0 1 w0 1 0 @ P ` p J F " D @ L W % L # L _ L % Lr# Ln_ L L % L]# LY_ ) LS_ 2
0x099924…099ab8 Dummy {f00=0x0080, f01=0x4136, f02=»Se 0 e J F " D RRRRRRRRWA L % L3# L/_ " B)?RW%% L!! L # L ?R ! L % L j 0 R z 0 ` R 0 59R H D ! B ?R% L # L ?R L 4 0X
0x099ab8…099c4c Dummy {f00=0x0080, f01=0x0190, f02=» L H IDENT RKSUBS TRA 4.2 81-05-06 F1 O1111 R]KONVERTERING 9.2 810218 NJ . * COPYDK INIT IXWRIT LOD1 PASS SPORG T $$$TRAS : 6 COPYDK INITI m IXWRITD LOD1 PASS SPORG @ < hASG ATTHD1 DKIO4 DKREAD0 DKWRIT RKASSGR SPCLR
0x099c4c…099de0 Dummy {f00=0x0080, f01=0x0190, f02=» ^ ^ ( , * d < 0 IX L 8 ^ : d n = ~ J F " D @3 R L LA R R2 RR E R<R t! L 4 R<R L ^ j0 R ~ CP
0x099de0…099f74 (0, 195) Dummy {f00=0x0080, f01=0x018e, f02=» &t 0 &t @ J F " D XF R W RT L ht P Lj t q (q L R &R J F " D ht br t L ht P( < ht P = ht 0
0x099f74…09a108 Dummy {f00=0x0080, f01=0x0190, f02=» S V0 & X p & ] 6 a p F e p V m p f J F " D @ < L @ A R R L RI9 ?R@3 R4 R4 A34 R4 @ @ @ @ 4 v 0
0x09a108…09a29c Dummy {f00=0x0080, f01=0x0190, f02=»IDENTIFIKATION ( " 2 0 0T B T d t 0T 0 T J F " D 4 1XF L R W d @ 6d d H/ @/ R T RT cE j L l 0
0x09a29c…09a430 Dummy {f00=0x0080, f01=0x0190, f02=» L L L RT t% L1# L- d ) L ht P Lb t H0 @ U R Z0 b f t n 0 r0 | ** J F " D @j L l d RT_ L$ 6d RWNW? j L l L Lm d
0x09a430…09a5c4 Dummy {f00=0x0080, f01=0x0190, f02=» J F " D RW1W" j L l L RW#W 1XF R d RT A/4 d RA/4 d R j z IX 0 X 0 X J F " D A/4 1X F
0x09a5c4…09a758 Dummy {f00=0x0080, f01=0x0190, f02=» 0 0 J F " D L1XF R2 RRR_ ! L ! L@_ uH 6 _+ Fe@7@8W H45A7@6@8 FfW H5' 2 J O m W d r t y J F " D @A8@7@6 Fg R T R
0x09a758…09a8ec Dummy {f00=0x0080, f01=0x0190, f02=» 0 @ J F " D 1XF R E ` a8 b` tGatF RT0 atF RT#atF RT E RT P & & SLUTLIGNING = 1I
0x09a8ec…09aa80 Dummy {f00=0x0080, f01=0x0190, f02=» & & 4 / &- )ALM.REG. (INCL. SLETNING AF INDEXREG) = 1 $ & ) 4 / &- )FORTSAT REGISTRERING = 2 j & , T ZT " ( & <
0x09aa80…09ac14 (0, 196) Dummy {f00=0x0081, f01=0x018e, f02=»& & 0070 & & , ( : F & V & 0 d ZZ v " ( $ & & # &! DISKETTEN ER SIDST BRUGT DEN & $ I
0x09ac14…09ada8 Dummy {f00=0x0081, f01=0x0190, f02=» ( & $ & s 2 $ @ ( P Z & l & 1 - ALM. KOPIERING z & & " & 2 - OPBYG INDEXREG. (- KOPI) & , ' &% !3 - KOPI UDEN OPBYGNING INDEXREG.
0x09ada8…09af3c Dummy {f00=0x0081, f01=0x416e, f02=» 999O " ; & , & : ( H T & d $ ANTAL RECORDS KOPIERET:N r $ 9999 " $ ( & j
0x09af3c…09b0d0 Dummy {f00=0x0081, f01=0x0190, f02=» . H IDENT REMDUM TRA 4.2 81-05-06 F1 O1111 D @ AD4100 AD4200 AD4300 CHDATO IDXGET LEVDEL LEVIN LEVOPR 6 B > LEVPRTM LEVRD LEVSPG REPL006 SETIDX1 SETKEY TRGETF TRINS ~ 8 4 TXTOPR TXTPRT TXTRD VARRD VARWRTX WSTRCHV XCOPL $$$TR
0x09b0d0…09b264 Dummy {f00=0x0081, f01=0x0190, f02=» W X @ < SETIDX SETKEYT TRGETFD TRINS TXTOPRE U TXTPRTE S 2 . TXTRD ~ VARRD VARWRTR WSTRCHD XCOPP B N ADMRET *0 , B . /
0x09b264…09b3f8 Dummy {f00=0x0081, f01=0x411a, f02=» ? J F " D ?R?R?R4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 L R LL L R LL L R LL L _ R h J F " D @4 j 4 4 4 Lh T f 4 4 4 4 4 z 0 & ! 4 #g L 4 4 4 4
0x09b3f8…09b58c Dummy {f00=0x0081, f01=0x4094, f02=» . H IDENT RAADUM TRA 4.2 81-05-08 F1 O1111 RKAPPL 6 $$$TRAA H RKAPPL Z 4 n KA ~@ @
0x09b58c…09b720 Dummy {f00=0x0081, f01=0x2008, f02=» - L = KMD12 DATE = 81 04 28 1216PACK NBR = 0012 @
0x09b720…09b8b4 (0, 197) Dummy {f00=0x0081, f01=0x0190, f02=» ~ CSSF J F " D @ L Lh: T 4 4 :L aL m: F RT R4 :L n ~ X " X
0x09b8b4…09ba48 Dummy {f00=0x0081, f01=0x0190, f02=» . 5 $ 0 5 @ R * b J F " D L R RL 4 4 % :L0X 4 Lh: T :L 4 4 0X r DFHL F 5 F J
0x09ba48…09bbdc Dummy {f00=0x0081, f01=0x0190, f02=» w J F " D @ ba : 1X F )W W+4 % L" Lh: D T aL ba : ( l | a 4 4 ( 0 &
0x09bbdc…09bd70 Dummy {f00=0x0081, f01=0x0190, f02=» & & KENDEORD & D 0 & TTT9 O B & V ( d " p & & ' & CSSN PS= & 9999 P & ,NAME= AAAAAAAAAAAAAAAAAAA9 " N
0x09bd70…09bf04 Dummy {f00=0x0081, f01=0x0190, f02=»ANSMISSION $ & " ( 0 < & L & & ' j & z & a ( & a DATATRANSMISSION $ & ? &
0x09bf04…09c098 Dummy {f00=0x0081, f01=0x404a, f02=» , ' % 1X F aL% L Lba : 1X F4 4@ F & L & & ' j & z & a ( & a DATATRANSMISSION $ & ? &
0x09c098…09c22c Dummy {f00=0x0081, f01=0x412e, f02=» H F IDENT RKIO R]KONVERTERING 9.2 790129 EV RKIOY P RKIOY ` T:FDSP r I:EVA0 * & H & T:IO3 , ( & C & C
0x09c22c…09c3c0 Dummy {f00=0x0081, f01=0x2008, f02=» L = KMD12 DATE = 81 04 28 1216PACK NBR = 0012 @ a
0x09c3c0…09c554 (0, 198) Dummy {f00=0x0081, f01=0x0190, f02=» ZZZZZZZZZ9 " & . 99V99V99 < " T & d ( r ~ ****9 " ( ZZZZZZZVZZ9,99-L " F (
0x09c554…09c6e8 Dummy {f00=0x0081, f01=0x0190, f02=»F ( & 8 & *******V**9,99-L 6 " G V & f ZZZZZZVZZ9BB99-L t " G ( & 8 9999999999 " &
0x09c6e8…09c87c Dummy {f00=0x0081, f01=0x0190, f02=»& + 99V99V99 " $ & 4 ! *.***.***.**9,99- B " ! d & t & & 3 " *.***.***.**9,99- " " & & & 4 &
0x09c87c…09ca10 Dummy {f00=0x0081, f01=0x0190, f02=» & 2 # ZZZZBB " # ( & 8 & F & T & 4 b & 4 p & 4 ~ & 4 & 4 & $ 999E-999E-99E-99 " $ & % 999E-999E-
0x09ca10…09cba4 Dummy {f00=0x0081, f01=0x0190, f02=» & 7 $ & $ & 2 & @ & N & & j ( x ( W & + & 0 & Y & 8 " ) SAMLERGIRO-FORTEGNELSE $ )
0x09cba4…09cd38 Dummy {f00=0x0081, f01=0x0190, f02=» x $ + , SLISTE $ , . & > - ADVI L $ - ` . SLISTE p $ . & & / SPECIFIKATION $ / & & 0 DEN
0x09cd38…09cecc Dummy {f00=0x0081, f01=0x0190, f02=» & LEV-NR & & NAVN & & 8 & F 2 SIDE T $ 2A h 3 ZZZZ x " 3 A & 3 ( 4 * & 3 & ) A & ) 5 ZZZZZZZVZZ9,99
0x09cecc…09d060 Dummy {f00=0x0081, f01=0x4118, f02=»ZZZZZZZVZZ9,99-G " 8HA & ( 9 TOTAL 6 $ 9A L & IALTR : ZZ9R p " : I & SIDE(R) & & ( , ( & W # $a FW #a Fa F 4
0x09d060…09d1f4 (0, 199) Dummy {f00=0x0081, f01=0x2008, f02=» MTB2 ( EDITBUF I ENDREC `( FDBUSY 1( FFORSK f( FIELD y(2FLONOPL g( FORMUE C( FORSKUD 7( FRAAK e( FROMKX ($FROMRX I($FROMTX _($FULL ( GSSWITCH (!GSWBCD1 ( GSWBCD2 ( GSWBCD3 ( GSWBCD4 GSWBCD5 GSWBCD6 GSWBCD
0x09d1f4…09d388 Dummy {f00=0x0081, f01=0x0190, f02=» " " BBZZZ.ZZZ.ZZZ.ZZ9.99- # " L # . " BBZZZ.ZZZ.ZZZ.ZZ9.99- # @ " L # f ( # x # $ # ( # 4 # & 4 # 999E-99999E-99 # " # & #
0x09d388…09d51c Dummy {f00=0x0081, f01=0x0190, f02=» BBZZZ.ZZZ.ZZZ.ZZ9.99- # " $ & " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ 6 " $ " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ l " $ & $ & 2 $ & ULTIMO $ " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ " L $
0x09d51c…09d6b0 Dummy {f00=0x0081, f01=0x0190, f02=»" L $ B99.99.99. % " L % ( & % 8 BEHOLDNINGST[LLERE % F $ L % h & % x & % & % & % & 2 % & * % & * % & 4 % T[LLER % $ L %
0x09d6b0…09d844 Dummy {f00=0x0081, f01=0x0190, f02=» SALDO % $ L & & & " ( & 0 & < $ L & L ( & & h & 2 & x ZZ & " L & & & XXXE-XXXXXE-XX & " i I & " BBZZZ.ZZZ.ZZZ.ZZ9.99- &
0x09d844…09d9d8 Dummy {f00=0x0081, f01=0x0190, f02=»( & ' & ' $ ' ( ( ' 8 ' D & $ ' T & < ' b & < ' p & < ' ~ & ] ' & N ' & N ' & N ' & E ' & S ' & S ' & S ' & [ '
0x09d9d8…09db6c Dummy {f00=0x0081, f01=0x0190, f02=» ' & ( $ ( & ( & B*.***.***.**9E,99 ( 4 " ( V & * ( f & ( t ZZ999999 ( " ( & ( ( ( ( $ ( ( ( ( & 2 (
0x09db6c…09dd00 Dummy {f00=0x0081, f01=0x0190, f02=» ) $ ) ( ) $ % ) 0 & 2 ) @ & ) N TOTAL ) ^ $ ) t & ) & ) & 2 ) XXXE-XXXXXE-XX ) " ) & ) XX ) " )
0x09dd00…09de94 (0, 200) Dummy {f00=0x0082, f01=0x40d6, f02=» : H IDENT T:ATAB TRA 4.2 - - F1 O1111 04.01.XXX.1 X T:ATAB X B T:ATABA X T . * T:AD00 T:AGA0 T:AKA0 T:ALA0 T:ATC0 X h " U@ X :A X @ X * V @ V
0x09de94…09e028 Dummy {f00=0x0082, f01=0x40aa, f02=» : H IDENT U:BTAB TRA 4.2 - - F1 O1111 04.01.XXX.1 Y U:BTAB Y B U:BTABB Y T U:TB20 Y h @ TB2 Y z :T Y @ Y X :A X @ X * V @ V
0x09e028…09e1bc Dummy {f00=0x0082, f01=0x4090, f02=» : H IDENT S:BTAB TRA 4.2 - - F1 O1111 04.01.XXX.1 Z S:BTAB Z B S:BTABB Z T Z h :B Z z@ Z :T Y @ Y X :A X @ X * V @ V
0x09e1bc…09e350 Dummy {f00=0x0082, f01=0x0190, f02=» : H IDENT Z:TB90 TRA 4.2 - - F1 O1111 04.01.XXX.1 [ Z:TB90 [ B Z:TB90T [ T * & [ h * & [ * & = [ * & [
0x09e350…09e4e4 Dummy {f00=0x0082, f01=0x0190, f02=» [ | * & * & H * & v * & - * & K * & i
0x09e4e4…09e678 Dummy {f00=0x0082, f01=0x0190, f02=» * & ] ( * & ] V * & ] * & ; ] * & Y ]
0x09e678…09e80c Dummy {f00=0x0082, f01=0x0190, f02=» ] j * & ^ * & ^ 6 * & ^ d * & + ^ * & I ^ * & g
0x09e80c…09e9a0 Dummy {f00=0x0082, f01=0x0190, f02=» ^ x * & _ * & _ D * & _ r * & 9 _ * & W _ * & u
0x09e9a0…09eb34 (0, 201) Dummy {f00=0x0082, f01=0x0190, f02=» _ * & ` $ * & ` R * & ) ` * & G ` * & e ` *
0x09eb34…09ecc8 Dummy {f00=0x0082, f01=0x0190, f02=» * & a * & a 2 * & a ` * & 7 a * & U a * & s
0x09ecc8…09ee5c Dummy {f00=0x0082, f01=0x4178, f02=» a t * & b * & b @ * & ' b n * & E b * & c b * &
0x09ee5c…09eff0 Dummy {f00=0x0082, f01=0x40f0, f02=» : H IDENT D:TB90 TRA 4.2 - - F1 O1111 04.01.XXX.1 c D:TB90 c B D:TB90T c T * & B c h * & c = c B c @ c b * &
0x09eff0…09f184 Dummy {f00=0x0082, f01=0x4136, f02=» : H IDENT C:CB90 TRA 4.2 - - F1 O1111 04.01.XXX.1 d C:CB90 d B C:CB90C d T * & @ JKLM d h * & NO `@GAGBGCGDGEGEGEGEGE d * & = GEGEGEGEGEGEGE TCTDTETFTGTHTI d [ TJTKTLTMTN d
0x09f184…09f318 Dummy {f00=0x0082, f01=0x40c8, f02=» : H IDENT D:CB90 TRA 4.2 - - F1 O1111 04.01.XXX.1 e D:CB90 e B D:CB90C e T * & * $ & e h F H e * e @ e = GEGEGEGEGEGEGE TCTDTETFTGTHTI d [ TJTKTLTMTN d
0x09f318…09f4ac Dummy {f00=0x0082, f01=0x40e2, f02=» : H IDENT C:CB10 TRA 4.2 - - F1 O1111 04.01.XXX.1 f C:CB10 f B C:CB10C f T * & f h * f 0 0 f 0 f @ f
0x09f4ac…09f640 Dummy {f00=0x0082, f01=0x40f4, f02=» : H IDENT D:CB10 TRA 4.2 - - F1 O1111 04.01.XXX.1 g D:CB10 g B D:CB10C g T * & F g h * & g = g F g @ g
0x09f640…09f7d4 (0, 202) Dummy {f00=0x0082, f01=0x0190, f02=» ZZZZZZZZZ9 " & . 99V99V99 < " T & d ( r ~ ****9 " ( ZZZZZZZVZZ9,99-L " F (
0x09f7d4…09f968 Dummy {f00=0x0082, f01=0x0190, f02=»F ( & / & *******V**9,99-L 6 " G V & f ZZZZZZVZZ9BB99-L t " G ( & / 9999999999 " &
0x09f968…09fafc Dummy {f00=0x0082, f01=0x0190, f02=»& + 99V99V99 " $ & 4 ! *.***.***.**9,99- B " ! d & t & & 3 " *.***.***.**9,99- " " & & & 4 &
0x09fafc…09fc90 Dummy {f00=0x0082, f01=0x0190, f02=» & 2 # ZZZZBB " # ( & 8 & F & T & 4 b & 4 p & 4 ~ & 4 & 4 & $ 999E-999E-99E-99 " $ & % 999E-999E-
0x09fc90…09fe24 Dummy {f00=0x0082, f01=0x0190, f02=» & 7 $ & $ & 2 & @ & N & & j ( x ( W & + & 0 & Y & / " ) SAMLERGIRO-FORTEGNELSE $ )
0x09fe24…09ffb8 Dummy {f00=0x0082, f01=0x0190, f02=» x $ + , SLISTE $ , . & > - ADVI L $ - ` . SLISTE p $ . & & / SPECIFIKATION $ / & & 0 DEN
0x09ffb8…0a014c Dummy {f00=0x0082, f01=0x0190, f02=» & LEV-NR & & NAVN & & 8 & F 2 SIDE T $ 2A h 3 ZZZZ x " 3 A & 3 ( 4 * & 3 & ) A & ) 5 ZZZZZZZVZZ9,99
0x0a014c…0a02e0 Dummy {f00=0x0082, f01=0x4118, f02=»ZZZZZZZVZZ9,99-G " 8HA & ( 9 TOTAL 6 $ 9A L & IALTR : ZZ9R p " : I & SIDE(R) & & ( , ( & W # $a FW #a Fa F 4
0x0a02e0…0a0474 (0, 203) Dummy {f00=0x0082, f01=0x2008, f02=» WBIN8 GSWBIN9 ( GSWSTR1 ( GSWSTR2 ( GSWSTR20 GSWSTR9 GTADMFLG ( GTADUPFL ( GTANTAL ( GTASTFLG ( GTASUMFL ( GTAUTODP ( GTBDTFLG ( GTCHKCY GTCHKPR GTCLRN ( GTCYFLG ( GTCYIN GTCYOUT ( GTCYSUM GTCYTRPF ( GTCYWR
0x0a0474…0a0608 Dummy {f00=0x0082, f01=0x4144, f02=»Z.ZZZ.ZZ9.99-B 1 " F 2 & 2 & ( 2 4 G 2 @ & 2 P & 2 ^ & 2 l & 2 z & 2 & 2 & 2 ( 2 * H 2 " w 2 ( 2 * I 2 " w 2
0x0a0608…0a079c Dummy {f00=0x0082, f01=0x018e, f02=» : H IDENT T:ATC0 TRA 4.2 - - F1 O1111 04.01.XXX.1 J T:ATC0 J B T:ATC0A l J T > : T:DTC0 D:CB10 C:CB10 D:CB20 C:CB20 D:CB30 C:CB30 J h > : D:CB40A C:CB40A D:CB60 C:CB60F D:CD30 C:CB30X D:CD40 J > : C:CB40 D:GB10 Z:GB10 D
0x0a079c…0a0930 Dummy {f00=0x0082, f01=0x0190, f02=» * & f z K * & K 2 * & = K ` * & [ K * & y 3 K * &
0x0a0930…0a0ac4 Dummy {f00=0x0082, f01=0x0190, f02=» K t * & L * & - a L @ * & K L n * & i L * & L * &
0x0a0ac4…0a0c58 Dummy {f00=0x0082, f01=0x4174, f02=» 0 F L * & 1 d M * & ; M N * & Y TC , M | , ( s M , ( " $ M ,
0x0a0c58…0a0dec Dummy {f00=0x0082, f01=0x40e4, f02=» : H IDENT T:DTC0 TRA 4.2 - - F1 O1111 04.01.XXX.1 N T:DTC0 N B T:DTC0D N T REENTC REGGO N h * & TC * N " N * N @ N
0x0a0dec…0a0f80 Dummy {f00=0x0082, f01=0x018e, f02=» : H IDENT T:AKA0 TRA 4.2 - - F1 O1111 04.01.XXX.1 O T:AKA0 O B T:AKA0A O T . * T:DKA0 D:CB90 C:CB90 D:TB90 Z:TB90 O h * & @ O * & P O * & =
0x0a0f80…0a1114 (0, 204) Dummy {f00=0x0083, f01=0x018e, f02=» 5 J F " D L L L L #L $L L &L L L L ' 'L@ R T@ " F L0 l Y ~ h s z J F " D @_ R P L _ ! " R P _ ' ! R !_ R W R 4
0x0a1114…0a12a8 Dummy {f00=0x0083, f01=0x0190, f02=» 0 J F " D ' R T R) L L RT W 4 R_ L RT R T @_ W @_ . b r 0 . ' 0 J F " D 4 RW R R%
0x0a12a8…0a143c Dummy {f00=0x0083, f01=0x0190, f02=» A R T ' R T W ' RT W W 4 A R TN ' D D I T V d `0 t e0 l0 t0 z0 P } DISKFEJL " J F " D @ ' R TA R T
0x0a143c…0a15d0 Dummy {f00=0x0083, f01=0x0190, f02=» $ 0 $ 2 , > P 0 b 2 t 2 J F " D R
0x0a15d0…0a1764 Dummy {f00=0x0083, f01=0x0190, f02=» 2 & 8 0 J 2 l ~ 0 2 0
0x0a1764…0a18f8 Dummy {f00=0x0083, f01=0x0190, f02=» 0 0 ! 2 $ # 4 $ F & X /0 j 1 2 | 3 4 6 < 2 > ? A J F
0x0a18f8…0a1a8c Dummy {f00=0x0083, f01=0x018e, f02=» Q Z0 2 0 ^ @ _ R a d g 2 v i j l u0 w 2 y z |
0x0a1a8c…0a1c20 Dummy {f00=0x0083, f01=0x0190, f02=» 2 * < " N 0 ` 2 r $ 2 J F " D R
0x0a1c20…0a1db4 (0, 205) Dummy {f00=0x0083, f01=0x0190, f02=» 2 " 4 F 2 X h z 2 2
0x0a1db4…0a1f48 Dummy {f00=0x0083, f01=0x0190, f02=»JLL L RJLL L RJLL L RJLL L p 2 . > P b " 2 t $ % ' - 2 / 0 2 @ 2
0x0a1f48…0a20dc Dummy {f00=0x0083, f01=0x0190, f02=» Q 2 S T & V 8 b 2 J d " Z e l g ~ o q 2 s t v J F " D @RJLL L $_ RJLL L #_
0x0a20dc…0a2270 Dummy {f00=0x0083, f01=0x0190, f02=» & & & ( & 6 & D ZZZVZZZVZZZVZZ9E,99- R " v ( * & & ) & ) ZZZZZZZVZZ9,99-E " G &
0x0a2270…0a2404 Dummy {f00=0x0083, f01=0x0190, f02=» & TOTAL $ ( & IALT 8 ZZ9 L " I ` & SIDE(R) p & & ( & + & & & & &
0x0a2404…0a2598 Dummy {f00=0x0083, f01=0x0190, f02=» ZZZ9999999 " S " & 2 ZZZZZZZ9 @ " S X & h & v ( ; & & & & SPECIFIKATION $ S
0x0a2598…0a272c Dummy {f00=0x0083, f01=0x4130, f02=» GIRO $ & DATO , $ @ & P 99E-99E-99 ^ " x & SIDE $ ZZZZ " & & (
0x0a272c…0a28c0 Dummy {f00=0x0083, f01=0x2008, f02=» DREC `( FDBUSY 1( FFORSK f( FIELD y(2FLONOPL g( FORMUE C( FORSKUD 7( FRAAK e( FROMKX ($FROMRX I($FROMTX _($FULL ( GSSWITCH (!GSWBCD1 ( GSWBCD2 ( GSWBCD3 ( GSWBCD4 GSWBCD5 GSWBCD6 GSWBCD7 GSWBIN1 GSWBIN
0x0a28c0…0a2a54 (0, 206) Dummy {f00=0x0083, f01=0x0190, f02=» UDSKRIFT $ DATO , $ @ $ ' P & ` BFO n $ & X " & FRA LEV. $ NR
0x0a2a54…0a2be8 Dummy {f00=0x0083, f01=0x0190, f02=»ERLISTEE $ & & . B @ " R ( b n & ~ SPECIFIKATIONI $ & & B " (
0x0a2be8…0a2d7c Dummy {f00=0x0083, f01=0x411c, f02=» $ $ & % BFO $ % 2 & B & X T " & f ( v ' & ( XXVXXVXX " ( ( * & $ L L RT % L L L RT W @^?R
0x0a2d7c…0a2f10 Dummy {f00=0x0083, f01=0x2008, f02=» WORK *( INQ1 ( INQ2 ( INQ3 ( INTATT +( KBINH '( KEYTAB >($LASTREC 9( LENGTH 0( LINCNT (( LONOPL 8( MAXREC 8( MEDHJ B( MF1CU ( MF1GTP ( MF1KBV ( MISCAR .( NBRGTP ( NBRKBV ( OBS 3( OFFFLG ,( OMF
0x0a2f10…0a30a4 Dummy {f00=0x0083, f01=0x0190, f02=» 0 T 0 T & J F " D L ' _T! L R W 4 4 % L W $ 8 , 0 L * J F " D R
0x0a30a4…0a3238 Dummy {f00=0x0083, f01=0x0190, f02=» 0 0 0 $0 2 (0 D ,0 V 00 h 40 z 80 <0 @0 J F " D LA R T FL L L L #L $L L &L L L L L% '
0x0a3238…0a33cc Dummy {f00=0x0083, f01=0x018e, f02=» }0 0 J F " D @L @ R TY '_H L R_ RT@ ' @ R T5 F RT* RT# L L ( 0 v 0 0 , 0 0 0
0x0a33cc…0a3560 Dummy {f00=0x0083, f01=0x0190, f02=» 0 0 & * 8 , H $ X 0 h J F " D R P2! L Ww "A R T 'L R T L RT RT W{ R z 0 P 0 P 0 P 0 P
0x0a3560…0a36f4 (0, 207) Dummy {f00=0x0083, f01=0x018e, f02=» 1 J F " D L L L #L $L L &L L L L ' 'L@ R T@ " _ B H0 l U ~ d o v J F " D @ R P L _ ! " R P _ ' ! R !_ R W R 4 '
0x0a36f4…0a3888 Dummy {f00=0x0083, f01=0x018e, f02=» , . J F " D R T R) L L RT W 4 R_ L RT R T @_ W @_ 4 R $ r 0 . ' 0 J F " D W R R%LJ T
0x0a3888…0a3a1c Dummy {f00=0x0083, f01=0x0190, f02=» J F " D A R T ' R T W ' RT W W 4 A R TN ' ' E V R f 0 v a0 h0 p0 v0 P y DISKFEJL { " } , J F
0x0a3a1c…0a3bb0 Dummy {f00=0x0083, f01=0x018e, f02=» $ 0 $ 2 . @ R 0 d 2 v 2 J F " D
0x0a3bb0…0a3d44 Dummy {f00=0x0083, f01=0x0190, f02=» 2 * < 0 N 2 ` p 0 2 0
0x0a3d44…0a3ed8 Dummy {f00=0x0083, f01=0x0190, f02=» 0 R 0 R 2 ( 8 J " +0 n - 2 / 0 2 8 2 : ; =
0x0a3ed8…0a406c Dummy {f00=0x0083, f01=0x0190, f02=» K M V0 " X 2 4 Z D [ V ] h c 2 z e f h q0 s 2 u v
0x0a406c…0a4200 Dummy {f00=0x0083, f01=0x0190, f02=» W L R LLJL R ^ 2 , > " P 0 b 2 t $ 2
0x0a4200…0a4394 (0, 208) Dummy {f00=0x0084, f01=0x0190, f02=» L R V 2 $ 6 H 2 Z j | 2 2
0x0a4394…0a4528 Dummy {f00=0x0084, f01=0x018e, f02=»L L RJLL L RJLL L RJLL L 6 r 2 0 @ R d 2 v ! # ) 2 + , . <
0x0a4528…0a46bc Dummy {f00=0x0084, f01=0x0190, f02=» H M 2 O P * R < ^ 2 N ` " ^ a p c k m 2 o p r ~0 J F " D @ L $
0x0a46bc…0a4850 Dummy {f00=0x0084, f01=0x0190, f02=» & & & , & : & H ZZZVZZZVZZZVZZ9E,99- V " z ( * & & ) & ) ZZZZZZZVZZ9,99-E " G &
0x0a4850…0a49e4 Dummy {f00=0x0084, f01=0x0190, f02=» & TOTAL $ , & IALT < ZZ9 P " I d & SIDE(R) t & & ( & + & & & &
0x0a49e4…0a4b78 Dummy {f00=0x0084, f01=0x0190, f02=»& ZZZ9999999 " S & & 6 ZZZZZZZ9 D " S & l & z ( ; & & & & SPECIFIKATION $ S
0x0a4b78…0a4d0c Dummy {f00=0x0084, f01=0x4130, f02=» GIRO $ & " DATO 0 $ D & T 99E-99E-99 b " | & SIDE $ ZZZZ " & & (
0x0a4d0c…0a4ea0 Dummy {f00=0x0084, f01=0x2008, f02=» WSTR1 ( GSWSTR2 ( GSWSTR20 GSWSTR9 GTADMFLG ( GTADUPFL ( GTANTAL ( GTASTFLG ( GTASUMFL ( GTAUTODP ( GTBDTFLG ( GTCHKCY ( GTCHKPR ( GTCLRN ( GTCYFLG ( GTCYIN ( GTCYOUT ( GTCYSUM ( GTCYTRPF ( GTCYWRTF ( GTDATO GTDBKR
0x0a4ea0…0a5034 (0, 209) Dummy {f00=0x0084, f01=0x0190, f02=» UDSKRIFT $ DATO , $ @ $ ' P & ` BFO n $ & X " & FRA LEV. $ NR
0x0a5034…0a51c8 Dummy {f00=0x0084, f01=0x0190, f02=»ERLISTEE $ & & . B @ " R ( b n & ~ SPECIFIKATIONI $ & & B " (
0x0a51c8…0a535c Dummy {f00=0x0084, f01=0x411c, f02=» $ $ & % BFO $ % 2 & B & X T " & f ( v ' & ( XXVXXVXX " ( ( * & $ L L RT % L L L RT W @^?R
0x0a535c…0a54f0 Dummy {f00=0x0084, f01=0x2008, f02=» ELT931 ( TFELT94 ( TFELT941 ( TREMFLG ( TSWBCD2 TT07TXT ( TT16TXT ( TTACC (2TTARKSAV ( TTASKAT ( TTASKNR ( TTCASH ( TTCASHAC ( TTCNTNR ( TTCY1FLG ( TTCY2FLG ( TTCYKPOS ( TTCYKST ( TTCYKTOT ( TTCYM ( TTCYTRFL ( TTDBKR
0x0a54f0…0a5684 Dummy {f00=0x0084, f01=0x0190, f02=» 0 0 & 8 J F " D ' _T! L R W 4 4 % L W $ R H , 0 ' * J F " D R
0x0a5684…0a5818 Dummy {f00=0x0084, f01=0x0190, f02=» 0 0 0 0 2 $0 D (0 V ,0 h 00 z 40 80 <0 J F " D LA R T FL L L L #L $L L &L L L L L% 'L @
0x0a5818…0a59ac Dummy {f00=0x0084, f01=0x018e, f02=» y0 }0 0 ( J F " D @ R TY '_H L R_ RT@ ' @ R T5 F RT* RT# L L L : 0 T 0 T , 0 0 0
0x0a59ac…0a5b40 Dummy {f00=0x0084, f01=0x0190, f02=» 0 0 & * 8 , H $ X 0 h 0 z J F " D 2! L Ww "A R T 'L R T L RT RT W{ R L 0 L 0 L 0 L
0x0a5b40…0a5cd4 (0, 210) Dummy {f00=0x0084, f01=0x0190, f02=» : H IDENT KMDIO TRA 4.2 81-01-09 F1 O1111 03.01.XXX.1 B > CRKJ CRVO GRASPV LINOPT WCHECK WCHUPD WRITFD WRITID B WRITJTD WRITVOA WTALLY1 $$$TRAC > : CRKJJ CRVOV GRASPV1 o LINOPT x WCHECK. WCHUPD 8 4 WRITFDC
0x0a5cd4…0a5e68 Dummy {f00=0x0084, f01=0x018e, f02=»EVIN LEVRD RADEL RAWRITW SPCHK5 SPERR | > : SPLIN8A T:DELAT T:DSC0R T:DSC1T T:EDWRH T:TESTW T:WAIT . 8 4 T:WRITC TRGETFI TRINS VARRD VARWRTR WAITF WSTRCH p : ,0 C 10 C 8 @
0x0a5e68…0a5ffc Dummy {f00=0x0084, f01=0x0190, f02=» } J F " D @L @)aaFaaF M W ha D W ! LkI! , (a L d ) t ! J F " D a F L Lh @!" ba _:ba L ba f A
0x0a5ffc…0a6190 Dummy {f00=0x0084, f01=0x0190, f02=»a R LatT I p t ` 0 0 0 @ 0 P R DISCFEJL d | &0 ) 80 ; J F " D XL R tT $tQ @ @! & L L L R 4 La Fj ' @
0x0a6190…0a6324 Dummy {f00=0x0084, f01=0x0190, f02=»WF La Fj 'j @ A W. La Fj # j & @ A W La Fj B 0 R 0 d 0 v J F " D ! j $ A @ ?R@!@ 4 tp p X A*@ A 4 @ # L dL# L 0 0 B 0 B
0x0a6324…0a64b8 Dummy {f00=0x0084, f01=0x0190, f02=» dL_"I I BW I I H f $ 2 4 6 D # 4 T * " d . $ t 7 6 J F " D W I o R T R Td RT @ R TUWN R 0X _@ RP A I *I J L < Q
0x0a64b8…0a664c Dummy {f00=0x0084, f01=0x0190, f02=»R R T W R T W I W R R RT W 4 r 0 0 @ 0 R 0 d x J F " D R H D% L W ! % L # L R .
0x0a664c…0a67e0 Dummy {f00=0x0084, f01=0x0190, f02=» 0 & ' 0 8 0 H > 0 Z J F " D u$ q" mH Lj ' 0X H Lj ' 0X H Lj 'j & 0X j G P X 0 a j
0x0a67e0…0a6974 (0, 211) Dummy {f00=0x0084, f01=0x0190, f02=» * . . * . * > N ^ & n & | ( * & & ( " o
0x0a6974…0a6b08 Dummy {f00=0x0084, f01=0x0190, f02=» # " 2 B % R & d " t o x Z J F " D 6 &@ R LW= R W5 R W- R" LW%0X _M R RA R
0x0a6b08…0a6c9c Dummy {f00=0x0084, f01=0x0190, f02=» > ( J F " D L @ R$W 4 0X 0X R0X 4 A I RT 4 I A R R R 0X C * b H0 r K0 S . Y ( _ TRP a d * h & p .
0x0a6c9c…0a6e30 Dummy {f00=0x0084, f01=0x0190, f02=» J F " D L R R0R F R_ 1XFA R2 RRR_ t * R L P _ R B ' X S " j T z V X ^ Z ` d " e " g i
0x0a6e30…0a6fc4 Dummy {f00=0x0084, f01=0x0190, f02=»n 1XF R R( R RW}1XF R R( r R RWl1XF R R( a z 8 " H & X h x " )
0x0a6fc4…0a7158 Dummy {f00=0x0084, f01=0x0190, f02=» J F " D R RW[WY1XF R R R( L R RWF1XF R R R( 9 R RW31XF R R R( & R RW " V 0 f v " 3
0x0a7158…0a72ec Dummy {f00=0x0084, f01=0x018e, f02=» SL J F " D 1XF R R( R RW 1XF R R( R R_ 0R F R?R RT V L R(L= VT =! ** j | ! ** ' 2 & < J F " D L ) L V _ Rf= 6 @@@@@@@ L Lh= T
0x0a72ec…0a7480 Dummy {f00=0x0084, f01=0x0190, f02=» s u w0 & J F " D @f= R F =D L b= a @ R F V @T0X RT L R(L= VTL = 8 SL ** + ' 0 ' SL
0x0a7480…0a7614 (0, 212) Dummy {f00=0x0085, f01=0x018e, f02=»! L L V _ L R _ =L R(L= T n , < & L l ~ 0 SLUTD J F " D V @T W V @T ?R s R@ 4 (V H RT =L V L R(L= VT[ =! L
0x0a7614…0a77a8 Dummy {f00=0x0085, f01=0x0190, f02=» -0 00 90 , J F " D V L R(L= VTA =! L V _ =L R(L=VT*@T ~ L L ~ L > F0 _ a c b d b l n c o
0x0a77a8…0a793c Dummy {f00=0x0085, f01=0x0190, f02=» " R RL R4 " R RL R4 d " b 2 c B R d b t c b J F " D " R # " R RL4 " R # " R RL4 " R # " R
0x0a793c…0a7ad0 Dummy {f00=0x0085, f01=0x0190, f02=» " " " " * " 8 " F " T " b " p " ~ " " " " ( $ $ &
0x0a7ad0…0a7c64 Dummy {f00=0x0085, f01=0x0190, f02=» $ + & & " X 0 " B & R $ ' ` $ 5 p & ( $ ( ( $ & & $
0x0a7c64…0a7df8 Dummy {f00=0x0085, f01=0x0190, f02=» " BBZ " ( $ 5 8 & H XX V " h & x ZZZ " & ( $ ( % $
0x0a7df8…0a7f8c Dummy {f00=0x0085, f01=0x0190, f02=» ZZ.ZZ.ZZ " & 0 $ 5 > BBBZZ N " d BBZZ t " BZZ " BBZB " ( $
0x0a7f8c…0a8120 Dummy {f00=0x0085, f01=0x018e, f02=» $ ( , $ < $ % L B999 " p & & $ + & & BZZZZZZZZZZ " & (
0x0a8120…0a82b4 (0, 213) Dummy {f00=0x0085, f01=0x0190, f02=» 99B " $ ( ( 8 D $ % T $ ' d $ + t ( & & ZZ " BZZ.ZZ.ZZZ "
0x0a82b4…0a8448 Dummy {f00=0x0085, f01=0x0190, f02=» $ BXX " $ ( % , & B999E-99E-999E-99B < " & ^ ( n ' z & ( XE-XXE-XXE-XXB " ( & & ) XXXXXXE-XXXX " )
0x0a8448…0a85dc Dummy {f00=0x0085, f01=0x0190, f02=» , & ( - & . XXXXXXXXE-XX 6 " . R ( b / n & ~ 0 XXX " 0 1 BXXXXXXXXXXX " 1 2 BXXXXXXXXXXX " 2
0x0a85dc…0a8770 Dummy {f00=0x0085, f01=0x0190, f02=»ZZ x " 6 ( 7 & & 6 8 ZZ.ZZ.ZZ D " 8 9 BZZZZZZZZZZZ l " 9 : BZZZZZZZZZZZ " : ; BZZZZ " ; < BZZ " < !
0x0a8770…0a8904 Dummy {f00=0x0085, f01=0x018e, f02=» * @ " A " C " G , " I : " K H " Z V " ` d " w r " e " g " i " " k " q " " t ( A
0x0a8904…0a8a98 Dummy {f00=0x0085, f01=0x0190, f02=» D $ " & ( E KONTOKORTZ 6 $ E" P & " ` F B*.***.***.**9.99- p " F " ( G & H START SUM* $ H" ( I
0x0a8a98…0a8c2c Dummy {f00=0x0085, f01=0x0190, f02=»& & * & * & ( & VERSNR 6 M DAGS-DATO J $ ME d & t N POST-DATO $ NE & O MASKIN NR $ OE P EKS.LBNR $ PE
0x0a8c2c…0a8dc0 Dummy {f00=0x0085, f01=0x0190, f02=» R~E & S 99E-99E-99 " S E 4 & D T 999R R " T E f & v U ***99 " U E & & & 6 2 0 V *VERSURKONTONR KASSEKONTONR PRIMO KASSE
0x0a8dc0…0a8f54 (0, 214) Dummy {f00=0x0085, f01=0x0190, f02=»" X E Y ZZZ.ZZZ.ZZ9.ZZ-B " Y E . & Y > & L & * Z ( h Z t $ [E ( [ & & * & * & KASSELUKNING $
0x0a8f54…0a90e8 Dummy {f00=0x0085, f01=0x0190, f02=» & _ KREDIT $ _E , ( < ` H $ aE X ( h a t & b ZZ " b E " c BBZZZ.ZZZ.ZZZ.ZZ9.99-O " c S " d BBZZZ.ZZZ.ZZZ.ZZ9.99
0x0a90e8…0a927c Dummy {f00=0x0085, f01=0x0190, f02=» SLUT TESTT $ h ( $ i 0 & @ j DISKETTE SKIFT N $ j l ( | k & $ l ( l $ % m BZZZ " m
0x0a927c…0a9410 Dummy {f00=0x0085, f01=0x0190, f02=» J F " D L R R0R F R_ 1XFA R2 RRR_ t * R L P _ R B ' X S " j T z V X ^ Z ` d " e " g i
0x0a9410…0a95a4 Dummy {f00=0x0085, f01=0x0190, f02=»n 1XF R R( R RW}1XF R R( r R RWl1XF R R( a z 8 " H & X h x " )
0x0a95a4…0a9738 Dummy {f00=0x0085, f01=0x0190, f02=» J F " D R RW[WY1XF R R R( L R RWF1XF R R R( 9 R RW31XF R R R( & R RW " V 0 f v " 3
0x0a9738…0a98cc Dummy {f00=0x0085, f01=0x018e, f02=» SL J F " D 1XF R R( R RW 1XF R R( R R_ 0R F R?R RT V L R(L= VT =! ** j | ! ** ' 2 & < J F " D L ) L V _ Rf= 6 @@@@@@@ L Lh= T
0x0a98cc…0a9a60 Dummy {f00=0x0085, f01=0x0190, f02=» s u w0 & J F " D @f= R F =D L b= a @ R F V @T0X RT L R(L= VTL = 8 SL ** + ' 0 ' SL
0x0a9a60…0a9bf4 (0, 215) Dummy {f00=0x0085, f01=0x018e, f02=»! L L V _ L R _ =L R(L= T n , < & L l ~ 0 SLUTD J F " D V @T W V @T ?R s R@ 4 (V H RT =L V L R(L= VT[ =! L
0x0a9bf4…0a9d88 Dummy {f00=0x0085, f01=0x0190, f02=» -0 00 90 , J F " D V L R(L= VTA =! L V _ =L R(L=VT*@T ~ L L ~ L > F0 _ a c b d b l n c o
0x0a9d88…0a9f1c Dummy {f00=0x0085, f01=0x0190, f02=» " R RL R4 " R RL R4 d " b 2 c B R d b t c b J F " D " R # " R RL4 " R # " R RL4 " R # " R
0x0a9f1c…0aa0b0 Dummy {f00=0x0085, f01=0x0190, f02=» b J F " D RL4 " # RL R4 " # RL R4 ! " # ' X j 3 BUDGETTAL z 8 BUDGETTAL = BUDGETTAL J F " D $ % & 4 = L L 6 (( %W& LW! LW
0x0aa0b0…0aa244 Dummy {f00=0x0085, f01=0x0190, f02=»B x V ANL[GSINDT[GTER-TB X , Z < g ' L i ^ l o n p & ~ z ** J F " D @ LW LW LW LW L R R 4 L R R4 RT`= =) L I *@ SLUTD
0x0aa244…0aa3d8 Dummy {f00=0x0085, f01=0x018e, f02=»V =) L A @T W @T 4 l 4 * < J F " D L " L L 4 W W " N & 0 & , { 5
0x0aa3d8…0aa56c Dummy {f00=0x0085, f01=0x0190, f02=» O Q0 J F " D @a T , L R La b a _=@ 4 ! " # $ % * x ( 0 0 0 0 0
0x0aa56c…0aa700 Dummy {f00=0x0085, f01=0x018e, f02=» BUDGETTAL $ UDEN $ $ 8 BUDGETTERINGSKODE H $ j & z 41 $ BUDGETTAL $ MED $ BUDGET
0x0aa700…0aa894 (0, 216) Dummy {f00=0x0086, f01=0x0190, f02=» BUDGETTAL $ MED . $ B BUDGETTERINGSKODEA R $ t & 45 $ TILL[GSBEV. BUDGET $ & 46
0x0aa894…0aaa28 Dummy {f00=0x0086, f01=0x0190, f02=»DSB. z $ & 48 * $ > ANL[GSUDGIFTER-TB N $ p & 49 $ ANL[GSINDT[GTER-TB $ & & & # !
0x0aaa28…0aabbc Dummy {f00=0x0086, f01=0x0190, f02=» ELLER TRYK "KVIT" ELLER "KRE"@ $ ( ( 8 D & T INDTAST TRANSKODE: b $ & & ZZ " & PLUS REGKONTONR $
0x0aabbc…0aad50 Dummy {f00=0x0086, f01=0x018c, f02=» E 1 & 2 ( 2 F 2 & & + 2 6 G Z.ZZZ.ZZZ.ZZ9.99-B 2 D " G 2 f & 2 v ( 2 H 2 & 2 & 2 & 2 & 2 & 2 & 2 & 2 ( 2
0x0aad50…0aaee4 Dummy {f00=0x0086, f01=0x4008, f02=»@ 3 & 2 ( 2 F 2 & & + 2 6 G Z.ZZZ.ZZZ.ZZ9.99-B 2 D " G 2 f & 2 v ( 2 H 2 & 2 & 2 & 2 & 2 & 2 & 2 & 2 ( 2
0x0aaee4…0ab078 Dummy {f00=0x0086, f01=0x4190, f02=» : H IDENT RGSUB2 TRA 4.2 81-01-06 F1 O1111 03.01.XXX.1 PACKCL PACKST B $$$TRAS PACKCL / PACKST n CYTRP EMPTYTT 0 E %0 E 0 A J F " D 0R
0x0ab078…0ab20c Dummy {f00=0x0086, f01=0x40b4, f02=» : H IDENT REMFMD TRA 4.2 81-01-13 F1 O1111 03.01.XXX.1 FMREMP FMTREM B $$$TRAM FMREMP FMTREM n 4 4 MR @ GTLEVNR P FILLR ' ',1 P FTEXT X'1E' (3) GTLEVNAVN P FNL P
0x0ab20c…0ab3a0 Dummy {f00=0x0086, f01=0x0190, f02=» . H IDENT REMDUM TRA 4.2 81-01-15 F1 O1111 D @ AD4100 AD4200 AD4300 CHDATO IDXGET LEVDEL LEVIN LEVOPR 6 B > LEVPRTM LEVRD LEVSPG REPL005 SETIDX1 SETKEY TRGETF TRINS ~ 8 4 TXTOPR TXTPRT TXTRD VARRD VARWRTX WSTRCHV XCOPL $$$TR
0x0ab3a0…0ab534 (0, 217) Dummy {f00=0x0086, f01=0x0190, f02=» W X @ < SETIDX SETKEYT TRGETFD TRINS TXTOPRE U TXTPRTE S 2 . TXTRD ~ VARRD VARWRTR WSTRCHD XCOPP B N ADMRET *0 , B . /
0x0ab534…0ab6c8 Dummy {f00=0x0086, f01=0x411a, f02=» ? J F " D ?R?R?R4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 L R LL L R LL L R LL L _ R h J F " D @4 j 4 4 4 Lh T f 4 4 4 4 4 z 0 & ! 4 #g L 4 4 4 4
0x0ab6c8…0ab85c Dummy {f00=0x0086, f01=0x0190, f02=» J F IDENT VDUPRT 2.1DK 5 79-10-20 870150540210 D @ TRPFY TRPAY ERASE SETCUR ERASUPA DISPL ERASUAL WCHAR UPDATE R , ( RFMDUP DCINP RLRBUF DCGETM GTRBUF DCINP , ( O N T B O N
0x0ab85c…0ab9f0 Dummy {f00=0x0086, f01=0x018e, f02=» N " P N " O N " P SNBUSY $ , ( [@ N " O W B 6 DCGETM | f REQTIM` z , ( y : C C C ( :
0x0ab9f0…0abb84 Dummy {f00=0x0086, f01=0x0190, f02=» f , ( $ _ Q = : $ : <" T TEBCDI 8 , ( $ _ $ H !?9F $ H "? J , ( % : X N / z , ( %1 O ( $ B P N ' O LSAVOF , ( %QH
0x0abb84…0abd18 Dummy {f00=0x0086, f01=0x0190, f02=»% !`P V 0 !`P X $ , ( % _ " T V 0 !` V _ , UPDATE % , ( $ % $ %r_J : O B p , ( & $ T $ 1P 5P ?P , ( &% 7 W N W , ( &E
0x0abd18…0abeac Dummy {f00=0x0086, f01=0x0190, f02=» & P P P P T |_X , ( & T }_b T ~_l T 0_v 0 , ( & T _ T _ B $ : ` , ( ' $ H ! :a" _ $ ^, , ( '# _ O _ T ^ , ( 'C 0 " R 1
0x0abeac…0ac040 Dummy {f00=0x0086, f01=0x0190, f02=»$ ^ &Z N & , ( ' $ H V L 1P , ( ' Y & ( K@ V O P ICWRTE: , ( ( & $ H O , ( ( " P N T B + I I , ( (= I C
0x0ac040…0ac1d4 (0, 218) Dummy {f00=0x0086, f01=0x0190, f02=» , ( ( O O N T ; 1 B ERASUPA( 4 , ( ( E C ( : : O H , ( ( O P " R x , ( ( V 0" ^ " O P ERASUAL)2 , ( ) W P
0x0ac1d4…0ac368 Dummy {f00=0x0086, f01=0x0190, f02=» 1 _8 " T | , ( ) ZF P " Q _R R , ( ) R T _ X 0" ZF _2 L TRPAY) | TRPFY) , ( TU) $ $ % : : $ $ %l % DISPL) , ( ) _ C
0x0ac368…0ac4fc Dummy {f00=0x0086, f01=0x0190, f02=» ~T 5 | r , ( *} T < ] _V" 2 O P " P W , ( * ] _v PR V 0 B SETCUR * r , ( * " 1 ZJ_, C , ( * N C PR C P_ WCHAR+ RFMDUP +
0x0ac4fc…0ac690 Dummy {f00=0x0086, f01=0x0190, f02=» : l , ( +] % P 7 P R C ( B ! , ( +} PV B + E E :h E T C < , ( + ( C C _ N P l , ( + " P W = : R P + T - : : H D ! $ | TT 3% 7) GP Y
0x0ac690…0ac824 Dummy {f00=0x0086, f01=0x0190, f02=»( &_V &iR &sP & T & Ph& Pv& P & P & P & P & T & T & T H D ! & T & T & T '7T$'MR ' P ' R ' )2' P ( P4(%T.([T (qT ( V ( T(( R > H D ! ( V ) P )!W )%P )1WH)9R )ET4)QV()UTv)WW")]R )kR )qT ) R ) P ) T H D ! ) R ) R ) T * +.*%Q */Pz*3+ *9R *=+Z*A+ *GV *M
0x0ac824…0ac9b8 Dummy {f00=0x0086, f01=0x4014, f02=» + @ Ph& Pv& P & P & P & P & T & T & T H D ! & T & T & T '7T$'MR ' P ' R ' )2' P ( P4(%T.([T (qT ( V ( T(( R > H D ! ( V ) P )!W )%P )1WH)9R )ET4)QV()UTv)WW")]R )kR )qT ) R ) P ) T H D ! ) R ) R ) T * +.*%Q */Pz*3+ *9R *=+Z*A+ *GV *M
0x0ac9b8…0acb4c Dummy {f00=0x0086, f01=0x0190, f02=» : H IDENT REMFMS TRA 4.2 81-03-19 F1 O1111 03.01.XXX.1 FMREMP FMTREM B $$$TRAM FMREMP FMTREM n T:ATTFM * " 9 " E " "
0x0acb4c…0acce0 Dummy {f00=0x0086, f01=0x0190, f02=» & NR $ & 0 & @ & P XXXXXXXXXX b " | & & XXXXXXXXXX " & & & &
0x0acce0…0ace74 (0, 219) Dummy {f00=0x0086, f01=0x0190, f02=»& & & ADR , $ @ & P & ^ & @ n & & BY $ & & & @ & &
0x0ace74…0ad008 Dummy {f00=0x0086, f01=0x0190, f02=»TR $ & & @ * & < & J BET.FORM X $ p & & X " & GIRONR $ &
0x0ad008…0ad19c Dummy {f00=0x0086, f01=0x0190, f02=» XXXXXXXXXX " $ & 4 XXVXXVXX B " Z & j & x SLETNING EJ TILLADT0 $ & & & $ (
0x0ad19c…0ad330 Dummy {f00=0x0086, f01=0x0190, f02=» $ & XXXXXXXXXX * " D & T SIDSTE UDB b $ | 99E-99E-99 " & ZZZVZZZVZZ9E,99- " &
0x0ad330…0ad4c4 Dummy {f00=0x0086, f01=0x018e, f02=» $ 7 & 99E-99E-99 * " D & T FAKTURA b $ z $ 8 & ! ZZZVZZZVZZ9E,99- " ! & ! " KREDITNOTA $ "
0x0ad4c4…0ad658 Dummy {f00=0x0086, f01=0x0190, f02=» $ 8 & % ZZZVZZZVZZ9E,99- " " % ! B ( R & ^ & % n ( | ' ? & % ( UDSKRIFT $ (! ) AF $ )! * LEVERAND
0x0ad658…0ad7ec Dummy {f00=0x0086, f01=0x0190, f02=» $ -! . DATO $ .! , & < / XXE-XXE-XX N " / h & / x 0 FRA/TIL NR $ 0 & 1 XXXXXXXXXX " 1 & 2 XX
0x0ad7ec…0ad980 Dummy {f00=0x0086, f01=0x0190, f02=»" 4 & 4 & 4 5 NULSTIL SALDO (1) * $ 5 L & 6 X n " 6 ( 7 & VAL & & RDATO ( 8 & BELT
0x0ad980…0adb14 (0, 220) Dummy {f00=0x0087, f01=0x0190, f02=» ; AF $ ;E < TEKST $ <E 4 = FIL D $ =E X & h > 99E-99E-99 v " >~E & > ? FRA/TIL NR $ ?E & T @ ZZ9 " @
0x0adb14…0adca8 Dummy {f00=0x0087, f01=0x0190, f02=»?D ~ $ B & * % # C JOURNALSKRIVER=1,REGNERULLE=21 ( $ C V & # T f D 9T x " D ( E & & D F REMIT.TEKST NR $ F & &
0x0adca8…0ade3c Dummy {f00=0x0087, f01=0x40c8, f02=» A T & & & * I KODE 8 $ I L & T J XT n " J ( 4 1XF 4 @ F REMIT.TEKST NR $ F & &
0x0ade3c…0adfd0 Dummy {f00=0x0087, f01=0x0190, f02=» . H IDENT REMBDT TRA 4.2 81-04-03 F1 O1111 . * BCHKPR BGIRPR BSAMPR STREDT WSTRCH 6 $$$TRAM h 8 4 BCHKPR BGIRPRB BSAMPRR STREDTC L WSTRCH z B > CLEAR8M CYRDT FMOD2 FMREMP- FSOLVE1 GENWRF GENWRS GRASPV D @ KFWRIT L
0x0adfd0…0ae164 Dummy {f00=0x0087, f01=0x018e, f02=» $ ! L * $ ' : & J (0 Z J F " D = L L( L RP bL RabF R Lb T @P * pH6 * l G0 = K0 = M & N P
0x0ae164…0ae2f8 Dummy {f00=0x0087, f01=0x0190, f02=» J F " D @i e% L[ EL RL R R LH6 0X E R 1X F L V f v 0 J F " D L H6 0X R 0X L R W @P W 4 K
0x0ae2f8…0ae48c Dummy {f00=0x0087, f01=0x0190, f02=» J F " D H6 RW 6 <FPWu R L ! R WI R R R R a F R R u f u v u !0 % ' + / 20 4
0x0ae48c…0ae620 Dummy {f00=0x0087, f01=0x0190, f02=» ` X e * s0 : u L x | l | J F " D @@ W A 4 6 ;;rW9 R R R L R Wr FL R R R
0x0ae620…0ae7b4 (0, 221) Dummy {f00=0x0087, f01=0x0190, f02=» ' J F " D R a F R R ) L R L R R I L_; F R R R F n 0 a ~ 0 % 0 % 0 %
0x0ae7b4…0ae948 Dummy {f00=0x0087, f01=0x0190, f02=» 0 * < L # ' l + | / 4 6 > u J F " D R L R # L _ R GLa F R R R R! R& a F
0x0ae948…0aeadc Dummy {f00=0x0087, f01=0x0190, f02=» n s v , x > u N J F " D @ Wy F R Wo F R Wea F R R R R# L R a F L R G ^ u u
0x0aeadc…0aec70 Dummy {f00=0x0087, f01=0x018e, f02=» k l0 R p , q0 E < u N v0 ^ }0 4P p 0 4 J F " D @ Y W 4 ! L L 4 Iz RLT RLP RLP Az L 0 p
0x0aec70…0aee04 Dummy {f00=0x0087, f01=0x0190, f02=» 0 s 0 Q 0 u , J F " D L4 Izr RLTm) Li y ! L4! LN! L;! LF! LB! L>! L:! L6! L2! > 0 0 0 0 0 4Pr 0 4
0x0aee04…0aef98 Dummy {f00=0x0087, f01=0x0190, f02=» 0 0 d 0 q " #0 s 4 '0 F +0 X /0 e j J F " D TF) LB y ! L ! L'! L#! L ! L ! L ! L ! L Y* Y2W | D0 4PB G0 4 N O0
0x0aef98…0af12c Dummy {f00=0x0087, f01=0x018e, f02=» l m0 h q r0 u . y0 4pB @ |0 4 T J F " D @Az L L4 Iz RLT RLT Az L4 Iz RLP RLP RLT RLP Az L L4 I f 0 h 0
0x0af12c…0af2c0 Dummy {f00=0x0087, f01=0x0190, f02=» 0 0 & 8 0 p H 0 4p Z 0 4 n J F " D z@ RLT; 6 ''' ' RLP" RLP RLP RLP RL) L RL) L RLT Az L 0 d 0
0x0af2c0…0af454 (0, 222) Dummy {f00=0x0087, f01=0x0190, f02=» 0 5 T 0 5 J F " D L4 Iz RLP RLT Az L4 Iz RLT * B Az L L4 Iz RLT * B Az L & t 0 p 0 5 z # $0 s ( )0 ! - .0 5
0x0af454…0af5e8 Dummy {f00=0x0087, f01=0x0190, f02=» RLP W Az L X H I0 & N 8 O0 H T Z U0 j Z X | ] X d e0 g X q0 5 z t0 5 |0 5
0x0af5e8…0af77c Dummy {f00=0x0087, f01=0x0190, f02=»0 0 0 0 0 0 u B 0 T 0 f 0 x J F " D L ! L W@ y ! L"! L ! L ! L ! L ! L ! L ! L ! L W Y0 0 5G 0 5
0x0af77c…0af910 Dummy {f00=0x0087, f01=0x0190, f02=»0 0 J F " D Y8W Az L4 Iz 4 Iz ) L RLP RLT Az L L4 Iz, RLT' L L 0 l 0 ~ 0 5`8 0 5 %0 5 ( )0 00 5`8 30 5
0x0af910…0afaa4 Dummy {f00=0x0087, f01=0x0190, f02=» T0 E X0 U 0 q ( `0 : d0 L h0 % ^ l0 u p p0 R J F " D @ WF y ! L ! L+! L'! L#! L ! L ! L ! L ! L Y. Y6W 0 5p 0 5
0x0afaa4…0afc38 Dummy {f00=0x0087, f01=0x0190, f02=» 0 5 0 & 0 8 0 J 0 J F " D Az L L4 Iz RLP RLP RLP Az L L4 Iz ) L RLT ! L ! L ! L A n 0 5 L 0 5 0
0x0afc38…0afdcc Dummy {f00=0x0087, f01=0x0190, f02=»L4 Iz RLT ! L ! L W ! L Az L L4 Iz L y ! Li 0 B 0 T 0 E f 0 x 0 ! 0 3 0 @ !0 d %0 q )0 -0
0x0afdcc…0aff60 Dummy {f00=0x0087, f01=0x0190, f02=» LK! LG! LC! L?! L@! L<! b E0 I0 B 2 M0 D Q0 0 V U0 T h Y0 # z ]0 T a0 e0 s J F " D @ L8! L4! L0! L,! L(! L$! L ! L ! L ! L Yw Y W _ _
0x0aff60…0b00f4 (0, 223) Dummy {f00=0x0087, f01=0x0190, f02=» 0 5 0 U * 0 L < 0 L P 0 P L d J F " D R RL R RLT R Az L L4 Iz< RLT7 L L - L$ x 0 L 0 0 0 h
0x0b00f4…0b0288 Dummy {f00=0x0087, f01=0x0190, f02=» 0 6 L 0 6 J F " D L L L H - L Az L L4 Iz RLT + L RLP Az L L4 I " p 0 0 0 6 0 6 0 0
0x0b0288…0b041c Dummy {f00=0x0087, f01=0x018e, f02=» V ? X J F " D z RLT RLP Az L L4 Iz RL! L RLP Az L L4 Iz- RL RL R B h C0 c x E X L M0 h Q X ^0 6 T f0 6 i j
0x0b041c…0b05b0 Dummy {f00=0x0087, f01=0x4008, f02=»@
0x0b05b0…0b0744 Dummy {f00=0x0087, f01=0x2008, f02=» WBIN9 ( GSWSTR1 ( GSWSTR2 ( GSWSTR20 ( GSWSTR3 r( GSWSTR80 s( GSWSTR9 ( GTADMFLG ( GTADUPFL ( GTANTAL ( GTASTFLG ( GTASUMFL ( GTAUTODP ( GTBDTFLG ( GTCHKCY ( GTCHKPR ( GTCLRN ( GTCYFLG ( GTCYIN ( GTCYOUT ( GTCYSUM ( GTCYTR
0x0b0744…0b08d8 Dummy {f00=0x0087, f01=0x0190, f02=» & + A ZZZD " Ay * & / A < & { N & @ ^ B ZZZD p " By & D A & { & { ( C & { & D D
0x0b08d8…0b0a6c Dummy {f00=0x0087, f01=0x0190, f02=» & F ! & ! G RECORDS FRI ! $ $ G ! @ & I ! P H 99999N ! ^ " H ! t & H ! I SKATTE]R ! $ I ! J Z99D ! " JH ! & J ! 0 + &) %01*- SLUTLIGNING/FORSK
0x0b0a6c…0b0c00 Dummy {f00=0x0087, f01=0x018e, f02=»KKOPIERING ! & " & 05 - LIST CPRNRI " & " > $ & 06 - [NDRING AF KONSTANTER " L & " t & # &! 07 - UDSKRIVNING AF DISKETTE " & " & - " K ZZZU " " K " ( " L "
0x0b0c00…0b0d94 (0, 224) Dummy {f00=0x0088, f01=0x018e, f02=» & # & s # & s # & - # . O Z- # @ " O # R ( # b P # n & + # ~ & # Q 99E-99E-99E-9999 # " Qn # & # R 99E-99E-99E-9999 # " Rn #
0x0b0d94…0b0f28 Dummy {f00=0x0088, f01=0x417a, f02=» & $ ( $ U $ & * $ . V 999U $ < " V; $ P & $ ` & $ n ( $ | W $ X 9999999999 $ " X $ & $ ( $ Y $ & & $ Z T99U $
0x0b0f28…0b10bc Dummy {f00=0x0088, f01=0x2008, f02=» % RFFLG W( CTRVALG ( CTTXT07 M( CTWBIN1 p( CTWBIN2 q( CTXBUF ;( CTXTFLG S( CURATT %( CVALFLG ]( CVARBUF >( CVAREXFL _( CVARFLG U( CVERSNR C( CVOL ($CVOLNO |( CVOUTOP )( CWFLAG "( CWORK1 7( DATE D DCLENG )( DUMBC3 0( DUMCB4
0x0b10bc…0b1250 Dummy {f00=0x0088, f01=0x0190, f02=»MSFMT12,MSFMT13 P* P* " PERRFMT FRMT , P FSL @ P FCOPY ='FEJL ' L P FMEL 'ZZ9',GSWBCD4 ERRORNR. d P FMEND P* PERRDSK FRMT P FSL P FMEL '99B',GTWBCD2 P FCOPY GSWSTR9 P FMEL '99',GTWBCD1
0x0b1250…0b13e4 Dummy {f00=0x0088, f01=0x0190, f02=» FSL P FCOPY ='LINIE NR' P FILLR '.',1 ( P FMEND > P* L PMSFMT3 FRMT V P FSL j P FTEXT ='NY SIDE. ' v P FMEND P* PMSFMT4 FRMT P FSL P FBF TTSUMFLG,FMT4END P FTAB 15 P FCOPY GTL8TXT
0x0b13e4…0b1578 Dummy {f00=0x0088, f01=0x0190, f02=» ='BILAG' P FMEND P* PMSFMT6 FRMT * P FSL > P FCOPY ='KONTOKORT' J P FMEND f P* t PMSFMT7 FRMT ~ P FSL P FCOPY TTINF1 P FMEND P* PMSFMT8 FRMT P FSL P FCOPY ='DISKETTE SKIFT '
0x0b1578…0b170c Dummy {f00=0x0088, f01=0x413a, f02=» P FSL " P FMEL 'TTTTTTTTTTTT9-',GTWBCD2 P FMEND : P* H PMSFMT11 FRMT R P FSL f P FCOPY ='OPRET LEV. ' r P FMEND P* PMSFMT12 FRMT P FSL P FMEND P* PMSFMT13 FRMT P FSL P FCOPY =
0x0b170c…0b18a0 Dummy {f00=0x0088, f01=0x2008, f02=» * ERRFMT FRMT FSL , " FMEL 'ZZ9B',GTWBCD1 FILE NR. 8 FCOPY ERRTXT ^ " FMEL 'BZZ9',GTWBCD2 ERRORNR. t FCOPY =X'07' FMEND @ 8SPKTAB2 KTAB BSPKY1,CANKY1,NOKEY,MACKY1,NOKEY,EORKY1, C D ? FT
0x0b18a0…0b1a34 (0, 225) Dummy {f00=0x0088, f01=0x0190, f02=» *# P P T " T : " | Y . Zt Y ( w Y *T " T ! 1 W ! ) w : wz x Y *T W" : w [ w : V Y " X .9H $ x P & X ( " Q Y +Q R " P W " U Y Y , " Q " | X . X 0R P" X *:h P
0x0b1a34…0b1bc8 Dummy {f00=0x0088, f01=0x0190, f02=»R$W Z Y T$ @ Y (W Y , ZtW Z Y ( w : X *:h X (! # P X & V L TbW X , X 0P@ Y T, X *:h XF XL X (!@T @ Y ( X , Y t X 0 l Z _r X ( P Y (_ P. Y P Y 8 W" X 8 X $ Wh_ " P X ( T X & V
0x0b1bc8…0b1d5c Dummy {f00=0x0088, f01=0x0190, f02=» Y ( : 8 [ j 8 V Y 8 : " P X & V ( P Y : : Y "0P $ T W %T : : Y ( X $ Y X " Y X & Y X < Y @ : Y : X : X ( T X & V H " V Y : X $ X : : X Y " X Y $ X Y & X @W X < Y =
0x0b1d5c…0b1ef0 Dummy {f00=0x0088, f01=0x018e, f02=» 0 " 2 J F " D " W W@H L R RA + W&H L R RA I B # $ KRE '0 K *0 K 2 DEB
0x0b1ef0…0b2084 Dummy {f00=0x0088, f01=0x40aa, f02=» W 0 J F " D @ J # " 4 RW R 6 W 6 $ A W $ 4 $ b LA 4 t @ # $ KRE '0 K *0 K 2 DEB
0x0b2084…0b2218 Dummy {f00=0x0088, f01=0x4016, f02=» PNOD R 0 @ 0 . .(.0.8.@.H.P.X.`.h.p.x. . . . . . . . . . . . ,8,@,H,
0x0b2218…0b23ac Dummy {f00=0x0088, f01=0x0190, f02=» : H IDENT KMDIO TRA 4.2 - - F1 O1111 03.01.XXX.1 1 B > CRKJ CRVO GRASPV LINOPT WCHECK WCHUPD WRITFD WRITID 1 B WRITJTD WRITVOA WTALLY 1 $$$TRAC 1 > : CRKJJ , CRVOV 2 GRASPV LINOPT WCHECK. WCHUPD 1 8 4 WRITFDC
0x0b23ac…0b2540 Dummy {f00=0x0088, f01=0x018e, f02=»EVIN LEVRD RADEL RAWRITW SPCHK5 SPERR 1 | > : SPLIN8A T:DELAT T:DSC0R T:DSC1T T:EDWRH T:TESTW T:WAIT 2 . 8 4 T:WRITC TRGETFI TRINS VARRD VARWRTR WAITF WSTRCH 2 p 2 : 2 ,0 C 2 10 C 2 8 C 2 @
0x0b2540…0b26d4 (0, 226) Dummy {f00=0x0088, f01=0x0190, f02=» } 3 J F " D @L @)aaFaaF N W ha D W ! LkI! , (a L 3 3 d ) 3 t 3 ! 3 J F " D a F L Lh @!" ba _:ba L ba f A 3 3
0x0b26d4…0b2868 Dummy {f00=0x0088, f01=0x0190, f02=»a R LatT8I , p t 3 ` 0 4 4 0 0 4 @ 0 P 4 R DISCFEJL 4 d 4 | J F " D XL R tT&$tQ @ @! & L L L R 4 _ @!@ 4 tp p X A*@ A 4 G0 4 K0 4 N0
0x0b2868…0b29fc Dummy {f00=0x0088, f01=0x0190, f02=» }0 I 4 J F " D @ 4 @ # L dL# L ) L A 4 # L dL_ # L dL_ # L dL_ dL_" 5 5 ^ 2 5 n 6 5 ~ 4 5 " 5 J F " D I I BW I I H W I o R T R Td RT @ R TUWN 5 $ 5
0x0b29fc…0b2b90 Dummy {f00=0x0088, f01=0x0190, f02=»R R R R R R R R R R R?R_j R R @ h A & D A 6 A F A V A f A v A A A / A a A A g A A
0x0b2b90…0b2d24 Dummy {f00=0x0088, f01=0x018e, f02=» A D B B B ( B 8 B H B X B h B x J F " D R R R R R R R R R R R R?R R R R R R R R R R RLP R R R R R R R R B B / B a B
0x0b2d24…0b2eb8 Dummy {f00=0x0088, f01=0x018e, f02=» B D C C C ( C 8 C H C X C h C x C / C a C g C C C ^ C C
0x0b2eb8…0b304c Dummy {f00=0x0088, f01=0x0190, f02=» C D D D ( D 8 D H D X D h D x D / D a D g D D ! D # J D % ^ D
0x0b304c…0b31e0 Dummy {f00=0x0088, f01=0x018e, f02=» D 9 E ; E = E ( ? E 8 J F " D R R R R R R R R R R R R RW R R R R R R R R R R R R R R R R R R E H A / E C a E G g E I E K E M J E O ^ E
0x0b31e0…0b3374 (0, 227) Opaque[0x194]
0x0b3374…0b3508 # DirEnt {nam=»LEDFIL«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1118, f03=0x0000}
0x0b3374…0b3508 IdxSect {
0x0b3374…0b3508 f00 = 0x0088 // 0xb3374 @0x0
0x0b3374…0b3508 f01 = 0x0004 // 0xb3376 @0x2
0x0b3374…0b3508 gno = [ // 0xb3378 @0x4
0x0b3374…0b3508 [0x00]: C0x0088.0x3.0
0x0b3374…0b3508 [0x01]: C0x0089.0x0.0
0x0b3374…0b3508 ]
0x0b3374…0b3508 }
0x0b3508…0b369c Dummy {f00=0x0088, f01=0x0190, f02=» PLED RGSTRT P!!LS $$GTLEVN$$ P!!AB . PLED DKSUBS : P!!LS $$GTLEVN$$ L P!!AB d PLED KMD08 p P!!LS $$GTLEVN$$ P!!AB PLED RGMAIN P!!LS $$GTLEVN$$ P!!AB PLED RGKLAR P!!LS $$GTLEVN$$ P!!
0x0b369c…0b3830 Dummy {f00=0x0088, f01=0x018e, f02=»!!LS $$GTLEVN$$ P!!AB PLED RGADM $ P!!LS $$GTLEVN$$ 6 P!!AB N PLED RGSUB1 Z P!!LS $$GTLEVN$$ l P!!AB PLED RGSUB2 P!!LS $$GTLEVN$$ P!!AB PLED RGSUB3 P!!LS $$GTLEVN$$ P!!AB PLED RGSUB4
0x0b3830…0b39c4 Dummy {f00=0x0088, f01=0x018e, f02=» P!!AB PLED DIVFMT P!!LS $$GTLEVN$$ " P!!AB : PLED RGSUBS F P!!LS $$GTLEVN$$ X P!!AB p PLED ADM6 | P!!LS $$GTLEVN$$ P!!AB PLED ADM5 P!!LS $$GTLEVN$$ P!!AB PLED KTPLN P!!LS $$GTLEVN$$
0x0b39c4…0b3b58 Dummy {f00=0x0088, f01=0x0190, f02=» PLED REMFMS P!!LS $$GTLEVN$$ P!!AB . PLED REMFMT : P!!LS $$GTLEVN$$ L P!!AB d PLED REMLEV p P!!LS $$GTLEVN$$ P!!AB PLED REMBDS P!!LS $$GTLEVN$$ P!!AB PSCR PLED REMDUM P!!LS $$GTLEVN$
0x0b3b58…0b3cec Dummy {f00=0x0088, f01=0x00b2, f02=»MPRT P!!LS $$GTLEVN$$ P!!AB $ PLED REMSUB 0 P!!LS $$GTLEVN$$ B P!!AB Z PLED BUDGET f P!!LS $$GTLEVN$$ x P!!AB PSCR $ASG2 P!!LS $$GTLEVN$$ P!!AB PSCR PLED REMDUM P!!LS $$GTLEVN$
0x0b3cec…0b3e80 Dummy {f00=0x0088, f01=0x2008, f02=» P!!LS $$GTLEVN$$ P!!AB $ PLED REMSUB 0 P!!LS $$GTLEVN$$ B P!!AB Z PLED BUDGET f P!!LS $$GTLEVN$$ x P!!AB PSCR $ASG2 P!!LS $$GTLEVN$$ P!!AB PSCR PLED REMDUM P!!LS $$GTLEVN$
0x0b3e80…0b4014 (0, 228) Dummy {f00=0x0089, f01=0x0190, f02=» z PCBDTSUM2 BCD 11D'0' PCBDTSUM3 BCD 11D'0' $ ( PEDITBUF STRG 732 FORMATEDITING BUNDT @ PCTRBUF STRG 40 l PCKFBUF STRG 7 PCCYSIZE BIN '36' & P* ONLY RELEVANT IF EITHER ( P* CBKOFLG=F (CHECK BKO) OR , P*
0x0b4014…0b41a8 Dummy {f00=0x0089, f01=0x0190, f02=» P '02','-01', C P '03','-01', C P '04','-01', C 4 P '05','-01', C L P '06','-01', C d P '07','-01', C | P '08','-01', C P '09','-01', C P '10','-01', C P '12','-01', C P '18','-01', C
0x0b41a8…0b433c Dummy {f00=0x0089, f01=0x0190, f02=»'-01', C P '-45','-01', C P '-46','-01', C , P '-47','-01', C F P '-48','-01', C ` P '-49','-01', C z P '-50','-01', C P '-51','-01', C P '-52','-01', C P '-53','-01', C P '-54','-01
0x0b433c…0b44d0 Dummy {f00=0x0089, f01=0x0190, f02=» * PC167FLG BOOL FALSE T=KMD167 (HVIDOVRE) ! $ PCTALLY BOOL F T: OUTPUT ON TALLY ! 2 & PCTXTFLG BOOL F T: TEXTBUF OCCUPIED ! Z , PCLEVFLG BOOL FALSE T=LEV BUFFER RESERVED ! , PCVARFLG BOOL FALSE T=VAR BUFFER RESERVED ! . PCIDXFLG BOOL FALSE T=INDEX BUFFER RE
0x0b44d0…0b4664 Dummy {f00=0x0089, f01=0x0190, f02=»AG) ! l ( PCDKOFF BOOL FALSE T=DISK SWITCH OFF " * PCLEV8FLG BOOL FALSE T=GENERATE LEV NR " 8 * PC539FLG BOOL FALSE T=KMD539 (TINGLEV) " f 0 PCVALFLG BOOL TRUE T=CHECK VALORDATO, TR 3,4 " & PCAD41FLG BOOL FALSE T=IN ADM 41/43 " 6 PCVAREXFL BOOL FALSE T=
0x0b4664…0b47f8 Dummy {f00=0x0089, f01=0x0190, f02=»G OF FULL REGSET " p & PCKTMAX BIN '21' MAX SIZE KONTOPLAN # * PCIXLAST BIN LAST RECORD IN INDEXFILE # B " PCIXFREE BIN FIRST FREE RECORD # p PCREMPT1 BIN # PCBUDPT BIN # PCRECLGD BIN W'128' # & PCRECBCD BCD 6D LOGICAL RECORD NR. # PCKMDNAM
0x0b47f8…0b498c Dummy {f00=0x0089, f01=0x0190, f02=»D'5' FIRST LINE KORT (DEFAULT) # > PFROMTX STRGI (12)2C'KA','KB','KC','KD','KE','KF','KG', C $ & P 'KH','KI','KJ','KK','KL' $ h P EJECT $ PTB1 BLK $ P* $ " PTTCY1FLG BOOL FALSE IN CYCLE? $ " PTTCY2FLG BOOL FALSE IN STABEL? $ PTTLSTFLG B
0x0b498c…0b4b20 Dummy {f00=0x0089, f01=0x018e, f02=» MODPOST $ t & PTTJTEND BOOL FALSE END OF JOURNAL % * PTTEORFLG BOOL FALSE *-- END OF RECORD % : ( PTTSUPFLG BOOL FALSE SUPPLEMENT POST % h , PTTSMALL BOOL FALSE *-- SMALL GIRO KVIT? % & PTTR11FLG BOOL FALSE T: KASSE CLOSE % , PTTKORTFL BOOL FALSE T: IN
0x0b4b20…0b4cb4 (0, 229) Opaque[0x194]
0x0b4cb4…0b4e48 # DirEnt {nam=»SL461 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1128, f03=0x0000}
0x0b4cb4…0b4e48 IdxSect {
0x0b4cb4…0b4e48 f00 = 0x0089 // 0xb4cb4 @0x0
0x0b4cb4…0b4e48 f01 = 0x0004 // 0xb4cb6 @0x2
0x0b4cb4…0b4e48 gno = [ // 0xb4cb8 @0x4
0x0b4cb4…0b4e48 [0x00]: C0x0089.0x1.0
0x0b4cb4…0b4e48 [0x01]: C0x0089.0x2.0
0x0b4cb4…0b4e48 ]
0x0b4cb4…0b4e48 }
0x0b4e48…0b4fdc Dummy {f00=0x0089, f01=0x0190, f02=» < PSPKTAB1 KTAB BSPKY1,CANKY1,NOKEY,EORKY1,NOKEY,MACKY1, C > P FTABKY1,BTABKY1,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C D & P COPKY1,DUPKY1,EDTKY1,SLUTKY1, C . P KREKY1,REGKY2,LISTKY1,SBTKY1,SPGKY1, C < P CY1KY1,CY2KY1,INVKY1,KONKY1,KVITKY1,
0x0b4fdc…0b5170 Dummy {f00=0x0089, f01=0x0190, f02=»CANKY1,NOKEY,EORKY1,NOKEY,MACKY1, C | > P FTABKY1,BTABKY1,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C , & P COPKY1,DUPKY1,EDTKY1,SLUTKY1, C n . P KREKY1,REGKY2,LISTKY1,SBTKY1,SPGKY1, C < P CY1KY1,CY2KY1,INVKY1,KONKY1,KVITKY1,SUPLKY1,SUMKY1, C <
0x0b5170…0b5304 Dummy {f00=0x0089, f01=0x0190, f02=» d " P CL1KY1,CL2KY1,CL3KY1,OUTKY1 P* . > PSPKTAB12 KTAB BSPKY2,CANKY2,NOKEY,EORKY2,NOKEY,MACKY2, C 8 2 P FTABKY2,BTABKY2,NOKEY,NOKEY,NOKEY,NOKEY, C z 2 P NOKEY,NOKEY,NOKEY,DUPKY2,EDTKY2,SLUTKY2, C 6 P KREKY2,REGKY2,ADMKY2,SPGKY2,KONK
0x0b5304…0b5498 Dummy {f00=0x0089, f01=0x0190, f02=»NOKEY, C l 2 P NOKEY,NOKEY,NOKEY,DUPKY2,EDTKY2,SLUTKY2, C 6 P KREKY2,REGKY2,ADMKY2,SPGKY2,KONKY2,KVITKY2,ONKY2 H P* * P* INQUIRY KEYTABLES (SPKEY=3) P* < PSPKTAB13 KTAB BSPKY1,NOKEY,CANKY1,NOKEY,NOKEY,MACKY1, C . P NO
0x0b5498…0b562c Dummy {f00=0x0089, f01=0x0190, f02=» C j " P NOKEY,INVKY1,KONKY1,KVITKY1 P* 2 < PSPKTAB23 KTAB BSPKY1,NOKEY,CANKY1,NOKEY,NOKEY,MACKY1, C < . P NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C | . P NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C . P NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,
0x0b562c…0b57c0 Dummy {f00=0x0089, f01=0x0190, f02=»* PSPKTAB14 KTAB NOKEY PSPKTAB24 KTAB NOKEY & P* B P* L : PSPFTBERR FTABLE ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C V , P ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C , P ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C , P ERRFMT,ERRFMT,ERRF
0x0b57c0…0b5954 (0, 230) Dummy {f00=0x0089, f01=0x0190, f02=» B PSPFTBMES FTABLE MSFMT1,MSFMT2,MSFMT3,MSFMT4,MSFMT5,MSFMT6, C & P MSFMT7,MSFMT8,MSFMT9,MSFMT10, C J P MSFMT11,MSFMT12,MSFMT13 t P* P* PERRFMT FRMT P FSL P FCOPY ='FEJL ' P FMEL 'ZZ9',GSWBCD4 ERRORNR. P F
0x0b5954…0b5ae8 Dummy {f00=0x0089, f01=0x0190, f02=» P* PMSFMT1 FRMT P FSL & P FCOPY ='SKIFT JOURNAL' 2 P FMEND R P* ` PMSFMT2 FRMT j P FSL ~ P FCOPY ='LINIE NR' P FILLR '.',1 P FMEND P* PMSFMT3 FRMT P FSL P FTEXT ='NY SIDE. '
0x0b5ae8…0b5c7c Dummy {f00=0x0089, f01=0x0190, f02=»P 23 P FMEL 'ZZZZZVZZ9,99+',GTSUM PFMT4END 0 P FMEND @ P* N PMSFMT5 FRMT X P FSL l P FCOPY ='BILAG' x P FMEND P* PMSFMT6 FRMT P FSL P FCOPY ='KONTOKORT' P FMEND P* PMSFMT7 FRMT
0x0b5c7c…0b5e10 Dummy {f00=0x0089, f01=0x0190, f02=»LR X'07',1 P FMEND P* PMSFMT9 FRMT * P FSL > P FCOPY ='OPSTART ' J P FMEND d PMSFMT10 FRMT r P FSL " P FMEL 'TTTTTTTTTTTT9-',GTWBCD2 P FMEND P* PMSFMT11 FRMT P FSL P FCOPY ='OPRET LEV. '
0x0b5e10…0b5fa4 Dummy {f00=0x0089, f01=0x4028, f02=»ECK' ~ P FMEND P* @ $ PMSFMT9 FRMT * P FSL > P FCOPY ='OPSTART ' J P FMEND d PMSFMT10 FRMT r P FSL " P FMEL 'TTTTTTTTTTTT9-',GTWBCD2 P FMEND P* PMSFMT11 FRMT P FSL P FCOPY ='OPRET LEV. '
0x0b5fa4…0b6138 Dummy {f00=0x0089, f01=0x2008, f02=» * ERRFMT FRMT FSL , " FMEL 'ZZ9B',GTWBCD1 FILE NR. 8 FCOPY ERRTXT ^ " FMEL 'BZZ9',GTWBCD2 ERRORNR. t FCOPY =X'07' FMEND @ 8SPKTAB2 KTAB BSPKY1,CANKY1,NOKEY,MACKY1,NOKEY,EORKY1, C D ? FT
0x0b6138…0b62cc Dummy {f00=0x0089, f01=0x416e, f02=» 999O " ; & , & : ( H T & d $ ANTAL RECORDS KOPIERET:N r $ 9999 " $ ( & j
0x0b62cc…0b6460 Dummy {f00=0x0089, f01=0x2008, f02=» LEVTXT ( GTLINE ( GTLOKSPG ( GTLPFLG ( GTMASTFL ( GTMSK ( GTNWFLG ( GTPAGE ( GTPRTDAT ( GTPRTFRA ( GTPRTTIL ( GTPSELIN ( GTRECNR GTREGDEX ( GTREGF ("GTREGFLG ( GTREGNR ( GTRETUR ( GTRKMFLG ( GTRKONV {( GTSCHHGH ( GTSCHL
0x0b6460…0b65f4 (0, 231) Opaque[0x194]
0x0b65f4…0b6788 # DirEnt {nam=»SUBAPL«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1138, f03=0x0000}
0x0b65f4…0b6788 IdxSect {
0x0b65f4…0b6788 f00 = 0x0089 // 0xb65f4 @0x0
0x0b65f4…0b6788 f01 = 0x0018 // 0xb65f6 @0x2
0x0b65f4…0b6788 gno = [ // 0xb65f8 @0x4
0x0b65f4…0b6788 [0x00]: C0x0089.0x3.0
0x0b65f4…0b6788 [0x01]: C0x008a.0x0.0
0x0b65f4…0b6788 [0x02]: C0x008a.0x1.0
0x0b65f4…0b6788 [0x03]: C0x008a.0x2.0
0x0b65f4…0b6788 [0x04]: C0x008a.0x3.0
0x0b65f4…0b6788 [0x05]: C0x008b.0x0.0
0x0b65f4…0b6788 [0x06]: C0x008b.0x1.0
0x0b65f4…0b6788 [0x07]: C0x008b.0x2.0
0x0b65f4…0b6788 [0x08]: C0x008b.0x3.0
0x0b65f4…0b6788 [0x09]: C0x008c.0x0.0
0x0b65f4…0b6788 [0x0a]: C0x008c.0x1.0
0x0b65f4…0b6788 [0x0b]: C0x008c.0x2.0
0x0b65f4…0b6788 ]
0x0b65f4…0b6788 }
0x0b6788…0b691c Dummy {f00=0x0089, f01=0x0190, f02=» P IDENT SUBAPL 03.01.XXX.1 P DDUM KMD08 & P PDIV : P ENTRY SPAPPL H P ENTRY SPCHK1 ^ P ENTRY SPCHK2 t P ENTRY SPCHK3 P ENTRY SPCHK4 P ENTRY SPCHK5 P ENTRY SPCHK6 P ENTRY SPCHK7 P ENTRY SPTCHK
0x0b691c…0b6ab0 Dummy {f00=0x0089, f01=0x0190, f02=»H P EXT KTPLAN P EXT TXTRD P EXT LEVRD 0 P EXT REPL00 B P INCLUDE EQUATE V P* n PSPCHK1 PROC x P******************** P* P* SPCHK1 - CDVCHECK P* < P* PERFORMS CHECKDIGIT CHECK ON
0x0b6ab0…0b6c44 Dummy {f00=0x0089, f01=0x0190, f02=»CBIN1 INITIAL ERRORCODE $ P MOVE GSWBIN1,SPBINW1 GET LENGTH 8 P CBL GSWBIN1,CBIN3,CHK1RET FOR LENGTH < 3, NO CHECK H 2 P CBL GSWBIN1,CBIN7,CHK1ER IF 2<LENGTH<7, ERROR 8 P CBE GSWBIN1,CBIN7,CHK10 IF LENGTH = 7, OK (CIRNR) < P CBNE GSWBIN1,CBIN
0x0b6c44…0b6dd8 Dummy {f00=0x0089, f01=0x0190, f02=»T GET ITEM TO BE CHECKED | P TBT GTADMFLG,CHK11 P CBL GSWBCD6,=D'1',CHK1ER < P ^ * PCHK11 MOVE GSWBCD3,=D'1' BLANK GSWBCD3 f < P COPY GSWBCD3,CBIN5,CBIN1,GSWBCD6,GSWBIN2 GET NEXT DIGIT 6 P MUL GSWBCD3,WEIGTH1(GSWBIN2) MULTIPLY WITH WEIGTH
0x0b6dd8…0b6f6c Dummy {f00=0x0089, f01=0x0190, f02=» h 0 P CBNE GSWBIN1,CBIN0,CHK11 BACK TO NEXT DIGIT P MOVE GSWBCD4,GSWBCD5 < $ P DIV GSWBCD5,=D'11' DIVIDE BY 11 Z ( P MUL GSWBCD5,=D'11' MULTIPLY WITH 11 . P SUB GSWBCD4,GSWBCD5 GET REMAINDER MOD 11 : P CBL GSWBCD4,=D'1',CHK1RET IF REMAINDER
0x0b6f6c…0b7100 Dummy {f00=0x0089, f01=0x0190, f02=»ET P PEND P EJECT PSPCHK2 PROC & P******************** : P* V " P* SPCHK2 - CHECK DATE ` P* 0 P* CHECKS 0<DAY<32 AND 0<MONTH<13 * P* DATE IS IN THE FORM DDMMYY $ P* INPUT FIELD
0x0b7100…0b7294 (0, 232) Dummy {f00=0x008a, f01=0x0190, f02=»OVE SPBINW3,CBIN1 INITIAL ERRORCODE & P MOVE GSWBCD3,=D'1' BLANK GSWBCD3 , " P MOVE GSWBCD6,SPINPUT GET DATE V . P MOVE GSWBIN2,CBIN10 SET POINTER TO MONTH | 8 P COPY GSWBCD3,CBIN4,CBIN2,GSWBCD6,GSWBIN2 GET MONTH ( P CBG GSWBCD3,=D'12',CH29 CHECK
0x0b7294…0b7428 Dummy {f00=0x008a, f01=0x0190, f02=»GET DAY f P CBG GSWBCD3,=D'31',CH29 P CBL GSWBCD3,=D'1',CH29 0 P B CH2RET P PCH29 b & P MOVE SPBINW3,CBIN3 INDICATE ERROR n & P MOVE SPBINW4,CBIN7 SET ERRORCODE PCH2RET P MOVE GSWBCD3,=X'FF' P RET P PEND P E
0x0b7428…0b75bc Dummy {f00=0x008a, f01=0x0190, f02=»ONTH<13 z ( P* MONTH IS IN THE FORM MM " P* INPUT FIELD: SPINPUT < P* b 8 P* IF ERROR, ERRORCODE 7 IS MOVED TO SPBINW4 l P* P****************** $ P MOVE GSWBCD3,SPINPUT GET MONTH ( P CBG GSWBCD3,=D'12',
0x0b75bc…0b7750 Dummy {f00=0x008a, f01=0x0190, f02=»SPBINW3,CBIN3 INDICATE ERROR & P MOVE SPBINW4,CBIN7 SET ERRORCODE $ PCH3RET N P RET P PEND h P EJECT v PSPCHK4 PROC P******************** P* < P* SPCHK4 - CHANGE SIGN ON VALUE, IF KREDIT KEY P* P
0x0b7750…0b78e4 Dummy {f00=0x008a, f01=0x0190, f02=» MUL GSWBCD7,=D'-1' P MOVE SPINPUT,GSWBCD7 ( P MOVE SPBINW2,CBIN3 SIMULATE EOI-KEY : PCH4RET f P RET t P PEND P EJECT PSPCHK5 PROC P******************** P* * P* SPCHK5 - CHECK LINE NUMBER P*
0x0b78e4…0b7a78 Dummy {f00=0x008a, f01=0x0190, f02=»ECIAL FUNCTIONS ? t P CBE GSWBCD3,=D'91',CH510 P MUL GSWBCD3,=D'2' < . P MOVE GSWBCD4,CVOUTOP GET NO OF LINES/PAGE V P SUB GSWBCD4,GSWBCD3 , P CBL GSWBCD4,=D'0',CH5ERR LINE NEGATIVE? P MOVE GSWBIN1,GSWBCD4 P CBNL GSWBIN1,CVOUTOP,
0x0b7a78…0b7c0c Dummy {f00=0x008a, f01=0x0190, f02=» PCH510 P MOVE GSWBIN1,GSWBCD3 P RET 4 P PEND @ P EJECT N PSPCHK6 PROC P******************** p P* B P* SPCHK6 - CHECK THE SPCHK6 - CHECKDIGIT IN LINE NO, P* KONTOKORT P* P******
0x0b7c0c…0b7da0 Dummy {f00=0x008a, f01=0x0190, f02=» CHECK IF ZERO t " P CBE GSWBCD3,TTKTCHK,CH6RET OK P MOVE SPBINW3,CBIN3 ERROR < P MOVE SPBINW4,CBIN13 ^ PCH6RET z P RET P PEND P P P P PSPCHK7 PROC P********** P* ( P* SPCHK7- CDVCHECK
0x0b7da0…0b7f34 (0, 233) Dummy {f00=0x008a, f01=0x0190, f02=»PINPUT ^ 8 P* IF ERROR, ERRORCODE 6 IS MOVED TO SPBINW4 $ P* FIELD MUST BE 7 OR 10 LONG J B P* IF FIELD IS 8 LONG, IT IS ASSUMED TO BE A PHONE NUMBER, r : P* AND IS THEN CHANGED FROM 0XXXXXXX TO 5XXXXXXXCC P* P********
0x0b7f34…0b80c8 Dummy {f00=0x008a, f01=0x0190, f02=»HONE NO ` PCHK705 $ P PERF SPCHK1 ELSE NORMAL CDVCHK P B CHK7RET F P* X PCHK710 b P MOVE SPBINW4,CBIN0 p ( P MOVE GSWBCD6,SPINPUT +FFFFF0XXXXXXX ( P TBT C539FLG,CHK720 JUMP IF TINGLEV P MOVE GSWBCD3,=D'5' +FFFF5 , P C
0x0b80c8…0b825c Dummy {f00=0x008a, f01=0x0190, f02=»E SPBINW1,CBIN9 SET LENGTH & P MOVE SPBINW5,SPBINW2 SAVE END KEY " $ P MOVE SPBINW2,CBIN3 SIMULATE KEY L $ P MOVE SPBINW3,=W'105' APPL VALUE t ( P PERF SPAPPL CALCULATE CONTROL DIGIT , P MOVE SPBINW2,SPBINW5 RESTORE KEY VALUE 2 P CBNE GSWBCD5,=D
0x0b825c…0b83f0 Dummy {f00=0x008a, f01=0x0190, f02=»GIT j . P ADD GSWBCD6,GSWBCD5 INSERT CONTROL DIGIT $ P MOVE SPBINW1,CBIN10 SET LENGTH > P MOVE SPINPUT,GSWBCD6 f PCHK7RET P RET P PEND P EJECT PSPTCHK PROC P******************** P* . P* SPTCHK
0x0b83f0…0b8584 Dummy {f00=0x008a, f01=0x0190, f02=»3 GET APPL-VALUE P CBE SPBINW3,=W'84',TCHK84 $ P SUB SPBINW3,CBIN16 ADJUST INDEX : P IB SPBINW3, C b " P TCHK17,TCHK18,TCHK19,TCHK20 z P SUB SPBINW3,=W'61' +16-77 P IB SPBINW3,TCHK78,TCHK79 P SUB SPBINW3,=W'38' 116-119 0 P
0x0b8584…0b8718 Dummy {f00=0x008a, f01=0x0190, f02=»17 P TBT BCPR,TCHK00 P B TCHK99 " P* 4 PTCHK18 > PTCHK19 L PTCHK20 Z P TBF BCPR,TCHK00 h P B TCHK99 P* PTCHK78 P MOVE SPBINW3,TTCNTNR P SUB SPBINW3,=W'100' : P CBG SPBINW3,CTR12(TTASKNR,CBIN2),TC
0x0b8718…0b88ac Dummy {f00=0x008a, f01=0x0190, f02=» : P CBG SPBINW3,CTR12(TTASKNR,CBIN2),TCHK99 CORRECT FIELD P B TCHK00 CONTINUE TAB B P* ` PTCHK84 j P TBF GTTRSEL,TCHK00 x P B TCHK99 P* PTCHK116 P MOVE SPBINW3,GTTXTTKO : P IB SPBINW3,TCHK99,TCHK00,TCHK00,TCHK99,TC
0x0b88ac…0b8a40 Dummy {f00=0x008a, f01=0x0190, f02=»TCHK99,TCHK99 h P B TCHK99 P* ( PTCHK118 2 P MOVE SPBINW3,GTTXTTKO B : P IB SPBINW3,TCHK99,TCHK99,TCHK99,TCHK00,TCHK00,TCHK00 ` P B TCHK99 P* PTCHK119 P MOVE SPBINW3,GTTXTTKO : P IB SPBINW3,TCHK99,TCHK99,TCHK99
0x0b8a40…0b8bd4 (0, 234) Dummy {f00=0x008a, f01=0x0190, f02=»CT PSPAPPL PROC P******************** P* : L P* SPAPPL - PROCEDURE ACTIVATED BY SCREEN PACKAGE IF APPL-VALUE D > P* IS NOT ZERO, WHICH IS THE CASE FOR ALL FIELDS. P* @ P* APPL-VALUE IS EQUAL TO FIELD-
0x0b8bd4…0b8d68 Dummy {f00=0x008a, f01=0x018e, f02=» ROUTINE h P* P******************** P* 6 . P* SPBINW3 IS CURRENT APPL NUMBER @ P ART - RETURN r P APK - PACK FIELD " P APF - PACK FIELD WITH SIGN " P AA01 - TEST FOR FIELD TO BE P ---- - AUTODUPPED
0x0b8d68…0b8efc Dummy {f00=0x008a, f01=0x0190, f02=» P AA06 - TEST FIELD 6 P AA11 - TEST VALOERDATE " P AA17 - TEST FORFALDSAAR D " P AA65 - IF AA05, AA06 THERE f P ---- - MIGHT BE A CHOICE P ---- - OF NEW TRANSTYPE P A64 - TEST FIELD 64 P A65 - TEST FIELD 65
0x0b8efc…0b9090 Dummy {f00=0x008a, f01=0x0190, f02=» - - - (COPY) " P A80-A87 - CHECK OF CONTROL P ---- - INFORMATION FOR > P ---- - TRANSTYPES ` P A88 - AUTODUP BKO, TR 4 | P A89 - STORE IN FIELD 6 P A90 - SPECIAL SLUT-FIELD P A91 - ENTER TO SLUT-KEY P
0x0b9090…0b9224 Dummy {f00=0x008a, f01=0x018e, f02=»SET TRANS 12 L P A105 - CTRL.DIGIT CALC. P A107 - AS A102 d P A108 - SPG -REGKONTONR ~ P A109 - SPG-CPR/CIR/NR P A110 - SPG-BELOB P A111 - SPG-OTHER FIELD P A115 RE
0x0b9224…0b93b8 Dummy {f00=0x008a, f01=0x0190, f02=» P* PAA01 . P CBNE SPBINW1,CBIN0,AAA IF LENGTH IS ZERO > P MOVE GSWBIN4,CFLTDEX(SPBINW3) GET INDEX VALUE TO GSWBIN4 L , P MOVE GTUSED(GSWBIN4),CBIN0 DELETE FIELD P B ART P* PAAA IB SPBINW3, C 8 P ART,ART,ART,ART,A05,A0
0x0b93b8…0b954c Dummy {f00=0x008a, f01=0x0190, f02=»APK,APK, FIELDS 20-29 C n > P APK,APK,APK,APF,APK,APK,APK,APK,APK,APF, FIELDS 30-39 C > P APK,APK,APK,APK,APK,APK,APK,APF,APK,APK, FIELDS 40-49 C b > P APK,APK,APF,APF,A54,A57,A57,A57,A57,A57, FIELDS 50-59 C > P A57,A57,A57,APK,A64,A65,APK,ART,
0x0b954c…0b96e0 Dummy {f00=0x008a, f01=0x0190, f02=»A89, FIELDS 80-89 C j > P A90,A91,A92,A93,A94,ART,ART,ART,ART,ART, FIELDS 90,99 C 0 P A100,A101,A102,A103,A104, FIELDS 100,104 C ^ 0 P A105,ART,A107,A108,A109, FIELDS 105,109 C , P A110,A111,ART,ART,ART, FIELS 110,114 C 6 P A115,A116,A117,A
0x0b96e0…0b9874 (0, 235) Dummy {f00=0x008a, f01=0x0190, f02=»******** ( PA05 CHECK REGISTRERINGSKONTONUMMER $ P MOVE GSWBIN1,SPBINW1 GET LENGTH < ( P CBE GSWBIN1,CBIN4,A059 LENGTH = 4? d 6 P CBL GSWBIN1,CBIN3,A065 TRANSTYPE HANDLING IN A065 * P CMP GSWBIN1,CBIN10 LENGTH MUST BE 10 P BNE A058
0x0b9874…0b9a08 Dummy {f00=0x008a, f01=0x0190, f02=»51,A053,A053,A052,A0570,A0575 PA051 & P B APK CPR NOT NECESSARY 2 PA052 REMIT. NOT ALLOWED R P IB GTREGDEX, C t 4 P A0520,A0520,A0520,A0520,A0520, TR 1,2,3,4,5 C 4 P A0520,A0520,A0525,A0525,A0520, TR 6,7,8,9,10 C 6 P A0520,A052
0x0b9a08…0b9b9c Dummy {f00=0x008a, f01=0x0190, f02=»A053 CPR NECESSARY P IB GTREGDEX, C . P A054,A055,A054,A054,A055, TR 1,2,3,4,5 C 4 0 P A054,A055,A055,A054,A054, TR 6,7,8,9,10 C f 0 P A054,A055,A054,A055,A054 TR 12,18,19,28,29 PA054 P B APK PA055 " P CBL GSWBIN1,CBIN3,A
0x0b9b9c…0b9d30 Dummy {f00=0x008a, f01=0x018e, f02=»7: KNT.NO. NOT ALLOWED P MOVE SPBINW4,=W'23' ! P B ART ! : P* ! H * PA0575 8:KNT.NO. NOT ALLOWED IN SUPL ! R $ P CBE GTREGDEX,CBIN10,A0577 TR 10 ! P TBT TTSUPFLG,A0577 SUPL ! P B APK OK ! PA0577 NOT OK ! P MOVE SPBINW4,CBIN22 !
0x0b9d30…0b9ec4 Dummy {f00=0x008a, f01=0x0190, f02=» ! b P B APK " P* " PA058 " & P MOVE SPBINW4,CBIN3 SET ERRORCODE " , P B ART " V P********** " d PA06 CHECK CPR/CIR NUMBER " v $ P MOVE GSWBIN1,SPBINW1 GET LENGTH " 6 P CBL GSWBIN1,CBIN3,A065 TRANSTYPE HANDLING IN A065 " & P SET BCPR SET
0x0b9ec4…0ba058 Dummy {f00=0x008a, f01=0x0190, f02=»,=D'3900000000',A062 " P CLEAR BLEV CPR. # P B A062 # 4 PA061 # D * P CLEAR BCPR CLEAR CPR-SWITCH (CIR-NO) # P PA062 # ~ $ P TBT GTBDTFLG,A0625 BUNDT REMIT # $ P TBT GTSTRFLG,A0621 STRAKS REMIT # P B APK NOT REMIT # P* # PA0621 # 2
0x0ba058…0ba1ec Dummy {f00=0x008a, f01=0x0190, f02=»ARNFL SET WARNING # P B APK $ PA0622 $ ( , P CBG GTLEVBFO,=D'4',A0629 ONLY 0-4 VALID $ 6 P B A063 $ f P $ v P* $ ~ PA0625 BUNDT REMIT $ $ P MOVE GTLEVNR,GSWBCD1 SET LEVNR $ P PERF LEVRD $ P BNOK A0629 $ P CBL GTLEVBFO,=D'1',
0x0ba1ec…0ba380 Dummy {f00=0x008a, f01=0x0190, f02=» APK $ PA0629 WRONG BETALINGSFORM % P MOVE SPBINW4,CBIN11 ERROR % 0 P B ART % R P********** % ` $ PA54 FIELD 54 HAS BEEN ENTERED % r . P* THE FIELD WITH LENGTH N (N = 1,2,...,10) % , P* HAS TO BE LEFT-JUSTIFIED AND EXPANDED % P* TO THE LEN
0x0ba380…0ba514 (0, 236) Dummy {f00=0x008b, f01=0x0190, f02=»INW1,GSWBIN1,GSWSTR20,CBIN0 % ~ & P MOVE SPBINW1,CBIN10 ADJUST LENGTH & $ P B APK & N P********** & PA57 & n P B APF & z P****** & PA065 & 6 P MOVE SPBINW1,CBIN0 SET LENGTH TO ZERO (FUNCTION) & , P MOVE GSWBCD3,SPINPUT GET NEW TRANSTYPE &
0x0ba514…0ba6a8 Dummy {f00=0x008b, f01=0x0190, f02=» CHECK FOR VALID TRANSTYPE & P* ' & P* ADJUST REGDEX ' 0 P* ' P P MOVE GSWBIN1,CBIN1 ' Z 8 P* TEST FOR CORRECT TRANSACTIONS IN THIS CONNECTION ' v P TBT GTKASSE,A0672 ' 6 P CBG GSWBCD3,=D'30',A067 CORRECT FOR NOT IN KASSE ' P B
0x0ba6a8…0ba83c Dummy {f00=0x008b, f01=0x0190, f02=»,CREGTAB(GSWBIN1,CBIN1),A068 SEARCH REGNR ' & P ADD GSWBIN1,CBIN1 ADD 1 TO INDEX ( 2 : P CBNE CREGTAB(GSWBIN1,CBIN1),=D'-1',A067 END OF TABLE? ( P* ( PA0675 ( * P MOVE SPBINW4,CBIN9 INVALID TRANSTYPE ( P B ART ( PA068 ( " P TAKE CARE O
0x0ba83c…0ba9d0 Dummy {f00=0x008b, f01=0x0190, f02=»W2,CBIN3,A0680 HANDLING OF DEBIT KEY ( . P MOVE SPBINW4,CBIN4 HANDLING OF WRONG KEY ) , P B ART ) ^ PA0680 ) l $ P TBT GTCYFLG,A0685 CYKEL TABEL ? ) z $ P CLEAR GTBDTFLG NO, CLEAR FLAGS ) P CLEAR GTSTRFLG ) P CBL GSWBCD3,=D'28',A0681 ) P SET
0x0ba9d0…0bab64 Dummy {f00=0x008b, f01=0x0190, f02=» ) PA0685 IN CYKEL/STABEL * & P TBF GTBDTFLG,A0686 TRANS 28,29 ? * ( 4 P CBL GSWBCD3,=D'28',A0675 IF NOT, INVALID TRANS * R P B A0689 VALID TRANS * PA0686 * & P TBT GTSTRFLG,A0687 TRANS 18, 19 ? * P NO, ONLY TRANS 1-12 * 4 P CBG GSWBC
0x0bab64…0bacf8 Dummy {f00=0x008b, f01=0x0190, f02=»TR 1-12 INVALID * v , P CBL GSWBCD3,=D'28',A0689 TR 18,19 VALID + P B A0675 TR 28,29 INVALID + H PA0689 + j * P CBE SPBINW2,CBIN18,A06KRE KREDIT KEY + x P B A06DEB + PA06KRE + P PERF SETKRE + P B A066 + PA06DEB + P PERF SETDEB +
0x0bacf8…0bae8c Dummy {f00=0x008b, f01=0x0190, f02=»ART NEW TRANS + P* , 6 P MOVE SPBINW2,=W'36' SIMULATE TRANSACTION SELECTED , P B ART , Z P********** , h PA07 BKO FIELD , z P INSERT TEXT IN TT07TXT , P CLEAR TTASKAT , P MOVE GSWBCD3,SPINPUT , P CBNE GSWBCD3,=D'51',A070 ,
0x0bae8c…0bb020 Dummy {f00=0x008b, f01=0x018e, f02=» PA0705 - , P MOVE GSWBIN1,CBIN0 GET LENGTH OF STRING - . P COPY TT07TXT,CBIN0,CBIN5,CTTXT07,GSWBIN1 - B P MOVE GSWBCD3,TT07TXT - t P MOVE GSWBIN2,GSWBCD3 - P MOVE TT07TXT,CBLANKS - , P MOVE GSWBIN1,CBIN5 FIRST CHAR, POINTER - P MOVE GSWB
0x0bb020…0bb1b4 (0, 237) Dummy {f00=0x008b, f01=0x0190, f02=» - | PA0708 . P ADD GSWBIN1,CBIN7 . P CBG GSWBIN1,GSWBIN2,A075 . 0 6 P MATCH CTTXT07,GSWBIN1,CBIN2,SPINPUT,GSWBIN3,CBIN2 . R P BNOK A0708 . P* NEXT 5 CHARS CONTAIN TEXT . P ADD GSWBIN1,CBIN2 . . P COPY TT07TXT,CBIN0,CBIN5,CTTXT07,GSWBIN1
0x0bb1b4…0bb348 Dummy {f00=0x008b, f01=0x0190, f02=»WSTR2,CBLANKS . 6 P COPY GSWSTR2,CBIN1,CBIN1,CTTXT07,GSWBIN1 GET TYPE / P MOVE GSWBCD3,GSWSTR2 / P P CBL GSWBCD3,=D'1',A077 OK / n ( P CBL GTREGF(CBIN2),=D'10000000',A072 / . P CBE GSWBCD3,=D'1',A077 CPR - BKO ALLOWED / P B A076 / PA072 / .
0x0bb348…0bb4dc Dummy {f00=0x008b, f01=0x0190, f02=»11 / ~ P B ART 0 PA077 0 P B APK 0 $ P********** 0 2 $ PA11 CHECK VAL DATE NOT GREATER 0 D P THAN POST DATE 0 l & P CBE GTREGDEX,CBIN3,A0110 TRANS 3 0 & P CBE GTREGDEX,CBIN4,A0110 TRANS 4 0 P TBF TTCY1FLG,A01101 0 P TBF GTBDTFLG,A011
0x0bb4dc…0bb670 Dummy {f00=0x008b, f01=0x0190, f02=» VALOERDATE 0 | P MOVE GSWBCD6,SPINPUT 1 P PERF CHDATO 1 2 P MOVE GSWBCD1,GSWBCD7 1 F " P* GET AND CHANGE POSTDATE 1 d P MOVE GSWBCD6,GTDATO 1 P PERF CHDATO 1 P* COMPARE 1 P CMP GSWBCD1,GSWBCD7 1 P BNG APK 1 P MOVE SPBINW
0x0bb670…0bb804 Dummy {f00=0x008b, f01=0x018e, f02=»E GSWBCD6,SPINPUT GET FAAR 1 2 P CBL GSWBCD6,=D'70',A17ERR LESS THAN 70: ERROR 2 " & P MOVE GSWBCD1,GTDATO GET POSTDATO 2 X P MOVE GSWBCD3,=D'2' 2 6 P COPY GSWBCD3,CBIN4,CBIN2,GSWBCD1,CBIN12 GET YEAR 2 P ADD GSWBCD3,=D'2' ADD 2 2 . P CBG GSWBCD6,GSW
0x0bb804…0bb998 Dummy {f00=0x008b, f01=0x0190, f02=» PA64 3 4 P MOVE GSWBCD3,SPINPUT GET 'PRISREGULERINGSKODE' 3 P CBG GSWBCD3,=D'5',A649 3 H P CBL GSWBCD3,=D'0',A649 3 h $ P FIELD 64 HAS BEEN ENTERED AND 3 6 P MOVE GSSWITCH(CBIN12),CBIN1 SHOULD BE GTAUTODPPED 3 P B APK 3 PA649 3 P MOV
0x0bb998…0bbb2c Dummy {f00=0x008b, f01=0x0190, f02=» GSWBCD4,=D'3999',A659 3 P CBL GSWBCD4,=D'1000',A659 4 P B APK 4 @ PA659 4 N P MOVE SPBINW4,CBIN11 4 Z P B ART 4 v P********** 4 PA76 COUNTER NO, TRANS 12 4 P CMP SPBINW1,CBIN3 4 P BL A065 TRANSTYPE HANDLING 4 $ P MOVE GSWBCD3,SPIN
0x0bbb2c…0bbcc0 Dummy {f00=0x008b, f01=0x0190, f02=»12(TTASKNR,CBIN2),A76NOK 4 , P CBL GSWBCD3,=D'1',A76NOK MIN COUNTER NO 5 & P ADD GSWBIN1,CTR12(TTASKNR,CBIN1) 5 P & P CBL CTR12NR(GSWBIN1),=D'1',A76NOK 5 z P MUST BE > 0 5 P B ART TO WRITE ON SCREEN 5 PA76NOK 5 P MOVE SPBINW4,CBIN18 5 P B
0x0bbcc0…0bbe54 (0, 238) Dummy {f00=0x008b, f01=0x018e, f02=»BT BCPR,A775 5 ( P MOVE SPINPUT,=X'35310000' 51 IF CIR 6 P B A07 6 @ PA775 6 N ( P MOVE SPINPUT,=X'35320000' 52 IF CPR 6 Z P B A07 6 P********** 6 PA78 INSERT ACCOUNT NO 6 P 11-15 6 ( P MOVE SPBINW3,CBIN5 SIMULATE FIELD 5 6 P B APK
0x0bbe54…0bbfe8 Dummy {f00=0x008b, f01=0x0190, f02=» P SUB GSWBIN1,=W'100' 7 & P ADD GSWBIN1,CTR12(TTASKNR,CBIN1) 7 " P MOVE SPINPUT,CTR12NR(GSWBIN1) 7 J P MOVE SPBINW1,CBIN10 LENGTH 7 p P B APK 7 P********** 7 " PA80 CHECK HOVEDBOG, KONTONR 7 P MOVE SPBINW3,CBIN5 FIELD 5 7 , P MOVE SPBI
0x0bbfe8…0bc17c Dummy {f00=0x008b, f01=0x0190, f02=»NW4,CBIN3 ERROR LENGTH 7 P B ART 8 PA801 8 , P MOVE GSWBCD1,SPINPUT 8 8 P PERF KTPLAN,GSWBCD1,GTKTTYP 8 V P MOVE GSWBIN1,GTKTTYP 8 z . P CMP GSWBIN1,CBIN7 7: KNT.NO. NOT ALLOWED 8 P BE A0570 8 P CBNE GSWBIN1,CBIN8,A804 8 P TBF TTSUPFL
0x0bc17c…0bc310 Dummy {f00=0x008b, f01=0x0190, f02=» B APK OK 8 PA805 CHECK FUNCTION KEYS 9 P MOVE SPBINW1,CBIN0 9 4 P CMP SPBINW2,=W'30' ADM KEY 9 P P BE ART 9 t " P CMP SPBINW2,=W'31' CYCLE KEY 9 P BE ART 9 $ P MOVE SPBINW4,CBIN4 INVALID KEY 9 P B ART 9 P********** 9 $ PA81
0x0bc310…0bc4a4 Dummy {f00=0x008b, f01=0x0190, f02=»N2,A811 CHECK LENGTH 9 $ P MOVE SPBINW4,CBIN3 ERROR LENGTH : P B ART : D PA811 CPR OR CIR ? : R P SET BCPR SET CPR NO : n P MOVE GSWBCD1,SPINPUT : " P CBL GSWBCD1,=D'10000000',A814 : P SET BLEV : $ P CBG GSWBCD1,=D'3200000000',A812 : P
0x0bc4a4…0bc638 Dummy {f00=0x008b, f01=0x0190, f02=»VALID KEY : P B APK OK ; P********** ; $ " PA82 CHECK HOVEDBOG, YD.MODT. ; 6 " P MOVE SPBINW3,CBIN21 FIELD 21 ; , P MOVE SPBINW5,CBIN6 MIGHT BE TRANSTYPE 6 ; PA821 ; * P CBNE SPBINW2,CBIN3,A822 IF ENTER KEY, ; , P MOVE SPBINW2,CBIN17 SIMULAT
0x0bc638…0bc7cc Dummy {f00=0x008b, f01=0x0190, f02=» CHECK DEBITOR, DEBITOR NR ; P MOVE SPBINW3,CBIN6 FIELD 6 < $ & P CBL SPBINW1,CBIN3,A805 FUNCTION? < H P CBL SPBINW1,CBIN7,A833 < r , P MOVE SPBINW5,CBIN4 MIGHT BE TRANSTYPE 4 < P SET BCPR SET CPR < P MOVE GSWBCD1,SPINPUT < " P CBL GSWBCD1,=
0x0bc7cc…0bc960 Dummy {f00=0x008b, f01=0x0190, f02=» BCPR SET CIR < PA832 = P PERF SELTR = " P BNOK ART = 6 P MOVE SPBINW2,CBIN3 = H P B APK = d PA833 = r $ P MOVE SPBINW4,CBIN3 ERROR LENGTH = ~ P B ART = P********** = PA84 CHECK DEBITOR, BKO = P MOVE SPBINW3,CBIN7 FIELD 7 = ,
0x0bc960…0bcaf4 (0, 239) Dummy {f00=0x008b, f01=0x0190, f02=»SPINPUT = P CBE GSWBCD1,=D'+51',A845 > P CBE GSWBCD1,=D'+52',A845 > 2 PA843 > T P PERF SELTR > ` P BNOK ART > t P B A07 > PA845 > P MOVE SPBINW5,CBIN4 > P B A843 > P********** > $ PA85 CHECK REMITTERING, KONTONR > P M
0x0bcaf4…0bcc88 Dummy {f00=0x008b, f01=0x0190, f02=»CBIN3 ERROR LENGTH > P B ART ? PA850 ? ( 0 P CMP SPBINW2,CBIN3 ONLY ENTER-KEY ALLOWED ? 4 P BNE A855 ? h P MOVE GSWBCD1,SPINPUT ? z P PERF KTPLAN,GSWBCD1,GTKTTYP ? P MOVE GSWBIN1,GTKTTYP ? 0 P CBE GSWBIN1,CBIN6,A853 6: REMIT NOT ALLOWED ?
0x0bcc88…0bce1c Dummy {f00=0x008b, f01=0x0190, f02=»77 8:KNT.NO. NOT ALLOWED IN SUPL ? PA853 @ ( * P MOVE SPBINW4,CBIN20 REMIT NOT ALLOWED @ 4 P B ART @ b PA854 @ p P B APK @ | PA855 @ $ P MOVE SPBINW4,CBIN4 INVALID KEY @ P B ART @ P********** @ $ PA86 CHECK REMITTERING, LEV.NR. @ P M
0x0bce1c…0bcfb0 Dummy {f00=0x008b, f01=0x0190, f02=»A811 @ $ P MOVE SPBINW4,CBIN3 ERROR LENGTH A P B ART A 4 P********** A B & PA87 CHECK REMITTERING, YD.MODT. A T " P MOVE SPBINW3,CBIN21 FIELD 21 A ~ , P MOVE SPBINW5,CBIN9 MIGHT BE TRANSTYPE 9 A " P B A821 CHECK FOR INVALID KEY A P********** A
0x0bcfb0…0bd144 Dummy {f00=0x008b, f01=0x0190, f02=»SPINPUT,=X'35310000' 51 IF CIR A P B A07 B & PA885 B 4 ( P MOVE SPINPUT,=X'35320000' 52 IF CPR B @ P B A07 B l P********** B z PA89 B ( P MOVE SPBINW3,CBIN6 STORE IN FIELD 6 B P B APK B P********** B PA121 SIMULATE SLUT KEY B P CLE
0x0bd144…0bd2d8 Dummy {f00=0x008b, f01=0x0190, f02=»********** B PA122 ENTER TO SLUT KEY C P CMP SPBINW2,CBIN3 C 4 P BNE ART C N P MOVE SPBINW2,CBIN17 C ^ P B ART C | P********** C PA90 C P SET TFELT90 C P MOVE GTLEVTXT,CBLANKS C P MOVE GTLEVNVN,CBLANKS C P MOVE GTLEVADR
0x0bd2d8…0bd46c Dummy {f00=0x008b, f01=0x0190, f02=»N0 C h P B ART D P*** D PA91 D $ P SET TFELT91 D 0 P PERF SPACES D D . P XCOPY GTLEVNVN,CBIN0,CBIN22,SPINPUT,CBIN0 D X P B ART D P*** D PA92 D P SET TFELT92 D P PERF SPACES D . P XCOPY GTLEVNVN,CBIN22,CBIN8,SPINPUT,CBIN0 D .
0x0bd46c…0bd600 Dummy {f00=0x008b, f01=0x0190, f02=» GTLEVADR,CBIN14,CBIN18,SPINPUT,CBIN0 D . P XCOPY GTLEVBY,CBIN0,CBIN4,SPINPUT,CBIN18 E . P B ART E ` P*** E n PA94 E z P SET TFELT94 E P PERF SPACES E . P XCOPY GTLEVBY,CBIN4,CBIN16,SPINPUT,CBIN0 E . P XCOPY GTLEVPDI,CBIN0,CBIN6,SPINPUT,CBIN
0x0bd600…0bd794 (0, 240) Dummy {f00=0x008c, f01=0x0190, f02=»GSWBIN6,GSWBCD1 E & P CBL GSWBIN6,CBIN1,A1009 TOO SMALL F 4 P CBG GSWBIN6,CTR12(TTASKNR,CBIN2),A1009 TOO HIGH F B & P ADD GSWBIN6,CTR12(TTASKNR,CBIN1) F z P B ART F PA1009 F P MOVE SPBINW4,CBIN11 F P B ART F P********** F PA101 CHECK
0x0bd794…0bd928 Dummy {f00=0x008c, f01=0x0190, f02=»TTASKNR,CBIN2),A101ER F ~ $ P ADD GSWBIN6,CBEH(TTASKNR,CBIN1) G P B ART G F PA101ER G T P MOVE SPBINW4,CBIN11 G b P B ART G ~ P********** G PA102 CHECK RELATIVE DAY G P MOVE GSWBCD7,CMASKDAT G , P MOVE GSWBCD5,=D'2' INITIATE REL DAY NO. G
0x0bd928…0bdabc Dummy {f00=0x008c, f01=0x0190, f02=»GET DAY G f , P ADD GSWBCD5,GSWBCD3 ADD DAY TO REL. DAY H , P ADD GSWBIN2,CBIN2 SET POINTER TO MONTH H @ 8 P COPY GSWBCD3,CBIN4,CBIN2,GSWBCD7,GSWBIN2 GET MONTH H p . P SUB GSWBCD3,=D'1' GET WHOLE NO. OF MONTHS H & P MUL GSWBCD3,=D'30' EQUAL IN DAYS H P
0x0bdabc…0bdc50 Dummy {f00=0x008c, f01=0x0190, f02=»ALL H n P ADD GSWBCD5,=D'10' I * P CBG GSWBCD3,GSWBCD5,A102ER TOO LARGE I ( P B A102END I V PA102ER I h & P MOVE SPBINW4,CBIN11 INVALID VALUE I v PA102END I P MOVE GSWBCD3,=X'FF' I P B ART I P********** I PA103 SET BEHL. COUNTERS I
0x0bdc50…0bdde4 Dummy {f00=0x008c, f01=0x0190, f02=» MANY I r P CBE GSWBIN1,CBIN12,A1035 J P ADD GSWBIN1,CBIN1 J 0 & P MOVE CBEH(GSWBIN1,CBIN1),GSWBIN6 J J P SUB GSWBIN1,CBIN1 J t PA1035 J P MOVE GSWBIN6,GSWBCD3 J & P MOVE CBEH(GSWBIN1,CBIN2),GSWBIN6 J P B ART J PA103ER J P MOVE SP
0x0bdde4…0bdf78 Dummy {f00=0x008c, f01=0x0190, f02=»4 J | & P ADD GSWBIN6,CTR12(GSWBIN1,CBIN1) K ( P CBG GSWBIN6,=W'60',A104ER TOO MANY K 4 P CBE GSWBIN1,CBIN12,A1045 K ` P ADD GSWBIN1,CBIN1 K & P MOVE CTR12(GSWBIN1,CBIN1),GSWBIN6 K P SUB GSWBIN1,CBIN1 K PA1045 K P MOVE GSWBIN6,GSWBCD4 K
0x0bdf78…0be10c Dummy {f00=0x008c, f01=0x0190, f02=»05 CONRTL.DIGITCALC. K P MOVE GSWBCD6,SPINPUT L P CBE SPBINW2,CBIN3,CALCD01 L > P CMP SPBINW2,CBIN17 L ` P BNE ART L | PCALCD01 L & P MOVE GSWBIN1,SPBINW1 GET LENGTH L P MOVE GSWBIN2,CBIN13 L P MOVE GSWBCD5,=D'0' L PCALCD02 L
0x0be10c…0be2a0 Dummy {f00=0x008c, f01=0x0190, f02=»-INDEX L n 6 P MUL GSWBCD3,WEIGTH1(GSWBIN2) MULTIPLY BY WEIGHT M * P ADD GSWBCD5,GSWBCD3 ADD TO OLD SUM M H & P SUB GSWBIN1,CBIN1 ADJUST LENGTH M v P CBG GSWBIN1,CBIN0,CALCD02 M P MOVE GSWBCD4,GSWBCD5 M P DIV GSWBCD5,=D'11' M P MUL GSWBCD5
0x0be2a0…0be434 (0, 241) Dummy {f00=0x008c, f01=0x0190, f02=» PCALCD05 N P MOVE GSWBCD5,=D'11' N 2 P SUB GSWBCD5,GSWBCD4 CALCULATE CONTROLDIGIT N 0 P B ART N f P********** N v PA107 POSTDATO=MASKINDATO ? N P MOVE GSWBCD7,SPINPUT N P CBNE GSWBCD7,CMASKDAT,A1075 N P B ART N PA1075 N
0x0be434…0be5c8 Dummy {f00=0x008c, f01=0x0190, f02=»** N PA109 SPG-CPR/CIR/NR O P MOVE GSWBCD6,=D'6' O ( P B ART O D P********** O R PA110 SPG-BELOB O d P MOVE GSWBCD6,=D'8' O | P B ART O P********** O PA111 SPG-OTHER FIELD O P MOVE GSWBCD6,SPINPUT O P CBG GSWBCD6,=D'90',
0x0be5c8…0be75c Dummy {f00=0x008c, f01=0x018e, f02=»15 TEXTNR REMITTERING O P MOVE GSWBCD6,SPINPUT P P MOVE GSWBIN8,GSWBCD6 P > " P PERF TXTRD,GSWBIN8 READ TEXT P P BNOK A1154 P * P CBE GTWBCD1,=D'10',A1154 END OF FILE P & P CBL GTTXTTKO,=D'1',A1154 DELETED P P CLEAR GTSWFLAG P P M
0x0be75c…0be8f0 Dummy {f00=0x008c, f01=0x0190, f02=» " P MOVE GSWBIN1,CFLTDEX(SPBINW3) Q " P MOVE GSSWITCH(GSWBIN1),CBIN1 Q * PA1153 Q P P B APK Q ^ PA1154 Q l & P MOVE SPBINW4,CBIN11 TEXT MISSING Q z P B ART Q P********** Q PA116 Q P MOVE SPBINW3,=W'24' Q P B A1151 Q P********** Q
0x0be8f0…0bea84 Dummy {f00=0x008c, f01=0x0190, f02=»********** Q PA119 R P MOVE SPBINW3,=W'38' R P B A1151 R : P********** R J PA120 R " P* VALUESET: CURRENT YEAR +/- 1 R h " P MOVE GSWBCD1,CMASKDAT DDMMYY R P MOVE GSWBCD2,CMASKDAT R P DIV GSWBCD1,=D'100' DDMM R P MUL GSWBCD1,=D'10
0x0bea84…0bec18 Dummy {f00=0x008c, f01=0x0190, f02=»OVE GSWBCD3,SPINPUT R P CBL GSWBCD3,GSWBCD1,A120E S P CBG GSWBCD3,GSWBCD2,A120E S > P B APK S ` PA120E S n P MOVE SPBINW4,CBIN11 S | P B ART S P********** S PAPK KEEP INFORMATION S $ P TBF TTEORFLG,APK00 FIRST FIELD? S P CBE SPBIN
0x0bec18…0bedac Dummy {f00=0x008c, f01=0x0190, f02=» SPME CHECK FOR ME FIELDS S PAPK00 T " 6 P MOVE GSWBIN1,CFLTDEX(SPBINW3) GET INDEX OF FIELD T 0 4 P MOVE GTUSED(GSWBIN1),SPBINW3 STORE FIELDNUMBER T j P B ART T P********** T PAPF T $ P TBF TTEORFLG,APF00 FIRST FIELD? T P MOVE GTKTTYP,=D'0
0x0bedac…0bef40 Dummy {f00=0x008c, f01=0x0190, f02=» T ~ $ P MOVE GSWBCD6,SPINPUT GET VALUE U P MUL GSWBCD6,GTDBKRS U 0 P MOVE SPINPUT,GSWBCD6 U L PAPF10 U j > P MOVE GSWBIN1,CFLTDEX(SPBINW3) GET INDEX OF CURRENT FIELD U x * P* MULTIPLY WITH -1 IF KREDIT U > P* STORE NEGATIVE FIELD
0x0bef40…0bf0d4 (0, 242) Dummy {f00=0x008c, f01=0x0190, f02=» PART V P MOVE SPBINW3,CBIN1 V P CBL SPBINW4,CBIN3,ARET V , P MOVE SPBINW3,CBIN3 V L PARET V h P RET V t P PEND V P V P V P V P V PSPACES PROC V P MOVE GSWBIN1,=W'35' V P PERF REPL00,SPINPUT,GSWBIN1 V P RET V
0x0bf0d4…0bf268 Dummy {f00=0x008c, f01=0x0190, f02=» V d P* W P******************** W P MOVE GTDBKRC,=C' KRE' W . P MOVE GTDBKRS,=D'-1' W L P MOVE TTDKBCD,=D'1' W h P MOVE TTDKDEX,CBIN1 W P RET W P PEND W P* W PSETDEB PROC W P******************** W P* W . P*
0x0bf268…0bf3fc Dummy {f00=0x008c, f01=0x0190, f02=» MOVE TTDKBCD,=D'2' W P MOVE TTDKDEX,CBIN2 X P RET X 8 P PEND X D P EJECT X R PSELTR PROC X ` P******************** X r P* X > P* SELTR - PROCEDURE TO SEE IF TRANSTYPE HAS BEEN X P* SELECTED. X 0 P* SELECTE
0x0bf3fc…0bf590 Dummy {f00=0x008c, f01=0x018e, f02=»L10 KREDIT KEY X z ( P CBE SPBINW2,CBIN17,SEL20 DEBET KEY Y $ P MOVE SPBINW4,CBIN4 INVALID KEY Y B $ P CMP CBIN1,CBIN0 NOK, SET CR<>0 Y j P RET Y PSEL10 KREDIT Y P PERF SETKRE Y P B SEL30 Y PSEL20 DEBET Y P PERF SETDEB Y PSEL30
0x0bf590…0bf724 Dummy {f00=0x008c, f01=0x0190, f02=» PSEL40 Z P IB SPBINW5, C Z < P SEL90,SEL45,SEL90,SEL90,SEL90,SEL90,SEL90,SEL45,SEL90 Z * PSEL45 Z j P CBL GSWBIN1,CBIN3,SEL50 Z x P SET SPWARNFL WARNING Z P B SEL90 Z PSEL50 Z P MOVE SPBINW4,CBIN19 ERROR Z P CMP CBIN1,CBIN0 Z
0x0bf724…0bf8b8 Dummy {f00=0x008c, f01=0x40c8, f02=»'36' SIMULATE TRANS SELECTED Z P SET GTTRSEL [ $ PSELOK [ 8 " P CMP CBIN0,CBIN0 OK, SET CR=0 [ F P RET [ l P PEND [ x P* [ P* [ P* [ P* [ P* [ P END [ @ [ L50 Z P MOVE SPBINW4,CBIN19 ERROR Z P CMP CBIN1,CBIN0 Z
0x0bf8b8…0bfa4c Dummy {f00=0x008c, f01=0x2008, f02=» ,=W'5'@SET POINTER OF RECEIVING FIELD > P@COPY@TABCD4,TSBIN1,CBIN1,TSBCD3,CBIN2@GET DIGIT FOR TEST 6 P@CB@GT,TSBCD4,=W'3',A659 x P@CB@LT,TSBCD4,=W'1',A659 P@B@APK PA659 PMOVE 0P&&RW 0 0 89 ' P@MOVE@CR,=W'2' P@RET
0x0bfa4c…0bfbe0 Dummy {f00=0x008c, f01=0x0190, f02=» W ?W :W .W / a} A} T }V " @}TT }V A} } } ( @} A}T " }V }L } ( A( }J( A}T " A} } @} } P A} } ( } A} " !} 1} } Q (P _ # # H A " A A 4 4 @
0x0bfbe0…0bfd74 (0, 243) Opaque[0x194]
0x0bfd74…0bff08 # DirEnt {nam=»RGMAIN«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1198, f03=0x0000}
0x0bfd74…0bff08 IdxSect {
0x0bfd74…0bff08 f00 = 0x008c // 0xbfd74 @0x0
0x0bfd74…0bff08 f01 = 0x000a // 0xbfd76 @0x2
0x0bfd74…0bff08 gno = [ // 0xbfd78 @0x4
0x0bfd74…0bff08 [0x00]: C0x008c.0x3.0
0x0bfd74…0bff08 [0x01]: C0x008d.0x0.0
0x0bfd74…0bff08 [0x02]: C0x008d.0x1.0
0x0bfd74…0bff08 [0x03]: C0x008d.0x2.0
0x0bfd74…0bff08 [0x04]: C0x008d.0x3.0
0x0bfd74…0bff08 ]
0x0bfd74…0bff08 }
0x0bff08…0c009c Dummy {f00=0x008c, f01=0x0190, f02=» P IDENT RGMAIN 03.01.XXX.1 P DDUM KMD08 & P PDIV : P ENTRY INITRG H P ENTRY TRPAGE ^ P EXT BELL t P EXT SETKRE P EXT SETDEB P EXT PACKCL P EXT FMSTYR P EXT FRMTSP P EXT SPCLRA P EXT SPERR
0x0c009c…0c0230 Dummy {f00=0x008c, f01=0x0190, f02=» P EXT MODP P EXT KORT P EXT KVIT ( P EXT ADM : P EXT SUM J P EXT DIVTR Z P EXT ENTER l P INCLUDE EQUATE ~ P EJECT PINITRG PROC P******************** P* H P* INITRG - THIS PROCEDURE TAKES
0x0c0230…0c03c4 Dummy {f00=0x008c, f01=0x0190, f02=»OSE. b . P* TWO DIFFERENT METHODS ARE USED, . P* DETERMINED BY THE FLAG CTRVALG: > 0 P* CTRVALG TRUE : 'SKOVBOMETODE' p 0 P* CTRVALG FALSE: 'VIBORGMETODE' P* P******************** P* P
0x0c03c4…0c0558 Dummy {f00=0x008c, f01=0x0190, f02=»GTREGNR,=D'1' INITIAL TRANSTYPE 1 P MOVE GTREGDEX,CBIN1 * P PERF SETKRE KREDIT F " P PERF PACKCL CLEAR PACKBUFFER b P* P TBF CTRVALG,TR250 P* INITIATE SKOVBOMETODE P PERF TRPAGE TRANS SELECTED P SET GTDIVTR 'DIVERS
0x0c0558…0c06ec Dummy {f00=0x008c, f01=0x0190, f02=»HOVEDBOG' z P EJECT P* READ PTR400 2 P SET SPPROMPT @ , P MOVE TTTROLD,=W'-1' CLEAR OLD TRANS NO V PTR410 ( P CLEAR SPCHANGE READY FOR FUNCTIONS P TBT GTDIVTR,TR420 P MOVE GTDBKRC,=C' ' $ P PERF FMSTYR ATTAC
0x0c06ec…0c0880 Dummy {f00=0x008c, f01=0x0190, f02=»OKSPG,TR435 P CLEAR TFELT90 P CLEAR TFELT91 * P CLEAR TFELT92 @ P CLEAR TFELT93 V P CLEAR TFELT94 l P CLEAR TFELT901 P CLEAR TFELT911 P CLEAR TFELT921 P CLEAR TFELT931 P CLEAR TFELT941 P MOVE SPKEY,CB
0x0c0880…0c0a14 (0, 244) Dummy {f00=0x008d, f01=0x0190, f02=»INQUIRIES z P EJECT PTR500 P TBT SPCHANGE,TR600 . P* FUNCTION CALL J P PERF FUNCT f P SET GTSLUTFL z $ P* BRANCH ON TYPE OF FUNCTION P IB SPBINW3, C $ P TR510,TR520,TR530,TR540,TR550 P* $ PTR510
0x0c0a14…0c0ba8 Dummy {f00=0x008d, f01=0x0190, f02=»EY r P B TR530 CORRECTION P* & " PTR530 FUNCTION WITHOUT INPUT 0 P CLEAR SPPROMPT V P PERF SPCLRA RESTAT INPUT n P B TR500 P* PTR540 FUNCTION WITH INPUT P B TR400 P* PTR550 OUT OF REGISTRATION
0x0c0ba8…0c0d3c Dummy {f00=0x008d, f01=0x0190, f02=»L " P* BRANCH ON TYPE OF INPUT 4 P* (MAK, ERROR, TRSEL, END 1 PG, END MORE PG, 0 P* TO NEXT PAGE) h P IB SPBINW3, C * P TR610,TR620,TR630,TR640,TR650,TR660 P* PTR610 MAK TYPE P PERF TRPAGE P B TR400
0x0c0d3c…0c0ed0 Dummy {f00=0x008d, f01=0x0190, f02=» P B TR500 P* PTR630 TRANSACTION SELECTED " " P TBT GTDIVTR,TR620 NOT ALLOWED F P PERF TRPAGE l P CBNE TTTROLD,GTREGDEX,TR635 * P CLEAR SPPROMPT SAME AS PREVIOUS TRANS P PERF SPINF1 P PERF FRMTSP P PERF SPCN
0x0c0ed0…0c1064 Dummy {f00=0x008d, f01=0x0190, f02=» MOVE TTTROLD,GTREGDEX NOT AS PREVIOUS TRANS P SET SPPROMPT 4 P PERF FRMTSP J P PERF SPCA ^ P B TR500 p P* PTR640 1 PAGE TRANS CORRECT P TBT GTDIVTR,TR645 , P ERASE 10,CBIN1,CBIN0 ERASE VARIABLES IN P MOVE GTDBKRC,=C
0x0c1064…0c11f8 Dummy {f00=0x008d, f01=0x0190, f02=» PAGE TRANS CORRECT P TBT GTDIVTR,TR610 P MOVE GTDBKRC,=C' ' 6 P CLEAR GTREGFLG R P B TR610 j P* z PTR660 TO NEXT PAGE P NEXT PAGE ALREADY P ATTACHED P MOVE TTTROLD,CBIN0 P SET SPPROMPT P PERF
0x0c11f8…0c138c Dummy {f00=0x008d, f01=0x0190, f02=» FUNCT - PROCEDURE FOR EXECUTING ALL FUNCTIONS ALLOWED. P* INPUT: J < P* SPBINW2, GIVING KEY INDEX, COMMING FROM d , P* SCREEN PACKAGE P* OUTPUT: 8 P* SPBINW3, G
0x0c138c…0c1520 Dummy {f00=0x008d, f01=0x0190, f02=» j 4 P* 3 FUNCTION WITHOUT INPUT 2 P* 4 FUNCTION WITH INPUT @ : P* 5 REG KEY, OUT OF REGISTRATION v P* P******************** P* P IB SPBINW2, C < P FU01,FU02,
0x0c1520…0c16b4 (0, 245) Dummy {f00=0x008d, f01=0x0190, f02=» P B FU01 P* P* PFU01 ( PFU02 4 P CLEAR GTLOKSPG @ P MAK X P MOVE SPBINW3,CBIN1 f P RET P* PFU03 ENTER P TBT GTLOKSPG,FU08 P TEST GTDIVTR P BZ FUNOK P PERF SETDEB P PERF
0x0c16b4…0c1848 Dummy {f00=0x008d, f01=0x0190, f02=» BZ FUNOK P PERF SETKRE P PERF BELL & P PERF SPINF1 8 P MOVE SPBINW3,CBIN3 KREDIT L P RET n P* z PFU05 REG KEY , P MOVE SPBINW3,CBIN5 OUT OF REGISTRATION P RET P* PFU06 LISTE P PERF LSTINT P
0x0c1848…0c19dc Dummy {f00=0x008d, f01=0x0190, f02=»FU08 SPG FUNCTION P PERF ADM,CBIN11 P MOVE SPBINW3,CBIN1 4 P RET P P* PFU09 CYCLE f P PERF CYK,CBIN1 z P BNOK FUNOK P MOVE SPBINW3,CBIN4 P RET P* PFU10 STABEL P PERF CYK,CBIN2 P B
0x0c19dc…0c1b70 Dummy {f00=0x008d, f01=0x0190, f02=»BE GTRETUR,CBIN3,FU1110 P B FUOK PFU1110 0 P MOVE SPBINW3,CBIN4 > P RET Z P* f PFU12 KONTOKORT p P PERF KORT P BNOK FUNOK P MOVE SPBINW3,CBIN4 P RET P* PFU13 KVIT P PERF KVIT P B
0x0c1b70…0c1d04 Dummy {f00=0x008d, f01=0x0190, f02=»15 SUM P PERF SUM P BNOK FUNOK " P B FUOK 6 P* F PFU16 ADM KEY P & P MOVE GSWBCD3,SPINPUT GET ADM TYPE f P MOVE GSWBIN1,GSWBCD3 P PERF ADM,GSWBIN1 P MOVE SPBINW3,CBIN4 P RET P* PFU17 CYCLE K
0x0c1d04…0c1e98 Dummy {f00=0x008d, f01=0x0190, f02=»FUNOK, CYCLE,STABEL C x P FUNOK,FUNOK,FUNOK,FCYK9 ( P PERF CYK,CBIN10 END OF CYCLE/STABEL @ P BNOK FUNOK l P B FUOK P* " PFCYK4 PAUSE IN CYCLE STABEL P PERF CYK,CBIN4 P BNOK FUNOK P B FUOK P* PFC
0x0c1e98…0c202c Dummy {f00=0x008d, f01=0x0190, f02=»R P BNOK FUNOK P MOVE SPBINW3,CBIN1 P RET : P* F PFU19 HOVEDBOG P P TBT GTDIVTR,FUNOK h P MOVE TTSTYRDX,CBIN1 P MOVE SPBINW3,CBIN1 P RET P* PFU20 DEBITOR POSTERING P TBT GTDIVTR,FUNOK
0x0c202c…0c21c0 Dummy {f00=0x008d, f01=0x0190, f02=»E TTSTYRDX,CBIN3 P MOVE SPBINW3,CBIN1 P RET 4 P* @ $ PFU22 TRANS SELECTION IN DIVTR J P TBF GTDIVTR,FUNOK r P PERF TRPAGE P MOVE SPBINW3,CBIN1 P RET P* PFU23 ONLINE " P PERF ADM,CBIN7 PERFORM ONLINE
0x0c21c0…0c2354 (0, 246) Dummy {f00=0x008d, f01=0x0190, f02=»OVE SPBINW3,CBIN2 P RET P* & PFUOK 0 P MOVE SPBINW3,CBIN3 < P RET X P PEND d P EJECT r PTRINP PROC P******************** P* F P* TRINP - PROCEDURE FOR HANDLING INFORMATION GIVEN OVER ( P*
0x0c2354…0c24e8 Dummy {f00=0x008d, f01=0x0190, f02=»AGE CAN NOT TAKE CARE OF p P* ITSELF. $ P* SPCHANGE WILL BE SET. : P* INPUT: b 8 P* SPBINW2: INDEX FOR THE KEY DEPRESSED | P* OUTPUT: 6 P* SPBINW3: GIVING THE TYPE OF INPUT
0x0c24e8…0c267c Dummy {f00=0x008d, f01=0x0190, f02=» 4 1 PAGE TRANS CORRECT . P* 5 >1 PAGE TRANS CORRECT ( < P* 6 NEXT PAGE OF TRANS ALREADY ATTACHED Z P* P******************** P* P IB SPBINW2, C P IN01,IN02,IN03 P CBE SPBINW2,C
0x0c267c…0c2810 Dummy {f00=0x008d, f01=0x0190, f02=»CBIN1 P RET P* PIN03 AFTER SLUT, $ P TBT GTTRSEL,IN030 > ( P CBE SPBINW1,CBIN0,IN00 NOT ALLOWED X PIN030 P PERF ENTER * P BNOK IN035 ERRORS DETECTED IN FLDTST P IB GTRETUR, C P IN031,IN032,IN033 P
0x0c2810…0c29a4 Dummy {f00=0x008d, f01=0x0190, f02=»CBIN5 P RET PIN035 P TBWD TAB OVER LAST FIELD ( P MOVE SPBINW3,CBIN2 J P RET f P* r PIN22 | P TRANS SELECTED P MOVE SPBINW3,CBIN3 P RET P* P PEND P EJECT PTRPAGE PROC P****
0x0c29a4…0c2b38 Dummy {f00=0x008d, f01=0x0190, f02=» THE SIZE AND TYPE OF t P* THE TRANSACTION P* @ P******************** J P* f & P SET GTTRSEL TRANSACTION SELECTED p P CLEAR GTTYPE2 P CLEAR GTTYPE3 P MOVE GTPAGE,CBIN1 B P* TRANSTYPE 01, 02, 03, 04, 05
0x0c2b38…0c2ccc Dummy {f00=0x008d, f01=0x0190, f02=»0, 51, 52, 53, 54 l P IB GTREGDEX, C < P PG01,PG01,PG01,PG01,PG01,PG01,PG01,PG03,PG03,PG01, C 2 < P PG01,PG01,PG01,PG01,PG01,PG01,PG01,PG01,PG01,PG01, C r . P PG01,PG01,PG01,PG01,PG03,PG01,PG03,PG01 P* PPG01 P RET P*
0x0c2ccc…0c2e60 Dummy {f00=0x008d, f01=0x4028, f02=» P* P* P END @ $ C < P PG01,PG01,PG01,PG01,PG01,PG01,PG01,PG03,PG03,PG01, C 2 < P PG01,PG01,PG01,PG01,PG01,PG01,PG01,PG01,PG01,PG01, C r . P PG01,PG01,PG01,PG01,PG03,PG01,PG03,PG01 P* PPG01 P RET P*
0x0c2e60…0c2ff4 (0, 247) Dummy {f00=0x008d, f01=0x2008, f02=» NT RGMAIN @ AG&5 z < PTRERR ERRORMESSAG&5 * P PERF SPERR j P B TR90 P PEND P* P* @ NTERMEDIATE STOP OF CYCLE 8 P
0x0c2ff4…0c3188 Dummy {f00=0x008d, f01=0x4024, f02=»* N P* O END O @ O P FTEXT 'B PR. ' N & P FBT CBDTGIR,FKREL21 N > P FCOPY =C'CHECK' N Z P FB FKREL22 N r PFKREL21 N P FCOPY =C'GIRO ' N PFKREL22 N P FILLR ' ',2 N P FCOPY =C'DATO' N P FILLR ' ',2 N P FMEL '99E
0x0c3188…0c331c Dummy {f00=0x008d, f01=0x2008, f02=» P PERF VARWRT BNOK TRGET95 B TRGET90 4 TRGET90 F CLEAR CTRFFLG V CMP CBIN0,CBIN0 l B TRGET99 TRGET95 CLEAR CTRFFLG CMP CBIN0,CBIN1 RET PEND EJECT TRUNP PROC
0x0c331c…0c34b0 Dummy {f00=0x008d, f01=0x0190, f02=» R W Q< R W Q0 R W Q$ : j Z #03 T $_X j _^ W m k p *1 TID ADDR OP CR LVL MODIFIED OPERAND CREDIT 2.1 TRACE ; k ( Mv @k R ( Mv _ * Ak T0 k
0x0c34b0…0c3644 Dummy {f00=0x008d, f01=0x0190, f02=»l Wr l 2 [ k p p & p l Q k Ak W* l k V D ! )0 1 6 V 9 p Ak m. X k ( Mv < ( Mv : Wp Wl Wh Wd W` W WX WT WP WL WH WD W@ W< W8 W4 W0 W, W( W$ W W W W
0x0c3644…0c37d8 Dummy {f00=0x008d, f01=0x0190, f02=» 4 - _ m. k @k r X ILLEGAL OPERATION MIXED ARITHMETIC ILLEGAL TYPE ODD WORD ADDR MISSING ENTRY ILLEGAL REQUESTED LENGTH STACK UNDERFLOW ARITHM OVERFLOW STACK OVERFLOW INDEX OVERFLOW ILL INDEX TYPE DIV BY ZERO EDIT BUFFER OVFL EDIT
0x0c37d8…0c396c Dummy {f00=0x008d, f01=0x0190, f02=» BUFFER ALLOCATED FIX BUFFER NOT ALLOWED ILLEGAL CONTROL CODE ILLEGAL INDEX VALUE FORMAT CONDITIONS CHANGED ILLEGAL PARAMETER LENGTH ERROR DATASET BUSY ILLEGAL DATASET REFERENCE TOO MANY KIA/NKIA STACK LEVELS DISC ERROR; NO REENTER POINT W 9
0x0c396c…0c3b00 Dummy {f00=0x008d, f01=0x0190, f02=» _" @svP @sxPj Pf rl V $ $T$ D BR V T D P T D @PL E @W . @r P$ q r $ $P BT , D E @ : @p P Ap H AsvW TW V Ap s| sz V As~ TB( t ( Ap sz @s~ V P ( R W p TB( t : TB( u : As As E Ap
0x0c3b00…0c3c94 (0, 248) Opaque[0x194]
0x0c3c94…0c3e28 # DirEnt {nam=»RGFRMT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x11c0, f03=0x0000}
0x0c3c94…0c3e28 IdxSect {
0x0c3c94…0c3e28 f00 = 0x008e // 0xc3c94 @0x0
0x0c3c94…0c3e28 f01 = 0x0012 // 0xc3c96 @0x2
0x0c3c94…0c3e28 gno = [ // 0xc3c98 @0x4
0x0c3c94…0c3e28 [0x00]: C0x008e.0x0.0
0x0c3c94…0c3e28 [0x01]: C0x008e.0x1.0
0x0c3c94…0c3e28 [0x02]: C0x008e.0x2.0
0x0c3c94…0c3e28 [0x03]: C0x008e.0x3.0
0x0c3c94…0c3e28 [0x04]: C0x008f.0x0.0
0x0c3c94…0c3e28 [0x05]: C0x008f.0x1.0
0x0c3c94…0c3e28 [0x06]: C0x008f.0x2.0
0x0c3c94…0c3e28 [0x07]: C0x008f.0x3.0
0x0c3c94…0c3e28 [0x08]: C0x0090.0x0.0
0x0c3c94…0c3e28 ]
0x0c3c94…0c3e28 }
0x0c3e28…0c3fbc Dummy {f00=0x008e, f01=0x018e, f02=» P IDENT RGFRMT 03.01.XXX.1 P DDUM KMD08 & P PDIV : P ENTRY FRMTSP H P ENTRY FRMXSP ^ P ENTRY FMSTYR t P INCLUDE EQUATE PFMSTYR PROC P******************** P* 0 P* FORMATS FOR CONTROLLING CHOICE OF
0x0c3fbc…0c4150 Dummy {f00=0x008e, f01=0x0190, f02=» P PEND P* PFRMTSP PROC P* 4 P******************* > : P* ATTACHES A FORMAT FOR USE IN SCREEN PACKAGE Z P* > P* USES GTREGDEX TO DETERMINE WHICH FORMAT TO USE P* P********************
0x0c4150…0c42e4 Dummy {f00=0x008e, f01=0x018e, f02=» 0 P* ATTACHES FORMATS FOR PAGE 2 AND 3 ( P* FOR TRANSTYPES 8,9,51,53 < 2 P* PLUS OTHER EXTRA FORMATS ON SCREEN h P* P******************* P ATTFMT XSPFTB(XSPDEX) P RET P PEND P* P
0x0c42e4…0c4478 Dummy {f00=0x008e, f01=0x0190, f02=» 8 PSPFTB FTABLE FRMT01,FRMT02,FRMT03,FRMT04,FRMT05, C , P FRMT06,FRMT07,FRMT08,FRMT09,FRMT10, C @ , P FRMT12,FRMT18,FRMT19,FRMT28,FRMT29, C p , P FRMT00,FRMT00,FRMT00,FRMT00,FRMT00 C ( P FRMT00,FRMT00,FRMT00,FRMT00,FRMT00 P* P*
0x0c4478…0c460c Dummy {f00=0x008e, f01=0x0190, f02=»C p P XSPLIN P EJECT PSTYRHB FRMT ( P FSL < P FTAB 4 H P FCOPY ='HOVEDBOG' X P FLINK FCYST r P FNL P FCOPY ='REGKONTONR' P FTAB 13 P FCOPY ='CPR/CIR/NR' P FTAB 25 P FCOPY ='YDELSESMODT' P
0x0c460c…0c47a0 Dummy {f00=0x008e, f01=0x018e, f02=»KI 13,MINL=7,MAXL=10,REWRT,APPL=81,DUPL=GTDUPF(CBIN2), C P SCHK=1 B & P FMEL 'XXXXXXE-XXXX',GTREGF(CBIN2) R B P FKI 25,MINL=10,MAXL=10,REWRT,APPL=82,DUPL=GTDUPF(CBIN10), C | P SCHK=1 ( P FMEL 'XXXXXXE-XXXX',GTREGF(CBIN10) P FMEND
0x0c47a0…0c4934 (0, 249) Dummy {f00=0x008e, f01=0x0190, f02=» P FNL P FCOPY ='DEBITOR' P FILLR ' ',1 . P FTEXT 'NR' B P FILLR ' ',2 V P FCOPY ='BET-ART' j P FNL 8 P FKI 1,MAXL=10,REWRT,APPL=83,DUPL=GTDUPF(CBIN2), C P SCHK=1,ME & P FMEL 'XXXXXXE-XXXX',GTREGF(CBIN2) 2
0x0c4934…0c4ac8 Dummy {f00=0x008e, f01=0x0190, f02=»LI 'XX',GTREGF(CBIN3) P FMEND P* , P* 6 PSTYRRM FRMT @ P FSL T P FTAB 3 ` P FCOPY =' REMITTERING' p P FLINK FCYST P FNL P FCOPY ='REGKONTONR' P FTAB 13 P FCOPY ='LEVERAND ' P FTEXT 'NR'
0x0c4ac8…0c4c5c Dummy {f00=0x008e, f01=0x0190, f02=» & P FMEL 'XXXXXXXXE-XX',GTREGF(CBIN1) @ P FKI 13,MINL=7,MAXL=10,REWRT,APPL=86,DUPL=GTDUPF(CBIN2), C . P SCHK=1,ME r & P FMEL 'XXXXXXE-XXXX',GTREGF(CBIN2) B P FKI 25,MINL=10,MAXL=10,REWRT,APPL=87,DUPL=GTDUPF(CBIN10), C P SCHK=1 ( P F
0x0c4c5c…0c4df0 Dummy {f00=0x008e, f01=0x0190, f02=» P* P* 6 PFRMT01 FRMT TRANSTYPE 1 P FSL V P FBF GTDIVTR,SFMT01 b P FMEL '99',GTREGNR ~ P FCOPY =' NORMALPOST' P FTEXT ' M/P-NR' P FLINK FCYST P FNL P FCOPY ='REGKONTON
0x0c4df0…0c4f84 Dummy {f00=0x008e, f01=0x0190, f02=» SUBF06 P FNL PSFMT01 $ P FBT GTDIVTR,SFMX01 2 P FTAB 4 N P FCOPY ='HOVEDBOG' ^ P FLINK FCYST x P FNL P FNL P FNL PSFMX01 P FLINK FBELOB P FNL P FLINK SUBF08
0x0c4f84…0c5118 Dummy {f00=0x008e, f01=0x0190, f02=» FTEXT 'BFO' P FNL P FLINK SUBV07 . P FLINK SUBF11 L P FLINK SUBF12 j P FLINK FCYEND P FMEND P* P* 6 P TRANSTYPE 2 PFRMT02
0x0c5118…0c52ac Dummy {f00=0x008e, f01=0x0190, f02=» P FNL P FCOPY ='REGKONTONR' P FNL < P FLINK SUBF05 P P FNL n PSFMT02 P FBT GTDIVTR,SFMX02 P FTAB 4 P FCOPY ='HOVEDBOG' P FLINK FCYST P FNL P FNL P FNL
0x0c52ac…0c5440 Dummy {f00=0x008e, f01=0x0190, f02=» P FLINK FCYEND P FMEND P* 0 P* : 6 P TRANSTYPE 3 D PFRMT03 FRMT ~ P FSL P FBF GTDIVTR,SFMT03 P FMEL '99',GTREGNR P FILLR ' ',1 P FCOPY ='DEBITOR' P FTE
0x0c5440…0c55d4 (0, 250) Dummy {f00=0x008e, f01=0x0190, f02=» FCOPY ='BET-ART' P FNL P FLINK SUBF06 . 0 P FKI 30,MAXL=2,APPL=7,ME,DUPL=GTDUPF(CBIN3) L P FMELI 'XX',GTREGF(CBIN3) P FNL PSFMT03 P FBT GTDIVTR,SFMX03 P FTAB 4 P FCOPY ='DEBITOR'
0x0c55d4…0c5768 Dummy {f00=0x008e, f01=0x0190, f02=»TAB 18 P FTEXT ']R' P FTAB 22 $ P FLINK FVALOR 4 P FNL J P FLINK SUBF08 V P FLINK SUBF15 l P FLINK SUBF11X P FNL P FTEXT 'RTE/GEB' P FTAB 9 P FCOPY =' DEB' P FTAB 18 P FTEXT 'BFO' P F
0x0c5768…0c58fc Dummy {f00=0x008e, f01=0x0190, f02=» 6 P TRANSTYPE 4 PFRMT04 FRMT > P FSL T P FBF GTDIVTR,SFMT04 ` P FMEL '99',GTREGNR | P FTEXT ' SD-INCASSO' P FLINK FCYST P FNL P FTAB 13 P FCOPY ='CPR
0x0c58fc…0c5a90 Dummy {f00=0x008e, f01=0x0190, f02=»,VERIF t P FMELI 'XX',GTREGF(CBIN3) P FNL 0 PSFMT04 D P FBT GTDIVTR,SFMX04 R P FTAB 4 n P FCOPY ='DEBITOR' ~ P FTEXT ' POST.' P FLINK FCYST P FNL P FNL P FNL PSFMX04 P FLINK FBE
0x0c5a90…0c5c24 Dummy {f00=0x008e, f01=0x0190, f02=» P FNL P FLINK SUBF17 P FLINK SUBF11X * P FLINK FCYEND @ P FMEND V P* l P* v 6 P TRANSTYPE 5 PFRMT05 FRMT P FSL P FMEL '99',GTREGNR P FTEXT ' SALDOOVER
0x0c5c24…0c5db8 Dummy {f00=0x008e, f01=0x0190, f02=» FNL P FLINK FBELOB P FNL 2 P FLINK SUBF08 F P FNL d P FNL x P FLINK FCYEND P FMEND P* P* 6 P TRANSTYPE 6 PFR
0x0c5db8…0c5f4c Dummy {f00=0x008e, f01=0x018e, f02=»LINK FCYST P FNL P FCOPY ='REGKONTONR' & P FTAB 13 J P FCOPY ='LEVERAND ' d P FTAB 25 " P FCOPY ='YDELSESMODT' P FNL P FLINK SUBF05 P FLINK SUBF06
0x0c5f4c…0c60e0 Dummy {f00=0x008e, f01=0x018e, f02=» | P FLINK FCYST P FNL P FNL ( P FNL 4 PSFMX06 @ P FLINK FBELOB N P FNL l P FLINK SUBF08 P FNL P FTEXT 'BKO' P FTAB 5 P FLINK FVALOR P FTA
0x0c60e0…0c6274 (0, 251) Dummy {f00=0x008e, f01=0x0190, f02=» P FLINK SUBF11 P FLINK SUBF12 " P FLINK SUBF22 @ P FLINK FCYEND ^ P FMEND t P* P* 8 P TRANSTYPE 07 PFRMT07 FRMT P FSL P FMEL '99',G
0x0c6274…0c6408 Dummy {f00=0x008e, f01=0x018e, f02=» FNL P FLINK SUBF05 P FNL 2 P FLINK FBELOB F P FNL d P FLINK SUBF08 x P FNL P FNL P FLINK FCYEND P FMEND P* P* < P
0x0c6408…0c659c Dummy {f00=0x008e, f01=0x0190, f02=» | " P FCOPY =' REMITTERING' P FLINK FCYST . P FNL B P FCOPY ='REGKONTONR' V P FTAB 13 z P FCOPY ='LEVERAND ' P FNL P FLINK SUBF05 P FLINK SUBF06 P
0x0c659c…0c6730 Dummy {f00=0x008e, f01=0x0190, f02=» P FNL P FNL PSFMX08 P FLINK FBELOB * P FTAB 17 H P FTEXT 'FAKTNR' b P FILLR ' ',5 z P FTEXT 'FAKTDATO' P FNL P FLINK SUBF08 P FLINK SUBF24 P FNL
0x0c6730…0c68c4 Dummy {f00=0x008e, f01=0x0190, f02=»NK SUBF25 P FLINK SUBF26 P FLINK SUBF11X ( P FLINK FCYEND > P FMEND T P* j P* t < P TRANSTYPE 09 - 1 ~ PFRMT09 FRMT P FSL P FBF GTDIVTR,SFMT09 P FMEL '99',G
0x0c68c4…0c6a58 Dummy {f00=0x008e, f01=0x0190, f02=» t P FTAB 13 P FCOPY ='LEVERAND ' " P FTAB 25 F " P FCOPY ='YDELSESMODT' ` P FNL P FLINK SUBF05 P FLINK SUBF06 P FLINK SUBF21 P FNL P
0x0c6a58…0c6bec Dummy {f00=0x008e, f01=0x0190, f02=» PSFMX09 P FLINK FBELOB P FTAB 17 4 P FTEXT 'FAKTNR' N P FILLR ' ',5 f P FTEXT 'FAKTDATO' z P FNL P FLINK SUBF08 P FLINK SUBF24 P FNL P FTEXT 'LEVKONTO
0x0c6bec…0c6d80 Dummy {f00=0x008e, f01=0x0190, f02=»LINK SUBF26 P FLINK SUBF11X P FLINK FCYEND * P FMEND @ P* V P* ` 8 P TRANSTYPE 10 j PFRMT10 FRMT P FSL P FMEL '99',GTREGNR P FTEXT ' POST T/GL. ]R' P FLINK
0x0c6d80…0c6f14 (0, 252) Dummy {f00=0x008f, f01=0x0190, f02=» P FLINK FBELOB P FTAB 17 " P FCOPY ='CPR/CIR/NR' 2 P FNL N P FLINK SUBF08 b 0 P FKI 17,MAXL=10,MINL=7,REWRT,APPL=6,NCLR, C P DUPL=GTDUPF(CBIN2),SCHK=1 & P FMEL 'XXXXXXE-XXXX',GTREGF(CBIN2) P
0x0c6f14…0c70a8 Dummy {f00=0x008f, f01=0x0190, f02=»'99',GTREGNR P FTEXT ' DIVERSE' P FILLR ' ',1 . P FTEXT 'EJ EDB' B P FLINK FCYST Z P FNL n P FTEXT 'TNR' z P FCOPY ='KONTONR' P FNL P FKI 1,MAXL=3,APPL=76,ME P FMEL 'XXX',GTREGF(CBIN10) 4 P FKI 5,MINL=7,MAXL
0x0c70a8…0c723c Dummy {f00=0x008f, f01=0x0190, f02=»XXXXXXXE-XX',GTREGF(CBIN1) P FNL " P FLINK FBELOB . P FTAB 17 D P FTEXT ' DIVERSE' T P FNL n P FLINK SUBF08 z P FKI 18,MAXL=10,APPL=89 & P FMELI 'XXXXXXXXXX',GTREGF(CBIN2) P FNL P FNL P FLINK FCYEND P
0x0c723c…0c73d0 Dummy {f00=0x008f, f01=0x018e, f02=»NK SUBF08 GTREG(4) " P FLINK SUBF80 GTREG(15) TXTNR ! P FLINK SFREM4 ! @ P FMEND ! V P* ! d P* ! n PFRMT19 FRMT ! x P FLINK SFREM1A ! P FTAB 25 ! P FCOPY ='YDELSESMODT' ! P FLINK SFREM2 ! P FLINK SUBF21 GTREG(10) ! P F
0x0c73d0…0c7564 Dummy {f00=0x008f, f01=0x0190, f02=» ! P* " PFRMT28 FRMT " P FLINK SFREM1 " & P FLINK SFREM2 " < P FLINK SFREM3 " R P FTAB 23 " h P FLINK FVALOR " x P FNL " P FLINK SUBF08 GTREG(4) BELOB " " P FLINK SUBF80 GTREG(15) TEXTNR " " P FLINK SUBF11X GTREG(7) VALOR "
0x0c7564…0c76f8 Dummy {f00=0x008f, f01=0x0190, f02=»' " | P FLINK SFREM2 # P FLINK SUBF21 # P FLINK SFREM3 # 6 P FTAB 23 # L P FLINK FVALOR # P FNL # r P FLINK SUBF08 # ~ P FLINK SUBF80 # P FLINK SUBF11X # P FLINK SFREM4 # P FMEND # P* # PSFREM1 FRMT # P FSL #
0x0c76f8…0c788c Dummy {f00=0x008f, f01=0x0190, f02=»R' # ~ P FTAB 13 $ P FCOPY ='LEVERAND ' $ P FMEND $ 6 PSFREM1A FRMT $ D P FSL $ X P FMEL '99',GTREGNR $ d P FCOPY =' REMITTERING' $ ~ P FTEXT ' STRAKS' $ P FLINK FCYST $ P FNL $ P FCOPY ='REGKONTONR' $ P FTAB 13 $ P FCOPY =
0x0c788c…0c7a20 Dummy {f00=0x008f, f01=0x0190, f02=» $ P* % PSFREM3 FRMT % P FNL % & P FLINK FBELOB % 2 P FTAB 17 % H P FTEXT 'TXT' % X P FMEND % l P* % z PSFREM4 FRMT % P FNL % P FTEXT 'NR-1' % P FTAB 12 % P FTEXT 'NR-2' % P FTAB 23 % P FTEXT 'DATO' % P F
0x0c7a20…0c7bb4 (0, 253) Dummy {f00=0x008f, f01=0x018e, f02=»NK SUBF83 % P FLINK SUBF84 & P FLINK FCYEND & ( P FMEND & > P* & L PFCYST FRMT & V P FTAB 23 & h P FCOPY TTINF1 & x P FMEND & P* & PFCYEND FRMT & P FNL & P FBF GTLOKSPG,FCY05 & P FTAB 5 & P FMEL '****9',GTLBNR &
0x0c7bb4…0c7d48 Dummy {f00=0x008f, f01=0x0190, f02=» PFCY10 ' P FLINK FMTEND ' P FMEND ' ( P* ' 6 PFMTEND FRMT ' @ P FNL ' T P FKI 2,MAXL=1,APPL=121,VERIF ' ` P FMEL 'B',TSWBCD2 ' P FMEND ' P* ' P* ' PFVALOR FRMT ' P FTEXT X'56414C5C52' VALOER ' P FMEND ' P*
0x0c7d48…0c7edc Dummy {f00=0x008f, f01=0x0190, f02=»ERINGSKONTONNR ' b PSUBF05 FRMT ( F P FKI 1,MAXL=10,REWRT,APPL=5,DUPL=GTDUPF(CBIN1), C ( , " P SCHK=1,ME,NCLR ( v 0 P FMEL 'XXXXXXXXE-XX',GTREGF(CBIN1) ( P FMEND ( P* ( P* ( B P
0x0c7edc…0c8070 Dummy {f00=0x008f, f01=0x0190, f02=» C ( V ( P SCHK=7,ME,NCLR,VERIF ) & P FMEL 'XXXXXXE-XXXX',GTREGF(CBIN2) ) < P FMEND ) f P* ) t P* ) ~ PSUBV07 FRMT ) 6 P FKI 1,MAXL=2,APPL=7,DUPL=GTDUPF(CBIN3) ) & P FMELI 'XX',GTREGF(CBIN3) ) P
0x0c8070…0c8204 Dummy {f00=0x008f, f01=0x0190, f02=»EWRT,APPL=8,DUPL=GTDUPF(CBIN4), C ) v P ME,NCLR,SCHK=4 * * 2 P FMEL 'TTTTTTTVTTX,XX-',GTREGF(CBIN4) * B P FMEND * x P* * P * P* * P* * @ P BETALINGS-/VAL@RDATO * PSUBF11 FRMT *
0x0c8204…0c8398 Dummy {f00=0x008f, f01=0x0190, f02=»MEND * P* + P* + PSUBF11X FRMT + @ P FKI 22,MINL=6,MAXL=6,APPL=11,DUPL=GTDUPF(CBIN7),SCHK=2, C + 4 P VERIF + x " P FMEL 'XXVXXVXX',GTREGF(CBIN7) + P FMEND + P* + P* + 8 P BETALINGSFORM +
0x0c8398…0c852c Dummy {f00=0x008f, f01=0x0190, f02=» FMEND + P* , P* , 8 P P$LIGNINGS]R , " PSUBF15 FRMT , ^ 8 P FKI 18,MAXL=1,APPL=15,DUPL=GTDUPF(CBIN11) , t & P FMELI 'X',GTREGF(CBIN11) , P FMEND , P* , P* , < P
0x0c852c…0c86c0 Dummy {f00=0x008f, f01=0x0190, f02=»C , Z P NCLR - & P FMELI 'X',GTREGF(CBIN12) - & P FMEND - P P* - f P* - p H P FORFALDS]R/RESTANCE ]R-M]NED/ - z 8 P OPRIKD[KKODE - PSUBF17
0x0c86c0…0c8854 (0, 254) Dummy {f00=0x008f, f01=0x0190, f02=» FKI 5,MINL=2,MAXL=2,APPL=18,DUPL=GTDUPF(CBIN11),CTAB - ( P FMELI 'XX',GTREGF(CBIN11) . D D P FKI 9,MINL=2,MAXL=2,APPL=19,DUPL=GTDUPF(CBIN12),CTAB . p P FMELI 'XX',GTREGF(CBIN12) . > P FKI 13,MAXL=1,APPL=20,DUPL=GTDUPF(C
0x0c8854…0c89e8 Dummy {f00=0x008f, f01=0x0190, f02=» YDELSESMODTAGER . p PSUBF21 FRMT / N P FKI 25,MINL=10,MAXL=10,REWRT,APPL=21,DUPL=GTDUPF(CBIN10), C / 4 " P SCHK=1,ME,NCLR / 0 P FMEL 'XXXXXXE-XXXX',GTREGF(CBIN10) / P FMEND / P* / P* / B
0x0c89e8…0c8b7c Dummy {f00=0x008f, f01=0x018e, f02=»PL=GTDUPF(CBIN11) / f ( P FMELI 'XX',GTREGF(CBIN11) 0 P FMEND 0 F P* 0 P* 0 f B P FAKTURA NUMMER OG DATO 0 p PSUBF24 FRMT 0 P FBT CFAKT10,LAB2410 0 . P FKI 17,MAXL=8,APPL=24,DUPL=GTDU
0x0c8b7c…0c8d10 Dummy {f00=0x008f, f01=0x0190, f02=» . P FMEL 'TTTTTTTTTX',GTREGF(CBIN13) 1 PLAB2420 1 6 H P FKI 28,MINL=6,MAXL=6,APPL=23,DUPL=GTDUPF(CBIN12), C 1 F P SCHK=2 1 , P FMEL 'XXVXXVXX',GTREGF(CBIN12) 1 P FMEND 1 P* 1 P* 1 @
0x0c8d10…0c8ea4 Dummy {f00=0x008f, f01=0x0190, f02=»,MAXL=8,APPL=25,DUPL=GTDUPF(CBIN14) 1 , P FMEL 'TTTTTTTX',GTREGF(CBIN14) 2 , P FB LAB2590 2 PLAB2510 2 p . P FKI 1,MAXL=10,APPL=25,DUPL=GTDUPF(CBIN14) 2 & P FMEL 'TTTTTTTTTX',GTREGF(CBIN14) 2 PLAB2590 2 P FMEND 2 P* 2
0x0c8ea4…0c9038 Dummy {f00=0x008f, f01=0x0190, f02=»PF(CBIN15) 2 f ( P FMEL 'TTTX',GTREGF(CBIN15) 3 P FMEND 3 > P* 3 T P* 3 ^ 8 P OMR]DENUMMER 3 h PSUBF27 FRMT 3 > P FKI 6,MINL=2,MAXL=2,APPL=27,DUPL=GTDUPF(CBIN16) 3 ( P FME
0x0c9038…0c91cc Dummy {f00=0x008f, f01=0x0190, f02=»SUBF37 FRMT 3 H P FKI 1,MINL=6,MAXL=6,APPL=37,DUPL=GTDUPF(CBIN18), C 4 P SCHK=2 4 b , P FMEL 'XXVXXVXX',GTREGF(CBIN18) 4 H P FKI 10,MINL=6,MAXL=6,APPL=38,DUPL=GTDUPF(CBIN19), C 4 P
0x0c91cc…0c9360 Dummy {f00=0x008f, f01=0x0190, f02=» ALTERNATIV ADRESSEKODE 4 t PSUBF46 FRMT 5 * 8 P FKI 11,MAXL=1,APPL=46,DUPL=GTDUPF(CBIN17) 5 @ & P FMELI 'X',GTREGF(CBIN17) 5 | P FMEND 5 P* 5 P* 5 < P DEBITORL@BENUMMER
0x0c9360…0c94f4 (0, 255) Dummy {f00=0x008f, f01=0x0190, f02=» FMEND 5 P* 6 P* 6 PSUBF80 FRMT 6 ( : P FKI 17,MINL=1,MAXL=4,APPL=115,DUPL=GTDUPF(CBIN15), C 6 < P ME,NCLR,REWRT,VERIF 6 z P FMEL 'TTTX',GTREGF(CBIN15) 6 P FMEND 6 P* 6 P* 6 PSUBF81 FRMT 6 > P FKI 1,MAXL=10,CTAB,AP
0x0c94f4…0c9688 Dummy {f00=0x008f, f01=0x018e, f02=»T 6 @ P FKI 12,MAXL=10,CTAB,APPL=117,DUPL=GTDUPF(CBIN14),REWRT, C 7 P VERIF 7 N & P FMEL 'TTTTTTTTTX',GTREGF(CBIN14) 7 ^ P FMEND 7 P* 7 PSUBF83 FRMT 7 @ P FKI 23,MINL=6,MAXL=6,CTAB,APPL=118,DUPL=GTDUPF(CBIN18), C 7 P SCHK=2,REWRT,V
0x0c9688…0c981c Dummy {f00=0x008f, f01=0x0190, f02=» 7 f , P DUPL=GTDUPF(CBIN19),SCHK=2,REWRT,VERIF 8 " P FMEL 'XXXXXX',GTREGF(CBIN19) 8 8 P FMEND 8 ^ P EJECT 8 l PFMT308 FRMT 8 z P FSL 8 P FLINK SFM408 8 P FNL 8 P FLINK SUBF37 8 P FLINK FCYEND 8 P FMEND 8 P*
0x0c981c…0c99b0 Dummy {f00=0x008f, f01=0x0190, f02=» FLINK SUBF37 8 P FLINK SUBF22 9 P FLINK FCYEND 9 4 P FMEND 9 J P* 9 X PSFM408 FRMT 9 b P FNL 9 v P FNL 9 P FNL 9 P FTEXT 'BKO' 9 P FTAB 6 9 P FTEXT 'OMR' 9 P FTAB 11 9 P FTEXT 'A-ADR' 9 P
0x0c99b0…0c9b44 Dummy {f00=0x008f, f01=0x018e, f02=» P FLINK SUBF12 : P FNL : " & P FCOPY ='PER FRA PER TIL' : 6 P FMEND : ` P* : n PFMT251 FRMT : x P FSL : P FMEND : PFMT253 FRMT : P FSL : P FMEND : PFMT351 FRMT : P FSL : P FMEND : PFMT353
0x0c9b44…0c9cd8 Dummy {f00=0x008f, f01=0x0190, f02=» : P FKI 3,MAXL=22,APPL=90,ALPHA ; P FCOPY GSWSTR20 ; , P FNL ; D P FILLR '2',1 ; P P FKI 3,MAXL=22,APPL=91,ALPHA ; d P FCOPY GSWSTR20 ; P FNL ; P FILLR '3',1 ; P FKI 3,MAXL=22,APPL=92,ALPHA ; P FCOPY GSWSTR20 ; P FNL ; P
0x0c9cd8…0c9e6c Dummy {f00=0x008f, f01=0x0190, f02=»LPHA ; x P FCOPY GSWSTR20 < P FLINK FMTEND < $ P FMEND < : P < H PFMT209 FRMT < P P FLINK FMT208 < d P FMEND < z P* < PFMTERR FRMT < P FSL < P FTEXT 'FEJL FORMAT' < P FMEND < P* < P* < PXSPCY1 FRMT < P FSL
0x0c9e6c…0ca000 Dummy {f00=0x008f, f01=0x0190, f02=»' < P FTAB 15 = P FTEXT 'KONTROLSUM' = PXSPL01 = 6 P FTAB 32 = D P FTEXT 'LINIE' = T P FNL = j P FBT TTCY2FLG,XSPL02 = v ( P FKI 1,MINL=10,MAXL=10,REWRT,SCHK=1 = & P FMEL 'XXXXXXXXE-XX',GTREGF(CBIN9) = P FKI 15,MAXL=12,REWRT,SCHK=4 =
0x0ca000…0ca194 (0, 256) Dummy {f00=0x0090, f01=0x0190, f02=» P FMEND > P* > P* > PXSPKT1 FRMT > & P FSL > : P FNL > F P FNL > R P FNL > ^ P FNL > j P FNL > v P FBF CKTFLAG,XSPL05 > P FTAB 5 > P FTEXT 'GL. SALDO' > P FTAB 18 > P FCOPY ='LINIE NR' > P FTEXT ' CHECK' >
0x0ca194…0ca328 Dummy {f00=0x0090, f01=0x018e, f02=» FMELI 'XX',TTKTLIN > P FKI 28,MAXL=1,ME,SCHK=6 ? P FMELI 'X',TTKTCHK ? < P FLINK FMTEND ? V P FEXIT ? l PXSPL05 ? z P FTAB 5 ? P FCOPY ='KONTOKORT' ? P FTAB 18 ? P FCOPY ='LINIE NR' ? P FNL ? P FKI 18,MAXL=2,ME,SCHK=5 ?
0x0ca328…0ca4bc Dummy {f00=0x0090, f01=0x410c, f02=» ? P FNL @ P FNL @ P FNL @ P FTAB 13 @ , P FTEXT 'FAST ' @ < P FCOPY ='LINIE NR' @ R P FNL @ l P FKI 18,MAXL=2,SCHK=5 @ x P FMELI 'XX',GSWBCD5 LINE NR @ P FLINK FMTEND @ P FMEND @ P* @ P* @ P END @ P* @ @
0x0ca4bc…0ca650 Dummy {f00=0x0090, f01=0x2008, f02=» A L '9',GTREGF(CBIN20) 3 P FMEND 4 & P* 4 < P* 4 F < P DEBITORL@BENUMMER 4 P PSUBF48 FRMT 4 F P FKI 22,MINL=1,MAXL=3,REWRT,APPL=48,DUPL=GTREGF(CBIN25) 4 ( P FMEL 'ZZ9',GTR
0x0ca650…0ca7e4 Dummy {f00=0x0090, f01=0x0190, f02=» P FLINK SKAF01 LINE NR B P FMEND B " P* B 8 P* B B : PKAFST03 FRMT TRANS 03 B L P FLINK KAFST03L B P FMEND B P* B PKAFST03L FRMT B 8 P FLINK BSUB01 HEADER B
0x0ca7e4…0ca978 Dummy {f00=0x0090, f01=0x0190, f02=» 'BXX',GTDUPF(CBIN11) PALIGNINGS$R B $ P FCOPY TT16TXT RENTE/GEBYR/INDB C 4 ( P FLINK BSUB07 CPR/CIR/BELOB/LINIENR C P FMEND C P* C P* C : PKAFST04 FRMT TRANS 04 C P FLINK KAFST04L C P
0x0ca978…0cab0c Dummy {f00=0x0090, f01=0x0190, f02=» BETART/DATO C r P FBF TTKORTFL,KLAB40 D " 2 P FMEL 'XX.XXPP',GTDUPF(CBIN7) VAL DATE, DD.MM D > PKLAB40 D t P FBF TTASKAT,KLAB41 D 0 P FMEL 'B**',GTDUPF(CBIN12) REST.MAANED - CIR D . P FMEL 'B**',GTDUPF(CBIN11) REST.AAR - CIR D P FB
0x0cab0c…0caca0 Dummy {f00=0x0090, f01=0x0190, f02=»B07 CPR/CIR-BELOB-LINIENR D ~ P FMEND E 8 P* E N PSKAF01 FRMT E X P FBF CKTFLAG,SKAF02 E l P FBT GTSLDFLG,SKAF04 E P FILLR ' ',13 E P FB SKAF03 E PSKAF04 E , P FMEL '*.***.***.**9.99-',TTKTSLD SALDO E
0x0caca0…0cae34 (0, 257) Opaque[0x194]
0x0cae34…0cafc8 # DirEnt {nam=»RGSUBS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1208, f03=0x0000}
0x0cae34…0cafc8 IdxSect {
0x0cae34…0cafc8 f00 = 0x0090 // 0xcae34 @0x0
0x0cae34…0cafc8 f01 = 0x0010 // 0xcae36 @0x2
0x0cae34…0cafc8 gno = [ // 0xcae38 @0x4
0x0cae34…0cafc8 [0x00]: C0x0090.0x1.0
0x0cae34…0cafc8 [0x01]: C0x0090.0x2.0
0x0cae34…0cafc8 [0x02]: C0x0090.0x3.0
0x0cae34…0cafc8 [0x03]: C0x0091.0x0.0
0x0cae34…0cafc8 [0x04]: C0x0091.0x1.0
0x0cae34…0cafc8 [0x05]: C0x0091.0x2.0
0x0cae34…0cafc8 [0x06]: C0x0091.0x3.0
0x0cae34…0cafc8 [0x07]: C0x0092.0x0.0
0x0cae34…0cafc8 ]
0x0cae34…0cafc8 }
0x0cafc8…0cb15c Dummy {f00=0x0090, f01=0x0190, f02=» P IDENT RGSUBS 03.01.XXX.1 P DDUM KMD08 & P PDIV D P ENTRY ENTER Z P ENTRY MODP x P ENTRY KORT P ENTRY KVIT P ENTRY LSTINT P ENTRY CYK P
0x0cb15c…0cb2f0 Dummy {f00=0x0090, f01=0x018e, f02=» P EXT FRMTKV P EXT FRMXSP P EXT FRMXVO 0 P EXT FRMXTA D P EXT FRMTKT X P EXT FRMXKT l P EXT WRITVO P EXT WRITJT P EXT WTALLY P EXT WCHECK P EXT LINOPT P
0x0cb2f0…0cb484 Dummy {f00=0x0090, f01=0x0190, f02=» P EXT SPLIN8 P EXT GRASPV P EXT CLEAR8 , P EXT SPCHK5 @ P EXT FLDTST T P EXT CYOUT h P INCLUDE EQUATE z P P PKORT PROC P******************** P* : P** KORT - PROCEDURE FOR WRITI
0x0cb484…0cb618 Dummy {f00=0x0090, f01=0x018e, f02=»NOK NOT CORRECT TRANS ~ 2 P TBT GTREGFLG,KORTNOK MUST NOT BE FIRST TRANS 6 P TBF GTKASSE,KORTNOK ONLY IN KASSEFUNCTIONS(1-12) T * P CBE GTREGNR,=D'5',KORTNOK NOT TRANS 5 * P CBE GTREGNR,=D'7',KORTNOK NOT TRANS 7 > P** ASK FOR OLD SALDO,
0x0cb618…0cb7ac Dummy {f00=0x0090, f01=0x0190, f02=» PKORT10 P MOVE SPKEY,CBIN1 P CLEAR GTSLDFLG , P TBF CKTFLAG,KORT12 D P SET TTKORTFL ` PKORT12 v ( P PERF FRMXSP,CBIN12 SALDO/LINE/CHECK P SET SPPROMPT & P PERF SPCLRA WRITE/READ ON SCREEN P CLEAR SPPROMPT $ P
0x0cb7ac…0cb940 Dummy {f00=0x0090, f01=0x0190, f02=»30 CORRECT ENTERED P TBF CKTFLAG,KORT40 NO SALDO P SET GTSLDFLG @ * P CALL EMPTYT,TTKTSLD GL SALDO PRESENT? V P BE KORT40 YES P CLEAR GTSLDFLG NOT PRESENT P TBF CSLDFLG,KORT40 ALLOWED $ P MOVE SPBINW4,CBIN5 NOT ALLOWED $
0x0cb940…0cbad4 (0, 258) Dummy {f00=0x0090, f01=0x0190, f02=»TRANSPORT LINE IF NEEDED P MOVE SPINPUT,TTKTLIN ( P PERF SPCHK5 GET THE OLD LINE NUMBER > P CBG GSWBIN1,=W'89',KORT20 j ( P DSC1 KVOUCH,POS,GSWBIN1 POS ON LINE ( P ADD TTKTSLD,GTDUPF(CBIN4) NEW SALDO ( P ADD TTKTLIN,=D'1' ADD 1 TO LINE NO
0x0cbad4…0cbc68 Dummy {f00=0x0090, f01=0x0190, f02=»G PKORTOK P CLEAR TTKORTFL " P CMP CBIN0,CBIN0 OK, SET CR=0 0 P RET V PKORTNOK b P CLEAR TTKORTFL r $ P CMP CBIN1,CBIN0 NOK, SET CR <>0 P RET P PEND P EJECT PKKTRP PROC P******************** P
0x0cbc68…0cbdfc Dummy {f00=0x0090, f01=0x0190, f02=»****** , P PERF SPLIN8,CBIN6,CBIN2 WRITE KONTOKORT " P TBF GTCYFLG,KON20 IF IN CYCLE > P TBF GTCYWRTF,KON20 d P DSC0 KVOUCH,RLEAS P CLEAR TTTSTFLG PKON20 P PERF GRASPV GRASP VOUCHER P PERF CLEAR8 P TBF CKTFLAG,KON90
0x0cbdfc…0cbf90 Dummy {f00=0x0090, f01=0x0190, f02=» P DSC1 KVOUCH,POS,CMINLIN . P EDWRT .NW,KVOUCH,GTSTRFMT EDWRT TRP. LINE $ PKON30 V & P PERF SPLIN8,CBIN3,CBIN0 'NY SIDE' d P WAIT KVOUCH P DSC0 KVOUCH,RLEAS P PERF GRASPV P TESTIO KEYB ANY INPUT? P BOK KON35 YES P C
0x0cbf90…0cc124 Dummy {f00=0x0090, f01=0x0190, f02=»INPUT,GSWBCD3 P B KON40 PKON35 & P WAIT KEYB 4 & P CBE SPBINW2,CBIN18,KON40 SLUT KEY F ( P CBNE SPBINW2,CBIN4,KON30 ENTER KEY p PKON40 " P MOVE GSWBCD3,SPINPUT GET LINE P MOVE TTKTLIN,GSWBCD3 ( P CBG TTKTLIN,=D'24',KON30
0x0cc124…0cc2b8 Dummy {f00=0x0090, f01=0x0190, f02=»N1 P EDWRT KVOUCH,GTSTRFMT P ADD TTKTLIN,=D'1' ( PKON90 B P RET P P PEND P EJECT j PKKCH PROC x P******************** P* @ P** KKCH - THIS PROCEDURE COMPUTES A CHECK DIGIT FROM : P** AMOUNT (T
0x0cc2b8…0cc44c Dummy {f00=0x0090, f01=0x0190, f02=»******** P MOVE GSWBCD1,TTKTSLD SAVE ( P CBNL GSWBCD1,=D'0',KKCH10 NEGATIVE? 2 ( P MUL GSWBCD1,=D'-1' YES, CHANGE SIGN ^ PKKCH10 . P MUL GSWBCD1,TTKTLIN MULTIPLY WITH LINE NR * P SUB TTKTLIN,=D'1' SUB 1 FROM LINE NR P ADD GSWBCD1,TTK
0x0cc44c…0cc5e0 Dummy {f00=0x0090, f01=0x0190, f02=»BCD1,=D'7' REMAINDER " P SUB GSWBCD2,GSWBCD1 MODULUS 7 $ P ADD GSWBCD2,=D'1' ADD 1 ALWAYS B P CBL TTKTSLD,=D'0',KKCH20 j . P ADD GSWBCD2,=D'1' ADD 1 IF POSITIVE SALDO PKKCH20 P MOVE TTKTCHK,GSWBCD2 P RET P PEND P EJE
0x0cc5e0…0cc774 (0, 259) Dummy {f00=0x0090, f01=0x0190, f02=»ES THE VALUE | 2 P** AND SETS FLAG TO UPDATE ACCUMULATORS , P** MUST NOT BE IN FIRST TRANBS J & P** ONLY IN KASSEFUNCTIONS z P* P********** , P TBF TTEORFLG,MODPNOK NOT CORRECT TRANS P MOVE GTRETUR,CBIN0
0x0cc774…0cc908 Dummy {f00=0x0090, f01=0x0190, f02=» P MOVE SPKEY,CBIN1 P SET TTINVFLG @ P MUL GTDUPF(CBIN4),='-1' MULTIPLY BELOB BY -1 > P PERF SLUT P CLEAR TTINVFLG P CBNE GTRETUR,CBIN3,MODP50 P PERF KORT PMODP50 " P CMP CBIN0,CBIN0 OK, SET C
0x0cc908…0cca9c Dummy {f00=0x0090, f01=0x018e, f02=» PKVIT PROC P********** P* 0 . P** KVIT - WRITES AN EXTRA RECEIPT : & P** ONLY IN KASSEFUNCTIONS l P* P********** , P TBF TTEORFLG,KVITNOK NOT CORRECT TRANS 2 P TBT GTREGFLG,KVITNOK MUST NOT BE FIRS
0x0cca9c…0ccc30 Dummy {f00=0x0090, f01=0x018e, f02=» | H P PERF WRITJT,=W'1' WRITE 'KVIT' ON JOURNAL P MOVE TTCYM,=C'K' T P PERF FRMTKV n P PERF WRITVO WRITE RECEIPT P MOVE TTCYM,=C' ' P CLEAR GTLOKSPG " P CMP CBIN0,CBIN0 OK, SET CR =0 P RET P
0x0ccc30…0ccdc4 Dummy {f00=0x0090, f01=0x0190, f02=» P********** P* D P** ENTER - PERFORMS DIFFERENT CHECKS AFTER A PAGE HAS BEEN $ P** ENTERED ON SCREEN l P* " P** 1 ANY PAGE TWO ? P* > P** 2 FOR TRANSTYPE 51,53, REPETITION OF PAGE 3 ?
0x0ccdc4…0ccf58 Dummy {f00=0x0090, f01=0x0190, f02=»DISK AND WRITE RELEVANT RECEIPTS ~ P* ( P********** 2 ( P MOVE GTRETUR,CBIN0 SET RETURN CODE D P TBT GTTYPE3,ENTY3 p P TBT GTTYPE2,ENTY2 $ P* TYPE 1 - ONE PAGE TRANSACTION PENTY1 & P PERF FLDTST TEST FIELD DEPENDENCE P BNO
0x0ccf58…0cd0ec Dummy {f00=0x0090, f01=0x0190, f02=»GTRETUR,CBIN1 P TBF CKTAUTO,ENTWC P CBNE GTREGDEX,CBIN4,ENTWC 0 PENT01 R " P PERF KORT TRANS 4: KONTOKORT ` $ P MOVE GTRETUR,CBIN3 RESET SCREEN P CLEAR GTKORTFL P B ENTWC $ P* TYPE 2 - TWO PAGE TRANSACTION PENTY2
0x0cd0ec…0cd280 Dummy {f00=0x0090, f01=0x0190, f02=» MOVE GTRETUR,CBIN2 P B ENTOK P* , PENT10 6 P PERF FLDTST D P BNOK ENTNOK X P PERF SLUT l P BNOK ENTNOK ~ P TBT GTKORTFL,ENT01 P CBE GTRETUR,CBIN3,ENT01 P MOVE GTRETUR,CBIN3 P B ENTWC & P* TYPE 3 - THR
0x0cd280…0cd414 (0, 260) Dummy {f00=0x0091, f01=0x0190, f02=» n P PERF FMTNXT,CBIN2 P MOVE GTRETUR,CBIN2 " P B ENTOK > P* N PENT20 X P CBNE GTPAGE,CBIN2,ENT30 f P TBT GTSLUTFL,ENT30 & P* AFTER PAGE 2, GET LAST PAGE P PERF FMTNXT,CBIN3 P MOVE GTRETUR,CBIN2 P B ENT
0x0cd414…0cd5a8 Dummy {f00=0x0091, f01=0x0190, f02=»NOK ENTNOK P B ENT40 P* " PENT40 , P* CORRECT PAGE 3 : P PERF SLUT V P BNOK ENTNOK h P CLEAR GTKORTFL | P CBE GTSUM,=D'0',ENT50 P MOVE GTPAGE,CBIN4 P MOVE GTRETUR,CBIN1 P B ENTWC P* PENT50
0x0cd5a8…0cd73c Dummy {f00=0x0091, f01=0x0190, f02=» PENTOK " P CMP CBIN0,CBIN0 OK, SET CR =0 P RET < PENTNOK H $ P CMP CBIN1,CBIN0 NOK, SET CR<>0 V P RET ~ P* P PEND P EJECT PFMTNXT PROC FORMAL1 P******************* P* : P**
0x0cd73c…0cd8d0 Dummy {f00=0x0091, f01=0x0190, f02=» P* P****-************** & P MOVE GSWBIN1,FORMAL1 WHICH PAGE? * " P IB GSWBIN1,NXTATT,NXT20,NXT30 T PNXT20 z P MOVE GTPAGE,CBIN2 P CBE GTREGDEX,CBIN8,NXT208 P CBE GTREGDEX,CBIN9,NXT209 P CBE GTREGDEX,=W'24',NXT251
0x0cd8d0…0cda64 Dummy {f00=0x0091, f01=0x0190, f02=»0 P MOVE GSWBIN1,CBIN8 P B NXTATT & PNXT251 8 P MOVE GSWBIN1,CBIN3 F P B NXTATT b PNXT253 t P MOVE GSWBIN1,CBIN4 P B NXTATT PNXT30 P MOVE GTPAGE,CBIN3 P CBE GTREGDEX,CBIN8,NXT308 P CBE GTREGDEX,
0x0cda64…0cdbf8 Dummy {f00=0x0091, f01=0x0190, f02=»T309 P MOVE GSWBIN1,CBIN2 P B NXTATT ( PNXT351 : P MOVE GSWBIN1,CBIN5 H P B NXTATT d PNXT353 v P MOVE GSWBIN1,CBIN6 PNXTATT P PERF FRMXSP,GSWBIN1 P RET P PEND P EJECT PCYK PR
0x0cdbf8…0cdd8c Dummy {f00=0x0091, f01=0x0190, f02=»** ~ P IB CYTYPE, C & P CYK1,CYK2,CYKNOK,CYK4,CYKNOK, C & P CYKNOK,CYKNOK,CYKNOK,CYK9,CYEND J P B CYKNOK t P EJECT PCYK1 P******************** P* . P** CYK1 - START OF CYCLE FUNCTION P* P******
0x0cdd8c…0cdf20 Dummy {f00=0x0091, f01=0x0190, f02=»'C' FOR JOURNAL & P MOVE GTTEXT,=C'CYKLE ' FOR SCREEN P PERF CYKINT B P B CYKOK V PCYK1NOK f P B CYKNOK v P P PCYK2 P******************** P* . P** CYK2 - START OF STABEL FUNCTION P* P**
0x0cdf20…0ce0b4 (0, 261) Dummy {f00=0x0091, f01=0x0190, f02=»M,=C'S' FOR JOURNAL & P MOVE GTTEXT,=C'STABEL' FOR SCREEN P PERF CYKINT F P B CYKOK Z PCYK2NOK j P B CYKNOK z P P PCYK4 P******************** P* . P* CYK4 - PAUSE IN CYCLE / STABEL P*
0x0ce0b4…0ce248 Dummy {f00=0x0091, f01=0x018e, f02=»TRAKSCHECK r P TBT GTCYWRTF,CYKSUB 2 P MOVE TTARKSAV,GTDUPF(CBIN9) SAVE ARKIV KNT NR . > P SET TTPSEFLG INDICATE BREAK d P MOVE GTCYSUM,GTSUM P MOVE GTPSELIN,TTLINNR P PERF CYCLR & P ERASE 0,CBIN8,CBIN8
0x0ce248…0ce3dc Dummy {f00=0x0091, f01=0x0190, f02=» P P PCYK9 P******************** $ P* @ * P** CYK9 - CLEAR ARKIV KONTO NR J P* x P******************** P TBF TTCY1FLG,CYK9NOK & P MOVE TTARKSAV,=D'0' CLEAR NUMBER P B CYKOK PCYK9NOK P B
0x0ce3dc…0ce570 Dummy {f00=0x0091, f01=0x0190, f02=» WRITE TOTAL LINE ON VOUCHER P* ! ( P******************** ! 2 * P TBF GTCYFLG,CYENDNOK ONLY IF IN CYCLE ! N P TBT TTCY2FLG,CYEND10 ! | 6 P CBNE GTSUM,=D'0',CYEND30 SUM CORRECT? (ONLY CY1) ! PCYEND10 ! : P CLEAR TTSUMFLG
0x0ce570…0ce704 Dummy {f00=0x0091, f01=0x0190, f02=» CLEAR TTTSTFLG ! P WAIT KVOUCH " P MOVE GSWBIN1,TTLINNR " . . P DSC1 KVOUCH,POS,GSWBIN1 POSITION VOUCHER " L P MOVE GSWSTR9,=C'TOTAL ' " ~ ( P PERF FRMXVO,CBIN2 GET TOTAL FORMAT " , P EDWRT KVOUCH,GTSTRFMT EDWRT ON VOUCHER " @ P DSC
0x0ce704…0ce898 Dummy {f00=0x0091, f01=0x0190, f02=»D15 " 6 P CBL GTREGNR,=D'18',CYEND20 CHECKS? # P SET TTTSTFLG # F B P MOVE GTREGF(CBIN4),TTCYKTOT FIND TOTAL VALUE # h " P PERF WCHECK,CBIN1 WRITE CHECK # PCYEND20 # P CLEAR TTTSTFLG # P PERF CLRSW
0x0ce898…0cea2c Dummy {f00=0x0091, f01=0x0190, f02=»IN12 # P PERF SPERR $ P IB SPBINW2,CYENDCNT,CYEND10 $ * PCYENDOK $ N & P ERASE 0,CBIN8,CBIN8 ERASE LINE 8 $ ^ P PERF SPINF1 $ PCYENDCNT $ P B CYKOK $ PCYENDNOK $ P B CYKNOK $ P* $ PCYKOK $ P CMP CBIN0,CBIN0 O
0x0cea2c…0cebc0 Dummy {f00=0x0091, f01=0x0190, f02=»****************** $ P* % . P** CYKINT - START OR END OF CYCLE % $ P* % V 6 P** START SET RELEVANT INFORMATION AND READ % ` 8 P** ARKIV KNT.NR, KONTROLSUM AND LRER-9 % P* % 0 P** END CLEAR RELEVANT INFORMAT
0x0cebc0…0ced54 (0, 262) Dummy {f00=0x0091, f01=0x0190, f02=» TRUE- IN PAUSE STATE % j P PERF CYK,CBIN10 & P RET & 8 PCY05 & D P PERF CYCLR & P P RET & d PCY10 & p ( P SET TTSUMFLG INDICATE SUM ON SCREEN & | P SET GTCYFLG INDICATE CYCLE & @ P TBF TTPSEFLG,CY30 TRUE- PAUSE STATE
0x0ced54…0ceee8 Dummy {f00=0x0091, f01=0x018e, f02=»R & P P CBG GTPSELIN,CBIN0,CY20 ' , P MOVE GTPSELIN,TTCYKST RESET START LINE ' * P MOVE TTCYKPOS,TTCYKST ' Z PCY20 ' x P MOVE TTLINNR,GTPSELIN ' B P CLEAR TTPSEFLG OUT OF PAUSE STATE ' P B CY90 ' PCY30 ' . P MOV
0x0ceee8…0cf07c Dummy {f00=0x0091, f01=0x0190, f02=» , P CLEAR TTCYTRFL BEFORE 1. TRANS IN CYKEL ( " P MOVE TTLINNR,=D'1' ( 4 H P PERF FRMXSP,CBIN11 GET FORMAT FOR CYCLE INF ( Z P SET SPPROMPT ( H P PERF SPCLRA WRITE AND READ ON SCREEN
0x0cf07c…0cf210 Dummy {f00=0x0091, f01=0x0190, f02=»RR ( | P B CY30 ) PCY45 MAK ) ( P CLEAR TTCY1FLG ) : P CLEAR TTCY2FLG ) R P B CY05 ) j PCY50 ) z P CBL TTLINNR,=D'25',CY55 ) P MOVE TTLINNR,=D'1' ) PCY55 ) P MOVE SPINPUT,TTLINNR ) P PERF SPCHK5 ) , P MOVE TT
0x0cf210…0cf3a4 Dummy {f00=0x0091, f01=0x0190, f02=»OVE TTCYKPOS,TTLINNR ) P MOVE GTCYIN,TTASKNR * P SUB GTCYIN,CBIN1 * 8 P MUL GTCYIN,CCYSIZE * R P ADD GTCYIN,CBIN1 * n P MOVE GTCYOUT,GTCYIN * PCY90 * P SET GTCYWRTF * P TBT CCYWRTF,CY95 * P CLEAR GTCYWRTF * PCY95 * P
0x0cf3a4…0cf538 Dummy {f00=0x0091, f01=0x018e, f02=»LEINFORMATION * t P* + P****************** + " P MOVE GTTEXT,=C' ' + : P MOVE TTCYM,=C' ' + ` ( P MOVE GTREGF(CBIN9),=D'0' + P MOVE GTSUM,=D'0' + P CLEAR GTCYFLG + P CLEAR TTS
0x0cf538…0cf6cc Dummy {f00=0x0091, f01=0x0190, f02=» P EJECT , PLSTINT PROC , P******************** , . P* , J , P** LSTINT - INITIATE LISTFUNCTION , T P* , P******************** , P TBT GTCYFLG,LSTNOK , $ P TBT TTLSTFLG,LSTEND , P* FIRST TIME , P
0x0cf6cc…0cf860 Dummy {f00=0x0091, f01=0x0190, f02=»ERF FRMXTA,CBIN1 GET HEADER FOR TALLY ROLL , B P PERF WTALLY WRITE ON TALLY ROLL - B & P MOVE GTTEXT,=C'LISTE ' - P B LSTOK - P* LAST TIME - PLSTEND - P WAIT KTALLY - P MOVE GSWBCD6,GT
0x0cf860…0cf9f4 (0, 263) Dummy {f00=0x0091, f01=0x0190, f02=»,CBIN8,CBIN8 - P CLEAR TTLSTFLG . P CLEAR TTSUMFLG . 6 " P MOVE GTTEXT,=C' ' . X PLSTOK . ~ P PERF SPINF1 . " P CMP CBIN0,CBIN0 OK, SET CR=0 . P RET . PLSTNOK . $ P CMP CBIN1,CBIN0 NOK, SET CR<>0 . P
0x0cf9f4…0cfb88 Dummy {f00=0x0091, f01=0x0190, f02=»TOT - SUBTOTAL . P* / 6 P** LISTFUNCTION- WRITE SUBTOTAL ON TALLY / P* / Z 2 P** CYCLEFUNCTION- SAVE CYCLE INFORMATION / d $ P** WRITE SUBTOTAL / * P** IN CYCLE-PAUSE-STATE / P* / P**************
0x0cfb88…0cfd1c Dummy {f00=0x0091, f01=0x0190, f02=»YC IN CYCLE / ~ P TBF GTSUMKEY,SUBTNOK IN SUM 0 P* SUBTOTAL IN SUM 0 8 P SET GTSUBFLG 0 R P PERF SUM 0 h P CLEAR GTSUBFLG 0 z P B SUBTOK10 0 P* SET PAUSE IN CYCLE 0 PSUBTCYC 0 , P TBT GTBDTFLG,SUBTNOK NOT IF BUNDTCHECK 0 , P TBT G
0x0cfd1c…0cfeb0 Dummy {f00=0x0091, f01=0x0190, f02=»SEFLG INDICATE BREAK 0 | ( P PERF FRMXVO,CBIN3 GET SUBTOT FORMAT 1 . P SET GTCYWRTF 1 Z @ P PERF WRITVO WRITE SUBTOT LINE 1 p P WAIT KVOUCH 1 @ P DSC0 KVOUCH,RLEAS RELEASE VOUCHER 1
0x0cfeb0…0d0044 Dummy {f00=0x0091, f01=0x0190, f02=»E LINNR 1 b P MOVE GTPSELIN,TTLINNR 2 ( P MOVE GTCYIN,TTASKNR INITIATE CYSET 2 . P SUB GTCYIN,CBIN1 2 Z * P MUL GTCYIN,=W'30' SIZE OF CYCLE PAGE 2 t P ADD GTCYIN,CBIN1 2 P MOVE GTCYOUT,GTCYIN 2 P PERF CYCLR 2 P B SUBTOK 2 P* SUBTOTAL
0x0d0044…0d01d8 Dummy {f00=0x0091, f01=0x0190, f02=»TALLY WRITE ON TALLY ROLL 2 ~ PSUBTOK 3 4 & P ERASE 0,CBIN8,CBIN8 ERASE LINE 8 3 B P PERF SPINF1 3 l PSUBTOK10 3 " P CMP CBIN0,CBIN0 OK, SET CR=0 3 P RET 3 PSUBTNOK 3 $ P CMP CBIN1,CBIN0 NOK, SET CR<>0 3 P RET 3
0x0d01d8…0d036c Dummy {f00=0x0091, f01=0x0190, f02=»L 3 ` 0 P** TRANSACTIONS FROM THE INITIATING 4 & P** POINT TO THE RELEASING. 4 > & P** FIRST TIME: INITIATING 4 h 0 P** LAST TIME: WRITE SUM ON VOUCHER 4 P* 4 P******************** 4 P TBT GTSUMKEY,SUM50 4 P
0x0d036c…0d0500 Dummy {f00=0x0091, f01=0x0190, f02=» P MOVE GTSUMST,TTLBNR 5 , P ADD GTSUMST,=D'1' INITIATE FIRST NUMBER 5 & P MOVE GTSUMCNT,=D'0' INITIATE SUM 5 P P B SUMOK 5 z P* 5 P* LAST TIME 5 PSUM50 5 . P PERF WRITJT,=W'4' WRITE SLUT SUM FUNCTION 5 P TBT GTSUBFLG,SUM60 5 P
0x0d0500…0d0694 (0, 264) Dummy {f00=0x0092, f01=0x0190, f02=»YCLE 5 v P DSC0 KVOUCH,RLEAS 6 $ P MOVE GSWBCD5,TTLINNR SAVE LINNR 6 & P CLEAR TTTSTFLG 6 N PSUM70 6 f P PERF GRASPV 6 t P CLEAR GTSWFLAG 6 P PERF LINOPT 6 P BNOK SUM60 6 P CBG GSWBIN1,=W'90',SUM75 6 , P CBNE GSWBIN1,CBIN0,SUM80 DEFA
0x0d0694…0d0828 Dummy {f00=0x0092, f01=0x018e, f02=»BIN1 6 | ( P MOVE TTLINNR,GSWBCD5 RESTORE LINNR 7 P PERF FRMXVO,CBIN7 7 8 P EDWRT KVOUCH,GTSTRFMT 7 R P PERF CRVO 7 p P DSC0 .NW,KVOUCH,RLEAS 7 P TBT GTSUBFLG,SUMOK10 7 P TBT GTASUMFL,SUM10 7 PSUMOK 7 P PERF SPINF1 7 PSUMOK10 7
0x0d0828…0d09bc Dummy {f00=0x0092, f01=0x0190, f02=» . P** DIVTR - SET OR CLEAR DIVTR FLAG 8 P* 8 6 P******************** 8 @ P TBT CTRVALG,DIVTRNOK 8 P TBT GTDIVTR,DIVEND 8 z P* SET DIVTR 8 P SET GTDIVTR 8 P SET GTTRSEL 8 P CBE TTDKDEX,CBIN1,DIV10 8 P PERF SETDEB
0x0d09bc…0d0b50 Dummy {f00=0x0092, f01=0x018e, f02=»NOK 8 ~ P CLEAR GTDIVTR 9 P CLEAR GTBDTFLG 9 " P CLEAR GTSTRFLG 9 : P MOVE TTSTYRDX,CBIN1 9 R P B DIVTROK 9 n P* 9 PDIVTROK 9 " P CMP CBIN0,CBIN0 OK, SET CR=0 9 P RET 9 PDIVTRNOK 9 $ P CMP CBIN1,CBIN0 NOK, SET CR<>0 9 P RET
0x0d0b50…0d0ce4 Dummy {f00=0x0092, f01=0x4102, f02=» 9 d P* : P******************** : P MOVE GSWBIN1,CBIN1 : . PCLRSW1 : J " P MOVE GSSWITCH(GSWBIN1),CBIN0 : X P ADD GSWBIN1,CBIN1 : ~ P CBL GSWBIN1,CBINMAX,CLRSW1 : P RET : P PEND : P* : P* : P END : @ : P RET
0x0d0ce4…0d0e78 Dummy {f00=0x0092, f01=0x2008, f02=» ; RELEASE VOUCHER x P PERF CYKINT * 8 P MOVE GTCYSUM,GTSUM SAVE SUM H P SUB GTLINNR,CB&N : P MOVE GTCYKPOS,GTLINNR SAVE LINNR P RET B P PERF
0x0d0e78…0d100c Dummy {f00=0x0092, f01=0x0190, f02=»ODE NO FIX BUFFER ALLOCATED FIX BUFFER NOT ALLOWED ILLEGAL CONTROL CODE ILLEGAL INDEX VALUE FORMAT CONDITIONS CHANGED ILLEGAL PARAMETER LENGTH ERROR DATASET BUSY ILLEGAL DATASET REFERENCE TOO MANY KIA/NKIA STACK LEVELS DISC ERROR; NO REENTER POINT
0x0d100c…0d11a0 Dummy {f00=0x0092, f01=0x0190, f02=» ( M _" @s P @s Pj Pf rx V $ $T$ D BR V T D P T D @PL E @W . @r P$ q r $ $P BT , D E @ : @q P Aq H As W TW V Aq s s V As TB( t ( Aq s @s V P ( R W q TB( t : TB( u : A
0x0d11a0…0d1334 (0, 265) Opaque[0x194]
0x0d1334…0d14c8 # DirEnt {nam=»DIVFMT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1248, f03=0x0000}
0x0d1334…0d14c8 IdxSect {
0x0d1334…0d14c8 f00 = 0x0092 // 0xd1334 @0x0
0x0d1334…0d14c8 f01 = 0x0016 // 0xd1336 @0x2
0x0d1334…0d14c8 gno = [ // 0xd1338 @0x4
0x0d1334…0d14c8 [0x00]: C0x0092.0x1.0
0x0d1334…0d14c8 [0x01]: C0x0092.0x2.0
0x0d1334…0d14c8 [0x02]: C0x0092.0x3.0
0x0d1334…0d14c8 [0x03]: C0x0093.0x0.0
0x0d1334…0d14c8 [0x04]: C0x0093.0x1.0
0x0d1334…0d14c8 [0x05]: C0x0093.0x2.0
0x0d1334…0d14c8 [0x06]: C0x0093.0x3.0
0x0d1334…0d14c8 [0x07]: C0x0094.0x0.0
0x0d1334…0d14c8 [0x08]: C0x0094.0x1.0
0x0d1334…0d14c8 [0x09]: C0x0094.0x2.0
0x0d1334…0d14c8 [0x0a]: C0x0094.0x3.0
0x0d1334…0d14c8 ]
0x0d1334…0d14c8 }
0x0d14c8…0d165c Dummy {f00=0x0092, f01=0x0190, f02=» P IDENT DIVFMT 03.01.XXX.1 P DDUM KMD08 & P PDIV D P ENTRY FRMTJT Z P ENTRY FRMXJT p P ENTRY FRMTTA P ENTRY FRMXTA P ENTRY FRMTVO P ENTRY FRMTKV P ENTRY FRMXVO P ENTRY FRMTKT
0x0d165c…0d17f0 Dummy {f00=0x0092, f01=0x0190, f02=» PROC 0 P CALL FMOVE,GTSTRFMT,FTBJT(GTREGDEX) P RET B P PEND V P* l PFRMXJT PROC XJTDEX v ( P CALL FMOVE,GTSTRFMT,FTBXJT(XJTDEX) P RET P PEND P* PFRMTTA PROC 0 P CALL FMOV
0x0d17f0…0d1984 Dummy {f00=0x0092, f01=0x0190, f02=»XTA(XTADEX) x P RET P PEND P* . PFRMTVO PROC 8 0 P CALL FMOVE,GTSTRFMT,FTBVO(GTREGDEX) L P RET P PEND P* PFRMXVO PROC XVODEX ( P CALL FMOVE,GTSTRFMT,FTBXVO(XVODEX) P RET P P
0x0d1984…0d1b18 Dummy {f00=0x0092, f01=0x018e, f02=» 0 P CALL FMOVE,GTSTRFMT,FTBKT(GTREGDEX) P RET < P PEND P P* f PFRMXKT PROC XKTDEX p ( P CALL FMOVE,GTSTRFMT,FTBXKT(XKTDEX) P RET P PEND P* PFRMTGP PROC ( P CALL FMOVE,GTSTRFMT,FTB
0x0d1b18…0d1cac Dummy {f00=0x0092, f01=0x0190, f02=» j P RET P PEND P* " P* , P* 6 P EJECT @ P* V P* FORMATS FOR JOURNAL ` P* @ PFTBJT FTABLE JTFMT01,JTFMT02,JTFMT03,JTFMT04,JTFMT02, C 2 P JTFMT01,JTFMT02,JTFMT08,JTFMT08,JTFMT02, C . P
0x0d1cac…0d1e40 Dummy {f00=0x0092, f01=0x0190, f02=»F b 2 P FLINK JTSUB01 LINE 1 P FEOR @ 2 P FLINK JTSUB04 LINE 2 V P FMEND P* PJTFMT02 FRMT P FLINK JTFMT02L P FMEND P* PJTFMT02L FRMT 2 P
0x0d1e40…0d1fd4 (0, 266) Dummy {f00=0x0092, f01=0x0190, f02=» P FLINK JTSUB08 VALUE P FEOR P FILLR ' ',8 6 F P FMEL 'X',GTDUPF(CBIN6) RE$ R P FILLR ' ',2 P FLINK JTSUB06 FOR TRANS 10 P FLINK JTSUB30 ARKIV KNT.NR P FILLR '
0x0d1fd4…0d2168 Dummy {f00=0x0092, f01=0x0190, f02=» FLINK JTSUBST START INF P FILLR ' ',9 8 $ P FCOPY TT16TXT RATE/RENTE/GEBYR T 2 P FLINK JTSUB06 CPR/CIR | 0 P FLINK JTSUB08 VALUE P FEOR P FIL
0x0d2168…0d22fc Dummy {f00=0x0092, f01=0x0190, f02=»,5 ~ H P FMEL 'ZZ.ZZ.ZZ',GTDUPF(CBIN7) VALGR F P FMEL 'BBZ',GTDUPF(CBIN8) BETALINGSFORM BFO V 8 P FLINK JTSUB30 ARK KONTO NR P FILLR ' ',2 8 P FMEL '
0x0d22fc…0d2490 Dummy {f00=0x0092, f01=0x0190, f02=» FILLR ' ',4 P FMEND P* * PJTFMT04 FRMT 4 P FLINK JTFMT04L H P FMEND ` P* n PJTFMT04L FRMT x P FLINK JTSUBST START INF P FILLR ' ',15 2 P FLINK JTSUB06 CPR/CIR 0 P
0x0d2490…0d2624 Dummy {f00=0x0092, f01=0x0190, f02=»IN3) BKO | P FILLR ' ',5 D P FMEL 'ZZ.ZZ.ZZ',GTDUPF(CBIN7) VALOR $ P FILLR ' ',3 l 6 P FLINK JTSUB30 ARK KNT NR B P FMEL 'BBBZZ',GTDUPF(CBIN10) F$R F P
0x0d2624…0d27b8 Dummy {f00=0x0092, f01=0x0190, f02=»M$ R B P FMEL 'BBZB',GTDUPF(CBIN13) OPK P FMEND P P* f PJTFMT08 FRMT p P FLINK JTFMT08L P FMEND P* PJTFMT08L FRMT 4 P FLINK JTSUBST START INF 2 P
0x0d27b8…0d294c Dummy {f00=0x0092, f01=0x018e, f02=»R 2 P FLINK JTSUB31 LINE 3 P FMEND @ P* V PJTFMT12 FRMT ` P FLINK JTFMT12L t P FMEND P* PJTFMT12L FRMT 4 P FLINK JTSUBST START INF 8 P FLINK JTSUB05
0x0d294c…0d2ae0 Dummy {f00=0x0092, f01=0x0190, f02=» P FILLR ' ',2 0 P FLINK JTSUB08 VALUE P FEOR T P FILLR ' ',2 b 2 P FMEL 'BZZZZZZZZZZ',GTDUPF(CBIN2) DIVERSE TEXT v P FILLR ' ',16 P FMEND P* $ PJTFMT18 FRMT TRANS 18,19,28,29 ( P FLINK
0x0d2ae0…0d2c74 (0, 267) Dummy {f00=0x0092, f01=0x0190, f02=» START INF r P FILLR ' ',2 P FCOPY GTTESTMK 6 : P FCOPY TTCYM CYCLE MARKERING N 8 P FMEL '99B',GTREGNR TRANS, TYPE P FLINK FLBNR P FMEND P* : PJTSUB01 FRM
0x0d2c74…0d2e08 Dummy {f00=0x0092, f01=0x0190, f02=»08 VALUE | P FMEND P* 6 PJTSUB04 FRMT @ P FILLR ' ',2 V P FILLR ' ',4 r P FMEL 'ZZ',GTDUPF(CBIN3) BKO * P FMEL 'BZZ.ZZ.ZZ',GTDUPF(CBIN7) V.DATO B P FMEL 'BBX',GTDUPF(CBIN6)
0x0d2e08…0d2f9c Dummy {f00=0x0092, f01=0x018e, f02=»L 'XXXXXXE-XXXX',GTDUPF(CBIN10) YD.MODT ( P FMEL 'BXX',GTDUPF(CBIN11) BET. ART 0 P FMEND P* r 6 PJTSUB05 FRMT REG KNT NR | 6 P FMEL 'B999E-99E-999E-99B',GTDUPF(CBIN1) P FMEND P*
0x0d2f9c…0d3130 Dummy {f00=0x0092, f01=0x0190, f02=» j P FB JTLAB08 PJTLAB06 P FBT BLEV,JTLAB07 , & P FMEL 'XXXXXXE-XXXX',GTDUPF(CBIN2) F P FB JTLAB08 p PJTLAB07 ( P FMEL 'XXX.XXXXX.XXB',GTDUPF(CBIN2) PJTLAB08 P FMEND P* P* 8 PJTSUB08 FRMT
0x0d3130…0d32c4 Dummy {f00=0x0092, f01=0x0190, f02=» FMEND P* PJTSUB10 FRMT LEVERANDOER NR & P FMEL 'XXXXXXXXE-XX',GTDUPF(CBIN2) B P FMEND l P* z PJTSUB18 FRMT P FILLR ' ',2 " P FMEL 'XXX',GTDUPF(CBIN15) TXT * P FMEL 'BXXXXXXXXXX',GTDUPF(CBIN13) NR- , P FMEL 'B
0x0d32c4…0d3458 Dummy {f00=0x0092, f01=0x0190, f02=» FMEND P* 6 PJTSUB30 FRMT ARK KNT NR 6 P FMEL 'BBZZZE-ZZE-ZZZE-ZZ',GTDUPF(CBIN9) R P FMEND P* 6 PJTSUB31 FRMT LINE 3 - 8 P FILLR ' ',2 F P FMEL
0x0d3458…0d35ec Dummy {f00=0x0092, f01=0x0190, f02=» FMEL 'BZZZZZZZZZZ',GTDUPF(CBIN14) LEV NR D P FMEL 'BZZZZ',GTDUPF(CBIN15) TXT NR H D P FMEL 'BZZ',GTDUPF(CBIN16) OMR NR D P FMEL 'BZZ.ZZ.ZZ',GTDUPF(CBIN18)
0x0d35ec…0d3780 Dummy {f00=0x0092, f01=0x0190, f02=» ADR KODE h P FMEND " P* 8 P EJECT B P* P 0 P* VARIOUS FORMATS FOR JOURNAL TAPE Z P* @ PFTBXJT FTABLE XJTF01,XJTF02,XJTF03,XJTF04,XJTF05,XJTF06, C 2 P XJTF07,FMTFMT,XJTF09,XJTF10,XJTF11,VOX15,
0x0d3780…0d3914 (0, 268) Dummy {f00=0x0093, f01=0x018e, f02=» =' KVIT' P FMEND P* PXJTF02 FRMT KONTOKORT * P FILLR ' ',2 H P FLINK XJTF02L P FMEND r P* PXJTF02L FRMT P FLINK FLBNR P FILLR ' ',2 P FCOPY ='KONTOKORT' P FBF GTSLDFLG,XJTF02EX & P FMEL 'B
0x0d3914…0d3aa8 Dummy {f00=0x0093, f01=0x018e, f02=» z P FMEND P* PXJTF04 FRMT P FLINK VOSUM07 4 P FCOPY =' SUM' J P FMEND ` PXJTF05 FRMT n P FLINK XJTF05L P FMEND P* P* PXJTF05L FRMT P FILLR ' ',2 P FILLR '*',50 P FEOR P F
0x0d3aa8…0d3c3c Dummy {f00=0x0093, f01=0x0190, f02=» P FCOPY ='MASKIN NR' P FCOPY =' EKS.LBNR' $ P FEOR @ P FILLR ' ',2 N P FCOPY GTTESTMK b P FMEL '99.99.999.9',CVERSNR z P FILLR ' ',2 P FMEL '99E-99E-99',CMASKDAT P FILLR ' ',3 P FMEL '99E-99E-99',GTDATO
0x0d3c3c…0d3dd0 Dummy {f00=0x0093, f01=0x0190, f02=»ILLR ' ',2 : P FCOPY ='VERSURKONTONR KASSEKONTONR PRIMO KASSE ' P FEOR P P FILLR ' ',2 ^ & P FMEL 'B999.99.999.99BBB',TVERSUR r & P FMEL 'B999.99.999.99BBB',TTCASHAC $ P FMEL 'ZZZ.ZZZ.ZZ9.ZZ-',TTSTCASH P FEOR P FILLR ' ',2
0x0d3dd0…0d3f64 Dummy {f00=0x0093, f01=0x0190, f02=» P FILLR ' ',2 P FILLR '*',50 P FEOR . P FILLR ' ',2 < P FCOPY ='KASSELUKNING' P P FILLR ' ',30 n P FEOR P FILLR ' ',2 P FCOPY ='T[LLER' P FILLR ' ',10 P FCOPY ='DEBET' P FILLR ' ',12 P FCOPY
0x0d3f64…0d40f8 Dummy {f00=0x0093, f01=0x0190, f02=» ',2 P FMEL 'ZZ',GTWBCD1 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(GSWBIN5,CBIN2) & 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(GSWBIN5,CBIN1) ` P FMEND P* PXJTF09 FRMT P FCOPY =' START TEST' P FMEND P* PXJTF10 FRMT
0x0d40f8…0d428c Dummy {f00=0x0093, f01=0x0190, f02=» FMEND P* PXJTF13 FRMT P FILLR ' ',2 , P FLINK XJTF13L @ P FMEND V P* d PXJTF13L FRMT n P FLINK JTSUB05 REG KNT NO * P FMEL 'BZZZ',GTDUPF(CBIN2) COUNTER NO 2 P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) VALUE P
0x0d428c…0d4420 Dummy {f00=0x0093, f01=0x0190, f02=» P FMEL '99B',GTWBCD2 P FCOPY GSWSTR9 P FMEL '99',GTWBCD1 6 P FMEND P P* ^ PXJTF16 FRMT h P FILLR ' ',2 | P P P FMEL '****9',CCHKLBNR P FCOPY =' CHECK' P FMEND P* PFMTFMT FRMT P FLINK
0x0d4420…0d45b4 (0, 269) Dummy {f00=0x0093, f01=0x0190, f02=» EJECT P* : P* FORMATS FOR VOUCHER 'BILAG AFSTEMPLING' P* V @ PFTBVO FTABLE BAFST01,BAFST02,BAFST03,BAFST04,BAFST02, C ` @ P BAFST01,BAFST02,BAFST08,BAFST08,BAFST02, C 2 P BAFST12,BAFST01,BAFST01,BAFST0
0x0d45b4…0d4748 Dummy {f00=0x0093, f01=0x0190, f02=»T52,BAFST53,BAFST54 P* P* & PBAFST01 FRMT TRANS 01-06 0 P FLINK BAFST01L R P FMEND j P* x PBAFST01L FRMT 8 P FLINK BSUB01 HEADER P FBT TTKORTFL,B1LAB1 P FILLR ' ',6 " P FME
0x0d4748…0d48dc Dummy {f00=0x0093, f01=0x0190, f02=»MEL 'B**B',GTDUPF(CBIN3) BKO PB1LAB2 $ < P FLINK JTSUB06 CPR-CIR-NR 2 @ P FLINK BSUB02 REGKONTO-BELOB r P FMEND P* P* B PBAFST02 FRMT
0x0d48dc…0d4a70 Dummy {f00=0x0093, f01=0x0190, f02=» HEADER l P FILLR ' ',1 ! 8 P FMEL '******E-****',GTDUPF(CBIN2) CPR/CIR TRANS 10 ! , P FILLR '*',3 ! h P FBT TTKORTFL,B2LAB1 ! | P FILLR '*',13 ! PB2LAB1 ! @ P FLINK BSUB02 REGKONTO-BELOB ! P
0x0d4a70…0d4c04 Dummy {f00=0x0093, f01=0x0190, f02=»* ! PBAFST08L FRMT " 8 P FLINK BSUB01 HEADER " $ P FMEL 'BBB**B',GTDUPF(CBIN3) BKO " P FBZ GTUSED(CBIN13),B8LAB1 " . P FMEL 'ZZZZZZZZZZB',GTDUPF(CBIN13) FAKTNR " P FB B8LAB5 " PB8LAB1 " P FBZ GTUSED(CBIN
0x0d4c04…0d4d98 Dummy {f00=0x0093, f01=0x0190, f02=»14) LEVNR " p PB8LAB5 # P FLINK JTSUB10 LEVERAND. # > P FLINK BSUB02 REGKONTO-BELOB # @ P FMEND # P* # P* # PBAFST12 FRMT TRANS 12 # P FLINK BAFST12L # P FMEND # P* # PBAFST12L FRMT
0x0d4d98…0d4f2c Dummy {f00=0x0093, f01=0x0190, f02=»MEL '999B',GTMSK MASKINNR # P FLINK FLBNR $ 8 @ P FMEL 'B99.99.99',GTDATO POSTERINGSDATO $ L B P FCOPY TTSUPMRK SUPPLEMENTS-MARK $ < P FMEL '99',GTREGNR TRANSTY
0x0d4f2c…0d50c0 Dummy {f00=0x0093, f01=0x018e, f02=» TTKORTFL,B12LAB1 $ P FILLR '*',13 % PB12LAB1 % 0 @ P FLINK BSUB02 REGKONTO-BELOB % @ P FMEND % P* % P* % PBAFST03 FRMT BILAG TRANS 3 % P FLINK BSUB10 % P FLINK BSUB11 % P FLINK BSU
0x0d50c0…0d5254 (0, 270) Dummy {f00=0x0093, f01=0x0190, f02=» P FMEND & P* & P* & PBAFST40 FRMT & & P FMEND & : P* & H PBAFST41 FRMT & R P FMEND & f PBAFST42 FRMT & t P FMEND & P* & PBAFST45 FRMT & P FMEND & P* & PBAFST46 FRMT & P FMEND & P* & PBAFST47 FRMT &
0x0d5254…0d53e8 Dummy {f00=0x0093, f01=0x0190, f02=» FMEND & P* ' PBAFST51 FRMT ' P FMEND ' , P* ' : PBAFST52 FRMT ' D P FMEND ' X P* ' f PBAFST53 FRMT ' p P FMEND ' P* ' PBAFST54 FRMT ' P FMEND ' P* ' P* ' P* ' 8 PBSUB01 FRMT
0x0d53e8…0d557c Dummy {f00=0x0093, f01=0x0190, f02=» FMEL '999B',GTMSK MASKINNR ' P FLINK FLBNR ( @ @ P FMEL 'B99.99.99',GTDATO POSTERINGSDATO ( T B P FCOPY TTSUPMRK SUPPLEMENTS-MARK ( < P FMEL '99',GTREGNR
0x0d557c…0d5710 Dummy {f00=0x0093, f01=0x0190, f02=»EGKONTONR ( < P FMEL '*.***.***.**9.99-',GTDUPF(CBIN4) BELOB ) B P FCOPY TTDBKRM DEBET/KREDIT-MARK ) R P FILLR ' ',1 ) P FMEND ) P* ) P* ) PBSUB04 FRMT ) P FCOPY GTTESTMK )
0x0d5710…0d58a4 Dummy {f00=0x0093, f01=0x0190, f02=»,GTMSK MASKINNR ) z " P FMEL '99B',GTDUPF(CBIN3) BKO * ( P FMEND * N P* * d P* * n PBSUB05 FRMT * x P FLINK FLBNR * > P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) BELOB * B P FCOPY TTDBKRM
0x0d58a4…0d5a38 Dummy {f00=0x0093, f01=0x0190, f02=»F(CBIN3) BKO * ~ P FBT TTKORTFL,B6LAB1 + P FCOPY TT07TXT + 0 P FILLR ' ',1 + F . P FMEL 'ZZ.ZZ.ZZB',GTDUPF(CBIN7) VAL. DATO + Z PB6LAB1 + P FMEND + P* + P* + PBSUB07 FRMT + P FILLR ' ',1 + < P FLINK JTSUB06
0x0d5a38…0d5bcc Dummy {f00=0x0093, f01=0x0190, f02=» DEBET/KREDIT-MARK + n P FILLR ' ',1 , & P FLINK SKAF01 LINE NR , : P FMEND , X P* , n PBSUB10 FRMT , x P FILLR '+',2 , P FCOPY GTTESTMK TEST MARK , P FMEL '999B',GTMSK MASKINNR , P FLINK FLBNR , & P FMEL 'B99.99.
0x0d5bcc…0d5d60 Dummy {f00=0x0093, f01=0x0190, f02=»P]L]R , v 2 P FMEL 'E-9999999999B',GTDUPF(CBIN2) DEBITOR NR - , P FMEL 'XX.XXPP',GTDUPF(CBIN7) VALOERDATO - D & P FMEL 'BXB',GTDUPF(CBIN12) RTE/GEB - t P FMEND - P* - PBSUB12 FRMT - P FBF TTASKAT,B12LAB5 - $ P FMEL 'XX',GTDUPF(CBIN11) REST]R -
0x0d5d60…0d5ef4 (0, 271) Dummy {f00=0x0093, f01=0x018e, f02=») DEBITORNR - n , P FMEL 'XX.XXPP',GTDUPF(CBIN7) VALOERDATO . P FILLR ' ',3 . D P FMEND . X P* . f PBSUB13 FRMT . p 2 P FMEL '*.***.***.**9.99-',GTDUPF(CBIN4) VALUE . P FCOPY TTDBKRM . P FILLR ' ',1 . P FMEND . P* . PFLBNR FRMT
0x0d5ef4…0d6088 Dummy {f00=0x0093, f01=0x018e, f02=» . z PFLBNR20 / P FMEND / P* / & P EJECT / 0 P* / > * P* VARIOUS FORMATS FOR VOUCHER / H P* / v : PFTBXVO FTABLE FMTFMT,VOFMT02,VOFMT02,BAXF04,BAXF05, C / * P BAXF06,VOSUM07,VOX08,VOX09,VOX10, C / ( P VOX11,VOX12,VOX13,VOX14,VO
0x0d6088…0d621c Dummy {f00=0x0093, f01=0x018e, f02=» / ~ P FMEND 0 P* 0 PVOFMT02L FRMT 0 P FILLR '+',2 0 6 P FBF TTCY1FLG,VOLAB02 0 J P FCOPY ='ARKIV' 0 h P FLINK JTSUB30 0 PVOLAB02 0 P FILLR ' ',4 0 P FCOPY GSWSTR9 0 & P FMEL '*.***.***.**9.99+',TTCYKTOT 0 P FILLR ' ',2 0
0x0d621c…0d63b0 Dummy {f00=0x0093, f01=0x0190, f02=» P FILLR '+',2 1 P FLINK BAXF05L 1 P FMEND 1 . P* 1 < PBAXF05L FRMT 1 F P FLINK BSUB04 1 Z P FEOR 1 p P FILLR '0',2 1 ~ P FLINK BSUB05 1 P FMEND 1 P* 1 PBAXF06 FRMT 1 P FLINK BAXF06L 1 P FMEND 1 P* 1 PBAXF06
0x0d63b0…0d6544 Dummy {f00=0x0093, f01=0x0190, f02=» P FMEND 2 P* 2 PVOSUM07 FRMT SUMBILAG 2 P FLINK VOSUM07L 2 : P FMEND 2 R P* 2 ` PVOSUM07L FRMT 2 j P FILLR '+',2 2 P FMEL '999B',GTMSK MASKINNR 2 ( P FMEL 'B99.99.99B',GTDATO EKSP.LB.NR 2 P FMEL '****9',GTSUMST 2 P FCOPY
0x0d6544…0d66d8 Dummy {f00=0x0093, f01=0x0190, f02=» 2 P FMEND 3 P* 3 PVOX08 FRMT 3 P FLINK VOX08L 3 2 P FMEND 3 H P* 3 V PVOX08L FRMT 3 ` P FILLR '+',2 3 t P FCOPY GTTESTMK 3 P FMEL '999',GTMSK 3 P FMEL 'BB99.99.99',GTDATO 3 P FMEL 'BBZ999',CKMDNR 3 P FMEL 'BB****9
0x0d66d8…0d686c Dummy {f00=0x0093, f01=0x0190, f02=»TEXT 3 P FEOR 4 P FILLR '2',2 4 P FILLR '*',60 4 . P FILLR '*',8 4 D P FEOR 4 X P FILLR '4',2 4 f P FCOPY ='KONTONR' 4 z P FILLR ' ',6 4 P FCOPY ='T[LLER' 4 P FILLR ' ',9 4 P FTEXT 'NETTO' 4 P FILLR ' ',12 4 P FCOPY =
0x0d686c…0d6a00 Dummy {f00=0x0093, f01=0x0190, f02=» P* 5 PVOX09L FRMT 5 P FILLR '2',2 5 " * P FMEL 'BXXX.XX.XXX.XXB',GTDUPF(CBIN1) 5 6 P FILLR ' ',4 5 d P FMEL '99',GTWBCD1 5 x 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) NETTO 5 > P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',C12ACC(GSWBIN5,CBIN2) DEBET 5
0x0d6a00…0d6b94 (0, 272) Dummy {f00=0x0094, f01=0x0190, f02=» FMEND 5 P* 6 PVOX10L FRMT 6 P FILLR '2',2 6 , P FMEL 'ZZ',GTWBCD1 6 @ 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) 6 Z 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(GSWBIN5,CBIN2) 6 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(GSWBIN5,CBIN1) 6 P FMEND
0x0d6b94…0d6d28 Dummy {f00=0x0094, f01=0x0190, f02=» 6 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) 7 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTREGF(CBIN2) 7 < 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTREGF(CBIN1) 7 p P FEOR 7 P FILLR '4',2 7 P FTEXT 'SUPL ' 7 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN5)
0x0d6d28…0d6ebc Dummy {f00=0x0094, f01=0x0190, f02=»ILLR '2',2 7 P FTEXT 'KOR' 8 P FILLR ' ',19 8 & 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(CBIN7,CBIN2) 8 < 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(CBIN7,CBIN1) 8 t P FMEND 8 P* 8 PVOX12 FRMT 8 P FLINK VOX12L 8 P FMEND 8 P* 8 PVOX1
0x0d6ebc…0d7050 Dummy {f00=0x0094, f01=0x0190, f02=»ZZ.ZZZ.ZZ9.99-',TTSTCASH 8 P FILLR ' ',34 9 P FEOR 9 6 P FILLR '2',2 9 D P FTEXT 'BEV ' 9 X 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) 9 n 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN5) 9 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN6) 9
0x0d7050…0d71e4 Dummy {f00=0x0094, f01=0x0190, f02=» P* : PVOX13 FRMT : P FLINK VOX13L : P FMEND : 6 P* : D PVOX13L FRMT : N P FILLR ' ',2 : b P FCOPY GTTESTMK : v P FMEL '999B',GTMSK : P FMEL 'B99.99.99',GTDATO : P FILLR ' ',2 : P FCOPY ='BEHOLDNINGST[LLERE' : P FILLR '
0x0d71e4…0d7378 Dummy {f00=0x0094, f01=0x0190, f02=»,2 : P FCOPY ='T[LLER' ; P FILLR ' ',4 ; " P FCOPY ='KONTONR' ; 6 P FILLR ' ',10 ; P P FCOPY ='BEV.PERIODE' ; f P FILLR ' ',12 ; P FCOPY ='SALDO' ; P FILLR ' ',1 ; P FMEND ; P* ; PVOX14 FRMT ; P FLINK VOX14L ;
0x0d7378…0d750c Dummy {f00=0x0094, f01=0x0190, f02=»CBACC(GSWBIN3,CBIN1) ; x 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',CBACC(GSWBIN3,CBIN2) < 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',CBACC(GSWBIN3,CBIN3) < V P FMEND < P* < PVOX15 FRMT < P FILLR '2',2 < P FCOPY GSWSTR20 < P FMEND < P* < PVOX16 FRMT
0x0d750c…0d76a0 Dummy {f00=0x0094, f01=0x0190, f02=»0 5. < P FNL = P FNL = P FILLR X'5D',40 ] = $ P FILLR X'4E',40 N = > P FNL = X P FNL = d P FILLR X'45',40 E = p P FILLR X'53',40 S = P FNL = P FNL = P FILLR X'5B',40 [ = P FILLR X'5C',40 OE = P FMEND = P* = P
0x0d76a0…0d7834 (0, 273) Dummy {f00=0x0094, f01=0x0190, f02=»INGSDATO = p P FILLR ' ',6 > P FLINK FLBNR > $ P FILLR ' ',8 > 8 2 P FMEL 'B*.***.***.**9E,99',GTDUPF(CBIN4) BELOB > L P FILLR '*',2 > P FILLR ' ',3 > 4 P FMEL 'ZZ999999',GTDUPF(CBIN2) CHECKNR(DIV.TXT) > P FILLR ' ',8 > P FMEND > P* >
0x0d7834…0d79c8 Dummy {f00=0x0094, f01=0x0190, f02=»L 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GSWBCD6 > * P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GSWBCD7 ? * P FMEND ? X P* ? f " PVOX19 FRMT SHORT TR 2,5,7,10 ? p P FLINK BSUB01 ? P FLINK BSUB02 ? P FMEND ? P* ? PVOX20 FRMT ? P FLINK VOX20L ? P FMEND
0x0d79c8…0d7b5c Dummy {f00=0x0094, f01=0x0190, f02=»R ? P FILLR '2',2 @ PV20L10 @ ( P FMEL 'XXXE-XXXXXE-XX',GTDUPF(CBIN1) @ , P FILLR ' ',4 @ X P FMEL 'XX',GTWBCD1 @ l P FBT GTSWFLAG,V20L20 @ 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9,99-',GTDUPF(CBIN4) @ P FILLR ' ',35 @ P FB V20L90 @ PV20L20 @
0x0d7b5c…0d7cf0 Dummy {f00=0x0094, f01=0x0190, f02=» @ P FMEND A P EJECT A P* A $ . P* FORMATS FOR EXTRA 'KVITTERING' A . ( P* (MOSTLY AS NORMAL 'BILAG' A ` P* A : PFTBKV FTABLE BAFST01,BAFST02,KVIT03,KVIT03,BAFST02, C A 2 P BAFST01,BAFST02,BAFST08,BAFST08,BAFST02, C A .
0x0d7cf0…0d7e84 Dummy {f00=0x0094, f01=0x0190, f02=»LINK BSUB05 A P FMEND B P* B " P EJECT B , P* B B " P* FORMATS FOR KONTOKORT B L P* B r @ PFTBKT FTABLE KAFST01,KAFST02,KAFST03,KAFST04,KAFST00, C B | 2 P KAFST01,KAFST00,KAFST01,KAFST01,KAFST02, C B . P KAFST12,KAFST01,
0x0d7e84…0d8018 Dummy {f00=0x0094, f01=0x0190, f02=» TRANS 01-06 B | P FLINK BAFST01 C , P FLINK SKAF01 LINE NR C J P FMEND C h P* C ~ P* C : PKAFST02 FRMT TRANS 02 C P FLINK BAFST02 C P FLINK SKAF01 LINE NR C
0x0d8018…0d81ac Dummy {f00=0x0094, f01=0x0190, f02=» FLINK SKAF01 LINE NR C P FMEND D P* D 4 P* D > : PKAFST03 FRMT TRANS 03 D H P FLINK KAFST03L D P FMEND D P* D PKAFST03L FRMT D 8 P FLINK BSUB01 HEADER D P
0x0d81ac…0d8340 Dummy {f00=0x0094, f01=0x0190, f02=»X',GTDUPF(CBIN11) PALIGNINGS$R D ~ $ P FCOPY TT16TXT RENTE/GEBYR/INDB E 0 ( P FLINK BSUB07 CPR/CIR/BELOB/LINIENR E X P FMEND E P* E P* E : PKAFST04 FRMT TRANS 04 E P FLINK KAFST04L E P FME
0x0d8340…0d84d4 (0, 274) Dummy {f00=0x0094, f01=0x0190, f02=» BETART/DATO E n P FBF TTKORTFL,KLAB40 F 2 P FMEL 'XX.XXPP',GTDUPF(CBIN7) VAL DATE, DD.MM F : PKLAB40 F p P FBF TTASKAT,KLAB41 F ~ 0 P FMEL 'B**',GTDUPF(CBIN12) REST.MAANED - CIR F . P FMEL 'B**',GTDUPF(CBIN11) REST.AAR - CIR F P FB KLAB
0x0d84d4…0d8668 Dummy {f00=0x0094, f01=0x0190, f02=» CPR/CIR-BELOB-LINIENR F z P FMEND G 4 P* G J PSKAF01 FRMT G T P FBF CKTFLAG,SKAF02 G h P FBT GTSLDFLG,SKAF04 G P FILLR ' ',13 G P FB SKAF03 G PSKAF04 G , P FMEL '*.***.***.**9.99-',TTKTSLD SALDO G PSK
0x0d8668…0d87fc Dummy {f00=0x0094, f01=0x0190, f02=»LIN G PSKAF05 H P FMEND H P* H ( P EJECT H 2 P* H @ . P* VARIOUS FORMATS FOR 'KONTOKORT' H J P* H | PFTBXKT FTABLE XKTTRP H P* H PXKTTRP FRMT H P FLINK XKTTRPL H P FMEND H P* H PXKTTRPL FRMT H P FILLR
0x0d87fc…0d8990 Dummy {f00=0x0094, f01=0x0190, f02=»PY ='TRP ' H P FMEND I P* I $ P* FORMATS FOR TALLY ROLL I * P* I R PFTBTA FTABLE FMTFMT I P* I x P* I P EJECT I P* I . P* VARIOUS FORMATS FOR TALLY ROLL I P* I P* I @ PFTBXTA FTABLE TAFMT01,TAFMT02,
0x0d8990…0d8b24 Dummy {f00=0x0094, f01=0x0190, f02=»*',1 I P FILLR ' ',1 J P FMEND J P* J . PTAFMT02 FRMT J 8 P FLINK TAFMT02L J L P FMEND J d P* J r PTAFMT02L FRMT J | P FILLR '0',2 J P FCOPY GSWSTR9 J & P FMEL '*.***.***.**9.99+B',GSWBCD6 J P FLINK TAFMT07 J P FMEND J
0x0d8b24…0d8cb8 Dummy {f00=0x0094, f01=0x0190, f02=»* J PTAFMT05 FRMT K P FILLR '+',2 K & P FMEL 'Z.ZZZ.ZZZ.ZZ9.99-',GSWBCD6 K 2 P FILLR ' ',1 K P FMEND K p P* K ~ PTAFMT07 FRMT K P FNL K P FNL K P FNL K P FNL K P FNL K P FNL K P FNL K P FMEND K P* K ( P
0x0d8cb8…0d8e4c Dummy {f00=0x0094, f01=0x407a, f02=»TS FOR GENERAL PRINTER K x P* L PFTBXGP FTABLE FMTFMT L ( P* L D P* L N P* L X P END L b@ L v P* K ~ PTAFMT07 FRMT K P FNL K P FNL K P FNL K P FNL K P FNL K P FNL K P FNL K P FMEND K P* K ( P
0x0d8e4c…0d8fe0 Dummy {f00=0x0094, f01=0x2008, f02=» M P* CAN NOT BE IDENTIFIED BY TRANSTYPE (OR GTREGDEX) ' P* ' L PFTBXX FTABLE ' V P* ' n P* ' x P END ' @ ' & z P* & PFTBTA FTABLE & P* & P* & P EJECT & P* & ( P* FORMATS
0x0d8fe0…0d9174 (0, 275) Dummy {f00=0x0094, f01=0x018e, f02=» CLEAR CCONVFLG P SET SPKEYFLG P PERF LAMPOF,=W'2047' . P B ADMRET L P EJECT ^ 4 P************************************************ l P* P* SIGNON P* IF NOT OK CR NOT = 0 P* 4 P******************
0x0d9174…0d9308 Dummy {f00=0x0094, f01=0x0190, f02=» z P EDIT CTRANBUF,SIGONF * P* FIND LENGTH & 8 P MATCH CTRANBUF,GSWBIN1,GSWBIN2,CBLANKS,CBIN0,CBIN2 T P MOVE GSWBIN2,GSWBIN1 P TBT CTESTFLG,SIGON10 P PERF EXCHAN EXCHANGE DC P BNOK SIGON100 P PERF
0x0d9308…0d949c Dummy {f00=0x0094, f01=0x0190, f02=»NE SIGON100 PSIGON10 P EDWRT SCREEN,SNDFRM3 $ P CMP CBIN0,CBIN0 B P RET Z PSIGON100 f P MOVE SPBINW4,CBIN21 v P MOVE GTWBCD2,=D'60' P MOVE GSWSTR9,=C'TRANSMIT ' P MOVE GTWBCD1,=D'16' P PERF SPERR P PERF
0x0d949c…0d9630 Dummy {f00=0x0094, f01=0x0190, f02=» P* & P* CHNGDK - CHANGE DISK P* 8 P* STOP SEND PIN 6 B P* CONTINIUE PIN 5 d P* 2 P********************************************* PCHNGDK PROC PCHNG000 , P PERF CLSVOL,CBIN2 CLOSE FILES
0x0d9630…0d97c4 Dummy {f00=0x0094, f01=0x0190, f02=» P PERF LAMPON,=W'16' LAMP 7 PCHNG010 & P PERF SOPRD 6 P IB GSWBIN2, C J 2 P CHSOP10,CHSOP09,CHSOP08,CHSOP07,CHSOP06, C b . P CHSOP05,CHSOP04,CHSOP03,CHSOP02,CHSOP01 PCHSOP01 PCHSOP02 PCHSOP03 PCHSOP04
0x0d97c4…0d9958 Dummy {f00=0x0094, f01=0x0190, f02=»S OFF v P PERF LAMPON,=W'2' LAMP 10 P SET SPPROMPT 0 P ATTFMT SNDFRM SIGNON FORMAT F P PERF SPCLRS j $ P IB SPBINW2,CH1010,CH1010,CH1020 ~ PCH1010 P B CHNG000 PCH1020 P PERF SIGNON P BNOK CHNG000 P PERF LAMP
0x0d9958…0d9aec Dummy {f00=0x0094, f01=0x0190, f02=» p P BOK CHNG050 P PERF LAMPON,=W'2' P B CHNG000 6 PCHNG050 H P PERF LAMPON,=W'64' LAMP 5 X P CMP CBIN0,CBIN0 SET CR z P RET P* PCHSOP06 SOP 6 $ P PERF LAMPOF,=W'2047' LAMPS OFF $ P PERF BCKUP,=W'1' WITHOU
0x0d9aec…0d9c80 Dummy {f00=0x0094, f01=0x0190, f02=»'2' WITH BACKUP P BNOK CHNG000 P B CHNG130 . P* @ PCHNG130 J P PERF LAMPOF,=W'2047' Z 4 P CMP CBIN0,CBIN1 INDICATE ERROR OR END OF TRANS x P RET P PEND P EJECT . P******************************************
0x0d9c80…0d9e14 (0, 276) Opaque[0x194]
0x0d9e14…0d9fa8 # DirEnt {nam=»KMDIO «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x12a0, f03=0x0000}
0x0d9e14…0d9fa8 IdxSect {
0x0d9e14…0d9fa8 f00 = 0x0095 // 0xd9e14 @0x0
0x0d9e14…0d9fa8 f01 = 0x0010 // 0xd9e16 @0x2
0x0d9e14…0d9fa8 gno = [ // 0xd9e18 @0x4
0x0d9e14…0d9fa8 [0x00]: C0x0095.0x0.0
0x0d9e14…0d9fa8 [0x01]: C0x0095.0x1.0
0x0d9e14…0d9fa8 [0x02]: C0x0095.0x2.0
0x0d9e14…0d9fa8 [0x03]: C0x0095.0x3.0
0x0d9e14…0d9fa8 [0x04]: C0x0096.0x0.0
0x0d9e14…0d9fa8 [0x05]: C0x0096.0x1.0
0x0d9e14…0d9fa8 [0x06]: C0x0096.0x2.0
0x0d9e14…0d9fa8 [0x07]: C0x0096.0x3.0
0x0d9e14…0d9fa8 ]
0x0d9e14…0d9fa8 }
0x0d9fa8…0da13c Dummy {f00=0x0095, f01=0x0190, f02=» P IDENT KMDIO 03.01.XXX.1 P DDUM KMD08 & P PDIV D P ENTRY WRITFD R P ENTRY WRITVO h P ENTRY WRITJT P ENTRY WTALLY P ENTRY WRITID P ENTRY CRKJ P ENTRY GRASP
0x0da13c…0da2d0 Dummy {f00=0x0095, f01=0x0190, f02=» P EXT SPCHK5 P EXT SPLIN8 P EXT SPERR 0 P EXT FRMTJT B P EXT FRMXJT b P EXT ADM v P EXT CYWRT P EXT FRMXVO P EXT FRMXTA P EXT ABORT P EXT RAWRIT P EXT LEVRD P EXT
0x0da2d0…0da464 Dummy {f00=0x0095, f01=0x0190, f02=»STRCH P EXT TRGETF P EXT WAITF " P INCLUDE EQUATE 4 P EJECT T PWRITFD PROC b P TBF CSKIFTWN,WRFD00 v $ P PERF ADM,CBIN12 DISKETTE SKIFT P TBF CSKIFTWN,WRFD00 P CMP CBIN1,CBIN0 P RET PWRFD00 P
0x0da464…0da5f8 Dummy {f00=0x0095, f01=0x0190, f02=»1 P MOVE GSWBIN3,GTREGDEX P SUB GSWBIN3,CBIN11 ( 0 P IB GSWBIN3,WRFD001,WRFD002,WRFD001,WRFD002 D P B WRFD003 x PWRFD001 . P MOVE GTREGNR,=D'1' TRANS 18,28 -> TRANS 1 P B WRFD003 PWRFD002 . P MOVE GTREGNR,=D'6' TRANS
0x0da5f8…0da78c Dummy {f00=0x0095, f01=0x0190, f02=»OVE GSWBIN5,CBIN0 PWRFD005 P SET CSWFLAG * P CBE CRECLGD,=W'128',WRFD006 > P CLEAR CSWFLAG b PWRFD006 x P EDIT CPCKBUF,PCKINIT * P EDIT CPCKBUF,TREC1 INSERT HEADER INF P* RESET GTREGNR * P MOVE GTREGNR,CREGTAB(GTREGD
0x0da78c…0da920 Dummy {f00=0x0095, f01=0x0190, f02=»BLANKS,CBIN0,CBIN2 p P MOVE GSWBIN4,CRECLGD P SUB GSWBIN4,CBIN1 8 * P SUB GSWBIN4,GSWBIN3 REMAINING LENGTH R P CBE GTREGNR,=D'12',WRFD070 , P TBT CSPLITFL,WRFD025 IF SPLIT PACK REST PWRFD020 P ADD GSWBIN5,CBIN1 " P CBNL GSWB
0x0da920…0daab4 (0, 277) Dummy {f00=0x0095, f01=0x0190, f02=»(GSWBIN5) CONVERT | P EDIT SPINPUT,PFRM1 PWRFD025 6 P MOVE GSWSTR1,=X'00' F $ P MOVE GSWBIN6,CBIN0 FIND LENGTH b P MOVE GSWBIN10,=W'30' 8 P MATCH SPINPUT,GSWBIN6,GSWBIN10,GSWSTR1,CBIN0,CBIN1 P CLEAR CSPLITFL , P CBG GSWBIN6
0x0daab4…0dac48 Dummy {f00=0x0095, f01=0x0190, f02=»N6 ADJUST POINTERS ~ P B WRFD020 SEE IF MORE PWRFD030 8 0 P COPY CPCKBUF,GSWBIN3,GSWBIN4,SPINPUT,CBIN0 H * P MOVE GSWSTR1,=X'21' CONTINUATION MARK | P ADD GSWBIN3,GSWBIN4 . P COPY CPCKBUF,GSWBIN3,CBIN1,GSWSTR1,CBIN0 P DLETE SPINPUT,C
0x0dac48…0daddc Dummy {f00=0x0095, f01=0x0190, f02=» P ADD CTWBIN1,CBIN1 P ADD CRECNR,CBIN1 P ADD CRECBCD,=D'1' 8 P B WRFD005 GO AND PACK REST R PWRFD070 v P TBT TFELT90,WRFD090 P TBT TFELT91,WRFD091 P TBT TFELT92,WRFD092 P TBT TFELT93,WRFD093 P TBT TFELT94,WRFD0
0x0daddc…0daf70 Dummy {f00=0x0095, f01=0x0190, f02=»NOK WRFDERR P TBT GTTESTFL,WRFD080 P ADD CTWBIN1,CBIN1 2 P ADD CRECNR,CBIN1 L P ADD CRECBCD,=D'1' f P PERF RADEL,DK02,CRECNR P BNOK WRFDERR P* P* LOOK FOR ACCOUNT NO $ P* IN KONTOPLAN. IF FOUND,
0x0daf70…0db104 Dummy {f00=0x0095, f01=0x0190, f02=»BINW4,CBIN21 " P MOVE GTWBCD2,=D'2' FILE CODE $ P MOVE GTWBCD1,=D'50' ERROR CODE : P MOVE GSWSTR9,=C'DISCFEJL ' b P PERF SPERR P CMP CBIN0,CBIN0 P RET P PWRFD090 P MOVE SPINPUT,=X'26393000' . P XCOPY SPINPUT,C
0x0db104…0db298 Dummy {f00=0x0095, f01=0x0190, f02=»0' x . P XCOPY SPINPUT,CBIN3,CBIN22,GTLEVNVN,CBIN0 P CLEAR TFELT91 < P SET TFELT911 R P B WRFD095 h PWRFD092 z P MOVE SPINPUT,=X'26393200' . P XCOPY SPINPUT,CBIN3,CBIN8,GTLEVNVN,CBIN22 0 P XCOPY SPINPUT,CBIN11,CBIN14,GTLEVADR,CBIN
0x0db298…0db42c Dummy {f00=0x0095, f01=0x0190, f02=»,CBIN3,CBIN18,GTLEVADR,CBIN14 . P XCOPY SPINPUT,CBIN21,CBIN4,GTLEVBY,CBIN0 & P CLEAR TFELT93 X P SET TFELT931 n P B WRFD095 PWRFD094 P MOVE SPINPUT,=X'26393400' . P XCOPY SPINPUT,CBIN3,CBIN16,GTLEVBY,CBIN4 . P XCOPY SPINPUT
0x0db42c…0db5c0 Dummy {f00=0x0095, f01=0x0190, f02=» P CLEAR CSPLITFL P CLEAR CPFLG " P CMP CBIN0,CBIN0 OK, SET CR=0 0 P RET V P* b PWRFDERR l P* | " P* HERE MUST BEE RECOVERRY P SUB CRECNR,CTWBIN1 P MOVE GSWBCD1,CTWBIN1 P SUB CRECBCD,GSWBCD1 P SET C
0x0db5c0…0db754 (0, 278) Dummy {f00=0x0095, f01=0x0190, f02=»****************************************** P* 2 P* EDATNR < 4 P* FINDS DATASETNR FOR THE TRANSACTIONS P : P* AND PUT THE INFORMATION IN RELEVANT FIELDS P* 4 P************************************************ P
0x0db754…0db8e8 Dummy {f00=0x0095, f01=0x0190, f02=» t . P MOVE GTUSED(CBIN5),CBIN9 UPDATE D/K MARK P MOVE GTDUPF(CBIN5),TTDKBCD : PEDAT010 ^ P CBNE GTREGNR,=D'11',EDAT020 n P SET TTR11FLG PEDAT020 P RET PEDAT100 P CBG GTREGNR,=D'42',EDAT110 P MOVE CEDATNR,=D
0x0db8e8…0dba7c Dummy {f00=0x0095, f01=0x0190, f02=» PEDAT120 P CBG GTREGNR,=D'49',EDAT130 P MOVE CEDATNR,=D'4' TR 48-49 < P B EDAT020 ` PEDAT130 r P MOVE CEDATNR,=D'2' TR 50-54 P B EDAT020 P PEND P EJECT P* P* PWCHECK PROC P P* . P
0x0dba7c…0dbc10 Dummy {f00=0x0095, f01=0x0190, f02=» GTSTRFLG,WCH050 STRAKSCHECK ? P B WCH090 & PWCH010 BUNDTCHECK 8 P TBT GTCYFLG,WCH011 T P TBT TTCY2FLG,WCH090 p P TBF TTCY1FLG,WCH015 P MOVE GTDUPF(CBIN1),TTARKSAV P MOVE GTDUPF(CBIN4),TTCYKTOT P B WCH015 PWCH011
0x0dbc10…0dbda4 Dummy {f00=0x0095, f01=0x0190, f02=»EV ^ $ P BNOK WCH020 ERROR OR NOT FOUND * P PERF TRGETF,GSWBIN7 GET A FREE RECORD 2 P BNOK WCH095 ` P MOVE GTLEVNR,GTDUPF(CBIN2) t P PERF VARRD TRY TO FIND LEV $ P BNOK WCH020 ERROR OR NOT FOUND P CLEAR GTSWFLAG P PERF TRINS,
0x0dbda4…0dbf38 Dummy {f00=0x0095, f01=0x0190, f02=» P DELAY CBIN10 P B WCH010 PWCH050 STRAKSCHECK , P MOVE GTLEVNR,GTDUPF(CBIN2) H P PERF VARRD l P BOK WCH051 P SET TTLEVFLG PWCH051 $ P TBT GTCYFLG,WCH060 CYKEL/STABEL P TBT TTCY2FLG,WCH057 P TBF TTCY1FL
0x0dbf38…0dc0cc Dummy {f00=0x0095, f01=0x0190, f02=»WCH095 PWCH057 P PERF LEVRD P BOK WCH059 0 P MOVE GTRETUR,CBIN3 D P PERF LEVIN ` P BNOK WCH057 t P PERF WSTRCH,CBIN1 P BNOK WCH095 P B WCH090 PWCH059 P PERF WSTRCH,CBIN1 P BNOK WCH095 P B W
0x0dc0cc…0dc260 Dummy {f00=0x0095, f01=0x0190, f02=»ERF WSTRCH,CBIN0 EDIT CHECKLINE P* SKRIV CHECK HVIS FYLDT OP ( PWCH080 L P PERF VARWRT Z P BNOK WCH095 n PWCH090 P CMP CBIN0,CBIN0 P B WCH099 PWCH095 P CMP CBIN0,CBIN1 PWCH099 P RET P PEND P
0x0dc260…0dc3f4 (0, 279) Dummy {f00=0x0095, f01=0x0190, f02=»DATO P PERF CHDATO * P MOVE GTREGF(CBIN10),GSWBCD7 UDB.DATO 2 P MOVE GTREGF(CBIN11),GTDUPF(CBIN4) UDB. BELOB N . P ADD GTREGF(CBIN12),GTDUPF(CBIN4) UDB ]TD P TBF GTBDTFLG,WCHUPD90 & P CBL GTDUPF(CBIN4),=D'0',WCHUPD12 0 P ADD GTREG
0x0dc3f4…0dc588 Dummy {f00=0x0095, f01=0x0190, f02=»PD14 4 P ADD GTREGF(CBIN16),GTDUPF(CBIN4) SKYLDIGT BELOB 2 P MOVE GSWBCD6,GTREGF(CBIN13) GET LOW VALORDATE D P CBL GSWBCD6,=D'1',WCHUP155 z $ P CBG GSWBCD6,=D'800000',WCHUP150 P PERF CHDATO TO GSWBCD7 P MOVE GTREGF(CBIN13),GSWBCD7
0x0dc588…0dc71c Dummy {f00=0x0095, f01=0x0190, f02=» * P MOVE GTREGF(CBIN13),GTDUPF(CBIN7) YES P B WCHUPD90 6 PWCHUPD16 J P MOVE GSWBCD6,GTREGF(CBIN13) Z P PERF CHDATO ~ P MOVE GTREGF(CBIN13),GSWBCD7 PWCHUPD90 P RET P PEND P EJECT PWRITJT PROC $JTLIT
0x0dc71c…0dc8b0 Dummy {f00=0x0095, f01=0x0190, f02=»NG ON TRANSACTION TYPE P* P******************** ( P WAIT KVOUCH D P WAIT KTALLY X P TBT GTSPGFLG,JTRET l " P MOVE GSWBIN1,$JTLIT & P CBG GSWBIN1,CBIN0,JT10 F P PERF FRMTJT GET FORMA
0x0dc8b0…0dca44 Dummy {f00=0x0095, f01=0x018e, f02=»TNR 'TAELLER' NR IN BINARY ~ P TBT GTNWFLG,JT50 " ( P EDWRT KJTAPE,GTSTRFMT EDWRT JOURNAL < PJT30 h P TBF CF9094,JT35 t P CBL GTREGDEX,CBIN8,JT35 P CBG GTREGDEX,CBIN9,JT35 P TBF TFELT901,JT31 P MOVE SPINPUT,=X'00' 0 P XCOPY
0x0dca44…0dcbd8 Dummy {f00=0x0095, f01=0x0190, f02=» z 0 P XCOPY SPINPUT,CBIN13,CBIN22,GTLEVNVN,CBIN0 P WRITE KJTAPE,SPINPUT < PJT32 Z P TBF TFELT921,JT33 f P MOVE SPINPUT,=X'00' 0 P XCOPY SPINPUT,CBIN13,CBIN8,GTLEVNVN,CBIN22 0 P XCOPY SPINPUT,CBIN21,CBIN14,GTLEVADR,CBIN0 P WRI
0x0dcbd8…0dcd6c Dummy {f00=0x0095, f01=0x0190, f02=» d P MOVE GSWBIN1,=W'31' . P XCOPY SPINPUT,GSWBIN1,CBIN4,GTLEVBY,CBIN0 $ P WRITE KJTAPE,SPINPUT V PJT34 t P TBF TFELT941,JT35 P MOVE SPINPUT,=X'00' . P XCOPY SPINPUT,CBIN13,CBIN16,GTLEVBY,CBIN4 P MOVE GSWBIN1,=W'29' 0 P XCO
0x0dcd6c…0dcf00 Dummy {f00=0x0095, f01=0x0190, f02=»URNAL l P BOK JTRET , P PERF SPLIN8,CBIN1,CBIN1 'SKIFT JOURNAL' * P SET TTJTEND Z PJTRET n P RET | PJT50 P EDWRT .NW,KJTAPE,GTSTRFMT P RET P PEND P EJECT PWTALLY PROC P****
0x0dcf00…0dd094 (0, 280) Dummy {f00=0x0096, f01=0x018e, f02=»LY H P EDWRT .NW,KTALLY,GTSTRFMT EDWRT WITH THE FORMAT P RET STORED IN GTSTRFMT V P PEND v P EJECT PCRKJ PROC P******************** P* 8 P* DOES A CARRIAGE RETURN ON TTP WITH
0x0dd094…0dd228 Dummy {f00=0x0096, f01=0x0190, f02=» P FILLR ' ',2 P FILLR X'0D',1 " P FMEND 8 P PEND N P* d P* n PCRVO PROC x P******************* P* : P* DOES A CARRIAGE RETURN ON VOUCHER WITH WAIT P* P****************
0x0dd228…0dd3bc Dummy {f00=0x0096, f01=0x0190, f02=» P EJECT PWRITVO PROC P* 2 P* WRITE VOUCHER < P* Z * P* IN CYCLE POSITION AND WRITE d ( P* (MAY BE NEW PAGE) P* $ P* NOT CYCLE GET LINE NR ( P* POSIT
0x0dd3bc…0dd550 Dummy {f00=0x0096, f01=0x0190, f02=» TBT GTCYFLG,CYVOUCH P* NOT IN CYCLE ! ( PWOBILAG ! > ( P PERF SPLIN8,CBIN2,CBIN0 WRITE BILAG ! N P PERF GRASPV ! z P CLEAR GTSWFLAG ! $ P PERF LINOPT SEE IF DEFAULT LINE ! P BNOK WOBILAG ! P CBG GSWBIN1,=W'90
0x0dd550…0dd6e4 Dummy {f00=0x0096, f01=0x0190, f02=»C ! " P WO99,WO98,WO97,WO96,WO95, C " P WO94,WO93,WO92,WO91 " 0 PWO99 " N P PERF FRMXVO,CBIN6 " Z P MOVE GSWBIN1,=W'35' " t P B WO100 " PWO98 " P PERF FRMXVO,CBIN4 " P MOVE GSWBIN1,CBIN14 " P B WO100 " PWO97 " P PERF FRMX
0x0dd6e4…0dd878 Dummy {f00=0x0096, f01=0x0190, f02=» " PWO95 # PWO94 # PWO93 # P DSC0 KVOUCH,RLEAS # , P B WOBILAG # F PWO92 SHORT 'BILAG' # X P PERF SPLIN8,CBIN2,CBIN0 # t P PERF GRASPV # P SET GTSWFLAG # P PERF LINOPT # P BNOK WO92 # P CBG GSWBIN1,=W'90',WO92 # P MOV
0x0dd878…0dda0c Dummy {f00=0x0096, f01=0x0190, f02=»ONTOKORT # r P RET $ P* $ PWO100 $ & . P DSC1 KVOUCH,POS,GSWBIN1 POSITION VOUCHER $ 4 4 P EDWRT KVOUCH,GTSTRFMT EDWRT WITH CURRENT FORMAT $ f P PERF CRVO $ D P DSC0 .NW,KVOUCH,RLEAS RELEASE VOUCHER $ P RET $
0x0dda0c…0ddba0 Dummy {f00=0x0096, f01=0x0190, f02=»5 $ P RET % P* % PWO5 % " P TBT TTTSTFLG,WO10 % , P SET TTTSTFLG % R * P PERF SPLIN8,CBIN5,CBIN2 WRITE 'BILAG' % t P PERF GRASPV % P PERF CLEAR8 % PWO10 % P MOVE GSWBIN1,TTLINNR % . P DSC1 KV
0x0ddba0…0ddd34 (0, 281) Dummy {f00=0x0096, f01=0x0190, f02=»* FOR CHECK ON WORKSET % P* & & P***** & 0 8 P SUB TTLINNR,=D'2' NEXT LINE & > 8 P CBL TTLINNR,=D'4',NEWPG NEW PAGE? & z P RET NO & P* & PNEWPG NEW PAGE & & P TBT TTPSEFLG,WORET T: IF SUBTOT
0x0ddd34…0ddec8 Dummy {f00=0x0096, f01=0x0190, f02=»BIN2 & P EDWRT KVOUCH,GTSTRFMT ' " P DSC0 KVOUCH,RLEAS ' * P SET GTCYTRPF ' P PWORET ' f P RET ' t P PEND ' P* ' P* ' P* ' P* ' PGRASPV PROC ' P******************** ' P* ' P* GRASP
0x0ddec8…0de05c Dummy {f00=0x0096, f01=0x0190, f02=» PEND ' P EJECT ( PLINOPT PROC ( * P******************** ( @ P* ( & P* CHECK LINE NUMBER, IF ANY ( f P* ( P******************** ( P TBT GTSWFLAG,LINST ( & P TESTIO KEYB SEE IF INPUT FINISHED ( P BNOK LINOP1
0x0de05c…0de1f0 Dummy {f00=0x0096, f01=0x0190, f02=»ALLOWED ( f PLINOP0 ) * P CBG SPBINW1,CBIN3,LINOP2 CHECK LENGTH ) & P MOVE GSWBCD3,SPINPUT GET LINE NR ) L 0 P CBG GSWBCD3,=D'90',LINOP4 SPECIAL FORMATS? ) v " P PERF SPCHK5 OK, CHECK LINENR ) . P CBE SPBINW3,CBIN3,LINOP2 ERROR IN LINE NR ) 0 P MOVE
0x0de1f0…0de384 Dummy {f00=0x0096, f01=0x0190, f02=»ORT,KEYB ABORT I/O ) P CBL GTDFLIN,=W'90',LINOP101 * P MOVE GSWBCD3,GTDFLIN * > P B LINOP4 * PLINOP101 * n P MOVE GSWBCD3,GTDFLIN * ~ P MOVE SPINPUT,GSWBCD3 * P PERF SPCHK5 * . P MOVE TTLINNR,GSWBIN1 SET DEFAULT LINE NO * " P CMP CBI
0x0de384…0de518 Dummy {f00=0x0096, f01=0x0190, f02=»0 KEYB,SKIB * & P CMP CBIN0,CBIN1 SET CR<>0, NOT OK + P RET + > PLINOP4 + R P MOVE GSWBIN1,GSWBCD3 + ` P B LIN90 + ~ PLINRET + P PERF CLEAR8 DELETE LINE 8 + P RET + P PEND + P EJECT + " PWRITID PROC WRITVAR1,WRITVAR
0x0de518…0de6ac Dummy {f00=0x0096, f01=0x0190, f02=»BY WRITVAR2 + p P* , * P* PRINTS ON JOURNAL AND TALLY , P* , L P* , V P* WRITVAR1: , ` P* 1 FEJL , | P* 2 OPSTART , & P* 3 DISKETTE SKIFT , $ P* 4 KONVERTERI
0x0de6ac…0de840 Dummy {f00=0x0096, f01=0x0190, f02=» CHARACTERS PRINTED FROM PACKBUFFER: , $ P* 1 1-20 + 40-59 - , 6 P* 2 1-20 + 23-42, IF KONVERTERING - T : P* 2 1-20 + VOLID, IF NOT KONVERTERING - P* 3 NOTHING - P* 4 VOLI
0x0de840…0de9d4 (0, 282) Dummy {f00=0x0096, f01=0x0190, f02=»34,WRID35,WRID36 - j P B WRID50 . PWRID34 . * P MOVE GSWSTR20,=C'FEJL ' . 8 P B WRID50 . X PWRID31 . j P MOVE GSWSTR20,=C'OPSTART ' . x P B WRID40 . PWRID32 . & P MOVE GSWSTR20,=C'DISKETTE SKIFT ' . P B WRID40 . PWRID33 . $ P M
0x0de9d4…0deb68 Dummy {f00=0x0096, f01=0x0190, f02=»36 . P MOVE GSWSTR20,=C'BACKUP ' / PWRID40 / , P PERF WRITJT,=W'12' / : P PERF FRMXTA,CBIN6 / V P PERF WTALLY / p P* / P* / PWRID50 / P WAIT KTALLY / P CBE WRITVAR2,CBIN3,WRID80 / P CBE WRITVAR2,CBIN4,WRID73 / P MOVE GSWS
0x0deb68…0decfc Dummy {f00=0x0096, f01=0x0190, f02=»ALLY / P* 0 PWRID60 0 P CBE WRITVAR2,CBIN2,WRID70 0 $ P MOVE GSWBIN2,CBIN20 0 F P MOVE GSWBIN1,=W'40' 0 b 0 P COPY GSWSTR20,CBIN0,GSWBIN2,CPCKBUF,GSWBIN1 0 ~ P B WRID75 0 P* 0 PWRID70 0 P CBNE WRITVAR1,CBIN4,WRID72 0 P MOVE GS
0x0decfc…0dee90 Dummy {f00=0x0096, f01=0x0190, f02=» WRITVAR1,CBIN2,WRID80 0 PWRID73 1 P MOVE GSWSTR20,CBLANKS 1 , P MOVE GSWBCD3,CVOLNO 1 J P EDIT GSWSTR20,FRVOLID 1 f PWRID75 1 P PERF WRITJT,=W'12' 1 & P CBL WRITVAR1,CBIN4,WRID76 1,2,3,6 1 " P CBL WRITVAR1,CBIN6,WRID90 4,5 1 PWRID76 1
0x0dee90…0df024 Dummy {f00=0x0096, f01=0x0190, f02=»WRID85 1 P PERF FRMXTA,CBIN7 2 P PERF WTALLY 2 ( P WAIT KTALLY 2 < PWRID90 2 P P RET 2 ^ P PEND 2 j P EJECT 2 x 6 P************************************************* 2 P* 2 P* FORMATS FOR WRITFD 2 P* 2 < P******************
0x0df024…0df1b8 Dummy {f00=0x0096, f01=0x0190, f02=»T10 2 P FILLR X'00',48 3 P FEXIT 3 $ PINIT10 3 2 P FILLR ' ',48 3 @ P FMEND 3 V P* 3 d PFRVOLID FRMT 3 n P FMEL '999999',CMASKDAT 3 P FMEL 'B99999',GSWBCD3 3 P FMEND 3 P* 3 PTREC1 FRMT 3 P FMEL '999',GTMSK 3 P FIL
0x0df1b8…0df34c Dummy {f00=0x0096, f01=0x0190, f02=»C'&01' 3 P FMEL '9999',CKMDNR 4 P FBF GTKASSE,TREC40 4 * P FBT TTR11FLG,TREC10 4 F P FCOPY =C'&02' 4 b P FMEL '999999',GTDATO 4 x PTREC10 4 P FCOPY =C'&03' 4 P FMEL '999',GTMSK 4 P FBT TTR11FLG,TREC40 4 P FCOPY =C'&04' 4 P F
0x0df34c…0df4e0 Dummy {f00=0x0096, f01=0x40ac, f02=»BCD3,PLAB10 4 , P FMEL 'TTTTTTTTTTTTT9-',GTDUPF(GSWBIN5) 5 P FEXIT 5 D PPLAB10 5 R * P FMEL 'TTTTTTTTTTTTT9',GTDUPF(GSWBIN5) 5 ` P FMEND 5 P END 5 @ 5 C'&03' 4 P FMEL '999',GTMSK 4 P FBT TTR11FLG,TREC40 4 P FCOPY =C'&04' 4 P F
0x0df4e0…0df674 (0, 283) Dummy {f00=0x0096, f01=0x2008, f02=» 6 8 P CALL ABORT,KEYB ABORT I/O : P MOVE GTLINNR,=W'6' SET DEFAULT H : P CMP CBIN0,CBIN1 SET CR<> 0 P RET PLINOP2 > P DSC0 KVOUCH,REL
0x0df674…0df808 Dummy {f00=0x0096, f01=0x0190, f02=»07 PRSOP09 PRSOP10 P B RST010 OTHER LAMPS & P* D PRSOP01 RESTORE FD999001 N $ P PERF LAMPOF,=W'2047' LAMPS OFF p P PERF LAMPON,=W'1024' LAMP 1 & P MOVE GSWBIN5,=W'32' NO OF RECORDS 4 P PERF RSTORE,DK01,=D'1',GSWBIN5,CC
0x0df808…0df99c Dummy {f00=0x0096, f01=0x0190, f02=»ERF LAMPOF,=W'2047' LAMPS OFF P PERF LAMPON,=W'128' LAMP 4 & 2 P PERF RSTORE,DK04,=D'4',CKTMAX,CKTBUF,=W'128' J P BNOK RST005 NOT OK " P PERF SETMK INIT MASTER INDEX P B RST000 OK P* PRSOP08 FINISH RESTORING $ P PERF
0x0df99c…0dfb30 Dummy {f00=0x0096, f01=0x0190, f02=»* P* P* PT1025 SLUT KEY P PERF CONFRD READ CONFDATA 6 P BNOK T1010 X P CBNE CVOLNO,=D'0',T1028 l P MOVE CVOLNO,=D'0' PT1028 P MOVE CVOL(CBIN1),ASVOL P TBT CSWFLAG,T1030 . P CBNL CKMDNR,=D'1',T1050 V
0x0dfb30…0dfcc4 Dummy {f00=0x0096, f01=0x0190, f02=»,SKIB P ATTFMT CSFRM02 YES P PERF SPCLRN * " P IB SPBINW2,T1034,T1034,T1032 > PT1034 d P B T1033 r PT1032 P TBT CSWFLAG,T1020 PT1037 " P MOVE CBEH(CBIN1,CBIN1),CBIN0 " P MOVE CTR12(CBIN1,CBIN1),CBIN0 P MOV
0x0dfcc4…0dfe58 Dummy {f00=0x0096, f01=0x0190, f02=»GSWBIN1,GSWBIN5 P DSC0 KEYB,SKIB P SET SPPROMPT 0 P USE TB2,GSWBIN5 F P ATTFMT CSFRM03 ^ , P PERF SPCLRA SET TR 12 AND BEH COUNTERS v P CBNE SPBINW2,CBIN3,T1037 PT1043 ( P MUL TTSTLBNR,=D'-1' SIMULATE CLOSE P PERF
0x0dfe58…0dffec Dummy {f00=0x0096, f01=0x0190, f02=»NOK T1010 P* " P* READ TERMINAL CONF PT1050 B P MOVE CTWBIN2,CMAXTASK P P MOVE CTASKNR,CBIN0 n P MOVE GSWBIN5,CBIN0 PT1052 P ADD GSWBIN5,CBIN1 P CBG GSWBIN5,CMAXTASK,T1060 $ P CBNL CMASK(GSWBIN5),=
0x0dffec…0e0180 Dummy {f00=0x0096, f01=0x0190, f02=» , P PERF TCONFR,GSWBIN5 READ TERMINAL CONF P BOK T1052 4 P USE TB2,TTASKNR NOT OK F P B T1010 f P* v & P* CONF DATA HAS BEEN READ P* PT1060 ( P USE TB2,TTASKNR GET OWN USER BLOCK 4 P MOVE GTMSK,CMASK(CBIN1) S
0x0e0180…0e0314 (0, 284) Opaque[0x194]
0x0e0314…0e04a8 # DirEnt {nam=»RGSUB1«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x12e0, f03=0x0000}
0x0e0314…0e04a8 IdxSect {
0x0e0314…0e04a8 f00 = 0x0097 // 0xe0314 @0x0
0x0e0314…0e04a8 f01 = 0x000a // 0xe0316 @0x2
0x0e0314…0e04a8 gno = [ // 0xe0318 @0x4
0x0e0314…0e04a8 [0x00]: C0x0097.0x0.0
0x0e0314…0e04a8 [0x01]: C0x0097.0x1.0
0x0e0314…0e04a8 [0x02]: C0x0097.0x2.0
0x0e0314…0e04a8 [0x03]: C0x0097.0x3.0
0x0e0314…0e04a8 [0x04]: C0x0098.0x0.0
0x0e0314…0e04a8 ]
0x0e0314…0e04a8 }
0x0e04a8…0e063c Dummy {f00=0x0097, f01=0x0190, f02=» P IDENT RGSUB1 03.01.XXX.1 P DDUM KMD08 & P PDIV D P ENTRY SLUT Z P ENTRY UPDAKK n P ENTRY FLDIN P ENTRY FLDTST P EXT PACKST P EXT WRITFD P EXT WRITVO P
0x0e063c…0e07d0 Dummy {f00=0x0097, f01=0x0190, f02=» P EXT SPINF8 P EXT KFWRIT P EXT KFREAD 0 P INCLUDE EQUATE D P EJECT PSLUT PROC j P** SLUT - PACKS THE BUFFER P** WRITES TO DISK P** WRITE JOURNAL P** WRITE VOUCHER P** UPDATE ACCUMULATE=ORS
0x0e07d0…0e0964 Dummy {f00=0x0097, f01=0x0190, f02=» P CBE TTDKDEX,CBIN1,SLUT10 P MOVE TTDBKRM,=C'D' IF DEBET & PSLUT10 J P TBF GTCYFLG,SLUT30 X P TBT TTCY2FLG,SLUT30 t * P CBE GTREGDEX,CBIN3,SLUT30 IF TRANS 3 * P CBE GTREGDEX,CBIN4,SLUT30 IF TRANS 4 P MOVE GTDUPF(CBIN9),TTARKSAV
0x0e0964…0e0af8 Dummy {f00=0x0097, f01=0x0190, f02=»(CBIN9),TTARKSAV PSLUT30 P* INSET REGNSKABS]R IF & . P* TRANSTYPES 1,2,5,6,7,8,9,10,18,19,28,29 D . P* INDEX 1,2,5,6,7,8,9,10,12,13,14,15 v ( P CBG GTREGDEX,CBIN15,SLUT50 > TR 29 ( P CBE GTREGDEX,CBIN11,SLUT50 = TR 12 $ P CBE GTR
0x0e0af8…0e0c8c Dummy {f00=0x0097, f01=0x0190, f02=»ATE p : P CBE GTREGDEX,CBIN10,SLUT35 TRANS10, ALWAYS SUPL YEAR P TBF TTSUPFLG,SLUT40 J PSLUT35 f , P SUB GTDUPF(CBIN6),=D'1' SUB 1 FROM YEAR t PSLUT40 2 P MOVE TSWBCD2,GTDUPF(CBIN6) ISOLATE LAST DIGIT P MOVE GTDUPF(CBIN6),TSWBCD2
0x0e0c8c…0e0e20 Dummy {f00=0x0097, f01=0x0190, f02=» z P BNOK SLUTNOK & P PERF SUMWRT WRITE SUM OR RESTSUM $ P TBF GTKASSE,SLUT60 ON JOURNAL? H P PERF FRMTJT p P PERF WRITJT,=W'0' PSLUT60 P PERF FRMTVO P PERF WRITVO P* TEST IF IN LISTE P TBF TTLSTFLG,SL
0x0e0e20…0e0fb4 (0, 285) Dummy {f00=0x0097, f01=0x0190, f02=»1,GTKTTYP P IB GSWBIN1, C ( P SLUT90,SLUT95,SLUT95,SLUT95,SLUT90 * PSLUT90 V P CLEAR GTKORTFL d PSLUT95 | P SET TTEORFLG $ P CLEAR SPME READY FOR FUNCTIONS P CLEAR GTREGFLG P CMP CBIN0,CBIN0 OK, SETCR=0 P RET
0x0e0fb4…0e1148 Dummy {f00=0x0097, f01=0x018e, f02=» P RET P PEND P EJECT 2 PSUMWRT PROC @ P******************** T P* p 8 P** SUMWRT - CALCULATE AND WRITE SUM/RESTSUM z P* P******************** $ P TBF TTSUMFLG,SUMRET ONLY IF SUM P TBF
0x0e1148…0e12dc Dummy {f00=0x0097, f01=0x0190, f02=» r P B SUMOUT PSUMADD . P ADD GTSUM,GTDUPF(CBIN4) CALCULATE NEW SUM ( P ADD TTCYKTOT,GTDUPF(CBIN4) Z PSUMOUT ~ P PERF SPINF8 PSUMRET : P ADD GTSUMCNT,GTDUPF(CBIN4) ALWAYS ADD TO SUMFUNCTION P RET P PEND P
0x0e12dc…0e1470 Dummy {f00=0x0097, f01=0x0190, f02=»CCUMULATORS p P* 0 P* TR1-TR10 UPDATES TTACC(IDX1,IDX2) P* IDX1 = TRNR R " P* IDX2 = DEB/KRE v . P* TR12 UPDATES TTACC12(IDX1,IDX2) & P* IDX1 = TAELLER NR $ P*
0x0e1470…0e1604 Dummy {f00=0x0097, f01=0x0190, f02=»DX2) b P* P******************** ( P CBNE GTREGNR,='12',UPD20 2 : P PERF UPDA12 TAELLER 12 ^ P B UPDRET PUPD20 2 P CBG GTREGNR,=D'30',UPDRET NO ACCUMULATION FOR P CERTA
0x0e1604…0e1798 Dummy {f00=0x0097, f01=0x0190, f02=»N4) l P UPDATE SUPL COUNTER PUPD30 * P TBT GTTESTFL,UPD38 8 * P* ACCUMULATE 'BEHOLDNINGSTAELLERE' T P MOVE GSWBIN1,CBIN1 PUPD35 8 P CBE CBACC(GSWBIN1,CBIN1),GTDUPF(CBIN3),UPD350 BKO? : P CBNE CBACC(GSWBIN1,CBIN1),GTDUP
0x0e1798…0e192c Dummy {f00=0x0097, f01=0x0190, f02=» PUPD36 , P ADD GSWBIN1,CBIN1 LOOK AT NEXT COUNTER P CBNG GSWBIN1,=W'60',UPD35 B PUPD38 d . P MOVE GSWBIN1,CCNTDEX(GTREGDEX) GET INDEX r : P ADD TTACC(GSWBIN1,TTDKDEX),GTDUPF(CBIN4) B P
0x0e192c…0e1ac0 Dummy {f00=0x0097, f01=0x0190, f02=»F NEGATIVE DEBET d 6 P ADD TTACC(CBIN7,TTDKDEX),GTDUPF(CBIN4) CORRECTION P B UPD50 R PUPDKR b 8 P CBNG GTDUPF(CBIN4),=D'0',UPD50 IF POSITIVE KREDIT, p 6 P ADD TTACC(CBIN7,TTDKDEX),GTDUPF(CBIN4) CORRECTION PUPD50 , P CBG GSWBIN1,CBIN4,U
0x0e1ac0…0e1c54 (0, 286) Dummy {f00=0x0097, f01=0x0190, f02=»HAC,GTDUPF(CBIN1),UPDRET IF KASSEKONTO,NO UPDATE : P CBE TVERSUR,GTDUPF(CBIN1),UPDRET IF VERSUR, NO UPDATE 8 PUPD55 v * P SUB TTCASH,GTDUPF(CBIN4) UPDATE CASH P TBF GTBDTFLG,UPD60 * P* UPDATE FOR TRANS 28,29 VERSUR KONTO P MOVE GSWBIN
0x0e1c54…0e1de8 Dummy {f00=0x0097, f01=0x0190, f02=»7 . P PERF KFREAD,CBIN3,GSWBIN3,GSWBIN7,GTKFVAL P SUB GTKFVAL,GTDUPF(CBIN4) < . P PERF KFWRIT,CBIN3,GSWBIN3,GSWBIN7,GTKFVAL ^ P B UPDRET PUPD60 P TBF GTSTRFLG,UPDRET . P* UPDATE FOR TRANS 18/19, PENGE KONTO - ST * P PERF KFRE
0x0e1de8…0e1f7c Dummy {f00=0x0097, f01=0x0190, f02=»DRET P RET P PEND P EJECT . PUPDA12 PROC D P******************** Z P* v & P* UPDA12 - UPDATE FOR TR12 P* P******************** : P MOVE GSWBIN1,TTCNTNR TAELLER NR
0x0e1f7c…0e2110 Dummy {f00=0x0097, f01=0x0190, f02=»IN4) ^ P ADD TTEJEDB,GTDUPF(CBIN4) 4 P MOVE GSWBCD1,CTR12NR(GSWBIN1) GET TR 12 ACCOUNT . P MOVE GSWBIN7,GSWBIN1 f 4 P PERF KTPLAN,GSWBCD1,GTKTTYP SEE IF KORT NEEDED * P MOVE GTKFVAL,C12ACC(GSWBIN7,TTDKDEX) . P PERF KFWRIT,CBIN1,TTDKDEX,GSW
0x0e2110…0e22a4 Dummy {f00=0x0097, f01=0x0190, f02=» 8 P* FLDTST - TEST IF FIELDS ARE ENTERED CORRECT $ P* FELT AFHAENGIGHEDS TEST D P* l P******************** v , P PERF PACKST,CBINMAX CLEAR UNUSED FIELDS " P IB GTREGDEX, C , P FLDTOK,FLDTOK,FLDT03,FLDT04,FL
0x0e22a4…0e2438 Dummy {f00=0x0097, f01=0x018e, f02=»LDT45, C x < P FLDT45,FLDT45,FLDTOK,FLDTOK,FLDT50, C 0 P FLDT50,FLDT52,FLDT53,FLDT54 R PFLDT03 0 P CBE GTUSED(CBIN12),CBIN0,FLDT035 FIELD 16? . P* YES, RTE/GEB, INSERT TEXT IN TT16TXT * P MOVE GSWBCD3,
0x0e2438…0e25cc Dummy {f00=0x0097, f01=0x018e, f02=» P CBNE GSWBCD3,=D'1',FLDT032 P MOVE TT16TXT,=C'RTE' IF = 1 ( P B FLDT035 L PFLDT032 ^ P CBNE GSWBCD3,=D'2',FLDT035 n P MOVE TT16TXT,=C'GEB' IF = 2 PFLDT035 P TEST CFLT48 P BZ FLDTOK BRANCH IF FALSE P CMP GTUSED(
0x0e25cc…0e2760 Dummy {f00=0x0097, f01=0x0190, f02=» P CMP GTDUPF(CBIN3),=D'26' P BL FLDTOK BKO = 21-25 & PFLDT037 F P CMP GTDUPF(CBIN3),=D'46' V P BE FLDTOK BKO=46 x P CMP GTDUPF(CBIN3),=D'56' P BE FLDTOK BKO=56 P B FLDT039 END ODENSE PFLDT038 HVIDOVRE P C
0x0e2760…0e28f4 (0, 287) Dummy {f00=0x0097, f01=0x0190, f02=»E GTDUPF(CBIN15),=D'1' SET FIELD 48 = 1 P B FLDTOK 0 P* B PFLDT04 L 2 P TBT BCPR,FLDT041 CIR Z P CMP GTUSED(CBIN10),=W'0' " P BE FLDTOK FIELD 17 (INDEX 10) P B FLDTNOK 2 PFLDT041
0x0e28f4…0e2a88 Dummy {f00=0x0097, f01=0x0190, f02=» BNE FLDTNOK P CMP GTUSED(CBIN10),=W'0' P BNE FLDTOK 6 P B FLDTNOK J P* j PFLDT08 t P TEST CFLT46 P BZ FLDTOK P CMP GTUSED(CBIN17),=W'0' P BNE FLDTOK FIELD 46 USED 6 P MOVE GTUSED(CBIN17),=W'46'
0x0e2a88…0e2c1c Dummy {f00=0x0097, f01=0x0190, f02=»1,GTKTTYP P IB GSWBIN1, C . P FLDT105,FLDT105,FLDT102,FLDT108,FLDT108 * PFLDT102 P B FLDTOK l PFLDT105 ~ P CMP GTUSED(CBIN2),=W'0' P BNE FLDTOK P B FLDTNOK PFLDT108 P CMP GTUSED(CBIN2),=W'0' P BNE
0x0e2c1c…0e2db0 Dummy {f00=0x0097, f01=0x0190, f02=» | P B FLDTNOK NOT KOR-KEY PFLDT28 & PFLDT29 4 $ P CBE GTUSED(CBIN7),CBIN0,FLDT281 B P B FLDT18 VALOR OK j PFLDT281 INSERT VALOR DATO P MOVE GTDUPF(CBIN7),GTDATO P MOVE GTUSED(CBIN7),CBIN11 P B FLDT18 PFLDT18
0x0e2db0…0e2f44 Dummy {f00=0x0097, f01=0x018e, f02=» (NOT TO KMD) h $ P MOVE GTUSED(CBIN13),CBIN0 NR-1 $ P MOVE GTUSED(CBIN14),CBIN0 NR-2 > " P MOVE GTUSED(CBIN15),CBIN0 TXT f & P MOVE GTUSED(CBIN18),CBIN0 DATO-1 & P MOVE GTUSED(CBIN19),CBIN0 DATO-2 P B FLDTOK P* PFLDT45 "
0x0e2f44…0e30d8 Dummy {f00=0x0097, f01=0x0190, f02=» r P SUB GSWBCD1,GSWBCD2 YY 0 P MOVE GSWBCD2,GTREGF(CBIN16) (YY-1,YY,YY+1) , ( P ADD GSWBCD2,=D'3' ADJUST FOR FLTDEX ` P SUB GSWBCD2,GSWBCD1 P MOVE GSWBIN1,GSWBCD2 4 P MOVE GTREGF(GSWBIN1),GTREGF(CBIN17) MOVE AMOUNT P MOVE GTUS
0x0e30d8…0e326c Dummy {f00=0x0097, f01=0x0190, f02=»USED(CBIN18),CBIN0 P MOVE GTUSED(CBIN19),CBIN0 P MOVE GTUSED(CBIN20),CBIN0 < P MOVE GTUSED(CBIN21),CBIN0 ^ P B FLDTOK P* PFLDT50 > P PERF FLDIN,CBIN2,CBIN1,CBIN0,CBIN0 FIELD 6,28 P CBE GSWBIN1,=W'1',FLDTOK
0x0e326c…0e3400 Dummy {f00=0x0097, f01=0x0190, f02=» CBNE GSWBIN1,=W'1',FLDTNOK @ P PERF FLDIN,CBIN12,CBIN7,CBIN0,CBIN0 FIELD 33,40 & * P CBE GSWBIN1,=W'2',FLDT525 j > P PERF FLDIN,CBIN14,CBIN20,CBIN21,CBIN22 FIELD 42,43,44,45 * P CBNE GSWBIN1,=W'0',FLDTNOK P
0x0e3400…0e3594 (0, 288) Dummy {f00=0x0098, f01=0x0190, f02=» PFLDT527 8 P CBE GTUSED(CBIN1),=W'0',FLDTOK FIELD 28 : P CBNE GTUSED(CBIN15),=W'0',FLDTNOK FIELD 48 P P B FLDTOK P* PFLDT53 : P CBNE GTUSED(CBIN12),=W'0',FLDT535 FIELD 47 D P
0x0e3594…0e3728 Dummy {f00=0x0098, f01=0x0190, f02=» CBNE GTUSED(CBIN7),=W'0',FLDT537 FIELD 40 : P CBNE GTUSED(CBIN12),=W'0',FLDTNOK FIELD 47 8 PFLDT537 v 8 P CBE GTUSED(CBIN1),=W'0',FLDTOK FIELD 28 : P CBNE GTUSED(CBIN15),=W'0',FLDTNOK FIELD 48 P
0x0e3728…0e38bc Dummy {f00=0x0098, f01=0x0190, f02=»15),=W'0',FLDTNOK FIELD 48 t P B FLDTOK " P* B PFLDTOK L : P CMP CBIN0,CBIN0 SET CR=0 OK Z P RET P* PFLDTNOK B P CMP CBIN0,CBIN1 SET CR <> 0 NOT OK
0x0e38bc…0e3a50 Dummy {f00=0x0098, f01=0x0190, f02=» P* ! 6 P* FLDIN- TESTS HOW MANY OF THE GIVEN FIELDS ! * P* (GIVEN BY INDEX) ARE PRESENT ! H P* OUTPUT IN GSWBIN1 ! v P* ! P******************** ! " P MOVE GSWBIN1,=W'0' ! $ P CBE FML1,=W'0',FLD5 !
0x0e3a50…0e3be4 Dummy {f00=0x0098, f01=0x018e, f02=» CBE GTUSED(FML2),=W'0',FLD2 ! " P ADD GSWBIN1,=W'1' " * PFLD2 " P $ P CBE FML3,=W'0',FLD5 " , P CBE GTUSED(FML3),=W'0',FLD3 " " P ADD GSWBIN1,=W'1' " PFLD3 " $ P CBE FML4,=W'0',FLD5 "
0x0e3be4…0e3d78 Dummy {f00=0x0098, f01=0x4030, f02=» P* # P* # P END # @ # , ADD GSWBIN1,=W'1' " * PFLD2 " P $ P CBE FML3,=W'0',FLD5 " , P CBE GTUSED(FML3),=W'0',FLD3 " " P ADD GSWBIN1,=W'1' " PFLD3 " $ P CBE FML4,=W'0',FLD5 "
0x0e3d78…0e3f0c Dummy {f00=0x0098, f01=0x2008, f02=» $ CBE GTUSED(FML3),=W'0',FLD3 " P ADD GSWBIN1,=W'1' 4 PFLD3 Z $ P CBE FML4,=W'0',FLD5 f , P CBE GTUSED(FML4),=W'0',FLD5 " P ADD GSWBIN1,=W'1' PFLD5 P RET P
0x0e3f0c…0e40a0 Dummy {f00=0x0098, f01=0x0190, f02=»BIN2),A76NOK 4 t , P CBL GSWBCD3,=D'1',A76NOK MIN COUNTER NO 5 & P ADD GSWBIN1,CTR12(TTASKNR,CBIN1) 5 D & P CBL CTR12NR(GSWBIN1),=D'1',A76NOK 5 n P MUST BE > 0 5 P B ART TO WRITE ON SCREEN 5 PA76NOK 5 P MOVE SPBINW4,CBIN18 5 P B ART 5 P
0x0e40a0…0e4234 (0, 289) Opaque[0x194]
0x0e4234…0e43c8 # DirEnt {nam=»RGSUB2«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1308, f03=0x0000}
0x0e4234…0e43c8 IdxSect {
0x0e4234…0e43c8 f00 = 0x0098 // 0xe4234 @0x0
0x0e4234…0e43c8 f01 = 0x0004 // 0xe4236 @0x2
0x0e4234…0e43c8 gno = [ // 0xe4238 @0x4
0x0e4234…0e43c8 [0x00]: C0x0098.0x1.0
0x0e4234…0e43c8 [0x01]: C0x0098.0x2.0
0x0e4234…0e43c8 ]
0x0e4234…0e43c8 }
0x0e43c8…0e455c Dummy {f00=0x0098, f01=0x0190, f02=» P IDENT RGSUB2 03.01.XXX.1 P DDUM KMD08 & P PDIV D P ENTRY PACKST Z P ENTRY PACKCL p P EXT EMPTYT P EXT CYTRP P INCLUDE EQUATE P EJECT PPACKST PROC PAR P********************
0x0e455c…0e46f0 Dummy {f00=0x0098, f01=0x0190, f02=»D z P* P* ALTERED FIELDS: GSWBIN1 P* GTDUPF 6 P* GTUSED V P******************** v P MOVE GSWBIN1,CBIN1 PPST10 $ P CBE GTUSED(GSWBIN1),CBIN0,PST30 P*SOMETHING ENTERED P CALL EMPT
0x0e46f0…0e4884 Dummy {f00=0x0098, f01=0x0190, f02=» 6 P MOVE GTDUPF(GSWBIN1),GTREGF(GSWBIN1) TO DUP FIELD P B PST40 > P* NOTHING ENTERED N PPST30 h P MOVE GTDUPF(GSWBIN1),=X'FF' v P TBF GTLOKSPG,PST40 P MOVE GTREGF(GSWBIN1),=X'FF' P* CLEAR IF SPG. FUNCTION PPST40
0x0e4884…0e4a18 Dummy {f00=0x0098, f01=0x0190, f02=»**************** l P* P* PACKCL - CLEAR ROUTINE " P* B P* ALTERED FIELDS: L * P* GSWBIN1 - SET TO CBINMAX f . P* GTUSED - ALL ENTRIES SET TO 0 P* 4 P*********************************************** " P
0x0e4a18…0e4bac Dummy {f00=0x0098, f01=0x0190, f02=» 4 P MOVE GTUSED(GSWBIN1),CBIN0 LOOP CBINMAX TIMES P ADD GSWBIN1,CBIN1 < P CBL GSWBIN1,CBINMAX,PCKCL10 V $ P MOVE TT07TXT,=C' ' CLEAR TEXTS z P MOVE TT16TXT,=C' ' P CLEAR TTSMALL P CLEAR TTEORFLG TRANS ERASED P CLEAR TFELT90
0x0e4bac…0e4d40 Dummy {f00=0x0098, f01=0x4008, f02=»@ E GTUSED(GSWBIN1),CBIN0 LOOP CBINMAX TIMES P ADD GSWBIN1,CBIN1 < P CBL GSWBIN1,CBINMAX,PCKCL10 V $ P MOVE TT07TXT,=C' ' CLEAR TEXTS z P MOVE TT16TXT,=C' ' P CLEAR TTSMALL P CLEAR TTEORFLG TRANS ERASED P CLEAR TFELT90
0x0e4d40…0e4ed4 (0, 290) Dummy {f00=0x0098, f01=0x2008, f02=» IDENT RGSUB2 P DDUM KMD08 $ P PDIV B P ENTRY PACK X P ENTRY PACKCL v P ENTRY PACKF P ENTRY DEPACK P INCLUDE EQUATE P END @
0x0e4ed4…0e5068 Dummy {f00=0x0098, f01=0x0190, f02=» " P* P = 1 BCHK20 - LEV + TRANS 1 P* P = 2 BCHK30 - TRANS 2 * $ P* P = 3 BCHK40 - TRANS 3 + PRINT J P* P = 4 BCHK50 - PRINT r P MOVE GSWBIN8,P P ADD GSWBIN8,CBIN1 2 P IB GSWBIN8,BCHK10,BCHK20,BCHK30,BCHK40,BCHK50 P B BCHK90
0x0e5068…0e51fc Dummy {f00=0x0098, f01=0x0190, f02=» | PBCHK15 & P PERF FMOD,GSWBIN5,SPINPUT WITH X P ADD GSWBIN5,CBIN1 @ P CBL GSWBIN5,CBIN17,BCHK15 Z P B BCHK65 PRINT IT | P* $ PBCHK20 INITIATE LEV + 1. TRANS * P PERF FMREMP,CBIN1 GET FORMAT FBDTCHK P PERF FMOD,CBIN8,G
0x0e51fc…0e5390 Dummy {f00=0x0098, f01=0x0190, f02=» v P PERF FMOD,CBIN15,GTLEVPDI P* * P MOVE CBDTSUM1,GTDUPF(CBIN4) 4 P PERF TXTEDIT,CBIN1,CBIN1 X P B BCHK90 z P* PBCHK30 P ADD CBDTSUM1,GTDUPF(CBIN4) P PERF TXTEDIT,CBIN1,CBIN2 P B BCHK90 P* PBC
0x0e5390…0e5524 Dummy {f00=0x0098, f01=0x0190, f02=»,=D'1',BCHK90 NOTHING TO PRINT ? PBCHK60 ( P EDIT SPINPUT,FREMTOT1 6 P PERF FMOD,CBIN4,SPINPUT T P PERF FMOD,CBIN16,SPINPUT t P PERF FSOLVE PBCHK65 P MOVE CBDTSUM1,=D'0' P PERF GENWRS,GTHCDEV,EDITBUF P PERF NEWLIN,CBI
0x0e5524…0e56b8 Dummy {f00=0x0098, f01=0x0190, f02=» SET GTCHKPR PBCHK90 P CMP CBIN0,CBIN0 " P RET : P PEND F P EJECT T PBGIRPR PROC P b P* BGIRPR10 - ADJUST PRINTER x P* BGIRPR20 - LEV 1 + TRANS 1 P* BGIR30 - TRANS 2 P* BGIR40 TRANS 3 P* BGIR50 - LEV 2 + TRA
0x0e56b8…0e584c Dummy {f00=0x0098, f01=0x0190, f02=»N1 0 P IB GSWBIN8,BGIR10,BGIR20,BGIR30,BGIR40, C " P BGIR50,BGIR60,BGIR70,BGIR80 > P B BGIR90 d P* v PBGIR10 * P PERF FMREMP,CBIN2 GET FORMAT FBDTGIR P MOVE SPINPUT,='X' P MOVE GSWBIN5,CBIN1 PBGIR15 P PERF FM
0x0e584c…0e59e0 Dummy {f00=0x0098, f01=0x018e, f02=»REMP,CBIN2 GET FORMAT FBDTGIR * P MOVE CBDTSUM2,=D'0' GIRO TOTAL RIGHT & P EDIT GSWSTR20,FSAMLEV T * P PERF FMOD,CBIN2,GSWSTR20 MOVE GIRONR r P PERF FMOD,CBIN9,GTLEVNVN P PERF FMOD,CBIN12,GTLEVADR P PERF FMOD,CBIN16,GTLEVBY P P
0x0e59e0…0e5b74 (0, 291) Opaque[0x194]
0x0e5b74…0e5d08 # DirEnt {nam=»GEN «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1318, f03=0x0000}
0x0e5b74…0e5d08 IdxSect {
0x0e5b74…0e5d08 f00 = 0x0098 // 0xe5b74 @0x0
0x0e5b74…0e5d08 f01 = 0x0004 // 0xe5b76 @0x2
0x0e5b74…0e5d08 gno = [ // 0xe5b78 @0x4
0x0e5b74…0e5d08 [0x00]: C0x0098.0x3.0
0x0e5b74…0e5d08 [0x01]: C0x0099.0x0.0
0x0e5b74…0e5d08 ]
0x0e5b74…0e5d08 }
0x0e5d08…0e5e9c Dummy {f00=0x0098, f01=0x0190, f02=» PLED KMD08,/S P!!CH $$EJECT$$ $$ P!!CH $$DCTASK$$DCTSK$$ 2 P!!CH $$26$$20$$ P P!!DL 52,60 DK05 -> LP h P!!DL 61,62 FD03,FD04 P!!DL 67,89 P!!DL 90,108 P!!DL 109,126 LP P!!DL 139,163 P!!RE 186,$$6040$$E9C
0x0e5e9c…0e6030 Dummy {f00=0x0098, f01=0x0190, f02=»RE 201,$$FALSE$$FALSE$$ CTESTFLG 2 P!!RE 202,$$FALSE$$FALSE$$ CTRVALG (NU VIBORG) ( $ P!!RE 203,$$FALSE$$FALSE$$ CFLT46 ^ $ P!!RE 204,$$FALSE$$FALSE$$ CFLT48 $ P!!RE 205,$$TRUE$$FALSE$$ CKTAUTO P!!RE 206,$$FALSE$$TRUE$$ DC & P!!RE 207,$$FAL
0x0e6030…0e61c4 Dummy {f00=0x0098, f01=0x0190, f02=» CKASFLG x $ P!!RE 211,$$TRUE$$FALSE$$ CSLDFLG & P!!RE 212,$$FALSE$$FALSE$$ CGLREGFL 8 & P!!RE 213,$$FALSE$$FALSE$$ CCONVERT b & P!!RE 237,$$FALSE$$FALSE$$ CREMITFL & P!!RE 246,$$FALSE$$FALSE$$ CTEXTFLG & P!!RE 247,$$FALSE$$FALSE$$ CSTRKFLG &
0x0e61c4…0e6358 Dummy {f00=0x0098, f01=0x0190, f02=» 318,$$FALSE$$TRUE$$ FAKT10 ( P!!RE 319,$$FALSE$$TRUE$$ FELT 90-94 $ & P!!RE 422,$$FALSE$$FALSE$$ C167FLG P 8 P!!RE 432,$$FALSE$$FALSE$$GENERATE LEVNR 5X XXXXXX CC z . P!!RE 433,$$FALSE$$FALSE$$ C539FLG-TINGLEV * P!!RE 434,$$TRUE$$FALSE$$ NO VSL
0x0e6358…0e64ec Dummy {f00=0x0098, f01=0x0190, f02=»D-KOM$$DRAGSH$$ P!!RE 449,$$7$$7$$ CKTINDX " P!!RE 450,$$20$$20$$ INDEX FILE : P!!RE 451,$$5$$5$$ CKTTOP ` P!!DL 777,780 P!!DL 783,784 P!!DL 787,790 P!!DL 796 DUMMY T:IO P!!DL 808,827 P!!DL 828,843 P!!DL 844
0x0e64ec…0e6680 Dummy {f00=0x0098, f01=0x2008, f02=» RAGSH$$ P!!RE 449,$$7$$7$$ CKTINDX " P!!RE 450,$$20$$20$$ INDEX FILE : P!!RE 451,$$5$$5$$ CKTTOP ` P!!DL 777,780 P!!DL 783,784 P!!DL 787,790 P!!DL 796 DUMMY T:IO P!!DL 808,827 P!!DL 828,843 P!!DL 844
0x0e6680…0e6814 (0, 292) Dummy {f00=0x0099, f01=0x0190, f02=» NO WAIT % x " P* =1 WAIT & $ P* =2 RETURN & 6 6 P* =3 WRITE WITH NO WAIT, RETURN & ^ P* & P******************* & P MOVE SPBINW1,=X'0801' & 2 P DSC1 SCREEN,6,SPBINW1 SET CURSOR ON LAST RO
0x0e6814…0e69a8 Dummy {f00=0x0099, f01=0x0190, f02=» & n P B LINRET ' PLIN801 ' " P EDWRT SCREEN,SPFTBMES(WRTMES) ' ( PLIN800 ' N P CBE WRTTYP,=W'0',LIN8NW ' P CBE WRTTYP,=W'2',LINRET ' | P* READ ' PLIN8IN ' ( P MOVE SPBINW1,=W'3' REQUESTED LENGTH ' " P IB SPKEY,LIN805,LIN810,LIN815 '
0x0e69a8…0e6b3c Dummy {f00=0x0099, f01=0x0190, f02=»INW2 ' j P B LIN820 ( PLIN815 ( . P NKI KEYB,SPINPUT,SPKTAB13,SPBINW1,SPBINW2 ( , PLIN820 ( ^ P BNOK LIN8IN JUMP IF NOT OK ( l P PERF DKTEST ( $ P IB SPBINW2,LIN8IN,LIN8CT,LIN8IN ( P B LIN8IN ( P* CLEAR LINE ( PLIN8CT ( P PERF CL
0x0e6b3c…0e6cd0 Dummy {f00=0x0099, f01=0x0190, f02=»LIN855,LIN860,LIN865 ( PLIN855 ) 2 P NKI .NW,KEYB,SPINPUT,SPKTAB1,SPBINW1,SPBINW2 ) * P B LIN870 ) ` PLIN860 ) r 2 P NKI .NW,KEYB,SPINPUT,SPKTAB12,SPBINW1,SPBINW2 ) P B LIN870 ) PLIN865 ) 2 P NKI .NW,KEYB,SPINPUT,SPKTAB13,SPBINW1,SPBINW2 )
0x0e6cd0…0e6e64 Dummy {f00=0x0099, f01=0x0190, f02=»* ) 0 P* SPINF1 - WRITE INF ON FIRST LINE * P* * > P******************** * H P MOVE SPBINW1,=X'0117' * d 4 P DSC1 SCREEN,6,SPBINW1 SET CURSOR ON FIRST LINE * P MOVE SPBINW1,CBIN0 * 2 P EDWRT SCREEN,SPFTBMES(CBIN7) WRITE MESSAGE 7 *
0x0e6e64…0e6ff8 Dummy {f00=0x0099, f01=0x018e, f02=»- WRITE INF ON LAST LINE * ~ P* + P******************** + * P PERF SPLIN8,CBIN4,CBIN2 + F P RET + f P PEND + r P* + P* + PCLEAR8 PROC + $ P* DELETE FIRST 14 CHARACTERS + P* OF LINE 8 + . P MOVE GSWBIN2,=X'0801' INDICATE
0x0e6ff8…0e718c Dummy {f00=0x0099, f01=0x0190, f02=» P PEND , P* , P* , PDKTEST PROC , & $ P* TEST IF DISK IS SWITCHED OFF, , : P* , b P TBF CDKOFF,DKTRET , l P TBT GTMASTFL,DKTRET , 0 P* WRITE MESSAGE, AND WAIT FOR FLAG CLEARED , $ P MOVE SPBINW5,=X'0801' POSITION , " P DSC1 SCRE
0x0e718c…0e7320 Dummy {f00=0x0099, f01=0x40bc, f02=»F CLEAR8 , P CMP CBIN1,CBIN0 NOK - P RET - , PDKTRET - 8 P CMP CBIN0,CBIN0 OK - F P RET - b P PEND - n P* - | P* - P* - P* - P - P END - @ - FOR FLAG CLEARED , $ P MOVE SPBINW5,=X'0801' POSITION , " P DSC1 SCRE
0x0e7320…0e74b4 (0, 293) Opaque[0x194]
0x0e74b4…0e7648 # DirEnt {nam=»RGLIST«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1328, f03=0x0000}
0x0e74b4…0e7648 IdxSect {
0x0e74b4…0e7648 f00 = 0x0099 // 0xe74b4 @0x0
0x0e74b4…0e7648 f01 = 0x0002 // 0xe74b6 @0x2
0x0e74b4…0e7648 gno = [ // 0xe74b8 @0x4
0x0e74b4…0e7648 [0x00]: C0x0099.0x1.0
0x0e74b4…0e7648 ]
0x0e74b4…0e7648 }
0x0e7648…0e77dc Dummy {f00=0x0099, f01=0x0190, f02=» PSKF 1 PTRA RGSTRT PTRA DKSUBS $ PTRA KMD08 6 PTRA RGMAIN H PTRA RGMND Z PTRA SCREEN l PTRA KMDIO ~ PTRA RGKLAR PTRA RGADM PTRA RGSUB1 PTRA RGSUB2 PTRA RGSUB3 PTRA RGSUB4 PTRA RGFRMT
0x0e77dc…0e7970 Dummy {f00=0x0099, f01=0x0190, f02=»N PTRA KTPLND PTRA KTOPR PTRA KTOPRD . PTRA REMFMT @ PTRA REMFMS R PTRA REMTXT d PTRA REMLEV v PTRA REMBDT PTRA REMBDS PTRA REMTR PTRA REMTRD PTRA REMPRT PTRA REMPRD PTRA REMSUB PTR
0x0e7970…0e7b04 Dummy {f00=0x0099, f01=0x0190, f02=»DIV743 PTRA DIV539 PTRA DIV267 P* 2 PPRT /S,SL461 < PPRT /S,SL525 P PPRT /S,SL167 d PPRT /S,SL787 x PPRT /S,SLCOP P* PPRT /S,KEY461 PPRT /S,KEY525 PPRT /S,KEY167 PPRT /S,KEY787 PPRT /S
0x0e7b04…0e7c98 Dummy {f00=0x0099, f01=0x004e, f02=» PASM TB3270 PSCR PTRA EQULST & PSCR 8 $ASG2 D PPRT /S,SL525 P PPRT /S,SL167 d PPRT /S,SL787 x PPRT /S,SLCOP P* PPRT /S,KEY461 PPRT /S,KEY525 PPRT /S,KEY167 PPRT /S,KEY787 PPRT /S
0x0e7c98…0e7e2c Dummy {f00=0x0099, f01=0x2008, f02=» ASM TB3270 PSCR PTRA EQULST & PSCR 8 $ASG2 D PPRT /S,SL525 P PPRT /S,SL167 d PPRT /S,SL787 x PPRT /S,SLCOP P* PPRT /S,KEY461 PPRT /S,KEY525 PPRT /S,KEY167 PPRT /S,KEY787 PPRT /S
0x0e7e2c…0e7fc0 Dummy {f00=0x0099, f01=0x0190, f02=» J F " D T8 L L Dj c j c j c D 0X 1X F L0 R R@+_ @ , z $ & & 99999999E-99 "
0x0e7fc0…0e8154 (0, 294) Opaque[0x194]
0x0e8154…0e82e8 # DirEnt {nam=»CONRT «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1330, f03=0x0000}
0x0e8154…0e82e8 IdxSect {
0x0e8154…0e82e8 f00 = 0x0099 // 0xe8154 @0x0
0x0e8154…0e82e8 f01 = 0x0002 // 0xe8156 @0x2
0x0e8154…0e82e8 gno = [ // 0xe8158 @0x4
0x0e8154…0e82e8 [0x00]: C0x0099.0x2.0
0x0e8154…0e82e8 ]
0x0e8154…0e82e8 }
0x0e82e8…0e847c Dummy {f00=0x0099, f01=0x018e, f02=» PT; P01; PTID=TB; PTCL=TB; * PLEV=60; : P01; J PTDC=T01; V PLC=08L; f P00; v T; P01; TID=TC; TCL=TC; LEV=60; P03; PTDC=T03; PLC=01L; PTDC=T07; PLC=0
0x0e847c…0e8610 Dummy {f00=0x0099, f01=0x018e, f02=» P01; PTDC=T02; PLC=02L; $ P01; 4 PSCL=S05; @ PT; P P01; Z PTID=TE; f PTCL=TC; v PLEV=60; P02; PTDC=T03; PLC=01R; PTDC=T07; PLC=01R; P00; PT; P01; PTID=
0x0e8610…0e87a4 Dummy {f00=0x0099, f01=0x005a, f02=» P00; P01; PSCL=S01; U; 0 001; : TB2; F P004; R01; Z PTID=TE; f PTCL=TC; v PLEV=60; P02; PTDC=T03; PLC=01R; PTDC=T07; PLC=01R; P00; PT; P01; PTID=
0x0e87a4…0e8938 Dummy {f00=0x0099, f01=0x2008, f02=» 00; P01; PSCL=S01; U; 0 001; : TB2; F P004; R01; Z PTID=TE; f PTCL=TC; v PLEV=60; P02; PTDC=T03; PLC=01R; PTDC=T07; PLC=01R; P00; PT; P01; PTID=
0x0e8938…0e8acc Dummy {f00=0x0099, f01=0x0190, f02=» F G I O 2 Q B R T T f Z x ] _ e g h j
0x0e8acc…0e8c60 Dummy {f00=0x0099, f01=0x0190, f02=» " D @ RJLL L RJLL L & RJLL L RJLL L RJLL L RJLL 0 N 0 ` 0 r 0
0x0e8c60…0e8df4 (0, 295) Opaque[0x194]
0x0e8df4…0e8f88 # DirEnt {nam=»KM173 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1338, f03=0x0000}
0x0e8df4…0e8f88 IdxSect {
0x0e8df4…0e8f88 f00 = 0x0099 // 0xe8df4 @0x0
0x0e8df4…0e8f88 f01 = 0x0006 // 0xe8df6 @0x2
0x0e8df4…0e8f88 gno = [ // 0xe8df8 @0x4
0x0e8df4…0e8f88 [0x00]: C0x0099.0x3.0
0x0e8df4…0e8f88 [0x01]: C0x009a.0x0.0
0x0e8df4…0e8f88 [0x02]: C0x009a.0x1.0
0x0e8df4…0e8f88 ]
0x0e8df4…0e8f88 }
0x0e8f88…0e911c Dummy {f00=0x0099, f01=0x0190, f02=» PPRT KM173 PPRT C173 * PMES LYNGBY-T]RB[K KOMMUNE, REMITTERING & PMES 810511 NJ T PMES * j PSCR x PLED KMD08 P!!CH $$DCTASK$$DCTSK$$ P!!DL 60 BUDGET FILE P!!DL 61,62 FD03,FD04 P!!DL 67,108 RKONV P!!
0x0e911c…0e92b0 Dummy {f00=0x0099, f01=0x018e, f02=»X'40' DV ADR KB/VDU P!!DL 225 " PMF1GTP STRG 32X'40' DV ADR GTP , P!!DL 228 R PMF1CU STRG X'E2C2' CU ADR b P!!DL 230 * PCNFHC STRGI (16),' ' HARDCOPY PRINTER P!!DL 235,236 PFROMKX STRGI (12)2C' ' P!!RE 240,$$FALSE$$
0x0e92b0…0e9444 Dummy {f00=0x0099, f01=0x0190, f02=» $ P!!RE 251,$$FALSE$$TRUE$$ 5M DISK & P!!RE 279,$$FALSE$$TRUE$$ CREMITFLG , & P!!RE 288,$$FALSE$$TRUE$$ TEXT REG V $ P!!RE 289,$$FALSE$$TRUE$$ LEVREG " P!!RE 290,$$FALSE$$TRUE$$ BUNDT P!!DL 331 : PCFLAG BINI (12,2),X'0011',X'0000',X'0078',
0x0e9444…0e95d8 Dummy {f00=0x0099, f01=0x0190, f02=»VERSION l ( P!!RE 484,$$1400$$10000$$ NO OF REG. P!!RE 490,$$128$$80$$ < P!!RE 492,$$OD-KOM$$LYNGBY$$ X " P!!RE 494,$$20$$200$$ LEVINDEX | P!!RE 495,$$5$$1$$ KORT LINE P!!DL 496,497 PFROMTX STRGI (12)2C' ' P!!DL 817,1091
0x0e95d8…0e976c Dummy {f00=0x0099, f01=0x0190, f02=»M | P!!DL 1115 P!!DL 1129,1155 KBVGO P!!DL 1156,1175 RKGO 8 P!!DL 1176,1191 GTPGO T P!!DL 1192,1203 LPGO p P!!DL 1217,1234 OFFLINE P!!DL 1250,1262 RKSWITCH P!!DL 1265 REENTER P!!DL 1274,1276 P!!EN PNO
0x0e976c…0e9900 Dummy {f00=0x0099, f01=0x0190, f02=»$ | P!!EN PTRA /S,NL PINC RGSUB4 ( PINC RGSTRT : PNOD R L PINC RGMAIN Z PINC RGSUBS l PINC RGSUB1 ~ PINC RGSUB2 PINC RGSUB3 PNOD R PINC RGKLAR PINC KTPLN PINC KTOPR PINC BUDD P
0x0e9900…0e9a94 (0, 296) Dummy {f00=0x009a, f01=0x0190, f02=»D R PLED KMDIO,/S P!!DL 149,181 WRFD090-WRFD095 PWRFD090 D PWRFD091 T PWRFD092 d PWRFD093 t PWRFD094 PWRFD095 P!!EN PTRA /S,NL PINC DKSUBS PINC REMTXT PNOD R PINC RGFRMT PLE
0x0e9a94…0e9c28 Dummy {f00=0x009a, f01=0x0190, f02=» v P FILLR ' ',17 P FILLR '*',1 " P FTEXT X'0F' (1) TOTAL AMOUNT 2 P FNL X P FTEXT X'16' (2) TEXT1 d P FNL P FTEXT X'15' (3) INFO1 P FILLR ' ',1 P FTEXT X'0F' (4) AMOUNT1 P FNL P FILLR ' ',48 P FTEXT
0x0e9c28…0e9dbc Dummy {f00=0x009a, f01=0x0190, f02=»TEXT X'15' (8) INFO2 P FILLR ' ',1 P FTEXT X'0F' (9) AMOUNT2 0 P FILLR ' ',11 P P FTEXT X'14' (10) LEVBY f P FNL P FILLR ' ',48 P FTEXT X'04' (11) POSTNR P FILLR ' ',2 P FTEXT X'0D' (12) POSTDIST P FNL
0x0e9dbc…0e9f50 Dummy {f00=0x009a, f01=0x0190, f02=» P FNL P FNL P FILLR ' ',10 & P FTEXT X'0A' (16) FTEXT CHECKBELOB 6 " P FTEXT X'0F' (17) TOTAL AMOUNT ` P FMEND P!!EN PTRA /S,NL PNOD R PINC REMLEV PINC ADM6 PNOD R PINC REMTR PLED RE
0x0e9f50…0ea0e4 Dummy {f00=0x009a, f01=0x018e, f02=»FMOD,CBIN7,GTLEVADR P PERF FMOD,CBIN10,GTLEVBY P!!DL 139,140 > P PERF FMOD,CBIN11,GSWSTR9 R P PERF FMOD,CBIN12,GTLEVPDI t P!!DL 160,161 P PERF FMOD,CBIN1,SPINPUT P EDIT SPINPUT,FREMTOTS P PERF FMOD,CBIN17,SPINPUT 0
0x0ea0e4…0ea278 Dummy {f00=0x009a, f01=0x0190, f02=» P RET P PEND P!!DL 445,447 " " P PERF FMOD,CBIN2,GTLEVTXT TEST 6 " P PERF FMOD,CBIN3,SPINPUT INFO $ P PERF FMOD,CBIN4,GSWSTR20 AMOUNT P!!DL 450,452 P PERF FMOD,CBIN6,GTLEVTXT P PERF FMOD,CBIN8,SPINPUT P PERF FM
0x0ea278…0ea40c Dummy {f00=0x009a, f01=0x013c, f02=»TR20 z P!!DL 601 $ P FMEL 'TTTTTTTVTT9,99-',GTBSUM1 P!!DL 610 D $ P FMEL 'TTTTTTTVTT9,99-',GTBSUM2 T P!!EN | PTRA /S,NL PTLK U,4K PINC DCTSK P$INCGEN LKE M PKPF /L,RGL173 PSCR 2 PMES $PDISC M
0x0ea40c…0ea5a0 Dummy {f00=0x009a, f01=0x2008, f02=» P!!DL 601 $ P FMEL 'TTTTTTTVTT9,99-',GTBSUM1 P!!DL 610 D $ P FMEL 'TTTTTTTVTT9,99-',GTBSUM2 T P!!EN | PTRA /S,NL PTLK U,4K PINC DCTSK P$INCGEN LKE M PKPF /L,RGL173 PSCR 2 PMES $PDISC M
0x0ea5a0…0ea734 (0, 297) Dummy {f00=0x009a, f01=0x0190, f02=»
[…0x5…]
0x0eaf18…0eb0ac Dummy {f00=0x009a, f01=0x0190, f02=» TCTDTETFTGTHTITJTKTLTMTN F [ " w > M e m 1 p
0x0eb0ac…0eb240 Dummy {f00=0x009a, f01=0x0190, f02=» Q
0x0eb240…0eb3d4 (0, 298) Opaque[0x194]
0x0eb3d4…0eb568 # DirEnt {nam=»KM261 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1350, f03=0x0000}
0x0eb3d4…0eb568 IdxSect {
0x0eb3d4…0eb568 f00 = 0x009a // 0xeb3d4 @0x0
0x0eb3d4…0eb568 f01 = 0x0004 // 0xeb3d6 @0x2
0x0eb3d4…0eb568 gno = [ // 0xeb3d8 @0x4
0x0eb3d4…0eb568 [0x00]: C0x009a.0x2.0
0x0eb3d4…0eb568 [0x01]: C0x009a.0x3.0
0x0eb3d4…0eb568 ]
0x0eb3d4…0eb568 }
0x0eb568…0eb6fc Dummy {f00=0x009a, f01=0x0190, f02=» PPRT KM261 PPRT C261 " PMES LEJRE KOMMUNE, REMITTERING & PMES INCLUDES BUDGET L PSCR h PLED KMD08,/S t P!!CH $$(26)$$(22)$$ P!!CH $$'26'$$'22'$$ P!!CH $$-4$$4$$ TRANS 40 P!!RE 36,$$F8$$FA$$ P!!RE 37,$$F9$$
0x0eb6fc…0eb890 Dummy {f00=0x009a, f01=0x0190, f02=»C1C2C3C4C5C6C750' DEV. ADR. 4 PMF1GTP STRG 32X'C8C94A4B4C4D4E4F' DV ADR, GTP/LP $ " PMF1CU STRG X'E8C8' CU ADDRESS . PCNFHC STRGI (16),'GB','GA','GA','GA',' ' P!!DL 235,236 & PFROMKX STRGI (12)2C'TD',' ',' ' $ P!!RE 240,$$FALSE$$TRUE
0x0eb890…0eba24 Dummy {f00=0x009a, f01=0x018e, f02=» $ P!!RE 247,$$TRUE$$TRUE$$ CKTAUTO P!!RE 248,$$FALSE$$TRUE$$ DC , & P!!RE 249,$$FALSE$$FALSE$$ CCYWRTF P & P!!RE 251,$$FALSE$$FALSE$$ C5MDISK z $ P!!RE 252,$$TRUE$$FALSE$$ CKASFLG $ P!!RE 253,$$TRUE$$FALSE$$ CSLDFLG & P!!RE 255,$$FALSE$$FA
0x0eba24…0ebbb8 Dummy {f00=0x009a, f01=0x0190, f02=» & P!!RE 289,$$FALSE$$TRUE$$ CSTRKFLG & P!!RE 290,$$FALSE$$TRUE$$ CBUDTFLG . P!!DL 331 X : PCFLAG BINI (12,2),X'0015',X'0000',X'0064',X'0000', C h P X'0000',X'0000' $ P!!RE 361,$$FALSE$$TRUE$$T=BUDGET $ P!!RE 362,$$FALSE$$TRUE$$ CFAKT10
0x0ebbb8…0ebd4c Dummy {f00=0x009a, f01=0x0190, f02=» NO VSL CHECK x $ P!!RE 484,$$1400$$1400$$DISK SIZE P!!RE 485,$$21$$21$$ CKTMAX > P!!RE 490,$$128$$80$$ CRECLGD ` P!!RE 492,$$OD-KOM$$LEJRE $$ P!!RE 493,$$7$$7$$ CKTINDX " P!!RE 494,$$20$$20$$ INDEX FILE P!!RE 495,$$5$$5$$ CKTTOP
0x0ebd4c…0ebee0 Dummy {f00=0x009a, f01=0x018e, f02=»72 RK P!!DL 1200 P MOVE TCT01,=W'3' PRINTER NR P!!DL 1250,1262 D P!!DL 1265 Z P!!EN l PNOD C x PTRA /S,NL PINC DIV539 PNOD R PLED SCREEN,/S P!!CH $$KEY461$$KEY539$$ P!!CH $$SL461$$SLCOP$$
0x0ebee0…0ec074 (0, 299) Dummy {f00=0x009a, f01=0x0190, f02=» PINC RGSUB2 PINC RGSUB3 PNOD D ( PINC RGKLAR 6 PINC KTPLN H PINC KTOPR Z PNOD D l PINC RGADM z PINC REMSUB PNOD R PINC ADM5 PINC SUBAPL PINC REMPRT PNOD R PINC KMDIO PINC DKSU
0x0ec074…0ec208 Dummy {f00=0x009a, f01=0x0190, f02=» PNOD D PINC REMTR PLED REMBDT ( P!!DL 177,250 : PB821PR PROC N P RET b P PEND n P!!DL 635 (FILLR ' ',40) | P FILLR ' ',22 P!!EN PTRA /S,NL PNOD D PINC BUDGET PTLK U,4K PINC PRT
0x0ec208…0ec39c Dummy {f00=0x009a, f01=0x0036, f02=» M=M:261,MU=M:POOL92,A=RGL261,C=C261 P$ASG2 , P!!DL 177,250 : PB821PR PROC N P RET b P PEND n P!!DL 635 (FILLR ' ',40) | P FILLR ' ',22 P!!EN PTRA /S,NL PNOD D PINC BUDGET PTLK U,4K PINC PRT
0x0ec39c…0ec530 Dummy {f00=0x009a, f01=0x2008, f02=» ,MU=M:POOL92,A=RGL261,C=C261 P$ASG2 , P!!DL 177,250 : PB821PR PROC N P RET b P PEND n P!!DL 635 (FILLR ' ',40) | P FILLR ' ',22 P!!EN PTRA /S,NL PNOD D PINC BUDGET PTLK U,4K PINC PRT
0x0ec530…0ec6c4 Dummy {f00=0x009a, f01=0x0190, f02=» P DISPLAY 0,CBIN1,CBIN0 P B CONT " PECLRN1 2 P DISPLAY 1,CBIN1,CBIN0 @ P B CONT ^ PECLRN2 n P DISPLAY 2,CBIN1,CBIN0 | P B CONT PECLRN3 P DISPLAY 3,CBIN1,CBIN0 P B CONT PECLRN4 P DISPLAY 4,CBIN1,CBI
0x0ec6c4…0ec858 Dummy {f00=0x009a, f01=0x0190, f02=»NT5 6 P GETFLD 0,SPBINW4,SPBINW3 SEARCH CURRENT POSITION P BZ SETCREAD JUMP IF FOUND F " P BL KTHOME POSITION NOT FOUND h P* P* COMPULSORY FIELD FOUND P* & P MOVE SPBINW4,SPBINW3 CHANGE INDEX P B CONT5 SEARCH AGAIN
0x0ec858…0ec9ec Dummy {f00=0x009a, f01=0x0190, f02=»LD n P P* * P* READ TO CURRENT FIELD ON DISPLAY P* J PREADIN T P* SET FLAG IF AUTODUP b P* USES VERIF-FIELD P MOVE SPBINW2,CBIN3 P MOVE SPBINW1,CBIN1 P TSTCTL 6 P BOK DYKIN P GETCTL 0,
0x0ec9ec…0ecb80 Dummy {f00=0x009a, f01=0x0190, f02=» BL DYK20 P MOVE SPBINW2,CBIN15 P B DYK20 . P B DYK20 > P* N PDYKIN X & P IB SPKEY,DYK05,DYK10,DYK15,DYK16 f PDYK05 . P DYKI SPINPUT,SPKTAB1,SPKTAB2,SPBINW1, C P SPBINW2,SPBINW4 P B DYKOUT PDYK10 0
0x0ecb80…0ecd14 (0, 300) Opaque[0x194]
0x0ecd14…0ecea8 # DirEnt {nam=»RGSTRT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1360, f03=0x0000}
0x0ecd14…0ecea8 IdxSect {
0x0ecd14…0ecea8 f00 = 0x009b // 0xecd14 @0x0
0x0ecd14…0ecea8 f01 = 0x000e // 0xecd16 @0x2
0x0ecd14…0ecea8 gno = [ // 0xecd18 @0x4
0x0ecd14…0ecea8 [0x00]: C0x009b.0x0.0
0x0ecd14…0ecea8 [0x01]: C0x009b.0x1.0
0x0ecd14…0ecea8 [0x02]: C0x009b.0x2.0
0x0ecd14…0ecea8 [0x03]: C0x009b.0x3.0
0x0ecd14…0ecea8 [0x04]: C0x009c.0x0.0
0x0ecd14…0ecea8 [0x05]: C0x009c.0x1.0
0x0ecd14…0ecea8 [0x06]: C0x009c.0x2.0
0x0ecd14…0ecea8 ]
0x0ecd14…0ecea8 }
0x0ecea8…0ed03c Dummy {f00=0x009b, f01=0x0190, f02=» P IDENT RGSTRT 03.01.XXX.1 DDUM KMD08 & PDIV : ENTRY T1GO H P ENTRY TCONFW P ENTRY TCONFR r P ENTRY CONFWR P ENTRY CNFWRT P ENTRY CONRDX P ENTRY SETFLG P EXT ASGVOL P EXT CLEAR8 P
0x0ed03c…0ed1d0 Dummy {f00=0x009b, f01=0x0190, f02=» P EXT LAMPOF P EXT SOPRD P EXT SETMK * P EXT RSTORE < P EXT CLSVOL P P EXT UPDAKK d P EXT CLEJ x P EXT CLKF P EXT CLEDB P EXT CLBEH P EXT ZERO P EXT ADM P EXT RGA120 P EXT RGKLAR
0x0ed1d0…0ed364 Dummy {f00=0x009b, f01=0x0190, f02=» INCLUDE EQUATE T1GO 2 P MOVE SPKEY,CBIN2 INDICATE KEYSWITCH IN POS 2 $ P ADD CMAXTASK,CBIN1 Z P GETID GSWSTR2 v P MOVE TTASKNR,CBIN0 PT1005 P ADD TTASKNR,CBIN1 & P CBE GSWSTR2,CTID(TTASKNR),T1005A P B T1005
0x0ed364…0ed4f8 Dummy {f00=0x009b, f01=0x0190, f02=» P PAUSE & P B T1400 BRANCH TO NON-MASTER CODE PT1010 < P MOVE CTRANBUF,=X'00' J P PERF CLSVOL,CBIN1 h P PERF CLSVOL,CBIN2 P PERF CLSVOL,CBIN3 P PERF CLSVOL,CBIN4 P CLEAR CSKIFTFL & P SET GTMASTFL INDICATE MASTER TE
0x0ed4f8…0ed68c Dummy {f00=0x009b, f01=0x0190, f02=»BINW2,T1011,T1011,T1012,T1012,T1011, C P T1012,T1011,T1011,T1012 0 PT1011 R P B T1010 ` PT1012 p & P PERF ASGVOL,CBIN0 ASSIGN CONFDATA ~ P BNOK T1010 P CLEAR CSWFLAG 2 P IB GSWBIN2,T1013,T1013,T1025,T1014,T1013, C P
0x0ed68c…0ed820 Dummy {f00=0x009b, f01=0x0190, f02=»0 ~ PT10140 P ADD GSWBIN2,CBIN1 $ P IF FINISH: TO VERY COLD START 2 P CBG GSWBIN2,=W'32',T1025 Z , P PERF RAWRIT,DK01,=D'1',CCONBUF0,GSWBIN2 | P BNOK T1010 P B T10140 P* PT1018 ADM KEY * P* ONLY CHAN
0x0ed820…0ed9b4 (0, 301) Dummy {f00=0x009b, f01=0x0190, f02=»* P* P CLEAR CSWFLAG PRST000 * $ P PERF LAMPOF,=W'2047' LAMPS OFF 8 PRST005 ` P PERF LAMPON,=W'1024' LAMP 1 n P PERF LAMPON,=W'128' LAMP 4 P PERF LAMPON,=W'8' LAMP 8 PRST010 P PERF SOPRD P IB GSWBIN2,
0x0ed9b4…0edb48 Dummy {f00=0x009b, f01=0x0190, f02=» PRSOP06 PRSOP07 PRSOP09 $ PRSOP10 2 P B RST010 OTHER LAMPS @ P* ^ PRSOP01 RESTORE FD999001 h $ P PERF LAMPOF,=W'2047' LAMPS OFF P PERF LAMPON,=W'1024' LAMP 1 & P MOVE GSWBIN5,=W'32' NO OF RECORDS 4 P PERF RS
0x0edb48…0edcdc Dummy {f00=0x009b, f01=0x018e, f02=»ESTORE FD999004 $ P PERF LAMPOF,=W'2047' LAMPS OFF P PERF LAMPON,=W'128' LAMP 4 @ 2 P PERF RSTORE,DK04,=D'4',CKTMAX,CKTBUF,=W'128' d P BNOK RST005 NOT OK " P PERF SETMK INIT MASTER INDEX P B RST000 OK P* PRSOP08 FINIS
0x0edcdc…0ede70 Dummy {f00=0x009b, f01=0x0190, f02=» P* P* P* P* & P* 0 PT1025 SLUT KEY : P PERF CONFRD READ CONFDATA R P BNOK T1010 t P CBNE CVOLNO,=D'0',T1028 P MOVE CVOLNO,=D'0' PT1028 P MOVE CVOL(CBIN1),ASVOL P TBT CSWFLAG,T1030 .
0x0ede70…0ee004 Dummy {f00=0x009b, f01=0x0190, f02=» SPPROMPT P DSC0 KEYB,SKIB P ATTFMT CSFRM02 YES * P PERF SPCLRN F " P IB SPBINW2,T1034,T1034,T1032 Z PT1034 P B T1033 PT1032 P TBT CSWFLAG,T1020 PT1037 " P MOVE CBEH(CBIN1,CBIN1),CBIN0 " P MOVE CTR12(CB
0x0ee004…0ee198 Dummy {f00=0x009b, f01=0x0190, f02=»WBCD5,GSWBIN5 P MOVE GSWBIN1,GSWBIN5 P DSC0 KEYB,SKIB 4 P SET SPPROMPT L P USE TB2,GSWBIN5 b P ATTFMT CSFRM03 z , P PERF SPCLRA SET TR 12 AND BEH COUNTERS P CBNE SPBINW2,CBIN3,T1037 PT1043 ( P MUL TTSTLBNR,=D'-1' S
0x0ee198…0ee32c Dummy {f00=0x009b, f01=0x0190, f02=» REWRITE CONFDATA P BNOK T1010 P* . " P* READ TERMINAL CONF 8 PT1050 ^ P MOVE CTWBIN2,CMAXTASK l P MOVE CTASKNR,CBIN0 P MOVE GSWBIN5,CBIN0 PT1052 P ADD GSWBIN5,CBIN1 P CBG GSWBIN5,CMAXTASK,T1060
0x0ee32c…0ee4c0 Dummy {f00=0x009b, f01=0x0190, f02=» z P USE TB2,GSWBIN5 , P PERF TCONFR,GSWBIN5 READ TERMINAL CONF P BOK T1052 P P USE TB2,TTASKNR NOT OK b P B T1010 P* & P* CONF DATA HAS BEEN READ P* PT1060 ( P USE TB2,TTASKNR GET OWN USER BLOCK 4
0x0ee4c0…0ee654 (0, 302) Dummy {f00=0x009b, f01=0x0190, f02=»OL,CBIN2 P PERF CLSVOL,CBIN3 P PERF CLSVOL,CBIN4 * P DSC0 KEYB,SKIB D P SET SPPROMPT P ATTFMT INIT1FMT r P PERF SPCLRA " P IB SPBINW2,T1065,T1065,T1070 P B T1062 OTHER KEYS PT1065 MAK P B T1010 PT107
0x0ee654…0ee7e8 Dummy {f00=0x009b, f01=0x0190, f02=»GTTEXT,CBLANKS P MOVE GSWSTR9,CBLANKS P PERF ASGVOL,CBIN1 4 P BNOK T1010 N P PERF ASGVOL,CBIN2 b P BNOK T1010 | P PERF ASGVOL,CBIN3 P BNOK T1010 P PERF ASGVOL,CBIN4 P BNOK T1010 P* P* , P*
0x0ee7e8…0ee97c Dummy {f00=0x009b, f01=0x0190, f02=», KTPLAN t PT1200 P MOVE CRECNR,CBIN1 P MOVE CRECBCD,=D'1' 8 P MOVE GSWBIN1,=W'128' T 2 P PERF RAREAD,DK02,=D'2',CPCKBUF,GSWBIN1,CRECNR r P BNOK T1062 P MOVE GSWBCD3,CVOLNO $ P CBE GTWBCD1,=D'4',T1210 NO DATA , P PERF WR
0x0ee97c…0eeb10 Dummy {f00=0x009b, f01=0x0190, f02=»TR20,GSWBIN1,CBIN5,CPCKBUF,GSWBIN2 4 P MOVE GSWBCD3,GSWSTR20 GET VOLUME NO FROM START * ( P TBT CCONVERT,T1219 CONVERT-VERSION b P CBE CVOLNO,GSWBCD3,T1230 PT1210 NOT EQUAL NOS. P OR NO DATA ( P TBT CCONVERT,T1219 CONVERT-VERSION
0x0eeb10…0eeca4 Dummy {f00=0x009b, f01=0x018e, f02=»C j $ P T1212,T1212,T1212,T1212,T1225 PT1212 OTHER KEYS 2 P B T1210 L PT1215 MAK P B T1062 p P* PT1219 CONVERT-VERSION P NO OPSTART P DIRECTLY TO ADM P B T1560 P* PT1220 SLUT, OK
0x0eeca4…0eee38 Dummy {f00=0x009b, f01=0x0190, f02=» " P PERF STRTWR NEW START RECORD P BNOK T1010 . P PERF WRITID,CBIN1,CBIN1 B P B T1240 TO OPSTART b P* ~ P* PT1230 EQUAL VOL NOS. P DSC0 KEYB,SKIB P SET SPPROMPT P ATTFMT INIT3FMT P PERF SPCLRA "
0x0eee38…0eefcc Dummy {f00=0x009b, f01=0x0190, f02=» OPSTART P* P* " PT1240 , P MOVE CRECBCD,=D'0' : P MOVE CRECNR,CBIN1 V P CLEAR CERRORFL p PT1242 P MOVE GTWBCD2,CRECNR P PERF SPLIN8,CBIN10,CBIN3 P ADD CRECNR,CBIN1 * P MOVE GSWBIN1,=W'128' READ
0x0eefcc…0ef160 Dummy {f00=0x009b, f01=0x0190, f02=»ERRORFL,T1300 P CMP GTWBCD1,=D'4' $ P BE T1500 NO DATA, CONTINUE REG. 0 P MOVE GSWSTR20,=C'SLUTD' X P MOVE GSWBIN5,CBIN0 x 6 P MATCH GSWSTR20,GSWBIN5,CBIN5,CPCKBUF,CBIN0,CBIN5 P BE T1350 SLUTD P MOVE GSWSTR20,=X'00' , P COP
0x0ef160…0ef2f4 (0, 303) Dummy {f00=0x009b, f01=0x0190, f02=» GSWBIN6,CBIN1 & P CBE GSWBCD5,CMASK(GSWBIN6),T1247 P CBL GSWBIN6,CBIN12,T1245 @ P B T1242 b PT1247 r 4 P CBE GSWBCD5,=D'0',T1250 CHECK WRONG MACHINE NO. & P CBE GSWBIN6,CBIN1,T1250 IF MASTER 0 P RSTRT CTID(GSWBIN6) NO, START RELEVAN
0x0ef2f4…0ef488 Dummy {f00=0x009b, f01=0x0190, f02=»E CRECBCD,GSWBCD3 GET LOG. REC. NO. & P TBT GTSWFLAG,T1251 TEST FOR TR 11 , ( P CBNL GTREGNR,=D'12',T1290 IF TR 12 V PT1251 0 P CBL CRECBCD,TTRECOPN,T1290 BEFORE REWRITE? P TBT GTSWFLAG,T1270 IF TR 11 $ P CBG TTSTLBNR,=D'0',T1260 OPEN?
0x0ef488…0ef61c Dummy {f00=0x009b, f01=0x0190, f02=»SKNR P PERF CONFWR PT1260 P CLEAR GTTESTFL . P CBNL CRECBCD,CCONFREC,T1262 F & P SET GTTESTFL BEFORE BEH., REWRITE j PT1262 P PERF UPDAKK P CLEAR GTTESTFL P B T1290 P* P* P* PT1270
0x0ef61c…0ef7b0 Dummy {f00=0x009b, f01=0x018e, f02=»DD TTSTLBNR,=D'1' P MUL TTSTLBNR,=D'-1' P MOVE TTRECOPN,CRECBCD 6 P PERF TCONFW,TTASKNR T P PERF CONFWR p P PERF ZERO PT1290 P TBT GTMASTFL,T1242 MASTER P B T1450 NON-MASTER P* P* P* P*
0x0ef7b0…0ef944 Dummy {f00=0x009b, f01=0x0190, f02=» ~ P PERF SPCLRA 2 P IB SPBINW2,T1310,T1310,T1315,T1320,T1310, C P T1310,T1310,T1310,T1330 R P B T1300 t PT1310 MAK P B T1300 P* PT1315 SLUT, CONTINUE P SUB CRECNR,CBIN1 READ AGAIN P CLEAR CERRORFL
0x0ef944…0efad8 Dummy {f00=0x009b, f01=0x0190, f02=» CLEAR CERRORFL PT1350 SLUTD P* . P* 8 P* B P* DISKETTE SKIFT L P* n P* x P TBT C5MDISK,T1500 P SET CSKIFTFL P PERF SKIFT P B T1200 P EJECT PT1400 P********************
0x0efad8…0efc6c Dummy {f00=0x009b, f01=0x0190, f02=»TTASKNR) ~ PT1440 , P TBT CWFLAG,T1550 IF COLDSTART FINISHED P B T1250 N PT1450 ^ & P RSTRT CTID(CBIN1) RESTART MASTER l P PAUSE P B T1440 P* P* P* PT1500 P PERF CLEAR8 P* RESTORE CHECK LBNR
0x0efc6c…0efe00 Dummy {f00=0x009b, f01=0x0190, f02=»0 ~ PT1501 P ADD GSWBIN6,CBIN1 P CBG GSWBIN6,=W'60',T1502 2 4 P PERF KFREAD,CBIN1,CBIN1,GSWBIN6,GTKFVAL KREDIT T ( P MOVE C12ACC(GSWBIN6,CBIN1),GTKFVAL P ADD TTEJEDB,GTKFVAL 2 P PERF KFREAD,CBIN1,CBIN2,GSWBIN6,GTKFVAL DEBET (
0x0efe00…0eff94 (0, 304) Dummy {f00=0x009c, f01=0x0190, f02=»D'1' P SET CWFLAG P MOVE GSWBIN6,CBIN1 PT1510 < P ADD GSWBIN6,CBIN1 J P CBG GSWBIN6,CMAXTASK,T1550 d P RSTRT CTID(GSWBIN6) P B T1510 PT1550 " P MOVE GSSWITCH(CBINMAX),=W'-1' P DSC0 KEYB,SKIB 2 P CBNG TT
0x0eff94…0f0128 Dummy {f00=0x009c, f01=0x0190, f02=»CLEJ P PERF CLEDB P PERF CLKF P PERF CLBEH 2 P MOVE GSWSTR9,=C' ' F P CLEAR GTSPGFLG b P SET GTKASSE z P MOVE GSWBIN1,CBIN14 P PERF ADM,GSWBIN1 P B RGA120 PT1560 . P MUL CMASK(TTASKNR),=D'-1' SET < 0,
0x0f0128…0f02bc Dummy {f00=0x009c, f01=0x0190, f02=»ADING OF CONFIGURATION DEPENDENT DATA ~ P* . . P* CALL: PERF TCONFR,<CONFIGURATION NBR> 8 P* j ( P* THE DATA IS READ RANDOM FROM DK01 t P* , P* ALTERED FIELDS: GSWBIN6 - <CONF> + 12 $ P* GSWBIN1 - 199 P*
0x0f02bc…0f0450 Dummy {f00=0x009c, f01=0x0190, f02=» | P MOVE GSWBIN6,TCONFRNO ! P ADD GSWBIN6,CBIN12 ! & P MOVE GSWBIN1,=W'199' ! B 4 P PERF RAREAD,DK01,=D'1',TCONBUF,GSWBIN1,GSWBIN6 ! ` P BNOK TCONRET1 ! P CMP CBIN0,CBIN0 ! P RET ! PTCONRET1 ! P CMP CBIN0,CBIN1 SET CR ! P RET !
0x0f0450…0f05e4 Dummy {f00=0x009c, f01=0x0190, f02=»ONFIGURATION-DEPENDENT DATA ! z P* " $ 2 P* CALL: PERF TCONFW,<CONFIGURATION NBR> " . P* " d 2 P* IF NOT IN TESTMODE, DATA IS WRITTEN TO DK01 " n P* ALTERED FIELDS: " " P* GSWBIN6 - <CONF> + 12 " P* " 8 P**************************
0x0f05e4…0f0778 Dummy {f00=0x009c, f01=0x0190, f02=»'T',TCFWRET IF IN TEST MODE " , P PERF RAWRIT,DK01,=D'1',TCONBUF,GSWBIN6 # $ PTCFWRET # T P RET # d P PEND # p P EJECT # ~ < P******************************************************** # P* # 0 P* CONFRD - READING OF COMMON CONFDATA #
0x0f0778…0f090c Dummy {f00=0x009c, f01=0x0190, f02=»NOK CONFRET # P PERF CONRDX,CCONBUF1,CBIN2 $ P BNOK CONFRET $ 8 P PERF CONRDX,CCONBUF2,CBIN3 $ N P BNOK CONFRET $ r P PERF CONRDX,CCONBUF3,CBIN4 $ P BNOK CONFRET $ P PERF CONRDX,CCONBUF4,CBIN5 $ P BNOK CONFRET $ P PERF CONRDX
0x0f090c…0f0aa0 Dummy {f00=0x009c, f01=0x018e, f02=» P BNOK CONFRET % P PERF CONRDX,CCONBUF8,CBIN9 % P BNOK CONFRET % > P PERF CONRDX,CCONBUF9,CBIN10 % T PCONFRET % x P RET % P PEND % P* % PCONRDX PROC CBUFRD,CBUFNO % P* % P MOVE GSWBIN1,=W'199' % 2 P PERF RAREAD,DK01,
0x0f0aa0…0f0c34 (0, 305) Dummy {f00=0x009c, f01=0x0190, f02=» % T P* & ( P* CONFWR - WRITING OF CONFDATA & P* & > > P********************************************************** & H PCONFWR PROC & P MOVE CCONFREC,CRECBCD & * P PERF RAWRIT,DK01,=D'1',CCONBUF0,CBIN1 & P BNOK WRET & * P PERF RAWRIT
0x0f0c34…0f0dc8 Dummy {f00=0x009c, f01=0x0190, f02=»'1',CCONBUF3,CBIN4 & | P BNOK WRET ' * P PERF RAWRIT,DK01,=D'1',CCONBUF4,CBIN5 ' , P BNOK WRET ' Z * P PERF RAWRIT,DK01,=D'1',CCONBUF5,CBIN6 ' l P BNOK WRET ' * P PERF RAWRIT,DK01,=D'1',CCONBUF6,CBIN7 ' P BNOK WRET ' * P PERF RAWRIT,DK01,=D'1',CCON
0x0f0dc8…0f0f5c Dummy {f00=0x009c, f01=0x0190, f02=»N10 ' l PWRET ( P RET ( P PEND ( $ P EJECT ( 2 P******************** ( @ P* ( * P* CONFWRT - REWRITE CONFDATA ( f P* ( 2 P* ALTERED FIELDS: GSWBIN5 - SET TO CMAXTASK ( , P* TTRECOPN - 0 ( P* (
0x0f0f5c…0f10f0 Dummy {f00=0x009c, f01=0x0190, f02=»BIN1 ( P CBG GSWBIN5,CMAXTASK,CNF100 ) P USE TB2,GSWBIN5 ) 0 P MOVE TTRECOPN,=D'0' IF OPEN ) H P PERF TCONFW,GSWBIN5 ) l P B CNF1 ) PCNF100 ) P USE TB2,TTASKNR ) P PERF CONFWR ) PCNF200 ) P RET ) P PEND ) P EJECT ) * P
0x0f10f0…0f1284 Dummy {f00=0x009c, f01=0x0190, f02=»************** ) x PSETFLG PROC PAR * 4 P* THE PROCEDURE UNPACKS THE TASKDEPENDENT FLAGS * . & P* FROM 'CFLAG' TO VARIOUS BOOLEANS * f P* * P* * . P* BITS COUNTED FROM RIGHT, 0,1,2,...,15 * P* * P* BIT 0 T=MASTER KASSE * P*
0x0f1284…0f1418 Dummy {f00=0x009c, f01=0x0190, f02=» BIT 3 T=GTP * P* F=NO GTP + P* BIT 4 T=TTP + 4 P* F=NO TTP + N P* BIT 5 T=VDU + j P* F=PDU + P* BIT 6 T=KBN+KBA (KBAN) + P* F=KBN + P* BIT 7 T=NEW KB (6272) + P*
0x0f1418…0f15ac Dummy {f00=0x009c, f01=0x0190, f02=»,GTMASTFLG + P PERF SETF,TREMFLG , P PERF SETF,GTLPFLG , , P PERF SETF,GTGTPFLG , F P PERF SETF,GTTTPFLG , b P PERF SETF,GTVDUFLG , ~ P PERF SETF,GTKBAFLG , P PERF SETF,TTKEYFLG , P RET , P PEND , P , P , P , PSETF
0x0f15ac…0f1740 Dummy {f00=0x009c, f01=0x0190, f02=»'=LP , p * P CBE GSWBIN2,CBIN8,SETF30 X'1000'=GTP - P B SETF10 - : PSETF20 - L P MOVE GTHCDEV,CBIN2 LP - Z P B SETF10 - x PSETF30 - P MOVE GTHCDEV,CBIN1 GTP - PSETF10 - . P ADD GSWBIN2,GSWBIN2 PREPARE FOR NEXT TEST - P RET - P PEN
0x0f1740…0f18d4 (0, 306) Dummy {f00=0x009c, f01=0x0190, f02=» B P************************************************************* . P* . J PFMTFKI FRMT . T P FNL . h P FKI 2 . t P FMEL 'B',TSWBCD2 . P FMEND . P* . PCSFRM01 FRMT . P FSL . P FTEXT 'START' . P FNL . P FTEXT 'VOLUME=' .
0x0f18d4…0f1a68 Dummy {f00=0x009c, f01=0x0190, f02=»COPY CFNAME(CBIN1) . P FMEND / P* / ( PCSFRM02 FRMT / 2 P FSL / F P FCOPY ='KOMMUNE NR' / R P FKI 12,MINL=3,MAXL=4,ME / n P FMEL 'ZZZZ',CKMDNR / P FNL / " P FCOPY ='VOL 2 VOL 3 VOL 4' / P FNL / P FKI 1,MINL=6,MAXL=6,ME / P
0x0f1a68…0f1bfc Dummy {f00=0x009c, f01=0x0190, f02=» FMEND / P* 0 PCSFRM03 FRMT 0 P FSL 0 , P FMEL '99',GSWBCD5 0 8 P FNL 0 R P FCOPY ='MASKIN NR' 0 ^ P FKI 22,MINL=3,MAXL=3,ME 0 z P FMEL '999',CMASK(GSWBIN1) 0 P FNL 0 P FCOPY ='BEHOLDNINGST[LLERE' 0 P FKI 23,MAXL=2,ME,APPL=103 0
0x0f1bfc…0f1d90 Dummy {f00=0x009c, f01=0x0190, f02=» FNL 0 P FCOPY =' EKS.LBNR' 1 P FKI 20,MAXL=5,ME 1 ( P FMEL 'ZZZZ9',TTSTLBNR 1 B P FMEND 1 ` P* 1 n PINIT1FMT FRMT 1 x P FSL 1 P FCOPY ='VOLUME NR ' 1 P FMEL '99999',CVOLNO 1 P FNL 1 P FCOPY =C'DAGS-DATO' 1 . P FKI 11,MINL=6
0x0f1d90…0f1f24 Dummy {f00=0x009c, f01=0x0190, f02=»PPL=102 1 v P FMEL 'ZZZ',CRELDAY 2 P FMEND 2 , P* 2 : PINIT2FMT FRMT 2 D P FSL 2 Z P FCOPY ='VOLUME NR ' 2 f P FTEXT 'OK' 2 P FILLR '?',1 2 P FILLR X'07',1 2 P FLINK FMTFKI 2 P FMEND 2 P* 2 PINIT3FMT FRMT 2 P FSL
0x0f1f24…0f20b8 Dummy {f00=0x009c, f01=0x4096, f02=» 2 P FSL 3 P FCOPY ='KORREKT' 3 P FILLR '?',1 3 . P FILLR X'07',1 3 B P FLINK FMTFKI 3 X P FMEND 3 n P* 3 | END 3 @ 3 FILLR '?',1 2 P FILLR X'07',1 2 P FLINK FMTFKI 2 P FMEND 2 P* 2 PINIT3FMT FRMT 2 P FSL
0x0f20b8…0f224c Dummy {f00=0x009c, f01=0x2008, f02=» 4 NT RGSTRT DDUM KMD08 PDIV . ENTRY T1GO < INCLUDE EQUATE P EJECT h T1GO v END @
0x0f224c…0f23e0 Dummy {f00=0x009c, f01=0x0190, f02=»PRINTLEV AR.INFO $ 6 P* 2) UPDATE ALL RECORDS, APART FROM LAST-IN-CHAIN % P* 3) READ FREE LEV VAR.INFO % R 4 P* 4) UPDATE LAST TRANS WITH GTTRKEY, AND REWRITE % v 4 P* 5) UPDATE FREE LEV WITH GTTRKEY FROM PRINTLEV % . P* 6) UPDATE PRINTLEV WITH GTTRKEY
0x0f23e0…0f2574 (0, 307) Opaque[0x194]
0x0f2574…0f2708 # DirEnt {nam=»C261 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1398, f03=0x0000}
0x0f2574…0f2708 IdxSect {
0x0f2574…0f2708 f00 = 0x009c // 0xf2574 @0x0
0x0f2574…0f2708 f01 = 0x0002 // 0xf2576 @0x2
0x0f2574…0f2708 gno = [ // 0xf2578 @0x4
0x0f2574…0f2708 [0x00]: C0x009c.0x3.0
0x0f2574…0f2708 ]
0x0f2574…0f2708 }
0x0f2708…0f289c Dummy {f00=0x009c, f01=0x018e, f02=» T; P01; TID=TC; TCL=TC; * LEV=60; : P02; J PTDC=T03; V PLC=01L; f PTDC=T07; v PLC=01L; P02; PSCL=S04; PSCL=S05; PT; P01; PTID=TD; PTCL=TC; PLEV=60; P
0x0f289c…0f2a30 Dummy {f00=0x009c, f01=0x0190, f02=» 01; PTDC=T04; PLC=02L; $ P03; 4 PSCL=S02; @ PSCL=S03; P PSCL=S04; ` PT; p P01; z PTID=GA; PTCL=GA; PLEV=60; P01; PTDC=T05; PLC=05L; P03; PSCL=S02; PSCL=S03;
0x0f2a30…0f2bc4 Dummy {f00=0x009c, f01=0x0190, f02=»03; PSCL=S02; PSCL=S03; PSCL=S04; , PT; < P01; F PTID=LA; R PTCL=LA; b PLEV=60; r P00; P04; PSCL=S02; PSCL=S03; PSCL=S04; PSCL=S05; T; 01; TID=D0; TCL=D0;
0x0f2bc4…0f2d58 Dummy {f00=0x009c, f01=0x0004, f02=» PSCL=S02; PSCL=S03; PSCL=S04; , PT; < P01; F PTID=LA; R PTCL=LA; b PLEV=60; r P00; P04; PSCL=S02; PSCL=S03; PSCL=S04; PSCL=S05; T; 01; TID=D0; TCL=D0;
0x0f2d58…0f2eec Dummy {f00=0x009c, f01=0x2008, f02=» PSCL=S02; PSCL=S03; PSCL=S04; , PT; < P01; F PTID=LA; R PTCL=LA; b PLEV=60; r P00; P04; PSCL=S02; PSCL=S03; PSCL=S04; PSCL=S05; T; 01; TID=D0; TCL=D0;
0x0f2eec…0f3080 Dummy {f00=0x009c, f01=0x0190, f02=» P!!RE 451,$$5$$5$$ CKTTOP P!!DL 452,453 $ & PON STRGI (12)2C' ','KA',' ',' ' 8 P!!DL 852 b P MOVE TCT01,=W'2' PRINTER NR r P!!EN PNOD C PTRA /S,NL PINC DIV539 PNOD R PLED SCREEN,/S P!!CH $$KEY461$$K
0x0f3080…0f3214 (0, 308) Opaque[0x194]
0x0f3214…0f33a8 # DirEnt {nam=»KEY235«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x13a0, f03=0x0000}
0x0f3214…0f33a8 IdxSect {
0x0f3214…0f33a8 f00 = 0x009d // 0xf3214 @0x0
0x0f3214…0f33a8 f01 = 0x0002 // 0xf3216 @0x2
0x0f3214…0f33a8 gno = [ // 0xf3218 @0x4
0x0f3214…0f33a8 [0x00]: C0x009d.0x0.0
0x0f3214…0f33a8 ]
0x0f3214…0f33a8 }
0x0f33a8…0f353c Dummy {f00=0x009d, f01=0x0190, f02=» PNOKEY EQU X'FF' PBSPKY1 EQU X'87' PCANKY1 EQU X'91' 4 PMACKY1 EQU X'95' L PEORKY1 EQU X'90' d PFTABKY1 EQU X'8B' | PBTABKY1 EQU X'83' PDUPKY1 EQU X'A2' PSLUTKY1 EQU X'A3' PREGKY1 EQU X'A1' PCOPKY1 EQU X'F
0x0f353c…0f36d0 Dummy {f00=0x009d, f01=0x0190, f02=»Y1 EQU X'FF' PCY2KY1 EQU X'FF' PCYCKY1 EQU X'89' , PINVKY1 EQU X'82' D PKONKY1 EQU X'85' PKVITKY1 EQU X'86' t PSUPLKY1 EQU X'80' PSUMKY1 EQU X'81' PADMKY1 EQU X'A0' PDIVKY1 EQU X'FF' PHBOGKY1 EQU X'FF'
0x0f36d0…0f3864 Dummy {f00=0x009d, f01=0x0190, f02=»BKY1 EQU X'87' PINSKY1 EQU X'81' PDELKY1 EQU X'82' . PCL1KY1 EQU X'89' F PCL2KY1 EQU X'8A' ^ PCL3KY1 EQU X'8B' v POUTKY1 EQU X'A0' P* PBSPKY2 EQU X'C7' PCANKY2 EQU X'D1' PEORKY2 EQU X'D0' PMACKY2 EQU X'D5'
0x0f3864…0f39f8 Dummy {f00=0x009d, f01=0x40c4, f02=»EKY2 EQU X'D2' PREGKY2 EQU X'E1' PADMKY2 EQU X'E0' . PSPGKY2 EQU X'FF' F PKONKY2 EQU X'FF' ^ PKVITKY2 EQU X'C6' v PONKY2 EQU X'D9' PCOPKY2 EQU X'C5' @ PCANKY2 EQU X'D1' PEORKY2 EQU X'D0' PMACKY2 EQU X'D5'
0x0f39f8…0f3b8c Dummy {f00=0x009d, f01=0x2008, f02=» * ERRFMT FRMT FSL , " FMEL 'ZZ9B',GTWBCD1 FILE NR. 8 FCOPY ERRTXT ^ " FMEL 'BZZ9',GTWBCD2 ERRORNR. t FCOPY =X'07' FMEND @ 8SPKTAB2 KTAB BSPKY1,CANKY1,NOKEY,MACKY1,NOKEY,EORKY1, C D ? FT
0x0f3b8c…0f3d20 Dummy {f00=0x009d, f01=0x4164, f02=» : H IDENT T:AGA0 TRA 4.2 81-01-27 F1 O1111 04.01.XXX.1 T:AGA0 B T:AGA0A ^ T . * T:DGA0 D:CB90 C:CB90 D:TB90 Z:TB90 h * & 0 * & * & = a
0x0f3d20…0f3eb4 (0, 309) Opaque[0x194]
0x0f3eb4…0f4048 # DirEnt {nam=»RGLOAD«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x13a8, f03=0x0000}
0x0f3eb4…0f4048 IdxSect {
0x0f3eb4…0f4048 f00 = 0x009d // 0xf3eb4 @0x0
0x0f3eb4…0f4048 f01 = 0x0028 // 0xf3eb6 @0x2
0x0f3eb4…0f4048 gno = [ // 0xf3eb8 @0x4
0x0f3eb4…0f4048 [0x00]: C0x009d.0x1.0
0x0f3eb4…0f4048 [0x01]: C0x009d.0x2.0
0x0f3eb4…0f4048 [0x02]: C0x009d.0x3.0
0x0f3eb4…0f4048 [0x03]: C0x009e.0x0.0
0x0f3eb4…0f4048 [0x04]: C0x009e.0x1.0
0x0f3eb4…0f4048 [0x05]: C0x009e.0x2.0
0x0f3eb4…0f4048 [0x06]: C0x009e.0x3.0
0x0f3eb4…0f4048 [0x07]: C0x009f.0x0.0
0x0f3eb4…0f4048 [0x08]: C0x009f.0x1.0
0x0f3eb4…0f4048 [0x09]: C0x009f.0x2.0
0x0f3eb4…0f4048 [0x0a]: C0x009f.0x3.0
0x0f3eb4…0f4048 [0x0b]: C0x00a0.0x0.0
0x0f3eb4…0f4048 [0x0c]: C0x00a0.0x1.0
0x0f3eb4…0f4048 [0x0d]: C0x00a0.0x2.0
0x0f3eb4…0f4048 [0x0e]: C0x00a0.0x3.0
0x0f3eb4…0f4048 [0x0f]: C0x00a1.0x0.0
0x0f3eb4…0f4048 [0x10]: C0x00a1.0x1.0
0x0f3eb4…0f4048 [0x11]: C0x00a1.0x2.0
0x0f3eb4…0f4048 [0x12]: C0x00a1.0x3.0
0x0f3eb4…0f4048 [0x13]: C0x00a2.0x0.0
0x0f3eb4…0f4048 ]
0x0f3eb4…0f4048 }
0x0f4048…0f41dc Dummy {f00=0x009d, f01=0x0190, f02=»I y$ CRq , R S @R ^ BR i R t R ~ TR .R f z
0x0f41dc…0f4370 Dummy {f00=0x009d, f01=0x0190, f02=» TC , < F 0 R 0 P ~ V x v H TC * TB2 0 * F
0x0f4370…0f4504 Dummy {f00=0x009d, f01=0x0190, f02=» h d h F
0x0f4504…0f4698 Dummy {f00=0x009d, f01=0x0190, f02=»
[…0x7…]
0x0f51a4…0f5338 Dummy {f00=0x009d, f01=0x0190, f02=» TCTDTETFTGTHTITJTKTLTMTN F [ " w > M e m 1
0x0f5338…0f54cc Dummy {f00=0x009d, f01=0x0190, f02=»
[…0x1…]
0x0f5660…0f57f4 (0, 311) Dummy {f00=0x009d, f01=0x0190, f02=»9 0 ( ) @ A B E F G H I P Q R S T * B 0 0 0 0 0 ( x P OD-KOM
0x0f57f4…0f5988 Dummy {f00=0x009d, f01=0x0190, f02=» F 0 J 0
0x0f5988…0f5b1c Dummy {f00=0x009d, f01=0x0190, f02=» 0 #0 &0 * + , P B 0 0 0 0 0 0 0 &0 -0 4 ; < > v
0x0f5b1c…0f5cb0 Dummy {f00=0x009d, f01=0x0190, f02=» * B 0 0 0 0 0 # ! D M * * 0 0
0x0f5cb0…0f5e44 Dummy {f00=0x009d, f01=0x0190, f02=» B0 0 0 0 0 0 0 0 9 Y m z0 0 0 .
0x0f5e44…0f5fd8 Dummy {f00=0x009d, f01=0x0190, f02=» F % &0 0 0 0 F 0 < <
0x0f5fd8…0f616c Dummy {f00=0x009d, f01=0x0190, f02=»0 )0 ,0 /0 60 <0 B0 I L 0 I 6 , T, , X, , I ? _ ! - 0 0 4 +0 0 +0 0 _ 0 4 0 4 0 4 0 4 0 4 0 4 0 4 0 4 0 4 0 4 0 4 +BJBnD`A , 4 484 3 5 > 3 3X/ 2 4,404 4 4 4$4(E 4
0x0f616c…0f6300 Dummy {f00=0x009d, f01=0x0190, f02=» SUMTRP ADM ARKIVDEBETSALDOTOTAL KVIT CHECKKREDITT[LLERKONTONRTOTAL EKS.LBNRDAGS-DATOKONTOKORTMASKIN NRPOST-DATOSTART SUM SLUT TESTBEV.PERIODE START TESTKASSELUKNINGDISKETTE SKIFT BEHOLDNINGST[LLEREVERSURKONTONR KASSEKONTONR PRIMO KASSE 9
0x0f6300…0f6494 (0, 312) Dummy {f00=0x009e, f01=0x0190, f02=»BB****9XX.XXPPZZ.ZZ.ZZZZ99999999.99.99BB99.99.99BXX.XX.XXBZZ.ZZ.ZZZZ.ZZ.ZZB99E-99E-99B99.99.99BBB99.99.9999.99.999.9BXXXXXXXXXXBZZZZZZZZZZZZZZZZZZZZB******E-****XXXXXXE-XXXXXXXXXXXXE-XXZZZZ9999.99BBBZZ.ZZ.ZZBBBE-9999999999BXXX.XXXXX.XXB999E-99999E-99B999.99999.99B
0x0f6494…0f6628 Dummy {f00=0x009e, f01=0x0190, f02=»ZZZ.ZZZ.ZZ9.99-*.***.***.**9.99+BB*.***.***.**9.99-B*.***.***.**9E,99B999E-999E-99E-99BBBZZZE-ZZZE-ZZE-ZZBBZZZ.ZZZ.ZZZ.ZZ9,99-BBZZZ.ZZZ.ZZZ.ZZ9.99- &
0x0f6628…0f67bc Dummy {f00=0x009e, f01=0x0190, f02=» W 2 + M H M # . % m ) m * mR N d )E 6 R 5 +P + _ S 2 i @ ] h K ] Y K +P * O _ 0 S U F t 0 Q O 2 W W ) ) RR H O R U F t u R = R H 0 0 E E 1 W W +; O /$
0x0f67bc…0f6950 Dummy {f00=0x009e, f01=0x0190, f02=»= 6 #6 $ + 1 3 N b 1 ^ 2 Ji Wi Wi E 1 I A F 2J W Wo Wo DIVERSE FORMATER + : ) , R :M O " U 2# @ > +9 R S * 3 $ < ] N E S [ b ! 8 ! i
0x0f6950…0f6ae4 Dummy {f00=0x009e, f01=0x0190, f02=» # > * T b 1 ^ b. ? D C 1 T 2 4 2J V V V U i @ 2 3, & % U i @ 2 3 5 F 2 * 4 8 9 B 3 4G PRIMOW 2 BEV W W W
0x0f6ae4…0f6c78 Dummy {f00=0x009e, f01=0x0190, f02=» 8 NETTO 2 7 * VERSNR < ? > ; <C 9~ 9 * G L L K * J ID9ON/.-/N/,,/+AAAA*)EE)*)(()%****?>'& ? ??>=????C85< 497L$B $$;:0#" 96! *)HG)*)(()%****
0x0f6c78…0f6e0c Dummy {f00=0x009e, f01=0x0190, f02=» n t { * 0 20 30 40 50 60 70 80 90 :0 ;0 =0 ? " % ( , 0 4 8 < @ D H L Q V [ ` e k q x
0x0f6e0c…0f6fa0 Dummy {f00=0x009e, f01=0x0190, f02=» . @ R g ' D ' d " $ & ( * , . 0 2 4 6 8 : < > @ C F I M Q U Y ] a e i m q u y ~
0x0f6fa0…0f7134 (0, 313) Dummy {f00=0x009e, f01=0x0190, f02=» " 5 I ] q ! ; W s % % ( * 4 - 9 a < K @ !@ "@ #@ *@ 9@ H@ W@ g@ {(~ ) * "[* " L #0 ^ L` & + P _ _ J^ L #0 0T & ! T P
0x0f7134…0f72c8 Dummy {f00=0x009e, f01=0x0190, f02=» X T 5 ! Y * / y X V* X ( 6 x C ( ? Y * X Y , 6 X X C & C C ( ? B Ph9 R^9 1 X !@PP X X * b ) Y * Y , X , 6 x X *YvP y X " x Y X " T Y _ 1 _ B U C
0x0f72c8…0f745c Dummy {f00=0x009e, f01=0x0190, f02=» P 1 _ 1 / X * - X X * $" X D % " X # X * 6 y _< X # X * y 6 X 1 1 X !@T X $ " P y _ x T 1 0 X H X X * , )$ P _ : 2 ' Y Ld 2R y x C y X C C X
0x0f745c…0f75f0 Dummy {f00=0x009e, f01=0x0190, f02=» x Y Y _ X "@P B R y C B P 9 V 1 _F9 VV X ! T X !@X y C _d y C C X !? x P Q( B y " y $ c ?R C _$ _ 1 y _6 / x X@ X 6 X # 6 C _. B ]d P C Q8X8_H x XD @ Y c C y XR X
0x0f75f0…0f7784 Dummy {f00=0x009e, f01=0x0190, f02=»? : B 2 C _J + . ?h X 9 V ! P @ Y L #0 ^ Y Y . X ! ^ : Ld L 2 L 2 " L 2 $ : ! P # P ^ : ?h 2! _ Y " ? L ? L !0 ^ Q ?h X "T X ?R 6 ?^ ?h L
0x0f7784…0f7918 Dummy {f00=0x009e, f01=0x0190, f02=» L " P # P ^ R P P X ' ' J^ X _ X ' _ X '?_ ?h L ! P # P ^ X ' ?d X ! ?P ?R ?h X " 9b! X :c 2" _ H4 ?b@ W W W W W W W ?h Y ( Y 09H Y * Y 4 Y 2 Y 69h Q X :h Y 0 7~W
0x0f7918…0f7aac Dummy {f00=0x009e, f01=0x0190, f02=»P0 P R P R _ Y +Wl 5 Y + 5 7zWZ T R( 5 5 WJ Q W Y + U Q _ Y Q P W W Y ( 7v C ?h X *! P V L ! ?d J^ X 0 Y 8 5 P ? Y 0 X 0 X 2] X 8 Y 0 5 : X 0 :H* ?p : X 2T Y 2 : C
0x0f7aac…0f7c40 Dummy {f00=0x009e, f01=0x0190, f02=» 6p 6 2 X 0 _ : ! P # T : ^ C ( ? C : C B _, _ X 6 6 P 6 B _R ( ? X D D : K + Q 2 P. P8 LV wf ( ? B X # V : L Y _0 N _>Z Z L Z Z Z ZrZ
0x0f7c40…0f7dd4 (0, 314) Dummy {f00=0x009e, f01=0x0190, f02=»Q " P X 0PR V _` " PL T " Ph =T ? Wp " P Y 0] Y (_z P P T0 " X _@ " P" E X *# P B 1 E W _ " P X X( C : X *! P P T _ P E > C W @ X (T W X y 6 Y ( : X (;n
0x0f7dd4…0f7f68 Dummy {f00=0x009e, f01=0x0190, f02=» 8 K T Y W Y X . X 2QP Y *T2 Y : " P$ X 0U X *# P P T " T : " _ Y . =T Y ( Y ?h Y *T " T ! 1 W ! ) Y : ?h Y Z6 Y *T : : Y > Y : ?h V Y " X .9H $ Z6 P & X ( " Q Y +
0x0f7f68…0f80fc Dummy {f00=0x009e, f01=0x0190, f02=» P _ < P< < WZ X ! X $" P<Q X (# P2 X # :! R$W < < T$ @ Y (W Y , =TW =r Y ( Y : X *:h X (! # P X & V L TbW X , X 0P@ < T, X *:h XF XL X (!@T @ Y ( X , Y t X 0 l < _r X ( P Y (_ P.
0x0f80fc…0f8290 Dummy {f00=0x009e, f01=0x0190, f02=» X (P < ? 8 Y 0 X 2P X 0V _z Y ( " T Y ( : 8 > L 8 V Y 8 : " P X & V ( P < : : < "0P $ T W %T : : Y ( X $ Y X " Y X & Y X < Y @ : Y : ?h X : X ( T X & V H " V Y :
0x0f8290…0f8424 Dummy {f00=0x009e, f01=0x0190, f02=» > X *! T" X y 4 @ X (T y 6W4 X y 6W, @ X (P W" X & V D ! P @ W X ?pW Y ( : X , Y X $ Y X &T Y Y Y WD V $:H D Y D :H Y ! P V Y L W Y ! P LRW V Y > V Y : L Y : 2' " P
0x0f8424…0f85b8 Dummy {f00=0x009e, f01=0x0190, f02=» W LZ V Y^ ?h Y Y Y < V E J^ B X _ v : C C F : C F :( R : V E V D ' $ _& W ? P J^ X =' V W V Y =P ? : Ah A @@ P
0x0f85b8…0f874c Dummy {f00=0x009e, f01=0x0190, f02=» ( ? P V I @@$ % A@ J^ & # T : Y _ A@ _* F AJ L #0 TX &RX &P C Gt/ "!@P _* E$ F AJ Gt/ "!@P _* E L #0T C : W _* F "R V I J^ F ( T _& @IxX, @Iz
0x0f874c…0f88e0 Dummy {f00=0x009e, f01=0x0190, f02=» T ^ B` ( I ? W< _6 B` ( ? W L & F : ( ? J^ 2 & C >A >A 2 $ L & V D 9a 9 V @ W @ T W X R V 8 P , _ =B R ?H 8R0;AV ( _ X @
0x0f88e0…0f8a74 (0, 315) Dummy {f00=0x009e, f01=0x0190, f02=» W, V P& W$ U V X 9T I Y Jh _* L #0T R W T V G 9h ' J^ W _* W F& E( F GP G F P L / W F F L / "!@ _ W F G C C W G C C JDv ' W 781"&$ 39#$;< '()*+,-! G GP
0x0f8a74…0f8c08 Dummy {f00=0x009e, f01=0x0190, f02=» 1W& C C C " _ ( ? ' Pb Fv I "%@P "% P& B C C 4 "5 # B P B P B 5 P C P B % P C + H J^ F E Xf E C E C B B P C F : "!@T _* V I C B : (
0x0f8c08…0f8d9c Dummy {f00=0x009e, f01=0x0190, f02=» T T T V : 2 ' W 2 6 2 @ " T # ' ?D N W.' #? N V H _ ;D:B " : _, L C : : F G LJ P C W $0 P ^ C Gx : "!@P ") # B C B % C C : LJ#0 T & C C
0x0f8d9c…0f8f30 Dummy {f00=0x009e, f01=0x0190, f02=» 0P0W, 8 C S W C C ^ 0 P C ^ ;a > 4 ZP T : 49d_b B@5 @ 8 @N ' @ d P ( z= #0 T B 'W ^ B B " PIh IxPP LIZ R R _ R _ # Q
0x0f8f30…0f90c4 Dummy {f00=0x009e, f01=0x0190, f02=» Ix J,J,J,K L JzL Q O8O>P S UTUTJtKrKrK K K J^K K X`[ [nZ [ [ Z JtL(L$L.L0JtJtJtJt W V 7 P ? P W J V X _ @I R ^ b K pVP 9c DI| L LJ Q I W P :aW, @I YRP ^ @I ]^ ^Z @I ]h ^ _n
0x0f90c4…0f9258 Dummy {f00=0x009e, f01=0x0190, f02=»T V P V ? W V P _ 8^t DI 2 ! 9BP V T W V P D $ V 6 V % V E @ ' T 2 % 7_ 2 # PH L 6PB L 2" &] Y $! 6P Q $ T 9BP J _ _ W Jv 6 @ " T 7 $ V P ?
0x0f9258…0f93ec Dummy {f00=0x009e, f01=0x0190, f02=» W 6 2# N W4 @ ELB" T> ; [ # N :H 2 T Z L LL2 D V, W # N LL2 E V $ W D V LL: , Wn 6 2 N W " P " # N ;b WF " ;d# _ [ v [ ? L ? Z Z :
0x0f93ec…0f9580 Dummy {f00=0x009e, f01=0x0190, f02=» 6 ^ L : & ^ & Z 4 N : Z 4 " 2@P : [ [ L & @ ! P ^ Z ^ [ 6 [ Z 7 L` Z 7 : ( :A ( @ " P [ :;H 2 P ;h N : M& ;
0x0f9580…0f9714 (0, 316) Dummy {f00=0x009f, f01=0x0190, f02=»# ^ " T & T + : * & !@P `1` P Q&Q [ ; 8 V W Q P [ ! X # P 4 V W Q P [ " X $ P TF R R ` ; <( Q P # W " <! =# T6W = Z P _ V ^< `_@
0x0f9714…0f98a8 Dummy {f00=0x009f, f01=0x0190, f02=» * & !`P :J +_ +Q Q&_0 , V W R V W R XV W 1 ^ _0 R W ( V W Q P W ! W V P , V W Q P W $ W V P T V W Z :$0#0;b S P P PN P 0 - P:
0x0f98a8…0f9a3c Dummy {f00=0x009f, f01=0x0190, f02=» _n' d V W V 4! P < S S S X 4 9d * & ! R + : V W R 4 0R Y 7 Y& P Z,;D 9_8 8 _< V W YL T 9 : ^ &9d! + P & T 9d! T 7 V Y P _$
0x0f9a3c…0f9bd0 Dummy {f00=0x009f, f01=0x0190, f02=»^ !0 ^ " TV *V &V : V S W P 9 S W _ V P W T V E + : & 6 ^ [ [ [ [ $ [ [ >h [ [ W|Q W|Q W|O> Z PP [ 9a Z $" T 9d! P6 P( [ Z w [
0x0f9bd0…0f9d64 Dummy {f00=0x009f, f01=0x0190, f02=»9D_ " P P [ ! :d" 5 : 0 ^ !0 ^ " Tz *V &V PP= ;@ R P W ;a=a P " R & R V T W V E + : V & 6 ^ [ [ [ [ $ [ [
0x0f9d64…0f9ef8 Dummy {f00=0x009f, f01=0x0190, f02=» P _ T { [ W|W^ [ Q@ [ W|O> { R [ _ W|O8 W|U" Z ! Z $ Z %_N [ Q* W|O8 W|Q& R [ Z { W|O8 z 9e! W Z : V I _ , " -! 9H X" ,9 -9d_ Z H D & H D % [
0x0f9ef8…0fa08c Dummy {f00=0x009f, f01=0x0190, f02=»Y Z,Z,Z Y Z X@ 6 X K K K K V K : L X W X@ LZ V Y^ X Y V Z P 2 " T W "@T '?W "? HW " K :e J J " J _Z Z Y^ [ Z P ? [ V 7_ Z
0x0fa08c…0fa220 Dummy {f00=0x009f, f01=0x0190, f02=» : J Qf : P 4 ! TV_ K Z WJ Y W +_ Y Y K W. _& X E W X & E J K : V : J T ^ 1 Y Z6 : ! P ! P ! P ! P L ! P LRW : ! )P9H " ^ # T &W &" :I : Z
0x0fa220…0fa3b4 (0, 317) Dummy {f00=0x009f, f01=0x0190, f02=»_ $0T [ $0T Z : R$ P $ 1T Y TdW 5 _& : $0TH $ R W R # P W ) V E $0T Wp W W _* [ : Z !0 , !0P2 0 > 4 R :d" 8 R ! :DW ! 9
0x0fa3b4…0fa548 Dummy {f00=0x009f, f01=0x0190, f02=»W V 9! R W Q< R W Q0 R W Q$ : > LJ#03 T $_X >_^ W _* p *1 TID ADDR OP CR LVL MODIFIED OPERAND CREDIT 2.1 TRACE ; ( ? @ R ( ?
0x0fa548…0fa6dc Dummy {f00=0x009f, f01=0x0190, f02=»a A : ]dWr ]d 2 L ] a b & a ]`Q A W* ]d ] V D ! )0 1 6 V 9 a A ^ J ( ? < ( ? : Wp Wl Wh Wd W` W WX WT WP WL WH WD W@ W< W8 W4 W0 W, W( W$
0x0fa6dc…0fa870 Dummy {f00=0x009f, f01=0x0190, f02=» A ] U 4 - _ ^ ] @ cp J ILLEGAL OPERATION MIXED ARITHMETIC ILLEGAL TYPE ODD WORD ADDR MISSING ENTRY ILLEGAL REQUESTED LENGTH STACK UNDERFLOW ARITHM OVERFLOW STACK OVERFLOW INDEX OVERFLOW ILL INDEX TYPE DIV BY ZERO EDIT BUF
0x0fa870…0faa04 Dummy {f00=0x009f, f01=0x0190, f02=» CODE NO FIX BUFFER ALLOCATED FIX BUFFER NOT ALLOWED ILLEGAL CONTROL CODE ILLEGAL INDEX VALUE FORMAT CONDITIONS CHANGED ILLEGAL PARAMETER LENGTH ERROR DATASET BUSY ILLEGAL DATASET REFERENCE TOO MANY KIA/NKIA STACK LEVELS DISC ERROR; NO REENTER POI
0x0faa04…0fab98 Dummy {f00=0x009f, f01=0x0190, f02=» ( ? _" @d P @d Pj Pf c V $ $T$ D BR V T D P T D @PL E @W . @dNP$ c dP $ $P BT , D E @ : @bVP AbV H Ad W TW V AbX d d V Ad TB( f8( AbX d @d V P ( R W bZ TB( f, : TB( g :
0x0fab98…0fad2c Dummy {f00=0x009f, f01=0x0190, f02=» LEGAL DATASET REFERENCE TOO MANY KIA/NKIA STACK LEVELS DISC E POI
0x0fad2c…0faec0 Dummy {f00=0x009f, f01=0x0190, f02=» ( ? _" @ P @ Pj Pf V $ $T$ D R V T D P T D PL d v ( ( v ( e v D "! Af v:
0x0faec0…0fb054 (0, 318) Dummy {f00=0x009f, f01=0x0190, f02=» u , v: 9a v @f P v4 u v v0 d u @d P v @d u Ad Af wX Af "V # ( e v Af P UW T v: v Af P v| g s gl @g g =i: WiJ Qj Mj /l Sm Imj Jn( Tn Yn Gn Lo Po( Ho8 RoR Vo` Kp0 v v,_ g u _ NO!
0x0fb054…0fb1e8 Dummy {f00=0x009f, f01=0x0190, f02=» -h ;h :i (h .i e uHX " , Ag L Ag L @ Ag Ag _T qR X ,T qR X ) Ag Ag vN s h i ;h :i i @g P Ag 1+X Ag _ i @g Ag @g Ag @g Ag @g Ag _ s Ag @g V s i " @g T " @g @g P Ag Ag " g @g u g T @f
0x0fb1e8…0fb37c Dummy {f00=0x009f, f01=0x0190, f02=» v(W 0 v At v W v At At @t u W v: @f$ Ag @f Ag _x e Af PZ @g & v8 0 u P P v0 u P @R v4 u k _ v( v v v:_T v v j g 4 u T P v0 u W T @R v4 u W v v v B "
0x0fb37c…0fb510 Dummy {f00=0x009f, f01=0x0190, f02=»W @g T @g Z l At @wX g @t Af v u v t v v t u Au g @g R V ;a Q v _ vN1 g v( @t Af _ 0 u v Al g P 3P g C @g P @g 1 @f P @g Q @ @g Q P " g T @f Ag @f Ag @f Ag @f& A
0x0fb510…0fb6a4 Dummy {f00=0x009f, f01=0x0190, f02=» g v( v At @t u v8 @f Ag @f Ag _ e @f P @g V @d ( g V " @g T @d sNTP @g P @g At Af Af$ i v8 0! v v g T @g P @g " 1 g g Px @g @g @g @g T @d r RX At *9l! P2 i m &9d! ) n W
0x0fb6a4…0fb838 Dummy {f00=0x009f, f01=0x0190, f02=»P` @g @g T @d r PF R % < < v8 ! v v g T @g P @g ! 5 = g g g p g P @g g q W" c qF c $ B % Ac g T @d W @g Af g @g R Ad Af Ad @d ( g Af g @d pt g @g @g T I @_:P p @
0x0fb838…0fb9cc Dummy {f00=0x009f, f01=0x0190, f02=»dPRl ) I I @ I B AdNW PT o RN )W dP qF AdN g dP , Ap Ap :B Ap Q (P _ H B @g H Ap " g EQ GT LT NE NG NL P2 @f R* vN s ph @g P Q p ( g g L U c ( R ( @g V @d H B W # + C "
0x0fb9cc…0fbb60 Dummy {f00=0x009f, f01=0x0190, f02=» ( R$ ( @g V @d H B ) I B " g $ % " vN # C C C C *T W #T Ag vN t P PR (T qR Pl ,T qR P^ )TX vN s Ag T @d r R: ?aP *:l" T* & W T C B B B B B " g Ar Ar
0x0fbb60…0fbcf4 (0, 319) Dummy {f00=0x009f, f01=0x0190, f02=» Tr L Qj W" P` L $ QV L % QL s2 s2 W C " _* Q P Q V _ W " AsJ < V " F <P W* @f " P ( g $ C "
0x0fbcf4…0fbe88 Dummy {f00=0x009f, f01=0x0190, f02=» (P _ # # H At " Au Au 4 v u 4 @u It T Au At At T Au T t @g R l Au N @t " P P (T @f ! PD @g T @d s t Q";H @t ;d t ( @t "( g @t " :S :X :Y :Z vN $P WH vN AuF
0x0fbe88…0fc01c Dummy {f00=0x009f, f01=0x0190, f02=» 'T vN:H_ Au " Au Au 4 v u T Au Au " , u "! R _U .WV Au : v Au " 9d v ! R :W& v: W v: W W ?W :W .W / av Av T v " @v T v Avl vp v ( @v Av " v v
0x0fc01c…0fc1b0 Dummy {f00=0x009f, f01=0x0190, f02=» (P _ # # H A " A A 4 4 @ I T A A A T A T @ : + L [ [ < !AAP !TTT W !**T * [ R !FFP !EET W Iy 6 * B Z 9 ! ; *Xt 8 ! Dy 0P Wv 0W@ Wn :T& *
0x0fc1b0…0fc344 Dummy {f00=0x009f, f01=0x0190, f02=» R 4! P ;)0 9U ? ^ Z ] 49d_4 _HU ; :X _ _ z 9d! ) ^ _ ,_ 8 _ : W 8W w 8 !++P !-- z ;$# + ^" _( |`. PT*AXYZ9 .W / a A T " @ T A ( @ A "
0x0fc344…0fc4d8 Dummy {f00=0x009f, f01=0x0190, f02=» @ X 4 8 < 4 4 4 4 4 4 @ 8 I 6 L0 0 WC0 W<6 0 W 0 6 0 W 0 W 0 W 0 W 0 W 0 : 0 P : _ 0 0 P 0 + P Rq WlWj6 0 W 0 W 0 W 0 W : @
0x0fc4d8…0fc66c Dummy {f00=0x009f, f01=0x0190, f02=» 3 2 I W 0 ( _ 0 FI{ W 2 W50 A H T ( 2 4 90 _;0 W 0 W 0 W 0 W 0 W 0 W 0 W 0 8 : ; 8 7 GG;GG;7;;;7;7? I I W 1 1 & W 1 1 ' W ? 0 T b ! [ A ? WO0 ( ?
0x0fc66c…0fc800 Dummy {f00=0x009f, f01=0x0190, f02=» 0 6 0 W 0 W 0 W 0 W 0 6 8 2 _D - T ]0 0 2 4 A ? 0 0 ? 4 1 4 0 P 0 W 0 ( W 4 X0 $ 1 W{1 B n 6 0 W 0 W 0 W 0
0x0fc800…0fc994 (0, 320) Dummy {f00=0x00a0, f01=0x0190, f02=»HZ I H+ Y0 1 0 KZ 4 4 e e% H* e af 0! 0" f eP & d 4 @Z 4 6 ovx( v Ww Tp Ti Tb T[H u TN u H1 ( TAH,> ! T7H-4 " T- # T& $ T H. % T W W W W 4 4 AZH" 0 %6 CMOWO0!
0x0fc994…0fcb28 Dummy {f00=0x00a0, f01=0x0190, f02=» r 0$ ? _ 0% 0 ? :[ @$A 0! A 1& 6 _/ 4@)6 o _D 1[ # "` H1 Y_ A)WR@) + * & 6 + _ + * " H 1' , _3 + & KRc& ? _F + W )|p |p eI) -}HYA&A 0! 1& 6 _ K
0x0fcb28…0fccbc Dummy {f00=0x00a0, f01=0x0190, f02=» g 0! A 1& 6 _ ?! I D D <! <! <! <!I ! t XH & " Ia t T |! K # [ Ub a I " | 3I 0! A 1& 6 _ _ ?" K$ | W $<! # W 0! A 1& 6 _ _ Xp t @' t t & " Ia tT I' KP b h a P [b a
0x0fccbc…0fce50 Dummy {f00=0x00a0, f01=0x0190, f02=» 'K W: # A 1& 6 _ _ t @'_ A'_ @'I A$ (?# g I"R_ 0 ? 0 _ ) E # V ) o ) o _% XHA" " r 0 ? _ (Z0! + p s A h * + , - @ A . ?$ g q?% ' " H T 4 4 ! ^ H 4 /1 T4 /2 T. /3 T( /4 T"
0x0fce50…0fcfe4 Dummy {f00=0x00a0, f01=0x0190, f02=» T H9 T HB 4 I " r 0% p _ 0% 4 / 0 0 0 0 0 0 0 0 4 @ 0' P A W W 4 ' % o n @ W u 4 7 ] l
0x0fcfe4…0fd178 Dummy {f00=0x00a0, f01=0x0190, f02=» B } t { % / < 1TFDBILAGFEJL SLUTDDAG NRASSIGN KORREKTLINIE NROPSTART SUBTOTAL KOMMUNE NRVOLUME NR OPRET LEV. STRAKS-CHECKSKIFT JOURNALEJ-EDB T[LLER VOL 2 VOL 3 VOL 4 BZZ
0x0fd178…0fd30c Dummy {f00=0x00a0, f01=0x0190, f02=» g ? NY SIDE. ^ j OK ? j[| < 9~ c f m i Z} o START VOLUME= DATASET= z > g F g n h ; L
0x0fd30c…0fd4a0 Dummy {f00=0x00a0, f01=0x0190, f02=» % # ( - 3 ; D M Y e r & - . @ @ 0 TLINIE NROPSTART SUBTOTAL KOMMUNE NRVOLUME NR OPRET LEV. STRAKS-CHECKSKIFT JOURNALEJ-EDB T[LLER VOL 2 VOL 3 VOL 4 BZZ
0x0fd4a0…0fd634 (0, 321) Dummy {f00=0x00a0, f01=0x0190, f02=» B 4 6 : > A @ H H A W @ A @ I ^ @ W I @ @ @ @ @ @ @ @ @ @ W I " A 6 _I W @ _ _YA 4 A 6 <MW _n @ _BK ( @ _U$ 0 0 A _nI 0 ^@ @ _ K P ^@ _W A _ 6 */5;CMWfou
0x0fd634…0fd7c8 Dummy {f00=0x00a0, f01=0x0190, f02=» T 4 T W TyW TsWy 4 2 TLWR TEWK T>WD T8 4 I 0 4 I % 4 I 4 H 4 4 ! 4 4 6 '1 4 4 I T 6 4 4 4 0 4 4 A @ @ 6 4 A 4 A
0x0fd7c8…0fd95c Dummy {f00=0x00a0, f01=0x0190, f02=» @ @ 4 @ 4 H H 0! @ ! "H ^H [) sW # 0 *0 0 0! !0 P 0 0! ^ W 0 # , p6 H: 0 # 0 H4 - k l H H N N H% k H 4 H # I H @ A l $@ ( 4 4 H I I H b % & ^@ 4
0x0fd95c…0fdaf0 Dummy {f00=0x00a0, f01=0x0190, f02=»W(_4( 'T#W $T @ ! k W W ) T 4 4 6 N + ! ! W H3 W5H3 W- W( W# ! ! W W W W 4 6 * S]W I I A ` g *W W I I A c i *W W H I I I A +0 WrWu WlH kWdWgH ]I ) kC@ @
0x0fdaf0…0fdc84 Dummy {f00=0x00a0, f01=0x0190, f02=» H " @ WY k k k k@ H A @ 6 _(@ @ _Q% q H L A I @ 4 ^ ^ k k@ @ @ @ 0! 4 I 5I A A k / 0 hW 0 : / 00 @ @ ^ 4 4 jI II H ZA @ WMI OI L , A - A &0 0!
0x0fdc84…0fde18 Dummy {f00=0x00a0, f01=0x0190, f02=» # Z ( M 0 - 0 20! I K 4 I &I A A W W I @ @ @ W 4 4 ( 4 I , b aH I ) k " ' # H H H 3T2 4H 5 6 &H / 0 7A 6 @ A @ @ 4 H
0x0fde18…0fdfac Dummy {f00=0x00a0, f01=0x0190, f02=» 6 - k W + k " NI KI" C > H " $ : ; W H : ; W 4 [ x o k < o ; 4 =(2 ) k eW ) H fW ) I dC 8 < IQ oR r: u8 v
0x0fdfac…0fe140 Dummy {f00=0x00a0, f01=0x0190, f02=» W W w # $ W ~ ~ x x ! J " ! " # $ % & Wq > ! gWj > ) ` > ! > %&') L) "H ! % B! 8) 8W1) >%&' ) ') ) ! ) W ! ) W 4 4 ! ,! ! !
0x0fe140…0fe2d4 (0, 322) Dummy {f00=0x00a0, f01=0x0190, f02=» L , . "HP 0 $ _ AP b]`b @ Jb T @P 4 @P 4 I ,I A ! " H 0 , A I0 _ 4 BT I% K 4 / - BA 4 ,A 4 CP & D Jb T 1 @PW @P 2 4 0 2 4 H XI 0@ @ ,0 0! @ / - L BT W"@ A !
0x0fe2d4…0fe468 Dummy {f00=0x00a0, f01=0x0190, f02=» ; Q & 3 > + I y ! x ^ V e W F q ^ P B . @ f - I P D % j 5 U
0x0fe468…0fe5fc Dummy {f00=0x00a0, f01=0x0190, f02=» " ( . 40 =0 >0 ?0 @0 B0 D0 F0 H0 J0 L0 N0 P0 R0 T F 2 2 4 CP & D Jb T 1 @PW @P 2 4 0 2 4 H XI 0@ @ ,0 0! @ / - L BT W"@ A !
0x0fe5fc…0fe790 Dummy {f00=0x00a0, f01=0x0190, f02=» 6 D z A 1& 2 _ K _!K $J 'K(*@ A A {# H {1& 2 _G y z g z ) y H H X A s s _~ A 1& 2 _ @ @ @ @ @ @ @ @ @ @ @ @ @ y0 0! I { ( y H " x Q x k y o
0x0fe790…0fe924 Dummy {f00=0x00a0, f01=0x0190, f02=» Z u T T ! y Z u T T+! y' T ! y Z s T H L A ! y, ! y Z z x y 2 Z r y : : H z g z@ X @ ] 4 4 ? x
0x0fe924…0feab8 Dummy {f00=0x00a0, f01=0x0190, f02=» k y'# y 0! } _:0! 4 w@ @ y y y yW4 A % @ % H La { { A A %@ @ %0! I ' y yW H L 4 q y y yI
0x0feab8…0fec4c Dummy {f00=0x00a0, f01=0x0190, f02=» " _ I / % y W z% y W z z 0! 4 } v P v 1& A 6 _.K 1 p W K < t W m W y y y ) 0 0 H v " < i y i
0x0fec4c…0fede0 Dummy {f00=0x00a0, f01=0x0190, f02=» H @ 4 1 0 ) 0 4 0 H4 A* H" XH X ! Iat " # $+ |HA/ %) &J/ ' $+ t XyH" ( ! )H" XH " @$@*@ 4 *| ! IatT t + tT 4 4 A)!W& @) aa aa a Tba 4 A)!W& @)aa X aa 4 t XH |H ) |H P $+ %* %& % H,
0x0fede0…0fef74 (0, 323) Dummy {f00=0x00a0, f01=0x0190, f02=» f h a P ! LauX* % u @ 0! _ J- $+ %( ,"N < ,#O =& ,$P >$J. ,%R J#_ J, $+ %% ,!M ;! _ $+ %& , KRc& _ $+ ' T ' T |H (P |H % W 4 " 4 1& 4 " R %Z H ,Z _ P( X WS 9 & cD . Kc TF Hj c " % W _/
0x0fef74…0ff108 Dummy {f00=0x00a0, f01=0x0190, f02=» Z " R Z y_ ^+ _ 4 & cD . Kc Whc D P / R" PRW# hc D T P & cD . Kc P /4 I ? s < A( A A 1& 2 _ @) $ A)@ 1& 6 _ _0H) % H jc ! Kc _Hfc ( P8j %c ( D" ! Kc b P & . Kc P x /_| ! Kc /
0x0ff108…0ff29c Dummy {f00=0x00a0, f01=0x0190, f02=»_ * R & | Q l 0? & cD . Kc < j j Wj c dc S P ! Kc T6 /? ( P PRV P ! Kc T / cD & . Kc T b _R@(? H j(s f0 1 " PP 9 & cD . Kc T8 H H Dj c j c j c D 0 1 &0 1 2@9_U@9 1 24 /
0x0ff29c…0ff430 Dummy {f00=0x00a0, f01=0x0190, f02=» : V P ; I } ] t [ % & B . ( 2 3 x *BELBFO DEB KREKVITBILAGKLAR SLET SLUTDZ300 DAG NRSALDO DATAS[TPERIODE DISCFEJL SUBTOTAL REGKONTONRKASSE]BNINGSLET
0x0ff430…0ff5c4 Dummy {f00=0x00a0, f01=0x0190, f02=»NR REMIT %B9999BBZ999999999999B9999999999999E-99BTTTVTTTVTTTVTT9V99- ~] f[X D 1^ Z X 1 D ) d 0 gY} 2 m 1 ^ 0 j n 9 _ 1 D 9 ^ B ^ _ 0 o < 9~ h f m
0x0ff5c4…0ff758 Dummy {f00=0x00a0, f01=0x0190, f02=» $ ) . 3 8 = C I P X a j t 0 0 0 0 0 & ) 5 A P f } - / @ | D $ H D DISCFEJL SUBTOTAL REGKONTONRKASSE]BNINGSLET
0x0ff758…0ff8ec Dummy {f00=0x00a0, f01=0x0190, f02=» I I q `H c H 02 + !"#$%&'()*+WC2 -(( (( ((( ((( (((((((((((((((((((((((,)*+((W 8 '2 ?- 2 ?-A I A A 1& 6 _ H @ _ @ @ ?-A I I VI SA A 1& 6 DD _ I i i @ A 1& 6
0x0ff8ec…0ffa80 Dummy {f00=0x00a0, f01=0x0190, f02=»t XH +I % " 6 _ _1K ?/_8_ ? DW K PW +A @(?-?0 ?-@ I A A O p p 1& 6 _% E ?- A 6 _ @ ?-H I A WW D@ A ?-I 1& A A c 2 112?1 H 0I I 2 3456789:;<=>?@ABC
0x0ffa80…0ffc14 (0, 324) Dummy {f00=0x00a1, f01=0x0190, f02=» H L" q q A 1& q?1I %C P @ A 1& 6 _ A I tW u * I , t I W , u} L " S&0 T R P _=! pTW ! p! + T _b + k V U@ D P A W A @ ?1 @ @ DW H H A _ W C T C T C P
0x0ffc14…0ffda8 Dummy {f00=0x00a1, f01=0x0190, f02=» @ DI A M V 0 0 I , ) H_ H @ D D0 0! @ W&H I I H A _ W W W W !W "W #W @ D?-I AH A 1& 6 11 W/A$ $W)H$&H"# 0 %K$ % 0 0 0! 0 %0 ?-I A &W @ ?-A A A r# H r ' 2 E_ @ @ ?- (?- )?-I A
0x0ffda8…0fff3c Dummy {f00=0x00a1, f01=0x0190, f02=» G_ ?-I } A t p@ 1& 6 aa _! ) - 9 W A 1& 2 H_ # p W ?- p p * +1& A W @ 2 IIJK _ q * +_% c * +_2 ` * +A 1& _W A 0 1& ( ! Q
0x0fff3c…1000d0 Dummy {f00=0x00a1, f01=0x0190, f02=»&W^ 1WZ 2WV0! )$ 0 3!0 _ 0! W, 4 W' 4 W" 4 W W 4 W 5W W W W W 6W ?L?M?N4 N / 1 5 . I , < _ c g v % K O S W [ _ c
0x1000d0…100264 Dummy {f00=0x00a1, f01=0x0190, f02=» Y F " $ & 6 w } ] % > Q V W @ u 4 6 4 ! * , B . y P DKSTNR
0x100264…1003f8 Dummy {f00=0x00a1, f01=0x0190, f02=»MITPENGE-KONTOKASSE-KONTO ]BNE KASSERKONVERTERING REGNEFUNKTIONEJ-EDB T[LLER VERSUR KONTONR REMIT B9BB9BXXXXXBBZZZ-99999999E-99ZZZZZZZZE-ZZZZZZZZZZZE-9TTTTTTTTTTTTX-TVTTTVTTTVTTX,XX-TTTVTTTVTTTVTT9V99-ZZZVZZZVZZZVZZ9V99- BEL K E l SP RGE
0x1003f8…10058c Dummy {f00=0x00a1, f01=0x0190, f02=»d [ g b b SGRUNDLAG i _ 0 o Z " 9 ] 0 n Y 9 d ]k j 9 3 ] c ^ c - h c c * [ ; FRA [ TIL [ k g g g g g g g g g g g g 0
0x10058c…100720 Dummy {f00=0x00a1, f01=0x0190, f02=» b * ; [ f l B e m A n a a o ` ! ' - 5 > G Q [ e p { 0 0 0 0 0 ) 5 C T
0x100720…1008b4 (0, 325) Dummy {f00=0x00a1, f01=0x0190, f02=» T H L P *0 S < 0! * ) < ) + % & Ia P | W ] Dba % HaTk@' o t t t & Ia tTbI'_! K m h a P?H - h W ha % T fb a ba HaXc + ? Ha ? A 1& 6 _ _ t @'_ A'
0x1008b4…100a48 Dummy {f00=0x00a1, f01=0x0190, f02=» b # S % H b # u % H W q4 # S % H W 4 ( # p 4 # ~&! }" I ) % o , ) $ * 4 4 4 % H 4 H[ W< I Lb Q c ) Q x Q 4 0 ! `G !6
0x100a48…100bdc Dummy {f00=0x00a1, f01=0x0190, f02=»2 W 4 % a # d W ( + ? 2 !"# $%&'() *+,-. /0123456 m$ Tn 6 <A? 6 ? %? 6 ? $ A _
0x100bdc…100d70 Dummy {f00=0x00a1, f01=0x0190, f02=» ? ? g d ? ? W8 X8 I # t W % t W N N p ? # " ? I @ @ % s A W$% r A W H s4W I S=W rC% s _I # W W A A Z? @ ) y A ( ! yj! zf b M D * " :hM b M (
0x100d70…100f04 Dummy {f00=0x00a1, f01=0x0190, f02=» I" ? ? # L % o ? ? # % ? ? :7 " x % H x %k H ? #? I k? l? ? b x k ? $ ' ? 88( H ?9 < ? W8 X8 ? " ? A % A # @ W @ < ? & (
0x100f04…101098 Dummy {f00=0x00a1, f01=0x0190, f02=» T# 88( H ?9 %? ? ? Y ? & _ Z I k? l? ? @ @ " ? < "? A D D D D D j ' ? A j ' ? A j ' j ? A j # j #? A j ! j !? $ " x x ? ? % H " v v ?
0x101098…10122c Dummy {f00=0x00a1, f01=0x0190, f02=» ? x # ^ x x ? ? "< o ob R R - H R R W ( ~ W A W LW MW OW # | oW W T ! Q % H @ VH I H + WC W~ !_ U_" [_' _, ~ ~ H H $
0x10122c…1013c0 Dummy {f00=0x00a1, f01=0x0190, f02=» i H I 4 J # " 4 W 6 W 6 $ A W $ 4 ZA 4 9 & r D W s $ G * I e
0x1013c0…101554 (0, 326) Dummy {f00=0x00a1, f01=0x0190, f02=» . ; I J W 2 : y # $ % & ( < = T Z d i r 0&04 DEB KRE51 52 SLUTDKORREKT ( 0 1 H I P Q R p 9 2 9 B n ? X " $
0x101554…1016e8 Dummy {f00=0x00a1, f01=0x0190, f02=»0 o0 u | @ m D n 4 W 6 W 6 $ A W $ 4 ZA 4 9 & r D W s $ G * I e
0x1016e8…10187c Dummy {f00=0x00a1, f01=0x0190, f02=» . " & *H* H* 4 @ @ @ @ @ 6 W HW M@! p A)!W& @)aa aa N W ha D W ! SkI! , (a a a a Wh @!" ba _:ba b ba f A! IatTfK p t XH_ I JI GI DI AI > dba IatT8I ,
0x10187c…101a10 Dummy {f00=0x00a1, f01=0x0190, f02=» v dL_ # w dK_ dI_"I I BW I I H W I o T Td T @ TUWN 0 _@ P A I *I H T, P T W T W I W T W 4 H D% p W ! % H # z " W 4
0x101a10…101ba4 Dummy {f00=0x00a1, f01=0x0190, f02=» Xj 0( H aj ! Vj 0( 0! P A 4 0 4 0 0 0 4 1 4 1 4 I } @ # WW ] 6 &@ YW= W5 W- " ZW%0! _M A @ $W 4 0 0 0! 4 A I T 4 I A 0 0 I% K 4 I 0
0x101ba4…101d38 Dummy {f00=0x00a1, f01=0x0190, f02=»! 0! 4 _6 4 0 6 W$ jW lW EW nW oW k 0 : a " 0 % [b a W ( % Ub a W " D |a $ $ 0 W " 0 4 p0) Q P I 0! @ 4 ! K%! O! & mH @ A A H @ &W
0x101d38…101ecc Dummy {f00=0x00a1, f01=0x0190, f02=» I 4 4 0+ P Q I 0! 4 I 0( Q P 4 p6 -JWs W= ^W# ^ W _ X KD QK T ! K j K @X 4 @X 4 6 -JWh W= ^W#
0x101ecc…102060 Dummy {f00=0x00a1, f01=0x0190, f02=»" ? P ! Q/W ! K I T _. " S X5W2 # A'I _E D_ I' I 0! W 0! 0! 0! @ 4 # I 0! W 0! 0! 0! @'@ 4 @'A ! T I ! T W 0 $ S " J I T ! K W $ S Q T X2) Q W A' # ! Q I' W
0x102060…1021f4 (0, 327) Dummy {f00=0x00a1, f01=0x0190, f02=» _= ab a < ab a ab a R8 sR t: w9 N N q8 _ WC%< c ha W ha T b a - e^ ab a P ] P ( K"i + : ,h % T ` q q_
0x1021f4…102388 Dummy {f00=0x00a1, f01=0x0190, f02=»W& ah $ da H? I" ? I" ? @ @ 4 @ A 4 @ A @ 4 H 0 _ A 4 y K 7 ( Q & > 8 % . ( : J - 4 P @ - V B . E y
0x102388…10251c Dummy {f00=0x00a1, f01=0x0190, f02=» @ B G I P 999999999999999B99999TTTTTTTTTTTTT9TTTTTTTTTTTTT9-Z~[ ) & ] G dYX ! fX} gZ h iY # & ) , 1 8 @ I V0
0x10251c…1026b0 Dummy {f00=0x00a1, f01=0x0190, f02=» 1& 4 1& 4 1& 4 ? ? ? ? 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 H 4 j 4 4 4 Th T f 4 4 4 4 4 4 #g b 4 4 4 4 4 4 d DEB PRIMOBET-ARTDEBITORHOVEDBOGLINIE NRLEVERAND CPR/CIR/
0x1026b0…102844 Dummy {f00=0x00a1, f01=0x0190, f02=»,99+TTTTTTTVTTX,XX- BEL B VAL R y X TXT v # [ # u ^ t ^ s Z 0 Y Z A ] ] ` A B w $ [ $ @ X . " X " X
0x102844…1029d8 Dummy {f00=0x00a1, f01=0x0190, f02=» ) _ ` BUNDT ] [ % # ] # & $ ] $ ` STRAKS ] [ _ 2 ^ V SALDO ] FAST Z XX SALDOOVERF ] 2
0x1029d8…102b6c Dummy {f00=0x00a1, f01=0x0190, f02=» NR-2 DATO 1 DATO 2 POST T/GL. ]R ] A Y ] _ P B Q A R A XX XX XX X ` ] [ NR _ U B V A W A X POS
0x102b6c…102d00 Dummy {f00=0x00a1, f01=0x0190, f02=» XX UDB.OPL.1-5 1 Z@ 2 [@ 3 @ 4 ]@ 5 ^@ ^ M/P-NR ] Y BKO BFO 9 GL. SALDO Z CHECK p ` XX X = Z XX ` ] [
0x102d00…102e94 (0, 328) Dummy {f00=0x00a2, f01=0x0190, f02=» Y BKO BFO MTB * SD-INCASSO W M XX X POST. F]R RE] REM OPK DIVERSE EJ EDB TNR 9 L N B O B DIVERSE Y XXXXXXXXXX !
0x102e94…103028 Dummy {f00=0x00a2, f01=0x0190, f02=» X INDB W XX X POST. ]R RTE/GEB U BFO ! ) 2 < F Q h0 x ( 5
0x103028…1031bc Dummy {f00=0x00a2, f01=0x0190, f02=» a t " < & ^ & + . 4 4 7 7 k 8 B C G _ K W _ H _ d g j m r >@ @ @ d G EM OPK DIVERSE EJ EDB TNR 9 L N B O B DIVERSE Y XXXXXXXXXX !
0x1031bc…103350 Dummy {f00=0x00a2, f01=0x0190, f02=»2 RRRRRR_D R- L L0X 0 l G O * H ^ : I J ] Z b * j e z q u & w ( ( & & ( ) & 1
0x103350…1034e4 Dummy {f00=0x00a2, f01=0x0190, f02=» L , & < L & l J F " D P 0R W 0X ( W 4 L0X $ 1X F W{1X F B n | 0 0
0x1034e4…103678 Dummy {f00=0x00a2, f01=0x0190, f02=» H J F " D 6 0X K W 0X K W 0X K W 0X K W 0 R2 RRR_: R4 0 X h 0 x 0 $ 0 ' - Z 2 4
0x103678…10380c Dummy {f00=0x00a2, f01=0x4100, f02=» L T e * g < l & L n q l w H | J F " D @4 R 4 L0X 0X 4 HZ I H+ L0X 1X F 0X KZ R 4 4 @ @
0x10380c…1039a0 Dummy {f00=0x00a2, f01=0x0190, f02=» : H IDENT RGSUB4 TRA 4.2 81-05-06 F1 O1111 03.01.XXX.1 2 . ASGVOL ASSG CLSVOL LAMPOF LAMPON SOPRD B $$$TRAS x > : ASGVOL B ASSGC CLSVOLM LAMPOFO 9 LAMPON / SOPRD C 2 . SPERR T:ASSIT T:DELA T:DSC06 T:DSC11 T:KI.
0x1039a0…103b34 (0, 329) Opaque[0x194]
0x103b34…103cc8 # DirEnt {nam=»RGADM «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1448, f03=0x0000}
0x103b34…103cc8 IdxSect {
0x103b34…103cc8 f00 = 0x00a2 // 0x103b34 @0x0
0x103b34…103cc8 f01 = 0x001c // 0x103b36 @0x2
0x103b34…103cc8 gno = [ // 0x103b38 @0x4
0x103b34…103cc8 [0x00]: C0x00a2.0x1.0
0x103b34…103cc8 [0x01]: C0x00a2.0x2.0
0x103b34…103cc8 [0x02]: C0x00a2.0x3.0
0x103b34…103cc8 [0x03]: C0x00a3.0x0.0
0x103b34…103cc8 [0x04]: C0x00a3.0x1.0
0x103b34…103cc8 [0x05]: C0x00a3.0x2.0
0x103b34…103cc8 [0x06]: C0x00a3.0x3.0
0x103b34…103cc8 [0x07]: C0x00a4.0x0.0
0x103b34…103cc8 [0x08]: C0x00a4.0x1.0
0x103b34…103cc8 [0x09]: C0x00a4.0x2.0
0x103b34…103cc8 [0x0a]: C0x00a4.0x3.0
0x103b34…103cc8 [0x0b]: C0x00a5.0x0.0
0x103b34…103cc8 [0x0c]: C0x00a5.0x1.0
0x103b34…103cc8 [0x0d]: C0x00a5.0x2.0
0x103b34…103cc8 ]
0x103b34…103cc8 }
0x103cc8…103e5c Dummy {f00=0x00a2, f01=0x0190, f02=» P IDENT RGADM 03.01.XXX.1 DDUM KMD08 & PDIV : P ENTRY ADM H P ENTRY ADMRET Z P ENTRY A5RET1 p P ENTRY A5RET2 P* P EXT CLKF P EXT CLEJ P EXT CLEDB P EXT CLBEH P EXT SKIFT P EXT STR
0x103e5c…103ff0 Dummy {f00=0x00a2, f01=0x0190, f02=»600 P EXT A5KONV P EXT BUDREG P EXT AD4100 4 P EXT AD4200 H P EXT AD4300 P EXT ABORT p P EXT EMPTYT P EXT RGREAD P EXT TRPAGE P EXT WRITJT P EXT SPCLRN P EXT SPCLRA P EXT SPINF1
0x103ff0…104184 Dummy {f00=0x00a2, f01=0x0190, f02=» P EXT PACKCL P EXT CLEAR8 P EXT SPLIN8 , P EXT GRASPV @ P EXT FRMXVO T P EXT FRMXJT h P EXT KORT | P EXT MODP P EXT KVIT P EXT LSTINT P EXT SUBTOT P EXT CYK P EXT DIVTR P EXT TCONFW
0x104184…104318 Dummy {f00=0x00a2, f01=0x018e, f02=» P EXT TXTOPR P EXT TXTPRT P EXT LEVOPR 0 P EXT LEVDEL D P EXT LEVPRT X P EXT LEVSPG l P EXT KFREAD P EXT KFWRIT P* P INCLUDE EQUATE P EJECT P************************ P* P*
0x104318…1044ac Dummy {f00=0x00a2, f01=0x0190, f02=» j * P* ADM 3 OPRETTELSE KONTOPLAN , P* ADM 4 OPRETTELSE TEXTREGISTER 6 " P* ADM 5 KONVERTERING f & P* ADM 6 DATATRANSMISSION P* ADM 7 3270 ONLINE . P* ADM 8 CHANGE (SPG.) CHECK LBNR
0x1044ac…104640 Dummy {f00=0x00a2, f01=0x0190, f02=» BILAG EJ EDB ~ 4 P* SPG 2 BILAG BEHOLDNINGST[LLERE , P* SPG 3 BILAG EDB T[LLERE R & P* SPG 4 AABNE KASSER , P* SPG 5 UDSKRIFT KONTOPLAN 2 P* SPG 6 ENKELT BEHOLDNINGST[LL
0x104640…1047d4 (0, 330) Dummy {f00=0x00a2, f01=0x0190, f02=» REGSET r . P* SPG 10 SPG. PRINT INTERVAL * P* SPG 11 -"- GL. REGSET B ( P* SPG 14 PRINT TEXTREG. p $ P* SPG 15 SPG LEVREG & P* SPG 16 PRINT LEVREG 2 P* SPG 17 BILA
0x1047d4…104968 Dummy {f00=0x00a2, f01=0x0190, f02=» ADM 15 OPRETTELSE LEVERAND $ P* ADM 16 DELETE LEVERAND * $ P* ADM 17 NEW KASSEKONTO R $ P* ADM 18 NEW VERSURKONTO z " P* ADM 19 REGNEFUNKTION P* ADM 20 CHECKCIFFER P* ADM 21 TEST MODE
0x104968…104afc Dummy {f00=0x00a2, f01=0x0190, f02=»25 KVITTERING " P* ADM 26 SUM FUNKTION $ P* ADM 27 LISTE FUNCTION @ P* ADM 28 SUBTOTAL h $ P* ADM 29 TEST AF VOUCHER P* ADM 30 CYCLE SLUT * P* ADM 31 CYCLE 1 START (CYCLE) , P*
0x104afc…104c90 Dummy {f00=0x00a2, f01=0x0190, f02=» DIVERSE TRANS P* ADM 36 P* ADM 37 * P* ADM 38 > P* ADM 39 R " P* ADM 40 BUDGET TRANS f 0 P* ADM 41 DAN PRINTFILE, UPD. DIVERSE $ P* ADM 42 PRINT PRINTLEV $ P* ADM 43 CLEAN PRINTLEV
0x104c90…104e24 Dummy {f00=0x00a2, f01=0x0190, f02=» BRANCH TO SELECTED ADM ROUTINE P* * P******************* 4 P TBT CCONVERT,ADM003 P P TBT GTLOKSPG,ADM002 l P MOVE GSWSTR9,=C'TOTAL ' P TBF GTSPGFLG,ADM001 P MOVE GSWSTR9,=C'SUBTOTAL ' PADM001 P MOVE GSWBIN1,ADMN
0x104e24…104fb8 Dummy {f00=0x00a2, f01=0x0190, f02=»M13,ADM14,ADM15,ADM16, C p : P ADM17,ADM18,ADM19,ADM20,ADM21,ADM22,ADM23,ADM24, C " : P ADM25,ADM26,ADM27,ADM28,ADM29,ADM30,ADM31,ADM32, C ` : P ADM33,ADM34,ADM35,ADM36,ADM37,ADM38,ADM39,ADM00, C P ADM41,ADM42,ADM43 P B ADM00 P
0x104fb8…10514c Dummy {f00=0x00a2, f01=0x0190, f02=»M15,ADM16, C z ( P ADM00,ADM00,ADM00,ADM00,ADM00, C " P ADM00,ADM00,ADM00,ADM00, C B ( P ADM00,ADM00,ADM00,ADM00,ADM00, C h ( P ADM00,ADM00,ADM00,ADM00,ADM00, C ( P ADM00,ADM00,ADM00,ADM00,ADM40, C $ P ADM41,ADM42,ADM43,ADM00,AD
0x10514c…1052e0 Dummy {f00=0x00a2, f01=0x0190, f02=» j P BE ADM11 P SUB GSWBIN1,CBIN22 " P IB GSWBIN1,ADM23,ADM24,ADM25 6 PADM00 P B ADMRET j P* | PADM003 CONVERSION MODE P MOVE GSWBIN1,ADMNO P SUB GSWBIN1,CBIN4 P IB GSWBIN1,ADM5,ADM6 P B ADMRET
0x1052e0…105474 (0, 331) Dummy {f00=0x00a2, f01=0x0190, f02=»SE,ADM1RET P MOVE SPKEY,CBIN2 P SET SPPROMPT , P SET GTDYFLG B PADM1010 V P ATTFMT ADMFRM1 f P PERF SPCLRN ~ ( P IB SPBINW2,ADM1RET,ADM1RET,ADM1020 P B ADM1000 PADM1020 P TBF GTDYFLG,ADM1RET P CLEAR GTDYF
0x105474…105608 Dummy {f00=0x00a2, f01=0x0190, f02=» P* BEHOLDNINGSTAELLERE * PADM2000 $ P SET GTADMFLG 4 P TBT GTSPGFLG,ADM2001 J P TBT GTKASSE,ADM2RET h P TBT GTTESTFL,ADM2RET PADM2001 P SET SPPROMPT P SET GTDYFLG P ATTFMT ADM2FRM1 P PERF SPCLRN ( P
0x105608…10579c Dummy {f00=0x00a2, f01=0x0190, f02=» NO j * P MOVE GTDUPF(CBIN2),GSWBCD1 COUNTER NO : P MOVE GTDUPF(CBIN1),CBACC(GSWBIN6,CBIN1) REG. KNT. NO : 2 P MOVE GTDUPF(CBIN4),CBACC(GSWBIN6,CBIN3) SALDO x P CLEAR GTDYFLG P SET SPPROMPT P ATTFMT ADM2FRM1 P PERF SPCLRN ( P I
0x10579c…105930 Dummy {f00=0x00a2, f01=0x0190, f02=»E CBACC(GSWBIN6,CBIN2),=D'0' CLEAR PERIODE PADM2040 2 , P MOVE CBACC(GSWBIN6,CBIN1),GTDUPF(CBIN1) B , P MOVE CBACC(GSWBIN6,CBIN3),GTDUPF(CBIN4) r P PERF WRITJT,=W'13' PADM2RET P CLEAR GTADMFLG P CLEAR GTDYFLG P B ADMRET
0x105930…105ac4 Dummy {f00=0x00a2, f01=0x018e, f02=» " P PERF TXTOPR TEXT OPRETTELSER P B ADMRET . P EJECT @ PADM5 N P* KONVERTERING * Z PADM0500 r P SET CCONVFLG P CLEAR SPKEYFLG P TEST GTKASSE P BNZ ADM05RET BRANCH IF TRUE P CMP TTASKNR,CBIN1 P BNE
0x105ac4…105c58 Dummy {f00=0x00a2, f01=0x0190, f02=» P PERF SPCLRN * P IB SPBINW2,ADM05RET,ADM05RET,ADM0510 P B ADM0500 F P WRITE EOF RECORD X P AND CLOSE ALL FILES t PADM0510 . P TBT CCONVERT,ADM0513 NO WRITE IF CONVERT P SUB CRECBCD,=D'1' P PERF SLUTID,CRECBCD
0x105c58…105dec Dummy {f00=0x00a2, f01=0x0190, f02=» P PERF CLSVOL,CBIN1 P PERF CLSVOL,CBIN2 " P MOVE CRECNR,CBIN1 < P MOVE CRECBCD,=D'1' V P PERF LAMPOF,=W'2047' r P TBT C5MDISK,ADM0514 P PERF LAMPON,=W'64' LAMP 5 PADM0514 P PERF LAMPON,=W'32' LAMP 6 P PERF LA
0x105dec…105f80 Dummy {f00=0x00a2, f01=0x018e, f02=»009,ADM05008,ADM05007,ADM05006, C 2 P ADM05005,ADM05004,ADM05003,ADM05002,ADM05001 * PADM05001 ` PADM05002 p PADM05003 PADM05004 PADM05008 PADM05009 P B ADM0515 P* PADM05010 LAMP 10 P B ADM0513 CLOSE A
0x105f80…106114 (0, 332) Dummy {f00=0x00a3, f01=0x018e, f02=» b , P* EQUIVALENT TO START OF ADM5 MODULE P B A5KONV 8 P* KONVERTERING J PA5RET1 b P B ADM0513 p PA5RET2 P B ADM0515 * P* EQUVALENT TO END OF ADM5 MODULE P* P* ADM05006 SOP 6 * % PERF ASGVOL
0x106114…1062a8 Dummy {f00=0x00a3, f01=0x0190, f02=» P* P* P* P* " P* , ADM05007 SOP 7 6 PERF ASGVOL,CBIN1 N BNOK ADM0513 h " PERF BCKUP,=W'2' WITH BACKUP ~ BNOK ADM0513 B ADM05RET * * * * P* PADM05RET
0x1062a8…10643c Dummy {f00=0x00a3, f01=0x0190, f02=»DATATRANSMISSION * P B ADM600 P* , P* 6 PADM7 @ P* L P* JUMP TO 3270 ONLINE V P PERF ONLINE x P B ADMRET P* P* PADM8 P* P********** P* , P* CHANGE OR INQUIRY ON CHECK NUM
0x10643c…1065d0 Dummy {f00=0x00a3, f01=0x0190, f02=»8010 P SET SPPROMPT & P MOVE GTDUPF(CBIN5),=D'8' ADM NO. " P MOVE GTDUPF(CBIN2),=D'0' L P MOVE GTDUPF(CBIN1),=D'0' n * P PERF KFREAD,CBIN4,CBIN1,CBIN0,GTKFVAL . P MOVE GTDUPF(CBIN4),GTKFVAL GET OLD NUMBER P ATTFMT ADM08FRM P
0x1065d0…106764 Dummy {f00=0x00a3, f01=0x0190, f02=»NEW NUMBER n * P PERF KFWRIT,CBIN4,CBIN1,CBIN0,GTKFVAL & P MOVE CCHKLBNR,GTKFVAL SET NUMBER @ ( P PERF WRITJT,=W'13' WRITE ON JOURNAL j PADM08RET P PERF PACKCL P B ADMRET P* P* PADM9 P******************** P
0x106764…1068f8 Dummy {f00=0x00a3, f01=0x0190, f02=» PERF FRMXSP,CBIN13 ASK FOR DEFAULT LINE P SET SPPROMPT 0 P PERF SPCLRN F * P IB SPBINW2,ADM09RET,ADM09RET,ADM0910 Z P B ADM0900 PADM0910 P CLEAR SPPROMPT P MOVE GTDFLIN,GSWBCD5 PADM09RET P CMP CBIN0,CBIN0 SET CR
0x1068f8…106a8c Dummy {f00=0x00a3, f01=0x018e, f02=» SET OR CLEAR SUPPLEMENT INFORMATION P* 2 P******************** < P TBT TTSUPFLG,SUPL10 X P SET TTSUPFLG t P MOVE TTSUPMRK,=C'S' P B SUPLOK PSUPL10 P MOVE TTSUPMRK,CBLANKS P CLEAR TTSUPFLG PSUPLOK
0x106a8c…106c20 Dummy {f00=0x00a3, f01=0x0190, f02=» PADM11 P* LOCAL INQUIRIES * P TBT GTLOKSPG,SPGL08 . PADM1100 J P ATTFMT SPGFM00 Z P SET SPPROMPT r P SET GTSPGFLG P MOVE GSWSTR9,=C'SUBTOTAL ' P PERF SPCLRA * P IB SPBINW2,ADM11RET,ADM11RET,ADM1110 P B A
0x106c20…106db4 (0, 333) Dummy {f00=0x00a3, f01=0x0190, f02=»LOWED d 2 P TBT GTSTRFLG,ADM11REM IN 'LOKAL' REMITTERING 0 P IB GSWBIN1,SPGL01,SPGL02,SPGL03,SPGL04, C D , P SPGL05,SPGL06,SPGL07,SPGL08,SPGL09, C x , P SPGL10,SPGL11,SPGL12,SPGL13,SPGL14, C P SPGL15,SPGL16,SPGL17 P B ADM1100 P
0x106db4…106f48 Dummy {f00=0x00a3, f01=0x0190, f02=» C j , P SPGL00,SPGL12,SPGL13,SPGL14,SPGL15, C P SPGL16,SPGL17 : PADM11GTP R 6 P IB GSWBIN1,SPGL00,SPGL00,SPGL00,SPGL04,SPGL00, C b , P SPGL00,SPGL00,SPGL00,SPGL00,SPGL00, C , P SPGL00,SPGL00,SPGL00,SPGL14,SPGL15, C P SPGL16,SPG
0x106f48…1070dc Dummy {f00=0x00a3, f01=0x0190, f02=» P B ADM11RET P* PSPGL03 " P PERF CLEDB 0 P B ADM11RET D P* X PSPGL04 b P MOVE GSWBCD3,CTASKNR p P SET SPPROMPT P ATTFMT SPGFM04 P PERF SPCLRA P B ADM11RET PSPGL05 " P PERF KTPRT UDSKRIV KO
0x1070dc…107270 Dummy {f00=0x00a3, f01=0x0190, f02=»CD7,=D'0' P TBF CSTRKFLG,SPG0730 ! P MOVE GSWBCD5,=D'0' ! 0 P B SPG0720 ! L PSPG0710 ! ^ , P PERF KFREAD,CBIN3,CBIN1,GSWBCD5,GTKFVAL ! n P ADD GSWBCD7,GTKFVAL ! , P PERF KFREAD,CBIN3,CBIN2,GSWBCD5,GTKFVAL ! P ADD GSWBCD7,GTKFVAL ! PSP
0x107270…107404 Dummy {f00=0x00a3, f01=0x0190, f02=»PG0710 ! | P MUL GSWBCD7,=D'-1' VEND " PSPG0730 " . P MUL TTEJEDB,=D'-1' VEND " > P MOVE GSWBCD6,TTCASH " ^ P ADD GSWBCD6,TTEJEDB " z P ADD GSWBCD6,GSWBCD7 " P SET SPPROMPT " P ATTFMT SPGFM17 " P PERF SPCLRA " $ P MUL TTEJEDB,=D'-1'
0x107404…107598 Dummy {f00=0x00a3, f01=0x0190, f02=»UE " d P TEST GTKASSE # * P BZ SPG08MAK ONLY IF 'KASSE FUNCTIONS # P CLEAR GTGLSPG # N PSPG0805 # d SET SPPROMPT # t " ATTFMT SPGFM08 INQUIRY FORMAT # PERF SPCLRA # < 7* GTLBNRIN CONTAINS FIRST (OR ONLY) TRANSACTION # 2 -*
0x107598…10772c Dummy {f00=0x00a3, f01=0x0190, f02=»INS FIELD CONTENT OF WANTED FIELD # x * $ * * % IB SPBINW2,SPG08MAK,SPG08MAK,SPG0810 $ 4 P B SPG0805 $ b * $ t $ SPG0810 SPG-CONDITION ENTERED $ ~ P MOVE SPKEY,CBIN3 $ SET GTLOKSPG $ P TBT GTGLSPG,SPG0815 $ 0 P MOVE GTRECNR,CRECNR P
0x10772c…1078c0 Dummy {f00=0x00a3, f01=0x0190, f02=»N1 NEXT RECORD $ PSPG0822 % P CBNG GTRECNR,CBIN1,SPG08RET % & P TBT GTGLSPG,SPG0825 % J P NEW REGSET % f " P CBNL GTRECNR,CRECNR,SPG08RET % | . P PERF RGREAD,DK02,=D'2',CBIN1 READ RECORD % " P BNOK SPG0820 IF TRANS 11, OR % P NOT SAME MA
0x1078c0…107a54 (0, 334) Dummy {f00=0x00a3, f01=0x0190, f02=» PERF RGREAD,DK05,=D'5',CBIN1 READ RECORD % " P BNOK SPG0820 IF TRANS 11, OR & 2 P NOT SAME MACHINE, OR & X P DISK ERROR & x PSPG0828 & & P CBE GTREGNR,=D'12',SPG0820 TR 12 & * & * SAME MACHINE: & * GTREGNR TRANSTY
0x107a54…107be8 Dummy {f00=0x00a3, f01=0x018e, f02=» EKSP. OF CURRENT RECORD & ~ . )* GTUSED SAT FOR PRESENT FIELDS ' * &* GTDUPF - - - - ' R * &* GTREGF - - - - ' 2 -* DEB/KRE RELEVANT ROUTINE PERFORMED ' * GTDBKRC ' * GTD
0x107be8…107d7c Dummy {f00=0x00a3, f01=0x0190, f02=» ' l . P CMP GTLBNR,GTLBNRIN ACTUAL - WANTED EKSP. ( $ P BL SPG0830 WANTED EKSP. PASSED ( : BE SPG0840 FOUND ( b P* NOT YET FOUND ( | P* JUMP TO FIND RECORD ( P MOVE GSWBIN1,GTLBNR ( " P SUB GTRECNR,GSWBIN1 GTRECNR= ( $ P MOVE GSWBIN
0x107d7c…107f10 Dummy {f00=0x00a3, f01=0x0190, f02=»D'0',SPG08RET NO FIELDS WANTED ( B SPG0850 SEARCH FIELD ) & * ) F SPG0840 ) P , ( CBE GSWBCD6,=D'0',SPGFOUND RECORD FOUND ) ` * ) SPG0850 CHECK FIELD ) * % MOVE GSWBIN1,GSWBCD6 GET FIELD INDEX ) " MOVE GSWBIN2,CFLTDEX(GSWBIN1) )
0x107f10…1080a4 Dummy {f00=0x00a3, f01=0x0190, f02=»BIN2,SPG0860 FIELD PRESENT ) B SPG0820 FIELD NOT PRESENT * " * * F " SPG0860 CHECK FIELD CONTENT * P " MOVE GSWBIN2,CFLTDEX(GSWBIN1) * v * % CBNE GSWBCD7,GTDUPF(GSWBIN2),SPG0820 * * * * * $ SPGFOUND A WANTED RECORD FOUND * *
0x1080a4…108238 Dummy {f00=0x00a3, f01=0x0190, f02=»ENT YEAR * z P CLEAR TTSUPFLG + P MOVE TTSUPMRK,CBLANKS + ( $ P CBE GTUSED(CBIN6),CBIN0,SPG0880 + F , P MOVE TSWBCD2,GTDATO ISOLATE LAST DIGIT + n P MOVE GSWBCD1,GTDUPF(CBIN6) + P SUB GSWBCD1,TSWBCD2 + P BZ SPG0880 + " P SET TTSUPFLG SUPPLEME
0x108238…1083cc Dummy {f00=0x00a3, f01=0x0190, f02=»TREGFLG + * , B ADM11RET , * , . PSPG08RET , 8 P MOVE SPKEY,CBIN1 , H P CLEAR GTLOKSPG , b P CLEAR TTSUPFLG , z P MOVE TTSUPMRK,CBLANKS , SPG08MAK , B ADM11RET , P** , P* , P* , PSPGL09 INQ. OLD REGS
0x1083cc…108560 Dummy {f00=0x00a3, f01=0x0190, f02=» B SPG0805 , PSPG09MAK - P B ADM11RET - " P* - 6 P* - @ P* - J 2 P* PRINT OUT OF SPECIFIED TRANSACTIONS - T P* - PSPGL10 PRINT A INTERVAL - P TEST GTCYFLG - P BNZ SPG10MAK NOT IN CYCLE - P TEST TTLSTFLG - P BNZ
0x108560…1086f4 (0, 335) Dummy {f00=0x00a3, f01=0x0190, f02=» - j PSPG1005 . P SET SPPROMPT . " P ATTFMT SPGFM10 SCREEN FORMAT . . P PERF SPCLRA . T < P* GTLBNRIN HIGHEST EKS.LBNR WANTED (FIRST PRINTED) . h , P* GSWBCD7 LOWEST EKS.LBNR WANTED . * P IB SPBINW2,SPG10MAK,SPG10MAK,SPG1010 . P B
0x1086f4…108888 Dummy {f00=0x00a3, f01=0x0190, f02=» MOVE GTRECNR,CRECNR POINT TO LAST RECORD . P B SPG1020 / 2 PSPG1015 / D P MOVE GTRECNR,CGLRECNR / T PSPG1020 / r & P SUB GTRECNR,CBIN1 PREVIOUS RECORD / PSPG1022 / P CBNG GTRECNR,CBIN1,SPG1090 / P TBT GTGLSPG,SPG1025 / P NEW REGSE
0x108888…108a1c Dummy {f00=0x00a3, f01=0x0190, f02=» SAME MACHINE, OR / P DISK ERROR 0 P B SPG1028 0 0 PSPG1025 0 B P OLD REGSET 0 R " P CBNL GTRECNR,CGLRECNR,SPG1090 0 h . P PERF RGREAD,DK05,=D'5',CBIN1 READ RECORD 0 P BNOK SPG1020 IF TR 11, OR 0 P NOT SAME MACHINE, OR 0 P DIS
0x108a1c…108bb0 Dummy {f00=0x00a3, f01=0x0190, f02=»IN ACTUAL - WANTED EKSP. 0 ~ $ P BL SPG1040 WANTED EKSP. PASSED 1 P BE SPG1040 FOUND 1 H P* NOT YET FOUND 1 b P MOVE GSWBIN1,GTLBNR 1 ~ " P SUB GTRECNR,GSWBIN1 GTRECNR = 1 $ P MOVE GSWBIN1,GTLBNRIN GTRECNR - 1 . P ADD GTRECNR,GSWBIN1 ( GTLBNR -
0x108bb0…108d44 Dummy {f00=0x00a3, f01=0x0190, f02=»M,=C'D' 1 PSPG1060 2 P SET TTSUPFLG 2 P MOVE TTSUPMRK,=C'S' 2 6 & P CBNE GTUSED(CBIN6),CBIN0,SPG1070 2 R P CLEAR TTSUPFLG 2 | P MOVE TTSUPMRK,CBLANKS 2 PSPG1070 2 P TBT TTTSTFLG,SPG1080 2 P SET TTTSTFLG 2 * P PERF SPLIN8,CBIN5
0x108d44…108ed8 Dummy {f00=0x00a3, f01=0x018e, f02=»G1080 2 P MOVE GSWBIN1,TTLINNR 3 . P DSC1 KVOUCH,POS,GSWBIN1 POSITION VOUCHER 3 , P PERF FRMTKV GET FORMAT 3 ^ P EDWRT KVOUCH,GTSTRFMT WRITE 3 ~ P PERF CRVO 3 " P ADD TTLINNR,=D'2' ONE LINE UP 3 P MOVE GSWBIN1,TTLINNR 3 0 P CBNL GSWBIN1,CV
0x108ed8…10906c Dummy {f00=0x00a3, f01=0x0190, f02=» P CLEAR TTSUPFLG 4 P MOVE TTSUPMRK,CBLANKS 4 P MOVE TTCYM,CBLANKS 4 : P WAIT KVOUCH 4 V P DSC0 KVOUCH,RLEAS 4 j PSPG10RET 4 P CLEAR GTLOKSPG 4 PSPG10MAK 4 P B ADM11RET 4 P* 4 P* 4 ( PSPGL11 PRINT INTERVAL, OLD REGSET
0x10906c…109200 Dummy {f00=0x00a3, f01=0x0190, f02=»BF GTKASSE,SPG11MAK ONLY IF 'KASSE' 4 P SET GTGLSPG 5 , P B SPG1005 5 @ PSPG11MAK 5 R P B ADM11RET 5 b P* 5 v P* 5 PSPGL12 5 P** DUMMY ** 5 P B ADM11RET 5 P** 5 PSPGL13 5 P** DUMMY ** 5 P B ADM11RET 5 P* 5
0x109200…109394 (0, 336) Dummy {f00=0x00a4, f01=0x0190, f02=» 5 x P PERF LEVSPG 6 P B ADM11RET 6 P* 6 0 P* 6 : PSPGL16 PRINT LEVERAND. 6 D P PERF LEVPRT 6 d P B ADM11RET 6 x P* 6 P* 6 $ PSPGL17 BILAG LOKAL REMITTERING 6 P PERF CLKF 6 P B ADM11RET 6 P* 6 P* 6 PADM11R
0x109394…109528 Dummy {f00=0x00a4, f01=0x0190, f02=»GE * 6 | P TBT GTTESTFL,ADM12RET 7 ( P TBF GTMASTFL,ADM1250 DISKETTE SKIFT 7 * P SET SPPROMPT 7 V P ATTFMT ADM12FRM 7 l P PERF SPCLRA 7 * P IB SPBINW2,ADM12RET,ADM12RET,ADM1210 7 P B ADM12RET 7 PADM1210 7 P SET CSKIFTFL 7 P PERF SK
0x109528…1096bc Dummy {f00=0x00a4, f01=0x0190, f02=»HANGE DISK 7 x P TBF CWFLAG,FDEXIT 8 . P PERF SPLIN8,CBIN8,CBIN2 'DISKETTE SKIFT' 8 , PFD10 8 ^ P DELAY CBIN20 WAIT A SECOND 8 j P TBT CSKIFTFL,FD10 FINISHED? 8 P YES 8 P MOVE GSWBIN1,CBIN11 8 P PERF FRMXJT,GSWBIN1 8 P EDWRT .NW,KJTAP
0x1096bc…109850 Dummy {f00=0x00a4, f01=0x0190, f02=» 8 PFDEXIT 9 PADM12RET 9 P B ADMRET 9 & P* 9 8 P* 9 B PADM13 9 L 2 P********************************************* 9 Z P* 9 & P* SET CLEAR AUTOSUM FLAG 9 P* 9 4 P************************************************ 9 P*
0x109850…1099e4 Dummy {f00=0x00a4, f01=0x0190, f02=» CLEAR GTASUMFL CLEAR AUTOSUM 9 PADM13OK : & P CMP CBIN0,CBIN0 : 6 P B ADMRET : N P* : ` P* : j PADM14 : t 4 P*********************************************** : P* : " P* SET 'DAGS DATO' : P* : 4 P********************
0x1099e4…109b78 Dummy {f00=0x00a4, f01=0x018e, f02=»=X'FF' : P CBG GTDATO,=D'1',ADM1410 ; P MOVE GTDATO,=X'FF' ; 0 PADM1410 ; L P PERF KLRFMT,CBIN1 ; P PERF SPCLRN ; v * P IB SPBINW2,ADM14000,ADM14000,ADM14RET ; P B ADM14000 ; PADM14RET ; P CLEAR SPME ; P CLEAR GTDYFLG ; P B
0x109b78…109d0c Dummy {f00=0x00a4, f01=0x0190, f02=» ; P PERF LEVDEL DELETE LEVERAND < P B ADMRET < , P* < > P* < H PADM17 < R 0 P******************************************* < ` P* < ( P* SET NEW 'KASSEKONTONR' < P* < 0 P******************************************* < P
0x109d0c…109ea0 Dummy {f00=0x00a4, f01=0x0190, f02=»(CBIN5),=D'17' ADM NO. < $ P MOVE GTDUPF(CBIN4),=D'0' VALUE = " P CLEAR GTDYFLG READ BET-FORM = F $ P CLEAR GTSWFLAG INITIAL NOT CASH = l P ATTFMT ADM17FRM = P PERF SPCLRA = * P IB SPBINW2,ADM17RET,ADM17RET,ADM17100 = P B ADM17000 = P* =
0x109ea0…10a034 (0, 337) Dummy {f00=0x00a4, f01=0x0190, f02=»17500 CASH = z P* READ ACCOUNT NO > , P PERF KFREAD,CBIN2,CBIN0,GSWBIN2,GTKFVAL > 0 P BNOK ADM17000 > ` P MOVE GTDUPF(CBIN1),GTKFVAL > v PADM17200 > P SET GTDYFLG READ ACCOUNT NO > P ATTFMT ADM17FRM > P PERF SPCLRN > * P IB SPBINW2,AD
0x10a034…10a1c8 Dummy {f00=0x00a4, f01=0x018e, f02=»2,GTDUPF(CBIN2) BET-FORM > , P PERF KFWRIT,CBIN2,CBIN0,GSWBIN2,GTKFVAL ? P BNOK ADM17200 ? P & P MOVE GTKFVAL,=D'0' CLEAR MOVEMENT ? f , P PERF KFWRIT,CBIN2,CBIN1,GSWBIN2,GTKFVAL ? P B ADM17900 ? P* ? P* CASH ACCOUNT ? PADM17500 ? . P
0x10a1c8…10a35c Dummy {f00=0x00a4, f01=0x0190, f02=» & P SET GTSWFLAG READ NEW CASH VALUE @ P ATTFMT ADM17FRM @ . P PERF SPCLRN @ F * P IB SPBINW2,ADM17000,ADM17000,ADM17600 @ Z P B ADM17500 @ PADM17600 @ P MOVE TTCASHAC,GTDUPF(CBIN1) @ P MOVE TTSTCASH,GTDUPF(CBIN4) @ P* @ P* @ P
0x10a35c…10a4f0 Dummy {f00=0x00a4, f01=0x0190, f02=»T NEW VERSURKONTONR @ PADM18000 A P TBT GTKASSE,ADM18RET A , P MOVE SPKEY,CBIN2 A J P SET SPPROMPT A d P PERF PACKCL A z & P MOVE GTDUPF(CBIN5),=D'18' ADM NO. A $ P MOVE GTDUPF(CBIN4),=D'0' VALUE A P CLEAR GTDYFLG READ BET-FORM A P ATT
0x10a4f0…10a684 Dummy {f00=0x00a4, f01=0x0190, f02=»GTDUPF(CBIN2) BET-FORM A , P CBL GSWBIN2,CBIN1,ADM18000 TEST 0<BFO<6 B P CBG GSWBIN2,CBIN5,ADM18000 B N , P CBE GSWBIN2,CBIN5,ADM18200 CASH-VERSUR B r , P PERF KFREAD,CBIN3,CBIN0,GSWBIN2,GTKFVAL B P BNOK ADM18000 B P MOVE GTDUPF(CBIN1),GTKFVAL B
0x10a684…10a818 Dummy {f00=0x00a4, f01=0x0190, f02=»COUNT NO B x P ATTFMT ADM18FRM C P PERF SPCLRN C ( * P IB SPBINW2,ADM18000,ADM18000,ADM18500 C < P B ADM18300 C j P* C ~ PADM18500 C ( P MOVE GSWBIN2,GTDUPF(CBIN2) BET-FORM C P CBE GSWBIN2,CBIN5,ADM18600 C P MOVE GTKFVAL,GTDUPF(CBIN1) C
0x10a818…10a9ac Dummy {f00=0x00a4, f01=0x018e, f02=»N1,GSWBIN2,GTKFVAL C z P CLEAR DEBET D , P PERF KFWRIT,CBIN3,CBIN2,GSWBIN2,GTKFVAL D 0 P B ADM18900 D ` P* D t PADM18600 D ~ P MOVE TVERSUR,GTDUPF(CBIN1) D P* D PADM18900 D P PERF WRITJT,=W'13' D P PERF PACKCL D P* D PAD
0x10a9ac…10ab40 Dummy {f00=0x00a4, f01=0x0190, f02=» P* E P******************** E PCALCBEG E * P MOVE SPKEY,CBIN1 E : * P MOVE GSWBCD2,=D'0' TOTAL=0 E T & P MOVE GSWBCD1,=D'0' NUMBER=0 E ( P PERF FRMXTA,CBIN1 '* ' ON TALLY E P PERF WTALLY E P ATTFMT CALFRM02 E P SET
0x10ab40…10acd4 (0, 338) Dummy {f00=0x00a4, f01=0x0190, f02=»B SPBINW2,CALCNEXT,CALCNEXT,CALCADD,CALCNEG E P CBE SPBINW2,CBIN7,CALCSUB F 4 P CBE SPBINW2,CBIN15,CALCTOT F V P B CALCNEXT F z PCALCNEG F P MUL GSWBCD1,=D'-1' F PCALCADD F P ADD GSWBCD2,GSWBCD1 F P MOVE GSWBCD6,GSWBCD1 F P
0x10acd4…10ae68 Dummy {f00=0x00a4, f01=0x0190, f02=»E GSWSTR9,=C'SUBTOTAL ' F P PERF FRMXTA,CBIN3 G & P PERF WTALLY SUBTOTAL ON TALLY G : P B CALCNEXT G d PCALCTOT G x P MOVE GSWBCD6,GSWBCD2 G P MOVE GSWSTR9,=C'TOTAL ' G P PERF FRMXTA,CBIN2 G $ P PERF WTALLY TOTAL ON TALLY G P
0x10ae68…10affc Dummy {f00=0x00a4, f01=0x0190, f02=»* G P* H PADM20 H 8 P**************************************************** H " P* H ^ 0 P* CONTROLDIGIT-VALUE CALCULATION H h P* H 8 P**************************************************** H P* H P SET SPPROMPT H PCALCD0
0x10affc…10b190 Dummy {f00=0x00a4, f01=0x0190, f02=»SWBCD5,=D'10',CALCD06 H 6 P EDWRT .NW,KTALLY,CCDFRM03 CONTROLDIGIT ON TALLY I P CLEAR GTDYFLG I X PCALCD05 I n P ATTFMT CCDFRM02 I ~ * P PERF SPCLRA CONTROLDIGIT ON SCREEN I P CBE SPBINW2,CBIN3,CALCD00 I P B CALCDRET I PCALCD06 I (
0x10b190…10b324 Dummy {f00=0x00a4, f01=0x0190, f02=» P* J PADM21 J P******************** J P* J 8 " P* SET/CLEAR TEST MODE J B " P* (NO WRITE ON DISKS J h . P* T ON JOURNAL, VOUCHER, SCREEN J ( P* NO 'BEHOLDNINGST[LLERE' J P* J P******************
0x10b324…10b4b8 Dummy {f00=0x00a4, f01=0x018e, f02=»ONFW,TTASKNR J P MOVE GTTESTMK,=C'T' K P SET GTTESTFL K 0 P B ADM21RET K F PADM2150 K Z P PERF WRITJT,=W'10' K j P CLEAR GTTESTFL K P MOVE GTTESTMK,CBLANKS K P PERF TCONFR,TTASKNR K PADM21RET K P B ADMRET K P* K P* K
0x10b4b8…10b64c Dummy {f00=0x00a4, f01=0x018e, f02=» ( P TBT GTKASSE,ADM22RET KASSE CLOSED? L P MOVE SPKEY,CBIN2 L 0 P MOVE GSWBCD5,TTSTLBNR L J P MUL GSWBCD5,=D'-1' L h PADM2200 L P SET SPPROMPT L P ATTFMT ADM22FRM L P PERF SPCLRN L * P IB SPBINW2,ADM22RET,ADM22RET,ADM2210 L P B A
0x10b64c…10b7e0 Dummy {f00=0x00a4, f01=0x018e, f02=» L P EJECT M PADM23 M P* MODPOSTERING * M $ P PERF MODP M < P B ADMRET M N P* M ` PADM24 M j P* KONTOKORT * M x P PERF KORT M P B ADMRET M P* M PADM25 M P* RECEIPT * M P PERF KVIT M P B ADMRET M P* M
0x10b7e0…10b974 (0, 339) Dummy {f00=0x00a4, f01=0x0190, f02=» P B ADMRET N P* N PADM28 N P* SUBTOTAL * N . P PERF SUBTOT N B P B ADMRET N V P* N h P EJECT N r PADM29 N P******************** N P* N $ P* TEST PRINT ON VOUCHER N P* N P******************** N P DSC0
0x10b974…10bb08 Dummy {f00=0x00a4, f01=0x0190, f02=»IN1,CVOUTOP N PADM2910 O P CBL GSWBIN1,CBIN6,ADM29RET O $ . P DSC1 KVOUCH,POS,GSWBIN1 POSITION ON LINE O H " P PERF FRMXVO,CBIN16 GET FORMAT O z P EDWRT KVOUCH,GTSTRFMT PRINT O P SUB GSWBIN1,CBIN8 O P B ADM2910 O PADM29RET O P DSC0 KV
0x10bb08…10bc9c Dummy {f00=0x00a4, f01=0x018e, f02=»* O PADM31 P P* CYCLE START * P P PERF CYK,CBIN1 P 0 P B ADMRET P H P* P Z PADM32 P d P* STABEL START * P r P PERF CYK,CBIN2 P P B ADMRET P P* P PADM33 P P* DUMMY * P P B ADMRET P P* P PADM34 P $ P
0x10bc9c…10be30 Dummy {f00=0x00a4, f01=0x0190, f02=» P PERF DIVTR Q P B ADMRET Q P* Q * P Q 4 PADM36 Q < P* DUMMY Q J P B ADMRET Q Z P* Q l PADM37 Q v P* DUMMY Q P B ADMRET Q P* Q PADM38 Q P* DUMMY Q P B ADMRET Q P* Q PADM39 Q P* DUMMY Q P
0x10be30…10bfc4 Dummy {f00=0x00a4, f01=0x0190, f02=»100 Q P* R PADM42 R P* PRINT PRINTLEV R $ P B AD4200 R < P* R N PADM43 R X P* CLEAN PRINTLEV R f P B AD4300 R ~ P EJECT R P* R P* R P* R P* END OF ADM FUNCTIONS R P* R PADMRET R P RET R P PEND
0x10bfc4…10c158 Dummy {f00=0x00a4, f01=0x018e, f02=»S R P* S 6 P************************************************* S P* S N PFMTFKI FRMT S X P FNL S l P FKI 1 S x P FMEL 'B',TSWBCD2 S P FMEND S P* S PKONFRMT FRMT S P FSL S P FCOPY =C'KONVERTERING ' S P FILLR X'07',1 S
0x10c158…10c2ec Dummy {f00=0x00a4, f01=0x018e, f02=» PADML0001 T P FTAB 6 T P FCOPY ='EJ-EDB T[LLER ' T $ P FNL T D P FCOPY ='NR' T P P FILLR ' ',2 T d P FCOPY ='KONTONR' T x P FNL T P FBF GTDYFLG,AFRM20 T $ P FKI 1,MINL=3,MAXL=3,ME,APPL=100 T PAFRM20 T P FMEL 'ZZZ',GSWBCD1 T
0x10c2ec…10c480 Dummy {f00=0x00a4, f01=0x018e, f02=» P FMEND U P* U PADM2FRM1 FRMT U P FSL U 2 P FBT GTSPGFLG,ADML0201 U > P FCOPY ='ADM ' U PADML0201 U t P FTAB 6 U P FCOPY ='BEHOLDNINGST[LLERE' U P FNL U P FCOPY ='NR' U P FILLR ' ',2 U P FCOPY ='KONTONR' U P F
0x10c480…10c614 (0, 340) Dummy {f00=0x00a5, f01=0x0190, f02=» P FMEL 'ZZ',GSWBCD1 V P FTAB 5 V P FBT GTDYFLG,AFRM210 V . P FBT GTSPGFLG,AFRM225 V J P FBT GTTESTFL,AFRM225 V h " P FKI 5,MAXL=10,ME,SCHK=1,REWRT V PAFRM225 V & P FMEL 'ZZZZZZZZE-ZZ',GTDUPF(CBIN1) V P FTAB 18 V P FBT GTSPGFLG,AFRM
0x10c614…10c7a8 Dummy {f00=0x00a5, f01=0x018e, f02=»SALDO V f P FLINK FMTFKI W PAFRM210 W $ P FMEND W 4 P* W B PADM08FRM FRMT W L P FSL W b P FBT GTSPGFLG,ADML0801 W n P FCOPY ='ADM ' W PADML0801 W P FTAB 6 W P FCOPY ='CHECK LBNR' W P FNL W P FBT GTSPGFLG,ADML0802 W
0x10c7a8…10c93c Dummy {f00=0x00a5, f01=0x0190, f02=» PADML0809 X P FMEND X P* X " PADM17FRM FRMT X , P FSL X B P FBT GTSPGFLG,ADML1701 X N P FCOPY ='ADM ' X l PADML1701 X P FTAB 6 X P FCOPY ='PENGE-KONTO' X P FTAB 30 X P FCOPY ='BFO ' X P FBT GTDYFLG,ADML1702 X P F
0x10c93c…10cad0 Dummy {f00=0x00a5, f01=0x0190, f02=»'KONTONR' X P FNL Y P FBT GTSPGFLG,ADML1703 Y $ P FKI 1,MINL=10,MAXL=10,ME,SCHK=1 Y < PADML1703 Y d & P FMEL '99999999E-99',GTDUPF(CBIN1) Y t P FBF GTSWFLAG,ADML1708 Y P FTAB 14 Y P FBT GTSPGFLG,ADML1704 Y P FKI 14,MAXL=13,REWRT,SCHK=4 Y
0x10cad0…10cc64 Dummy {f00=0x00a5, f01=0x0190, f02=» PADML1709 Z P FMEND Z P* Z " P* Z , PADM18FRM FRMT Z 6 P FSL Z L P FCOPY ='ADM ' Z X $ P FCOPY ='VERSUR KONTONR REMIT ' Z p P FTAB 30 Z P FCOPY ='BFO ' Z P FBT GTDYFLG,ADML1802 Z P FKI 34,MINL=1,MAXL=1,ME Z PADML1802 Z
0x10cc64…10cdf8 Dummy {f00=0x00a5, f01=0x0190, f02=»10,ME,SCHK=1 Z | & P FMEL '99999999E-99',GTDUPF(CBIN1) [ PADML1808 [ > P FMEND [ N P* [ PADM12FRM FRMT [ f P FSL [ | P FCOPY ='DISKETTE SKIFT ' [ P FILLR X'07',1 [ P FLINK FMTFKI [ P FMEND [ P* [ PSPGFM00 FRMT [ P FSL [
0x10cdf8…10cf8c Dummy {f00=0x00a5, f01=0x0190, f02=»GFMSPG FRMT [ P P FTEXT X'53505C524745' P : P FMEND B P* P PSPGFM04 FRMT Z P FSL n P FNL z P FMEL '99',GSWBCD3 P FCOPY =' ]BNE KASSER' P FNL P FMEL 'BBZZZ-',CMASK(CBIN1) P FMEL 'BBZZZ-',CMASK(CBI
0x10cf8c…10d120 Dummy {f00=0x00a5, f01=0x0190, f02=»L 'BBZZZ-',CMASK(CBIN6) P FMEL 'BBZZZ-',CMASK(CBIN7) ] P FMEL 'BBZZZ-',CMASK(CBIN8) ] D P FNL ] h P FMEL 'BBZZZ-',CMASK(CBIN9) ] t P FMEL 'BBZZZ-',CMASK(CBIN10) ] P FMEL 'BBZZZ-',CMASK(CBIN11) ] P FMEL 'BBZZZ-',CMASK(CBIN12) ] P FLI
0x10d120…10d2b4 (0, 341) Dummy {f00=0x00a5, f01=0x018e, f02=» FILLR '*',1 ] PSPGL081 ^ FNL ^ $ FCOPY =C' EKS.LBNR' ^ 0 FKI 14,MAXL=5 ^ L FMEL 'XXXXX',GTLBNRIN ^ b FNL ^ FCOPY =C'REGKONTONR' ^ 2 - FKI 14,MINL=10,MAXL=10,SCHK=1,REWRT,APPL=108 ^ FMEL 'XXXXXXXXE-XX',GSWBCD7 ^ FNL
0x10d2b4…10d448 Dummy {f00=0x00a5, f01=0x0190, f02=» FLINK FBELOB _ * % FKI 14,MAXL=12,SCHK=4,REWRT,APPL=110 _ & P FMEL 'TVTTTVTTTVTTX,XX-',GSWBCD7 _ H FNL _ r FCOPY =C' DIVERSE' _ ~ FKI 14,MAXL=2,APPL=111 _ FMEL 'XX',GSWBCD6 _ FKI 18,MAXL=13,SCHK=4,REWRT _ " FMEL 'TTTTTTTTT
0x10d448…10d5dc Dummy {f00=0x00a5, f01=0x0190, f02=» FBF GTGLSPG,SPGL101 _ P FILLR '*',1 ` PSPGL101 ` 0 P FNL ` @ P FCOPY =C'BILAG' ` L P FCOPY =C' EKS.LBNR' ` d P FILLR ' ',1 ` P FTEXT C'FRA' ` P FKI 20,MAXL=5,ME ` P FMEL 'XXXXX',GSWBCD7 ` P FNL ` P FTAB 16 ` P FTEXT C'T
0x10d5dc…10d770 Dummy {f00=0x00a5, f01=0x0190, f02=»FBELOB FRMT ` P a P FTEXT X'42454C5C4B' a FMEND a 8 * a F FMTEND FRMT a P FNL a d P FKI 1,MAXL=1,APPL=121,VERIF a p FMEL 'B',TSWBCD2 a P FMEND a P* a P* a PSPGFM17 FRMT a P FSL a P FTAB 6 a P FCOPY =
0x10d770…10d904 Dummy {f00=0x00a5, f01=0x0190, f02=»,TTCASHAC a | P FTAB 14 b & P FMEL 'ZZZVZZZVZZZVZZ9V99-',TTCASH b " P FNL b L P FCOPY ='EJ EDB' b X P FTAB 14 b p ( P FMEL 'ZZZVZZZVZZZVZZ9V99-',TTEJEDB b P FNL b P FBF CSTRKFLG,SPL1710 b P FCOPY ='LOKAL REMIT' b P FTAB 14 b ( P FME
0x10d904…10da98 Dummy {f00=0x00a5, f01=0x018e, f02=»MTFKI b P FMEND c P* c $ P* CALCULATION-FORMATS c & P* c N P* c X PCALFRM02 FRMT c b P FSL c x P FCOPY =C'REGNEFUNKTION' c P FNL c P FNL c 6 P FKI 1,MINL=1,MAXL=11,SCHK=4,APPL=122,DUPL=GSWBCD1 c & P FMEL 'TVTTTVTTT
0x10da98…10dc2c Dummy {f00=0x00a5, f01=0x018e, f02=» P FNL d P FCOPY =C'TOTAL ' d P FNL d * ( P FMEL 'ZZZVZZZVZZZVZZ9V99-',GSWBCD2 d 6 P FLINK FMTFKI d b P FMEND d x P* d P* d " P* CONTROLDIGIT-FORMATS d P* d P* d PCCDFRM01 FRMT d P FSL d P FCOPY =C'CHE
0x10dc2c…10ddc0 Dummy {f00=0x00a5, f01=0x0190, f02=» * P FKI 1,MINL=1,MAXL=10,REWRT,APPL=105 e " P FMEL 'ZZZZZZZZZE-9',GSWBCD6 e 2 P FMEND e X P* e f PCCDFRM02 FRMT e p P FSL e P FCOPY =C'CHECKCIFFER' e P FCOPY ='BEREGNING' e P FBT GTDYFLG,CCDLAB02 e P FLINK CCDFRM03 e P
0x10ddc0…10df54 (0, 342) Dummy {f00=0x00a5, f01=0x0190, f02=»DLAB03 e P FLINK FMTFKI f P FMEND f $ P* f 2 PCCDFRM03 FRMT f < P FNL f R P FNL f ^ P FMEL 'ZZZZZZZZZE-9',GSWBCD6 f j P FILLR ' ',1 f P FNL f P FCOPY =C'CHECKCIFFER' f P FILLR '=',1 f P FMEL 'B9B',GSWBCD5 f P FNL f
0x10df54…10e0e8 Dummy {f00=0x00a5, f01=0x40ac, f02=»R ' f P FMEL '***99',TTLBNR g P FILLR '-',3 g ( P FKI 15,MAXL=5 g < P FMEL '***99',GSWBCD5 g R P FMEND g p P* g ~ P* g P* g END g @ g P FCOPY =C'CHECKCIFFER' f P FILLR '=',1 f P FMEL 'B9B',GSWBCD5 f P FNL f
0x10e0e8…10e27c Dummy {f00=0x00a5, f01=0x2008, f02=» h NT RGADM DDUM KMD08 PDIV , ENTRY RGADM : RGADM N END @ h
0x10e27c…10e410 Dummy {f00=0x00a5, f01=0x0190, f02=» W L R LLJL R ^ 2 , > " P 0 b 2 t $ 2
0x10e410…10e5a4 Dummy {f00=0x00a5, f01=0x0190, f02=» L R V 2 $ 6 H 2 Z j | 2 2
0x10e5a4…10e738 Dummy {f00=0x00a5, f01=0x018e, f02=»L L RJLL L RJLL L RJLL L 6 r 2 0 @ R d 2 v ! # ) 2 + , . <
0x10e738…10e8cc Dummy {f00=0x00a5, f01=0x0190, f02=» H M 2 O P * R < ^ 2 N ` " ^ a p c k m 2 o p r ~0 J F " D @ L $
0x10e8cc…10ea60 Dummy {f00=0x00a5, f01=0x0190, f02=» & & & , & : & H ZZZVZZZVZZZVZZ9E,99- V " z ( * & & ) & ) ZZZZZZZVZZ9,99-E " G &
0x10ea60…10ebf4 (0, 343) Opaque[0x194]
0x10ebf4…10ed88 # DirEnt {nam=»C999 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x14b8, f03=0x0000}
0x10ebf4…10ed88 IdxSect {
0x10ebf4…10ed88 f00 = 0x00a5 // 0x10ebf4 @0x0
0x10ebf4…10ed88 f01 = 0x0002 // 0x10ebf6 @0x2
0x10ebf4…10ed88 gno = [ // 0x10ebf8 @0x4
0x10ebf4…10ed88 [0x00]: C0x00a5.0x3.0
0x10ebf4…10ed88 ]
0x10ebf4…10ed88 }
0x10ed88…10ef1c Dummy {f00=0x00a5, f01=0x018e, f02=» T; P01; TID=TC; TCL=TC; * LEV=60; : P02; J PTDC=T03; V PLC=01L; f PTDC=T07; v PLC=01L; P01; PSCL=S04; PT; P01; PTID=TD; PTCL=TC; PLEV=60; P02; PTDC=
0x10ef1c…10f0b0 Dummy {f00=0x00a5, f01=0x018e, f02=» 01; PTDC=T04; PLC=02L; $ P03; 4 PSCL=S02; @ PSCL=S03; P PSCL=S04; ` PT; p P01; z PTID=GA; PTCL=GA; PLEV=60; P01; PTDC=T05; PLC=02L; P03; PSCL=S02; PSCL=S03;
0x10f0b0…10f244 Dummy {f00=0x00a5, f01=0x004a, f02=» P01; PSCL=S01; U; 001; * TB2; 6 P002; B @ PSCL=S03; P PSCL=S04; ` PT; p P01; z PTID=GA; PTCL=GA; PLEV=60; P01; PTDC=T05; PLC=02L; P03; PSCL=S02; PSCL=S03;
0x10f244…10f3d8 Dummy {f00=0x00a5, f01=0x2008, f02=» PSCL=S01; U; 001; * TB2; 6 P002; B @ PSCL=S03; P PSCL=S04; ` PT; p P01; z PTID=GA; PTCL=GA; PLEV=60; P01; PTDC=T05; PLC=02L; P03; PSCL=S02; PSCL=S03;
0x10f3d8…10f56c Dummy {f00=0x00a5, f01=0x0190, f02=»**************************************************** P* < ( P* CONDITIONAL ASSEMBLY PARAMETERS F P* r 2 P********************************************** | P 2 POFLIN EQU 1 OFFLINE HANDLING POSSIBLE IF ::= 1 , PDCLIN EQU 1 NUMBER OF MA
0x10f56c…10f700 Dummy {f00=0x00a5, f01=0x0190, f02=»NSMIT BUFFER LENGTH IN WORDS ~ & PTBUFNR EQU 1 SINGLE BUFFERING $ 8 PCOPCMD EQU 1 COPY COMMAND (ONLY TO PRINTER) IF := 1 N & PEBCDIC EQU 1 ASCII = 0,EBCDIC = 1 P* P* EQUATES P* P* . PTIMDC EQU 600 DC TIME OUT VALUE: 60
0x10f700…10f894 (0, 344) Opaque[0x194]
0x10f894…10fa28 # DirEnt {nam=»KM221 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x14c0, f03=0x0000}
0x10f894…10fa28 IdxSect {
0x10f894…10fa28 f00 = 0x00a6 // 0x10f894 @0x0
0x10f894…10fa28 f01 = 0x0004 // 0x10f896 @0x2
0x10f894…10fa28 gno = [ // 0x10f898 @0x4
0x10f894…10fa28 [0x00]: C0x00a6.0x0.0
0x10f894…10fa28 [0x01]: C0x00a6.0x1.0
0x10f894…10fa28 ]
0x10f894…10fa28 }
0x10fa28…10fbbc Dummy {f00=0x00a6, f01=0x0190, f02=» PPRT KM221 PPRT C221 & PMES HUNDESTED KOMMUNE, REMITTERING & PMES INCLUDES BUDGET P PSCR l PLED KMD08,/S x P!!CH $$26$$22$$ P!!CH $$-4$$4$$ TRANS 40 $ P!!RE 41,$$56$$100$$ SCREEN SIZE P!!DL 61,62 FD03,FD04 P
0x10fbbc…10fd50 Dummy {f00=0x00a6, f01=0x0190, f02=»4E4F' DV ADR, GTP/LP t P!!DL 186 " PMF1CU STRG X'E2C2' CU ADDRESS , P!!DL 188 R PCNFHC STRGI (16),'GA',' ' b P!!DL 193,194 " POFF STRGI (12)2C'TD',' ',' ' $ P!!RE 198,$$FALSE$$TRUE$$ CBKOFLG $ P!!RE 199,$$FALSE$$TRUE$$ CKTFLAG
0x10fd50…10fee4 Dummy {f00=0x00a6, f01=0x0190, f02=» b $ P!!RE 203,$$FALSE$$FALSE$$ CFLT46 $ P!!RE 204,$$FALSE$$FALSE$$ CFLT48 0 $ P!!RE 205,$$TRUE$$TRUE$$ CKTAUTO X P!!RE 206,$$FALSE$$TRUE$$ DC & P!!RE 207,$$FALSE$$FALSE$$ CCYWRTF & P!!RE 208,$$FALSE$$FALSE$$ CADM22F & P!!RE 209,$$FALSE
0x10fee4…110078 Dummy {f00=0x00a6, f01=0x0190, f02=»EGFL r & P!!RE 213,$$FALSE$$FALSE$$ CCONVERT & P!!RE 237,$$FALSE$$TRUE$$ CREMITFL 6 & P!!RE 246,$$FALSE$$TRUE$$ CTEXTFLG ` & P!!RE 247,$$FALSE$$TRUE$$ CSTRKFLG & P!!RE 248,$$FALSE$$TRUE$$ CBUDTFLG P!!DL 287 $ PCFLAG BINI (12),X'0051',X'
0x110078…11020c Dummy {f00=0x00a6, f01=0x0190, f02=»MOD$$ r & P!!RE 422,$$FALSE$$FALSE$$ C167FLG 8 P!!RE 432,$$FALSE$$FALSE$$GENERATE LEVNR 5X XXXXXX CC 8 . P!!RE 433,$$FALSE$$FALSE$$ C539FLG-TINGLEV t * P!!RE 434,$$TRUE$$FALSE$$ NO VSL CHECK $ P!!RE 440,$$1400$$1400$$DISK SIZE P!!RE 441,$$2
0x11020c…1103a0 Dummy {f00=0x00a6, f01=0x0190, f02=»,$$20$$20$$ INDEX FILE P!!RE 451,$$5$$5$$ CKTTOP P!!DL 452,453 > & PON STRGI (12)2C' ','KA',' ',' ' R P!!DL 783 | P!!DL 844,855 LP P!!EN PNOD C PTRA /S,NL PINC DIV539 PNOD R PLED SCREEN,/S P!!
0x1103a0…110534 (0, 345) Dummy {f00=0x00a6, f01=0x0190, f02=» PINC RGMAIN PINC RGSUBS PINC RGSUB1 ( PINC RGSUB2 : PINC RGSUB3 L PNOD R ^ PINC RGKLAR l PINC KTPLN ~ PINC KTOPR PNOD R PINC RGADM PINC REMSUB PNOD R PINC ADM5 PINC SUBAPL PINC
0x110534…1106c8 Dummy {f00=0x00a6, f01=0x0190, f02=»R PINC REMLEV PINC ADM6 PNOD R , PINC REMTR : PINC REMBDT L PNOD R ^ PINC BUDGET l PTLK U,4K ~ PASM PRTX,NL PLED VDUPRX P!!DL 70 $ PRBUFNR EQU 1 SINGLE BUFFERING P!!DL 72 & PTBUFNR EQU 1
0x1106c8…11085c Dummy {f00=0x00a6, f01=0x005c, f02=»,RGLOAD PSCR 2 PMES $PDISC M=M:221,MU=M:POOL92,A=RGLOAD,C=C221 P$ASG2 R PNOD R ^ PINC BUDGET l PTLK U,4K ~ PASM PRTX,NL PLED VDUPRX P!!DL 70 $ PRBUFNR EQU 1 SINGLE BUFFERING P!!DL 72 & PTBUFNR EQU 1
0x11085c…1109f0 Dummy {f00=0x00a6, f01=0x2008, f02=» PSCR 2 PMES $PDISC M=M:221,MU=M:POOL92,A=RGLOAD,C=C221 P$ASG2 R PNOD R ^ PINC BUDGET l PTLK U,4K ~ PASM PRTX,NL PLED VDUPRX P!!DL 70 $ PRBUFNR EQU 1 SINGLE BUFFERING P!!DL 72 & PTBUFNR EQU 1
0x1109f0…110b84 Dummy {f00=0x00a6, f01=0x018e, f02=» NUMBER OF KB/VDUS PNBRGTP BIN NUMBER OF GTPS P* > 0 PMF1KBV STRG 32X'C1C2C3C4C5C6C750' DEV. ADR. H 4 PMF1GTP STRG 32X'C8C94A4B4C4D4E4F' DV ADR, GTP/LP | H P* THE LENGTH OR PLACE OF THE CONFIG DATA ABOVE SHOULD NOT BE CHANGED P* "
0x110b84…110d18 Dummy {f00=0x00a6, f01=0x0190, f02=» P* " POFF STRGI (12)2C'TD',' ',' ' P EJECT 4 PCB1 BLK B P* R . PCBKOFLG BOOL TRUE T=ALL BKO-CODES ALLOWED 0 PCKTFLAG BOOL TRUE F=NO SALDO AT ALL IN KORT . PCCLKTFLG BOOL TRUE T=KONTOKORT I KASSELUK 0 PCTESTFLG BOOL FALSE
0x110d18…110eac Dummy {f00=0x00a6, f01=0x0190, f02=» PNOD C PTRA /S,NL PINC DIV461 ( PNOD R : PLED SCREEN,/S H P!!CH $$KEY461$$KEYCOP$$ ^ P!!CH $$SL461$$SLCOP$$ ~ P!!EN PTRA /S,NL PINC RGSUB4 PINC RGSTRT PNOD R PINC RGMAIN PINC RGSUBS
0x110eac…111040 Dummy {f00=0x00a6, f01=0x018e, f02=» PINC RGADM PINC REMSUB PNOD R , PINC ADM5 : PINC SUBAPL J PINC REMPRT PNOD R n PLED KMDIO,/S | P!!DL 149,186 WRFD090-WRFD095 PWRFD090 PWRFD091 PWRFD092 PWRFD093 PWRFD094 PWRFD
0x111040…1111d4 (0, 346) Opaque[0x194]
0x1111d4…111368 # DirEnt {nam=»KMDFIL«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x14d0, f03=0x0000}
0x1111d4…111368 IdxSect {
0x1111d4…111368 f00 = 0x00a6 // 0x1111d4 @0x0
0x1111d4…111368 f01 = 0x0004 // 0x1111d6 @0x2
0x1111d4…111368 gno = [ // 0x1111d8 @0x4
0x1111d4…111368 [0x00]: C0x00a6.0x2.0
0x1111d4…111368 [0x01]: C0x00a6.0x3.0
0x1111d4…111368 ]
0x1111d4…111368 }
0x111368…1114fc Dummy {f00=0x00a6, f01=0x0190, f02=» PPRT KM080T PPRT C080T PMES TEST NJ-AMT, REMITTERING ( PMES BUDGET L PSCR ^ PLED KMD08 j P!!CH $$EJECT$$ $$ | P!!CH $$'26'$$'22'$$ P!!CH $$(26)$$(22)$$ P!!CH $$-4$$4$$ P!!RE 41,$$56$$100$$ P!!RE 58,
0x1114fc…111690 Dummy {f00=0x00a6, f01=0x0190, f02=»,$$FALSE$$TRUE$$ CKTFLAG & P!!RE 242,$$FALSE$$FALSE$$ CCLKTFLG & P!!RE 243,$$FALSE$$FALSE$$ CTESTFLG J & P!!RE 244,$$FALSE$$FALSE$$ CTRVALG t $ P!!RE 245,$$FALSE$$FALSE$$ CFLT46 $ P!!RE 246,$$FALSE$$FALSE$$ CFLT48 $ P!!RE 247,$$TRUE$$FALSE$$ C
0x111690…111824 Dummy {f00=0x00a6, f01=0x0190, f02=» & P!!RE 251,$$FALSE$$FALSE$$ C5MDISK $ P!!RE 252,$$TRUE$$FALSE$$ CKASFLG . $ P!!RE 253,$$TRUE$$TRUE$$ CSLDFLG V & P!!RE 254,$$FALSE$$FALSE$$CGLREGFL ~ & P!!RE 255,$$FALSE$$FALSE$$ CCONVERT & P!!RE 279,$$FALSE$$TRUE$$ CREMITFL P!!RE 287,$$F
0x111824…1119b8 Dummy {f00=0x00a6, f01=0x0190, f02=»LG r P!!DL 331 6 PCFLAG BINI (12,2),X'00F1',X'0000',X'00E8',X'0000' $ P!!RE 361,$$FALSE$$TRUE$$ BUDGET T $ P!!RE 362,$$FALSE$$TRUE$$ FAKT10 | " P!!RE 363,$$FALSE$$TRUE$$ 90-94 , P!!RE 366,$$FALSE$$TRUE$$ HJORRING CHECKS , P!!RE 416,$$010
0x1119b8…111b4c Dummy {f00=0x00a6, f01=0x018e, f02=»T$$ x P!!RE 495,$$5$$1$$ CKTTOP P!!DL 496,497 , PFROMTX STRGI (12)2C' ' @ P!!DL 817,1091 RK ` P!!DL 1095,1105 x P!!DL 1107 RK P!!DL 1109,1112 P!!DL 1115 P!!DL 1120 P!!DL 1132,1152 P!!DL 1153,1172 RK
0x111b4c…111ce0 Dummy {f00=0x00a6, f01=0x0190, f02=» PINC DIV539 PNOD R PINC SCREEN $ PINC RGSUB4 6 PINC RGSTRT H PNOD R Z PINC RGMAIN h PINC RGSUBS z PINC RGSUB1 PINC RGSUB2 PINC RGSUB3 PNOD R PINC RGKLAR PINC KTPLN PINC KTOPR PNO
0x111ce0…111e74 (0, 347) Dummy {f00=0x00a6, f01=0x0190, f02=»O PINC DKSUBS PINC RAADUM PNOD R . PINC RGFRMT < PINC REMFMT N PNOD R ` PINC REMLEV n PINC ADM6D PNOD R PINC REMTR PLED REMBDT " P!!DL 120,172 BCHK00 -> BCHK90 P!!EN PTRA /S,NL P
0x111e74…112008 Dummy {f00=0x00a6, f01=0x003a, f02=»DISC M=M:92NA,MU=M:92NA,A=RGL080,C=C080T P$ASG2 0 PINC RGFRMT < PINC REMFMT N PNOD R ` PINC REMLEV n PINC ADM6D PNOD R PINC REMTR PLED REMBDT " P!!DL 120,172 BCHK00 -> BCHK90 P!!EN PTRA /S,NL P
0x112008…11219c Dummy {f00=0x00a6, f01=0x2008, f02=» :92NA,MU=M:92NA,A=RGL080,C=C080T P$ASG2 0 PINC RGFRMT < PINC REMFMT N PNOD R ` PINC REMLEV n PINC ADM6D PNOD R PINC REMTR PLED REMBDT " P!!DL 120,172 BCHK00 -> BCHK90 P!!EN PTRA /S,NL P
0x11219c…112330 Dummy {f00=0x00a6, f01=0x018e, f02=»& g START $ g " h TEST 2 $ h H ( X i d j SLUT t $ j k TEST $ k ( l & m DISKETTE SKIFT
0x112330…1124c4 Dummy {f00=0x00a6, f01=0x0190, f02=» " p q B*.***.***.**9.99- " q 6 & F r ADM T $ r h s BZZR x " s ( t & s u 99BR " u & v 99
0x1124c4…112658 Dummy {f00=0x00a6, f01=0x0190, f02=» ( z & & DIVERSE FORMATER * ( H * { T " | d " r " " " " | " " " " " " |
0x112658…1127ec Dummy {f00=0x00a6, f01=0x018e, f02=»& I & ~ B**B " ~ 0 ZZ.ZZ.ZZBM @ " Z & j B**B x " $ ' $ ( $ ( $
0x1127ec…112980 Dummy {f00=0x00a6, f01=0x0190, f02=» $ ( ( 4 $ D BBB**B T " j & z ZZZZZZZZZZB* " & & BBZZ.ZZ.ZZBBBR " &
0x112980…112b14 (0, 348) Opaque[0x194]
0x112b14…112ca8 # DirEnt {nam=»KY6272«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x14e0, f03=0x0000}
0x112b14…112ca8 IdxSect {
0x112b14…112ca8 f00 = 0x00a7 // 0x112b14 @0x0
0x112b14…112ca8 f01 = 0x0002 // 0x112b16 @0x2
0x112b14…112ca8 gno = [ // 0x112b18 @0x4
0x112b14…112ca8 [0x00]: C0x00a7.0x0.0
0x112b14…112ca8 ]
0x112b14…112ca8 }
0x112ca8…112e3c Dummy {f00=0x00a7, f01=0x0190, f02=» PNOKEY EQU X'FF' PBSPKY1 EQU X'A7' PCANKY1 EQU X'B2' 4 PMACKY1 EQU X'8B' L PEORKY1 EQU X'AB' d PFTABKY1 EQU X'FF' | PBTABKY1 EQU X'AA' PDUPKY1 EQU X'B3' PSLUTKY1 EQU X'A5' PREGKY1 EQU X'A1' PCOPKY1 EQU X'B
0x112e3c…112fd0 Dummy {f00=0x00a7, f01=0x0190, f02=»Y1 EQU X'FF' PCY2KY1 EQU X'FF' PCYCKY1 EQU X'A3' , PINVKY1 EQU X'9E' D PKONKY1 EQU X'BF' PKVITKY1 EQU X'B5' t PSUPLKY1 EQU X'9D' PSUMKY1 EQU X'9F' PADMKY1 EQU X'A0' PDIVKY1 EQU X'9C' PHBOGKY1 EQU X'99'
0x112fd0…113164 Dummy {f00=0x00a7, f01=0x0190, f02=»BKY1 EQU X'AA' PINSKY1 EQU X'B0' PDELKY1 EQU X'B1' . PCL1KY1 EQU X'80' F PCL2KY1 EQU X'9A' ^ PCL3KY1 EQU X'95' v POUTKY1 EQU X'A0' P* PBSPKY2 EQU BSPKY1 PCANKY2 EQU CANKY1 PEORKY2 EQU EORKY1 PMACKY2 EQU
0x113164…1132f8 Dummy {f00=0x00a7, f01=0x40d4, f02=»SLUTKY1 PKREKY2 EQU KREKY1 PREGKY2 EQU REGKY1 * PADMKY2 EQU ADMKY1 D PSPGKY2 EQU SPGKY1 ^ PKONKY2 EQU KONKY1 x PKVITKY2 EQU KVITKY1 PONKY2 EQU ONKY1 P* @ CANKY1 PEORKY2 EQU EORKY1 PMACKY2 EQU
0x1132f8…11348c Dummy {f00=0x00a7, f01=0x2008, f02=» * ERRFMT FRMT FSL , " FMEL 'ZZ9B',GTWBCD1 FILE NR. 8 FCOPY ERRTXT ^ " FMEL 'BZZ9',GTWBCD2 ERRORNR. t FCOPY =X'07' FMEND @ 8SPKTAB2 KTAB BSPKY1,CANKY1,NOKEY,MACKY1,NOKEY,EORKY1, C D ? FT
0x11348c…113620 Dummy {f00=0x00a7, f01=0x0190, f02=»AG 2 P IB GSWBIN2,T1013,T1013,T1025,T1014,T1013, C P T1013,T1013,T1013,T1018 @ PT1013 b P B T1010 p PT1014 KRE KEY P MOVE CCONBUF0,=X'00' P MOVE GSWBIN2,CBIN0 PT10140 P ADD GSWBIN2,CBIN1 $ P IF FINISH:
0x113620…1137b4 (0, 349) Opaque[0x194]
0x1137b4…113948 # DirEnt {nam=»SL6272«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x14e8, f03=0x0000}
0x1137b4…113948 IdxSect {
0x1137b4…113948 f00 = 0x00a7 // 0x1137b4 @0x0
0x1137b4…113948 f01 = 0x0004 // 0x1137b6 @0x2
0x1137b4…113948 gno = [ // 0x1137b8 @0x4
0x1137b4…113948 [0x00]: C0x00a7.0x1.0
0x1137b4…113948 [0x01]: C0x00a7.0x2.0
0x1137b4…113948 ]
0x1137b4…113948 }
0x113948…113adc Dummy {f00=0x00a7, f01=0x0190, f02=» < PSPKTAB1 KTAB BSPKY1,CANKY1,NOKEY,EORKY1,NOKEY,MACKY1, C > P FTABKY1,BTABKY1,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C D & P COPKY1,DUPKY1,EDTKY1,SLUTKY1, C . P KREKY1,REGKY2,LISTKY1,SBTKY1,SPGKY1, C < P CY1KY1,CY2KY1,INVKY1,KONKY1,KVITKY1,
0x113adc…113c70 Dummy {f00=0x00a7, f01=0x0190, f02=»CANKY1,NOKEY,EORKY1,NOKEY,MACKY1, C | > P FTABKY1,BTABKY1,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C , & P COPKY1,NOKEY,EDTKY1,SLUTKY1, C n ( P KREKY1,NOKEY,NOKEY,NOKEY,NOKEY, C 4 P NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C 6 P ADMKY1,CYC
0x113c70…113e04 Dummy {f00=0x00a7, f01=0x0190, f02=»KY1,CL3KY1,OUTKY1 P* > PSPKTAB12 KTAB BSPKY2,CANKY2,NOKEY,EORKY2,NOKEY,MACKY2, C $ 2 P FTABKY2,BTABKY2,NOKEY,NOKEY,NOKEY,NOKEY, C f 2 P NOKEY,NOKEY,NOKEY,DUPKY2,EDTKY2,SLUTKY2, C 6 P KREKY2,REGKY2,ADMKY2,SPGKY2,KONKY2,KVITKY2,ONKY2
0x113e04…113f98 Dummy {f00=0x00a7, f01=0x0190, f02=»NOKEY,NOKEY,NOKEY,NOKEY,EDTKY2,SLUTKY2, C 6 P KREKY2,NOKEY,ADMKY2,SPGKY2,KONKY2,KVITKY2,ONKY2 2 P* l * P* INQUIRY KEYTABLES (SPKEY=3) v P* < PSPKTAB13 KTAB BSPKY1,NOKEY,CANKY1,NOKEY,NOKEY,MACKY1, C . P NOKEY,NOKEY,NOKEY,NOKEY,
0x113f98…11412c Dummy {f00=0x00a7, f01=0x0190, f02=»VKY1,KONKY1,KVITKY1 P* < PSPKTAB23 KTAB BSPKY1,NOKEY,CANKY1,NOKEY,NOKEY,MACKY1, C & . P NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C f . P NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C . P NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C . P NOKEY,NOKE
0x11412c…1142c0 Dummy {f00=0x00a7, f01=0x0190, f02=»KTAB14 KTAB NOKEY PSPKTAB24 KTAB NOKEY P* 6 : PSPFTBERR FTABLE ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C @ , P ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C ~ , P ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C , P ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C
0x1142c0…114454 (0, 350) Dummy {f00=0x00a7, f01=0x0190, f02=»FMT1,MSFMT2,MSFMT3,MSFMT4,MSFMT5,MSFMT6, C ~ & P MSFMT7,MSFMT8,MSFMT9,MSFMT10, C 4 P MSFMT11,MSFMT12,MSFMT13 ^ P* P* PERRFMT FRMT P FSL P FCOPY ='FEJL ' P FMEL 'ZZ9',GSWBCD4 ERRORNR. P FMEND P* P
0x114454…1145e8 Dummy {f00=0x00a7, f01=0x0190, f02=»T1 FRMT P FSL P FCOPY ='SKIFT JOURNAL' P FMEND < P* J PMSFMT2 FRMT T P FSL h P FCOPY ='LINIE NR' t P FILLR '.',1 P FMEND P* PMSFMT3 FRMT P FSL P FTEXT ='NY SIDE. ' P FMEND P
0x1145e8…11477c Dummy {f00=0x00a7, f01=0x0190, f02=»ZZVZZ9,99+',GTSUM PFMT4END P FMEND * P* 8 PMSFMT5 FRMT B P FSL V P FCOPY ='BILAG' b P FMEND z P* PMSFMT6 FRMT P FSL P FCOPY ='KONTOKORT' P FMEND P* PMSFMT7 FRMT P FSL P F
0x11477c…114910 Dummy {f00=0x00a7, f01=0x0190, f02=»ND P* PMSFMT9 FRMT P FSL ( P FCOPY ='OPSTART ' 4 P FMEND N PMSFMT10 FRMT P FSL p " P FMEL 'TTTTTTTTTTTT9-',GTWBCD2 | P FMEND P* PMSFMT11 FRMT P FSL P FCOPY ='OPRET LEV. ' P FMEND P*
0x114910…114aa4 Dummy {f00=0x00a7, f01=0x4012, f02=» P* @ PMSFMT9 FRMT P FSL ( P FCOPY ='OPSTART ' 4 P FMEND N PMSFMT10 FRMT P FSL p " P FMEL 'TTTTTTTTTTTT9-',GTWBCD2 | P FMEND P* PMSFMT11 FRMT P FSL P FCOPY ='OPRET LEV. ' P FMEND P*
0x114aa4…114c38 Dummy {f00=0x00a7, f01=0x2008, f02=» * ERRFMT FRMT FSL , " FMEL 'ZZ9B',GTWBCD1 FILE NR. 8 FCOPY ERRTXT ^ " FMEL 'BZZ9',GTWBCD2 ERRORNR. t FCOPY =X'07' FMEND @ 8SPKTAB2 KTAB BSPKY1,CANKY1,NOKEY,MACKY1,NOKEY,EORKY1, C D ? FT
0x114c38…114dcc Dummy {f00=0x00a7, f01=0x0190, f02=»
[…0x1…]
0x114f60…1150f4 (0, 351) Opaque[0x194]
0x1150f4…115288 # DirEnt {nam=»DIV539«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x14f8, f03=0x0000}
0x1150f4…115288 IdxSect {
0x1150f4…115288 f00 = 0x00a7 // 0x1150f4 @0x0
0x1150f4…115288 f01 = 0x0018 // 0x1150f6 @0x2
0x1150f4…115288 gno = [ // 0x1150f8 @0x4
0x1150f4…115288 [0x00]: C0x00a7.0x3.0
0x1150f4…115288 [0x01]: C0x00a8.0x0.0
0x1150f4…115288 [0x02]: C0x00a8.0x1.0
0x1150f4…115288 [0x03]: C0x00a8.0x2.0
0x1150f4…115288 [0x04]: C0x00a8.0x3.0
0x1150f4…115288 [0x05]: C0x00a9.0x0.0
0x1150f4…115288 [0x06]: C0x00a9.0x1.0
0x1150f4…115288 [0x07]: C0x00a9.0x2.0
0x1150f4…115288 [0x08]: C0x00a9.0x3.0
0x1150f4…115288 [0x09]: C0x00aa.0x0.0
0x1150f4…115288 [0x0a]: C0x00aa.0x1.0
0x1150f4…115288 [0x0b]: C0x00aa.0x2.0
0x1150f4…115288 ]
0x1150f4…115288 }
0x115288…11541c Dummy {f00=0x00a7, f01=0x0190, f02=» P IDENT DIV539 03.01.XXX.1 P DDUM KMD08 & P PDIV D P ENTRY FRMTJT Z P ENTRY FRMXJT p P ENTRY FRMTTA P ENTRY FRMXTA P ENTRY FRMTVO P ENTRY FRMTKV P ENTRY FRMXVO P ENTRY FRMTKT
0x11541c…1155b0 Dummy {f00=0x00a7, f01=0x0190, f02=» INCLUDE EQUATE P P " P * PFRMTJT PROC 2 0 P CALL FMOVE,GTSTRFMT,FTBJT(GTREGDEX) H P RET | P PEND P* PFRMXJT PROC XJTDEX ( P CALL FMOVE,GTSTRFMT,FTBXJT(XJTDEX) P RET P PEND
0x1155b0…115744 Dummy {f00=0x00a7, f01=0x0190, f02=»ROC XTADEX ( P CALL FMOVE,GTSTRFMT,FTBXTA(XTADEX) P RET > P PEND J P* X PFRMTVO PROC b 0 P CALL FMOVE,GTSTRFMT,FTBVO(GTREGDEX) v P RET P PEND P* PFRMXVO PROC XVODEX ( P CALL FMOVE,GTST
0x115744…1158d8 Dummy {f00=0x00a7, f01=0x0190, f02=» P PEND P* PFRMTKT PROC 0 P CALL FMOVE,GTSTRFMT,FTBKT(GTREGDEX) 2 P RET f P PEND z P* PFRMXKT PROC XKTDEX P CALL FMOVE,GTSTRFMT,XKTTRPL P RET P PEND P* PFRMTGP PRO
0x1158d8…115a6c Dummy {f00=0x00a7, f01=0x0190, f02=»GTSTRFMT,FMTFMT P RET P PEND $ P* 2 PFRMBUD PROC BUDDEX < ( P CALL FMOVE,GTSTRFMT,FTBBUD(BUDDEX) V P RET P PEND P* PFRMBUP PROC P CALL FMOVE,GTSTRFMT,FRMBPR P RET P PEND P EJECT
0x115a6c…115c00 Dummy {f00=0x00a7, f01=0x0190, f02=»T01,JTFMT02,JTFMT08,JTFMT08,JTFMT02, C . P JTFMT12,JTFMT18,JTFMT18,JTFMT18,JTFMT18 0 P* b P* l PJTFMT01 FRMT v 4 P FLINK JTSUBST STARTINF 2 P FLINK JTSUB01 LINE 1 P FEOR
0x115c00…115d94 (0, 352) Dummy {f00=0x00a8, f01=0x0190, f02=» FMEND P* PJTFMT02L FRMT 2 P FLINK JTSUBST SORTINF . 6 P FLINK JTSUB05 REG KONTONO d P FILLR ' ',11 P FLINK JTSUB08 VALUE P FEOR P FILLR ' ',8 F
0x115d94…115f28 Dummy {f00=0x00a8, f01=0x0190, f02=»NK JTSUB30 ARKIV KNT.NR P FILLR ' ',15 P FMEND > P* T PJTFMT03 FRMT ^ P FLINK JTFMT03L r P FMEND P* PJTFMT03L FRMT 4 P FLINK JTSUBST START INF P FILLR ' ',9
0x115f28…1160bc Dummy {f00=0x00a8, f01=0x0190, f02=» VALUE j P FEOR P FILLR ' ',6 $ F P FMEL '99',GTDUPF(CBIN3) BETALINGSKODE BKO 8 P FILLR ' ',5 H P FMEL 'ZZ.ZZ.ZZ',GTDUPF(CBIN7) VALGR F P FMEL 'BBZ',GTDUPF(CB
0x1160bc…116250 Dummy {f00=0x00a8, f01=0x018e, f02=» FMEL 'XX',GTDUPF(CBIN11) PALIGNINGSAR P FILLR ' ',5 8 4 P FMEL 'ZZZ',GTDUPF(CBIN15) DEB LB NR T P FILLR ' ',4 P FMEND P* PJTFMT04 FRMT P FLINK JTFMT04L P FMEND P*
0x116250…1163e4 Dummy {f00=0x00a8, f01=0x0190, f02=» ` 0 P FLINK JTSUB08 VALUE P FEOR < P FILLR ' ',6 R P FMEL '99',GTDUPF(CBIN3) BKO f P FILLR ' ',5 D P FMEL 'ZZ.ZZ.ZZ',GTDUPF(CBIN7) VALOR P FILLR ' ',3 6 P
0x1163e4…116578 Dummy {f00=0x00a8, f01=0x0190, f02=» 'BBZZ',GTDUPF(CBIN11) RES $R D P FMEL 'BZZ',GTDUPF(CBIN12) RESM$ < B P FMEL 'BBZB',GTDUPF(CBIN13) OPK P FMEND P* PJTFMT08 FRMT P FLINK JTF
0x116578…11670c Dummy {f00=0x00a8, f01=0x0190, f02=»01 LINE 1 | P FEOR " 2 P FLINK JTSUB04 LINE 2 8 P FEOR n 2 P FLINK JTSUB31 LINE 3 P FMEND P* PJTFMT12 FRMT P FLINK JTFMT12L P F
0x11670c…1168a0 Dummy {f00=0x00a8, f01=0x0190, f02=» REG KONTO NR l D P FMEL 'B999',TTCNTNR T#LLER NR P FILLR ' ',7 ` 0 P FLINK JTSUB08 VALUE t P FEOR P FILLR ' ',2 2 P FMEL 'BZZZZZZZZZZ',GTDUPF(CBIN2) DIVERSE TEXT P FILLR '
0x1168a0…116a34 (0, 353) Dummy {f00=0x00a8, f01=0x0190, f02=» FLINK JTSUB18 3 LINIE P FMEND P* , 4 PJTSUBST FRMT START INF 6 P FILLR ' ',2 n P FCOPY GTTESTMK : P FCOPY TTCYM CYCLE MARKERING 8 P FMEL '99B',GTREGNR
0x116a34…116bc8 Dummy {f00=0x00a8, f01=0x0190, f02=»LINK JTSUB05 CPR/CIR P FLINK JTSUB06 REG-KONTO-NR 0 P FLINK JTSUB08 VALUE @ P FMEND t P* PJTSUB04 FRMT P FILLR ' ',6 P FMEL 'ZZ',GTDUPF(CBIN3) BKO * P FMEL 'BZZ.ZZ.ZZ',GTDUPF(CBIN7) V.DATO
0x116bc8…116d5c Dummy {f00=0x00a8, f01=0x0190, f02=» BFO V P FLINK JTSUB30 0 P FMEL 'XXXXXXE-XXXX',GTDUPF(CBIN10) YD.MODT , ( P FMEL 'BXX',GTDUPF(CBIN11) BET. ART ` P FMEND P* 6 PJTSUB05 FRMT REG KNT NR 6 P FMEL 'B999E-999E-99E-99B
0x116d5c…116ef0 Dummy {f00=0x00a8, f01=0x0190, f02=»6 v ( P FMEL 'XE-XXE-XXE-XXB',GTDUPF(CBIN2) P FB JTLAB08 6 PJTLAB06 J P FBT BLEV,JTLAB07 Z & P FMEL 'XXXXXXE-XXXX',GTDUPF(CBIN2) t P FB JTLAB08 PJTLAB07 ( P FMEL 'XXX.XXXXX.XXB',GTDUPF(CBIN2) PJTLAB08 P F
0x116ef0…117084 Dummy {f00=0x00a8, f01=0x0190, f02=»BIN4) d P FCOPY TTDBKRM P FMEND , P* B PJTSUB10 FRMT LEVERANDOER NR L & P FMEL 'XXXXXXXXE-XX',GTDUPF(CBIN2) p P FMEND P* PJTSUB18 FRMT P FILLR ' ',2 " P FMEL 'XXX',GTDUPF(CBIN15) TXT * P FMEL 'B
0x117084…117218 Dummy {f00=0x00a8, f01=0x0190, f02=»MEL 'BXX.XX.XX',GTDUPF(CBIN19) DATO-2 P FMEND . P* < 6 PJTSUB30 FRMT ARK KNT NR F 6 P FMEL 'BBZZZE-ZZZE-ZZE-ZZ',GTDUPF(CBIN9) P FMEND P* 6 PJTSUB31 FRMT LINE 3 - 8
0x117218…1173ac Dummy {f00=0x00a8, f01=0x0190, f02=»TDUPF(CBIN13) FAKT NR r D P FMEL 'BZZZZZZZZ',GTDUPF(CBIN14) LEV NR , D P FMEL 'BZZZZ',GTDUPF(CBIN15) TXT NR t D P FMEL 'BZZ',GTDUPF(CBIN16) OMR NR D P
0x1173ac…117540 Dummy {f00=0x00a8, f01=0x0190, f02=» F P FMEL 'BZ',GTDUPF(CBIN17) ADR KODE P FMEND N P* d P EJECT n P* | 0 P* VARIOUS FORMATS FOR JOURNAL TAPE P* @ PFTBXJT FTABLE XJTF01,XJTF02,XJTF03,XJTF04,XJTF05,XJTF06, C 2 P
0x117540…1176d4 (0, 354) Dummy {f00=0x00a8, f01=0x018e, f02=»ILLR ' ',2 P FLINK FLBNR P FCOPY =' KVIT' & P FMEND > P* L PXJTF02 FRMT KONTOKORT V P FILLR ' ',2 t P FLINK XJTF02L P FMEND P* PXJTF02L FRMT P FLINK FLBNR P FILLR ' ',2 P FCOPY ='KONTOKORT'
0x1176d4…117868 Dummy {f00=0x00a8, f01=0x0190, f02=» P FILLR ' ',2 P FCOPY ='START' P FCOPY =' SUM' 0 P FMEND F P* T PXJTF04 FRMT ^ P FLINK VOSUM07 r P FCOPY =' SUM' P FMEND PXJTF05 FRMT P FLINK XJTF05L P FMEND P* P* PXJTF05L FRMT
0x117868…1179fc Dummy {f00=0x00a8, f01=0x0190, f02=» FILLR ' ',2 P FCOPY ='POST-DATO' P FILLR ' ',2 0 P FCOPY ='MASKIN NR' D P FCOPY =' EKS.LBNR' ` P FEOR | P FILLR ' ',2 P FCOPY GTTESTMK P FMEL '99.99.999.9',CVERSNR P FILLR ' ',2 P FMEL '99E-99E-99',CMASKDA
0x1179fc…117b90 Dummy {f00=0x00a8, f01=0x0190, f02=»'***99',TTSTLBNR P FILLR ' ',3 P FEOR , P FILLR ' ',2 : : P FCOPY ='VERSURKONTONR KASSEKONTONR PRIMO KASSE ' N P FEOR P FILLR ' ',2 $ P FMEL '999E-99999E-99BB',TVERSUR & P FMEL '999E-99999E-99BB',TTCASHAC $ P FMEL 'Z
0x117b90…117d24 Dummy {f00=0x00a8, f01=0x018e, f02=»NK XJTF06L P FMEND P* PXJTF06L FRMT * P FILLR ' ',2 > P FILLR '*',50 R P FEOR h P FILLR ' ',2 v P FCOPY ='KASSELUKNING' P FILLR ' ',30 P FEOR P FILLR ' ',2 P FCOPY ='T[LLER' P FILLR ' ',10
0x117d24…117eb8 Dummy {f00=0x00a8, f01=0x0190, f02=» P FMEND P* PXJTF07L FRMT P FILLR ' ',2 4 P FMEL 'ZZ',GTWBCD1 H 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(GSWBIN5,CBIN2) b 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(GSWBIN5,CBIN1) P FMEND P* PXJTF09 FRMT P FILLR
0x117eb8…11804c Dummy {f00=0x00a8, f01=0x0190, f02=» =' TEST' P FMEND P* PXJTF11 FRMT * P FILLR ' ',2 > P FCOPY ='DISKETTE SKIFT ' R P FMEND t P* PXJTF13 FRMT P FILLR ' ',2 P FLINK XJTF13L P FMEND P* PXJTF13L FRMT P FLINK JTSUB05 REG
0x11804c…1181e0 Dummy {f00=0x00a8, f01=0x0190, f02=» FCOPY ='ADM ' $ P FMEL 'BZZ',GTDUPF(CBIN5) ADM NO P FMEND @ P* N PXJTF14 FRMT X P FSL l P FMEL '99B',GTWBCD2 x P FCOPY GSWSTR9 P FMEL '99',GTWBCD1 P FMEND P* PXJTF16 FRMT P FILLR ' ',2 P
0x1181e0…118374 (0, 355) Dummy {f00=0x00a8, f01=0x0190, f02=» 'DIVERSE FORMATER' P FMEND P EJECT * P* @ : P* FORMATS FOR VOUCHER 'BILAG AFSTEMPLING' J P* @ PFTBVO FTABLE BAFST01,BAFST02,BAFST03,BAFST04,BAFST02, C @ P BAFST01,BAFST02,BAFST08,BAFST08,BA
0x118374…118508 Dummy {f00=0x00a8, f01=0x0190, f02=»L P FMEND P* PBAFST01L FRMT " 8 P FLINK BSUB01 HEADER 8 P FBT TTKORTFL,B1LAB1 t P FILLR ' ',6 " P FMEL 'B**B',GTDUPF(CBIN3) BKO @ P FMEL 'ZZ.ZZ.ZZB',GTDUPF(CBIN7) BET/VALORDATO
0x118508…11869c Dummy {f00=0x00a8, f01=0x0190, f02=»PR-CIR-NR b @ P FLINK BSUB02 REGKONTO-BELOB P FMEND V P* l P* v B PBAFST02 FRMT TRANS 02-05-07-10 P FLINK BAFST02L P FMEND P* PBAFST02L FRMT
0x11869c…118830 Dummy {f00=0x00a8, f01=0x0190, f02=» P FILLR '*',3 ! P FBT TTKORTFL,B2LAB1 ! P FILLR '*',13 ! 8 PB2LAB1 ! N @ P FLINK BSUB02 REGKONTO-BELOB ! P FMEND ! P* ! P* ! < PBAFST08 FRMT TRANS 08-09 !
0x118830…1189c4 Dummy {f00=0x00a8, f01=0x0190, f02=»L 'BBB**B',GTDUPF(CBIN3) BKO ! P FBZ GTUSED(CBIN13),B8LAB1 " $ . P FMEL 'ZZZZZZZZZZB',GTDUPF(CBIN13) FAKTNR " F P FB B8LAB5 " x PB8LAB1 " P FBZ GTUSED(CBIN12),B8LAB2 " 2 P FMEL 'BBZZ.ZZ.ZZBBB',GTDUPF(CBIN12) FAKTDATO " P FB B8LAB5 " PB8LAB2
0x1189c4…118b58 Dummy {f00=0x00a8, f01=0x0190, f02=» REGKONTO-BELOB " p P FMEND # " P* # 8 P* # B PBAFST12 FRMT TRANS 12 # L P FLINK BAFST12L # j P FMEND # P* # PBAFST12L FRMT # P FILLR '+',2 # P FCOPY GTTESTMK # > P FCOPY TTCYM
0x118b58…118cec Dummy {f00=0x00a8, f01=0x0190, f02=»99.99',GTDATO POSTERINGSDATO # | B P FCOPY TTSUPMRK SUPPLEMENTS-MARK $ 0 < P FMEL '99',GTREGNR TRANSTYPE-NR $ v < P FMEL 'B999',TTCNTNR TAELLER-NR $ 2 P FMEL 'BZZZZZZZZZZ
0x118cec…118e80 Dummy {f00=0x00a8, f01=0x0190, f02=» REGKONTO-BELOB $ p P FMEND % $ P* % : P* % D PBAFST03 FRMT BILAG TRANS 3 % N P FLINK BSUB10 % r P FLINK BSUB11 % P FLINK BSUB13 % P FMEND % P* % PBAFST04 FRMT BILAG TRANS 4 % P FLINK BSUB10 % P F
0x118e80…119014 (0, 356) Dummy {f00=0x00a9, f01=0x018e, f02=» FILLR '+',2 % P FCOPY GTTESTMK & > P FCOPY TTCYM CYKLE-MARKERING & 4 > P FMEL '999B',GTMSK MASKINNR & v P FLINK FLBNR & @ P FMEL 'B99.99.99',GTDATO POSTERINGSDATO
0x119014…1191a8 Dummy {f00=0x00a9, f01=0x0190, f02=» & V P FMEND ' P* ' P ' ( PBSUB02 FRMT ' 0 @ P FMEL 'B999.99999.99B',GTDUPF(CBIN1) REGKONTONR ' F < P FMEL '*.***.***.**9.99-',GTDUPF(CBIN4) BELOB ' B P FCOPY TTDBKRM DEBET/KREDIT-MARK
0x1191a8…11933c Dummy {f00=0x00a9, f01=0x0190, f02=» ' @ P FMEL '99.99.99B',GTDATO POSTERINGSDATO ( P FCOPY CKMDNAM ( L : P FMEL 'B999B',GTMSK MASKINNR ( b " P FMEL '99B',GTDUPF(CBIN3) BKO ( P FMEND ( P* ( P* ( PBSUB05 FRMT ( P F
0x11933c…1194d0 Dummy {f00=0x00a9, f01=0x0190, f02=»REDIT-MARK ( P FILLR ' ',1 ) P FMEND ) & P* ) < P* ) F PBSUB06 FRMT ) P " P FMEL 'B99B',GTDUPF(CBIN3) BKO ) f P FBT TTKORTFL,B6LAB1 ) P FCOPY TT07TXT ) P FILLR ' ',1 ) . P FMEL 'ZZ.ZZ.ZZB',GTDUPF(CBIN7) VAL. DATO ) PB6LA
0x1194d0…119664 Dummy {f00=0x00a9, f01=0x0190, f02=» CPR/CIR-NR ) f < P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) BELOB * D P FCOPY TTDBKRM DEBET/KREDIT-MARK * V P FILLR ' ',1 * P FLINK SKAF01 LINE NR * P FMEND * P* * PBSUB10 FRMT * P FIL
0x119664…1197f8 Dummy {f00=0x00a9, f01=0x0190, f02=»ATO * r " P FMEL 'BXX.',GTDUPF(CBIN3) BKO + P FMEND + 2 P* + @ PBSUB11 FRMT + J $ P FMEL 'XX',GTDUPF(CBIN11) P]L]R + ^ 2 P FMEL 'E-9999999999B',GTDUPF(CBIN2) DEBITOR NR + , P FMEL 'XX.XXPP',GTDUPF(CBIN7) VALOERDATO + & P FMEL 'BXB',GTDUPF(CBIN12) R
0x1197f8…11998c Dummy {f00=0x00a9, f01=0x0190, f02=»6 + PB12LAB5 , ( P FMEL 'XX',GTDUPF(CBIN10) FORFALDS]R , PB12LAB6 , F 2 P FMEL 'E-9999999999B',GTDUPF(CBIN2) DEBITORNR , V , P FMEL 'XX.XXPP',GTDUPF(CBIN7) VALOERDATO , P FILLR ' ',3 , P FMEND , P* , PBSUB13 FRMT , 2 P FMEL '*.***
0x11998c…119b20 Dummy {f00=0x00a9, f01=0x0190, f02=» P FBT GTLOKSPG,FLBNR10 - P FMEL '****9',TTLBNR - " P FB FLBNR20 - > PFLBNR10 - R P FMEL '****9',GTLBNR - b PFLBNR20 - ~ P FMEND - P* - P EJECT - P* - * P* VARIOUS FORMATS FOR VOUCHER - P* - : PFTBXVO FTABLE FMTF
0x119b20…119cb4 (0, 357) Dummy {f00=0x00a9, f01=0x0190, f02=»VOX16,VOX17,VOX18,VOX20,VOX20 - P* . & P* . 0 PVOFMT02 FRMT TOTAL IN CYCLE . : P FLINK VOFMT02L . ^ P FMEND . v P* . PVOFMT02L FRMT . P FILLR '+',2 . P FBF TTCY1FLG,VOLAB02 . P FCOPY ='ARKIV' . P FLINK JTSUB30 . PVOLA
0x119cb4…119e48 Dummy {f00=0x00a9, f01=0x0190, f02=» PBAXF04 FRMT / P FLINK BAFST03 / P FLINK BAXF05L / . P FMEND / D P* / R PBAXF05 FRMT / P FILLR '+',2 / p P FLINK BAXF05L / P FMEND / P* / PBAXF05L FRMT / P FLINK BSUB04 / P FEOR / P FILLR '0',2 / P FLINK BSU
0x119e48…119fdc Dummy {f00=0x00a9, f01=0x018e, f02=» / P FEOR 0 P FILLR '0',2 0 P FEOR 0 * P FILLR '0',2 0 8 P FEOR 0 L P FLINK KVIT03 0 Z P FMEND 0 p P* 0 ~ PVOSUM07 FRMT SUMBILAG 0 P FLINK VOSUM07L 0 P FMEND 0 P* 0 PVOSUM07L FRMT 0 P FILLR '+',2 0 P FMEL '9
0x119fdc…11a170 Dummy {f00=0x00a9, f01=0x0190, f02=» 0 P FILLR ' ',1 1 P FCOPY ='TOTAL ' 1 & P FMEL '*.***.***.**9,99+',GTSUMCNT 1 8 P FILLR ' ',2 1 b P FMEND 1 v P* 1 PVOX08 FRMT 1 P FLINK VOX08L 1 P FMEND 1 P* 1 PVOX08L FRMT 1 P FILLR '+',2 1 P FCOPY GTTESTMK 1
0x11a170…11a304 Dummy {f00=0x00a9, f01=0x0190, f02=» - ' 1 P FLINK FLBNR 2 P FILLR ' ',2 2 P FCOPY GSWSTR9 2 4 P FILLR ' ',2 2 J P FCOPY GSWSTR20 TEXT 2 ^ P FEOR 2 z P FILLR '2',2 2 P FILLR '*',60 2 P FILLR '*',8 2 P FEOR 2 P FILLR '4',2 2 P FCOPY ='KONTONR' 2 P FILLR
0x11a304…11a498 Dummy {f00=0x00a9, f01=0x0190, f02=»,12 2 P FCOPY ='KREDIT' 3 P FMEND 3 $ P* 3 2 PVOX09 FRMT 3 < P FLINK VOX09L 3 N P FMEND 3 d P* 3 r PVOX09L FRMT 3 | P FILLR '2',2 3 ( P FMEL 'XXXE-XXXXXE-XX',GTDUPF(CBIN1) 3 P FILLR ' ',4 3 P FMEL '99',GTWBCD1 3 6 P FMEL 'BBZ
0x11a498…11a62c Dummy {f00=0x00a9, f01=0x0190, f02=»Z9.99-',C12ACC(GSWBIN5,CBIN1) KREDIT 3 z P FMEND 4 , P* 4 : PVOX10 FRMT 4 D P FLINK VOX10L 4 V P FMEND 4 l P* 4 z PVOX10L FRMT 4 P FILLR '2',2 4 P FMEL 'ZZ',GTWBCD1 4 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) 4 6 P FMEL 'BBZZZ.Z
0x11a62c…11a7c0 Dummy {f00=0x00a9, f01=0x0190, f02=» 4 P FLINK VOX11L 5 P FMEND 5 P* 5 , PVOX11L FRMT 5 6 P FILLR '4',2 5 J P FTEXT 'TOTAL' 5 ^ 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) 5 t 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTREGF(CBIN2) 5 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTREGF(CBIN1)
0x11a7c0…11a954 (0, 358) Dummy {f00=0x00a9, f01=0x0190, f02=».ZZ9.99-',TTACC(CBIN8,CBIN2) 5 | 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(CBIN8,CBIN1) 6 $ P FEOR 6 P FILLR '2',2 6 j P FTEXT 'KOR' 6 ~ P FILLR ' ',19 6 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(CBIN7,CBIN2) 6 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(CBIN
0x11a954…11aae8 Dummy {f00=0x00a9, f01=0x018e, f02=» 6 $ P FMEL '999E-99999E-99',TTCASHAC 7 P FILLR ' ',1 7 0 P FTEXT ' PRIMO' 7 D * P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTSTCASH 7 P FILLR ' ',34 7 P FEOR 7 P FILLR '2',2 7 P FTEXT 'BEV ' 7 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) 7
0x11aae8…11ac7c Dummy {f00=0x00a9, f01=0x0190, f02=» 7 P FTEXT 'ULTIMO' 8 ( P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTCASH 8 P FILLR ' ',34 8 L P FMEND 8 b P* 8 p PVOX13 FRMT 8 z P FLINK VOX13L 8 P FMEND 8 P* 8 PVOX13L FRMT 8 P FILLR ' ',2 8 P FCOPY GTTESTMK 8 P FMEL '999B',G
0x11ac7c…11ae10 Dummy {f00=0x00a9, f01=0x0190, f02=» 8 P FILLR ' ',3 9 P FEOR 9 P FILLR '2',2 9 * P FILLR '*',56 9 > P FEOR 9 T P FILLR '4',2 9 b P FCOPY ='T[LLER' 9 v P FILLR ' ',4 9 P FCOPY ='KONTONR' 9 P FILLR ' ',10 9 P FCOPY ='BEV.PERIODE' 9 P FILLR ' ',12 9 P F
0x11ae10…11afa4 Dummy {f00=0x00a9, f01=0x0190, f02=»X14L FRMT 9 P FILLR '2',2 : P FMEL 'ZZ',GTWBCD1 : & P FILLR ' ',4 : @ 0 P FMEL 'XXXE-XXXXXE-XX',CBACC(GSWBIN3,CBIN1) : T 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',CBACC(GSWBIN3,CBIN2) : 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',CBACC(GSWBIN3,CBIN3) : P FMEND :
0x11afa4…11b138 Dummy {f00=0x00a9, f01=0x0190, f02=» FLINK VOX16L : P FMEND ; P* ; $ PVOX16L FRMT ; . P FILLR X'24',40 NO. ; B P FILLR X'3C',40 5. ; ^ P FNL ; x P FNL ; P FILLR X'5D',40 ] ; P FILLR X'4E',40 N ; P FNL ; P FNL ; P FILLR X'45',40 E ; P FILLR X'53',40 S
0x11b138…11b2cc Dummy {f00=0x00a9, f01=0x0190, f02=»17L ; P FMEND < P* < PVOX17L FRMT < $ P FILLR '+',2 < 8 , P FMEL '99E-99E-99',GTDATO POSTERINGSDATO < L P FILLR ' ',6 < | P FLINK FLBNR < P FILLR ' ',8 < 2 P FMEL 'B*.***.***.**9E,99',GTDUPF(CBIN4) BELOB < P FILLR '*',2 < P FILLR
0x11b2cc…11b460 Dummy {f00=0x00a9, f01=0x0190, f02=»NK VOX18L < P FMEND = P* = PVOX18L FRMT = * P FILLR '2',2 = > P FILLR ' ',17 = R * P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GSWBCD6 = h * P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GSWBCD7 = P FMEND = P* = PVOX20 FRMT = P FLINK VOX20L = P FME
0x11b460…11b5f4 (0, 359) Dummy {f00=0x00a9, f01=0x0190, f02=»EOR = P FILLR '2',2 > PV20L10 > ( P FMEL 'XXXE-XXXXXE-XX',GTDUPF(CBIN1) > . P FILLR ' ',4 > Z P FMEL 'XX',GTWBCD1 > n P FBT GTSWFLAG,V20L20 > 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9,99-',GTDUPF(CBIN4) > P FILLR ' ',35 > P FB V20L90 > PV20L20 >
0x11b5f4…11b788 Dummy {f00=0x00a9, f01=0x0190, f02=»90 > P FMEND ? P EJECT ? P* ? & . P* FORMATS FOR EXTRA 'KVITTERING' ? 0 ( P* (MOSTLY AS NORMAL 'BILAG' ? b P* ? : PFTBKV FTABLE BAFST01,BAFST02,KVIT03,KVIT03,BAFST02, C ? 2 P BAFST01,BAFST02,BAFST08,BAFST08,BAFST02, C ?
0x11b788…11b91c Dummy {f00=0x00a9, f01=0x0190, f02=» FLINK BSUB05 ? P FMEND @ P* @ $ P EJECT @ . P* @ D " P* FORMATS FOR KONTOKORT @ N P* @ t @ PFTBKT FTABLE KAFST01,KAFST02,KAFST03,KAFST04,KAFST00, C @ ~ 2 P KAFST01,KAFST00,KAFST01,KAFST01,KAFST02, C @ . P KAFST12,KAFST0
0x11b91c…11bab0 Dummy {f00=0x00a9, f01=0x018e, f02=» TRANS 01-06 @ ~ P FLINK BAFST01 A . P FLINK SKAF01 LINE NR A L P FMEND A j P* A P* A : PKAFST02 FRMT TRANS 02 A P FLINK BAFST02 A P FLINK SKAF01 LINE NR A
0x11bab0…11bc44 Dummy {f00=0x00a9, f01=0x0190, f02=» P FLINK SKAF01 LINE NR B P FMEND B " P* B 8 P* B B : PKAFST03 FRMT TRANS 03 B L P FLINK KAFST03L B P FMEND B P* B PKAFST03L FRMT B 8 P FLINK BSUB01 HEADER B
0x11bc44…11bdd8 Dummy {f00=0x00a9, f01=0x0190, f02=» 'BXX',GTDUPF(CBIN11) PALIGNINGS$R B $ P FCOPY TT16TXT RENTE/GEBYR/INDB C 4 ( P FLINK BSUB07 CPR/CIR/BELOB/LINIENR C P FMEND C P* C P* C : PKAFST04 FRMT TRANS 04 C P FLINK KAFST04L C P
0x11bdd8…11bf6c Dummy {f00=0x00a9, f01=0x0190, f02=» BETART/DATO C r P FBF TTKORTFL,KLAB40 D " 2 P FMEL 'XX.XXPP',GTDUPF(CBIN7) VAL DATE, DD.MM D > PKLAB40 D t P FBF TTASKAT,KLAB41 D 0 P FMEL 'B**',GTDUPF(CBIN12) REST.MAANED - CIR D . P FMEL 'B**',GTDUPF(CBIN11) REST.AAR - CIR D P FB
0x11bf6c…11c100 Dummy {f00=0x00a9, f01=0x0190, f02=»B07 CPR/CIR-BELOB-LINIENR D ~ P FMEND E 8 P* E N PSKAF01 FRMT E X P FBF CKTFLAG,SKAF02 E l P FBT GTSLDFLG,SKAF04 E P FILLR ' ',13 E P FB SKAF03 E PSKAF04 E , P FMEL '*.***.***.**9.99-',TTKTSLD SALDO E
0x11c100…11c294 (0, 360) Dummy {f00=0x00aa, f01=0x018e, f02=»TTKTLIN E PSKAF05 F P FMEND F P* F , P* F 6 . P* VARIOUS FORMATS FOR 'KONTOKORT' F @ P* F r P* F | PXKTTRPL FRMT F P FILLR '+',2 F P FMEL 'BB99.99.99',GTDATO F P FILLR ' ',43 F & P FMEL '*.***.***.**9.99-',TTKTSLD
0x11c294…11c428 Dummy {f00=0x00aa, f01=0x0190, f02=» P* G P* G @ PFTBXTA FTABLE TAFMT01,TAFMT02,TAFMT02,TAFMT04,TAFMT05, C G P VOX15,TAFMT07 G P* G t PTAFMT01 FRMT G ~ P FSL G P FNL G P FNL G P FILLR '*',1 G P FILLR ' ',1 G P FMEND G P* G PTAFMT02 FRMT G
0x11c428…11c5bc Dummy {f00=0x00aa, f01=0x018e, f02=»9+B',GSWBCD6 G z P FLINK TAFMT07 H P FMEND H * P* H 8 PTAFMT04 FRMT H B P FILLR '+',2 H V , P FMEL 'Z.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) H j P FCOPY TTDBKRM H P FMEND H P* H PTAFMT05 FRMT H P FILLR '+',2 H & P FMEL 'Z.ZZZ.ZZZ.ZZ9.99-
0x11c5bc…11c750 Dummy {f00=0x00aa, f01=0x0190, f02=» H P FNL I P FNL I P FMEND I P EJECT I . > PFTBBUD FTABLE PB40FRM2,PB41FRM2,PB42FRM2,FMTFMT,FMTFMT, C I < 6 P PB45FRM2,PB46FRM2,PB47FRM2,PB48FRM2,PB49FRM2, C I ~ 2 P PB40FRM3,PB41FRM3,PB42FRM3,FMTFMT,FMTFMT, C I 2 P PB45FRM3,PB46FRM3,PB47FR
0x11c750…11c8e4 Dummy {f00=0x00aa, f01=0x018e, f02=»ND I P J P J PPB40FRM3 FRMT J P FLINK BUSUB0 J 0 P FLINK BUSUB22 J F P FMEND J J j J r PB41FRM2 FRMT J z P FLINK BUSUB0 J P FLINK BUSUB17 J FMEND J P J P J PPB41FRM3 FRMT J P FLINK BUSUB0 J P F
0x11c8e4…11ca78 Dummy {f00=0x00aa, f01=0x0190, f02=» P K PPB42FRM3 FRMT K P FLINK BUSUB0 K " P FLINK BUSUB22 K 8 P FMEND K N K K d PPB45FRM2 FRMT K l P FLINK BUSUB0 K P FLINK BUSUB15 K FLINK BUSUB13 K FMEND K P K P K PPB45FRM3 FRMT K P FLINK BUSUB0 K
0x11ca78…11cc0c Dummy {f00=0x00aa, f01=0x0190, f02=»UB0 K P FLINK BUSUB15 L FILLR ' ',3 L " , ( FMEL 'ZZZ9',GTREGF(CBIN13) DETALJ. KODE L 6 P FILLR ' ',2 L f FLINK BUSUB13 L z FMEND L P L P L PPB46FRM3 FRMT L P FLINK BUSUB0 L P FILLR ' ',44 L * P FMEL 'BZZZZVZZZVZZ9-',G
0x11cc0c…11cda0 Dummy {f00=0x00aa, f01=0x0190, f02=»ILLR ' ',2 L FLINK BUSUB13 M FMEND M ( P M 6 P M > PPB47FRM3 FRMT M F P FLINK BUSUB0 M P FILLR ' ',24 M r * P FMEL 'BZZZZVZZZVZZ9-',GTREGF(CBIN18) M P FMEND M M M PB48FRM2 FRMT M P FLINK BUSUB0 M P FLINK B
0x11cda0…11cf34 (0, 361) Dummy {f00=0x00aa, f01=0x0190, f02=» * P FMEL 'BZZZZVZZZVZZ9-',GTREGF(CBIN18) N P FMEND N 2 N @ N H PB49FRM2 FRMT N P P FLINK BUSUB0 N f P FLINK BUSUB14 N | P FLINK BUSUB16 N FMEND N P N P N PPB49FRM3 FRMT N P FLINK BUSUB0 N P FILLR ' ',22 N * P
0x11cf34…11d0c8 Dummy {f00=0x00aa, f01=0x0190, f02=» N O O BUSUB11 FRMT O FMEL '9',GTREGF(CBIN12) O , , P FMEL 'B999E-999E-99E-99B',GTREGF(CBIN1) O L FMEND O | O O BUSUB12 FRMT O FILLR '*',1 O & P FMEL 'ZZZZZZZZZX-',GTREGF(CBIN3) O & P FMEL 'ZZZZZZZZZX-',GTREGF(C
0x11d0c8…11d25c Dummy {f00=0x00aa, f01=0x0190, f02=» & P FMEL 'ZZZZZZZZZX-',GTREGF(CBIN8) P & P FMEL 'ZZZZZZZZZX-',GTREGF(CBIN9) P . & P FMEL 'ZZZZZZZZZX-',GTREGF(CBIN10) P X P FEOR P FMEND P P P BUSUB13 FRMT P FILLR '*',1 P P FILLR ' ',3 P * & FMEL '999E-999E-99E-99',GTREG
0x11d25c…11d3f0 Dummy {f00=0x00aa, f01=0x018e, f02=»MT P ( $ FMEL '99V99V99',GTREGF(CBIN11) DATE Q FILLR ' ',3 Q 6 FMEND Q J Q X Q ` BUSUB15 FRMT Q h FLINK BUSUB14 Q | " P FMEL '99',GTREGF(CBIN14) YEAR Q FILLR ' ',2 Q FMEND Q P Q P Q PBUSUB16 FRMT Q P FILLR '*'
0x11d3f0…11d584 Dummy {f00=0x00aa, f01=0x0190, f02=» Q P FMEND R P R P R PBUSUB17 FRMT R & FLINK BUSUB11 R : ( P FMEL '9B9999B999B99',GTREGF(CBIN2) R P P FILLR ' ',1 R | FLINK BUSUB12 R P FMEND R P R P R PBUSUB22 FRMT R P FILLR '*',1 R & P FMEL 'ZZZZZZZZZ9-',GTREGF(C
0x11d584…11d718 Dummy {f00=0x00aa, f01=0x0190, f02=» & P FMEL 'ZZZZZZZZZ9-',GTREGF(CBIN18) S & P FMEL 'ZZZZZZZZZ9-',GTREGF(CBIN19) S . & P FMEL 'ZZZZZZZZZ9-',GTREGF(CBIN20) S X & P FMEL 'ZZZZZZZZZ9-',GTREGF(CBIN21) S P FEOR S P FMEND S P S P S PFRMBPR FRMT S P FILLR '+',2 S P FCOPY G
0x11d718…11d8ac Dummy {f00=0x00aa, f01=0x4008, f02=»@ T L 'ZZZZZZZZZ9-',GTREGF(CBIN18) S & P FMEL 'ZZZZZZZZZ9-',GTREGF(CBIN19) S . & P FMEL 'ZZZZZZZZZ9-',GTREGF(CBIN20) S X & P FMEL 'ZZZZZZZZZ9-',GTREGF(CBIN21) S P FEOR S P FMEND S P S P S PFRMBPR FRMT S P FILLR '+',2 S P FCOPY G
0x11d8ac…11da40 Dummy {f00=0x00aa, f01=0x2008, f02=» U P* CAN NOT BE IDENTIFIED BY TRANSTYPE (OR GTREGDEX) ' P* ' L PFTBXX FTABLE ' V P* ' n P* ' x P END ' @ ' & z P* & PFTBTA FTABLE & P* & P* & P EJECT & P* & ( P* FORMATS
0x11da40…11dbd4 (0, 362) Dummy {f00=0x00aa, f01=0x0190, f02=»9-',GTREGF(CBIN19) U & P FMEL 'ZZZZZZZZZ9-',GTREGF(CBIN20) V & P FMEL 'ZZZZZZZZZ9-',GTREGF(CBIN21) V D P FEOR V n P FMEND V | P V P V PFRMBPR FRMT V P FILLR '+',2 V P FCOPY GSWSTR20 V P FILLR ' ',5 V P FMEL 'XXVXXVXX',CMASKDAT
0x11dbd4…11dd68 Dummy {f00=0x00aa, f01=0x40d4, f02=» V PFTBGP FTABLE FMTFMT W P* W $ P* W . P* W 8 2 P* VARIOUS FORMATS FOR GENERAL PRINTER W B P* W x PFTBXGP FTABLE FMTFMT W P* W P* W P* W P END W @ W P FILLR ' ',5 V P FMEL 'XXVXXVXX',CMASKDAT
0x11dd68…11defc Dummy {f00=0x00aa, f01=0x2008, f02=» X P* CAN NOT BE IDENTIFIED BY TRANSTYPE (OR GTREGDEX) ' P* ' L PFTBXX FTABLE ' V P* ' n P* ' x P END ' @ ' & z P* & PFTBTA FTABLE & P* & P* & P EJECT & P* & ( P* FORMATS
0x11defc…11e090 Dummy {f00=0x00aa, f01=0x0190, f02=» t $ P A77 - TR 4, INSERT BKO 51,52 " P A78 - ACCOUNT NO, TRANS 12 0 $ P A79 - - - - - - (COPY) V " P A80-A87 - CHECK OF CONTROL ~ P ---- - INFORMATION FOR P ---- - TRANSTYPES P A88 - AUTODUP BKO, TR 4 P
0x11e090…11e224 Dummy {f00=0x00aa, f01=0x018e, f02=»101 - CHECK BEHL. COUNT. P A102 - REL. DAY P A103 - SET BEHL. COUNT : P A104 - SET TRANS 12 L P A105 - CTRL.DIGIT CALC. z P A107 - AS A102 P A108 - SPG -REGKONTONR P
0x11e224…11e3b8 Dummy {f00=0x00aa, f01=0x0190, f02=» ~ P* P CBL SPBINW3,=W'90',AA01 P CBG SPBINW3,=W'114',AA01 2 P B AAA 90-114 T P* j PAA01 t P* PAA02 P* PAA03 . P CBNE SPBINW1,CBIN0,AAA IF LENGTH IS ZERO > P MOVE GSWBIN4,CFLTDEX(SPBINW3) GET INDEX V
0x11e3b8…11e54c Dummy {f00=0x00aa, f01=0x0190, f02=»ART,A05,A06,A07,APF,ART, FIELDS 1-9 C > P APK,A11,APK,APK,APK,APK,APK,A17,APK,APK, FIELDS 10,19 C . > P APK,APK,APK,APK,APK,APK,APK,APK,APK,APK, FIELDS 20-29 C p > P APK,APK,APK,APF,APK,APK,APK,APK,APK,APF, FIELDS 30-39 C > P APK,APK,APK,APK,AP
0x11e54c…11e6e0 Dummy {f00=0x00aa, f01=0x0190, f02=»5,APK,ART,ART,ART, FIELDS 60-69 C x > P A70,A71,ART,ART,ART,ART,A76,A77,A78,A79, FIELDS 70,79 C * > P A80,A81,A82,A83,A84,A85,A86,A87,A88,A89, FIELDS 80-89 C l > P A90,A91,APK,APK,APK,ART,ART,ART,ART,ART, FIELDS 90,99 C 0 P A100,A101,A102,A103,A1
0x11e6e0…11e874 (0, 363) Opaque[0x194]
0x11e874…11ea08 # DirEnt {nam=»RGSUB3«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1558, f03=0x0000}
0x11e874…11ea08 IdxSect {
0x11e874…11ea08 f00 = 0x00aa // 0x11e874 @0x0
0x11e874…11ea08 f01 = 0x0006 // 0x11e876 @0x2
0x11e874…11ea08 gno = [ // 0x11e878 @0x4
0x11e874…11ea08 [0x00]: C0x00aa.0x3.0
0x11e874…11ea08 [0x01]: C0x00ab.0x0.0
0x11e874…11ea08 [0x02]: C0x00ab.0x1.0
0x11e874…11ea08 ]
0x11e874…11ea08 }
0x11ea08…11eb9c Dummy {f00=0x00aa, f01=0x0190, f02=» P IDENT RGSUB3 03.01.XXX.1 P DDUM KMD08 & P PDIV : P* H P ENTRY CYOUT R P ENTRY CYWRT f P ENTRY CYRD z P ENTRY CYTRP P* P EXT ABORT P EXT RAWRIT P EXT RAREAD P EXT SPLIN8 P EXT CLEAR8
0x11eb9c…11ed30 Dummy {f00=0x00aa, f01=0x018e, f02=» PROC P******************** P* * . P* WRITE ONE LINE TO CYCLE DATASET 4 P* f 4 P* ON ENTRY DATA IN SEPARATE FIELDS p P* : P* ON EXIT CR= OK DATA WRITTEN TO CYSET > P*
0x11ed30…11eec4 Dummy {f00=0x00aa, f01=0x0190, f02=» d < P* WAITED TOO LONG FOR BUFFER P* H P******************** R P MOVE GSWBIN1,CCYSIZE n P MUL GSWBIN1,TTASKNR " P CBNL GTCYOUT,GSWBIN1,CYLINNOK P MOVE GSWBIN1,=W'32' PCYLIN000 * P TBF CCYPFLG,C
0x11eec4…11f058 Dummy {f00=0x00aa, f01=0x018e, f02=» PCYLIN010 P SET CCYPFLG RESERVE BUFFER $ P MOVE CCYBUF,=X'00' CLEAR BUFFER < P EDIT CCYBUF,GTSTRFMT d * P PERF RAWRIT,DK03,=D'3',CCYBUF,GTCYOUT P BNOK CYLIN100 P ADD GTCYOUT,CBIN1 " P CLEAR CCYPFLG RELEASE BUFFER P C
0x11f058…11f1ec Dummy {f00=0x00aa, f01=0x0190, f02=» P RET P PEND P EJECT PCYOUT PROC , P******************** > P* Z 4 P* WRITE OUT THE WHOLE CONTENT OF CYSET d $ P* (LESS THAN ONE PAGE) P* P******************** P TBT GTCYWRTF,CYOUT050 P
0x11f1ec…11f380 Dummy {f00=0x00aa, f01=0x018e, f02=» P MOVE TTLINNR,TTCYKPOS P TBF GTCYTRPF,CYOUT010 " 2 P SUB GTCYOUT,CBIN1 ADJUST FOR TRP LINE, -TOTAL @ PCYOUT010 v P MOVE GSWBIN1,TTLINNR P DSC1 KVOUCH,POS,GSWBIN1 " P CBNL GTCYIN,GTCYOUT,CYOUT050 P PERF CYRD P SUB TTLINNR
0x11f380…11f514 (0, 364) Dummy {f00=0x00ab, f01=0x018e, f02=» P******************** P* , P* WRITE A LINE ON CYCLE DATASET * : P* IN NOK EMPTY THE CYCLE DATASET TO VOUCHER Z 0 P* AND WRITE LINE TO VOUCHER P* P******************** $ P PERF CYLINE WRITE LIN
0x11f514…11f6a8 Dummy {f00=0x00ab, f01=0x0190, f02=» z P RET P* PCYWRT010 $ P MOVE GSWSTR9,=C'TRP ' NEW PAGE . P PERF FRMXVO,CBIN2 V P PERF CYLINE p P SET GTCYTRPF INITIATE PRINT P CMP CBIN0,CBIN0 OK P RET P* PCYWRT100 P PERF CYOUT P SET GTCYW
0x11f6a8…11f83c Dummy {f00=0x00ab, f01=0x0190, f02=» READ ONE LINE FROM CYCLE DATASET AND " P* WRITE IT TO VOUCHER 4 P* Z 8 P* VOUCHER SHOULD BE POSITIONED BEFORE PRINT d P* P******************** PCYRD000 P PERF WAITF,CCYPFLG $ P MOVE GSWBIN1,=W'128'
0x11f83c…11f9d0 Dummy {f00=0x00ab, f01=0x018e, f02=»PFLG P B CYRD100 PCYRDNOK P ADD GTCYIN,CBIN1 . P CLEAR CCYPFLG H P PERF CRVO ^ P CMP CBIN1,CBIN0 NOK p P RET P* PCYRD100 P WAIT KVOUCH P PERF CRVO P ADD GTCYIN,CBIN1 P CMP CBIN0,CBIN0 OK
0x11f9d0…11fb64 Dummy {f00=0x00ab, f01=0x018e, f02=» P******************** P* " P* PRINT A WHOLE PAGE * P* P 6 P* AND WRITE TRANSPORT LINE FIRST ON CYSET Z P* P******************** P TBF GTCYTRPF,CYTRP200 , P TBT GTCYWRTF,CYTRP100 T=ALREADY WRITTEN P
0x11fb64…11fcf8 Dummy {f00=0x00ab, f01=0x0190, f02=» ~ P MOVE GSWSTR9,=C'TRP ' P PERF FRMXVO,CBIN2 & P MOVE GTCYIN,TTASKNR @ P SUB GTCYIN,CBIN1 P MUL GTCYIN,CCYSIZE v P ADD GTCYIN,CBIN1 P MOVE GTCYOUT,GTCYIN P MOVE TTLINNR,TTCYKST P MOVE TTCYKPOS,TTLINNR P PER
0x11fcf8…11fe8c Dummy {f00=0x00ab, f01=0x0190, f02=»SPLIN8,CBIN3,CBIN2 ASK FOR 'NY SIDE' P PERF GRASPV GRASP , P MOVE TTCYKPOS,TTCYKST F * P MOVE TTLINNR,TTCYKST POSITION VOUCHER d P MOVE GSWBIN1,TTLINNR P DSC1 KVOUCH,POS,GSWBIN1 0 P MOVE GSWSTR9,=C'TRP ' SET UP TRANSPORT LINE P PER
0x11fe8c…120020 Dummy {f00=0x00ab, f01=0x4034, f02=» RET P PEND P* P END $@ 0ASPV GRASP , P MOVE TTCYKPOS,TTCYKST F * P MOVE TTLINNR,TTCYKST POSITION VOUCHER d P MOVE GSWBIN1,TTLINNR P DSC1 KVOUCH,POS,GSWBIN1 0 P MOVE GSWSTR9,=C'TRP ' SET UP TRANSPORT LINE P PER
0x120020…1201b4 (0, 365) Dummy {f00=0x00ab, f01=0x2008, f02=» P?????????????? P RET " P PEND . P* < P END F :EOF R@ `OUT P WAIT KVOUCH p P DSC0 KVOUCH,RLEAS P MOVE GSWSTR9,=C'TRP ' P PERF FRMXVO,CBIN2 P MOVE TTLINNR,TTCYKST P PERF CYLINE P
0x1201b4…120348 Dummy {f00=0x00ab, f01=0x4116, f02=» | * & * & H * & v * & - K T K T
0x120348…1204dc Dummy {f00=0x00ab, f01=0x40f4, f02=» : H IDENT D:CB20 TRA 4.2 81-04-27 F1 O1111 04.01.XXX.1 D:CB20 B D:CB20C T * & F h * & = 8 F @ K T
0x1204dc…120670 Dummy {f00=0x00ab, f01=0x0190, f02=» : H IDENT C:CB30 TRA 4.2 81-04-27 F1 O1111 04.01.XXX.1 ! C:CB30 ! B C:CB30C ! T & ! h & ! | & = ! & [ ! & y ! & ! & ! & ! & ! & !
0x120670…120804 Dummy {f00=0x00ab, f01=0x0190, f02=» ! j * & " * & " 6 * & " d * & " * & ; " * & Y
0x120804…120998 Dummy {f00=0x00ab, f01=0x0190, f02=» " x * & # * & # D * & # r * & + # * & I # * & g
0x120998…120b2c Dummy {f00=0x00ab, f01=0x0190, f02=» # * & $ $ * & $ R * & $ * & 9 $ * & W $ *
0x120b2c…120cc0 Dummy {f00=0x00ab, f01=0x0190, f02=» * & % * & % 2 * & % ` * & ) % * & G % * & e
0x120cc0…120e54 (0, 366) Opaque[0x194]
0x120e54…120fe8 # DirEnt {nam=»C221 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1570, f03=0x0000}
0x120e54…120fe8 IdxSect {
0x120e54…120fe8 f00 = 0x00ab // 0x120e54 @0x0
0x120e54…120fe8 f01 = 0x0002 // 0x120e56 @0x2
0x120e54…120fe8 gno = [ // 0x120e58 @0x4
0x120e54…120fe8 [0x00]: C0x00ab.0x2.0
0x120e54…120fe8 ]
0x120e54…120fe8 }
0x120fe8…12117c Dummy {f00=0x00ab, f01=0x018e, f02=» T; P01; TID=TC; TCL=TC; * LEV=60; : P02; J PTDC=T03; V PLC=01L; f PTDC=T07; v PLC=01L; P01; PSCL=S04; PT; P01; PTID=TD; PTCL=TC; PLEV=60; P02; PTDC=
0x12117c…121310 Dummy {f00=0x00ab, f01=0x018e, f02=» 01; PTDC=T04; PLC=02L; $ P03; 4 PSCL=S02; @ PSCL=S03; P PSCL=S04; ` PT; p P01; z PTID=GA; PTCL=GA; PLEV=60; P01; PTDC=T05; PLC=02L; P03; PSCL=S02; PSCL=S03;
0x121310…1214a4 Dummy {f00=0x00ab, f01=0x004a, f02=» P01; PSCL=S01; U; 001; * TB2; 6 P002; B @ PSCL=S03; P PSCL=S04; ` PT; p P01; z PTID=GA; PTCL=GA; PLEV=60; P01; PTDC=T05; PLC=02L; P03; PSCL=S02; PSCL=S03;
0x1214a4…121638 Dummy {f00=0x00ab, f01=0x2008, f02=» PSCL=S01; U; 001; * TB2; 6 P002; B @ PSCL=S03; P PSCL=S04; ` PT; p P01; z PTID=GA; PTCL=GA; PLEV=60; P01; PTDC=T05; PLC=02L; P03; PSCL=S02; PSCL=S03;
0x121638…1217cc Dummy {f00=0x00ab, f01=0x0190, f02=»
[…0x1…]
0x121960…121af4 (0, 367) Opaque[0x194]
0x121af4…121c88 # DirEnt {nam=»KTPLN «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1578, f03=0x0000}
0x121af4…121c88 IdxSect {
0x121af4…121c88 f00 = 0x00ab // 0x121af4 @0x0
0x121af4…121c88 f01 = 0x0006 // 0x121af6 @0x2
0x121af4…121c88 gno = [ // 0x121af8 @0x4
0x121af4…121c88 [0x00]: C0x00ab.0x3.0
0x121af4…121c88 [0x01]: C0x00ac.0x0.0
0x121af4…121c88 [0x02]: C0x00ac.0x1.0
0x121af4…121c88 ]
0x121af4…121c88 }
0x121c88…121e1c Dummy {f00=0x00ab, f01=0x0190, f02=» P IDENT KTPLN 03.01.XXX.1 DDUM KMD08 & PDIV : P ENTRY KTPLAN H P ENTRY RESTMK ^ P ENTRY SETMK t P EXT RAREAD P EXT WAITF P INCLUDE EQUATE P EJECT PKTPLAN PROC KTNR,TYPE 4 P**********************
0x121e1c…121fb0 Dummy {f00=0x00ab, f01=0x0190, f02=» P* 6 P* IF FOUND - CONDITION REGISTER IS SET TO OK < P* TYPE WILL CONTAIN THE ASSOCIATED TYPE H * P* GSWBIN4 IS RECORD NO < P* GSWBIN5 POINTS TO START OF FOUND NO . P* IF NOT FOUN
0x121fb0…122144 Dummy {f00=0x00ab, f01=0x0190, f02=»T RECORD j P P MOVE GSWBIN4,CBIN0 PKTP010 4 P ADD GSWBIN4,CBIN1 B P MUL GSWBIN4,CBIN3 0 P CBG GSWBIN4,CKTMAX,KTP020 RETURN, NOT FOUND v P DIV GSWBIN4,CBIN3 8 P CBL CKTINDX(GSWBIN4),=D'1',KTP020 RETURN, NOT FOUND > P CBNL CK
0x122144…1222d8 Dummy {f00=0x00ab, f01=0x018e, f02=» P CBNE GSWBIN4,CBIN0,KTPNOK2 P MOVE GSWBIN4,CBIN1 ( P B KTPNOK2 D PKTP030 FOUND V , P MUL GSWBIN4,CBIN3 LAST RECORD IN GROUP l , P SUB GSWBIN4,CBIN2 FIRST RECORD IN GROUP P PERF WAITF,CKFLAG PKTP110 P MOVE GSWBIN5,=W'128
0x1222d8…12246c Dummy {f00=0x00ab, f01=0x0190, f02=» p P* LOOP THROUGH BUFFER P MOVE GSWBIN5,CBIN0 * PKTP120 F P MOVE GSWBCD7,=D'1' T . P XCOPY GSWBCD7,CBIN1,CBIN6,CKTBUF,GSWBIN5 p " P CBE GSWBCD7,KTNR,KTP200 FOUND ( P CBG GSWBCD7,KTNR,KTPNOK1 NOT FOUND $ P ADD GSWBIN5,CBIN8 L
0x12246c…122600 Dummy {f00=0x00ab, f01=0x0190, f02=»KTP200 P ADD GSWBIN5,CBIN6 GET TYPE ( P MOVE GSWBCD7,=D'1' INITIATE NUMBER 2 . P XCOPY GSWBCD7,CBIN5,CBIN2,CKTBUF,GSWBIN5 ^ P MOVE TYPE,GSWBCD7 P SUB GSWBIN5,CBIN6 P CLEAR CKFLAG P CMP CBIN0,CBIN0 P RET PKTPNOK1
0x122600…122794 (0, 368) Dummy {f00=0x00ac, f01=0x0190, f02=»OK P CLEAR CKFLAG P MOVE TYPE,=D'0' NOT FOUND P CMP CBIN1,CBIN0 NOT OK B P RET b P PEND n P EJECT | PRESTMK PROC ( P************************************ P* * P* RESET MASTER INDEX IN KONTOPLAN P*
0x122794…122928 Dummy {f00=0x00ac, f01=0x0190, f02=»DD GSWBIN3,CBIN2 * P DIV GSWBIN3,CBIN3 GSWBIN3 = GROUP NO PRES010 F 8 P CBE GSWBIN4,CKTLAST,RES100 LAST RECORD ? YES: JUMP T * P MOVE GSWBIN5,GSWBIN3 LAST IN GROUP ? P MUL GSWBIN5,CBIN3 P SUB GSWBIN5,GSWBIN4 * P BNE RESOK FINISH IF
0x122928…122abc Dummy {f00=0x00ac, f01=0x0190, f02=»IN5 GET LAST NO j " P MOVE CKTINDX(GSWBIN3),GSWBCD7 P B RESOK > PRES100 N P P CBE CKTLAST,CBIN0,RES170 d 0 P MOVE GSWBIN5,=W'120' FIND LAST USED NUMBER P MOVE GSWBCD7,=D'1' PRES110 4 P MATCH CKTBUF,GSWBIN5,CBIN1,CBLANKS,
0x122abc…122c50 Dummy {f00=0x00ac, f01=0x0190, f02=» ` PRES120 4 P ADD GSWBIN3,CBIN1 SET REMAINING INDICES TO ZERO P MUL GSWBIN3,CBIN3 N P CBG GSWBIN3,CKTMAX,RESOK h P DIV GSWBIN3,CBIN3 P MOVE CKTINDX(GSWBIN3),=D'0' P B RES120 PRES150 P SUB GSWBIN5,CBIN8 P BNL R
0x122c50…122de4 Dummy {f00=0x00ac, f01=0x0190, f02=»OC P**************************** P* . 2 P* INITIATE MASTER INDEX FOR 'KONTOPLAN' 8 P* n P**************************** x P P MOVE GSWBIN4,CBIN1 PSET010 P MOVE GSWBIN5,=W'128' P MOVE CKTBUF,CBLANKS 2 P
0x122de4…122f78 Dummy {f00=0x00ac, f01=0x0190, f02=» P BE SET100 P PERF RESTMK P ADD GSWBIN4,CBIN1 * P CBNG GSWBIN4,CKTMAX,SET010 D P MOVE CKTLAST,CKTMAX h P B SETOK PSET100 P MOVE GSWBIN5,CBIN0 4 P MATCH CKTBUF,GSWBIN5,CBIN2,CBLANKS,CBIN0,CBIN2 P BNE SET120
0x122f78…12310c Dummy {f00=0x00ac, f01=0x408e, f02=»SWBIN5,GSWBIN4 p PSET120 P MOVE CKTLAST,GSWBIN4 $ P PERF RESTMK B PSETOK V P RET d P PEND p END ~@ PSET100 P MOVE GSWBIN5,CBIN0 4 P MATCH CKTBUF,GSWBIN5,CBIN2,CBLANKS,CBIN0,CBIN2 P BNE SET120
0x12310c…1232a0 Dummy {f00=0x00ac, f01=0x2008, f02=» @
0x1232a0…123434 (0, 369) Dummy {f00=0x00ac, f01=0x018e, f02=»G,TXTP10 P FCOPY =C'UDSKRIFT AF ' PTXTP10 0 P FCOPY =C'TEKSTFIL' > P FILLR ' ',5 Z P FMEL '99E-99E-99',CMASKDAT n FNL FCOPY =C'FRA/TIL-NR:' FKI 13,MINL=1,MAXL=3 FMEL 'ZZ9',GSWBCD3 P FILLR '-',1
0x123434…1235c8 Dummy {f00=0x00ac, f01=0x000a, f02=»
0x1235c8…12375c Dummy {f00=0x00ac, f01=0x0190, f02=» : H IDENT RGKLAR TRA 4.2 81-01-06 F1 O1111 03.01.XXX.1 B > BCKUP CLBEH CLEDB CLEJ CLKF KLRFMT RGA120 RGKLAR SKIFT B $ SLUTIDK STRTIDA STRTWR1 ZERO6 $$$TRAC B > BCKUP CLBEH CLEDB CLEJ6 CLKF1 KLRFMTX RGA120 s > :
0x12375c…1238f0 Dummy {f00=0x00ac, f01=0x0190, f02=» CRKJA FRMXVOI GRASPVU INITRGS KFREAD KFWRIT KORTR KTPLANT D @ LAMPOFG LAMPONC PACKCLE RADEL RAREADC RAWRITC SETDEBC SETKRE F B > SLUTA SOPRD SPCLRAP SPCLRNR SPLIN8A T:ATTFI T:DSC0R T:DSC1T < 8 T:EDWRG T:WAITC TCONFWE WAITF WRITFDC WRITIDC WRI
0x1238f0…123a84 Dummy {f00=0x00ac, f01=0x0190, f02=» e $ 4 D T 20 G d 50 G v 90 G ; < < > 8 B C D G J F " D A 1XF
0x123a84…123c18 Dummy {f00=0x00ac, f01=0x018e, f02=» Z0 `0 e m $ g F 4 j D l N T m d t v v ~ J F " D @ RRR_G L L g L ) L L L X R R R RLA s R R s _~ <
0x123c18…123dac Dummy {f00=0x00ac, f01=0x0190, f02=» > 0 R J F " D A 1XF R2 RRR_ @ @ @ @ @ @ @ @ @ @ @ @ @ L L L L0X 0X L * & x 0 1 0 1 0 1 0 1 0 1 J F " D R L ( L L " x
0x123dac…123f40 Dummy {f00=0x00ac, f01=0x0190, f02=» ( EJ-EDB T[LLER - " 5 TOTAL 2 7 H :0 O X @0 O j J F " D L L R 6 x o LL L L R "_] L R LH- | G P0 L [ d0 L
0x123f40…1240d4 (0, 370) Opaque[0x194]
0x1240d4…124268 # DirEnt {nam=»KM267 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1590, f03=0x0000}
0x1240d4…124268 IdxSect {
0x1240d4…124268 f00 = 0x00ac // 0x1240d4 @0x0
0x1240d4…124268 f01 = 0x0004 // 0x1240d6 @0x2
0x1240d4…124268 gno = [ // 0x1240d8 @0x4
0x1240d4…124268 [0x00]: C0x00ac.0x2.0
0x1240d4…124268 [0x01]: C0x00ac.0x3.0
0x1240d4…124268 ]
0x1240d4…124268 }
0x124268…1243fc Dummy {f00=0x00ac, f01=0x0190, f02=» PPRT KM267 PPRT C267 PMES SKOVBO KOMMUNE & PMES INCLUDES BUDGET @ PMES INCL. REMITTERING PMES INCL. R]KONVERTERING z PMES L1: TC PMES L2: KA + TD PMES L3: KB + GA PMES L4: KC + GC PMES L5: KD + RB
0x1243fc…124590 Dummy {f00=0x00ac, f01=0x0190, f02=» P!!CH $$(26)$$(22)$$ P!!CH $$-4$$4$$ TRANS 40 , P!!RE 41,$$56$$100$$ SCREEN SIZE (BUDGET) @ P!!DL 61,62 FD03,FD04 p P!!RE 81,$$F9$$F8$$ P!!RE 82,$$FB$$F9$$ P!!DL 224,231 0 PMF1KBV STRG 32X'C1C2C3C4C5C6C750' DEV. ADR. 4 P
0x124590…124724 Dummy {f00=0x00ac, f01=0x0190, f02=»'GD','GE',' ' f P!!DL 235,236 8 PFROMKX STRGI (8),'TD',' ',' ','RB','RA',' ',' ' * $ P!!RE 240,$$FALSE$$TRUE$$ CBKOFLG f $ P!!RE 241,$$FALSE$$TRUE$$ CKTFLAG & P!!RE 242,$$FALSE$$TRUE$$ CCLKTFLG & P!!RE 243,$$FALSE$$FALSE$$ CTESTFLG $
0x124724…1248b8 Dummy {f00=0x00ac, f01=0x0190, f02=»E$$TRUE$$ CKTAUTO P!!RE 248,$$FALSE$$TRUE$$ DC & P!!RE 249,$$FALSE$$FALSE$$ CCYWRTF > & P!!RE 250,$$FALSE$$FALSE$$ CADM22F h $ P!!RE 251,$$FALSE$$TRUE$$ 5M DISK $ P!!RE 252,$$TRUE$$FALSE$$ CKASFLG $ P!!RE 253,$$TRUE$$FALSE$$ CSLDFLG &
0x1248b8…124a4c Dummy {f00=0x00ac, f01=0x0190, f02=»,$$FALSE$$TRUE$$ OVERLAY ON DU & P!!RE 288,$$FALSE$$TRUE$$ CTEXTFLG & & P!!RE 289,$$FALSE$$TRUE$$ CSTRKFLG P & P!!RE 290,$$FALSE$$TRUE$$ CBUDTFLG z P!!DL 331 4 PCFLAG BINI (2,2),X'0011',X'0168',X'0064',X'0068' $ P!!RE 361,$$FALSE$$TRUE$$ BUD
0x124a4c…124be0 Dummy {f00=0x00ac, f01=0x0190, f02=» & P!!RE 466,$$FALSE$$FALSE$$ C167FLG 8 P!!RE 476,$$FALSE$$FALSE$$GENERATE LEVNR 5X XXXXXX CC . . P!!RE 477,$$FALSE$$FALSE$$ C539FLG-TINGLEV j * P!!RE 478,$$TRUE$$FALSE$$ NO VSL CHECK & P!!RE 484,$$1400$$10000$$ DISK SIZE P!!RE 485,$$21$$21$$
0x124be0…124d74 (0, 371) Dummy {f00=0x00ac, f01=0x0190, f02=»00$$ INDEX FILE P!!RE 495,$$5$$5$$ CKTTOP P!!DL 496,497 8 PFROMTX STRGI (2),' ','KA' L 2 P!!RE 827,$$FALSE$$FALSE$$ FORSKUDSREGISTRERING n , P!!RE 828,$$FALSE$$FALSE$$ LONOPLYSNINGER P!!DL 848,849 PCENTRAL BIN '1' PRKKMNR B
0x124d74…124f08 Dummy {f00=0x00ac, f01=0x0190, f02=»2908610426',C'1308550520' P!!DL 983,984 " PFROMRX STRGI (2),'KE','KD' 6 P!!DL 1200 X " P MOVE TCT01,=W'6' 5 GTP + 1 LP j P!!EN PNOD C PTRA /S,NL PINC DIV539 PNOD R PLED SCREEN P!!CH $$KEY461$$KEY261$$
0x124f08…12509c Dummy {f00=0x00ac, f01=0x0190, f02=»D D PINC RKTEST PINC RKAPPL PINC RKSUBS 0 PNOD D B PINC RGMAIN P PINC RGSUBS b PINC RGSUB1 t PINC RGSUB2 PINC RGSUB3 PNOD D PINC RGKLAR PINC KTPLN PINC KTOPR PNOD D PINC RGADM
0x12509c…125230 Dummy {f00=0x00ac, f01=0x0190, f02=» PINC REMTXT PINC RGFRMT PLED REMFMT ( P!!DL 308 (FILLR ' ',29) : P FILLR ' ',35 Z P!!EN p PTRA /S,NL | PNOD D PINC REMLEV PINC ADM6 PNOD D PINC REMTR PLED REMBDT P!!DL 80 " P MOVE GS
0x125230…1253c4 Dummy {f00=0x00ac, f01=0x00fc, f02=»ET PTLK U,4K PINC RKIO PINC TB3270 * PASM STARTX,NL < PASM PRTX,NL R PASM VDUPRX,NL f P$INCGEN | PLKE M PKPF /L,RGL267 PSCR 2 PMES $PDISC M=M:267,MU=M:POOL92,A=RGL267,C=C267 P$ASG2 " P MOVE GS
0x1253c4…125558 Dummy {f00=0x00ac, f01=0x2008, f02=» PTLK U,4K PINC RKIO PINC TB3270 * PASM STARTX,NL < PASM PRTX,NL R PASM VDUPRX,NL f P$INCGEN | PLKE M PKPF /L,RGL267 PSCR 2 PMES $PDISC M=M:267,MU=M:POOL92,A=RGL267,C=C267 P$ASG2 " P MOVE GS
0x125558…1256ec Dummy {f00=0x00ac, f01=0x0190, f02=» h PLINCNT STRG 4X'0' . PDCLENG STRG 4X'0' DC READ EFFECTIVE LENGTH " PICWORK STRG 4X'0' T * PINTATT STRG 4X'0' INTENSITY ATTRIBUTE n " POFFFLG STRG 4X'0' OFFLINE FLAG PCOPNO BIN TID FOR HARDCOPY PMISCAR STRG 44X'0' CCC,MAIN,
0x1256ec…125880 Dummy {f00=0x00ac, f01=0x0190, f02=» COMMON WORK BLOCK FOR ALL TASKS P* * . P***************************************** 4 P f PCB9 BLK n P* ~ PCNFIGD BOOL PCNFBSY BOOL P* P* CONFIGURATION DATA P* " PNBRKBV BIN NUMBER OF KB/VDUS P
0x125880…125a14 (0, 372) Opaque[0x194]
0x125a14…125ba8 # DirEnt {nam=»DIV267«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x15a0, f03=0x0000}
0x125a14…125ba8 IdxSect {
0x125a14…125ba8 f00 = 0x00ad // 0x125a14 @0x0
0x125a14…125ba8 f01 = 0x0018 // 0x125a16 @0x2
0x125a14…125ba8 gno = [ // 0x125a18 @0x4
0x125a14…125ba8 [0x00]: C0x00ad.0x0.0
0x125a14…125ba8 [0x01]: C0x00ad.0x1.0
0x125a14…125ba8 [0x02]: C0x00ad.0x2.0
0x125a14…125ba8 [0x03]: C0x00ad.0x3.0
0x125a14…125ba8 [0x04]: C0x00ae.0x0.0
0x125a14…125ba8 [0x05]: C0x00ae.0x1.0
0x125a14…125ba8 [0x06]: C0x00ae.0x2.0
0x125a14…125ba8 [0x07]: C0x00ae.0x3.0
0x125a14…125ba8 [0x08]: C0x00af.0x0.0
0x125a14…125ba8 [0x09]: C0x00af.0x1.0
0x125a14…125ba8 [0x0a]: C0x00af.0x2.0
0x125a14…125ba8 [0x0b]: C0x00af.0x3.0
0x125a14…125ba8 ]
0x125a14…125ba8 }
0x125ba8…125d3c Dummy {f00=0x00ad, f01=0x0190, f02=» P IDENT DIV267 03.01.XXX.1 P DDUM KMD08 & P PDIV D P ENTRY FRMTJT Z P ENTRY FRMXJT p P ENTRY FRMTTA P ENTRY FRMXTA P ENTRY FRMTVO P ENTRY FRMTKV P ENTRY FRMXVO P ENTRY FRMTKT
0x125d3c…125ed0 Dummy {f00=0x00ad, f01=0x0190, f02=» INCLUDE EQUATE P P " P * PFRMTJT PROC 2 0 P CALL FMOVE,GTSTRFMT,FTBJT(GTREGDEX) H P RET | P PEND P* PFRMXJT PROC XJTDEX ( P CALL FMOVE,GTSTRFMT,FTBXJT(XJTDEX) P RET P PEND
0x125ed0…126064 Dummy {f00=0x00ad, f01=0x0190, f02=» PFRMXTA PROC XTADEX ( P CALL FMOVE,GTSTRFMT,FTBXTA(XTADEX) " P RET N P PEND Z P* h PFRMTVO PROC r 0 P CALL FMOVE,GTSTRFMT,FTBVO(GTREGDEX) P RET P PEND P* PFRMXVO PROC XVODEX ( P
0x126064…1261f8 Dummy {f00=0x00ad, f01=0x0190, f02=» l P RET P PEND P* " PFRMTKT PROC , 0 P CALL FMOVE,GTSTRFMT,FTBKT(GTREGDEX) B P RET v P PEND P* PFRMXKT PROC XKTDEX ( P CALL FMOVE,GTSTRFMT,FTBXKT(XKTDEX) P RET P PEND
0x1261f8…12638c Dummy {f00=0x00ad, f01=0x0190, f02=» PROC XGPDEX ( P CALL FMOVE,GTSTRFMT,FTBXGP(XGPDEX) P RET @ P PEND L P* Z PFRMBUD PROC BUDDEX d ( P CALL FMOVE,GTSTRFMT,FTBBUD(BUDDEX) ~ P RET P PEND P* PFRMBUP PROC P CALL FMOVE,GTSTRFMT,FRMBPR P R
0x12638c…126520 Dummy {f00=0x00ad, f01=0x0190, f02=»FMT03,JTFMT04,JTFMT02, C n 2 P JTFMT01,JTFMT02,JTFMT08,JTFMT08,JTFMT02, C " . P JTFMT12,JTFMT18,JTFMT18,JTFMT18,JTFMT18 X P* P* PJTFMT01 FRMT 4 P FLINK JTSUBST STARTINF 2 P FLINK JTSUB01
0x126520…1266b4 (0, 373) Dummy {f00=0x00ad, f01=0x0190, f02=»T02 FRMT P FLINK JTFMT02L P FMEND ( P* 6 PJTFMT02L FRMT @ 2 P FLINK JTSUBST SORTINF V 6 P FLINK JTSUB05 REG KONTONO P FILLR ' ',11 P FLINK JTSUB08 VALUE P
0x1266b4…126848 Dummy {f00=0x00ad, f01=0x018e, f02=» FLINK JTSUB06 FOR TRANS 10 P FLINK JTSUB30 ARKIV KNT.NR $ P FILLR ' ',15 H P FMEND f P* | PJTFMT03 FRMT P FLINK JTFMT03L P FMEND P* PJTFMT03L FRMT 4 P FLINK JTSUBST S
0x126848…1269dc Dummy {f00=0x00ad, f01=0x0190, f02=» 0 P FLINK JTSUB08 VALUE P FEOR 8 P FILLR ' ',2 N P FILLR ' ',4 j F P FMEL '99',GTDUPF(CBIN3) BETALINGSKODE BKO P FILLR ' ',5 H P FMEL 'ZZ.ZZ.ZZ',GT
0x1269dc…126b70 Dummy {f00=0x00ad, f01=0x0190, f02=» JTSUB30 ARK KONTO NR P FILLR ' ',2 . 8 P FMEL 'XX',GTDUPF(CBIN11) PALIGNINGSAR J P FILLR ' ',5 4 P FMEL 'ZZZ',GTDUPF(CBIN15) DEB LB NR P FILLR ' ',4 P FMEND
0x126b70…126d04 Dummy {f00=0x00ad, f01=0x0190, f02=» FILLR ' ',15 2 P FLINK JTSUB06 CPR/CIR 0 P FLINK JTSUB08 VALUE T P FEOR P FILLR ' ',2 P FILLR ' ',4 P FMEL '99',GTDUPF(CBIN3) BKO P FILLR ' ',5 D P
0x126d04…126e98 Dummy {f00=0x00ad, f01=0x018e, f02=» ARK KNT NR j B P FMEL 'BBBZZ',GTDUPF(CBIN10) F$R F P FMEL 'BBZZ',GTDUPF(CBIN11) RES $R Z D P FMEL 'BZZ',GTDUPF(CBIN12) RESM$ B P FMEL 'BBZB',GTDUPF
0x126e98…12702c Dummy {f00=0x00ad, f01=0x0190, f02=» PJTFMT08L FRMT 4 P FLINK JTSUBST START INF 2 P FLINK JTSUB01 LINE 1 V P FEOR 2 P FLINK JTSUB04 LINE 2 P FEOR 2 P FLINK JTSUB31
0x12702c…1271c0 Dummy {f00=0x00ad, f01=0x0190, f02=» FRMT 4 P FLINK JTSUBST START INF 8 P FLINK JTSUB05 REG KONTO NR F D P FMEL 'B999',TTCNTNR T#LLER NR P FILLR ' ',5 P FILLR ' ',2 0 P
0x1271c0…127354 (0, 374) Dummy {f00=0x00ad, f01=0x0190, f02=»ILLR ' ',16 P FMEND P* " $ PJTFMT18 FRMT TRANS 18,19,28,29 , ( P FLINK JTFMT01 2 LINES AS TRANS 1,6 T P FEOR P FLINK JTSUB18 3 LINIE P FMEND P* 4 PJTSUBST FRMT START INF P FIL
0x127354…1274e8 Dummy {f00=0x00ad, f01=0x0190, f02=» TRANS, TYPE n P FLINK FLBNR P FMEND . P* D : PJTSUB01 FRMT LINE 1,- 1,5,6 N P FLINK JTSUB05 CPR/CIR P FLINK JTSUB06 REG-KONTO-NR 0 P FLINK JTSUB08 VALUE P
0x1274e8…12767c Dummy {f00=0x00ad, f01=0x0190, f02=» * P FMEL 'BZZ.ZZ.ZZ',GTDUPF(CBIN7) V.DATO B P FMEL 'BBX',GTDUPF(CBIN6) RE$ 2 D P FMEL 'BBX',GTDUPF(CBIN8) BFO x P FLINK JTSUB30 0 P FMEL 'XXXXXXE-XXXX',GTDUPF(CBIN10) YD.MOD
0x12767c…127810 Dummy {f00=0x00ad, f01=0x0190, f02=» ^ 6 P FMEL 'B999E-99E-999E-99B',GTDUPF(CBIN1) P FMEND B P* X 2 PJTSUB06 FRMT CPR/CIR b P FBT BCPR,JTLAB06 ( P FMEL 'XE-XXE-XXE-XXB',GTDUPF(CBIN2) P FB JTLAB08 PJTLAB06
0x127810…1279a4 Dummy {f00=0x00ad, f01=0x0190, f02=»(CBIN2) t PJTLAB08 P FMEND P* 6 P* @ 8 PJTSUB08 FRMT VALUE AND D/K J 6 P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) P FCOPY TTDBKRM P FMEND P* PJTSUB10 FR
0x1279a4…127b38 Dummy {f00=0x00ad, f01=0x0190, f02=»L 'XXX',GTDUPF(CBIN15) TXT * P FMEL 'BXXXXXXXXXX',GTDUPF(CBIN13) NR- " , P FMEL 'BXXXXXXXXXX',GTDUPF(CBIN14) NR-2 P , P FMEL 'BXX.XX.XX',GTDUPF(CBIN18) DATO-1 , P FMEL 'BXX.XX.XX',GTDUPF(CBIN19) DATO-2 P FMEND P* 6 PJTSUB30 FRMT
0x127b38…127ccc Dummy {f00=0x00ad, f01=0x0190, f02=»T LINE 3 - 8 P FILLR ' ',2 . F P FMEL 'ZZ.ZZ.ZZ',GTDUPF(CBIN12) FAKT DATO J F P FMEL 'BZZZZZZZZZZ',GTDUPF(CBIN13) FAKT NR D P FMEL 'BZZZZZZZZ',GTDUPF(CBIN14)
0x127ccc…127e60 Dummy {f00=0x00ad, f01=0x0190, f02=») OMR NR n D P FMEL 'BZZ.ZZ.ZZ',GTDUPF(CBIN18) PER FRA & D P FMEL 'BZZ.ZZ.ZZ',GTDUPF(CBIN19) PER TIL n F P FMEL 'BZ',GTDUPF(CBIN17) ADR KODE P
0x127e60…127ff4 (0, 375) Dummy {f00=0x00ad, f01=0x0190, f02=»2,XJTF03,XJTF04,XJTF05,XJTF06, C v 2 P XJTF07,FMTFMT,XJTF09,XJTF10,XJTF11,VOX15, C * " P XJTF13,XJTF14,VOFMT02,XJTF16 ` P* PXJTF01 FRMT KVITTERING P FILLR ' ',2 P FLINK FLBNR P FCOPY =' KVIT' P FMEND P* P
0x127ff4…128188 Dummy {f00=0x00ad, f01=0x018e, f02=» FILLR ' ',2 P FCOPY ='KONTOKORT' P FBF GTSLDFLG,XJTF02EX 0 & P FMEL 'B*.***.***.**9.99-',TTKTSLD N PXJTF02EX x P FMEND P* PXJTF03 FRMT P FILLR ' ',2 P FCOPY ='START SUM' P FMEND P* PXJTF04 FRMT
0x128188…12831c Dummy {f00=0x00ad, f01=0x0190, f02=» PXJTF05L FRMT P FILLR ' ',2 P FILLR '*',50 0 P FEOR F P FILLR ' ',2 T P FTEXT 'VERSNR ' h P FCOPY ='DAGS-DATO' P FILLR ' ',2 P FCOPY ='POST-DATO' P FILLR ' ',2 P FCOPY ='MASKIN NR' P FCOPY =
0x12831c…1284b0 Dummy {f00=0x00ad, f01=0x0190, f02=»MEL '99E-99E-99',CMASKDAT P FILLR ' ',3 " P FMEL '99E-99E-99',GTDATO 6 P FILLR ' ',3 X P FMEL '999',GTMSK l P FILLR ' ',7 P FMEL '***99',TTSTLBNR P FILLR ' ',3 P FEOR P FILLR ' ',2 : P FCOPY ='VERSURKONTONR
0x1284b0…128644 Dummy {f00=0x00ad, f01=0x0190, f02=»TCASHAC v $ P FMEL 'ZZZ.ZZZ.ZZ9.ZZ-',TTSTCASH P FEOR 8 P FILLR ' ',2 F P FILLR '*',40 Z P FMEND p P* ~ PXJTF06 FRMT P FLINK XJTF06L P FMEND P* PXJTF06L FRMT P FILLR ' ',2 P FILLR '*',50 P
0x128644…1287d8 Dummy {f00=0x00ad, f01=0x0190, f02=» P FILLR ' ',10 P FCOPY ='DEBET' P FILLR ' ',12 6 P FCOPY ='KREDIT' L P FMEND d P* r PXJTF07 FRMT | P FLINK XJTF07L P FMEND P* PXJTF07L FRMT P FILLR ' ',2 P FMEL 'ZZ',GTWBCD1 6 P FMEL 'B
0x1287d8…12896c Dummy {f00=0x00ad, f01=0x0190, f02=»09 FRMT P FCOPY =' START TEST' P FMEND . P* < PXJTF10 FRMT F P FCOPY =' SLUT TEST' Z P FMEND x P* PXJTF11 FRMT P FILLR ' ',2 P FCOPY ='DISKETTE SKIFT ' P FMEND P* PXJTF13 FRMT P F
0x12896c…128b00 Dummy {f00=0x00ad, f01=0x0190, f02=»F(CBIN2) COUNTER NO ~ 2 P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) VALUE P FILLR ' ',2 R P FCOPY ='ADM ' f $ P FMEL 'BZZ',GTDUPF(CBIN5) ADM NO ~ P FMEND P* PXJTF14 FRMT P FSL P FMEL '99B',GTWBCD2 P FCOPY GSWSTR9
0x128b00…128c94 (0, 376) Dummy {f00=0x00ae, f01=0x0190, f02=» z P FCOPY =' CHECK' P FMEND P* . PFMTFMT FRMT 8 P FLINK FMTFMTL L P FMEND b P* p PFMTFMTL FRMT z P FILLR ' ',2 P FTEXT 'DIVERSE FORMATER' P FMEND P EJECT P* : P* FORMATS FOR V
0x128c94…128e28 Dummy {f00=0x00ae, f01=0x0190, f02=»FST01,BAFST02,BAFST08,BAFST08,BAFST02, C ~ 2 P BAFST12,BAFST01,BAFST01,BAFST01,BAFST01, C 2 * P BAFST40,BAFST41,BAFST42,BAFST45, C h 2 P BAFST46,BAFST47,BAFST48,BAFST49,BAFST50, C & P BAFST51,BAFST52,BAFST53,BAFST54 P* P*
0x128e28…128fbc Dummy {f00=0x00ae, f01=0x0190, f02=» HEADER r P FBT TTKORTFL,B1LAB1 P FILLR ' ',6 : " P FMEL 'B**B',GTDUPF(CBIN3) BKO N @ P FMEL 'ZZ.ZZ.ZZB',GTDUPF(CBIN7) BET/VALORDATO t P FB B1LAB2 PB1LAB1 " P FMEL 'B**B',GTDUPF(CBIN3) BKO PB1LAB2
0x128fbc…129150 Dummy {f00=0x00ae, f01=0x018e, f02=» FMEND P* ! P* ! B PBAFST02 FRMT TRANS 02-05-07-10 ! * P FLINK BAFST02L ! p P FMEND ! P* ! PBAFST02L FRMT ! 8 P FLINK BSUB01 HEADER ! P FILLR ' ',1 ! 8 P F
0x129150…1292e4 Dummy {f00=0x00ae, f01=0x0190, f02=» ! @ P FLINK BSUB02 REGKONTO-BELOB " P FMEND " L P* " b P* " l < PBAFST08 FRMT TRANS 08-09 " v P FLINK BAFST08L " P FMEND " P* " PBAFST08L FRMT " 8 P FLI
0x1292e4…129478 Dummy {f00=0x00ae, f01=0x0190, f02=»ZZZB',GTDUPF(CBIN13) FAKTNR " P FB B8LAB5 # $ PB8LAB1 # 6 P FBZ GTUSED(CBIN12),B8LAB2 # D 2 P FMEL 'BBZZ.ZZ.ZZBBB',GTDUPF(CBIN12) FAKTDATO # f P FB B8LAB5 # PB8LAB2 # . P FMEL 'ZZZZ9999.99B',GTDUPF(CBIN14) LEVNR # PB8LAB5 # P FLINK JTSUB
0x129478…12960c Dummy {f00=0x00ae, f01=0x0190, f02=»FRMT TRANS 12 # P FLINK BAFST12L $ P FMEND $ . P* $ < PBAFST12L FRMT $ F P FILLR '+',2 $ P FCOPY GTTESTMK $ x > P FCOPY TTCYM CYKLE-MARKERING $ > P FMEL '999B',GTMSK MASKI
0x12960c…1297a0 Dummy {f00=0x00ae, f01=0x0190, f02=» SUPPLEMENTS-MARK $ l < P FMEL '99',GTREGNR TRANSTYPE-NR % " < P FMEL 'B999',TTCNTNR TAELLER-NR % b 2 P FMEL 'BZZZZZZZZZZ',GTDUPF(CBIN2) DIVERSE TEXT % P FBT TTKORTFL,B12LAB1 % P FILLR '*',13 %
0x1297a0…129934 (0, 377) Dummy {f00=0x00ae, f01=0x0190, f02=»3 FRMT BILAG TRANS 3 % P FLINK BSUB10 & P FLINK BSUB11 & 4 P FLINK BSUB13 & J P FMEND & ` P* & n PBAFST04 FRMT BILAG TRANS 4 & x P FLINK BSUB10 & P FLINK BSUB12 & P FLINK BSUB13 & P FMEND & P* & P* & PBAFST40
0x129934…129ac8 Dummy {f00=0x00ae, f01=0x0190, f02=»MEND & P* ' PBAFST46 FRMT ' P FMEND ' * P* ' 8 PBAFST47 FRMT ' B P FMEND ' V P* ' d PBAFST48 FRMT ' n P FMEND ' P* ' PBAFST49 FRMT ' P FMEND ' P* ' PBAFST50 FRMT ' P FMEND ' P* ' PBAFST51 FRMT ' P F
0x129ac8…129c5c Dummy {f00=0x00ae, f01=0x0190, f02=» ' P* ( P* ( P* ( 8 PBSUB01 FRMT HEADER ( & P FILLR '+',2 ( b P FCOPY GTTESTMK ( ~ > P FCOPY TTCYM CYKLE-MARKERING ( > P FMEL '999B',GTMSK
0x129c5c…129df0 Dummy {f00=0x00ae, f01=0x0190, f02=» SUPPLEMENTS-MARK ( r < P FMEL '99',GTREGNR TRANSTYPE-NR ) ( P FMEND ) h P* ) ~ P ) PBSUB02 FRMT ) @ P FMEL 'B999.99999.99B',GTDUPF(CBIN1) REGKONTONR ) < P FMEL '*.***.***.**9.
0x129df0…129f84 Dummy {f00=0x00ae, f01=0x0190, f02=» FMEND ) P* * P* * PBSUB04 FRMT * & P FCOPY GTTESTMK * < P FCOPY TTCYM * T @ P FMEL '99.99.99B',GTDATO POSTERINGSDATO * h P FCOPY CKMDNAM * : P FMEL 'B999B',GTMSK MASKINNR * " P FMEL '9
0x129f84…12a118 Dummy {f00=0x00ae, f01=0x018e, f02=».***.**9.99-',GTDUPF(CBIN4) BELOB * z B P FCOPY TTDBKRM DEBET/KREDIT-MARK + , P FILLR ' ',1 + r P FMEND + P* + P* + PBSUB06 FRMT + " P FMEL 'B99B',GTDUPF(CBIN3) BKO + P FBT TTKORTFL,B6LAB1 + P
0x12a118…12a2ac Dummy {f00=0x00ae, f01=0x0190, f02=» P* , PBSUB07 FRMT , P FILLR ' ',1 , $ < P FLINK JTSUB06 CPR/CIR-NR , 8 < P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) BELOB , x D P FCOPY TTDBKRM DEBET/KREDIT-MARK , P FILLR '
0x12a2ac…12a440 Dummy {f00=0x00ae, f01=0x0190, f02=»ARK , z P FMEL '999B',GTMSK MASKINNR - P FLINK FLBNR - 0 & P FMEL 'B99.99.99',GTDATO POSTDATO - D " P FMEL 'BXX.',GTDUPF(CBIN3) BKO - n P FMEND - P* - PBSUB11 FRMT - $ P FMEL 'XX',GTDUPF(CBIN11) P]L]R - 2 P FMEL 'E-9999999999B',GTDUPF(CBI
0x12a440…12a5d4 (0, 378) Dummy {f00=0x00ae, f01=0x0190, f02=»BSUB12 FRMT - P FBF TTASKAT,B12LAB5 . $ P FMEL 'XX',GTDUPF(CBIN11) REST]R . 0 P FB B12LAB6 . X PB12LAB5 . l ( P FMEL 'XX',GTDUPF(CBIN10) FORFALDS]R . | PB12LAB6 . 2 P FMEL 'E-9999999999B',GTDUPF(CBIN2) DEBITORNR . , P FMEL 'XX.XXPP',GTDUPF(CBI
0x12a5d4…12a768 Dummy {f00=0x00ae, f01=0x018e, f02=» P FCOPY TTDBKRM / P FILLR ' ',1 / P FMEND / . P* / < PFLBNR FRMT EKSP LB. NR. / F P FBT GTLOKSPG,FLBNR10 / f P FMEL '****9',TTLBNR / P FB FLBNR20 / PFLBNR10 / P FMEL '****9',GTLBNR / PFLBNR20 / P FMEND / P* / P
0x12a768…12a8fc Dummy {f00=0x00ae, f01=0x0190, f02=» / X * P BAXF06,VOSUM07,VOX08,VOX09,VOX10, C 0 ( P VOX11,VOX12,VOX13,VOX14,VOX15, C 0 6 $ P VOX16,VOX17,VOX18,VOX20,VOX20 0 b P* 0 P* 0 PVOFMT02 FRMT TOTAL IN CYCLE 0 P FLINK VOFMT02L 0 P FMEND 0 P* 0 PVOFMT02L FRMT 0 P
0x12a8fc…12aa90 Dummy {f00=0x00ae, f01=0x0190, f02=»PY GSWSTR9 0 & P FMEL '*.***.***.**9.99+',TTCYKTOT 1 P FILLR ' ',2 1 < P FMEND 1 P P* 1 ^ PBAXF04 FRMT 1 h P FLINK BAFST03 1 | P FLINK BAXF05L 1 P FMEND 1 P* 1 PBAXF05 FRMT 1 P FILLR '+',2 1 P FLINK BAXF05L 1 P FMEND 1
0x12aa90…12ac24 Dummy {f00=0x00ae, f01=0x0190, f02=»BAXF06 FRMT 1 P FLINK BAXF06L 2 P FMEND 2 * P* 2 8 PBAXF06L FRMT 2 B P FLINK BAFST03 2 V P FEOR 2 l P FILLR '0',2 2 z P FEOR 2 P FILLR '0',2 2 P FEOR 2 P FLINK KVIT03 2 P FMEND 2 P* 2 PVOSUM07 FRMT SUMBILAG 2
0x12ac24…12adb8 Dummy {f00=0x00ae, f01=0x0190, f02=»99.99.99B',GTDATO EKSP.LB.NR 2 P FMEL '****9',GTSUMST 3 $ P FCOPY ='-' 3 B P FLINK FLBNR 3 V P FILLR ' ',1 3 j P FCOPY ='TOTAL ' 3 & P FMEL '*.***.***.**9,99+',GTSUMCNT 3 P FILLR ' ',2 3 P FMEND 3 P* 3 PVOX08 FRMT 3 P FLINK
0x12adb8…12af4c Dummy {f00=0x00ae, f01=0x0190, f02=»'BB99.99.99',GTDATO 3 P FMEL 'BBZ999',CKMDNR 4 P FMEL 'BB****9',TTSTLBNR 4 : P FTEXT ' - ' 4 Z P FLINK FLBNR 4 n P FILLR ' ',2 4 P FCOPY GSWSTR9 4 P FILLR ' ',2 4 P FCOPY GSWSTR20 TEXT 4 P FEOR 4 P FILLR '2',2 4 P FILLR '*'
0x12af4c…12b0e0 Dummy {f00=0x00ae, f01=0x0190, f02=» FILLR ' ',9 4 P FTEXT 'NETTO' 5 P FILLR ' ',12 5 * P FCOPY ='DEBET' 5 @ P FILLR ' ',12 5 X P FCOPY ='KREDIT' 5 n P FMEND 5 P* 5 PVOX09 FRMT 5 P FLINK VOX09L 5 P FMEND 5 P* 5 PVOX09L FRMT 5 P FILLR '2',2 5 ( P F
0x12b0e0…12b274 (0, 379) Dummy {f00=0x00ae, f01=0x018e, f02=»O 5 ` > P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',C12ACC(GSWBIN5,CBIN2) DEBET 6 > P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',C12ACC(GSWBIN5,CBIN1) KREDIT 6 L P FMEND 6 P* 6 PVOX10 FRMT 6 P FLINK VOX10L 6 P FMEND 6 P* 6 PVOX10L FRMT 6 P FILLR '2',2 6
0x12b274…12b408 Dummy {f00=0x00ae, f01=0x018e, f02=» 6 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(GSWBIN5,CBIN1) 7 P FMEND 7 B P* 7 P PVOX11 FRMT 7 Z P FLINK VOX11L 7 l P FMEND 7 P* 7 PVOX11L FRMT 7 P FILLR '4',2 7 P FTEXT 'TOTAL' 7 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) 7
0x12b408…12b59c Dummy {f00=0x00ae, f01=0x018e, f02=» 7 P FTEXT 'SUPL ' 8 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN5) 8 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(CBIN8,CBIN2) 8 R 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(CBIN8,CBIN1) 8 P FEOR 8 P FILLR '2',2 8 P FTEXT 'KOR' 8 P FILLR ' ',19 8
0x12b59c…12b730 Dummy {f00=0x00ae, f01=0x0190, f02=» 8 PVOX12 FRMT 9 P FLINK VOX12L 9 P FMEND 9 0 P* 9 > PVOX12L FRMT 9 H P FILLR '4',2 9 $ P FMEL '999E-99999E-99',TTCASHAC 9 p P FILLR ' ',1 9 P FTEXT ' PRIMO' 9 * P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTSTCASH 9 P FILLR ' ',34 9 P
0x12b730…12b8c4 Dummy {f00=0x00ae, f01=0x0190, f02=»',GTDUPF(CBIN5) 9 t 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN6) : P FEOR : L P FILLR '2',2 : Z P FTEXT 'ULTIMO' : n ( P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTCASH : P FILLR ' ',34 : P FMEND : P* : PVOX13 FRMT : P FLINK VOX13L : P
0x12b8c4…12ba58 Dummy {f00=0x00ae, f01=0x0190, f02=»TO : z P FILLR ' ',2 ; P FCOPY ='BEHOLDNINGST[LLERE' ; P FILLR ' ',2 ; B P FCOPY GSWSTR20 ; V P FILLR ' ',3 ; n P FEOR ; P FILLR '2',2 ; P FILLR '*',56 ; P FEOR ; P FILLR '4',2 ; P FCOPY ='T[LLER' ; P FILLR ' ',4 ; P
0x12ba58…12bbec Dummy {f00=0x00ae, f01=0x0190, f02=»',1 ; P FMEND < P* < PVOX14 FRMT < $ P FLINK VOX14L < 6 P FMEND < L P* < Z PVOX14L FRMT < d P FILLR '2',2 < x P FMEL 'ZZ',GTWBCD1 < P FILLR ' ',4 < 0 P FMEL 'XXXE-XXXXXE-XX',CBACC(GSWBIN3,CBIN1) < 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.9
0x12bbec…12bd80 Dummy {f00=0x00ae, f01=0x0190, f02=»LR '2',2 < P FCOPY GSWSTR20 = P FMEND = ( P* = 6 PVOX16 FRMT = @ P FILLR ' ',2 = R P FLINK VOX16L = f P FMEND = | P* = PVOX16L FRMT = P FILLR X'24',40 NO. = P FILLR X'3C',40 5. = P FNL = P FNL = P FILLR X'5D',40 ]
0x12bd80…12bf14 (0, 380) Dummy {f00=0x00af, f01=0x0190, f02=»ILLR X'5B',40 [ = P FILLR X'5C',40 OE > P FMEND > 2 P* > @ PVOX17 FRMT > J P FLINK VOX17L > P FMEND > r P* > PVOX17L FRMT > P FILLR '+',2 > , P FMEL '99E-99E-99',GTDATO POSTERINGSDATO > P FILLR ' ',6 > P FLINK FLBNR >
0x12bf14…12c0a8 Dummy {f00=0x00af, f01=0x018e, f02=»UPF(CBIN2) CHECKNR(DIV.TXT) > | P FILLR ' ',8 ? $ P FMEND ? 8 P* ? F PVOX18 FRMT ? P P FLINK VOX18L ? b P FMEND ? x P* ? PVOX18L FRMT ? P FILLR '2',2 ? P FILLR ' ',17 ? * P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GSWBCD6 ? * P FMEL 'BBZZZ
0x12c0a8…12c23c Dummy {f00=0x00af, f01=0x0190, f02=» ? P FILLR '2',2 @ P FBF GTDYFLG,V20L10 @ P FCOPY ='TOTAL' @ 8 P FILLR ' ',59 @ P P FEOR @ f P FILLR '2',2 @ t PV20L10 @ ( P FMEL 'XXXE-XXXXXE-XX',GTDUPF(CBIN1) @ P FILLR ' ',4 @ P FMEL 'XX',GTWBCD1 @ P FBT GTSWFLAG,V20L20 @
0x12c23c…12c3d0 Dummy {f00=0x00af, f01=0x0190, f02=»L 'BBZZZ.ZZZ.ZZZ.ZZ9,99-',GTDUPF(CBIN5) @ 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9,99-',GTDUPF(CBIN6) A 0 PV20L90 A d P FMEND A r P EJECT A P* A . P* FORMATS FOR EXTRA 'KVITTERING' A ( P* (MOSTLY AS NORMAL 'BILAG' A P* A : PFTBKV FT
0x12c3d0…12c564 Dummy {f00=0x00af, f01=0x018e, f02=»FST01,BAFST01 A t P* B P* B PKVIT03 FRMT B * P FILLR '+',2 B > P FLINK BSUB04 B R P FLINK BSUB05 B h P FMEND B ~ P* B P EJECT B P* B " P* FORMATS FOR KONTOKORT B P* B @ PFTBKT FTABLE KAFST01,KAFST02,KA
0x12c564…12c6f8 Dummy {f00=0x00af, f01=0x0190, f02=» P* C P* C PKAFST00 FRMT C P FMEND C . P* C D P* C N < PKAFST01 FRMT TRANS 01-06 C X P FLINK BAFST01 C P FLINK SKAF01 LINE NR C P FMEND C P* C P* C : PKAFST02 F
0x12c6f8…12c88c Dummy {f00=0x00af, f01=0x0190, f02=» C P D : PKAFST12 FRMT TRANS 12 D P FLINK BAFST12 D N P FLINK SKAF01 LINE NR D l P FMEND D P* D P* D : PKAFST03 FRMT TRANS 03 D P FLINK KAFST03L D
0x12c88c…12ca20 Dummy {f00=0x00af, f01=0x0190, f02=»TKORTFL,KLAB31 D 2 P FMEL 'XX.XXPP',GTDUPF(CBIN7) VAL.DATE, DD.MM E PKLAB31 E L > P FMEL 'BXX',GTDUPF(CBIN11) PALIGNINGS$R E Z $ P FCOPY TT16TXT RENTE/GEBYR/INDB E ( P FLINK BSUB07 CPR/CIR/BELOB/LINIENR E P FMEND E P*
0x12ca20…12cbb4 (0, 381) Dummy {f00=0x00af, f01=0x0190, f02=» FRMT E 8 P FLINK BSUB01 HEADER F < P FLINK BSUB06 BETART/DATO F J P FBF TTKORTFL,KLAB40 F 2 P FMEL 'XX.XXPP',GTDUPF(CBIN7) VAL DATE, DD.MM F PKLAB40 F P FBF TTASKAT,KLAB41 F 0 P F
0x12cbb4…12cd48 Dummy {f00=0x00af, f01=0x0190, f02=»LR ' ',3 F 4 P FMEL 'B**',GTDUPF(CBIN10) FORF.AAR - CPR, BSKAT G PKLAB42 G H F P FLINK BSUB07 CPR/CIR-BELOB-LINIENR G V P FMEND G P* G PSKAF01 FRMT G P FBF CKTFLAG,SKAF02 G P FBT GTSLDFLG,SKAF04 G
0x12cd48…12cedc Dummy {f00=0x00af, f01=0x0190, f02=»TLIN NEW LINE G " P FMEL '9',TTKTCHK CHECK DIGIT H P FB SKAF05 H < PSKAF02 H N P FMEL '99B',TTKTLIN H PSKAF05 H x P FMEND H P* H P EJECT H P* H . P* VARIOUS FORMATS FOR 'KONTOKORT' H P* H PFTBXKT FTABLE XKTTRP H
0x12cedc…12d070 Dummy {f00=0x00af, f01=0x0190, f02=».99',GTDATO H P FILLR ' ',43 I & P FMEL '*.***.***.**9.99-',TTKTSLD I * P FILLR ' ',2 I T P FCOPY ='TRP ' I h P FMEND I ~ P EJECT I P* I $ P* FORMATS FOR TALLY ROLL I P* I PFTBTA FTABLE FMTFMT I P* I P* I
0x12d070…12d204 Dummy {f00=0x00af, f01=0x018e, f02=»2,TAFMT04,TAFMT05, C I l P VOX15,TAFMT07 J P* J 8 PTAFMT01 FRMT J B P FSL J V P FNL J b P FNL J n P FILLR '*',1 J z P FILLR ' ',1 J P FMEND J P* J PTAFMT02 FRMT J P FLINK TAFMT02L J P FMEND J P* J PTAFMT02L F
0x12d204…12d398 Dummy {f00=0x00af, f01=0x0190, f02=» J PTAFMT04 FRMT K P FILLR '+',2 K , P FMEL 'Z.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) K 0 P FCOPY TTDBKRM K ` P FMEND K v P* K PTAFMT05 FRMT K P FILLR '+',2 K & P FMEL 'Z.ZZZ.ZZZ.ZZ9.99-',GSWBCD6 K P FILLR ' ',1 K P FMEND K P* K
0x12d398…12d52c Dummy {f00=0x00af, f01=0x0190, f02=»FTBBUD FTABLE PB40FRM2,PB41FRM2,PB42FRM2,FMTFMT,FMTFMT, C K 6 P PB45FRM2,PB46FRM2,PB47FRM2,PB48FRM2,PB49FRM2, C L B 2 P PB40FRM3,PB41FRM3,PB42FRM3,FMTFMT,FMTFMT, C L | 2 P PB45FRM3,PB46FRM3,PB47FRM3,PB48FRM3,PB49FRM3 L L L PB40FRM2 FRMT L
0x12d52c…12d6c0 Dummy {f00=0x00af, f01=0x0190, f02=»0 L P FLINK BUSUB22 M P FMEND M M . M 6 PB41FRM2 FRMT M > P FLINK BUSUB0 M T P FLINK BUSUB17 M j FMEND M P M P M PPB41FRM3 FRMT M P FLINK BUSUB0 M P FLINK BUSUB22 M P FMEND M M M PB42FRM2 F
0x12d6c0…12d854 (0, 382) Dummy {f00=0x00af, f01=0x0190, f02=» BUSUB22 M P FMEND N N N & PPB45FRM2 FRMT N . P FLINK BUSUB0 N D P FLINK BUSUB15 N Z FLINK BUSUB13 N p FMEND N P N P N PPB45FRM3 FRMT N P FLINK BUSUB0 N P FILLR ' ',35 N * P FMEL 'BZZZZVZZZVZZZ-',GTREGF(CBIN
0x12d854…12d9e8 Dummy {f00=0x00af, f01=0x0190, f02=»ZZ9',GTREGF(CBIN13) DETALJ. KODE N P FILLR ' ',2 O ( FLINK BUSUB13 O < FMEND O R P O ` P O h PPB46FRM3 FRMT O p P FLINK BUSUB0 O P FILLR ' ',44 O * P FMEL 'BZZZZVZZZVZZ9-',GTREGF(CBIN18) O P FMEND O O O PB47FRM2 F
0x12d9e8…12db7c Dummy {f00=0x00af, f01=0x018e, f02=» O PPB47FRM3 FRMT P P FLINK BUSUB0 P P FILLR ' ',24 P 4 * P FMEL 'BZZZZVZZZVZZ9-',GTREGF(CBIN18) P J P FMEND P x P P PB48FRM2 FRMT P P FLINK BUSUB0 P P FLINK BUSUB14 P P FLINK BUSUB16 P FMEND P P P P P
0x12db7c…12dd10 Dummy {f00=0x00af, f01=0x0190, f02=» Q Q PB49FRM2 FRMT Q P FLINK BUSUB0 Q * P FLINK BUSUB14 Q @ P FLINK BUSUB16 Q V FMEND Q l P Q z P Q PPB49FRM3 FRMT Q P FLINK BUSUB0 Q P FILLR ' ',22 Q * P FMEL 'BZZZZVZZZVZZ9-',GTREGF(CBIN18) Q P FMEND Q P
0x12dd10…12dea4 Dummy {f00=0x00af, f01=0x0190, f02=»(CBIN12) Q , P FMEL 'B999E-99E-999E-99B',GTREGF(CBIN1) R FMEND R @ R N R V BUSUB12 FRMT R ^ FILLR '*',1 R r & P FMEL 'ZZZZZZZZZX-',GTREGF(CBIN3) R & P FMEL 'ZZZZZZZZZX-',GTREGF(CBIN4) R & P FMEL 'ZZZZZZZZZX-',GTREGF(CBIN5) R & P FME
0x12dea4…12e038 Dummy {f00=0x00af, f01=0x0190, f02=»ZZX-',GTREGF(CBIN9) R & P FMEL 'ZZZZZZZZZX-',GTREGF(CBIN10) S P FEOR S F FMEND S T S b S j BUSUB13 FRMT S r FILLR '*',1 S P FILLR ' ',3 S * P FMEL '999E-99E-999E-99',GTREGF(CBIN1) S FILLR ' ',3 S * P FMEL 'BZZZZVZZZVZZX-',G
0x12e038…12e1cc Dummy {f00=0x00af, f01=0x0190, f02=» ' ',3 S FMEND T T T $ BUSUB15 FRMT T , FLINK BUSUB14 T @ " P FMEL '99',GTREGF(CBIN14) YEAR T V FILLR ' ',2 T | FMEND T P T P T PBUSUB16 FRMT T P FILLR '*',1 T P FILLR ' ',3 T P FMEL '9999',GTREGF(CBIN1) T
0x12e1cc…12e360 Dummy {f00=0x00af, f01=0x0190, f02=»NK BUSUB11 T ( P FMEL '9B9999B999B99',GTREGF(CBIN2) U P FILLR ' ',1 U > FLINK BUSUB12 U R P FMEND U h P U v P U ~ PBUSUB22 FRMT U P FILLR '*',1 U & P FMEL 'ZZZZZZZZZ9-',GTREGF(CBIN14) U & P FMEL 'ZZZZZZZZZ9-',GTREGF(CBIN15) U & P FMEL
0x12e360…12e4f4 (0, 383) Dummy {f00=0x00af, f01=0x0190, f02=»9-',GTREGF(CBIN19) U & P FMEL 'ZZZZZZZZZ9-',GTREGF(CBIN20) V & P FMEL 'ZZZZZZZZZ9-',GTREGF(CBIN21) V D P FEOR V n P FMEND V | P V P V PFRMBPR FRMT V P FILLR '+',2 V P FCOPY GSWSTR20 V P FILLR ' ',5 V P FMEL 'XXVXXVXX',CMASKDAT
0x12e4f4…12e688 Dummy {f00=0x00af, f01=0x40d4, f02=» V PFTBGP FTABLE FMTFMT W P* W $ P* W . P* W 8 2 P* VARIOUS FORMATS FOR GENERAL PRINTER W B P* W x PFTBXGP FTABLE FMTFMT W P* W P* W P* W P END W @ W P FILLR ' ',5 V P FMEL 'XXVXXVXX',CMASKDAT
0x12e688…12e81c Dummy {f00=0x00af, f01=0x2008, f02=» X P* CAN NOT BE IDENTIFIED BY TRANSTYPE (OR GTREGDEX) ' P* ' L PFTBXX FTABLE ' V P* ' n P* ' x P END ' @ ' & z P* & PFTBTA FTABLE & P* & P* & P EJECT & P* & ( P* FORMATS
0x12e81c…12e9b0 Dummy {f00=0x00af, f01=0x0190, f02=» , ( K _ _ B U C Q C T:CLR1N 4 T:CLR2 F , ( i @ D X X * X , ( $" ~_> @ Y X * _R X !@ , ( XX y X # x V y X X , ( * P P 1 _
0x12e9b0…12eb44 Dummy {f00=0x00af, f01=0x415e, f02=» X 1 1 X x , ( ? !@T X $ " P y _ T:CLIT@ H T:EKEY Z , ( _ x T X H X l $ { X * , )$ P _ : H D !T P l )Wz 9 UP m l yV* Ph R^ PP +P ET YU cQ m z o |
0x12eb44…12ecd8 Dummy {f00=0x00af, f01=0x0190, f02=» 4 F IDENT T:DYKI P,REL=4.2,791116,870136940420 J F " T:DYKIK T:PM1 T:PM2 T:CLR1 T:CLIT T:CLR2 T:IOER@ T:EKEY T:BELLC < T:DYKIK I:EVA7@ , ( @ ' Y y , ( x C y X C C
0x12ecd8…12ee6c Dummy {f00=0x00af, f01=0x0190, f02=» T:CLRD * & } _` y C Q " T , ( X ! X X ! x D , ( Y Y _ X "@P B R y t , ( C B P 9 V _F9 V X ! , ( T X !@X y C _d y C C T
0x12ee6c…12f000 Dummy {f00=0x00af, f01=0x0190, f02=» c C _$ _ T:CLR2 b T:SCUW 4 , ( U y _6 x X@ X X F , ( s # C _. B ]d P v , ( C Q X8_H x XD @ Y c , ( C y XR X x
0x12f000…12f194 (0, 384) Opaque[0x194]
0x12f194…12f328 # DirEnt {nam=»C267 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1600, f03=0x0000}
0x12f194…12f328 IdxSect {
0x12f194…12f328 f00 = 0x00b0 // 0x12f194 @0x0
0x12f194…12f328 f01 = 0x0004 // 0x12f196 @0x2
0x12f194…12f328 gno = [ // 0x12f198 @0x4
0x12f194…12f328 [0x00]: C0x00b0.0x0.0
0x12f194…12f328 [0x01]: C0x00b0.0x1.0
0x12f194…12f328 ]
0x12f194…12f328 }
0x12f328…12f4bc Dummy {f00=0x00b0, f01=0x018e, f02=» T; P01; TID=TC; TCL=TC; * LEV=60; : P02; J PTDC=T03; V PLC=01L; f PTDC=T07; v PLC=01L; P01; PSCL=S04; PT; P01; PTID=TD; PTCL=TC; PLEV=60; P01; PTDC=
0x12f4bc…12f650 Dummy {f00=0x00b0, f01=0x0190, f02=» PTDC=T04; PLC=02L; P03; $ PSCL=S02; 0 PSCL=S03; @ PSCL=S04; P PT; ` P01; j PTID=RA; v PTCL=RA; PLEV=60; P02; PTDC=T02; PLC=06L; PTDC=T06; PLC=06L; P00; PT; P
0x12f650…12f7e4 Dummy {f00=0x00b0, f01=0x0190, f02=»00; PT; P01; PTID=GA; " PTCL=GA; 2 PLEV=60; B P01; R PTDC=T05; ^ PLC=03L; n P03; ~ PSCL=S02; PSCL=S03; PSCL=S04; PT; P01; PTID=GB; PTCL=GA; PLEV=60; P01;
0x12f7e4…12f978 Dummy {f00=0x00b0, f01=0x018e, f02=»L=GA; PLEV=60; P01; PTDC=T05; * PLC=04L; : P03; J PSCL=S02; V PSCL=S03; f PSCL=S04; v PT; P02; PTID=GD; PTCL=GA; PLEV=60; P01; PTDC=T05; PLC=07L; P03; PSCL=
0x12f978…12fb0c Dummy {f00=0x00b0, f01=0x00fe, f02=» PSCL=S02; PSCL=S03; PSCL=S04; $ PSCL=S05; 4 T; D 01; N TID=D0; Z TCL=D0; j LEV=60; z 00; P00; PC; P00; P01; PSCL=S01; U; 001; TB2; P002; PSCL=
0x12fb0c…12fca0 Dummy {f00=0x00b0, f01=0x2008, f02=» S02; PSCL=S03; PSCL=S04; $ PSCL=S05; 4 T; D 01; N TID=D0; Z TCL=D0; j LEV=60; z 00; P00; PC; P00; P01; PSCL=S01; U; 001; TB2; P002; PSCL=
0x12fca0…12fe34 (0, 385) Dummy {f00=0x00b0, f01=0x40aa, f02=» : H IDENT U:BTAB TRA 4.2 - - F1 O1111 04.01.XXX.1 U:BTAB B U:BTABB T U:TB20 h @ TB2 z :T @
0x12fe34…12ffc8 Dummy {f00=0x00b0, f01=0x4090, f02=» : H IDENT S:BTAB TRA 4.2 - - F1 O1111 04.01.XXX.1 S:BTAB B S:BTABB T h :B z@ :T @
0x12ffc8…13015c Dummy {f00=0x00b0, f01=0x40e2, f02=» : H IDENT C:CB10 TRA 4.2 - - F1 O1111 04.01.XXX.1 C:CB10 B C:CB10C T * & h * 0 0 @
0x13015c…1302f0 Dummy {f00=0x00b0, f01=0x40f4, f02=» : H IDENT D:CB10 TRA 4.2 - - F1 O1111 04.01.XXX.1 D:CB10 B D:CB10C T * & F h * & = F @
0x1302f0…130484 Dummy {f00=0x00b0, f01=0x0190, f02=» : H IDENT C:CB20 TRA 4.2 - - F1 O1111 04.01.XXX.1 C:CB20 B C:CB20C T * & 8 h * & * & = * & [
0x130484…130618 Dummy {f00=0x00b0, f01=0x40f6, f02=» | * & * & H * & v $ - h d h D - D @ [
0x130618…1307ac Dummy {f00=0x00b0, f01=0x40f4, f02=» : H IDENT D:CB20 TRA 4.2 - - F1 O1111 04.01.XXX.1 D:CB20 B D:CB20C T * & F h * & = 8 F @ [
0x1307ac…130940 Dummy {f00=0x00b0, f01=0x0190, f02=» : H IDENT C:CB30 TRA 4.2 - - F1 O1111 04.01.XXX.1 C:CB30 B C:CB30C T & h & | & = & [ & y & & & & &
0x130940…130ad4 (0, 386) Opaque[0x194]
0x130ad4…130c68 # DirEnt {nam=»KTPLND«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1610, f03=0x0000}
0x130ad4…130c68 IdxSect {
0x130ad4…130c68 f00 = 0x00b0 // 0x130ad4 @0x0
0x130ad4…130c68 f01 = 0x0002 // 0x130ad6 @0x2
0x130ad4…130c68 gno = [ // 0x130ad8 @0x4
0x130ad4…130c68 [0x00]: C0x00b0.0x2.0
0x130ad4…130c68 ]
0x130ad4…130c68 }
0x130c68…130dfc Dummy {f00=0x00b0, f01=0x018e, f02=» P IDENT KTPLND 03.01.XXX.1 DDUM KMD08 & PDIV : ******************** H * d * %* DUMMY MODULE FOR KONTOPLAN n * ******************** * ENTRY KTPLAN P ENTRY SETMK INCLUDE EQUATE
0x130dfc…130f90 Dummy {f00=0x00b0, f01=0x4062, f02=» PSETMK PROC P RET P PEND & P* 4 P* > P* H END R@ ^ * d * %* DUMMY MODULE FOR KONTOPLAN n * ******************** * ENTRY KTPLAN P ENTRY SETMK INCLUDE EQUATE
0x130f90…131124 Dummy {f00=0x00b0, f01=0x2008, f02=» KTOPR PROC CMP CBIN0,CBIN0 RET 2 PEND > END L@ X H * d * %* DUMMY MODULE FOR KONTOPLAN n * ******************** * ENTRY KTPLAN ENTRY KTOPR INCLUDE EQUATE
0x131124…1312b8 Dummy {f00=0x00b0, f01=0x0000, f02=»
[…0x2…]
0x1315e0…131774 (0, 387) Opaque[0x194]
0x131774…131908 # DirEnt {nam=»KTOPR «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1618, f03=0x0000}
0x131774…131908 IdxSect {
0x131774…131908 f00 = 0x00b0 // 0x131774 @0x0
0x131774…131908 f01 = 0x0006 // 0x131776 @0x2
0x131774…131908 gno = [ // 0x131778 @0x4
0x131774…131908 [0x00]: C0x00b0.0x3.0
0x131774…131908 [0x01]: C0x00b1.0x0.0
0x131774…131908 [0x02]: C0x00b1.0x1.0
0x131774…131908 ]
0x131774…131908 }
0x131908…131a9c Dummy {f00=0x00b0, f01=0x0190, f02=» P IDENT KTOPR 03.01.XXX.1 DDUM KMD08 & PDIV : ENTRY KTOPR H P ENTRY KTPRT P EXT ADMRET p EXT KTPLAN P EXT RESTMK P EXT RAREAD P EXT RAWRIT P EXT SPCLRA P EXT SPCLRN P EXT SPERR
0x131a9c…131c30 Dummy {f00=0x00b0, f01=0x0190, f02=» | P* * P* OPRETTELSE/SLETNING I KONTOPLAN P* @ P******************** J & P TBT GTMASTFL,KTCR00A ONLY MASTER f P B KTCROK1 PKTCR00A * P CMP CTASKNR,CBIN0 ALL MUST BE CLOSED P BNE KTCROK1 ( P SET CCONVFLG CLOSE
0x131c30…131dc4 Dummy {f00=0x00b0, f01=0x0190, f02=» ATTFMT KTPFRM01 P PERF SPCLRA & P IB SPBINW2,KTCROK,KTCROK,KTCR100 , P B KTCR000 V * PKTCR100 CLEAR CSWFLAG LOOK FOR NUMBER h P PERF KTPLAN,GSWBCD6,GSWBCD3 " P BNOK KTCR000 ERROR ON KTPLAN P CBL GSWBIN5,CBIN0,KTCR110 P SET C
0x131dc4…131f58 Dummy {f00=0x00b0, f01=0x0190, f02=»130,KTCR150 x P B KTCR120 PKTCR130 B KTCR000 & PKTCR150 @ & P TBF CSWFLAG,KTCR500 IF NOT FOUND P P* FOUND z 0 P CBL GSWBCD3,=D'1',KTCR200 BRANCH TO DELETE P ADD GSWBIN5,CBIN6 . P XCOPY CKTBUF,GSWBIN5,CBIN2,GSWBCD3,CBIN1
0x131f58…1320ec Dummy {f00=0x00b0, f01=0x0190, f02=» - RECORD NO | , P* GSWBIN5-6 - START OF RECORD PKTCR200 D . P DLETE CKTBUF,GSWBIN5,CBIN8 DELETE RECORD T " P CBNE GSWBIN4,CKTLAST,KTCR250 $ P NOW THIS IS LAST USED RECORD . P XCOPY GSWSTR20,CBIN0,CBIN20,CKTBUF,CBIN0 " P C
0x1320ec…132280 Dummy {f00=0x00b0, f01=0x0190, f02=» SUB CKTLAST,CBIN1 P SUB GSWBIN4,CBIN1 P CBE GSWBIN4,CBIN0,KTCR215 4 P MOVE GSWBIN5,=W'128' V 2 P PERF RAREAD,DK04,=D'4',CKTBUF,GSWBIN5,CKTLAST t P BNOK KTCR000 PKTCR215 P PERF RESTMK P B KTCR000 PKTCR220 2 P P
0x132280…132414 (0, 388) Dummy {f00=0x00b1, f01=0x0190, f02=»BIN4,CBIN1 NOT LAST RECORD P MOVE CCYBUF,CBLANKS " P MOVE GSWBIN5,=W'128' > 2 P PERF RAREAD,DK04,=D'4',CCYBUF,GSWBIN5,GSWBIN4 P BNOK KTCROK P MOVE GSWBIN5,=W'120' , P XCOPY CKTBUF,GSWBIN5,CBIN8,CCYBUF,CBIN0 P MOVE GSWBIN5,CBIN0
0x132414…1325a8 Dummy {f00=0x00b1, f01=0x0190, f02=»BUF P MOVE GSWBIN5,CBIN0 P ADD GSWBIN4,CBIN1 ( P B KTCR200 B PKTCR500 T P NOT FOUND d P CMP GSWBCD3,=D'1' x $ P BL KTCR000 DELETE NON-EXISTING P* CREATE NEW P MOVE CKTBUF,CBLANKS P MOVE GSWBIN5,=W'128'
0x1325a8…13273c Dummy {f00=0x00b1, f01=0x0190, f02=» PKTCR520 P MOVE GSWBCD7,=D'1' . P XCOPY GSWSTR20,CBIN0,CBIN6,CKTBUF,GSWBIN5 0 . P XCOPY GSWBCD7,CBIN1,CBIN6,CKTBUF,GSWBIN5 b : P CBE GSWSTR20,CBLANKS,KTCR550 POSITION FOUND (BLANK) 0 P CBG GSWBCD7,GSWBCD6,KTCR550 POSITION FOUND P A
0x13273c…1328d0 Dummy {f00=0x00b1, f01=0x0190, f02=» P ADD GSWBIN4,CBIN1 P CBNG GSWBIN4,CKTMAX,KTCR540 P* SET UP ERROR 10 B PKTCR535 ` P MOVE SPBINW4,CBIN21 p P MOVE GTWBCD2,=D'04' P MOVE GTWBCD1,=D'10' P MOVE GSWSTR9,=C'DISCFEJL ' P PERF SPERR P B KTCR000
0x1328d0…132a64 Dummy {f00=0x00b1, f01=0x0190, f02=»NOK KTCR000 P MOVE GSWBIN5,CBIN0 PKTCR550 0 . P XCOPY GSWSTR20,CBIN0,CBIN6,GSWBCD6,CBIN1 @ . P XCOPY GSWSTR20,CBIN6,CBIN2,GSWBCD3,CBIN1 r PKTCR560 P MOVE GSWBIN3,=W'120' 8 P XCOPY GSWSTR20,CBIN8,CBIN8,CKTBUF,GSWBIN3 SAVE LAST
0x132a64…132bf8 Dummy {f00=0x00b1, f01=0x0190, f02=»'4',CKTBUF,GSWBIN4 | P BNOK KTCROK P PERF RESTMK . P B KTCR000 B PKTCR600 T " P CBNE GSWBIN4,CKTLAST,KTCR610 d P CBE CKTLAST,CKTMAX,KTCR535 P ADD CKTLAST,CBIN1 PKTCR610 * P PERF RAWRIT,DK04,=D'4',CKTBUF,GSWBIN4 P B
0x132bf8…132d8c Dummy {f00=0x00b1, f01=0x0190, f02=»K04,=D'4',CKTBUF,GSWBIN5,GSWBIN4 P BNOK KTCROK ( P MOVE GSWBIN5,CBIN0 < . P COPY GSWSTR20,CBIN0,CBIN8,GSWSTR20,CBIN8 X P B KTCR560 PKTCROK P CLEAR CCONVFLG PKTCROK1 P B ADMRET P EJECT PKTPRT PROC P****
0x132d8c…132f20 Dummy {f00=0x00b1, f01=0x0190, f02=»TFL,KTPRTOK ONLY MASTER P CBNE CTASKNR,CBIN0,KTPRTOK P WAIT KTALLY D ( P EDWRT KTALLY,KTPF100 WRITE HEADING X P* LOOP THROUGH FILE P MOVE GSWBIN4,CBIN0 PKTPRT15 P ADD GSWBIN4,CBIN1 8 P CBG GSWBIN4,CKTLAST,KTPRT90 N
0x132f20…1330b4 (0, 389) Dummy {f00=0x00b1, f01=0x0190, f02=»',CKTBUF,GSWBIN5,GSWBIN4 z P BNOK KTPRT45 P* LOOP THROUGH BUFFER 6 P MOVE GSWBIN5,CBIN0 X PKTPRT35 t P MOVE GSWBCD6,=D'1' P MOVE GSWBCD3,=D'1' P MOVE GSWSTR20,CBLANKS . P XCOPY GSWSTR20,CBIN0,CBIN8,CKTBUF,GSWBIN5
0x1330b4…133248 Dummy {f00=0x00b1, f01=0x0190, f02=»SWBIN5,CBIN2 " P CBE GSWSTR20,CBLANKS,KTPRT80 P WAIT KTALLY : $ P EDWRT KTALLY,KTPF200 PRINT LINE N P CBL GSWBIN5,=W'128',KTPRT35 v P* P PERF FRMXTA,CBIN1 P PERF WTALLY PKTPRT45 P CLEAR CKFLAG P B KTPRT15
0x133248…1333dc Dummy {f00=0x00b1, f01=0x0190, f02=» P RET P PEND P EJECT P* , P* 6 P* FORMATS @ P* T P ^ PKTPFRM01 FRMT f P FLINK KTPF100 | P FBF GTDYFLG,KTPF010 * P FKI 1,ME,MINL=10,MAXL=10,REWRT,SCHK=1 PKTPF010 P FMEL '99999999E-99',GSWBCD6
0x1333dc…133570 Dummy {f00=0x00b1, f01=0x0190, f02=»PF100 FRMT P FSL P FCOPY =C'ADM ' P FNL 8 P FCOPY =C'DATAS[T' D P FILLR ' ',1 ^ P FCOPY =C'REGKONTONR' r P FILLR ' ',2 P FNL P FCOPY =C'KONTONR' P FILLR ' ',5 P FCOPY =C'BFO' P FILLR ' ',2 P
0x133570…133704 Dummy {f00=0x00b1, f01=0x4060, f02=»'BBZ9',GSWBCD3 TYPE P FILLR ' ',2 P FMEND 0 P* > P H END P@ ILLR ' ',1 ^ P FCOPY =C'REGKONTONR' r P FILLR ' ',2 P FNL P FCOPY =C'KONTONR' P FILLR ' ',5 P FCOPY =C'BFO' P FILLR ' ',2 P
0x133704…133898 Dummy {f00=0x00b1, f01=0x2008, f02=» NT KTOPR 01.03.XXX.1 DDUM KMD08 $ PDIV 8 ENTRY KTOPR F EXT KTPLAN Z * n END x@
0x133898…133a2c Dummy {f00=0x00b1, f01=0x0190, f02=»PF(CBIN7),GSWBCD7 VALORDATO ; 0 P PERF XCOP,GSWBIN1,=W'0',=W'2',CTRBUF,=W'18' < $ ( P MOVE GTDUPF(CBIN15),GSWBIN1 TEXTNR < X P MOVE GSWBIN1,CBIN0 < 0 P PERF XCOP,GSWBIN1,=W'1',=W'1',CTRBUF,=W'20' < P MOVE GTDUPF(CBIN21),GSWBIN1 < 0 P PERF XCOP,GSWBC
0x133a2c…133bc0 Dummy {f00=0x00b1, f01=0x0190, f02=»W'1',CTRBUF,=W'28' < v , P MOVE GTDUPF(CBIN6),GSWBCD7 REGNSKABS]R = " P MOVE GSWBCD7,=D'1' REGKONTONR = J 0 P PERF XCOP,GSWBCD7,=W'2',=W'5',CTRBUF,=W'29' = p P MOVE GTDUPF(CBIN1),GSWBCD7 = P MOVE GTDUPF(CBIN13),=D'0' = P MOVE GTDUPF(CBIN14),=D'0' =
0x133bc0…133d54 (0, 390) Opaque[0x194]
0x133d54…133ee8 # DirEnt {nam=»KTOPRD«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1630, f03=0x0000}
0x133d54…133ee8 IdxSect {
0x133d54…133ee8 f00 = 0x00b1 // 0x133d54 @0x0
0x133d54…133ee8 f01 = 0x0002 // 0x133d56 @0x2
0x133d54…133ee8 gno = [ // 0x133d58 @0x4
0x133d54…133ee8 [0x00]: C0x00b1.0x2.0
0x133d54…133ee8 ]
0x133d54…133ee8 }
0x133ee8…13407c Dummy {f00=0x00b1, f01=0x0190, f02=» P IDENT KTOPRD 03.01.XXX.1 DDUM KMD08 & PDIV : ******************** H * d * %* DUMMY MODULE FOR KONTOPLAN n * ******************** * ENTRY KTOPR P ENTRY KTPRT P EXT ADMRET
0x13407c…134210 Dummy {f00=0x00b1, f01=0x401a, f02=»* END @ XX.1 DDUM KMD08 & PDIV : ******************** H * d * %* DUMMY MODULE FOR KONTOPLAN n * ******************** * ENTRY KTOPR P ENTRY KTPRT P EXT ADMRET
0x134210…1343a4 Dummy {f00=0x00b1, f01=0x2008, f02=» KTOPR PROC CMP CBIN0,CBIN0 RET 2 PEND > END L@ X H * d * %* DUMMY MODULE FOR KONTOPLAN n * ******************** * ENTRY KTPLAN ENTRY KTOPR INCLUDE EQUATE
0x1343a4…134538 Dummy {f00=0x00b1, f01=0x018e, f02=»X = 121+(TTASKNR*24)+7+(NR*3)+ART z : 6* = ((TTASKNR*8)+NR)*3+ART+121+7 * * h P* TYPE = 4 ECH LBNR r & P* RECORD INDEX= 140 + ART P* * ( #* OUTPUT VALUE = VALUE (BCD 14) * **
0x134538…1346cc Dummy {f00=0x00b1, f01=0x0190, f02=» * MOVE GSWBIN8,TYPE $ MOVE VALUE,=D'0' INITIAL VALUE , , P IB GSWBIN8,KFR100,KFR200,KFR300,KFR400 T B KFRRET * * EJ-EDB KFR100 MOVE GSWBIN8,NR MUL GSWBIN8,CBIN2 P MOVE GSWBIN1,ART
0x1346cc…134860 Dummy {f00=0x00b1, f01=0x0190, f02=»R200 MOVE GSWBIN8,TTASKNR MUL GSWBIN8,CBIN12 * P MOVE GSWBIN1,NR F P ADD GSWBIN8,GSWBIN1 ^ MUL GSWBIN8,CBIN2 z P MOVE GSWBIN1,ART P ADD GSWBIN8,GSWBIN1 . ) ADD GSWBIN8,=W'121' GSWBIN8=RECORD INDEX B KFR500
0x134860…1349f4 (0, 391) Opaque[0x194]
0x1349f4…134b88 # DirEnt {nam=»RGMND «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1638, f03=0x0000}
0x1349f4…134b88 IdxSect {
0x1349f4…134b88 f00 = 0x00b1 // 0x1349f4 @0x0
0x1349f4…134b88 f01 = 0x0002 // 0x1349f6 @0x2
0x1349f4…134b88 gno = [ // 0x1349f8 @0x4
0x1349f4…134b88 [0x00]: C0x00b1.0x3.0
0x1349f4…134b88 ]
0x1349f4…134b88 }
0x134b88…134d1c Dummy {f00=0x00b1, f01=0x40ea, f02=» P IDENT RGMND 03.01.XXX.1 P DDUM KMD08 & P PDIV : P ENTRY INITRG H P INCLUDE EQUATE ^ P EJECT v PINITRG PROC P RET P* P PEND P* P* P* P END @ RET P* PPG03
0x134d1c…134eb0 Dummy {f00=0x00b1, f01=0x2008, f02=» NT RGMAIN @ AG&5 z < PTRERR ERRORMESSAG&5 * P PERF SPERR j P B TR90 P PEND P* P* @ NTERMEDIATE STOP OF CYCLE 8 P
0x134eb0…135044 Dummy {f00=0x00b1, f01=0x0000, f02=»
[…0x3…]
0x135500…135694 (0, 392) Opaque[0x194]
0x135694…135828 # DirEnt {nam=»DCTSK «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1640, f03=0x0000}
0x135694…135828 IdxSect {
0x135694…135828 f00 = 0x00b2 // 0x135694 @0x0
0x135694…135828 f01 = 0x0004 // 0x135696 @0x2
0x135694…135828 gno = [ // 0x135698 @0x4
0x135694…135828 [0x00]: C0x00b2.0x0.0
0x135694…135828 [0x01]: C0x00b2.0x1.0
0x135694…135828 ]
0x135694…135828 }
0x135828…1359bc Dummy {f00=0x00b2, f01=0x0190, f02=» . P IDENT DCTSK REL2.1 DK 800317 870150540210 P ENTRY DCTSK 6 P EXTRN I:EVA0 J P* ` P* j P* t P ~ P > P********************************************************** P* P* CONDITIONAL ASSEMBLY P* & P****
0x1359bc…135b50 Dummy {f00=0x00b2, f01=0x0190, f02=» 0 " PRBUFNR EQU 2 2 RECEIVE BUFFERS & PRBUFL EQU 400 LENGTH 800 BYTES DK 0 P* Z P* d P* EQUATES n P* PRSET EQU /B2 RESET KEY " P* COMMON EQU FOR ECB HANDLING P* P PECBBA EQU 2 PECBRL EQU 4
0x135b50…135ce4 Dummy {f00=0x00b2, f01=0x0190, f02=»REL. ADDRESSES P* P* PDIS EQU 20 * P* < PECBDC EQU -DIS-14 F P IFT DCLIN=2 ` P IFT COPCMD=1 t PECBDC2 EQU ECBDC-DIS PECBICR EQU ECBDC2-DIS PECBICW EQU ECBICR-DIS P XIF P IFT DCLIN=2 P IFF C
0x135ce4…135e78 Dummy {f00=0x00b2, f01=0x0190, f02=»QU ECBDC-DIS PECBICW EQU ECBICR-DIS P XIF 2 P IFF DCLIN=2 > P IFF COPCMD=1 R PECBICW EQU ECBDC-DIS h P XIF PECBVDU EQU ECBICW-DIS PECBKB EQU ECBVDU-DIS PECBSD EQU ECBKB-DIS P* P* " P* BASE ADDRESS
0x135e78…13600c Dummy {f00=0x00b2, f01=0x0190, f02=» n P* " PNBRKBV EQU 0 NUMBER OF KB/VDUS & PNBRGTP EQU NBRKBV+2 NUMBER OF GTPS 8 P* b 2 PMF1KBV EQU NBRGTP+2 DV ADDRESSES KB/VDU MF #1 l 2 PMF1GTP EQU MF1KBV+16 DV ADDRESSES GTPS MF # 1 P IFT DCLIN=2 PMF2KBV EQU MF1GTP+16 P
0x13600c…1361a0 Dummy {f00=0x00b2, f01=0x0190, f02=»***** X P* P* START ADDRESS FOR DC TASKS B P************************************************************* < P PDCTSK EQU * P CF A14,I:EVA0 & P LDR* A1,A9 POLL & SELECT ADDRESS P LDKL A8,ECBDC P ADR A8,CREBAS
0x1361a0…136334 (0, 393) Dummy {f00=0x00b2, f01=0x018e, f02=»Y MESSAGE WITH WAIT z P LKM P DATA 1 ( & P CF A14,GTRBUF GET RECEIVE BUFFER 8 P LDKL A8,ECBDC b P ADR A8,CREBAS x P CF A14,DCGETM P LD A4,ECBBA,A8 " P CF A14,RLRBUF RELEASE BUFFER P RB DCT100 P* P* P
0x136334…1364c8 Dummy {f00=0x00b2, f01=0x0190, f02=» ( P CM ECBCW,A8 NO TIME OUT SUPERVISION P LDKL A1,RBUFL+RBUFL 0 P ST A1,ECBRL,A8 REQ LENGTH L P ST A4,ECBBA,A8 n P LKM P DATA 1 P RTN A14 P* P* P* > P********************************************************
0x1364c8…13665c Dummy {f00=0x00b2, f01=0x0190, f02=»K EQU RBUFL+RBUFL+2 P* PRBUF EQU * & P DATA *+2 POINTER FIRST FREE 8 P IFF RBUFNR=1 P DATA *+RLINK r P RES RBUFL P IFF RBUFNR=2 P DATA *+RLINK P RES RBUFL P IFF RBUFNR=3 P DATA *+RLINK P RES
0x13665c…1367f0 Dummy {f00=0x00b2, f01=0x0190, f02=» P* P* GET RECEIVE BUFFER P* . PGTRBUF EQU * 8 P LDKL A5,RBUF L P* b P* l PGETBUF EQU * v P LDR* A4,A5 P RF(Z) GETB50 NO BUFFER FREE P LDR* A3,A4 P STR A3,A5 P ADK A4,2 SKIP LINK P RTN
0x1367f0…136984 Dummy {f00=0x00b2, f01=0x0190, f02=»RBUF EQU * P LDKL A2,RBUF PRELB05 EQU * ( P SUK A4,2 POINT TO LINK < PRELB10 EQU * P LDR* A3,A2 p P RF(Z) RELB20 P LDR A2,A3 P RB RELB10 PRELB20 EQU * P STR A4,A2 P CMR A4 P RTN A14 P*
0x136984…136b18 Dummy {f00=0x00b2, f01=0x4076, f02=» EQU * P ST A1,ECBCW,A8 P LDK A7,/B9 & P LKM : P DATA 1 F P RTN A14 V P END f@ rA3,A2 p P RF(Z) RELB20 P LDR A2,A3 P RB RELB10 PRELB20 EQU * P STR A4,A2 P CMR A4 P RTN A14 P*
0x136b18…136cac Dummy {f00=0x00b2, f01=0x2008, f02=» A7,/B7 TRANSFER PARAMETERS LKM , DATA 1 8 CF A14,ERASE ERASE SCREEN H 0 ,EM100 CF A14,TRPF TRANSMIT, PROGRAM FUNCTION j RB EM100 AGAIN * * END START @ 4,2,A13 ADR A14,A13 LOAD STACK
0x136cac…136e40 Dummy {f00=0x00b2, f01=0x0190, f02=»T 4 Y X " X T X 2t 1 1 X P> - M X P. P& # P 0P 1 _ N W Y 52J B B Z A JJ ;h # <c$ " P PR 4 5 T P ? X U X ( > PZ PF P P 0 X T Y Wn U
0x136e40…136fd4 (0, 394) Opaque[0x194]
0x136fd4…137168 # DirEnt {nam=»ADM6D «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1650, f03=0x0000}
0x136fd4…137168 IdxSect {
0x136fd4…137168 f00 = 0x00b2 // 0x136fd4 @0x0
0x136fd4…137168 f01 = 0x0002 // 0x136fd6 @0x2
0x136fd4…137168 gno = [ // 0x136fd8 @0x4
0x136fd4…137168 [0x00]: C0x00b2.0x2.0
0x136fd4…137168 ]
0x136fd4…137168 }
0x137168…1372fc Dummy {f00=0x00b2, f01=0x40d4, f02=» P IDENT ADM6D 03.01.XXX.1 DDUM KMD08 & PDIV : . ** DUMMY ADM6, WITHOUT DATATRANSMISSION H ENTRY ADM600 z EXT ADMRET ADM600 B ADMRET END @ ' ',2 $ P FCOPY =X'272020' $ PSNDLAB10 $
0x1372fc…137490 Dummy {f00=0x00b2, f01=0x2008, f02=» NT ADM6D DDUM KMD08 PDIV , . ** DUMMY ADM6, WITHOUT DATATRANSMISSION : ENTRY ADM600 l EXT ADMRET ADM600 B ADMRET END @ & H$PCASC M=M:167P,A=RGLOAD,C=CONDC4 H$PCASF C=CONDC4
0x137490…137624 Dummy {f00=0x00b2, f01=0x0000, f02=»
[…0x3…]
0x137ae0…137c74 (0, 395) Opaque[0x194]
0x137c74…137e08 # DirEnt {nam=»KEY461«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1658, f03=0x0000}
0x137c74…137e08 IdxSect {
0x137c74…137e08 f00 = 0x00b2 // 0x137c74 @0x0
0x137c74…137e08 f01 = 0x0002 // 0x137c76 @0x2
0x137c74…137e08 gno = [ // 0x137c78 @0x4
0x137c74…137e08 [0x00]: C0x00b2.0x3.0
0x137c74…137e08 ]
0x137c74…137e08 }
0x137e08…137f9c Dummy {f00=0x00b2, f01=0x0190, f02=» PNOKEY EQU X'FF' PBSPKY1 EQU X'87' PCANKY1 EQU X'91' 4 PMACKY1 EQU X'95' L PEORKY1 EQU X'90' d PFTABKY1 EQU X'8B' | PBTABKY1 EQU X'83' PDUPKY1 EQU X'A2' PSLUTKY1 EQU X'A3' PREGKY1 EQU X'A1' PCOPKY1 EQU X'F
0x137f9c…138130 Dummy {f00=0x00b2, f01=0x0190, f02=»Y1 EQU X'FF' PCY2KY1 EQU X'FF' PCYCKY1 EQU X'89' , PINVKY1 EQU X'FF' D PKONKY1 EQU X'85' PKVITKY1 EQU X'86' t PSUPLKY1 EQU X'82' PSUMKY1 EQU X'81' PADMKY1 EQU X'A0' PDIVKY1 EQU X'84' PHBOGKY1 EQU X'80'
0x138130…1382c4 Dummy {f00=0x00b2, f01=0x0190, f02=»BKY1 EQU X'87' PINSKY1 EQU X'81' PDELKY1 EQU X'82' . PCL1KY1 EQU X'89' F PCL2KY1 EQU X'8A' ^ PCL3KY1 EQU X'8B' v POUTKY1 EQU X'A0' P* PBSPKY2 EQU X'C7' PCANKY2 EQU X'D1' PEORKY2 EQU X'D0' PMACKY2 EQU X'D5'
0x1382c4…138458 Dummy {f00=0x00b2, f01=0x40b6, f02=»EKY2 EQU X'D2' PREGKY2 EQU X'E1' PADMKY2 EQU X'E0' . PSPGKY2 EQU X'FF' F PKONKY2 EQU X'C5' ^ PKVITKY2 EQU X'C6' v PONKY2 EQU X'D9' P* @ EQU X'C7' PCANKY2 EQU X'D1' PEORKY2 EQU X'D0' PMACKY2 EQU X'D5'
0x138458…1385ec Dummy {f00=0x00b2, f01=0x2008, f02=» * ERRFMT FRMT FSL , " FMEL 'ZZ9B',GTWBCD1 FILE NR. 8 FCOPY ERRTXT ^ " FMEL 'BZZ9',GTWBCD2 ERRORNR. t FCOPY =X'07' FMEND @ 8SPKTAB2 KTAB BSPKY1,CANKY1,NOKEY,MACKY1,NOKEY,EORKY1, C D ? FT
0x1385ec…138780 Dummy {f00=0x00b2, f01=0x0190, f02=»
0x138780…138914 (0, 396) Opaque[0x194]
0x138914…138aa8 # DirEnt {nam=»TB3270«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1660, f03=0x0000}
0x138914…138aa8 IdxSect {
0x138914…138aa8 f00 = 0x00b3 // 0x138914 @0x0
0x138914…138aa8 f01 = 0x0004 // 0x138916 @0x2
0x138914…138aa8 gno = [ // 0x138918 @0x4
0x138914…138aa8 [0x00]: C0x00b3.0x0.0
0x138914…138aa8 [0x01]: C0x00b3.0x1.0
0x138914…138aa8 ]
0x138914…138aa8 }
0x138aa8…138c3c Dummy {f00=0x00b3, f01=0x0190, f02=» 2 P IDENT TB3270 2.1DK 1 79-05-23 870150540210 4 P***** SPECIAL SCANDINAVIAN ALPHABET ****** : F P****************************************************************** r P* : P* CONVERSION TABLES FOR IBM 3270 EMULATION PACKKAGE P*
0x138c3c…138dd0 Dummy {f00=0x00b3, f01=0x018e, f02=»RY TASCII P ENTRY TEBCDI P ENTRY KEYCNV ( P* > P H P* CONDITIONAL ASSEMBLIES P P* r PKB6272 EQU 0 | P* P EJECT P* P* 4 P* TABLE FOR CONVERSION OF EBCDIC 6 BIT INTERNAL P* P* CODE TO
0x138dd0…138f64 Dummy {f00=0x00b3, f01=0x0190, f02=» * P DATA /4849,/232E,/3C28,/2B21 /08-/0F * P DATA /264A,/4B4C,/4D4E,/4F50 /10-/17 2 * P DATA /5152,/245D,/2A29,/3B5E /18-/1F ` * P DATA /2D2F,/5354,/5556,/5758 /20-/27 * P DATA /595A,/402C,/255F,/3E3F /28-/2F ( P DATA /3031,/3233,/3435,/3637
0x138f64…1390f8 Dummy {f00=0x00b3, f01=0x0190, f02=»OM ASCII TO EBCDIC r P* 4 P* USED TO GET BINARY VALUES FROM THE EBCDIC CODE $ P* * P* INVALID CODES ARE CONVERTED TO ZEROS f P* P* PTEBCDIC EQU * P DATA 0,0,0,0 /00-/07 P DATA 0,0,0,0 /08-/0F P DATA 0,0,0,0
0x1390f8…13928c Dummy {f00=0x00b3, f01=0x0190, f02=»A,/5A6C,/507D 20-27 ( P DATA /4D5D,/5C4E,/6B60,/4B61 28-2F ( P DATA /F0F1,/F2F3,/F4F5,/F6F7 30-37 H ( P DATA /F8F9,/7A5E,/4C7E,/6E6F 38-3F t ( P DATA /6AC1,/C2C3,/C4C5,/C6C7 40-47 ( P DATA /C8C9,/D1D2,/D3D4,/D5D6 48-4F ( P DATA /D7D8,/D9E
0x13928c…139420 Dummy {f00=0x00b3, f01=0x0190, f02=»394,/9596 68-6F | ( P DATA /9798,/99A2,/A3A4,/A5A6 70-77 ( P DATA /A7A8,/A900,/0000,/0000 78-7F D P DE p P EJECT ~ P* 4 P* TRANSLATION OF FUNCTON KEYS & LOWER CASE P - W P* PKEYCNV EQU * P IFF KB6272=1 P CWK A
0x139420…1395b4 (0, 397) Dummy {f00=0x00b3, f01=0x0190, f02=»10 EQU * P CWK A2,/80 P RF(L) KEYC99 $ P DB : P CWK A2,/C0 DK H P RF(L) KEYC50 DK ` & P LDK A2,/7F KEYSWITCH 2 (C0-FF) DK z P RF KEYC99 DK PKEYC50 EQU * DK P DE P SUK A2,/80 P LC A2,KBCVTB,A2
0x1395b4…139748 Dummy {f00=0x00b3, f01=0x4184, f02=»C,/B5A7 /80-/87 z * P DATA /A87F,/A98C,/7F7F,/7F7F /88-/8F * P DATA /ABB2,/AAB1,/AE8B,/26AD /90-/97 F * P DATA /AFB6,/7F7F,/7F7F,/7F7F /98-/9F t * P DATA /7F7F,/B3A5,/7F7F,/7F7F /A0-/A7 * P DATA /7F7F,/7F7F,/7F7F,/7F7F /A8-/AF * P DATA /303
0x139748…1398dc Dummy {f00=0x00b3, f01=0x2008, f02=» A @ aP x (@ :P T P> H D ! P P T P P T #P 'P +W AT M SQ T H D !A( aT y }P Q P PP WF T W P P P P H D ! $ 1 d I d _ d sP w
0x1398dc…139a70 Dummy {f00=0x00b3, f01=0x0190, f02=»
[…0x2…]
0x139d98…139f2c Dummy {f00=0x00b3, f01=0x0190, f02=» F [ " w > M e m 1 `
0x139f2c…13a0c0 Dummy {f00=0x00b3, f01=0x0190, f02=» E F G H I P Q R S T * " 0 x P HOLST.
0x13a0c0…13a254 (0, 398) Opaque[0x194]
0x13a254…13a3e8 # DirEnt {nam=»KM569X«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1670, f03=0x0000}
0x13a254…13a3e8 IdxSect {
0x13a254…13a3e8 f00 = 0x00b3 // 0x13a254 @0x0
0x13a254…13a3e8 f01 = 0x0004 // 0x13a256 @0x2
0x13a254…13a3e8 gno = [ // 0x13a258 @0x4
0x13a254…13a3e8 [0x00]: C0x00b3.0x2.0
0x13a254…13a3e8 [0x01]: C0x00b3.0x3.0
0x13a254…13a3e8 ]
0x13a254…13a3e8 }
0x13a3e8…13a57c Dummy {f00=0x00b3, f01=0x0190, f02=» PPRT KM569X PPRT C569 PMES HOLSTED KOMMUNE & PMES STRAKS REMITTERING B PMES DISK OVERLAY ` PSCR x PLED KMD08 P!!CH $$26$$22$$ P!!CH $$DCTASK$$DCTSK$$ P!!RE 36,$$F8$$F9$$ P!!RE 37,$$F9$$FA$$ P!!DL 59
0x13a57c…13a710 Dummy {f00=0x00b3, f01=0x0190, f02=» TERM LA P!!DL 129,138 D0 P!!DL 139,163 TB9 ( P!!DL 164,194 CB9 @ $ P!!RE 198,$$FALSE$$TRUE$$ CBKOFLG X $ P!!RE 199,$$FALSE$$TRUE$$ CKTFLAG $ P!!RE 205,$$TRUE$$FALSE$$ CKTAUTO $ P!!RE 210,$$TRUE$$FALSE$$ CKASFLG & P!!RE 237,$$FALSE
0x13a710…13a8a4 Dummy {f00=0x00b3, f01=0x0190, f02=»CBUDTFLG v P!!DL 286 PCFLAG BINI (12),X'0051' , P!!RE 372,$$01014610$$04015691$$ VERSION @ P!!RE 378,$$732$$2$$ EDITBUF p P!!RE 379,$$40$$2$$ CTRBUF P!!RE 400,$$28$$-28$$ P!!RE 401,$$29$$-29$$ P!!RE 446,$$128$$80$$ CRECL
0x13a8a4…13aa38 Dummy {f00=0x00b3, f01=0x0190, f02=»ON STRGI (12)2C' ',' ',' ',' ' P!!DL 777,784 ENTRY * P!!DL 786,790 EXT D P!!DL 796 DSC0 P!!DL 808,827 KBVGO r P!!DL 828,843 GTPGO P!!DL 844,855 LPGO P!!DL 856,868 DC1GO P!!DL 876,879 IN OFFLINE P!!DL 912,917 I
0x13aa38…13abcc Dummy {f00=0x00b3, f01=0x018e, f02=»9$$ | P!!CH $$SL461$$SLCOP$$ P!!EN * PTRA /S,NL 6 PINC RGSUB4 H PINC DKSUBS Z PNOD l PINC RGMAIN x PINC RGSUBS PINC RGSUB1 PINC RGSUB2 PINC RGSUB3 PNOD PINC RGKLAR PINC KTOPR PNOD
0x13abcc…13ad60 Dummy {f00=0x00b3, f01=0x0190, f02=» PNOD PINC RGSTRT PINC REMSUB " PLED REMBDS,/S 4 P!!DL 70 J P MOVE GSWBIN7,CBIN13 HOLSTED Z P!!DL 193,194 ~ P FILLR ' ',8 P FMEL '99V99V99',GTDATO P FILLR ' ',32 P!!EN PTRA /S,NL PNOD PIN
0x13ad60…13aef4 (0, 399) Dummy {f00=0x00b3, f01=0x008e, f02=»K U,4K P$INCGEN LKE M PKPF /L,RGLOAD , PSCR B 2 PMES $PDISC M=M:92F4,MU=M:POOL92,A=RGLDX,C=C569 N P$ASG2
0x13aef4…13b088 Dummy {f00=0x00b3, f01=0x2008, f02=» P$INCGEN LKE M PKPF /L,RGLOAD , PSCR B 2 PMES $PDISC M=M:92F4,MU=M:POOL92,A=RGLDX,C=C569 N P$ASG2
0x13b088…13b21c Dummy {f00=0x00b3, f01=0x0190, f02=»T,FREMINF2 P B STRE80 PSTRE05 $ & P MOVE GSWBCD6,GTDUPF(CBIN13) NR-1 2 & P MOVE GSWBCD7,GTDUPF(CBIN14) NR-2 P EDIT SPINPUT,FREMINF3 P B STRE80 PSTRE06 ( P MOVE GSWBCD6,GTDUPF(CBIN18) DATO-1 P EDIT SPINPUT,FREMINF4
0x13b21c…13b3b0 Dummy {f00=0x00b3, f01=0x0190, f02=»INF5 ~ P B STRE80 PSTRE08 & P MOVE GSWBCD6,GTDUPF(CBIN13) NR-1 , ( P MOVE GSWBCD7,GTDUPF(CBIN18) DATO-1 V P EDIT SPINPUT,FREMINF6 PSTRE80 P EDIT GSWSTR20,FREMBEL P CMP CBIN0,CBIN0 P RET P PEND P EJECT
0x13b3b0…13b544 Dummy {f00=0x00b3, f01=0x0190, f02=»BCD6 z P FILLR ' ',11 P FMEND " P 0 PFREMINF3 FRMT 8 P FMEL 'ZZZZZZZZZ9',GSWBCD6 N P FILLR ' ',1 p P FMEL 'ZZZZZZZZZ9',GSWBCD7 P FMEND P PFREMINF4 FRMT P FMEL '99V99V99',GSWBCD6 P FILLR ' ',13 P
0x13b544…13b6d8 Dummy {f00=0x00b3, f01=0x0190, f02=» ',2 P FMEND P PFREMINF6 FRMT " P FMEL 'ZZZZZZZZZ9',GSWBCD6 8 P FILLR ' ',1 Z P FMEL '99V99V99',GSWBCD7 n P FILLR ' ',2 P FMEND P PFREMINF7 FRMT P FMEL '****9',TTLBNR P FMEND P P EJECT
0x13b6d8…13b86c Dummy {f00=0x00b3, f01=0x0190, f02=»9V99V99',GTDATO P FILLR ' ',32 , P FMEL '*.***.***.**9,99-',GTCYSUM BELOB . FILLR ' ',2 ^ FEOR r FILLR '3',2 , P FMEL '*.***.***.**9,99-',GTCYSUM BELOB FILLR ' ',38 FEOR FILLR '4',2 FCOPY GTLEV
0x13b86c…13ba00 Dummy {f00=0x00b3, f01=0x0190, f02=»2',2 FCOPY GTLEVBY FILLR ' ',42 " FEOR 8 FILLR '2',2 F FMEL 'ZZZZBB',GTLEVPNR Z FCOPY GTLEVPDI z FILLR ' ',43 FEOR FILLR '4',2 FEOR P FILLR '4',2 P FEOR FILLR '4',2
0x13ba00…13bb94 (0, 400) Opaque[0x194]
0x13bb94…13bd28 # DirEnt {nam=»D569 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1680, f03=0x0000}
0x13bb94…13bd28 IdxSect {
0x13bb94…13bd28 f00 = 0x00b4 // 0x13bb94 @0x0
0x13bb94…13bd28 f01 = 0x0002 // 0x13bb96 @0x2
0x13bb94…13bd28 gno = [ // 0x13bb98 @0x4
0x13bb94…13bd28 [0x00]: C0x00b4.0x0.0
0x13bb94…13bd28 ]
0x13bb94…13bd28 }
0x13bd28…13bebc Dummy {f00=0x00b4, f01=0x014c, f02=» T; P01; TID=TC; TCL=TC; * LEV=60; : P01; J PTDC=T01; V PLC=01L; f P01; v PSCL=S04; PT; P01; PTID=D0; PTCL=D0; PLEV=60; P00; P00; PC; P00; P01
0x13bebc…13c050 Dummy {f00=0x00b4, f01=0x2008, f02=» P01; TID=TC; TCL=TC; * LEV=60; : P01; J PTDC=T01; V PLC=01L; f P01; v PSCL=S04; PT; P01; PTID=D0; PTCL=D0; PLEV=60; P00; P00; PC; P00; P01
0x13c050…13c1e4 Dummy {f00=0x00b4, f01=0x0190, f02=»ALSE$$FALSE$$ CBUDTFLG P!!DL 286 PCFLAG BINI (12),X'0059' . , P!!RE 372,$$01014610$$04015691$$ VERSION N P!!RE 378,$$732$$2$$ EDITBUF ~ P!!RE 379,$$40$$2$$ CTRBUF P!!RE 400,$$28$$-28$$ P!!RE 401,$$29$$-29$$ P!!RE 446,$$1
0x13c1e4…13c378 Dummy {f00=0x00b4, f01=0x0190, f02=»52,453 & PON STRGI (12)2C' ',' ',' ',' ' P!!DL 777,784 ENTRY 8 P!!DL 786,790 EXT R P!!DL 808,827 KBVGO j P!!DL 828,843 GTPGO P!!DL 844,855 LPGO P!!DL 876,879 IN OFFLINE P!!DL 912,917 IN REENTER P!!EN PASG
0x13c378…13c50c Dummy {f00=0x00b4, f01=0x0190, f02=»L461$$SLCOP$$ P!!EN PTRA /S,NL " PINC RGSUB4 4 PINC DKSUBS F PNOD X PINC RGMND d PINC RGSUBS v PINC RGSUB1 PINC RGSUB2 PINC RGSUB3 PNOD PINC RGKLAR PINC KTOPRD PNOD PINC RGADM
0x13c50c…13c6a0 Dummy {f00=0x00b4, f01=0x0176, f02=»STRT PINC REMSUB PINC REMBDS PNOD 0 PINC RGFRMT < PINC REMFMS N PNOD ` PINC ADM6 l PINC ADM5 | PINC REMTRD PINC REMPRD PINC BUDD PASG 2,LP0F PTLK U,4K P$INCGEN PINC DCTSK LKE
0x13c6a0…13c834 (0, 401) Opaque[0x194]
0x13c834…13c9c8 # DirEnt {nam=»KM999 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1688, f03=0x0000}
0x13c834…13c9c8 IdxSect {
0x13c834…13c9c8 f00 = 0x00b4 // 0x13c834 @0x0
0x13c834…13c9c8 f01 = 0x0004 // 0x13c836 @0x2
0x13c834…13c9c8 gno = [ // 0x13c838 @0x4
0x13c834…13c9c8 [0x00]: C0x00b4.0x1.0
0x13c834…13c9c8 [0x01]: C0x00b4.0x2.0
0x13c834…13c9c8 ]
0x13c834…13c9c8 }
0x13c9c8…13cb5c Dummy {f00=0x00b4, f01=0x0190, f02=» PPRT KM261 PPRT C261 " PMES LEJRE KOMMUNE, REMITTERING & PMES INCLUDES BUDGET L PSCR h PLED KMD08,/S t P!!CH $$26$$22$$ P!!CH $$-4$$4$$ TRANS 40 P!!RE 36,$$F8$$FA$$ P!!RE 37,$$F9$$FB$$ $ P!!RE 41,$$56$$100$$
0x13cb5c…13ccf0 Dummy {f00=0x00b4, f01=0x0190, f02=»TP STRG 32X'C8C94A4B4C4D4E4F' DV ADR, GTP/LP P!!DL 186 4 " PMF1CU STRG X'E8C8' CU ADDRESS D P!!DL 188 j . PCNFHC STRGI (16),'GB','GA','GA','GA',' ' z P!!DL 193,194 " POFF STRGI (12)2C'TD',' ',' ' $ P!!RE 198,$$FALSE$$TRUE$$ CBKOFLG
0x13ccf0…13ce84 Dummy {f00=0x00b4, f01=0x0190, f02=»02,$$FALSE$$TRUE$$ CTRVALG $ P!!RE 203,$$FALSE$$FALSE$$ CFLT46 " $ P!!RE 204,$$FALSE$$FALSE$$ CFLT48 J $ P!!RE 205,$$TRUE$$TRUE$$ CKTAUTO r P!!RE 206,$$FALSE$$TRUE$$ DC & P!!RE 207,$$FALSE$$FALSE$$ CCYWRTF & P!!RE 208,$$FALSE$$FALSE$$ CADM22
0x13ce84…13d018 Dummy {f00=0x00b4, f01=0x0190, f02=» 212,$$FALSE$$FALSE$$ CGLREGFL & P!!RE 213,$$FALSE$$FALSE$$ CCONVERT & & P!!RE 237,$$FALSE$$TRUE$$ CREMITFL P & P!!RE 246,$$FALSE$$TRUE$$ CTEXTFLG z & P!!RE 247,$$FALSE$$TRUE$$ CSTRKFLG & P!!RE 248,$$FALSE$$TRUE$$ CBUDTFLG P!!DL 286 , P
0x13d018…13d1ac Dummy {f00=0x00b4, f01=0x0190, f02=»ALSE$$FALSE$$ C167FLG 8 P!!RE 432,$$FALSE$$FALSE$$GENERATE LEVNR 5X XXXXXX CC . P!!RE 433,$$FALSE$$FALSE$$ C539FLG-TINGLEV Z * P!!RE 434,$$TRUE$$FALSE$$ NO VSL CHECK $ P!!RE 440,$$1400$$1400$$DISK SIZE P!!RE 441,$$21$$21$$ CKTMAX P!!RE
0x13d1ac…13d340 Dummy {f00=0x00b4, f01=0x0190, f02=» P!!RE 451,$$5$$5$$ CKTTOP P!!DL 452,453 $ & PON STRGI (12)2C' ','KA',' ',' ' 8 P!!DL 852 b P MOVE TCT01,=W'3' PRINTER NR r P!!EN PNOD C PTRA /S,NL PINC DIV539 PNOD R PLED SCREEN,/S P!!CH $$KEY461$$K
0x13d340…13d4d4 (0, 402) Dummy {f00=0x00b4, f01=0x0190, f02=» PINC RGSUBS PINC RGSUB1 PINC RGSUB2 , PINC RGSUB3 > PNOD D P PINC RGKLAR ^ PINC KTPLN p PINC KTOPR PNOD D PINC RGADM PINC REMSUB PNOD R PINC ADM5 PINC SUBAPL PINC REMPRT P
0x13d4d4…13d668 Dummy {f00=0x00b4, f01=0x0190, f02=»REMLEV P!!DL 181,182 P!!EN " PTRA /S,NL . PINC ADM6 @ PNOD D P PINC REMTR ^ PLED REMBDT p P!!DL 556 (FILLR ' ',40) P FILLR ' ',22 P!!EN PTRA /S,NL PNOD D PINC BUDGET PTLK U,4K PIN
0x13d668…13d7fc Dummy {f00=0x00b4, f01=0x003c, f02=»$PDISC M=M:261,MU=M:POOL92,A=RGLOAD,C=C261 P$ASG2 2 PINC ADM6 @ PNOD D P PINC REMTR ^ PLED REMBDT p P!!DL 556 (FILLR ' ',40) P FILLR ' ',22 P!!EN PTRA /S,NL PNOD D PINC BUDGET PTLK U,4K PIN
0x13d7fc…13d990 Dummy {f00=0x00b4, f01=0x2008, f02=» =M:261,MU=M:POOL92,A=RGLOAD,C=C261 P$ASG2 2 PINC ADM6 @ PNOD D P PINC REMTR ^ PLED REMBDT p P!!DL 556 (FILLR ' ',40) P FILLR ' ',22 P!!EN PTRA /S,NL PNOD D PINC BUDGET PTLK U,4K PIN
0x13d990…13db24 Dummy {f00=0x00b4, f01=0x0190, f02=» ) )N @ P a KA x KA @ * * ) )P 0 a
0x13db24…13dcb8 Dummy {f00=0x00b4, f01=0x0190, f02=» a LA x LA @ * * ) )} ` D0 x D0 * ) ) &PTB2
0x13dcb8…13de4c Dummy {f00=0x00b4, f01=0x0190, f02=»
[…0x1…]
0x13dfe0…13e174 (0, 403) Opaque[0x194]
0x13e174…13e308 # DirEnt {nam=»TST221«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1698, f03=0x0000}
0x13e174…13e308 IdxSect {
0x13e174…13e308 f00 = 0x00b4 // 0x13e174 @0x0
0x13e174…13e308 f01 = 0x0004 // 0x13e176 @0x2
0x13e174…13e308 gno = [ // 0x13e178 @0x4
0x13e174…13e308 [0x00]: C0x00b4.0x3.0
0x13e174…13e308 [0x01]: C0x00b5.0x0.0
0x13e174…13e308 ]
0x13e174…13e308 }
0x13e308…13e49c Dummy {f00=0x00b4, f01=0x018e, f02=» PPRT TST221 PPRT C221 & PMES HUNDESTED KOMMUNE, REMITTERING & PMES INCLUDES BUDGET P PSCR l PLED KMD08,/S x P!!DL 629 PGTGLIDX BCD 8D P!!EN PKPF /S,KMD08 PSCR PLED KMD08,/S P!!CH $$26$$22$$
0x13e49c…13e630 Dummy {f00=0x00b4, f01=0x0190, f02=» 0 PMF1KBV STRG 32X'C1C2C3C4C5C6C750' DEV. ADR. P!!DL 183 < 4 PMF1GTP STRG 32X'C8C94A4B4C4D4E4F' DV ADR, GTP/LP L P!!DL 186 " PMF1CU STRG X'E8C8' CU ADDRESS P!!DL 188 PCNFHC STRGI (16),'GA',' ' P!!DL 193,194 " POFF STRG
0x13e630…13e7c4 Dummy {f00=0x00b4, f01=0x0190, f02=»CLKTFLG v & P!!RE 201,$$FALSE$$FALSE$$ CTESTFLG 2 P!!RE 202,$$FALSE$$FALSE$$ CTRVALG (NU VIBORG) : $ P!!RE 203,$$FALSE$$FALSE$$ CFLT46 p $ P!!RE 204,$$FALSE$$FALSE$$ CFLT48 $ P!!RE 205,$$TRUE$$TRUE$$ CKTAUTO P!!RE 206,$$FALSE$$TRUE$$ DC
0x13e7c4…13e958 Dummy {f00=0x00b4, f01=0x0190, f02=»10,$$TRUE$$FALSE$$ CKASFLG $ P!!RE 211,$$TRUE$$FALSE$$ CSLDFLG " & P!!RE 212,$$FALSE$$FALSE$$ CGLREGFL J & P!!RE 213,$$FALSE$$FALSE$$ CCONVERT t & P!!RE 237,$$FALSE$$TRUE$$ CREMITFL & P!!RE 246,$$FALSE$$TRUE$$ CTEXTFLG & P!!RE 247,$$FALSE$$TRUE
0x13e958…13eaec Dummy {f00=0x00b4, f01=0x0190, f02=»TRUE$$ BUDGET (TR 40-49) ~ & P!!RE 318,$$FALSE$$TRUE$$ CFAKT10$$ $ P!!RE 372,$$01014610$$03022211$$ J & P!!RE 422,$$FALSE$$FALSE$$ C167FLG r 8 P!!RE 432,$$FALSE$$FALSE$$GENERATE LEVNR 5X XXXXXX CC . P!!RE 433,$$FALSE$$FALSE$$ C539FLG-TINGLEV *
0x13eaec…13ec80 Dummy {f00=0x00b4, f01=0x0190, f02=»$$80$$ CRECLGD P!!RE 448,$$OD-KOM$$HUSTED$$ P!!RE 449,$$7$$7$$ CKTINDX : " P!!RE 450,$$20$$20$$ INDEX FILE P!!RE 451,$$5$$5$$ CKTTOP P!!DL 452,453 & PON STRGI (12)2C' ','KA',' ',' ' P!!DL 783 P!!DL 844,855 LP P
0x13ec80…13ee14 (0, 404) Dummy {f00=0x00b5, f01=0x0190, f02=»$SL461$$SLCOP$$ P!!EN PTRA /S,NL $ PINC RGSUB4 6 PINC RGSTRT H PNOD R Z PINC RGMAIN h PINC RGSUBS z PINC RGSUB1 PINC RGSUB2 PINC RGSUB3 PNOD R PINC RGKLAR PINC KTPLN PINC KTOPR PNO
0x13ee14…13efa8 Dummy {f00=0x00b5, f01=0x0190, f02=»O PINC DKSUBS PINC REMTXT PNOD R . PINC RGFRMT < PINC REMFMT N PNOD R ` PLED REMLEV,/S n P!!IL 837 P SUB GSWBIN4,CBIN1 P!!JN REMLEV,822,824 P!!IL 980 P MOVE GSWBIN4,GTGLIDX P CBL GSWBIN4,CBI
0x13efa8…13f13c Dummy {f00=0x00b5, f01=0x0190, f02=»E GSWBCD7,=D'1' P MOVE GSWBIN1,CBIN0 . P XCOPY GSWBCD7,CBIN2,CBIN5,CIXBUF,GSWBIN1 4 " P CBNE GSWBCD7,GTLEVNR,GNXT040 f P CLEAR CIDXFLG P B GNXT100 PGNXT040 P CLEAR CIDXFLG PGNXT050 P!!IL 992 P MOVE GTGLIDX,
0x13f13c…13f2d0 Dummy {f00=0x00b5, f01=0x0190, f02=» PTLK U,4K PASM PRTX,NL PLED VDUPRX , P!!DL 70 > $ PRBUFNR EQU 1 SINGLE BUFFERING N P!!DL 72 v & PTBUFNR EQU 1 SINGLE BUFFERING P!!EN PASM /S,NL PASM STARTX,NL PINC TB3270 P$INCGEN LK
0x13f2d0…13f464 Dummy {f00=0x00b5, f01=0x0040, f02=»MES $PDISC M=M:221,MU=M:POOL92,A=RGLOAD,C=C221 P$ASG2 6DL 70 > $ PRBUFNR EQU 1 SINGLE BUFFERING N P!!DL 72 v & PTBUFNR EQU 1 SINGLE BUFFERING P!!EN PASM /S,NL PASM STARTX,NL PINC TB3270 P$INCGEN LK
0x13f464…13f5f8 Dummy {f00=0x00b5, f01=0x2008, f02=» SC M=M:221,MU=M:POOL92,A=RGLOAD,C=C221 P$ASG2 6DL 70 > $ PRBUFNR EQU 1 SINGLE BUFFERING N P!!DL 72 v & PTBUFNR EQU 1 SINGLE BUFFERING P!!EN PASM /S,NL PASM STARTX,NL PINC TB3270 P$INCGEN LK
0x13f5f8…13f78c Dummy {f00=0x00b5, f01=0x0190, f02=»
[…0x1…]
0x13f920…13fab4 (0, 405) Opaque[0x194]
0x13fab4…13fc48 # DirEnt {nam=»KM975 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x16a8, f03=0x0000}
0x13fab4…13fc48 IdxSect {
0x13fab4…13fc48 f00 = 0x00b5 // 0x13fab4 @0x0
0x13fab4…13fc48 f01 = 0x0006 // 0x13fab6 @0x2
0x13fab4…13fc48 gno = [ // 0x13fab8 @0x4
0x13fab4…13fc48 [0x00]: C0x00b5.0x1.0
0x13fab4…13fc48 [0x01]: C0x00b5.0x2.0
0x13fab4…13fc48 [0x02]: C0x00b5.0x3.0
0x13fab4…13fc48 ]
0x13fab4…13fc48 }
0x13fc48…13fddc Dummy {f00=0x00b5, f01=0x0190, f02=» PPRT KM975 PPRT C975 * PMES LYNGBY-T]RB[K KOMMUNE, REMITTERING & PMES 810511 NJ T PMES * j PSCR x PLED KMD08 P!!CH $$EJECT$$ $$ P!!CH $$DCTASK$$DCTSK$$ P!!DL 60 BUDGET FILE P!!DL 61,62 FD03,FD04 P!!
0x13fddc…13ff70 Dummy {f00=0x00b5, f01=0x0190, f02=» 224 & PMF1KBV STRG 32X'40' DV ADR KB/VDU P!!DL 225 6 " PMF1GTP STRG 32X'40' DV ADR GTP F P!!DL 228 l PMF1CU STRG X'E2C2' CU ADR | P!!DL 230 * PCNFHC STRGI (16),' ' HARDCOPY PRINTER P!!DL 235,236 PFROMKX STRGI (12)2C' '
0x13ff70…140104 Dummy {f00=0x00b5, f01=0x0190, f02=»,$$FALSE$$TRUE$$ DC $ P!!RE 251,$$FALSE$$TRUE$$ 5M DISK & P!!RE 279,$$FALSE$$TRUE$$ CREMITFLG D & P!!RE 288,$$FALSE$$TRUE$$ TEXT REG n $ P!!RE 289,$$FALSE$$TRUE$$ LEV REG ( P!!RE 290,$$FALSE$$TRUE$$ BUNDTREMIT P!!DL 331 : PCFLAG BINI (
0x140104…140298 Dummy {f00=0x00b5, f01=0x0190, f02=»16,$$01014610$$%VER%REL%MOD$$ VERSION ( P!!RE 484,$$1400$$10000$$ NO OF REG. . P!!RE 490,$$128$$80$$ Z P!!RE 492,$$OD-KOM$$LY-T] $$ v " P!!RE 494,$$20$$200$$ LEV INDEX P!!RE 495,$$5$$1$$ KORT LINE P!!DL 496,497 PFROMTX STRGI (12
0x140298…14042c Dummy {f00=0x00b5, f01=0x0190, f02=» ~ P!!DL 1110,1113 VDU MM P!!DL 1115 OFFLINE & P!!DL 1129,1155 KBVGO @ P!!DL 1156,1175 RKGO P!!DL 1176,1191 GTPGO x P!!DL 1192,1203 LPGO P!!DL 1217,1234 OFFLNE P!!DL 1250,1262 RKSWITCH P!!DL 1265 P!!DL 127
0x14042c…1405c0 Dummy {f00=0x00b5, f01=0x0190, f02=»$KEYCOP$$ P!!CH $$SL461$$SLCOP$$ P!!EN 0 PTRA /S,NL < PINC RGSUB4 N PINC RGSTRT ` PNOD R r PINC RGMAIN PINC RGSUBS PINC RGSUB1 PINC RGSUB2 PINC RGSUB3 PNOD R PINC RGKLAR PINC KTPLN
0x1405c0…140754 (0, 406) Dummy {f00=0x00b5, f01=0x0190, f02=»INC SUBAPL PINC REMPRT PNOD R $ PLED KMDIO,/S 2 P!!DL 149,180 WRFD090-WRFD095 F PWRFD090 j PWRFD091 z PWRFD092 PWRFD093 PWRFD094 PWRFD095 P!!EN PTRA /S,NL PINC DKSUBS PINC REMTXT
0x140754…1408e8 Dummy {f00=0x00b5, f01=0x0190, f02=»,48 P FMEL '99V99V99',GTPRTDAT P FILLR ' ',17 . P FILLR '*',1 D " P FTEXT X'0F' (1) TOTAL AMOUNT X P FNL ~ P FTEXT X'16' (2) TEXT1 P FNL P FTEXT X'15' (3) INFO1 P FILLR ' ',1 P FTEXT X'0F' (4) AMOUNT1 P F
0x1408e8…140a7c Dummy {f00=0x00b5, f01=0x0190, f02=»'20' (7) LEVADR P FNL P FTEXT X'15' (8) INFO2 $ P FILLR ' ',1 B P FTEXT X'0F' (9) AMOUNT2 V P FILLR ' ',11 v P FTEXT X'14' (10) LEVBY P FNL P FILLR ' ',48 P FTEXT X'04' (11) POSTNR P FILLR ' ',2 P FTEXT
0x140a7c…140c10 Dummy {f00=0x00b5, f01=0x0190, f02=» FTEXT X'0F' (15) AMOUNT3 P FNL " P FNL . P FNL : P FILLR ' ',10 F & P FTEXT X'0A' (16) FTEXT CHECKBELOB " P FTEXT X'0F' (17) TOTAL AMOUNT P FMEND P!!EN PTRA /S,NL PNOD R PINC REMLEV PINC ADM6 P
0x140c10…140da4 Dummy {f00=0x00b5, f01=0x0190, f02=»,137 P PERF FMOD,CBIN5,GTLEVNVN P PERF FMOD,CBIN7,GTLEVADR . P PERF FMOD,CBIN10,GTLEVBY P P!!DL 139,140 r P PERF FMOD,CBIN11,GSWSTR9 P PERF FMOD,CBIN12,GTLEVPDI P!!DL 160,161 P PERF FMOD,CBIN1,SPINPUT P EDIT SPIN
0x140da4…140f38 Dummy {f00=0x00b5, f01=0x0190, f02=»ECKBELOB' r P!!DL 445,447 " P PERF FMOD,CBIN2,GTLEVTXT TEST & " P PERF FMOD,CBIN3,SPINPUT INFO L $ P PERF FMOD,CBIN4,GSWSTR20 AMOUNT r P!!DL 450,452 P PERF FMOD,CBIN6,GTLEVTXT P PERF FMOD,CBIN8,SPINPUT P PERF FMOD,CBIN9,GSWSTR2
0x140f38…1410cc Dummy {f00=0x00b5, f01=0x011c, f02=» 601 $ P FMEL 'TTTTTTTVTT9,99-',GTBSUM1 P!!DL 610 4 $ P FMEL 'TTTTTTTVTT9,99-',GTBSUM2 D P!!EN l PTRA /S,NL x PTLK U,4K PINC DCTSK LKE M PKPF /L,RGTEST PSCR 2 PMES $PDISC M=M:173,MU=M:POOL92,A=RGTEST,C=C9
0x1410cc…141260 Dummy {f00=0x00b5, f01=0x2008, f02=» $ P FMEL 'TTTTTTTVTT9,99-',GTBSUM1 P!!DL 610 4 $ P FMEL 'TTTTTTTVTT9,99-',GTBSUM2 D P!!EN l PTRA /S,NL x PTLK U,4K PINC DCTSK LKE M PKPF /L,RGTEST PSCR 2 PMES $PDISC M=M:173,MU=M:POOL92,A=RGTEST,C=C9
0x141260…1413f4 (0, 407) Dummy {f00=0x00b5, f01=0x0190, f02=» 0 PGTGLSPG BOOL FALSE T=INQUIRIES ON GL REGSET . . PGTRKMFLG BOOL F T=R]KONV. MASTER TERMINAL . 8 4 PTTCYTRFL BOOL FALSE F: BEFORE 1. TRANS IN CYKEL . j P* . P* . PGSWBIN1 BIN . PGSWBIN2 BIN . PGSWBIN3 BIN . PGSWBIN4 BIN . PGT
0x1413f4…141588 Dummy {f00=0x00b5, f01=0x0190, f02=»GTLBNRIN BCD 6D EKSP.LB.NR ASKED FOR . PGTANTAL BCD 4 / , PGTREGNR BCD 3 TRANSTYPE / B " PGTDBKRS BCD 2 SIGN FOR AMOUNT / b " PGTL8TXT STRG 8 TEXT FOR LINE 8 / PSPINPUT STRG 35 / PGSWSTR9 STRG 9 / PGSWSTR20 STRG 20 / P EJECT / PGB4 BL
0x141588…14171c Dummy {f00=0x00b5, f01=0x0190, f02=»RANS 28/29 / | * PGTCHKPR BOOL F T= FIRST CHECK ON PAGE 0 " PGTSTRFLG BOOL F T= TRANS 18/19 0 @ , PGTASTFLG BOOL F T=LAST REC '**' (BUDGET) 0 f . PGTZERO BOOL F ZERO LEVAMOUNT (ONCE A YEAR) 0 P* 0 P* 0 P* 0 P* 0 P* 0 P* 0 P* 0
0x14171c…1418b0 Dummy {f00=0x00b5, f01=0x0190, f02=»' LINENR. ON CYSET FOR CHECK 0 PGSWBIN9 BIN '0' 1 $ PGSWBIN10 BIN 1 < $ PGTSCHLOW BIN '0' USED IN IDXGET 1 P $ PGTSCHMID BIN '0' USED IN IDXGET 1 x $ PGTSCHHGH BIN '0' USED IN IDXGET 1 PGTKTTYP BCD 4D KTPLAN TYPE 1 " PGTKFVAL BCD 14 VALUE-KONTOFILE
0x1418b0…141a44 Dummy {f00=0x00b5, f01=0x0190, f02=»K 1 P* 2 & PGTKBAFLG BOOL FALSE T=INCLUDES KBA 2 $ PGTVDUFLG BOOL FALSE T=VDU, F=PDU 2 > & PGTTTPFLG BOOL TRUE T=TTP,F=NO TTP 2 f PTREMFLG BOOL F T=REMOTE 2 PTFELT90 BOOL F 2 PTFELT91 BOOL F 2 PTFELT92 BOOL F 2 PTFELT93 BOOL 2 PTF
0x141a44…141bd8 Dummy {f00=0x00b5, f01=0x0190, f02=» P* 3 P* 3 P* 3 PGTLEVNR BCD 12 3 " PGTLEVPNR BCD 6 3 8 PGTLEVBFO BCD 2 3 N PGTLEVGI BCD 8 3 d PGTLEVALT BCD 12 3 z PGTLEVTKO BCD 2 3 PGTLEVDAT BCD 8 OPRET DATO 3 PGTTXTTKO BCD 4 TEXT KODE 3 PGTLEVNVN STRG 30 3 PGTLEVA
0x141bd8…141d6c Dummy {f00=0x00b5, f01=0x0190, f02=» 12 LEV FRA 3 PGTPRTTIL BCD 12 LEV TIL 4 P EJECT 4 4 PTB2 BLK 4 B P* 4 R P* 4 P* 4 f P* 4 p P* 4 z P* 4 P* 4 P* 4 P* 4 P* 4 P* 4 P* 4 P* 4 P* 4 P* 4 P* 4 P* 4 P* 4 PDU
0x141d6c…141f00 Dummy {f00=0x00b5, f01=0x0190, f02=»SUM MARK 4 PGTTEXT STRG 6 5 PTTSPARE3 STRG 1C'.' 5 & PTCONBUF STRG 398X'FF' 5 B & PTTCYKST BCD 4 1. LINE CYCLE/STABEL 5 ` $ PTTKTSLD BCD 14 KONTOKORT, SALDO 5 & PTTKTLIN BCD 4 KONTOKORT, LINIE NR 5 ( PTTKTCHK BCD 2 KONTOKORT, CHECKCIFFER 5 . P
0x141f00…142094 (0, 408) Opaque[0x194]
0x142094…142228 # DirEnt {nam=»C975 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x16c0, f03=0x0000}
0x142094…142228 IdxSect {
0x142094…142228 f00 = 0x00b6 // 0x142094 @0x0
0x142094…142228 f01 = 0x0002 // 0x142096 @0x2
0x142094…142228 gno = [ // 0x142098 @0x4
0x142094…142228 [0x00]: C0x00b6.0x0.0
0x142094…142228 ]
0x142094…142228 }
0x142228…1423bc Dummy {f00=0x00b6, f01=0x018e, f02=» T; P01; PTID=TB; PTCL=TB; * PLEV=55; : P01; J PTDC=T01; V PLC=08L; f P00; v PT; P01; TID=TC; TCL=TC; LEV=60; P02; PTDC=T03; PLC=01L; PTDC=T07; PLC=0
0x1423bc…142550 Dummy {f00=0x00b6, f01=0x009c, f02=» PLC=02L; PTDC=T06; PLC=02L; $ P00; 4 PC; @ P00; J P01; V PSCL=S01; b U; r 001; | TB2; P002; TC; TCL=TC; LEV=60; P02; PTDC=T03; PLC=01L; PTDC=T07; PLC=0
0x142550…1426e4 Dummy {f00=0x00b6, f01=0x2008, f02=» 2L; PTDC=T06; PLC=02L; $ P00; 4 PC; @ P00; J P01; V PSCL=S01; b U; r 001; | TB2; P002; TC; TCL=TC; LEV=60; P02; PTDC=T03; PLC=01L; PTDC=T07; PLC=0
0x1426e4…142878 Dummy {f00=0x00b6, f01=0x0190, f02=» Tp 8
0x142878…142a0c Dummy {f00=0x00b6, f01=0x0190, f02=» 8 :
0x142a0c…142ba0 Dummy {f00=0x00b6, f01=0x0190, f02=»
0x142ba0…142d34 (0, 409) Opaque[0x194]
0x142d34…142ec8 # DirEnt {nam=»KM976 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x16c8, f03=0x0000}
0x142d34…142ec8 IdxSect {
0x142d34…142ec8 f00 = 0x00b6 // 0x142d34 @0x0
0x142d34…142ec8 f01 = 0x0004 // 0x142d36 @0x2
0x142d34…142ec8 gno = [ // 0x142d38 @0x4
0x142d34…142ec8 [0x00]: C0x00b6.0x1.0
0x142d34…142ec8 [0x01]: C0x00b6.0x2.0
0x142d34…142ec8 ]
0x142d34…142ec8 }
0x142ec8…14305c Dummy {f00=0x00b6, f01=0x0190, f02=» PSCR PPRT KM976 PPRT C976 " 6 PMES TEST KOMMUNE, REMITTERING, BUDGET, FELT 90-94 2 PMES (PROD. VERSION) l PSCR PLED KMD08,/S P!!CH $$DCTASK$$DCTSK$$ P!!CH $$26$$22$$ P!!CH $$-4$$4$$ TRANS 40 $ P!!RE 41,$$
0x14305c…1431f0 Dummy {f00=0x00b6, f01=0x0190, f02=» P!!DL 182 0 PMF1KBV STRG 32X'C1C2C3C4C5C6C750' DEV. ADR. P!!DL 183 H 4 PMF1GTP STRG 32X'C8C94A4B4C4D4E4F' DV ADR, GTP/LP X P!!DL 186 " PMF1CU STRG X'E8C8' CU ADDRESS P!!DL 188 PCNFHC STRGI (16),'GA',' ' P!!DL 193,194
0x1431f0…143384 Dummy {f00=0x00b6, f01=0x018e, f02=»SE$$TRUE$$ CCLKTFLG & P!!RE 201,$$FALSE$$FALSE$$ CTESTFLG 2 P!!RE 202,$$FALSE$$FALSE$$ CTRVALG (NU VIBORG) F $ P!!RE 203,$$FALSE$$FALSE$$ CFLT46 | $ P!!RE 204,$$FALSE$$FALSE$$ CFLT48 $ P!!RE 205,$$TRUE$$TRUE$$ CKTAUTO P!!RE 206,$$FALSE$$TR
0x143384…143518 Dummy {f00=0x00b6, f01=0x0190, f02=» l $ P!!RE 210,$$TRUE$$FALSE$$ CKASFLG $ P!!RE 211,$$TRUE$$FALSE$$ CSLDFLG 0 & P!!RE 212,$$FALSE$$FALSE$$ CGLREGFL X & P!!RE 213,$$FALSE$$FALSE$$ CCONVERT & P!!RE 237,$$FALSE$$TRUE$$ CREMITFL & P!!RE 246,$$FALSE$$TRUE$$ CTEXTFLG & P!!RE 247
0x143518…1436ac Dummy {f00=0x00b6, f01=0x0190, f02=» 317,$$FALSE$$TRUE$$ BUDGET $ P!!RE 318,$$FALSE$$TRUE$$ FAKT10 $ ( P!!RE 319,$$FALSE$$TRUE$$ FELT 90-94 L & P!!RE 422,$$FALSE$$FALSE$$ C167FLG x 8 P!!RE 432,$$FALSE$$TRUE$$GENERATE LEVNR 5X XXXXXX CC . P!!RE 433,$$FALSE$$FALSE$$ C539FLG-TINGLEV
0x1436ac…143840 Dummy {f00=0x00b6, f01=0x018e, f02=»,$$128$$80$$ CRECLGD P!!RE 448,$$OD-KOM$$HUSTED$$ P!!RE 449,$$7$$7$$ CKTINDX @ " P!!RE 450,$$20$$20$$ INDEX FILE b P!!RE 451,$$5$$5$$ CKTTOP P!!DL 452,453 & PON STRGI (12)2C' ','KA',' ',' ' P!!DL 777,780 P!!DL 783,784
0x143840…1439d4 (0, 410) Dummy {f00=0x00b6, f01=0x0190, f02=» PNOD C PTRA /S,NL PINC DIV539 ( PNOD R : PLED SCREEN,/S H P!!CH $$KEY461$$KEY539$$ ^ P!!CH $$SL461$$SLCOP$$ ~ P!!EN PTRA /S,NL PINC RGSUB4 PINC RGSTRT PNOD R PINC RGMAIN PINC RGSUBS
0x1439d4…143b68 Dummy {f00=0x00b6, f01=0x018e, f02=» PINC RGADM PINC REMSUB PNOD R , PINC ADM5 : PINC SUBAPL J PINC REMPRT PNOD R n PINC KMDIO | PINC DKSUBS PINC REMTXT PNOD R PINC RGFRMT PNOD R PINC REMFMT PNOD R PINC REML
0x143b68…143cfc Dummy {f00=0x00b6, f01=0x0088, f02=» P$INCGEN LKE M PKPF /L,RGLOAD & PSCR < 2 PMES $PDISC M=M:221,MU=M:POOL92,A=RGLOAD,C=C976 H P$ASG2 ~ | PINC DKSUBS PINC REMTXT PNOD R PINC RGFRMT PNOD R PINC REMFMT PNOD R PINC REML
0x143cfc…143e90 Dummy {f00=0x00b6, f01=0x2008, f02=» $INCGEN LKE M PKPF /L,RGLOAD & PSCR < 2 PMES $PDISC M=M:221,MU=M:POOL92,A=RGLOAD,C=C976 H P$ASG2 ~ | PINC DKSUBS PINC REMTXT PNOD R PINC RGFRMT PNOD R PINC REMFMT PNOD R PINC REML
0x143e90…144024 Dummy {f00=0x00b6, f01=0x0190, f02=» z Z TC * ` V D0 D0 * N TB2 d P JKLMNO GA TD *
0x144024…1441b8 Dummy {f00=0x00b6, f01=0x0190, f02=» Tp 8
0x1441b8…14434c Dummy {f00=0x00b6, f01=0x0190, f02=» 8 :
0x14434c…1444e0 Dummy {f00=0x00b6, f01=0x0190, f02=»
0x1444e0…144674 (0, 411) Opaque[0x194]
0x144674…144808 # DirEnt {nam=»C976 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x16d8, f03=0x0000}
0x144674…144808 IdxSect {
0x144674…144808 f00 = 0x00b6 // 0x144674 @0x0
0x144674…144808 f01 = 0x0002 // 0x144676 @0x2
0x144674…144808 gno = [ // 0x144678 @0x4
0x144674…144808 [0x00]: C0x00b6.0x3.0
0x144674…144808 ]
0x144674…144808 }
0x144808…14499c Dummy {f00=0x00b6, f01=0x0190, f02=» PT; P01; TID=TC; TCL=TC; * LEV=60; : P02; J PTDC=T03; V PLC=01L; f PTDC=T07; v PLC=01L; P01; PSCL=S04; PT; P01; PTID=TD; PTCL=TC; PLEV=60; P02; PTDC=
0x14499c…144b30 Dummy {f00=0x00b6, f01=0x001c, f02=» TB2; P002; D=TC; TCL=TC; * LEV=60; : P02; J PTDC=T03; V PLC=01L; f PTDC=T07; v PLC=01L; P01; PSCL=S04; PT; P01; PTID=TD; PTCL=TC; PLEV=60; P02; PTDC=
0x144b30…144cc4 Dummy {f00=0x00b6, f01=0x2008, f02=» TB2; P002; D=TC; TCL=TC; * LEV=60; : P02; J PTDC=T03; V PLC=01L; f PTDC=T07; v PLC=01L; P01; PSCL=S04; PT; P01; PTID=TD; PTCL=TC; PLEV=60; P02; PTDC=
0x144cc4…144e58 Dummy {f00=0x00b6, f01=0x0190, f02=»
0x144e58…144fec Dummy {f00=0x00b6, f01=0x0190, f02=» TCTDTETFTGTHTITJTKTLTMTN F [ " w > M e m 1
0x144fec…145180 Dummy {f00=0x00b6, f01=0x0190, f02=» F
0x145180…145314 (0, 412) Opaque[0x194]
0x145314…1454a8 # DirEnt {nam=»C976A «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x16e0, f03=0x0000}
0x145314…1454a8 IdxSect {
0x145314…1454a8 f00 = 0x00b7 // 0x145314 @0x0
0x145314…1454a8 f01 = 0x0002 // 0x145316 @0x2
0x145314…1454a8 gno = [ // 0x145318 @0x4
0x145314…1454a8 [0x00]: C0x00b7.0x0.0
0x145314…1454a8 ]
0x145314…1454a8 }
0x1454a8…14563c Dummy {f00=0x00b7, f01=0x010e, f02=» PT; P01; TID=TC; TCL=TC; * LEV=60; : P02; J PTDC=T03; V PLC=01L; f PTDC=T07; v PLC=01L; P01; PSCL=S04; PC; P00; P01; PSCL=S01; U; 001; TB2; P00
0x14563c…1457d0 Dummy {f00=0x00b7, f01=0x2008, f02=» P01; TID=TC; TCL=TC; * LEV=60; : P02; J PTDC=T03; V PLC=01L; f PTDC=T07; v PLC=01L; P01; PSCL=S04; PC; P00; P01; PSCL=S01; U; 001; TB2; P00
0x1457d0…145964 Dummy {f00=0x00b7, f01=0x2008, f02=» COMBINATIONS ARE VALID: " HMES 1 A,A+AU,A+AOUT,A+AU+AOUT ( " HMES 2 C,C+CU,C+COUT,C+CU+COUT N " HMES 3 M,M+MU,M+MOUT,M+MU+MOUT t HMES 4 FC : HMES ANY COMBINATION OF ALTERNATIVE 1,2 AND 3 IS VALID, 0 HMES AND AT LEAST ONE OF THEM MUS
0x145964…145af8 Dummy {f00=0x00b7, f01=0x0190, f02=» SPAPPL USER ROUTINE TO HANDLE P APPL VALUES & ( P EXT SPTCHK USER ROUTINE TO EVALUATE < P CONDITIONAL TABULATION h P* . P EXT EMPTYT ASSEMBLY SUBROUTINE EMPTYT - " P TEST IF DATA ITEM IS EMPTY P* P INCLUDE KEY539,LI
0x145af8…145c8c Dummy {f00=0x00b7, f01=0x018e, f02=»SPCLRA PROC P* D P* SPCLRA - CLEAR ALL VARABLE FIELDS BEFORE HANDLING THE PICTURE P* f P MOVE SPERASE,=W'0' p P PERF SCREEN,=W'1' P RET P PEND PSPCLRS PROC P* F P* SPCLRS - CLEAR SOME VARIABLE FIELDS BEFO
0x145c8c…145e20 Dummy {f00=0x00b7, f01=0x0190, f02=» P* D P* SPCLRN - CLEAR NO VARIABLE FIELDS BEFORE HANDLING THE PICTURE P* Z P MOVE SPERASE,=W'0' d P PERF SCREEN,=W'3' P RET P PEND PSPERR PROC P* 0 P* HANDLE ERRORS DETECTED OUTSIDE THE PACKAGE P*
0x145e20…145fb4 (0, 413) Opaque[0x194]
0x145fb4…146148 # DirEnt {nam=»REMTXT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x16e8, f03=0x0000}
0x145fb4…146148 IdxSect {
0x145fb4…146148 f00 = 0x00b7 // 0x145fb4 @0x0
0x145fb4…146148 f01 = 0x0008 // 0x145fb6 @0x2
0x145fb4…146148 gno = [ // 0x145fb8 @0x4
0x145fb4…146148 [0x00]: C0x00b7.0x1.0
0x145fb4…146148 [0x01]: C0x00b7.0x2.0
0x145fb4…146148 [0x02]: C0x00b7.0x3.0
0x145fb4…146148 [0x03]: C0x00b8.0x0.0
0x145fb4…146148 ]
0x145fb4…146148 }
0x146148…1462dc Dummy {f00=0x00b7, f01=0x0190, f02=» P IDENT REMTXT 03.01.XXX.1 DDUM KMD08 & PDIV : P ENTRY TXTPRT H P ENTRY TXTOPR ^ P ENTRY TXTRD t P ENTRY REPL00 P ENTRY SETKEY P ENTRY GENWRF P ENTRY GENWRS P ENTRY SKIP P EXT FMTREM P
0x1462dc…146470 Dummy {f00=0x00b7, f01=0x0190, f02=» EJECT PTXTPRT PROC ( $************************************ " ( #* THE PROCEDURE LISTS TEXTREGISTER, N , (* EITHER COMPLETELY OR SELECTED PORTIONS z P* ON THE SPECIFIED DATASET ( $************************************ P TBT CTEXTFLG,TX
0x146470…146604 Dummy {f00=0x00b7, f01=0x0190, f02=»XTPDU | P CLEAR GTSWFLAG " MOVE GSWBCD3,=D'1' FROM TXTNR & " MOVE GSWBCD4,=D'999' TO TXTNR L 0 P MOVE GSWBCD5,=D'2' DEFAULT HARDCOPY DEVICE r PERF SPCLRN ( P IB SPBINW2,TXTLRET,TXTLRET,TXTL020 P B TXTL015 & !* PRINT HEADER O
0x146604…146798 Dummy {f00=0x00b7, f01=0x0190, f02=» B TXTL060 TXTL050 P SUB GTLINE,CBIN4 & P PERF GENWRF,GTHCDEV,TXTHDR @ B TXTL060 d * READ NEXT TEXTRECORD v TXTL060 TXTL070 P MOVE GSWBIN7,GSWBCD3 P PERF TXTRD,GSWBIN7 BNOK TXTL200 ( P CBE
0x146798…14692c Dummy {f00=0x00b7, f01=0x0190, f02=» CBL GTTXTTKO,=D'1',TXTL135 DELETED? MOVE GSWBIN1,GSWBCD5 , P MOVE GTWBCD1,GSWBCD3 J P IB GSWBIN1,TXTL100,TXTL110 h PTXTL100 P CLEAR GTSWFLAG P PERF GENWRF,GTHCDEV,TXTPR P SUB GTLINE,CBIN2 P CBG GTLINE,CBIN0,TXTL13
0x14692c…146ac0 Dummy {f00=0x00b7, f01=0x0190, f02=»F GENWRF,GTHCDEV,TXTFF2 P B TXTL109 PTXTL109 2 * P MOVE GTLINE,=W'48' SIZE OF PRINT PAGE B P SUB GTLINE,CBIN4 p P CLEAR GTSWFLAG P ADD GSWBCD3,=D'1' P PERF GENWRF,GTHCDEV,TXTHDR P SUB GSWBCD3,=D'1' P B TXTL135
0x146ac0…146c54 (0, 414) Dummy {f00=0x00b7, f01=0x0190, f02=»N0,CBIN0 P TESTIO KEYB P BOK TXTL150 $ P CALL ABORT,KEYB 8 PTXTL140 P " P ADD GSWBCD3,=D'1' NEXT RECORD ` P CBG GSWBCD3,GSWBCD4,TXTL195 P B TXTL070 PTXTL150 TEST FOR MAK-KEY P WAIT KEYB P CBNE SPBINW2,CBIN6,TXTL
0x146c54…146de8 Dummy {f00=0x00b7, f01=0x0190, f02=» CMP CBIN1,CBIN0 NOT OK RET ( PEND 4 P EJECT B PSKIP PROC P P CLEAR GTSWFLAG b P MOVE GSWBIN1,GSWBCD5 z P IB GSWBIN1,SKIP20,SKIP10 P B SKIP90 PSKIP10 $ P PERF GENWRF,CBIN3,TXTFF1 TALLY P B SKI
0x146de8…146f7c Dummy {f00=0x00b7, f01=0x0190, f02=»KIP90 PSKIP22 " P PERF GENWRF,GTHCDEV,TXTFF2 LP P B SKIP90 B PSKIP90 T P RET b P PEND n P EJECT | P* PTXTOPR PROC & P********************************* P* , P* THE PROCEDURE MAINTAINS TEXTREGISTER.
0x146f7c…147110 Dummy {f00=0x00b7, f01=0x018e, f02=»WFLAG P SET SPPROMPT P PERF FMTREM,CBIN2 TXTVEDL $ P PERF SPCLRA F P CBNE SPBINW2,CBIN3,TXTO980 Z P MOVE GSWBIN8,GSWBCD1 ~ P PERF TXTRD,GSWBIN8 P BNOK TXTO910 * P CBE GTWBCD1,=D'10',TXTO910 END MEDIUM P CLEAR GTSWF
0x147110…1472a4 Dummy {f00=0x00b7, f01=0x0190, f02=» P B TXTO000 PTXTO980 P CLEAR GTSWFLAG & PTXTO990 > P PERF SETKEY N P CMP CBIN0,CBIN0 OK b P RET ~ PTXTO910 P CLEAR GTSWFLAG P PERF SETKEY P CMP CBIN4,CBIN0 P RET P PEND P EJECT PRE
0x1472a4…147438 Dummy {f00=0x00b7, f01=0x0190, f02=» IN ANY STRINGFIELD. & P* THIS IS ACCOMPLISHED BY FINDING " P* THE FIRST 00-BYTE, COMPUTING F $ P* THE LENGTH OF THE REST OF THE l $ P* FIELD, AND DELETING THIS REST. P* ( P************************************ P MOVE GSWBIN7,LEN
0x147438…1475cc Dummy {f00=0x00b7, f01=0x0190, f02=» FOUND | P SUB GSWBIN7,GSWBIN1 P DLETE STRG,GSWBIN1,GSWBIN7 * P CMP CBIN0,CBIN0 N P RET f PREPL10 r P CMP CBIN4,CBIN0 P RET P PEND P* PTXTUNP PROC , P XCOPY GTTXTTKO,CBIN0,CBIN2,CTXBUF,CBIN0 . P XCOPY G
0x1475cc…147760 Dummy {f00=0x00b7, f01=0x0190, f02=»TU10 P RET P PEND P* & PTXTPAK PROC 0 , P XCOPY CTXBUF,CBIN0,CBIN2,GTTXTTKO,CBIN0 D P MOVE GSWBIN1,CBIN22 t " P PERF REPL00,GTLEVTXT,GSWBIN1 . P XCOPY CTXBUF,CBIN2,CBIN22,GTLEVTXT,CBIN0 P CBNL GTTXTTKO,=D'1',TXTPRET
0x147760…1478f4 (0, 415) Dummy {f00=0x00b7, f01=0x0190, f02=» PGENWRF PROC DSET,$FRMT P PFRMT $FRMT " P IB DSET,WRT10,WRT20,WRT30 6 PWRT10 X P TBF GTGTPFLG,WRT90 f P EDWRT DSHCGP,$FRMT P B WRT90 PWRT20 P TBF GTLPFLG,WRT90 P EDWRT DSHCLP,$FRMT P B WRT90 PWRT30
0x1478f4…147a88 Dummy {f00=0x00b7, f01=0x0190, f02=»ROC DSET,STRG P IB DSET,WRS10,WRS20,WRS30 PWRS10 8 P TBF GTGTPFLG,WRS90 F P EDWRT DSHCGP,STRG b P B WRS90 | PWRS20 P TBF GTLPFLG,WRS90 P EDWRT DSHCLP,STRG P B WRS90 PWRS30 P TBF GTTTPFLG,WRS90 P
0x147a88…147c1c Dummy {f00=0x00b7, f01=0x0190, f02=»OCEDURE READS THE TEXT, SPECIFIED P* IN THE PARAMETER * P* D P PERF WAITF,CTXTFLG N P MOVE GSWBIN1,=W'24' LENGTH j P MOVE CTXBUF,CBLANKS . P PERF RAREAD,DK06,=D'6',CTXBUF,GSWBIN1,BIN P BNOK TXT098 * P CBE GTWBCD1,=D'10',TXT0
0x147c1c…147db0 Dummy {f00=0x00b7, f01=0x0190, f02=»T098 P CLEAR CTXTFLG P CMP CBIN0,CBIN1 " PTXT099 : P RET H P PEND T P EJECT b PTXTWR PROC BIN p P PERF WAITF,CTXTFLG P PERF TXTPAK & P PERF RAWRIT,DK06,=D'6',CTXBUF,BIN P BNOK TXTW095 P CLEAR CTXTFLG
0x147db0…147f44 Dummy {f00=0x00b7, f01=0x0190, f02=» PEND P P PSETKEY PROC . P***************************************** 2 P* d $ P* SETS SPKEY TO 1 IF KASSE OPEN, n P* ELSE SETS SPKEY TO 2 P* . P***************************************** P MOVE SPKEY,CBIN1 &
0x147f44…1480d8 Dummy {f00=0x00b7, f01=0x018e, f02=»DR FRMT P FILLR '1',2 P FCOPY =C'UDSKRIFT ' $ P FCOPY =C'AF ' @ P FCOPY =C'TEKST ' V P FCOPY =C'FIL' p P FILLR ' ',2 P FBF GTSWFLAG,TXTH10 P FNL PTXTH10 P FILLR ' ',8 P FMEL '99E-99E-99',CMASKDAT
0x1480d8…14826c Dummy {f00=0x00b7, f01=0x0190, f02=» P FILLR ' ',2 FNL FMEND $ * 2 * < * F PTXTPR FRMT P FNL b FNL n P FMEL '999',GTWBCD1 z P FILLR ' ',1 P FMEL 'ZZZ',GTTXTTKO * P FBF GTSWFLAG,TXTPRT05 -, REGNERULLE ? P FILLR ' ',16
0x14826c…148400 Dummy {f00=0x00b7, f01=0x417c, f02=» P* P* P* PTXTFF0 FRMT & P FNL : P FNL F P FNL R P FNL ^ P FMEND j P* x P* P* PTXTFF1 FRMT P FLINK TXTFF0 P FLINK TXTFF0 P FNL P FMEND P* P* P*
0x148400…148594 (0, 416) Dummy {f00=0x00b8, f01=0x2008, f02=»
0x148594…148728 Dummy {f00=0x00b8, f01=0x0190, f02=» D j P:MTAB , ( o $ V 6 V % V E @ , ( & &' T 2 % 7_ 2 L T:CAT | , ( # L ( 2" &] , ( Y $! 6P Q $ T 9B , ( _ _ 6 @ & &"
0x148728…1488bc Dummy {f00=0x00b8, f01=0x410e, f02=» C H J 'W 'W '_6 H D ! @ , $ ! # % ' ) + ; L H D ! = H ? R A T UP ]P i r L Q W W P W8 T W P P l < 8 R #T )P [T aW T P Q T T P KW QW C V @
0x1488bc…148a50 Dummy {f00=0x00b8, f01=0x0190, f02=» 4 F IDENT I:EVA P,REL=4.2,791116,870136940420 p J F " I:EVA0K I:EVA1 I:EVA2 I:EVA3 I:EVA5 I:EVA6 I:EVA7L I:EVB I:EVI p < I:FML I:EVTO p P:MTAB p , ( :l:d:h p I:EVA2 p I:EVA1 p
0x148a50…148be4 Dummy {f00=0x00b8, f01=0x0190, f02=» 9 # W @ $ E " T ; [ p , ( W # :H 2 T Z L q , , ( @ w L D V W # q , ( L E V $ W D V q I:EVA0K q , ( @ L , W 6 2 W " q , (
0x148be4…148d78 Dummy {f00=0x00b8, f01=0x0190, f02=» Z Z : q , ( 3 :B , (V ; [ [ r $ , ( @ S z ;AV Z H # r T , ( s ; : & Z 4 r , ( : Z 4 r , ( " 2@P : [ [
0x148d78…148f0c Dummy {f00=0x00b8, f01=0x0190, f02=» * r , ( : ( :A ( @ & s , ( / " P [ :;H 2 P ;h s : I:EVI l s j , ( B O : ; V Y : 2 s | I:EVB ~ s , ( o ! : 6 2 *W " s , ( # ;b
0x148f0c…1490a0 Dummy {f00=0x00b8, f01=0x404a, f02=» P WF CVj _V$ s P 1P KP W& s t 4@ t F :;H 2 P ;h s : I:EVI l s j , ( B O : ; V Y : 2 s | I:EVB ~ s , ( o ! : 6 2 *W " s , ( # ;b
0x1490a0…149234 (0, 417) Opaque[0x194]
0x149234…1493c8 # DirEnt {nam=»REMFMT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1708, f03=0x0000}
0x149234…1493c8 IdxSect {
0x149234…1493c8 f00 = 0x00b8 // 0x149234 @0x0
0x149234…1493c8 f01 = 0x0008 // 0x149236 @0x2
0x149234…1493c8 gno = [ // 0x149238 @0x4
0x149234…1493c8 [0x00]: C0x00b8.0x1.0
0x149234…1493c8 [0x01]: C0x00b8.0x2.0
0x149234…1493c8 [0x02]: C0x00b8.0x3.0
0x149234…1493c8 [0x03]: C0x00b9.0x0.0
0x149234…1493c8 ]
0x149234…1493c8 }
0x1493c8…14955c Dummy {f00=0x00b8, f01=0x0190, f02=» P IDENT REMFMT 03.01.XXX.1 P DDUM KMD08 & PDIV : P ENTRY FMTREM H P ENTRY FMREMP ^ P EXT FMOVE t P P* PFMREMP PROC PFMTDEX ( P CALL FMOVE,EDITBUF,REMPTAB(PFMTDEX) P RET P PEND P* 4 PREMP
0x14955c…1496f0 Dummy {f00=0x00b8, f01=0x0190, f02=»D P P 6 PATTTAB FTABLE TXTPDU,TXTVEDL,FMTLEVST,FMTLEVVR, C P FMTLEVTR,FMTLEVPR T P p P x " PFMTLEVST FRMT STAMOPLYSNINGER P FSL , P FCOPY GSWSTR9 VEDLIGEH/SLETNING/FORESPG P FILLR ' ',1 P FCOPY ='LEVERAND
0x1496f0…149884 Dummy {f00=0x00b8, f01=0x0190, f02=»MINL=1,MAXL=10,SCHK=7,ME P FMEL 'XXXXXXXXXX',GTLEVNR P FB FLEV100 B " PFLEV005 FIRST TIME, FORESPG V " P FKI 27,MINL=1,MAXL=10,SCHK=7 | P FMEL 'XXXXXXXXXX',GTLEVNR P FB FLEV100 PFLEV010 P FTAB 27 P FBF GTSPGFLG,FL
0x149884…149a18 Dummy {f00=0x00b8, f01=0x0190, f02=»FLG,FLEV020 P FKI 6,MAXL=30,ME,ALPHA PFLEV020 4 P FCOPY GTLEVNVN D P FNL P FCOPY ='ADR' h P FTAB 5 ~ P FBT GTSPGFLG,FLEV030 P FKI 5,MAXL=32,ALPHA PFLEV030 P FCOPY GTLEVADR P FNL P FCOPY ='BY
0x149a18…149bac Dummy {f00=0x00b8, f01=0x0190, f02=»COPY ='POSTNR ' P FBT GTSPGFLG,FLEV050 P FKI 8,MAXL=4,MINL=4 6 PFLEV050 R P FMEL 'XXXX',GTLEVPNR b P FTAB 14 P FCOPY ='-DISTR ' P FBT GTSPGFLG,FLEV060 P FKI 21,MAXL=13,ALPHA PFLEV060 P FCOPY GTLEVPDI
0x149bac…149d40 Dummy {f00=0x00b8, f01=0x0190, f02=» ~ P FTAB 14 P FCOPY ='GIRONR ' P FBT GTSPGFLG,FLEV080 2 P FKI 21,MAXL=7,MINL=7,SCHK=1 P PFLEV080 t P FMEL 'XXXXXXX',GTLEVGI P FNL P FCOPY ='ALT.ADR ' P FBT GTSPGFLG,FLEV090 " P FKI 9,MINL=10,MAXL=10,SCHK=7
0x149d40…149ed4 (0, 418) Dummy {f00=0x00b8, f01=0x0190, f02=»EV095 " P FCOPY ='SLETNING EJ TILLADT' PFLEV095 4 P FBF GTSPGFLG,FLEV100 D P FBF GTVDUFLG,FLEV100 b P FNL P FLINK FMTLEVVR PFLEV100 P FMEND P P P ( PFMTLEVVR FRMT VARIABLE OPLYSNINGER P F
0x149ed4…14a068 Dummy {f00=0x00b8, f01=0x0190, f02=»COPY ='NR' P FKI 27 P FMEL 'XXXXXXXXXX',GTLEVNR " PFLEV210 D P FNL T P FCOPY ='SIDSTE UDB ' ` & P FMEL ='99E-99E-99',GTREGF(CBIN10) ~ P FTAB 22 , P FMEL ='ZZZVZZZVZZ9E,99-',GTREGF(CBIN11) P FNL P FCOPY ='UDB. ]TD '
0x14a068…14a1fc Dummy {f00=0x00b8, f01=0x0190, f02=»17 & P FMEL ='99E-99E-99',GTREGF(CBIN13) P FNL 4 P FCOPY ='FAKTURA' @ P FLINK FBELOB Z P FTAB 17 p , P FMEL ='ZZZVZZZVZZ9E,99-',GTREGF(CBIN14) P FNL P FCOPY ='KREDITNOTA' P FLINK FBELOB P FTAB 17 , P FMEL ='ZZ
0x14a1fc…14a390 Dummy {f00=0x00b8, f01=0x018e, f02=»99-',GTREGF(CBIN16) | P FMEND P * P 2 P : PFMTLEVTR FRMT REMIT TRANS B P FSL d P FCOPY GSWSTR9 p P FILLR ' ',1 P FCOPY ='LEVERAND ' P FTAB 24 P FCOPY ='NR' " P FKI 27,MINL=10,MAXL=10,SCHK=7 $ P FMEL 'X
0x14a390…14a524 Dummy {f00=0x00b8, f01=0x0190, f02=» P FILLR ' ',2 * P FMEL 'ZZVZZZVZZ9E,99-',GTDUPF(CBIN4) P FNL J P FCOPY ='TEKST ' V P FMEL 'ZZ9',GTDUPF(CBIN15) n P FTAB 11 P FCOPY GTLEVTXT P FTAB 35 P FMEL '9',GTDUPF(CBIN21) P FNL P FCOPY ='TEKST '
0x14a524…14a6b8 Dummy {f00=0x00b8, f01=0x0190, f02=»NT. ' $ P FMEL '9999999999',GTDUPF(CBIN1) P FTAB 23 6 P FCOPY =']R ' F P FMEL 'X',GTDUPF(CBIN6) P FNL | P FNL P FMEL 'ZZZZ9',GTDUPF(CBIN22) P FMEND P* P* . PFMTLEVPR FRMT SCREEN FORMAT FOR PRINTING
0x14a6b8…14a84c Dummy {f00=0x00b8, f01=0x0190, f02=»L '99E-99E-99',CMASKDAT P FNL P FCOPY ='VEDL. ' , P FCOPY ='DATO' D P FKI 13,MINL=6,MAXL=6,SCHK=4 Z P FMEL 'XXE-XXE-XX',GTPRTDAT ~ P FNL P FCOPY ='FRA/TIL NR ' " P FKI 13,MINL=7,MAXL=10,SCHK=7 P FMEL 'XXXXXXXXXX',GTP
0x14a84c…14a9e0 Dummy {f00=0x00b8, f01=0x0190, f02=» P FKI 22,MAXL=1 P FMEL 'X',GTLEVBFO P FNL 4 P FCOPY ='NULSTIL SALDO (1) ' @ P FKI 22,MAXL=1 d P FMEL 'X',GTLEVNR z P FNL P FMEND P* P* PFVALDAT FRMT P FTEXT X'56414C5C52' P FCOPY ='DATO' P
0x14a9e0…14ab74 (0, 419) Dummy {f00=0x00b8, f01=0x018e, f02=»TXTPDU FRMT P FSL P FBT GTSWFLAG,TXTP10 P FCOPY =C'UDSKRIFT ' < P FCOPY ='AF ' X PTXTP10 n P FCOPY =C'TEKST ' | P FCOPY =C'FIL' P FILLR ' ',4 P FMEL '99E-99E-99',CMASKDAT FNL P FCOPY =C'FRA/TIL NR '
0x14ab74…14ad08 Dummy {f00=0x00b8, f01=0x0190, f02=» z FNL FNL P FBT GTSWFLAG,TXTP20 FCOPY =C'PRINTENHED?' < FNL Z P FCOPY ='PRINTER=1,RULLE=2' f P FKI 20,MINL=1,MAXL=1 FMEL '9',GSWBCD5 PTXTP20 FMEND * * P* PTXTVEDL FRMT
0x14ad08…14ae9c Dummy {f00=0x00b8, f01=0x0190, f02=»XX',GSWBCD1 P FBT GTSWFLAG,TXTV20 P FNL 0 P FNL > P FCOPY =C'TEKST ' J P FKI 7,MINL=1,MAXL=22,ALPHA d P FCOPY GTLEVTXT P FNL P FNL P FCOPY =C'KODE ' P FKI 7,MINL=1,MAXL=2,NUM P FMEL 'X',GTTXTTKO
0x14ae9c…14b030 Dummy {f00=0x00b8, f01=0x0190, f02=»*************** BUNDTCHECK ******************** FBDTCHK FRMT 8 FILLR '+',2 L P FTEXT X'14' (1) TEXT1 ` P FTEXT X'15' (2) INFO1 ~ FNL FILLR ' ',21 P FTEXT X'0F' (3) AMOUNT1 FNL FILLR ' ',53 P FMEL '9
0x14b030…14b1c4 Dummy {f00=0x00b8, f01=0x0190, f02=» P FTEXT X'15' (6) INFO2 FNL " FILLR ' ',21 . P FTEXT X'0F' (7) AMOUNT2 D FNL d FNL p P FILLR ' ',51 | P FTEXT X'1E' (8) LEVNAVN FNL P FTEXT X'14' (9) TEXT3 P FTEXT X'15' (10) INFO3 P FILLR ' ',1
0x14b1c4…14b358 Dummy {f00=0x00b8, f01=0x0190, f02=»XT X'14' (13) LEVBY FNL P FILLR ' ',51 ( P FTEXT X'04' (14) POSTNR > P FILLR ' ',2 ^ P FTEXT X'0D' (15) POSTDIST r FNL FNL P FILLR ' ',18 P FTEXT X'0F' (16) AMOUNT FMEND 8 P*************** BUNDTCHE
0x14b358…14b4ec Dummy {f00=0x00b8, f01=0x018e, f02=» P FNL P FNL P FNL P FNL ( P FNL 4 P FILLR ' ',10 @ P FMEL '99V99V99',GTPRTDAT V P FILLR ' ',34 x " P FTEXT X'0F' (1) TOTAL AMOUNT P FNL P FNL P FNL P FILLR ' ',9 P FTEXT X'1E' (2) LEVNAVN
0x14b4ec…14b680 Dummy {f00=0x00b8, f01=0x0190, f02=» P FILLR ' ',9 P FTEXT X'04' (5) POSTNR P FILLR ' ',2 < P FTEXT X'0D' (6) POSTDIST P P FNL r P FNL ~ P FNL P FNL P FNL P FNL P FNL P FNL P FMEND " ********** GIROKORT ****
0x14b680…14b814 (0, 420) Dummy {f00=0x00b9, f01=0x0190, f02=» FILLR ' ',5 P FTEXT X'16' (3) TEXT 2 P FILLR ' ',20 4 P FTEXT X'0A' (4) GIRO 2 J FNL j P FTEXT X'15' (5) INFO 1 v P FILLR ' ',36 P FTEXT X'15' (6) INFO 2 FNL FILLR ' ',7 P FTEXT X'0F' (7) AMOUNT 1
0x14b814…14b9a8 Dummy {f00=0x00b9, f01=0x0190, f02=» ',28 P FTEXT X'1E' (10) LEVNAVN FNL 0 P FTEXT X'16' (11) TEXT2 < P FILLR ' ',2 P FTEXT X'20' (12) LEVADR p FILLR ' ',1 P FTEXT X'16' (13) TEXT 2 P FILLR ' ',3 P FTEXT X'20' (14) LEVADR FNL P FTE
0x14b9a8…14bb3c Dummy {f00=0x00b9, f01=0x0190, f02=»ILLR ' ',4 P FTEXT X'14' (18) LEVBY FNL 2 FILLR ' ',7 > P FTEXT X'0F' (19) AMOUNT2 R P FILLR ' ',2 t P FTEXT X'04' (20) POSTNR P FILLR ' ',2 P FTEXT X'0D' (21) POSTDIST P FILLR ' ',21 P FTEXT X'0F' (22) AM
0x14bb3c…14bcd0 Dummy {f00=0x00b9, f01=0x018e, f02=» P FTEXT X'16' (25) TEXT3 P FILLR ' ',35 ( P FTEXT X'16' (26) TEXT3 > FNL ^ P FTEXT X'15' (27) INFO3 j P FILLR ' ',36 P FTEXT X'15' (28) INFO3 FNL FILLR ' ',7 P FTEXT X'0F' (29) AMOUNT 3 FILLR
0x14bcd0…14be64 Dummy {f00=0x00b9, f01=0x0190, f02=» P FTEXT X'0F' (32) AMOUNT FMEND $ 2 : 6 1**********BUNDTREMITTERINGSDETAILLINIE ********** B PFBDTSAM FRMT | FNL P FTEXT X'0F' (1) TOTAL P FILLR ' ',1 P FTEXT X'0A' (2) GTLEVNR P FILLR ' ',1 P FTE
0x14be64…14bff8 Dummy {f00=0x00b9, f01=0x4066, f02=»O 2 | P FILLR ' ',1 P FTEXT X'15' (6) INFO 3 P FMEND @ N END V@ bIE ********** B PFBDTSAM FRMT | FNL P FTEXT X'0F' (1) TOTAL P FILLR ' ',1 P FTEXT X'0A' (2) GTLEVNR P FILLR ' ',1 P FTE
0x14bff8…14c18c Dummy {f00=0x00b9, f01=0x2008, f02=» ND END @ GSWBCD3 FMEL 'E-ZZ9',GSWBCD4 2 FILLR ' ',4 P FNL d FMEND p * ~ * * TXTPRT FRMT FSL FNL FNL FM,EL '999',TXTNR FMEL 'BB9BB',TXTKODE
0x14c18c…14c320 Dummy {f00=0x00b9, f01=0x4110, f02=» T:TABE , ( ? 2 Y 69h Q X :h Y 0 W T:SCR2 F T:TABC X T:TABN j * & ] U X Q W Y 0 | w 8 4 W W W W W W !W IQ YW ]U eQ kW x
0x14c320…14c4b4 (0, 421) Opaque[0x194]
0x14c4b4…14c648 # DirEnt {nam=»DIV461«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1728, f03=0x0000}
0x14c4b4…14c648 IdxSect {
0x14c4b4…14c648 f00 = 0x00b9 // 0x14c4b4 @0x0
0x14c4b4…14c648 f01 = 0x0016 // 0x14c4b6 @0x2
0x14c4b4…14c648 gno = [ // 0x14c4b8 @0x4
0x14c4b4…14c648 [0x00]: C0x00b9.0x1.0
0x14c4b4…14c648 [0x01]: C0x00b9.0x2.0
0x14c4b4…14c648 [0x02]: C0x00b9.0x3.0
0x14c4b4…14c648 [0x03]: C0x00ba.0x0.0
0x14c4b4…14c648 [0x04]: C0x00ba.0x1.0
0x14c4b4…14c648 [0x05]: C0x00ba.0x2.0
0x14c4b4…14c648 [0x06]: C0x00ba.0x3.0
0x14c4b4…14c648 [0x07]: C0x00bb.0x0.0
0x14c4b4…14c648 [0x08]: C0x00bb.0x1.0
0x14c4b4…14c648 [0x09]: C0x00bb.0x2.0
0x14c4b4…14c648 [0x0a]: C0x00bb.0x3.0
0x14c4b4…14c648 ]
0x14c4b4…14c648 }
0x14c648…14c7dc Dummy {f00=0x00b9, f01=0x0190, f02=» P IDENT DIV461 03.01.XXX.1 P DDUM KMD08 & P PDIV D P ENTRY FRMTJT Z P ENTRY FRMXJT p P ENTRY FRMTTA P ENTRY FRMXTA P ENTRY FRMTVO P ENTRY FRMTKV P ENTRY FRMXVO P ENTRY FRMTKT
0x14c7dc…14c970 Dummy {f00=0x00b9, f01=0x0190, f02=» PROC 0 P CALL FMOVE,GTSTRFMT,FTBJT(GTREGDEX) P RET B P PEND V P* l PFRMXJT PROC XJTDEX v ( P CALL FMOVE,GTSTRFMT,FTBXJT(XJTDEX) P RET P PEND P* PFRMTTA PROC 0 P CALL FMOV
0x14c970…14cb04 Dummy {f00=0x00b9, f01=0x0190, f02=»XTA(XTADEX) x P RET P PEND P* . PFRMTVO PROC 8 0 P CALL FMOVE,GTSTRFMT,FTBVO(GTREGDEX) L P RET P PEND P* PFRMXVO PROC XVODEX ( P CALL FMOVE,GTSTRFMT,FTBXVO(XVODEX) P RET P P
0x14cb04…14cc98 Dummy {f00=0x00b9, f01=0x018e, f02=» 0 P CALL FMOVE,GTSTRFMT,FTBKT(GTREGDEX) P RET < P PEND P P* f PFRMXKT PROC XKTDEX p ( P CALL FMOVE,GTSTRFMT,FTBXKT(XKTDEX) P RET P PEND P* PFRMTGP PROC ( P CALL FMOVE,GTSTRFMT,FTB
0x14cc98…14ce2c Dummy {f00=0x00b9, f01=0x0190, f02=» j P RET P PEND P* " P* , P* 6 P EJECT @ P* V P* FORMATS FOR JOURNAL ` P* @ PFTBJT FTABLE JTFMT01,JTFMT02,JTFMT03,JTFMT04,JTFMT02, C 2 P JTFMT01,JTFMT02,JTFMT08,JTFMT08,JTFMT02, C . P
0x14ce2c…14cfc0 Dummy {f00=0x00b9, f01=0x0190, f02=»F b 2 P FLINK JTSUB01 LINE 1 P FEOR @ 2 P FLINK JTSUB04 LINE 2 V P FMEND P* PJTFMT02 FRMT P FLINK JTFMT02L P FMEND P* PJTFMT02L FRMT 2 P
0x14cfc0…14d154 (0, 422) Dummy {f00=0x00b9, f01=0x0190, f02=» P FLINK JTSUB08 VALUE P FEOR P FILLR ' ',8 6 F P FMEL 'X',GTDUPF(CBIN6) RE$ R P FILLR ' ',2 P FLINK JTSUB06 FOR TRANS 10 P FLINK JTSUB30 ARKIV KNT.NR P FILLR '
0x14d154…14d2e8 Dummy {f00=0x00b9, f01=0x0190, f02=» FLINK JTSUBST START INF P FILLR ' ',9 8 $ P FCOPY TT16TXT RATE/RENTE/GEBYR T 2 P FLINK JTSUB06 CPR/CIR | 0 P FLINK JTSUB08 VALUE P FEOR P FIL
0x14d2e8…14d47c Dummy {f00=0x00b9, f01=0x0190, f02=»,5 ~ H P FMEL 'ZZ.ZZ.ZZ',GTDUPF(CBIN7) VALGR F P FMEL 'BBZ',GTDUPF(CBIN8) BETALINGSFORM BFO V 8 P FLINK JTSUB30 ARK KONTO NR P FILLR ' ',2 8 P FMEL '
0x14d47c…14d610 Dummy {f00=0x00b9, f01=0x0190, f02=» FILLR ' ',4 P FMEND P* * PJTFMT04 FRMT 4 P FLINK JTFMT04L H P FMEND ` P* n PJTFMT04L FRMT x P FLINK JTSUBST START INF P FILLR ' ',15 2 P FLINK JTSUB06 CPR/CIR 0 P
0x14d610…14d7a4 Dummy {f00=0x00b9, f01=0x0190, f02=»IN3) BKO | P FILLR ' ',5 D P FMEL 'ZZ.ZZ.ZZ',GTDUPF(CBIN7) VALOR $ P FILLR ' ',3 l 6 P FLINK JTSUB30 ARK KNT NR B P FMEL 'BBBZZ',GTDUPF(CBIN10) F$R F P
0x14d7a4…14d938 Dummy {f00=0x00b9, f01=0x0190, f02=»M$ R B P FMEL 'BBZB',GTDUPF(CBIN13) OPK P FMEND P P* f PJTFMT08 FRMT p P FLINK JTFMT08L P FMEND P* PJTFMT08L FRMT 4 P FLINK JTSUBST START INF 2 P
0x14d938…14dacc Dummy {f00=0x00b9, f01=0x018e, f02=»R 2 P FLINK JTSUB31 LINE 3 P FMEND @ P* V PJTFMT12 FRMT ` P FLINK JTFMT12L t P FMEND P* PJTFMT12L FRMT 4 P FLINK JTSUBST START INF 8 P FLINK JTSUB05
0x14dacc…14dc60 Dummy {f00=0x00b9, f01=0x0190, f02=» P FILLR ' ',2 0 P FLINK JTSUB08 VALUE P FEOR T P FILLR ' ',2 b 2 P FMEL 'BZZZZZZZZZZ',GTDUPF(CBIN2) DIVERSE TEXT v P FILLR ' ',16 P FMEND P* $ PJTFMT18 FRMT TRANS 18,19,28,29 ( P FLINK
0x14dc60…14ddf4 (0, 423) Dummy {f00=0x00b9, f01=0x0190, f02=» START INF r P FILLR ' ',2 P FCOPY GTTESTMK 6 : P FCOPY TTCYM CYCLE MARKERING N 8 P FMEL '99B',GTREGNR TRANS, TYPE P FLINK FLBNR P FMEND P* : PJTSUB01 FRM
0x14ddf4…14df88 Dummy {f00=0x00b9, f01=0x0190, f02=»08 VALUE | P FMEND P* 6 PJTSUB04 FRMT @ P FILLR ' ',2 V P FILLR ' ',4 r P FMEL 'ZZ',GTDUPF(CBIN3) BKO * P FMEL 'BZZ.ZZ.ZZ',GTDUPF(CBIN7) V.DATO B P FMEL 'BBX',GTDUPF(CBIN6)
0x14df88…14e11c Dummy {f00=0x00b9, f01=0x018e, f02=»L 'XXXXXXE-XXXX',GTDUPF(CBIN10) YD.MODT ( P FMEL 'BXX',GTDUPF(CBIN11) BET. ART 0 P FMEND P* r 6 PJTSUB05 FRMT REG KNT NR | 6 P FMEL 'B999E-999E-99E-99B',GTDUPF(CBIN1) P FMEND P*
0x14e11c…14e2b0 Dummy {f00=0x00b9, f01=0x0190, f02=» j P FB JTLAB08 PJTLAB06 P FBT BLEV,JTLAB07 , & P FMEL 'XXXXXXE-XXXX',GTDUPF(CBIN2) F P FB JTLAB08 p PJTLAB07 ( P FMEL 'XXX.XXXXX.XXB',GTDUPF(CBIN2) PJTLAB08 P FMEND P* P* 8 PJTSUB08 FRMT
0x14e2b0…14e444 Dummy {f00=0x00b9, f01=0x0190, f02=» FMEND P* PJTSUB10 FRMT LEVERANDOER NR & P FMEL 'XXXXXXXXE-XX',GTDUPF(CBIN2) B P FMEND l P* z PJTSUB18 FRMT P FILLR ' ',2 " P FMEL 'XXX',GTDUPF(CBIN15) TXT * P FMEL 'BXXXXXXXXXX',GTDUPF(CBIN13) NR- , P FMEL 'B
0x14e444…14e5d8 Dummy {f00=0x00b9, f01=0x0190, f02=» FMEND P* 6 PJTSUB30 FRMT ARK KNT NR 6 P FMEL 'BBZZZE-ZZZE-ZZE-ZZ',GTDUPF(CBIN9) R P FMEND P* 6 PJTSUB31 FRMT LINE 3 - 8 P FILLR ' ',2 F P FMEL
0x14e5d8…14e76c Dummy {f00=0x00b9, f01=0x0190, f02=» FMEL 'BZZZZZZZZZZ',GTDUPF(CBIN14) LEV NR D P FMEL 'BZZZZ',GTDUPF(CBIN15) TXT NR H D P FMEL 'BZZ',GTDUPF(CBIN16) OMR NR D P FMEL 'BZZ.ZZ.ZZ',GTDUPF(CBIN18)
0x14e76c…14e900 Dummy {f00=0x00b9, f01=0x0190, f02=» ADR KODE h P FMEND " P* 8 P EJECT B P* P 0 P* VARIOUS FORMATS FOR JOURNAL TAPE Z P* @ PFTBXJT FTABLE XJTF01,XJTF02,XJTF03,XJTF04,XJTF05,XJTF06, C 2 P XJTF07,FMTFMT,XJTF09,XJTF10,XJTF11,VOX15,
0x14e900…14ea94 (0, 424) Dummy {f00=0x00ba, f01=0x018e, f02=» =' KVIT' P FMEND P* PXJTF02 FRMT KONTOKORT * P FILLR ' ',2 H P FLINK XJTF02L P FMEND r P* PXJTF02L FRMT P FLINK FLBNR P FILLR ' ',2 P FCOPY ='KONTOKORT' P FBF GTSLDFLG,XJTF02EX & P FMEL 'B
0x14ea94…14ec28 Dummy {f00=0x00ba, f01=0x018e, f02=» z P FMEND P* PXJTF04 FRMT P FLINK VOSUM07 4 P FCOPY =' SUM' J P FMEND ` PXJTF05 FRMT n P FLINK XJTF05L P FMEND P* P* PXJTF05L FRMT P FILLR ' ',2 P FILLR '*',50 P FEOR P F
0x14ec28…14edbc Dummy {f00=0x00ba, f01=0x0190, f02=» P FCOPY ='MASKIN NR' P FCOPY =' EKS.LBNR' $ P FEOR @ P FILLR ' ',2 N P FCOPY GTTESTMK b P FMEL '99.99.999.9',CVERSNR z P FILLR ' ',2 P FMEL '99E-99E-99',CMASKDAT P FILLR ' ',3 P FMEL '99E-99E-99',GTDATO
0x14edbc…14ef50 Dummy {f00=0x00ba, f01=0x018e, f02=»ILLR ' ',2 : P FCOPY ='VERSURKONTONR KASSEKONTONR PRIMO KASSE ' P FEOR P P FILLR ' ',2 ^ $ P FMEL '999E-99999E-99BB',TVERSUR r & P FMEL '999E-99999E-99BB',TTCASHAC $ P FMEL 'ZZZ.ZZZ.ZZ9.ZZ-',TTSTCASH P FEOR P FILLR ' ',2
0x14ef50…14f0e4 Dummy {f00=0x00ba, f01=0x0190, f02=» P FILLR ' ',2 P FILLR '*',50 P FEOR . P FILLR ' ',2 < P FCOPY ='KASSELUKNING' P P FILLR ' ',30 n P FEOR P FILLR ' ',2 P FCOPY ='T[LLER' P FILLR ' ',10 P FCOPY ='DEBET' P FILLR ' ',12 P FCOPY
0x14f0e4…14f278 Dummy {f00=0x00ba, f01=0x0190, f02=» ',2 P FMEL 'ZZ',GTWBCD1 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(GSWBIN5,CBIN2) & 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(GSWBIN5,CBIN1) ` P FMEND P* PXJTF09 FRMT P FCOPY =' START TEST' P FMEND P* PXJTF10 FRMT
0x14f278…14f40c Dummy {f00=0x00ba, f01=0x0190, f02=» FMEND P* PXJTF13 FRMT P FILLR ' ',2 , P FLINK XJTF13L @ P FMEND V P* d PXJTF13L FRMT n P FLINK JTSUB05 REG KNT NO * P FMEL 'BZZZ',GTDUPF(CBIN2) COUNTER NO 2 P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) VALUE P
0x14f40c…14f5a0 Dummy {f00=0x00ba, f01=0x0190, f02=» P FMEL '99B',GTWBCD2 P FCOPY GSWSTR9 P FMEL '99',GTWBCD1 6 P FMEND P P* ^ PXJTF16 FRMT h P FILLR ' ',2 | P P P FMEL '****9',CCHKLBNR P FCOPY =' CHECK' P FMEND P* PFMTFMT FRMT P FLINK
0x14f5a0…14f734 (0, 425) Dummy {f00=0x00ba, f01=0x0190, f02=» EJECT P* : P* FORMATS FOR VOUCHER 'BILAG AFSTEMPLING' P* V @ PFTBVO FTABLE BAFST01,BAFST02,BAFST03,BAFST04,BAFST02, C ` @ P BAFST01,BAFST02,BAFST08,BAFST08,BAFST02, C 2 P BAFST12,BAFST01,BAFST01,BAFST0
0x14f734…14f8c8 Dummy {f00=0x00ba, f01=0x0190, f02=»T52,BAFST53,BAFST54 P* P* & PBAFST01 FRMT TRANS 01-06 0 P FLINK BAFST01L R P FMEND j P* x PBAFST01L FRMT 8 P FLINK BSUB01 HEADER P FBT TTKORTFL,B1LAB1 P FILLR ' ',6 " P FME
0x14f8c8…14fa5c Dummy {f00=0x00ba, f01=0x0190, f02=»MEL 'B**B',GTDUPF(CBIN3) BKO PB1LAB2 $ < P FLINK JTSUB06 CPR-CIR-NR 2 @ P FLINK BSUB02 REGKONTO-BELOB r P FMEND P* P* B PBAFST02 FRMT
0x14fa5c…14fbf0 Dummy {f00=0x00ba, f01=0x0190, f02=» HEADER l P FILLR ' ',1 ! 8 P FMEL '******E-****',GTDUPF(CBIN2) CPR/CIR TRANS 10 ! , P FILLR '*',3 ! h P FBT TTKORTFL,B2LAB1 ! | P FILLR '*',13 ! PB2LAB1 ! @ P FLINK BSUB02 REGKONTO-BELOB ! P
0x14fbf0…14fd84 Dummy {f00=0x00ba, f01=0x0190, f02=»* ! PBAFST08L FRMT " 8 P FLINK BSUB01 HEADER " $ P FMEL 'BBB**B',GTDUPF(CBIN3) BKO " P FBZ GTUSED(CBIN13),B8LAB1 " . P FMEL 'ZZZZZZZZZZB',GTDUPF(CBIN13) FAKTNR " P FB B8LAB5 " PB8LAB1 " P FBZ GTUSED(CBIN
0x14fd84…14ff18 Dummy {f00=0x00ba, f01=0x0190, f02=»14) LEVNR " p PB8LAB5 # P FLINK JTSUB10 LEVERAND. # > P FLINK BSUB02 REGKONTO-BELOB # @ P FMEND # P* # P* # PBAFST12 FRMT TRANS 12 # P FLINK BAFST12L # P FMEND # P* # PBAFST12L FRMT
0x14ff18…1500ac Dummy {f00=0x00ba, f01=0x0190, f02=»MEL '999B',GTMSK MASKINNR # P FLINK FLBNR $ 8 @ P FMEL 'B99.99.99',GTDATO POSTERINGSDATO $ L B P FCOPY TTSUPMRK SUPPLEMENTS-MARK $ < P FMEL '99',GTREGNR TRANSTY
0x1500ac…150240 Dummy {f00=0x00ba, f01=0x018e, f02=» TTKORTFL,B12LAB1 $ P FILLR '*',13 % PB12LAB1 % 0 @ P FLINK BSUB02 REGKONTO-BELOB % @ P FMEND % P* % P* % PBAFST03 FRMT BILAG TRANS 3 % P FLINK BSUB10 % P FLINK BSUB11 % P FLINK BSU
0x150240…1503d4 (0, 426) Dummy {f00=0x00ba, f01=0x0190, f02=» P FMEND & P* & P* & PBAFST40 FRMT & & P FMEND & : P* & H PBAFST41 FRMT & R P FMEND & f PBAFST42 FRMT & t P FMEND & P* & PBAFST45 FRMT & P FMEND & P* & PBAFST46 FRMT & P FMEND & P* & PBAFST47 FRMT &
0x1503d4…150568 Dummy {f00=0x00ba, f01=0x0190, f02=» FMEND & P* ' PBAFST51 FRMT ' P FMEND ' , P* ' : PBAFST52 FRMT ' D P FMEND ' X P* ' f PBAFST53 FRMT ' p P FMEND ' P* ' PBAFST54 FRMT ' P FMEND ' P* ' P* ' P* ' 8 PBSUB01 FRMT
0x150568…1506fc Dummy {f00=0x00ba, f01=0x0190, f02=» FMEL '999B',GTMSK MASKINNR ' P FLINK FLBNR ( @ @ P FMEL 'B99.99.99',GTDATO POSTERINGSDATO ( T B P FCOPY TTSUPMRK SUPPLEMENTS-MARK ( < P FMEL '99',GTREGNR
0x1506fc…150890 Dummy {f00=0x00ba, f01=0x0190, f02=»GKONTONR ( < P FMEL '*.***.***.**9.99-',GTDUPF(CBIN4) BELOB ) B P FCOPY TTDBKRM DEBET/KREDIT-MARK ) P P FILLR ' ',1 ) P FMEND ) P* ) P* ) PBSUB04 FRMT ) P FCOPY GTTESTMK )
0x150890…150a24 Dummy {f00=0x00ba, f01=0x0190, f02=»TMSK MASKINNR ) x " P FMEL '99B',GTDUPF(CBIN3) BKO * & P FMEND * L P* * b P* * l PBSUB05 FRMT * v P FLINK FLBNR * > P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) BELOB * B P FCOPY TTDBKRM
0x150a24…150bb8 Dummy {f00=0x00ba, f01=0x0190, f02=»CBIN3) BKO * | P FBT TTKORTFL,B6LAB1 + P FCOPY TT07TXT + . P FILLR ' ',1 + D . P FMEL 'ZZ.ZZ.ZZB',GTDUPF(CBIN7) VAL. DATO + X PB6LAB1 + P FMEND + P* + P* + PBSUB07 FRMT + P FILLR ' ',1 + < P FLINK JTSUB06
0x150bb8…150d4c Dummy {f00=0x00ba, f01=0x0190, f02=» DEBET/KREDIT-MARK + l P FILLR ' ',1 , $ P FLINK SKAF01 LINE NR , 8 P FMEND , V P* , l PBSUB10 FRMT , v P FILLR '+',2 , P FCOPY GTTESTMK TEST MARK , P FMEL '999B',GTMSK MASKINNR , P FLINK FLBNR , & P FMEL 'B99.99.99
0x150d4c…150ee0 Dummy {f00=0x00ba, f01=0x0190, f02=»L]R , t 2 P FMEL 'E-9999999999B',GTDUPF(CBIN2) DEBITOR NR - , P FMEL 'XX.XXPP',GTDUPF(CBIN7) VALOERDATO - B & P FMEL 'BXB',GTDUPF(CBIN12) RTE/GEB - r P FMEND - P* - PBSUB12 FRMT - P FBF TTASKAT,B12LAB5 - $ P FMEL 'XX',GTDUPF(CBIN11) REST]R -
0x150ee0…151074 (0, 427) Dummy {f00=0x00ba, f01=0x0190, f02=»DEBITORNR - l , P FMEL 'XX.XXPP',GTDUPF(CBIN7) VALOERDATO . P FILLR ' ',3 . B P FMEND . V P* . d PBSUB13 FRMT . n 2 P FMEL '*.***.***.**9.99-',GTDUPF(CBIN4) VALUE . P FCOPY TTDBKRM . P FILLR ' ',1 . P FMEND . P* . PFLBNR FRMT EK
0x151074…151208 Dummy {f00=0x00ba, f01=0x0190, f02=» PFLBNR20 / P FMEND / P* / " P EJECT / , P* / : * P* VARIOUS FORMATS FOR VOUCHER / D P* / r : PFTBXVO FTABLE FMTFMT,VOFMT02,VOFMT02,BAXF04,BAXF05, C / | * P BAXF06,VOSUM07,VOX08,VOX09,VOX10, C / ( P VOX11,VOX12,VOX13,VOX14,VOX15,
0x151208…15139c Dummy {f00=0x00ba, f01=0x0190, f02=»ND / P* 0 PVOFMT02L FRMT 0 P FILLR '+',2 0 * P FBF TTCY1FLG,VOLAB02 0 > P FCOPY ='ARKIV' 0 P FLINK JTSUB30 0 t PVOLAB02 0 P FILLR ' ',4 0 P FCOPY GSWSTR9 0 & P FMEL '*.***.***.**9.99+',TTCYKTOT 0 P FILLR ' ',2 0 P FMEND
0x15139c…151530 Dummy {f00=0x00ba, f01=0x0190, f02=»,2 0 P FLINK BAXF05L 1 P FMEND 1 P* 1 . PBAXF05L FRMT 1 8 P FLINK BSUB04 1 L P FEOR 1 b P FILLR '0',2 1 p P FLINK BSUB05 1 P FMEND 1 P* 1 PBAXF06 FRMT 1 P FLINK BAXF06L 1 P FMEND 1 P* 1 PBAXF06L FRMT 1 P
0x151530…1516c4 Dummy {f00=0x00ba, f01=0x0190, f02=» P* 2 PVOSUM07 FRMT SUMBILAG 2 P FLINK VOSUM07L 2 , P FMEND 2 D P* 2 R PVOSUM07L FRMT 2 P FILLR '+',2 2 r P FMEL '999B',GTMSK MASKINNR 2 ( P FMEL 'B99.99.99B',GTDATO EKSP.LB.NR 2 P FMEL '****9',GTSUMST 2 P FCOPY ='-' 2 P
0x1516c4…151858 Dummy {f00=0x00ba, f01=0x0190, f02=» 2 P* 3 PVOX08 FRMT 3 P FLINK VOX08L 3 $ P FMEND 3 : P* 3 H PVOX08L FRMT 3 R P FILLR '+',2 3 f P FCOPY GTTESTMK 3 z P FMEL '999',GTMSK 3 P FMEL 'BB99.99.99',GTDATO 3 P FMEL 'BBZ999',CKMDNR 3 P FMEL 'BB****9',TTSTLBNR 3
0x151858…1519ec Dummy {f00=0x00ba, f01=0x0190, f02=»EOR 3 P FILLR '2',2 4 P FILLR '*',60 4 P FILLR '*',8 4 6 P FEOR 4 J P FILLR '4',2 4 X P FCOPY ='KONTONR' 4 l P FILLR ' ',6 4 P FCOPY ='T[LLER' 4 P FILLR ' ',9 4 P FTEXT 'NETTO' 4 P FILLR ' ',12 4 P FCOPY ='DEBET' 4
0x1519ec…151b80 Dummy {f00=0x00ba, f01=0x0190, f02=»VOX09L FRMT 4 P FILLR '2',2 5 ( P FMEL 'XXXE-XXXXXE-XX',GTDUPF(CBIN1) 5 ( P FILLR ' ',4 5 T P FMEL '99',GTWBCD1 5 h 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) NETTO 5 > P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',C12ACC(GSWBIN5,CBIN2) DEBET 5 > P FMEL 'BBZ
0x151b80…151d14 (0, 428) Dummy {f00=0x00bb, f01=0x0190, f02=» 5 PVOX10L FRMT 6 P FILLR '2',2 6 P FMEL 'ZZ',GTWBCD1 6 0 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) 6 J 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(GSWBIN5,CBIN2) 6 ~ 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(GSWBIN5,CBIN1) 6 P FMEND 6 P* 6
0x151d14…151ea8 Dummy {f00=0x00bb, f01=0x018e, f02=»BZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) 6 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTREGF(CBIN2) 7 , 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTREGF(CBIN1) 7 ` P FEOR 7 P FILLR '4',2 7 P FTEXT 'SUPL ' 7 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN5) 7 4 P FMEL 'B
0x151ea8…15203c Dummy {f00=0x00bb, f01=0x0190, f02=» P FTEXT 'KOR' 8 P FILLR ' ',19 8 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(CBIN7,CBIN2) 8 . 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(CBIN7,CBIN1) 8 f P FMEND 8 P* 8 PVOX12 FRMT 8 P FLINK VOX12L 8 P FMEND 8 P* 8 PVOX12L FRMT 8
0x15203c…1521d0 Dummy {f00=0x00bb, f01=0x0190, f02=»TTSTCASH 8 r P FILLR ' ',34 9 P FEOR 9 & P FILLR '2',2 9 4 P FTEXT 'BEV ' 9 H 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) 9 ^ 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN5) 9 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN6) 9 P FEOR 9 P
0x1521d0…152364 Dummy {f00=0x00bb, f01=0x0190, f02=»X13 FRMT 9 P FLINK VOX13L : P FMEND : & P* : 4 PVOX13L FRMT : > P FILLR ' ',2 : R P FCOPY GTTESTMK : f P FMEL '999B',GTMSK : ~ P FMEL 'B99.99.99',GTDATO : P FILLR ' ',2 : P FCOPY ='BEHOLDNINGST[LLERE' : P FILLR ' ',2 : P FCO
0x152364…1524f8 Dummy {f00=0x00bb, f01=0x0190, f02=» ='T[LLER' : P FILLR ' ',4 ; P FCOPY ='KONTONR' ; & P FILLR ' ',10 ; @ P FCOPY ='BEV.PERIODE' ; V P FILLR ' ',12 ; t P FCOPY ='SALDO' ; P FILLR ' ',1 ; P FMEND ; P* ; PVOX14 FRMT ; P FLINK VOX14L ; P FMEND ; P
0x1524f8…15268c Dummy {f00=0x00bb, f01=0x0190, f02=»N1) ; h 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',CBACC(GSWBIN3,CBIN2) < 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',CBACC(GSWBIN3,CBIN3) < F P FMEND < P* < PVOX15 FRMT < P FILLR '2',2 < P FCOPY GSWSTR20 < P FMEND < P* < PVOX16 FRMT < P FILLR '
0x15268c…152820 Dummy {f00=0x00bb, f01=0x0190, f02=» < P FNL = P FILLR X'5D',40 ] = P FILLR X'4E',40 N = . P FNL = H P FNL = T P FILLR X'45',40 E = ` P FILLR X'53',40 S = z P FNL = P FNL = P FILLR X'5B',40 [ = P FILLR X'5C',40 OE = P FMEND = P* = PVOX17 FRMT =
0x152820…1529b4 (0, 429) Dummy {f00=0x00bb, f01=0x0190, f02=» FILLR ' ',6 = P FLINK FLBNR > P FILLR ' ',8 > ( 2 P FMEL 'B*.***.***.**9E,99',GTDUPF(CBIN4) BELOB > < P FILLR '*',2 > r P FILLR ' ',3 > 4 P FMEL 'ZZ999999',GTDUPF(CBIN2) CHECKNR(DIV.TXT) > P FILLR ' ',8 > P FMEND > P* > PVOX18 FRMT
0x1529b4…152b48 Dummy {f00=0x00bb, f01=0x0190, f02=».ZZ9.99-',GSWBCD6 > | * P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GSWBCD7 ? P FMEND ? H P* ? V PVOX20 FRMT ? ` P FLINK VOX20L ? r P FMEND ? P* ? PVOX20L FRMT ? P FILLR '2',2 ? P FBF GTDYFLG,V20L10 ? P FCOPY ='TOTAL' ? P FILLR ' ',5
0x152b48…152cdc Dummy {f00=0x00bb, f01=0x0190, f02=»BCD1 ? P FBT GTSWFLAG,V20L20 @ 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9,99-',GTDUPF(CBIN4) @ ( P FILLR ' ',35 @ P FB V20L90 @ r PV20L20 @ P FILLR ' ',17 @ 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9,99-',GTDUPF(CBIN5) @ 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9,99-',GTDUPF(CBIN6)
0x152cdc…152e70 Dummy {f00=0x00bb, f01=0x018e, f02=»AL 'BILAG' @ v P* A : PFTBKV FTABLE BAFST01,BAFST02,KVIT03,KVIT03,BAFST02, C A 2 P BAFST01,BAFST02,BAFST08,BAFST08,BAFST02, C A Z . P BAFST12,BAFST01,BAFST01,BAFST01,BAFST01 A P* A P* A PKVIT03 FRMT A P FILLR '+',2 A P FLINK BSU
0x152e70…153004 Dummy {f00=0x00bb, f01=0x018e, f02=» @ PFTBKT FTABLE KAFST01,KAFST02,KAFST03,KAFST04,KAFST00, C B 2 P KAFST01,KAFST00,KAFST01,KAFST01,KAFST02, C B H . P KAFST12,KAFST01,KAFST01,KAFST01,KAFST01 B ~ P* B P* B PKAFST00 FRMT B P FMEND B P* B P* B < PKAFS
0x153004…153198 Dummy {f00=0x00bb, f01=0x0190, f02=» B P* C P* C : PKAFST02 FRMT TRANS 02 C P FLINK BAFST02 C Z P FLINK SKAF01 LINE NR C x P FMEND C P* C P C : PKAFST12 FRMT TRANS 12 C P FLI
0x153198…15332c Dummy {f00=0x00bb, f01=0x0190, f02=»RANS 03 C b P FLINK KAFST03L D P FMEND D ( P* D 6 PKAFST03L FRMT D @ 8 P FLINK BSUB01 HEADER D V P FLINK BSUB06 D P FBF TTKORTFL,KLAB31 D 2 P FMEL 'XX.XXPP',GTDUPF(CBIN7) VAL.DATE, DD.MM D PKLAB31 D > P
0x15332c…1534c0 Dummy {f00=0x00bb, f01=0x0190, f02=»NIENR D r P FMEND E P* E $ P* E . : PKAFST04 FRMT TRANS 04 E 8 P FLINK KAFST04L E v P FMEND E P* E PKAFST04L FRMT E 8 P FLINK BSUB01 HEADER E < P FLINK B
0x1534c0…153654 (0, 430) Dummy {f00=0x00bb, f01=0x0190, f02=» E P FBF TTASKAT,KLAB41 F 0 P FMEL 'B**',GTDUPF(CBIN12) REST.MAANED - CIR F $ . P FMEL 'B**',GTDUPF(CBIN11) REST.AAR - CIR F X P FB KLAB42 F PKLAB41 F P FILLR ' ',3 F 4 P FMEL 'B**',GTDUPF(CBIN10) FORF.AAR - CPR, BSKAT F PKLAB42 F F P
0x153654…1537e8 Dummy {f00=0x00bb, f01=0x018e, f02=»KAF02 F P FBT GTSLDFLG,SKAF04 G P FILLR ' ',13 G * P FB SKAF03 G @ PSKAF04 G R , P FMEL '*.***.***.**9.99-',TTKTSLD SALDO G ` PSKAF03 G " P FMEL 'B99.',TTKTLIN NEW LINE G " P FMEL '9',TTKTCHK CHECK DIGIT G P FB SKAF05 G PSKAF02 G
0x1537e8…15397c Dummy {f00=0x00bb, f01=0x0190, f02=» G d P* H PFTBXKT FTABLE XKTTRP H P* H . PXKTTRP FRMT H 8 P FLINK XKTTRPL H L P FMEND H b P* H p PXKTTRPL FRMT H z P FILLR '+',2 H P FMEL 'BB99.99.99',GTDATO H P FILLR ' ',43 H & P FMEL '*.***.***.**9.99-',TTKTSLD H P FIL
0x15397c…153b10 Dummy {f00=0x00bb, f01=0x018e, f02=»BTA FTABLE FMTFMT H P* I P* I $ P EJECT I . P* I < . P* VARIOUS FORMATS FOR TALLY ROLL I F P* I x P* I @ PFTBXTA FTABLE TAFMT01,TAFMT02,TAFMT02,TAFMT04,TAFMT05, C I P VOX15,TAFMT07 I P* I PTAFMT01 FRMT I P F
0x153b10…153ca4 Dummy {f00=0x00bb, f01=0x0190, f02=» I ~ P FMEND J P* J PTAFMT02L FRMT J P FILLR '0',2 J 6 P FCOPY GSWSTR9 J J & P FMEL '*.***.***.**9.99+B',GSWBCD6 J ` P FLINK TAFMT07 J P FMEND J P* J PTAFMT04 FRMT J P FILLR '+',2 J , P FMEL 'Z.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4)
0x153ca4…153e38 Dummy {f00=0x00bb, f01=0x0190, f02=» FILLR ' ',1 J P FMEND K P* K " PTAFMT07 FRMT K , P FNL K @ P FNL K L P FNL K X P FNL K d P FNL K p P FNL K | P FNL K P FMEND K P EJECT K P* K ( P* FORMATS FOR GENERAL PRINTER K P* K PFTBGP FTABLE FMT
0x153e38…153fcc Dummy {f00=0x00bb, f01=0x4042, f02=»TFMT K P* L P* L P* L P END L *@ L >NL K @ P FNL K L P FNL K X P FNL K d P FNL K p P FNL K | P FNL K P FMEND K P EJECT K P* K ( P* FORMATS FOR GENERAL PRINTER K P* K PFTBGP FTABLE FMT
0x153fcc…154160 Dummy {f00=0x00bb, f01=0x2008, f02=» M P* CAN NOT BE IDENTIFIED BY TRANSTYPE (OR GTREGDEX) ' P* ' L PFTBXX FTABLE ' V P* ' n P* ' x P END ' @ ' & z P* & PFTBTA FTABLE & P* & P* & P EJECT & P* & ( P* FORMATS
0x154160…1542f4 (0, 431) Dummy {f00=0x00bb, f01=0x0000, f02=»
0x1542f4…154488 Dummy {f00=0x00bb, f01=0x0002, f02=» h
0x154488…15461c Dummy {f00=0x00bb, f01=0x0190, f02=» SCR PTRA REMFMT PKPF /O " PSCR 0 PTRA DIVFMT < PKPF /O N PSCR PTRA RGSUB2 h PKPF /O z PSCR PTRA ADM6 PKPF /O PSCR PTRA RGSUBS PKPF /O PSCR PTRA DIV743 PKPF /O
0x15461c…1547b0 Dummy {f00=0x00bb, f01=0x009e, f02=»R PTRA REMLEV PKPF /O PSCR * PTRA REMBDT 6 PKPF /O H PSCR V PTRA REMTR b KPF /O t SCR ASG /E0,TY10 PKPF /O PSCR PTRA RGSUBS PKPF /O PSCR PTRA DIV743 PKPF /O
0x1547b0…154944 Dummy {f00=0x00bb, f01=0x2008, f02=» PTRA REMLEV PKPF /O PSCR * PTRA REMBDT 6 PKPF /O H PSCR V PTRA REMTR b KPF /O t SCR ASG /E0,TY10 PKPF /O PSCR PTRA RGSUBS PKPF /O PSCR PTRA DIV743 PKPF /O
0x154944…154ad8 Dummy {f00=0x00bb, f01=0x018e, f02=» . J F " D H H 0X @ R RH ^H [) LW R 0X *0X R 0X 0X R0X P 0R 0X ( 8 v 0 $ 0 $ $ 0 2 0 $ 0 $
0x154ad8…154c6c Dummy {f00=0x00bb, f01=0x0190, f02=» 0 ^ 0 ^ 0 ^ ( 0 ^ : 0 ^ L <0 ^ ^ > " p J F " D L L L L L% L L 4 H # I H @ A L R@ F a < b e
0x154c6c…154e00 Dummy {f00=0x00bb, f01=0x0190, f02=» " 0 @ " P J F " D " RT RT I H k( g R @ W^( K )A R WR RTS RTOK % ` " 0 R J F " D
0x154e00…154f94 (0, 432) Opaque[0x194]
0x154f94…155128 # DirEnt {nam=»DIV167«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1780, f03=0x0000}
0x154f94…155128 IdxSect {
0x154f94…155128 f00 = 0x00bc // 0x154f94 @0x0
0x154f94…155128 f01 = 0x0014 // 0x154f96 @0x2
0x154f94…155128 gno = [ // 0x154f98 @0x4
0x154f94…155128 [0x00]: C0x00bc.0x0.0
0x154f94…155128 [0x01]: C0x00bc.0x1.0
0x154f94…155128 [0x02]: C0x00bc.0x2.0
0x154f94…155128 [0x03]: C0x00bc.0x3.0
0x154f94…155128 [0x04]: C0x00bd.0x0.0
0x154f94…155128 [0x05]: C0x00bd.0x1.0
0x154f94…155128 [0x06]: C0x00bd.0x2.0
0x154f94…155128 [0x07]: C0x00bd.0x3.0
0x154f94…155128 [0x08]: C0x00be.0x0.0
0x154f94…155128 [0x09]: C0x00be.0x1.0
0x154f94…155128 ]
0x154f94…155128 }
0x155128…1552bc Dummy {f00=0x00bc, f01=0x0190, f02=» P IDENT DIV167 03.01.XXX.1 P DDUM KMD08 & P PDIV D P ENTRY FRMTJT Z P ENTRY FRMXJT p P ENTRY FRMTTA P ENTRY FRMXTA P ENTRY FRMTVO P ENTRY FRMTKV P ENTRY FRMXVO P ENTRY FRMTKT
0x1552bc…155450 Dummy {f00=0x00bc, f01=0x0190, f02=» PROC 0 P CALL FMOVE,GTSTRFMT,FTBJT(GTREGDEX) P RET B P PEND V P* l PFRMXJT PROC XJTDEX v ( P CALL FMOVE,GTSTRFMT,FTBXJT(XJTDEX) P RET P PEND P* PFRMTTA PROC 0 P CALL FMOV
0x155450…1555e4 Dummy {f00=0x00bc, f01=0x0190, f02=»XTA(XTADEX) x P RET P PEND P* . PFRMTVO PROC 8 0 P CALL FMOVE,GTSTRFMT,FTBVO(GTREGDEX) L P RET P PEND P* PFRMXVO PROC XVODEX ( P CALL FMOVE,GTSTRFMT,FTBXVO(XVODEX) P RET P P
0x1555e4…155778 Dummy {f00=0x00bc, f01=0x018e, f02=» 0 P CALL FMOVE,GTSTRFMT,FTBKT(GTREGDEX) P RET < P PEND P P* f PFRMXKT PROC XKTDEX p ( P CALL FMOVE,GTSTRFMT,FTBXKT(XKTDEX) P RET P PEND P* PFRMTGP PROC ( P CALL FMOVE,GTSTRFMT,FTB
0x155778…15590c Dummy {f00=0x00bc, f01=0x0190, f02=» j P RET P PEND P* " P* , P* 6 P EJECT @ P* V P* FORMATS FOR JOURNAL ` P* @ PFTBJT FTABLE JTFMT01,JTFMT02,JTFMT03,JTFMT04,JTFMT02, C 2 P JTFMT01,JTFMT02,JTFMT08,JTFMT08,JTFMT02, C . P
0x15590c…155aa0 Dummy {f00=0x00bc, f01=0x0190, f02=»F b 2 P FLINK JTSUB01 LINE 1 P FEOR @ 2 P FLINK JTSUB04 LINE 2 V P FMEND P* PJTFMT02 FRMT P FLINK JTFMT02L P FMEND P* PJTFMT02L FRMT 2 P
0x155aa0…155c34 (0, 433) Dummy {f00=0x00bc, f01=0x0190, f02=» P FLINK JTSUB08 VALUE P FEOR P FILLR ' ',8 6 F P FMEL 'X',GTDUPF(CBIN6) RE$ R P FILLR ' ',2 P FLINK JTSUB06 FOR TRANS 10 P FLINK JTSUB30 ARKIV KNT.NR P FILLR '
0x155c34…155dc8 Dummy {f00=0x00bc, f01=0x0190, f02=» FLINK JTSUBST START INF P FILLR ' ',9 8 $ P FCOPY TT16TXT RATE/RENTE/GEBYR T 2 P FLINK JTSUB06 CPR/CIR | 0 P FLINK JTSUB08 VALUE P FEOR P FIL
0x155dc8…155f5c Dummy {f00=0x00bc, f01=0x0190, f02=»,5 ~ H P FMEL 'ZZ.ZZ.ZZ',GTDUPF(CBIN7) VALGR F P FMEL 'BBZ',GTDUPF(CBIN8) BETALINGSFORM BFO V 8 P FLINK JTSUB30 ARK KONTO NR P FILLR ' ',2 8 P FMEL '
0x155f5c…1560f0 Dummy {f00=0x00bc, f01=0x0190, f02=» FILLR ' ',4 P FMEND P* * PJTFMT04 FRMT 4 P FLINK JTFMT04L H P FMEND ` P* n PJTFMT04L FRMT x P FLINK JTSUBST START INF P FILLR ' ',15 2 P FLINK JTSUB06 CPR/CIR 0 P
0x1560f0…156284 Dummy {f00=0x00bc, f01=0x0190, f02=»IN3) BKO | P FILLR ' ',5 D P FMEL 'ZZ.ZZ.ZZ',GTDUPF(CBIN7) VALOR $ P FILLR ' ',3 l 6 P FLINK JTSUB30 ARK KNT NR B P FMEL 'BBBZZ',GTDUPF(CBIN10) F$R F P
0x156284…156418 Dummy {f00=0x00bc, f01=0x0190, f02=»M$ R B P FMEL 'BBZB',GTDUPF(CBIN13) OPK P FMEND P P* f PJTFMT08 FRMT p P FLINK JTFMT08L P FMEND P* PJTFMT08L FRMT 4 P FLINK JTSUBST START INF 2 P
0x156418…1565ac Dummy {f00=0x00bc, f01=0x018e, f02=»R 2 P FLINK JTSUB31 LINE 3 P FMEND @ P* V PJTFMT12 FRMT ` P FLINK JTFMT12L t P FMEND P* PJTFMT12L FRMT 4 P FLINK JTSUBST START INF 8 P FLINK JTSUB05
0x1565ac…156740 Dummy {f00=0x00bc, f01=0x0190, f02=» P FILLR ' ',2 0 P FLINK JTSUB08 VALUE P FEOR T P FILLR ' ',2 b 2 P FMEL 'BZZZZZZZZZZ',GTDUPF(CBIN2) DIVERSE TEXT v P FILLR ' ',16 P FMEND P* $ PJTFMT18 FRMT TRANS 18,19,28,29 ( P FLINK
0x156740…1568d4 (0, 434) Dummy {f00=0x00bc, f01=0x0190, f02=» START INF r P FILLR ' ',2 P FCOPY GTTESTMK 6 : P FCOPY TTCYM CYCLE MARKERING N 8 P FMEL '99B',GTREGNR TRANS, TYPE P FLINK FLBNR P FMEND P* : PJTSUB01 FRM
0x1568d4…156a68 Dummy {f00=0x00bc, f01=0x0190, f02=»08 VALUE | P FMEND P* 6 PJTSUB04 FRMT @ P FILLR ' ',2 V P FILLR ' ',4 r P FMEL 'ZZ',GTDUPF(CBIN3) BKO * P FMEL 'BZZ.ZZ.ZZ',GTDUPF(CBIN7) V.DATO B P FMEL 'BBX',GTDUPF(CBIN6)
0x156a68…156bfc Dummy {f00=0x00bc, f01=0x0190, f02=»L 'XXXXXXE-XXXX',GTDUPF(CBIN10) YD.MODT ( P FMEL 'BXX',GTDUPF(CBIN11) BET. ART 0 P FMEND P* r 6 PJTSUB05 FRMT REG KNT NR | 4 P FMEL 'B999V99V999E-99B',GTDUPF(CBIN1) P FMEND P*
0x156bfc…156d90 Dummy {f00=0x00bc, f01=0x0190, f02=» P FB JTLAB08 PJTLAB06 P FBT BLEV,JTLAB07 ( & P FMEL 'XXXXXXE-XXXX',GTDUPF(CBIN2) B P FB JTLAB08 l PJTLAB07 & P FMEL 'XXXXXXE-XXXX',GTDUPF(CBIN2) PJTLAB08 P FMEND P* P* 8 PJTSUB08 FRMT
0x156d90…156f24 Dummy {f00=0x00bc, f01=0x0190, f02=» FMEND P* PJTSUB18 FRMT P FILLR ' ',2 , " P FMEL 'XXX',GTDUPF(CBIN15) TXT @ * P FMEL 'BXXXXXXXXXX',GTDUPF(CBIN13) NR- f , P FMEL 'BXXXXXXXXXX',GTDUPF(CBIN14) NR-2 , P FMEL 'BXX.XX.XX',GTDUPF(CBIN18) DATO-1 , P FMEL 'BXX.XX.XX',GT
0x156f24…1570b8 Dummy {f00=0x00bc, f01=0x0190, f02=»ZZE-ZZ',GTDUPF(CBIN9) v P FMEND P* , 6 PJTSUB31 FRMT LINE 3 - 8 6 P FILLR ' ',2 p F P FMEL 'ZZ.ZZ.ZZ',GTDUPF(CBIN12) FAKT DATO F P FMEL 'BZZZZZZZZZZ',GTDUPF(CBIN13)
0x1570b8…15724c Dummy {f00=0x00bc, f01=0x0190, f02=» TXT NR j D P FMEL 'BZZ',GTDUPF(CBIN16) OMR NR " D P FMEL 'BZZ.ZZ.ZZ',GTDUPF(CBIN18) PER FRA j D P FMEL 'BZZ.ZZ.ZZ',GTDUPF(CBIN19) PER TIL F P FMEL
0x15724c…1573e0 Dummy {f00=0x00bc, f01=0x0190, f02=»ORMATS FOR JOURNAL TAPE | P* @ PFTBXJT FTABLE XJTF01,XJTF02,XJTF03,XJTF04,XJTF05,XJTF06, C * 2 P XJTF07,FMTFMT,XJTF09,XJTF10,XJTF11,VOX15, C n " P XJTF13,XJTF14,VOFMT02,XJTF16 P* PXJTF01 FRMT KVITTERING P FILLR ' ',2 P
0x1573e0…157574 (0, 435) Dummy {f00=0x00bc, f01=0x0190, f02=» P FMEND P* PXJTF02L FRMT P FLINK FLBNR 0 P FILLR ' ',2 D P FCOPY ='KONTOKORT' X P FBF GTSLDFLG,XJTF02EX t & P FMEL 'B*.***.***.**9.99-',TTKTSLD PXJTF02EX P FMEND P* PXJTF03 FRMT P FILLR ' ',2
0x157574…157708 Dummy {f00=0x00bc, f01=0x0190, f02=»TF05 FRMT P FLINK XJTF05L P FMEND ( P* 6 P* @ PXJTF05L FRMT J P FILLR ' ',2 ^ P FILLR '*',50 r P FEOR P FILLR ' ',2 P FTEXT 'VERSNR ' P FCOPY ='DAGS-DATO' P FILLR ' ',2 P FCOPY ='POST-DATO
0x157708…15789c Dummy {f00=0x00bc, f01=0x0190, f02=» P FMEL '99.99.999.9',CVERSNR P FILLR ' ',2 , P FMEL '99E-99E-99',CMASKDAT @ P FILLR ' ',3 d P FMEL '99E-99E-99',GTDATO x P FILLR ' ',3 P FMEL '999',GTMSK P FILLR ' ',7 P FMEL '***99',TTSTLBNR P FILLR ' ',3
0x15789c…157a30 Dummy {f00=0x00bc, f01=0x0190, f02=» FMEL '999V99V999E-99B',TVERSUR $ P FMEL '999V99V999E-99B',TTCASHAC ( $ P FMEL 'ZZZ.ZZZ.ZZ9.ZZ-',TTSTCASH P P FEOR x P FILLR ' ',2 P FILLR '*',40 P FMEND P* PXJTF06 FRMT P FLINK XJTF06L P FMEND P*
0x157a30…157bc4 Dummy {f00=0x00bc, f01=0x0190, f02=» ',30 P FEOR P FILLR ' ',2 P FCOPY ='T[LLER' 0 P FILLR ' ',10 H P FCOPY ='DEBET' ^ P FILLR ' ',12 v P FCOPY ='KREDIT' P FMEND P* PXJTF07 FRMT P FLINK XJTF07L P FMEND P* PXJTF07L FR
0x157bc4…157d58 Dummy {f00=0x00bc, f01=0x0190, f02=»Z9.99-',TTACC(GSWBIN5,CBIN1) z P FMEND $ P* 2 PXJTF09 FRMT < P FCOPY =' START TEST' P P FMEND n P* | PXJTF10 FRMT P FCOPY =' SLUT TEST' P FMEND P* PXJTF11 FRMT P FILLR ' ',2 P FCOPY ='DISKETT
0x157d58…157eec Dummy {f00=0x00bc, f01=0x018e, f02=»FRMT P FLINK JTSUB05 REG KNT NO * P FMEL 'BZZZ',GTDUPF(CBIN2) COUNTER NO . 2 P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) VALUE P FILLR ' ',2 P FCOPY ='ADM ' $ P FMEL 'BZZ',GTDUPF(CBIN5) ADM NO P FMEND P* PXJTF14 FRM
0x157eec…158080 Dummy {f00=0x00bc, f01=0x0190, f02=» P FILLR ' ',2 P P $ P FMEL '****9',CCHKLBNR , P FCOPY =' CHECK' J P FMEND b P* p PFMTFMT FRMT z P FLINK FMTFMTL P FMEND P* PFMTFMTL FRMT P FILLR ' ',2 P FTEXT 'DIVERSE FORMATER' P F
0x158080…158214 (0, 436) Dummy {f00=0x00bd, f01=0x0190, f02=»T01,BAFST02,BAFST03,BAFST04,BAFST02, C | @ P BAFST01,BAFST02,BAFST08,BAFST08,BAFST02, C 0 2 P BAFST12,BAFST01,BAFST01,BAFST01,BAFST01, C t * P BAFST40,BAFST41,BAFST42,BAFST45, C 2 P BAFST46,BAFST47,BAFST48,BAFST49,BAFST50, C
0x158214…1583a8 Dummy {f00=0x00bd, f01=0x0190, f02=» P* PBAFST01L FRMT 8 P FLINK BSUB01 HEADER $ P FBT TTKORTFL,B1LAB1 ` P FILLR ' ',6 | P FMEL 'B',GTDUPF(CBIN3) BKO @ P FMEL 'ZZ.ZZ.ZZB',GTDUPF(CBIN7) BET/VALORDATO P FB B1LAB2
0x1583a8…15853c Dummy {f00=0x00bd, f01=0x0190, f02=» FLINK BSUB02 REGKONTO-BELOB P FMEND > P* T P* ^ B PBAFST02 FRMT TRANS 02-05-07-10 h P FLINK BAFST02L P FMEND P* PBAFST02L FRMT 8 P FLINK BSUB0
0x15853c…1586d0 Dummy {f00=0x00bd, f01=0x0190, f02=» P FBT TTKORTFL,B2LAB1 ! P FILLR '*',13 ! PB2LAB1 ! 6 @ P FLINK BSUB02 REGKONTO-BELOB ! D P FMEND ! P* ! P* ! < PBAFST08 FRMT TRANS 08-09 ! P FLINK BAFST08L !
0x1586d0…158864 Dummy {f00=0x00bd, f01=0x0190, f02=»O ! t P FBZ GTUSED(CBIN13),B8LAB1 " . P FMEL 'ZZZZZZZZZZB',GTDUPF(CBIN13) FAKTNR " , P FB B8LAB5 " ^ PB8LAB1 " p P FBZ GTUSED(CBIN12),B8LAB2 " ~ 2 P FMEL 'BBZZ.ZZ.ZZBBB',GTDUPF(CBIN12) FAKTDATO " P FB B8LAB5 " PB8LAB2 " . P FMEL 'ZZZZ9999.99
0x158864…1589f8 Dummy {f00=0x00bd, f01=0x0190, f02=» " V P FMEND # P* # P* # ( PBAFST12 FRMT TRANS 12 # 2 P FLINK BAFST12L # P P FMEND # h P* # v PBAFST12L FRMT # P FILLR '+',2 # P FCOPY GTTESTMK # > P FCOPY TTCYM CYKLE-MARKERING #
0x1589f8…158b8c Dummy {f00=0x00bd, f01=0x0190, f02=»OSTERINGSDATO # b < P FMEL 'B999',TTCNTNR TAELLER-NR $ 2 P FMEL 'BZZZZZZZZZZ',GTDUPF(CBIN2) DIVERSE TEXT $ V P FBT TTKORTFL,B12LAB1 $ P FILLR '*',13 $ PB12LAB1 $ @ P FLINK BSUB02 REGKONTO-BE
0x158b8c…158d20 Dummy {f00=0x00bd, f01=0x0190, f02=»LINK BSUB13 $ P FMEND % P* % " PBAFST04 FRMT BILAG TRANS 4 % , P FLINK BSUB10 % P P FLINK BSUB12 % f P FLINK BSUB13 % | P FMEND % P* % P* % PBAFST40 FRMT % P FMEND % P* % PBAFST41 FRMT % P FMEND % PBAFST4
0x158d20…158eb4 (0, 437) Dummy {f00=0x00bd, f01=0x0190, f02=»MT % P FMEND & P* & PBAFST48 FRMT & " P FMEND & 6 P* & D PBAFST49 FRMT & N P FMEND & b P* & p PBAFST50 FRMT & z P FMEND & P* & PBAFST51 FRMT & P FMEND & P* & PBAFST52 FRMT & P FMEND & P* & PBAFST53 FR
0x158eb4…159048 Dummy {f00=0x00bd, f01=0x0190, f02=» HEADER & j P FILLR '+',2 ' P FCOPY GTTESTMK ' 2 > P FCOPY TTCYM CYKLE-MARKERING ' J > P FMEL '999B',GTMSK MASKINNR ' P FLINK FLBNR ' @ P FMEL 'B99.99.99',GTDATO
0x159048…1591dc Dummy {f00=0x00bd, f01=0x0190, f02=» TRANSTYPE-NR ' l P FMEND ( P* ( 2 P ( < PBSUB02 FRMT ( D B P FMEL 'B999V99V999E-99B',GTDUPF(CBIN1) REGKONTONR ( Z < P FMEL '*.***.***.**9.99-',GTDUPF(CBIN4) BELOB ( B P FCOPY TTDBKRM
0x1591dc…159370 Dummy {f00=0x00bd, f01=0x0190, f02=»K ( P FCOPY TTCYM ) @ P FMEL '99.99.99B',GTDATO POSTERINGSDATO ) P FCOPY CKMDNAM ) b : P FMEL 'B999B',GTMSK MASKINNR ) x " P FMEL '99B',GTDUPF(CBIN3) BKO ) P FMEND ) P* ) P* ) PBS
0x159370…159504 Dummy {f00=0x00bd, f01=0x0190, f02=» DEBET/KREDIT-MARK ) r P FILLR ' ',1 * ( P FMEND * < P* * R P* * PBSUB06 FRMT * f " P FMEL 'B99B',GTDUPF(CBIN3) BKO * | P FBT TTKORTFL,B6LAB1 * P FCOPY TT07TXT * P FILLR ' ',1 * . P FMEL 'ZZ.ZZ.ZZB',GTDUPF(CBIN7)
0x159504…159698 Dummy {f00=0x00bd, f01=0x0190, f02=»06 CPR/CIR-NR * | < P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) BELOB + , D P FCOPY TTDBKRM DEBET/KREDIT-MARK + l P FILLR ' ',1 + P FLINK SKAF01 LINE NR + P FMEND + P* + PBS
0x159698…15982c Dummy {f00=0x00bd, f01=0x0190, f02=»99.99.99',GTDATO POSTDATO + " P FMEL 'BXX.',GTDUPF(CBIN3) BKO , " P FMEND , H P* , V PBSUB11 FRMT , ` $ P FMEL 'XX',GTDUPF(CBIN11) P]L]R , t 2 P FMEL 'E-9999999999B',GTDUPF(CBIN2) DEBITOR NR , , P FMEL 'XX.XXPP',GTDUPF(CBIN7) VALOERDATO , & P FMEL
0x15982c…1599c0 Dummy {f00=0x00bd, f01=0x0190, f02=»ST]R , t P FB B12LAB6 - PB12LAB5 - ( P FMEL 'XX',GTDUPF(CBIN10) FORFALDS]R - 0 PB12LAB6 - 2 P FMEL 'E-9999999999B',GTDUPF(CBIN2) DEBITORNR - l , P FMEL 'XX.XXPP',GTDUPF(CBIN7) VALOERDATO - P FILLR ' ',3 - P FMEND - P* - PBSUB13 FRM
0x1599c0…159b54 (0, 438) Dummy {f00=0x00bd, f01=0x0190, f02=»FRMT EKSP LB. NR. - P FBT GTLOKSPG,FLBNR10 . P FMEL '****9',TTLBNR . 8 P FB FLBNR20 . T PFLBNR10 . h P FMEL '****9',GTLBNR . x PFLBNR20 . P FMEND . P* . P EJECT . P* . * P* VARIOUS FORMATS FOR VOUCHER . P* .
0x159b54…159ce8 Dummy {f00=0x00bd, f01=0x0190, f02=»4,VOX15, C . x * P VOX16,VOX17,VOX18,VOX19,VOX20,VOX20 / P* / B P* / L PVOFMT02 FRMT TOTAL IN CYCLE / V P FLINK VOFMT02L / z P FMEND / P* / PVOFMT02L FRMT / P FILLR '+',2 / P FBF TTCY1FLG,VOLAB02 / P FCOPY ='ARKIV' /
0x159ce8…159e7c Dummy {f00=0x00bd, f01=0x0190, f02=» / P FMEND 0 P* 0 PBAXF04 FRMT 0 P FLINK BAFST03 0 4 P FLINK BAXF05L 0 J P FMEND 0 ` P* 0 n PBAXF05 FRMT 0 x P FILLR '+',2 0 P FLINK BAXF05L 0 P FMEND 0 P* 0 PBAXF05L FRMT 0 P FLINK BSUB04 0 P FEOR 0 P F
0x159e7c…15a010 Dummy {f00=0x00bd, f01=0x0190, f02=»L FRMT 0 P FLINK BAFST03 1 P FEOR 1 $ P FILLR '0',2 1 2 P FEOR 1 F P FILLR '0',2 1 T P FEOR 1 h P FLINK KVIT03 1 v P FMEND 1 P* 1 PVOSUM07 FRMT SUMBILAG 1 P FLINK VOSUM07L 1 P FMEND 1 P* 1 PVOSUM07L FRMT 1 P
0x15a010…15a1a4 Dummy {f00=0x00bd, f01=0x0190, f02=» ='-' 1 P FLINK FLBNR 2 P FILLR ' ',1 2 " P FCOPY ='TOTAL ' 2 8 & P FMEL '*.***.***.**9,99+',GTSUMCNT 2 R P FILLR ' ',2 2 | P FMEND 2 P* 2 PVOX08 FRMT 2 P FLINK VOX08L 2 P FMEND 2 P* 2 PVOX08L FRMT 2 P FILLR '+',2
0x15a1a4…15a338 Dummy {f00=0x00bd, f01=0x0190, f02=»',TTSTLBNR 2 P FTEXT ' - ' 3 P FLINK FLBNR 3 & P FILLR ' ',2 3 : P FCOPY GSWSTR9 3 N P FILLR ' ',2 3 d P FCOPY GSWSTR20 TEXT 3 x P FEOR 3 P FILLR '2',2 3 P FILLR '*',60 3 P FILLR '*',8 3 P FEOR 3 P FILLR '4',2 3 P FCOPY
0x15a338…15a4cc Dummy {f00=0x00bd, f01=0x0190, f02=»'DEBET' 3 P FILLR ' ',12 4 P FCOPY ='KREDIT' 4 & P FMEND 4 > P* 4 L PVOX09 FRMT 4 V P FLINK VOX09L 4 h P FMEND 4 ~ P* 4 PVOX09L FRMT 4 P FILLR '2',2 4 ( P FMEL 'XXXVXXVXXXE-XX',GTDUPF(CBIN1) 4 P FILLR ' ',4 4 P FMEL '99'
0x15a4cc…15a660 Dummy {f00=0x00bd, f01=0x018e, f02=» > P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',C12ACC(GSWBIN5,CBIN1) KREDIT 5 P FMEND 5 F P* 5 T PVOX10 FRMT 5 ^ P FLINK VOX10L 5 p P FMEND 5 P* 5 PVOX10L FRMT 5 P FILLR '2',2 5 P FMEL 'ZZ',GTWBCD1 5 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBI
0x15a660…15a7f4 (0, 439) Dummy {f00=0x00bd, f01=0x0190, f02=» 5 P* 6 PVOX11 FRMT 6 P FLINK VOX11L 6 $ P FMEND 6 : P* 6 H PVOX11L FRMT 6 R P FILLR '4',2 6 f P FTEXT 'TOTAL' 6 z 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) 6 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTREGF(CBIN2) 6 0 P FMEL 'BBZZZ.ZZZ
0x15a7f4…15a988 Dummy {f00=0x00bd, f01=0x0190, f02=» 6 d 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(CBIN8,CBIN2) 7 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(CBIN8,CBIN1) 7 @ P FEOR 7 x P FILLR '2',2 7 P FTEXT 'KOR' 7 P FILLR ' ',19 7 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(CBIN7,CBIN2) 7 4 P FMEL 'BBZZZ
0x15a988…15ab1c Dummy {f00=0x00bd, f01=0x0190, f02=»2L FRMT 7 P FILLR '4',2 8 $ P FMEL '999E-99999E-99',TTCASHAC 8 $ P FILLR ' ',1 8 L P FTEXT ' PRIMO' 8 ` * P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTSTCASH 8 x P FILLR ' ',34 8 P FEOR 8 P FILLR '2',2 8 P FTEXT 'BEV ' 8 0 P FMEL 'BBZZZ.ZZZ.ZZZ
0x15ab1c…15acb0 Dummy {f00=0x00bd, f01=0x0190, f02=» FEOR 8 P FILLR '2',2 9 P FTEXT 'ULTIMO' 9 " ( P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTCASH 9 : P FILLR ' ',34 9 f P FMEND 9 | P* 9 PVOX13 FRMT 9 P FLINK VOX13L 9 P FMEND 9 P* 9 PVOX13L FRMT 9 P FILLR ' ',2 9 P FCOPY GTTES
0x15acb0…15ae44 Dummy {f00=0x00bd, f01=0x0190, f02=»,2 9 P FCOPY GSWSTR20 : P FILLR ' ',3 : " P FEOR : 6 P FILLR '2',2 : D P FILLR '*',56 : X P FEOR : n P FILLR '4',2 : | P FCOPY ='T[LLER' : P FILLR ' ',4 : P FCOPY ='KONTONR' : P FILLR ' ',10 : P FCOPY ='BEV.PERIODE' :
0x15ae44…15afd8 Dummy {f00=0x00bd, f01=0x018e, f02=» FMEND : P* ; PVOX14L FRMT ; P FILLR '2',2 ; , P FMEL 'ZZ',GTWBCD1 ; @ P FILLR ' ',4 ; Z 0 P FMEL 'XXXVXXVXXXE-XX',CBACC(GSWBIN3,CBIN1) ; n 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',CBACC(GSWBIN3,CBIN2) ; 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',CBACC(GSWBIN3,
0x15afd8…15b16c Dummy {f00=0x00bd, f01=0x0190, f02=» ; P FILLR ' ',2 < P FLINK VOX16L < P FMEND < 2 P* < @ PVOX16L FRMT < J P FILLR X'24',40 NO. < ^ P FILLR X'3C',40 5. < z P FNL < P FNL < P FILLR X'5D',40 ] < P FILLR X'4E',40 N < P FNL < P FNL < P FILLR X'45',40
0x15b16c…15b300 Dummy {f00=0x00bd, f01=0x018e, f02=»VOX17 FRMT < P FLINK VOX17L = P FMEND = ( P* = 6 PVOX17L FRMT = @ P FILLR '+',2 = T , P FMEL '99E-99E-99',GTDATO POSTERINGSDATO = h P FILLR ' ',6 = P FLINK FLBNR = P FILLR ' ',8 = 2 P FMEL 'B*.***.***.**9E,99',GTDUPF(CBIN4) BELOB =
0x15b300…15b494 (0, 440) Dummy {f00=0x00be, f01=0x0190, f02=» = PVOX18 FRMT > P FLINK VOX18L > P FMEND > 0 P* > > PVOX18L FRMT > H P FILLR '2',2 > P FILLR ' ',17 > p * P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GSWBCD6 > * P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GSWBCD7 > P FMEND > " PVOX19 FRMT SHORT TR 2,5
0x15b494…15b628 Dummy {f00=0x00be, f01=0x0190, f02=»* > PVOX20L FRMT ? P FILLR '2',2 ? P FBF GTDYFLG,V20L10 ? 2 P FCOPY ='TOTAL' ? N P FILLR ' ',59 ? f P FEOR ? | P FILLR '2',2 ? PV20L10 ? ( P FMEL 'XXXE-XXXXXE-XX',GTDUPF(CBIN1) ? P FILLR ' ',4 ? P FMEL 'XX',GTWBCD1 ? P F
0x15b628…15b7bc Dummy {f00=0x00be, f01=0x0190, f02=»LR ' ',17 ? 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9,99-',GTDUPF(CBIN5) @ 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9,99-',GTDUPF(CBIN6) @ F PV20L90 @ z P FMEND @ P* @ P EJECT @ P* @ . P* FORMATS FOR EXTRA 'KVITTERING' @ ( P* (MOSTLY AS NORMAL '
0x15b7bc…15b950 Dummy {f00=0x00be, f01=0x0190, f02=» . P BAFST12,BAFST01,BAFST01,BAFST01,BAFST01 A P* A 6 P* A @ PKVIT03 FRMT A J P FILLR '+',2 A ^ P FLINK BSUB04 A r P FLINK BSUB05 A P FMEND A P* A P EJECT A P* A " P* FORMATS FOR KONTOKORT A P* A @ PFT
0x15b950…15bae4 Dummy {f00=0x00be, f01=0x018e, f02=»1,KAFST01,KAFST01,KAFST01 A P* B " P* B , PKAFST00 FRMT B 6 P FMEND B L P* B b P* B l < PKAFST01 FRMT TRANS 01-06 B v P FLINK BAFST01 B P FLINK SKAF01 LINE NR B P FMEND B P
0x15bae4…15bc78 Dummy {f00=0x00be, f01=0x0190, f02=» B x P FMEND C P* C P C ( : PKAFST12 FRMT TRANS 12 C 0 P FLINK BAFST12 C n P FLINK SKAF01 LINE NR C P FMEND C P* C P* C : PKAFST03 FRMT TRANS 0
0x15bc78…15be0c Dummy {f00=0x00be, f01=0x0190, f02=» P FLINK BSUB06 D P FBF TTKORTFL,KLAB31 D 2 P FMEL 'XX.XXPP',GTDUPF(CBIN7) VAL.DATE, DD.MM D 6 PKLAB31 D l > P FMEL 'BXX',GTDUPF(CBIN11) PALIGNINGS$R D z $ P FCOPY TT16TXT RENTE/GEBYR/INDB D ( P FLINK BSUB07 CPR/CIR/BELOB/LINIENR
0x15be0c…15bfa0 Dummy {f00=0x00be, f01=0x0190, f02=» FMEND D P* E PKAFST04L FRMT E 8 P FLINK BSUB01 HEADER E . < P FLINK BSUB06 BETART/DATO E j P FBF TTKORTFL,KLAB40 E 2 P FMEL 'XX.XXPP',GTDUPF(CBIN7) VAL DATE, DD.MM E PKLAB40 E
0x15bfa0…15c134 (0, 441) Dummy {f00=0x00be, f01=0x018e, f02=»KLAB42 E PKLAB41 F P FILLR ' ',3 F 4 P FMEL 'B**',GTDUPF(CBIN10) FORF.AAR - CPR, BSKAT F 0 PKLAB42 F h F P FLINK BSUB07 CPR/CIR-BELOB-LINIENR F v P FMEND F P* F PSKAF01 FRMT F P FBF CKTFLAG,SKAF02
0x15c134…15c2c8 Dummy {f00=0x00be, f01=0x0190, f02=» PSKAF03 G " P FMEL 'B99.',TTKTLIN NEW LINE G " P FMEL '9',TTKTCHK CHECK DIGIT G 8 P FB SKAF05 G ^ PSKAF02 G p P FMEL '99B',TTKTLIN G ~ PSKAF05 G P FMEND G P* G P EJECT G P* G . P* VARIOUS FORMATS FOR 'KONTOKORT' G
0x15c2c8…15c45c Dummy {f00=0x00be, f01=0x0190, f02=» FILLR '+',2 G P FMEL 'BB99.99.99',GTDATO H P FILLR ' ',43 H 6 & P FMEL '*.***.***.**9.99-',TTKTSLD H L P FILLR ' ',2 H v P FCOPY ='TRP ' H P FMEND H P EJECT H P* H $ P* FORMATS FOR TALLY ROLL H P* H PFTBTA FT
0x15c45c…15c5f0 Dummy {f00=0x00be, f01=0x018e, f02=»FMT01,TAFMT02,TAFMT02,TAFMT04,TAFMT05, C H P VOX15,TAFMT07 I 4 P* I L PTAFMT01 FRMT I V P FSL I j P FNL I v P FNL I P FILLR '*',1 I P FILLR ' ',1 I P FMEND I P* I PTAFMT02 FRMT I P FLINK TAFMT02L I P FMEND I P
0x15c5f0…15c784 Dummy {f00=0x00be, f01=0x018e, f02=» P FMEND J P* J PTAFMT04 FRMT J P FILLR '+',2 J 0 , P FMEL 'Z.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) J D P FCOPY TTDBKRM J t P FMEND J P* J PTAFMT05 FRMT J P FILLR '+',2 J & P FMEL 'Z.ZZZ.ZZZ.ZZ9.99-',GSWBCD6 J P FILLR ' ',1 J P
0x15c784…15c918 Dummy {f00=0x00be, f01=0x4114, f02=» J P* K ( P* FORMATS FOR GENERAL PRINTER K P* K > PFTBGP FTABLE FMTFMT K H P* K d P* K n P* K x 2 P* VARIOUS FORMATS FOR GENERAL PRINTER K P* K PFTBXGP FTABLE FMTFMT K P* K P* K P* K P END
0x15c918…15caac Dummy {f00=0x00be, f01=0x2008, f02=» L P* CAN NOT BE IDENTIFIED BY TRANSTYPE (OR GTREGDEX) ' P* ' L PFTBXX FTABLE ' V P* ' n P* ' x P END ' @ ' & z P* & PFTBTA FTABLE & P* & P* & P EJECT & P* & ( P* FORMATS
0x15caac…15cc40 Dummy {f00=0x00be, f01=0x0190, f02=» F ; : & Z 4 F : Z 4 " 2@P : [ [ & @):! P [ 6 [ Z 7 Z 7 : ( :A ( @)<" P [ :;H 2 P ;h : ; V Y : 2!
0x15cc40…15cdd4 (0, 442) Opaque[0x194]
0x15cdd4…15cf68 # DirEnt {nam=»DIV259«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x17d0, f03=0x0000}
0x15cdd4…15cf68 IdxSect {
0x15cdd4…15cf68 f00 = 0x00be // 0x15cdd4 @0x0
0x15cdd4…15cf68 f01 = 0x0014 // 0x15cdd6 @0x2
0x15cdd4…15cf68 gno = [ // 0x15cdd8 @0x4
0x15cdd4…15cf68 [0x00]: C0x00be.0x2.0
0x15cdd4…15cf68 [0x01]: C0x00be.0x3.0
0x15cdd4…15cf68 [0x02]: C0x00bf.0x0.0
0x15cdd4…15cf68 [0x03]: C0x00bf.0x1.0
0x15cdd4…15cf68 [0x04]: C0x00bf.0x2.0
0x15cdd4…15cf68 [0x05]: C0x00bf.0x3.0
0x15cdd4…15cf68 [0x06]: C0x00c0.0x0.0
0x15cdd4…15cf68 [0x07]: C0x00c0.0x1.0
0x15cdd4…15cf68 [0x08]: C0x00c0.0x2.0
0x15cdd4…15cf68 [0x09]: C0x00c0.0x3.0
0x15cdd4…15cf68 ]
0x15cdd4…15cf68 }
0x15cf68…15d0fc Dummy {f00=0x00be, f01=0x0190, f02=» P IDENT DIV259 03.01.XXX.1 P DDUM KMD08 & P PDIV D P ENTRY FRMTJT Z P ENTRY FRMXJT p P ENTRY FRMTTA P ENTRY FRMXTA P ENTRY FRMTVO P ENTRY FRMTKV P ENTRY FRMXVO P ENTRY FRMTKT
0x15d0fc…15d290 Dummy {f00=0x00be, f01=0x0190, f02=» PROC 0 P CALL FMOVE,GTSTRFMT,FTBJT(GTREGDEX) P RET B P PEND V P* l PFRMXJT PROC XJTDEX v ( P CALL FMOVE,GTSTRFMT,FTBXJT(XJTDEX) P RET P PEND P* PFRMTTA PROC 0 P CALL FMOV
0x15d290…15d424 Dummy {f00=0x00be, f01=0x0190, f02=»XTA(XTADEX) x P RET P PEND P* . PFRMTVO PROC 8 0 P CALL FMOVE,GTSTRFMT,FTBVO(GTREGDEX) L P RET P PEND P* PFRMXVO PROC XVODEX ( P CALL FMOVE,GTSTRFMT,FTBXVO(XVODEX) P RET P P
0x15d424…15d5b8 Dummy {f00=0x00be, f01=0x018e, f02=» 0 P CALL FMOVE,GTSTRFMT,FTBKT(GTREGDEX) P RET < P PEND P P* f PFRMXKT PROC XKTDEX p ( P CALL FMOVE,GTSTRFMT,FTBXKT(XKTDEX) P RET P PEND P* PFRMTGP PROC ( P CALL FMOVE,GTSTRFMT,FTB
0x15d5b8…15d74c Dummy {f00=0x00be, f01=0x0190, f02=» j P RET P PEND P* " P* , P* 6 P EJECT @ P* V P* FORMATS FOR JOURNAL ` P* @ PFTBJT FTABLE JTFMT01,JTFMT02,JTFMT03,JTFMT04,JTFMT02, C 2 P JTFMT01,JTFMT02,JTFMT08,JTFMT08,JTFMT02, C P
0x15d74c…15d8e0 Dummy {f00=0x00be, f01=0x0190, f02=» LINE 1 z P FEOR 2 P FLINK JTSUB04 LINE 2 6 P FMEND l P* PJTFMT02 FRMT P FLINK JTFMT02L P FMEND P* PJTFMT02L FRMT 2 P FLINK JTSUBST
0x15d8e0…15da74 (0, 443) Dummy {f00=0x00be, f01=0x0190, f02=» FEOR P FILLR ' ',8 F P FMEL 'X',GTDUPF(CBIN6) RE$ 2 P FILLR ' ',2 | P FLINK JTSUB06 FOR TRANS 10 P FLINK JTSUB30 ARKIV KNT.NR P FILLR ' ',15 P FMEND
0x15da74…15dc08 Dummy {f00=0x00be, f01=0x0190, f02=» START INF p P FILLR ' ',9 $ P FCOPY TT16TXT RATE/RENTE/GEBYR 4 2 P FLINK JTSUB06 CPR/CIR 0 P FLINK JTSUB08 VALUE P FEOR P FILLR ' ',2 P FILLR '
0x15dc08…15dd9c Dummy {f00=0x00be, f01=0x0190, f02=»ZZ',GTDUPF(CBIN7) VALGR z F P FMEL 'BBZ',GTDUPF(CBIN8) BETALINGSFORM BFO 6 8 P FLINK JTSUB30 ARK KONTO NR P FILLR ' ',2 8 P FMEL 'XX',GTDUPF(CBIN11) PALIGNIN
0x15dd9c…15df30 Dummy {f00=0x00be, f01=0x0190, f02=»ND P* PJTFMT04 FRMT P FLINK JTFMT04L ( P FMEND @ P* N PJTFMT04L FRMT X P FLINK JTSUBST START INF n P FILLR ' ',15 2 P FLINK JTSUB06 CPR/CIR 0 P FLINK JTSUB08
0x15df30…15e0c4 Dummy {f00=0x00be, f01=0x0190, f02=» D P FMEL 'ZZ.ZZ.ZZ',GTDUPF(CBIN7) VALOR P FILLR ' ',3 L 6 P FLINK JTSUB30 ARK KNT NR h B P FMEL 'BBBZZ',GTDUPF(CBIN10) F$R F P FMEL 'BBZZ',GTDUPF(CBI
0x15e0c4…15e258 Dummy {f00=0x00be, f01=0x0190, f02=»GTDUPF(CBIN13) OPK z P FMEND 0 P* F PJTFMT08 FRMT P P FLINK JTFMT08L d P FMEND | P* PJTFMT08L FRMT 4 P FLINK JTSUBST START INF 2 P FLINK JTSUB01
0x15e258…15e3ec Dummy {f00=0x00be, f01=0x0190, f02=» LINE 3 z P FMEND P* 6 PJTFMT12 FRMT @ P FLINK JTFMT12L T P FMEND l P* z PJTFMT12L FRMT 4 P FLINK JTSUBST START INF 8 P FLINK JTSUB05 REG KONTO NR
0x15e3ec…15e580 Dummy {f00=0x00be, f01=0x0190, f02=» FLINK JTSUB08 VALUE P FEOR 2 P FILLR ' ',2 @ 2 P FMEL 'BZZZZZZZZZZ',GTDUPF(CBIN2) DIVERSE TEXT T P FILLR ' ',16 P FMEND P* 4 PJTSUBST FRMT START INF P FILLR ' ',2
0x15e580…15e714 (0, 444) Dummy {f00=0x00bf, f01=0x0190, f02=» TYPE b P FLINK FLBNR P FMEND " P* 8 : PJTSUB01 FRMT LINE 1,- 1,5,6 B P FLINK JTSUB05 CPR/CIR P FLINK JTSUB06 REG-KONTO-NR 0 P FLINK JTSUB08 VALUE P FMEND
0x15e714…15e8a8 Dummy {f00=0x00bf, f01=0x0190, f02=»ZZ.ZZ.ZZ',GTDUPF(CBIN7) V.DATO B P FMEL 'BBX',GTDUPF(CBIN6) RE$ & D P FMEL 'BBX',GTDUPF(CBIN8) BFO l P FLINK JTSUB30 0 P FMEL 'XXXXXXE-XXXX',GTDUPF(CBIN10) YD.MODT ( P F
0x15e8a8…15ea3c Dummy {f00=0x00bf, f01=0x0190, f02=» FMEL 'BB99.99.99.99.99BBB',GTDUPF(CBIN1) P FMEND 6 P* L 2 PJTSUB06 FRMT CPR/CIR V P FBT BCPR,JTLAB06 ( P FMEL 'XE-XXE-XXE-XXB',GTDUPF(CBIN2) P FB JTLAB08 PJTLAB06 P FBT BLE
0x15ea3c…15ebd0 Dummy {f00=0x00bf, f01=0x018e, f02=» PJTLAB08 P FMEND P* * P* 4 8 PJTSUB08 FRMT VALUE AND D/K > 6 P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) z P FCOPY TTDBKRM P FMEND P* PJTSUB10 FRMT LEVERAND
0x15ebd0…15ed64 Dummy {f00=0x00bf, f01=0x0190, f02=» 6 P FMEL 'BBZZZE-ZZZE-ZZE-ZZ',GTDUPF(CBIN9) P FMEND > P* L 6 PJTSUB31 FRMT LINE 3 - 8 V P FILLR ' ',2 F P FMEL 'ZZ.ZZ.ZZ',GTDUPF(CBIN12) FAKT DATO D P FMEL 'BZ
0x15ed64…15eef8 Dummy {f00=0x00bf, f01=0x0190, f02=»MEL 'BZZZZ',GTDUPF(CBIN15) TXT NR D P FMEL 'BZZ',GTDUPF(CBIN16) OMR NR > D P FMEL 'BZZ.ZZ.ZZ',GTDUPF(CBIN18) PER FRA D P FMEL 'BZZ.ZZ.ZZ',GTDUPF(CBIN19) P
0x15eef8…15f08c Dummy {f00=0x00bf, f01=0x0190, f02=» 0 P* VARIOUS FORMATS FOR JOURNAL TAPE P* < @ PFTBXJT FTABLE XJTF01,XJTF02,XJTF03,XJTF04,XJTF05,XJTF06, C F 2 P XJTF07,FMTFMT,XJTF09,XJTF10,XJTF11,VOX15, C P XJTF13,XJTF14,VOFMT02 P* PXJTF01 FRMT KVITTERING
0x15f08c…15f220 Dummy {f00=0x00bf, f01=0x018e, f02=» P FLINK XJTF02L P FMEND P* ( PXJTF02L FRMT 2 P FLINK FLBNR F P FILLR ' ',2 Z P FCOPY ='KONTOKORT' n P FBF GTSLDFLG,XJTF02EX & P FMEL 'B*.***.***.**9.99-',TTKTSLD PXJTF02EX P FMEND P* PXJTF03 FRMT
0x15f220…15f3b4 (0, 445) Dummy {f00=0x00bf, f01=0x0190, f02=» P FMEND PXJTF05 FRMT P FLINK XJTF05L * P FMEND @ P* N P* X PXJTF05L FRMT b P FILLR ' ',2 v P FILLR '*',50 P FEOR P FILLR ' ',2 P FTEXT 'VERSNR ' P FCOPY ='DAGS-DATO' P FILLR ' ',2
0x15f3b4…15f548 Dummy {f00=0x00bf, f01=0x0190, f02=» P FCOPY GTTESTMK P FMEL '99.99.999.9',CVERSNR P FILLR ' ',2 D P FMEL '99E-99E-99',CMASKDAT X P FILLR ' ',3 | P FMEL '99E-99E-99',GTDATO P FILLR ' ',3 P FMEL '999',GTMSK P FILLR ' ',7 P FMEL '***99',TTSTLB
0x15f548…15f6dc Dummy {f00=0x00bf, f01=0x0190, f02=» P FILLR ' ',2 & P FMEL '99.99.99.99.99BBBB',TVERSUR ( P FMEL '99.99.99.99.99BBBB',TTCASHAC B $ P FMEL 'ZZZ.ZZZ.ZZ9.ZZ-',TTSTCASH n P FEOR P FILLR ' ',2 P FILLR '*',40 P FMEND P* PXJTF06 FRMT P FLINK XJTF06L
0x15f6dc…15f870 Dummy {f00=0x00bf, f01=0x0190, f02=»'KASSELUKNING' P FILLR ' ',30 P FEOR , P FILLR ' ',2 : P FCOPY ='T[LLER' N P FILLR ' ',10 f P FCOPY ='DEBET' | P FILLR ' ',12 P FCOPY ='KREDIT' P FMEND P* PXJTF07 FRMT P FLINK XJTF07L P FME
0x15f870…15fa04 Dummy {f00=0x00bf, f01=0x0190, f02=» ^ 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(GSWBIN5,CBIN1) P FMEND B P* P PXJTF09 FRMT Z P FCOPY =' START TEST' n P FMEND P* PXJTF10 FRMT P FCOPY =' SLUT TEST' P FMEND P* PXJTF11 FRMT P FILLR
0x15fa04…15fb98 Dummy {f00=0x00bf, f01=0x018e, f02=»MEND P* PXJTF13L FRMT P FLINK JTSUB05 REG KNT NO * * P FMEL 'BZZZ',GTDUPF(CBIN2) COUNTER NO L 2 P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) VALUE z P FILLR ' ',2 P FCOPY ='ADM ' $ P FMEL 'BZZ',GTDUPF(CBIN5) ADM NO P FME
0x15fb98…15fd2c Dummy {f00=0x00bf, f01=0x0190, f02=» P* PFMTFMT FRMT P FLINK FMTFMTL & P FMEND < P* J PFMTFMTL FRMT T P FILLR ' ',2 h P FTEXT 'DIVERSE FORMATER' | P FMEND P EJECT P* : P* FORMATS FOR VOUCHER 'BILAG AFSTEMPLING'
0x15fd2c…15fec0 Dummy {f00=0x00bf, f01=0x0190, f02=» C X 2 P BAFST12,BAFST40,BAFST41,BAFST42,BAFST45, C 2 P BAFST46,BAFST47,BAFST48,BAFST49,BAFST50, C B & P BAFST51,BAFST52,BAFST53,BAFST54 x P* P* PBAFST01 FRMT TRANS 01-06 P FLINK BAFST01L P FMEND P* P
0x15fec0…160054 (0, 446) Dummy {f00=0x00bf, f01=0x0190, f02=»'B**B',GTDUPF(CBIN3) BKO @ P FMEL 'ZZ.ZZ.ZZB',GTDUPF(CBIN7) BET/VALORDATO P FB B1LAB2 d PB1LAB1 v " P FMEL 'B**B',GTDUPF(CBIN3) BKO PB1LAB2 < P FLINK JTSUB06 CPR-CIR-NR @ P FLINK B
0x160054…1601e8 Dummy {f00=0x00bf, f01=0x0190, f02=» TRANS 02-05-07-10 f P FLINK BAFST02L P FMEND 4 P* B PBAFST02L FRMT L 8 P FLINK BSUB01 HEADER b P FILLR ' ',1 8 P FMEL '******E-****',GTDUPF(CBIN2) CPR/CIR TRANS 10 P FILLR '*',3 P FBT T
0x1601e8…16037c Dummy {f00=0x00bf, f01=0x0190, f02=»MEND P* P* < PBAFST08 FRMT TRANS 08-09 P FLINK BAFST08L ` P FMEND x P* PBAFST08L FRMT 8 P FLINK BSUB01 HEADER $ P FMEL 'BBB**B',GTDUPF(CBIN3) BKO
0x16037c…160510 Dummy {f00=0x00bf, f01=0x018e, f02=»),B8LAB2 ~ 2 P FMEL 'BBZZ.ZZ.ZZBBB',GTDUPF(CBIN12) FAKTDATO ! P FB B8LAB5 ! F PB8LAB2 ! X . P FMEL 'ZZZZ9999.99B',GTDUPF(CBIN14) LEVNR ! f PB8LAB5 ! P FLINK JTSUB10 LEVERAND. ! > P FLINK BSUB02 REGKONTO-BELOB ! P
0x160510…1606a4 Dummy {f00=0x00bf, f01=0x0190, f02=» ! P FILLR '+',2 " P FCOPY GTTESTMK " $ > P FCOPY TTCYM CYKLE-MARKERING " < > P FMEL '999B',GTMSK MASKINNR " ~ P FLINK FLBNR " @ P FMEL 'B99.99.99',GTDATO POSTERI
0x1606a4…160838 Dummy {f00=0x00bf, f01=0x0190, f02=»PE-NR " ^ < P FMEL 'B999',TTCNTNR TAELLER-NR # 2 P FMEL 'BZZZZZZZZZZ',GTDUPF(CBIN2) DIVERSE TEXT # N P FBT TTKORTFL,B12LAB1 # P FILLR '*',13 # PB12LAB1 # @ P FLINK BSUB02 REGKONTO-BELOB #
0x160838…1609cc Dummy {f00=0x00bf, f01=0x018e, f02=»B13 # P FMEND $ P* $ PBAFST04 FRMT BILAG TRANS 4 $ $ P FLINK BSUB10 $ H P FLINK BSUB12 $ ^ P FLINK BSUB13 $ t P FMEND $ P* $ P* $ PBAFST40 FRMT $ P FMEND $ P* $ PBAFST41 FRMT $ P FMEND $ PBAFST42 FRMT $
0x1609cc…160b60 Dummy {f00=0x00bf, f01=0x0190, f02=» P FMEND % P* % PBAFST48 FRMT % P FMEND % 0 P* % > PBAFST49 FRMT % H P FMEND % P* % j PBAFST50 FRMT % t P FMEND % P* % PBAFST51 FRMT % P FMEND % P* % PBAFST52 FRMT % P FMEND % P* % PBAFST53 FRMT %
0x160b60…160cf4 (0, 447) Dummy {f00=0x00bf, f01=0x0190, f02=» HEADER % d P FILLR '+',2 & P FCOPY GTTESTMK & , > P FCOPY TTCYM CYKLE-MARKERING & D > P FMEL '999B',GTMSK MASKINNR & P FLINK FLBNR & @ P FMEL 'B99.99.99',GTDATO
0x160cf4…160e88 Dummy {f00=0x00bf, f01=0x0190, f02=» TRANSTYPE-NR & f P FMEND ' P* ' , P ' 6 PBSUB02 FRMT ' > B P FMEL 'B99.99.99.99.99B',GTDUPF(CBIN1) REGKONTONR ' T < P FMEL '*.***.***.**9.99-',GTDUPF(CBIN4) BELOB ' B P FCOPY TTDBKRM D
0x160e88…16101c Dummy {f00=0x00bf, f01=0x0190, f02=» P FCOPY TTCYM ( @ P FMEL '99.99.99B',GTDATO POSTERINGSDATO ( P FCOPY CKMDNAM ( : P FMEL 'B999B',GTMSK MASKINNR ( r " P FMEL '99B',GTDUPF(CBIN3) BKO ( P FMEND ( P* ( P* ( PBSUB05
0x16101c…1611b0 Dummy {f00=0x00bf, f01=0x0190, f02=» DEBET/KREDIT-MARK ( l P FILLR ' ',1 ) " P FMEND ) 6 P* ) L P* ) V PBSUB06 FRMT ) ` " P FMEL 'B99B',GTDUPF(CBIN3) BKO ) v P FBT TTKORTFL,B6LAB1 ) P FCOPY TT07TXT ) P FILLR ' ',1 ) . P FMEL 'ZZ.ZZ.ZZB',GTDUPF(CBIN7) VAL. D
0x1611b0…161344 Dummy {f00=0x00bf, f01=0x0190, f02=» CPR/CIR-NR ) v < P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) BELOB * & D P FCOPY TTDBKRM DEBET/KREDIT-MARK * f P FILLR ' ',1 * P FLINK SKAF01 LINE NR * P FMEND * P* * PBSUB10 F
0x161344…1614d8 Dummy {f00=0x00bf, f01=0x018e, f02=»99',GTDATO POSTDATO * " P FMEL 'BXX.',GTDUPF(CBIN3) BKO + P FMEND + B P* + P PBSUB11 FRMT + Z $ P FMEL 'XX',GTDUPF(CBIN11) P]L]R + n 2 P FMEL 'E-9999999999B',GTDUPF(CBIN2) DEBITOR NR + , P FMEL 'XX.XXPP',GTDUPF(CBIN7) VALOERDATO + & P FMEL 'BXB',
0x1614d8…16166c Dummy {f00=0x00bf, f01=0x0190, f02=» + n P FB B12LAB6 , PB12LAB5 , ( P FMEL 'XX',GTDUPF(CBIN10) FORFALDS]R , , PB12LAB6 , X 2 P FMEL 'E-9999999999B',GTDUPF(CBIN2) DEBITORNR , h , P FMEL 'XX.XXPP',GTDUPF(CBIN7) VALOERDATO , P FILLR ' ',3 , P FMEND , P* , PBSUB13 FRMT ,
0x16166c…161800 Dummy {f00=0x00bf, f01=0x0190, f02=» EKSP LB. NR. , P FBT GTLOKSPG,FLBNR10 - P FMEL '****9',TTLBNR - 4 P FB FLBNR20 - P PFLBNR10 - d P FMEL '****9',GTLBNR - t PFLBNR20 - P FMEND - P* - P EJECT - P* - * P* VARIOUS FORMATS FOR VOUCHER - P* - : P
0x161800…161994 (0, 448) Dummy {f00=0x00c0, f01=0x0190, f02=»X15, C - t P VOX16,VOX17,VOX18 . P* . , P* . 6 PVOFMT02 FRMT TOTAL IN CYCLE . @ P FLINK VOFMT02L . d P FMEND . | P* . PVOFMT02L FRMT . P FILLR '+',2 . P FBF TTCY1FLG,VOLAB02 . P FCOPY ='ARKIV' . P FLINK JTSUB30 .
0x161994…161b28 Dummy {f00=0x00c0, f01=0x0190, f02=»* . PBAXF04 FRMT / P FLINK BAFST03 / P FLINK BAXF05L / 4 P FMEND / J P* / X PBAXF05 FRMT / b P FILLR '+',2 / v P FLINK BAXF05L / P FMEND / P* / PBAXF05L FRMT / P FLINK BSUB04 / P FEOR / P FILLR '0',2 / P FLI
0x161b28…161cbc Dummy {f00=0x00c0, f01=0x0190, f02=»AFST03 / P FEOR 0 P FILLR '0',2 0 P FEOR 0 0 P FILLR '0',2 0 > P FEOR 0 R P FLINK KVIT03 0 ` P FMEND 0 v P* 0 PVOSUM07 FRMT SUMBILAG 0 P FLINK VOSUM07L 0 P FMEND 0 P* 0 PVOSUM07L FRMT 0 P FILLR '+',2 0 P F
0x161cbc…161e50 Dummy {f00=0x00c0, f01=0x0190, f02=»LBNR 0 P FILLR ' ',1 1 P FCOPY ='TOTAL ' 1 " & P FMEL '*.***.***.**9,99+',GTSUMCNT 1 < P FILLR ' ',2 1 f P FMEND 1 z P* 1 PVOX08 FRMT 1 P FLINK VOX08L 1 P FMEND 1 P* 1 PVOX08L FRMT 1 P FILLR '+',2 1 P FCOPY GTTESTM
0x161e50…161fe4 Dummy {f00=0x00c0, f01=0x0190, f02=»XT ' - ' 1 P FLINK FLBNR 2 P FILLR ' ',2 2 $ P FCOPY GSWSTR9 2 8 P FILLR ' ',2 2 N P FCOPY GSWSTR20 TEXT 2 b P FEOR 2 ~ P FILLR '2',2 2 P FILLR '*',60 2 P FILLR '*',8 2 P FEOR 2 P FILLR '4',2 2 P FCOPY ='KONTONR' 2 P F
0x161fe4…162178 Dummy {f00=0x00c0, f01=0x0190, f02=» ' ',12 2 P FCOPY ='KREDIT' 3 P FMEND 3 ( P* 3 6 PVOX09 FRMT 3 @ P FLINK VOX09L 3 R P FMEND 3 h P* 3 v PVOX09L FRMT 3 P FILLR '2',2 3 * P FMEL 'XX.XX.XX.XX.XXBB',GTDUPF(CBIN1) 3 P FILLR ' ',4 3 P FMEL '99',GTWBCD1 3 6 P FME
0x162178…16230c Dummy {f00=0x00c0, f01=0x0190, f02=».ZZZ.ZZ9.99-',C12ACC(GSWBIN5,CBIN1) KREDIT 3 P FMEND 4 2 P* 4 @ PVOX10 FRMT 4 J P FLINK VOX10L 4 P FMEND 4 r P* 4 PVOX10L FRMT 4 P FILLR '2',2 4 P FMEL 'ZZ',GTWBCD1 4 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) 4 6 P FMEL 'B
0x16230c…1624a0 Dummy {f00=0x00c0, f01=0x0190, f02=»1 FRMT 4 P FLINK VOX11L 5 P FMEND 5 $ P* 5 2 PVOX11L FRMT 5 < P FILLR '4',2 5 P P FTEXT 'TOTAL' 5 d 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) 5 z 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTREGF(CBIN2) 5 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTREGF(C
0x1624a0…162634 (0, 449) Dummy {f00=0x00c0, f01=0x0190, f02=»ZZ.ZZZ.ZZ9.99-',TTACC(CBIN8,CBIN2) 5 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(CBIN8,CBIN1) 6 * P FEOR 6 b P FILLR '2',2 6 p P FTEXT 'KOR' 6 P FILLR ' ',19 6 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(CBIN7,CBIN2) 6 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTAC
0x162634…1627c8 Dummy {f00=0x00c0, f01=0x0190, f02=» '4',2 6 & P FMEL '99.99.99.99.99BB',TTCASHAC 7 P FILLR ' ',1 7 8 P FTEXT ' PRIMO' 7 L * P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTSTCASH 7 d P FILLR ' ',34 7 P FEOR 7 P FILLR '2',2 7 P FTEXT 'BEV ' 7 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBI
0x1627c8…16295c Dummy {f00=0x00c0, f01=0x0190, f02=» '2',2 7 P FTEXT 'ULTIMO' 8 ( P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTCASH 8 & P FILLR ' ',34 8 R P FMEND 8 h P* 8 v PVOX13 FRMT 8 P FLINK VOX13L 8 P FMEND 8 P* 8 PVOX13L FRMT 8 P FILLR ' ',2 8 P FCOPY GTTESTMK 8 P FMEL '9
0x16295c…162af0 Dummy {f00=0x00c0, f01=0x0190, f02=»STR20 8 P FILLR ' ',3 9 P FEOR 9 " P FILLR '2',2 9 0 P FILLR '*',56 9 D P FEOR 9 Z P FILLR '4',2 9 h P FCOPY ='T[LLER' 9 | P FILLR ' ',4 9 P FCOPY ='KONTONR' 9 P FILLR ' ',10 9 P FCOPY ='BEV.PERIODE' 9 P FILLR ' ',12 9
0x162af0…162c84 Dummy {f00=0x00c0, f01=0x0190, f02=» PVOX14L FRMT : P FILLR '2',2 : P FMEL 'ZZ',GTWBCD1 : , P FILLR ' ',4 : F 2 P FMEL 'XX.XX.XX.XX.XXBB',CBACC(GSWBIN3,CBIN1) : Z 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',CBACC(GSWBIN3,CBIN2) : 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',CBACC(GSWBIN3,CBIN3) : P FME
0x162c84…162e18 Dummy {f00=0x00c0, f01=0x0190, f02=» : P FLINK VOX16L ; P FMEND ; P* ; , PVOX16L FRMT ; 6 P FILLR X'24',40 NO. ; J P FILLR X'3C',40 5. ; f P FNL ; P FNL ; P FILLR X'5D',40 ] ; P FILLR X'4E',40 N ; P FNL ; P FNL ; P FILLR X'45',40 E ; P FILLR X'5
0x162e18…162fac Dummy {f00=0x00c0, f01=0x0190, f02=»LINK VOX17L ; P FMEND < P* < " PVOX17L FRMT < , P FILLR '+',2 < @ , P FMEL '99E-99E-99',GTDATO POSTERINGSDATO < T P FILLR ' ',6 < P FLINK FLBNR < P FILLR ' ',8 < 2 P FMEL 'B*.***.***.**9E,99',GTDUPF(CBIN4) BELOB < P FILLR '*',2 <
0x162fac…163140 Dummy {f00=0x00c0, f01=0x0190, f02=» P FLINK VOX18L = P FMEND = P* = ( PVOX18L FRMT = 2 P FILLR '2',2 = F P FILLR ' ',17 = Z * P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GSWBCD6 = p * P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GSWBCD7 = P FMEND = P* = P EJECT = P* = . P* F
0x163140…1632d4 (0, 450) Dummy {f00=0x00c0, f01=0x0190, f02=»AFST02, C = d 2 P BAFST01,BAFST02,BAFST08,BAFST08,BAFST02, C > P BAFST12 > H P* > Z P* > d PKVIT03 FRMT > n P FILLR '+',2 > P FLINK BSUB04 > P FLINK BSUB05 > P FMEND > P* > P EJECT > P* > " P* FORMA
0x1632d4…163468 Dummy {f00=0x00c0, f01=0x0190, f02=»KAFST02, C > n P KAFST12 ? P* ? 4 P* ? > PKAFST00 FRMT ? H P FMEND ? ^ P* ? t P* ? ~ < PKAFST01 FRMT TRANS 01-06 ? P FLINK BAFST01 ? P FLINK SKAF01 LINE NR ? P
0x163468…1635fc Dummy {f00=0x00c0, f01=0x0190, f02=» SKAF01 LINE NR ? P FMEND @ P* @ . P @ 8 : PKAFST12 FRMT TRANS 12 @ @ P FLINK BAFST12 @ ~ P FLINK SKAF01 LINE NR @ P FMEND @ P* @ P* @ : PKAFST03 FRMT
0x1635fc…163790 Dummy {f00=0x00c0, f01=0x0190, f02=» HEADER @ h P FLINK BSUB06 A P FBF TTKORTFL,KLAB31 A * 2 P FMEL 'XX.XXPP',GTDUPF(CBIN7) VAL.DATE, DD.MM A F PKLAB31 A | > P FMEL 'BXX',GTDUPF(CBIN11) PALIGNINGS$R A $ P FCOPY TT16TXT RENTE/GEBYR/INDB A ( P FLINK BSUB07 CPR/CI
0x163790…163924 Dummy {f00=0x00c0, f01=0x0190, f02=»AFST04L A P FMEND B P* B PKAFST04L FRMT B ( 8 P FLINK BSUB01 HEADER B > < P FLINK BSUB06 BETART/DATO B z P FBF TTKORTFL,KLAB40 B 2 P FMEL 'XX.XXPP',GTDUPF(CBIN7) VAL DATE, DD.MM B
0x163924…163ab8 Dummy {f00=0x00c0, f01=0x0190, f02=»CIR B j P FB KLAB42 C PKLAB41 C P FILLR ' ',3 C , 4 P FMEL 'B**',GTDUPF(CBIN10) FORF.AAR - CPR, BSKAT C @ PKLAB42 C x F P FLINK BSUB07 CPR/CIR-BELOB-LINIENR C P FMEND C P* C PSKAF01 FRMT C P FBF
0x163ab8…163c4c Dummy {f00=0x00c0, f01=0x0190, f02=»SLD SALDO C r PSKAF03 D " P FMEL 'B99.',TTKTLIN NEW LINE D " P FMEL '9',TTKTCHK CHECK DIGIT D F P FB SKAF05 D l PSKAF02 D ~ P FMEL '99B',TTKTLIN D PSKAF05 D P FMEND D P* D P EJECT D P* D . P* VARIOUS FORMATS FOR 'KO
0x163c4c…163de0 Dummy {f00=0x00c0, f01=0x018e, f02=»L FRMT D P FILLR '+',2 E P FMEL 'BB99.99.99',GTDATO E " P FILLR ' ',43 E D & P FMEL '*.***.***.**9.99-',TTKTSLD E Z P FILLR ' ',2 E P FCOPY ='TRP ' E P FMEND E P EJECT E P* E $ P* FORMATS FOR TALLY ROLL E P* E
0x163de0…163f74 (0, 451) Dummy {f00=0x00c0, f01=0x0190, f02=» P* F @ PFTBXTA FTABLE TAFMT01,TAFMT02,TAFMT02,TAFMT04,TAFMT05, C F P VOX15,TAFMT07 F R P* F j PTAFMT01 FRMT F t P FSL F P FNL F P FNL F P FILLR '*',1 F P FILLR ' ',1 F P FMEND F P* F PTAFMT02 FRMT F P FLINK T
0x163f74…164108 Dummy {f00=0x00c0, f01=0x0190, f02=»D6 F p P FLINK TAFMT07 G P FMEND G P* G . PTAFMT04 FRMT G 8 P FILLR '+',2 G L , P FMEL 'Z.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) G ` P FCOPY TTDBKRM G P FMEND G P* G PTAFMT05 FRMT G P FILLR '+',2 G & P FMEL 'Z.ZZZ.ZZZ.ZZ9.99-',GSWBCD6
0x164108…16429c Dummy {f00=0x00c0, f01=0x4152, f02=» G P FNL H P FMEND H P EJECT H " P* H 8 ( P* FORMATS FOR GENERAL PRINTER H B P* H n PFTBGP FTABLE FMTFMT H x P* H P* H P EJECT H P* H 2 P* VARIOUS FORMATS FOR GENERAL PRINTER H P* H PFTBXGP F
0x16429c…164430 Dummy {f00=0x00c0, f01=0x2008, f02=» I P* CAN NOT BE IDENTIFIED BY TRANSTYPE (OR GTREGDEX) ' P* ' L PFTBXX FTABLE ' V P* ' n P* ' x P END ' @ ' & z P* & PFTBTA FTABLE & P* & P* & P EJECT & P* & ( P* FORMATS
0x164430…1645c4 Dummy {f00=0x00c0, f01=0x0000, f02=»
[…0x3…]
0x164a80…164c14 (0, 452) Opaque[0x194]
0x164c14…164da8 # DirEnt {nam=»DIV805«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1820, f03=0x0000}
0x164c14…164da8 IdxSect {
0x164c14…164da8 f00 = 0x00c1 // 0x164c14 @0x0
0x164c14…164da8 f01 = 0x0018 // 0x164c16 @0x2
0x164c14…164da8 gno = [ // 0x164c18 @0x4
0x164c14…164da8 [0x00]: C0x00c1.0x0.0
0x164c14…164da8 [0x01]: C0x00c1.0x1.0
0x164c14…164da8 [0x02]: C0x00c1.0x2.0
0x164c14…164da8 [0x03]: C0x00c1.0x3.0
0x164c14…164da8 [0x04]: C0x00c2.0x0.0
0x164c14…164da8 [0x05]: C0x00c2.0x1.0
0x164c14…164da8 [0x06]: C0x00c2.0x2.0
0x164c14…164da8 [0x07]: C0x00c2.0x3.0
0x164c14…164da8 [0x08]: C0x00c3.0x0.0
0x164c14…164da8 [0x09]: C0x00c3.0x1.0
0x164c14…164da8 [0x0a]: C0x00c3.0x2.0
0x164c14…164da8 [0x0b]: C0x00c3.0x3.0
0x164c14…164da8 ]
0x164c14…164da8 }
0x164da8…164f3c Dummy {f00=0x00c1, f01=0x0190, f02=» P IDENT DIV805 03.01.XXX.1 P DDUM KMD08 & P PDIV D P ENTRY FRMTJT Z P ENTRY FRMXJT p P ENTRY FRMTTA P ENTRY FRMXTA P ENTRY FRMTVO P ENTRY FRMTKV P ENTRY FRMXVO P ENTRY FRMTKT
0x164f3c…1650d0 Dummy {f00=0x00c1, f01=0x0190, f02=» INCLUDE EQUATE P* PFRMTJT PROC $ 0 P CALL FMOVE,GTSTRFMT,FTBJT(GTREGDEX) : P RET n P PEND P* PFRMXJT PROC XJTDEX ( P CALL FMOVE,GTSTRFMT,FTBXJT(XJTDEX) P RET P PEND P*
0x1650d0…165264 Dummy {f00=0x00c1, f01=0x018e, f02=» PROC XTADEX ( P CALL FMOVE,GTSTRFMT,FTBXTA(XTADEX) P RET @ P PEND L P* Z PFRMTVO PROC d 0 P CALL FMOVE,GTSTRFMT,FTBVO(GTREGDEX) x P RET P PEND P* PFRMXVO PROC XVODEX ( P CALL FMOVE,GT
0x165264…1653f8 Dummy {f00=0x00c1, f01=0x0190, f02=» P PEND P* PFRMTKT PROC 0 P CALL FMOVE,GTSTRFMT,FTBKT(GTREGDEX) 6 P RET j P PEND ~ P* PFRMXKT PROC XKTDEX ( P CALL FMOVE,GTSTRFMT,FTBXKT(XKTDEX) P RET P PEND P* P
0x1653f8…16558c Dummy {f00=0x00c1, f01=0x0190, f02=» ~ ( P CALL FMOVE,GTSTRFMT,FTBXGP(XGPDEX) P RET 4 P PEND @ P* N PFRMBUD PROC BUDDEX X ( P CALL FMOVE,GTSTRFMT,FTBBUD(BUDDEX) r P RET P PEND P* PFRMBUP PROC P CALL FMOVE,GTSTRFMT,FRMBPR P RET P P
0x16558c…165720 Dummy {f00=0x00c1, f01=0x0190, f02=»FMT02,JTFMT03,JTFMT04,JTFMT02, C v 2 P JTFMT01,JTFMT02,JTFMT08,JTFMT08,JTFMT02, C * . P JTFMT12,JTFMT18,JTFMT18,JTFMT18,JTFMT18 ` P* P* PJTFMT01 FRMT 4 P FLINK JTSUBST STARTINF 2 P FLINK JTSUB01
0x165720…1658b4 (0, 453) Dummy {f00=0x00c1, f01=0x0190, f02=» PJTFMT02 FRMT P FLINK JTFMT02L P FMEND 0 P* > PJTFMT02L FRMT H 2 P FLINK JTSUBST SORTINF ^ 6 P FLINK JTSUB05 REG KONTONO P FILLR ' ',11 P FLINK JTSUB08 VALUE P
0x1658b4…165a48 Dummy {f00=0x00c1, f01=0x0190, f02=» P FLINK JTSUB06 FOR TRANS 10 P FLINK JTSUB30 ARKIV KNT.NR , P FILLR ' ',15 P P FMEND n P* PJTFMT03 FRMT P FLINK JTFMT03L P FMEND P* PJTFMT03L FRMT 4 P FLINK JTSUBST
0x165a48…165bdc Dummy {f00=0x00c1, f01=0x0190, f02=»IR d 0 P FLINK JTSUB08 VALUE P FEOR > P FILLR ' ',2 T P FILLR ' ',4 p F P FMEL '99',GTDUPF(CBIN3) BETALINGSKODE BKO P FILLR ' ',5 H P FMEL 'ZZ.ZZ.
0x165bdc…165d70 Dummy {f00=0x00c1, f01=0x018e, f02=» FLINK JTSUB30 ARK KONTO NR P FILLR ' ',2 4 8 P FMEL 'XX',GTDUPF(CBIN11) PALIGNINGSAR P P FILLR ' ',5 4 P FMEL 'ZZZ',GTDUPF(CBIN15) DEB LB NR P FILLR ' ',4 P FME
0x165d70…165f04 Dummy {f00=0x00c1, f01=0x0190, f02=» v P FILLR ' ',15 2 P FLINK JTSUB06 CPR/CIR & 0 P FLINK JTSUB08 VALUE P FEOR P FILLR ' ',2 P FILLR ' ',4 P FMEL '99',GTDUPF(CBIN3) BKO P FILLR ' ',5
0x165f04…166098 Dummy {f00=0x00c1, f01=0x0190, f02=» ARK KNT NR r B P FMEL 'BBBZZ',GTDUPF(CBIN10) F$R F P FMEL 'BBZZ',GTDUPF(CBIN11) RES $R b D P FMEL 'BZZ',GTDUPF(CBIN12) RESM$ B P FMEL 'BBZB
0x166098…16622c Dummy {f00=0x00c1, f01=0x0190, f02=» P* PJTFMT08L FRMT 4 P FLINK JTSUBST START INF $ 2 P FLINK JTSUB01 LINE 1 P FEOR 2 P FLINK JTSUB04 LINE 2 P FEOR 2 P FLINK JTSUB
0x16622c…1663c0 Dummy {f00=0x00c1, f01=0x0190, f02=»FMT12L FRMT 4 P FLINK JTSUBST START INF 8 P FLINK JTSUB05 REG KONTO NR L D P FMEL 'B999',TTCNTNR T#LLER NR P FILLR ' ',5 P FILLR ' ',2 0 P
0x1663c0…166554 (0, 454) Dummy {f00=0x00c1, f01=0x0190, f02=» P FILLR ' ',16 P FMEND P* ( $ PJTFMT18 FRMT TRANS 18,19,28,29 2 ( P FLINK JTFMT01 2 LINES AS TRANS 1,6 Z P FEOR P FLINK JTSUB18 3 LINIE P FMEND P* 4 PJTSUBST FRMT START INF P
0x166554…1666e8 Dummy {f00=0x00c1, f01=0x0190, f02=» TRANS, TYPE t P FLINK FLBNR P FMEND 4 P* J : PJTSUB01 FRMT LINE 1,- 1,5,6 T P FLINK JTSUB05 CPR/CIR P FLINK JTSUB06 REG-KONTO-NR 0 P FLINK JTSUB08 VALUE P
0x1666e8…16687c Dummy {f00=0x00c1, f01=0x0190, f02=»KO v * P FMEL 'BZZ.ZZ.ZZ',GTDUPF(CBIN7) V.DATO B P FMEL 'BBX',GTDUPF(CBIN6) RE$ 8 D P FMEL 'BBX',GTDUPF(CBIN8) BFO ~ P FLINK JTSUB30 0 P FMEL 'XXXXXXE-XXXX',GTDUPF(CBIN10)
0x16687c…166a10 Dummy {f00=0x00c1, f01=0x0190, f02=»NT NR d 4 P FMEL 'B999V99V999E-99B',GTDUPF(CBIN1) P FMEND F P* 2 PJTSUB06 FRMT CPR/CIR f P FBT BCPR,JTLAB06 ( P FMEL 'XE-XXE-XXE-XXB',GTDUPF(CBIN2) P FB JTLAB08 PJTLAB06
0x166a10…166ba4 Dummy {f00=0x00c1, f01=0x0190, f02=»DUPF(CBIN2) x PJTLAB08 P FMEND $ P* : P* D 8 PJTSUB08 FRMT VALUE AND D/K N 6 P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) P FCOPY TTDBKRM P FMEND P* PJTSUB1
0x166ba4…166d38 Dummy {f00=0x00c1, f01=0x0190, f02=» FMEL 'XXX',GTDUPF(CBIN15) TXT * P FMEL 'BXXXXXXXXXX',GTDUPF(CBIN13) NR- & , P FMEL 'BXXXXXXXXXX',GTDUPF(CBIN14) NR-2 T , P FMEL 'BXX.XX.XX',GTDUPF(CBIN18) DATO-1 , P FMEL 'BXX.XX.XX',GTDUPF(CBIN19) DATO-2 P FMEND P* 6 PJTSUB30 FRM
0x166d38…166ecc Dummy {f00=0x00c1, f01=0x0190, f02=»RMT LINE 3 - 8 P FILLR ' ',2 0 F P FMEL 'ZZ.ZZ.ZZ',GTDUPF(CBIN12) FAKT DATO L F P FMEL 'BZZZZZZZZZZ',GTDUPF(CBIN13) FAKT NR D P FMEL 'BZZZZZZZZ',GTDUPF(CBIN14
0x166ecc…167060 Dummy {f00=0x00c1, f01=0x0190, f02=»16) OMR NR p D P FMEL 'BZZ.ZZ.ZZ',GTDUPF(CBIN18) PER FRA ( D P FMEL 'BZZ.ZZ.ZZ',GTDUPF(CBIN19) PER TIL p F P FMEL 'BZ',GTDUPF(CBIN17) ADR KODE P
0x167060…1671f4 (0, 455) Dummy {f00=0x00c1, f01=0x018e, f02=»F02,XJTF03,XJTF04,XJTF05,XJTF06, C x 2 P XJTF07,FMTFMT,XJTF09,XJTF10,XJTF11,VOX15, C , " P XJTF13,XJTF14,VOFMT02,XJTF16 b P* PXJTF01 FRMT KVITTERING P FILLR ' ',2 P FLINK FLBNR P FCOPY =' KVIT' P FMEND P*
0x1671f4…167388 Dummy {f00=0x00c1, f01=0x0190, f02=» P FILLR ' ',2 P FCOPY ='KONTOKORT' P FBF GTSLDFLG,XJTF02EX 4 & P FMEL 'B*.***.***.**9.99-',TTKTSLD R PXJTF02EX | P FMEND P* PXJTF03 FRMT P FILLR ' ',2 P FCOPY ='START SUM' P FMEND P* PXJTF04 F
0x167388…16751c Dummy {f00=0x00c1, f01=0x0190, f02=»* PXJTF05L FRMT P FILLR ' ',2 P FILLR '*',50 2 P FEOR H P FILLR ' ',2 V P FTEXT 'VERSNR ' j P FCOPY ='DAGS-DATO' P FILLR ' ',2 P FCOPY ='POST-DATO' P FILLR ' ',2 P FCOPY ='MASKIN NR' P FCOPY
0x16751c…1676b0 Dummy {f00=0x00c1, f01=0x0190, f02=» FMEL '99E-99E-99',CMASKDAT P FILLR ' ',3 $ P FMEL '99E-99E-99',GTDATO 8 P FILLR ' ',3 Z P FMEL '999',GTMSK n P FILLR ' ',7 P FMEL '***99',TTSTLBNR P FILLR ' ',3 P FEOR P FILLR ' ',2 : P FCOPY ='VERSURKONTONR
0x1676b0…167844 Dummy {f00=0x00c1, f01=0x0190, f02=»TTCASHAC x $ P FMEL 'ZZZ.ZZZ.ZZ9.ZZ-',TTSTCASH P FEOR 8 P FILLR ' ',2 F P FILLR '*',40 Z P FMEND p P* ~ PXJTF06 FRMT P FLINK XJTF06L P FMEND P* PXJTF06L FRMT P FILLR ' ',2 P FILLR '*',50 P
0x167844…1679d8 Dummy {f00=0x00c1, f01=0x0190, f02=» P FILLR ' ',10 P FCOPY ='DEBET' P FILLR ' ',12 6 P FCOPY ='KREDIT' L P FMEND d P* r PXJTF07 FRMT | P FLINK XJTF07L P FMEND P* PXJTF07L FRMT P FILLR ' ',2 P FMEL 'ZZ',GTWBCD1 6 P FMEL 'B
0x1679d8…167b6c Dummy {f00=0x00c1, f01=0x0190, f02=»09 FRMT P FCOPY =' START TEST' P FMEND . P* < PXJTF10 FRMT F P FCOPY =' SLUT TEST' Z P FMEND x P* PXJTF11 FRMT P FILLR ' ',2 P FCOPY ='DISKETTE SKIFT ' P FMEND P* PXJTF13 FRMT P F
0x167b6c…167d00 Dummy {f00=0x00c1, f01=0x0190, f02=»F(CBIN2) COUNTER NO ~ 2 P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) VALUE P FILLR ' ',2 R P FCOPY ='ADM ' f $ P FMEL 'BZZ',GTDUPF(CBIN5) ADM NO ~ P FMEND P* PXJTF14 FRMT P FSL P FMEL '99B',GTWBCD2 P FCOPY GSWSTR9
0x167d00…167e94 (0, 456) Dummy {f00=0x00c2, f01=0x0190, f02=»',CCHKLBNR P FCOPY =' CHECK' P FMEND * PFMTFMT FRMT 8 P FLINK FMTFMTL L P FMEND b P* p PFMTFMTL FRMT z P FILLR ' ',2 P FTEXT 'DIVERSE FORMATER' P FMEND P EJECT P* : P* FORMATS FOR V
0x167e94…168028 Dummy {f00=0x00c2, f01=0x0190, f02=»FST01,BAFST02,BAFST08,BAFST08,BAFST02, C ~ 2 P BAFST12,BAFST01,BAFST01,BAFST01,BAFST01, C 2 * P BAFST40,BAFST41,BAFST42,BAFST45, C h 2 P BAFST46,BAFST47,BAFST48,BAFST49,BAFST50, C & P BAFST51,BAFST52,BAFST53,BAFST54 P* P*
0x168028…1681bc Dummy {f00=0x00c2, f01=0x0190, f02=» HEADER r P FBT TTKORTFL,B1LAB1 P FILLR ' ',6 : " P FMEL 'B**B',GTDUPF(CBIN3) BKO N @ P FMEL 'ZZ.ZZ.ZZB',GTDUPF(CBIN7) BET/VALORDATO t P FB B1LAB2 PB1LAB1 " P FMEL 'B**B',GTDUPF(CBIN3) BKO PB1LAB2
0x1681bc…168350 Dummy {f00=0x00c2, f01=0x018e, f02=» FMEND P* ! P* ! B PBAFST02 FRMT TRANS 02-05-07-10 ! * P FLINK BAFST02L ! p P FMEND ! P* ! PBAFST02L FRMT ! 8 P FLINK BSUB01 HEADER ! P FILLR ' ',1 ! 8 P F
0x168350…1684e4 Dummy {f00=0x00c2, f01=0x0190, f02=» ! @ P FLINK BSUB02 REGKONTO-BELOB " P FMEND " L P* " b P* " l < PBAFST08 FRMT TRANS 08-09 " v P FLINK BAFST08L " P FMEND " P* " PBAFST08L FRMT " 8 P FLI
0x1684e4…168678 Dummy {f00=0x00c2, f01=0x0190, f02=»ZZZB',GTDUPF(CBIN13) FAKTNR " P FB B8LAB5 # $ PB8LAB1 # 6 P FBZ GTUSED(CBIN12),B8LAB2 # D 2 P FMEL 'BBZZ.ZZ.ZZBBB',GTDUPF(CBIN12) FAKTDATO # f P FB B8LAB5 # PB8LAB2 # . P FMEL 'ZZZZ9999.99B',GTDUPF(CBIN14) LEVNR # PB8LAB5 # P FLINK JTSUB
0x168678…16880c Dummy {f00=0x00c2, f01=0x0190, f02=»FRMT TRANS 12 # P FLINK BAFST12L $ P FMEND $ . P* $ < PBAFST12L FRMT $ F P FILLR '+',2 $ P FCOPY GTTESTMK $ x > P FCOPY TTCYM CYKLE-MARKERING $ & P FMEL '99.99.99B',GTDATO POST DATO $ > P FME
0x16880c…1689a0 Dummy {f00=0x00c2, f01=0x0190, f02=» $ R < P FMEL '99',GTREGNR TRANSTYPE-NR % < P FMEL 'B999',TTCNTNR TAELLER-NR % H 2 P FMEL 'BZZZZZZZZZZ',GTDUPF(CBIN2) DIVERSE TEXT % P FBT TTKORTFL,B12LAB1 % P FILLR '*',13 % PB12LAB1 % @ P
0x1689a0…168b34 (0, 457) Dummy {f00=0x00c2, f01=0x0190, f02=» P FLINK BSUB10 & P FLINK BSUB11 & P FLINK BSUB13 & 0 P FMEND & F P* & T PBAFST04 FRMT BILAG TRANS 4 & ^ P FLINK BSUB10 & P FLINK BSUB12 & P FLINK BSUB13 & P FMEND & P* & P* & PBAFST40 FRMT & P FMEND & P
0x168b34…168cc8 Dummy {f00=0x00c2, f01=0x018e, f02=»T46 FRMT & P FMEND ' P* ' PBAFST47 FRMT ' ( P FMEND ' < P* ' J PBAFST48 FRMT ' T P FMEND ' h P* ' v PBAFST49 FRMT ' P FMEND ' P* ' PBAFST50 FRMT ' P FMEND ' P* ' PBAFST51 FRMT ' P FMEND ' P* ' PBAFS
0x168cc8…168e5c Dummy {f00=0x00c2, f01=0x0190, f02=» P* ( 8 PBSUB01 FRMT HEADER ( P FILLR '+',2 ( J P FCOPY GTTESTMK ( f > P FCOPY TTCYM CYKLE-MARKERING ( ~ & P FMEL '99.99.99B',GTDATO POST DATO ( > P FMEL '999B',GTMSK
0x168e5c…168ff0 Dummy {f00=0x00c2, f01=0x0190, f02=»MEL '99',GTREGNR TRANSTYPE-NR ( P FMEND ) 6 P* ) L P ) V PBSUB02 FRMT ) ^ B P FMEL 'B999.99.999.99B',GTDUPF(CBIN1) REGKONTONR ) t < P FMEL '*.***.***.**9.99-',GTDUPF(CBIN4) BELOB ) B P FCOPY
0x168ff0…169184 Dummy {f00=0x00c2, f01=0x0190, f02=»RMT ) P FCOPY GTTESTMK * P FCOPY TTCYM * $ @ P FMEL '99.99.99B',GTDATO POSTERINGSDATO * 8 P FCOPY CKMDNAM * | : P FMEL 'B999B',GTMSK MASKINNR * " P FMEL '99B',GTDUPF(CBIN3) BKO * P FMEND *
0x169184…169318 Dummy {f00=0x00c2, f01=0x018e, f02=» FCOPY TTDBKRM DEBET/KREDIT-MARK * P FILLR ' ',1 + B P FMEND + V P* + l P* + v PBSUB06 FRMT + " P FMEL 'B99B',GTDUPF(CBIN3) BKO + P FBT TTKORTFL,B6LAB1 + P FCOPY TT07TXT + P FILLR ' ',1 + . P FMEL
0x169318…1694ac Dummy {f00=0x00c2, f01=0x018e, f02=» + < P FLINK JTSUB06 CPR/CIR-NR , < P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) BELOB , H D P FCOPY TTDBKRM DEBET/KREDIT-MARK , P FILLR ' ',1 , P FLINK SKAF01 LINE NR , P
0x1694ac…169640 Dummy {f00=0x00c2, f01=0x018e, f02=» , l P FMEL '999B',GTMSK MASKINNR - P FLINK FLBNR - , " P FMEL 'BXX.',GTDUPF(CBIN3) BKO - @ P FMEND - f P* - t PBSUB11 FRMT - ~ $ P FMEL 'XX',GTDUPF(CBIN11) P]L]R - 2 P FMEL 'E-9999999999B',GTDUPF(CBIN2) DEBITOR NR - , P FMEL 'XX.XXPP',GTDUPF(C
0x169640…1697d4 (0, 458) Dummy {f00=0x00c2, f01=0x018e, f02=» $ P FMEL 'XX',GTDUPF(CBIN11) REST]R . P FB B12LAB6 . , PB12LAB5 . @ ( P FMEL 'XX',GTDUPF(CBIN10) FORFALDS]R . P PB12LAB6 . | 2 P FMEL 'E-9999999999B',GTDUPF(CBIN2) DEBITORNR . , P FMEL 'XX.XXPP',GTDUPF(CBIN7) VALOERDATO . P FILLR ' ',3 . P F
0x1697d4…169968 Dummy {f00=0x00c2, f01=0x0190, f02=» P FMEND / P* / PFLBNR FRMT EKSP LB. NR. / P FBT GTLOKSPG,FLBNR10 / < P FMEL '****9',TTLBNR / Z P FB FLBNR20 / v PFLBNR10 / P FMEL '****9',GTLBNR / PFLBNR20 / P FMEND / P* / P EJECT / P* / * P* VARIOUS
0x169968…169afc Dummy {f00=0x00c2, f01=0x0190, f02=» C / l ( P VOX11,VOX12,VOX13,VOX14,VOX15, C 0 $ P VOX16,VOX17,VOX18,VOX20,VOX20 0 6 P* 0 ^ P* 0 h PVOFMT02 FRMT TOTAL IN CYCLE 0 r P FLINK VOFMT02L 0 P FMEND 0 P* 0 PVOFMT02L FRMT 0 P FILLR '+',2 0 P FBF TTCY1FLG,VOLAB02 0
0x169afc…169c90 Dummy {f00=0x00c2, f01=0x0190, f02=»TTCYKTOT 0 v P FILLR ' ',2 1 P FMEND 1 $ P* 1 2 PBAXF04 FRMT 1 < P FLINK BAFST03 1 P P FLINK BAXF05L 1 f P FMEND 1 | P* 1 PBAXF05 FRMT 1 P FILLR '+',2 1 P FLINK BAXF05L 1 P FMEND 1 P* 1 PBAXF05L FRMT 1 P FLINK BSU
0x169c90…169e24 Dummy {f00=0x00c2, f01=0x0190, f02=»MEND 1 P* 2 PBAXF06L FRMT 2 P FLINK BAFST03 2 * P FEOR 2 @ P FILLR '0',2 2 N P FEOR 2 b P FILLR '0',2 2 p P FEOR 2 P FLINK KVIT03 2 P FMEND 2 P* 2 PVOSUM07 FRMT SUMBILAG 2 P FLINK VOSUM07L 2 P FMEND 2 P* 2
0x169e24…169fb8 Dummy {f00=0x00c2, f01=0x0190, f02=»***9',GTSUMST 2 P FCOPY ='-' 3 P FLINK FLBNR 3 * P FILLR ' ',1 3 > P FCOPY ='TOTAL ' 3 T & P FMEL '*.***.***.**9,99+',GTSUMCNT 3 n P FILLR ' ',2 3 P FMEND 3 P* 3 PVOX08 FRMT 3 P FLINK VOX08L 3 P FMEND 3 P* 3 PVOX0
0x169fb8…16a14c Dummy {f00=0x00c2, f01=0x0190, f02=»KMDNR 3 P FMEL 'BB****9',TTSTLBNR 4 P FTEXT ' - ' 4 . P FLINK FLBNR 4 B P FILLR ' ',2 4 V P FCOPY GSWSTR9 4 j P FILLR ' ',2 4 P FCOPY GSWSTR20 TEXT 4 P FEOR 4 P FILLR '2',2 4 P FILLR '*',60 4 P FILLR '*',8 4 P FEOR 4
0x16a14c…16a2e0 Dummy {f00=0x00c2, f01=0x0190, f02=»ILLR ' ',12 4 P FCOPY ='DEBET' 5 P FILLR ' ',12 5 , P FCOPY ='KREDIT' 5 B P FMEND 5 Z P* 5 h PVOX09 FRMT 5 r P FLINK VOX09L 5 P FMEND 5 P* 5 PVOX09L FRMT 5 P FILLR '2',2 5 ( P FMEL 'XXXVXXVXXX.XX',GTDUPF(CBIN1) 5 P F
0x16a2e0…16a474 (0, 459) Dummy {f00=0x00c2, f01=0x0190, f02=»CC(GSWBIN5,CBIN2) DEBET 5 n > P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',C12ACC(GSWBIN5,CBIN1) KREDIT 6 P FMEND 6 b P* 6 p PVOX10 FRMT 6 z P FLINK VOX10L 6 P FMEND 6 P* 6 PVOX10L FRMT 6 P FILLR '2',2 6 P FMEL 'ZZ',GTWBCD1 6 0 P FMEL 'BBZZZ
0x16a474…16a608 Dummy {f00=0x00c2, f01=0x0190, f02=»WBIN5,CBIN1) 6 j P FMEND 7 P* 7 " PVOX11 FRMT 7 , P FLINK VOX11L 7 > P FMEND 7 T P* 7 b PVOX11L FRMT 7 l P FILLR '4',2 7 P FTEXT 'TOTAL' 7 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) 7 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTREGF(CBIN2
0x16a608…16a79c Dummy {f00=0x00c2, f01=0x0190, f02=»ZZ.ZZ9.99-',GTDUPF(CBIN5) 7 ~ 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(CBIN8,CBIN2) 8 " 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(CBIN8,CBIN1) 8 Z P FEOR 8 P FILLR '2',2 8 P FTEXT 'KOR' 8 P FILLR ' ',19 8 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(CBIN7,
0x16a79c…16a930 Dummy {f00=0x00c2, f01=0x0190, f02=»MEND 8 P* 9 PVOX12L FRMT 9 P FILLR '4',2 9 * $ P FMEL '999E-99999E-99',TTCASHAC 9 > P FILLR ' ',1 9 f P FTEXT ' PRIMO' 9 z * P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTSTCASH 9 P FILLR ' ',34 9 P FEOR 9 P FILLR '2',2 9 P FTEXT 'BEV ' 9
0x16a930…16aac4 Dummy {f00=0x00c2, f01=0x0190, f02=»9-',GTDUPF(CBIN6) 9 v P FEOR : P FILLR '2',2 : ( P FTEXT 'ULTIMO' : < ( P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTCASH : T P FILLR ' ',34 : P FMEND : P* : PVOX13 FRMT : P FLINK VOX13L : P FMEND : P* : PVOX13L FRMT : P FILLR
0x16aac4…16ac58 Dummy {f00=0x00c2, f01=0x0190, f02=»T[LLERE' : | P FILLR ' ',2 ; P FCOPY GSWSTR20 ; $ P FILLR ' ',3 ; < P FEOR ; P P FILLR '2',2 ; ^ P FILLR '*',56 ; r P FEOR ; P FILLR '4',2 ; P FCOPY ='T[LLER' ; P FILLR ' ',4 ; P FCOPY ='KONTONR' ; P FILLR ' ',10 ; P F
0x16ac58…16adec Dummy {f00=0x00c2, f01=0x018e, f02=» P FLINK VOX14L < P FMEND < P* < ( PVOX14L FRMT < 2 P FILLR '2',2 < F P FMEL 'ZZ',GTWBCD1 < Z P FILLR ' ',4 < t . P FMEL 'XXXVXXVXXX.XX',CBACC(GSWBIN3,CBIN1) < 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',CBACC(GSWBIN3,CBIN2) < 6 P FMEL 'BBZZZ.ZZZ.ZZZ
0x16adec…16af80 Dummy {f00=0x00c2, f01=0x0190, f02=» P* = PVOX16 FRMT = P FILLR ' ',2 = P FLINK VOX16L = 4 P FMEND = J P* = X PVOX16L FRMT = b P FILLR X'24',40 NO. = v P FILLR X'3C',40 5. = P FNL = P FNL = P FILLR X'5D',40 ] = P FILLR X'4E',40 N = P FNL = P FNL
0x16af80…16b114 (0, 460) Dummy {f00=0x00c3, f01=0x018e, f02=» FMEND = P* > PVOX17 FRMT > P FLINK VOX17L > * P FMEND > @ P* > N PVOX17L FRMT > X P FILLR '+',2 > l , P FMEL '99E-99E-99',GTDATO POSTERINGSDATO > P FILLR ' ',6 > P FLINK FLBNR > P FILLR ' ',8 > 2 P FMEL 'B*.***.***.**9E,99',G
0x16b114…16b2a8 Dummy {f00=0x00c3, f01=0x018e, f02=» > P FMEND ? P* ? PVOX18 FRMT ? P FLINK VOX18L ? 2 P FMEND ? H P* ? V PVOX18L FRMT ? ` P FILLR '2',2 ? t P FILLR ' ',17 ? * P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GSWBCD6 ? * P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GSWBCD7 ? P FMEND ? P
0x16b2a8…16b43c Dummy {f00=0x00c3, f01=0x0190, f02=» ? z P FCOPY ='TOTAL' @ P FILLR ' ',59 @ P FEOR @ 6 P FILLR '2',2 @ D PV20L10 @ X ( P FMEL 'XXXE-XXXXXE-XX',GTDUPF(CBIN1) @ f P FILLR ' ',4 @ P FMEL 'XX',GTWBCD1 @ P FBT GTSWFLAG,V20L20 @ 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9,99-',GTDUPF(CBIN4)
0x16b43c…16b5d0 Dummy {f00=0x00c3, f01=0x0190, f02=» FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9,99-',GTDUPF(CBIN6) @ PV20L90 A 4 P FMEND A B P EJECT A P P* A ^ . P* FORMATS FOR EXTRA 'KVITTERING' A h ( P* (MOSTLY AS NORMAL 'BILAG' A P* A : PFTBKV FTABLE BAFST01,BAFST02,KVIT03,KVIT03,BAFST02, C A
0x16b5d0…16b764 Dummy {f00=0x00c3, f01=0x0190, f02=» FRMT A P FILLR '+',2 B P FLINK BSUB04 B " P FLINK BSUB05 B 8 P FMEND B N P* B P EJECT B f P* B | " P* FORMATS FOR KONTOKORT B P* B @ PFTBKT FTABLE KAFST01,KAFST02,KAFST03,KAFST04,KAFST00, C B 2 P KAFST01,KAFS
0x16b764…16b8f8 Dummy {f00=0x00c3, f01=0x0190, f02=» FMEND B P* C P* C < PKAFST01 FRMT TRANS 01-06 C & P FLINK BAFST01 C f P FLINK SKAF01 LINE NR C P FMEND C P* C P* C : PKAFST02 FRMT TRANS 02 C
0x16b8f8…16ba8c Dummy {f00=0x00c3, f01=0x0190, f02=» TRANS 12 C n P FLINK BAFST12 D P FLINK SKAF01 LINE NR D : P FMEND D X P* D n P* D x : PKAFST03 FRMT TRANS 03 D P FLINK KAFST03L D P FMEND D P* D PKAFST03L FRMT D 8 P
0x16ba8c…16bc20 Dummy {f00=0x00c3, f01=0x0190, f02=») VAL.DATE, DD.MM D t PKLAB31 E > P FMEL 'BXX',GTDUPF(CBIN11) PALIGNINGS$R E ( $ P FCOPY TT16TXT RENTE/GEBYR/INDB E j ( P FLINK BSUB07 CPR/CIR/BELOB/LINIENR E P FMEND E P* E P* E : PKAFST04 FRMT
0x16bc20…16bdb4 (0, 461) Dummy {f00=0x00c3, f01=0x0190, f02=» HEADER E l < P FLINK BSUB06 BETART/DATO F P FBF TTKORTFL,KLAB40 F X 2 P FMEL 'XX.XXPP',GTDUPF(CBIN7) VAL DATE, DD.MM F t PKLAB40 F P FBF TTASKAT,KLAB41 F 0 P FMEL 'B**',GTDUPF(CBIN12) REST.MAANED - CIR F . P
0x16bdb4…16bf48 Dummy {f00=0x00c3, f01=0x0190, f02=»R - CPR, BSKAT F n PKLAB42 G F P FLINK BSUB07 CPR/CIR-BELOB-LINIENR G $ P FMEND G n P* G PSKAF01 FRMT G P FBF CKTFLAG,SKAF02 G P FBT GTSLDFLG,SKAF04 G P FILLR ' ',13 G P FB SKAF03 G PSKAF04
0x16bf48…16c0dc Dummy {f00=0x00c3, f01=0x0190, f02=»T G t P FB SKAF05 H PSKAF02 H P FMEL '99B',TTKTLIN H * PSKAF05 H F P FMEND H T P* H b P EJECT H l P* H z . P* VARIOUS FORMATS FOR 'KONTOKORT' H P* H PFTBXKT FTABLE XKTTRP H P* H PXKTTRP FRMT H P FLINK XKTTRPL
0x16c0dc…16c270 Dummy {f00=0x00c3, f01=0x018e, f02=».***.***.**9.99-',TTKTSLD H P FILLR ' ',2 I " P FCOPY ='TRP ' I 6 P FMEND I L P EJECT I Z P* I p $ P* FORMATS FOR TALLY ROLL I z P* I PFTBTA FTABLE FMTFMT I P* I P* I P EJECT I P* I . P* VARIOUS F
0x16c270…16c404 Dummy {f00=0x00c3, f01=0x0190, f02=» I ~ P* J PTAFMT01 FRMT J P FSL J & P FNL J 2 P FNL J > P FILLR '*',1 J J P FILLR ' ',1 J ^ P FMEND J r P* J PTAFMT02 FRMT J P FLINK TAFMT02L J P FMEND J P* J PTAFMT02L FRMT J P FILLR '0',2 J P FCOPY GSWSTR9 J
0x16c404…16c598 Dummy {f00=0x00c3, f01=0x0190, f02=»MEL 'Z.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) J P FCOPY TTDBKRM K . P FMEND K D P* K R PTAFMT05 FRMT K P FILLR '+',2 K p & P FMEL 'Z.ZZZ.ZZZ.ZZ9.99-',GSWBCD6 K P FILLR ' ',1 K P FMEND K P* K PTAFMT07 FRMT K P FNL K P FNL K P F
0x16c598…16c72c Dummy {f00=0x00c3, f01=0x0190, f02=»TFMT, C K ^ 6 P PB45FRM2,PB46FRM2,PB47FRM2,PB48FRM2,PB49FRM2, C L 2 P PB40FRM3,PB41FRM3,PB42FRM3,FMTFMT,FMTFMT, C L J 2 P PB45FRM3,PB46FRM3,PB47FRM3,PB48FRM3,PB49FRM3 L L L PB40FRM2 FRMT L P FLINK BUSUB0 L FLINK BUSUB11 L
0x16c72c…16c8c0 Dummy {f00=0x00c3, f01=0x0190, f02=» M PB41FRM2 FRMT M P FLINK BUSUB0 M " P FLINK BUSUB17 M 8 FMEND M N P M P M d PPB41FRM3 FRMT M l P FLINK BUSUB0 M P FLINK BUSUB22 M P FMEND M M M PB42FRM2 FRMT M P FLINK BUSUB0 M P FLINK BUSUB17 M
0x16c8c0…16ca54 (0, 462) Dummy {f00=0x00c3, f01=0x0190, f02=»FRM2 FRMT M P FLINK BUSUB0 N P FLINK BUSUB15 N ( FLINK BUSUB13 N > FMEND N T P N b P N j PPB45FRM3 FRMT N r P FLINK BUSUB0 N P FILLR ' ',35 N * P FMEL 'BZZZZVZZZVZZZ-',GTREGF(CBIN18) N P FMEND N N N PB46FRM2
0x16ca54…16cbe8 Dummy {f00=0x00c3, f01=0x018e, f02=»,2 N FLINK BUSUB13 O FMEND O P O . P O 6 PPB46FRM3 FRMT O > P FLINK BUSUB0 O T P FILLR ' ',44 O j * P FMEL 'BZZZZVZZZVZZ9-',GTREGF(CBIN18) O P FMEND O O O PB47FRM2 FRMT O P FLINK BUSUB0 O " P FMEL '99',GTREG
0x16cbe8…16cd7c Dummy {f00=0x00c3, f01=0x0190, f02=» P FILLR ' ',24 P * P FMEL 'BZZZZVZZZVZZ9-',GTREGF(CBIN18) P P FMEND P H P V P ^ PB48FRM2 FRMT P f P FLINK BUSUB0 P | P FLINK BUSUB14 P P FLINK BUSUB16 P FMEND P P P P P P P PPB48FRM3 FRMT P P FLINK BUSUB0
0x16cd7c…16cf10 Dummy {f00=0x00c3, f01=0x0190, f02=»USUB0 P P FLINK BUSUB14 Q P FLINK BUSUB16 Q $ FMEND Q : P Q H P Q P PPB49FRM3 FRMT Q X P FLINK BUSUB0 Q n P FILLR ' ',22 Q * P FMEL 'BZZZZVZZZVZZ9-',GTREGF(CBIN18) Q P FMEND Q P Q P Q PBUSUB0 FRMT Q P FMEL '99',GTR
0x16cf10…16d0a4 Dummy {f00=0x00c3, f01=0x0190, f02=»CBIN1) Q n FMEND R R R $ BUSUB12 FRMT R , FILLR '*',1 R @ & P FMEL 'ZZZZZZZZZX-',GTREGF(CBIN3) R T & P FMEL 'ZZZZZZZZZX-',GTREGF(CBIN4) R ~ & P FMEL 'ZZZZZZZZZX-',GTREGF(CBIN5) R & P FMEL 'ZZZZZZZZZX-',GTREGF(CBIN6) R & P FMEL 'ZZZZZ
0x16d0a4…16d238 Dummy {f00=0x00c3, f01=0x0190, f02=»REGF(CBIN10) R z P FEOR S FMEND S " S 0 S 8 BUSUB13 FRMT S @ FILLR '*',1 S T P FILLR ' ',3 S h * P FMEL '999E-99E-999E-99',GTREGF(CBIN1) S | FILLR ' ',3 S * P FMEL 'BZZZZVZZZVZZX-',GTREGF(CBIN17) S P FEOR S FMEND S
0x16d238…16d3cc Dummy {f00=0x00c3, f01=0x0190, f02=»5 FRMT S FLINK BUSUB14 T " P FMEL '99',GTREGF(CBIN14) YEAR T $ FILLR ' ',2 T J FMEND T ^ P T l P T t PBUSUB16 FRMT T | P FILLR '*',1 T P FILLR ' ',3 T P FMEL '9999',GTREGF(CBIN1) T P FILLR ' ',3 T ( P FMEL 'BZZZZVZZZVZZX-',GTR
0x16d3cc…16d560 Dummy {f00=0x00c3, f01=0x0190, f02=»N2) T p P FILLR ' ',1 U FLINK BUSUB12 U P FMEND U 6 P U D P U L PBUSUB22 FRMT U T P FILLR '*',1 U h & P FMEL 'ZZZZZZZZZ9-',GTREGF(CBIN14) U | & P FMEL 'ZZZZZZZZZ9-',GTREGF(CBIN15) U & P FMEL 'ZZZZZZZZZ9-',GTREGF(CBIN16) U & P FMEL 'ZZZZZZZ
0x16d560…16d6f4 (0, 463) Dummy {f00=0x00c3, f01=0x018e, f02=»GF(CBIN20) U x & P FMEL 'ZZZZZZZZZ9-',GTREGF(CBIN21) V P FEOR V < P FMEND V J P V X P V ` PFRMBPR FRMT V h P FILLR '+',2 V | P FCOPY GSWSTR20 V P FILLR ' ',5 V P FMEL 'XXVXXVXX',CMASKDAT V P FNL V P FNL V P FNL V P FMEND
0x16d6f4…16d888 Dummy {f00=0x00c3, f01=0x40b2, f02=» V P EJECT W P* W 2 P* VARIOUS FORMATS FOR GENERAL PRINTER W P* W V PFTBXGP FTABLE FMTFMT W ` P* W | P* W P* W P END W @ W ,5 V P FMEL 'XXVXXVXX',CMASKDAT V P FNL V P FNL V P FNL V P FMEND
0x16d888…16da1c Dummy {f00=0x00c3, f01=0x2008, f02=» X P* CAN NOT BE IDENTIFIED BY TRANSTYPE (OR GTREGDEX) ' P* ' L PFTBXX FTABLE ' V P* ' n P* ' x P END ' @ ' & z P* & PFTBTA FTABLE & P* & P* & P EJECT & P* & ( P* FORMATS
0x16da1c…16dbb0 Dummy {f00=0x00c3, f01=0x0190, f02=»
[…0x1…]
0x16dd44…16ded8 Dummy {f00=0x00c3, f01=0x0190, f02=» w > M e m 1
0x16ded8…16e06c Dummy {f00=0x00c3, f01=0x0190, f02=»
[…0x1…]
0x16e200…16e394 (0, 464) Opaque[0x194]
0x16e394…16e528 # DirEnt {nam=»DIV525«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1880, f03=0x0000}
0x16e394…16e528 IdxSect {
0x16e394…16e528 f00 = 0x00c4 // 0x16e394 @0x0
0x16e394…16e528 f01 = 0x0014 // 0x16e396 @0x2
0x16e394…16e528 gno = [ // 0x16e398 @0x4
0x16e394…16e528 [0x00]: C0x00c4.0x0.0
0x16e394…16e528 [0x01]: C0x00c4.0x1.0
0x16e394…16e528 [0x02]: C0x00c4.0x2.0
0x16e394…16e528 [0x03]: C0x00c4.0x3.0
0x16e394…16e528 [0x04]: C0x00c5.0x0.0
0x16e394…16e528 [0x05]: C0x00c5.0x1.0
0x16e394…16e528 [0x06]: C0x00c5.0x2.0
0x16e394…16e528 [0x07]: C0x00c5.0x3.0
0x16e394…16e528 [0x08]: C0x00c6.0x0.0
0x16e394…16e528 [0x09]: C0x00c6.0x1.0
0x16e394…16e528 ]
0x16e394…16e528 }
0x16e528…16e6bc Dummy {f00=0x00c4, f01=0x0190, f02=» P IDENT DIV525 03.01.XXX.1 P DDUM KMD08 & P PDIV D P ENTRY FRMTJT Z P ENTRY FRMXJT p P ENTRY FRMTTA P ENTRY FRMXTA P ENTRY FRMTVO P ENTRY FRMTKV P ENTRY FRMXVO P ENTRY FRMTKT
0x16e6bc…16e850 Dummy {f00=0x00c4, f01=0x0190, f02=» PROC 0 P CALL FMOVE,GTSTRFMT,FTBJT(GTREGDEX) P RET B P PEND V P* l PFRMXJT PROC XJTDEX v ( P CALL FMOVE,GTSTRFMT,FTBXJT(XJTDEX) P RET P PEND P* PFRMTTA PROC 0 P CALL FMOV
0x16e850…16e9e4 Dummy {f00=0x00c4, f01=0x0190, f02=»XTA(XTADEX) x P RET P PEND P* . PFRMTVO PROC 8 0 P CALL FMOVE,GTSTRFMT,FTBVO(GTREGDEX) L P RET P PEND P* PFRMXVO PROC XVODEX ( P CALL FMOVE,GTSTRFMT,FTBXVO(XVODEX) P RET P P
0x16e9e4…16eb78 Dummy {f00=0x00c4, f01=0x018e, f02=» 0 P CALL FMOVE,GTSTRFMT,FTBKT(GTREGDEX) P RET < P PEND P P* f PFRMXKT PROC XKTDEX p ( P CALL FMOVE,GTSTRFMT,FTBXKT(XKTDEX) P RET P PEND P* PFRMTGP PROC ( P CALL FMOVE,GTSTRFMT,FTB
0x16eb78…16ed0c Dummy {f00=0x00c4, f01=0x0190, f02=» j P RET P PEND P* " P* , P* 6 P EJECT @ P* V P* FORMATS FOR JOURNAL ` P* @ PFTBJT FTABLE JTFMT01,JTFMT02,JTFMT03,JTFMT04,JTFMT02, C 2 P JTFMT01,JTFMT02,JTFMT08,JTFMT08,JTFMT02, C P
0x16ed0c…16eea0 Dummy {f00=0x00c4, f01=0x0190, f02=» LINE 1 z P FEOR 2 P FLINK JTSUB04 LINE 2 6 P FMEND l P* PJTFMT02 FRMT P FLINK JTFMT02L P FMEND P* PJTFMT02L FRMT 2 P FLINK JTSUBST
0x16eea0…16f034 (0, 465) Dummy {f00=0x00c4, f01=0x0190, f02=» FEOR P FILLR ' ',8 F P FMEL 'X',GTDUPF(CBIN6) RE$ 2 P FILLR ' ',2 | P FLINK JTSUB06 FOR TRANS 10 P FLINK JTSUB30 ARKIV KNT.NR P FILLR ' ',15 P FMEND
0x16f034…16f1c8 Dummy {f00=0x00c4, f01=0x0190, f02=» START INF p P FILLR ' ',13 $ P FCOPY TT16TXT RATE/RENTE/GEBYR 6 2 P FLINK JTSUB06 CPR/CIR ^ 0 P FLINK JTSUB08 VALUE P FEOR P FILLR ' ',2 P FILLR
0x16f1c8…16f35c Dummy {f00=0x00c4, f01=0x0190, f02=»Z.ZZ',GTDUPF(CBIN7) VALGR | F P FMEL 'BBZ',GTDUPF(CBIN8) BETALINGSFORM BFO 8 8 P FLINK JTSUB30 ARK KONTO NR P FILLR ' ',2 8 P FMEL 'XX',GTDUPF(CBIN11) PALIGN
0x16f35c…16f4f0 Dummy {f00=0x00c4, f01=0x018e, f02=»MEND P* PJTFMT04 FRMT P FLINK JTFMT04L * P FMEND B P* P PJTFMT04L FRMT Z P FLINK JTSUBST START INF p P FILLR ' ',16 2 P FLINK JTSUB06 CPR/CIR 0 P FLINK JTSUB08
0x16f4f0…16f684 Dummy {f00=0x00c4, f01=0x0190, f02=» D P FMEL 'ZZ.ZZ.ZZ',GTDUPF(CBIN7) VALOR P FILLR ' ',3 P 6 P FLINK JTSUB30 ARK KNT NR l B P FMEL 'BBBZZ',GTDUPF(CBIN10) F$R F P FMEL 'BBZZ',GTDUPF
0x16f684…16f818 Dummy {f00=0x00c4, f01=0x0190, f02=»ZB',GTDUPF(CBIN13) OPK ~ P FMEND 4 P* J PJTFMT08 FRMT T P FLINK JTFMT08L h P FMEND P* PJTFMT08L FRMT 4 P FLINK JTSUBST START INF 2 P FLINK JTSUB01
0x16f818…16f9ac Dummy {f00=0x00c4, f01=0x018e, f02=»UB31 LINE 3 ~ P FMEND $ P* : PJTFMT12 FRMT D P FLINK JTFMT12L X P FMEND p P* ~ PJTFMT12L FRMT 4 P FLINK JTSUBST START INF 8 P FLINK JTSUB05 REG KONTO N
0x16f9ac…16fb40 Dummy {f00=0x00c4, f01=0x0190, f02=» 0 P FLINK JTSUB08 VALUE P FEOR 8 P FILLR ' ',2 F 2 P FMEL 'BZZZZZZZZZZ',GTDUPF(CBIN2) DIVERSE TEXT Z P FILLR ' ',16 P FMEND P* 4 PJTSUBST FRMT START INF P FILLR ' '
0x16fb40…16fcd4 (0, 466) Dummy {f00=0x00c4, f01=0x0190, f02=»TRANS, TYPE h P FLINK FLBNR P FMEND ( P* > : PJTSUB01 FRMT LINE 1,- 1,5,6 H P FILLR ' ',1 P FLINK JTSUB05 CPR/CIR P FLINK JTSUB06 REG-KONTO-NR 0 P FLINK JTSUB08 VALUE
0x16fcd4…16fe68 Dummy {f00=0x00c4, f01=0x0190, f02=»CBIN3) BKO ~ * P FMEL 'BZZ.ZZ.ZZ',GTDUPF(CBIN7) V.DATO B P FMEL 'BBX',GTDUPF(CBIN6) RE$ @ D P FMEL 'BBX',GTDUPF(CBIN8) BFO P FLINK JTSUB30 0 P FMEL 'XXXXXXE-XXXX',GTDUPF(
0x16fe68…16fffc Dummy {f00=0x00c4, f01=0x0190, f02=» REG KNT NR l 6 P FMEL 'B999E-999E-99E-99B',GTDUPF(CBIN1) P FMEND P P* f 2 PJTSUB06 FRMT CPR/CIR p P FBT BCPR,JTLAB06 ( P FMEL 'BBBX.XX.XX.XX',GTDUPF(CBIN2) P FB JTLAB08
0x16fffc…170190 Dummy {f00=0x00c4, f01=0x0190, f02=».XX.XX.XX',GTDUPF(CBIN2) PJTLAB08 P FMEND 0 P* F P* P 8 PJTSUB08 FRMT VALUE AND D/K Z 6 P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) P FCOPY TTDBKRM P FMEND P*
0x170190…170324 Dummy {f00=0x00c4, f01=0x0190, f02=» ARK KNT NR v 6 P FMEL 'BBZZZE-ZZZE-ZZE-ZZ',GTDUPF(CBIN9) P FMEND Z P* h 6 PJTSUB31 FRMT LINE 3 - 8 r P FILLR ' ',2 F P FMEL 'ZZ.ZZ.ZZ',GTDUPF(CBIN12) FAKT DA
0x170324…1704b8 Dummy {f00=0x00c4, f01=0x018e, f02=» LEV NR Z D P FMEL 'BZZZZ',GTDUPF(CBIN15) TXT NR D P FMEL 'BZZ',GTDUPF(CBIN16) OMR NR Z D P FMEL 'BZZ.ZZ.ZZ',GTDUPF(CBIN18) PER FRA D P FMEL 'BZZ.ZZ.ZZ',GTD
0x1704b8…17064c Dummy {f00=0x00c4, f01=0x0190, f02=» P* P EJECT P* 0 P* VARIOUS FORMATS FOR JOURNAL TAPE & P* Z @ PFTBXJT FTABLE XJTF01,XJTF02,XJTF03,XJTF04,XJTF05,XJTF06, C d 2 P XJTF07,FMTFMT,XJTF09,XJTF10,XJTF11,VOX15, C P XJTF13,XJTF14,VOFMT02 P* P
0x17064c…1707e0 Dummy {f00=0x00c4, f01=0x0190, f02=»TOKORT P FILLR ' ',2 P FLINK XJTF02L " P FMEND 8 P* F PXJTF02L FRMT P P FLINK FLBNR d P FILLR ' ',2 x P FCOPY ='KONTOKORT' P FBF GTSLDFLG,XJTF02EX & P FMEL 'B*.***.***.**9.99-',TTKTSLD PXJTF02EX P FMEND
0x1707e0…170974 (0, 467) Dummy {f00=0x00c4, f01=0x018e, f02=»OSUM07 P FCOPY =' SUM' P FMEND $ PXJTF05 FRMT 2 P FLINK XJTF05L F P FMEND P* j P* t PXJTF05L FRMT ~ P FILLR ' ',2 P FILLR '*',50 P FEOR P FILLR ' ',2 P FTEXT 'VERSNR ' P FCOPY ='DAGS-
0x170974…170b08 Dummy {f00=0x00c4, f01=0x0190, f02=» P FEOR P FILLR ' ',2 P FCOPY GTTESTMK & P FMEL '99.99.999.9',CVERSNR > P FILLR ' ',2 b P FMEL '99E-99E-99',CMASKDAT v P FILLR ' ',3 P FMEL '99E-99E-99',GTDATO P FILLR ' ',3 P FMEL '999',GTMSK P FILLR ' '
0x170b08…170c9c Dummy {f00=0x00c4, f01=0x0190, f02=»RIMO KASSE ' f P FEOR P FILLR ' ',2 " & P FMEL '999E-999E-99.99BB',TVERSUR 6 & P FMEL '999E-999E-99.99BB',TTCASHAC ` $ P FMEL 'ZZZ.ZZZ.ZZ9.ZZ-',TTSTCASH P FEOR P FILLR ' ',2 P FILLR '*',40 P FMEND P* PXJTF06
0x170c9c…170e30 Dummy {f00=0x00c4, f01=0x0190, f02=» FILLR ' ',2 P FCOPY ='KASSELUKNING' P FILLR ' ',30 2 P FEOR H P FILLR ' ',2 V P FCOPY ='T[LLER' j P FILLR ' ',10 P FCOPY ='DEBET' P FILLR ' ',12 P FCOPY ='KREDIT' P FMEND P* PXJTF07 FRMT
0x170e30…170fc4 Dummy {f00=0x00c4, f01=0x0190, f02=»Z9.99-',TTACC(GSWBIN5,CBIN2) z 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(GSWBIN5,CBIN1) $ P FMEND ^ P* l PXJTF09 FRMT v P FCOPY =' START TEST' P FMEND P* PXJTF10 FRMT P FCOPY =' SLUT TEST' P FMEND P*
0x170fc4…171158 Dummy {f00=0x00c4, f01=0x0190, f02=» P FLINK XJTF13L P FMEND P* ( PXJTF13L FRMT 2 P FLINK JTSUB05 REG KNT NO F * P FMEL 'BZZZ',GTDUPF(CBIN2) COUNTER NO h 2 P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) VALUE P FILLR ' ',2 P FCOPY ='ADM ' $ P FMEL 'BZZ',GTDU
0x171158…1712ec Dummy {f00=0x00c4, f01=0x0190, f02=»'99',GTWBCD1 P FMEND P* " PFMTFMT FRMT , P FLINK FMTFMTL @ P FMEND V P* d PFMTFMTL FRMT n P FILLR ' ',2 P FTEXT 'DIVERSE FORMATER' P FMEND P EJECT P* : P* FORMATS FOR VOUCHER
0x1712ec…171480 Dummy {f00=0x00c4, f01=0x0190, f02=»T08,BAFST01, C r 2 P BAFST12,BAFST40,BAFST41,BAFST42,BAFST45, C 2 P BAFST46,BAFST47,BAFST48,BAFST49,BAFST50, C N & P BAFST51,BAFST52,BAFST53,BAFST54 P* P* PBAFST01 FRMT TRANS 01-10 P FLINK BAFST01L P FMEND
0x171480…171614 (0, 468) Dummy {f00=0x00c5, f01=0x0190, f02=» P FB B1LAB2 PB1LAB1 P FILLR ' ',4 ( PB1LAB2 < < P FLINK JTSUB06 CPR-CIR-NR J @ P FLINK BSUB02 REGKONTO-BELOB P FMEND P* P* @ PBAFST02 FRMT
0x171614…1717a8 Dummy {f00=0x00c5, f01=0x018e, f02=» BSUB01 HEADER P FILLR ' ',14 . P FBT TTKORTFL,B2LAB1 D P FILLR ' ',13 ` PB2LAB1 v @ P FLINK BSUB02 REGKONTO-BELOB P FMEND P* PBAFST06 FRMT TRANS 6 P F
0x1717a8…17193c Dummy {f00=0x00c5, f01=0x0190, f02=» PB6LB02 P FLINK JTSUB06 P FBT TTKORTFL,B6LAB1 ( P FILLR ' ',7 D 2 P FMEL 'XX.XX.XX.XXXX',GTDUPF(CBIN10) YD.MODT. X PB6LAB1 P FLINK BSUB02 P FMEND P* < PBAFST08 FRMT TRANS 08-09
0x17193c…171ad0 Dummy {f00=0x00c5, f01=0x0190, f02=» TTKORTFL,B8LB1 P FILLR ' ',4 ! P FB B8LAB5 ! , PB8LB1 ! > ( P FMEL 'PPPX.XX.XX.XX',GTDUPF(CBIN2) ! L P FBZ GTUSED(CBIN13),B8LAB1 ! x , P FMEL 'BZZZZZZZZB',GTDUPF(CBIN13) FAKTNR ! P FB B8LAB5 ! PB8LAB1 ! P FILLR ' ',10 ! PB8LAB5 !
0x171ad0…171c64 Dummy {f00=0x00c5, f01=0x0190, f02=»MEND ! P* " P* " PBAFST12 FRMT TRANS 12 " P FLINK BAFST12L " > P FMEND " V P* " d PBAFST12L FRMT " n P FILLR '+',2 " P FCOPY GTTESTMK " > P FCOPY TTCYM CYKLE-MARKERING " > P FMEL
0x171c64…171df8 Dummy {f00=0x00c5, f01=0x0190, f02=» B P FCOPY TTSUPMRK SUPPLEMENTS-MARK # < P FMEL '99',GTREGNR TRANSTYPE-NR # J < P FMEL 'B999',TTCNTNR TAELLER-NR # 6 P FMEL 'BXX.XX.XX.XXXX',GTDUPF(CBIN2) DIVERSE TEXT # P FBT
0x171df8…171f8c Dummy {f00=0x00c5, f01=0x0190, f02=» FMEND # P* $ P* $ PBAFST03 FRMT BILAG TRANS 3 $ & P FLINK BSUB10 $ J P FLINK BSUB11 $ ` P FLINK BSUB13 $ v P FMEND $ P* $ PBAFST04 FRMT BILAG TRANS 4 $ P FLINK BSUB10 $ P FLINK BSUB12 $ P FLINK BSUB13 $
0x171f8c…172120 Dummy {f00=0x00c5, f01=0x0190, f02=»MEND $ P* % PBAFST45 FRMT % P FMEND % * P* % 8 PBAFST46 FRMT % B P FMEND % V P* % d PBAFST47 FRMT % n P FMEND % P* % PBAFST48 FRMT % P FMEND % P* % PBAFST49 FRMT % P FMEND % P* % PBAFST50 FRMT % P F
0x172120…1722b4 (0, 469) Dummy {f00=0x00c5, f01=0x0190, f02=» % P* & PBAFST54 FRMT & P FMEND & & P* & 4 P* & > P* & H 8 PBSUB01 FRMT HEADER & R P FILLR '+',2 & P FCOPY GTTESTMK & > P FCOPY TTCYM CYKLE-MARKERING & > P
0x1722b4…172448 Dummy {f00=0x00c5, f01=0x0190, f02=»SDATO & Z B P FCOPY TTSUPMRK SUPPLEMENTS-MARK ' < P FMEL '99',GTREGNR TRANSTYPE-NR ' T P FILLR ' ',1 ' P FMEND ' P* ' P ' PBSUB02 FRMT ' B P FMEL 'B999.999.99.99B',G
0x172448…1725dc Dummy {f00=0x00c5, f01=0x018e, f02=» DEBET/KREDIT-MARK ' l P FILLR ' ',1 ( " P FMEND ( > P* ( T P* ( ^ PBSUB04 FRMT ( h P FCOPY GTTESTMK ( ~ P FCOPY TTCYM ( @ P FMEL '99.99.99B',GTDATO POSTERINGSDATO ( P FCOPY CKMDNAM ( : P
0x1725dc…172770 Dummy {f00=0x00c5, f01=0x0190, f02=» PBSUB05 FRMT ) P FLINK FLBNR ) > P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) BELOB ) . B P FCOPY TTDBKRM DEBET/KREDIT-MARK ) p P FILLR ' ',1 ) P FMEND ) P* ) P* ) PBSUB06 FRMT ) "
0x172770…172904 Dummy {f00=0x00c5, f01=0x0190, f02=»BIN7) VAL. DATO ) v PB6LS1 * P FMEND * & P* * < P* * F PBSUB07 FRMT * P P FILLR ' ',1 * f < P FLINK JTSUB06 CPR/CIR-NR * z < P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) BELOB * D P FCOPY
0x172904…172a98 Dummy {f00=0x00c5, f01=0x0190, f02=» PBSUB10 FRMT + P FILLR '+',2 + P FCOPY GTTESTMK TEST MARK + , P FMEL '999B',GTMSK MASKINNR + N P FLINK FLBNR + r & P FMEL 'B99.99.99',GTDATO POSTDATO + P FMEL 'B99.',GTREGNR + " P FMEL 'XX.',GTDUPF(CBIN3) BKO + P FMEND + P* +
0x172a98…172c2c Dummy {f00=0x00c5, f01=0x0190, f02=»MEL 'BXB',GTDUPF(CBIN12) RTE/GEB + P FMEND , ( P* , 6 PBSUB12 FRMT , @ P FBF TTASKAT,B12LAB5 , T $ P FMEL 'XB',GTDUPF(CBIN11) REST]R , p P FB B12LAB6 , PB12LAB5 , * P FMEL 'PXB',GTDUPF(CBIN10) FORFALDS]R , PB12LAB6 , P FLINK JTSUB06
0x172c2c…172dc0 Dummy {f00=0x00c5, f01=0x0190, f02=»B13LB01 , P FILLR ' ',3 - PB13LB01 - $ 2 P FMEL '*.***.***.**9.99-',GTDUPF(CBIN4) VALUE - 4 P FCOPY TTDBKRM - j P FILLR ' ',1 - P FMEND - P* - PFLBNR FRMT EKSP LB. NR. - P FBT GTLOKSPG,FLBNR10 - P FMEL '****9',TTLBNR - P F
0x172dc0…172f54 (0, 470) Dummy {f00=0x00c5, f01=0x018e, f02=» VARIOUS FORMATS FOR VOUCHER - P* . $ : PFTBXVO FTABLE FMTFMT,VOFMT02,VOFMT02,BAXF04,BAXF05, C . . * P BAXF06,VOSUM07,VOX08,VOX09,VOX10, C . l ( P VOX11,VOX12,VOX13,VOX14,VOX15, C . P VOX16,VOX17,VOX18 . P* . P* . PVOFMT02 FRMT TOTA
0x172f54…1730e8 Dummy {f00=0x00c5, f01=0x0190, f02=» P FCOPY ='ARKIV' / P FLINK JTSUB30 / PVOLAB02 / 2 P FILLR ' ',4 / B P FCOPY GSWSTR9 / V & P FMEL '*.***.***.**9.99+',TTCYKTOT / l P FILLR ' ',2 / P FMEND / P* / PBAXF04 FRMT / P FLINK BAFST03 / P FLINK BAXF05L / P FMEND
0x1730e8…17327c Dummy {f00=0x00c5, f01=0x0190, f02=»4 / P FEOR 0 P FILLR '0',2 0 P FLINK BSUB05 0 , P FMEND 0 B P* 0 P PBAXF06 FRMT 0 Z P FLINK BAXF06L 0 n P FMEND 0 P* 0 PBAXF06L FRMT 0 P FLINK BAFST03 0 P FEOR 0 P FILLR '0',2 0 P FEOR 0 P FILLR '0',2 0
0x17327c…173410 Dummy {f00=0x00c5, f01=0x0190, f02=» PVOSUM07L FRMT 1 P FILLR '+',2 1 P FMEL '999B',GTMSK MASKINNR 1 . ( P FMEL 'B99.99.99B',GTDATO EKSP.LB.NR 1 R P FMEL '****9',GTSUMST 1 ~ P FCOPY ='-' 1 P FLINK FLBNR 1 P FILLR ' ',1 1 P FCOPY ='TOTAL ' 1 & P FMEL '*.***.***.**9
0x173410…1735a4 Dummy {f00=0x00c5, f01=0x0190, f02=» FRMT 1 P FILLR '+',2 2 P FCOPY GTTESTMK 2 " P FMEL '999',GTMSK 2 : P FMEL 'BB99.99.99',GTDATO 2 T P FMEL 'BBZ999',CKMDNR 2 v P FMEL 'BB****9',TTSTLBNR 2 P FTEXT ' - ' 2 P FLINK FLBNR 2 P FILLR ' ',2 2 P FCOPY GSWSTR9 2 P F
0x1735a4…173738 Dummy {f00=0x00c5, f01=0x0190, f02=» FILLR '4',2 2 P FCOPY ='KONTONR' 3 P FILLR ' ',6 3 . P FCOPY ='T[LLER' 3 B P FILLR ' ',9 3 Z P FTEXT 'NETTO' 3 n P FILLR ' ',12 3 P FCOPY ='DEBET' 3 P FILLR ' ',12 3 P FCOPY ='KREDIT' 3 P FMEND 3 P* 3 PVOX09 FRMT 3
0x173738…1738cc Dummy {f00=0x00c5, f01=0x0190, f02=»ILLR ' ',4 3 P FMEL '99',GTWBCD1 4 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) NETTO 4 , > P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',C12ACC(GSWBIN5,CBIN2) DEBET 4 f > P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',C12ACC(GSWBIN5,CBIN1) KREDIT 4 P FMEND 4 P* 4 PVOX10
0x1738cc…173a60 Dummy {f00=0x00c5, f01=0x0190, f02=».ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) 4 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(GSWBIN5,CBIN2) 5 ( 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(GSWBIN5,CBIN1) 5 b P FMEND 5 P* 5 PVOX11 FRMT 5 P FLINK VOX11L 5 P FMEND 5 P* 5 PVOX11L FRMT 5 P
0x173a60…173bf4 (0, 471) Dummy {f00=0x00c5, f01=0x0190, f02=») 5 f 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTREGF(CBIN1) 6 P FEOR 6 > P FILLR '4',2 6 L P FTEXT 'SUPL ' 6 ` 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN5) 6 v 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(CBIN8,CBIN2) 6 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(CB
0x173bf4…173d88 Dummy {f00=0x00c5, f01=0x018e, f02=»CBIN2) 6 f 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(CBIN7,CBIN1) 7 P FMEND 7 F P* 7 T PVOX12 FRMT 7 ^ P FLINK VOX12L 7 p P FMEND 7 P* 7 PVOX12L FRMT 7 P FILLR '4',2 7 $ P FMEL '999E-999E-99.99',TTCASHAC 7 P FILLR ' ',1 7 P FTEXT
0x173d88…173f1c Dummy {f00=0x00c5, f01=0x0190, f02=» 7 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) 8 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN5) 8 < 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN6) 8 p P FEOR 8 P FILLR '2',2 8 P FTEXT 'ULTIMO' 8 ( P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTCASH 8
0x173f1c…1740b0 Dummy {f00=0x00c5, f01=0x0190, f02=»LR ' ',2 8 P FCOPY GTTESTMK 9 P FMEL '999B',GTMSK 9 ( P FMEL 'B99.99.99',GTDATO 9 B P FILLR ' ',2 9 b P FCOPY ='BEHOLDNINGST[LLERE' 9 v P FILLR ' ',2 9 P FCOPY GSWSTR20 9 P FILLR ' ',3 9 P FEOR 9 P FILLR '2',2 9 P FILLR '*',5
0x1740b0…174244 Dummy {f00=0x00c5, f01=0x0190, f02=» FCOPY ='BEV.PERIODE' 9 P FILLR ' ',12 : P FCOPY ='SALDO' : 4 P FILLR ' ',1 : L P FMEND : d P* : r PVOX14 FRMT : | P FLINK VOX14L : P FMEND : P* : PVOX14L FRMT : P FILLR '2',2 : P FMEL 'ZZ',GTWBCD1 : P FILLR ' '
0x174244…1743d8 Dummy {f00=0x00c5, f01=0x0190, f02=».ZZZ.ZZ9.99-',CBACC(GSWBIN3,CBIN3) : P FMEND ; * P* ; 8 PVOX15 FRMT ; B P FILLR '2',2 ; T P FCOPY GSWSTR20 ; h P FMEND ; P* ; PVOX16 FRMT ; P FILLR ' ',2 ; P FLINK VOX16L ; P FMEND ; P* ; PVOX16L FRMT ; P FILLR X
0x1743d8…17456c Dummy {f00=0x00c5, f01=0x0190, f02=»NL ; P FILLR X'45',40 E < P FILLR X'53',40 S < $ P FNL < > P FNL < J P FILLR X'5B',40 [ < V P FILLR X'5C',40 OE < p P FMEND < P* < PVOX17 FRMT < P FLINK VOX17L < P FMEND < P* < PVOX17L FRMT < P FILLR '+',2 < ,
0x17456c…174700 Dummy {f00=0x00c5, f01=0x0190, f02=»,GTDUPF(CBIN4) BELOB < v P FILLR '*',2 = P FILLR ' ',3 = 0 4 P FMEL 'ZZ999999',GTDUPF(CBIN2) CHECKNR(DIV.TXT) = D P FILLR ' ',8 = | P FMEND = P* = PVOX18 FRMT = P FLINK VOX18L = P FMEND = P* = PVOX18L FRMT = P FILLR '2',2
0x174700…174894 (0, 472) Dummy {f00=0x00c6, f01=0x0190, f02=»* = P EJECT > P* > . P* FORMATS FOR EXTRA 'KVITTERING' > " ( P* (MOSTLY AS NORMAL 'BILAG' > T P* > : PFTBKV FTABLE BAFST01,BAFST02,KVIT03,KVIT03,BAFST02, C > 2 P BAFST06,BAFST02,BAFST08,BAFST08,BAFST01, C > P BAFST12
0x174894…174a28 Dummy {f00=0x00c6, f01=0x0190, f02=» EJECT > P* ? " P* FORMATS FOR KONTOKORT ? P* ? F @ PFTBKT FTABLE KAFST01,KAFST02,KAFST03,KAFST04,KAFST00, C ? P 2 P KAFST06,KAFST00,KAFST01,KAFST09,KAFST01, C ? P KAFST12 ? P* ? P* ? PKAFST00 F
0x174a28…174bbc Dummy {f00=0x00c6, f01=0x0190, f02=»ST01 ? ~ P FLINK SKAF01 LINE NR @ P FMEND @ * P* @ @ P* @ J : PKAFST02 FRMT TRANS 02 @ T P FLINK BAFST02 @ P FLINK SKAF01 LINE NR @ P FMEND @ P* @ PKAFST06 FRMT TRANS 6 @
0x174bbc…174d50 Dummy {f00=0x00c6, f01=0x0190, f02=»1 @ P FMEND A P* A P A " : PKAFST12 FRMT TRANS 12 A * P FLINK BAFST12 A h P FLINK SKAF01 LINE NR A P FMEND A P* A P* A : PKAFST03 FRMT TRANS 03 A
0x174d50…174ee4 Dummy {f00=0x00c6, f01=0x0190, f02=»RANS 04 A b P FLINK BAFST04 B P FLINK SKAF01 B & P FMEND B < P* B R PSKAF01 FRMT B P FBF CKTFLAG,SKAF02 B p P FBT GTSLDFLG,SKAF04 B P FILLR ' ',13 B P FB SKAF03 B PSKAF04 B , P FMEL '*.***.***.**9.99-',TTKTSLD SALDO B
0x174ee4…175078 Dummy {f00=0x00c6, f01=0x0190, f02=»9B',TTKTLIN B PSKAF05 C P FMEND C " P* C 0 P EJECT C : P* C H . P* VARIOUS FORMATS FOR 'KONTOKORT' C R P* C PFTBXKT FTABLE XKTTRP C P* C PXKTTRP FRMT C P FLINK XKTTRPL C P FMEND C P* C PXKTTRPL FRMT C
0x175078…17520c Dummy {f00=0x00c6, f01=0x0190, f02=» P FCOPY ='TRP ' D P FMEND D P EJECT D ( P* D > $ P* FORMATS FOR TALLY ROLL D H P* D p PFTBTA FTABLE FMTFMT D z P* D P* D P EJECT D P* D . P* VARIOUS FORMATS FOR TALLY ROLL D P* D P* D @ P
0x17520c…1753a0 Dummy {f00=0x00c6, f01=0x0190, f02=»NL D P FNL E P FILLR '*',1 E P FILLR ' ',1 E * P FMEND E > P* E L PTAFMT02 FRMT E V P FLINK TAFMT02L E j P FMEND E P* E PTAFMT02L FRMT E P FILLR '0',2 E P FCOPY GSWSTR9 E & P FMEL '*.***.***.**9.99+B',GSWBCD6 E P FLI
0x1753a0…175534 (0, 473) Dummy {f00=0x00c6, f01=0x0190, f02=» TTDBKRM E P FMEND F P* F PTAFMT05 FRMT F ( P FILLR '+',2 F < & P FMEL 'Z.ZZZ.ZZZ.ZZ9.99-',GSWBCD6 F P P FILLR ' ',1 F z P FMEND F P* F PTAFMT07 FRMT F P FNL F P FNL F P FNL F P FNL F P FNL F P FNL F P FNL F
0x175534…1756c8 Dummy {f00=0x00c6, f01=0x40bc, f02=» F P* G P EJECT G P* G 2 P* VARIOUS FORMATS FOR GENERAL PRINTER G * P* G ` PFTBXGP FTABLE FMTFMT G j P* G P* G P* G P END G @ G NL F P FNL F P FNL F P FNL F P FNL F P FNL F P FNL F
0x1756c8…17585c Dummy {f00=0x00c6, f01=0x2008, f02=» H P* CAN NOT BE IDENTIFIED BY TRANSTYPE (OR GTREGDEX) ' P* ' L PFTBXX FTABLE ' V P* ' n P* ' x P END ' @ ' & z P* & PFTBTA FTABLE & P* & P* & P EJECT & P* & ( P* FORMATS
0x17585c…1759f0 Dummy {f00=0x00c6, f01=0x0000, f02=»
[…0x4…]
0x176040…1761d4 (0, 474) Opaque[0x194]
0x1761d4…176368 # DirEnt {nam=»DIV743«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x18d0, f03=0x0000}
0x1761d4…176368 IdxSect {
0x1761d4…176368 f00 = 0x00c6 // 0x1761d4 @0x0
0x1761d4…176368 f01 = 0x0014 // 0x1761d6 @0x2
0x1761d4…176368 gno = [ // 0x1761d8 @0x4
0x1761d4…176368 [0x00]: C0x00c6.0x2.0
0x1761d4…176368 [0x01]: C0x00c6.0x3.0
0x1761d4…176368 [0x02]: C0x00c7.0x0.0
0x1761d4…176368 [0x03]: C0x00c7.0x1.0
0x1761d4…176368 [0x04]: C0x00c7.0x2.0
0x1761d4…176368 [0x05]: C0x00c7.0x3.0
0x1761d4…176368 [0x06]: C0x00c8.0x0.0
0x1761d4…176368 [0x07]: C0x00c8.0x1.0
0x1761d4…176368 [0x08]: C0x00c8.0x2.0
0x1761d4…176368 [0x09]: C0x00c8.0x3.0
0x1761d4…176368 ]
0x1761d4…176368 }
0x176368…1764fc Dummy {f00=0x00c6, f01=0x0190, f02=» P IDENT DIV743 03.01.XXX.1 P DDUM KMD08 & P PDIV D P ENTRY FRMTJT Z P ENTRY FRMXJT p P ENTRY FRMTTA P ENTRY FRMXTA P ENTRY FRMTVO P ENTRY FRMTKV P ENTRY FRMXVO P ENTRY FRMTKT
0x1764fc…176690 Dummy {f00=0x00c6, f01=0x0190, f02=» PROC 0 P CALL FMOVE,GTSTRFMT,FTBJT(GTREGDEX) P RET B P PEND V P* l PFRMXJT PROC XJTDEX v ( P CALL FMOVE,GTSTRFMT,FTBXJT(XJTDEX) P RET P PEND P* PFRMTTA PROC 0 P CALL FMOV
0x176690…176824 Dummy {f00=0x00c6, f01=0x0190, f02=»XTA(XTADEX) x P RET P PEND P* . PFRMTVO PROC 8 0 P CALL FMOVE,GTSTRFMT,FTBVO(GTREGDEX) L P RET P PEND P* PFRMXVO PROC XVODEX ( P CALL FMOVE,GTSTRFMT,FTBXVO(XVODEX) P RET P P
0x176824…1769b8 Dummy {f00=0x00c6, f01=0x018e, f02=» 0 P CALL FMOVE,GTSTRFMT,FTBKT(GTREGDEX) P RET < P PEND P P* f PFRMXKT PROC XKTDEX p ( P CALL FMOVE,GTSTRFMT,FTBXKT(XKTDEX) P RET P PEND P* PFRMTGP PROC ( P CALL FMOVE,GTSTRFMT,FTB
0x1769b8…176b4c Dummy {f00=0x00c6, f01=0x0190, f02=» j P RET P PEND P* " P* , P* 6 P EJECT @ P* V P* FORMATS FOR JOURNAL ` P* @ PFTBJT FTABLE JTFMT01,JTFMT02,JTFMT03,JTFMT04,JTFMT02, C 2 P JTFMT01,JTFMT02,JTFMT08,JTFMT08,JTFMT02, C P
0x176b4c…176ce0 Dummy {f00=0x00c6, f01=0x0190, f02=» LINE 1 z P FEOR 2 P FLINK JTSUB04 LINE 2 6 P FMEND l P* PJTFMT02 FRMT P FLINK JTFMT02L P FMEND P* PJTFMT02L FRMT 2 P FLINK JTSUBST
0x176ce0…176e74 (0, 475) Dummy {f00=0x00c6, f01=0x0190, f02=» FEOR P FILLR ' ',8 F P FMEL 'X',GTDUPF(CBIN6) RE$ 2 P FILLR ' ',2 | P FLINK JTSUB06 FOR TRANS 10 P FLINK JTSUB30 ARKIV KNT.NR P FILLR ' ',15 P FMEND
0x176e74…177008 Dummy {f00=0x00c6, f01=0x0190, f02=» START INF p P FILLR ' ',9 $ P FCOPY TT16TXT RATE/RENTE/GEBYR 4 2 P FLINK JTSUB06 CPR/CIR 0 P FLINK JTSUB08 VALUE P FEOR P FILLR ' ',2 P FILLR '
0x177008…17719c Dummy {f00=0x00c6, f01=0x0190, f02=»ZZ',GTDUPF(CBIN7) VALGR z F P FMEL 'BBZ',GTDUPF(CBIN8) BETALINGSFORM BFO 6 8 P FLINK JTSUB30 ARK KONTO NR P FILLR ' ',2 8 P FMEL 'XX',GTDUPF(CBIN11) PALIGNIN
0x17719c…177330 Dummy {f00=0x00c6, f01=0x0190, f02=»ND P* PJTFMT04 FRMT P FLINK JTFMT04L ( P FMEND @ P* N PJTFMT04L FRMT X P FLINK JTSUBST START INF n P FILLR ' ',15 2 P FLINK JTSUB06 CPR/CIR 0 P FLINK JTSUB08
0x177330…1774c4 Dummy {f00=0x00c6, f01=0x0190, f02=» D P FMEL 'ZZ.ZZ.ZZ',GTDUPF(CBIN7) VALOR P FILLR ' ',3 L 6 P FLINK JTSUB30 ARK KNT NR h B P FMEL 'BBBZZ',GTDUPF(CBIN10) F$R F P FMEL 'BBZZ',GTDUPF(CBI
0x1774c4…177658 Dummy {f00=0x00c6, f01=0x0190, f02=»GTDUPF(CBIN13) OPK z P FMEND 0 P* F PJTFMT08 FRMT P P FLINK JTFMT08L d P FMEND | P* PJTFMT08L FRMT 4 P FLINK JTSUBST START INF 2 P FLINK JTSUB01
0x177658…1777ec Dummy {f00=0x00c6, f01=0x0190, f02=» LINE 3 z P FMEND P* 6 PJTFMT12 FRMT @ P FLINK JTFMT12L T P FMEND l P* z PJTFMT12L FRMT 4 P FLINK JTSUBST START INF 8 P FLINK JTSUB05 REG KONTO NR
0x1777ec…177980 Dummy {f00=0x00c6, f01=0x0190, f02=» FLINK JTSUB08 VALUE P FEOR 2 P FILLR ' ',2 @ 2 P FMEL 'BZZZZZZZZZZ',GTDUPF(CBIN2) DIVERSE TEXT T P FILLR ' ',16 P FMEND P* 4 PJTSUBST FRMT START INF P FILLR ' ',2
0x177980…177b14 (0, 476) Dummy {f00=0x00c7, f01=0x0190, f02=» TYPE b P FLINK FLBNR P FMEND " P* 8 : PJTSUB01 FRMT LINE 1,- 1,5,6 B P FLINK JTSUB05 CPR/CIR P FLINK JTSUB06 REG-KONTO-NR 0 P FLINK JTSUB08 VALUE P FMEND
0x177b14…177ca8 Dummy {f00=0x00c7, f01=0x0190, f02=»ZZ.ZZ.ZZ',GTDUPF(CBIN7) V.DATO B P FMEL 'BBX',GTDUPF(CBIN6) RE$ & D P FMEL 'BBX',GTDUPF(CBIN8) BFO l P FLINK JTSUB30 0 P FMEL 'XXXXXXE-XXXX',GTDUPF(CBIN10) YD.MODT ( P F
0x177ca8…177e3c Dummy {f00=0x00c7, f01=0x0190, f02=» FMEL 'B999E-999E-99E-99B',GTDUPF(CBIN1) P FMEND 6 P* L 2 PJTSUB06 FRMT CPR/CIR V P FBT BCPR,JTLAB06 ( P FMEL 'XE-XXE-XXE-XXB',GTDUPF(CBIN2) P FB JTLAB08 PJTLAB06 P FBT BLE
0x177e3c…177fd0 Dummy {f00=0x00c7, f01=0x018e, f02=» PJTLAB08 P FMEND P* * P* 4 8 PJTSUB08 FRMT VALUE AND D/K > 6 P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) z P FCOPY TTDBKRM P FMEND P* PJTSUB10 FRMT LEVERAND
0x177fd0…178164 Dummy {f00=0x00c7, f01=0x0190, f02=» 6 P FMEL 'BBZZZE-ZZZE-ZZE-ZZ',GTDUPF(CBIN9) P FMEND > P* L 6 PJTSUB31 FRMT LINE 3 - 8 V P FILLR ' ',2 F P FMEL 'ZZ.ZZ.ZZ',GTDUPF(CBIN12) FAKT DATO F P FMEL 'BZ
0x178164…1782f8 Dummy {f00=0x00c7, f01=0x018e, f02=» FMEL 'BZZZZ',GTDUPF(CBIN15) TXT NR D P FMEL 'BZZ',GTDUPF(CBIN16) OMR NR B D P FMEL 'BZZ.ZZ.ZZ',GTDUPF(CBIN18) PER FRA D P FMEL 'BZZ.ZZ.ZZ',GTDUPF(CBIN19)
0x1782f8…17848c Dummy {f00=0x00c7, f01=0x0190, f02=» P* 0 P* VARIOUS FORMATS FOR JOURNAL TAPE P* B @ PFTBXJT FTABLE XJTF01,XJTF02,XJTF03,XJTF04,XJTF05,XJTF06, C L 2 P XJTF07,FMTFMT,XJTF09,XJTF10,XJTF11,VOX15, C P XJTF13,XJTF14,VOFMT02 P* PXJTF01 FRMT KVITTERING
0x17848c…178620 Dummy {f00=0x00c7, f01=0x0190, f02=»,2 P FLINK XJTF02L P FMEND P* . PXJTF02L FRMT 8 P FLINK FLBNR L P FILLR ' ',2 ` P FCOPY ='KONTOKORT' t P FBF GTSLDFLG,XJTF02EX & P FMEL 'B*.***.***.**9.99-',TTKTSLD PXJTF02EX P FMEND P* PXJTF03 F
0x178620…1787b4 (0, 477) Dummy {f00=0x00c7, f01=0x0190, f02=»SUM' P FMEND PXJTF05 FRMT P FLINK XJTF05L . P FMEND D P* R P* PXJTF05L FRMT f P FILLR ' ',2 z P FILLR '*',50 P FEOR P FILLR ' ',2 P FTEXT 'VERSNR ' P FCOPY ='DAGS-DATO' P FILLR ' '
0x1787b4…178948 Dummy {f00=0x00c7, f01=0x0190, f02=» ',2 P FCOPY GTTESTMK P FMEL '99.99.999.9',CVERSNR $ P FILLR ' ',2 H P FMEL '99E-99E-99',CMASKDAT P FILLR ' ',3 P FMEL '99E-99E-99',GTDATO P FILLR ' ',3 P FMEL '999',GTMSK P FILLR ' ',7 P FMEL '***99',TT
0x178948…178adc Dummy {f00=0x00c7, f01=0x0190, f02=» P FILLR ' ',2 $ P FMEL '999E-99999E-99BB',TVERSUR & P FMEL '999E-99999E-99BB',TTCASHAC D $ P FMEL 'ZZZ.ZZZ.ZZ9.ZZ-',TTSTCASH n P FEOR P FILLR ' ',2 P FILLR '*',40 P FMEND P* PXJTF06 FRMT P FLINK XJTF06L
0x178adc…178c70 Dummy {f00=0x00c7, f01=0x0190, f02=»'KASSELUKNING' P FILLR ' ',30 P FEOR , P FILLR ' ',2 : P FCOPY ='T[LLER' N P FILLR ' ',10 f P FCOPY ='DEBET' | P FILLR ' ',12 P FCOPY ='KREDIT' P FMEND P* PXJTF07 FRMT P FLINK XJTF07L P FME
0x178c70…178e04 Dummy {f00=0x00c7, f01=0x0190, f02=» ^ 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(GSWBIN5,CBIN1) P FMEND B P* P PXJTF09 FRMT Z P FCOPY =' START TEST' n P FMEND P* PXJTF10 FRMT P FCOPY =' SLUT TEST' P FMEND P* PXJTF11 FRMT P FILLR
0x178e04…178f98 Dummy {f00=0x00c7, f01=0x018e, f02=»MEND P* PXJTF13L FRMT P FLINK JTSUB05 REG KNT NO * * P FMEL 'BZZZ',GTDUPF(CBIN2) COUNTER NO L 2 P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) VALUE z P FILLR ' ',2 P FCOPY ='ADM ' $ P FMEL 'BZZ',GTDUPF(CBIN5) ADM NO P FME
0x178f98…17912c Dummy {f00=0x00c7, f01=0x0190, f02=» P* PFMTFMT FRMT P FLINK FMTFMTL & P FMEND < P* J PFMTFMTL FRMT T P FILLR ' ',2 h P FTEXT 'DIVERSE FORMATER' | P FMEND P EJECT P* : P* FORMATS FOR VOUCHER 'BILAG AFSTEMPLING'
0x17912c…1792c0 Dummy {f00=0x00c7, f01=0x0190, f02=» C X 2 P BAFST12,BAFST40,BAFST41,BAFST42,BAFST45, C 2 P BAFST46,BAFST47,BAFST48,BAFST49,BAFST50, C B & P BAFST51,BAFST52,BAFST53,BAFST54 x P* P* PBAFST01 FRMT TRANS 01-06 P FLINK BAFST01L P FMEND P* P
0x1792c0…179454 (0, 478) Dummy {f00=0x00c7, f01=0x0190, f02=»BKO v P FILLR ' ',6 @ P FMEL 'ZZ.ZZ.ZZB',GTDUPF(CBIN7) BET/VALORDATO P FB B1LAB2 d PB1LAB1 v " P FMEL '**B',GTDUPF(CBIN3) BKO PB1LAB2 < P FLINK JTSUB06 CPR-CIR-NR @ P FLINK B
0x179454…1795e8 Dummy {f00=0x00c7, f01=0x0190, f02=» TRANS 02-05-07-10 f P FLINK BAFST02L P FMEND 4 P* B PBAFST02L FRMT L 8 P FLINK BSUB01 HEADER b P FILLR ' ',1 8 P FMEL '******E-****',GTDUPF(CBIN2) CPR/CIR TRANS 10 P FILLR '*',2 P FBT T
0x1795e8…17977c Dummy {f00=0x00c7, f01=0x0190, f02=»MEND P* P* < PBAFST08 FRMT TRANS 08-09 P FLINK BAFST08L ` P FMEND x P* PBAFST08L FRMT 8 P FLINK BSUB01 HEADER $ P FMEL 'BB**B',GTDUPF(CBIN3) BKO
0x17977c…179910 Dummy {f00=0x00c7, f01=0x018e, f02=»),B8LAB2 ~ 2 P FMEL 'BBZZ.ZZ.ZZBBB',GTDUPF(CBIN12) FAKTDATO ! P FB B8LAB5 ! F PB8LAB2 ! X . P FMEL 'ZZZZ9999.99B',GTDUPF(CBIN14) LEVNR ! f PB8LAB5 ! P FLINK JTSUB10 LEVERAND. ! > P FLINK BSUB02 REGKONTO-BELOB ! P
0x179910…179aa4 Dummy {f00=0x00c7, f01=0x018e, f02=» ! P FLINK BSUB01 " < P FMEL '999',TTCNTNR TAELLER-NR " 2 P FMEL 'BZZZZZZZZZZ',GTDUPF(CBIN2) DIVERSE TEXT " ^ P FBT TTKORTFL,B12LAB1 " P FILLR '*',13 " PB12LAB1 " @ P FLINK BSUB02 REG
0x179aa4…179c38 Dummy {f00=0x00c7, f01=0x0190, f02=» " P FLINK BSUB13 # P FMEND # P* # , PBAFST04 FRMT BILAG TRANS 4 # 6 P FLINK BSUB10 # Z P FLINK BSUB12 # p P FLINK BSUB13 # P FMEND # P* # P* # PBAFST40 FRMT # P FMEND # P* # PBAFST41 FRMT # P FMEND #
0x179c38…179dcc Dummy {f00=0x00c7, f01=0x0190, f02=»BAFST47 FRMT # P FMEND $ P* $ " PBAFST48 FRMT $ , P FMEND $ @ P* $ N PBAFST49 FRMT $ X P FMEND $ l P* $ z PBAFST50 FRMT $ P FMEND $ P* $ PBAFST51 FRMT $ P FMEND $ P* $ PBAFST52 FRMT $ P FMEND $ P* $ P
0x179dcc…179f60 Dummy {f00=0x00c7, f01=0x018e, f02=» HEADER $ t P FILLR '+',2 % P FCOPY GTTESTMK % < > P FCOPY TTCYM CYKLE-MARKERING % T 4 P FMEL 'B999.999.99.99B',GTDUPF(CBIN1) REGKONTONR % * P FMEL '99.99.99',GTDATO POSTERINGSDATO % B P FCO
0x179f60…17a0f4 (0, 479) Dummy {f00=0x00c7, f01=0x018e, f02=» % > P FMEL 'B999B',GTMSK MASKINNR & P FMEND & J P* & ` P & j PBSUB02 FRMT & r P FILLR ' ',1 & < P FMEL '*.***.***.**9.99-',GTDUPF(CBIN4) BELOB & B P FCOPY TTDBKRM
0x17a0f4…17a288 Dummy {f00=0x00c7, f01=0x0190, f02=» & ~ P FCOPY TTCYM ' @ P FMEL '99.99.99B',GTDATO POSTERINGSDATO ' P FCOPY CKMDNAM ' ` : P FMEL 'B999B',GTMSK MASKINNR ' v " P FMEL '99B',GTDUPF(CBIN3) BKO ' P FMEND ' P* ' P* ' PBSUB
0x17a288…17a41c Dummy {f00=0x00c7, f01=0x0190, f02=» DEBET/KREDIT-MARK ' p P FILLR ' ',1 ( & P FMEND ( : P* ( P P* ( Z PBSUB06 FRMT ( d " P FMEL 'B99B',GTDUPF(CBIN3) BKO ( z P FBT TTKORTFL,B6LAB1 ( P FCOPY TT07TXT ( P FILLR ' ',1 ( . P FMEL 'ZZ.ZZ.ZZB',GTDUPF(CBIN7) VA
0x17a41c…17a5b0 Dummy {f00=0x00c7, f01=0x0190, f02=» CPR/CIR-NR ( z < P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) BELOB ) * D P FCOPY TTDBKRM DEBET/KREDIT-MARK ) j P FILLR ' ',1 ) P FLINK SKAF01 LINE NR ) P FMEND ) P* ) PBSUB
0x17a5b0…17a744 Dummy {f00=0x00c7, f01=0x018e, f02=»MEL 'B99B',GTREGNR ) P FLINK FLBNR * P FMEL 'B999',GTMSK MASKINNR * . " P FMEL 'BXXB',GTDUPF(CBIN3) BKO * R P FMEND * x P* * PBSUB11 FRMT * $ P FMEL 'XXB',GTDUPF(CBIN11) P]L]R * , P FMEL 'XX.XXPP',GTDUPF(CBIN7) VALOERDATO * & P FMEL 'BXB',
0x17a744…17a8d8 Dummy {f00=0x00c7, f01=0x0190, f02=» * n P FB B12LAB6 + PB12LAB5 + ( P FMEL 'XX',GTDUPF(CBIN10) FORFALDS]R + , PB12LAB6 + X P FILLR ' ',2 + h , P FMEL 'XX.XXPP',GTDUPF(CBIN7) VALOERDATO + | P FILLR ' ',2 + P FMEND + P* + PBSUB13 FRMT + 2 P FMEL '*.***.***.**9.99-',GT
0x17a8d8…17aa6c Dummy {f00=0x00c7, f01=0x0190, f02=»G,FLBNR10 + P FMEL '****9',TTLBNR , P FB FLBNR20 , . PFLBNR10 , B P FMEL '****9',GTLBNR , R PFLBNR20 , n P FMEND , ~ P* , P EJECT , P* , * P* VARIOUS FORMATS FOR VOUCHER , P* , : PFTBXVO FTABLE FMTFMT,VOFMT02,VOFMT
0x17aa6c…17ac00 Dummy {f00=0x00c7, f01=0x0190, f02=»8 , ~ P* - P* - PVOFMT02 FRMT TOTAL IN CYCLE - P FLINK VOFMT02L - B P FMEND - Z P* - h PVOFMT02L FRMT - r P FILLR '+',2 - P FBF TTCY1FLG,VOLAB02 - P FCOPY ='ARKIV' - P FLINK JTSUB30 - PVOLAB02 - P FILLR ' ',4 -
0x17ac00…17ad94 (0, 480) Dummy {f00=0x00c8, f01=0x0190, f02=»LR '+',2 - P FLINK BAXF04L . P FMEND . & P* . 4 PBAXF04L FRMT . > P FCOPY GTTESTMK TEST MARK . R P FLINK JTSUB06 . t & P FMEL 'B99.99.99',GTDATO POSTDATO . P FILLR ' ',1 . P FLINK FLBNR . P FMEL 'B999',GTMSK MASKINNR . " P FMEL 'B
0x17ad94…17af28 Dummy {f00=0x00c8, f01=0x0190, f02=» P FILLR '+',2 / P FLINK BAXF05L / P FMEND / . P* / < PBAXF05L FRMT / F P FLINK BSUB04 / Z P FEOR / p P FILLR '0',2 / ~ P FLINK BSUB05 / P FMEND / P* / PBAXF06 FRMT / P FLINK BAXF06L / P FMEND / P* / PBAXF06
0x17af28…17b0bc Dummy {f00=0x00c8, f01=0x0190, f02=» P FMEND 0 P* 0 PVOSUM07 FRMT SUMBILAG 0 P FLINK VOSUM07L 0 : P FMEND 0 R P* 0 ` PVOSUM07L FRMT 0 j P FILLR '+',2 0 P FMEL '999B',GTMSK MASKINNR 0 ( P FMEL 'B99.99.99B',GTDATO EKSP.LB.NR 0 P FMEL '****9',GTSUMST 0 P FCOPY
0x17b0bc…17b250 Dummy {f00=0x00c8, f01=0x0190, f02=» 0 P FMEND 1 P* 1 PVOX08 FRMT 1 P FLINK VOX08L 1 2 P FMEND 1 H P* 1 V PVOX08L FRMT 1 ` P FILLR '+',2 1 t P FCOPY GTTESTMK 1 P FMEL '999',GTMSK 1 P FMEL 'BB99.99.99',GTDATO 1 P FMEL 'BBZ999',CKMDNR 1 P FMEL 'BB****9
0x17b250…17b3e4 Dummy {f00=0x00c8, f01=0x0190, f02=»TEXT 1 P FEOR 2 P FILLR '2',2 2 P FILLR '*',60 2 . P FILLR '*',8 2 D P FEOR 2 X P FILLR '4',2 2 f P FCOPY ='KONTONR' 2 z P FILLR ' ',6 2 P FCOPY ='T[LLER' 2 P FILLR ' ',9 2 P FTEXT 'NETTO' 2 P FILLR ' ',12 2 P FCOPY =
0x17b3e4…17b578 Dummy {f00=0x00c8, f01=0x0190, f02=» P* 3 PVOX09L FRMT 3 P FILLR '2',2 3 " ( P FMEL 'XXXE-XXXXXE-XX',GTDUPF(CBIN1) 3 6 P FILLR ' ',4 3 b P FMEL '99',GTWBCD1 3 v 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) NETTO 3 > P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',C12ACC(GSWBIN5,CBIN2) DEBET 3
0x17b578…17b70c Dummy {f00=0x00c8, f01=0x018e, f02=»MEND 3 P* 4 PVOX10L FRMT 4 P FILLR '2',2 4 * P FMEL 'ZZ',GTWBCD1 4 > 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) 4 X 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(GSWBIN5,CBIN2) 4 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(GSWBIN5,CBIN1) 4 P FMEND 4
0x17b70c…17b8a0 Dummy {f00=0x00c8, f01=0x0190, f02=» 4 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) 5 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTREGF(CBIN2) 5 < 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTREGF(CBIN1) 5 p P FEOR 5 P FILLR '4',2 5 P FTEXT 'SUPL ' 5 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN5)
0x17b8a0…17ba34 (0, 481) Dummy {f00=0x00c8, f01=0x0190, f02=»ILLR '2',2 5 P FTEXT 'KOR' 6 P FILLR ' ',19 6 & 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(CBIN7,CBIN2) 6 < 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(CBIN7,CBIN1) 6 t P FMEND 6 P* 6 PVOX12 FRMT 6 P FLINK VOX12L 6 P FMEND 6 P* 6 PVOX1
0x17ba34…17bbc8 Dummy {f00=0x00c8, f01=0x018e, f02=».ZZZ.ZZ9.99-',TTSTCASH 6 P FILLR ' ',34 7 P FEOR 7 4 P FILLR '2',2 7 B P FTEXT 'BEV ' 7 V 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) 7 l 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN5) 7 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN6) 7 P
0x17bbc8…17bd5c Dummy {f00=0x00c8, f01=0x0190, f02=» P* 8 PVOX13 FRMT 8 P FLINK VOX13L 8 P FMEND 8 6 P* 8 D PVOX13L FRMT 8 N P FILLR ' ',2 8 b P FCOPY GTTESTMK 8 v P FMEL '999B',GTMSK 8 P FMEL 'B99.99.99',GTDATO 8 P FILLR ' ',2 8 P FCOPY ='BEHOLDNINGST[LLERE' 8 P FILLR '
0x17bd5c…17bef0 Dummy {f00=0x00c8, f01=0x0190, f02=»,2 8 P FCOPY ='T[LLER' 9 P FILLR ' ',4 9 " P FCOPY ='KONTONR' 9 6 P FILLR ' ',10 9 P P FCOPY ='BEV.PERIODE' 9 f P FILLR ' ',12 9 P FCOPY ='SALDO' 9 P FILLR ' ',1 9 P FMEND 9 P* 9 PVOX14 FRMT 9 P FLINK VOX14L 9
0x17bef0…17c084 Dummy {f00=0x00c8, f01=0x0190, f02=»BACC(GSWBIN3,CBIN1) 9 x 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',CBACC(GSWBIN3,CBIN2) : 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',CBACC(GSWBIN3,CBIN3) : V P FMEND : P* : PVOX15 FRMT : P FILLR '2',2 : P FCOPY GSWSTR20 : P FMEND : P* : PVOX16 FRMT
0x17c084…17c218 Dummy {f00=0x00c8, f01=0x0190, f02=»0 5. : P FNL ; P FNL ; P FILLR X'5D',40 ] ; $ P FILLR X'4E',40 N ; > P FNL ; X P FNL ; d P FILLR X'45',40 E ; p P FILLR X'53',40 S ; P FNL ; P FNL ; P FILLR X'5B',40 [ ; P FILLR X'5C',40 OE ; P FMEND ; P* ; P
0x17c218…17c3ac Dummy {f00=0x00c8, f01=0x0190, f02=»INGSDATO ; p P FILLR ' ',6 < P FLINK FLBNR < $ P FILLR ' ',8 < 8 2 P FMEL 'B*.***.***.**9E,99',GTDUPF(CBIN4) BELOB < L P FILLR '*',2 < P FILLR ' ',3 < 4 P FMEL 'ZZ999999',GTDUPF(CBIN2) CHECKNR(DIV.TXT) < P FILLR ' ',8 < P FMEND < P* <
0x17c3ac…17c540 Dummy {f00=0x00c8, f01=0x0190, f02=»L 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GSWBCD6 < * P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GSWBCD7 = * P FMEND = X P* = f P EJECT = p P* = ~ . P* FORMATS FOR EXTRA 'KVITTERING' = ( P* (MOSTLY AS NORMAL 'BILAG' = P* = : PFTBKV FTABLE BAFST01,BAF
0x17c540…17c6d4 (0, 482) Dummy {f00=0x00c8, f01=0x0190, f02=» FRMT = P FILLR '+',2 > P FLINK BSUB04 > " P FLINK BSUB05 > 8 P FMEND > N P* > P EJECT > f P* > | " P* FORMATS FOR KONTOKORT > P* > @ PFTBKT FTABLE KAFST01,KAFST02,KAFST03,KAFST04,KAFST00, C > 2 P KAFST01,KAFS
0x17c6d4…17c868 Dummy {f00=0x00c8, f01=0x0190, f02=»* > P* ? < PKAFST01 FRMT TRANS 01-06 ? P FLINK BAFST01 ? T P FLINK SKAF01 LINE NR ? r P FMEND ? P* ? P* ? : PKAFST02 FRMT TRANS 02 ? P FLINK B
0x17c868…17c9fc Dummy {f00=0x00c8, f01=0x0190, f02=»2 ? P FLINK BAFST12 @ P FLINK SKAF01 LINE NR @ ( P FMEND @ F P* @ P* @ f : PKAFST03 FRMT TRANS 03 @ p P FLINK BAFST03 @ P FLINK SKAF01 @ P FMEND @ P* @ P* @ : PKAFST04 FRM
0x17c9fc…17cb90 Dummy {f00=0x00c8, f01=0x0190, f02=»RMT @ P FBF CKTFLAG,SKAF02 A P FBT GTSLDFLG,SKAF04 A ( P FILLR ' ',13 A D P FB SKAF03 A Z PSKAF04 A l , P FMEL '*.***.***.**9.99-',TTKTSLD SALDO A z PSKAF03 A " P FMEL 'B99.',TTKTLIN NEW LINE A " P FMEL '9',TTKTCHK CHECK DIGIT A P FB
0x17cb90…17cd24 Dummy {f00=0x00c8, f01=0x0190, f02=» FORMATS FOR 'KONTOKORT' A ~ P* B PFTBXKT FTABLE XKTTRP B * P* B F PXKTTRP FRMT B P P FLINK XKTTRPL B d P FMEND B z P* B PXKTTRPL FRMT B P FILLR '+',2 B P FMEL 'BB99.99.99',GTDATO B P FILLR ' ',43 B & P FMEL '*.***.***.**9.9
0x17cd24…17ceb8 Dummy {f00=0x00c8, f01=0x018e, f02=»OLL B t P* C PFTBTA FTABLE FMTFMT C P* C 2 P* C < P EJECT C F P* C T . P* VARIOUS FORMATS FOR TALLY ROLL C ^ P* C P* C @ PFTBXTA FTABLE TAFMT01,TAFMT02,TAFMT02,TAFMT04,TAFMT05, C C P VOX15,TAFMT07 C P* C
0x17ceb8…17d04c Dummy {f00=0x00c8, f01=0x0190, f02=» C P FLINK TAFMT02L D P FMEND D P* D . PTAFMT02L FRMT D 8 P FILLR '0',2 D N P FCOPY GSWSTR9 D b & P FMEL '*.***.***.**9.99+B',GSWBCD6 D x P FLINK TAFMT07 D P FMEND D P* D PTAFMT04 FRMT D P FILLR '+',2 D , P FMEL 'Z.ZZZ.ZZZ
0x17d04c…17d1e0 Dummy {f00=0x00c8, f01=0x0190, f02=»Z9.99-',GSWBCD6 D ~ P FILLR ' ',1 E P FMEND E , P* E : PTAFMT07 FRMT E D P FNL E X P FNL E d P FNL E p P FNL E | P FNL E P FNL E P FNL E P FMEND E P* E ( P* FORMATS FOR GENERAL PRINTER E P* E PFTBGP FTABLE F
0x17d1e0…17d374 (0, 483) Dummy {f00=0x00c8, f01=0x4036, f02=»* E P* F P* F P END F @ F 2
0x17d374…17d508 Dummy {f00=0x00c8, f01=0x2008, f02=» G P* CAN NOT BE IDENTIFIED BY TRANSTYPE (OR GTREGDEX) ' P* ' L PFTBXX FTABLE ' V P* ' n P* ' x P END ' @ ' & z P* & PFTBTA FTABLE & P* & P* & P EJECT & P* & ( P* FORMATS
0x17d508…17d69c Dummy {f00=0x00c8, f01=0x0190, f02=»BCD1 ? P FBT GTSWFLAG,V20L20 @ 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9,99-',GTDUPF(CBIN4) @ ( P FILLR ' ',35 @ P FB V20L90 @ r PV20L20 @ P FILLR ' ',17 @ 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9,99-',GTDUPF(CBIN5) @ 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9,99-',GTDUPF(CBIN6)
0x17d69c…17d830 Dummy {f00=0x00c8, f01=0x018e, f02=»AL 'BILAG' @ v P* A : PFTBKV FTABLE BAFST01,BAFST02,KVIT03,KVIT03,BAFST02, C A 2 P BAFST01,BAFST02,BAFST08,BAFST08,BAFST02, C A Z . P BAFST12,BAFST01,BAFST01,BAFST01,BAFST01 A P* A P* A PKVIT03 FRMT A P FILLR '+',2 A P FLINK BSU
0x17d830…17d9c4 Dummy {f00=0x00c8, f01=0x018e, f02=» @ PFTBKT FTABLE KAFST01,KAFST02,KAFST03,KAFST04,KAFST00, C B 2 P KAFST01,KAFST00,KAFST01,KAFST01,KAFST02, C B H . P KAFST12,KAFST01,KAFST01,KAFST01,KAFST01 B ~ P* B P* B PKAFST00 FRMT B P FMEND B P* B P* B < PKAFS
0x17d9c4…17db58 Dummy {f00=0x00c8, f01=0x0190, f02=» B P* C P* C : PKAFST02 FRMT TRANS 02 C P FLINK BAFST02 C Z P FLINK SKAF01 LINE NR C x P FMEND C P* C P C : PKAFST12 FRMT TRANS 12 C P FLI
0x17db58…17dcec Dummy {f00=0x00c8, f01=0x0190, f02=»RANS 03 C b P FLINK KAFST03L D P FMEND D ( P* D 6 PKAFST03L FRMT D @ 8 P FLINK BSUB01 HEADER D V P FLINK BSUB06 D P FBF TTKORTFL,KLAB31 D 2 P FMEL 'XX.XXPP',GTDUPF(CBIN7) VAL.DATE, DD.MM D PKLAB31 D > P
0x17dcec…17de80 Dummy {f00=0x00c8, f01=0x0190, f02=»NIENR D r P FMEND E P* E $ P* E . : PKAFST04 FRMT TRANS 04 E 8 P FLINK KAFST04L E v P FMEND E P* E PKAFST04L FRMT E 8 P FLINK BSUB01 HEADER E < P FLINK B
0x17de80…17e014 (0, 484) Opaque[0x194]
0x17e014…17e1a8 # DirEnt {nam=»SL525 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1920, f03=0x0000}
0x17e014…17e1a8 IdxSect {
0x17e014…17e1a8 f00 = 0x00c9 // 0x17e014 @0x0
0x17e014…17e1a8 f01 = 0x0006 // 0x17e016 @0x2
0x17e014…17e1a8 gno = [ // 0x17e018 @0x4
0x17e014…17e1a8 [0x00]: C0x00c9.0x0.0
0x17e014…17e1a8 [0x01]: C0x00c9.0x1.0
0x17e014…17e1a8 [0x02]: C0x00c9.0x2.0
0x17e014…17e1a8 ]
0x17e014…17e1a8 }
0x17e1a8…17e33c Dummy {f00=0x00c9, f01=0x0190, f02=» PNOKEY EQU X'FF' PBSPKY1 EQU X'87' PCANKY1 EQU X'91' 4 PMACKY1 EQU X'95' L PEORKY1 EQU X'90' d PFTABKY1 EQU X'8B' | PBTABKY1 EQU X'83' PDUPKY1 EQU X'A2' PSLUTKY1 EQU X'A3' PREGKY1 EQU X'A1' PCOPKY1 EQU X'F
0x17e33c…17e4d0 Dummy {f00=0x00c9, f01=0x0190, f02=»Y1 EQU X'FF' PCY2KY1 EQU X'FF' PCYCKY1 EQU X'89' , PINVKY1 EQU X'82' D PKONKY1 EQU X'85' PKVITKY1 EQU X'86' t PSUPLKY1 EQU X'84' PSUMKY1 EQU X'81' PADMKY1 EQU X'A0' PDIVKY1 EQU X'FF' PHBOGKY1 EQU X'80'
0x17e4d0…17e664 Dummy {f00=0x00c9, f01=0x0190, f02=»SKY1 EQU X'81' PDELKY1 EQU X'82' PCL1KY1 EQU X'89' . PCL2KY1 EQU X'8A' F PCL3KY1 EQU X'8B' ^ POUTKY1 EQU X'A0' v P* PBSPKY2 EQU X'C7' PCANKY2 EQU X'D1' PEORKY2 EQU X'D0' PMACKY2 EQU X'D5' PFTABKY2 EQU X'CB
0x17e664…17e7f8 Dummy {f00=0x00c9, f01=0x0190, f02=»GKY2 EQU X'E1' PADMKY2 EQU X'E0' PSPGKY2 EQU X'FF' . PKONKY2 EQU X'C5' F PKVITKY2 EQU X'C6' ^ P* x < PSPKTAB1 KTAB BSPKY1,CANKY1,NOKEY,EORKY1,NOKEY,MACKY1, C > P FTABKY1,BTABKY1,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C & P CO
0x17e7f8…17e98c Dummy {f00=0x00c9, f01=0x0190, f02=»MKY1, C ` 8 P ADMKY1,CYCKY1,DIVKY1,HBOGKY1,DEBPKY1,REMKY1,TRSEL P* L < PSPKTAB2 KTAB BSPKY1,CANKY1,NOKEY,EORKY1,NOKEY,MACKY1, C V > P FTABKY1,BTABKY1,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C & P COPKY1,DUPKY1,EDTKY1,SLUTKY1, C . P KREK
0x17e98c…17eb20 Dummy {f00=0x00c9, f01=0x0190, f02=»Y1,DEBPKY1,REMKY1,TRSEL t P* 0 PSPKTAB3 KTAB FTBKY1,BTBKY1,INSKY1,DELKY1, C * " P CL1KY1,CL2KY1,CL3KY1,OUTKY1 ^ P* > PSPKTAB12 KTAB BSPKY2,CANKY2,NOKEY,EORKY2,NOKEY,MACKY2, C 2 P FTABKY2,BTABKY2,NOKEY,NOKEY,NOKEY,NOKEY, C 2 P
0x17eb20…17ecb4 (0, 485) Dummy {f00=0x00c9, f01=0x0190, f02=»ANKY2,NOKEY,EORKY2,NOKEY,MACKY2, C z 2 P FTABKY2,BTABKY2,NOKEY,NOKEY,NOKEY,NOKEY, C , 2 P NOKEY,NOKEY,NOKEY,DUPKY2,EDTKY2,SLUTKY2, C b 0 P KREKY2,REGKY2,ADMKY2,SPGKY2,KONKY2,KVITKY2 P* * P* INQUIRY KEYTABLES (SPKEY=3) P*
0x17ecb4…17ee48 Dummy {f00=0x00c9, f01=0x0190, f02=»KEY,NOKEY,NOKEY,SLUTKY1, C . P NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C $ " P NOKEY,INVKY1,KONKY1,KVITKY1 V P* | < PSPKTAB23 KTAB BSPKY1,NOKEY,CANKY1,NOKEY,NOKEY,MACKY1, C . P NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C . P NOKEY,NOKEY,NO
0x17ee48…17efdc Dummy {f00=0x00c9, f01=0x0190, f02=»ADMKY1 P* P* : PSPFTBERR FTABLE ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C " , P ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C ` , P ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C , P ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C , P ERRDSK,ERRFMT,ERRFMT,E
0x17efdc…17f170 Dummy {f00=0x00c9, f01=0x0190, f02=»T5,MSFMT6, C ` P MSFMT7,MSFMT8,MSFMT9 P* 4 P* > PERRFMT FRMT H P FSL P FCOPY ='FEJL ' h P FMEL 'ZZ9',GSWBCD4 ERRORNR. P FMEND P* PERRDSK FRMT P FSL P FMEL '99B',GTWBCD2 P FCOPY GSWSTR9
0x17f170…17f304 Dummy {f00=0x00c9, f01=0x0190, f02=» PMSFMT2 FRMT P FSL P FCOPY ='LINIE NR' ( P FILLR '.',1 D P FMEND Z P* h PMSFMT3 FRMT r P FSL P FTEXT ='NY SIDE. ' P FMEND P* PMSFMT4 FRMT P FSL P FBF TTSUMFLG,FMT4END P FTA
0x17f304…17f498 Dummy {f00=0x00c9, f01=0x018e, f02=»T P FSL P FCOPY ='BILAG' P FMEND . P* < PMSFMT6 FRMT F P FSL Z P FCOPY ='KONTOKORT' f P FMEND P* PMSFMT7 FRMT P FSL P FCOPY TTINF1 P FMEND P* PMSFMT8 FRMT P FSL P
0x17f498…17f62c Dummy {f00=0x00c9, f01=0x4020, f02=» P FMEND P* @ ILAG' P FMEND . P* < PMSFMT6 FRMT F P FSL Z P FCOPY ='KONTOKORT' f P FMEND P* PMSFMT7 FRMT P FSL P FCOPY TTINF1 P FMEND P* PMSFMT8 FRMT P FSL P
0x17f62c…17f7c0 Dummy {f00=0x00c9, f01=0x2008, f02=» * ERRFMT FRMT FSL , " FMEL 'ZZ9B',GTWBCD1 FILE NR. 8 FCOPY ERRTXT ^ " FMEL 'BZZ9',GTWBCD2 ERRORNR. t FCOPY =X'07' FMEND @ 8SPKTAB2 KTAB BSPKY1,CANKY1,NOKEY,MACKY1,NOKEY,EORKY1, C D ? FT
0x17f7c0…17f954 (0, 486) Dummy {f00=0x00c9, f01=0x0190, f02=» PKTUP TAB 1 UP P TUP P ( PTSTTAB TEST TAB OUTPUT 0 P BE READIN OK P P BL READIN NOT FOUND f * P BOFL SETCREAD EMPTY COMPULSORY FIELD P* P* P* CONDITIONAL TABULATION P* P PERF SPTCHK P C
0x17f954…17fae8 Dummy {f00=0x00c9, f01=0x0002, f02=» P
0x17fae8…17fc7c Dummy {f00=0x00c9, f01=0x00c2, f02=» PRT KM167 PRT KM255 PRT KM259 ( PRT KM269 : PRT KM461L L PRT KM461R ^ PRT KM787 p PRT KM791 PRT KM975 PRT KM999 $ASG2 ONFIG PEND P$TLK2 PTLK U,M PSCR /7D
0x17fc7c…17fe10 Dummy {f00=0x00c9, f01=0x2008, f02=» KM167 PRT KM255 PRT KM259 ( PRT KM269 : PRT KM461L L PRT KM461R ^ PRT KM787 p PRT KM791 PRT KM975 PRT KM999 $ASG2 ONFIG PEND P$TLK2 PTLK U,M PSCR /7D
0x17fe10…17ffa4 Dummy {f00=0x00c9, f01=0x0190, f02=» , P MOVE SPBINW1,='0' INDICATE NO CLEARING 2 P MOVE SPBINW2,='0' SET INDEX TO SEARCHED FIELD 4 < P GETFLD 0,SPBINW2,SPBINW3 SEARCH FOR EMPTY COMP. FIELDS j ( P BOFL KENT10 EMPTY COMP. FIELD FOUND & P TSTCTL 2 LOOK IF COMPULSORY FIELD P BZ KENT
0x17ffa4…180138 Dummy {f00=0x00c9, f01=0x0190, f02=»KEY DEPRESSED n P RET P* " & P* EMPTY COMPULSORY FIELD FOUND , P* V PKENT10 ` 6 P GETFLD 0,SPBINW3,SPBINW2 GET THE COMPULSORY FIELD n P EJECT PERRPRT * P CBE SPBINW2,='16',KEDIT JUMP IF EDIT * P CBE SPBINW2,='4',CANC
0x180138…1802cc Dummy {f00=0x00c9, f01=0x0190, f02=» P MOVE SPBINW2,=X'40' P XSTAT KEYB,SPBINW3 $ " P CBNE SPBINW2,SPBINW3,ERRPRT20 @ P TIMEOUT f & P EDWRT SCREEN,ERAFMT ERASE SCREEN x P B ERRC20 PERRPRT20 P CBE SPBINW4,='0',ERRC20 P PERF BELL ( P MOVE SPBINW3,=X'1
0x1802cc…180460 Dummy {f00=0x00c9, f01=0x018e, f02=» SCREEN,SPFTBERR(SPBINW4) P TBF SPKEYFLG,SPERRRET " P* @ P* READ AFTER ERROR J P* h PERREAD r ( P SETCUR SET CURSOR AT THE BEGINNING P OF THE CURRENT FIELD PERR100 * P MOVE SPBINW3,=W'14' REQUESTED LENGTH " P
0x180460…1805f4 (0, 487) Opaque[0x194]
0x1805f4…180788 # DirEnt {nam=»SL167 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1938, f03=0x0000}
0x1805f4…180788 IdxSect {
0x1805f4…180788 f00 = 0x00c9 // 0x1805f4 @0x0
0x1805f4…180788 f01 = 0x0006 // 0x1805f6 @0x2
0x1805f4…180788 gno = [ // 0x1805f8 @0x4
0x1805f4…180788 [0x00]: C0x00c9.0x3.0
0x1805f4…180788 [0x01]: C0x00ca.0x0.0
0x1805f4…180788 [0x02]: C0x00ca.0x1.0
0x1805f4…180788 ]
0x1805f4…180788 }
0x180788…18091c Dummy {f00=0x00c9, f01=0x0190, f02=» PNOKEY EQU X'FF' PBSPKY1 EQU X'87' PCANKY1 EQU X'91' 4 PMACKY1 EQU X'95' L PEORKY1 EQU X'90' d PFTABKY1 EQU X'8B' | PBTABKY1 EQU X'83' PDUPKY1 EQU X'A2' PSLUTKY1 EQU X'A3' PREGKY1 EQU X'A1' PCOPKY1 EQU X'F
0x18091c…180ab0 Dummy {f00=0x00c9, f01=0x0190, f02=»Y1 EQU X'FF' PCY2KY1 EQU X'FF' PCYCKY1 EQU X'89' , PINVKY1 EQU X'FF' D PKONKY1 EQU X'85' PKVITKY1 EQU X'86' t PSUPLKY1 EQU X'82' PSUMKY1 EQU X'81' PADMKY1 EQU X'A0' PDIVKY1 EQU X'84' PHBOGKY1 EQU X'80'
0x180ab0…180c44 Dummy {f00=0x00c9, f01=0x0190, f02=»SKY1 EQU X'81' PDELKY1 EQU X'82' PCL1KY1 EQU X'89' . PCL2KY1 EQU X'8A' F PCL3KY1 EQU X'8B' ^ POUTKY1 EQU X'A0' v P* PBSPKY2 EQU X'C7' PCANKY2 EQU X'D1' PEORKY2 EQU X'D0' PMACKY2 EQU X'D5' PFTABKY2 EQU X'CB
0x180c44…180dd8 Dummy {f00=0x00c9, f01=0x0190, f02=»GKY2 EQU X'E1' PADMKY2 EQU X'E0' PSPGKY2 EQU X'FF' . PKONKY2 EQU X'C5' F PKVITKY2 EQU X'C6' ^ P* x < PSPKTAB1 KTAB BSPKY1,CANKY1,NOKEY,EORKY1,NOKEY,MACKY1, C > P FTABKY1,BTABKY1,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C & P CO
0x180dd8…180f6c Dummy {f00=0x00c9, f01=0x0190, f02=»MKY1, C ` 8 P ADMKY1,CYCKY1,DIVKY1,HBOGKY1,DEBPKY1,REMKY1,TRSEL P* L < PSPKTAB2 KTAB BSPKY1,CANKY1,NOKEY,EORKY1,NOKEY,MACKY1, C V > P FTABKY1,BTABKY1,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C & P COPKY1,DUPKY1,EDTKY1,SLUTKY1, C . P KREK
0x180f6c…181100 Dummy {f00=0x00c9, f01=0x0190, f02=»Y1,DEBPKY1,REMKY1,TRSEL t P* 0 PSPKTAB3 KTAB FTBKY1,BTBKY1,INSKY1,DELKY1, C * " P CL1KY1,CL2KY1,CL3KY1,OUTKY1 ^ P* > PSPKTAB12 KTAB BSPKY2,CANKY2,NOKEY,EORKY2,NOKEY,MACKY2, C 2 P FTABKY2,BTABKY2,NOKEY,NOKEY,NOKEY,NOKEY, C 2 P
0x181100…181294 (0, 488) Dummy {f00=0x00ca, f01=0x0190, f02=»ANKY2,NOKEY,EORKY2,NOKEY,MACKY2, C z 2 P FTABKY2,BTABKY2,NOKEY,NOKEY,NOKEY,NOKEY, C , 2 P NOKEY,NOKEY,NOKEY,DUPKY2,EDTKY2,SLUTKY2, C b 0 P KREKY2,REGKY2,ADMKY2,SPGKY2,KONKY2,KVITKY2 P* * P* INQUIRY KEYTABLES (SPKEY=3) P*
0x181294…181428 Dummy {f00=0x00ca, f01=0x0190, f02=»KEY,NOKEY,NOKEY,SLUTKY1, C . P NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C $ " P NOKEY,INVKY1,KONKY1,KVITKY1 V P* | < PSPKTAB23 KTAB BSPKY1,NOKEY,CANKY1,NOKEY,NOKEY,MACKY1, C . P NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C . P NOKEY,NOKEY,NO
0x181428…1815bc Dummy {f00=0x00ca, f01=0x0190, f02=»ADMKY1 P* P* : PSPFTBERR FTABLE ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C " , P ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C ` , P ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C , P ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C , P ERRDSK,ERRFMT,ERRFMT,E
0x1815bc…181750 Dummy {f00=0x00ca, f01=0x0190, f02=»T5,MSFMT6, C ` P MSFMT7,MSFMT8,MSFMT9 P* 4 P* > PERRFMT FRMT H P FSL P FCOPY ='FEJL ' h P FMEL 'ZZ9',GSWBCD4 ERRORNR. P FMEND P* PERRDSK FRMT P FSL P FMEL '99B',GTWBCD2 P FCOPY GSWSTR9
0x181750…1818e4 Dummy {f00=0x00ca, f01=0x0190, f02=» PMSFMT2 FRMT P FSL P FCOPY ='LINIE NR' ( P FILLR '.',1 D P FMEND Z P* h PMSFMT3 FRMT r P FSL P FTEXT ='NY SIDE. ' P FMEND P* PMSFMT4 FRMT P FSL P FBF TTSUMFLG,FMT4END P FTA
0x1818e4…181a78 Dummy {f00=0x00ca, f01=0x018e, f02=»T P FSL P FCOPY ='BILAG' P FMEND . P* < PMSFMT6 FRMT F P FSL Z P FCOPY ='KONTOKORT' f P FMEND P* PMSFMT7 FRMT P FSL P FCOPY TTINF1 P FMEND P* PMSFMT8 FRMT P FSL P
0x181a78…181c0c Dummy {f00=0x00ca, f01=0x4020, f02=» P FMEND P* @ ILAG' P FMEND . P* < PMSFMT6 FRMT F P FSL Z P FCOPY ='KONTOKORT' f P FMEND P* PMSFMT7 FRMT P FSL P FCOPY TTINF1 P FMEND P* PMSFMT8 FRMT P FSL P
0x181c0c…181da0 Dummy {f00=0x00ca, f01=0x2008, f02=» * ERRFMT FRMT FSL , " FMEL 'ZZ9B',GTWBCD1 FILE NR. 8 FCOPY ERRTXT ^ " FMEL 'BZZ9',GTWBCD2 ERRORNR. t FCOPY =X'07' FMEND @ 8SPKTAB2 KTAB BSPKY1,CANKY1,NOKEY,MACKY1,NOKEY,EORKY1, C D ? FT
0x181da0…181f34 (0, 489) Dummy {f00=0x00ca, f01=0x018e, f02=» ( ( , ( < H ( X d ( t ( ( ( ( (
0x181f34…1820c8 Dummy {f00=0x00ca, f01=0x0190, f02=» " $ B99.99.99Z $ " > & N 99 " n ( ~ B999.99999.99B " *.***.***.**9.99-H " &
0x1820c8…18225c Dummy {f00=0x00ca, f01=0x0190, f02=»99B " 99B " 0 ( @ L $ B*.***.***.**9.99- l " & & ( B99B " &
0x18225c…1823f0 Dummy {f00=0x00ca, f01=0x0190, f02=» B*.***.***.**9.99- " & , & : $ H ( V b & + r & 999B " $ B99.99.99* " BXX. "
0x1823f0…182584 Dummy {f00=0x00ca, f01=0x0190, f02=» " BXB " 0 ( ( 8 D & 0 T XX d " v & XX " E-9999999999B9 " XX.XXPP9 "
0x182584…182718 Dummy {f00=0x00ca, f01=0x018e, f02=» & ****9 " 6 & F ****9 T " j ( z * " m " " " " " " "
0x182718…1828ac Dummy {f00=0x00ca, f01=0x0190, f02=» ( $ ( 0 < & + L & Z ARKIV j $ $ . & & *.***.***.**9.99+- " & (
0x1828ac…182a40 Dummy {f00=0x00ca, f01=0x0190, f02=»$ & & 0 $ * ( : F $ V ( f r $ & & 0 & 0 & 0 & 0 $ ( $
0x182a40…182bd4 (0, 490) Opaque[0x194]
0x182bd4…182d68 # DirEnt {nam=»SL787 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1950, f03=0x0000}
0x182bd4…182d68 IdxSect {
0x182bd4…182d68 f00 = 0x00ca // 0x182bd4 @0x0
0x182bd4…182d68 f01 = 0x0006 // 0x182bd6 @0x2
0x182bd4…182d68 gno = [ // 0x182bd8 @0x4
0x182bd4…182d68 [0x00]: C0x00ca.0x2.0
0x182bd4…182d68 [0x01]: C0x00ca.0x3.0
0x182bd4…182d68 [0x02]: C0x00cb.0x0.0
0x182bd4…182d68 ]
0x182bd4…182d68 }
0x182d68…182efc Dummy {f00=0x00ca, f01=0x0190, f02=» PNOKEY EQU X'FF' PBSPKY1 EQU X'87' PCANKY1 EQU X'91' 4 PMACKY1 EQU X'95' L PEORKY1 EQU X'90' d PFTABKY1 EQU X'8B' | PBTABKY1 EQU X'83' PDUPKY1 EQU X'A2' PSLUTKY1 EQU X'A3' PREGKY1 EQU X'A1' PCOPKY1 EQU X'F
0x182efc…183090 Dummy {f00=0x00ca, f01=0x0190, f02=»Y1 EQU X'FF' PCY2KY1 EQU X'FF' PCYCKY1 EQU X'89' , PINVKY1 EQU X'82' D PKONKY1 EQU X'85' PKVITKY1 EQU X'86' t PSUPLKY1 EQU X'88' PSUMKY1 EQU X'81' PADMKY1 EQU X'A0' PDIVKY1 EQU X'84' PHBOGKY1 EQU X'80'
0x183090…183224 Dummy {f00=0x00ca, f01=0x0190, f02=»SKY1 EQU X'81' PDELKY1 EQU X'82' PCL1KY1 EQU X'89' . PCL2KY1 EQU X'8A' F PCL3KY1 EQU X'8B' ^ POUTKY1 EQU X'A0' v P* PBSPKY2 EQU X'C7' PCANKY2 EQU X'D1' PEORKY2 EQU X'D0' PMACKY2 EQU X'D5' PFTABKY2 EQU X'CB
0x183224…1833b8 Dummy {f00=0x00ca, f01=0x0190, f02=»GKY2 EQU X'E1' PADMKY2 EQU X'E0' PSPGKY2 EQU X'FF' . PKONKY2 EQU X'C5' F PKVITKY2 EQU X'C6' ^ P* x < PSPKTAB1 KTAB BSPKY1,CANKY1,NOKEY,EORKY1,NOKEY,MACKY1, C > P FTABKY1,BTABKY1,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C & P CO
0x1833b8…18354c Dummy {f00=0x00ca, f01=0x0190, f02=»MKY1, C ` 8 P ADMKY1,CYCKY1,DIVKY1,HBOGKY1,DEBPKY1,REMKY1,TRSEL P* L < PSPKTAB2 KTAB BSPKY1,CANKY1,NOKEY,EORKY1,NOKEY,MACKY1, C V > P FTABKY1,BTABKY1,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C & P COPKY1,DUPKY1,EDTKY1,SLUTKY1, C . P KREK
0x18354c…1836e0 Dummy {f00=0x00ca, f01=0x0190, f02=»Y1,DEBPKY1,REMKY1,TRSEL t P* 0 PSPKTAB3 KTAB FTBKY1,BTBKY1,INSKY1,DELKY1, C * " P CL1KY1,CL2KY1,CL3KY1,OUTKY1 ^ P* > PSPKTAB12 KTAB BSPKY2,CANKY2,NOKEY,EORKY2,NOKEY,MACKY2, C 2 P FTABKY2,BTABKY2,NOKEY,NOKEY,NOKEY,NOKEY, C 2 P
0x1836e0…183874 (0, 491) Dummy {f00=0x00ca, f01=0x0190, f02=»ANKY2,NOKEY,EORKY2,NOKEY,MACKY2, C z 2 P FTABKY2,BTABKY2,NOKEY,NOKEY,NOKEY,NOKEY, C , 2 P NOKEY,NOKEY,NOKEY,DUPKY2,EDTKY2,SLUTKY2, C b 0 P KREKY2,REGKY2,ADMKY2,SPGKY2,KONKY2,KVITKY2 P* * P* INQUIRY KEYTABLES (SPKEY=3) P*
0x183874…183a08 Dummy {f00=0x00ca, f01=0x0190, f02=»KEY,NOKEY,NOKEY,SLUTKY1, C . P NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C $ " P NOKEY,INVKY1,KONKY1,KVITKY1 V P* | < PSPKTAB23 KTAB BSPKY1,NOKEY,CANKY1,NOKEY,NOKEY,MACKY1, C . P NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C . P NOKEY,NOKEY,NO
0x183a08…183b9c Dummy {f00=0x00ca, f01=0x0190, f02=»ADMKY1 P* P* : PSPFTBERR FTABLE ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C " , P ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C ` , P ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C , P ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C , P ERRDSK,ERRFMT,ERRFMT,E
0x183b9c…183d30 Dummy {f00=0x00ca, f01=0x0190, f02=»T5,MSFMT6, C ` P MSFMT7,MSFMT8,MSFMT9 P* 4 P* > PERRFMT FRMT H P FSL P FCOPY ='FEJL ' h P FMEL 'ZZ9',GSWBCD4 ERRORNR. P FMEND P* PERRDSK FRMT P FSL P FMEL '99B',GTWBCD2 P FCOPY GSWSTR9
0x183d30…183ec4 Dummy {f00=0x00ca, f01=0x0190, f02=» PMSFMT2 FRMT P FSL P FCOPY ='LINIE NR' ( P FILLR '.',1 D P FMEND Z P* h PMSFMT3 FRMT r P FSL P FTEXT ='NY SIDE. ' P FMEND P* PMSFMT4 FRMT P FSL P FBF TTSUMFLG,FMT4END P FTA
0x183ec4…184058 Dummy {f00=0x00ca, f01=0x018e, f02=»T P FSL P FCOPY ='BILAG' P FMEND . P* < PMSFMT6 FRMT F P FSL Z P FCOPY ='KONTOKORT' f P FMEND P* PMSFMT7 FRMT P FSL P FCOPY TTINF1 P FMEND P* PMSFMT8 FRMT P FSL P
0x184058…1841ec Dummy {f00=0x00ca, f01=0x4020, f02=» P FMEND P* @ ILAG' P FMEND . P* < PMSFMT6 FRMT F P FSL Z P FCOPY ='KONTOKORT' f P FMEND P* PMSFMT7 FRMT P FSL P FCOPY TTINF1 P FMEND P* PMSFMT8 FRMT P FSL P
0x1841ec…184380 Dummy {f00=0x00ca, f01=0x2008, f02=» * ERRFMT FRMT FSL , " FMEL 'ZZ9B',GTWBCD1 FILE NR. 8 FCOPY ERRTXT ^ " FMEL 'BZZ9',GTWBCD2 ERRORNR. t FCOPY =X'07' FMEND @ 8SPKTAB2 KTAB BSPKY1,CANKY1,NOKEY,MACKY1,NOKEY,EORKY1, C D ? FT
0x184380…184514 (0, 492) Dummy {f00=0x00cb, f01=0x0190, f02=» L % & & SALDO & $ L & 0 & & @ ( & N & Z $ L & j ( & z & & 2 & ZZ & " L & & & XXXE-XXXXXE-XX & " t I & "
0x184514…1846a8 Dummy {f00=0x00cb, f01=0x0190, f02=» & 2 & & ' ( ' ' ( & ' 8 $ ' F ( ' V ' b & $ ' r & < ' & < ' & < ' & ] ' & N ' & N ' & N ' & E ' & S ' & S '
0x1846a8…18483c Dummy {f00=0x00cb, f01=0x018e, f02=» 99E-99E-99 ' " ( & ( & $ ( 4 & ( D B*.***.***.**9E,99 ( R " ( t & * ( & ( ZZ999999 ( " ( & ( ( ( ( $ ( ( (
0x18483c…1849d0 Dummy {f00=0x00cb, f01=0x018e, f02=» ( p " ) ( ) * ) $ " p ) 4 " u ) B " ) P " ) ^ " u ) l " p ) z " u ) " x ) " x ) " u ) " ~ ) ( ) ) & + ) $ )
0x1849d0…184b64 Dummy {f00=0x00cb, f01=0x0190, f02=» ) " * " * " * $ " * 2 ( * @ * L ( * * h $ p * x $ * ( * * $ u * $ * ( * * $ ~ * $ *
0x184b64…184cf8 Dummy {f00=0x00cb, f01=0x0190, f02=»PZ * " + BXX + " + . & + > $ + L ( + + h $ + x ( + + $ + $ + & + XX.XXPPZ + " + & +
0x184cf8…184e8c Dummy {f00=0x00cb, f01=0x018e, f02=» $ , ( , , & , 0 & , @ & , P & , ^ ! *.***.***.**9.99-. , l " ! , " B99. , " " , # 9 , " # , & , $ 99B ,
0x184e8c…185020 Dummy {f00=0x00cb, f01=0x018e, f02=» , ( BB99.99.99 - " ( - " & - 2 ) *.***.***.**9.99-. - @ " ) - b & - r * TRP - $ * - ( - * + - " m - ( - * , - " - - " . -
0x185020…1851b4 (0, 493) Opaque[0x194]
0x1851b4…185348 # DirEnt {nam=»KEY525«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1968, f03=0x0000}
0x1851b4…185348 IdxSect {
0x1851b4…185348 f00 = 0x00cb // 0x1851b4 @0x0
0x1851b4…185348 f01 = 0x0002 // 0x1851b6 @0x2
0x1851b4…185348 gno = [ // 0x1851b8 @0x4
0x1851b4…185348 [0x00]: C0x00cb.0x1.0
0x1851b4…185348 ]
0x1851b4…185348 }
0x185348…1854dc Dummy {f00=0x00cb, f01=0x0190, f02=» PNOKEY EQU X'FF' PBSPKY1 EQU X'87' PCANKY1 EQU X'91' 4 PMACKY1 EQU X'95' L PEORKY1 EQU X'90' d PFTABKY1 EQU X'8B' | PBTABKY1 EQU X'83' PDUPKY1 EQU X'A2' PSLUTKY1 EQU X'A3' PREGKY1 EQU X'A1' PCOPKY1 EQU X'F
0x1854dc…185670 Dummy {f00=0x00cb, f01=0x0190, f02=»Y1 EQU X'FF' PCY2KY1 EQU X'FF' PCYCKY1 EQU X'89' , PINVKY1 EQU X'82' D PKONKY1 EQU X'85' PKVITKY1 EQU X'86' t PSUPLKY1 EQU X'84' PSUMKY1 EQU X'81' PADMKY1 EQU X'A0' PDIVKY1 EQU X'FF' PHBOGKY1 EQU X'80'
0x185670…185804 Dummy {f00=0x00cb, f01=0x0190, f02=»SKY1 EQU X'81' PDELKY1 EQU X'82' PCL1KY1 EQU X'89' . PCL2KY1 EQU X'8A' F PCL3KY1 EQU X'8B' ^ POUTKY1 EQU X'A0' v P* PBSPKY2 EQU X'C7' PCANKY2 EQU X'D1' PEORKY2 EQU X'D0' PMACKY2 EQU X'D5' PFTABKY2 EQU X'CB
0x185804…185998 Dummy {f00=0x00cb, f01=0x4086, f02=»GKY2 EQU X'E1' PADMKY2 EQU X'E0' PSPGKY2 EQU X'FF' . PKONKY2 EQU X'C5' F PKVITKY2 EQU X'C6' ^ P* x@ v P* PBSPKY2 EQU X'C7' PCANKY2 EQU X'D1' PEORKY2 EQU X'D0' PMACKY2 EQU X'D5' PFTABKY2 EQU X'CB
0x185998…185b2c Dummy {f00=0x00cb, f01=0x2008, f02=» * ERRFMT FRMT FSL , " FMEL 'ZZ9B',GTWBCD1 FILE NR. 8 FCOPY ERRTXT ^ " FMEL 'BZZ9',GTWBCD2 ERRORNR. t FCOPY =X'07' FMEND @ 8SPKTAB2 KTAB BSPKY1,CANKY1,NOKEY,MACKY1,NOKEY,EORKY1, C D ? FT
0x185b2c…185cc0 Dummy {f00=0x00cb, f01=0x4174, f02=» | * & OD-KOM & F H & ^ & - n & K ~ * & i 0000899 0 * & * & @ A B
0x185cc0…185e54 (0, 494) Opaque[0x194]
0x185e54…185fe8 # DirEnt {nam=»KEY167«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1970, f03=0x0000}
0x185e54…185fe8 IdxSect {
0x185e54…185fe8 f00 = 0x00cb // 0x185e54 @0x0
0x185e54…185fe8 f01 = 0x0002 // 0x185e56 @0x2
0x185e54…185fe8 gno = [ // 0x185e58 @0x4
0x185e54…185fe8 [0x00]: C0x00cb.0x2.0
0x185e54…185fe8 ]
0x185e54…185fe8 }
0x185fe8…18617c Dummy {f00=0x00cb, f01=0x0190, f02=» PNOKEY EQU X'FF' PBSPKY1 EQU X'87' PCANKY1 EQU X'91' 4 PMACKY1 EQU X'95' L PEORKY1 EQU X'90' d PFTABKY1 EQU X'8B' | PBTABKY1 EQU X'83' PDUPKY1 EQU X'A2' PSLUTKY1 EQU X'A3' PREGKY1 EQU X'A1' PCOPKY1 EQU X'F
0x18617c…186310 Dummy {f00=0x00cb, f01=0x0190, f02=»Y1 EQU X'FF' PCY2KY1 EQU X'FF' PCYCKY1 EQU X'89' , PINVKY1 EQU X'FF' D PKONKY1 EQU X'85' PKVITKY1 EQU X'86' t PSUPLKY1 EQU X'82' PSUMKY1 EQU X'81' PADMKY1 EQU X'A0' PDIVKY1 EQU X'84' PHBOGKY1 EQU X'80'
0x186310…1864a4 Dummy {f00=0x00cb, f01=0x0190, f02=»BKY1 EQU X'87' PINSKY1 EQU X'81' PDELKY1 EQU X'82' . PCL1KY1 EQU X'89' F PCL2KY1 EQU X'8A' ^ PCL3KY1 EQU X'8B' v POUTKY1 EQU X'A0' P* PBSPKY2 EQU X'C7' PCANKY2 EQU X'D1' PEORKY2 EQU X'D0' PMACKY2 EQU X'D5'
0x1864a4…186638 Dummy {f00=0x00cb, f01=0x40ce, f02=»EKY2 EQU X'D2' PREGKY2 EQU X'E1' PADMKY2 EQU X'E0' . PSPGKY2 EQU X'FF' F PKONKY2 EQU X'C5' ^ PKVITKY2 EQU X'C6' v PONKY2 EQU X'D9' PCOPKY2 EQU X'C5' P* @ EQU X'D1' PEORKY2 EQU X'D0' PMACKY2 EQU X'D5'
0x186638…1867cc Dummy {f00=0x00cb, f01=0x2008, f02=» * ERRFMT FRMT FSL , " FMEL 'ZZ9B',GTWBCD1 FILE NR. 8 FCOPY ERRTXT ^ " FMEL 'BZZ9',GTWBCD2 ERRORNR. t FCOPY =X'07' FMEND @ 8SPKTAB2 KTAB BSPKY1,CANKY1,NOKEY,MACKY1,NOKEY,EORKY1, C D ? FT
0x1867cc…186960 Dummy {f00=0x00cb, f01=0x0190, f02=» P* D P* SPCLRN - CLEAR NO VARIABLE FIELDS BEFORE HANDLING THE PICTURE P* Z P MOVE SPERASE,=W'0' d P PERF SCREEN,=W'3' P RET P PEND PSPERR PROC P* 0 P* HANDLE ERRORS DETECTED OUTSIDE THE PACKAGE P*
0x186960…186af4 (0, 495) Opaque[0x194]
0x186af4…186c88 # DirEnt {nam=»KEY787«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1978, f03=0x0000}
0x186af4…186c88 IdxSect {
0x186af4…186c88 f00 = 0x00cb // 0x186af4 @0x0
0x186af4…186c88 f01 = 0x0002 // 0x186af6 @0x2
0x186af4…186c88 gno = [ // 0x186af8 @0x4
0x186af4…186c88 [0x00]: C0x00cb.0x3.0
0x186af4…186c88 ]
0x186af4…186c88 }
0x186c88…186e1c Dummy {f00=0x00cb, f01=0x0190, f02=» PNOKEY EQU X'FF' PBSPKY1 EQU X'87' PCANKY1 EQU X'91' 4 PMACKY1 EQU X'95' L PEORKY1 EQU X'90' d PFTABKY1 EQU X'8B' | PBTABKY1 EQU X'83' PDUPKY1 EQU X'A2' PSLUTKY1 EQU X'A3' PREGKY1 EQU X'A1' PCOPKY1 EQU X'F
0x186e1c…186fb0 Dummy {f00=0x00cb, f01=0x0190, f02=»Y1 EQU X'FF' PCY2KY1 EQU X'FF' PCYCKY1 EQU X'89' , PINVKY1 EQU X'82' D PKONKY1 EQU X'85' PKVITKY1 EQU X'86' t PSUPLKY1 EQU X'88' PSUMKY1 EQU X'81' PADMKY1 EQU X'A0' PDIVKY1 EQU X'84' PHBOGKY1 EQU X'80'
0x186fb0…187144 Dummy {f00=0x00cb, f01=0x0190, f02=»SKY1 EQU X'81' PDELKY1 EQU X'82' PCL1KY1 EQU X'89' . PCL2KY1 EQU X'8A' F PCL3KY1 EQU X'8B' ^ POUTKY1 EQU X'A0' v P* PBSPKY2 EQU X'C7' PCANKY2 EQU X'D1' PEORKY2 EQU X'D0' PMACKY2 EQU X'D5' PFTABKY2 EQU X'CB
0x187144…1872d8 Dummy {f00=0x00cb, f01=0x4086, f02=»GKY2 EQU X'E1' PADMKY2 EQU X'E0' PSPGKY2 EQU X'FF' . PKONKY2 EQU X'C5' F PKVITKY2 EQU X'C6' ^ P* x@ v P* PBSPKY2 EQU X'C7' PCANKY2 EQU X'D1' PEORKY2 EQU X'D0' PMACKY2 EQU X'D5' PFTABKY2 EQU X'CB
0x1872d8…18746c Dummy {f00=0x00cb, f01=0x2008, f02=» * ERRFMT FRMT FSL , " FMEL 'ZZ9B',GTWBCD1 FILE NR. 8 FCOPY ERRTXT ^ " FMEL 'BZZ9',GTWBCD2 ERRORNR. t FCOPY =X'07' FMEND @ 8SPKTAB2 KTAB BSPKY1,CANKY1,NOKEY,MACKY1,NOKEY,EORKY1, C D ? FT
0x18746c…187600 Dummy {f00=0x00cb, f01=0x0190, f02=» | * & K * & H * & v * & - * & K * & i
0x187600…187794 (0, 496) Opaque[0x194]
0x187794…187928 # DirEnt {nam=»REMLEV«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1980, f03=0x0000}
0x187794…187928 IdxSect {
0x187794…187928 f00 = 0x00cc // 0x187794 @0x0
0x187794…187928 f01 = 0x0016 // 0x187796 @0x2
0x187794…187928 gno = [ // 0x187798 @0x4
0x187794…187928 [0x00]: C0x00cc.0x0.0
0x187794…187928 [0x01]: C0x00cc.0x1.0
0x187794…187928 [0x02]: C0x00cc.0x2.0
0x187794…187928 [0x03]: C0x00cc.0x3.0
0x187794…187928 [0x04]: C0x00cd.0x0.0
0x187794…187928 [0x05]: C0x00cd.0x1.0
0x187794…187928 [0x06]: C0x00cd.0x2.0
0x187794…187928 [0x07]: C0x00cd.0x3.0
0x187794…187928 [0x08]: C0x00ce.0x0.0
0x187794…187928 [0x09]: C0x00ce.0x1.0
0x187794…187928 [0x0a]: C0x00ce.0x2.0
0x187794…187928 ]
0x187794…187928 }
0x187928…187abc Dummy {f00=0x00cc, f01=0x0190, f02=» P IDENT REMLEV 03.01.XXX.1 P DDUM KMD08 & P PDIV : P ENTRY LEVOPR H P ENTRY LEVRD ^ P ENTRY VARRD r P ENTRY VARWRT P ENTRY GETNXT P ENTRY IDXGET P ENTRY LEVDEL P ENTRY SETIDX P ENTRY LEVSPG
0x187abc…187c50 Dummy {f00=0x00cc, f01=0x0190, f02=»N P EXT RAREAD P EXT RAWRIT P EXT RADEL 2 P EXT SETKEY D P EXT SPERR X P EXT SPLIN8 j P EXT CLEAR8 ~ P EXT TRREAD P EXT TXTRD P EXT KBTEST P EXT TRINIT P EXT REPL00 P EXT WAITF P E
0x187c50…187de4 Dummy {f00=0x00cc, f01=0x0190, f02=»* PLEVIN00 P MOVE SPKEY,CBIN2 P MOVE GSWSTR9,='STRAKSLEV' 4 P MOVE GTLEVNR,GTREGF(CBIN2) V P CLEAR GTSPGFLG z P CLEAR GTDYFLG P CLEAR GTSWFLAG P SET SPPROMPT P PERF FMTREM,CBIN3 P PERF SPCLRA ( P IB
0x187de4…187f78 Dummy {f00=0x00cc, f01=0x0190, f02=»TLEVNVN,GSWBIN7 P MOVE GSWBIN7,=W'32' " P PERF REPL00,GTLEVADR,GSWBIN7 4 P PERF REPL00,GTLEVBY,CBIN20 Z P PERF REPL00,GTLEVPDI,CBIN13 ~ P CMP CBIN0,CBIN0 P B LEVIN99 PLEVIN95 P PERF SETKEY P CMP CBIN0,CBIN1 P
0x187f78…18810c Dummy {f00=0x00cc, f01=0x0190, f02=»THE PROCEDURE CREATES A LEVERAND R. * P* ALL DISKFILES CONCERNED ARE UPDATED, , * P* AS WELL AS THE MASTERINDEX IN CORE. Z P* . P***************************************** POPR000 P MOVE SPKEY,CBIN2 , P MOVE GTLEVDAT,CMASKDAT SET
0x18810c…1882a0 Dummy {f00=0x00cc, f01=0x0190, f02=»AT r P PERF SPCLRA WRITE ON SCREEN " P IB SPBINW2,OPROK,OPROK,OPR010 . P B OPR000 T POPR010 LOOK FOR NUMBER f ( P PERF IDXGET,GTLEVNR,GSWBIN4,GSWBIN5 P GSWBIN5 - LEVINDX P GSWBIN4 - INDEX P BERR OPRNOK DISKERROR P B
0x1882a0…188434 (0, 497) Dummy {f00=0x00cc, f01=0x0190, f02=»LEAR GTDYFLG P PERF FMTREM,CBIN3 P PERF SPCLRN . $ P IB SPBINW2,OPR000,OPR000,OPR030 B P B OPR015 j & POPR020 NOT FOUND, DISPLAY BLANKS | P CBL GTLEVNR,=D'19',OPR000 P CLEAR GTSWFLAG P CLEAR GTDYFLG P PERF FMTREM,CBIN3
0x188434…1885c8 Dummy {f00=0x00cc, f01=0x0190, f02=»* FIELD CHECK 2 P* IF BFO = 2,3,7,8 GIRONR MUST BE PRESENT P MOVE GSWBIN1,GTLEVBFO P P IB GSWBIN1, C n , P OPR040,OPR035,OPR035,OPR040,OPR040, C " P OPR040,OPR035,OPR035,OPR040 P B OPR040 POPR035 P CBG GTLEVGI
0x1885c8…18875c Dummy {f00=0x00cc, f01=0x0190, f02=»,GSWBIN5 t P BERR OPROK P BNOK OPR050 $ P ALREADY EXISTING 8 P PERF LEVWRT WRITE STAM-INFO T P BNOK OPRNOK x P B OPR000 POPR050 CREATE NEW " P PERF IDXINS INSERT NEW INDEX P BNOK OPR000 P PERF LEVWRT P
0x18875c…1888f0 Dummy {f00=0x00cc, f01=0x0190, f02=» P POPR070 SOMETHING WRONG , P PERF IDXDEL DELETE LEV-ENTRY COMPLETELY , P B OPR000 POPRNOK n P PERF SETKEY | P CMP CBIN1,CBIN0 NOT OK P RET POPROK P PERF SETKEY P CMP CBIN0,CBIN0 P RET P PEND
0x1888f0…188a84 Dummy {f00=0x00cc, f01=0x018e, f02=» P SET GTDYFLG 1. TIME $ P PERF FMTREM,CBIN3 ATTACH FORMAT P PERF SPCLRA WRITE ON SCREEN H " P IB SPBINW2,DELOK,DELOK,DEL010 l P B DEL000 PDEL010 LOOK FOR NO 6 P CBL GTLEVNR,=D'19',DELNOK DONT DELETE SYSTEMLEV'S ( P PERF IDXGET,G
0x188a84…188c18 Dummy {f00=0x00cc, f01=0x0190, f02=» & P I.E. REFERENCES TO TRANSFILE ? P OK, MAY BE DELETED . P PERF LEVRD READ STAMOPL L , P PERF VARRD READ VARIABLE INFO TO CHECK l P IF DELETION ALLOWED P SET GTSWFLAG 4 P CBG GTTRKEY,CBIN0,DEL020 ANY TRANS REFERENCE ? P
0x188c18…188dac Dummy {f00=0x00cc, f01=0x0190, f02=»T l P CLEAR GTSWFLAG PDEL030 " P CLEAR GTDYFLG 0 P SET GTSPGFLG F P PERF FMTREM,CBIN3 P PERF SPCLRN v P CLEAR GTSPGFLG $ P IB SPBINW2,DEL000,DEL000,DEL050 P B DEL030 PDEL050 * P TBT GTSWFLAG,DELOK F=NO TRANS
0x188dac…188f40 Dummy {f00=0x00cc, f01=0x0190, f02=»LOK P PERF SETKEY P CMP CBIN0,CBIN0 P RET 8 P PEND D P R P EJECT Z PLEVRD PROC h P********** z P* . P* READ AND UNPACK LEVERAND INFORMATION " P* FOR LEVERAND NO GTLEVNR P* P**********
0x188f40…1890d4 (0, 498) Dummy {f00=0x00cc, f01=0x0190, f02=» P BERR LEVRNOK DISK ERROR P BNOK LEVRNOK NOT FOUND $ P FOUND D P READ LEV T & P MOVE GSWBIN4,=W'128' RECORD SIZE h P MOVE CLEVBUF,CBLANKS 4 P PERF RAREAD,DK08,=D'8',CLEVBUF,GSWBIN4,GSWBIN5 P BNOK LEVRNOK P* UNPA
0x1890d4…189268 Dummy {f00=0x00cc, f01=0x0190, f02=»EVR030 z P MOVE GTLEVNR,GSWBCD7 P NOT CORRECT RECORD , P B LEVRNOK J PLEVR030 2 P PERF XCOP,GTLEVNVN,=W'0',=W'30',CLEVBUF,=W'6' l 4 P PERF XCOP,GTLEVADR,=W'0',=W'32',CLEVBUF,=W'36' 2 P PERF XCOP,GTLEVBY,=W'0',=W'20',CLEVBUF,=W'68'
0x189268…1893fc Dummy {f00=0x00cc, f01=0x0190, f02=»0' ~ " P PERF REPL00,GTLEVNVN,GSWBIN7 P MOVE GSWBIN7,=W'32' 0 " P PERF REPL00,GTLEVADR,GSWBIN7 L P PERF REPL00,GTLEVBY,CBIN20 r P PERF REPL00,GTLEVPDI,CBIN13 4 P PERF XCOP,GTLEVBFO,=W'0',=W'1',CLEVBUF,=W'104' 2 P PERF XCOP,GTLEVGI,=W'
0x1893fc…189590 Dummy {f00=0x00cc, f01=0x018e, f02=»,GTLEVDAT,=W'1',=W'3',CLEVBUF,=W'115' P* . " P CLEAR CLEVFLG RELEASE BUFFER 8 P CMP CBIN0,CBIN0 OK ^ P RET z P* PLEVRNOK " P CLEAR CLEVFLG RELEASE BUFFER P CMP CBIN1,CBIN0 NOK P RET P PEND P EJECT
0x189590…189724 Dummy {f00=0x00cc, f01=0x018e, f02=» t P* P********** P* $ P PERF WAITF,CLEVFLG . P* PACK LEV INFO J P MOVE CLEVBUF,CBLANKS f 0 P PERF XCOP,CLEVBUF,=W'0',=W'6',GTLEVNR,=W'0' 2 P PERF XCOP,CLEVBUF,=W'6',=W'30',GTLEVNVN,=W'0' 4 P PERF XCOP,CLEVBUF,=W'36',
0x189724…1898b8 Dummy {f00=0x00cc, f01=0x018e, f02=» 4 P PERF XCOP,CLEVBUF,=W'91',=W'13',GTLEVPDI,=W'0' 4 P PERF XCOP,CLEVBUF,=W'104',=W'1',GTLEVBFO,=W'0' < 2 P PERF XCOP,CLEVBUF,=W'105',=W'4',GTLEVGI,=W'0' t 4 P PERF XCOP,CLEVBUF,=W'109',=W'6',GTLEVALT,=W'0' P MOVE GTLEVDAT,CMASKDAT 4 P PERF
0x1898b8…189a4c Dummy {f00=0x00cc, f01=0x0190, f02=» z P GSWBIN4 INDEX P BERR LEVWNOK DISK ERROR " P BNOK LEVWNOK NOT FOUND B P FOUND b , P PERF RAWRIT,DK08,=D'8',CLEVBUF,GSWBIN5 r P BNOK LEVWNOK P* " P CLEAR CLEVFLG RELEASE BUFFER P CMP CBIN0,CBIN0 OK P RET
0x189a4c…189be0 Dummy {f00=0x00cc, f01=0x0190, f02=» P* PLEVINT PROC P********** " P* 4 ( P* INITIATE STAM INFORMATION FOR > P* LEVERAND NR GTLEVNR j P* P********** P* P MOVE GTLEVNVN,CBLANKS P MOVE GTLEVADR,CBLANKS P MOVE GTLEVBY,CBLANKS
0x189be0…189d74 (0, 499) Dummy {f00=0x00cc, f01=0x0190, f02=»0' ~ P MOVE GTLEVDAT,CMASKDAT P RET * P PEND 6 P EJECT D P* R PLEVSPG PROC 0 P******************************************* p P* $ P* PROCEDURE FOR FORESP RGSEL P] P* LEVERAND RER P* 0 P******************
0x189d74…189f08 Dummy {f00=0x00cc, f01=0x018e, f02=» SET GTDYFLG FORESPG * P TBF GTCYFLG,LSPG005 I CYKEL/STABEL ? & P TBT GTBDTFLG,LSPG003 YES, BUNDT ? J " P TBF GTSTRFLG,LSPG005 STRAKS ? t PLSPG003 : P MOVE GTLEVNR,GTDUPF(CBIN2) CYKEL/STABEL,STRAKS/BUNDT P B LSPG010 PLSPG005 $
0x189f08…18a09c Dummy {f00=0x00cc, f01=0x0190, f02=» PLSPG010 ( P PERF IDXGET,GTLEVNR,GSWBIN4,GSWBIN5 P GSWBIN5 - LEVINDX @ P GSWBIN4 INDEX P BERR LSPGNOK DISK ERROR v P BNOK LSPGNOK NOT FOUND P* LEV NR GTLEVNR FOUND P PERF LEVRD READ STAMINFO P BNOK LSPGNOK
0x18a09c…18a230 Dummy {f00=0x00cc, f01=0x0190, f02=» P PERF FMTREM,CBIN3 P PERF SPCLRN ( P IB SPBINW2,LSPG000,LSPG000,LSPG100 2 P B LSPG015 ^ * PLSPG100 OK CONTINUE TO VARIABLE INFO p P TBT GTVDUFLG,LSPG200 $ P PERF FMTREM,CBIN4 VARIABLE INFO P PERF SPCLRN ( P IB SPBINW2,LSPG
0x18a230…18a3c4 Dummy {f00=0x00cc, f01=0x0190, f02=»IN8,GTTRKEY POINTER TO FIRST TRANS PLSPG205 * P CLEAR GTSWFLAG : P PERF TRREAD,GSWBIN8 R P BNOK LSPG500 n , P MOVE GSWBIN8,GTDUPF(CBIN15) MOVE TEXTNR P CBE GSWBIN8,CBIN0,LSPG210 $ P PERF TXTRD,GSWBIN8 AND READ IT P B LSPG210
0x18a3c4…18a558 Dummy {f00=0x00cc, f01=0x0190, f02=»SPG210 PLSPG300 P MOVE GSWBIN8,GTDUPF(CBIN22) 2 P CBE GSWBIN8,CBIN0,LSPG500 TRANS' EXHAUSTED ? B P B LSPG205 NO, GET NEXT x PLSPG500 P TBF GTCYFLG,LSPG510 P TBT GTBDTFLG,LSPGOK P TBT GTSTRFLG,LSPGOK PLSPG510
0x18a558…18a6ec Dummy {f00=0x00cc, f01=0x0190, f02=»* P EJECT PLEVPRT PROC P********** , P* > P* PRINT LEVERANDS H P* f P********** p P TBT GTGTPFLG,LPRT000 P TBF GTLPFLG,LPRTRET PLPRT000 P SET SPPROMPT P PERF FMTREM,CBIN6 P CLEAR GTZER
0x18a6ec…18a880 Dummy {f00=0x00cc, f01=0x0190, f02=»RT015 P CBNL GTPRTFRA,=D'1',LPRT020 ( P MOVE GTPRTFRA,=D'15' FIRST LEV - 1 2 PLPRT020 ^ $ P CBNL GTPRTTIL,GTPRTFRA,LPRT030 n 0 P MOVE GTPRTTIL,=D'9999999999' LAST TO PRINT PLPRT030 P CLEAR GTSWFLAG P SET GTDYFLG P C
0x18a880…18aa14 (0, 500) Dummy {f00=0x00cd, f01=0x0190, f02=»RM FEED z PLPRT045 , P MOVE GSWBCD6,GTPRTDAT GTPRTDAT: DDMMYY P PERF CHDATO P , P MOVE GTPRTDAT,GSWBCD7 GTPRTDAT: YYMMDD d 2 P MOVE GTLEVNR,GTPRTFRA SET FIRST NO. TO PRINT PLPRT049 P PERF GETNXT P BNOK LPRTRET PLPRT
0x18aa14…18aba8 Dummy {f00=0x00cd, f01=0x0190, f02=»DMMYY n P PERF CHDATO GSWBCD7: YYMMDD " P CBL GSWBCD7,GTPRTDAT,LPRT100 2 P TBF GTDYFLG,LPRT080 X P PERF VARRD t P BNOK LPRT110 PLPRT080 P* FLIP FLOP FOR LINEFEEDS P TBT GTSWFLAG,LPRT085 P SET GTSWFLAG P B L
0x18aba8…18ad3c Dummy {f00=0x00cd, f01=0x0190, f02=»PRT100 PLPRT095 P EDWRT DSHCLP,FLEVPRT LP PLPRT100 TO NEXT > P TBF GTDYFLG,LPRT110 X P TBF GTZERO,LPRT110 t P MOVE GTREGF(CBIN12),=D'0' * P PERF VARWRT REWRITE WITH SALE YTD = 0 P BNOK LPRTRET PLPRT110 P P
0x18ad3c…18aed0 Dummy {f00=0x00cd, f01=0x0190, f02=»PROC P********** ! P* ! . P* READ AND UNPACK VARIABLE INFORMATION ! ( " P* FOR LEVERAND NR GTLEVNR ! Z P* ! P********** ! P* ! P PERF WAITF,CVARFLG ! ( P PERF IDXGET,GTLEVNR,GSWBIN4,GSWBIN5 ! P GSWBIN5 LEV INDEX !
0x18aed0…18b064 Dummy {f00=0x00cd, f01=0x0190, f02=»D SIZE ! v P MOVE CVARBUF,CBLANKS " 4 P PERF RAREAD,DK09,=D'9',CVARBUF,GSWBIN4,GSWBIN5 " , P BNOK VARRNOK " d P* UNPACK VAR INFO " z & P MOVE GSWBCD7,GTLEVNR STORE LEVNR " 2 P PERF XCOP,GTLEVNR,=W'0',=W'6',CVARBUF,=W'0' " P CBE GTLEVNR,GSW
0x18b064…18b1f8 Dummy {f00=0x00cd, f01=0x0190, f02=»VING FIELD " n 0 P PERF XCOP,GSWBCD7,=W'4',=W'3',CVARBUF,=W'6' # * P MOVE GTREGF(CBIN10),GSWBCD7 UDB DATO # F 0 P PERF XCOP,GSWBCD7,=W'0',=W'7',CVARBUF,=W'9' # t * P MOVE GTREGF(CBIN11),GSWBCD7 UDB BELOB # 2 P PERF XCOP,GSWBCD7,=W'0',=W'7',CVARBUF,=W'16' #
0x18b1f8…18b38c Dummy {f00=0x00cd, f01=0x0190, f02=»DEBET # n 2 P PERF XCOP,GSWBCD7,=W'0',=W'7',CVARBUF,=W'30' $ , P MOVE GTREGF(CBIN15),GSWBCD7 VENT KREDIT $ D . P MOVE GTREGF(CBIN16),GSWBCD7 SKYLDIGT BEL. $ t & P ADD GTREGF(CBIN16),GTREGF(CBIN14) $ P MOVE GSWBCD7,=D'1' SET SIGN $ 2 P PERF XCOP,GSWBCD7,=
0x18b38c…18b520 Dummy {f00=0x00cd, f01=0x0190, f02=»LEAR CVARFLG RELEASE BUFFER $ P CMP CBIN0,CBIN0 OK % $ P RET % @ P* % L PVARRNOK % V " P CLEAR CVARFLG RELEASE BUFFER % f P CMP CBIN1,CBIN0 NOK % P RET % P PEND % P EJECT % P* % PVARWRT PROC % P********** % P* % 2
0x18b520…18b6b4 (0, 501) Dummy {f00=0x00cd, f01=0x0190, f02=»ITF,CVARFLG % $ P* PACK VARIABLE INFORMATION & P MOVE CVARBUF,CBLANKS & < 2 P PERF XCOP,CVARBUF,=W'0',=W'6',GTLEVNR,=W'0' & Z * P MOVE GSWBCD7,GTREGF(CBIN10) UDB DATO & 0 P PERF XCOP,CVARBUF,=W'6',=W'3',GSWBCD7,=W'4' & * P MOVE GSWBCD7,GTREGF(C
0x18b6b4…18b848 Dummy {f00=0x00cd, f01=0x0190, f02=»UF,=W'16',=W'7',GSWBCD7,=W'0' & , P MOVE GSWBCD7,GTREGF(CBIN14) VENT DEBET ' & 2 P PERF XCOP,CVARBUF,=W'23',=W'7',GSWBCD7,=W'0' ' V , P MOVE GSWBCD7,GTREGF(CBIN15) VENT KREDIT ' 2 P PERF XCOP,CVARBUF,=W'30',=W'7',GSWBCD7,=W'0' ' * P MOVE GSWBCD7,GTREGF(C
0x18b848…18b9dc Dummy {f00=0x00cd, f01=0x0190, f02=» WRITE ' ( P PERF IDXGET,GTLEVNR,GSWBIN4,GSWBIN5 ( P GSWBIN5 LEV INDEX ( < P GSWBIN4 INDEX ( Z P BERR VARWNOK DISK ERROR ( t P BNOK VARWNOK NOT FOUND ( P FOUND ( , P PERF RAWRIT,DK09,=D'9',CVARBUF,GSWBIN5 ( P BNOK VARWNOK (
0x18b9dc…18bb70 Dummy {f00=0x00cd, f01=0x0190, f02=»SE BUFFER ( | P CMP CBIN1,CBIN0 NOK ) P RET ) . P PEND ) : P EJECT ) H P* ) V PVARINT PROC ) ` P********** ) t P* ) $ P* INITIATE VARIABLE INFO FOR ) P* LEVERAND NR GTLEVNR ) P* ) P********** ) ( P MOVE GTREGF(CBIN1
0x18bb70…18bd04 Dummy {f00=0x00cd, f01=0x0190, f02=»0' VENT DEBET ) x * P MOVE GTREGF(CBIN15),=D'0' VENT KREDIT * ( P MOVE GTREGF(CBIN13),=D'0' VAL DATO * D & P MOVE GTTRKEY,CBIN0 TRANS POINTER * p P RET * P PEND * P EJECT * P * P * " PIDXGET PROC LEVNR,INDX,LEVDEX * 0 P****************
0x18bd04…18be98 Dummy {f00=0x00cd, f01=0x0190, f02=»OUND - CONDITION REGISTER IS SET TO OK * , P* INDX INDEX IN INDEXFILE + . " P* LEVDEX INDEX LEV + ^ P* + : P* IF NOT FOUND - CONDITION REGISTER IS SET TO NOK = 1 + 2 P* INDX INDEX TO PLACE TO INSERT + P*
0x18be98…18c02c Dummy {f00=0x00cd, f01=0x0190, f02=» LEVDEX =0 + P* , 0 P******************************************** , P MOVE GSWBIN5,CBIN0 GROUP , T P MOVE GSWBIN4,CBIN0 RECORD , v PIGET010 , P ADD GSWBIN4,=W'48' , ( P ADD GSWBIN5,CBIN1 ASEARCH FOR GROUP , 2 P CBG GSWBIN4,CIXLAST,IGE
0x18c02c…18c1c0 Dummy {f00=0x00cd, f01=0x0190, f02=»MASTER ? , d P B IGET030 TRY NEXT - PIGET020 NOT FOUND - , & P MOVE INDX,CIXFREE PLACE TO INSERT - H P MOVE LEVDEX,CBIN0 - r P CMP CBIN1,CBIN0 NOK - P RET - P - PIGET030 GROUP FOUND - P LEVNR WITHIN THIS GROUP - P GROUP GSW
0x18c1c0…18c354 (0, 502) Dummy {f00=0x00cd, f01=0x0190, f02=»ARY SEARCH - z . P MOVE GTSCHLOW,CBIN1 LOWER LIMIT- GTSCHLOW . 0 P MOVE GTSCHHGH,=W'48' UPPER LIMIT - GTSCHHGH . D PIGET110 . x : P CBL GTSCHHGH,GTSCHLOW,IGETNOK1 UPPER<LOWER, NOT FOUND . ( P MOVE GTSCHMID,GTSCHLOW INDEX=LOWER . $ P ADD GTSCHMID,GTSCHHGH
0x18c354…18c4e8 Dummy {f00=0x00cd, f01=0x0190, f02=» NUMBER . l P MOVE GSWBIN5,CBIN7 SIZE / P MOVE CIXBUF,CBLANKS / 0 2 P PERF RAREAD,DK07,=D'7',CIXBUF,GSWBIN5,GSWBIN4 / L P BNOK IGET300 / P MOVE GSWBCD7,=D'1' SET SIGN / P MOVE GSWBIN5,CBIN0 / . P XCOPY GSWBCD7,CBIN2,CBIN5,CIXBUF,GSWBIN5 / 2
0x18c4e8…18c67c Dummy {f00=0x00cd, f01=0x0190, f02=»TSCHMID GSWBIN4= START OF SECTOR / P CMP GSWBCD7,LEVNR 0 ( P BE IGET200 FOUND 0 B P BL IGET130 LOOK DOWN 0 P BG IGET120 LOOK UP 0 z PIGET120 0 2 P MOVE GTSCHHGH,GTSCHMID MOVE MIDPOINT TO UPPER 0 P SUB GTSCHHGH,CBIN1 -1 0 P B IGET110 0
0x18c67c…18c810 Dummy {f00=0x00cd, f01=0x018e, f02=»ND 0 0 P ADD GSWBIN4,GTSCHMID GSWBIN4=RECORD NUMBER 1 P MOVE INDX,GSWBIN4 SET INDEX 1 > P MOVE GSWBIN1,CBIN5 1 b . P XCOPY GSWBIN5,CBIN0,CBIN2,CIXBUF,GSWBIN1 1 ~ & P MOVE LEVDEX,GSWBIN5 SET LEV INDX 1 " P CLEAR CIDXFLG RELEASE BUFFER 1 P CMP CBI
0x18c810…18c9a4 Dummy {f00=0x00cd, f01=0x0190, f02=» 1 | & P MOVE INDX,GSWBIN4 PLACE TO INSERT 2 " P CLEAR CIDXFLG RELEASE BUFFER 2 2 P CMP CBIN1,CBIN0 NOK 2 X P RET 2 t PIGET300 SET COND = ERR 2 P MOVE LEVDEX,CBIN0 2 P MOVE INDX,CBIN0 2 " P CLEAR CIDXFLG RELEASE BUFFER 2 P CMP CBIN0,CBIN1
0x18c9a4…18cb38 Dummy {f00=0x00cd, f01=0x0190, f02=»E 2 p P* 3 P********** 3 ( P PERF IDXGET,GTLEVNR,GSWBIN4,GSWBIN5 3 & P GSWBIN5 LEV INDEX 3 R P GSWBIN4 INDEX 3 p P BERR XINSNOK DISK ERROR 3 P BOK XINSNOK ALREADY PRESENT 3 P* NOT FOUND, INSERT 3 P PERF WAITF,CIDXFLG 3 (
0x18cb38…18cccc Dummy {f00=0x00cd, f01=0x0190, f02=»,DK07,=D'7',CIXBUF,GSWBIN1,CIXFREE 3 0 P PERF XCOP,GSWBIN7,=W'0',=W'2',CIXBUF,=W'5' 4 * ( P MOVE GSWBIN4,CIXFREE START OF LOOP 4 ^ & P ADD CIXFREE,CBIN1 NEW FIRST FREE 4 P* 4 PXINS100 4 * P SUB GSWBIN4,CBIN1 RECORD TO BE MOVED 4 , P CBL GSWBIN4
0x18cccc…18ce60 Dummy {f00=0x00cd, f01=0x0190, f02=»K XINSNOK 4 P ADD GSWBIN4,CBIN1 5 * P PERF RAWRIT,DK07,=D'7',CIXBUF,GSWBIN4 5 , P BNOK XINSNOK 5 Z $ P PERF RESTIX RESET MASTER INDEX 5 p P SUB GSWBIN4,CBIN1 5 P B XINS100 5 P* 5 PXINS200 5 ( P* ALL MOVED, INSERT LEVNR+INDEX 5 0
0x18ce60…18cff4 (0, 503) Dummy {f00=0x00cd, f01=0x0190, f02=»,GSWBIN8 5 r . P MOVE GSWBIN4,GSWBIN8 PLACE FOR INSERTION 6 P PERF RESTIX 6 B " P CLEAR CIDXFLG RELEASE BUFFER 6 V P CMP CBIN0,CBIN0 OK 6 | P RET 6 PXINSNOK 6 " P CLEAR CIDXFLG RELEASE BUFFER 6 P CMP CBIN1,CBIN0 NOK 6 P RET 6 P PEND
0x18cff4…18d188 Dummy {f00=0x00cd, f01=0x0190, f02=»LEV-REGISTER 6 t , P* IF INDEX EMPTY, SET UP ALL ENTRIES AND 7 P* INITIATE SPECIAL ENTRIES 7 D P* 7 f P* SETS: 7 p $ P* CIXLAST - LAST RECORD NO. 7 $ P* CIXFREE - FIRST FREE ENTRY 7 P* 7 * P************************************** 7
0x18d188…18d31c Dummy {f00=0x00cd, f01=0x0190, f02=»SWBIN4 7 h ( P CBE GTWBCD1,=D'4',SIDX005 NO DATA ? 8 P MOVE GSWBIN5,CBIN0 8 : @ P MATCH CIXBUF,GSWBIN5,CBIN2,CBLANKS,CBIN0,CBIN2 1.LEV=BLANK 8 V P BE SIDX005 8 P MOVE GSWBIN5,CBIN0 8 P MOVE GSWBCD7,=D'1' > 0 8 8 P XCOPY GSWBCD7,CBIN2,CBIN5,CIX
0x18d31c…18d4b0 Dummy {f00=0x00cd, f01=0x0190, f02=»* INITIATE INDEX FILE WITH BLANK ENTRIES 8 P MOVE GSWBIN4,CBIN0 9 0 PSIDX050 9 L P MOVE GTWBCD2,GSWBIN4 9 P PERF SPLIN8,CBIN10,CBIN3 9 z P ADD GSWBIN4,CBIN1 9 & P MOVE CIXBUF,CBLANKS CLEAR BUFFER 9 P MOVE GSWBIN5,CBIN0 9 8 P XCOPY CIXBU
0x18d4b0…18d644 Dummy {f00=0x00cd, f01=0x0190, f02=»000000 9 z ( P* LOOP THROUGH INDEX FILE TO SET UP : ( P* MASTER INDEX IN CORE, AND TO FIND : : P* SIZE OF INDEX FILE : f PSIDX100 : P MOVE CIXLAST,CBIN0 : P MOVE CIXFREE,CBIN0 : P MOVE GSWBIN4,CBIN1 : PSIDX110 : P MOVE GTWBCD2,GSWB
0x18d644…18d7d8 Dummy {f00=0x00cd, f01=0x0190, f02=»BIN5,GSWBIN4 READ RECORD : n , P CBE GTWBCD1,=D'4',SIDX130 FILE EXPANDED ; . P CBE GTWBCD1,=D'10',SIDX130 END OF DEVICE ; P P MOVE GSWBIN5,CBIN0 ; 4 P MATCH CIXBUF,GSWBIN5,CBIN2,CBLANKS,CBIN0,CBIN2 ; P BE SIDX130 FIRST FREE ; P PERF RESTIX ; P
0x18d7d8…18d96c Dummy {f00=0x00cd, f01=0x0190, f02=»N1 LAST USED ENTRY ; P CBE GSWBIN4,CBIN0,SIDX140 < P MOVE GSWBIN5,CBIN7 < < P MOVE CIXBUF,CBLANKS < X 2 P PERF RAREAD,DK07,=D'7',CIXBUF,GSWBIN5,GSWBIN4 < t PSIDX140 < P PERF RESTIX < P PERF CLEAR8 < P PERF INITIX < P RET < P PEND
0x18d96c…18db00 Dummy {f00=0x00cd, f01=0x0190, f02=» ( P* INDEXFILE, STAM, AND VAR FILE = P* = 0 P********** = : P* = L ( P PERF IDXGET,GTLEVNR,GSWBIN4,GSWBIN5 = V P GSWBIN5 LEV INDX = P GSWBIN4 INDEX = P BERR XDELNOK DISK ERROR = P BNOK XDELNOK NOT FOUND = P* FOUND =
0x18db00…18dc94 (0, 504) Dummy {f00=0x00ce, f01=0x0190, f02=» = & P MOVE GSWBIN7,GSWBIN5 KEEP LEVDEX > PXDEL100 > 2 * P ADD GSWBIN4,CBIN1 NEXT RECORD TO MOVE > B " P CBNL GSWBIN4,CIXFREE,XDEL200 > p P MOVE GSWBIN1,CBIN7 LENGTH > 2 P PERF RAREAD,DK07,=D'7',CIXBUF,GSWBIN1,GSWBIN4 > P BNOK XDELNOK > $ P SUB
0x18dc94…18de28 Dummy {f00=0x00ce, f01=0x0190, f02=»,CBIN1 > P B XDEL100 ? P* ? PXDEL200 INSERT NEW FREE ? * P SUB CIXFREE,CBIN1 ? L P MOVE CIXBUF,CBLANKS ? f 0 P PERF XCOP,CIXBUF,=W'5',=W'2',GSWBIN7,=W'0' ? * P PERF RAWRIT,DK07,=D'7',CIXBUF,CIXFREE ? P MOVE GSWBIN4,CIXFREE ? P SUB G
0x18de28…18dfbc Dummy {f00=0x00ce, f01=0x0190, f02=»SED HAS BEEN READ ? PERF RESTIX @ " CLEAR CIDXFLG RELEASE BUFFER @ . CMP CBIN0,CBIN0 OK @ T RET @ p * @ | XDELNOK @ " CLEAR CIDXFLG RELEASE BUFFER @ CMP CBIN1,CBIN0 NOK @ P RET @ P PEND @ P EJECT @ @
0x18dfbc…18e150 Dummy {f00=0x00ce, f01=0x0190, f02=»**** @ f A ( # MOVE GSWBIN3,GSWBIN4 FIND GROUP NO A P ADD GSWBIN3,=W'47' A @ * P DIV GSWBIN3,=W'48' GSWBIN3 = GROUP NO A P SUB CIXFREE,CBIN1 LAST USED A * P CBE GSWBIN4,CIXFREE,RIX090 LAST USED A " P ADD CIXFREE,CBIN1 FIRST FREE A 2 . CBE G
0x18e150…18e2e4 Dummy {f00=0x00ce, f01=0x018e, f02=»SWBIN4 A * % BNE RIXOK FINISHIF NOT LAST IN GROUP B & ! MOVE GSWBIN5,CBIN0 LAST IN GROUP B < $ MOVE GSWBCD7,=D'1' SET SIGN = + B f : P XCOPY GSWBCD7,CBIN2,CBIN5,CIXBUF,GSWBIN5 GET LAST NO B " MOVE CIXINDX(GSWBIN3),GSWBCD7 B B RIXOK B PRIX090
0x18e2e4…18e478 Dummy {f00=0x00ce, f01=0x0190, f02=» $ MOVE GSWBCD7,=D'1' SET SIGN = + C . P XCOPY GSWBCD7,CBIN2,CBIN5,CIXBUF,GSWBIN5 C , 4 / MOVE CIXINDX(GSWBIN3),GSWBCD7 SET MASTER INDEX C ^ " RIX120 SET REMAINING INDICES C P CBG CIXLAST,CBIN0,RIX135 C PRIX125 C P ADD GSWBIN5,CBIN1 C P M
0x18e478…18e60c Dummy {f00=0x00ce, f01=0x0190, f02=»TWBCD1,=D'4',RIX155 FILE EXPANDED C P B RIX125 D * RIX130 D < P SUB GSWBIN5,CBIN1 D J 2 P MOVE CIXLAST,GSWBIN5 LAST ENTRY IN INDEX FILE D d PRIX135 D P MOVE GSWBIN5,CIXLAST D P ADD GSWBIN5,=W'47' D " P DIV GSWBIN5,=W'48' LAST GROUP D
0x18e60c…18e7a0 Dummy {f00=0x00ce, f01=0x0190, f02=»0 D PRIX150 E P ADD GSWBIN5,CBIN1 E PRIX155 E 2 & P MOVE CIXBUF,CBLANKS CLEAR BUFFER E @ P MOVE GSWBIN1,CBIN0 E j 8 P XCOPY CIXBUF,CBIN5,CBIN2,GSWBIN5,GSWBIN1 SET INDEX E * P PERF RAWRIT,DK07,=D'7',CIXBUF,GSWBIN5 E P BOK RIX150 E P B R
0x18e7a0…18e934 (0, 505) Dummy {f00=0x00ce, f01=0x0190, f02=»**************** E x * F P* SET UP INDEXFILE 1. TIME F " * P* CHECK IF SYSTEM DEFINED ENTRIES F D ( P* ARE PRESENT, ELSE INSERT THEM F r * F . P* NEXT 15 RECORDS, LEV 1-15, POINTS TO F * P* DIFFERENT SYSTEM DEFINED LISTS, F P
0x18e934…18eac8 Dummy {f00=0x00ce, f01=0x0190, f02=»ERF IDXGET,GTLEVNR,GSWBIN4,GSWBIN5 F P GSWBIN5 LEV INDEX G * P GSWBIN4 INDEX G H P BERR INITNOK DISK ERROR G b & P BNOK INIT100 NOT FOUND, INITIATE G P B INITOK G P* G PINIT100 G ( P* INSERT SYSTEM DEFINED ENTRIES G P CBG
0x18eac8…18ec5c Dummy {f00=0x00ce, f01=0x0190, f02=» P PERF LEVWRT H P PERF VARINT H P PERF VARWRT H , P BNOK INIT200 H @ PINIT150 H V P ADD GTLEVNR,=D'1' H f P B INIT100 H P* H PINIT200 H P PERF IDXDEL H P B INIT150 H P* H PINITNOK H P CMP CBIN1,CBIN0 NOK H P
0x18ec5c…18edf0 Dummy {f00=0x00ce, f01=0x0190, f02=» P PERF TRINIT I P BNOK INITNOK I P CMP CBIN0,CBIN0 OK I . RET I J PEND I V I d P EJECT I l P* I z PGETNXT PROC I & P********************************* I P* I * P* GET LEVNR FOR LEV FOLLOWING GTLEVNR I P* I & P****
0x18edf0…18ef84 Dummy {f00=0x00ce, f01=0x018e, f02=»,CBIN1 NOT FOUND I PGNXT100 J P PERF WAITF,CIDXFLG J ( P ADD GSWBIN4,CBIN1 J D " P CBNL GSWBIN4,CIXFREE,GNXTNOK J ^ P MOVE GSWBIN1,CBIN7 J P MOVE CIXBUF,CBLANKS J 2 P PERF RAREAD,DK07,=D'7',CIXBUF,GSWBIN1,GSWBIN4 J P BNOK GNXTNOK J P
0x18ef84…18f118 Dummy {f00=0x00ce, f01=0x0190, f02=» PGNXTNOK K P CLEAR CIDXFLG K P CMP CBIN1,CBIN0 K * P RET K B P PEND K N P EJECT K PCHDATO PROC K j P********** K ~ P* K & P* CHANGES GSWBCD6 (DDMMYY) TO K P* GSWBCD7 (YYMMDD) K P* K P********** K P MOVE GS
0x18f118…18f2ac Dummy {f00=0x00ce, f01=0x0190, f02=»F XCOP,GSWBCD7,=W'4',=W'1',GSWBCD6,=W'6' K P RET L 0 P PEND L < P* L J , PXCOP PROC TO,$TOPNT,$SIZE,FROM,$FROMPNT L T P PLIT $TOPNT L P PLIT $SIZE L P PLIT $FROMPNT L P* L P* FUNCTION XCOPY: L @ P* THE PROCEDURE COPIES FRO
0x18f2ac…18f440 Dummy {f00=0x00ce, f01=0x018e, f02=» 2 P MOVE GSWBIN1,$TOPNT START OF RECEIVING FIELD M P MOVE GSWBIN4,$SIZE LENGTH M : 2 P MOVE GSWBIN5,$FROMPNT START OF SENDING FIELD M * P XCOPY TO,GSWBIN1,GSWBIN4,FROM,GSWBIN5 M P RET M P PEND M M P EJECT M $ PFLEVPRT FRMT PRINT OF L
0x18f440…18f5d4 (0, 506) Dummy {f00=0x00ce, f01=0x018e, f02=» P FILLR ' ',14 N P FMEL '99E-99E-99',GTLEVDAT N P FNL N > P FILLR ' ',18 N J P FCOPY GTLEVNVN N ` P FNL N x P FILLR ' ',18 N P FCOPY GTLEVADR N P FNL N P FILLR ' ',18 N P FCOPY GTLEVBY N P FNL N P FILLR ' ',18 N
0x18f5d4…18f768 Dummy {f00=0x00ce, f01=0x0190, f02=» P FILLR ' ',2 O P FMEL 'XXXXXXX',GTLEVGI O P FILLR ' ',2 O 8 P FMEL 'XXXXXXXXXX',GTLEVALT O L P FNL O p P FNL O | P FBF GTDYFLG,FLEV190 O P FNL O P FILLR ' ',18 O & P FMEL '99E-99E-99',GTREGF(CBIN10) O , P FMEL 'BZZZVZZZVZZ9E,99-
0x18f768…18f8fc Dummy {f00=0x00ce, f01=0x0190, f02=» & P FMEL '99E-99E-99',GTREGF(CBIN13) P P FILLR ' ',8 P . , P FMEL 'BZZZVZZZVZZ9E,99-',GTREGF(CBIN14) P B P FNL P r P FILLR ' ',34 P ~ , P FMEL 'BZZZVZZZVZZ9E,99-',GTREGF(CBIN15) P P FNL P P FILLR ' ',34 P , P FMEL 'BZZZVZZZVZZ9E,99-',GTREGF(C
0x18f8fc…18fa90 Dummy {f00=0x00ce, f01=0x40ac, f02=» PFLEV200 Q P FMEND Q P* Q " P* Q , P* Q 6 PFFEED FRMT Q @ P FILLR '1',2 Q R P FMEND Q f P* Q t P* Q ~ P* Q P* Q P END Q @ Q ',GTREGF(CBIN15) P P FNL P P FILLR ' ',34 P , P FMEL 'BZZZVZZZVZZ9E,99-',GTREGF(C
0x18fa90…18fc24 Dummy {f00=0x00ce, f01=0x2008, f02=» R
0x18fc24…18fdb8 Dummy {f00=0x00ce, f01=0x0190, f02=» F F T2 F ? 6 W l @)? F < F _BH0 4 4 6 b 2 ? < k 8 8 @ < % P k k% n k ' _> ? < 8 8 @ < U% A) 8 H t P P
0x18fdb8…18ff4c Dummy {f00=0x00ce, f01=0x0190, f02=», % P k kI6 % n k ' _F@7 Wt Z Qk Tl k ] PY@ TW" : %% 6 nW k P k% q k ' _T! k W 4 4 % W $ T 4
0x18ff4c…1900e0 Dummy {f00=0x00ce, f01=0x0190, f02=»@ T5 F T* T# T @_W @_W W 4 t " P W ) n W7 P2! t Ww "A T ' T t T T W{ t # $ &m ' 'k@ T@ " _ P t _ ! " P _ '
0x1900e0…190274 (0, 507) Opaque[0x194]
0x190274…190408 # DirEnt {nam=»ADM5 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x19d8, f03=0x0000}
0x190274…190408 IdxSect {
0x190274…190408 f00 = 0x00ce // 0x190274 @0x0
0x190274…190408 f01 = 0x0004 // 0x190276 @0x2
0x190274…190408 gno = [ // 0x190278 @0x4
0x190274…190408 [0x00]: C0x00ce.0x3.0
0x190274…190408 [0x01]: C0x00cf.0x0.0
0x190274…190408 ]
0x190274…190408 }
0x190408…19059c Dummy {f00=0x00ce, f01=0x0190, f02=» IDENT ADM5 04.01.XXX.1 DDUM KMD08 $ PDIV 8 ENTRY A5KONV F EXT A5RET1 EXT A5RET2 p EXT LAMPON EXT LAMPOF EXT ASGVOL EXT RAREAD EXT STRTID EXT WRITID EXT SQWRIT
0x19059c…190730 Dummy {f00=0x00ce, f01=0x018e, f02=» PERF LAMPON,=W'1024' LAMP 1 ON " P DSC1 FD01,LOAD,CBIN7 LOAD IBM ( P BBEOD ADM0535 N P BNOK A5RET1 d PADM0535 x P DSC0 FD01,RWIND $ P PERF LAMPOF,=W'1024' LAMP 1 OFF " P PERF LAMPON,=W'512' LAMP 2 ON P PERF ASGVOL,CBIN2 P
0x190730…1908c4 Dummy {f00=0x00ce, f01=0x0190, f02=» P MOVE GSWBIN6,CBIN1 & P MOVE GSWBIN1,=W'128' READ HEADER 4 P PERF RAREAD,DK02,=D'2',CPCKBUF,GSWBIN1,GSWBIN6 J P BOK ADM0536 & P PERF STRTID,CVOLNO SET UP STRTID P PERF WRITID,CBIN3,CBIN1 P B ADM0540 PADM0536 * P PERF
0x1908c4…190a58 Dummy {f00=0x00ce, f01=0x0190, f02=»BLANKS 2 P COPY CPCKBUF,GSWBIN1,CBIN20,GSWSTR20,GSWBIN6 PADM0540 D $ P PERF SQWRIT,FD01,=D'1',CPCKBUF T P BNOK ADM0568 | P CLEAR CERRORFL ( P MOVE GSWBCD6,=D'0' FOR TEST PURPOSE P MOVE CRECNR,CBIN1 PADM0550 START LOOP
0x190a58…190bec Dummy {f00=0x00ce, f01=0x0190, f02=»K02,=D'2',CPCKBUF,GSWBIN1,CRECNR P BNOK ADM0560 NOT OK ( P TBT CERRORFL,ADM0560 D * P CBE GTWBCD1,=D'4',ADM0565 END OF DATA b P MOVE GSWSTR20,=C'SLUTD' P MOVE GSWBIN5,CBIN0 6 P MATCH GSWSTR20,GSWBIN5,CBIN5,CPCKBUF,CBIN0,CBIN5 & P B
0x190bec…190d80 Dummy {f00=0x00ce, f01=0x0190, f02=» CONVERSION. | , P* CAN ONLY BE USED IN DEBUGGER MODE P MOVE GSWSTR20,=C'&04' D P MOVE GSWBIN5,=W'30' b P MOVE GSWBIN2,CBIN0 ~ 8 P MATCH CPCKBUF,GSWBIN5,CBIN20,GSWSTR20,GSWBIN2,CBIN3 P BNOK ADM0578 P ADD GSWBIN5,CBIN3 P M
0x190d80…190f14 (0, 508) Dummy {f00=0x00cf, f01=0x0190, f02=» MOVE GSWSTR20,GSWBCD5 . P COPY CPCKBUF,GSWBIN5,CBIN5,GSWSTR20,CBIN1 PADM0578 P $ P PERF SQWRIT,FD01,=D'1',CPCKBUF ` P BOK ADM0550 PADM0568 * P PERF LAMPOF,=W'2047' SWITCH OFF LAMPS " P PERF LAMPON,=W'2' LAMP 10 ON P B A5RET
0x190f14…1910a8 Dummy {f00=0x00cf, f01=0x0190, f02=» P B A5RET1 LAMPS ON PADM0560 NOT OK 0 P PERF WRITID,CBIN4,CBIN2 PRINT FIRST PART OF 6 P LAST CORRECT RECORD j P SET SPPROMPT P ATTFMT KONV4FMT P PERF SPCLRA CONTINUE ? 2 P IB SPBINW2,A0561,A0561,A0562,A0563,A0561, C
0x1910a8…19123c Dummy {f00=0x00cf, f01=0x0190, f02=» READ AGAIN P SUB CRECNR,CBIN1 P CLEAR CERRORFL . P B ADM0550 F P* X PA0563 KRE, TRY NEXT b P SET CERRORFL P B ADM0550 P* PA0564 KVIT P CLEAR CERRORFL P B ADM0565 WRITE SLUTD P* P*
0x19123c…1913d0 Dummy {f00=0x00cf, f01=0x0190, f02=» ADM0570 P* P* P* $ P EJECT . P* < P* F 6 P************************************************* P P* P* FORMATS P* 6 P************************************************* P* P* PKO
0x1913d0…191564 Dummy {f00=0x00cf, f01=0x402c, f02=» P FMEND P* P END @ ( P EJECT . P* < P* F 6 P************************************************* P P* P* FORMATS P* 6 P************************************************* P* P* PKO
0x191564…1916f8 Dummy {f00=0x00cf, f01=0x2008, f02=» DM,310,417 @ DDUM KMD08 $ PDIV 8 ENTRY A5KONV F EXT A5RET1 EXT A5RET2 p EXT LAMPON EXT LAMPOF EXT ASGVOL EXT RAREAD EXT STRTID EXT WRITID EXT SQWRIT
0x1916f8…19188c Dummy {f00=0x00cf, f01=0x0190, f02=» D I , L LH I ) L " ' # ! M0 L 0 ^ ^ p b g i j l n s v x
0x19188c…191a20 Dummy {f00=0x00cf, f01=0x0190, f02=» J F " D @ A @ @ 4 L L 4 H H I W R 4 0 R v d 0 0 t < J F " D ) L RW # L I $ i (i i i L! 0 L 0 L J
0x191a20…191bb4 (0, 509) Opaque[0x194]
0x191bb4…191d48 # DirEnt {nam=»ADM5X «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x19e8, f03=0x0000}
0x191bb4…191d48 IdxSect {
0x191bb4…191d48 f00 = 0x00cf // 0x191bb4 @0x0
0x191bb4…191d48 f01 = 0x0004 // 0x191bb6 @0x2
0x191bb4…191d48 gno = [ // 0x191bb8 @0x4
0x191bb4…191d48 [0x00]: C0x00cf.0x1.0
0x191bb4…191d48 [0x01]: C0x00cf.0x2.0
0x191bb4…191d48 ]
0x191bb4…191d48 }
0x191d48…191edc Dummy {f00=0x00cf, f01=0x0190, f02=» IDENT ADM5 04.01.XXX.1 DDUM KMD08 $ PDIV 8 ENTRY A5KONV F EXT A5RET1 EXT A5RET2 p EXT LAMPON EXT LAMPOF EXT ASGVOL EXT RAREAD EXT STRTID EXT WRITID EXT SQWRIT
0x191edc…192070 Dummy {f00=0x00cf, f01=0x018e, f02=» PERF LAMPON,=W'1024' LAMP 1 ON " P DSC1 FD01,LOAD,CBIN7 LOAD IBM ( P BBEOD ADM0535 N P BNOK A5RET1 d PADM0535 x P DSC0 FD01,RWIND $ P PERF LAMPOF,=W'1024' LAMP 1 OFF " P PERF LAMPON,=W'512' LAMP 2 ON P PERF ASGVOL,CBIN2 P
0x192070…192204 Dummy {f00=0x00cf, f01=0x0190, f02=» P MOVE GSWBIN6,CBIN1 & P MOVE GSWBIN1,=W'128' READ HEADER 4 P PERF RAREAD,DK02,=D'2',CPCKBUF,GSWBIN1,GSWBIN6 J P BOK ADM0536 & P PERF STRTID,CVOLNO SET UP STRTID P PERF WRITID,CBIN3,CBIN1 P B ADM0540 PADM0536 * P PERF
0x192204…192398 Dummy {f00=0x00cf, f01=0x0190, f02=»BLANKS 2 P COPY CPCKBUF,GSWBIN1,CBIN20,GSWSTR20,GSWBIN6 PADM0540 D $ P PERF SQWRIT,FD01,=D'1',CPCKBUF T P BNOK ADM0568 | P CLEAR CERRORFL ( P MOVE GSWBCD6,=D'0' FOR TEST PURPOSE P MOVE CRECNR,CBIN1 PADM0550 START LOOP
0x192398…19252c Dummy {f00=0x00cf, f01=0x0190, f02=»K02,=D'2',CPCKBUF,GSWBIN1,CRECNR P BNOK ADM0560 NOT OK ( P TBT CERRORFL,ADM0560 D * P CBE GTWBCD1,=D'4',ADM0565 END OF DATA b P MOVE GSWSTR20,=C'SLUTD' P MOVE GSWBIN5,CBIN0 6 P MATCH GSWSTR20,GSWBIN5,CBIN5,CPCKBUF,CBIN0,CBIN5 & P B
0x19252c…1926c0 Dummy {f00=0x00cf, f01=0x0190, f02=» CONVERSION. | , P* CAN ONLY BE USED IN DEBUGGER MODE . P MOVE GSWSTR20,=C'&02311280' LOOK FOR DATE D P MOVE GSWBIN5,CBIN15 FROM v P MOVE GSWBIN2,CBIN0 8 P MATCH CPCKBUF,GSWBIN5,CBIN20,GSWSTR20,GSWBIN2,CBIN9 P BNOK ADM0578 NOT FOUND
0x1926c0…192854 (0, 510) Dummy {f00=0x00cf, f01=0x018e, f02=»ARK " P MOVE GSWSTR20,=X'7F20202020' P MOVE GSWBIN5,CBIN0 2 P MOVE GSWBIN2,=W'123' N 8 P MATCH CPCKBUF,GSWBIN5,GSWBIN2,GSWSTR20,CBIN0,CBIN5 l P BOK ADM0577 P B ADM0578 PADM0577 " P MOVE GSWSTR20,=X'263130307F' . P COP
0x192854…1929e8 Dummy {f00=0x00cf, f01=0x0190, f02=» * P PERF LAMPOF,=W'2047' SWITCH OFF LAMPS " P PERF LAMPON,=W'2' LAMP 10 ON 2 P B A5RET2 READ SOP X PADM0570 r 0 P PERF SQWRIT,FD01,=D'1',CPCKBUF WRITE SLUTD P BNOK ADM0568 P PERF WRITID,CBIN3,CBIN2 P B A5RET1 LAMPS ON PAD
0x1929e8…192b7c Dummy {f00=0x00cf, f01=0x0190, f02=»NV4FMT P PERF SPCLRA CONTINUE ? 2 P IB SPBINW2,A0561,A0561,A0562,A0563,A0561, C . P A0561,A0561,A0561,A0564 d P B ADM0560 PA0561 MAK P B ADM0560 P* PA0562 SLUT, CONTINUE P READ AGAIN P SUB CRECNR,
0x192b7c…192d10 Dummy {f00=0x00cf, f01=0x018e, f02=»* PA0564 KVIT P CLEAR CERRORFL P B ADM0565 WRITE SLUTD 6 P* T P* ^ PADM0565 END OF DATA h P MOVE GSWBCD3,CRECNR $ P SUB GSWBCD3,=D'2' SET UP SLUTD P PERF SLUTID,GSWBCD3 P B ADM0570 P* P*
0x192d10…192ea4 Dummy {f00=0x00cf, f01=0x4116, f02=» | P* 6 P************************************************* P* L P* V PKONV4FMT FRMT ` P FSL v P FCOPY ='KORREKT' P FILLR '?',1 P FILLR X'07',1 P FKI 1 P FMEL 'B',TSWBCD2 P FMEND P* P E
0x192ea4…193038 Dummy {f00=0x00cf, f01=0x2008, f02=» DM,310,417 @ DDUM KMD08 $ PDIV 8 ENTRY A5KONV F EXT A5RET1 EXT A5RET2 p EXT LAMPON EXT LAMPOF EXT ASGVOL EXT RAREAD EXT STRTID EXT WRITID EXT SQWRIT
0x193038…1931cc Dummy {f00=0x00cf, f01=0x0190, f02=»-01', C P '06','-01', C P '07','-01', C ( P '08','-01', C @ P '09','-01', C X P '10','-01', C p P '12','-01', C P '18','-01', C P '19','-01', C P '28','-01', C P '29','-01', C P '-40',
0x1931cc…193360 Dummy {f00=0x00cf, f01=0x018e, f02=» C P '-48','-01', C P '-49','-01', C & P '-50','-01', C @ P '-51','-01', C Z P '-52','-01', C t P '-53','-01', C P '-54','-01', C P '-01','-01' P* P* P EJECT PCB6 BLK
0x193360…1934f4 (0, 511) Opaque[0x194]
0x1934f4…193688 # DirEnt {nam=»CONRD «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x19f8, f03=0x0000}
0x1934f4…193688 IdxSect {
0x1934f4…193688 f00 = 0x00cf // 0x1934f4 @0x0
0x1934f4…193688 f01 = 0x0002 // 0x1934f6 @0x2
0x1934f4…193688 gno = [ // 0x1934f8 @0x4
0x1934f4…193688 [0x00]: C0x00cf.0x3.0
0x1934f4…193688 ]
0x1934f4…193688 }
0x193688…19381c Dummy {f00=0x00cf, f01=0x018e, f02=» T; P01; TID=TC; TCL=TC; * LEV=60; : P02; J PTDC=T03; V PLC=01L; f PTDC=T07; v PLC=01L; P01; PSCL=S04; PT; P01; PTID=TD; PTCL=TC; PLEV=60; P01; PTDC=
0x19381c…1939b0 Dummy {f00=0x00cf, f01=0x018e, f02=» PLC=03L; P01; PSCL=S05; PT; 0 P03; : TID=KA; F TCL=KA; V LEV=60; f 01; v PTDC=T04; PLC=02L; P03; PSCL=S02; PSCL=S03; PSCL=S04; PT; P01; PTID=GA; PTCL=
0x1939b0…193b44 Dummy {f00=0x00cf, f01=0x0156, f02=» P01; PTID=LA; PTCL=LA; $ PLEV=60; 4 P00; D P04; P PSCL=S02; PSCL=S03; l PSCL=S04; | PSCL=S05; T; 01; TID=D0; TCL=D0; LEV=60; 00; P00; PC; P00;
0x193b44…193cd8 Dummy {f00=0x00cf, f01=0x2008, f02=» 01; PTID=LA; PTCL=LA; $ PLEV=60; 4 P00; D P04; P PSCL=S02; PSCL=S03; l PSCL=S04; | PSCL=S05; T; 01; TID=D0; TCL=D0; LEV=60; 00; P00; PC; P00;
0x193cd8…193e6c Dummy {f00=0x00cf, f01=0x0190, f02=» H I J ( K 8 L H M X N h O + x P Q R S 9 T = U V W
0x193e6c…194000 Dummy {f00=0x00cf, f01=0x0190, f02=» a b c ( d 8 e H f X g h h x i j k l m n o p
0x194000…194194 (0, 512) Opaque[0x194]
0x194194…194328 # DirEnt {nam=»KMREMT«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1a00, f03=0x0000}
0x194194…194328 IdxSect {
0x194194…194328 f00 = 0x00d0 // 0x194194 @0x0
0x194194…194328 f01 = 0x0004 // 0x194196 @0x2
0x194194…194328 gno = [ // 0x194198 @0x4
0x194194…194328 [0x00]: C0x00d0.0x0.0
0x194194…194328 [0x01]: C0x00d0.0x1.0
0x194194…194328 ]
0x194194…194328 }
0x194328…1944bc Dummy {f00=0x00d0, f01=0x0190, f02=» PPRT KMREMT PPRT CTST PMES REMIT TEST, 80.06.19 & PASG 2,NO F PSCR V PLED KMD08,/S b P!!CH $$26$$22$$ v P!!CH $$'-4'$$'4'$$ P!!RE 41,$$56$$100$$ P!!DL 61,62 FD03,FD04 P!!DL 67,89 TERM KA P!!DL 90,108 TE
0x1944bc…194650 Dummy {f00=0x00d0, f01=0x0190, f02=»TRUE$$ CBKOFLG ~ $ P!!RE 199,$$FALSE$$TRUE$$ CKTFLAG & P!!RE 200,$$FALSE$$FALSE$$ CCLKTFLG > & P!!RE 201,$$FALSE$$TRUE$$ CTESTFLG h & P!!RE 202,$$FALSE$$FALSE$$ CTRVALG $ P!!RE 203,$$FALSE$$FALSE$$ CFLT46 $ P!!RE 204,$$FALSE$$FALSE$$ CFLT48
0x194650…1947e4 Dummy {f00=0x00d0, f01=0x018e, f02=»$FALSE$$FALSE$$ CADM22F & P!!RE 209,$$FALSE$$FALSE$$ C5MDISK $ P!!RE 210,$$TRUE$$FALSE$$ CKASFLG J $ P!!RE 211,$$TRUE$$TRUE$$ CSLDFLG r & P!!RE 212,$$FALSE$$FALSE$$ CGLREGFL & P!!RE 213,$$FALSE$$FALSE$$ CCONVERT & P!!RE 237,$$FALSE$$TRUE$$ C
0x1947e4…194978 Dummy {f00=0x00d0, f01=0x018e, f02=» l P!!DL 286 $ PCFLAG BINI (12),X'0051',X'0068' P!!RE 317,$$F$$T$$ @ , P!!RE 372,$$01014610$$04029991$$ VERSION Z & P!!RE 422,$$FALSE$$FALSE$$ C167FLG $ P!!RE 440,$$1400$$1400$$ CMAXREC P!!RE 441,$$21$$21$$ CKTMAX P!!RE 446,$
0x194978…194b0c Dummy {f00=0x00d0, f01=0x0190, f02=» P!!RE 451,$$5$$1$$ CKTTOP P!!DL 452,453 $ PON STRGI (12)2C' ' 8 P!!DL 777,784 ENTRY T P!!DL 786,790 EXT n P!!DL 796 DUMMY T:IO P!!DL 808,827 KBVGO P!!DL 828,843 GTPGO P!!DL 844,855 LPGO P!!DL 856,868 DC1GO &
0x194b0c…194ca0 Dummy {f00=0x00d0, f01=0x0190, f02=»V539 PNOD R PLED SCREEN,/S P!!CH $$KEY461$$KEYCOP$$ 0 P!!CH $$SL461$$SLCOP$$ P P!!EN n PTRA /S,NL z PINC RGSUB4 PINC RGSTRT PNOD R PINC RGMAIN PINC RGSUBS PINC RGSUB1 PINC RGSUB2 PIN
0x194ca0…194e34 (0, 513) Dummy {f00=0x00d0, f01=0x0190, f02=»D R PINC ADM5 PINC SUBAPL PINC REMPRT . PNOD R @ PINC KMDIO N PINC DKSUBS ` PINC REMTXT r PNOD R PINC RGFRMT PINC REMFMT PNOD R PINC REMLEV PINC ADM6 PNOD R PINC REMTR PIN
0x194e34…194fc8 Dummy {f00=0x00d0, f01=0x0060, f02=»:POOL92,A=RGTEST,C=CTST x 2 PMES $PDISC M=M:9.2P,MU=M:9.2P,A=RGTEST,C=CTST P$ASG2 VINC DKSUBS ` PINC REMTXT r PNOD R PINC RGFRMT PINC REMFMT PNOD R PINC REMLEV PINC ADM6 PNOD R PINC REMTR PIN
0x194fc8…19515c Dummy {f00=0x00d0, f01=0x2008, f02=» A=RGTEST,C=CTST x 2 PMES $PDISC M=M:9.2P,MU=M:9.2P,A=RGTEST,C=CTST P$ASG2 VINC DKSUBS ` PINC REMTXT r PNOD R PINC RGFRMT PINC REMFMT PNOD R PINC REMLEV PINC ADM6 PNOD R PINC REMTR PIN
0x19515c…1952f0 Dummy {f00=0x00d0, f01=0x0190, f02=» IF NOT OK P PERF DKTEST ! P BNOK ERREAD ! & ( P CMP SPBINW2,='0' JUMP IF POWER OFF ! : P BE RETUR ! f " P IB SPBINW2,ERR100,ERRCONT C ! x $ P ERRCONT,ERR100,ERRCONT,ERRCONT ! P B ERR100 CONTINUE ! P* ! P* CLEAR ERROR PRINTOUT !
0x1952f0…195484 Dummy {f00=0x00d0, f01=0x0190, f02=»EY INDEX ! v PCANC " 0 P CBE SPBINW1,='0',ERRC10 JUMP IF LENGTH = 0 " 0 P MOVE SPINPUT,:FMTITEM SAVE CURRENT CONTENTS " P 4 P MOVE :FMTITEM,=C'1' PUT SOMETHING IN THE FIELD " & P GETABX SPBINW4 GET CURRENT INDEX " * P ERASE 10,SPBINW4,SPBINW4 CLEAR FI
0x195484…195618 Dummy {f00=0x00d0, f01=0x0190, f02=» " 0 P CBE SPBINW1,='0',ERRC20 JUMP IF LENGTH = 0 # ( P SET SPCHANGE INDICATE CHANGED FIELD # < PERRC20 # h & P MOVE SPBINW5,$OPT CHECHK IF SPERR # v P CBE SPBINW5,=W'0',SPERRRET # P B SETCREAD CONTINUE # P* # PCLEAR2 # 4 P MOVE :FMTITEM,S
0x195618…1957ac Dummy {f00=0x00d0, f01=0x0190, f02=»IELD # l & P MOVE SPBINW5,$OPT CHECK IF SPERR $ P CBE SPBINW5,=W'0',SPERRRET $ 6 P B SETCREAD CONTINUE $ Z P* $ v PSPERRRET $ P RET $ P* $ P PEND $ P* $ PBELL PROC $ P* ACUSTIC ALARM $ P EDWRT SCREEN,BELLFMT $
0x1957ac…195940 Dummy {f00=0x00d0, f01=0x0190, f02=»RMT $ P FILLR '1',2 % P FMEND % P* % . PFFEED FRMT % 8 P FILLR '1',2 % J P FMEND % ^ P* % l P* % v P % PSPLIN8 PROC WRTMES,WRTTYP % P******************** % P* % ( P* SPLIN8 - WRITE ON LINE 8 % P* % 6 P
0x195940…195ad4 (0, 514) Opaque[0x194]
0x195ad4…195c68 # DirEnt {nam=»KMREMP«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1a10, f03=0x0000}
0x195ad4…195c68 IdxSect {
0x195ad4…195c68 f00 = 0x00d0 // 0x195ad4 @0x0
0x195ad4…195c68 f01 = 0x0004 // 0x195ad6 @0x2
0x195ad4…195c68 gno = [ // 0x195ad8 @0x4
0x195ad4…195c68 [0x00]: C0x00d0.0x2.0
0x195ad4…195c68 [0x01]: C0x00d0.0x3.0
0x195ad4…195c68 ]
0x195ad4…195c68 }
0x195c68…195dfc Dummy {f00=0x00d0, f01=0x0190, f02=» PPRT KMREMP PPRT CONRP PMES REMIT PROD. VERSION, ( PMES 80.07.10 H PASG 2,NO PSCR l PLED KMD08,/S x P!!CH $$26$$22$$ P!!DL 60,61 FD03,FD04 P!!DL 182 0 PMF1KBV STRG 32X'C1C2C3C4C5C6C750' DEV. ADR. P!!DL
0x195dfc…195f90 Dummy {f00=0x00d0, f01=0x0190, f02=»88 ( PCNFHC STRGI (16),'GA','LA','GA',' ' P!!DL 193,194 6 " POFF STRGI (12)2C'TD','TE',' ' J $ P!!RE 198,$$FALSE$$TRUE$$ CBKOFLG p $ P!!RE 199,$$FALSE$$TRUE$$ CKTFLAG & P!!RE 200,$$FALSE$$FALSE$$ CCLKTFLG & P!!RE 201,$$FALSE$$TRUE$$ CTEST
0x195f90…196124 Dummy {f00=0x00d0, f01=0x018e, f02=»RE 205,$$TRUE$$FALSE$$ CKTAUTO P!!RE 206,$$FALSE$$TRUE$$ DC & & P!!RE 207,$$FALSE$$FALSE$$ CCYWRTF J & P!!RE 208,$$FALSE$$FALSE$$ CADM22F t & P!!RE 209,$$FALSE$$FALSE$$ C5MDISK $ P!!RE 210,$$TRUE$$FALSE$$ CKASFLG $ P!!RE 211,$$TRUE$$TRUE$$
0x196124…1962b8 Dummy {f00=0x00d0, f01=0x0190, f02=» l & P!!RE 246,$$FALSE$$TRUE$$ CTEXTFLG & P!!RE 247,$$FALSE$$TRUE$$ CSTRKFLG 2 & P!!RE 248,$$FALSE$$TRUE$$ CBUDTFLG P!!DL 286 , PCFLAG BINI (12),X'0051',X'0060',X'0064' , P!!RE 372,$$01014610$$04029991$$ VERSION & P!!RE 422,$$FALSE$$
0x1962b8…19644c Dummy {f00=0x00d0, f01=0x0190, f02=»RE 448,$$6'OD-KOM'$$6'P.6000'$$ P!!RE 449,$$7$$7$$ CKTINDX ( P!!RE 450,$$20$$20$$ CIXINDX J P!!RE 451,$$5$$1$$ CKTTOP n P!!DL 452,453 & PON STRGI (12)2C' ','KA','KB',' ' P!!DL 852 P MOVE TCT01,=W'2' PRINTER NR P!!EN
0x19644c…1965e0 Dummy {f00=0x00d0, f01=0x0190, f02=»!!CH $$SL461$$SLCOP$$ P!!EN PTRA /S,NL * PINC RGSUB4 < PINC RGSTRT N PNOD R ` PINC RGMAIN n PINC RGSUBS PINC RGSUB1 PINC RGSUB2 PINC RGSUB3 PNOD R PINC RGKLAR PINC KTPLN PINC KTOPR
0x1965e0…196774 (0, 515) Dummy {f00=0x00d0, f01=0x0190, f02=»C KMDIO PINC DKSUBS PINC REMTXT " PNOD R 4 PINC RGFRMT B PINC REMFMT T PNOD R f PINC REMLEV t PINC ADM6 PNOD R PINC REMTR PINC REMBDT PTLK U,4K PINC PRT PINC VDUPRT PINC START
0x196774…196908 Dummy {f00=0x00d0, f01=0x002c, f02=»=M:POOL92,A=RGLOAD,C=CONRP z P$ASG2 " " PNOD R 4 PINC RGFRMT B PINC REMFMT T PNOD R f PINC REMLEV t PINC ADM6 PNOD R PINC REMTR PINC REMBDT PTLK U,4K PINC PRT PINC VDUPRT PINC START
0x196908…196a9c Dummy {f00=0x00d0, f01=0x2008, f02=» 2,A=RGLOAD,C=CONRP z P$ASG2 " " PNOD R 4 PINC RGFRMT B PINC REMFMT T PNOD R f PINC REMLEV t PINC ADM6 PNOD R PINC REMTR PINC REMBDT PTLK U,4K PINC PRT PINC VDUPRT PINC START
0x196a9c…196c30 Dummy {f00=0x00d0, f01=0x018e, f02=»$ 2 3 9999999999 " 3 ( & 8 4 ]R F $ 4 X 5 X h " 5 z & 5 & 5 6 ZZZZ9 " 6 ' ( 7 3 & 6 8 UDSKRIFT A
0x196c30…196dc4 Dummy {f00=0x00d0, f01=0x0190, f02=» | " ;~' & ; < VEDL. & $ <' < = DATO L $ =' ` & p > XXE-XXE-XX " > & > ? FRA/TIL NR $ ? & @ XXXXXXXXXX
0x196dc4…196f58 Dummy {f00=0x00d0, f01=0x0190, f02=»$ B & C X " C 2 & C B ( P D & VAL l & ~ & RDATO ( E & BELT & & B ( F 0
0x196f58…1970ec Dummy {f00=0x00d0, f01=0x0190, f02=»E-99E-99 " I~E & I J FRA/TIL-NR: . $ JE J & T Z K ZZ9 l " K & - & T L ZZ9 " L & L & L & M
0x1970ec…197280 Dummy {f00=0x00d0, f01=0x0190, f02=» 9T " O ( P & ( & O 8 Q REMIT.TEKST NR: F $ Q f & v & T R XXX " R & & & S TEKST: $ S
0x197280…197414 (0, 516) Opaque[0x194]
0x197414…1975a8 # DirEnt {nam=»RGKLAR«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1a20, f03=0x0000}
0x197414…1975a8 IdxSect {
0x197414…1975a8 f00 = 0x00d1 // 0x197414 @0x0
0x197414…1975a8 f01 = 0x0014 // 0x197416 @0x2
0x197414…1975a8 gno = [ // 0x197418 @0x4
0x197414…1975a8 [0x00]: C0x00d1.0x0.0
0x197414…1975a8 [0x01]: C0x00d1.0x1.0
0x197414…1975a8 [0x02]: C0x00d1.0x2.0
0x197414…1975a8 [0x03]: C0x00d1.0x3.0
0x197414…1975a8 [0x04]: C0x00d2.0x0.0
0x197414…1975a8 [0x05]: C0x00d2.0x1.0
0x197414…1975a8 [0x06]: C0x00d2.0x2.0
0x197414…1975a8 [0x07]: C0x00d2.0x3.0
0x197414…1975a8 [0x08]: C0x00d3.0x0.0
0x197414…1975a8 [0x09]: C0x00d3.0x1.0
0x197414…1975a8 ]
0x197414…1975a8 }
0x1975a8…19773c Dummy {f00=0x00d1, f01=0x0190, f02=» P IDENT RGKLAR 03.01.XXX.1 DDUM KMD08 & PDIV : P ENTRY RGKLAR H P ENTRY CLEJ ^ P ENTRY CLEDB r P ENTRY CLBEH P ENTRY CLKF P ENTRY RGA120 P ENTRY ZERO P ENTRY SKIFT P ENTRY STRTWR P ENTRY
0x19773c…1978d0 Dummy {f00=0x00d1, f01=0x0190, f02=» P EXT LAMPOF P EXT WRITJT P EXT SPCLRN 0 P EXT SPCLRA D P EXT PACKCL X P EXT CLEAR8 l P EXT SPLIN8 P EXT GRASPV P EXT FRMXVO P EXT KORT P EXT TCONFW P EXT RAREAD P EXT RAWRIT
0x1978d0…197a64 Dummy {f00=0x00d1, f01=0x018e, f02=» P EXT INITRG P EXT SLUT P EXT CONFWR * P EXT WRITFD > P EXT CRKJ R P EXT BACKUP d P EXT CONRDX x P EXT RSTORE P EXT KFWRIT P EXT KFREAD P EXT KTPLAN P EXT WAITF P INCLUDE EQUATE P E
0x197a64…197bf8 Dummy {f00=0x00d1, f01=0x0190, f02=» ~ , P RGKLAR,RGKLAR,RGKLAR,RGKLAR,RGA100, C ( P RGA200,RGA300,RGKLAR,RGKLAR,RGA007 8 P B RGKLAR d P* v PRGA007 GO ONLINE P TBT CCONVERT,RGKLAR P PERF ADM,CBIN7 P B RGKLAR P* PRGA100 P* < P******
0x197bf8…197d8c Dummy {f00=0x00d1, f01=0x018e, f02=»************************************** ~ P* . P TBT CCONVERT,RGKLAR 8 P TBF GTTTPFLG,RGKLAR NO TTP T P TBT CCONVFLG,RGKLAR x P CLEAR GTDYFLG P SET SPPROMPT P SET SPME P MOVE GSWBCD3,=X'FF' ERASE P CBG GTDATO,=D'1',RG
0x197d8c…197f20 Dummy {f00=0x00d1, f01=0x0190, f02=» P B RGKLAR PRGA110 P MOVE TTEJEDB,=D'0' $ , P MUL TTSTLBNR,=D'-1' SET POSITIVE (OPEN) @ 2 P MUL CMASK(TTASKNR),=D'-1' SET CMASK >0, OPEN p P MOVE TTCASH,TTSTCASH P CBNE TTSTLBNR,=D'0',RGA115 P MOVE TTSTLBNR,=D'1' PRGA1
0x197f20…1980b4 (0, 517) Dummy {f00=0x00d1, f01=0x0190, f02=»TORE INF FROM ADM FUNC. z P PERF CONFWR & P PERF WRITJT,=W'5' OPEN MES ON JT 4 P SET GTKASSE ^ P ADD CTASKNR,CBIN1 r PRGA120 $ P PERF INITRG START REGISTRATION P PERF TCLOSE CLOSE P BNOK RGA120 P SUB CTASKNR,CBIN1
0x1980b4…198248 Dummy {f00=0x00d1, f01=0x0190, f02=» P PERF SPCLRA $ P IB SPBINW2,TCLMAK,TCLMAK,TCL010 P B TCL000 @ PTCL010 R P* CLEAR FLAGS ` P CLEAR GTSUMKEY z P CLEAR TTTSTFLG P CLEAR TTCY1FLG P CLEAR TTCY2FLG P CLEAR TTLSTFLG P CLEAR TTPSEFLG
0x198248…1983dc Dummy {f00=0x00d1, f01=0x0190, f02=» P CLEAR GTKORTFL P MOVE TTSUPMRK,=C' ' P MOVE TTSUMMRK,=C' ' < P MOVE GTTEXT,=C' ' X P MOVE GTSUM,=D'0' r P WAIT KVOUCH P DSC0 KVOUCH,RLEAS ( P* TR12 ACCUMULATORS P MOVE GTREGNR,=D'2' P MOVE
0x1983dc…198570 Dummy {f00=0x00d1, f01=0x0190, f02=»N1 P CBL GSWBIN1,CBINMAX,TCL025 P MOVE GSWBCD5,=D'0' . PTCL030 J P ADD GSWBCD5,=D'1' ACC NR X PTCL035 z " P MOVE GSWBIN5,GSWBCD5 CONVERT , P CBG GSWBIN5,CTR12(TTASKNR,CBIN2),TCL090 & P ADD GSWBIN5,CTR12(TTASKNR,CBIN1) ( P
0x198570…198704 Dummy {f00=0x00d1, f01=0x018e, f02=»OVE GTDUPF(CBIN4),C12ACC(GSWBIN5,CBIN1) $ P CBE GTDUPF(CBIN4),=D'0',TCL040 0 P MOVE GTUSED(CBIN4),=W'-8' X & P MOVE GSWSTR20,=C'EJ-EDB T[LLER ' z P MOVE GTWBCD1,GSWBCD5 0 P PERF TR2GEN,CBIN1 GENERATE TR2 WITH KREDIT P BNOK TCL035
0x198704…198898 Dummy {f00=0x00d1, f01=0x0190, f02=» $ P CBE GTDUPF(CBIN4),=D'0',TCL030 P MOVE GTUSED(CBIN4),=W'-8' , & P MOVE GSWSTR20,=C'EJ-EDB T[LLER ' N P MOVE GTWBCD1,GSWBCD5 x . P PERF TR2GEN,CBIN2 GENERATE TR2 WITH DEBET P BNOK TCL040 P B TCL030 PTCL090 P MOVE GSWSTR
0x198898…198a2c Dummy {f00=0x00d1, f01=0x0190, f02=»TCL150 P MOVE GSWBCD5,=D'0' P B TCL130 * PTCL110 < P* VERSUR J P MOVE GSWBIN5,GSWBCD5 Z 4 P PERF KFREAD,CBIN3,CBIN0,GSWBIN5,GTKFVAL KONTONR x P BNOK TCL130 P CBE GTKFVAL,=D'0',TCL130 P MOVE GTDUPF(CBIN1),GTKFVAL .
0x198a2c…198bc0 Dummy {f00=0x00d1, f01=0x0190, f02=»FVAL,=D'0',TCL120 P MOVE GTDUPF(CBIN4),GTKFVAL P MOVE GTUSED(CBIN4),=W'-8' > P MOVE GTWBCD1,GSWBCD5 BFO NR ` $ P MOVE GSWSTR20,=C'VERSUR KONTO ' * P PERF TR2GEN,CBIN1 GENERATE TR2 DEBET P BNOK TCL120 PTCL120 MOVE GSWBIN5,GSWBCD
0x198bc0…198d54 (0, 518) Dummy {f00=0x00d1, f01=0x0190, f02=»),GTKFVAL ~ P MOVE GTUSED(CBIN4),=W'-8' P MOVE GTWBCD1,GSWBCD5 BFONR 4 $ P MOVE GSWSTR20,=C'VERSUR KONTO ' X * P PERF TR2GEN,CBIN2 GENERATE TR2 KREDIT P BNOK TCL130 PTCL130 P* PENGE P MOVE GSWBIN5,GSWBCD5 4 P PERF KFRE
0x198d54…198ee8 Dummy {f00=0x00d1, f01=0x018e, f02=» MOVE GTUSED(CBIN1),CBIN5 INDICATE UPDATE 0 P PERF KFREAD,CBIN2,CBIN1,GSWBIN5,GTKFVAL BEV 2 P BNOK TCL140 f P CBE GTKFVAL,=D'0',TCL140 z P MOVE GTDUPF(CBIN4),GTKFVAL P MOVE GTUSED(CBIN4),=W'-8' P MOVE GTWBCD1,GSWBCD5 BFONR $ P M
0x198ee8…19907c Dummy {f00=0x00d1, f01=0x0190, f02=» P CBL GSWBCD5,=D'5',TCL110 PTCL150 & P EJECT 4 P* VERSUR - KASSE B PTCL205 Z P SET GTTFLG h P CBE TVERSUR,=D'0',TCL235 | * P MOVE GTDUPF(CBIN1),TVERSUR REMIT ACC * P MOVE GTDUPF(CBIN4),TTACC(CBIN6,CBIN1) * P ADD GTDUPF(CB
0x19907c…199210 Dummy {f00=0x00d1, f01=0x0190, f02=» P MUL GTDUPF(CBIN4),=D'-1' , P MOVE GSWSTR20,=C'VERSUR KONTONR REMIT ' & P MOVE GTWBCD1,=D'0' V P PERF TR2GEN,CBIN0 r P BNOK TCL205 PTCL235 P CASH MOVEMENT * P MOVE GTDUPF(CBIN1),TTCASHAC ACCOUNTNR , P MOVE GTDUPF(CBIN4),
0x199210…1993a4 Dummy {f00=0x00d1, f01=0x018e, f02=» v $ P MOVE GSWSTR20,=C'KASSE-KONTO ' P MOVE GTWBCD1,=D'0' 0 P PERF TR2GEN,CBIN0 L P BNOK TCL235 f P* z 0 P* WRITING OF DISC JOURNAL AND VOUCHER P* P MOVE GSWSTR9,=C'TOTAL ' P PERF CLEDB P* PRINT KONTOFIL
0x1993a4…199538 Dummy {f00=0x00d1, f01=0x018e, f02=» P MOVE TTSTCASH,TTCASH P MOVE TTSTLBNR,TTLBNR & P ADD TTSTLBNR,=D'1' D . P MUL TTSTLBNR,=D'-1' SET NEGATIVE (CLOSE) ` 4 P MUL CMASK(TTASKNR),=D'-1' SET CMASK < 0, CLOSE P CLEAR GTTFLG PTCL550 P MOVE TTRECOPN,CRECBCD
0x199538…1996cc Dummy {f00=0x00d1, f01=0x0190, f02=» P* ZERONIZE COUNTERS P* TRANS 12 COUNTERS " P MOVE GSWSTR20,=C'*' @ P PERF WRITJT,=W'12' P CMP CBIN0,CBIN0 DUMMY x P RET PTCLMAK P CMP CBIN0,CBIN1 P RET P PEND P EJECT PRGA200 4 P**********
0x1996cc…199860 Dummy {f00=0x00d1, f01=0x0190, f02=»*********************************** P* , P MOVE GSWBIN1,GSWBCD3 6 P PERF ADM,GSWBIN1 T P B RGKLAR n P EJECT PZERO PROC P* P* ZERONIZE COUNTERS P* TRANS 12 COUNTERS & P MOVE GSWBIN3,CTR12(TTASKNR,CBIN1)
0x199860…1999f4 (0, 519) Dummy {f00=0x00d1, f01=0x0190, f02=»BIN2,TCL615 & P MOVE C12ACC(GSWBIN3,CBIN1),=D'0' & P MOVE C12ACC(GSWBIN3,CBIN2),=D'0' > P MOVE GTKFVAL,=D'0' h , P PERF KFWRIT,CBIN1,CBIN1,GSWBIN3,GTKFVAL , P PERF KFWRIT,CBIN1,CBIN2,GSWBIN3,GTKFVAL P B TCL610 PTCL615 P*
0x1999f4…199b88 Dummy {f00=0x00d1, f01=0x0190, f02=»ACC(GSWBIN1,CBIN2),=D'0' P CBL GSWBIN1,CBIN8,TCL620 P RET B P PEND N P EJECT PCLEJ PROC j : P***************************************************** | P* . P* NOW ALL ACCUMULATORS NOT = 0 & P* HAS
0x199b88…199d1c Dummy {f00=0x00d1, f01=0x0190, f02=»********************************************** P MOVE TTLINNR,=D'25' 6 $ P MOVE GSWSTR20,='EJ-EDB T[LLER ' R , P CBE CTR12(TTASKNR,CBIN2),CBIN0,CLEJRET z P PERF WAHEAD,CBIN8 P MOVE GTWBCD1,=D'0' PCLEJ10 P ADD GTWBCD1,=D'1' " P
0x199d1c…199eb0 Dummy {f00=0x00d1, f01=0x018e, f02=»DUPF(CBIN4),C12ACC(GSWBIN5,CBIN1) , P ADD GTDUPF(CBIN4),C12ACC(GSWBIN5,CBIN2) * ( P MOVE GTDUPF(CBIN1),CTR12NR(GSWBIN5) Z $ P CBE GTDUPF(CBIN1),=D'0',CLEJ10 P CBG TTLINNR,=D'0',CLEJ20 P DSC0 KVOUCH,RLEAS P MOVE TTLINNR,=D'25' P P
0x199eb0…19a044 Dummy {f00=0x00d1, f01=0x0190, f02=» P RET P PEND P EJECT PCLKF PROC , P********************* > P* P* CLOSE KONTOFILE f P* . P* UDSKRIV OG NULSTIL VERSUR OG PENGEKONTI P* P********************* * P MOVE GSWSTR20,=C'LOKAL REMITTERING
0x19a044…19a1d8 Dummy {f00=0x00d1, f01=0x0190, f02=»BIN1),=D'0' TOTAL KREDIT-VERSUR 2 P MOVE GTREGF(CBIN2),=D'0' TOTAL DEBET - VERSUR ( . P MOVE GTREGF(CBIN3),=D'0' TOTAL BEV-PENGE ^ P B CLKF100 PCLKF010 P* VERSUR P MOVE GSWBIN5,GSWBCD5 BFO NR 4 P PERF KFREAD,CBIN3,CBIN0,GSWBIN5,G
0x19a1d8…19a36c Dummy {f00=0x00d1, f01=0x018e, f02=»TKFVAL PUT INTO KREDIT z , P ADD GTREGF(CBIN2),GTKFVAL ADD TO TOTAL 2 P PERF KFREAD,CBIN3,CBIN2,GSWBIN5,GTKFVAL DEBET N . P MOVE GTDUPF(CBIN5),GTKFVAL PUT INTO DEBET , P ADD GTREGF(CBIN1),GTKFVAL ADD TO TOTAL P MOVE GTWBCD1,GSWBCD5 P MOV
0x19a36c…19a500 Dummy {f00=0x00d1, f01=0x0190, f02=» 4 P PERF KFREAD,CBIN2,CBIN0,GSWBIN5,GTKFVAL KONTONR P MOVE GTDUPF(CBIN1),GTKFVAL < 0 P PERF KFREAD,CBIN2,CBIN1,GSWBIN5,GTKFVAL BEV ` , P ADD GTREGF(CBIN3),GTKFVAL ADD TO TOTAL P MOVE GTDUPF(CBIN4),GTKFVAL P CLEAR GTSWFLAG P MOVE GT
0x19a500…19a694 (0, 520) Dummy {f00=0x00d2, f01=0x0190, f02=» P* WRITE TOTAL , P MOVE GTDUPF(CBIN1),=X'FF' CLEAR KONTONR $ P MOVE GTWBCD1,=X'FF' CLEAR BFUND J 0 P MOVE GTDUPF(CBIN4),GTREGF(CBIN3) TOTAL BEV r , P MOVE GTDUPF(CBIN5),GTREGF(CBIN1) KREDIT , P MOVE GTDUPF(CBIN6),GTREGF(CBIN2) DEBET P S
0x19a694…19a828 Dummy {f00=0x00d2, f01=0x0190, f02=»N20 BEV P DSC0 KVOUCH,RLEAS P TBT GTSPGFLG,CLKFRET * P* NULSTIL VERSUR + PENGE H P MOVE GSWBCD5,=D'0' h P MOVE GTKFVAL,=D'0' P B CLKF210 PCLKF200 P MOVE GSWBIN5,GSWBCD5 , P PERF KFWRIT,CBIN3,CBIN1,GSWBIN5,GTKFVAL
0x19a828…19a9bc Dummy {f00=0x00d2, f01=0x0190, f02=»TKFVAL n P ADD GSWBCD5,=D'1' P CBL GSWBCD5,=D'5',CLKF200 ( PCLKFRET J P RET Z P PEND f P EJECT t PCLEDB PROC P* 0 P* WRITING OF DISC JOURNAL AND VOUCHER P* $ P MOVE GSWSTR20,=C'EDB-T[LLERE ' P PER
0x19a9bc…19ab50 Dummy {f00=0x00d2, f01=0x0190, f02=»=D'0' | PCLEDB010 ! P TBT GTSPGFLG,CLEDB020 ! P MOVE GTREGNR,=D'11' ! < PCLEDB020 ! X P ADD GSWBCD5,=D'1' ! h PCLEDB030 ! P MOVE GSWBIN5,GSWBCD5 ! P CBG GSWBIN5,CBIN6,CLEDB100 ! , P ADD GTREGF(CBIN1),TTACC(GSWBIN5,CBIN1) ! , P ADD
0x19ab50…19ace4 Dummy {f00=0x00d2, f01=0x0190, f02=»F(CBIN4),TTACC(GSWBIN5,CBIN2) ! , P MOVE GTDUPF(CBIN6),TTACC(GSWBIN5,CBIN1) " & 2 P MOVE GTDUPF(CBIN5),TTACC(GSWBIN5,CBIN2) DEBET " V P TBT GTSPGFLG,CLEDB040 " P MOVE GTUSED(CBIN6),=W'-53' " P MOVE GTUSED(CBIN5),=W'-52' " P MOVE GTDUPF(CBIN1),GS
0x19ace4…19ae78 Dummy {f00=0x00d2, f01=0x0190, f02=»CRKJ " P PERF WRITFD # P BNOK CLEDB030 # PCLEDB040 # 6 " P MOVE GSWBIN5,GSWBCD5 RESTORE # F P MOVE GTWBCD1,GSWBCD5 # l P PERF WRITJT,=W'7' # P PERF WALINE,CBIN10 # P B CLEDB010 # PCLEDB100 # P PERF PACKCL # & P MOVE GTDUPF(CBI
0x19ae78…19b00c Dummy {f00=0x00d2, f01=0x0190, f02=»(CBIN8,CBIN2) # x P PERF WALINE,CBIN11 $ * P MOVE GTDUPF(CBIN5),TTACC(CBIN1,CBIN1) $ 2 * P MOVE GTDUPF(CBIN6),TTACC(CBIN1,CBIN2) $ ` P MOVE GSWBIN1,CBIN1 $ PCLEDB110 $ P ADD GSWBIN1,CBIN1 $ P CBG GSWBIN1,CBIN4,CLEDB120 $ , P ADD GTDUPF(CBIN
0x19b00c…19b1a0 Dummy {f00=0x00d2, f01=0x0190, f02=»60 $ | ( P* ADJUST FOR 'KASSE INDBERETNING' % P MOVE GSWBCD1,TTCASH % 6 P SUB GSWBCD1,TTSTCASH % R P CBL GSWBCD1,=D'0',CLEDB130 % p P SUB GTDUPF(CBIN6),GSWBCD1 % P B CLEDB140 % PCLEDB130 % P SUB GTDUPF(CBIN5),GSWBCD1 % PCLEDB140 %
0x19b1a0…19b334 (0, 521) Dummy {f00=0x00d2, f01=0x0190, f02=»BCD1,=D'-1' 'VEND' % P CBL GSWBCD1,=D'0',CLEDB150 & P SUB GTDUPF(CBIN6),GSWBCD1 & > P B CLEDB160 & ` PCLEDB150 & t P SUB GTDUPF(CBIN5),GSWBCD1 & PCLEDB160 & P MUL GTDUPF(CBIN5),=D'-1' & P MUL GTDUPF(CBIN6),=D'-1' & P MOVE GSWBCD1,
0x19b334…19b4c8 Dummy {f00=0x00d2, f01=0x0190, f02=»ET & P PEND ' P EJECT ' PCLBEH PROC ' & P* ' 8 P* BEHOLDNINGST[LLERE ' B P* ' ` PCLBEH010 ' j P MOVE TTLINNR,=D'25' ' z & P MOVE GSWBIN2,CBEH(TTASKNR,CBIN2) ' P CMP GSWBIN2,CBIN0 ' P BE CLBEHRET ' $ P ADD GSWBIN2,CBEH(TTASKNR,
0x19b4c8…19b65c Dummy {f00=0x00d2, f01=0x0190, f02=»CLBEH030,CLBEH030,CLBEH050,CLBEH040,CLBEH030, C ' 6 P CLBEH030,CLBEH030,CLBEH030,CLBEH060,CLBEH030, C ( 8 P CLBEH030,CLBEH030,CLBEH060 ( r PCLBEH030 ( P B CLBEH010 ( PCLBEH040 ( P TBT GTSPGFLG,CLBEH010 ( " P MOVE GSWSTR20,=C'SLET SALDO ' (
0x19b65c…19b7f0 Dummy {f00=0x00d2, f01=0x0190, f02=» P MOVE GSWBIN6,CBIN2 ) P B CLBEH100 ) PCLBEH060 ) 4 P MOVE GSWSTR20,=C'SUBTOTAL ' ) D P MOVE GSWBIN6,CBIN3 ) h P B CLBEH100 ) PCLBEH100 ) P MOVE GTWBCD1,=D'0' ) P MOVE GSWBCD6,=D'0' ) P MOVE GSWBCD7,=D'0' ) PCLBEH110 )
0x19b7f0…19b984 Dummy {f00=0x00d2, f01=0x0190, f02=»F FRMXVO,CBIN13 HEAD ON VOUCHER ) P EDWRT KVOUCH,GTSTRFMT * ( PCLBEH120 * F P ADD GTWBCD1,=D'1' * V P MOVE GSWBIN3,GTWBCD1 * p $ P ADD GSWBIN3,CBEH(TTASKNR,CBIN1) * P MOVE GSWBIN4,GTWBCD2 * " P CBG GSWBIN3,GSWBIN4,CLBEH160 * , P CBE CBACC(GSW
0x19b984…19bb18 Dummy {f00=0x00d2, f01=0x0190, f02=»SWBCD7,CBACC(GSWBIN3,CBIN3) SALDO * P PERF FRMXVO,CBIN14 + * P EDWRT KVOUCH,GTSTRFMT + F P TBT GTTESTFL,CLBEH150 + d * P IB GSWBIN6,CLBEH130,CLBEH140,CLBEH150 + P B CLBEH150 + PCLBEH130 + * P MOVE CBACC(GSWBIN3,CBIN3),=D'0' SALDO + PCLBEH1
0x19bb18…19bcac Dummy {f00=0x00d2, f01=0x0190, f02=» DSC0 KVOUCH,RLEAS + P MOVE TTLINNR,=D'25' , P B CLBEH110 , 6 PCLBEH160 , J P* WRITE TOTAL LINE , Z P PERF FRMXVO,CBIN18 , x P EDWRT KVOUCH,GTSTRFMT , P DSC0 KVOUCH,RLEAS , PCLBEHRET , P RET , P PEND , P EJECT , PRGA3
0x19bcac…19be40 Dummy {f00=0x00d2, f01=0x0190, f02=»************************** , x P* - " . P* TR2GEN GENERATES A TRANSACTION 2 - , P* - ^ 8 P**************************************************** - h PTR2GEN PROC DBKR - P MOVE TTDKDEX,DBKR - P CBNE TTDKDEX,=W'0',TR2DBKR - P MOVE TTDKDEX,
0x19be40…19bfd4 (0, 522) Dummy {f00=0x00d2, f01=0x0190, f02=»DWRT SCREEN,CLFRM02 - , P MOVE GSWBCD1,GTDUPF(CBIN1) REG KONTO NR . 2 P PERF KTPLAN,GSWBCD1,GTKTTYP 'KORT' REQUIRED? . L P PERF SLUT . P BNOK TR2NOK . P TBF CCLKTFLG,TR2OK . P TBF GTKORTFL,TR2OK . P PERF KORT . PTR2OK . P CLEAR G
0x19bfd4…19c168 Dummy {f00=0x00d2, f01=0x0190, f02=»****************** . j P* / < P* WAHEAD - GRASP AND WRITE HEADLINE ON VOUCHER / $ P* / d < P******************************************************** / n PWAHEAD PROC VOXDEX / P EDWRT SCREEN,CLFRM03 / P PERF SPLIN8,CBIN5,CBIN2 / P P
0x19c168…19c2fc Dummy {f00=0x00d2, f01=0x018e, f02=» P PEND 0 P EJECT 0 > P********************************************************* 0 P* 0 b ( P* WALINE WRITE ACCUMULATORLINE 0 l P* 0 > P********************************************************** 0 PWALINE PROC LINDEX 0 P PERF FRMX
0x19c2fc…19c490 Dummy {f00=0x00d2, f01=0x0190, f02=» 0 P************************* 1 P* 1 * : P* SKIFT - THIS PROCEDURE TAKES HAND OF SHIFT 1 4 , P* OF DISKS, IS ACTIVATED AFTER 1 r P* 12 ADM 1 P* 1 P************************ 1 PSK00 1 P PERF WAITF,CPFLG 1
0x19c490…19c624 Dummy {f00=0x00d2, f01=0x0190, f02=»ID,CRECBCD WRITE 'SLUTD' 1 * P PERF RAWRIT,DK02,=D'2',CPCKBUF,CRECNR 2 PSK15 2 N P PERF WRITID,CBIN2,CBIN2 2 Z P PERF CLSVOL,CBIN2 2 z P PERF LAMPOF,=W'2047' 2 P ADD CVOLNO,=D'1' 2 P SET CRKCOPY FD2 EMPTY 2 PSK120 2 P PERF LAMPON,=W'
0x19c624…19c7b8 Dummy {f00=0x00d2, f01=0x0190, f02=»OL,CBIN2 2 P BNOK SK120 3 P PERF LAMPOF,=W'2047' 3 $ P MOVE CRECNR,CBIN1 3 B P MOVE CRECBCD,=D'0' 3 P TBF CWFLAG,SK130 3 x P PERF STRTWR 3 P BNOK SK120 3 PSK130 3 " P PERF CNFWRT REWRITE CONFDATA 3 P TBF CWFLAG,SK150 3 P
0x19c7b8…19c94c Dummy {f00=0x00d2, f01=0x0190, f02=»L 3 P CLEAR CSKIFTWN 4 P CLEAR CPFLG DISC FREE 4 " P RET 4 B P PEND 4 N P EJECT 4 PSTRTWR PROC 4 j P********************* 4 ~ P* 4 6 P* STRTWR - SET UP AND WRITE START RECORD 4 P* 4 P* 4 P********************
0x19c94c…19cae0 Dummy {f00=0x00d2, f01=0x018e, f02=»ERF RADEL,DK02,CRECNR 4 P BNOK STRTNOK 5 P CMP CBIN0,CBIN0 OK 5 4 P RET 5 P PSTRTNOK 5 P CMP CBIN1,CBIN0 5 l P RET 5 P PEND 5 P EJECT 5 PSTRTID PROC VOLID 5 P******************** 5 P* 5 : P* STRTID - SETS UP
0x19cae0…19cc74 (0, 523) Dummy {f00=0x00d2, f01=0x018e, f02=» P CBE CRECLGD,=W'128',STRT10 6 P CLEAR CSWFLAG 6 ( PSTRT10 6 > P MOVE GSWBIN6,CBIN2 6 L P EDIT CPCKBUF,PCKINIT 6 h P EDIT CPCKBUF,STARTFR 6 P MOVE GSWBCD3,VOLID 6 P EDIT GSWSTR20,FRVOLID 6 P MOVE GSWBIN1,=W'40' 6 0 P COPY CPCKBUF,
0x19cc74…19ce08 Dummy {f00=0x00d2, f01=0x0190, f02=» 6 2 P* SLUTID - SETS UP A SLUTD IN CPCKBUF 7 P* 7 > P* 7 H P******************** 7 R P SET CSWFLAG 7 n P CBE CRECLGD,=W'128',SLUT10 7 P CLEAR CSWFLAG 7 PSLUT10 7 P EDIT CPCKBUF,PCKINIT 7 P MOVE CRECBCD,SLUTNO 7 P EDI
0x19ce08…19cf9c Dummy {f00=0x00d2, f01=0x0190, f02=»* 7 : 6* THIS PROCEDURE TAKES CARE OF ADMINISTRATION 8 * OB BACKUP 8 H * 8 d 0 ,* CALL: PERF BCKUP,<=W'X'> 8 n ( $* $OPT = 1 : WITHOUT BACKUP 8 & !* $OPT = 2 : WITH BACKUP 8 * 8 * 8
0x19cf9c…19d130 Dummy {f00=0x00d2, f01=0x018e, f02=» PERF CNFWRT REWRITE CONFIGURATION 8 SUB CVOLNO,=D'1' 9 * P CMP CBIN1,$OPT 9 D P BE BCK100 NO BACKUP 9 * 9 x * 9 * BACKUP 9 * 9 BCK000 9 $ PERF LAMPOF,=W'2047' LAMPS OFF 9 BCK005 9 PERF LAMPON,=W'1024' LAMP
0x19d130…19d2c4 Dummy {f00=0x00d2, f01=0x0190, f02=» 9 t PBCK008 : P TBF CSTRKFLG,BCK009 : P PERF LAMPON,=W'256' LAMP 3 : 2 PBCK009 : V P TBF CGLREGFL,BCK010 : d P PERF LAMPON,=W'512' LAMP 2 : BCK010 : PERF SOPRD READ SOP LAMPS : IB GSWBIN2, C : , ( BSOP10,BSOP09,BSOP08,BSOP0
0x19d2c4…19d458 Dummy {f00=0x00d2, f01=0x0190, f02=»LAMPS : P* ; BSOP01 BACKUP FD999001 ; $ PERF LAMPOF,=W'2047' LAMPS OFF ; 8 PERF LAMPON,=W'1024' LAMP 1 ; ` & P MOVE GSWBIN5,=W'32' NO OF RECORDS ; 4 P PERF BACKUP,DK01,=D'1',GSWBIN5,CCONBUF0,=W'199' ; BNOK BCK050 ; P ADD CVOLNO,=D
0x19d458…19d5ec Dummy {f00=0x00d2, f01=0x0190, f02=» B BCK000 ; BCK050 < 4 / PERF CONRDX,CCONBUF0,CBIN1 RESTORE BUFFER AREA < B BCK005 < X P* < j & PBSOP02 COPY FD999002 TO FD999005 < t " P TBF CGLREGFL,BCK010 ALLOWED? < P* < P***** < & PBCK02 COPY FD999002 TO FD999005 < $ P P
0x19d5ec…19d780 Dummy {f00=0x00d2, f01=0x018e, f02=»K BCK0290 < P MOVE CGLRECNR,CBIN0 = PBCK0250 = . P ADD CGLRECNR,CBIN1 = > * P MOVE GSWBIN1,=W'128' LENGTH OF RECORD = Z 4 P PERF RAREAD,DK02,=D'2',CPCKBUF,GSWBIN1,CGLRECNR = P BNOK BCK0270 ERROR = & P CBE GTWBCD1,=D'4',BCK0280 NO DATA = P M
0x19d780…19d914 (0, 524) Dummy {f00=0x00d3, f01=0x018e, f02=» = | , P PERF RAWRIT,DK05,=D'5',CPCKBUF,CGLRECNR > P BOK BCK0250 > 8 PBCK0270 ERROR > L P PERF LAMPON,=W'2' LAMP 10 > d PBCK0280 FINISH > P MOVE TTGLREC,CGLRECNR > , P PERF TCONFW,CBIN1 SAVE LAST RECORD NO. > PBCK0290 > P CLEAR CPFLG
0x19d914…19daa8 Dummy {f00=0x00d3, f01=0x0190, f02=» P* ? ( PBSOP03 BACKUP INDEX,STAM,VAR,TRANS ? P TBF CSTRKFLG,BCK010 ? : $ P PERF LAMPOF,=W'2047' LAMPS OFF ? V P PERF LAMPON,=W'256' LAMP 3 ? ~ 4 P PERF BACKUP,DK07,=D'7',CBIN0,CIXBUF,=W'8' INDX ? 6 P PERF BACKUP,DK08,=D'8',CBIN0,CLEVBUF,=W'128'
0x19daa8…19dc3c Dummy {f00=0x00d3, f01=0x0190, f02=»'39' TRANS ? h P B BCK000 @ P* @ $ P* @ . P***** @ 8 P* @ F PBSOP05 BACKUP TEXT @ P P TBF CTEXTFLG,BCK010 @ l $ P PERF LAMPOF,=W'2047' LAMPS OFF @ P PERF LAMPON,=W'64' LAMP 5 @ 0 P PERF BACKUP,DK06,=D'6',CBIN0,CTXBUF,=W'24' @ P B
0x19dc3c…19ddd0 Dummy {f00=0x00d3, f01=0x0190, f02=»F @ r P PERF LAMPON,=W'128' LAMP 4 A 2 P PERF BACKUP,DK04,=D'4',CKTMAX,CKTBUF,=W'128' A . BNOK BCK005 NOK A d B BCK000 OK A | * A BSOP07 FINISH A $ PERF LAMPOF,=W'2047' LAMPS OFF A * & PERF ASGVOL,CBIN1 ASSIGN SYSTEM FILES A
0x19ddd0…19df64 Dummy {f00=0x00d3, f01=0x0190, f02=» A SUB CVOLNO,=D'1' B PERF LAMPON,=W'2' LAMP 10 B " B BCKNOK B D * B V BCKNOK B ` CMP CBIN1,CBIN0 NOK B n RET B * B BCKOK B PERF WRITID,CBIN2,CBIN1 B CMP CBIN0,CBIN0 B RET B PEND B P EJECT B
0x19df64…19e0f8 Dummy {f00=0x00d3, f01=0x018e, f02=»******************************************* B P* C 4 PKLRFMT PROC FMTDEX C > P* C X P********** C b P* C t P* ATTACH KLAR ADM FORMAT C ~ P* C P********** C P* C PKLRFTB FTABLE OPENFRM C P ATTFMT KLRFTB(FMTDEX) C P RET
0x19e0f8…19e28c Dummy {f00=0x00d3, f01=0x0190, f02=» POPENFRM FRMT D P FSL D P FCOPY ='ADM ' D $ P FBT GTDYFLG,OPFR05 D < P FTAB 1 D X P FCOPY =C'KASSE]BNING' D h POPFR05 D P FNL D P FBF GTMASTFL,OPFR10 D P FCOPY =C'DAGS-DATO' D . P FKI 11,MINL=6,MAXL=6,ME,SCHK=2,REWRT,NCLR D
0x19e28c…19e420 Dummy {f00=0x00d3, f01=0x0190, f02=»Y D ~ P FNL E POPFR10 E P FCOPY ='POST-DATO' E $ 2 P FKI 11,MINL=6,MAXL=6,ME,SCHK=2,REWRT,APPL=107 E @ P FMEL '99E-99E-99',GTDATO E v P FMEND E P* E PCLFRM01 FRMT E P FSL E P FCOPY =C'KASSELUKNING' E P FILLR X'07',1 E P F
0x19e420…19e5b4 (0, 525) Dummy {f00=0x00d3, f01=0x0190, f02=»SWSTR20 TEXT E " P FMEL 'ZZ',GTWBCD1 COUNTER NR F P FILLR ' ',4 F : P FCOPY GTDBKRC DEB-KRE F N P FNL F l P FCOPY =C'KONTONR' F x P FILLR ' ',5 F P FCOPY =C'BEL' F P FILLR X'5C',1 F P FILLR 'B',1 F P FNL F & P FMEL '99999999E-99',G
0x19e5b4…19e748 Dummy {f00=0x00d3, f01=0x0190, f02=»BT GTSPGFLG,CLF0301 F P FCOPY =C'KASSELUKNING' G PCLF0301 G < P FNL G L P FCOPY GSWSTR20 G X P FMEND G p P* G ~ PCLFRM04 FRMT G P FSL G P FBT GTSPGFLG,CLF0401 G P FCOPY ='KASSELUKNING' G PCLF0401 G P FNL G P FCOPY =
0x19e748…19e8dc Dummy {f00=0x00d3, f01=0x0190, f02=»B 15 G P FCOPY =' DEB' H P FNL H " P FCOPY ='SLET ' H . P FCOPY ='SALDO ' H F P FTAB 15 H ^ P FCOPY =' KRE' H n PCLF0402 H P FNL H P FCOPY ='SUBTOTAL ' H P FTAB 16 H P FCOPY ='KVIT' H P FNL H P FNL H P FNL H P F
0x19e8dc…19ea70 Dummy {f00=0x00d3, f01=0x0190, f02=» ' ',40 H P FBT CSWFLAG,INIT10 I P FILLR X'00',48 I , P FEXIT I D PINIT10 I R P FILLR ' ',48 I ` P FMEND I v P* I PFRVOLID FRMT I P FMEL '999999',CMASKDAT I P FMEL 'B99999',GSWBCD3 I P FMEND I P* I PSLUTFRM FRMT I
0x19ea70…19ec04 Dummy {f00=0x00d3, f01=0x4182, f02=»9',CKMDNR KOMMUNE NR I P FILLR C'2',1 J P FCOPY CVOL(GSWBIN6) J 2 P FMEL '999',CRELDAY DAG NR J N P FILLR C'1',1 MIXED TRANS J p P FILLR ' ',6 J P FMEND J P* J PADFRM01 FRMT J P FSL J P FCOPY ='KLAR ' J P FCOPY ='ADM ' J
0x19ec04…19ed98 Dummy {f00=0x00d3, f01=0x2008, f02=» K NT RGADM DDUM KMD08 PDIV , ENTRY RGADM : RGADM N END @ h
0x19ed98…19ef2c Dummy {f00=0x00d3, f01=0x0190, f02=» 0 < 0 < * J F " D x # L x x ?R ?R "<R L L < 0 0 %0 )0 ,0 A0 J F " D b
0x19ef2c…19f0c0 Dummy {f00=0x00d3, f01=0x0190, f02=» f l0 p0 v 0 J F " D @ LW LW LW # L LW W R T ! L % L @ LH I H B % & 0 0 0
0x19f0c0…19f254 (0, 526) Opaque[0x194]
0x19f254…19f3e8 # DirEnt {nam=»KMREMD«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1a70, f03=0x0000}
0x19f254…19f3e8 IdxSect {
0x19f254…19f3e8 f00 = 0x00d3 // 0x19f254 @0x0
0x19f254…19f3e8 f01 = 0x0004 // 0x19f256 @0x2
0x19f254…19f3e8 gno = [ // 0x19f258 @0x4
0x19f254…19f3e8 [0x00]: C0x00d3.0x2.0
0x19f254…19f3e8 [0x01]: C0x00d3.0x3.0
0x19f254…19f3e8 ]
0x19f254…19f3e8 }
0x19f3e8…19f57c Dummy {f00=0x00d3, f01=0x0190, f02=» PPRT KMREMD PPRT CONRD PMES REMIT PROD. VERSION, ( PMES TEST AF DISK OVERLAY H PMES 80.07.17 h PASG 2,NO | PSCR PLED KMD08,/S P!!CH $$26$$22$$ P!!DL 60,61 FD03,FD04 P!!DL 182 0 PMF1KBV STRG 32X'C1C2C3C4
0x19f57c…19f710 Dummy {f00=0x00d3, f01=0x0190, f02=»U ADR, SELECT/POLL | P!!DL 188 ( PCNFHC STRGI (16),'GA','LA','GA',' ' * P!!DL 193,194 V " POFF STRGI (12)2C'TD','TE',' ' j $ P!!RE 198,$$FALSE$$TRUE$$ CBKOFLG $ P!!RE 199,$$FALSE$$TRUE$$ CKTFLAG & P!!RE 200,$$FALSE$$FALSE$$ CCLKTFLG &
0x19f710…19f8a4 Dummy {f00=0x00d3, f01=0x0190, f02=»$FALSE$$FALSE$$ CFLT48 $ P!!RE 205,$$TRUE$$FALSE$$ CKTAUTO P!!RE 206,$$FALSE$$TRUE$$ DC F & P!!RE 207,$$FALSE$$FALSE$$ CCYWRTF j & P!!RE 208,$$FALSE$$FALSE$$ CADM22F & P!!RE 209,$$FALSE$$FALSE$$ C5MDISK $ P!!RE 210,$$TRUE$$FALSE$$ CKASFLG
0x19f8a4…19fa38 Dummy {f00=0x00d3, f01=0x0190, f02=» 237,$$FALSE$$TRUE$$ CREMITFL & P!!RE 246,$$FALSE$$TRUE$$ CTEXTFLG & & P!!RE 247,$$FALSE$$TRUE$$ CSTRKFLG P & P!!RE 248,$$FALSE$$TRUE$$ CBUDTFLG z P!!DL 286 , PCFLAG BINI (12),X'0051',X'0060',X'0064' , P!!RE 372,$$01014610$$04029991$$ VERS
0x19fa38…19fbcc Dummy {f00=0x00d3, f01=0x0190, f02=»!!RE 441,$$21$$21$$ CKTMAX P!!RE 446,$$128$$80$$ CRECLGD " & P!!RE 448,$$6'OD-KOM'$$6'P.6000'$$ F P!!RE 449,$$7$$7$$ CKTINDX p P!!RE 450,$$20$$20$$ CIXINDX P!!RE 451,$$5$$1$$ CKTTOP P!!DL 452,453 & PON STRGI (12)2C' ','KA','KB',
0x19fbcc…19fd60 Dummy {f00=0x00d3, f01=0x018e, f02=» PNOD R PLED SCREEN,/S P!!CH $$KEY461$$KEYCOP$$ ( P!!CH $$SL461$$SLCOP$$ H P!!EN f PTRA /S,NL r PINC RGSUB4 PINC RGSTRT PNOD D PINC RGMAIN PINC RGSUBS PINC RGSUB1 PINC RGSUB2 PINC RGSUB3
0x19fd60…19fef4 (0, 527) Dummy {f00=0x00d3, f01=0x0190, f02=» PINC SUBAPL PINC REMPRT PINC REMSUB ( PNOD R : PINC KMDIO H PINC DKSUBS Z PINC REMTXT l PNOD R ~ PINC RGFRMT PINC REMFMT PNOD D PINC REMLEV PINC ADM6 PNOD D PINC REMTR PINC REMB
0x19fef4…1a0088 Dummy {f00=0x00d3, f01=0x0058, f02=»OAD PSCR 2 PMES $PDISC M=M:9.2P,MU=M:9.2P,A=RGLOAD,C=CONRD P$ASG2 N PINC DKSUBS Z PINC REMTXT l PNOD R ~ PINC RGFRMT PINC REMFMT PNOD D PINC REMLEV PINC ADM6 PNOD D PINC REMTR PINC REMB
0x1a0088…1a021c Dummy {f00=0x00d3, f01=0x2008, f02=» PSCR 2 PMES $PDISC M=M:9.2P,MU=M:9.2P,A=RGLOAD,C=CONRD P$ASG2 N PINC DKSUBS Z PINC REMTXT l PNOD R ~ PINC RGFRMT PINC REMFMT PNOD D PINC REMLEV PINC ADM6 PNOD D PINC REMTR PINC REMB
0x1a021c…1a03b0 Dummy {f00=0x00d3, f01=0x008c, f02=» LEV=60; 00; P00; $ PC; 0 P00; : P01; F PSCL=S01; R U; b 001; l TB2; x P001; ; P01; PSCL=S04; PT; P01; TID=KA; TCL=KA; LEV=60; 01; PTDC=
0x1a03b0…1a0544 Dummy {f00=0x00d3, f01=0x2008, f02=» LEV=60; 00; P00; $ PC; 0 P00; : P01; F PSCL=S01; R U; b 001; l TB2; x P001; ; P01; PSCL=S04; PT; P01; TID=KA; TCL=KA; LEV=60; 01; PTDC=
0x1a0544…1a06d8 Dummy {f00=0x00d3, f01=0x2008, f02=» 001; TB2; P002; $ PSCL=S02; 0 PSCL=S03; @ PSCL=S04; P PT; ` P01; j PTID=LA; v PTCL=LA; PLEV=60; P00; P04; PSCL=S02; PSCL=S03; PSCL=S04; PSCL=S05; T;
0x1a06d8…1a086c Dummy {f00=0x00d3, f01=0x0190, f02=»A,/5A6C,/507D 20-27 ( P DATA /4D5D,/5C4E,/6B60,/4B61 28-2F ( P DATA /F0F1,/F2F3,/F4F5,/F6F7 30-37 H ( P DATA /F8F9,/7A5E,/4C7E,/6E6F 38-3F t ( P DATA /6AC1,/C2C3,/C4C5,/C6C7 40-47 ( P DATA /C8C9,/D1D2,/D3D4,/D5D6 48-4F ( P DATA /D7D8,/D9E
0x1a086c…1a0a00 Dummy {f00=0x00d3, f01=0x0190, f02=»394,/9596 68-6F | ( P DATA /9798,/99A2,/A3A4,/A5A6 70-77 ( P DATA /A7A8,/A900,/0000,/0000 78-7F D P DE p P EJECT ~ P* 4 P* TRANSLATION OF FUNCTON KEYS & LOWER CASE P - W P* PKEYCNV EQU * P IFF KB6272=1 P CWK A
0x1a0a00…1a0b94 (0, 528) Opaque[0x194]
0x1a0b94…1a0d28 # DirEnt {nam=»OBDIR «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1a80, f03=0x0000}
0x1a0b94…1a0d28 IdxSect {
0x1a0b94…1a0d28 f00 = 0x00d4 // 0x1a0b94 @0x0
0x1a0b94…1a0d28 f01 = 0x0008 // 0x1a0b96 @0x2
0x1a0b94…1a0d28 gno = [ // 0x1a0b98 @0x4
0x1a0b94…1a0d28 [0x00]: C0x00d4.0x0.0
0x1a0b94…1a0d28 [0x01]: C0x00d4.0x1.0
0x1a0b94…1a0d28 [0x02]: C0x00d4.0x2.0
0x1a0b94…1a0d28 [0x03]: C0x00d4.0x3.0
0x1a0b94…1a0d28 ]
0x1a0b94…1a0d28 }
0x1a0d28…1a0ebc Dummy {f00=0x00d4, f01=0x000c, f02=»810521 . .200T AD4300D CHDATOW ( IDXGETO LEVDELV LEVIN LEVOPRL LEVPRTP LEVRD LEVSPGE REPL00 W SETIDX SETKEYT TRGETFD TRINS TXTOPRE U TXTPRTE S TXTRD ~ VARRD VARWRTR WSTRCHD XCOPP B ADMRET 6RAADUM , 810521
0x1a0ebc…1a1050 Dummy {f00=0x00d4, f01=0x0190, f02=» PRT 810521 PRINT I:EVA0 EMULA DC1INQ ICREAD ` REQTIM GTRBUF DCGETM UPDATE RFMDUP SNBUSYK VDUPRT 810521 DCINP LINHON LSAVON ATMASB LINHOFC SNBUSY DCGETM | REQTIM` GTRBUF $
0x1a1050…1a11e4 Dummy {f00=0x00d4, f01=0x0190, f02=»R * WCHAR+ RFMDUP + + `START 810521 DCTASK P I:EVA0 GTRBUF DCGETM RLRBUFV EMULA VDUKB ERASE ICREAD DCINP DC1INQN > DC2INQ V KEYCNV REQTIM SETCUR WCHAR DISPL TASCII TRPAN TRPFN I:RT1
0x1a11e4…1a1378 Dummy {f00=0x00d4, f01=0x0190, f02=» 810521 TASCIIK TEBCDI @ KEYCNV ( 4DCTSK " 810521 DCTSK I:EVA0 8EBCDIC $ 810521 TASCIIK TEBCDI FRKIO & 810521 RKIOY T:FDSP I:EVA0 T:IO3 6 RGMAIN ' 810521
0x1a1378…1a150c Dummy {f00=0x00d4, f01=0x0190, f02=»A SPCLRA SPCLRN SPCN SPERR SPINF1K SUBTOTEhSUM T:ERAS T:TBWD0 u 6RGMND - 810521 $$$TRAM INITRG NI |RGSTRT . 810521 $$$TRAS CNFWRT z CONFWRC ' CONRDXT SETFLG T1GO TCONFR TCONFWS hADM ASGVOLC CLBEH CLE
0x1a150c…1a16a0 Dummy {f00=0x00d4, f01=0x0190, f02=»RD SPCLRAK SPCLRNO SPLIN8A STRTWRS T:ATTFA T:DSC0R T:GETIR T:PAUSR T:RSTRR T:USE UPDAKK WRITIDG ZEROD DKSUBS B 810521 $$$TRA BACKUPS GETBITW Y KFREAD- KFWRIT1 RADEL RAREAD RAWRIT { RGREADK p RSTOREW SQWRITL WAITF v A
0x1a16a0…1a1834 (0, 529) Dummy {f00=0x00d4, f01=0x0190, f02=» @ SCREEN N 810521 $$$TRAC BELLR t CLEAR8S H DKTESTF Z KBTEST1 z SCREEN1 - SPCA SPCLRAC SPCLRNT SPCLRSS SPCNE % SPERR SPINF1S 0 SPINF8t B SPLIN8H ABORT EMPTYTC RKAPPLS SPAPPL SPCHK1% SPCHK2 SPCHK3S SPCHK4 SPCHK5t SPCHK6N SPC
0x1a1834…1a19c8 Dummy {f00=0x00d4, f01=0x0190, f02=»:TDOWS T:TESTC T:TFWD T:THOME T:TLDOR T:TLEFS T:TRIGS T:TSTCS T:TUP T:UPDFT T:WAIT T:XSTAt @ TRGFRMT c * *810521 $$$TRAF FMSTYR FRMTSPF FRMXSP T:ATTFF DIVFMT 4 4810521 $$$TRA FRMTGPV ? FRMTJTF FRMTKTM 1 FRMTK
0x1a19c8…1a1b5c Dummy {f00=0x00d4, f01=0x0190, f02=»PV ? FRMTJTF FRMTKTM 1 FRMTKV1 * FRMTTAX FRMTVO FRMXGP F FRMXJTF FRMXKTM 8 FRMXTAT FRMXVO # FMOVE M DIV167 3 3810521 $$$TRA FRMTGPV ? FRMTJTF FRMTKTM 1 FRMTKV1 * FRMTTAX FRMTVO FRMXGP F FRMXJTF FRMXKTM 8 FRMXTAT F
0x1a1b5c…1a1cf0 Dummy {f00=0x00d4, f01=0x0190, f02=»RMXJTF FRMXKTM 8 FRMXTAT FRMXVO # FMOVE M DIV525 W 0 0810521 $$$TRA FRMTGPV ? FRMTJTF FRMTKTM 1 FRMTKV1 * FRMTTAX FRMTVO FRMXGP F FRMXJTF FRMXKTM 8 FRMXTAT FRMXVO # FMOVE M DIV743 / /810521 $$$TRA FRMTG
0x1a1cf0…1a1e84 Dummy {f00=0x00d4, f01=0x0190, f02=» <810521 $$$TRA FRMBUDV M FRMBUPF T FRMTGPM ? FRMTJTT FRMTKTX 1 FRMTKV * FRMTTA FRMTVOF FRMXGPM F FRMXJTK FRMXKT 8 FRMXTA FRMXVOV # FMOVE Z DIV539 : :810521 $$$TRA FRMBUDV I FRMBUPF P FRMTGPM = FRMTJTT FRMTKTX 0 F
0x1a1e84…1a2018 Dummy {f00=0x00d4, f01=0x0190, f02=» FRMBUDV M FRMBUPF T FRMTGPM ? FRMTJTT FRMTKTX 1 FRMTKV * FRMTTA FRMTVOF FRMXGPM F FRMXJTK FRMXKT 8 FRMXTA FRMXVOV # FMOVE Z SUBAPL h 810521 $$$TRAS SELTR > SETDEBA 0 SETKRES " SPAPPL1 SPCHK11 SPCHK2 X SPCHK3S SPCHK
0x1a2018…1a21ac Dummy {f00=0x00d4, f01=0x0190, f02=»810521 $$$TRAC CRKJJ CRVOV GRASPV1 ` LINOPT i WCHECK. WCHUPD r WRITFDC WRITIDP WRITJT WRITVOW WTALLYI { ABORThADM CHDATOG CLEAR8` CYWRT FRMTJTH FRMXJTW FRMXTAr FRMXVOC IDXGETI LEVIN LEVRD RADEL RAWRITW SPCHK5{ SPERR SPLIN8A T:DELAT
0x1a21ac…1a2340 Dummy {f00=0x00d4, f01=0x0190, f02=» BCKUP CLBEH CLEDB CLEJ6 CLKF1 KLRFMTX RGA120 s RGKLARC SKIFT SLUTIDC STRTIDM STRTWR f ZERO m hADM ASGVOLB BACKUPE CLEAR8E CLSVOLK CNFWRTR CONFWRR CONRDXs CRKJA FRMXVOI GRASPVU INITRGS KFREAD KFWRIT KORTR KTPLANT LAMPOFG LAMPONC P
0x1a2340…1a24d4 (0, 530) Dummy {f00=0x00d4, f01=0x0190, f02=»TF WRITFDC WRITIDC WRITJTC TRGADM , ,810521 $$$TRAA A5RET1 A5RET2A hADM ADMRET A5KONVA ABORT AD4100 AD42006 AD43001 ADM6001 ASGVOL BCKUP BUDREG CLBEH CLEAR8A CLEDB CLEJ CLKF CLSVOL CRVO hCYK DIVTR EMPTYTT FRMTKV FRMXJT6 F
0x1a24d4…1a2668 Dummy {f00=0x00d4, f01=0x0190, f02=»TF MODP ONLINE PACKCL RAWRITC RGREADC SKIFT SLUTIDK SOPRD SPCLRAM SPCLRN SPINF1E SPLIN8F SUBTOTFhSUM T:ATTFV T:DELAT T:DSC0D T:DSC1N T:EDWR T:WAITC TCONFRC TCONFWS TRPAGES TXTOPRC TXTPRTC WRITIDE WRITJTF WTALLYF ~RGSUBS 810521 $$$
0x1a2668…1a27fc Dummy {f00=0x00d4, f01=0x0190, f02=»TKTT FRMTKV FRMXKT& FRMXSPR FRMXTA FRMXVOI GRASPVN LINOPT SETDEB SETKREC SLUT SPCHK5C SPCLRAP SPERR SPINF1F SPLIN8F T:DSC0 T:DSC1& T:EDWRR T:ERAS T:TESTI T:WAITN WCHECK WRITJT WRITVOC WTALLYS E RGSUB1 810521 $$$TRAS FLDIN m F
0x1a27fc…1a2990 Dummy {f00=0x00d4, f01=0x0190, f02=» PRGSUB2 810521 $$$TRAS PACKCL / PACKST CYTRP EMPTYTT D U RGSUB3 810521 $$$TRAS CYOUT = CYRDC CYTRP CYWRT n CLEAR8S CRVOT FRMXVO GRASPV6 RAREAD1 RAWRIT1 SPLIN8 T:DELA T:DSC0= T:DSC1 T:EDWR T:WAITn WAITF
0x1a2990…1a2b24 Dummy {f00=0x00d4, f01=0x0190, f02=»11 T:KI. Q ADM6 810521 $$$TRAM ADM600 ADMRETM ASGVOLA BCKUP CLSVOL8 GETBIT1 LAMPOF1 LAMPON RAREAD RAWRIT SLUTID SOPRD SPCLRS SPERR SPLIN8 T:ATTF T:DCRE T:DCWRM T:DELAA T:DSC1C T:EDWRG T:WAITL WRITIDL WRITJTR @ADM6
0x1a2b24…1a2cb8 Dummy {f00=0x00d4, f01=0x0190, f02=»POFF LAMPON RAREADX SLUTID SPCLRA SPLIN8 SQWRIT STRTID T:ATTF T:DSC0 T:DSC1 WRITIDM @ADM5D 810521 $$$TRAM A5KONV A5RET2M XKTPLN 810521 $$$TRAP KTPLAN RESTMKS SETMK RAREADP WAITF B E >
0x1a2cb8…1a2e4c Dummy {f00=0x00d4, f01=0x0190, f02=»LAN1 RAREADF RAWRIT RESTMKX SPCLRA SPCLRN SPERR T:ATTF T:EDWR T:WAIT WAITF WTALLY FKTOPRD 810521 $$$TRAO KTOPR KTPRT ADMRETO PREMFMT 810521 $$$TRAM FMREMP FMTREM FMOVE T:ATTFT JREMFMS 5
0x1a2e4c…1a2fe0 Dummy {f00=0x00d4, f01=0x0190, f02=»DEL1 LEVIN LEVOPR C LEVPRT LEVRD @ LEVSPGL _ SETIDXV VARRD VARWRT XCOPT ! BDTDEL CLEAR8D FMTREMP KBTESTT RADEL RAREAD RAWRIT REPL00 SETKEY! SPCLRAX SPCLRNX SPERR SPLIN81 T:EDWRN TRINITP TRREAD TXTRD WAITF 2 REMTXT ^ 810521
0x1a2fe0…1a3174 (0, 531) Dummy {f00=0x00d4, f01=0x0190, f02=»PCLRN SPLIN8P T:EDWR T:TESTM T:WAITD WAITF REMBDT f 810521 $$$TRAM BCHKPR BGIRPRB BSAMPRR STREDTC L WSTRCH CLEAR8M CYRDT FMOD2 FMREMP- FSOLVE1 GENWRF GENWRS GRASPV KFWRIT LEVRD NEWLINB RAWRIT SPLIN8C T:DSC0C T:DSC1 T:E
0x1a3174…1a3308 Dummy {f00=0x00d4, f01=0x0190, f02=»DT GRASPV KFWRIT6 RAWRIT1 SPLIN8 T:DELA T:DSC0 T:DSC1 T:EDWRP WRITJTA FREMTR 810521 $$$TRA BDTDELM BDTPRT4 BDTSCA- TRGET 0 TRGETF TRINIT TRINS TRREAD TRRMV BCHKPRM BGIRPRR BSAMPRT CHDATOT CLEAR8T GENWRF GETNX
0x1a3308…1a349c Dummy {f00=0x00d4, f01=0x0190, f02=»COPS REMPRT 810521 $$$TRAM AD4100 AD4200A U AD4300 ADMRETM BDTDELA BDTPRT1 BDTSCAF CHDATO SPCLRAX T:ATTF - REMSUB 810521 $$$TRAM FMOD FSOLVEK H KBTESTW NEWLIND PRTADJ ABORT GENWRFT SPCLRA SPLIN86
0x1a349c…1a3630 Dummy {f00=0x00d4, f01=0x0190, f02=» PACKST RAREAD RAWRIT RGREAD SETDEB SKIP SPCLRA SPCLRN SPERR T:ATTFF T:DELAF WAITF WRITFD6 6BUDD 810521 $$$TRAD BUDREG UD RKONV % %810521 $$$TRAO hASG ATTHD1D DKIOR ' DKREADI DKWRIT RKASSG RKGO
0x1a3630…1a37c4 Dummy {f00=0x00d4, f01=0x0190, f02=»AA [ 6RKTEST 810521 $$$TRAT RKTEST u x `RKAPPL 810521 $$$TRAA RKAPPL SPCHK1A T:DSC1A T:GETA1 T:TBWDF T:TFWD RKSUBS 810521 $$$TRAS COPYDK INITI m IXWRITD LOD1 PASS SPORG hASG ATT
0x1a37c4…1a3958 Dummy {f00=0x00d4, f01=0x412c, f02=»D4100 AD4200T AD4300D CHDATOW ( IDXGETO LEVDELV LEVIN LEVOPRL LEVPRTP LEVRD LEVSPGE REPL00 W SETIDX SETKEYT TRGETFD TRINS TXTOPRE U TXTPRTE S TXTRD ~ VARRD VARWRTR WSTRCHD XCOPP B ADMRET 6RAADUM , 810521
0x1a3958…1a3aec Dummy {f00=0x00d4, f01=0x413c, f02=» * & , ( ;@ TC , N , ( Q ~ , ( a " $ & ( * , ( q , . 0 2 4 6 8 :
0x1a3aec…1a3c80 Dummy {f00=0x00d4, f01=0x40e4, f02=» : H IDENT T:DTC0 TRA 4.2 81-05-21 F1 O1111 04.01.XXX.1 T:DTC0 B T:DTC0D T REENTC REGGO h * & TC * " * @ , . 0 2 4 6 8 :
0x1a3c80…1a3e14 (0, 532) Opaque[0x194]
0x1a3e14…1a3fa8 # DirEnt {nam=»DC82 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1aa0, f03=0x0000}
0x1a3e14…1a3fa8 IdxSect {
0x1a3e14…1a3fa8 f00 = 0x00d5 // 0x1a3e14 @0x0
0x1a3e14…1a3fa8 f01 = 0x0004 // 0x1a3e16 @0x2
0x1a3e14…1a3fa8 gno = [ // 0x1a3e18 @0x4
0x1a3e14…1a3fa8 [0x00]: C0x00d5.0x0.0
0x1a3e14…1a3fa8 [0x01]: C0x00d5.0x1.0
0x1a3e14…1a3fa8 ]
0x1a3e14…1a3fa8 }
0x1a3fa8…1a413c Dummy {f00=0x00d5, f01=0x0190, f02=» & ! IDENT DCTSK REL 1.2 78-11-30 KST ENTRY DCTSK . P EJECT B P P P X > P********************************************************** ` P* P* CONDITIONAL ASSEMBLY P* & P********************************* P P
0x1a413c…1a42d0 Dummy {f00=0x00d5, f01=0x0190, f02=»X EQU 0 PMGTP EQU 0 PEBCDIC EQU 1 " P EJECT 6 P* D P* N P* EQUATES X P* n P* x P* " P* COMMON EQU FOR ECB HANDLING P* P PECBBA EQU 2 PECBRL EQU 4 PECBEL EQU 6 PECBRC EQ
0x1a42d0…1a4464 Dummy {f00=0x00d5, f01=0x018e, f02=»* PDIS EQU 20 P* PECB1 EQU -DIS-8 & PECB2 EQU ECB1-DIS > PECB3 EQU ECB2-DIS X PECB4 EQU ECB3-DIS r PECB5 EQU ECB4-DIS P* PECBDC EQU ECB1 PECBDCT EQU ECB2 PECBVDU EQU ECB3 PECBKB EQU ECB4
0x1a4464…1a45f8 Dummy {f00=0x00d5, f01=0x0190, f02=» PCREBAS EQU A13 ECB P* P* ( P* TCA REL. ADDRESSES 2 P* N PTCT01 EQU 0 X PPRINTER EQU TCT01+2 l ( PBVDU EQU PRINTER+2 VDU SCREEN BUFFER 0 PPCURS EQU BVDU+1920 CURSOR ADDRESS , BINARY * PATTRIB EQU PCURS+2 LAST ATTRIBUT
0x1a45f8…1a478c Dummy {f00=0x00d5, f01=0x0190, f02=»NCNT EQU KBINH+2 LINE COUNTER 0 PDCLENG EQU LINCNT+2 DC READ EFFECTIVE LENGTH & . PDCADDR EQU DCLENG+2 DC SUBTERMINAL ADDRESS Z PTCTGPL EQU DCADDR+2 , PINTATT EQU TCTGPL+2 INTENSITY ATTRIBUTE $ POFFFLG EQU INTATT+2 OFFLINE FLAG PLOCK EQU
0x1a478c…1a4920 Dummy {f00=0x00d5, f01=0x018e, f02=»PNO+2 CREDIT ECB:S BASE ADDRESS & PVDUT.A EQU CRE+2 T:A BASE ADDRESS ( , PCCC EQU VDUT.A+2 COPY COMMAND CHARACTER R P EJECT P* P* * PLBVDU EQU 1920 1920 CHAR DISPLAY 6344 " PLPAGE EQU 48 LINES ON ONE PAGE * PLLINE EQU 80 80
0x1a4920…1a4ab4 (0, 533) Dummy {f00=0x00d5, f01=0x0190, f02=» & PTCADDR EQU /2D20 TCS & TCP ASCII P XIF . P EJECT : P* H P* R P* DC TASK P* n P* x PDCTSK EQU * P LDKL A1,TCADDR & P LDKL A8,ECBDCX ECB DC FOR DC TASK P ST A1,ECBCW,A8 $ P LDK A7,/B7 TRANSFER PAR
0x1a4ab4…1a4c48 Dummy {f00=0x00d5, f01=0x40f2, f02=»RETURN CODE | P ANKL A1,/2000 P RB(NZ) DCT100 STATUS CHANGE * , P LDK A7,/A2 MESSAGE: RELEASE READ BUFFER N P LKM ~ P DATA 1 P RB DCT100 P* P* PECBDCX DATA /60,0,0,0,0,0 END @ DK A7,/B7 TRANSFER PAR
0x1a4c48…1a4ddc Dummy {f00=0x00d5, f01=0x2008, f02=» NT DCTSK REL 1.2 78-11-30 KST ENTRY DCTSK . END B@ N 3
0x1a4ddc…1a4f70 Dummy {f00=0x00d5, f01=0x0190, f02=» ( # % F # & $ # & # . & ADM # > $ & # R & # b ' BEHOLDNINGST[LLERE # p $ ' # & # ( NR # $ ( # & # ) KONTONRI # $ ) #
0x1a4f70…1a5104 Dummy {f00=0x00d5, f01=0x0190, f02=»& # & $ & $ & $ * & $ : , 99999999E-99 $ L " , $ h & $ x & $ & $ & $ - TTT.TTT.TTT.TT9.99- $ " - $ $ $ ( $
0x1a5104…1a5298 Dummy {f00=0x00d5, f01=0x0190, f02=» & % 1 KONTONRO % $ 1 % * & % : 2 SALD0 % H $ 2 % ^ & % n & % | & % 3 99999999E-99 % " 3 % & % 4 TTT.TTT.TTT.TT9.99- % " 4
0x1a5298…1a542c Dummy {f00=0x00d5, f01=0x0190, f02=»TONR REMIT % ~ $ 7 & & & " 8 KONTONRK & 0 $ 8 & H & & X & & f 9 99999999E-99 & x " 9 & ( & : & & 9 & ; DISKETTE SKIFT & $ ; & & &
0x1a542c…1a55c0 Dummy {f00=0x00d5, f01=0x0190, f02=»( & > ' & 1 ' ? KASSELUKNING ' ( $ ? ' D & ' T & ' b @ ZZ ' p " @ ' & ' & ' & ' A KONTONRK ' $ A ' & ' B BEL '
0x1a55c0…1a5754 (0, 534) Opaque[0x194]
0x1a5754…1a58e8 # DirEnt {nam=»KEYCOP«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1ab0, f03=0x0000}
0x1a5754…1a58e8 IdxSect {
0x1a5754…1a58e8 f00 = 0x00d5 // 0x1a5754 @0x0
0x1a5754…1a58e8 f01 = 0x0002 // 0x1a5756 @0x2
0x1a5754…1a58e8 gno = [ // 0x1a5758 @0x4
0x1a5754…1a58e8 [0x00]: C0x00d5.0x2.0
0x1a5754…1a58e8 ]
0x1a5754…1a58e8 }
0x1a58e8…1a5a7c Dummy {f00=0x00d5, f01=0x0190, f02=» PNOKEY EQU X'FF' PBSPKY1 EQU X'87' PCANKY1 EQU X'91' 4 PMACKY1 EQU X'95' L PEORKY1 EQU X'90' d PFTABKY1 EQU X'8B' | PBTABKY1 EQU X'83' PDUPKY1 EQU X'A2' PSLUTKY1 EQU X'A3' PREGKY1 EQU X'A1' PCOPKY1 EQU X'F
0x1a5a7c…1a5c10 Dummy {f00=0x00d5, f01=0x0190, f02=»Y1 EQU X'FF' PCY2KY1 EQU X'FF' PCYCKY1 EQU X'89' , PINVKY1 EQU X'FF' D PKONKY1 EQU X'85' PKVITKY1 EQU X'86' t PSUPLKY1 EQU X'82' PSUMKY1 EQU X'81' PADMKY1 EQU X'A0' PDIVKY1 EQU X'84' PHBOGKY1 EQU X'80'
0x1a5c10…1a5da4 Dummy {f00=0x00d5, f01=0x0190, f02=»BKY1 EQU X'87' PINSKY1 EQU X'81' PDELKY1 EQU X'82' . PCL1KY1 EQU X'89' F PCL2KY1 EQU X'8A' ^ PCL3KY1 EQU X'8B' v POUTKY1 EQU X'A0' P* PBSPKY2 EQU X'C7' PCANKY2 EQU X'D1' PEORKY2 EQU X'D0' PMACKY2 EQU X'D5'
0x1a5da4…1a5f38 Dummy {f00=0x00d5, f01=0x40c4, f02=»EKY2 EQU X'D2' PREGKY2 EQU X'E1' PADMKY2 EQU X'E0' . PSPGKY2 EQU X'FF' F PKONKY2 EQU X'FF' ^ PKVITKY2 EQU X'C6' v PONKY2 EQU X'D9' PCOPKY2 EQU X'C5' @ PCANKY2 EQU X'D1' PEORKY2 EQU X'D0' PMACKY2 EQU X'D5'
0x1a5f38…1a60cc Dummy {f00=0x00d5, f01=0x2008, f02=» * ERRFMT FRMT FSL , " FMEL 'ZZ9B',GTWBCD1 FILE NR. 8 FCOPY ERRTXT ^ " FMEL 'BZZ9',GTWBCD2 ERRORNR. t FCOPY =X'07' FMEND @ 8SPKTAB2 KTAB BSPKY1,CANKY1,NOKEY,MACKY1,NOKEY,EORKY1, C D ? FT
0x1a60cc…1a6260 Dummy {f00=0x00d5, f01=0x0190, f02=»THE PICTURE Z P* P MOVE SPERASE,=W'0' & P MOVE SPLINTOP,=W'1' WHOLE SCREEN : P MOVE SPLINLOW,=W'0' d P PERF SCREEN,=W'2' P RET P PEND PSPCLRN PROC P* D P* SPCLRN - CLEAR NO VARIABLE FIELDS BEFORE HANDLING TH
0x1a6260…1a63f4 (0, 535) Opaque[0x194]
0x1a63f4…1a6588 # DirEnt {nam=»SLCOP «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1ab8, f03=0x0000}
0x1a63f4…1a6588 IdxSect {
0x1a63f4…1a6588 f00 = 0x00d5 // 0x1a63f4 @0x0
0x1a63f4…1a6588 f01 = 0x0004 // 0x1a63f6 @0x2
0x1a63f4…1a6588 gno = [ // 0x1a63f8 @0x4
0x1a63f4…1a6588 [0x00]: C0x00d5.0x3.0
0x1a63f4…1a6588 [0x01]: C0x00d6.0x0.0
0x1a63f4…1a6588 ]
0x1a63f4…1a6588 }
0x1a6588…1a671c Dummy {f00=0x00d5, f01=0x0190, f02=» < PSPKTAB1 KTAB BSPKY1,CANKY1,NOKEY,EORKY1,NOKEY,MACKY1, C > P FTABKY1,BTABKY1,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C D & P COPKY1,DUPKY1,EDTKY1,SLUTKY1, C . P KREKY1,REGKY2,LISTKY1,SBTKY1,SPGKY1, C < P CY1KY1,CY2KY1,INVKY1,KONKY1,KVITKY1,
0x1a671c…1a68b0 Dummy {f00=0x00d5, f01=0x0190, f02=»CANKY1,NOKEY,EORKY1,NOKEY,MACKY1, C | > P FTABKY1,BTABKY1,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C , & P COPKY1,DUPKY1,EDTKY1,SLUTKY1, C n . P KREKY1,REGKY2,LISTKY1,SBTKY1,SPGKY1, C < P CY1KY1,CY2KY1,INVKY1,KONKY1,KVITKY1,SUPLKY1,SUMKY1, C <
0x1a68b0…1a6a44 Dummy {f00=0x00d5, f01=0x0190, f02=» d " P CL1KY1,CL2KY1,CL3KY1,OUTKY1 P* . > PSPKTAB12 KTAB BSPKY2,CANKY2,NOKEY,EORKY2,NOKEY,MACKY2, C 8 2 P FTABKY2,BTABKY2,NOKEY,NOKEY,NOKEY,NOKEY, C z 2 P NOKEY,NOKEY,COPKY2,DUPKY2,EDTKY2,SLUTKY2, C 6 P KREKY2,REGKY2,ADMKY2,SPGKY2,KONK
0x1a6a44…1a6bd8 Dummy {f00=0x00d5, f01=0x0190, f02=»NOKEY, C l 2 P NOKEY,NOKEY,NOKEY,DUPKY2,EDTKY2,SLUTKY2, C 6 P KREKY2,REGKY2,ADMKY2,SPGKY2,KONKY2,KVITKY2,ONKY2 H P* * P* INQUIRY KEYTABLES (SPKEY=3) P* < PSPKTAB13 KTAB BSPKY1,NOKEY,CANKY1,NOKEY,NOKEY,MACKY1, C . P NO
0x1a6bd8…1a6d6c Dummy {f00=0x00d5, f01=0x0190, f02=» C j " P NOKEY,INVKY1,KONKY1,KVITKY1 P* 2 < PSPKTAB23 KTAB BSPKY1,NOKEY,CANKY1,NOKEY,NOKEY,MACKY1, C < . P NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C | . P NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C . P NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,
0x1a6d6c…1a6f00 Dummy {f00=0x00d5, f01=0x0190, f02=» PSPKTAB24 KTAB NOKEY P* $ P* . : PSPFTBERR FTABLE ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C 8 , P ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C v , P ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C , P ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C , P
0x1a6f00…1a7094 (0, 536) Dummy {f00=0x00d6, f01=0x0190, f02=»MT2,MSFMT3,MSFMT4,MSFMT5,MSFMT6, C v & P MSFMT7,MSFMT8,MSFMT9,MSFMT10, C , & P MSFMT11,MSFMT12,MSFMT13,MSFMT14 V P* P* PERRFMT FRMT P FSL P FCOPY ='FEJL ' P FMEL 'ZZ9',GSWBCD4 ERRORNR. P FMEND P* P
0x1a7094…1a7228 Dummy {f00=0x00d6, f01=0x0190, f02=»T1 FRMT P FSL P FCOPY ='SKIFT JOURNAL' P FMEND < P* J PMSFMT2 FRMT T P FSL h P FCOPY ='LINIE NR' t P FILLR '.',1 P FMEND P* PMSFMT3 FRMT P FSL P FTEXT ='NY SIDE. ' P FMEND P
0x1a7228…1a73bc Dummy {f00=0x00d6, f01=0x0190, f02=»ZZVZZ9,99+',GTSUM PFMT4END P FMEND * P* 8 PMSFMT5 FRMT B P FSL V P FCOPY ='BILAG' b P FMEND z P* PMSFMT6 FRMT P FSL P FCOPY ='KONTOKORT' P FMEND P* PMSFMT7 FRMT P FSL P F
0x1a73bc…1a7550 Dummy {f00=0x00d6, f01=0x0190, f02=»ND P* PMSFMT9 FRMT P FSL ( P FCOPY ='OPSTART ' 4 P FMEND N P* PMSFMT10 FRMT f P FSL z " P FMEL 'TTTTTTTTTTTT9-',GTWBCD2 P FMEND P* PMSFMT11 FRMT P FSL P FCOPY ='OPRET LEV. ' P FMEND
0x1a7550…1a76e4 Dummy {f00=0x00d6, f01=0x4074, f02=» FMEND P* PMSFMT14 FRMT P FSL , P FCOPY ='VENT P] DISK ' 8 P FMEND X P* f@ p f P FSL z " P FMEL 'TTTTTTTTTTTT9-',GTWBCD2 P FMEND P* PMSFMT11 FRMT P FSL P FCOPY ='OPRET LEV. ' P FMEND
0x1a76e4…1a7878 Dummy {f00=0x00d6, f01=0x2008, f02=» * ERRFMT FRMT FSL , " FMEL 'ZZ9B',GTWBCD1 FILE NR. 8 FCOPY ERRTXT ^ " FMEL 'BZZ9',GTWBCD2 ERRORNR. t FCOPY =X'07' FMEND @ 8SPKTAB2 KTAB BSPKY1,CANKY1,NOKEY,MACKY1,NOKEY,EORKY1, C D ? FT
0x1a7878…1a7a0c Dummy {f00=0x00d6, f01=0x00dc, f02=» $ P FMEL 'TTTTTTTVTT9,99-',GTBSUM2 P!!EN , PTRA /S,NL 8 PTLK U,4K J PINC DCTSK Z LKE M l PKPF /L,RGL173 z PSCR 2 PMES $PDISC M=M:173,MU=M:POOL92,A=RGL173,C=C173 P$ASG2 57 P PERF FMOD,CBIN13,GTLEVTXT P
0x1a7a0c…1a7ba0 Dummy {f00=0x00d6, f01=0x2008, f02=» L 'TTTTTTTVTT9,99-',GTBSUM2 P!!EN , PTRA /S,NL 8 PTLK U,4K J PINC DCTSK Z LKE M l PKPF /L,RGL173 z PSCR 2 PMES $PDISC M=M:173,MU=M:POOL92,A=RGL173,C=C173 P$ASG2 57 P PERF FMOD,CBIN13,GTLEVTXT P
0x1a7ba0…1a7d34 (0, 537) Opaque[0x194]
0x1a7d34…1a7ec8 # DirEnt {nam=»C173 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1ac8, f03=0x0000}
0x1a7d34…1a7ec8 IdxSect {
0x1a7d34…1a7ec8 f00 = 0x00d6 // 0x1a7d34 @0x0
0x1a7d34…1a7ec8 f01 = 0x0002 // 0x1a7d36 @0x2
0x1a7d34…1a7ec8 gno = [ // 0x1a7d38 @0x4
0x1a7d34…1a7ec8 [0x00]: C0x00d6.0x1.0
0x1a7d34…1a7ec8 ]
0x1a7d34…1a7ec8 }
0x1a7ec8…1a805c Dummy {f00=0x00d6, f01=0x018e, f02=» PT; P01; PTID=TC; PTCL=TC; * PLEV=60; : P02; J PTDC=T03; V PLC=01L; f PTDC=T07; v PLC=01L; P02; PSCL=S04; PSCL=S06; PT; P01; PTID=TD; PTCL=TC; PLEV=60; P
0x1a805c…1a81f0 Dummy {f00=0x00d6, f01=0x018e, f02=» PTID=TE; PTCL=TC; PLEV=60; ( P02; 8 PTDC=T03; D PLC=01R; T PTDC=T07; d PLC=01R; t P00; PT; P01; PTID=TF; PTCL=TC; PLEV=60; P02; PTDC=T02; PLC=04L; PTDC=T0
0x1a81f0…1a8384 Dummy {f00=0x00d6, f01=0x005a, f02=» P00; P01; PSCL=S01; PU; 0 P001; : PTB2; F P004; R; T PTDC=T07; d PLC=01R; t P00; PT; P01; PTID=TF; PTCL=TC; PLEV=60; P02; PTDC=T02; PLC=04L; PTDC=T0
0x1a8384…1a8518 Dummy {f00=0x00d6, f01=0x2008, f02=» 00; P01; PSCL=S01; PU; 0 P001; : PTB2; F P004; R; T PTDC=T07; d PLC=01R; t P00; PT; P01; PTID=TF; PTCL=TC; PLEV=60; P02; PTDC=T02; PLC=04L; PTDC=T0
0x1a8518…1a86ac Dummy {f00=0x00d6, f01=0x0190, f02=»
0x1a86ac…1a8840 Dummy {f00=0x00d6, f01=0x0190, f02=» 0000899 0
0x1a8840…1a89d4 (0, 538) Opaque[0x194]
0x1a89d4…1a8b68 # DirEnt {nam=»KM379 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1ad0, f03=0x0000}
0x1a89d4…1a8b68 IdxSect {
0x1a89d4…1a8b68 f00 = 0x00d6 // 0x1a89d4 @0x0
0x1a89d4…1a8b68 f01 = 0x0004 // 0x1a89d6 @0x2
0x1a89d4…1a8b68 gno = [ // 0x1a89d8 @0x4
0x1a89d4…1a8b68 [0x00]: C0x00d6.0x2.0
0x1a89d4…1a8b68 [0x01]: C0x00d6.0x3.0
0x1a89d4…1a8b68 ]
0x1a89d4…1a8b68 }
0x1a8b68…1a8cfc Dummy {f00=0x00d6, f01=0x0190, f02=» PPRT KM379 PPRT C379 & PMES RAVNSBORG KOMMUNE, REMITTERING & PSCR P PLED KMD08,/S P!!CH $$EJECT$$ $$ p P!!CH $$DCTASK$$DCTSK$$ P!!CH $$26$$22$$ P!!DL 61,62 FD03,FD04 P!!DL 67,89 TERM KA P!!DL 90,108 TERM G
0x1a8cfc…1a8e90 Dummy {f00=0x00d6, f01=0x0190, f02=»MF1GTP STRG 32X'40' DV ADR GTP P!!DL 186 & PMF1CU STRG X'E5C5' CU ADR 6 P!!DL 188 X * PCNFHC STRGI (16),' ' HARDCOPY PRINTER h P!!DL 193,194 POFF STRGI (12)2C' ' $ P!!RE 198,$$FALSE$$TRUE$$ CBKOFLG $ P!!RE 199,$$FALSE$$TRUE$$ C
0x1a8e90…1a9024 Dummy {f00=0x00d6, f01=0x0190, f02=» $ P!!RE 203,$$FALSE$$FALSE$$ CFLT46 $ P!!RE 204,$$FALSE$$FALSE$$ CFLT48 , $ P!!RE 205,$$TRUE$$FALSE$$ CKTAUTO T $ P!!RE 206,$$FALSE$$TRUE$$ CDCFLG | & P!!RE 207,$$FALSE$$FALSE$$ CCYWRTF & P!!RE 208,$$FALSE$$FALSE$$ CADM22F & P!!RE 209,$$FALSE
0x1a9024…1a91b8 Dummy {f00=0x00d6, f01=0x0190, f02=»EGFL r & P!!RE 213,$$FALSE$$FALSE$$ CCONVERT & P!!RE 237,$$FALSE$$TRUE$$ CREMITFL 6 & P!!RE 246,$$FALSE$$TRUE$$ CTEXTFLG ` & P!!RE 247,$$FALSE$$TRUE$$ CSTRKFLG & P!!RE 248,$$FALSE$$TRUE$$ CBUDTFLG P!!DL 286 PCFLAG BINI (12),X'0059'
0x1a91b8…1a934c Dummy {f00=0x00d6, f01=0x018e, f02=» P!!RE 441,$$21$$21$$ CKTMAX P!!RE 446,$$128$$80$$ CRECLGD & & P!!RE 448,$$6'OD-KOM'$$6'RAVNS.'$$ J P!!RE 449,$$7$$7$$ CKTINDX t P!!RE 450,$$20$$25$$ CIXINDX P!!DL 452,453 PON STRGI (12)2C' ' P!!DL 777,780 ENTRY KBV, GTP
0x1a934c…1a94e0 Dummy {f00=0x00d6, f01=0x0190, f02=» | P!!DL 844,855 LPGO & P!!DL 876,879 RESTART OFFLINE TASK " P!!DL 912,914 REENTER L P!!EN h PNOD C t PTRA /S,NL PINC DIV167 PNOD R PLED SCREEN,/S P!!CH $$KEY461$$KEYCOP$$ P!!CH $$SL461$$SLCOP$$ P
0x1a94e0…1a9674 (0, 539) Dummy {f00=0x00d6, f01=0x0190, f02=»C RGSUB2 PINC RGSUB3 PNOD R " PINC RGKLAR 0 PINC KTPLN B PINC KTOPR T PNOD R f PINC RGADM t PNOD R PINC ADM5 PINC SUBAPL PINC REMPRT PNOD R PINC REMSUB PINC KMDIO PINC DKSUBS
0x1a9674…1a9808 Dummy {f00=0x00d6, f01=0x00d4, f02=»C REMTR PINC REMBDT PINC BUDD " PTLK U,4K 2 PINC DCTSK B P$INCGEN T LKE M d PKPF /L,RGLOAD r PSCR 2 PMES $PDISC M=M:9.2P,MU=M:9.2P,A=RGLOAD,C=C379 P$ASG2 PINC REMSUB PINC KMDIO PINC DKSUBS
0x1a9808…1a999c Dummy {f00=0x00d6, f01=0x2008, f02=» PINC REMBDT PINC BUDD " PTLK U,4K 2 PINC DCTSK B P$INCGEN T LKE M d PKPF /L,RGLOAD r PSCR 2 PMES $PDISC M=M:9.2P,MU=M:9.2P,A=RGLOAD,C=C379 P$ASG2 PINC REMSUB PINC KMDIO PINC DKSUBS
0x1a999c…1a9b30 Dummy {f00=0x00d6, f01=0x0190, f02=»MF1GTP STRG 32X'40' DV ADR GTP P!!DL 186 & PMF1CU STRG X'E5C5' CU ADR 6 P!!DL 188 X * PCNFHC STRGI (16),' ' HARDCOPY PRINTER h P!!DL 193,194 POFF STRGI (12)2C' ' $ P!!RE 198,$$FALSE$$TRUE$$ CBKOFLG $ P!!RE 199,$$FALSE$$TRUE$$ C
0x1a9b30…1a9cc4 Dummy {f00=0x00d6, f01=0x0190, f02=» $ P!!RE 203,$$FALSE$$FALSE$$ CFLT46 $ P!!RE 204,$$FALSE$$FALSE$$ CFLT48 , $ P!!RE 205,$$TRUE$$FALSE$$ CKTAUTO T $ P!!RE 206,$$FALSE$$TRUE$$ CDCFLG | & P!!RE 207,$$FALSE$$FALSE$$ CCYWRTF & P!!RE 208,$$FALSE$$FALSE$$ CADM22F & P!!RE 209,$$FALSE
0x1a9cc4…1a9e58 Dummy {f00=0x00d6, f01=0x0190, f02=»EGFL r & P!!RE 213,$$FALSE$$FALSE$$ CCONVERT & P!!RE 237,$$FALSE$$TRUE$$ CREMITFL 6 & P!!RE 246,$$FALSE$$TRUE$$ CTEXTFLG ` & P!!RE 247,$$FALSE$$TRUE$$ CSTRKFLG & P!!RE 248,$$FALSE$$TRUE$$ CBUDTFLG P!!DL 286 PCFLAG BINI (12),X'0059'
0x1a9e58…1a9fec Dummy {f00=0x00d6, f01=0x018e, f02=»!!RE 441,$$21$$21$$ CKTMAX P!!RE 446,$$128$$80$$ CRECLGD " & P!!RE 448,$$6'OD-KOM'$$6'RAVNS.'$$ F P!!RE 449,$$7$$7$$ CKTINDX p P!!RE 450,$$20$$25$$ CIXINDX P!!DL 452,453 PON STRGI (12)2C' ' P!!DL 777,780 ENTRY KBV, GTP
0x1a9fec…1aa180 Dummy {f00=0x00d6, f01=0x0190, f02=» P!!DL 844,855 LPGO & P!!DL 876,879 RESTART OFFLINE TASK P!!DL 912,914 REENTER H P!!EN d PNOD C p PTRA /S ~ PINC DIV167 PNOD R PLED SCREEN,/S P!!CH $$KEY461$$KEYCOP$$ P!!CH $$SL461$$SLCOP$$ P!!EN
0x1aa180…1aa314 (0, 540) Opaque[0x194]
0x1aa314…1aa4a8 # DirEnt {nam=»C379 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1ae0, f03=0x0000}
0x1aa314…1aa4a8 IdxSect {
0x1aa314…1aa4a8 f00 = 0x00d7 // 0x1aa314 @0x0
0x1aa314…1aa4a8 f01 = 0x0002 // 0x1aa316 @0x2
0x1aa314…1aa4a8 gno = [ // 0x1aa318 @0x4
0x1aa314…1aa4a8 [0x00]: C0x00d7.0x0.0
0x1aa314…1aa4a8 ]
0x1aa314…1aa4a8 }
0x1aa4a8…1aa63c Dummy {f00=0x00d7, f01=0x018c, f02=» T; P01; TID=TC; TCL=TC; * LEV=60; : P03; J PTDC=T03; V PLC=01L; f PTDC=T07; v PLC=01L; PTDC=T06; PLC=02L; P01; PSCL=S04; PT; P01; PTID=D0; PTCL=D0; P
0x1aa63c…1aa7d0 Dummy {f00=0x00d7, f01=0x2008, f02=» P01; TID=TC; TCL=TC; * LEV=60; : P03; J PTDC=T03; V PLC=01L; f PTDC=T07; v PLC=01L; PTDC=T06; PLC=02L; P01; PSCL=S04; PT; P01; PTID=D0; PTCL=D0; P
0x1aa7d0…1aa964 Dummy {f00=0x00d7, f01=0x0190, f02=» Y 0] Y (_z P P T0 " X _@ " P" c X *# P B 1 c W | " P X X( C : X *! P P T | P c C W @ X (T W X y 6 Y ( : X (;n rx w Fw wzV xRx x~w w w v V.W W w V x Y . Y ,W Y . X
0x1aa964…1aaaf8 Dummy {f00=0x00d7, f01=0x0190, f02=» *# P P T " T : " | Y . Zt Y ( w Y *T " T ! 1 W ! ) w : wz x Y *T W" : w [ w : V Y " X .9H $ x P & X ( " Q Y +Q R " P W " U Y Y , " Q " | X . X 0R P" X *:h P
0x1aaaf8…1aac8c Dummy {f00=0x00d7, f01=0x0190, f02=»R$W Z Y T$ @ Y (W Y , ZtW Z Y ( w : X *:h X (! # P X & V L TbW X , X 0P@ Y T, X *:h XF XL X (!@T @ Y ( X , Y t X 0 l Z _r X ( P Y (_ P. Y P Y 8 W" X 8 X $ Wh_ " P X ( T X & V
0x1aac8c…1aae20 Dummy {f00=0x00d7, f01=0x0190, f02=» Y ( : 8 [ j 8 V Y 8 : " P X & V ( P Y : : Y "0P $ T W %T : : Y ( X $ Y X " Y X & Y X < Y @ : Y : X : X ( T X & V H " V Y : X $ X : : X Y " X Y $ X Y & X @W X < Y =
0x1aae20…1aafb4 (0, 541) Opaque[0x194]
0x1aafb4…1ab148 # DirEnt {nam=»KM805 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1ae8, f03=0x0000}
0x1aafb4…1ab148 IdxSect {
0x1aafb4…1ab148 f00 = 0x00d7 // 0x1aafb4 @0x0
0x1aafb4…1ab148 f01 = 0x0004 // 0x1aafb6 @0x2
0x1aafb4…1ab148 gno = [ // 0x1aafb8 @0x4
0x1aafb4…1ab148 [0x00]: C0x00d7.0x1.0
0x1aafb4…1ab148 [0x01]: C0x00d7.0x2.0
0x1aafb4…1ab148 ]
0x1aafb4…1ab148 }
0x1ab148…1ab2dc Dummy {f00=0x00d7, f01=0x0190, f02=» PPRT KM805 PPRT C805 ( PMES BR NDERSLEV KOMMUNE, REMITTERING & PMES BUDGET R PSCR d PLED KMD08,/S p P!!CH $$EJECT$$ $$ P!!CH $$-4$$4$$ P!!CH $$26$$22$$ & P!!RE 41,$$56$$100$$ SCREEN SIZE$$ P!!DL 61,62 FD03,FD
0x1ab2dc…1ab470 Dummy {f00=0x00d7, f01=0x018e, f02=» 188 . PCNFHC STRGI (16),'LA','GA',' ' HC PRINTER P!!DL 193,194 > " POFF STRGI (12)2C'TD','TE',' ' R $ P!!RE 198,$$FALSE$$TRUE$$ CBKOFLG x $ P!!RE 199,$$FALSE$$TRUE$$ CKTFLAG & P!!RE 200,$$FALSE$$FALSE$$ CCLKTFLG & P!!RE 201,$$FALSE$$FALS
0x1ab470…1ab604 Dummy {f00=0x00d7, f01=0x0190, f02=» n $ P!!RE 205,$$TRUE$$FALSE$$ CKTAUTO $ P!!RE 206,$$FALSE$$TRUE$$ CDCFLAG 0 & P!!RE 207,$$FALSE$$FALSE$$ CCYWRTF X & P!!RE 208,$$FALSE$$FALSE$$ CADM22F $ P!!RE 209,$$FALSE$$TRUE$$ C5MDISK $ P!!RE 210,$$TRUE$$FALSE$$ CKASFLG $ P!!RE 211,$$T
0x1ab604…1ab798 Dummy {f00=0x00d7, f01=0x0190, f02=» CREMITFL x & P!!RE 246,$$FALSE$$TRUE$$ CTEXTFLG & P!!RE 247,$$FALSE$$TRUE$$ CSTRKFLG < $ P!!RE 248,$$FALSE$$TRUE$$CBUDTFLG f P!!DL 286 , PCFLAG BINI (12),X'0051',X'0064',X'0068' P!!RE 317,$$F$$T$$ CBUDGET 0 P!!RE 372,$$01014610$$%VE
0x1ab798…1ab92c Dummy {f00=0x00d7, f01=0x0190, f02=»CLGD x . P!!RE 448,$$6'OD-KOM'$$12X'42525C4E442E'$$ $ P!!RE 450,$$20$$200$$ INDEX FILE > P!!RE 451,$$5$$1$$ CKTTOP f P!!DL 452,453 & PON STRGI (12)2C' ','KA','KB',' ' P!!DL 852 P MOVE TCT01,=W'2' PRINTER NR P!!EN PASG
0x1ab92c…1abac0 Dummy {f00=0x00d7, f01=0x0190, f02=» $$SL461$$SLCOP$$ P!!EN PTRA /S,NL & PINC RGSUB4 8 PINC RGSTRT J PNOD D PINC RGMAIN j PINC RGSUBS | PINC RGSUB1 PINC RGSUB2 PINC RGSUB3 PNOD D PINC RGKLAR PINC KTPLN PINC KTOPR P
0x1abac0…1abc54 (0, 542) Dummy {f00=0x00d7, f01=0x0190, f02=»DIO PINC DKSUBS PINC REMTXT PNOD R 0 PINC RGFRMT > PINC REMFMT P PNOD D b PINC REMLEV p PINC ADM6 PNOD D PINC REMTR PINC REMBDT PNOD D PINC BUDGET PTLK U,4K PINC PRT PINC
0x1abc54…1abde8 Dummy {f00=0x00d7, f01=0x002c, f02=»=M:POOL92,A=RGLOAD,C=C805 z P$ASG2 " PNOD R 0 PINC RGFRMT > PINC REMFMT P PNOD D b PINC REMLEV p PINC ADM6 PNOD D PINC REMTR PINC REMBDT PNOD D PINC BUDGET PTLK U,4K PINC PRT PINC
0x1abde8…1abf7c Dummy {f00=0x00d7, f01=0x2008, f02=» 2,A=RGLOAD,C=C805 z P$ASG2 " PNOD R 0 PINC RGFRMT > PINC REMFMT P PNOD D b PINC REMLEV p PINC ADM6 PNOD D PINC REMTR PINC REMBDT PNOD D PINC BUDGET PTLK U,4K PINC PRT PINC
0x1abf7c…1ac110 Dummy {f00=0x00d7, f01=0x0190, f02=» 6 F IDENT T:SCD P,REL=4.2,791211,870136940420 T:ACTVK T:PAUS T:RSTR > T:ACTVK ` , ( 2 ;B P J t P:BAS I:NTPB T:CSEGN , ( ! T (
0x1ac110…1ac2a4 Dummy {f00=0x00d7, f01=0x4090, f02=» W & F : I:RT1 " u ( 2 ( P4 #T + ` CW< M ` _W V z@ J t P:BAS I:NTPB T:CSEGN , ( ! T (
0x1ac2a4…1ac438 Dummy {f00=0x00d7, f01=0x40c2, f02=» 4 F IDENT T:GTID P,REL=4.2,791116,870136940420 T:GETIK < T:GETIK N I:EVA0 b I:RT1 t $ @ V G 9h ' @ 1,OP2A STORE FOR USER P SRL WK1,8 P SCR WK1,OP2A P
0x1ac438…1ac5cc Dummy {f00=0x00d7, f01=0x0190, f02=» 6 F IDENT T:IO P,REL=4.2,791229,870136940420 J F " T:WRITK T:READ T:KIY T:NKI T:EDWR T:DSC0 T:DSC1@ T:DSC2 T:EDWEC > F B T:EDWF T:EDWIN T:EDIO T:XSTA T:WAIT@ T:IO1 T:IO2 T:IO3 T:IO4 F B T:FDS0 T:FDSP, T:STCW T:GDSP T:GTCW T:KIPR
0x1ac5cc…1ac760 Dummy {f00=0x00d7, f01=0x0190, f02=» r I:EVA0 T:READ 2 $ * & ! P / W 8 T:DSC0 F f T:DSC1@ X z , ( = / W C C W , ( [ C C J ' W 781"&$ 39 T:DSC2 , ( {
0x1ac760…1ac8f4 (0, 543) Opaque[0x194]
0x1ac8f4…1aca88 # DirEnt {nam=»C805 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1af8, f03=0x0000}
0x1ac8f4…1aca88 IdxSect {
0x1ac8f4…1aca88 f00 = 0x00d7 // 0x1ac8f4 @0x0
0x1ac8f4…1aca88 f01 = 0x0002 // 0x1ac8f6 @0x2
0x1ac8f4…1aca88 gno = [ // 0x1ac8f8 @0x4
0x1ac8f4…1aca88 [0x00]: C0x00d7.0x3.0
0x1ac8f4…1aca88 ]
0x1ac8f4…1aca88 }
0x1aca88…1acc1c Dummy {f00=0x00d7, f01=0x018e, f02=» T; P01; TID=TC; TCL=TC; * LEV=60; : P02; J PTDC=T03; V PLC=01L; f PTDC=T07; v PLC=01L; P01; PSCL=S04; PT; P01; PTID=TD; PTCL=TC; PLEV=60; P01; PTDC=
0x1acc1c…1acdb0 Dummy {f00=0x00d7, f01=0x0190, f02=» PTDC=T02; PLC=03L; PTDC=T06; $ PLC=03L; 4 P00; D PT; P P02; Z TID=KA; f TCL=KA; v LEV=60; 01; PTDC=T04; PLC=02L; P03; PSCL=S02; PSCL=S03; PSCL=S04; PT; P
0x1acdb0…1acf44 Dummy {f00=0x00d7, f01=0x0174, f02=»S03; PSCL=S04; PT; P01; & PTID=LA; 2 PTCL=LA; B PLEV=60; R P00; b P04; n PSCL=S02; z PSCL=S03; PSCL=S04; PSCL=S05; T; 01; TID=D0; TCL=D0; LEV=60; 00;
0x1acf44…1ad0d8 Dummy {f00=0x00d7, f01=0x2008, f02=» PSCL=S04; PT; P01; & PTID=LA; 2 PTCL=LA; B PLEV=60; R P00; b P04; n PSCL=S02; z PSCL=S03; PSCL=S04; PSCL=S05; T; 01; TID=D0; TCL=D0; LEV=60; 00;
0x1ad0d8…1ad26c Dummy {f00=0x00d7, f01=0x0190, f02=»S _2 `` P0 `n " U S _2 V V tP< S ( V | S =J @ " S V l S W l W _> @ % P W @ % P U !TTT W S, @ @ T S : ; ` @
0x1ad26c…1ad400 Dummy {f00=0x00d7, f01=0x0190, f02=» . !TTP S V `@ W t * `P P `n r _ `` Ph W p `n W V 8 8 4 D P$ S @ # P H I K T + Y@ V p _j V t Y U !TTX @ @ T S : Z @
0x1ad400…1ad594 (0, 544) Opaque[0x194]
0x1ad594…1ad728 # DirEnt {nam=»KT805 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1b00, f03=0x0000}
0x1ad594…1ad728 IdxSect {
0x1ad594…1ad728 f00 = 0x00d8 // 0x1ad594 @0x0
0x1ad594…1ad728 f01 = 0x0004 // 0x1ad596 @0x2
0x1ad594…1ad728 gno = [ // 0x1ad598 @0x4
0x1ad594…1ad728 [0x00]: C0x00d8.0x0.0
0x1ad594…1ad728 [0x01]: C0x00d8.0x1.0
0x1ad594…1ad728 ]
0x1ad594…1ad728 }
0x1ad728…1ad8bc Dummy {f00=0x00d8, f01=0x0190, f02=» PPRT KT805 PPRT C805T ( PMES BR NDERSLEV KOMMUNE, REMITTERING ( PASG 2,NO T PSCR d PLED KMD08,/S p P!!DL 67,68 FD03,FD04 P!!IL 70 P REENTER REENTC P!!RE 71,$$256$$300$$ P!!IL 87 P REENTER REENKA
0x1ad8bc…1ada50 Dummy {f00=0x00d8, f01=0x0190, f02=» 4 PMF1KBV STRG 32X'C1C2C3C4C5C6C750' DV ADR KB/VDU P!!DL 188 < PMF1CU STRG X'6E4E' CU ADR L P!!DL 190 n 4 PCNFHC STRGI (16),'GA','LA',' ' HARDCOPY PRINTER ~ P!!DL 195,196 " POFF STRGI (12)2C'TD','TE',' ' P!!RE 202,$$FALSE$$TRUE$$
0x1ada50…1adbe4 Dummy {f00=0x00d8, f01=0x0190, f02=» 213,$$FALSE$$TRUE$$ 5M DISK ( P!!RE 214,$$TRUE$$FALSE$$ DISK BACKUP $ & P!!RE 239,$$FALSE$$TRUE$$ CREMITFLG P & P!!RE 248,$$FALSE$$TRUE$$ TEXT REG z $ P!!RE 249,$$FALSE$$TRUE$$ LEV REG P!!DL 283 , PCFLAG BINI (12),X'0051',X'0068',X'0064'
0x1adbe4…1add78 Dummy {f00=0x00d8, f01=0x0190, f02=»,$$1400$$10000$$ NO OF REG. " P!!RE 381,$$20$$200$$ LEV INDEX $ P!!RE 386,$$5$$1$$ KORT LINE J P!!DL 389,390 n & PON STRGI (12)2C' ','KA','KB',' ' P!!IL 664 P ENTRY REENTC P!!IL 665 P ENTRY REENKA P!!IL 666 P
0x1add78…1adf0c Dummy {f00=0x00d8, f01=0x0190, f02=»ENTC PROC P RET P PEND PREENKA , PREENGA : PREENLA H PREEND0 V P B REENKA d P!!EN v PNOD C PTRA /S PINC DIV805 PINC RGADM PNOD PINC RGSUBS PINC KMDIO PNOD PINC RGSUB3
0x1adf0c…1ae0a0 Dummy {f00=0x00d8, f01=0x0190, f02=»C SUBAPL PNOD PINC RGFRMT PNOD . PINC KTOPR : PINC KTPLN L PINC ADM6 ^ PNOD n PINC RGSUB1 z PINC RGSUB2 PINC DKSUBS PNOD PINC RGMAIN PINC RGSTRT PNOD PINC REMFMT PINC REMTXT
0x1ae0a0…1ae234 (0, 545) Dummy {f00=0x00d8, f01=0x0030, f02=».2D,MU=M:9.2D,A=RGLOAD,C=C805T P$ASG2 &
0x1ae234…1ae3c8 Dummy {f00=0x00d8, f01=0x2008, f02=» :9.2D,A=RGLOAD,C=C805T P$ASG2 &
0x1ae3c8…1ae55c Dummy {f00=0x00d8, f01=0x0190, f02=»$OPT MOVE TO VARIABLE " P TO ALLOW INSTR.S CMP AND IB & P CMP SPBINW2,='0' "SPERR" ENTRY ? D P BE ERRPRINT YES ! n P . P TBT SPPROMPT,ENTIRE JUMP IF ENTIRE FORMAT P SHOULD BE DISPLAYED P* P* ONLY VARIABLE FIELDS
0x1ae55c…1ae6f0 Dummy {f00=0x00d8, f01=0x0190, f02=»FROM 1 AND UP j P THOME P B CONT $ P* 4 PCLEARS > 8 P ERASE 5,SPLINTOP,SPLINLOW ERASE SOME FROM 1 AND UP L P B CONT P P* P* DISPLAY ENTIRE FORMAT P* PENTIRE 8 P IB SPBINW2,ECLRA,ECLRS,ECLRN JUMP O
0x1ae6f0…1ae884 Dummy {f00=0x00d8, f01=0x0190, f02=» IN MEMORY P B ECLRN P* $ P* CLEAR SOME VARIABLES . P* P PECLRS Z 6 P ERASE 6,SPLINTOP,SPLINLOW CLEAR SOME FIELDS FROM h P 1 AND UP IN MEMORY P* & P* CLEAR NO VARIABLES IN MEMORY P* PECLRN
0x1ae884…1aea18 Dummy {f00=0x00d8, f01=0x0190, f02=»P,SPLINLOW ~ P B CONT PECLRN2 " P DISPLAY 2,SPLINTOP,SPLINLOW 0 P B CONT T PECLRN3 d P DISPLAY 3,SPLINTOP,SPLINLOW r P B CONT PECLRN4 P DISPLAY 4,SPLINTOP,SPLINLOW P B CONT P PCONT & P GETABX SP
0x1aea18…1aebac Dummy {f00=0x00d8, f01=0x0190, f02=»ION b P BZ SETCREAD JUMP IF FOUND " P BL KTHOME POSITION NOT FOUND . P* T P* COMPULSORY FIELD FOUND ^ P* & P MOVE SPBINW4,SPBINW3 CHANGE INDEX P B CONT5 SEARCH AGAIN P* P P* & P* SET CURSOR AND READ
0x1aebac…1aed40 Dummy {f00=0x00d8, f01=0x018e, f02=»DISPLAY r P* PREADIN P* SET FLAG IF AUTODUP ( P* USES VERIF-FIELD J P MOVE SPBINW2,=W'3' h P MOVE SPBINW1,=W'1' P TSTCTL 6 P BOK DYKIN P SET GTADUPFL P B DYK20 P* PDYKIN P IB SP
0x1aed40…1aeed4 (0, 546) Opaque[0x194]
0x1aeed4…1af068 # DirEnt {nam=»T805 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1b10, f03=0x0000}
0x1aeed4…1af068 IdxSect {
0x1aeed4…1af068 f00 = 0x00d8 // 0x1aeed4 @0x0
0x1aeed4…1af068 f01 = 0x0002 // 0x1aeed6 @0x2
0x1aeed4…1af068 gno = [ // 0x1aeed8 @0x4
0x1aeed4…1af068 [0x00]: C0x00d8.0x2.0
0x1aeed4…1af068 ]
0x1aeed4…1af068 }
0x1af068…1af1fc Dummy {f00=0x00d8, f01=0x009e, f02=» T; 01; TID=TU; TCL=TU; * LEV=60; : 01; J TDC=T03; V LC=02L; f 02; v SCL=S01; SCL=S02;
0x1af1fc…1af390 Dummy {f00=0x00d8, f01=0x2008, f02=» 01; TID=TU; TCL=TU; * LEV=60; : 01; J TDC=T03; V LC=02L; f 02; v SCL=S01; SCL=S02;
0x1af390…1af524 Dummy {f00=0x00d8, f01=0x2008, f02=» +MOUT,M+MU+MOUT HMES 4 FC : HMES ANY COMBINATION OF ALTERNATIVE 1,2 AND 3 IS VALID, 0 0 HMES AND AT LEAST ONE OF THEM MUST BE CHOOSEN n 0 HMES ALTERNATIVE 4 MAY BE INCLUDED IF NEEDED HEND * HMES ILLEGAL PARAMETER COMBINATION !!!
0x1af524…1af6b8 Dummy {f00=0x00d8, f01=0x0190, f02=» SPAPPL USER ROUTINE TO HANDLE P APPL VALUES & ( P EXT SPTCHK USER ROUTINE TO EVALUATE < P CONDITIONAL TABULATION h P* . P EXT EMPTYT ASSEMBLY SUBROUTINE EMPTYT - " P TEST IF DATA ITEM IS EMPTY P* P INCLUDE KEY539,LI
0x1af6b8…1af84c Dummy {f00=0x00d8, f01=0x018e, f02=»SPCLRA PROC P* D P* SPCLRA - CLEAR ALL VARABLE FIELDS BEFORE HANDLING THE PICTURE P* f P MOVE SPERASE,=W'0' p P PERF SCREEN,=W'1' P RET P PEND PSPCLRS PROC P* F P* SPCLRS - CLEAR SOME VARIABLE FIELDS BEFO
0x1af84c…1af9e0 Dummy {f00=0x00d8, f01=0x0190, f02=» P* D P* SPCLRN - CLEAR NO VARIABLE FIELDS BEFORE HANDLING THE PICTURE P* Z P MOVE SPERASE,=W'0' d P PERF SCREEN,=W'3' P RET P PEND PSPERR PROC P* 0 P* HANDLE ERRORS DETECTED OUTSIDE THE PACKAGE P*
0x1af9e0…1afb74 (0, 547) Opaque[0x194]
0x1afb74…1afd08 # DirEnt {nam=»T821 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1b18, f03=0x0000}
0x1afb74…1afd08 IdxSect {
0x1afb74…1afd08 f00 = 0x00d8 // 0x1afb74 @0x0
0x1afb74…1afd08 f01 = 0x0002 // 0x1afb76 @0x2
0x1afb74…1afd08 gno = [ // 0x1afb78 @0x4
0x1afb74…1afd08 [0x00]: C0x00d8.0x3.0
0x1afb74…1afd08 ]
0x1afb74…1afd08 }
0x1afd08…1afe9c Dummy {f00=0x00d8, f01=0x009e, f02=» T; 01; TID=TU; TCL=TU; * LEV=60; : 01; J TDC=T03; V PLC=04L; f 02; v SCL=S01; SCL=S02;
0x1afe9c…1b0030 Dummy {f00=0x00d8, f01=0x2008, f02=» 01; TID=TU; TCL=TU; * LEV=60; : 01; J TDC=T03; V PLC=04L; f 02; v SCL=S01; SCL=S02;
0x1b0030…1b01c4 Dummy {f00=0x00d8, f01=0x0190, f02=» TB2 0 * F Tp 8
0x1b01c4…1b0358 Dummy {f00=0x00d8, f01=0x0190, f02=» Q h h h h h h h h h h h F 8 :
0x1b0358…1b04ec Dummy {f00=0x00d8, f01=0x0190, f02=»
[…0x1…]
0x1b0680…1b0814 (0, 548) Opaque[0x194]
0x1b0814…1b09a8 # DirEnt {nam=»C805T «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1b20, f03=0x0000}
0x1b0814…1b09a8 IdxSect {
0x1b0814…1b09a8 f00 = 0x00d9 // 0x1b0814 @0x0
0x1b0814…1b09a8 f01 = 0x0002 // 0x1b0816 @0x2
0x1b0814…1b09a8 gno = [ // 0x1b0818 @0x4
0x1b0814…1b09a8 [0x00]: C0x00d9.0x0.0
0x1b0814…1b09a8 ]
0x1b0814…1b09a8 }
0x1b09a8…1b0b3c Dummy {f00=0x00d9, f01=0x018e, f02=» T; P01; PTID=TB; PTCL=TB; * PLEV=55; : P01; J PTDC=T01; V PLC=08L; f P00; v T; P01; TID=TC; TCL=TC; LEV=60; P02; PTDC=T03; PLC=01L; PTDC=T07; PLC=0
0x1b0b3c…1b0cd0 Dummy {f00=0x00d9, f01=0x018e, f02=» PLC=02L; PTDC=T06; PLC=02L; $ P00; 4 T; @ P01; J PTID=TE; V TCL=TC; f LEV=60; v P01; PTDC=T02; PLC=03L; P01; PSCL=S05; PT; P02; PTID=KA; PTCL=KA; PLEV=
0x1b0cd0…1b0e64 Dummy {f00=0x00d9, f01=0x0190, f02=» PTID=GA; PTCL=GA; PLEV=60; $ P01; 4 PTDC=T05; @ PLC=02L; P P03; ` PSCL=S02; l PSCL=S03; | PSCL=S04; PT; P01; PTID=LA; PTCL=LA; PLEV=60; P00; P04; PSCL=S02;
0x1b0e64…1b0ff8 Dummy {f00=0x00d9, f01=0x0064, f02=» PC; P00; P01; PSCL=S01; * U; : 001; D TB2; P P003; ` PSCL=S02; l PSCL=S03; | PSCL=S04; PT; P01; PTID=LA; PTCL=LA; PLEV=60; P00; P04; PSCL=S02;
0x1b0ff8…1b118c Dummy {f00=0x00d9, f01=0x2008, f02=» C; P00; P01; PSCL=S01; * U; : 001; D TB2; P P003; ` PSCL=S02; l PSCL=S03; | PSCL=S04; PT; P01; PTID=LA; PTCL=LA; PLEV=60; P00; P04; PSCL=S02;
0x1b118c…1b1320 Dummy {f00=0x00d9, f01=0x0190, f02=»
0x1b1320…1b14b4 (0, 549) Opaque[0x194]
0x1b14b4…1b1648 # DirEnt {nam=»KM821 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1b28, f03=0x0000}
0x1b14b4…1b1648 IdxSect {
0x1b14b4…1b1648 f00 = 0x00d9 // 0x1b14b4 @0x0
0x1b14b4…1b1648 f01 = 0x0004 // 0x1b14b6 @0x2
0x1b14b4…1b1648 gno = [ // 0x1b14b8 @0x4
0x1b14b4…1b1648 [0x00]: C0x00d9.0x1.0
0x1b14b4…1b1648 [0x01]: C0x00d9.0x2.0
0x1b14b4…1b1648 ]
0x1b14b4…1b1648 }
0x1b1648…1b17dc Dummy {f00=0x00d9, f01=0x0190, f02=» PPRT KM821 PPRT C821 & PMES HJ RRING KOMMUNE, REMITTERING & PMES BUDGET P PSCR b PLED KMD08 n P!!CH $$EJECT$$ $$ P!!CH $$'26'$$'22'$$ P!!CH $$(26)$$(22)$$ P!!CH $$-4$$4$$ P!!CH $$FC=40$$FC=50$$ P!!
0x1b17dc…1b1970 Dummy {f00=0x00d9, f01=0x0190, f02=»DR. h 4 PMF1GTP STRG 32X'C8C94A4B4C4D4E4F' DV ADR, GTP/LP " PMF1CU STRG X'6F4F' CU ADDRESS D * PCNFHC STRGI (16),'LA',' ' HC PRINTER j P!!DL 235,236 & PFROMKX STRGI (12)2C'TF','TE',' ' $ P!!RE 240,$$FALSE$$TRUE$$ CBKOFLG $ P!!RE 241,$
0x1b1970…1b1b04 Dummy {f00=0x00d9, f01=0x0190, f02=»E$$ CTRVALG z $ P!!RE 245,$$FALSE$$FALSE$$ CFLT46 $ P!!RE 246,$$FALSE$$FALSE$$ CFLT48 < $ P!!RE 247,$$TRUE$$FALSE$$ CKTAUTO d $ P!!RE 248,$$FALSE$$TRUE$$ CDCFLAG & P!!RE 249,$$FALSE$$FALSE$$ CCYWRTF & P!!RE 250,$$FALSE$$FALSE$$ CADM22F $ P
0x1b1b04…1b1c98 Dummy {f00=0x00d9, f01=0x0190, f02=»$$FALSE$$CGLREGFL & P!!RE 255,$$FALSE$$FALSE$$ CCONVERT & P!!RE 279,$$FALSE$$TRUE$$ CREMITFL D P!!RE 287,$$FALSE$$TRUE$$ n & P!!RE 288,$$FALSE$$TRUE$$ CTEXTFLG & P!!RE 289,$$FALSE$$TRUE$$ CSTRKFLG $ P!!RE 290,$$FALSE$$TRUE$$CBUDTFLG
0x1b1c98…1b1e2c Dummy {f00=0x00d9, f01=0x0190, f02=»SE$$TRUE$$ BUDGET , P!!RE 366,$$FALSE$$TRUE$$ HJORRING CHECKS 0 P!!RE 416,$$01014610$$%VER%REL%MOD$$ VERSION J & P!!RE 476,$$FALSE$$TRUE$$ CLEV8FLG ~ & P!!RE 484,$$1400$$10000$$DISK SIZE P!!RE 490,$$128$$80$$ CRECLGD . P!!RE 492,$$6'OD-KO
0x1b1e2c…1b1fc0 Dummy {f00=0x00d9, f01=0x018e, f02=» (12)2C' ',' ',' ','KA',' ' P!!DL 817,1091 RK ( P!!DL 1103,1105 RK @ P!!DL 1107 RK Z P!!DL 1153,1172 RK n P!!DL 1200 P MOVE TCT01,=W'1' PRINTER NR P!!DL 1250,1262 RK P!!DL 1265 RK P!!EN PNOD C PTR
0x1b1fc0…1b2154 (0, 550) Dummy {f00=0x00d9, f01=0x018e, f02=» P!!EN PTRA /S,NL PNOD R " PLED SCREEN,/S 0 P!!CH $$KEY461$$KEY821$$ F P!!CH $$SL461$$SLCOP$$ f P!!EN PTRA /S,NL PINC RGSUB4 PINC RGSTRT PNOD D PINC RGMAIN PINC RGSUBS PINC RGSUB1
0x1b2154…1b22e8 Dummy {f00=0x00d9, f01=0x0190, f02=» PINC REMSUB PNOD R PINC ADM5 $ PINC SUBAPL 4 PINC REMPRT F PNOD R X PINC KMDIO f PINC DKSUBS x PINC RAADUM PNOD R PINC RGFRMT PINC REMFMT PNOD D PINC REMLEV PINC ADM6 PNOD D
0x1b22e8…1b247c Dummy {f00=0x00d9, f01=0x0190, f02=» PINC REMTXT PASG 2,LP0F PTLK U,4K ( PINC PRT 8 PINC VDUPRT H PLED START,/S Z ( P!!CH $$KB6272 EQU 0$$KB6272 EQU 1$$ n P!!EN PASM /S,NL PLED TB3270,/S ( P!!CH $$KB6272 EQU 0$$KB6272 EQU 1$$ P!!EN PAS
0x1b247c…1b2610 Dummy {f00=0x00d9, f01=0x0008, f02=»SG2 REMTXT PASG 2,LP0F PTLK U,4K ( PINC PRT 8 PINC VDUPRT H PLED START,/S Z ( P!!CH $$KB6272 EQU 0$$KB6272 EQU 1$$ n P!!EN PASM /S,NL PLED TB3270,/S ( P!!CH $$KB6272 EQU 0$$KB6272 EQU 1$$ P!!EN PAS
0x1b2610…1b27a4 Dummy {f00=0x00d9, f01=0x2008, f02=» REMTXT PASG 2,LP0F PTLK U,4K ( PINC PRT 8 PINC VDUPRT H PLED START,/S Z ( P!!CH $$KB6272 EQU 0$$KB6272 EQU 1$$ n P!!EN PASM /S,NL PLED TB3270,/S ( P!!CH $$KB6272 EQU 0$$KB6272 EQU 1$$ P!!EN PAS
0x1b27a4…1b2938 Dummy {f00=0x00d9, f01=0x0190, f02=»CBIN6 PB82144 * P PERF FMOD,GSWBIN5,SPINPUT INIT WITH X P SUB GSWBIN5,CBIN1 J P CBG GSWBIN5,CBIN0,B82144 d P PERF GENWRS,GTHCDEV,EDITBUF P MOVE GSWBCD5,=D'1' P B B82125 PB82142 P ADD GTBSUM1,GTDUPF(CBIN4) ( P
0x1b2938…1b2acc Dummy {f00=0x00d9, f01=0x0190, f02=»WLIN,CBIN1 P B B82190 P* $ PB82150 . P TBT CWORK1,B82140 < 0 P CBE GSWBCD5,=D'1',B82190 NOTHING TO PRINT ? V . P CBE GSWBCD5,=D'25',B82160 COMPUTE NBR OF , P SUB GSWBCD5,=D'25' LINEFEEDS TO PERFORM P MUL GSWBCD5,=D'-1' P
0x1b2acc…1b2c60 Dummy {f00=0x00d9, f01=0x0190, f02=»2165 P PERF GENWRS,GTHCDEV,EDITBUF P MOVE GTBSUM1,=D'0' 0 PB82190 L P RET Z P PEND f P EJECT t PBGIRPR PROC P P* BGIRPR10 - ADJUST PRINTER P* BGIRPR20 - LEV 1 + TRANS 1 P* BGIR30 - TRANS 2 P* BGIR40 TRANS
0x1b2c60…1b2df4 (0, 551) Opaque[0x194]
0x1b2df4…1b2f88 # DirEnt {nam=»C821 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1b38, f03=0x0000}
0x1b2df4…1b2f88 IdxSect {
0x1b2df4…1b2f88 f00 = 0x00d9 // 0x1b2df4 @0x0
0x1b2df4…1b2f88 f01 = 0x0002 // 0x1b2df6 @0x2
0x1b2df4…1b2f88 gno = [ // 0x1b2df8 @0x4
0x1b2df4…1b2f88 [0x00]: C0x00d9.0x3.0
0x1b2df4…1b2f88 ]
0x1b2df4…1b2f88 }
0x1b2f88…1b311c Dummy {f00=0x00d9, f01=0x018e, f02=» T; P01; TID=TC; TCL=TC; * LEV=60; : P02; J PTDC=T03; V PLC=01L; f PTDC=T07; v PLC=01L; P01; PSCL=S04; PT; P02; PTID=TD; PTCL=TC; PLEV=60; P02; PTDC=
0x1b311c…1b32b0 Dummy {f00=0x00d9, f01=0x0190, f02=» P01; PTDC=T02; PLC=04L; $ P01; 4 PSCL=S05; @ PT; P P01; Z TID=KA; f TCL=KA; v LEV=60; 01; PTDC=T04; PLC=04L; P03; PSCL=S02; PSCL=S03; PSCL=S04; PT; P
0x1b32b0…1b3444 Dummy {f00=0x00d9, f01=0x00c6, f02=»S05; T; 01; TID=D0; " TCL=D0; 2 LEV=60; B 00; R P00; ^ PC; j P00; t P01; PSCL=S01; U; 001; TB2; P004; PSCL=S02; PSCL=S03; PSCL=S04; PT; P
0x1b3444…1b35d8 Dummy {f00=0x00d9, f01=0x2008, f02=» T; 01; TID=D0; " TCL=D0; 2 LEV=60; B 00; R P00; ^ PC; j P00; t P01; PSCL=S01; U; 001; TB2; P004; PSCL=S02; PSCL=S03; PSCL=S04; PT; P
0x1b35d8…1b376c Dummy {f00=0x00d9, f01=0x0190, f02=» j * & * & 6 * & d * & + * & I * & g
0x1b376c…1b3900 Dummy {f00=0x00d9, f01=0x0190, f02=» x * & * & D * & r * & 9 * & W * & u
0x1b3900…1b3a94 (0, 552) Opaque[0x194]
0x1b3a94…1b3c28 # DirEnt {nam=»KEY821«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1b40, f03=0x0000}
0x1b3a94…1b3c28 IdxSect {
0x1b3a94…1b3c28 f00 = 0x00da // 0x1b3a94 @0x0
0x1b3a94…1b3c28 f01 = 0x0002 // 0x1b3a96 @0x2
0x1b3a94…1b3c28 gno = [ // 0x1b3a98 @0x4
0x1b3a94…1b3c28 [0x00]: C0x00da.0x0.0
0x1b3a94…1b3c28 ]
0x1b3a94…1b3c28 }
0x1b3c28…1b3dbc Dummy {f00=0x00da, f01=0x0190, f02=» PNOKEY EQU X'FF' PBSPKY1 EQU X'A7' PCANKY1 EQU X'B2' 4 PMACKY1 EQU X'8B' L PEORKY1 EQU X'AB' d PFTABKY1 EQU X'8C' | PBTABKY1 EQU X'80' PDUPKY1 EQU X'B3' PSLUTKY1 EQU X'A5' PREGKY1 EQU X'A1' PCOPKY1 EQU X'F
0x1b3dbc…1b3f50 Dummy {f00=0x00da, f01=0x0190, f02=»Y1 EQU X'FF' PCY2KY1 EQU X'FF' PCYCKY1 EQU X'89' , PINVKY1 EQU X'82' D PKONKY1 EQU X'AC' PKVITKY1 EQU X'B5' t PSUPLKY1 EQU X'AF' PSUMKY1 EQU X'A6' PADMKY1 EQU X'A0' PDIVKY1 EQU X'84' PHBOGKY1 EQU X'B0'
0x1b3f50…1b40e4 Dummy {f00=0x00da, f01=0x0190, f02=»BKY1 EQU X'A7' PINSKY1 EQU X'A6' PDELKY1 EQU X'82' . PCL1KY1 EQU X'89' F PCL2KY1 EQU X'A9' ^ PCL3KY1 EQU X'8C' v POUTKY1 EQU X'A0' P* PBSPKY2 EQU X'A7' PCANKY2 EQU X'B2' PEORKY2 EQU X'AB' PMACKY2 EQU X'8B'
0x1b40e4…1b4278 Dummy {f00=0x00da, f01=0x40c4, f02=»EKY2 EQU X'AA' PREGKY2 EQU X'A1' PADMKY2 EQU X'A0' . PSPGKY2 EQU X'FF' F PKONKY2 EQU X'FF' ^ PKVITKY2 EQU X'B5' v PONKY2 EQU X'B6' PCOPKY2 EQU X'70' @ PCANKY2 EQU X'B2' PEORKY2 EQU X'AB' PMACKY2 EQU X'8B'
0x1b4278…1b440c Dummy {f00=0x00da, f01=0x2008, f02=» * ERRFMT FRMT FSL , " FMEL 'ZZ9B',GTWBCD1 FILE NR. 8 FCOPY ERRTXT ^ " FMEL 'BZZ9',GTWBCD2 ERRORNR. t FCOPY =X'07' FMEND @ 8SPKTAB2 KTAB BSPKY1,CANKY1,NOKEY,MACKY1,NOKEY,EORKY1, C D ? FT
0x1b440c…1b45a0 Dummy {f00=0x00da, f01=0x408e, f02=» f , ( $%&/() @ABCDEFGHIJKLMNOPQRS TUVWXYZ[ ] 8 < l l T x@ 0123 v , ( ! 456789 * , ( A 0123456789 * , (
0x1b45a0…1b4734 (0, 553) Opaque[0x194]
0x1b4734…1b48c8 # DirEnt {nam=»KM821X«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1b48, f03=0x0000}
0x1b4734…1b48c8 IdxSect {
0x1b4734…1b48c8 f00 = 0x00da // 0x1b4734 @0x0
0x1b4734…1b48c8 f01 = 0x0004 // 0x1b4736 @0x2
0x1b4734…1b48c8 gno = [ // 0x1b4738 @0x4
0x1b4734…1b48c8 [0x00]: C0x00da.0x1.0
0x1b4734…1b48c8 [0x01]: C0x00da.0x2.0
0x1b4734…1b48c8 ]
0x1b4734…1b48c8 }
0x1b48c8…1b4a5c Dummy {f00=0x00da, f01=0x0190, f02=» PPRT KM821 PPRT C821 & PMES HJ RRING KOMMUNE, REMITTERING & PASG 2,NO P PSCR ` PLED KMD08,/S l P!!CH $$DCTASK$$DCTSK$$ P!!DL 67,68 FD03,FD04 P!!DL 72,94 TERM KA P!!DL 95,112 TERM GA P!!DL 113,128 TERM LA
0x1b4a5c…1b4bf0 Dummy {f00=0x00da, f01=0x018e, f02=» P!!DL 188 PMF1CU STRG X'6D4D' CU ADR P!!DL 190 6 * PCNFHC STRGI (16),' ' HARDCOPY PRINTER F P!!DL 195,196 t POFF STRGI (12)2C' ' P!!RE 202,$$FALSE$$TRUE$$ BKO ( P!!RE 203,$$FALSE$$TRUE$$ SALDO KORT $ P!!RE 209,$$TRUE$$FAL
0x1b4bf0…1b4d84 Dummy {f00=0x00da, f01=0x018e, f02=» & P!!RE 248,$$FALSE$$TRUE$$ TEXT REG $ P!!RE 249,$$FALSE$$TRUE$$ LEV REG . P!!DL 283 V 4 PCFLAG BINI (12),X'0051',X'0010',X'0010',X'0064' f P!!RE 316,$$128$$80$$ . P!!RE 324,$$6'OD-KOM'$$12X'484A5C52522E'$$ 0 P!!RE 325,$$01014610$$%VER%RE
0x1b4d84…1b4f18 Dummy {f00=0x00da, f01=0x0190, f02=» r P!!DL 389,390 PON STRGI (12)2C' ' P!!IL 475 8 PTTKEY1 BOOL F H PTTKEY2 BOOL F ^ PTTKEY3 BOOL F t PTTKEY4 BOOL F P!!DL 665,666 ENTRY P!!DL 668 P!!DL 671,674 P!!DL 689,707 KBVGO P!!DL 708,723 GTP
0x1b4f18…1b50ac Dummy {f00=0x00da, f01=0x0190, f02=»INC DIV461 PINC RGADM PNOD R $ PINC RGSUBS 2 PINC KMDIO D PNOD R V PINC RGSUB3 d PLED SCREEN,/S v P!!CH $$KEY461$$KEY821$$ P!!CH $$SL461$$SLCOP$$ P!!DL 220 P CMP SPBINW2,=W'0' P BE RETUR POWER OFF
0x1b50ac…1b5240 Dummy {f00=0x00da, f01=0x0190, f02=» B RETUR PSET1 P SET TTKEY1 P B DYKIN 0 PSET2 @ P SET TTKEY2 L P B DYKIN ` PSET3 p P SET TTKEY3 | P B DYKIN PSET4 P SET TTKEY4 P B DYKIN PCLR1 P CLEAR TTKEY1 P B DYKIN PCLR2
0x1b5240…1b53d4 (0, 554) Dummy {f00=0x00da, f01=0x018e, f02=» P!!IL 225 $ P TBF TTKEY1,DYKRET KEYBOARD OFF P IB SPKEY,DYK30,DYK40,DYK50 @ PDYK30 d . P TBF TTKEY2,DYK80 CORR TO KEYPOS 1 ON 6234 r P B DYKRET PDYK40 . P TBT TTKEY2,DYK80 CORR TO KEYPOS 2 ON 6234 PDYKRET P PER
0x1b53d4…1b5568 Dummy {f00=0x00da, f01=0x0190, f02=» PNOD R PINC KTOPR PINC KTPLN ( PINC ADM6 : PNOD R J PINC RGSUB1 X PINC RGSUB2 j PINC DKSUBS | PNOD R PINC RGMAIN PINC RGSTRT PNOD R PINC REMFMT PINC REMTXT PNOD R PINC REML
0x1b5568…1b56fc Dummy {f00=0x00da, f01=0x0024, f02=»H,A=RGLOAD,C=C821 t P$ASG2 PINC KTPLN ( PINC ADM6 : PNOD R J PINC RGSUB1 X PINC RGSUB2 j PINC DKSUBS | PNOD R PINC RGMAIN PINC RGSTRT PNOD R PINC REMFMT PINC REMTXT PNOD R PINC REML
0x1b56fc…1b5890 Dummy {f00=0x00da, f01=0x2008, f02=» AD,C=C821 t P$ASG2 PINC KTPLN ( PINC ADM6 : PNOD R J PINC RGSUB1 X PINC RGSUB2 j PINC DKSUBS | PNOD R PINC RGMAIN PINC RGSTRT PNOD R PINC REMFMT PINC REMTXT PNOD R PINC REML
0x1b5890…1b5a24 Dummy {f00=0x00da, f01=0x018e, f02=» RRR R " 4 & D T d v " J F " D LL4 ! LL A ! LL ?R 0X 0X ! LL ?R4 1X FF4 &
0x1b5a24…1b5bb8 Dummy {f00=0x00da, f01=0x0190, f02=» " $ # 4 ) F / X 9 , j > z J F " D LL0X 1X FF ! LLI! LLw LL6 0X KK G , L U ,
0x1b5bb8…1b5d4c Dummy {f00=0x00da, f01=0x4154, f02=» W 0X KK W 0X KK 62 RRR_? R4 LL6 0X , H X , h x " J F " D KK W 0X KK W 0X KK 4 LL0X 1X
0x1b5d4c…1b5ee0 Dummy {f00=0x00da, f01=0x0190, f02=» O : O 1R Q 9_R : _ %^ O . - H : N # P N N Q N N P () ) : P _@ Z: _H N P R O : N - O
0x1b5ee0…1b6074 (0, 555) Opaque[0x194]
0x1b6074…1b6208 # DirEnt {nam=»RGSUB4«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1b58, f03=0x0000}
0x1b6074…1b6208 IdxSect {
0x1b6074…1b6208 f00 = 0x00da // 0x1b6074 @0x0
0x1b6074…1b6208 f01 = 0x0006 // 0x1b6076 @0x2
0x1b6074…1b6208 gno = [ // 0x1b6078 @0x4
0x1b6074…1b6208 [0x00]: C0x00da.0x3.0
0x1b6074…1b6208 [0x01]: C0x00db.0x0.0
0x1b6074…1b6208 [0x02]: C0x00db.0x1.0
0x1b6074…1b6208 ]
0x1b6074…1b6208 }
0x1b6208…1b639c Dummy {f00=0x00da, f01=0x0190, f02=» P IDENT RGSUB4 03.01.XXX.1 DDUM KMD08 & PDIV : P ENTRY SOPRD H P ENTRY LAMPOF P ENTRY LAMPON r P ENTRY ASSG P ENTRY ASGVOL P ENTRY CLSVOL P* P EXT SPERR P* P INCLUDE EQUATE P*
0x1b639c…1b6530 Dummy {f00=0x00da, f01=0x018e, f02=»CIFIED ` * P* DATASETNAME TO A VOLUMENAME. 2 P*-* IT TRIES ON ALL VOLUMES CONNECTED. < " P* ON SPECIFIED VOLUME r P* & P* ALTERED PARAMETERS: NONE P* B P* ALTERED FIELDS: SPBINW4 - OK - DATASETNR
0x1b6530…1b66c4 Dummy {f00=0x00da, f01=0x0190, f02=» ` D P* ASVOL - OK - VOLUMENAME NOK - X'00' H P* GTWBCD1 - OK - N/A NOK - ATTEMPT+1 P H P* GTWBCD2 - OK - N/A NOK - DATASETNR P* P* C/R: OK - 0, N
0x1b66c4…1b6858 Dummy {f00=0x00da, f01=0x0190, f02=»DATASET NO.> ` P* @ P*********************************************************** P* b P*-*ASSG PROC DK,DNR l $ P*-* MOVE SPBINW4,CBIN0 INITIATE P*-* MOVE GSWBIN1,CBIN1 " P*-* DSC0 DK,CLOSE CLOSE FIRST P* PASSG PROC
0x1b6858…1b69ec Dummy {f00=0x00da, f01=0x0190, f02=»VOLUMENAME p P* P MOVE GSWBCD3,ASVOL P CBL GSWBCD3,=D'1',ASSGRET 8 ( P MOVE GTWBCD1,ASVOL GET VOLUME NAME Z ( P MOVE GTWBCD2,DNR GET DATASET NUMBER ( P EDIT ASFNAME,FDFMT SET UP FILENAME P DSC0 DK,CLOSE CLOSE FIRST P* &
0x1b69ec…1b6b80 Dummy {f00=0x00da, f01=0x0190, f02=»ERR v P*-* MOVE ASVOL,=X'00' : P*-* CBNE CVOL(GSWBIN1),ASVOL,ASSG10 TRY ON NEW VOLUME * PASSGERR h > P* ASSIGNMENT IMPOSSIBLE x 0 P MOVE GTWBCD1,SPBINW4 (MORE THEN 3 RETRIES) P MOVE SPBINW4,CBIN21
0x1b6b80…1b6d14 (0, 556) Dummy {f00=0x00db, f01=0x0190, f02=»SGRET ( P CLEAR CDKOFF DISK SWITCHED ON AGAIN P CMP CBIN0,CBIN0 : P RET R P PEND ^ P* l P* v PFDFMT FRMT SET UP FILENAME P FCOPY =C'FD' & P FMEL '999PPP',GTWBCD1 VOLUME PART & P FMEL '999',GTWBCD2 DATASET NUMBER
0x1b6d14…1b6ea8 Dummy {f00=0x00db, f01=0x0190, f02=»UTINE - PER VOLUME | P* 4 P* ASSIGNS ALL FILES ON SPECIFIED VOLUME $ P* 4 P* IF VOL=0, ONLY CONFIGURATION DATA SET f P* P* 4 P* CALL: PERF ASGVOL,<VOLUME NUMBER> P* P********************
0x1b6ea8…1b703c Dummy {f00=0x00db, f01=0x0190, f02=» DATASET | P PERF ASSG,CBIN1,DK01,CBIN1 P B ASGRET 4 P* F ( PASG100 ASSIGN ALL FILES - VOLUME 1 P , P PERF ASSG,CBIN1,DK01,CBIN1 CONF DATASET | P BNOK ASGRET . P PERF ASSG,CBIN1,DK03,CBIN3 CYCLE DATASET P BNOK ASGRET ( P P
0x1b703c…1b71d0 Dummy {f00=0x00db, f01=0x0190, f02=»GLREGFL,ASG150 P MOVE CGLRECNR,=D'0' * P PERF ASSG,CBIN1,DK05,CBIN5 OLD REGSET 2 P BNOK ASGRET ` P MOVE CGLRECNR,TTGLREC t PASG150 P TBF CBUDGET,ASG160 P PERF ASSG,CBIN1,DK12,CBIN12 P BNOK ASGRET PASG160 P TBF C
0x1b71d0…1b7364 Dummy {f00=0x00db, f01=0x0190, f02=»CBIN7 INDEX FILE z P BNOK ASGRET ( P PERF ASSG,CBIN1,DK08,CBIN8 STAM REG , P BNOK ASGRET X ( P PERF ASSG,CBIN1,DK09,CBIN9 VAR REG l P BNOK ASGRET P TBF CBUDTFLG,ASGRET * P PERF ASSG,CBIN1,DK11,CBIN11 POST REG P BNOK ASGRET
0x1b7364…1b74f8 Dummy {f00=0x00db, f01=0x0190, f02=» P* ( PASG300 ASSIGN ALL FILES - VOLUME 3 P B ASGOK : P* J ( PASG400 ASSIGN ALL FILES - VOLUME 4 T P B ASGOK P* PASGNOK P CMP CBIN1,CBIN0 P RET P* PASGOK P CMP CBIN0,CBIN0 PASGRET
0x1b74f8…1b768c Dummy {f00=0x00db, f01=0x0190, f02=»NE - PER VOLUME z P* 4 P* CLOSES ALL FILES ON SPECIFIED VOLUME " P* Z 4 P* CALL: PERF CLSVOL,<VOLUME NUMBER> d P* P******************** P* P SET CDKOFF DISK SWITCH OFF P TBF CWFLAG,CLS050
0x1b768c…1b7820 Dummy {f00=0x00db, f01=0x0190, f02=»SE ALL FILES - VOLUME 1 P DSC0 DK01,CLOSE P DSC0 DK03,CLOSE 8 P DSC0 DK04,CLOSE P P TBF CGLREGFL,CLS150 h P DSC0 DK05,CLOSE PCLS150 P TBF CTEXTFLG,CLS190 P DSC0 DK06,CLOSE P TBF CSTRKFLG,CLS190 P DSC0 DK07,CLO
0x1b7820…1b79b4 (0, 557) Dummy {f00=0x00db, f01=0x0190, f02=»S190 P TBF CBUDGET,CLS195 P DSC0 DK12,CLOSE ( PCLS195 @ P DSC0 FD01,UNLOD N P B CLSRET f P* x ( PCLS200 CLOSE ALL FILES - VOLUME 2 P DSC0 DK02,CLOSE P DSC0 FD02,UNLOD P B CLSRET P* ( PCLS300 CLOSE
0x1b79b4…1b7b48 Dummy {f00=0x00db, f01=0x018e, f02=» P RET P PEND P* " P EJECT , P* : PLAMPON PROC $NR D P PLIT $NR * P************************************** n P* ( P* LAMPON - FIRE LAMPS ON OPR. PANEL. P* CALL - PERF LAMPON,<$NR> P* : P* THE LAMP
0x1b7b48…1b7cdc Dummy {f00=0x00db, f01=0x0190, f02=» P DSC1 DSSOPO,ON,GSWBIN2 P RET $ P PEND 0 P* > PLAMPOF PROC $NR H P PLIT $NR ` . P***************************************** r P* . P* LAMPOF - EXTINGUISH LAMPS ON OPR. PANEL P* CALL - PERF LAMPOF,<$NR> P*
0x1b7cdc…1b7e70 Dummy {f00=0x00db, f01=0x0190, f02=» MOVE GSWBIN2,$NR P DSC1 DSSOPO,OFF,GSWBIN2 P RET : P PEND F P* T PSOPRD PROC ^ 2 P********************************************* p P* * P* SOPRD - READ SYSTEMS OPERATOR PANEL P* 2 P********************************
0x1b7e70…1b8004 Dummy {f00=0x00db, f01=0x4136, f02=» P PEND P* P* P* * 6 P************************************************* 4 P* n P* FORMATS x P* 6 P************************************************* PEORKY1 EQU X'90' P* PDUMTAB KTAB EORK
0x1b8004…1b8198 Dummy {f00=0x00db, f01=0x2008, f02=» NT RGADM DDUM KMD08 PDIV , ENTRY RGADM : RGADM N END @ h
0x1b8198…1b832c Dummy {f00=0x00db, f01=0x0190, f02=» f0 j0 p0 , { > } f N J F " D @ b L ( , Db L ! L % L ! L W ! L W I ?R?R ^ f f 0 p
0x1b832c…1b84c0 Dummy {f00=0x00db, f01=0x0190, f02=» 0 0 " f 4 D 0 9 T 0 h f | e J F " D L" ?R ?R # L % L ?R ?R # L % L ?R ?R :R 0
0x1b84c0…1b8654 (0, 558) Opaque[0x194]
0x1b8654…1b87e8 # DirEnt {nam=»KM173X«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1b70, f03=0x0000}
0x1b8654…1b87e8 IdxSect {
0x1b8654…1b87e8 f00 = 0x00db // 0x1b8654 @0x0
0x1b8654…1b87e8 f01 = 0x0004 // 0x1b8656 @0x2
0x1b8654…1b87e8 gno = [ // 0x1b8658 @0x4
0x1b8654…1b87e8 [0x00]: C0x00db.0x2.0
0x1b8654…1b87e8 [0x01]: C0x00db.0x3.0
0x1b8654…1b87e8 ]
0x1b8654…1b87e8 }
0x1b87e8…1b897c Dummy {f00=0x00db, f01=0x0190, f02=» PPRT KM173X PPRT C173X * PMES LYNGBY-T]RB[K KOMMUNE, REMITTERING ( PMES 81.03.20 V PMES TEST j PASG 2,NO z PSCR PLED KMD08,/S P!!CH $$DCTASK$$DCTSK$$ P!!DL 60 BUDGET FILE P!!DL 61,62 FD03,FD04 P!!DL 67,
0x1b897c…1b8b10 Dummy {f00=0x00db, f01=0x0190, f02=» ADR KB/VDU z P!!DL 183 " PMF1GTP STRG 32X'40' DV ADR GTP $ P!!DL 186 J PMF1CU STRG X'E2C2' CU ADR Z P!!DL 188 | * PCNFHC STRGI (16),' ' HARDCOPY PRINTER P!!DL 193,194 POFF STRGI (12)2C' ' P!!RE 198,$$FALSE$$TRUE$$ BKO
0x1b8b10…1b8ca4 Dummy {f00=0x00db, f01=0x0190, f02=»$FALSE$$TRUE$$ 5M DISK & P!!RE 237,$$FALSE$$TRUE$$ CREMITFLG & P!!RE 246,$$FALSE$$TRUE$$ TEXT REG H $ P!!RE 247,$$FALSE$$TRUE$$ LEV REG r ( P!!RE 248,$$FALSE$$TRUE$$ BUNDTREMIT P!!DL 287 4 PCFLAG BINI (12),X'0011',X'0078',X'0012',X'0070'
0x1b8ca4…1b8e38 Dummy {f00=0x00db, f01=0x0190, f02=»!!RE 446,$$128$$80$$ P!!RE 448,$$OD-KOM$$LY-T] $$ " P!!RE 450,$$20$$200$$ LEV INDEX @ P!!RE 451,$$5$$1$$ KORT LINE f P!!DL 452,453 PON STRGI (12)2C' ' P!!DL 777,780 ENTRY P!!DL 783,784 ENTRY P!!DL 787,790 P!!DL 8
0x1b8e38…1b8fcc Dummy {f00=0x00db, f01=0x0190, f02=» PASG 2,LP0F PNOD C PTRA /S,NL $ PINC DIV461 6 PNOD R H PLED SCREEN,/S V P!!CH $$KEY461$$KEYCOP$$ l P!!CH $$SL461$$SLCOP$$ P!!EN PTRA /S,NL PINC RGSUB4 PINC RGSTRT PNOD R PINC RGMAIN
0x1b8fcc…1b9160 Dummy {f00=0x00db, f01=0x018e, f02=» PNOD R PINC RGADM PINC REMSUB ( PNOD R : PINC ADM5 H PINC SUBAPL X PINC REMPRT j PNOD R | PLED KMDIO,/S P!!DL 149,186 WRFD090-WRFD095 PWRFD090 PWRFD091 PWRFD092 PWRFD093 PWRFD09
0x1b9160…1b92f4 (0, 559) Dummy {f00=0x00db, f01=0x010c, f02=» PNOD R PINC REMLEV PINC ADM6 ( PNOD R 8 PINC REMTR F PINC REMBDT X PINC BUDD j PTLK U,4K z PINC DCTSK LKE M PKPF /L,RGTEST PSCR 2 PMES $PDISC M=M:9.2P,MU=M:9.2P,A=RGTEST,C=C173X P$ASG2
0x1b92f4…1b9488 Dummy {f00=0x00db, f01=0x2008, f02=» NOD R PINC REMLEV PINC ADM6 ( PNOD R 8 PINC REMTR F PINC REMBDT X PINC BUDD j PTLK U,4K z PINC DCTSK LKE M PKPF /L,RGTEST PSCR 2 PMES $PDISC M=M:9.2P,MU=M:9.2P,A=RGTEST,C=C173X P$ASG2
0x1b9488…1b961c Dummy {f00=0x00db, f01=0x0190, f02=»
[…0x3…]
0x1b9ad8…1b9c6c Dummy {f00=0x00db, f01=0x0190, f02=» F 0 0 0 0 0 0 0
0x1b9c6c…1b9e00 Dummy {f00=0x00db, f01=0x0190, f02=» 0 0 0 0 0 0 0 &0 -0 4 ; < > F N
0x1b9e00…1b9f94 (0, 560) Opaque[0x194]
0x1b9f94…1ba128 # DirEnt {nam=»REMTR «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1b80, f03=0x0000}
0x1b9f94…1ba128 IdxSect {
0x1b9f94…1ba128 f00 = 0x00dc // 0x1b9f94 @0x0
0x1b9f94…1ba128 f01 = 0x0016 // 0x1b9f96 @0x2
0x1b9f94…1ba128 gno = [ // 0x1b9f98 @0x4
0x1b9f94…1ba128 [0x00]: C0x00dc.0x0.0
0x1b9f94…1ba128 [0x01]: C0x00dc.0x1.0
0x1b9f94…1ba128 [0x02]: C0x00dc.0x2.0
0x1b9f94…1ba128 [0x03]: C0x00dc.0x3.0
0x1b9f94…1ba128 [0x04]: C0x00dd.0x0.0
0x1b9f94…1ba128 [0x05]: C0x00dd.0x1.0
0x1b9f94…1ba128 [0x06]: C0x00dd.0x2.0
0x1b9f94…1ba128 [0x07]: C0x00dd.0x3.0
0x1b9f94…1ba128 [0x08]: C0x00de.0x0.0
0x1b9f94…1ba128 [0x09]: C0x00de.0x1.0
0x1b9f94…1ba128 [0x0a]: C0x00de.0x2.0
0x1b9f94…1ba128 ]
0x1b9f94…1ba128 }
0x1ba128…1ba2bc Dummy {f00=0x00dc, f01=0x0190, f02=» P IDENT REMTR P DDUM KMD08 P PDIV , P : P ENTRY TRREAD B P ENTRY TRRMV X P ENTRY TRINIT l P ENTRY TRINS P ENTRY TRGET P ENTRY TRGETF P ENTRY BDTPRT P ENTRY BDTSCA P ENTRY BDTDEL P EXT R
0x1ba2bc…1ba450 Dummy {f00=0x00dc, f01=0x0190, f02=»UPD P EXT IDXGET P EXT LEVRD P EXT GETNXT 2 P EXT KFREAD F P EXT KFWRIT Z P EXT NEWLIN n P EXT GENWRF P EXT BSAMPR P EXT BCHKPR P EXT BGIRPR P EXT SPLIN8 P EXT CLEAR8 P EXT PRTADJ
0x1ba450…1ba5e4 Dummy {f00=0x00dc, f01=0x0190, f02=»EDURE SCANS LEV - VAR.INFO - TRANS & P* IN ORDER TO BUILD UP A PRINTLEV * P* OR WRITE ADVISLIST T P* p P* LEV 01 : BFO 1,6 z P* LEV 02 : BFO 2,7 P* LEV 03 : BFO 3,8 P* LEV 04 : BFO 4,9 P* LEV 10 : FREE LIST $ P* LEV 11 :
0x1ba5e4…1ba778 Dummy {f00=0x00dc, f01=0x0190, f02=»LEV 04 v 6 P* TRANSACTIONS ARE MOVED TO LEV 11/12/13/14 IF ANY P* CREDIT AMOUNT OCCURS H P* P = 1 : BUILD PRINTLEV f P* P = 2 : ADVISLISTE ONLY P* P PERF CLEAR8 P TBF CADVIS,BDTS05 P PERF BSAMPR,CBIN0 PBDTS05 ( P
0x1ba778…1ba90c Dummy {f00=0x00dc, f01=0x0190, f02=»GETNXT READ NEXT VALID LEV P BNOK BDTS80 " PBDTS08 6 P MOVE GTWBCD2,GTLEVNR D P PERF SPLIN8,CBIN10,CBIN3 b P PERF VARRD P BNOK BDTS95 0 P CBE GTTRKEY,CBIN0,BDTS10 NOTHING TO DECLARE P PERF LEVRD READ STAMINFO P BNOK
0x1ba90c…1baaa0 Dummy {f00=0x00dc, f01=0x0190, f02=»VBFO,GTPRTFRA,BDTS10 PBDTS11 P* CHECK MIN VALOER DATO * 4 P MOVE GSWBCD6,GTREGF(CBIN13) GET MIN VALOER DATO N $ P CBNL GSWBCD6,=D'800000',BDTS112 P PERF CHDATO P MOVE GTREGF(CBIN13),GSWBCD7 PBDTS112 : P CBG GTREGF(CBIN13
0x1baaa0…1bac34 (0, 561) Dummy {f00=0x00dc, f01=0x0190, f02=»GSWBIN9,CBIN0 NO OF TRANS TO BE PAID . P MOVE GSWBIN6,GTTRKEY SET POINTER TO TRANS , " P CLEAR CKRESP FLAG FOR KREDIT ^ & P CLEAR CSPECFLG FLAG FOR >3 TRANS PBDTS114 P CLEAR GTSWFLAG $ P PERF TRREAD,GSWBIN6 READ TRANS P BNOK BDTS
0x1bac34…1badc8 Dummy {f00=0x00dc, f01=0x0190, f02=»IT AMOUNT PBDTS115 * P ADD GTBSUM1,GTDUPF(CBIN4) ADD AMOUNT " P ADD GSWBIN9,CBIN1 ADD COUNT P PBDTS116 t 6 P MOVE GSWBIN6,GTDUPF(CBIN22) POINTER TO NEXT TRANS 0 P CBNE GSWBIN6,CBIN0,BDTS114 READ NEXT TRANS P* NO MORE TRANS
0x1badc8…1baf5c Dummy {f00=0x00dc, f01=0x0190, f02=» SET CSPECFLG >3 TRANS PBDTS117 4 P CBL GTBSUM1,=D'1',BDTS12 AMOUNT<=0, ONLY SPEC. . . P TBF CSPECFLG,BDTS15 NO SPEC, IF <3 TRANS f & P TBT CKRESP,BDTS12 SPEC IF KREDIT $ P* >3, ALWAYS SPEC IF CSPEC=T P CLEAR CSPECFLG 4 P CBNE
0x1baf5c…1bb0f0 Dummy {f00=0x00dc, f01=0x0190, f02=»IFICATION ~ P TBT CADVIS,BDTS20 IF ADVIS < P* IF CREDIT AMOUNTS, AN EXTRA TRANS MUST BE INSERTED 6 6 P* ON PRINTLEV, WITH THE TOTAL AMOUNT (IF >0). v , P* IF AMOUNT IS <= 0 NOTHING IS DONE , P MOVE GTDUPF(CBIN4),GTBSUM1 TOTAL AMOUNT
0x1bb0f0…1bb284 Dummy {f00=0x00dc, f01=0x0190, f02=»GTDUPF(CBIN15),=D'9' TEKST NR 9 " P MOVE GTDUPF(CBIN18),GTPRTDAT ( " P MOVE GTTXTTKO,=D'4' TEXT CODE N , P MOVE GTDUPF(CBIN6),GTDATO REGNSKABSAAR t P MOVE GTDUPF(CBIN1),=D'0' & P MOVE GTKFVAL,GTLEVNR SAVE GTLEVNR * P PERF TRGETF,GSWBIN8 GET
0x1bb284…1bb418 Dummy {f00=0x00dc, f01=0x018e, f02=» v P MOVE GTDUPF(CBIN2),GTLEVALT PBDTS13 , P PERF VARRD : P BNOK BDTS95 N P PERF TRINS,GSWBIN8 b P BNOK BDTS95 ~ & P MOVE GTLEVNR,GTKFVAL RESTORE LEV P PERF VARRD REREAD LEV P BNOK BDTS95 PBDTS15 6 P* SET PRINTL
0x1bb418…1bb5ac Dummy {f00=0x00dc, f01=0x0190, f02=» z PBDTS205 P TBF CSPECFLG,BDTS208 * P ADD GTLEVPNR,=D'10' SPECIFICATION LEV 6 PBDTS208 d P* t PBDTS20 ~ P MOVE GTBSUM1,=D'999999' P MOVE GTKFVAL,=D'0' P MOVE GSWBIN9,CBIN0 P MOVE GSWBIN6,GTTRKEY P MOVE
0x1bb5ac…1bb740 Dummy {f00=0x00dc, f01=0x0190, f02=»40 < P CBG GTDUPF(CBIN7),GTPRTDAT,BDTS70 NOT TO BE PAID; NEXT PBDTS30 J P PERF TRRMV X * P* NOW GSWBIN3 POINTS TO NEXT RECORD l P BNOK BDTS95 ( P* NOW WE HAVE A TRANS TO BE INSERTED P* INTO THE PRINTLEV P PERF BDTBOG
0x1bb740…1bb8d4 (0, 562) Dummy {f00=0x00dc, f01=0x0190, f02=»=D'1',BDTS34 < P MOVE GTDUPF(CBIN2),GTLEVALT TO BE PAID TO SOMEONE ELSE PBDTS34 T P PERF VARRD READ PRINTLEV b P BNOK BDTS95 * P PERF TRINS,GSWBIN6 INSERT ON PRINTLEV P BNOK BDTS95 ( P MOVE GTLEVNR,GTKFVAL REREAD OLD LEV P P
0x1bb8d4…1bba68 Dummy {f00=0x00dc, f01=0x0190, f02=»TDUPF(CBIN7),GTPRTDAT,BDTS55 NOT TO BE PAID; NEXT PBDTS45 : P ADD GSWBIN9,CBIN1 H P MOVE GSWBCD5,GSWBIN9 b P PERF BSAMPR,GSWBIN9 P CBL GSWBIN9,CBIN3,BDTS55 P MOVE GSWBIN9,CBIN0 P B BDTS55 P* PBDTS50 0 P MOV
0x1bba68…1bbbfc Dummy {f00=0x00dc, f01=0x0190, f02=»E GSWBIN6,CBIN0,BDTS21 IF ANY $ P TBT CADVIS,BDTS65 ADVISLISTE ? & $ P CBNE GTBSUM1,=D'999999',BDTS61 N P MOVE GTBSUM1,=D'0' v PBDTS61 P MOVE GTREGF(CBIN13),GTBSUM1 P PERF VARWRT P BNOK BDTS95 P MOVE GTBSUM1,=D'999999'
0x1bbbfc…1bbd90 Dummy {f00=0x00dc, f01=0x0190, f02=»66 4 P MOVE GSWBCD5,=D'2' MAKE SURE A LINE IS PRINTED PBDTS67 B P PERF BSAMPR,CBIN4 P PBDTS68 j P CLEAR CSWFLAG x P B BDTS10 PBDTS70 8 P CBNG GTBSUM1,GTDUPF(CBIN7),BDTS50 LOWER VALORDATO? P MOVE GTBSUM1,GTDUPF(CBIN7)
0x1bbd90…1bbf24 Dummy {f00=0x00dc, f01=0x0190, f02=»BIN0 P RET PBDTS95 P PERF CLEAR8 & P CMP CBIN0,CBIN1 : P RET R P PEND ^ P EJECT l PBDTPRT PROC P z 0 P* THE PROCEDURE LISTS ALL TRANSES CONNECTED & P* TO THE SPEC. LEVNR IN <GTLEVNR> P* P = 1: CHECK/GIRO
0x1bbf24…1bc0b8 Dummy {f00=0x00dc, f01=0x0190, f02=»10 P MOVE GSWBIN1,GTPRTTIL . P IB GSWBIN1,BDTP40,BDTP60 USE BFO AS INDEX ( P B BDTP90 Z P* l PBDTP20 v $ P PERF BSAMPR,CBIN0 PRINT HEADER P PERF VARRD P BNOK BDTP95 P MOVE GSWBCD5,=D'1' P MOVE GSWBIN8,GTTRKEY
0x1bc0b8…1bc24c Dummy {f00=0x00dc, f01=0x0190, f02=» OF ROUTINE | P CLEAR GTSWFLAG P PERF TRREAD,GSWBIN8 , P BNOK BDTP95 H & P CBE GTLEVNR,GTDUPF(CBIN2),BDTP25 P CBL GTLEVNR,=D'19',BDTP23 P PERF BSAMPR,CBIN4 PBDTP23 P MOVE GTLEVNR,GTDUPF(CBIN2) P PERF LEVRD P
0x1bc24c…1bc3e0 Dummy {f00=0x00dc, f01=0x0190, f02=»PR,GSWBIN4 PRINT NEXT INFO P ADD GSWBCD5,=D'1' $ . P CBL GSWBCD5,=D'4',BDTP27 LINE FILLED UP ? > P MOVE GSWBCD5,=D'1' p PBDTP27 P MOVE GSWBIN8,GTDUPF(CBIN22) P CBE GSWBIN8,CBIN0,BDTP29 P B BDTP21 PBDTP29 & P PERF BS
0x1bc3e0…1bc574 (0, 563) Dummy {f00=0x00dc, f01=0x0190, f02=»ION v P PERF VARRD READ PRINTLEV P BNOK BDTP95 . P MOVE GSWBIN8,GTTRKEY B P CMP GSWBIN8,CBIN0 ` P BE BDTP90 NO TRANSACTIONS z P* PBDTP31 P PERF KBTEST <MAK> PRESSED? $ P BOK BDTP90 YES, OUT OF ROUTINE P CLEAR G
0x1bc574…1bc708 Dummy {f00=0x00dc, f01=0x0190, f02=»BL GTLEVNR,=D'19',BDTP325 FIRST TIME? PBDTP320 WRITE TOTAL . P SET CSWFLAG L P PERF NEWLIN,CBIN1 ` P MOVE GSWBCD4,GSWBIN10 z . P PERF GENWRF,GTHCDEV,FBDTSLUT WRITE TOTAL P ADD GSWBIN3,CBIN2 P PERF NEWLIN,GSWBIN3 P CMP GSW
0x1bc708…1bc89c Dummy {f00=0x00dc, f01=0x0190, f02=»TAL z P MOVE GSWBIN10,CBIN0 P* ( PBDTP33 WRITE HEADING 2 , P MOVE GTKFVAL,GTDUPF(CBIN2) SAVE LEV NO P ( P MOVE GTLEVNR,GTPRTTIL SET PRINTLEV , P ADD GTLEVNR,=D'10' KREDIT SPECIFICATION P PERF LEVRD P BOK BDTP34 P PER
0x1bc89c…1bca30 Dummy {f00=0x00dc, f01=0x018e, f02=» P BOK BDTP35 P PERF SETLEV PBDTP35 , P ADD GSWBIN10,CBIN1 : $ P MOVE GSWBCD4,GSWBIN10 NEXT PAGE V , P PERF GENWRF,GTHCDEV,FKRE10 WRITE LEV NO ~ , P PERF GENWRF,GTHCDEV,FRMTNVN WRITE NAME * P PERF GENWRF,GTHCDEV,FKRE20 WRITE DATE
0x1bca30…1bcbc4 Dummy {f00=0x00dc, f01=0x0190, f02=» t P PERF NEWLIN,CBIN10 P B BDTP33 $ P* 6 PBDTP37 WRITE SPECIFICATION @ ( P MOVE GSWBIN7,GTDUPF(CBIN15) TEXT NR d P PERF TXTRD,GSWBIN7 P PERF STREDT * P PERF GENWRF,GTHCDEV,FRMSPE WRITE LINE $ P SUB GSWBIN3,CBIN1 SET LIN
0x1bcbc4…1bcd58 Dummy {f00=0x00dc, f01=0x018e, f02=» t P CBNE GSWBIN8,CBIN0,BDTP31 P B BDTP320 * P* < P***** F P* T PBDTP40 CHECK PRINT ^ P PERF BCHKPR,CBIN0 z P PERF BCHKPR,CBIN0 P PERF PRTADJ P BL BDTP40 P BG BDTP90 P PERF VARRD P BNOK BDTP95
0x1bcd58…1bceec Dummy {f00=0x00dc, f01=0x0190, f02=» P BOK BDTP90 P CLEAR GTSWFLAG P PERF TRREAD,GSWBIN8 4 P BNOK BDTP95 P & P CBG GTDUPF(CBIN2),GTPRTFRA,BDTP47 d & P CBE GTLEVNR,GTDUPF(CBIN2),BDTP45 P CBL GTLEVNR,=D'19',BDTP43 P CLEAR CWORK1 P CLEAR CWORK1 P P
0x1bceec…1bd080 Dummy {f00=0x00dc, f01=0x018e, f02=»TP44 P MOVE GSWBCD5,=D'1' PBDTP45 ( P SET CWORK1 6 P SET CWORK1 J P MOVE GSWBIN4,GSWBCD5 ^ P PERF BCHKPR,GSWBIN4 | P ADD GSWBCD5,=D'1' P TBT C821FLG,BDTP47 P CBL GSWBCD5,=D'4',BDTP47 P MOVE GSWBCD5,=D'1'
0x1bd080…1bd214 (0, 564) Dummy {f00=0x00dd, f01=0x0190, f02=» P PERF BCHKPR,CBIN4 P B BDTP90 " P* 4 PBDTP60 > P PERF BGIRPR,CBIN0 L P PERF PRTADJ f P BL BDTP60 z P BG BDTP90 P PERF VARRD P BNOK BDTP95 P MOVE GSWBCD5,=D'1' P MOVE GSWBIN8,GTTRKEY P CBE GSW
0x1bd214…1bd3a8 Dummy {f00=0x00dd, f01=0x018e, f02=»K BDTP95 & P CBG GTDUPF(CBIN2),GTPRTFRA,BDTP67 & P CBE GTLEVNR,GTDUPF(CBIN2),BDTP65 : P CBL GTLEVNR,=D'19',BDTP64 d 0 P* DEPENDING ON THE VALUE OF GSWBIN4 (W LINE) 8 P* WE HAVE TO DECIDE IF WE HAVE TO SHIFT TO THE RIGHT 2 P* HALF OF THE GIRO
0x1bd3a8…1bd53c Dummy {f00=0x00dd, f01=0x0190, f02=» b PBDTP62 , P MOVE GSWBCD5,=D'4' START ON RIGHT HALF P B BDTP650 F PBDTP63 X 2 P PERF BGIRPR,CBIN7 PRINT AND START ON NEW FORM f PBDTP64 P MOVE GSWBCD5,=D'1' PBDTP650 P MOVE GTLEVNR,GTDUPF(CBIN2) P PERF LEVRD
0x1bd53c…1bd6d0 Dummy {f00=0x00dd, f01=0x0190, f02=» ~ P CBL GSWBCD5,=D'7',BDTP67 ! P MOVE GSWBCD5,=D'1' ! * PBDTP67 ! F P MOVE GSWBIN8,GTDUPF(CBIN22) ! T P CBE GSWBIN8,CBIN0,BDTP69 ! x P B BDTP61 ! PBDTP69 ! * P CBE GSWBCD5,=D'1',BDTP90 EMPTY FORM ? ! & P PERF BGIRPR,CBIN7 PRINT LAST FO
0x1bd6d0…1bd864 Dummy {f00=0x00dd, f01=0x0190, f02=» RET ! P PEND " P EJECT " PBDTBOG PROC " ( P* " < " P* BOOKKEEPING OF A TRANSACTION " F * P* DURING THE MOVE FROM LEV TO PRINTLEV " l P* ADD TO VERSUR " P* SUB FROM PENGE " P* UPDAT VAR. INFO " P* " * P CBL GTDUPF(CBIN4),=D'0',B
0x1bd864…1bd9f8 Dummy {f00=0x00dd, f01=0x0190, f02=»E GSWBIN4,CBIN1 " 2 P SUB GTREGF(CBIN15),GTDUPF(CBIN4) VENT KREDIT # PBDTB40 # N P* BOGFORING # P MOVE GSWBIN5,GTLEVBFO # p P CBL GSWBIN5,CBIN5,BDTB45 # , P SUB GSWBIN5,CBIN5 ADJUST FOR BUNDT ONLY # PBDTB45 # . P PERF KFREAD,CBIN3,GSWBIN4
0x1bd9f8…1bdb8c Dummy {f00=0x00dd, f01=0x0190, f02=»,CBIN2,CBIN1,GSWBIN5,GTKFVAL # . P SUB GTKFVAL,GTDUPF(CBIN4) SUB FROM PENGE $ $ , P PERF KFWRIT,CBIN2,CBIN1,GSWBIN5,GTKFVAL $ V P PERF VARWRT $ P BNOK BDTB95 $ P CMP CBIN0,CBIN0 $ P RET $ PBDTB95 $ P CMP CBIN0,CBIN1 $ P RET $ P PEN
0x1bdb8c…1bdd20 Dummy {f00=0x00dd, f01=0x0190, f02=» $ h P* % P* 1) READ PRINTLEV AR.INFO % 6 P* 2) UPDATE ALL RECORDS, APART FROM LAST-IN-CHAIN % 4 P* 3) READ FREE LEV VAR.INFO % n 4 P* 4) UPDATE LAST TRANS WITH GTTRKEY, AND REWRITE % 4 P* 5) UPDATE FREE LEV WITH GTTRKEY FROM PRINTLEV % . P* 6) U
0x1bdd20…1bdeb4 (0, 565) Dummy {f00=0x00dd, f01=0x0190, f02=»ERF VARRD READ POINTER TO 1. TRANS % P BNOK BDTB095 & * 0 P CBE GTTRKEY,CBIN0,BDTB090 NOTHING TO DELETE & @ P MOVE GSWBIN7,GTTRKEY & t P MOVE GSWBIN8,GTTRKEY & P MOVE GTLEVNR,=D'10' & P* 2) & PBDTB020 & P SET GTSWFLAG POINTER ONLY & $
0x1bdeb4…1be048 Dummy {f00=0x00dd, f01=0x0190, f02=»OVE GTDUPF(CBIN13),=D'0' & P MOVE GTDUPF(CBIN14),=D'0' ' P MOVE GTDUPF(CBIN18),=D'0' ' B P MOVE GTDUPF(CBIN19),=D'0' ' d & P MOVE GTDUPF(CBIN15),=D'0' TEXTNR ' ( P MOVE GTDUPF(CBIN21),=D'0' TEXTCODE ' ( P MOVE GTDUPF(CBIN4),=D'0' UDB. BELOB ' * P
0x1be048…1be1dc Dummy {f00=0x00dd, f01=0x0190, f02=»TDUPF(CBIN22),=D'1',BDTB030 LAST IN CHAIN? ' P CLEAR GTSWFLAG ( 2 P PERF TRPUT,GSWBIN8 REWRITE ( J P BNOK BDTB095 ( n P MOVE GSWBIN8,GTDUPF(CBIN22) ( P B BDTB020 ( P* 3) ( PBDTB030 MOVE GTLEVNR,=D'10' ( 2 P PERF WAITF,CVAREXFL WAIT FOR
0x1be1dc…1be370 Dummy {f00=0x00dd, f01=0x0190, f02=»TSWFLAG ( , P PERF TRPUT,GSWBIN8 REWRITE LAST TRANS; ) , P BNOK BDTB085 POINTS NOW TO 'OLD' FIRST ) @ P RECORD IN FREE LEV ) p P* 5) ) . P ADD GTREGF(CBIN11),GTBSUM1 AVAIL. RECORDS ) 2 P MOVE GTTRKEY,GSWBIN7 POINT TO FIRST RECORD IN ) P PERF
0x1be370…1be504 Dummy {f00=0x00dd, f01=0x0190, f02=» P BNOK BDTB085 * P MOVE GTREGF(CBIN10),=D'0' * P MOVE GTREGF(CBIN11),=D'0' * < P MOVE GTREGF(CBIN12),=D'0' * ^ P MOVE GTREGF(CBIN13),=D'0' * P MOVE GTREGF(CBIN14),=D'0' * P MOVE GTREGF(CBIN15),=D'0' * P MOVE GTTRKEY,CBIN0 * P PERF
0x1be504…1be698 Dummy {f00=0x00dd, f01=0x0190, f02=»95 * P* + PBDTB090 + P CMP CBIN0,CBIN0 OK + $ P B BDTB099 + @ PBDTB095 + R P CMP CBIN0,CBIN1 + b PBDTB099 + z P RET + P PEND + P EJECT + PTRINIT PROC + P* + 0 P* THE PROCEDURE MOVES ALL TRANSACTIONRECORDS + , P* TO
0x1be698…1be82c Dummy {f00=0x00dd, f01=0x018e, f02=»RD + t P* , P MOVE GTLEVNR,=D'10' , P PERF CLEAR8 , 0 P MOVE GSWBIN8,CBIN1 , D P MOVE GTDUPF(CBIN17),=D'0' , ` & P PERF TRREAD,GSWBIN8 READ 1. TRANS , P BOK TRIN10 , P B TRIN95 , PTRIN10 , P CBNE GTWBCD1,=D'4',TRIN90 , P B TRI
0x1be82c…1be9c0 Dummy {f00=0x00dd, f01=0x0190, f02=» " P CHANGE LAST POINTER TO ZERO - PTRIN25 - * P MOVE GSWBIN8,GTDUPF(CBIN17) - 8 P SET GTSWFLAG - P PERF TRREAD,GSWBIN8 - r P BNOK TRIN95 - P MOVE GTDUPF(CBIN22),=D'0' - P PERF TRPUT,GSWBIN8 - P BNOK TRIN95 - P* UPDATE VAR.INFO TO
0x1be9c0…1beb54 (0, 566) Dummy {f00=0x00dd, f01=0x0190, f02=»LEVNR,=D'10' FREE-LIST SUPPLIER - P PERF VARRD READ VAR.INFO . ( P BNOK TRIN95 . J * P MOVE GTTRKEY,CBIN1 FIRST IN FREE LIST . ^ 4 P MOVE GTREGF(CBIN11),GSWBIN8 NBR OF FREE RECORDS . P MOVE GTREGF(CBIN12),GSWBIN8 . P PERF VARWRT REWRITE . P BNO
0x1beb54…1bece8 Dummy {f00=0x00dd, f01=0x0190, f02=»BIN2),=D'10' LEVNR . ( P MOVE GTDUPF(CBIN7),=D'0' VALORDATO / $ P MOVE GTDUPF(CBIN13),=D'0' NR-1 / H $ P MOVE GTDUPF(CBIN14),=D'0' NR-2 / p & P MOVE GTDUPF(CBIN18),=D'0' DATO-1 / & P MOVE GTDUPF(CBIN19),=D'0' DATO-2 / & P MOVE GTDUPF(CBIN15),=D'0' T
0x1bece8…1bee7c Dummy {f00=0x00dd, f01=0x0190, f02=»S]R / n ( P MOVE GTDUPF(CBIN1),=D'0' REGKONTONR 0 , P MOVE GTDUPF(CBIN22),GSWBIN8 OLD POINTER 0 8 8 P ADD GTDUPF(CBIN22),=D'1' PLUS ONE GIVES NEW POINTER 0 h P CLEAR GTSWFLAG 0 P PERF TRPUT,GSWBIN8 0 P BNOK TRIN95 0 : P MOVE GTDUPF(CBIN17),GSWBIN8
0x1bee7c…1bf010 Dummy {f00=0x00dd, f01=0x0190, f02=» ADD GSWBIN8,CBIN1 CONTINUE TO READ 0 0 P PERF TRREAD,GSWBIN8 UNTIL NO ERROR IS FOUND 1 , P BOK TRIN40A 1 ` P CBE GTWBCD1,=D'10',TRIN25 1 t P B TRIN40 1 PTRIN40A 1 4 P MOVE GTDUPF(CBIN16),GSWBIN8 SAVE NEW RECORDNBR 1 P MOVE GSWBIN8,GTDUPF(CBI
0x1bf010…1bf1a4 Dummy {f00=0x00dd, f01=0x0190, f02=»,CBIN1 1 P B TRIN41 ONE MORE ERROR 2 PTRIN43 2 . ( P MOVE GTDUPF(CBIN22),GTDUPF(CBIN16) 2 < P PERF TRPUT,GSWBIN8 2 h P BNOK TRIN42 2 P MOVE GSWBIN8,GTDUPF(CBIN16) 2 P B TRIN20 2 P* 2 PTRIN90 2 P PERF CLEAR8 2 P CMP CBIN0,CBI
0x1bf1a4…1bf338 Dummy {f00=0x00dd, f01=0x0190, f02=»JECT 2 PTRINS PROC PT 3 P* 3 " < P* THE PROCEDURE INSERTS A TRANSACTION INTO THE TRANSFILE 3 , ( P* <PT> POINTS TO A FREE RECORD 3 l P* 1) LEV ALREADY READ 3 0 P* 2) MOVE POINTER FROM LEV TO 'FREE' RECORD 3 P* 3) MOVE POINTER TO LEV 3 6
0x1bf338…1bf4cc Dummy {f00=0x00dd, f01=0x018e, f02=»READ BEFORE ENTRY 3 P* 2) 4 P MOVE GTDUPF(CBIN22),GTTRKEY 4 & P* 3) 4 J P MOVE GTTRKEY,PT 4 V P* 4) 4 n P PERF TRPUT,PT INSERT 4 z P BNOK TRINS95 4 P* 5) 4 P PERF WCHUPD 4 P* 6) 4 P CBNE GTLEVNR,=D'10',TRINS50 4 0 P ADD GTREG
0x1bf4cc…1bf660 Dummy {f00=0x00dd, f01=0x0190, f02=» 4 PTRINS95 5 P CMP CBIN1,CBIN0 5 PTRINS99 5 0 P RET 5 @ P PEND 5 L P EJECT 5 Z PTRGETF PROC PT 5 h 4 P* THE PROCEDURE GETS A RECORD FROM THE FREE LEV. 5 ~ & P* THE POINTER IS RETURNED IN <PT> 5 P PERF WAITF,CVAREXFL 5 P MOVE GTLEVN
0x1bf660…1bf7f4 (0, 567) Dummy {f00=0x00dd, f01=0x0190, f02=» CBIN0,CBIN0 5 P B TRGETF99 6 PTRGETF95 6 ( P CLEAR CVAREXFL 6 8 P CMP CBIN0,CBIN1 6 P PTRGETF99 6 h P RET 6 x P PEND 6 P 6 PTRPUT PROC PT 6 < P* THE PROC WRITES THE RECORD TO THE SPECIFIED RECORDNBR 6 P PERF WAITF,CTRFFLG 6
0x1bf7f4…1bf988 Dummy {f00=0x00dd, f01=0x0190, f02=» TRPUT99 6 PTRPUT95 7 P CLEAR CTRFFLG 7 P CMP CBIN0,CBIN1 7 6 PTRPUT99 7 N P RET 7 ^ P PEND 7 j P EJECT 7 x PTRREAD PROC PT 7 P* 7 * P* THE PROCEDURE READS THE TRANSRECORD 7 2 P* WITH THE SPECIFIED RECORDNBR AND UNPACKS IT 7
0x1bf988…1bfb1c Dummy {f00=0x00dd, f01=0x0190, f02=»PT 7 h P BNOK TRREA95 8 P PERF TRUNP 8 P CLEAR CTRFFLG 8 4 P CMP CBIN0,CBIN0 8 J P B TRREA99 8 b PTRREA95 8 t P CLEAR CTRFFLG 8 P CMP CBIN0,CBIN1 8 PTRREA99 8 P RET 8 P PEND 8 P EJECT 8 PTRRMV PROC 8 > P* THE PROCED
0x1bfb1c…1bfcb0 Dummy {f00=0x00dd, f01=0x0190, f02=» TO BE ABLE TO COPY 8 x < P* THE POINTER FROM THE REMOVED RECORD INTO THE PREVIOUS. 9 P MOVE GSWBIN3,GTDUPF(CBIN22) 9 , P CBE GSWBIN7,CBIN0,TRR10 FIRST IN CHAIN? 9 P SET GTSWFLAG 9 P MOVE GSWBIN8,GSWBIN7 9 P PERF TRREAD,GSWBIN8 9 P BNOK TR
0x1bfcb0…1bfe44 Dummy {f00=0x00dd, f01=0x0190, f02=»KEY,GTDUPF(CBIN22) 9 P PERF VARWRT : P BNOK TRR95 : . P B TRR90 : B PTRR90 : R P CMP CBIN0,CBIN0 : ` P B TRR99 : x PTRR95 : P CMP CBIN0,CBIN1 : PTRR99 : P RET : P PEND : P EJECT : PTRGET PROC OLD,PT : 0 P* THE PROC
0x1bfe44…1bffd8 Dummy {f00=0x00dd, f01=0x018e, f02=» GTSWFLAG : P CBE OLD,CBIN0,TRGET30 ; P PERF TRREAD,OLD ; 0 P BNOK TRGET95 ; H @ P MOVE GSWBIN8,GTDUPF(CBIN22) MOVE THE POINTER RECENTLY READ ; ^ P MOVE PT,GTDUPF(CBIN22) ; P PERF TRREAD,GSWBIN8 ; P BNOK TRGET95 ; 2 P PERF TRPUT,OLD UPDA
0x1bffd8…1c016c Dummy {f00=0x00dd, f01=0x0190, f02=» ; x P MOVE PT,GTTRKEY < P PERF TRREAD,GSWBIN8 < P BNOK TRGET95 < < P MOVE GTTRKEY,GTDUPF(CBIN22) < R P CBNE GTLEVNR,=D'10',TRGET80 < v 0 P SUB GTREGF(CBIN11),=D'1' AVAILABLE RECORDS < P MOVE GSWBCD6,GTREGF(CBIN11) < P MUL GSWBCD6,=D'20' <
0x1c016c…1c0300 Dummy {f00=0x00dd, f01=0x0190, f02=»OVE GSWSTR9,='DISKFEJL ' < P PERF SPERR = PTRGET80 = 4 P PERF VARWRT = D P BNOK TRGET95 = X PTRGET90 = n P CMP CBIN0,CBIN0 = ~ P B TRGET99 = PTRGET95 = P CMP CBIN0,CBIN1 = PTRGET99 = P RET = P PEND = P EJECT = P
0x1c0300…1c0494 (0, 568) Dummy {f00=0x00de, f01=0x0190, f02=» THE OLD INFO = p P TBT GTSWFLAG,TRU070 > 0 P PERF XCOP,GSWBIN1,=W'0',=W'2',CTRBUF,=W'36' > 2 P MOVE GTDUPF(CBIN20),GSWBIN1 > f P MOVE GSWBCD7,=D'1' > 0 P PERF XCOP,GSWBCD7,=W'2',=W'5',CTRBUF,=W'0' > & P MOVE GTDUPF(CBIN2),GSWBCD7 LEVNR > P MOV
0x1c0494…1c0628 Dummy {f00=0x00de, f01=0x0190, f02=»BIN1,=W'0',=W'2',CTRBUF,=W'18' > ( P MOVE GTDUPF(CBIN15),GSWBIN1 TEXTNR ? & P MOVE GSWBIN1,CBIN0 ? R 0 P PERF XCOP,GSWBIN1,=W'1',=W'1',CTRBUF,=W'20' ? n P MOVE GTDUPF(CBIN21),GSWBIN1 ? 0 P PERF XCOP,GSWBCD7,=W'0',=W'7',CTRBUF,=W'21' ? * P MOVE GTDUPF(C
0x1c0628…1c07bc Dummy {f00=0x00de, f01=0x0190, f02=»CD7 REGNSKABS]R ? x " P MOVE GSWBCD7,=D'1' REGKONTONR @ 0 P PERF XCOP,GSWBCD7,=W'2',=W'5',CTRBUF,=W'29' @ > P MOVE GTDUPF(CBIN1),GSWBCD7 @ r P MOVE GTDUPF(CBIN13),=D'0' @ P MOVE GTDUPF(CBIN14),=D'0' @ P MOVE GTDUPF(CBIN18),=D'0' @ P MOVE GTDUPF
0x1c07bc…1c0950 Dummy {f00=0x00de, f01=0x0190, f02=» @ p P MOVE GTTXTTKO,GSWBIN1 A : P IB GSWBIN1,TRU010,TRU020,TRU030,TRU040,TRU050,TRU060 A & " PTRU010 B TRU070 NO EXTRA INFO A d PTRU020 NR-1 A P MOVE GSWBCD7,=D'1' A 0 P PERF XCOP,GSWBCD7,=W'2',=W'5',CTRBUF,=W'8' A P MOVE GTDUPF(CBIN13),GSW
0x1c0950…1c0ae4 Dummy {f00=0x00de, f01=0x0190, f02=» MOVE GTDUPF(CBIN13),GSWBCD7 A 0 P PERF XCOP,GSWBCD7,=W'2',=W'5',CTRBUF,=W'13' B $ P MOVE GTDUPF(CBIN14),GSWBCD7 B X P B TRU070 B | PTRU040 DATO-1 B P MOVE GSWBCD7,=D'1' B 0 P PERF XCOP,GSWBCD7,=W'2',=W'5',CTRBUF,=W'8' B P MOVE GTDUPF(CBIN1
0x1c0ae4…1c0c78 Dummy {f00=0x00de, f01=0x0190, f02=»' B f P MOVE GTDUPF(CBIN18),GSWBCD7 C 0 P PERF XCOP,GSWBCD7,=W'2',=W'5',CTRBUF,=W'13' C . P MOVE GTDUPF(CBIN19),GSWBCD7 C b P B TRU070 C PTRU060 NR-1 DATO-1 C P MOVE GSWBCD7,=D'1' C 0 P PERF XCOP,GSWBCD7,=W'2',=W'5',CTRBUF,=W'8' C P MOV
0x1c0c78…1c0e0c Dummy {f00=0x00de, f01=0x0190, f02=»ERF XCOP,GSWBIN1,=W'0',=W'2',CTRBUF,=W'34' C 4 P MOVE GTDUPF(CBIN22),GSWBIN1 NEXT TRANS POINTER D 2 " P CLEAR CTRFFLG RELEASE BUFFER D j P RET D P PEND D P EJECT D PTRPACK PROC D : P* IF GTSWFLAG IS SET, ONLY THE POINTER WILL BE MOVED, D &
0x1c0e0c…1c0fa0 Dummy {f00=0x00de, f01=0x0190, f02=»OVE GSWBIN2,GTLEVNR D PTRP005 E 0 P PERF XCOP,CTRBUF,=W'36',=W'2',GSWBIN2,=W'0' E * & P MOVE GSWBCD7,GTDUPF(CBIN2) LEVNR E ^ 0 P PERF XCOP,CTRBUF,=W'0',=W'5',GSWBCD7,=W'2' E * P MOVE GSWBCD7,GTDUPF(CBIN7) VALORDATO E P MOVE GSWBCD6,GSWBCD7 E P
0x1c0fa0…1c1134 (0, 569) Dummy {f00=0x00de, f01=0x0190, f02=»'18',=W'2',GSWBIN2,=W'0' E | $ P MOVE GSWBIN2,GTTXTTKO TEXTKODE F 0 P PERF XCOP,CTRBUF,=W'20',=W'1',GSWBIN2,=W'1' F H * P MOVE GSWBCD7,GTDUPF(CBIN4) UDB. BELOB F | 0 P PERF XCOP,CTRBUF,=W'21',=W'7',GSWBCD7,=W'0' F , P MOVE GSWBCD7,GTDUPF(CBIN6) REGNSKABS]R F
0x1c1134…1c12c8 Dummy {f00=0x00de, f01=0x0190, f02=»SWBCD7,=W'2' F p P MOVE GSWBIN1,GTTXTTKO G : P IB GSWBIN1,TRP010,TRP020,TRP030,TRP040,TRP050,TRP060 G 2 P B TRP070 G p PTRP010 NO EXTRA INFO G P B TRP070 G PTRP020 NR-1 G P MOVE GSWBCD7,GTDUPF(CBIN13) G 6 PTRP025 PERF XCOP,CTRBUF,=W'8
0x1c12c8…1c145c Dummy {f00=0x00de, f01=0x0190, f02=»'5',GSWBCD7,=W'2' G v P MOVE GSWBCD7,GTDUPF(CBIN14) H 6 PTRP035 PERF XCOP,CTRBUF,=W'13',=W'5',GSWBCD7,=W'2' H > P B TRP070 H x PTRP040 DATO-1 H P MOVE GSWBCD7,GTDUPF(CBIN18) H P B TRP025 H PTRP050 H P MOVE GSWBCD7,GTDUPF(CBIN18) H 0
0x1c145c…1c15f0 Dummy {f00=0x00de, f01=0x0190, f02=»GTDUPF(CBIN13) H 0 P PERF XCOP,CTRBUF,=W'8',=W'5',GSWBCD7,=W'2' I P MOVE GSWBCD7,GTDUPF(CBIN18) I J P B TRP035 I n PTRP070 I ( P MOVE GSWBIN2,GTDUPF(CBIN22) POINTER I 0 P PERF XCOP,CTRBUF,=W'34',=W'2',GSWBIN2,=W'0' I P RET I P PEND I P
0x1c15f0…1c1784 Dummy {f00=0x00de, f01=0x018e, f02=»GSWSTR20,FSAMLEV LEV MISSING, INSERT IDENT I 4 P PERF XCOP,GTLEVNVN,=W'0',=W'10',GSWSTR20,=W'0' J 2 P MOVE GTLEVADR,CBLANKS J j P MOVE GTLEVBY,CBLANKS J P MOVE GTLEVPDI,CBLANKS J P MOVE GTLEVPNR,=D'0' J P RET J P PEND J P J PFSAMLE
0x1c1784…1c1918 Dummy {f00=0x00de, f01=0x0190, f02=» P FNL K P FCOPY GTLEVTXT K P FILLR ' ',1 K ( P FCOPY SPINPUT K < P FILLR ' ',1 K R . P FMEL 'ZZZVZZZVZZZVZZ9E,99-',GTDUPF(CBIN4) K f P FMEND K P K PFBDTSLUT FRMT K P FNL K ( P FBT CSWFLAG,FBDTSL10 GRAND TOTAL ? K P FNL K $ P
0x1c1918…1c1aac Dummy {f00=0x00de, f01=0x0190, f02=» K . P FMEL 'ZZZZZZZVZZ9,99-',GTBSUM3 PAGETOTAL L P FILLR ' ',14 L : P FCOPY ='TOTAL' L P P FTEXT ' IALT' L h P FMEL 'ZZ9',GSWBCD4 L ~ P FTEXT ' SIDE(R)' L PFBDTSL99 L P FNL L P FNL L P FMEND L P L P* L PFRMTNVN FRMT
0x1c1aac…1c1c40 Dummy {f00=0x00de, f01=0x018e, f02=»MEL 'ZZZZ',GTLEVPNR L P FILLR ' ',2 M P FCOPY GTLEVPDI M 0 P FMEND M H P* M V P* M ` PFKRE10 FRMT M j P FNL M ~ P FILLR ' ',47 M P FMEL 'ZZZ9999999',GTLEVNR M P FILLR ' ',10 M P FMEL 'ZZZZZZZ',GTLEVGI M P FNL M P FNL
0x1c1c40…1c1dd4 (0, 570) Dummy {f00=0x00de, f01=0x0190, f02=» M v P FTEXT 'AF FREMSENDT BEL' N P FILLR X'5C',1 N * P FTEXT 'B PR. ' N @ P FBT CBDTGIR,FKREL21 N X P FCOPY =C'CHECK' N t P FB FKREL22 N PFKREL21 N P FCOPY =C'GIRO ' N PFKREL22 N P FILLR ' ',2 N P FCOPY =C'DATO' N P FIL
0x1c1dd4…1c1f68 Dummy {f00=0x00de, f01=0x403e, f02=» FNL N P FMEND O P* O P* O $ END O .@ O : P FTEXT 'B PR. ' N @ P FBT CBDTGIR,FKREL21 N X P FCOPY =C'CHECK' N t P FB FKREL22 N PFKREL21 N P FCOPY =C'GIRO ' N PFKREL22 N P FILLR ' ',2 N P FCOPY =C'DATO' N P FIL
0x1c1f68…1c20fc Dummy {f00=0x00de, f01=0x2008, f02=» P PERF VARWRT BNOK TRGET95 B TRGET90 4 TRGET90 F CLEAR CTRFFLG V CMP CBIN0,CBIN0 l B TRGET99 TRGET95 CLEAR CTRFFLG CMP CBIN0,CBIN1 RET PEND EJECT TRUNP PROC
0x1c20fc…1c2290 Dummy {f00=0x00de, f01=0x0190, f02=» ( 8 H X h x l - ` >
0x1c2290…1c2424 Dummy {f00=0x00de, f01=0x0190, f02=» J 0 R 4 4 * 4 : 0 R J 0 R 0 R n 0 R l O J F " D LH-* LW R R R L L" L L A 1XF `
0x1c2424…1c25b8 Dummy {f00=0x00de, f01=0x0190, f02=»RI %C P @ A 1XF R6 _ A I tW u * I , t R K X B M0 R S0 d V & v q0 w0 J F " D @L W , u} R L " L&0R T R P _=! LTW ! L! +
0x1c25b8…1c274c Dummy {f00=0x00de, f01=0x018e, f02=»A L P l G . ` > J F " D RA @ ?R @ @ DW H H A _ W C T C T C P @ A 1XF R6 _ A @ N X 0 @ ' X )0 @ /0 J F " D I tW u *
0x1c274c…1c28e0 Dummy {f00=0x00de, f01=0x0190, f02=» o r0 u K * z r < ( L J F " D @ _< L LA L( @ DI A R R R L L 0X R t 0 0 v p
0x1c28e0…1c2a74 (0, 571) Opaque[0x194]
0x1c2a74…1c2c08 # DirEnt {nam=»KM539 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1bd8, f03=0x0000}
0x1c2a74…1c2c08 IdxSect {
0x1c2a74…1c2c08 f00 = 0x00de // 0x1c2a74 @0x0
0x1c2a74…1c2c08 f01 = 0x0004 // 0x1c2a76 @0x2
0x1c2a74…1c2c08 gno = [ // 0x1c2a78 @0x4
0x1c2a74…1c2c08 [0x00]: C0x00de.0x3.0
0x1c2a74…1c2c08 [0x01]: C0x00df.0x0.0
0x1c2a74…1c2c08 ]
0x1c2a74…1c2c08 }
0x1c2c08…1c2d9c Dummy {f00=0x00de, f01=0x0190, f02=» PRT KM539 PRT C539 MES TINGLEV KOMMUNE & MES INCL REMITTERING B MES INCL BUDGET ^ SCR v LED KMD08 !!CH $$'26'$$'22'$$ P!!CH $$(26)$$(22)$$ !!CH $$-4$$4$$ TRANS 40 , '!!RE 41,$$56$$100$$SCREEN SI
0x1c2d9c…1c2f30 Dummy {f00=0x00de, f01=0x0190, f02=» f 4 PMF1GTP STRG 32X'C8C94A4B4C4D4E4F' DV ADR GTP/LP " PMF1CU STRG X'E7C7' CU ADDRESS @ . PCNFHC STRGI (16),'GA','LA','LA','LA','LA' f P!!DL 235,236 4 PFROMKX STRGI (12),'TD','TE','TF','TG','TH',' ' & P!!RE 240,$$FALSE$$TRUE$$ CBKOFLAG
0x1c2f30…1c30c4 Dummy {f00=0x00de, f01=0x0190, f02=»,$$FALSE$$TRUE$$ DC $ P!!RE 251,$$FALSE$$TRUE$$ 5M DISK & P!!RE 252,$$TRUE$$FALSE$$ CKASFLAG D $ P!!RE 253,$$TRUE$$TRUE$$ CSLDFLG n & P!!RE 279,$$FALSE$$TRUE$$ CREMITFLG P!!RE 287,$$FALSE$$TRUE$$ ( P!!RE 288,$$FALSE$$TRUE$$ CREMITFLAG
0x1c30c4…1c3258 Dummy {f00=0x00de, f01=0x0190, f02=»68',X'0000',X'0064',X'0000', C j 6 P X'0064',X'0000',X'0064',X'0000',X'0064',X'0000' ( & P!!RE 361,$$FALSE$$TRUE$$ BUDGET$$ b ( P!!RE 416,$$01014610$$%VER%REL%MOD$$ , P!!RE 476,$$FALSE$$TRUE$$ GENERATE LEVNR ( P!!RE 477,$$FALSE$$TRUE$$ TINGLEV
0x1c3258…1c33ec Dummy {f00=0x00de, f01=0x018e, f02=»!!RE 492,$$OD-KOM$$TINGL.$$ " P!!RE 494,$$20$$200$$ INDEXFILE $ P!!RE 495,$$5$$1$$ CKTTOP J P!!DL 496,497 j 6 PFROMTX STRGI (12),' ','KA','KB','KC','KD','KE' ' ~ P!!DL 817,1091 RK P!!DL 1103,1105 RK P!!DL 1107 RK P!!DL 1153,
0x1c33ec…1c3580 Dummy {f00=0x00de, f01=0x0190, f02=» PTRA /S,NL PINC DIV539 PNOD R , PLED SCREEN : P!!CH $$KEY461$$KEY539$$ L P!!CH $$SL461$$SLCOP$$ l P!!EN PTRA /S,NL PINC RGSUB4 PINC RGSTRT PNOD D PINC RGMAIN PINC RGSUBS PINC RGSUB1
0x1c3580…1c3714 (0, 572) Dummy {f00=0x00df, f01=0x0190, f02=» PINC REMSUB PNOD R PINC ADM5 ( PINC SUBAPL 8 PINC REMPRT J PNOD R PINC KMDIO j PINC DKSUBS | PINC REMTXT PINC RAADUM PNOD R PINC RGFRMT PINC REMFMT PNOD D PINC REMLEV PINC
0x1c3714…1c38a8 Dummy {f00=0x00df, f01=0x0190, f02=» PTRA /S,NL PNOD D PINC BUDGET $ PTLK U,4K 6 PASM PRTX,NL F PLED VDUPRX Z P!!DL 70 l $ PRBUFNR EQU 1 SINGLE BUFFERING | P!!DL 72 & PTBUFNR EQU 1 SINGLE BUFFERING P!!EN PASM /S,NL PASM STARTX,N
0x1c38a8…1c3a3c Dummy {f00=0x00df, f01=0x0014, f02=»39 d $ASG2 PNOD D PINC BUDGET $ PTLK U,4K 6 PASM PRTX,NL F PLED VDUPRX Z P!!DL 70 l $ PRBUFNR EQU 1 SINGLE BUFFERING | P!!DL 72 & PTBUFNR EQU 1 SINGLE BUFFERING P!!EN PASM /S,NL PASM STARTX,N
0x1c3a3c…1c3bd0 Dummy {f00=0x00df, f01=0x2008, f02=» $ASG2 PNOD D PINC BUDGET $ PTLK U,4K 6 PASM PRTX,NL F PLED VDUPRX Z P!!DL 70 l $ PRBUFNR EQU 1 SINGLE BUFFERING | P!!DL 72 & PTBUFNR EQU 1 SINGLE BUFFERING P!!EN PASM /S,NL PASM STARTX,N
0x1c3bd0…1c3d64 Dummy {f00=0x00df, f01=0x0190, f02=»K90 P* PBCHK40 P ADD GTBSUM1,GTDUPF(CBIN4) $ P PERF TXTEDIT,CBIN1,CBIN3 F P B BCHK60 h P* z PBCHK50 0 P CBE GSWBCD5,=D'1',BCHK90 NOTHING TO PRINT ? PBCHK60 P EDIT SPINPUT,FREMTOT1 P PERF FMOD,CBIN1,SPINP
0x1c3d64…1c3ef8 Dummy {f00=0x00df, f01=0x0190, f02=»,CBIN16,GSWSTR20 'CHECKBELOB' P PERF FSOLVE & PBCHK65 : P MOVE GTBSUM1,=D'0' H P PERF GENWRS,GTHCDEV,EDITBUF d P PERF NEWLIN,CBIN7 P TBF GTCHKPR,BCHK70 ( P PERF NEWLIN,CBIN1 EXTRA LINEFEED ? P CLEAR GTCHKPR P B BCHK9
0x1c3ef8…1c408c Dummy {f00=0x00df, f01=0x0190, f02=» P PEND P EJECT PBGIRPR PROC P P* BGIRPR10 - ADJUST PRINTER 6 P* BGIRPR20 - LEV 1 + TRANS 1 Z P* BGIR30 - TRANS 2 ~ P* BGIR40 TRANS 3 P* BGIR50 - LEV 2 + TRANS 1 P* BGIR60 - TRANS 2 P* BGIR70 - TRANS 3 + WRITE
0x1c408c…1c4220 Dummy {f00=0x00df, f01=0x0190, f02=»IR50,BGIR60,BGIR70,BGIR80 P B BGIR90 " P* 4 PBGIR10 > * P PERF FMREMP,CBIN2 GET FORMAT FBDTGIR L P MOVE SPINPUT,='X' z P MOVE GSWBIN5,CBIN1 PBGIR15 P PERF FMOD,GSWBIN5,SPINPUT P ADD GSWBIN5,CBIN1 P CBG GSWBIN5,=
0x1c4220…1c43b4 (0, 573) Opaque[0x194]
0x1c43b4…1c4548 # DirEnt {nam=»C539 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1be8, f03=0x0000}
0x1c43b4…1c4548 IdxSect {
0x1c43b4…1c4548 f00 = 0x00df // 0x1c43b4 @0x0
0x1c43b4…1c4548 f01 = 0x0002 // 0x1c43b6 @0x2
0x1c43b4…1c4548 gno = [ // 0x1c43b8 @0x4
0x1c43b4…1c4548 [0x00]: C0x00df.0x1.0
0x1c43b4…1c4548 ]
0x1c43b4…1c4548 }
0x1c4548…1c46dc Dummy {f00=0x00df, f01=0x018e, f02=» PT; P01; PTID=TC; PTCL=TC; * PLEV=60; : P02; J PTDC=T03; V PLC=01L; f PTDC=T07; v PLC=01L; P01; PSCL=S04; PT; P01; PTID=TD; PTCL=TC; PLEV=60; P02; PTDC=
0x1c46dc…1c4870 Dummy {f00=0x00df, f01=0x0190, f02=» P01; PTDC=T02; PLC=03L; $ P01; 4 PSCL=S05; @ PT; P P05; Z PTID=KA; f PTCL=KA; v PLEV=60; P01; PTDC=T04; PLC=02L; P03; PSCL=S02; PSCL=S03; PSCL=S04; PT; P
0x1c4870…1c4a04 Dummy {f00=0x00df, f01=0x0174, f02=»S03; PSCL=S04; PT; P01; & PTID=LA; 2 PTCL=LA; B PLEV=60; R P00; b P04; n PSCL=S02; z PSCL=S03; PSCL=S04; PSCL=S05; PT; P01; PTID=D0; PTCL=D0; PLEV=60; P00;
0x1c4a04…1c4b98 Dummy {f00=0x00df, f01=0x2008, f02=» PSCL=S04; PT; P01; & PTID=LA; 2 PTCL=LA; B PLEV=60; R P00; b P04; n PSCL=S02; z PSCL=S03; PSCL=S04; PSCL=S05; PT; P01; PTID=D0; PTCL=D0; PLEV=60; P00;
0x1c4b98…1c4d2c Dummy {f00=0x00df, f01=0x2008, f02=» MCB4 @(!DUMTB2 ( EDITBUF I( ENDREC `( FDBUSY 1( FFORSK f( FIELD y(2FLONOPL g( FORMUE C( FORSKUD 7( FRAAK e( FROMKX ($FROMRX I($FROMTX _($FULL ( GSSWITCH !GSWBCD1 ( GSWBCD2 ( GSWBCD3 GSWBCD4 GSWBCD5 GSWBCD
0x1c4d2c…1c4ec0 Dummy {f00=0x00df, f01=0x402a, f02=» =T P @ &136940420 T:UPDFK < T:UPDFK N T:GRFCN b T:LOFSC t I:EVA0 , ( @ 2! Y " T:LOPS I:MOV , ( A
0x1c4ec0…1c5054 (0, 574) Opaque[0x194]
0x1c5054…1c51e8 # DirEnt {nam=»KM569 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1bf0, f03=0x0000}
0x1c5054…1c51e8 IdxSect {
0x1c5054…1c51e8 f00 = 0x00df // 0x1c5054 @0x0
0x1c5054…1c51e8 f01 = 0x0004 // 0x1c5056 @0x2
0x1c5054…1c51e8 gno = [ // 0x1c5058 @0x4
0x1c5054…1c51e8 [0x00]: C0x00df.0x2.0
0x1c5054…1c51e8 [0x01]: C0x00df.0x3.0
0x1c5054…1c51e8 ]
0x1c5054…1c51e8 }
0x1c51e8…1c537c Dummy {f00=0x00df, f01=0x0190, f02=» PPRT KM569 PPRT C569 PMES HOLSTED KOMMUNE & PMES STRAKS REMITTERING B PSCR ` PLED KMD08 l P!!CH $$26$$22$$ ~ P!!CH $$DCTASK$$DCTSK$$ P!!DL 59 DSHCLP P!!DL 60,61 FD03,FD04 P!!DL 66,89 TERM KA P!!DL 90,
0x1c537c…1c5510 Dummy {f00=0x00df, f01=0x0190, f02=»$$TRUE$$ CBKOFLG $ P!!RE 199,$$FALSE$$TRUE$$ CKTFLAG $ P!!RE 205,$$TRUE$$FALSE$$ CKTAUTO @ $ P!!RE 210,$$TRUE$$FALSE$$ CKASFLG h & P!!RE 237,$$FALSE$$TRUE$$ CREMITFL & P!!RE 246,$$FALSE$$TRUE$$ CTEXTFLG & P!!RE 247,$$FALSE$$TRUE$$ CSTRKFLG
0x1c5510…1c56a4 Dummy {f00=0x00df, f01=0x0190, f02=» h P!!RE 378,$$732$$2$$ EDITBUF P!!RE 379,$$40$$2$$ CTRBUF , P!!RE 400,$$28$$-28$$ N P!!RE 401,$$29$$-29$$ j P!!RE 446,$$128$$80$$ CRECLGD P!!RE 448,$$OD-KOM$$HOLST.$$ " P!!RE 450,$$20$$20$$ INDEX FILE P!!RE 451,$$5$$1$$ CK
0x1c56a4…1c5838 Dummy {f00=0x00df, f01=0x0190, f02=»0 P!!DL 808,827 KBVGO P!!DL 828,843 GTPGO $ P!!DL 844,855 LPGO > P!!DL 856,868 DC1GO X P!!DL 876,879 IN OFFLINE r P!!DL 912,917 IN REENTER P!!EN PNOD C PTRA /S,NL PINC DIV461 PNOD R PLED SCREEN
0x1c5838…1c59cc Dummy {f00=0x00df, f01=0x0190, f02=» PNOD R PINC RGMAIN PINC RGSUBS $ PINC RGSUB1 6 PINC RGSUB2 H PINC RGSUB3 Z PNOD R l PINC RGKLAR z PINC KTPLN PINC KTOPR PNOD R PINC RGADM PNOD R PINC SUBAPL PINC REMPRD PINC RE
0x1c59cc…1c5b60 Dummy {f00=0x00df, f01=0x00f4, f02=» PINC REMLEV PINC ADM6D PINC ADM5D , PINC REMTRD > PINC REMBDS P PTLK U,4K b P$INCGEN r LKE M PKPF /L,RGLOAD PSCR 4 PMES $PDISC M=M:92F3,MU=M:POOL92,A=RGLOAD,C=C569 P$ASG2 REMPRD PINC RE
0x1c5b60…1c5cf4 (0, 575) Dummy {f00=0x00df, f01=0x2008, f02=»
0x1c5cf4…1c5e88 Dummy {f00=0x00df, f01=0x0084, f02=» @ ` h p 8 @ 0 X h p!0!8!h!p!x P! ! ! ! " X P"8"@"H"0"X" ! %h"p% % " " "h# # # $ $P$h% % h$ % % % & &
0x1c5e88…1c601c Dummy {f00=0x00df, f01=0x4120, f02=» J F IDENT TCLASS REL 9.2 79-11-16 870105040920 TCLASSK R TCLASSK d DVKB00 x DVTP00 DVDY00 , ( $ 0 1 2 P @
0x1c601c…1c61b0 Dummy {f00=0x00df, f01=0xc0b0, f02=» J F IDENT SCLASS REL 9.2 79-11-16 870105040920 SCLASSK R SCLASSK d x @ ATA TCLASE-* PTCLASE EQU * P END @
0x1c61b0…1c6344 Dummy {f00=0x00df, f01=0x0190, f02=» J F IDENT MONTAB REL 9.2 79-11-16 870105040920 F B MONTABK SPDLCI FREQUE PAGQUE INTLT1 INTLT2 INTLT3L INTLT4 R & " INTRT1 INTRT2 INTRT3 INTRT4 MONTABK FREQUE PAGQUE INT
0x1c6344…1c64d8 Dummy {f00=0x00df, f01=0x40da, f02=» INTRT4 SYSLOD ITADN $ KBADN 4 * & D TPADN r DYADN SPDLCI " @ FREQUE PAGQUE INT
0x1c64d8…1c666c Dummy {f00=0x00df, f01=0x0190, f02=» J F IDENT SYSTAB REL 9.2 80-11-20 870105040920 F B SCTMSZK SCTSFA SCTEFA SCTPLD SCTANO SCTADA SCTPAGL SCTSEG R F B SCTSWB SCTNOS SCTNOP SCTPSZ SCTMMC SCTLACL SCTMMP SCTLAP F B SCTNPE SCTSTB SCTOPT SCTTCT
0x1c666c…1c6800 Dummy {f00=0x00df, f01=0x0190, f02=»:PA PAG:SB SWB:NC SWB:DS SWB:ELS SWB:NS0 z T:ACSB 4 SEG:ST F SEG:DSL Z SEG:EL n SEG:PBI PAG:QF PAG:QBV PAG:PA PAG:SB SWB:NC SWB:DS
0x1c6800…1c6994 (0, 576) Opaque[0x194]
0x1c6994…1c6b28 # DirEnt {nam=»C569 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1c00, f03=0x0000}
0x1c6994…1c6b28 IdxSect {
0x1c6994…1c6b28 f00 = 0x00e0 // 0x1c6994 @0x0
0x1c6994…1c6b28 f01 = 0x0002 // 0x1c6996 @0x2
0x1c6994…1c6b28 gno = [ // 0x1c6998 @0x4
0x1c6994…1c6b28 [0x00]: C0x00e0.0x0.0
0x1c6994…1c6b28 ]
0x1c6994…1c6b28 }
0x1c6b28…1c6cbc Dummy {f00=0x00e0, f01=0x011e, f02=» T; P01; TID=TC; TCL=TC; * LEV=60; : P03; J PTDC=T01; V PLC=01L; f PTDC=T03; v PLC=01L; PTDC=T02; PLC=02L; P00; PC; P00; P01; PSCL=S01; U; 001;
0x1c6cbc…1c6e50 Dummy {f00=0x00e0, f01=0x2008, f02=» P01; TID=TC; TCL=TC; * LEV=60; : P03; J PTDC=T01; V PLC=01L; f PTDC=T03; v PLC=01L; PTDC=T02; PLC=02L; P00; PC; P00; P01; PSCL=S01; U; 001;
0x1c6e50…1c6fe4 Dummy {f00=0x00e0, f01=0x0190, f02=» RL t XLH T C _ G " M0 2 O L D S T U N d V t ` } c , e0 n ( J F " D @" R RH" XL R R RL@$@*@ 4 R| R Lat
0x1c6fe4…1c7178 Dummy {f00=0x00e0, f01=0x0190, f02=» % 0 0 0 0 @ J F " D WL @) aaFaaF a F Lba 4 A)!WL @)aaF X aaF4 t XL |L R |L R " $ $
0x1c7178…1c730c Dummy {f00=0x00e0, f01=0x0190, f02=» 4 " . $ @ P b t 0 J F " D 8R RL RL RL RLH, RLH- RLH RL R6 |* _ RL RL L R 0 8
0x1c730c…1c74a0 Dummy {f00=0x00e0, f01=0x0190, f02=» * 6 8 * :0 0 J F " D L 1LT |L R |L R1 _Q R1 _TJ <W RL RLA R T6 u u L R La uT B B0 L F SLUTD| T , V0 L $ ] b H
0x1c74a0…1c7634 (0, 577) Opaque[0x194]
0x1c7634…1c77c8 # DirEnt {nam=»CTAB02«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c08, f03=0x0000}
0x1c7634…1c77c8 IdxSect {
0x1c7634…1c77c8 f00 = 0x00e0 // 0x1c7634 @0x0
0x1c7634…1c77c8 f01 = 0x0002 // 0x1c7636 @0x2
0x1c7634…1c77c8 gno = [ // 0x1c7638 @0x4
0x1c7634…1c77c8 [0x00]: C0x00e0.0x1.0
0x1c7634…1c77c8 ]
0x1c7634…1c77c8 }
0x1c77c8…1c795c Dummy {f00=0x00e0, f01=0x0190, f02=» & P IDENT CTAB02 80.04.22 NJ SPKTAB1 P ENTRY CTAB02 . 0 PCTAB02 DATA FUNC,FUNC,UNSC,SHIFT,UNSC,SHIFT D FUNC EQU * x : P DATA /7F83,/878B,/8A88,/8184,/8289,/8586,/927F,/7F90 : P DATA /3031,/3233,/3435,/3637,/3839,/3A7F,/A37F,/91A2 : P D
0x1c795c…1c7af0 Dummy {f00=0x00e0, f01=0x0190, f02=» : 5 DATA /3031,/3233,/3435,/3637,/3839,/ACA9,/ADA7,/A8A6 : 5 DATA /6041,/4243,/4445,/4647,/4849,/4A4B,/4C4D,/4E4F B : 5 DATA /5051,/5253,/5455,/5657,/5859,/5A5B,/5C5D,/7F7F PSHIFT EQU * : P DATA /207F,/7F7F,/7F7F,/7F2A,/7F7F,/7F3F,/3B5F,/3A7F
0x1c7af0…1c7c84 Dummy {f00=0x00e0, f01=0x404a, f02=»A /5051,/5253,/5455,/5657,/5859,/5A5B,/5C5D,/7F7F END :@ F041,/4243,/4445,/4647,/4849,/4A4B,/4C4D,/4E4F B : 5 DATA /5051,/5253,/5455,/5657,/5859,/5A5B,/5C5D,/7F7F PSHIFT EQU * : P DATA /207F,/7F7F,/7F7F,/7F2A,/7F7F,/7F3F,/3B5F,/3A7F
0x1c7c84…1c7e18 Dummy {f00=0x00e0, f01=0x2008, f02=» U/* 8 4 DATA 207F,/7F7F,/7F7F,/7F2A,/7F7F,/7F3F,/3B5F,/3A7F 8 4 DATA 3D21,/2223,/2425,/262F,/2829,/ACA9,/ADA7,/A8AB P : 5 DATA /4041,/4142,/4344,/4445,/4647,/4849,/4A4B,/4C4D @ ; DATA /4E4F,/5051,/5253,/5455,/5657,/5859,/5A5B,/5C5D,/7F7F
0x1c7e18…1c7fac Dummy {f00=0x00e0, f01=0x0190, f02=» ( {F " A{Q 2 {r {R { 2 A{P { {P( P V I @{r % {L( {F & # T : Y _ |> &P C </ ~ |> </ ~ C : "R V I
0x1c7fac…1c8140 Dummy {f00=0x00e0, f01=0x0190, f02=» V G 9h ' W ~ W J ' ( } ( $ ~ P C C ~ / W / W C C W0 P C W $0 P C @ J} C WT781"&$ 39#$;< J} C
0x1c8140…1c82d4 (0, 578) Opaque[0x194]
0x1c82d4…1c8468 # DirEnt {nam=»CTAB04«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c10, f03=0x0000}
0x1c82d4…1c8468 IdxSect {
0x1c82d4…1c8468 f00 = 0x00e0 // 0x1c82d4 @0x0
0x1c82d4…1c8468 f01 = 0x0002 // 0x1c82d6 @0x2
0x1c82d4…1c8468 gno = [ // 0x1c82d8 @0x4
0x1c82d4…1c8468 [0x00]: C0x00e0.0x2.0
0x1c82d4…1c8468 ]
0x1c82d4…1c8468 }
0x1c8468…1c85fc Dummy {f00=0x00e0, f01=0x0190, f02=» . P IDENT CTAB04 80.04.22 NJ 3270-SIMULATION P ENTRY CTAB04 6 2 PCTAB04 DATA FUNC,FUNCSH,UNSC,SHIFT,UNSC,SHIFT L FUNC EQU * : 5 DATA /7F80,/A78C,/A6A8,/A97F,/7F7F,/AC85,/AAAD,/AFA5 : P DATA /3031,/3233,/3435,/3637,/3839,/BA2A,/AB7F,/B2B3
0x1c85fc…1c8790 Dummy {f00=0x00e0, f01=0x018e, f02=»D,/AFA5 b : P DATA /3031,/3233,/3435,/3637,/3839,/BA2A,/AB7F,/B2B4 : 5 DATA /7F7F,/B4B0,/B17F,/8BAE,/7F7F,/7F7F,/7F7F,/7F7F N UNSC EQU * : 5 DATA /207F,/7F7F,/7F7F,/7F27,/7F7F,/7F2B,/2C2D,/2E7F : 5 DATA /3031,/3233,/3435,/3637,/3839,/ACA9,/A
0x1c8790…1c8924 Dummy {f00=0x00e0, f01=0x4124, f02=» X PSHIFT EQU * : P DATA /207F,/7F7F,/7F7F,/7F2A,/7F7F,/7F3F,/3B5F,/3A7F : P DATA /3D21,/2223,/2425,/262F,/2829,/ACA9,/ADA7,/A8A6 Z : P DATA /4041,/4243,/4445,/4647,/4849,/4A4B,/4C4D,/4E4F : P DATA /5051,/5253,/5455,/5657,/5859,/5A5B,/5C5D,/7
0x1c8924…1c8ab8 Dummy {f00=0x00e0, f01=0x2008, f02=» U/* 8 4 DATA 207F,/7F7F,/7F7F,/7F2A,/7F7F,/7F3F,/3B5F,/3A7F 8 4 DATA 3D21,/2223,/2425,/262F,/2829,/ACA9,/ADA7,/A8AB P : 5 DATA /4041,/4142,/4344,/4445,/4647,/4849,/4A4B,/4C4D @ ; DATA /4E4F,/5051,/5253,/5455,/5657,/5859,/5A5B,/5C5D,/7F7F
0x1c8ab8…1c8c4c Dummy {f00=0x00e0, f01=0x0190, f02=» ^ _0 R W ( V W Q P W ! W V P , V W Q P W $ W V P T V W Z :$0#0;b P P PN P 0 - P: V W Z _ 4 V W Q P ) P 9_ &" ! 9 : & P Q N ,^ ,
0x1c8c4c…1c8de0 Dummy {f00=0x00e0, f01=0x0190, f02=»R + : V W R 4 0R Y 7 Y& P Z,;D 9_8 8 _< V W YL T 9 : &9d! + P & T 9d! T 7 V Y P _$ SZ Q V P V Q W Q 7 Y P._6 & Q 9d! )0 + P 7 Y Z $ _ :
0x1c8de0…1c8f74 (0, 579) Opaque[0x194]
0x1c8f74…1c9108 # DirEnt {nam=»CTAB03«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c18, f03=0x0000}
0x1c8f74…1c9108 IdxSect {
0x1c8f74…1c9108 f00 = 0x00e0 // 0x1c8f74 @0x0
0x1c8f74…1c9108 f01 = 0x0002 // 0x1c8f76 @0x2
0x1c8f74…1c9108 gno = [ // 0x1c8f78 @0x4
0x1c8f74…1c9108 [0x00]: C0x00e0.0x3.0
0x1c8f74…1c9108 ]
0x1c8f74…1c9108 }
0x1c9108…1c929c Dummy {f00=0x00e0, f01=0x0190, f02=» & P IDENT CTAB03 80.04.22 NJ SPKTAB1 P ENTRY CTAB03 . 0 PCTAB03 DATA FUNC,FUNC,UNSC,SHIFT,UNSC,SHIFT D FUNC EQU * x : P DATA /7F83,/878B,/8A88,/8184,/8289,/8586,/927F,/7F90 : P DATA /3031,/3233,/3435,/3637,/3839,/3A7F,/A37F,/91A2 : P D
0x1c929c…1c9430 Dummy {f00=0x00e0, f01=0x0190, f02=» : 5 DATA /3031,/3233,/3435,/3637,/3839,/ACA9,/ADA7,/A8A6 : 5 DATA /6041,/4243,/4445,/4647,/4849,/4A4B,/4C4D,/4E4F B : 5 DATA /5051,/5253,/5455,/5657,/5859,/5A5B,/5C5D,/7F7F PSHIFT EQU * : P DATA /207F,/7F7F,/7F7F,/7F2A,/7F7F,/7F3F,/3B5F,/3A7F
0x1c9430…1c95c4 Dummy {f00=0x00e0, f01=0x404a, f02=»A /5051,/5253,/5455,/5657,/5859,/5A5B,/5C5D,/7F7F END :@ F041,/4243,/4445,/4647,/4849,/4A4B,/4C4D,/4E4F B : 5 DATA /5051,/5253,/5455,/5657,/5859,/5A5B,/5C5D,/7F7F PSHIFT EQU * : P DATA /207F,/7F7F,/7F7F,/7F2A,/7F7F,/7F3F,/3B5F,/3A7F
0x1c95c4…1c9758 Dummy {f00=0x00e0, f01=0x2008, f02=» U/* 8 4 DATA 207F,/7F7F,/7F7F,/7F2A,/7F7F,/7F3F,/3B5F,/3A7F 8 4 DATA 3D21,/2223,/2425,/262F,/2829,/ACA9,/ADA7,/A8AB P : 5 DATA /4041,/4142,/4344,/4445,/4647,/4849,/4A4B,/4C4D @ ; DATA /4E4F,/5051,/5253,/5455,/5657,/5859,/5A5B,/5C5D,/7F7F
0x1c9758…1c98ec Dummy {f00=0x00e0, f01=0x0190, f02=» & X RB 8 R<P X 8 P X _ Q ?! V X 9T I Y @ ( R. * V *( p Y _2( @ @ N R W Q A : :a;a V S A _ :A ) a : A @ @ ( :_ W
0x1c98ec…1c9a80 Dummy {f00=0x00e0, f01=0x0190, f02=»R ( -_ : d 8# R _ ZY QY : A $ @ A A $Z : @ R W : P _ : ` > ( ( L ` > 0 0 X T P _ P _. ` > (9A @ A A N @ ( | V P Z 0>BX $ =_ @ (
0x1c9a80…1c9c14 (0, 580) Opaque[0x194]
0x1c9c14…1c9da8 # DirEnt {nam=»T539 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1c20, f03=0x0000}
0x1c9c14…1c9da8 IdxSect {
0x1c9c14…1c9da8 f00 = 0x00e1 // 0x1c9c14 @0x0
0x1c9c14…1c9da8 f01 = 0x0002 // 0x1c9c16 @0x2
0x1c9c14…1c9da8 gno = [ // 0x1c9c18 @0x4
0x1c9c14…1c9da8 [0x00]: C0x00e1.0x0.0
0x1c9c14…1c9da8 ]
0x1c9c14…1c9da8 }
0x1c9da8…1c9f3c Dummy {f00=0x00e1, f01=0x00ae, f02=» T; 01; TID=TU; TCL=TU; * LEV=60; : 02; J TDC=T03; V LC=03L; f TDC=T04; v LC=02L; 01; SCL=S01;
0x1c9f3c…1ca0d0 Dummy {f00=0x00e1, f01=0x2008, f02=» 01; TID=TU; TCL=TU; * LEV=60; : 02; J TDC=T03; V LC=03L; f TDC=T04; v LC=02L; 01; SCL=S01;
0x1ca0d0…1ca264 Dummy {f00=0x00e1, f01=0x0190, f02=» P LDR A3,A5 GET TTAB ADDRESS , P SLL A1,3 ADJUST FOR INDEXING IN SEGTAB , $ P AD A1,SCTSEG ADD SEGTAB ADDRESS & P ADK A2,2 UPDATE DISPATCH ADDRESS P* P IFT DSKPAG=0 $ P SUKL A15,4 ADJUST STACKPOINTER . P ST A2,4,A15 SET D
0x1ca264…1ca3f8 Dummy {f00=0x00e1, f01=0x0190, f02=»,TTB:SB,A3 RESET SEGMENT BLOCK ADDRESS 6 P LD A1,SEG:DS,A1 GET LOGICAL ADDRESS OF SEGMENT 0 . P* h P IFT DSKPAG=1 r $ P SUKL A15,4 ADJUST STACKPOINTER . P ST A2,4,A15 SET DISPATCH ADDRESS ON STACK P XIF P* P RF TLDS40
0x1ca3f8…1ca58c Dummy {f00=0x00e1, f01=0x0190, f02=»ADDRESS j " P LDR* A4,A1 GET SEGMENT STATUS * P RF(N) TLDS10 SEGMENT LOADED IN CORE? 6 P ST A2,TTB:SA,A3 d P CM PRUN | P* P* ACTIVATE LOAD TASK P* 6 P CF A15,QLTDSK ACTIVATE LOAD TASK AT ENTRY LT:DSK P ABL TDISP GO TO D
0x1ca58c…1ca720 Dummy {f00=0x00e1, f01=0x0190, f02=»4 ADJUST STACKPOINTER . P ST A2,4,A15 SET DISPATCH ADDRESS ON STACK P* P ( P* REMOVE PAGE BLOCK FROM PAGE QUEUE Z P* P XIF P* & PTLDS15 EQU * ENTRY USED BY LDTASK P IFT DSKPAG=1 & P LDR* A2,A1 GET QUEUE LINK FORWARD
0x1ca720…1ca8b4 (0, 581) Opaque[0x194]
0x1ca8b4…1caa48 # DirEnt {nam=»KM539D«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1c28, f03=0x0000}
0x1ca8b4…1caa48 IdxSect {
0x1ca8b4…1caa48 f00 = 0x00e1 // 0x1ca8b4 @0x0
0x1ca8b4…1caa48 f01 = 0x0004 // 0x1ca8b6 @0x2
0x1ca8b4…1caa48 gno = [ // 0x1ca8b8 @0x4
0x1ca8b4…1caa48 [0x00]: C0x00e1.0x1.0
0x1ca8b4…1caa48 [0x01]: C0x00e1.0x2.0
0x1ca8b4…1caa48 ]
0x1ca8b4…1caa48 }
0x1caa48…1cabdc Dummy {f00=0x00e1, f01=0x0190, f02=» PPRT KM539D PPRT D539 $ PMES TINGLEV KOMMUNE, REMITTERING & PSCR N PASG 2,NO Z PLED KMD08,/S j P!!CH $$26$$22$$ ~ P!!DL 67,68 FD03,FD04 P!!DL 189 0 PMF2KBV STRG 32X'C1C2C3C4C5C6C750' DV ADDRESS P!!DL 193 " PMF
0x1cabdc…1cad70 Dummy {f00=0x00e1, f01=0x0190, f02=»I (12)2C'TD','TE',' ' $ P!!RE 207,$$FALSE$$TRUE$$ CBKOFLG $ P!!RE 208,$$FALSE$$TRUE$$ CKTFLAG F & P!!RE 209,$$FALSE$$FALSE$$ CCLKTFLG n & P!!RE 210,$$FALSE$$FALSE$$ CTESTFLG & P!!RE 211,$$FALSE$$FALSE$$ CTRVALG $ P!!RE 212,$$FALSE$$FALSE$$ CF
0x1cad70…1caf04 Dummy {f00=0x00e1, f01=0x0190, f02=» 216,$$FALSE$$FALSE$$ CCYWRTF & P!!RE 217,$$FALSE$$FALSE$$ CADM22F & $ P!!RE 218,$$FALSE$$TRUE$$ C5MDISK P $ P!!RE 219,$$TRUE$$FALSE$$ CKASFLG x $ P!!RE 220,$$TRUE$$TRUE$$ CSLDFLG & P!!RE 221,$$FALSE$$FALSE$$CGLREGFL & P!!RE 222,$$FALSE$$FALS
0x1caf04…1cb098 Dummy {f00=0x00e1, f01=0x0190, f02=»G p & P!!RE 257,$$FALSE$$FALSE$$ CBUDTFLG P!!DL 289 4 , PCFLAG BINI (12),X'0051',X'0060',X'0068' D , P!!RE 350,$$01014610$$04015391$$ VERSION t & P!!RE 399,$$1400$$10000$$DISK SIZE P!!RE 405,$$128$$80$$ CRECLGD P!!RE 407,$$OD-KOM$$TIN
0x1cb098…1cb22c Dummy {f00=0x00e1, f01=0x0190, f02=»' ' r P!!DL 784 P MOVE TCT01,=W'2' PRINTER NR P!!EN @ PASG 2,LP0F L PNOD C ^ PTRA /S l PINC DIV461 z PNOD R PLED SCREEN,/S P!!CH $$KEY461$$KEYCOP$$ P!!CH $$SL461$$SLCOP$$ P!!EN PTRA /S,NL
0x1cb22c…1cb3c0 Dummy {f00=0x00e1, f01=0x0190, f02=» PNOD R PINC RGKLAR PINC KMDIO ( PINC KTPLN : PNOD R L PINC RGADM Z PNOD R l PINC SUBAPL z PINC DKSUBS PNOD R PINC RGFRMT PINC REMFMT PINC KTOPR PNOD R PINC ADM6 PINC REMT
0x1cb3c0…1cb554 (0, 582) Dummy {f00=0x00e1, f01=0x00a4, f02=»70 P$INCGEN PINC T:EXIT,INT:PROD LKE M 6 PKPF /L,RGLDD D PSCR X 2 PMES $PDISC M=M:92D1,MU=M:POOL92,A=RGLDD,C=D539 d P$ASG2
0x1cb554…1cb6e8 Dummy {f00=0x00e1, f01=0x2008, f02=» P$INCGEN PINC T:EXIT,INT:PROD LKE M 6 PKPF /L,RGLDD D PSCR X 2 PMES $PDISC M=M:92D1,MU=M:POOL92,A=RGLDD,C=D539 d P$ASG2
0x1cb6e8…1cb87c Dummy {f00=0x00e1, f01=0x0190, f02=» ; ! T _* T & TV :r A:v C ( B & B T B ! T B 8 @:~T T2 R R W& _ A:v R V R V _. R I :r( B & B TZ B & TF R R 2 $ 1 P Y :r( B T B & T W W
0x1cb87c…1cba10 Dummy {f00=0x00e1, f01=0x0190, f02=» <^ <h 0READ ERROR SECTOR NO: FILE NAME: DESTROYED RECORDS: TO 0INPUT DISC 0OUTPUT DISC @< <$ ?. T6 % ? _( R ) ) (' P Y
0x1cba10…1cbba4 Dummy {f00=0x00e1, f01=0x0190, f02=» A< Z : < A< A< ( : < <. <8( <6 G P < A; < < @; ; [ [ P _ S < @; < @< < Z Z : <r = < = < = < ( = 2 @; @;
0x1cbba4…1cbd38 Dummy {f00=0x00e1, f01=0x0190, f02=» <:_& ? 2 + $ T : * Y ]0 : ?( R ) ( P Y ]. : <. <8( @<6' <6 G : <: ( B ' G : <R_& <h <( <h A< ? 2 P *_ : A; <. " ! R6 ( B R T "!T,W
0x1cbd38…1cbecc Dummy {f00=0x00e1, f01=0x0190, f02=» B A<;P X B P: B P4 < = <r = A@ < < = : < _6 <: 2 A<< A<D( << Y <D 2 A<< A<D( @<BP @ <: Y : C ?( <: C H G2 <: R C I " I $ C ( ( ( C
0x1cbecc…1cc060 Dummy {f00=0x00e1, f01=0x0190, f02=» A<D A @h X P A <: ( <B G G2 < 2 A<0 A<T R A<< A<H R A< R A</ A<G R A<; A<S A; @ ? 2 , $ G Y R % A ?( R , ( G Y ( TO G, $ A<$ $ A< ( A<& ( A<" <, ?` T B ) G
0x1cc060…1cc1f4 (0, 583) Opaque[0x194]
0x1cc1f4…1cc388 # DirEnt {nam=»D539 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1c38, f03=0x0000}
0x1cc1f4…1cc388 IdxSect {
0x1cc1f4…1cc388 f00 = 0x00e1 // 0x1cc1f4 @0x0
0x1cc1f4…1cc388 f01 = 0x0002 // 0x1cc1f6 @0x2
0x1cc1f4…1cc388 gno = [ // 0x1cc1f8 @0x4
0x1cc1f4…1cc388 [0x00]: C0x00e1.0x3.0
0x1cc1f4…1cc388 ]
0x1cc1f4…1cc388 }
0x1cc388…1cc51c Dummy {f00=0x00e1, f01=0x018e, f02=» T; P01; TID=TC; TCL=TC; * LEV=60; : P02; J PTDC=T03; V PLC=01L; f PTDC=T07; v PLC=01L; P01; PSCL=S04; PT; P01; PTID=TD; PTCL=TC; PLEV=60; P01; PTDC=
0x1cc51c…1cc6b0 Dummy {f00=0x00e1, f01=0x0190, f02=» PLC=03L; PTDC=T06; PLC=03L; $ P00; 4 PT; @ P03; J TID=KA; V TCL=KA; f LEV=60; v 01; PTDC=T04; PLC=02L; P03; PSCL=S02; PSCL=S03; PSCL=S04; PT; P01; PTID=
0x1cc6b0…1cc844 Dummy {f00=0x00e1, f01=0x00c6, f02=»S04; T; 01; TID=D0; " TCL=D0; 2 LEV=60; B 00; R P00; ^ PC; j P00; t P01; PSCL=S01; U; 001; TB2; P003; PSCL=S03; PSCL=S04; PT; P01; PTID=
0x1cc844…1cc9d8 Dummy {f00=0x00e1, f01=0x2008, f02=» T; 01; TID=D0; " TCL=D0; 2 LEV=60; B 00; R P00; ^ PC; j P00; t P01; PSCL=S01; U; 001; TB2; P003; PSCL=S03; PSCL=S04; PT; P01; PTID=
0x1cc9d8…1ccb6c Dummy {f00=0x00e1, f01=0x0190, f02=»P A( @( P . @( / : R !LLP R 2 ^ S 1Q : S 1 S 2 A( )~ + : ( ( # A( R ( B R ! TF A( B ! T: C ( B P ! W B Q( ( , X @( P ( "' +~ _~ "' R 9@ A( R
0x1ccb6c…1ccd00 Dummy {f00=0x00e1, f01=0x0190, f02=»( A( A( A( A( A( A( @( P A( A( B A+ ( B T @+ C ( B ! B T : 2 @( 2 R 0X R @( Z U Y _& @( Wl , T: 1 Q ( 2 A( @( A( ( @( ! @( T : W W : _ @( T _ _ R
0x1ccd00…1cce94 (0, 584) Opaque[0x194]
0x1cce94…1cd028 # DirEnt {nam=»KEY221«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c40, f03=0x0000}
0x1cce94…1cd028 IdxSect {
0x1cce94…1cd028 f00 = 0x00e2 // 0x1cce94 @0x0
0x1cce94…1cd028 f01 = 0x0002 // 0x1cce96 @0x2
0x1cce94…1cd028 gno = [ // 0x1cce98 @0x4
0x1cce94…1cd028 [0x00]: C0x00e2.0x0.0
0x1cce94…1cd028 ]
0x1cce94…1cd028 }
0x1cd028…1cd1bc Dummy {f00=0x00e2, f01=0x0190, f02=» PNOKEY EQU X'FF' PBSPKY1 EQU X'87' PCANKY1 EQU X'91' 4 PMACKY1 EQU X'95' L PEORKY1 EQU X'90' d PFTABKY1 EQU X'8B' | PBTABKY1 EQU X'83' PDUPKY1 EQU X'A2' PSLUTKY1 EQU X'A3' PREGKY1 EQU X'A1' PCOPKY1 EQU X'F
0x1cd1bc…1cd350 Dummy {f00=0x00e2, f01=0x0190, f02=»Y1 EQU X'FF' PCY2KY1 EQU X'FF' PCYCKY1 EQU X'89' , PINVKY1 EQU X'FF' D PKONKY1 EQU X'85' PKVITKY1 EQU X'86' t PSUPLKY1 EQU X'82' PSUMKY1 EQU X'81' PADMKY1 EQU X'A0' PDIVKY1 EQU X'84' PHBOGKY1 EQU X'80'
0x1cd350…1cd4e4 Dummy {f00=0x00e2, f01=0x0190, f02=»BKY1 EQU X'87' PINSKY1 EQU X'81' PDELKY1 EQU X'82' . PCL1KY1 EQU X'89' F PCL2KY1 EQU X'8A' ^ PCL3KY1 EQU X'8B' v POUTKY1 EQU X'A0' P* PBSPKY2 EQU X'C7' PCANKY2 EQU X'D1' PEORKY2 EQU X'D0' PMACKY2 EQU X'D5'
0x1cd4e4…1cd678 Dummy {f00=0x00e2, f01=0x40c4, f02=»EKY2 EQU X'D2' PREGKY2 EQU X'E1' PADMKY2 EQU X'E0' . PSPGKY2 EQU X'FF' F PKONKY2 EQU X'FF' ^ PKVITKY2 EQU X'C6' v PONKY2 EQU X'D9' PCOPKY2 EQU X'C5' @ PCANKY2 EQU X'D1' PEORKY2 EQU X'D0' PMACKY2 EQU X'D5'
0x1cd678…1cd80c Dummy {f00=0x00e2, f01=0x2008, f02=» * ERRFMT FRMT FSL , " FMEL 'ZZ9B',GTWBCD1 FILE NR. 8 FCOPY ERRTXT ^ " FMEL 'BZZ9',GTWBCD2 ERRORNR. t FCOPY =X'07' FMEND @ 8SPKTAB2 KTAB BSPKY1,CANKY1,NOKEY,MACKY1,NOKEY,EORKY1, C D ? FT
0x1cd80c…1cd9a0 Dummy {f00=0x00e2, f01=0x0190, f02=» j P CBE GTREGNR,=D'12',WRFD070 , P TBT CSPLITFL,WRFD025 IF SPLIT PACK REST , PWRFD020 P ADD GSWBIN5,CBIN1 l " P CBNL GSWBIN5,CBINMAX,WRFD070 4 P CBE GTUSED(GSWBIN5),CBIN0,WRFD020 USED FIELD ? P MOVE SPINPUT,=X'00' YES * P MOV
0x1cd9a0…1cdb34 (0, 585) Opaque[0x194]
0x1cdb34…1cdcc8 # DirEnt {nam=»REMBDT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c48, f03=0x0000}
0x1cdb34…1cdcc8 IdxSect {
0x1cdb34…1cdcc8 f00 = 0x00e2 // 0x1cdb34 @0x0
0x1cdb34…1cdcc8 f01 = 0x000e // 0x1cdb36 @0x2
0x1cdb34…1cdcc8 gno = [ // 0x1cdb38 @0x4
0x1cdb34…1cdcc8 [0x00]: C0x00e2.0x1.0
0x1cdb34…1cdcc8 [0x01]: C0x00e2.0x2.0
0x1cdb34…1cdcc8 [0x02]: C0x00e2.0x3.0
0x1cdb34…1cdcc8 [0x03]: C0x00e3.0x0.0
0x1cdb34…1cdcc8 [0x04]: C0x00e3.0x1.0
0x1cdb34…1cdcc8 [0x05]: C0x00e3.0x2.0
0x1cdb34…1cdcc8 [0x06]: C0x00e3.0x3.0
0x1cdb34…1cdcc8 ]
0x1cdb34…1cdcc8 }
0x1cdcc8…1cde5c Dummy {f00=0x00e2, f01=0x0190, f02=» P IDENT REMBDT DDUM KMD08 PDIV . P ENTRY BCHKPR < P ENTRY BGIRPR R P ENTRY BSAMPR h P ENTRY WSTRCH ~ P ENTRY STREDT P EXT RAWRIT P EXT TXTRD P EXT LEVRD P EXT FMREMP P EXT GENWRF
0x1cde5c…1cdff0 Dummy {f00=0x00e2, f01=0x0190, f02=» P EXT FSOLVE P EXT FMOD P EXT NEWLIN * P EXT WAITF > P INCLUDE EQUATE P P EJECT h PWSTRCH PROC P v P********** P* B P* P=0: CREATE A RECORD ON CYSET CONTAINING ONE SPEC. LINE FOR P* STRAKSCHECK P
0x1cdff0…1ce184 Dummy {f00=0x00e2, f01=0x0190, f02=»,CBIN1,WSTR050 EXPL. WRITE? , P MOVE GSWBIN8,TTASKNR FIND PHYS. RECORD $ P SUB GSWBIN8,CBIN1 T P MUL GSWBIN8,CCYSIZE n P ADD GSWBIN8,GTCHKCY P ADD GSWBIN8,=W'30' P CBNE GTCHKCY,CBIN1,WSTR005 P MOVE GTCYSUM,=D'0' PWSTR00
0x1ce184…1ce318 Dummy {f00=0x00e2, f01=0x0190, f02=»',CCYBUF,GSWBIN8 z P BNOK WSTR094 P ADD GTCHKCY,CBIN1 . P CLEAR CCYPFLG H P ADD GTCYSUM,GTDUPF(CBIN4) ^ 4 P CBNG GTCHKCY,CBIN6,WSTR090 ROOM FOR NEXT LINE? P TBF C821FLG,WSTR050 . P CBNG GTCHKCY,CBIN12,WSTR090 HJORRING ONLY P*
0x1ce318…1ce4ac Dummy {f00=0x00e2, f01=0x0190, f02=» | P PERF WRITJT,=W'16' P PERF SPLIN8,CBIN13,CBIN2 $ P PERF GRASPV F P MOVE GSWBIN8,=W'40' Z P TBF C821FLG,WSTR052 v P ADD GSWBIN8,CBIN11 PWSTR052 P DSC1 KVOUCH,POS,GSWBIN8 . P MOVE GTKFVAL,CCHKLBNR REWRITE CHECKLOBENR
0x1ce4ac…1ce640 Dummy {f00=0x00e2, f01=0x0190, f02=»OP CONTROL x P SUB GSWBIN8,CBIN1 $ P MOVE GSWBCD6,GTCYIN SAVE GTCYIN , P MOVE GTCYIN,TTASKNR T P MUL GTCYIN,CCYSIZE p P SUB GTCYIN,CBIN5 P MOVE GSWBIN7,CBIN15 P TBF C821FLG,WSTR060 P ADD GSWBIN7,CBIN11 PWSTR060
0x1ce640…1ce7d4 (0, 586) Dummy {f00=0x00e2, f01=0x0190, f02=»SC0 KVOUCH,RLEAS ( P MOVE GTCYIN,GSWBCD6 RESTORE GTCYIN PWSTR080 D P MOVE GTCYSUM,=D'0' T P MOVE GTCHKCY,CBIN1 p P* PWSTR090 P PERF CLEAR8 P CMP CBIN0,CBIN0 P B WSTR099 PWSTR094 DISK ERROR P CLEAR C
0x1ce7d4…1ce968 Dummy {f00=0x00e2, f01=0x0190, f02=»PRINT BUNDTCHECKS $ P* P = 0 BCHK10 - ADJUST PRINTER " P* P = 1 BCHK20 - LEV + TRANS 1 B P* P = 2 BCHK30 - TRANS 2 h $ P* P = 3 BCHK40 - TRANS 3 + PRINT P* P = 4 BCHK50 - PRINT P MOVE GSWBIN8,P P ADD GSWBIN8,CBIN1 P TBF C82
0x1ce968…1ceafc Dummy {f00=0x00e2, f01=0x0190, f02=» P* PBCHK10 PRINTER ADJUST * P PERF FMREMP,CBIN1 GET FORMAT FBDTCHK 2 P MOVE SPINPUT,='X' ` P MOVE GSWBIN5,CBIN16 z PBCHK15 & P PERF FMOD,GSWBIN5,SPINPUT WITH X P SUB GSWBIN5,CBIN1 P CBG GSWBIN5,CBIN0,BCHK15
0x1ceafc…1cec90 Dummy {f00=0x00e2, f01=0x018e, f02=»BIN8,GTLEVNVN P PERF FMOD,CBIN11,GTLEVADR P PERF FMOD,CBIN13,GTLEVBY 8 P EDIT GSWSTR9,FPNR Z P PERF FMOD,CBIN14,GSWSTR9 t P PERF FMOD,CBIN15,GTLEVPDI P* P MOVE GTBSUM1,GTDUPF(CBIN4) P PERF TXTEDIT,CBIN1,CBIN1 P
0x1cec90…1cee24 Dummy {f00=0x00e2, f01=0x0190, f02=» PBCHK40 P ADD GTBSUM1,GTDUPF(CBIN4) P PERF TXTEDIT,CBIN1,CBIN3 4 P B BCHK60 V P* h PBCHK50 r 0 P CBE GSWBCD5,=D'1',BCHK90 NOTHING TO PRINT ? PBCHK60 P EDIT SPINPUT,FREMTOT1 P PERF FMOD,CBIN4,SPINPUT P PERF FM
0x1cee24…1cefb8 Dummy {f00=0x00e2, f01=0x0190, f02=»,CBIN7 P TBF GTCHKPR,BCHK70 ( P PERF NEWLIN,CBIN1 EXTRA LINEFEED ? * P CLEAR GTCHKPR V P B BCHK90 l PBCHK70 ~ P SET GTCHKPR PBCHK90 P CMP CBIN0,CBIN0 P RET P PEND P EJECT PB821PR PROC * P* THIS
0x1cefb8…1cf14c Dummy {f00=0x00e2, f01=0x0190, f02=»NS 1 v " P* P = 2 B82130 - TRANS 2 - N-1 , P* P = 3 B82140 - TRANS N + ANNULE CHECK 2 P* P = 4 B82150 - PRINT b 2 P IB GSWBIN8,B82110,B82120,B82140,B82140,B82150 P B B82140 P* PB82110 PRINTER ADJUST P PERF NEWLIN,CBIN12
0x1cf14c…1cf2e0 Dummy {f00=0x00e2, f01=0x0190, f02=»CBIN6 PB82115 * P PERF FMOD,GSWBIN5,SPINPUT INIT WITH X P SUB GSWBIN5,CBIN1 J P CBG GSWBIN5,CBIN0,B82115 d P B B82165 PRINT IT P* PB82120 INIT LEV + 1 TRANS P MOVE GTBSUM1,=D'0' PB82125 P PERF FMREMP,CBI
0x1cf2e0…1cf474 (0, 587) Dummy {f00=0x00e2, f01=0x0190, f02=» PERF FMOD,CBIN5,GSWSTR9 P PERF FMOD,CBIN6,GTLEVPDI P* B PB82140 L , P CBNE GSWBCD5,=D'25',B82142 PAGE FILLED? Z * P PERF FMREMP,CBIN4 GET FORMAT F821CHK P MOVE SPINPUT,='X' P MOVE GSWBIN5,CBIN6 PB82144 * P PERF FMOD,G
0x1cf474…1cf608 Dummy {f00=0x00e2, f01=0x0190, f02=»GSWBCD5,=D'1' P B B82125 PB82142 ( P ADD GTBSUM1,GTDUPF(CBIN4) 6 ( P MOVE GSWBIN7,GTDUPF(CBIN15) TEXTNR X P PERF TXTRD,GSWBIN7 P PERF STREDT P PERF GENWRF,GTHCDEV,CHKFRM2 P PERF NEWLIN,CBIN1 P B B82190 P*
0x1cf608…1cf79c Dummy {f00=0x00e2, f01=0x0190, f02=» OF j , P SUB GSWBCD5,=D'25' LINEFEEDS TO PERFORM P MUL GSWBCD5,=D'-1' < P MOVE GSWBIN5,GSWBCD5 X PB82160 v P EDIT SPINPUT,FREMTOT1 P PERF NEWLIN,GSWBIN5 P PERF FMOD,CBIN1,SPINPUT PB82165 P PERF GENWRS,GTHCDEV,EDITBUF
0x1cf79c…1cf930 Dummy {f00=0x00e2, f01=0x0190, f02=»TER x P* BGIRPR20 - LEV 1 + TRANS 1 P* BGIR30 - TRANS 2 0 P* BGIR40 TRANS 3 J P* BGIR50 - LEV 2 + TRANS 1 b P* BGIR60 - TRANS 2 P* BGIR70 - TRANS 3 + WRITE P* BGIR80 - WRITE P MOVE GSWBIN8,P P ADD GSWBIN8,CBIN1 0
0x1cf930…1cfac4 Dummy {f00=0x00e2, f01=0x0190, f02=»ERF FMREMP,CBIN2 GET FORMAT FBDTGIR P MOVE SPINPUT,='X' , P MOVE GSWBIN5,CBIN1 F PBGIR15 b P PERF FMOD,GSWBIN5,SPINPUT p P ADD GSWBIN5,CBIN1 P CBG GSWBIN5,=W'32',BGIR86 P B BGIR15 P* PBGIR20 * P PERF FMREMP,CBI
0x1cfac4…1cfc58 Dummy {f00=0x00e2, f01=0x0190, f02=»IRONR p P PERF FMOD,CBIN9,GTLEVNVN P PERF FMOD,CBIN12,GTLEVADR 0 P PERF FMOD,CBIN16,GTLEVBY R P PERF FMOD,CBIN21,GTLEVPDI t P EDIT GSWSTR9,FPNR P PERF FMOD,CBIN20,GSWSTR9 P* P MOVE GTBSUM1,GTDUPF(CBIN4) P PERF TX
0x1cfc58…1cfdec Dummy {f00=0x00e2, f01=0x0190, f02=» B BGIR90 P* PBGIR40 P ADD GTBSUM1,GTDUPF(CBIN4) * P PERF TXTEDIT,CBIN2,CBIN3 L P B BGIR90 n P* PBGIR50 P EDIT GSWSTR20,FSAMLEV * P PERF FMOD,CBIN4,GSWSTR20 MOVE GIRONR P PERF FMOD,CBIN10,GTLEVNVN P P
0x1cfdec…1cff80 Dummy {f00=0x00e2, f01=0x0190, f02=»GSWSTR9,FPNR P MOVE GSWBIN7,=W'23' P PERF FMOD,GSWBIN7,GSWSTR9 0 P* R P MOVE GTBSUM2,GTDUPF(CBIN4) P PERF TXTEDIT,CBIN2,CBIN4 P B BGIR90 P* PBGIR60 P ADD GTBSUM2,GTDUPF(CBIN4) P PERF TXTEDIT,CBIN2,CBIN5
0x1cff80…1d0114 (0, 588) Dummy {f00=0x00e3, f01=0x0190, f02=»* PBGIR80 PBGIR85 P EDIT SPINPUT,FREMTOT1 & P MOVE GSWBIN7,=W'31' D P PERF FMOD,GSWBIN7,SPINPUT ` P MOVE GSWBIN7,=W'32' P EDIT SPINPUT,FREMTOT2 P PERF FMOD,GSWBIN7,SPINPUT P PERF FSOLVE PBGIR86 P MOVE GT
0x1d0114…1d02a8 Dummy {f00=0x00e3, f01=0x0190, f02=» CMP CBIN0,CBIN0 P RET P PEND $ P EJECT 2 PBSAMPR PROC P @ P* P = 0 - BSAM10 - HEADER V $ P* P = 1 - BSAM20 - LEV + TRANS 1 x P* P = 2 - BSAM30 - TRANS 2 6 P* P = 3 - BSAM40 - TRANS 3 + PRINT + HEADER (EVTL) P* P = 4 - BS
0x1d02a8…1d043c Dummy {f00=0x00e3, f01=0x0190, f02=»AM30,BSAM40, C t P BSAM70,BSAM50 P B BSAM90 0 PBSAM10 B P MOVE GSWBIN10,CBIN1 P P TBT CADVIS,BSAM15 l P TBF CBDTGIR,BSAM15 P MOVE GTLEVNR,GTPRTTIL P PERF LEVRD READ HEADING PBSAM15 P MOVE GSWBCD4,GSWBIN10
0x1d043c…1d05d0 Dummy {f00=0x00e3, f01=0x0190, f02=»SAM n P PERF FMOD,CBIN3,GTLEVNVN P EDIT GSWSTR20,FSAMLEV . P PERF FMOD,CBIN2,GSWSTR20 L P MOVE GTBSUM1,GTDUPF(CBIN4) n P PERF TXTEDIT,CBIN3,CBIN1 P B BSAM90 PBSAM30 P ADD GTBSUM1,GTDUPF(CBIN4) P PERF TXTEDIT,CBIN
0x1d05d0…1d0764 Dummy {f00=0x00e3, f01=0x018e, f02=»AM50 P CLEAR CSWFLAG " P PERF GENWRF,GTHCDEV,FBDTSLUT " P SET CSWFLAG H " P PERF GENWRF,GTHCDEV,FBDTSLUT P SUB GSWBIN3,CBIN7 * P PERF NEWLIN,GSWBIN3 SKIP TO NEW PAGE P B BSAM90 PBSAM70 P CBE GSWBCD5,=D'1',BSAM90
0x1d0764…1d08f8 Dummy {f00=0x00e3, f01=0x018e, f02=» " P PERF GENWRF,GTHCDEV,FBDTSLUT P PERF NEWLIN,CBIN6 . P ADD GSWBIN10,CBIN1 H P TBT CADVIS,BSAM75 d P MOVE GTLEVNR,GTPRTTIL ~ P PERF LEVRD READ HEADING PBSAM75 P MOVE GSWBCD4,GSWBIN10 " P PERF GENWRF,GTHCDEV,FBDTOVSK
0x1d08f8…1d0a8c Dummy {f00=0x00e3, f01=0x0190, f02=» P ADD GTBSUM2,GTBSUM1 P ADD GTBSUM3,GTBSUM1 P MOVE GTBSUM1,=D'0' < PBSAM90 X P CMP CBIN0,CBIN0 f P CLEAR CSWFLAG ~ P RET P PEND P EJECT PTXTEDIT PROC ART,SEQ P* ART=1 - BUNDTCHECK P* ART=2 - BUNDTGIRO
0x1d0a8c…1d0c20 Dummy {f00=0x00e3, f01=0x0190, f02=»STREDT 8 P* SPINPUT CONTAINS NOW NUMMER-1 NUMMER2 DATO1 DATO2 . P* (IN A COMBINATION GOVERNED BY TEXTCODE) J P* GSWSTR20 CONTAINS AMOUNT | P MOVE GSWBIN7,ART $ P IB GSWBIN7,TXTE20,TXTE30,TXTE40 P* PTXTE20 EDIT BUNDTCHECK
0x1d0c20…1d0db4 (0, 589) Dummy {f00=0x00e3, f01=0x0190, f02=»,SPINPUT INFO $ P PERF FMOD,CBIN3,GSWSTR20 AMOUNT P B TXTE90 > PTXTE22 P P PERF FMOD,CBIN5,GTLEVTXT ^ P PERF FMOD,CBIN6,SPINPUT P PERF FMOD,CBIN7,GSWSTR20 P B TXTE90 PTXTE23 P PERF FMOD,CBIN9,GTLEVTXT P PER
0x1d0db4…1d0f48 Dummy {f00=0x00e3, f01=0x0190, f02=» ~ : P IB GSWBIN7,TXTE31,TXTE32,TXTE33,TXTE34,TXTE35,TXTE36 PTXTE31 F P PERF FMOD,CBIN1,GTLEVTXT T P PERF FMOD,CBIN5,SPINPUT v P PERF FMOD,CBIN7,GSWSTR20 P B TXTE90 PTXTE32 P PERF FMOD,CBIN11,GTLEVTXT P PERF FMOD,CBI
0x1d0f48…1d10dc Dummy {f00=0x00e3, f01=0x018e, f02=»EVTXT z P MOVE GSWBIN7,=W'27' P PERF FMOD,GSWBIN7,SPINPUT * P MOVE GSWBIN7,=W'29' L P PERF FMOD,GSWBIN7,GSWSTR20 h P B TXTE90 PTXTE34 P PERF FMOD,CBIN3,GTLEVTXT P PERF FMOD,CBIN6,SPINPUT P PERF FMOD,CBIN8,GSWSTR20
0x1d10dc…1d1270 Dummy {f00=0x00e3, f01=0x018e, f02=» t P B TXTE90 ! PTXTE36 ! P MOVE GSWBIN7,=W'26' ! ( P PERF FMOD,GSWBIN7,GTLEVTXT ! D P MOVE GSWBIN7,=W'28' ! h P PERF FMOD,GSWBIN7,SPINPUT ! P MOVE GSWBIN7,=W'30' ! P PERF FMOD,GSWBIN7,GSWSTR20 ! P B TXTE90 ! P* ! PTXTE40
0x1d1270…1d1404 Dummy {f00=0x00e3, f01=0x0190, f02=» P B TXTE90 " PTXTE42 " P PERF FMOD,CBIN5,SPINPUT " $ P B TXTE90 " D PTXTE43 " V P PERF FMOD,CBIN6,SPINPUT " d P B TXTE90 " PTXTE90 " P CMP CBIN0,CBIN0 " P RET " P PEND " P EJECT " PSTREDT PROC " P MOVE GSWSTR20,=
0x1d1404…1d1598 Dummy {f00=0x00e3, f01=0x0190, f02=»E08 " ^ PSTRE03 # P EDIT SPINPUT,FREMINF1 # P B STRE80 # 8 PSTRE04 # J & P MOVE GSWBCD6,GTDUPF(CBIN13) NR-1 # X P EDIT SPINPUT,FREMINF2 # P B STRE80 # PSTRE05 # & P MOVE GSWBCD6,GTDUPF(CBIN13) NR-1 # & P MOVE GSWBCD7,GTDUPF(CBIN14) N
0x1d1598…1d172c Dummy {f00=0x00e3, f01=0x0190, f02=»INF4 # ~ P B STRE80 $ PSTRE07 $ P MOVE GSWBCD6,GTDUPF(CBIN18) $ , ( P MOVE GSWBCD7,GTDUPF(CBIN19) DATO-2 $ P P EDIT SPINPUT,FREMINF5 $ | P B STRE80 $ PSTRE08 $ & P MOVE GSWBCD6,GTDUPF(CBIN13) NR-1 $ ( P MOVE GSWBCD7,GTDUPF(CBIN18) DATO-1
0x1d172c…1d18c0 Dummy {f00=0x00e3, f01=0x0190, f02=»CT $ PFREMBEL FRMT % * P FMEL 'BZZVZZZVZZ9,99-',GTDUPF(CBIN4) % P FMEND % L P % Z PFREMINF1 FRMT % b P FILLR ' ',21 % x P FMEND % P % PFREMINF2 FRMT % P FMEL 'ZZZZZZZZZ9',GSWBCD6 % P FILLR ' ',11 % P FMEND % P % P
0x1d18c0…1d1a54 (0, 590) Dummy {f00=0x00e3, f01=0x0190, f02=»INF4 FRMT % P FMEL '99V99V99',GSWBCD6 & P FILLR ' ',13 & 2 P FMEND & H P & V PFREMINF5 FRMT & ^ P FMEL '99V99V99',GSWBCD6 & t P FILLR ' ',3 & P FMEL '99V99V99',GSWBCD7 & P FILLR ' ',2 & P FMEND & P & PFREMINF6 FRMT & P
0x1d1a54…1d1be8 Dummy {f00=0x00e3, f01=0x0190, f02=» FRMT & P FMEL '****9',TTLBNR ' P FMEND ' * P ' 8 PFREMTOTS FRMT ' @ $ P FMEL 'ZZZZZZZVZZ9,99-',GTBSUM1 ' V P FMEND ' ~ P ' PFREMTOT1 FRMT ' P FBT CBDTGIR,FRE110 ' $ P FMEL '*******V**9,99-',GTBSUM1 ' P FB FRE120 ' PFRE110 '
0x1d1be8…1d1d7c Dummy {f00=0x00e3, f01=0x0190, f02=»L '*******V**9,99-',GTBSUM2 ' P FB FRE220 ( $ PFRE210 ( 6 $ P FMEL 'ZZZZZZVZZ9BB99-',GTBSUM2 ( D PFRE220 ( l P FMEND ( z P ( PFSAMLEV FRMT ( P FBT CBDTGIR,FSAM10 ( P FMEL '9999999999',GTLEVNR ( P FB FSAM20 ( PFSAM10 ( P FMEL
0x1d1d7c…1d1f10 Dummy {f00=0x00e3, f01=0x0190, f02=»JECT ( : 5******************** STRAKSCHECK ******************** ) CHKFRM1 FRMT ) J FILLR '+',2 ) ^ P FMEL '99V99V99',GTDATO ) r FILLR ' ',40 ) , P FMEL '*.***.***.**9,99-',GTCYSUM BELOB ) FILLR ' ',2 ) FEOR ) FILLR '3',2 )
0x1d1f10…1d20a4 Dummy {f00=0x00e3, f01=0x0190, f02=»ILLR ' ',32 ) FEOR * FILLR '2',2 * " FCOPY GTLEVADR * 6 FILLR ' ',30 * N FEOR * d FILLR '2',2 * r FCOPY GTLEVBY * FILLR ' ',42 * FEOR * FILLR '2',2 * FMEL 'ZZZZBB',GTLEVPNR * FCOPY GTLEVPDI *
0x1d20a4…1d2238 Dummy {f00=0x00e3, f01=0x0190, f02=»Y1FLG,CHKF10 * * P FMEL '999E-999E-99E-99',GTDUPF(CBIN1) + P FB CHKF20 + B PCHKF10 + T & P FMEL '999E-999E-99E-99',TTARKSAV + b PCHKF20 + FILLR ' ',7 + ( $ FMEL '****9BB',CCHKLBNR CHECKLOBENR + FILLR ' ',34 + P FMEND + P* + P
0x1d2238…1d23cc Dummy {f00=0x00e3, f01=0x0190, f02=» GTLEVTXT + P FILLR ' ',1 , P FCOPY SPINPUT , & P FILLR ' ',1 , < P FCOPY GSWSTR20 , P P FMEND , h , v , ~ : 6********** BUNDTREMITTERINGSLISTEOVERSKRIFT ********** , FBDTOVSK FRMT , FILLR '+',2 , P FBT CADVIS,FBDT010 ,
0x1d23cc…1d2560 Dummy {f00=0x00e3, f01=0x0190, f02=» , P FILLR ' ',5 - P FMEL '9B99B99B99',GTLEVGI - P FILLR ' ',10 - > P FB FBDT040 - T PFBDT005 - h P CHECK IF ADVIS - x P FCOPY ='BUNDTREMITTERING' - FCOPY ='SLISTE' - P FB FBDT030 - PFBDT010 - P FCOPY ='ADVI' - P F
0x1d2560…1d26f4 (0, 591) Dummy {f00=0x00e3, f01=0x0190, f02=»030 - FILLR ' ',19 . PFBDT040 . " FCOPY ='DEN ' . 2 P FMEL '99V99V99',GTPRTDAT . H FNL . j FNL . v P FILLR ' ',9 . P FTEXT X'42454C5C42' . FILLR ' ',6 . FTEXT 'LEV-NR' . P FILLR ' ',5 . FTEXT 'NAVN' . P
0x1d26f4…1d2888 Dummy {f00=0x00e3, f01=0x018e, f02=»** BUNDTREMITTERINGSSLUTLINIE *********** . FBDTSLUT FRMT / 2 P FNL / H ( P FBT CSWFLAG,FBDTSL10 GRAND TOTAL ? / T FNL / $ P FMEL 'ZZZZZZZVZZ9,99-',GTBSUM2 / FILLR ' ',14 / FCOPY ='SIDE' / FCOPY ='TOTAL' / FB FBDTSL99 /
0x1d2888…1d2a1c Dummy {f00=0x00e3, f01=0x4088, f02=» P FMEL 'ZZ9',GSWBCD4 0 P FTEXT ' SIDE(R)' 0 FBDTSL99 0 : P FNL 0 J P FNL 0 V FMEND 0 b 0 p END 0 x@ 0 $ P FMEL 'ZZZZZZZVZZ9,99-',GTBSUM2 / FILLR ' ',14 / FCOPY ='SIDE' / FCOPY ='TOTAL' / FB FBDTSL99 /
0x1d2a1c…1d2bb0 Dummy {f00=0x00e3, f01=0x2008, f02=» 1 2 FTEXT ' ' AMOUNT FNL 4 FILLR ' ',26 @ $ FTEXT ' ' AMOUNT V FILLR ' ',43 ~ $ FTEXT ' ' AMOU8NT FNL FNL FNL FNL FNL FNL F
0x1d2bb0…1d2d44 Dummy {f00=0x00e3, f01=0x408c, f02=» 4 F IDENT T:EXIT P,REL=4.2,791116,870136940420 Z T:EXITK Z < T:EXITK Z N ( Z b Z v@ Z z P REL #1,76-06-15 P* P ENTRY T:EXIT P* PT:EXIT LKM P DATA 3 P* P END
0x1d2d44…1d2ed8 Dummy {f00=0x00e3, f01=0x018e, f02=» > @ IDENT I:NTP P,REL=4.2,800821,870136940420 B > I:TRC I:NTP I:NTPA I:NTPB I:NTPR I:RT0 I:RT1 I:RT2 I:RST F I:MOV I:ADD I:SUB I:CMP I:MUL * & T
0x1d2ed8…1d306c Dummy {f00=0x00e3, f01=0x0190, f02=» I:XCP I:EDS , ( - ( I:TRC X I:RST B j I:NTPA B | I:NTPB F P:MTAB T:LSEG , ( ? W V 7 @ " ! P I:NTP p
0x1d306c…1d3200 Dummy {f00=0x00e3, f01=0x0190, f02=» r I:RT2 I:RT1 $ I:RT0 6 , ( @ " Q W :aW _B( H , ( 2 P V W x T:BAT , ( _ 2 # ;B V T $W V P , ( L , V 2P "
0x1d3200…1d3394 (0, 592) Opaque[0x194]
0x1d3394…1d3528 # DirEnt {nam=»REMPRT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c80, f03=0x0000}
0x1d3394…1d3528 IdxSect {
0x1d3394…1d3528 f00 = 0x00e4 // 0x1d3394 @0x0
0x1d3394…1d3528 f01 = 0x0006 // 0x1d3396 @0x2
0x1d3394…1d3528 gno = [ // 0x1d3398 @0x4
0x1d3394…1d3528 [0x00]: C0x00e4.0x0.0
0x1d3394…1d3528 [0x01]: C0x00e4.0x1.0
0x1d3394…1d3528 [0x02]: C0x00e4.0x2.0
0x1d3394…1d3528 ]
0x1d3394…1d3528 }
0x1d3528…1d36bc Dummy {f00=0x00e4, f01=0x0190, f02=» P IDENT REMPRT 04.01.XXX.1 P DDUM KMD08 & P PDIV : P ENTRY AD4100 H P ENTRY AD4200 ^ P ENTRY AD4300 t P* P EXT ADMRET P EXT SPCLRA P EXT CHDATO P EXT BDTSCA P EXT BDTPRT P EXT BDTDEL
0x1d36bc…1d3850 Dummy {f00=0x00e4, f01=0x0190, f02=»ERF SPCLRA ( P IB SPBINW2,AD41END,AD41END,ADM4110 P B AD41END > * PADM4110 ADD TRANSACTIONS TO PRINTLEV P P TBT CAD41FLG,AD41END ~ P SET CAD41FLG P CBL GTPRTTIL,=D'1',ADM4120 P SET CADVIS P MOVE GTBSUM1,=D'0' P M
0x1d3850…1d39e4 Dummy {f00=0x00e4, f01=0x0190, f02=»0 P TBF GTTTPFLG,AD41RET PADM4125 ( P CBNL GTLEVNR,=D'19',ADM4130 8 " P MOVE GTLEVNR,=D'19' 1. LEVNR PADM4130 P MOVE GSWBCD6,GTPRTDAT P PERF CHDATO P MOVE GTPRTDAT,GSWBCD7 P PERF BDTSCA P BNOK AD41RET
0x1d39e4…1d3b78 Dummy {f00=0x00e4, f01=0x018e, f02=»GTBSUM1,=D'0' P MOVE GTBSUM2,=D'0' P MOVE GTBSUM3,=D'0' 2 PAD41END N P B ADMRET ^ P EJECT p PAD4200 ~ P* PRINT PRINTLEV P TBT CAD41FLG,AD42END P SET CAD41FLG P TBF CBUDTFLG,AD42RET P TBT GTGTPFLG,ADM4
0x1d3b78…1d3d0c Dummy {f00=0x00e4, f01=0x0190, f02=» ~ P PERF SPCLRA ( P IB SPBINW2,AD42RET,AD42RET,ADM4220 P B AD42RET H PADM4220 Z P CLEAR CBDTGIR j P CBNE GTPRTTIL,=D'2',ADM4222 P SET CBDTGIR PADM4222 P CBNL GTPRTFRA,=D'1',ADM4225 " P MOVE GTPRTFRA,=D'1000000000
0x1d3d0c…1d3ea0 Dummy {f00=0x00e4, f01=0x0190, f02=»E GTPRTTIL,GTLEVNR P MOVE GTBSUM1,=D'0' P MOVE GTBSUM2,=D'0' 6 P MOVE GTBSUM3,=D'0' R " P PERF BDTPRT,CBIN1 CHECK/GIRO n P BNOK AD42RET " P MOVE GSWSTR20,='SAMLERLISTE ' P ATTFMT ADM42FM2 P PERF SPCLRA ( P IB SPBINW2,
0x1d3ea0…1d4034 (0, 593) Dummy {f00=0x00e4, f01=0x0190, f02=»2,=D'0' P MOVE GTBSUM3,=D'0' P PERF BDTPRT,CBIN2 , P BNOK AD42RET F $ P MOVE GSWSTR20,='SPECIFIKATION ' P ATTFMT ADM42FM2 P PERF SPCLRA ( P IB SPBINW2,AD42RET,AD42RET,ADM4250 P B AD42RET PADM4250 P MOVE GTLE
0x1d4034…1d41c8 Dummy {f00=0x00e4, f01=0x0190, f02=» P MOVE GTBSUM3,=D'0' , P PERF BDTPRT,CBIN3 KREDIT SPECIFICATIONS P BNOK AD42RET P P CLEAR CKRESP f P B AD42RET | P* PAD42RET P CLEAR CBDTGIR P CLEAR CAD41FLG PAD42END P B ADMRET P EJECT PAD
0x1d41c8…1d435c Dummy {f00=0x00e4, f01=0x0190, f02=» P ATTFMT ADM43FRM P PERF SPCLRA ( P IB SPBINW2,AD43RET,AD43RET,ADM4310 0 P B AD43RET PADM4310 n P MOVE GTLEVNR,GTPRTFRA ~ P CBL GTLEVNR,=D'6',ADM4320 P SUB GTLEVNR,=D'5' PADM4320 P PERF BDTDEL P BNOK AD43RE
0x1d435c…1d44f0 Dummy {f00=0x00e4, f01=0x0190, f02=» | . P PERF BDTDEL DELETE CREDIT SPEICIFICATIONS P BNOK AD43RET1 : P B AD43RET1 P P* d PAD43RET1 n PAD43RET ~ P CLEAR CAD41FLG PAD43END P B ADMRET P EJECT P********** P* P* FORMATS P
0x1d44f0…1d4684 Dummy {f00=0x00e4, f01=0x0190, f02=» P FILLR ' ',1 P FCOPY ='BUNDTREMITTERING' P FNL : P FCOPY ='VAL' F P FILLR X'5C',1 P FILLR 'R',1 r P FCOPY ='DATO' P FLINK ADM4X1 P FNL P FCOPY ='BFO' P FKI 25,MINL=1,MAXL=1,NUM,ME P FMEL 'X',GTPRTF
0x1d4684…1d4818 Dummy {f00=0x00e4, f01=0x0190, f02=»',GTPRTTIL P FNL P FCOPY ='FRA LEV. ' P FCOPY ='NR' : & P FKI 20,MINL=7,MAXL=10,NUM,SCHK=7 N P FMEL 'XXXXXXXXXX',GTLEVNR x P FMEND P* PADM42FRM FRMT P FSL P FCOPY ='PRINT' P FCOPY ='RUTINE ' P F
0x1d4818…1d49ac Dummy {f00=0x00e4, f01=0x018e, f02=»'BFO' P FKI 25,MINL=1,MAXL=1,NUM,ME P FMEL 'X',GTPRTTIL 2 P FNL L P FCOPY ='FRA LEV. ' X P FCOPY ='NR' t & P FKI 20,MINL=7,MAXL=10,NUM,SCHK=7 P FMEL 'XXXXXXXXXX',GTPRTFRA P FMEND P* PADM42FM2 FRMT P FSL
0x1d49ac…1d4b40 Dummy {f00=0x00e4, f01=0x416e, f02=» P FCOPY ='SLET ' P FCOPY ='RUTINE ' P FCOPY ='BUNDTREMITTERING' : P FNL P FCOPY ='BFO' h P FKI 25,MINL=1,MAXL=1,NUM,ME ~ P FMEL 'X',GTPRTFRA P FMEND P* PADM4X1 FRMT . P FKI 20,MINL=6,MAXL=6,NUM,SCHK=2
0x1d4b40…1d4cd4 (0, 594) Dummy {f00=0x00e4, f01=0x2008, f02=» * FORMATS * ********** (@ :V : ENTRY AD4100 H ENTRY AD4200 ^ ENTRY AD4300 t * EXT SPCLRA EXT CHDATO EXT BDTSCA EXT BDTPRT EXT BDTDEL * INCLU
0x1d4cd4…1d4e68 Dummy {f00=0x00e4, f01=0x0190, f02=»_" D E D O R 0 O B " |T 1 ] C E 0 O W8 " |T ] N C E Z 0 O E B : C ( : ( B : Xj F8 O N TT B O N - O g g Y ] N g N " P N " O N
0x1d4e68…1d4ffc Dummy {f00=0x00e4, f01=0x0190, f02=» N T N O : O ( : O 8 O N Z_ (@P B ] ] N " T : N "0 :d HC R _ 0" 1 V " 2 P W X }T 9 ~T 5 aR = _X = R 0" ZZ_" R
0x1d4ffc…1d5190 Dummy {f00=0x00e4, f01=0x0190, f02=»_" D E D O R 0 O B " |T 1 ] C E 0 O W8 " |T ] N C E Z 0 O E B : C ( : ( B : O N T B O N - O N N " P N " O N
0x1d5190…1d5324 Dummy {f00=0x00e4, f01=0x0190, f02=» N T N O : O ( : O 8 O N Z_ (@P B ] ] N " T : N "0 :d HC R _ 0" 1 V " 2 P W X }T 9 ~T 5 aR = _X = R 0" ZZ_" R
0x1d5324…1d54b8 Dummy {f00=0x00e4, f01=0x0190, f02=»_" D E D O R 0 O B " |T 1 ] C E 0 O W8 " |T ] N C E Z 0 O E B : C ( : ( B : O N T B O N - O N N " P N " O N
0x1d54b8…1d564c Dummy {f00=0x00e4, f01=0x0190, f02=» N T N O : O ( : O 8 O N Z_ (@P B ] ] N " T : N "0 :d HC R _ 0" 1 V " 2 P W X }T 9 ~T 5 aR = _X = R 0" ZZ_" R
0x1d564c…1d57e0 Dummy {f00=0x00e4, f01=0x0190, f02=»_" D E D O R 0 O B " |T 1 ] C E 0 O W8 " |T ] N C E Z 0 O E B : C ( : ( B : O N T B O N - O N N " P N " O N
0x1d57e0…1d5974 (0, 595) Opaque[0x194]
0x1d5974…1d5b08 # DirEnt {nam=»REMSUB«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1c98, f03=0x0000}
0x1d5974…1d5b08 IdxSect {
0x1d5974…1d5b08 f00 = 0x00e4 // 0x1d5974 @0x0
0x1d5974…1d5b08 f01 = 0x0004 // 0x1d5976 @0x2
0x1d5974…1d5b08 gno = [ // 0x1d5978 @0x4
0x1d5974…1d5b08 [0x00]: C0x00e4.0x3.0
0x1d5974…1d5b08 [0x01]: C0x00e5.0x0.0
0x1d5974…1d5b08 ]
0x1d5974…1d5b08 }
0x1d5b08…1d5c9c Dummy {f00=0x00e4, f01=0x0190, f02=» IDENT REMSUB P DDUM KMD08 PDIV . ENTRY FMOD < ENTRY FSOLVE P ENTRY NEWLIN f EXT GENWRF | ENTRY PRTADJ EXT SPCLRA ENTRY KBTEST EXT ABORT P EXT XCOP EXT SPLIN8
0x1d5c9c…1d5e30 Dummy {f00=0x00e4, f01=0x0190, f02=»OL CHARACTERS. 2 P* A TEXT TO BE REPLACED HAS TO BE SPECIFIED AS P* FOLLOWS: L 0 P* FTEXT X'<LENGTH> (LENGTH I HEX NOTATION) ^ 8 P* THE PROCEDURE WILL DELETE THE UNUSABLE LENGTH (01) 6 P* AND INSERT DATA FROM THE SPECIFIED STRING, WITH : P
0x1d5e30…1d5fc4 Dummy {f00=0x00e4, f01=0x0190, f02=»BUF-1DVS. 731 | P MOVE GSWBIN6,=W'731' P MOVE GSWBIN7,T TEXTNR 4 P MOVE GSWBIN8,CBIN0 R ( P MOVE GSWSTR1,=X'C3' IDENT FOR FTEXT n PFMOD10 6 P MATCH EDITBUF,GSWBIN8,GSWBIN6,GSWSTR1,CBIN0,CBIN1 ( P ADD GSWBIN8,CBIN1 LENGTH (01 OR NN)
0x1d5fc4…1d6158 Dummy {f00=0x00e4, f01=0x0190, f02=»AT UNTIL FOUND . P XCOPY GSWBIN7,CBIN1,CBIN1,EDITBUF,GSWBIN8 P CBNE GSWBIN7,CBIN1,FMOD95 H . P DLETE EDITBUF,GSWBIN8,CBIN1 AND DELETE IT j . P XCOPY GSWBIN7,CBIN1,CBIN1,EDITBUF,GSWBIN8 P ADD GSWBIN8,CBIN1 6 P INSRT EDITBUF,GSWBIN8,GSWBIN7,S
0x1d6158…1d62ec Dummy {f00=0x00e4, f01=0x0190, f02=»D P EJECT PFSOLVE PROC . P* THE PROCEDURE SOLVES UNEDITED TEXT FROM , P* BUNDTCHECK AND BUNDTGIRO. ^ 0 P* UNSOLVED TEXTS ARE IDENTIFIED BY X'C301XX' P MOVE GSWBIN7,=W'731' P MOVE SPINPUT,=' ' P MOVE GSWSTR2,=X'C301'
0x1d62ec…1d6480 Dummy {f00=0x00e4, f01=0x018e, f02=» PFSOLV15 P ADD GSWBIN8,CBIN1 P DLETE EDITBUF,GSWBIN8,CBIN1 . P MOVE GSWBIN7,CBIN0 R . P XCOPY GSWBIN7,CBIN1,CBIN1,EDITBUF,GSWBIN8 n P ADD GSWBIN8,CBIN1 0 P INSRT EDITBUF,GSWBIN8,GSWBIN7,SPINPUT,CBIN0 P MOVE GSWBIN7,=W'731'
0x1d6480…1d6614 (0, 596) Dummy {f00=0x00e5, f01=0x0190, f02=» PNEWLIN PROC P P MOVE GSWBIN5,P PNEWL10 2 P PERF GENWRF,GTHCDEV,FNEWLIN @ P SUB GSWBIN5,CBIN1 d P CBG GSWBIN5,CBIN0,NEWL10 ~ P RET P PEND P EJECT PPRTADJ PROC ( P* THE PROCEDURE ASKS IF THE FORMULAR & P
0x1d6614…1d67a8 Dummy {f00=0x00e5, f01=0x0190, f02=»FRMADJ P PERF SPCLRA , P IB SPBINW2,PRT010,PRT020,PRT030,PRT040 " P B PRT010 R PPRT020 MAK d P CMP CBIN1,CBIN0 x P B PRT090 PPRT030 ENTER P CMP CBIN0,CBIN0 P B PRT090 PPRT040 CREDIT P CMP CBIN0,C
0x1d67a8…1d693c Dummy {f00=0x00e5, f01=0x0190, f02=»HE MAK-KEY HAS BEEN DEPRESSED, THE COND.REG : P* WILL BE SET TO ZERO, IN ORDER TO ENABLE THE CALLING 4 < P* MODULE TO STOP THE LISTING (OR FOR ANY OTHER PURPOSE) r P PERF SPLIN8,CBIN0,CBIN0 P TESTIO KEYB P BOK KBT10 P CALL ABORT,KEYB
0x1d693c…1d6ad0 Dummy {f00=0x00e5, f01=0x4136, f02=» P CMP CBIN0,CBIN1 PKBT99 P RET . P PEND : P EJECT H PFRMADJ FRMT V P FSL j $ P FTEXT ='PAPIRINDSTILLING OK ?' v P FNL P FKI 1,MAXL=1 P FMEL 'X',GSWBCD1 P FMEND P P PFNEWLIN FRMT
0x1d6ad0…1d6c64 Dummy {f00=0x00e5, f01=0x2008, f02=» NT REMSUB DDUM KMD0 PDIV , ENTRY FMOD : ENTRY FSOLVE N ENTRY NEWLIN d EXT GENWRF z ENTRY PRTADJ EXT SPCLRA ENTRY KBTEST EXT ABORT EXT SPLIN8 INCLUDE EQUATE
0x1d6c64…1d6df8 Dummy {f00=0x00e5, f01=0x0190, f02=»D'6',ADM4230 P SUB GTLEVNR,=D'5' PADM4230 . P MOVE CBDTSUM1,=D'0' > P MOVE CBDTSUM2,=D'0' Z P MOVE CBDTSUM3,=D'0' v " P PERF BDTPRT,CBIN1 CHECK/GIRO P BNOK AD42RET P ATTFMT ADM42FM2 P PERF SPCLRA ( P IB SPBINW2,AD
0x1d6df8…1d6f8c Dummy {f00=0x00e5, f01=0x0190, f02=»EVNR,=D'5' PADM4241 P MOVE CBDTSUM1,=D'0' " P MOVE CBDTSUM2,=D'0' > P MOVE CBDTSUM3,=D'0' Z P PERF BDTPRT,CBIN2 v P BNOK AD42RET P ATTFMT ADM42FM3 P PERF SPCLRA ( P IB SPBINW2,AD42RET,AD42RET,ADM4250 P B AD42RET
0x1d6f8c…1d7120 Dummy {f00=0x00e5, f01=0x0190, f02=»KRESP ( P ADD GTLEVNR,=D'10' SPEICIFICATIONS P MOVE CBDTSUM1,=D'0' : P MOVE CBDTSUM2,=D'0' V P MOVE CBDTSUM3,=D'0' r , P PERF BDTPRT,CBIN3 KREDIT SPECIFICATIONS P BNOK AD42RET P CLEAR CKRESP P B AD42RET P* PAD
0x1d7120…1d72b4 (0, 597) Opaque[0x194]
0x1d72b4…1d7448 # DirEnt {nam=»KM167 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1ca8, f03=0x0000}
0x1d72b4…1d7448 IdxSect {
0x1d72b4…1d7448 f00 = 0x00e5 // 0x1d72b4 @0x0
0x1d72b4…1d7448 f01 = 0x0004 // 0x1d72b6 @0x2
0x1d72b4…1d7448 gno = [ // 0x1d72b8 @0x4
0x1d72b4…1d7448 [0x00]: C0x00e5.0x1.0
0x1d72b4…1d7448 [0x01]: C0x00e5.0x2.0
0x1d72b4…1d7448 ]
0x1d72b4…1d7448 }
0x1d7448…1d75dc Dummy {f00=0x00e5, f01=0x0190, f02=» PSCR PPRT KM167 PPRT C167 " 6 PMES HVIDOVRE KOMMUNE, FELT 90-94, DISK OVERLAY 64K 2 PSCR l PLED KMD08,/S x P!!CH $$EJECT$$ $$ P!!CH $$DCTASK$$DCTSK$$ P!!CH $$26$$20$$ P!!DL 52,60 DK05 -> LP P!!DL 61,62 FD0
0x1d75dc…1d7770 Dummy {f00=0x00e5, f01=0x0190, f02=» 188 PCNFHC STRGI (16),C' ' P!!DL 193,194 * POFF STRGI (12),' ' > $ P!!RE 198,$$FALSE$$TRUE$$ CBKOFLG Z $ P!!RE 199,$$FALSE$$TRUE$$ CKTFLAG & P!!RE 200,$$FALSE$$FALSE$$ CCLKTFLG & P!!RE 201,$$FALSE$$FALSE$$ CTESTFLG 2 P!!RE 202,$
0x1d7770…1d7904 Dummy {f00=0x00e5, f01=0x0190, f02=»RUE$$FALSE$$ CKTAUTO P!!RE 206,$$FALSE$$TRUE$$ DC & P!!RE 207,$$FALSE$$FALSE$$ CCYWRTF @ $ P!!RE 208,$$FALSE$$TRUE$$ CADM22F j & P!!RE 209,$$FALSE$$TRUE$$ C5M DISK $ P!!RE 210,$$TRUE$$FALSE$$ CKASFLG $ P!!RE 211,$$TRUE$$FALSE$$ CSLDFLG
0x1d7904…1d7a98 Dummy {f00=0x00e5, f01=0x0190, f02=»46,$$FALSE$$FALSE$$ CTEXTFLG & P!!RE 247,$$FALSE$$FALSE$$ CSTRKFLG $ & P!!RE 248,$$FALSE$$FALSE$$ CBUDTFLG N P!!DL 287 x 4 PCFLAG BINI (12),X'0051',X'0050',X'0010',X'0010' $ P!!RE 317,$$FALSE$$FALSE$$ BUDGET $ P!!RE 318,$$FALSE$$TRUE$$ FAKT10
0x1d7a98…1d7c2c Dummy {f00=0x00e5, f01=0x018e, f02=»!!RE 401,$$29$$-29$$ $ P!!RE 422,$$FALSE$$TRUE$$ C167FLG 8 P!!RE 432,$$FALSE$$FALSE$$GENERATE LEVNR 5X XXXXXX CC D . P!!RE 433,$$FALSE$$FALSE$$ C539FLG-TINGLEV * P!!RE 434,$$TRUE$$FALSE$$ NO VSL CHECK & P!!RE 440,$$1400$$10000$$ DISK SIZE
0x1d7c2c…1d7dc0 Dummy {f00=0x00e5, f01=0x0190, f02=» t " P!!RE 450,$$20$$20$$ INDEX FILE P!!RE 451,$$5$$5$$ CKTTOP . P!!DL 452,453 N PON STRGI (12),C' ' b P!!DL 777,780 ~ P!!DL 783,784 P!!DL 787,790 P!!DL 796 P!!DL 808,827 P!!DL 828,843 P!!DL 844,855 LP
0x1d7dc0…1d7f54 (0, 598) Dummy {f00=0x00e5, f01=0x0190, f02=» PNOD R PLED SCREEN,/S P!!CH $$KEY461$$KEY461$$ ( P!!CH $$SL461$$SL461$$ H P!!EN f PTRA /S,NL r PINC RGSUB4 PINC RGSTRT PNOD R PINC RGMAIN PINC RGSUBS PINC RGSUB1 PINC RGSUB2 PINC RGSUB3
0x1d7f54…1d80e8 Dummy {f00=0x00e5, f01=0x0190, f02=» PINC ADM5 PINC SUBAPL PINC REMPRD & PINC REMTRD 8 PINC BUDD J PNOD R Z PINC KMDIO h PINC DKSUBS z PNOD R PINC RGFRMT PNOD D PINC ADM6 PINC REMLVD PINC REMTXD PINC REMBDD PINC REMF
0x1d80e8…1d827c Dummy {f00=0x00e5, f01=0x0012, f02=» b P$ASG2 PINC SUBAPL PINC REMPRD & PINC REMTRD 8 PINC BUDD J PNOD R Z PINC KMDIO h PINC DKSUBS z PNOD R PINC RGFRMT PNOD D PINC ADM6 PINC REMLVD PINC REMTXD PINC REMBDD PINC REMF
0x1d827c…1d8410 Dummy {f00=0x00e5, f01=0x2008, f02=» $ASG2 PINC SUBAPL PINC REMPRD & PINC REMTRD 8 PINC BUDD J PNOD R Z PINC KMDIO h PINC DKSUBS z PNOD R PINC RGFRMT PNOD D PINC ADM6 PINC REMLVD PINC REMTXD PINC REMBDD PINC REMF
0x1d8410…1d85a4 Dummy {f00=0x00e5, f01=0x0190, f02=» ! 9B V T W V P D $ V 6 V % V E @ ' T 2 % 7_ 2 # L K8 2" &] Y $! 6P Q $ T 9B I _ _ 6 @ " T 7 $ V P ? W _ G H L V & H HHj 'W 'W '_6
0x1d85a4…1d8738 Dummy {f00=0x00e5, f01=0x0190, f02=» LJv D V, W # L LJv E V $ W D V LJ~ , Wn 6 2 L W " P " # L ;b WF " ;d# _ [ v [ @ K8 @$ Z Z : :B , (Vj ; [ [ K8 z ;AV$ Z H # L ;
0x1d8738…1d88cc Dummy {f00=0x00e5, f01=0x0190, f02=» 6 [ Z 7 J Z 7 : ( :A ( @ " P [ :;H 2 P ;h L : Kj ; V Y : 2! : 6 2 L W& " # L ;b ; : ;f" #?_" W " T & T + : * & !@P `1` P N
0x1d88cc…1d8a60 Dummy {f00=0x00e5, f01=0x0190, f02=» P TF R R ` ; <( Q P # W " <! =# T6W = Z P _ V ^< `_@ R Q <# =_ P :" P * U P 1`! T "# 9e! # K : P8" T * & : * & !`P :J +_ +Q N _0 , V W R
0x1d8a60…1d8bf4 (0, 599) Opaque[0x194]
0x1d8bf4…1d8d88 # DirEnt {nam=»BUDGET«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1cb8, f03=0x0000}
0x1d8bf4…1d8d88 IdxSect {
0x1d8bf4…1d8d88 f00 = 0x00e5 // 0x1d8bf4 @0x0
0x1d8bf4…1d8d88 f01 = 0x0012 // 0x1d8bf6 @0x2
0x1d8bf4…1d8d88 gno = [ // 0x1d8bf8 @0x4
0x1d8bf4…1d8d88 [0x00]: C0x00e5.0x3.0
0x1d8bf4…1d8d88 [0x01]: C0x00e6.0x0.0
0x1d8bf4…1d8d88 [0x02]: C0x00e6.0x1.0
0x1d8bf4…1d8d88 [0x03]: C0x00e6.0x2.0
0x1d8bf4…1d8d88 [0x04]: C0x00e6.0x3.0
0x1d8bf4…1d8d88 [0x05]: C0x00e7.0x0.0
0x1d8bf4…1d8d88 [0x06]: C0x00e7.0x1.0
0x1d8bf4…1d8d88 [0x07]: C0x00e7.0x2.0
0x1d8bf4…1d8d88 [0x08]: C0x00e7.0x3.0
0x1d8bf4…1d8d88 ]
0x1d8bf4…1d8d88 }
0x1d8d88…1d8f1c Dummy {f00=0x00e5, f01=0x0190, f02=» P IDENT BUDGET P DDUM KMD08 P PDIV . P ENTRY BUDREG < P EXT SPCLRA R P EXT SPCLRN f P EXT SPERR z P EXT RAWRIT P EXT RAREAD P EXT GENWRS P EXT GENWRF P EXT SKIP P EXT FMOVE P EXT FRM
0x1d8f1c…1d90b0 Dummy {f00=0x00e5, f01=0x0190, f02=» RGREAD P EXT WAITF P EJECT " PBUDREG PROC 0 4 P************************************************ D P* | * P* THIS PROCEDURE PROCESSES TRANS 40-49 P* 4 P*********************************************** P P TEST CBUD
0x1d90b0…1d9244 Dummy {f00=0x00e5, f01=0x0190, f02=»IVE h $ P PERF BUDSTRT RESTART ON 1. CALL P BNOK BUDEND 4 P CLEAR GTASTFLG H PBUD000 ` P SET SPPROMPT n P ATTFMT BU00FRMT PBUD010 P PERF SPCLRA 6 P IB SPBINW2,BUD000,BUDEND,BUD050,BUD700,BUDEND, C " P BUDEND,BUDEND,
0x1d9244…1d93d8 Dummy {f00=0x00e5, f01=0x018e, f02=»R | P SUB GSWBIN1,=W'39' 0 P IB GSWBIN1,BUD400,BUD410,BUD420,BUD010, C & 0 P BUD010,BUD450,BUD460,BUD470,BUD480,BUD490 Z " P B BUD010 INVALID TRANSACTION P PBUD400 P ATTFMT BU40FRM PBUD401 : P MOVE GTDUPF(CBIN14),GTD
0x1d93d8…1d956c Dummy {f00=0x00e5, f01=0x0190, f02=» P IB SPBINW2,BUD000,BUD500 P PERF TR40GEN & P B BUD401 < P N P V PBUD410 ^ P ATTFMT BU41FRM l PBUD411 ( P MOVE GTDUPF(CBIN14),GTDUPF(CBIN15) P SUB GTDUPF(CBIN14),=D'1' P ADD GTANTAL,=D'1' P PERF SETDEB
0x1d956c…1d9700 Dummy {f00=0x00e5, f01=0x0190, f02=»T BU42FRM PBUD421 ( P MOVE GTDUPF(CBIN14),GTDUPF(CBIN15) P SUB GTDUPF(CBIN14),=D'1' L P PERF SETDEB n P ADD GTANTAL,=D'1' P PERF SPCLRA P IB SPBINW2,BUD000,BUD500 P PERF TR42GEN P B BUD421 P P
0x1d9700…1d9894 (0, 600) Dummy {f00=0x00e6, f01=0x0190, f02=»00,BUD500 P PERF TR45GEN P CLEAR SPPROMPT ( P B BUD451 @ P R P Z PBUD460 b P ATTFMT BU46FRM p PBUD461 P ADD GTANTAL,=D'1' P PERF SETDEB P PERF SPCLRA P IB SPBINW2,BUD000,BUD500 P PERF TR46GEN
0x1d9894…1d9a28 Dummy {f00=0x00e6, f01=0x0190, f02=» ~ P PERF SETDEB P PERF SPCLRA P IB SPBINW2,BUD000,BUD500 0 P PERF TR47GEN R P CLEAR SPPROMPT h P B BUD471 P P PBUD480 P ATTFMT BU48FRM PBUD481 P ADD GTANTAL,=D'1' P PERF SETDEB P PER
0x1d9a28…1d9bbc Dummy {f00=0x00e6, f01=0x0190, f02=» P ATTFMT BU49FRM PBUD491 P ADD GTANTAL,=D'1' . P PERF SETDEB H P PERF SPCLRA P IB SPBINW2,BUD000,BUD500 p P PERF TR49GEN P CLEAR SPPROMPT P B BUD491 P P PBUD500 P MOVE GSWBIN1,GTREGNR
0x1d9bbc…1d9d50 Dummy {f00=0x00e6, f01=0x018e, f02=» t & P PERF BUWRIT INDICATE TRANSCHANGE P B BUD000 2 P D P L PBUD700 T : P* THE PART OF THE PROGRAM SEEKS FOR REG. TRANSACTIONS b , P* THE TRANS WILL BE DISPLAYED AND CAN BE 4 P* CORRECTED. AFTERWARDS IT WILL BE WRITTEN BACK P
0x1d9d50…1d9ee4 Dummy {f00=0x00e6, f01=0x018e, f02=» ( P* GSWBCD6 CONTAINS TRANSCODE (40-49) " P* GSWBCD7 CONTAINS REGKONTONR 0 P MOVE GTRECNR,CRECNR V PBUD712 r " P SUB GTRECNR,CBIN1 NEXT RECORD * P CBNG GTRECNR,CBIN1,BUD750 FINISHED ? . P PERF RGREAD,DK02,=D'2',CBIN2 READ RECORD P B
0x1d9ee4…1da078 Dummy {f00=0x00e6, f01=0x0190, f02=» P PERF NULSTIL P MOVE GSWBIN1,GTREGNR P SUB GSWBIN1,=W'39' 8 P CLEAR TTEORFLG T 6 P IB GSWBIN1,BUD740,BUD741,BUD742,BUD743,BUD744, C l ( P BUD745,BUD746,BUD747,BUD748,BUD749 PBUD740 P ATTFMT BU40FRM P PERF SETDEB
0x1da078…1da20c Dummy {f00=0x00e6, f01=0x0190, f02=»TTFMT BU41FRM P PERF SETDEB P PERF SPCLRN * P CBNE SPBINW2,CBIN3,BUD750 > P PERF TR41GEN ` P PERF DELRECS v P B BUD750 PBUD742 P ATTFMT BU42FRM P PERF SETDEB P PERF SPCLRN P CBNE SPBINW2,CBIN3,BUD750
0x1da20c…1da3a0 Dummy {f00=0x00e6, f01=0x0190, f02=»BU45FRM P PERF SETDEB P PERF MOV56INV $ P PERF SPCLRN : P CBNE SPBINW2,CBIN3,BUD750 N P PERF TR45GEN p P PERF DELRECS P B BUD750 PBUD746 P ATTFMT BU46FRM P PERF SETDEB P PERF MOV56INV P PERF SPCL
0x1da3a0…1da534 (0, 601) Dummy {f00=0x00e6, f01=0x0190, f02=» P PERF SETDEB P PERF MOV56INV P PERF SPCLRN 2 P CBNE SPBINW2,CBIN3,BUD750 F P PERF TR47GEN h P PERF DELRECS ~ P B BUD750 PBUD748 P ATTFMT BU48FRM P PERF SETDEB P PERF SPCLRN P CBNE SPBINW2,CBIN3,
0x1da534…1da6c8 Dummy {f00=0x00e6, f01=0x0190, f02=»ERF SPCLRN P CBNE SPBINW2,CBIN3,BUD750 P PERF TR49GEN 4 P PERF DELRECS J PBUD750 ` P B BUD700 n PBUD760 P CALL FMOVE,GTSTRFMT,STJFRM P PERF BUWRIT P B BUD000 P PBUD900 $ P* PRINT LOGFILE, INSERT HE
0x1da6c8…1da85c Dummy {f00=0x00e6, f01=0x0190, f02=»,CLEVBUF,GSWBIN8,CBUDPT x P BNOK PRT095 P MOVE GSWSTR2,CLEVBUF 4 . P CBE GSWSTR2,='SL',PRT080 EMPTY PRINTFILE R P CBNE GSWSTR2,='**',PRT024 P ADD CBUDPT,CBIN1 P B PRT022 PPRT024 P PERF OVSKR PPRT030 P DLETE
0x1da85c…1da9f0 Dummy {f00=0x00e6, f01=0x0190, f02=»IS PIECE OF CODING SPLITS PRINTLINES FROM 8 P* THE PRINTFILE (DK12) INTO TWO PHYSICAL PRINTLINES. 2 PPRT031 n P MOVE GSWSTR9,='*' | P MOVE GSWBIN1,CBIN0 P MOVE GSWBIN2,=W'128' 6 P MATCH CLEVBUF,GSWBIN1,GSWBIN2,GSWSTR9,CBIN0,CBIN1 (
0x1da9f0…1dab84 Dummy {f00=0x00e6, f01=0x018e, f02=»BIN1 SAVE POS ON '*' ~ P MOVE GSWBIN1,=W'128' P SUB GSWBIN1,GSWBIN10 : 4 P DLETE CLEVBUF,GSWBIN10,GSWBIN1 DELETE LAST PART X 2 P PERF GENWRF,GTHCDEV,BUSUB10 PRINT FIRST PART P MOVE CLEVBUF,CBLANKS P MOVE GSWBIN1,=W'128' P SUB G
0x1dab84…1dad18 Dummy {f00=0x00e6, f01=0x0190, f02=» * P ADD GTLINE,CBIN2 ADJUST LINE COUNTER PPRT034 2 P PERF GENWRF,GTHCDEV,BUSUB10 @ P ADD CBUDPT,CBIN1 d P ADD GTLINE,CBIN2 ~ P CLEAR CLEVFLG P DELAY CBIN2 SWTICH TASK P PERF WAITF,CLEVFLG P MOVE GSWBIN8,=W'128' 4 P
0x1dad18…1daeac Dummy {f00=0x00e6, f01=0x0190, f02=» ( P CBE GSWSTR2,='**',PRT040 NEW PAGE ? P CBNL GTLINE,=W'43',PRT035 0 P MOVE GSWBCD2,GSWSTR2 R P MOVE GSWBIN10,GSWBCD2 p P SUB GSWBIN10,=W'39' P B PRT030 PPRT035 P MOVE GSWBCD5,=D'1' P PERF SKIP P CBE GSWSTR2,='S
0x1daeac…1db040 Dummy {f00=0x00e6, f01=0x0190, f02=» 8 P SUB GSWBIN10,GTLINE HOW MANY NEW LINES DO WE NEED? P PERF NEWLIN,GSWBIN10 @ P B PRT035 ^ PPRT080 p * RESET VARIOUS POINTERS ~ P MOVE CLEVBUF,=C'SLUTD ' * P PERF RAWRIT,DK12,=D'12',CLEVBUF,CBIN1 P BNOK PRT095 P MOVE CB
0x1db040…1db1d4 (0, 602) Dummy {f00=0x00e6, f01=0x018e, f02=» P CMP CBIN0,CBIN1 PPRT099 B BUD000 . P @ P H PBUDEND P , P SUB CTASKNR,CBIN1 REMOVE FROM ACTIVITY ^ P PERF PACKCL P CLEAR GTASTFLG PBUDRET P RET P PEND P EJECT BUDSTRT PROC P*
0x1db1d4…1db368 Dummy {f00=0x00e6, f01=0x0190, f02=» " P* (ONLY AFTER PROGRAM-LOAD) ( P* 2. WHEN THE PROGRAM IS LOADED AND * ( P* THE FILE IS NOT EMPTY, THE PROC V * P* WILL SCAN THE FILE IN SEARCH FOR & P* A 'SLUTD' RECORD, AND CBUDPT & P* WILL BE UPDATED ACCORDINGLY. $ P* 3.
0x1db368…1db4fc Dummy {f00=0x00e6, f01=0x0190, f02=»BIN0,BST090 FIRST RUN AFTER LOAD ? P PERF WAITF,CLEVFLG * P MOVE CLEVBUF,=C' ' F P MOVE CBUDPT,CBIN1 b P MOVE GSWBIN8,=W'128' | 4 P PERF RAREAD,DK12,=D'12',CLEVBUF,GSWBIN8,CBUDPT P BNOK BST095 P MOVE GSWSTR20,CLEVBUF . P CBE
0x1db4fc…1db690 Dummy {f00=0x00e6, f01=0x0190, f02=» P MOVE GSWBIN8,=W'128' 4 P PERF RAREAD,DK12,=D'12',CLEVBUF,GSWBIN8,CBUDPT " P BNOK BST095 Z P MOVE GSWSTR20,CLEVBUF n $ P CBE GSWSTR20,=C'SLUTD ',BST080 P ADD CBUDPT,CBIN1 P B BST045 PBST060 INITIATE P MOVE CLEVBUF,
0x1db690…1db824 Dummy {f00=0x00e6, f01=0x0190, f02=»* ISOLATE YEAR " P MOVE GSWBCD1,CMASKDAT DDMMYY P DIV GSWBCD1,=D'100' DDMM < P MUL GSWBCD1,=D'100' DDMM00 ` P MOVE GSWBCD2,CMASKDAT P SUB GSWBCD2,GSWBCD1 YY P SUB GSWBCD2,=D'2' P MOVE GSWBIN2,CBIN13 PBST092 "
0x1db824…1db9b8 Dummy {f00=0x00e6, f01=0x0190, f02=»,CBIN0 P B BST099 PBST095 P MOVE CBUDPT,CBIN0 . P CLEAR CLEVFLG H P CMP CBIN0,CBIN1 ^ PBST099 v P RET P PEND P EJECT TR40GEN PROC P CBG SPBINW2,CBIN3,TR40EX P PERF TOTADD P PERF TRGEN,=W'16'
0x1db9b8…1dbb4c Dummy {f00=0x00e6, f01=0x0190, f02=»TOTADD P PERF TRGEN,=W'17' P PERF BUEDIT ( PTR41EX < RET J PEND V d l TR42GEN PROC t P CBG SPBINW2,CBIN3,TR42EX P PERF TOTADD P PERF TRGEN,=W'18' P PERF BUEDIT PTR42EX RET P
0x1dbb4c…1dbce0 Dummy {f00=0x00e6, f01=0x0190, f02=» PERF BUEDIT ( P MOVE GTDUPF(CBIN14),GTREGF(CBIN14) P PERF TRGEN,=W'19' @ PTR45EX Z RET h PEND t TR46GEN PROC P CBG SPBINW2,CBIN3,TR46EX P PERF MOV56 & P ADD GTREGF(CBIN18),GTREGF(CBIN17) P P
0x1dbce0…1dbe74 (0, 603) Dummy {f00=0x00e6, f01=0x0190, f02=» TR47GEN PROC P CBG SPBINW2,CBIN3,TR47EX P PERF MOV56 > & P ADD GTREGF(CBIN18),GTREGF(CBIN17) R P PERF BUEDIT | ( P MOVE GTDUPF(CBIN14),GTREGF(CBIN14) P PERF TRGEN,=W'21' PTR47EX RET PEND
0x1dbe74…1dc008 Dummy {f00=0x00e6, f01=0x0190, f02=»EDIT PTR48EX RET PEND & 4 < TR49GEN PROC D P CBG SPBINW2,CBIN3,TR49EX X & P ADD GTREGF(CBIN18),GTREGF(CBIN4) z P PERF TRGEN,=W'23' P PERF BUEDIT PTR49EX RET PEND P P
0x1dc008…1dc19c Dummy {f00=0x00e6, f01=0x0190, f02=»N5) r & P ADD GTREGF(CBIN17),GTREGF(CBIN6) & P ADD GTREGF(CBIN18),GTREGF(CBIN7) 6 & P ADD GTREGF(CBIN19),GTREGF(CBIN8) ` & P ADD GTREGF(CBIN20),GTREGF(CBIN9) & P ADD GTREGF(CBIN21),GTREGF(CBIN10) P RET P PEND P P P
0x1dc19c…1dc330 Dummy {f00=0x00e6, f01=0x0190, f02=» MOVE GSWSTR20,=' ' P MOVE GSWBIN10,GSWBIN1 ! 4 P IB GSWBIN1,OVS40,OVS41,OVS42,OVSERR,OVSERR, C ! : $ P OVS45,OVS46,OVS47,OVS48,OVS49 ! r P B OVSERR ! POVS40 ! P MOVE GSWSTR20,='BUDGETTAL ' ! P B OVSPR ! POVS41 ! P MOVE GSWSTR
0x1dc330…1dc4c4 Dummy {f00=0x00e6, f01=0x0190, f02=»'TILL[GSBEV. BUDGET ' ! P B OVSPR " POVS46 " . $ P MOVE GSWSTR20,='OMPLACERINGER ' " < P B OVSPR " d POVS47 " t * P MOVE GSWSTR20,='SUM AF R]DIGHEDSB. ' " P B OVSPR " POVS48 " ( P MOVE GSWSTR20,='ANL[GSUDGIFTER-TB ' " P B OVSPR "
0x1dc4c4…1dc658 Dummy {f00=0x00e6, f01=0x0190, f02=»FMT " v P MOVE GTLINE,CBIN4 # P RET # & P PEND # 2 P # @ P # H PBUEDIT PROC # P P MOVE GSWBIN1,GTREGNR # d P SUB GSWBIN1,=W'39' # P PERF FRMBUD,GSWBIN1 # P PERF BUWRIT # P RET # P PEND # P # P # PBUWRIT PROC #
0x1dc658…1dc7ec Dummy {f00=0x00e6, f01=0x0190, f02=»FLG,BUW090 # PBUW020 $ P CLEAR GTASTFLG $ . P ADD CBUDPT,CBIN1 WRITE A NEW SLUTD BEFORE $ 8 4 P MOVE CLEVBUF,=C'SLUTD ' CORRUPTING THE OLD ONE $ j , P PERF RAWRIT,DK12,=D'12',CLEVBUF,CBUDPT $ P BNOK BUW095 $ P SUB CBUDPT,CBIN1 $ P EDIT CL
0x1dc7ec…1dc980 Dummy {f00=0x00e6, f01=0x0190, f02=»F $ | P CBNE GSWSTR2,='**',BUW090 % P SET GTASTFLG % , PBUW090 % B P CLEAR CLEVFLG % P P CMP CBIN0,CBIN0 % f P B BUW099 % ~ PBUW095 % P CLEAR CLEVFLG % P CMP CBIN0,CBIN1 % PBUW099 % P RET % P PEND % P % P % PMOV5
0x1dc980…1dcb14 (0, 604) Dummy {f00=0x00e7, f01=0x0190, f02=» IS: % & P* FIELDNR := REGYEAR + 4 - ACTYEAR & P MOVE GTUSED(CBIN5),CBIN0 & 6 P MOVE GSWBCD1,GTREGF(CBIN14) & X P ADD GSWBCD1,=D'4' & | P SUB GSWBCD1,GTDUPF(CBIN15) & P MOVE GSWBIN1,GSWBCD1 & ( P MOVE GTREGF(GSWBIN1),GTREGF(CBIN17) & P MOV
0x1dcb14…1dcca8 Dummy {f00=0x00e7, f01=0x0190, f02=»TREGF(CBIN14) & P RET ' P PEND ' " P ' 0 P ' 8 PMOV56INV PROC ' @ $ P CBE GTUSED(CBIN3),CBIN0,MOV561 ' V P MOVE GSWBIN1,CBIN3 ' ~ P B MOV563 ' PMOV561 ' $ P CBE GTUSED(CBIN4),CBIN0,MOV562 ' P MOVE GSWBIN1,CBIN4 ' P B MOV563
0x1dcca8…1dce3c Dummy {f00=0x00e7, f01=0x0190, f02=» ' t P ADD GSWBIN2,GSWBIN1 ( P SUB GSWBIN2,CBIN4 ( $ P MOVE GTPRTDAT,GSWBIN2 YEEAR ( > P MOVE GTREGF(CBIN14),GSWBIN2 ( b P RET ( P PEND ( P ( P ( PDELRECS PROC ( P PERF WAITF,CPFLG ( P MOVE GSWBIN1,=W'128' ( 4 P PERF RAREAD
0x1dce3c…1dcfd0 Dummy {f00=0x00e7, f01=0x0190, f02=»BE CRECLGD,=W'128',DELREC3 ( P CLEAR GTSWFLAG ) " PDELREC3 ) : P EDIT CPCKBUF,PCKINIT ) J . P COPY CPCKBUF,CBIN0,CBIN20,GSWSTR20,CBIN0 ) h P MOVE GSWSTR9,=X'7F' ) , P COPY CPCKBUF,CBIN20,CBIN1,GSWSTR9,CBIN0 ) , P PERF RAWRIT,DK02,=D'2',CPCKBUF,GS
0x1dcfd0…1dd164 Dummy {f00=0x00e7, f01=0x0190, f02=»' ) | 4 P PERF RAREAD,DK02,=D'2',CPCKBUF,GSWBIN1,GSWBIN9 * P BNOK DELREC2 * B > P COPY GSWSTR20,CBIN6,CBIN5,CPCKBUF,CBIN6 MOVE LOBENR ONLY * X & P B DELREC1 AND DELETE CONT.RECORD * PDELREC9 * P CLEAR CPFLG * P RET * P PEND * P *
0x1dd164…1dd2f8 Dummy {f00=0x00e7, f01=0x0190, f02=»OVE GTUSED(CBIN17),CBIN0 * P MOVE GTUSED(CBIN18),CBIN0 + P MOVE GTUSED(CBIN19),CBIN0 + B P MOVE GTUSED(CBIN20),CBIN0 + d P MOVE GTUSED(CBIN21),CBIN0 + P MOVE GTREGDEX,$W + P CBG SPBINW2,CBIN3,TRGEN1 + P PERF PACKST,CBIN15 + P PERF WR
0x1dd2f8…1dd48c Dummy {f00=0x00e7, f01=0x0190, f02=»N9 + P RET , P PEND , P , $ P , , PNULSTIL PROC , 4 P MOVE GTREGF(CBIN14),=D'0' , H P MOVE GTREGF(CBIN15),=D'0' , j P MOVE GTREGF(CBIN16),=D'0' , P MOVE GTREGF(CBIN17),=D'0' , P MOVE GTREGF(CBIN18),=D'0' , P MOVE GTREGF(CBIN19),=
0x1dd48c…1dd620 Dummy {f00=0x00e7, f01=0x018e, f02=» FRMT MENU , FSL - FCOPY =X'5C343020' - FCOPY ='BUDGETTAL ' - < FCOPY ='UDEN ' - X FCOPY ='BUDGETTERINGSKODE' - p FNL - FCOPY =X'5C343120' - FCOPY ='BUDGETTAL ' - FCOPY ='MED ' - FCOPY ='BUDGETTERINGSKODE
0x1dd620…1dd7b4 (0, 605) Dummy {f00=0x00e7, f01=0x0190, f02=» FCOPY ='BUDGETTERINGSKODE' . FNL . ( P FCOPY =X'5C343520' . 4 " P FCOPY ='TILL[GSBEV. BUDGET ' . P FNL . v FCOPY =X'5C343620' . P FCOPY ='OMPLACERINGER ' . FNL . FCOPY =X'5C343720' . " P FCOPY ='SUM AF R]DIGHEDSB. ' .
0x1dd7b4…1dd948 Dummy {f00=0x00e7, f01=0x018e, f02=»NDT[GTER-TB ' . FNL / FNL / " * P FCOPY ='INDTAST TRANSAKTIONSKODE: ' / . P FILLR X'5C',1 / P FKI 29,MINL=2,MAXL=2,NUM / r P / P FMEL 'XX',GTREGNR / FNL / , P FCOPY ='ELLER TRYK "KVIT" ELLER "KRE"' / FMEND / P / P
0x1dd948…1ddadc Dummy {f00=0x00e7, f01=0x0190, f02=» P FMEL 'ZZ',GSWBCD6 0 P FTAB 25 0 P 0 . P FCOPY ='PLUS REGKONTONR ' 0 6 ( P FKI 41,MINL=4,MAXL=10,ME,NUM,REWRT 0 X $ P FMEL 'ZZZE-ZZZE-ZZE-ZZ',GSWBCD7 0 P FMEND 0 0 0 0 BU40FRM FRMT 0 FSL 0 FCOPY =X'5C343020' 0
0x1ddadc…1ddc70 Dummy {f00=0x00e7, f01=0x018e, f02=» FLINK BUSUB1 1 FLINK BUSUB3 1 FLINK BUSUB2 1 0 FMEND 1 F 1 T 1 1 d BU42FRM FRMT 1 l FSL 1 FCOPY =X'5C343220' 1 FLINK BUSUB1 1 FLINK BUSUB3 1 FLINK BUSUB2 1 FMEND 1 1 1
0x1ddc70…1dde04 Dummy {f00=0x00e7, f01=0x0190, f02=» 1 FMEND 2 2 2 BU46FRM FRMT 2 & FSL 2 : FCOPY =X'5C343620' 2 F P FCOPY ='OMPLACERINGER ' 2 b FLINK BUSUB4 2 FILLR ' ',5 2 P FCOPY ='DET.KODE/LBNR: ' 2 P FLINK BUSUB7 2 P FLINK BUSUB5 2 FMEND 2
0x1dde04…1ddf98 Dummy {f00=0x00e7, f01=0x0190, f02=»EL1 2 P FLINK BUSUB8 3 FLINK BUSUB5 3 " FMEND 3 8 3 F 3 N BU48FRM FRMT 3 V FSL 3 j FCOPY =X'5C343820' 3 v P FCOPY ='ANL[GSUDGIFTER-TB ' 3 FLINK BUSUB6 3 P FLINK BUSUB9 3 FMEND 3 3 3 BU49FRM
0x1ddf98…1de12c Dummy {f00=0x00e7, f01=0x0190, f02=»MEND 3 P 4 4 4 BUBEL1 FRMT 4 $ FCOPY ='BUDGETBEL' 4 8 P FILLR X'5C',1 4 T FCOPY ='B ]R: ' 4 j FMEND 4 4 4 BUBEL2 FRMT 4 FCOPY ='BUDG.BEL' 4 FILLR X'5C',1 4 FILLR 'B',1 4 FMEND 4 4
0x1de12c…1de2c0 Dummy {f00=0x00e7, f01=0x018e, f02=» 8 P FKI 55,APPL=64,MINL=1,MAXL=1,ME,DUPL=GTDUPF(CBIN12) 5 FMEL 'X',GTREGF(CBIN12) 5 @ FNL 5 ` FNL 5 l FCOPY ='LINNR: ' 5 x P FMEL 'ZZZ9',GTANTAL 5 P FILLR ' ',5 5 FCOPY ='REGKONTONR: ' 5 6 P FKI 33,APPL=5,MINL=10,MAXL=10,ME,SCHK=1
0x1de2c0…1de454 (0, 606) Dummy {f00=0x00e7, f01=0x0190, f02=» 5 FNL 6 FNL 6 P FCOPY ='BUDGET]R' 6 P FMEL 'B99',GTDUPF(CBIN14) 6 : FCOPY =' BUDGET]R' 6 P FMEL 'B99',GTDUPF(CBIN15) 6 x P FNL 6 2 P FKI 1,MINL=1,MAXL=10,NUM,SCHK=4,REWRT,APPL=55 6 ( P FMEL 'ZZZZZZZVZZX-B',GTREGF(CBIN3) 6 8 P
0x1de454…1de5e8 Dummy {f00=0x00e7, f01=0x018e, f02=» 6 P FNL 7 P FCOPY ='BUDGET]R' 7 P FMEL 'B99',GTDUPF(CBIN16) 7 . FCOPY =' BUDGET]R' 7 P P FMEL 'B99',GTDUPF(CBIN17) 7 l FCOPY =' BUDGET]R' 7 P FMEL 'B99',GTDUPF(CBIN18) 7 FCOPY =' BUDGET]R' 7 P FMEL 'B99',GTDUPF(CBIN19) 7
0x1de5e8…1de77c Dummy {f00=0x00e7, f01=0x0190, f02=» 6 P FKI 1,MINL=1,MAXL=10,NUM,SCHK=4,REWRT,APPL=57, C 8 P DUPL=GTREGF(CBIN4) 8 > ( P FMEL 'ZZZZZZZVZZX-B',GTREGF(CBIN5) 8 Z 8 P FKI 14,MINL=1,MAXL=10,NUM,SCHK=4,REWRT,APPL=58, C 8 P DUPL=GTREGF(CBIN5) 8 ( P FMEL 'ZZZZZZZVZZX-B',GTREGF(CBIN6) 8 8
0x1de77c…1de910 Dummy {f00=0x00e7, f01=0x018e, f02=»KI 40,MINL=1,MAXL=10,NUM,SCHK=4,REWRT,APPL=60, C 8 P DUPL=GTREGF(CBIN7) 9 : ( P FMEL 'ZZZZZZZVZZX-B',GTREGF(CBIN8) 9 V 8 P FKI 53,MINL=1,MAXL=10,NUM,SCHK=4,REWRT,APPL=61, C 9 P DUPL=GTREGF(CBIN8) 9 ( P FMEL 'ZZZZZZZVZZX-B',GTREGF(CBIN9) 9 8 P F
0x1de910…1deaa4 Dummy {f00=0x00e7, f01=0x0190, f02=» 9 FNL : FNL : FNL : FCOPY ='TOTAL:' : , FNL : D ( P FMEL 'ZZZZZZZVZZ9-B',GTREGF(CBIN14) : P ( P FMEL 'ZZZZZZZVZZ9-B',GTREGF(CBIN15) : | P FNL : ( $ FMEL 'ZZZZZZZVZZ9-B',GTREGF(CBIN16) : ( $ FMEL 'ZZZZZZZVZZ9-B',GTREGF(CBIN17) :
0x1deaa4…1dec38 Dummy {f00=0x00e7, f01=0x0190, f02=» FMEL 'ZZZZZZZVZZ9-B',GTREGF(CBIN21) : FMEND ; , ; : ; B BUSUB3 FRMT ; J P FILLR ' ',3 ; ^ " FCOPY ='BUDGETTERINGSKODE: ' ; r 0 P FKI 67,APPL=54,MINL=1,MAXL=10,ME,REWRT, C ; P DUPL=GTDUPF(CBIN2) ; ( # FMEL 'XBXXXXBXXXBXX',GTREGF(CBI
0x1dec38…1dedcc Dummy {f00=0x00e7, f01=0x018e, f02=»NL=2,MAXL=2,ME,NUM,APPL=120, C ; P DUPL=GTPRTDAT < ( P FMEL 'XX',GTREGF(CBIN14) < @ FMEND < b < p < x BUSUB5 FRMT < FNL < P FCOPY ='REGKONTONR ' < P FILLR ' ',4 < FLINK BUBEL2 < FNL < 6 P FKI 1,MINL=10,MAXL=
0x1dedcc…1def60 Dummy {f00=0x00e7, f01=0x0190, f02=» < ( P FMEL 'ZZZZZZZVZZX-',GTREGF(CBIN17) = FMEND = 4 = B = J BUSUB6 FRMT = R FNL = f FNL = r FCOPY ='TILL[GSBEV.DATO: ' = ~ & P FKI 18,MINL=6,MAXL=6,APPL=63, C = . P ME,NUM,REWRT,SCHK=2,DUPL=GTDUPF(CBIN11) = $ FMEL 'XXV
0x1def60…1df0f4 (0, 607) Dummy {f00=0x00e7, f01=0x0190, f02=» = X FMEL 'XXXX',GTREGF(CBIN13) > P FMEND > , P > : P > B PBUSUB8 FRMT > J 8 P FKI 18,MINL=2,MAXL=2,NUM,ME,APPL=120,DUPL=GTPRTDAT > ^ P FMEL 'XX',GTREGF(CBIN14) > P FMEND > P > P > PBUSUB9 FRMT > P FNL > P FCOPY ='PROJE
0x1df0f4…1df288 Dummy {f00=0x00e7, f01=0x0190, f02=»(CBIN1) > | P FMEL 'XXXX',GTREGF(CBIN1) ? 6 P FKI 16,MINL=1,MAXL=11,ME,APPL=56,NUM,SCHK=4,REWRT ? 2 & P FMEL 'ZZZZZZZVZZX-',GTREGF(CBIN4) ? l FMEND ? P ? P ? PBUSUB10 FRMT ? P FILLR '0',2 ? P FCOPY CLEVBUF ? P FEOR ? P FMEND ?
0x1df288…1df41c Dummy {f00=0x00e7, f01=0x40a8, f02=»ILLR ' ',40 ? P FBT GTSWFLAG,PCKI10 @ P FILLR X'00',48 @ 0 P FEXIT @ H PPCKI10 @ V P FILLR ' ',48 @ d P FMEND @ z P @ P @ END @ @ @ P ? PBUSUB10 FRMT ? P FILLR '0',2 ? P FCOPY CLEVBUF ? P FEOR ? P FMEND ?
0x1df41c…1df5b0 Dummy {f00=0x00e7, f01=0x2008, f02=» A LR ' ',2 FMEND & . END 6@ BZVZZZVZZZ-',GTREGF(CBIN17) < FMEND h v ~ BUSUB14 FRMT FILLR '+',2 ( $ FMEL '99V99V99',GTREGF(CBIN11) DATE FILLR ' ',3 FMEL '99',GTREGF(CBIN16)
0x1df5b0…1df744 Dummy {f00=0x00e7, f01=0x018e, f02=» ( P* GSWBCD6 CONTAINS TRANSCODE (40-49) " P* GSWBCD7 CONTAINS REGKONTONR 0 P MOVE GTRECNR,CRECNR V PBUD712 r " P SUB GTRECNR,CBIN1 NEXT RECORD * P CBNG GTRECNR,CBIN1,BUD750 FINISHED ? . P PERF RGREAD,DK02,=D'2',CBIN2 READ RECORD P B
0x1df744…1df8d8 Dummy {f00=0x00e7, f01=0x0190, f02=» P PERF NULSTIL P MOVE GSWBIN1,GTREGNR P SUB GSWBIN1,=W'39' 8 P CLEAR TTEORFLG T 6 P IB GSWBIN1,BUD740,BUD741,BUD742,BUD743,BUD744, C l ( P BUD745,BUD746,BUD747,BUD748,BUD749 PBUD740 P ATTFMT BU40FRM P PERF SETDEB
0x1df8d8…1dfa6c Dummy {f00=0x00e7, f01=0x0190, f02=»TTFMT BU41FRM P PERF SETDEB P PERF SPCLRN * P CBNE SPBINW2,CBIN3,BUD750 > P PERF TR41GEN ` P PERF DELRECS v P B BUD750 PBUD742 P ATTFMT BU42FRM P PERF SETDEB P PERF SPCLRN P CBNE SPBINW2,CBIN3,BUD750
0x1dfa6c…1dfc00 Dummy {f00=0x00e7, f01=0x0190, f02=»BU45FRM P PERF SETDEB P PERF MOV56INV $ P PERF SPCLRN : P CBNE SPBINW2,CBIN3,BUD750 N P PERF TR45GEN p P PERF DELRECS P B BUD750 PBUD746 P ATTFMT BU46FRM P PERF SETDEB P PERF MOV56INV P PERF SPCL
0x1dfc00…1dfd94 (0, 608) Opaque[0x194]
0x1dfd94…1dff28 # DirEnt {nam=»KM235 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1d00, f03=0x0000}
0x1dfd94…1dff28 IdxSect {
0x1dfd94…1dff28 f00 = 0x00e8 // 0x1dfd94 @0x0
0x1dfd94…1dff28 f01 = 0x0004 // 0x1dfd96 @0x2
0x1dfd94…1dff28 gno = [ // 0x1dfd98 @0x4
0x1dfd94…1dff28 [0x00]: C0x00e8.0x0.0
0x1dfd94…1dff28 [0x01]: C0x00e8.0x1.0
0x1dfd94…1dff28 ]
0x1dfd94…1dff28 }
0x1dff28…1e00bc Dummy {f00=0x00e8, f01=0x0190, f02=» PPRT KM235 PPRT C235 & PMES STENLOSE KOMMUNE, REMITTERING & PMES INCLUDES BUDGET P PSCR l PLED KMD08,/S x P!!CH $$26$$22$$ P!!CH $$-4$$4$$ TRANS 40 $ P!!RE 41,$$56$$100$$ SCREEN SIZE P!!DL 61,62 FD03,FD04 P
0x1e00bc…1e0250 Dummy {f00=0x00e8, f01=0x0190, f02=»4E4F' DV ADR, GTP/LP t P!!DL 186 " PMF1CU STRG X'E9C9' CU ADDRESS , P!!DL 188 R PCNFHC STRGI (16),'GA',' ' b P!!DL 193,194 " POFF STRGI (12)2C'TD',' ',' ' $ P!!RE 198,$$FALSE$$TRUE$$ CBKOFLG $ P!!RE 199,$$FALSE$$TRUE$$ CKTFLAG
0x1e0250…1e03e4 Dummy {f00=0x00e8, f01=0x0190, f02=»03,$$FALSE$$FALSE$$ CFLT46 $ P!!RE 204,$$FALSE$$FALSE$$ CFLT48 " $ P!!RE 205,$$TRUE$$TRUE$$ CKTAUTO J P!!RE 206,$$FALSE$$TRUE$$ DC r & P!!RE 207,$$FALSE$$FALSE$$ CCYWRTF & P!!RE 208,$$FALSE$$FALSE$$ CADM22F & P!!RE 209,$$FALSE$$FALSE$$ C5MD
0x1e03e4…1e0578 Dummy {f00=0x00e8, f01=0x0190, f02=»RE 213,$$FALSE$$FALSE$$ CCONVERT & P!!RE 237,$$FALSE$$TRUE$$ CREMITFL ( & P!!RE 246,$$FALSE$$TRUE$$ CTEXTFLG R & P!!RE 247,$$FALSE$$TRUE$$ CSTRKFLG | & P!!RE 248,$$FALSE$$TRUE$$ CBUDTFLG P!!DL 287 $ PCFLAG BINI (12),X'0051',X'0068' . P
0x1e0578…1e070c Dummy {f00=0x00e8, f01=0x018e, f02=»!!RE 432,$$FALSE$$FALSE$$GENERATE LEVNR 5X XXXXXX CC . P!!RE 433,$$FALSE$$FALSE$$ C539FLG-TINGLEV < * P!!RE 434,$$TRUE$$FALSE$$ NO VSL CHECK n $ P!!RE 440,$$1400$$1400$$DISK SIZE P!!RE 441,$$21$$21$$ CKTMAX P!!RE 446,$$128$$80$$ CRECLGD
0x1e070c…1e08a0 Dummy {f00=0x00e8, f01=0x0190, f02=» v P!!DL 452,453 & PON STRGI (12)2C' ','KA',' ',' ' P!!DL 783 F P!!DL 844,855 LP V P!!EN n PNOD C z PTRA /S,NL PINC DIV267 PNOD R PLED SCREEN,/S P!!CH $$KEY461$$KEY235$$ P!!CH $$SL461$$SLCOP$$
0x1e08a0…1e0a34 (0, 609) Dummy {f00=0x00e8, f01=0x0190, f02=» PINC RGSUB2 PINC RGSUB3 PNOD R ( PINC RGKLAR 6 PINC KTPLN H PINC KTOPR Z PNOD R l PINC RGADM z PINC REMSUB PNOD R PINC ADM5 PINC SUBAPL PINC REMPRT PNOD R PINC KMDIO PINC DKSU
0x1e0a34…1e0bc8 Dummy {f00=0x00e8, f01=0x0190, f02=» PINC REMTR PINC REMBDT PNOD R ( PINC BUDGET 6 PTLK U,4K H PINC PRT X PLED VDUPRT h P!!DL 66 z $ PRBUFNR EQU 1 SINGLE BUFFERING P!!DL 68 & PTBUFNR EQU 1 SINGLE BUFFERING P!!EN PASM /S,NL
0x1e0bc8…1e0d5c Dummy {f00=0x00e8, f01=0x001e, f02=»GL235,C=C235 n P$ASG2 DT PNOD R ( PINC BUDGET 6 PTLK U,4K H PINC PRT X PLED VDUPRT h P!!DL 66 z $ PRBUFNR EQU 1 SINGLE BUFFERING P!!DL 68 & PTBUFNR EQU 1 SINGLE BUFFERING P!!EN PASM /S,NL
0x1e0d5c…1e0ef0 Dummy {f00=0x00e8, f01=0x2008, f02=» C235 n P$ASG2 DT PNOD R ( PINC BUDGET 6 PTLK U,4K H PINC PRT X PLED VDUPRT h P!!DL 66 z $ PRBUFNR EQU 1 SINGLE BUFFERING P!!DL 68 & PTBUFNR EQU 1 SINGLE BUFFERING P!!EN PASM /S,NL
0x1e0ef0…1e1084 Dummy {f00=0x00e8, f01=0x0190, f02=»4C5C4220' p , P PERF FMOD,CBIN16,GSWSTR20 'CHECKBELOB' P!!DL 445,447 B " P PERF FMOD,CBIN2,GTLEVTXT TEST V " P PERF FMOD,CBIN3,SPINPUT INFO | $ P PERF FMOD,CBIN4,GSWSTR20 AMOUNT P!!DL 450,452 P PERF FMOD,CBIN6,GTLEVTXT P PERF FM
0x1e1084…1e1218 Dummy {f00=0x00e8, f01=0x016a, f02=»T x P PERF FMOD,CBIN15,GSWSTR20 P!!DL 601 , $ P FMEL 'TTTTTTTVTT9,99-',CBDTSUM1 < P!!DL 610 d $ P FMEL 'TTTTTTTVTT9,99-'CBDTSUM2 t P!!EN PTRA /S,NL PINC BUDD PTLK U,4K PINC DCTSK P$INCGEN LKE M
0x1e1218…1e13ac Dummy {f00=0x00e8, f01=0x2008, f02=» P PERF FMOD,CBIN15,GSWSTR20 P!!DL 601 , $ P FMEL 'TTTTTTTVTT9,99-',CBDTSUM1 < P!!DL 610 d $ P FMEL 'TTTTTTTVTT9,99-'CBDTSUM2 t P!!EN PTRA /S,NL PINC BUDD PTLK U,4K PINC DCTSK P$INCGEN LKE M
0x1e13ac…1e1540 Dummy {f00=0x00e8, f01=0x0190, f02=»
0x1e1540…1e16d4 (0, 610) Opaque[0x194]
0x1e16d4…1e1868 # DirEnt {nam=»C173X «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1d10, f03=0x0000}
0x1e16d4…1e1868 IdxSect {
0x1e16d4…1e1868 f00 = 0x00e8 // 0x1e16d4 @0x0
0x1e16d4…1e1868 f01 = 0x0002 // 0x1e16d6 @0x2
0x1e16d4…1e1868 gno = [ // 0x1e16d8 @0x4
0x1e16d4…1e1868 [0x00]: C0x00e8.0x2.0
0x1e16d4…1e1868 ]
0x1e16d4…1e1868 }
0x1e1868…1e19fc Dummy {f00=0x00e8, f01=0x018e, f02=» T; P01; PTID=TB; PTCL=TB; * PLEV=55; : P01; J PTDC=T01; V PLC=08L; f P00; v PT; P01; PTID=TC; PTCL=TC; PLEV=60; P02; PTDC=T03; PLC=01L; PTDC=T07; PLC=0
0x1e19fc…1e1b90 Dummy {f00=0x00e8, f01=0x012a, f02=» PTDC=T02; PLC=02L; PTDC=T07; $ PLC=02L; 4 PTDC=T06; D PLC=03L; T P00; d PT; p P01; z PTID=D0; PTCL=D0; PLEV=60; P00; P00; PC; P00; P01; PSCL=S01; PU;
0x1e1b90…1e1d24 Dummy {f00=0x00e8, f01=0x2008, f02=» T02; PLC=02L; PTDC=T07; $ PLC=02L; 4 PTDC=T06; D PLC=03L; T P00; d PT; p P01; z PTID=D0; PTCL=D0; PLEV=60; P00; P00; PC; P00; P01; PSCL=S01; PU;
0x1e1d24…1e1eb8 Dummy {f00=0x00e8, f01=0x0190, f02=»BZZXXXZZ9ZZZ999BB**BB99.B999B99BBBZBBBZZBXX.BZZZZZZ9ZZZZ****9***99B999BBBBZZBZZZZBBB**BBBZ999BB****9XX.XXPPZZZZZZZ99V99V99ZZ.ZZ.ZZZZ99999999.99.99BB99.99.99BXX.XX.XXBZZ.ZZ.ZZZZ.ZZ.ZZB99E-99E-999B99B99B99B99.99.99BBB99.99.99ZZZ999999999.99.999.9BXXXXXXXXXXBZZZZZZZZ
0x1e1eb8…1e204c Dummy {f00=0x00e8, f01=0x0190, f02=»99B999.99999.99BXE-XXE-XXE-XXBXXXE-XXXXXE-XXZZZ.ZZZ.ZZ9.ZZ-ZZZZZZZVZZ9,99-999E-99999E-99BB*.***.***.**9,99+*.***.***.**9.99+*.***.***.**9.99-Z.ZZZ.ZZZ.ZZ9.99-*.***.***.**9.99+BB*.***.***.**9.99-B*.***.***.**9E,99B999E-999E-99E-99BBBZZZE-ZZZE-ZZE-ZZZZZVZZZVZZZVZZ9E
0x1e204c…1e21e0 Dummy {f00=0x00e8, f01=0x0190, f02=» & 1 ` ] ^ U n f q r ` { T w s l ~ m i x u Z y I ] 2 c [ v g [ ' t + Q L Q % A + t , t Z B B R j ,E O V N +X + e W
0x1e21e0…1e2374 (0, 611) Opaque[0x194]
0x1e2374…1e2508 # DirEnt {nam=»C821X «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1d18, f03=0x0000}
0x1e2374…1e2508 IdxSect {
0x1e2374…1e2508 f00 = 0x00e8 // 0x1e2374 @0x0
0x1e2374…1e2508 f01 = 0x0002 // 0x1e2376 @0x2
0x1e2374…1e2508 gno = [ // 0x1e2378 @0x4
0x1e2374…1e2508 [0x00]: C0x00e8.0x3.0
0x1e2374…1e2508 ]
0x1e2374…1e2508 }
0x1e2508…1e269c Dummy {f00=0x00e8, f01=0x018e, f02=» T; P01; TID=TC; TCL=TC; * LEV=60; : P02; J PTDC=T03; V PLC=01L; f PTDC=T07; v PLC=01L; P01; PSCL=S04; PT; P01; TID=KA; TCL=KA; LEV=60; 01; PTDC=
0x1e269c…1e2830 Dummy {f00=0x00e8, f01=0x008c, f02=» LEV=60; 00; P00; $ PC; 0 P00; : P01; F PSCL=S01; R U; b 001; l TB2; x P001; ; P01; PSCL=S04; PT; P01; TID=KA; TCL=KA; LEV=60; 01; PTDC=
0x1e2830…1e29c4 Dummy {f00=0x00e8, f01=0x2008, f02=» LEV=60; 00; P00; $ PC; 0 P00; : P01; F PSCL=S01; R U; b 001; l TB2; x P001; ; P01; PSCL=S04; PT; P01; TID=KA; TCL=KA; LEV=60; 01; PTDC=
0x1e29c4…1e2b58 Dummy {f00=0x00e8, f01=0x2008, f02=» 001; TB2; P002; $ PSCL=S02; 0 PSCL=S03; @ PSCL=S04; P PT; ` P01; j PTID=LA; v PTCL=LA; PLEV=60; P00; P04; PSCL=S02; PSCL=S03; PSCL=S04; PSCL=S05; T;
0x1e2b58…1e2cec Dummy {f00=0x00e8, f01=0x0190, f02=»A,/5A6C,/507D 20-27 ( P DATA /4D5D,/5C4E,/6B60,/4B61 28-2F ( P DATA /F0F1,/F2F3,/F4F5,/F6F7 30-37 H ( P DATA /F8F9,/7A5E,/4C7E,/6E6F 38-3F t ( P DATA /6AC1,/C2C3,/C4C5,/C6C7 40-47 ( P DATA /C8C9,/D1D2,/D3D4,/D5D6 48-4F ( P DATA /D7D8,/D9E
0x1e2cec…1e2e80 Dummy {f00=0x00e8, f01=0x0190, f02=»394,/9596 68-6F | ( P DATA /9798,/99A2,/A3A4,/A5A6 70-77 ( P DATA /A7A8,/A900,/0000,/0000 78-7F D P DE p P EJECT ~ P* 4 P* TRANSLATION OF FUNCTON KEYS & LOWER CASE P - W P* PKEYCNV EQU * P IFF KB6272=1 P CWK A
0x1e2e80…1e3014 (0, 612) Opaque[0x194]
0x1e3014…1e31a8 # DirEnt {nam=»C235 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1d20, f03=0x0000}
0x1e3014…1e31a8 IdxSect {
0x1e3014…1e31a8 f00 = 0x00e9 // 0x1e3014 @0x0
0x1e3014…1e31a8 f01 = 0x0002 // 0x1e3016 @0x2
0x1e3014…1e31a8 gno = [ // 0x1e3018 @0x4
0x1e3014…1e31a8 [0x00]: C0x00e9.0x0.0
0x1e3014…1e31a8 ]
0x1e3014…1e31a8 }
0x1e31a8…1e333c Dummy {f00=0x00e9, f01=0x018e, f02=» T; P01; TID=TC; TCL=TC; * LEV=60; : P02; J PTDC=T03; V PLC=01L; f PTDC=T07; v PLC=01L; P01; PSCL=S04; PT; P01; PTID=TD; PTCL=TC; PLEV=60; P02; PTDC=
0x1e333c…1e34d0 Dummy {f00=0x00e9, f01=0x018e, f02=» 01; PTDC=T04; PLC=02L; $ P03; 4 PSCL=S02; @ PSCL=S03; P PSCL=S04; ` PT; p P01; z PTID=GA; PTCL=GA; PLEV=60; P01; PTDC=T05; PLC=02L; P03; PSCL=S02; PSCL=S03;
0x1e34d0…1e3664 Dummy {f00=0x00e9, f01=0x004a, f02=» P01; PSCL=S01; U; 001; * TB2; 6 P002; B @ PSCL=S03; P PSCL=S04; ` PT; p P01; z PTID=GA; PTCL=GA; PLEV=60; P01; PTDC=T05; PLC=02L; P03; PSCL=S02; PSCL=S03;
0x1e3664…1e37f8 Dummy {f00=0x00e9, f01=0x2008, f02=» PSCL=S01; U; 001; * TB2; 6 P002; B @ PSCL=S03; P PSCL=S04; ` PT; p P01; z PTID=GA; PTCL=GA; PLEV=60; P01; PTDC=T05; PLC=02L; P03; PSCL=S02; PSCL=S03;
0x1e37f8…1e398c Dummy {f00=0x00e9, f01=0x0190, f02=»
[…0x1…]
0x1e3b20…1e3cb4 (0, 613) Opaque[0x194]
0x1e3cb4…1e3e48 # DirEnt {nam=»KEY539«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1d28, f03=0x0000}
0x1e3cb4…1e3e48 IdxSect {
0x1e3cb4…1e3e48 f00 = 0x00e9 // 0x1e3cb4 @0x0
0x1e3cb4…1e3e48 f01 = 0x0002 // 0x1e3cb6 @0x2
0x1e3cb4…1e3e48 gno = [ // 0x1e3cb8 @0x4
0x1e3cb4…1e3e48 [0x00]: C0x00e9.0x1.0
0x1e3cb4…1e3e48 ]
0x1e3cb4…1e3e48 }
0x1e3e48…1e3fdc Dummy {f00=0x00e9, f01=0x0190, f02=» PNOKEY EQU X'FF' PBSPKY1 EQU X'87' PCANKY1 EQU X'91' 4 PMACKY1 EQU X'95' L PEORKY1 EQU X'90' d PFTABKY1 EQU X'8B' | PBTABKY1 EQU X'83' PDUPKY1 EQU X'A2' PSLUTKY1 EQU X'A3' PREGKY1 EQU X'A1' PCOPKY1 EQU X'F
0x1e3fdc…1e4170 Dummy {f00=0x00e9, f01=0x0190, f02=»Y1 EQU X'FF' PCY2KY1 EQU X'FF' PCYCKY1 EQU X'89' , PINVKY1 EQU X'82' D PKONKY1 EQU X'85' PKVITKY1 EQU X'86' t PSUPLKY1 EQU X'FF' PSUMKY1 EQU X'81' PADMKY1 EQU X'A0' PDIVKY1 EQU X'84' PHBOGKY1 EQU X'80'
0x1e4170…1e4304 Dummy {f00=0x00e9, f01=0x0190, f02=»BKY1 EQU X'87' PINSKY1 EQU X'81' PDELKY1 EQU X'82' . PCL1KY1 EQU X'89' F PCL2KY1 EQU X'8A' ^ PCL3KY1 EQU X'8B' v POUTKY1 EQU X'A0' P* PBSPKY2 EQU X'C7' PCANKY2 EQU X'D1' PEORKY2 EQU X'D0' PMACKY2 EQU X'D5'
0x1e4304…1e4498 Dummy {f00=0x00e9, f01=0x40c4, f02=»EKY2 EQU X'D2' PREGKY2 EQU X'E1' PADMKY2 EQU X'E0' . PSPGKY2 EQU X'FF' F PKONKY2 EQU X'FF' ^ PKVITKY2 EQU X'C6' v PONKY2 EQU X'D9' PCOPKY2 EQU X'C5' @ PCANKY2 EQU X'D1' PEORKY2 EQU X'D0' PMACKY2 EQU X'D5'
0x1e4498…1e462c Dummy {f00=0x00e9, f01=0x2008, f02=» * ERRFMT FRMT FSL , " FMEL 'ZZ9B',GTWBCD1 FILE NR. 8 FCOPY ERRTXT ^ " FMEL 'BZZ9',GTWBCD2 ERRORNR. t FCOPY =X'07' FMEND @ 8SPKTAB2 KTAB BSPKY1,CANKY1,NOKEY,MACKY1,NOKEY,EORKY1, C D ? FT
0x1e462c…1e47c0 Dummy {f00=0x00e9, f01=0x0190, f02=»394,/9596 68-6F | ( P DATA /9798,/99A2,/A3A4,/A5A6 70-77 ( P DATA /A7A8,/A900,/0000,/0000 78-7F D P DE p P EJECT ~ P* 4 P* TRANSLATION OF FUNCTON KEYS & LOWER CASE P - W P* PKEYCNV EQU * P IFF KB6272=1 P CWK A
0x1e47c0…1e4954 (0, 614) Opaque[0x194]
0x1e4954…1e4ae8 # DirEnt {nam=»REMBDS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1d30, f03=0x0000}
0x1e4954…1e4ae8 IdxSect {
0x1e4954…1e4ae8 f00 = 0x00e9 // 0x1e4954 @0x0
0x1e4954…1e4ae8 f01 = 0x0006 // 0x1e4956 @0x2
0x1e4954…1e4ae8 gno = [ // 0x1e4958 @0x4
0x1e4954…1e4ae8 [0x00]: C0x00e9.0x2.0
0x1e4954…1e4ae8 [0x01]: C0x00e9.0x3.0
0x1e4954…1e4ae8 [0x02]: C0x00ea.0x0.0
0x1e4954…1e4ae8 ]
0x1e4954…1e4ae8 }
0x1e4ae8…1e4c7c Dummy {f00=0x00e9, f01=0x0190, f02=» P IDENT REMBDS DDUM KMD08 PDIV . P EXT RAWRIT < P EXT KFWRIT P P EXT CLEAR8 d P EXT CYRD x P EXT SPLIN8 P EXT GRASPV P EXT WRITJT P ENTRY BCHKPR P ENTRY BGIRPR P ENTRY BSAMPR P
0x1e4c7c…1e4e10 Dummy {f00=0x00e9, f01=0x0190, f02=»0: CREATE A RECORD ON CYSET CONTAINING ONE SPEC. LINE FOR P* STRAKSCHECK B P* P=1: WRITE A STRAKSCHECK P* CLEAR CYSET ~ & P* PREPARE FOR NEXT STRAKSCHECK P* P********** & P CBE P,CBIN1,WSTR050 EXPL. WRITE? , P
0x1e4e10…1e4fa4 Dummy {f00=0x00e9, f01=0x0190, f02=»SWBIN8,=W'30' P CBNE GTCHKCY,CBIN1,WSTR005 P MOVE GTCYSUM,=D'0' : PWSTR005 V ( P TBF CCYPFLG,WSTR010 WAIT FOR BUFFER f P DELAY CBIN2 P B WSTR005 PWSTR010 P SET CCYPFLG P MOVE CCYBUF,=X'00' P PERF STREDT
0x1e4fa4…1e5138 Dummy {f00=0x00e9, f01=0x0190, f02=»PFLG P ADD GTCYSUM,GTDUPF(CBIN4) 4 P CBNG GTCHKCY,CBIN6,WSTR090 ROOM FOR NEXT LINE? . P* f PWSTR050 WRITE A CHECK p & P CBE GTCHKCY,CBIN1,WSTR090 EMPTY? P CBL GTCYSUM,=D'1',WSTR080 P ADD CCHKLBNR,=D'1' P PERF WRITJT,=W'
0x1e5138…1e52cc Dummy {f00=0x00e9, f01=0x0190, f02=»VAL,CCHKLBNR REWRITE CHECKLOBENR * P PERF KFWRIT,CBIN4,CBIN1,CBIN0,GTKFVAL ( P EDWRT KVOUCH,CHKFRM1 V P MOVE GTCYSUM,=D'0' t & P MOVE GSWBIN8,GTCHKCY LOOP CONTROL P SUB GSWBIN8,CBIN1 $ P MOVE GSWBCD6,GTCYIN SAVE GTCYIN P MOVE GTCYIN
0x1e52cc…1e5460 Dummy {f00=0x00e9, f01=0x018e, f02=» P DSC1 KVOUCH,POS,GSWBIN7 P PERF CYRD $ P SUB GSWBIN8,CBIN1 6 P BNZ WSTR060 FINISHED? P P DSC0 KVOUCH,RLEAS n ( P MOVE GTCYIN,GSWBCD6 RESTORE GTCYIN PWSTR080 P MOVE GTCYSUM,=D'0' P MOVE GTCHKCY,CBIN1 P* PWS
0x1e5460…1e55f4 (0, 615) Dummy {f00=0x00e9, f01=0x0190, f02=» P CMP CBIN1,CBIN0 P B WSTR099 P* 2 PWSTR094 DISK ERROR < P CLEAR CCYPFLG X P CMP CBIN0,CBIN1 n P B WSTR099 P* PWSTR099 P RET P PEND P EJECT PBCHKPR PROC P P* PRINT BUNDTCHECKS
0x1e55f4…1e5788 Dummy {f00=0x00e9, f01=0x0190, f02=»C P P CMP CBIN0,CBIN0 P RET $ P PEND 0 PSTREDT PROC > P MOVE GSWSTR20,=X'00' R P MOVE SPINPUT,=X'00' p ( P MOVE GSWBIN7,GTTXTTKO MOVE TEXTCODE : P IB GSWBIN7,STRE03,STRE04,STRE05,STRE06,STRE07,STRE08 PSTRE03 P MOV
0x1e5788…1e591c Dummy {f00=0x00e9, f01=0x018e, f02=»E80 PSTRE05 & P MOVE GSWBCD6,GTDUPF(CBIN13) NR-1 & P MOVE GSWBCD7,GTDUPF(CBIN14) NR-2 D P EDIT SPINPUT,FREMINF3 n P B STRE80 PSTRE06 ( P MOVE GSWBCD6,GTDUPF(CBIN18) DATO-1 P EDIT SPINPUT,FREMINF4 P B STRE80 P
0x1e591c…1e5ab0 Dummy {f00=0x00e9, f01=0x0190, f02=» PSTRE08 & P MOVE GSWBCD6,GTDUPF(CBIN13) NR-1 ( P MOVE GSWBCD7,GTDUPF(CBIN18) DATO-1 @ P EDIT SPINPUT,FREMINF6 l PSTRE80 P EDIT GSWSTR20,FREMBEL P CMP CBIN0,CBIN0 P RET P PEND P EJECT PFREMBEL FRMT *
0x1e5ab0…1e5c44 Dummy {f00=0x00e9, f01=0x0190, f02=»,11 P FMEND P PFREMINF3 FRMT " P FMEL 'ZZZZZZZZZ9',GSWBCD6 8 P FILLR ' ',1 Z P FMEL 'ZZZZZZZZZ9',GSWBCD7 n P FMEND P PFREMINF4 FRMT P FMEL '99V99V99',GSWBCD6 P FILLR ' ',13 P FMEND P P
0x1e5c44…1e5dd8 Dummy {f00=0x00e9, f01=0x0190, f02=» P PFREMINF6 FRMT P FMEL 'ZZZZZZZZZ9',GSWBCD6 " P FILLR ' ',1 D P FMEL '99V99V99',GSWBCD7 X P FILLR ' ',2 x P FMEND P PFREMINF7 FRMT P FMEL '****9',TTLBNR P FMEND P P EJECT : 5****************
0x1e5dd8…1e5f6c Dummy {f00=0x00e9, f01=0x0190, f02=» , P FMEL '*.***.***.**9,99-',GTCYSUM BELOB FILLR ' ',2 4 FEOR H FILLR '3',2 V , P FMEL '*.***.***.**9,99-',GTCYSUM BELOB j FILLR ' ',38 FEOR FILLR '4',2 FCOPY GTLEVNVN FILLR ' ',32 FEOR
0x1e5f6c…1e6100 Dummy {f00=0x00e9, f01=0x0190, f02=» ',42 FEOR FILLR '2',2 FMEL 'ZZZZBB',GTLEVPNR 0 FCOPY GTLEVPDI P FILLR ' ',43 h FEOR ~ FILLR '4',2 FEOR P FILLR '4',2 P FEOR FILLR '4',2 P FBT TTCY1FLG,CHKF10 * P FMEL '9
0x1e6100…1e6294 (0, 616) Dummy {f00=0x00ea, f01=0x415e, f02=»,7 ( $ FMEL '****9BB',CCHKLBNR CHECKLOBENR FILLR ' ',34 6 P FMEND L P* Z P* d PCHKFRM2 FRMT n P FSL P FLINK FREMINF7 P FILLR ' ',1 P FCOPY GTLEVTXT P FILLR ' ',1 P FCOPY SPINPUT P FILLR ' ',1
0x1e6294…1e6428 Dummy {f00=0x00ea, f01=0x2008, f02=» 2 FTEXT ' ' AMOUNT FNL 4 FILLR ' ',26 @ $ FTEXT ' ' AMOUNT V FILLR ' ',43 ~ $ FTEXT ' ' AMOU8NT FNL FNL FNL FNL FNL FNL F
0x1e6428…1e65bc Dummy {f00=0x00ea, f01=0x0190, f02=»NO REMIT z & PCSKIFTFL BOOL FALSE T=FD CHANGING ( PCEORFLG BOOL FALSE T=END OF A RECORD : 0 PCCOLDFLG BOOL FALSE T=VERY FIRST COLD START f . PCERRORFL BOOL FALSE T=ERROR IN COLD START . PCCONVFLG BOOL FALSE T=CONVERSION GOING ON $ PCSWFLAG BO
0x1e65bc…1e6750 Dummy {f00=0x00ea, f01=0x0190, f02=»EXTFLG BOOL FALSE T=TEXT REG. PRESENT 0 PCSTRKFLG BOOL FALSE T=STRAKS CHECK (LEV REG) . 2 PCBUDTFLG BOOL FALSE T=BUNDT CHECKS (POST REG) b 0 PCBDTGIR BOOL FALSE T=LIST GIRO, F=LISTCHECK P* P* PCBIN15 BIN '15' PCBIN16 BIN '16'
0x1e6750…1e68e4 Dummy {f00=0x00ea, f01=0x0190, f02=»IN '22' PCBINMAX BIN '26' PCVOUTOP BIN W'56' ( PCMINLIN BIN W'2' B P EJECT Z @ P*********************************************************** h P* : P* TABLE GIVING INDEXES FOR TRANSACTIONFIELDS 4 P* FIELD NR
0x1e68e4…1e6a78 Dummy {f00=0x00ea, f01=0x0190, f02=» z : P '26','26','26','26','1','2','3','4','5','6', 1-10 C < P '7','8','9','4','11','12','10','11','12','13', 11-20 C F > P '10','11','12','13','14','15','16','1','8','9', 21-30 C < P '10','5','12','13','14','5','18','19','7','7', 31-40 C @ P
0x1e6a78…1e6c0c Dummy {f00=0x00ea, f01=0x0190, f02=»,'11','12','13','6','26','26','26','26', 61-70 C @ P '26','26','26','26','26','26','26','26','26','26', 71-80 C 8 @ P '19','26','26','26','26','26','26','26','26','26', 81-90 C | > P '26','26','26','26','26','26','26','26','26','26', C > P '26'
0x1e6c0c…1e6da0 Dummy {f00=0x00ea, f01=0x0190, f02=»'26','26','26','26','26','26','26','26' PCCNTDEX BINI (15), C 0 6 P '1','2','3','4','5','1','5','6','6','5','0', C N P '1','1','1','1' 8 PCFLAG BINI (12),X'0011',X'0010' TASK DEPENDENT FLAGS : P* BITS NUMBERED : 15, 14, 13,...,5, 4,
0x1e6da0…1e6f34 (0, 617) Opaque[0x194]
0x1e6f34…1e70c8 # DirEnt {nam=»REMFMS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1d48, f03=0x0000}
0x1e6f34…1e70c8 IdxSect {
0x1e6f34…1e70c8 f00 = 0x00ea // 0x1e6f34 @0x0
0x1e6f34…1e70c8 f01 = 0x0006 // 0x1e6f36 @0x2
0x1e6f34…1e70c8 gno = [ // 0x1e6f38 @0x4
0x1e6f34…1e70c8 [0x00]: C0x00ea.0x1.0
0x1e6f34…1e70c8 [0x01]: C0x00ea.0x2.0
0x1e6f34…1e70c8 [0x02]: C0x00ea.0x3.0
0x1e6f34…1e70c8 ]
0x1e6f34…1e70c8 }
0x1e70c8…1e725c Dummy {f00=0x00ea, f01=0x018e, f02=» P IDENT REMFMS 03.01.XXX.1 P DDUM KMD08 & PDIV : P ENTRY FMTREM H P ENTRY FMREMP ^ P t P* | PFMREMP PROC PFMTDEX P RET P PEND P* P PFMTREM PROC XFMTDEX P ATTFMT ATTTAB(XFMTDEX)
0x1e725c…1e73f0 Dummy {f00=0x00ea, f01=0x0190, f02=» P " PFMTLEVST FRMT STAMOPLYSNINGER P FSL 2 , P FCOPY GSWSTR9 VEDLIGEH/SLETNING/FORESPG > P FILLR ' ',1 n P FCOPY ='LEVERAND ' P FTAB 24 P FCOPY ='NR' & P FBF GTDYFLG,FLEV010 T=FIRST TIME $ P FBT GTSPGFLG,FLEV005 T=FORE
0x1e73f0…1e7584 Dummy {f00=0x00ea, f01=0x0190, f02=» r " P FKI 27,MINL=1,MAXL=10,SCHK=7 P FMEL 'XXXXXXXXXX',GTLEVNR . P FB FLEV100 P PFLEV010 d P FTAB 27 t P FBF GTSPGFLG,FLEV15 P FKI 27 PFLEV15 P FMEL 'XXXXXXXXXX',GTLEVNR P FNL P FCOPY ='NAVN' P FTAB
0x1e7584…1e7718 Dummy {f00=0x00ea, f01=0x0190, f02=»' P FTAB 5 P FBT GTSPGFLG,FLEV030 P FKI 5,MAXL=32,ALPHA 8 PFLEV030 T P FCOPY GTLEVADR d P FNL | P FCOPY ='BY ' P FTAB 5 P FBT GTSPGFLG,FLEV040 P FKI 5,MAXL=20,ALPHA PFLEV040 P FCOPY GTLEVBY
0x1e7718…1e78ac Dummy {f00=0x00ea, f01=0x0190, f02=»PNR ~ P FTAB 14 P FCOPY ='-DISTR ' P FBT GTSPGFLG,FLEV060 6 P FKI 21,MAXL=13,ALPHA T PFLEV060 r P FCOPY GTLEVPDI P FNL P FCOPY ='BET.FORM ' P FBT GTSPGFLG,FLEV070 P FKI 10,MAXL=1,ME PFLEV070
0x1e78ac…1e7a40 Dummy {f00=0x00ea, f01=0x0190, f02=»FLEV080 P FMEL 'XXXXXXX',GTLEVGI P FNL 0 P FCOPY ='ALT.ADR ' < P FBT GTSPGFLG,FLEV090 V " P FKI 9,MINL=10,MAXL=10,SCHK=1 t PFLEV090 P FMEL 'XXXXXXXXXX',GTLEVALT P FTAB 29 P FMEL 'XXVXXVXX',GTLEVDAT P FNL
0x1e7a40…1e7bd4 (0, 618) Dummy {f00=0x00ea, f01=0x0190, f02=»100 ~ P FNL P FLINK FMTLEVVR PFLEV100 0 P FMEND @ P N P V P ^ ( PFMTLEVVR FRMT VARIABLE OPLYSNINGER f P FBT GTVDUFLG,FLEV210 P FSL P FCOPY GSWSTR9 FORESPG P FILLR ' ',1 P FCOPY ='LEVERAND '
0x1e7bd4…1e7d68 Dummy {f00=0x00ea, f01=0x0190, f02=»' | & P FMEL ='99E-99E-99',GTREGF(CBIN10) P FTAB 22 4 , P FMEL ='ZZZVZZZVZZ9E,99-',GTREGF(CBIN11) D P FNL t P FCOPY ='UDB. ]TD ' P FTAB 22 , P FMEL ='ZZZVZZZVZZ9E,99-',GTREGF(CBIN12) P FNL P FCOPY ='N[STE ' P FLINK F
0x1e7d68…1e7efc Dummy {f00=0x00ea, f01=0x0190, f02=»B 17 , P FMEL ='ZZZVZZZVZZ9E,99-',GTREGF(CBIN14) P FNL < P FCOPY ='KREDITNOTA' H P FLINK FBELOB d P FTAB 17 z , P FMEL ='ZZZVZZZVZZ9E,99-',GTREGF(CBIN15) P FNL P FCOPY ='SKYLDIGT ' P FLINK FBELOB P FTAB 17 , P
0x1e7efc…1e8090 Dummy {f00=0x00ea, f01=0x0190, f02=»ND P* P* . PFMTLEVPR FRMT SCREEN FORMAT FOR PRINTING P FSL P P FCOPY ='UDSKRIFT ' P FCOPY =C'AF ' x P FCOPY ='LEVERAND ' P FCOPY ='FIL' P FTAB 29 P FMEL '99E-99E-99',CMASKDAT P FNL P FCOPY =
0x1e8090…1e8224 Dummy {f00=0x00ea, f01=0x018e, f02=»IL NR ' " P FKI 13,MINL=7,MAXL=10,SCHK=7 P FMEL 'XXXXXXXXXX',GTPRTFRA 6 " P FKI 25,MINL=7,MAXL=10,SCHK=7 Z P FMEL 'XXXXXXXXXX',GTPRTTIL P FNL $ P FCOPY ='ALLE OPLYSNINGER (1) ' P FKI 22,MAXL=1 P FMEL 'X',GTLEVBFO P
0x1e8224…1e83b8 Dummy {f00=0x00ea, f01=0x0190, f02=» PFVALDAT FRMT P FTEXT 'VAL' P FILLR X'5C',1 0 P FTEXT 'RDATO' F P FMEND P* j P* t P* ~ PFBELOB FRMT P FTEXT 'BEL' P FILLR X'5C',1 P FILLR 'B',1 P FMEND P* P* P* TX
0x1e83b8…1e854c Dummy {f00=0x00ea, f01=0x0190, f02=»T ' P FCOPY =C'FIL' P FILLR ' ',4 " P FMEL '99E-99E-99',CMASKDAT 6 FNL Z P FCOPY =C'FRA/TIL NR ' f FKI 13,MINL=1,MAXL=3 FMEL 'ZZ9',GSWBCD3 P FILLR '-',1 P FKI 18,MINL=1,MAXL=3 P FMEL 'ZZ9',GSWBCD4
0x1e854c…1e86e0 Dummy {f00=0x00ea, f01=0x0190, f02=»2' j P FKI 35,MINL=1,MAXL=1 FMEL '9',GSWBCD5 ( PTXTP20 B FMEND P * ^ * h P* r PTXTVEDL FRMT | P FSL P FCOPY =C'REMIT.TEKST NR ' P FBF GTSWFLAG,TXTV10 P FKI 20,MINL=1,MAXL=3 PTXTV10 P
0x1e86e0…1e8874 (0, 619) Dummy {f00=0x00ea, f01=0x40c8, f02=» t P FCOPY GTLEVTXT P FNL P FNL , P FCOPY =C'KODE ' 8 P FKI 7,MINL=1,MAXL=2,NUM P P FMEL 'X',GTTXTTKO p PTXTV20 P FMEND P* END @
0x1e8874…1e8a08 Dummy {f00=0x00ea, f01=0x2008, f02=» ND END @ GSWBCD3 FMEL 'E-ZZ9',GSWBCD4 2 FILLR ' ',4 P FNL d FMEND p * ~ * * TXTPRT FRMT FSL FNL FNL FM,EL '999',TXTNR FMEL 'BB9BB',TXTKODE
0x1e8a08…1e8b9c Dummy {f00=0x00ea, f01=0x0190, f02=» , ( U Y +W Y + W , ( s T W Q W Y + 8 , ( U Q P W W h T:TABC , ( @ Y ( C X *! T:RNOK I:RT1 , ( P V
0x1e8b9c…1e8d30 Dummy {f00=0x00ea, f01=0x4106, f02=» X 0 :H* : X 2T T:EDIO , ( ' Y 2 : C 1 B ] 2 G : b H D ! 0 W !W GP( KP QP YW^ ] . i oWL sT w { }W> Q W U x ( $ Q P W W P %T J @
0x1e8d30…1e8ec4 Dummy {f00=0x00ea, f01=0x0190, f02=» 4 F IDENT T:GETF P,REL=4.2,791116,870136940420 T:GETFK T:GTIT T:GTIP < T:GETFK ^ T:TABC r * & X +! U 9K Y ( Y + T:TABN T:GTIT $ T:GRFC T:GTIP 4 , (
0x1e8ec4…1e9058 Dummy {f00=0x00ea, f01=0x4032, f02=» $ U Z @ .0 T:GETFK T:GTIT T:GTIP < T:GETFK ^ T:TABC r * & X +! U 9K Y ( Y + T:TABN T:GTIT $ T:GRFC T:GTIP 4 , (
0x1e9058…1e91ec Dummy {f00=0x00ea, f01=0x0190, f02=» 4 F IDENT T:REWR P,REL=4.2,791116,870136940420 ! . * T:REWRK T:SCUW T:CLRD T:IOWR T:CASP ! < T:IOWR ! n T:CSEG ! T:SCUW ! , ( C ( C : ! T:CLRD . ! T:REWRK 4 ! , (
0x1e91ec…1e9380 Dummy {f00=0x00ea, f01=0x4156, f02=» X D D : K ! I:EVA3L " & I:EPIC " 8 , ( } $ + Q 2 P P " J T:LOPS " z , ( ( B X # V " I:EVA0 " I:ECPY " I:EVI " , ( :
0x1e9380…1e9514 (0, 620) Opaque[0x194]
0x1e9514…1e96a8 # DirEnt {nam=»ADM5D «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1d60, f03=0x0000}
0x1e9514…1e96a8 IdxSect {
0x1e9514…1e96a8 f00 = 0x00eb // 0x1e9514 @0x0
0x1e9514…1e96a8 f01 = 0x0002 // 0x1e9516 @0x2
0x1e9514…1e96a8 gno = [ // 0x1e9518 @0x4
0x1e9514…1e96a8 [0x00]: C0x00eb.0x0.0
0x1e9514…1e96a8 ]
0x1e9514…1e96a8 }
0x1e96a8…1e983c Dummy {f00=0x00eb, f01=0x40c6, f02=» P IDENT ADM5D 04.01.XXX.1 DDUM KMD08 $ PDIV 8 ENTRY A5KONV F EXT A5RET2 * p * z A5KONV P B A5RET2 READ SOP P* P END @ *********************************** P* P* PKO
0x1e983c…1e99d0 Dummy {f00=0x00eb, f01=0x2008, f02=» DM,310,417 @ DDUM KMD08 $ PDIV 8 ENTRY A5KONV F EXT A5RET1 EXT A5RET2 p EXT LAMPON EXT LAMPOF EXT ASGVOL EXT RAREAD EXT STRTID EXT WRITID EXT SQWRIT
0x1e99d0…1e9b64 Dummy {f00=0x00eb, f01=0x0190, f02=» b j l & n0 6 y0 H } SLUTD Z J F " D @ L Dba % R LaTk@' L t t R t L R La tTbI'_! L L p &04L
0x1e9b64…1e9cf8 Dummy {f00=0x00eb, f01=0x0190, f02=» * 0 : L l | J F " D c RL RL?R R La R ?R R A 1XF R6 _ _ t @'_ A'_ @'W 0 L
0x1e9cf8…1e9e8c Dummy {f00=0x00eb, f01=0x405e, f02=» B " ( " t L R _B . H@ Z l | J F " D c RL RL?R R La R ?R R A 1XF R6 _ _ t @'_ A'_ @'W 0 L
0x1e9e8c…1ea020 Dummy {f00=0x00eb, f01=0x0190, f02=»
0x1ea020…1ea1b4 (0, 621) Opaque[0x194]
0x1ea1b4…1ea348 # DirEnt {nam=»KM569D«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1d68, f03=0x0000}
0x1ea1b4…1ea348 IdxSect {
0x1ea1b4…1ea348 f00 = 0x00eb // 0x1ea1b4 @0x0
0x1ea1b4…1ea348 f01 = 0x0004 // 0x1ea1b6 @0x2
0x1ea1b4…1ea348 gno = [ // 0x1ea1b8 @0x4
0x1ea1b4…1ea348 [0x00]: C0x00eb.0x1.0
0x1ea1b4…1ea348 [0x01]: C0x00eb.0x2.0
0x1ea1b4…1ea348 ]
0x1ea1b4…1ea348 }
0x1ea348…1ea4dc Dummy {f00=0x00eb, f01=0x0190, f02=» PPRT KM569D PPRT D569 PMES HOLSTED KOMMUNE & PMES STRAKS REMITTERING B PMES CONVERTERING ` PMES (MODIFIED FD DRIVER) x PSCR PLED KMD08,/S P!!CH $$26$$22$$ P!!CH $$DCTASK$$DCTSK$$ P!!RE 36,$$F8$$F9$$ P
0x1ea4dc…1ea670 Dummy {f00=0x00eb, f01=0x0190, f02=»0,108 TERM GA P!!DL 109,128 TERM LA P!!DL 139,163 TB9 2 P!!RE 186,$$6040$$F7D7$$ J $ P!!RE 198,$$FALSE$$TRUE$$ CBKOFLG j $ P!!RE 199,$$FALSE$$TRUE$$ CKTFLAG $ P!!RE 205,$$TRUE$$FALSE$$ CKTAUTO $ P!!RE 206,$$FALSE$$TRUE$$ CDCFLAG $
0x1ea670…1ea804 Dummy {f00=0x00eb, f01=0x0190, f02=»$FALSE$$TRUE$$ CTEXTFLG & P!!RE 247,$$FALSE$$TRUE$$ CSTRKFLG & P!!RE 248,$$FALSE$$FALSE$$ CBUDTFLG J P!!DL 286 t PCFLAG BINI (12),X'0051' , P!!RE 372,$$01014610$$04015691$$ VERSION P!!RE 378,$$732$$2$$ EDITBUF P!!RE 379,$$40$$2
0x1ea804…1ea998 Dummy {f00=0x00eb, f01=0x0190, f02=»$ v " P!!RE 450,$$20$$20$$ INDEX FILE P!!RE 451,$$5$$1$$ CKTTOP 0 P!!DL 452,453 P & PON STRGI (12)2C' ',' ',' ',' ' d P!!DL 777,780 ENTRY P!!DL 783,784 P!!DL 787,790 EXT P!!DL 808,827 KBVGO P!!DL 828,843 GTPGO P
0x1ea998…1eab2c Dummy {f00=0x00eb, f01=0x0190, f02=»C DIV569 PNOD R PLED SCREEN,/S P!!CH $$KEY461$$KEY569$$ 4 P!!CH $$SL461$$SLCOP$$ T P!!EN r PTRA /S,NL ~ PINC RGSUB4 PINC DKSUBS PNOD PINC RGMND PINC RGSUBS PINC RGSUB1 PINC RGSUB2 P
0x1eab2c…1eacc0 Dummy {f00=0x00eb, f01=0x0190, f02=» PNOD PINC KMDIO PINC ADM6 & PINC ADM5 6 PNOD F PINC REMLEV R PINC REMTXT d PNOD v PINC RGSTRT PINC REMSUB PINC REMBDS PNOD PINC RGFRMT PINC REMFMS PNOD PINC REMTRD PIN
0x1eacc0…1eae54 (0, 622) Dummy {f00=0x00eb, f01=0x003c, f02=»DISC M=M:92F3,MU=M:POOL92,A=RGLOAD,C=D569 P$ASG2 2
0x1eae54…1eafe8 Dummy {f00=0x00eb, f01=0x2008, f02=» :92F3,MU=M:POOL92,A=RGLOAD,C=D569 P$ASG2 2
0x1eafe8…1eb17c Dummy {f00=0x00eb, f01=0x0190, f02=»IAL FIELD 48,TR=3 x , PCKTAUTO BOOL FALSE T=ASK KORT AFTER TR 4 2 PCDCFLAG BOOL TRUE T=INCLUDES DATATRANSMISSION J . PCCYWRTF BOOL FALSE T=DO NOT USE CYCLE SET 2 PCADM22F BOOL FALSE T=ALLOWED FUNCTION (ADM 22) PC5MDISK BOOL FALSE T=5M DISK
0x1eb17c…1eb310 Dummy {f00=0x00eb, f01=0x0190, f02=»SET PRESENT t ( PCCONVERT BOOL TRUE T=CONVERSION MODE P* @ P* J PCBIN0 BIN '0' T PCBIN1 BIN '1' j PCBIN2 BIN '2' PCBIN3 BIN '3' PCBIN4 BIN '4' PCBIN5 BIN '5' PCBIN6 BIN '6' PCBIN7 BIN '7' PCBIN
0x1eb310…1eb4a4 Dummy {f00=0x00eb, f01=0x0190, f02=»CBIN14 BIN '14' J PWEIGTH1 BCDI (13),'7','6','5','4','3','2','7','6','5','4','3','2','1' PCB2 BLK f P* v & PCPFLG BOOL FALSE T: DISK OCCUPIED ( PCSPLITFL BOOL FALSE T: SPLIT RECORD " PCWFLAG BOOL FALSE F=COLD START " PCREMITFL BOO
0x1eb4a4…1eb638 Dummy {f00=0x00eb, f01=0x0190, f02=»RY FIRST COLD START x . PCERRORFL BOOL FALSE T=ERROR IN COLD START . PCCONVFLG BOOL FALSE T=CONVERSION GOING ON N $ PCSWFLAG BOOL FALSE SCRATCH FLAG 2 PCSKIFTWN BOOL FALSE T=WARNING ABOUT FD CHANGE . PCKFLAG BOOL FALSE T=EXCL ACCESS, KNT. PLAN
0x1eb638…1eb7cc Dummy {f00=0x00eb, f01=0x0190, f02=»ECKS (POST REG) r 0 PCBDTGIR BOOL FALSE T=LIST GIRO, F=LISTCHECK P* L P* V PCBIN15 BIN '15' ` PCBIN16 BIN '16' x PCBIN17 BIN '17' PCBIN18 BIN '18' PCBIN19 BIN '19' PCBIN20 BIN '20' PCBIN21 BIN '21' P
0x1eb7cc…1eb960 Dummy {f00=0x00eb, f01=0x018e, f02=»*********************************** x P* , : P* TABLE GIVING INDEXES FOR TRANSACTIONFIELDS 6 4 P* FIELD NR GIVES DISPLACEMENT IN TABLE t P* @ P************************************************************ PCFLTDEX BINI (
0x1eb960…1ebaf4 (0, 623) Opaque[0x194]
0x1ebaf4…1ebc88 # DirEnt {nam=»C167 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1d78, f03=0x0000}
0x1ebaf4…1ebc88 IdxSect {
0x1ebaf4…1ebc88 f00 = 0x00eb // 0x1ebaf4 @0x0
0x1ebaf4…1ebc88 f01 = 0x0002 // 0x1ebaf6 @0x2
0x1ebaf4…1ebc88 gno = [ // 0x1ebaf8 @0x4
0x1ebaf4…1ebc88 [0x00]: C0x00eb.0x3.0
0x1ebaf4…1ebc88 ]
0x1ebaf4…1ebc88 }
0x1ebc88…1ebe1c Dummy {f00=0x00eb, f01=0x010e, f02=» PT; P04; TID=TC; TCL=TC; * LEV=60; : P02; J PTDC=T01; V PLC=01L; f PTDC=T02; v PLC=01L; P01; PSCL=S04; PC; P00; P01; PSCL=S01; U; 001; TB2; P00
0x1ebe1c…1ebfb0 Dummy {f00=0x00eb, f01=0x2008, f02=» P04; TID=TC; TCL=TC; * LEV=60; : P02; J PTDC=T01; V PLC=01L; f PTDC=T02; v PLC=01L; P01; PSCL=S04; PC; P00; P01; PSCL=S01; U; 001; TB2; P00
0x1ebfb0…1ec144 Dummy {f00=0x00eb, f01=0x0190, f02=»$FALSE$$ CKTAUTO P!!RE 206,$$FALSE$$TRUE$$ DC & P!!RE 207,$$FALSE$$FALSE$$ CCYWRTF < $ P!!RE 208,$$FALSE$$TRUE$$ CADM22F f & P!!RE 209,$$FALSE$$TRUE$$ C5M DISK $ P!!RE 210,$$TRUE$$FALSE$$ CKASFLG $ P!!RE 211,$$TRUE$$FALSE$$ CSLDFLG & P
0x1ec144…1ec2d8 Dummy {f00=0x00eb, f01=0x0190, f02=»$FALSE$$FALSE$$ CTEXTFLG & P!!RE 247,$$FALSE$$FALSE$$ CSTRKFLG & P!!RE 248,$$FALSE$$FALSE$$ CBUDTFLG J P!!DL 287 t 4 PCFLAG BINI (12),X'0051',X'0050',X'0010',X'0010' $ P!!RE 317,$$FALSE$$FALSE$$ BUDGET $ P!!RE 318,$$FALSE$$TRUE$$ FAKT10
0x1ec2d8…1ec46c Dummy {f00=0x00eb, f01=0x018e, f02=» 401,$$29$$-29$$ $ P!!RE 422,$$FALSE$$TRUE$$ C167FLG 8 P!!RE 432,$$FALSE$$FALSE$$GENERATE LEVNR 5X XXXXXX CC @ . P!!RE 433,$$FALSE$$FALSE$$ C539FLG-TINGLEV | * P!!RE 434,$$TRUE$$FALSE$$ NO VSL CHECK & P!!RE 440,$$1400$$10000$$ DISK SIZE P!!
0x1ec46c…1ec600 Dummy {f00=0x00eb, f01=0x0190, f02=» " P!!RE 450,$$20$$20$$ INDEX FILE P!!RE 451,$$5$$5$$ CKTTOP * P!!DL 452,453 J PON STRGI (12),C' ' ^ P!!DL 777,780 z P!!DL 783,784 P!!DL 787,790 P!!DL 796 P!!DL 808,827 P!!DL 828,843 P!!DL 844,855 LP P!!
0x1ec600…1ec794 (0, 624) Opaque[0x194]
0x1ec794…1ec928 # DirEnt {nam=»STARTX«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1d80, f03=0x0000}
0x1ec794…1ec928 IdxSect {
0x1ec794…1ec928 f00 = 0x00ec // 0x1ec794 @0x0
0x1ec794…1ec928 f01 = 0x0024 // 0x1ec796 @0x2
0x1ec794…1ec928 gno = [ // 0x1ec798 @0x4
0x1ec794…1ec928 [0x00]: C0x00ec.0x0.0
0x1ec794…1ec928 [0x01]: C0x00ec.0x1.0
0x1ec794…1ec928 [0x02]: C0x00ec.0x2.0
0x1ec794…1ec928 [0x03]: C0x00ec.0x3.0
0x1ec794…1ec928 [0x04]: C0x00ed.0x0.0
0x1ec794…1ec928 [0x05]: C0x00ed.0x1.0
0x1ec794…1ec928 [0x06]: C0x00ed.0x2.0
0x1ec794…1ec928 [0x07]: C0x00ed.0x3.0
0x1ec794…1ec928 [0x08]: C0x00ee.0x0.0
0x1ec794…1ec928 [0x09]: C0x00ee.0x1.0
0x1ec794…1ec928 [0x0a]: C0x00ee.0x2.0
0x1ec794…1ec928 [0x0b]: C0x00ee.0x3.0
0x1ec794…1ec928 [0x0c]: C0x00ef.0x0.0
0x1ec794…1ec928 [0x0d]: C0x00ef.0x1.0
0x1ec794…1ec928 [0x0e]: C0x00ef.0x2.0
0x1ec794…1ec928 [0x0f]: C0x00ef.0x3.0
0x1ec794…1ec928 [0x10]: C0x00f0.0x0.0
0x1ec794…1ec928 [0x11]: C0x00f0.0x1.0
0x1ec794…1ec928 ]
0x1ec794…1ec928 }
0x1ec928…1ecabc Dummy {f00=0x00ec, f01=0x0190, f02=» 2 P IDENT START 2.1DK 6 79-10-20 870150540210 P : P =1, ODD BUFFER ADDRESS B P REL 2.1 79-05-23 d P =2, 6234 LAMPS P REL 2.1 79-05-23 P =3, UNDEFINED LABEL P REL 2.1 79-05-23 . P =4, CURSOR STOPS AT L
0x1ecabc…1ecc50 Dummy {f00=0x00ec, f01=0x0190, f02=»LENGTH=1 DK6 ~ & P DK5 - LMPVDU=1, 6272 ON VDU DK5 & P DK4 - FIELD SEPARATOR 6234 DK4 > P DK3 - PA 4-9 DK3 h " P DK2 - LAMPMODULE, 6272 DK2 P DK1 - NUM COMMA DK1 B P*************************************************************
0x1ecc50…1ecde4 Dummy {f00=0x00ec, f01=0x0190, f02=»MAIN FRAME ARE COMPOSED d B P* AND SENT BY USING ROUTINES IN MODULE VDUPRT. P* f N P************************************************************************** p P P P P P EJECT P* P* P* EN
0x1ecde4…1ecf78 Dummy {f00=0x00ec, f01=0x0190, f02=» ENTRY LIOLON TURN ON OFFLINE LAMP ( P ENTRY LIOLOF TURN OFF OFFLINE LAMP * P ENTRY VDUKB KB3270 (CREDIT) V P ENTRY DCTASK z P ENTRY DC1INQ P ENTRY DC2INQ $ P ENTRY REQTIM SET REQUEST TIMER P ENTRY ICWRTE P* P*
0x1ecf78…1ed10c Dummy {f00=0x00ec, f01=0x0190, f02=» P EXTRN GTRBUF P EXTRN RLRBUF P EXTRN ERASE VDUPRT 4 P EXTRN TRPF P P EXTRN SETCUR d P EXTRN WCHAR z P EXTRN TRPA P EXTRN ERASUA P EXTRN DISPL P EXTRN ERASUP P* 0 P EXTRN KEYCNV KEY CONVERSION
0x1ed10c…1ed2a0 Dummy {f00=0x00ec, f01=0x0190, f02=»DE p P EJECT P P > P********************************************************** ( P* j P* CONDITIONAL ASSEMBLY t P* & P********************************* P P* F PKB6272 EQU 0 IF PTS 6272 (6236) IS NOT USED YO
0x1ed2a0…1ed434 (0, 625) Dummy {f00=0x00ec, f01=0x0190, f02=»N EQU 1 . PDCLIN EQU 1 NUMBER OF MAIN FRAMES (1 OR 2) PPFX EQU 1 B PPAX EQU 1 T ( PIN:DL EQU 1 INSERT&DELETE FUNCTIONS f 8 PCOPCMD EQU 1 COPY COMMAND (ONLY TO PRINTER) IF := 1 PCOPL EQU 1 COPY LOCK IF := 1 & PLMPVDU EQU 0 =1, 6272
0x1ed434…1ed5c8 Dummy {f00=0x00ec, f01=0x0190, f02=»EQUATES P* PRSET EQU /B2 RESET KEY " P* COMMON EQU FOR ECB HANDLING 8 P* ^ P h PECBBA EQU 2 p PECBRL EQU 4 PECBEL EQU 6 PECBRC EQU 8 PECBCW EQU 10 P* P* P* CREDIT USED EQU P*
0x1ed5c8…1ed75c Dummy {f00=0x00ec, f01=0x0190, f02=» IFT COPCMD=1 PECBDC2 EQU ECBDC-DIS PECBICR EQU ECBDC2-DIS 2 PECBICW EQU ECBICR-DIS P P XIF n P IFT DCLIN=2 z P IFF COPCMD=1 PECBDC2 EQU ECBDC-DIS PECBICW EQU ECBDC2-DIS P XIF P IFF DCLIN=2 P IFT COPCM
0x1ed75c…1ed8f0 Dummy {f00=0x00ec, f01=0x0190, f02=»CBDC-DIS P XIF PECBVDU EQU ECBICW-DIS PECBKB EQU ECBVDU-DIS : PECBSD EQU ECBKB-DIS V P EJECT r P* P* " P* BASE ADDRESS FOR TCA AND ECB P* PTCABAS EQU A11 PCREBAS EQU A13 ECB P* P* P
0x1ed8f0…1eda84 Dummy {f00=0x00ec, f01=0x018e, f02=»EQU BVDU+1920 CURSOR ADDRESS , BINARY * PATTRIB EQU PCURS+2 LAST ATTRIBUTE CHAR . PCURATT EQU ATTRIB+2 & PWCC EQU CURATT+2 WCC/CCC CHARACTER x . PKBINH EQU WCC+2 KEYBOARD INHIBIT INDICATOR $ PLINCNT EQU KBINH+2 LINE COUNTER 0 PDCLENG EQU L
0x1eda84…1edc18 Dummy {f00=0x00ec, f01=0x0190, f02=» f $ POFFFLG EQU INTATT+2 OFFLINE FLAG ( PCOPNO EQU OFFFLG+2 HARDCOPY TASK ID 0 * PCCC EQU COPNO+2 COPY COMMAND CHARACTER PMAIN EQU CCC+2 MAIN FRAME & PMODE EQU MAIN+2 INSERT MODE SWITCH $ PKEYS EQU MODE+2 KEY LOCK STATUS . PECBDCC EQU
0x1edc18…1eddac Dummy {f00=0x00ec, f01=0x0190, f02=»EAD KB f 0 PLAMSAV EQU RDMORE+2 SAVE AREA FOR LAMPS DK2 P EJECT B PNULL EQU /7F NULL CHARACTER P PDUPCH EQU /7B t PFMCH EQU /60 * PLBVDU EQU 1920 1920 CHAR DISPLAY 6344 " PLPAGE EQU 48 LINES ON ONE PAGE * PLLINE EQU 80 80 CHAR P
0x1eddac…1edf40 Dummy {f00=0x00ec, f01=0x0190, f02=»BRKBV+2 NUMBER OF GTPS P* 2 PMF1KBV EQU NBRGTP+2 DV ADDRESSES KB/VDU MF #1 ( 2 PMF1GTP EQU MF1KBV+16 DV ADDRESSES GTPS MF # 1 ^ P IFT DCLIN=2 PMF2KBV EQU MF1GTP+16 PMF2GTP EQU MF2KBV+16 P XIF P EJECT P* . P* KE
0x1edf40…1ee0d4 (0, 626) Dummy {f00=0x00ec, f01=0x0190, f02=» P DATA CHAR # P DATA CHAR $ P DATA CHAR % , ( P DATA CHARFS & FIELD SEPARATOR DK4 @ P DATA CHAR ' l P DATA CHAR ( P DATA CHAR ) P DATA CHAR * P DATA CHAR + P DATA NUM , DK P DATA NUM - P DATA NUM .
0x1ee0d4…1ee268 Dummy {f00=0x00ec, f01=0x0190, f02=»ATA NUM 5 P DATA NUM 6 P DATA NUM 7 & P DATA NUM 8 : P DATA NUM 9 N P DATA CHAR : b P DATA CHAR ; v P DATA CHAR < P DATA CHAR = P DATA CHAR > P DATA CHAR ? P* P DATA CHAR E' P DATA CHAR A
0x1ee268…1ee3fc Dummy {f00=0x00ec, f01=0x0190, f02=» H P DATA CHAR I P DATA CHAR J P DATA CHAR K 2 P DATA CHAR L F P DATA CHAR M Z P DATA CHAR N n P DATA CHAR O P* P DATA CHAR P P DATA CHAR Q P DATA CHAR R P DATA CHAR S P DATA CHAR T P DAT
0x1ee3fc…1ee590 Dummy {f00=0x00ec, f01=0x0190, f02=» DATA CHAR BACK SLASH P DATA CHAR ] P DATA CHAR CIRCOMFLEX 2 P DATA CHAR UNDERLINE P P* l $ P DATA RETURN /60 CANNOT BE USED v P DATA CHAR LOWER CASE P DATA CHAR P DATA CHAR P DATA CHAR P DATA CHAR P DAT
0x1ee590…1ee724 Dummy {f00=0x00ec, f01=0x0190, f02=» P DATA CHAR P DATA CHAR P* ( P IFT KEYLST=1 2 P DATA KEYL KEYLOCK H P DATA KEYL b P DATA KEYL t P DATA KEYL P DATA KEYL P DATA KEYL P DATA KEYL P DATA KEYL P XIF P IFF KEYLST=1 P DATA
0x1ee724…1ee8b8 Dummy {f00=0x00ec, f01=0x0190, f02=»ATA RETURN P XIF P DATA CHAR LOWER CASE X P DATA CHAR > P DATA CHAR P ( P DATA RETURN /7B-/7F CANNOT BE USED b P DATA RETURN P DATA RETURN P DATA RETURN P DATA RETURN P* P IFT PAX=1 P DATA PAEX
0x1ee8b8…1eea4c Dummy {f00=0x00ec, f01=0x0190, f02=»- PA10 (ALFASKOP) P DATA PA410 P DATA PA410 . P DATA PA410 B P DATA PA410 V P DATA PA410 j P DATA PA410 ~ P DATA CLEAR P IFT PFX=1 P DATA PFEX P XIF P IFF PFX=1 P DATA RETURN P XIF P
0x1eea4c…1eebe0 Dummy {f00=0x00ec, f01=0x0190, f02=» DATA PF 8 P DATA PF 9 P DATA PF 10 $ P DATA PF 11 8 P DATA PF 12 L . P DATA RETURN /99-/A4 RESERVED FOR PF13-24 ` P DATA RETURN P DATA RETURN P DATA RETURN P DATA RETURN P DATA RETURN P DATA RETURN
0x1eebe0…1eed74 (0, 627) Dummy {f00=0x00ec, f01=0x018e, f02=»A CRUP P DATA CRLEFT P DATA CRRIGT " P DATA CRDOWN 6 P DATA BAKTAB J P DATA TAB ^ P DATA CRNL p P DATA RDHOME P DATA ERINPT P DATA EREOF P* P IFT IN:DL=1 P DATA INSERT P DATA DELETE P XIF
0x1eed74…1eef08 Dummy {f00=0x00ec, f01=0x0190, f02=» P DATA COPY P IFT OFLIN=1 P DATA OFLINE * P XIF > P IFF OFLIN=1 J P DATA RETURN ^ P XIF r P IFT DCLIN=2 ~ P DATA MFCHGE P XIF P IFF DCLIN=2 P DATA RETURN P XIF P DATA RETURN P DATA RETURN
0x1eef08…1ef09c Dummy {f00=0x00ec, f01=0x018e, f02=» DATA LCASPW LOWER CASE P - W (BECAUSE OF KEYLOCK) P DATA LCASPW : P DATA LCASPW N P DATA LCASPW b P DATA LCASPW v P DATA LCASPW P DATA LCASPW P DATA LCASPW P EJECT B P****************************************************
0x1ef09c…1ef230 Dummy {f00=0x00ec, f01=0x0190, f02=» PDCTASK EQU * P CF A14,I:EVA0 & P LDR* A1,A9 POLL & SELECT ADDRESS 2 P LDKL A8,ECBDC P ADR A8,CREBAS r P ST A1,ECBCW,A8 $ P LDK A7,/B7 TRANSFER PARAMETERS P LKM P DATA 1 PDCT100 EQU * . P LDK A7,/80 TEST
0x1ef230…1ef3c4 Dummy {f00=0x00ec, f01=0x0190, f02=»EBAS P CF A14,DCGETM P LD A4,ECBBA,A8 " " P CF A14,RLRBUF RELEASE BUFFER : P RB DCT100 ` P EJECT r P* P* ( P* SUBROUTINE ACTIVATED BY ALL TASKS P* P* PEMULA EQU * " P ADR A8,CREBAS GET ECB ADDRESS
0x1ef3c4…1ef558 Dummy {f00=0x00ec, f01=0x0190, f02=» P* : P***************************************************** P* P P* VDUKB Z P* n " P* MAIN MODULE FOR KEYBOARD VDU x P* < P******************************************************** PVDUKB EQU * P CF A14,I:EV
0x1ef558…1ef6ec Dummy {f00=0x00ec, f01=0x0190, f02=»14 STACK h P ST A13,-2,A14 $ P SUKL A14,4 UPDATE STACK POINTER & P CM OFFFLG,TCABAS N , P CM LAMSAV,TCABAS CLEAR LAMP STATUS DK2 h * P CF A14,LIOLOF TURN OFF OFF LINE LAMP P XIF P P EJECT B P********************************
0x1ef6ec…1ef880 Dummy {f00=0x00ec, f01=0x0190, f02=»******************************* r P ( P LDR* A4,TCABAS REL TASK NO 0 " P AD A4,6,CREBAS 'CB1' ADDRESS T & P LC A1,MF1KBV-1,A4 GET DV-ADDRESS z P ANK A1,/FF P LDKL A8,ECBDC P CF A14,EMULA P P IFT DCLIN=2 B P********
0x1ef880…1efa14 (0, 628) Dummy {f00=0x00ed, f01=0x0190, f02=»******************************************************* P @ & P LC A1,MF2KBV-1,A4 GET DV ADDRESS H P ANK A1,/FF r P LDKL A8,ECBDC2 P CF A14,EMULA P XIF P EJECT PVDU080 EQU * P CF A14,ERASE ERASE SCREEN P
0x1efa14…1efba8 Dummy {f00=0x00ed, f01=0x0190, f02=»CABAS INDICATE MAIN-FRAME # 1 P EJECT & P* 4 P* RELATIVE POS IN ECBBLK > PKB EQU 2 ^ PDC1 EQU 4 n P IFT DCLIN=2 P IFT COPCMD=1 PDC2 EQU 6 PICR EQU 8 PECBBS EQU 4 P XIF P IFT DCLIN=2 P IFF C
0x1efba8…1efd3c Dummy {f00=0x00ed, f01=0x0190, f02=»3 P XIF P IFF DCLIN=2 P IFF COPCMD=1 * PECBBS EQU 2 @ P XIF T P* ` P LDK A1,ECBBS j P ST A1,ECBBLK,TCABAS PVDU100 EQU * P LD A1,ECBBLK+DC1,TCABAS P RF(NZ) VDU110 PENDING 0 P CF A14,DC1INQ TEST IF ANY
0x1efd3c…1efed0 Dummy {f00=0x00ed, f01=0x0190, f02=»DC2INQ TEST IF ANY MESSAGE MF # 2, NO WAIT P XIF ! 2 PVDU120 EQU * ! > P IFT COPCMD=1 ! R P LD A1,ECBBLK+ICR,TCABAS ! h P RF(NZ) VDU125 PENDING ! P LDKL A3,ICWORK BUFFER ! P ADR A3,TCABAS ADDRESS ! P LDK A6,2 REQ LENGTH ! P CF A14,
0x1efed0…1f0064 Dummy {f00=0x00ed, f01=0x0190, f02=» ( P CF A14,RDKBNW READ KEYBOARD NO WAIT " PVDU150 EQU * " 0 P LDKL A7,ECBBLK " D P ADR A7,TCABAS " P LKM " r P DATA 7 MULTIPLE WAIT " ~ P CW A8,ECBBLK+KB,TCABAS " $ P RF(E) KBINP INPUT FROM KEYBOARD " P IFT COPCMD=1 " P CW A8,ECBBLK+
0x1f0064…1f01f8 Dummy {f00=0x00ed, f01=0x0190, f02=» CF A14,DCINP INPUT FROM DC " P RB VDU100 # $ P EJECT # 6 P* # D P* READ KEYBOARD WITH NO WAIT # N P* # r PRDKBNW EQU * # | P LDKL A8,ECBKB # P ADR A8,CREBAS # P LDK A7,1 # " P ST A7,ECBRL,A8 REQ LENGTH = 1 # * P ST A7,ECBCW,A8 INDI
0x1f01f8…1f038c Dummy {f00=0x00ed, f01=0x0190, f02=»QU * # P LDKL A8,ECBDC $ P ADR A8,CREBAS $ " P ST A8,ECBBLK+DC1,TCABAS $ 8 PDC1I20 EQU * $ X P LDK A1,0 $ l P CF A14,REQTIM $ ~ P LDK A7,0 $ PDC1I30 EQU * $ P LKM $ P DATA 1 $ P RTN A14 $ PDC2INQ EQU * $ P IFT DCLIN=2 $
0x1f038c…1f0520 Dummy {f00=0x00ed, f01=0x0190, f02=» EJECT $ P* % " P* SEND BUFFER TO PRINTER TASK % P* % > PBUFCOP EQU * % H P CM ECBBLK+ICR,TCABAS % P LDKL A3,BVDU BUFFER % z P ADR A3,TCABAS ADDRESS % P IFT COPL=1 % P* % P* CHECK IF COPY LOCK % P* % P LCR A2,A3 %
0x1f0520…1f06b4 (0, 629) Dummy {f00=0x00ed, f01=0x018e, f02=»DDRESSED WITH WAIT % v P LD A5,ICWORK,TCABAS TASK ID & P LDKL A6,LBVDU REQ LENGTH & > P CF A14,ICWRTE & ` P LD A1,KBINH,TCABAS & v ( P ANK A1,/E NOT INHIBITED ANY LONGER & P ST A1,KBINH,TCABAS & P RB VDU100 & P XIF & P EJECT & P**
0x1f06b4…1f0848 Dummy {f00=0x00ed, f01=0x0190, f02=» P LD A2,ECBRC,A8 ' P RF(0) KBIN10 ' PKBIN05 EQU * ' 2 $ P LDK A7,4 RESET KEYBOARD BUFFER ' F P LKM ' n P DATA 1 ' z P RB VDU100 ' PKBIN10 EQU * ' P LD A1,KBINH,TCABAS ' , P ANK A1,1 RESETTING BY 'RESET' ALLOWED ? ' P RB(NZ) KBIN
0x1f0848…1f09dc Dummy {f00=0x00ed, f01=0x0190, f02=» ' P LD A1,KBINH,TCABAS ( " P ANK A1,6 MUST BE RESET KEY ? ( $ P RF(Z) KBIN20 NO ( J P CWK A2,RSET RESET KEY ? ( b P RB(NE) KBIN05 NO ( PKBIN20 EQU * ( $ P LDR A5,A2 COPY INPUT CHARACTER ( P SUK A5,/20 INDEX ( P RB(N) VDU100 ILLEGAL
0x1f09dc…1f0b70 Dummy {f00=0x00ed, f01=0x0190, f02=» 6 P ABL(NZ) VDU100 DC COMPLETED, TAKE CARE OF MESSAGE ) P ADR A5,A5 TO KEY TABLE ) > P* ) ^ P LDKL A8,ECBVDU ) h P ADR A8,CREBAS ) P LD A1,RDMORE,TCABAS ) P RF(Z) KBIN30 ) P* ) P CFR A14,A1 ) P ABL VDU100 ) P* ) PKBIN
0x1f0b70…1f0d04 Dummy {f00=0x00ed, f01=0x018e, f02=»UEST TO ENABLE WRITE ) P* * PDCABOR EQU * * & P LDK A7,0 * : P LDKL A8,ECBDC * L P IFT DCLIN=2 * b P LD A1,MAIN,TCABAS * v P RF(NZ) DCAB05 * P XIF * P CM ECBBLK+DC1,TCABAS * P IFT DCLIN=2 * P RF DCAB10 * PDCAB05 EQU * *
0x1f0d04…1f0e98 Dummy {f00=0x00ed, f01=0x0190, f02=» P RTN A14 + P EJECT + P* + " P* SET REQUEST TIMER + , P* A1 = TIME OUT VALUE + H P* A8 = ECB ADDRESS + f P* + PREQTIM EQU * + P ST A1,ECBCW,A8 + P LDK A7,/B9 + P LKM + P DATA 1 + P RTN A14 + P EJECT + P +
0x1f0e98…1f102c Dummy {f00=0x00ed, f01=0x0190, f02=»**************************************************** + P* , < PRETURN RTN A14 , F P EJECT , P* , j < P******************************************************* , t P* , P* CRLEFT , P* , 6 P* THIS MODULE MOVES THE CURSOR ONE POS T
0x1f102c…1f11c0 Dummy {f00=0x00ed, f01=0x0190, f02=»S GET CURSOR BINARY , ~ P SUK A2,1 - $ P RF(NN) CRL050 NOT LEFTMOST POS - . P LDKL A2,LBVDU-1 - V PCRL050 RF CRH100 - n P* - < P******************************************************** - P* - P* CRRIGT - P* - < P* THIS MODUL
0x1f11c0…1f1354 (0, 630) Dummy {f00=0x00ed, f01=0x018e, f02=»=CHARACTER - P* . PCRRIGT EQU * . * P LD A2,PCURS,TCABAS GET CURSOR BINARY . 0 P ADK A2,1 . ^ P CWK A2,LBVDU END OF BUFFER? . p P RF(L) CRR050 NO . P LDK A2,0 . PCRR050 RF CRH100 . P EJECT . P* . @ P**************************
0x1f1354…1f14e8 Dummy {f00=0x00ed, f01=0x0190, f02=» . V P* / @ P************************************************************ / P* / V PCRDOWN EQU * / ` & P LD A2,PCURS,TCABAS GET CURSOR POS / t P ADKL A2,LLINE / P CWK A2,LBVDU LAST LINE? / P RF(L) CRD050 NO / P SUKL A2,LBVDU / PCRD050
0x1f14e8…1f167c Dummy {f00=0x00ed, f01=0x0190, f02=»VE CURSOR ONE LINE UP. SAME COL. / P* 0 ( B P************************************************************** 0 2 P* 0 x PCRUP EQU * 0 * P LD A2,PCURS,TCABAS GET CURSOR BINARY 0 P SUKL A2,LLINE 0 P RF(NN) CRU050 UPMOST LINE 0 P ADKL A2,LBVDU
0x1f167c…1f1810 Dummy {f00=0x00ed, f01=0x0190, f02=» 0 P* 1 P* HOME POSITIONING OF CURSOR 1 P* 1 6 : P****************************************************** 1 @ P* 1 ~ PCRHOME EQU * 1 P LDK A2,0 1 PCRH100 EQU * 1 * P ST A2,PCURS,TCABAS GET CURSOR BINARY 1 P CF A14,ATMASB UPDATE AT
0x1f1810…1f19a4 Dummy {f00=0x00ed, f01=0x018e, f02=»******* 1 b P* 2 P* CRNL 2 P* 2 ( 2 P* CURSOR IN FIRST UNPROTECTED POS ON NEW LINE 2 2 P* 2 h : P***************************************************** 2 r P* 2 PCRNL EQU * 2 & P LD A2,PCURS,TCABAS GET CURSOR POS 2 P ADKL A2,LLINE NEX
0x1f19a4…1f1b38 Dummy {f00=0x00ed, f01=0x0190, f02=» PCRN050 LDK A1,0 3 PCRN100 SUKL A2,LLINE 3 P RF(N) CRN120 3 8 P ADKL A1,LLINE 3 N P RB CRN100 3 d 2 PCRN120 ST A1,PCURS,TCABAS STORE CURSOR ADDRESS 3 v P EJECT 3 P 3 F P****************************************************************** 3
0x1f1b38…1f1ccc Dummy {f00=0x00ed, f01=0x0190, f02=»3,/10 3 P RF(NZ) TAB PROTECTED FIELD 4 . P CW A2,PCURS,TCABAS CURSOR ON ATTRIBUTE ?? 4 2 P RF(NE) CRN150 NO!! 4 d ( P CWK A2,1919 LAST SCREEN POSITION?? 4 P RF(NE) CRN140 NO!! 4 PCRN130 LDKL A2,-1 4 PCRN140 ADK A2,1 4 P ST A2,PCURS,T
0x1f1ccc…1f1e60 Dummy {f00=0x00ed, f01=0x0190, f02=»***** 4 R P EJECT 5 P* 5 8 P**************************************************** 5 & P* 5 b P* TAB 5 l P* 5 z 2 P* MOVE THE CURSOR TO THE FIRST CHAR. LOCATION 5 ( P* OF THE NEXT UNPROTECTED DATA FIELD 5 P* 5 8 P************************
0x1f1e60…1f1ff4 (0, 631) Dummy {f00=0x00ed, f01=0x0190, f02=»OB POS 5 ~ P* A2=CURSOR BINARY ADDRESS 6 P* A3=CHARACTGR 6 0 P* 6 F PTAB EQU * 6 P P LDK A5,1 6 b & P LD A2,PCURS,TCABAS GET CURSOR POS 6 t * PTAB100 CF A14,ATMASF SEARCH ATTRIBUTE 6 P CWK A1,0 END OF BUFFER? 6 P RF(G) TAB300 YES 6 P A
0x1f1ff4…1f2188 Dummy {f00=0x00ed, f01=0x0190, f02=»S 6 x & P CF A14,SETCUR DISPLAY NEW CURSOR 7 P RTN A14 7 4 PTAB300 LDK A2,0 7 D , P CWK A1,3 ATTRIBUTE IN LAST POSITION ?? 7 P EJECT 7 < P******************************************************** 7 P RF(NE) TAB350 NO!! 7 ( P ANK A5,1 WHOLE BU
0x1f2188…1f231c Dummy {f00=0x00ed, f01=0x0190, f02=»************************************************ 7 $ P ANK A5,1 WHOLE BUFF. CONTROLED? 8 8 P RF(G) TAB400 NO 8 ` 0 P RB TAB200 ALL PROT. OR NON-FORMATTED BUFF. 8 x PTAB400 LDK A5,0 8 P RB TAB100 8 P EJECT 8 P* 8 @ P**************************
0x1f231c…1f24b0 Dummy {f00=0x00ed, f01=0x0190, f02=»QUE CHARACTER CODE 8 l : P* TO BE ENTERED INTO THE DISPLAY BUFFER AND A STANDARD 9 ( P* TAB KEY OPERATION TO BE PERFORMED 9 X P* 9 @ P************************************************************ 9 P* 9 PDUP EQU * 9 & P LD A1,MODE,TCABAS INSERT
0x1f24b0…1f2644 Dummy {f00=0x00ed, f01=0x0190, f02=»DDR. 9 h P SCR A2,A3 : P CF A14,NUM : P CF A14,TAB : 2 P RTN A14 : F P EJECT : V P* : d @ P*********************************************************** : n P* : P* FIELD MARK : P* : @ P* OPERATION OF THIS KEY CAUSES A U
0x1f2644…1f27d8 Dummy {f00=0x00ed, f01=0x0190, f02=» P* ; > P********************************************************** ; P* ; P PFLDMRK EQU * ; Z $ P LD A1,MODE,TCABAS INSERT MODE?? ; n 6 P ABL(NZ) ERROR FUNCTION NOT ALLOWED IN INSERT MODE ; P LDK A2,FMCH ; 2 P LD A3,ECBKB+ECBBA,CREBAS GET KB BUF
0x1f27d8…1f296c Dummy {f00=0x00ed, f01=0x0190, f02=»****************** ; h P* < P* RDHOME < $ P* < : P* READY HOME KEY < D 8 P* OPERATION OF THIS KEY CAUSES THE CURSOR TOBE < b : P* POSITIONED AT THE FIRST UNPROTECTED CHARACTER < P* ON THE SCREEN < P* < < P****
0x1f296c…1f2b00 Dummy {f00=0x00ed, f01=0x0190, f02=» , P LC A2,1919,A4 GET LAST SCREEN CHARACTER = P ANK A2,/7F = 4 P CWK A2,/20 = H P RF(NL) RDH10 = P ANK A2,/10 = r $ P ABL(Z) CRHOME UNPROTECTED FIELD = PRDH10 CM PCURS,TCABAS = , P CF A14,TAB SEARCH 1ST UNPROTECTED FIELD = P RTN A14 =
0x1f2b00…1f2c94 (0, 632) Dummy {f00=0x00ee, f01=0x0190, f02=» CURSOR TO THE FIRST CHARACTER LOCATION = 2 P* OF THE NEXT PRECIDING UNPROTECTED DATA FIELD > 0 P* > f 8 P**************************************************** > p P* > P* A2=CURSOR BINARY ADDRESS > P* A3=CHARACTER > PBAKTAB EQU * > P LDK A
0x1f2c94…1f2e28 Dummy {f00=0x00ee, f01=0x0190, f02=»K100 YES > " P CWK A2,0 UPPER LEFTMOST POS? ? P RF(E) BAK400 YES ? 6 P SUK A2,1 ? P ( PBAK100 CWK A2,0 UPPER LEFTMOST POS? ? b P RF(E) BAK400 YES ? PBAK200 SUK A2,1 ? $ P CF A14,ATMASB SEARCH ATTRIBUTE ? @ P********************************
0x1f2e28…1f2fbc Dummy {f00=0x00ee, f01=0x0190, f02=» ? ` 0 P SUR A2,A2 ATTRIBUTE FOUND IN LAST POSITION @ P RF BAK300 @ < PBAK250 EQU * @ N > P********************************************************* @ b P ANK A3,/10 PROTECTED? @ P RB(NE) BAK100 YES @ P ADK A2,1 @ PBAK300 ST A2,PCURS,TCABAS
0x1f2fbc…1f3150 Dummy {f00=0x00ee, f01=0x0190, f02=»A2,LBVDU-1 END BUFFER ADDRESS @ " P CF A14,GBUFFC GET BUFF CHAR. A & P CWK A3,/1F ATTRIBUTE CHAR? A L P RB(G) BAK200 NO A p P ANK A3,/10 PROTECTED? A P RB(NE) BAK200 YES A . P ST A3,ATTRIB,TCABAS UPDATE NEW ATTRIBUTE A P ST A2,CURATT,TCABAS A
0x1f3150…1f32e4 Dummy {f00=0x00ee, f01=0x018e, f02=»************************ A h P EJECT B P* B . > P********************************************************* B 8 P* B z P* CHAR B P* B : P* ALPHABETIC AND SPECIAL CHAR UPDATING AND DISPLAYING B P* B > P************************************
0x1f32e4…1f3478 Dummy {f00=0x00ee, f01=0x0190, f02=» B t P* C PCHAR EQU * C & P LD A2,PCURS,TCABAS GET CURSOR POS C $ . P LD A3,CURATT,TCABAS GET ATTRIBUTE ADDRESS C N P CWR A2,A3 CURSOR ON ATTRIB? C P RF(E) CHA300 YES C 2 PCHA100 LD A3,ATTRIB,TCABAS GET ATTRIBUTE CHAR C P LDR A4,A3 C " P A
0x1f3478…1f360c Dummy {f00=0x00ee, f01=0x0190, f02=» C , PCHA300 ABL ERROR NOT ALLOWED DISPLAY POS D P* D 8 P********** D B " P* UPDATING OF FIELD SEPARATOR D T P* DK4 D z P* D PCHARFS EQU * DK4 D P IFF KB6272=1 DK4 D $ P LDK A2,/26 LOAD CHARACTER & DK4 D > P SC* A2,ECBKB+ECBBA,CREB
0x1f360c…1f37a0 Dummy {f00=0x00ee, f01=0x0190, f02=»********************************************* D ~ P* E 6 & P* Z E R O : 3 TRIPLE ZERO KEY E @ ( P* Z E R O : 2 DOUBLE ZERO KEY E j P* E 6 P************************************************* E P E PZERO:3 EQU * E P LDK A1,X'30' CHAR
0x1f37a0…1f3934 (0, 633) Dummy {f00=0x00ee, f01=0x0190, f02=» E P LDK A1,X'30' CHARACTER ZERO F 8 P SC* A1,ECBKB+ECBBA,CREBAS STORE CHARACTER IN BUFFER F , " P CF A14,NUM DISPLAY CHARACTER F h " P CF A14,NUM DISPLAY CHARACTER F P RTN A14 RETURN F P* F > P**************************************************
0x1f3934…1f3ac8 Dummy {f00=0x00ee, f01=0x018e, f02=»******************** F j P* G PNUMCOM EQU * G & P LDK A2,/2C G : P SC* A2,ECBKB+ECBBA,CREBAS G N P* G p PNUM EQU * G z & P LD A2,PCURS,TCABAS GET CURSOR POS G . P LD A3,CURATT,TCABAS GET ATTRIBUTE ADDRESS G $ P CWR A2,A3 CURSOR ON ATTRIBUTE?
0x1f3ac8…1f3c5c Dummy {f00=0x00ee, f01=0x0190, f02=» G r P RF(E) ANCOMM NO H , PNUM200 ABL ERROR NOT ALLOWED DISPLAY POS H P EJECT H P P* H ^ > P********************************************************** H h P* H P* ANCOMM H P* H < P* COMMON SUBMODULE FOR ALPHANUMERIC CHAR. DISPLAYING AND H
0x1f3c5c…1f3df0 Dummy {f00=0x00ee, f01=0x018e, f02=»4,ECBKB+ECBBA,CREBAS =1 H PANC005 EQU * I P LDKL A6,BVDU I 4 P ADR A6,TCABAS I J P ADR A6,A2 I ` P I r & P LD A1,MODE,TCABAS INSERT MODE ?? I z P RF(NZ) ANC010 YES!! I P SCR A4,A6 UPDATE VDU BUFF I * PANC010 LDR A7,A6 SAVE CURSOR POSITION
0x1f3df0…1f3f84 Dummy {f00=0x00ee, f01=0x0190, f02=» I r P ADR A6,A5 ATTRIB. POS J , P LD A3,ATTRIB,TCABAS GET ATTRIBUTE CHAR J & P ORK A3,1 MDT-BIT ON J V P SCR A3,A6 J r PANC100 EQU * J P IFT IN:DL=1 =3 J & P LD A1,MODE,TCABAS INSERT MODE ?? J P RF(Z) ANC120 NO!! J 0 P LCR A1,A7 GET CHARA
0x1f3f84…1f4118 Dummy {f00=0x00ee, f01=0x0190, f02=»CTER J t P XIF =3 K PANC120 EQU * K P K 2 2 P LDK A5,/2B CURSOR NOT MOVED BEFORE DISPLAYING K : P LD A1,ECBVDU+ECBBA,CREBAS K p P SC A5,1,A1 =1 K P LDK A5,/1E K P ADK A1,2 NEXT POS K ( P SCR A5,A1 LOW INT, STORE IN BUFFER K P L
0x1f4118…1f42ac Dummy {f00=0x00ee, f01=0x0190, f02=»0 YES K P LDK A2,/20 LOAD SPACE L P RF ANC250 NON DISPLAYING L , ( PANC150 LDK A5,/1F SET HIGH INTENSITY L N P SCR A5,A1 STORE IN BUFFER L z ( PANC200 LDR A2,A4 UPDATE A2 WITH CHAR L 0 PANC250 CF A14,WCHAR DISPLAY CHAR AND CURSOR L & P LD A2,PCURS
0x1f42ac…1f4440 Dummy {f00=0x00ee, f01=0x0190, f02=» P CWK A2,LBVDU M P RF(NE) ANC255 M P LDKL A2,0 M 0 PANC255 EQU * M B P ST A2,PCURS,TCABAS M V " P CF A14,GBUFFC GET BUFFER CHAR M r P CWK A3,/1F ATTRIBUTE CHAR? M P RF(G) ANC300 NO M P M ( P CF A14,TAB SKIP TO NEXT UNPROTECTED M P
0x1f4440…1f45d4 (0, 634) Dummy {f00=0x00ee, f01=0x0190, f02=» RF(NZ) ANC350 NO!!! M : P CF A14,SETCUR POSITION CURSOR TO 1:ST POS. NEXT LINE N PANC350 EQU * N Z P RTN A14 N n P IFT IN:DL=1 N ~ P EJECT N P N 8 P*************************************************** N P* N < P* DELETE CHARACTER AT CU
0x1f45d4…1f4768 Dummy {f00=0x00ee, f01=0x0190, f02=»********************** N j P O PDELETE EQU * O & P LDKL A6,-1 O : & P LD A2,PCURS,TCABAS CURSOR ADDRESS O N ( PDEL:10 ADK A6,80 END OF LINE POINTER O x . P CWR A6,A2 LAST POSITION ON CURRENT LINE?? O $ P RB(L) DEL:10 NO!! TRY NEXT LINE O P O * P C
0x1f4768…1f48fc Dummy {f00=0x00ee, f01=0x0190, f02=» OF LINE ?? O r P RF(G) DEL:20 YES!! P P SUK A2,1 SKIP ATTRIBUTE P 0 P LDR A6,A2 P P PDEL:20 LDR A2,A6 P b P P z P P P LDK A1,BVDU P * P ADR A1,TCABAS ABSOLUTE BUFFER ADDRESS P P ADR A2,A1 END OF FIELD/LINE P ( P AD A1,PCURS,TCABAS CURS
0x1f48fc…1f4a90 Dummy {f00=0x00ee, f01=0x0190, f02=» P ORK A3,/80 SET MODIFIED BIT Q * P SCR A3,A1 SHIFT CHARACTER 1 POS. LEFT Q ( P ADK A1,1 Q V " P RB DEL:30 GET NEXT CHARACTER Q h P Q P Q * PDEL:40 LDK A3,NULL+/80 NULL CHARACTER Q * P SCR A3,A2 STORE AT END OF FIELD/LINE Q " P LD A3,ATTRIB,
0x1f4a90…1f4c24 Dummy {f00=0x00ee, f01=0x0190, f02=»VDU+1 UNFORMATTED SCREEN ??? Q P RF(E) INS:60 YES!!! R $ P ADKL A1,BVDU R @ . P ADR A1,TCABAS ABSOLUTE ATTRIBUTE ADDRESS R V " P SCR A3,A1 SAVE NEW ATTRIBUTE R & P RF INS:60 DISPLAY MODIFIED FIELD R P EJECT R P R B P**************************
0x1f4c24…1f4db8 Dummy {f00=0x00ee, f01=0x0190, f02=» , EXCEPT NULLS, ONE POSITION TO THE RIGHT R P* S 2 8 P**************************************************** S < P S x PINSERT EQU * S $ P IM MODE,TCABAS SET INSERT MODE S . P CF A14,LIOLON TURN ON "INSERT MODE" LAMP S P RTN A14 S P S P S
0x1f4db8…1f4f4c Dummy {f00=0x00ee, f01=0x0190, f02=»DU-1 S P RF INS:30 T P T P T & 0 PINS:20 CF A14,S:ATT SEARCH ATTRIBUTE FORWARD T . P T b P T j P SUK A1,2 ATTRIBUTE FOUND ?? T r P RF(Z) INS:30 NO!! T P SUK A2,1 T P T PINS:30 ADR A2,TCABAS T 6 P ADK A2,BVDU ADD BUFFER DISPLACEME
0x1f4f4c…1f50e0 Dummy {f00=0x00ee, f01=0x0190, f02=»0 YES!! T P LC A3,-1,A2 GET CHARACTER U P ORK A3,/80 SET MODIFIED BIT U 2 * P SCR A3,A2 SHIFT CHAR ONE POS TO RIGHT U V P SUK A2,1 U " P RB INS:40 GET NEXT CHARACTER U P U P U ( PINS:50 ORKL A9,/80 SET MODIFIED BIT U . P SCR A9,A6 SAVE
0x1f50e0…1f5274 (0, 635) Dummy {f00=0x00ee, f01=0x0190, f02=»IELDS U p ( P LD A2,PCURS,TCABAS CURSOR POSITION V P RB ANC252 V : P XIF V L P EJECT V X P V f > P********************************************************** V n P* V 4 P* SEARCH FIRST NULL CHARACTER AFTER CURSOR POS V P* V : P************
0x1f5274…1f5408 Dummy {f00=0x00ee, f01=0x0190, f02=»:NU30 V P LCR A3,A1 GET CHARACTER W & P ANK A3,/7F MASK AWAY MODIFIED BIT W . P CWK A3,NULL NULL CHARACTER W X P RF(E) S:NU20 YES!! W | P ADK A1,1 W * P RB S:NU10 CHECK NEXT BUFFER CHARACTER W P W * PS:NU20 LDR A2,A1 ADDRESS OF FIRST NULL W
0x1f5408…1f559c Dummy {f00=0x00ee, f01=0x0190, f02=» W P* X : P* PROGRAM ATTENTION KEY WHICH CAUSES AN I/O OPERATION X $ P* AND GENERATE AN AID CHARACTER X P P* X x > P********************************************************* X P* X PCANCEL EQU * X PPA2 EQU * X P LDK A2,/2E CANCEL P
0x1f559c…1f5730 Dummy {f00=0x00ee, f01=0x0190, f02=» ( P CF A14,TRPA UPDATE AID AND TRANSMIT Y P RTN A14 Y 0 P* Y @ P Y J P IFT PAX=1 Y R P Y d P* Y l P* Y v F P* PROGRAM ATTENTION KEY IS PRESSED AND NUMBER WILL BE INSERTED TO Y : P* DEFINE ONE OF THE FUNCTIONS UNDER PA1.CANCEL OR PA3 Y P
0x1f5730…1f58c4 Dummy {f00=0x00ee, f01=0x018e, f02=»CABAS Y P SUK A2,/31 CHECK IF NUM.1-3 Z P RF(L) PFERR ILLEGAL CHAR. Z 2 P SUK A2,/2 CHECK IF NUM.1-3 Z T P IFF PA49=1 DK3 Z x P RF(G) PFERR ILLEGAL CHAR. Z P XIF DK3 Z P IFT PA49=1 DK3 Z P RF(G) PAEXB PA 4-9? DK3 Z P XIF DK3 Z
0x1f58c4…1f5a58 Dummy {f00=0x00ee, f01=0x0190, f02=» P EJECT [ P [ P* [ & P* PA1 PROGRAM ATTENTION KEY [ $ P* [ N P* [ X PPA1 EQU * [ b P LDK A2,/2C PA1 POS [ t P RB CAN100 [ P* [ P* [ $ P* PA3 PROGRAM ATTENTION KEY [ P* [ P* [ PPA3 EQU * [ P LDK
0x1f5a58…1f5bec Dummy {f00=0x00ee, f01=0x0190, f02=» A2,/6 DK3 [ P RF(G) PFERR DK3 P ADK A2,/69 SET PA4-9 DK3 . P RB CAN200 DK3 P P XIF DK3 h P* z PPA410 EQU * P SUK A2,/20 P RB CAN200 P EJECT P* < P**************************************************
0x1f5bec…1f5d80 Dummy {f00=0x00ee, f01=0x0190, f02=»ACTER FOLLOWED BY AN SBA ORDER v 8 P* ATTRIBUTE ADDRESS AND TEXT FOR EACH MODIFIED FIELD ] & P* NULLS ARE SUPRESSED ] b P* ] > P********************************************************* ] P* ] PENTER EQU * ] P LDK A2,/3D ENTER POS ] P
0x1f5d80…1f5f14 (0, 636) Dummy {f00=0x00ef, f01=0x0190, f02=»D FIELDS+TRANSMIT ] x PENT200 EQU * ^ P RTN A14 ^ . P* ^ > P ^ H P IFT PFX=1 ^ P P ^ b P* ^ j P* ^ t F P* PROGRAM FUNCTION KEY IOS PRESSED AND NUMBER WILL BE INSERTED TO ^ ~ 0 P* DEFINE ONE OF THE FUNCTIONS UNDER PF1-PF12 ^ P* ^ P*
0x1f5f14…1f60a8 Dummy {f00=0x00ef, f01=0x0190, f02=» ^ x , P RF(L) PFERR ILLEGAL,GO TO ERR.HANDLING _ & P RF(Z) PF0 FIRST NUM. 0 GO TO PF0 _ 8 P SUK A2,/1 FIRST NUM. 1 ? _ b P RF(G) PFERR ILLEGAL NUM. _ P LDKL A1,PF1A _ P RF PFNXT _ PPF1A EQU * _ P CM RDMORE,TCABAS _ P SUK A2,/30 LE
0x1f60a8…1f623c Dummy {f00=0x00ef, f01=0x018e, f02=» _ h P ADK A2,/3C PF10-12 POS ` P RB ENT100 ` ( P ` : PPF0 EQU * ` B P LDKL A1,PF0A ` T PPFNXT EQU * ` j P ST A1,RDMORE,TCABAS ` ~ P RTN A14 ` PPF0A EQU * ` P CM RDMORE,TCABAS ` P SUK A2,/31 LEGAL NUM ? ` , P RF(L) PFERR ILLEG
0x1f623c…1f63d0 Dummy {f00=0x00ef, f01=0x018e, f02=» P RB ENT100 a P XIF a PPFERR EQU * a " * P CF A14,ERROR GO TO ERR-HANDLING RUTIN a 6 $ P RTN A14 GO TO MAIN READ MODULE a d P a P a PPF EQU * a P SUK A2,/5C a P RB ENT100 a P IFT OFLIN=1 a P EJECT a @ P********************
0x1f63d0…1f6564 Dummy {f00=0x00ef, f01=0x018e, f02=» 8 P* A BRANCH IS MADE BACK TO CREDIT PROGRAM b P* b @ B P************************************************************* b J POFLINE EQU * b P CF A14,CLEAR b POFLI05 EQU * b P CF A14,RESET b P IFT DCLIN=2 b P LD A7,MAIN,TCAB
0x1f6564…1f66f8 Dummy {f00=0x00ef, f01=0x0190, f02=» 6 P LDK A1,0 DV ADDRESS ::= 0MESSAGES TO VDU IGNORED c P LDKL A8,ECBDC MF # 1 c > & P CF A14,EMULA TRANSFER PARAMETERS c P IFT DCLIN=2 c P LDKL A8,ECBDC2 MF # 2 c & P CF A14,EMULA TRANSFER PARAMETERS c P XIF c P IFT OFLIN=1 c P CF A1
0x1f66f8…1f688c Dummy {f00=0x00ef, f01=0x0190, f02=»AG c p $ P ADKL A14,4 SKIP ONE STACK LEVEL d * P LD A13,2,A14 RELOAD REGISTERS A12-A13 d 2 P LD A12,4,A14 d ` $ P ADKL A14,4 UPDATE STACK POINTER d v * P ABL I:RT1 RETURN TO "OFFLINE" PROGRAM d P d P XIF d P IFT DCLIN=2 d P EJECT d @ P******
0x1f688c…1f6a20 Dummy {f00=0x00ef, f01=0x0190, f02=»THE APPROPRIATE 'SYSTEM' LAMP d j P* IS TTURNED ON e & P* e D J P********************************************************************* e N P* e PMFCHGE EQU * e P CF A14,CLEAR e PMFCH05 EQU * e P CF A14,RESET e P CF A14,LMF1OF
0x1f6a20…1f6bb4 (0, 637) Dummy {f00=0x00ef, f01=0x0190, f02=» P RF MFCH90 f PMFCH10 EQU * f P CF A14,LMF2ON f * PMFCH90 EQU * f @ P ST A1,MAIN,TCABAS f T P RTN A14 f n P XIF f ~ P EJECT f P* f < P******************************************************** f P* f P* CLEAR f P* f : P*
0x1f6bb4…1f6d48 Dummy {f00=0x00ef, f01=0x0190, f02=»RED TO NULLS AND CURSOR IS LOCATED IN f P* HOME POS g . P* g @ < P******************************************************** g J P* g PCLEAR EQU * g P LDK A2,/2D POS FOR 'CLEAR' g P LC A2,TASCII,A2 g . P CF A14,LINHON TURN ON "KEYBOARD INH
0x1f6d48…1f6edc Dummy {f00=0x00ef, f01=0x0190, f02=» @ P************************************************************ h P* h H P* EREOF h R P* h b P* ERASE TO END OF FIELD h l P* h @ P************************************************************ h P* h PEREOF EQU * h P LDK A6,1 h &
0x1f6edc…1f7070 Dummy {f00=0x00ef, f01=0x0190, f02=»RS,TCABAS h P i ( P************************ 77.06.01 i P i F 2 P CW A2,CURATT,TCABAS STANDING ON ATTRIBUTE ?? i N * P ABL(E) ERROR YES!! TURN ON ERROR LAMP i P i ( P************************ 77.06.01 i P i ( PERE150 CF A14,GBUFFC GET B
0x1f7070…1f7204 Dummy {f00=0x00ef, f01=0x0190, f02=»QU * i P LDKL A4,BVDU j P ADR A4,TCABAS j " P ADR A4,A3 j 8 0 P CF A14,ERASUA ERASE AND REPLASE WITH NULLS j J ( P CF A14,DISPL DISPLAY ERASED SCREEN j ~ P* j ( P* SET MDT BIT IF FORMATTED SCREEN j P* j P j P LD A2,CURATT,TCABAS j
0x1f7204…1f7398 Dummy {f00=0x00ef, f01=0x0190, f02=»ESS j j P LCR A1,A2 GET ATTRIBUTE k P ORK A1,1 SET MDT BIT k , P SCR A1,A2 k J PERE180 EQU * k P RTN A14 k p ( PERE200 CWK A2,LBVDU-1 END OF BUFFER? k P RF(E) ERE300 YES k P ADK A2,1 k P RB ERE150 NEXT k * PERE300 SUK A6,1 WHOLW BU
0x1f7398…1f752c Dummy {f00=0x00ef, f01=0x0190, f02=»************************************ k | P* l , P* ERINPT l 6 P* l F : P* CLEARS ALL UNPROTECTED CHARACTER LOCATIONS TO NULLS l P : P* AND REPOSITIONS THE CURSOR TO THE FIRST UNPROTECTED l " P* CHAR LOCATION ON THE SCREEN l P* l < P************
0x1f752c…1f76c0 Dummy {f00=0x00ef, f01=0x0190, f02=»SPL l P LD A2,PCURS,TCABAS m P CF A14,ATMASB m ( > P********************************************************* m > P SUK A1,1 m $ P RF(Z) ERI:10 NO ATTRIBUTE FOUND m 0 P RF(N) ERI:5 ATTRIBUTE NOT IN LAST POSITION m * P LDKL A2,-1 ATTRIBUTE IN L
0x1f76c0…1f7854 (0, 638) Dummy {f00=0x00ef, f01=0x0190, f02=»10 EQU * m P ST A2,PCURS,TCABAS n P RTN A14 n , P EJECT n < P* n J @ P************************************************************ n T P* n P* ERROR n P* n . P* THE MODULE TAKES CARE OF UNALLOWED KEYS n P* n @ P****************
0x1f7854…1f79e8 Dummy {f00=0x00ef, f01=0x0190, f02=»NH,TCABAS n 4 P ORK A5,4 BIT 13:=1,ERROR HANDLING.RESET ALLOWED o P ST A5,KBINH,TCABAS o J P o f P* o n P* TURN ON SOUND ALARM o x P* o P o P LDKL A8,ECBVDU o " P ADR A8,CREBAS VDU-ECB ADDRESS o " P LD A2,ECBBA,A8 BUFFER ADDRESS o
0x1f79e8…1f7b7c Dummy {f00=0x00ef, f01=0x0190, f02=»ESTED LENGTH o P ST A7,ECBRL,A8 p P LDK A7,X'86' SOUND ALARM p , P LKM p N P DATA 1 p Z P p j P RTN A14 p r P IFT KEYLST=1 p P EJECT p F P****************************************************************** p P* p ( P* KEY LOCK S
0x1f7b7c…1f7d10 Dummy {f00=0x00ef, f01=0x018e, f02=»****************** p ` P* q PKEYL EQU * q $ & P SUK A2,/78 GET NEG KEY LOCK VALUE q 6 " P LD A3,KEYS,TCABAS OLD STATUS q ` P LDK A4,/10 q PKEYL10 EQU * q P SRL A4,1 q P ADK A2,2 1 = OFF,0 = ON q P RB(N) KEYL10 q P ANR A3,A4 CHECK O
0x1f7d10…1f7ea4 Dummy {f00=0x00ef, f01=0x0190, f02=» q | PKEYL20 EQU * WAS ON r P LDR A2,A2 r $ $ P RF(Z) KEYL99 NOW ON, NO CHANGE r 6 PKEYL30 EQU * CHANGE r ^ P LD A3,KEYS,TCABAS r z P XRR A3,A4 CHANGE STATUS r ( P ST A3,KEYS,TCABAS STORE NEW STATUS r P* r P* KEYLOCK STATUS CHANGED r J
0x1f7ea4…1f8038 Dummy {f00=0x00ef, f01=0x0190, f02=», IF CHANGED TO OFF ELSE 0 r P* s " * P* INSERT USER ROUTINE BELOW THIS LINE s , P* s Z PKEYL99 EQU * s d P RTN A14 s x P XIF s P EJECT s P* s < P******************************************************** s P* s P* LAMPMODULE s
0x1f8038…1f81cc Dummy {f00=0x00ef, f01=0x0190, f02=» IFT KB6272=1 s PLMF1 EQU /20 t PLMF2 EQU /10 t * PLIOL EQU 1 DK2 t > PLINH EQU 8 DK2 t V PLERR EQU 4 DK2 t n PLSAV EQU /10 DK2 t P XIF t P IFF KB6272=1 t PLMF1 EQU 0 =2 t PLMF2 EQU 0 =2 t PLIOL EQU 1 =2 t PLINH
0x1f81cc…1f8360 Dummy {f00=0x00ef, f01=0x0190, f02=» t ~ P RF LMPOF u PLMF2ON LDK A3,LMF2 u P RF LMPON u 4 PLMF2OF LDK A3,LMF2 u F P RF LMPOF u ` PLIOLON LDK A3,LIOL u r P RF LMPON u PLIOLOF LDK A3,LIOL u P RF LMPOF u PLINHON LDK A3,LINH u P RF LMPON u PLINHOF LDK A3,LINH
0x1f8360…1f84f4 (0, 639) Dummy {f00=0x00ef, f01=0x0190, f02=» P RF LMPON v PLSAVOF LDK A3,LSAV v P RF LMPOF v 0 P* v B P IFF KB6272=1 DK2 v L PLMPON LDK A7,LON v f P RF SDISP v ~ PLMPOF LDK A7,LOF v P RF SDISP v P XIF DK2 v P IFT KB6272+LMPVDU=1 DK5 v PLMPON LDK A7,LON DK5 v
0x1f84f4…1f8688 Dummy {f00=0x00ef, f01=0x018e, f02=»N ORS A3,LAMSAV,TCABAS DK2 v P RF SDISP DK2 w $ PLMPOF C1R A3,A3 DK2 w : P ANS A3,LAMSAV,TCABAS DK2 w V P RF SDISP DK2 w x P XIF DK2 w P w P w P* w < P******************************************************** w P* w P*
0x1f8688…1f881c Dummy {f00=0x00ef, f01=0x0190, f02=» P* x P x PSDISP EQU * DK2+5 x P LDKL A8,ECBSD DK2+5 x 0 P ADR A8,CREBAS DK2+5 x L P IFF KB6272=1 DK2+5 x j P ST A3,ECBCW,A8 DK2+5 x P XIF DK2+5 x P IFT LMPVDU+KB6272=1 DK2+5 x P ST A3,ECBCW,A8 DK2+5 x P XIF DK2+5 x
0x1f881c…1f89b0 Dummy {f00=0x00ef, f01=0x0190, f02=»AMSAV,TCABAS DK2+5 x P ORS* A3,ECBBA,A8 DK2+5 y P LDK A3,2 DK2+5 y < P ST A3,ECBRL,A8 DK2+5 y T P LDK A7,/85 DK2+5 y r P XIF DK2+5 y P LKM DK2+5 y P DATA 1 DK2+5 y P RTN A14 DK2+5 y P EJECT y P* y < P**************
0x1f89b0…1f8b44 Dummy {f00=0x00ef, f01=0x0190, f02=»MASK IT y b P* z < P******************************************************** z P* z Z " P* A2=CURSOR BINARY ADDRESS z d $ P* A1=BUFFER SCANNING PARAM. z . P* 0=ATTRIB FOUND 1=END OF BUFFER LEFT z ( P* 2= ATTRIBUTE IN LAST POSITION
0x1f8b44…1f8cd8 Dummy {f00=0x00ef, f01=0x0190, f02=»AR. z z P RF(G) ASB10 NO { PASB08 ST A3,ATTRIB,TCABAS { $ , P ST A2,CURATT,TCABAS CURSOR ON ATTRIBUTE { F P RTN A14 { v PASB10 CWK A2,0 END OF BUFFER { P RF(E) ASB20 YES { P SUK A2,1 { P RB ASB05 NEXT { PASB20 EQU * { P EJECT {
0x1f8cd8…1f8e6c Dummy {f00=0x00ef, f01=0x0190, f02=»POSITION { v P CF A14,GBUFFC GET CHARACTER | P CWK A3,/1F ATTRIBUTE ??? | 4 P RB(NG) ASB08 YES!!! | V P SUR A2,A2 FIRST SCREEN POS. | r 2 P********************************************* | P | P LDK A1,1 END BUFFER LEFT | P CM ATTRIB,TCABAS
0x1f8e6c…1f9000 Dummy {f00=0x00ef, f01=0x0190, f02=»************************************************ | P* } 8 P* ATMASF } B P* } V : P* SEARCH FOR ATTRIBUTE CHAR. FORWARDS AND MASK IT } ` P* } > P********************************************************* } P* } P* A3=CHARACTER } "
0x1f9000…1f9194 (0, 640) Dummy {f00=0x00f0, f01=0x0190, f02=»=ATTRIB IN LAST BUFF POS } P* ~ P ~ * P ~ 2 PS:ATT EQU * ~ : P LD A7,ATTRIB,TCABAS ~ N P LD A8,CURATT,TCABAS ~ j , P CF A14,ATMASF SEARCH ATTRIBUTE FORWARD ~ P ST A7,ATTRIB,TCABAS ~ P ST A8,CURATT,TCABAS ~ P RTN A14 ~ P ~ PAT
0x1f9194…1f9328 Dummy {f00=0x00f0, f01=0x018e, f02=»10 NO ~ @ P************************************************************ , P CWK A2,LBVDU-1 EOB +ATTRIB IN LAST POS R @ P************************************************************ P RF(NE) ASF08 NO P LDK A1,3 PASF08 ST A3,ATTRIB,TCABA
0x1f9328…1f94bc Dummy {f00=0x00f0, f01=0x0190, f02=» ~ P LDK A1,2 P RTN A14 PASF20 ADK A2,1 * P RB ASF05 @ P EJECT R P* ` 6 P************************************************** j P* P* GBUFFC P* 6 P* GET VDU BUFFER CHAR WHICH IS INDICATED BY CURSOR P*
0x1f94bc…1f9650 Dummy {f00=0x00f0, f01=0x0190, f02=»* PGBUFFC EQU * P LDK A3,0 P LDKL A4,BVDU 0 " P ADR A4,TCABAS GET VDU BUFFER F P ADR A4,A2 l & P LCR A3,A4 GET CHARACTER IN BUFF. ~ P RTN A14 P EJECT P* @ P********************************************************
0x1f9650…1f97e4 Dummy {f00=0x00f0, f01=0x0190, f02=»ED KEYBOARD IS EXECUTING t $ P* A COMMAND. BIT 14=1 IN KBINH 2 P* 2- A PA-KEY OPERATION IS IN PROCESS PRIOR TO H < P* INITIATION OF A COMMAND FOR A DEVICE WITH AN ATTACHED ~ " P* KEYBOARD. BIT 14=1 IN KBINH * P* 3- ERRORSITUATION. BIT 14=1 IN KBI
0x1f97e4…1f9978 Dummy {f00=0x00f0, f01=0x0190, f02=»******************************************************* P* @ PRESET EQU * J & P CM MODE,TCABAS RESET INSERT MODE ^ * P CF A14,LIOLOF TURN OFF "INSERT" LAMP & P CM KBINH,TCABAS RESSTORE KEYBOARD ( P CF A14,LERROF TURN OFF 'ERROR' LAMP
0x1f9978…1f9b0c Dummy {f00=0x00f0, f01=0x0190, f02=»********************************* r P* * 4 P* C O P Y : COPY CONTENTS IN VDU BUFFER ON 4 $ P* HARDCOPY DEVICE l P* @ P************************************************************ P PCOPY EQU * P LD A5,COPNO
0x1f9b0c…1f9ca0 Dummy {f00=0x00f0, f01=0x0190, f02=»DK A4,/8B ORDER = WRITE ADDRESSED WAIT P EJECT . P* < $ P* WRITE INTERTASK COMMUNICATION F P* n P* A3 = BUFFER ADDRESS x P* A4 = ORDER P* A5 = "TO-TID" P* A6 = REQ LENGTH P* PICWRTE EQU * P LDKL A8,ECBIC
0x1f9ca0…1f9e34 (0, 641) Dummy {f00=0x00f0, f01=0x408a, f02=»A6,ECBRL,A8 REQ LENGTH P ST A3,ECBBA,A8 P LDR A7,A4 ORDER 6 P LKM N P DATA 1 Z P RTN A14 j P END z@
0x1f9e34…1f9fc8 Dummy {f00=0x00f0, f01=0x2008, f02=» A7,/B7 TRANSFER PARAMETERS LKM , DATA 1 8 CF A14,ERASE ERASE SCREEN H 0 ,EM100 CF A14,TRPF TRANSMIT, PROGRAM FUNCTION j RB EM100 AGAIN * * END START @ 4,2,A13 ADR A14,A13 LOAD STACK
0x1f9fc8…1fa15c Dummy {f00=0x00f0, f01=0x0190, f02=» @ |I A s ~ 0 0 o , ) n_ H @ | |0* 0 @ W&H I I H A _ W W W W !W "W #W @ |?-I AH A 1( 6 11 W/A$ $W)H$&H"# 0 %K$ % 0 0, 0 0 %0, ?-I A &W @ ?-A A A # n ' 2 E_ @ @ ?- (?- )?-I A
0x1fa15c…1fa2f0 Dummy {f00=0x00f0, f01=0x0190, f02=» G_ ?-I } A @ 1( 6 aa _! ) - 9 W A 1( 2 H_ # W ?- * +1( A W @ 2 IIJK _ * +_% * +_2 Z * +A 1( _W A 0* 1( ( ! w
0x1fa2f0…1fa484 Dummy {f00=0x00f0, f01=0x0190, f02=»&W^ 1WZ 2WV0 )$ 0 3!0 _ 0 W, 4 W' 4 W" 4 W W 4 W 5W W W W W 6W ?L?M?N4 z hI z j I ( fI j I dI W 4 z | hI T! fI j I dI z _*4 7 4 A 1( 2 OPQR_ W
0x1fa484…1fa618 Dummy {f00=0x00f0, f01=0x0190, f02=» v % K O S W [ _ c > ` Y F K [ ` e 7
0x1fa618…1fa7ac Dummy {f00=0x00f0, f01=0x0190, f02=» b w Q W ; q g x DKST NR BELBFO BILAGFEJL KLAR EJ EDBLBNR DIVERSEBEREGNINGSUBTOTAL CHECK LBNRCPR/CIR/NRREGKONTONRCHECKCIFFERLOKAL REMITPENGE-KONTOKASSE-KONTO ]BNE KA
0x1fa7ac…1fa940 Dummy {f00=0x00f0, f01=0x0190, f02=»ZZZZZZZZZZE-9TTTTTTTTTTTTX-TVTTTVTTTVTTX,XX-TTTVTTTVTTTVTT9V99-ZZZVZZZVZZZVZZ9V99- B h k y k SP RGE Z v . - . z t r =m r l L n SGRU
0x1fa940…1faad4 (0, 642) Opaque[0x194]
0x1faad4…1fac68 # DirEnt {nam=»VDUPRX«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1e10, f03=0x0000}
0x1faad4…1fac68 IdxSect {
0x1faad4…1fac68 f00 = 0x00f0 // 0x1faad4 @0x0
0x1faad4…1fac68 f01 = 0x0018 // 0x1faad6 @0x2
0x1faad4…1fac68 gno = [ // 0x1faad8 @0x4
0x1faad4…1fac68 [0x00]: C0x00f0.0x2.0
0x1faad4…1fac68 [0x01]: C0x00f0.0x3.0
0x1faad4…1fac68 [0x02]: C0x00f1.0x0.0
0x1faad4…1fac68 [0x03]: C0x00f1.0x1.0
0x1faad4…1fac68 [0x04]: C0x00f1.0x2.0
0x1faad4…1fac68 [0x05]: C0x00f1.0x3.0
0x1faad4…1fac68 [0x06]: C0x00f2.0x0.0
0x1faad4…1fac68 [0x07]: C0x00f2.0x1.0
0x1faad4…1fac68 [0x08]: C0x00f2.0x2.0
0x1faad4…1fac68 [0x09]: C0x00f2.0x3.0
0x1faad4…1fac68 [0x0a]: C0x00f3.0x0.0
0x1faad4…1fac68 [0x0b]: C0x00f3.0x1.0
0x1faad4…1fac68 ]
0x1faad4…1fac68 }
0x1fac68…1fadfc Dummy {f00=0x00f0, f01=0x0190, f02=» 2 P IDENT VDUPRT 2.1DK 5 79-10-20 870150540210 P : P =1,ODD BUFFER ADDRESS B P REL 2.1 79-05-23 b P =2,KEYBOARD LAMPS ~ P REL 2.1 79-05-23 " P =3, TRANSMIT BUFFER LENGTH P REL 2.1 79-05-23 $ P DK5 - SKIP CH
0x1fadfc…1faf90 Dummy {f00=0x00f0, f01=0x0190, f02=»******************************************************** P* @ < P* V D U P R T : MODULE HANDLING MESSAGES COMING FROM J : P* MAIN FRAME, AND DISPLAYING THEM ON . P* THE VDU ( PTS 6344 ) . P* H P****
0x1faf90…1fb124 Dummy {f00=0x00f0, f01=0x018e, f02=» P* P* * P ENTRY TRPF TRANSMIT, PROGRAM FUNCTION , P ENTRY TRPA TRANSMIT, PROGRAM ATTENTION F $ P ENTRY ERASE ERASE ENTIRE SCREEN v $ P ENTRY SETCUR CURSOR POSITIONING ( P ENTRY ERASUP ERASE ALL UNPROTECTED & P ENTRY DISPL DISPLAY M
0x1fb124…1fb2b8 Dummy {f00=0x00f0, f01=0x0190, f02=» " P ENTRY RFMDUP REPLACE FM & DUP P ENTRY DCINP . P ENTRY RLRBUF B P ENTRY DCGETM X P ENTRY GTRBUF n P* P* P* EXTERNALS P* P* P EXTRN LINHON,LINHOF START P EXTRN LSAVON,LSAVOF START P EXT
0x1fb2b8…1fb44c Dummy {f00=0x00f0, f01=0x0190, f02=»:EVA0 CREDIT EVALUATION TABLE P* & P EXTRN TASCII,TEBCDI TB3270 0 P T P* ^ D P**************************************************************** h P* ( P* CONDITIONAL ASSEMBLY PARAMETERS P* 2 P************************
0x1fb44c…1fb5e0 Dummy {f00=0x00f0, f01=0x0190, f02=» 2 PRBUFL EQU 1150 RECEIVE BUFFER LENGTH IN WORDS 0 PRBUFNR EQU 2 NUMBER OF RECEIVE BUFFERS (1-5) : 2 PTBUFL EQU 1150 TRANSMIT BUFFER LENGTH IN WORDS n 2 PTBUFNR EQU 2 NUMBER OF TRANSMIT BUFFERS (1-5) 8 PCOPCMD EQU 1 COPY COMMAND (ONLY TO PRINTER) IF
0x1fb5e0…1fb774 (0, 643) Dummy {f00=0x00f0, f01=0x0190, f02=» 60 S DK2 p PESC EQU /1B PSBA EQU /11 & PNULL EQU /7F NULL CHARACTER : & PNEWLIN EQU /7E NEW LINE CHARACTER ^ $ PENDMES EQU /7D END MESSAGE CHAR " PFORMFD EQU /7C FORM FEED CHAR PDUPCH EQU /7B PFMCH EQU /60 PTRCH EQU
0x1fb774…1fb908 Dummy {f00=0x00f0, f01=0x0190, f02=» ECB HANDLING P* P PECBBA EQU 2 ( PECBRL EQU 4 < PECBEL EQU 6 P PECBRC EQU 8 d PECBCW EQU 10 x P* P* P* CREDIT USED EQU P* P* P* ECB REL. ADDRESSES P* P* PDIS EQU 20
0x1fb908…1fba9c Dummy {f00=0x00f0, f01=0x0190, f02=» z PECBICW EQU ECBICR-DIS P XIF & P IFT DCLIN=2 2 P IFF COPCMD=1 F PECBDC2 EQU ECBDC-DIS PECBICW EQU ECBDC2-DIS x P XIF P IFF DCLIN=2 P IFT COPCMD=1 PECBICR EQU ECBDC-DIS PECBICW EQU ECBICR-DIS P X
0x1fba9c…1fbc30 Dummy {f00=0x00f0, f01=0x0190, f02=»DU-DIS PECBSD EQU ECBKB-DIS P * P* 4 P* > " P* BASE ADDRESS FOR TCA AND ECB H P* n PTCABAS EQU A11 x PCREBAS EQU A13 ECB P* P* P* TCA REL. ADDRESSES P* PTCT01 EQU 0 PPRINTER EQU TCT01+
0x1fbc30…1fbdc4 Dummy {f00=0x00f0, f01=0x0190, f02=»UTE CHAR r PCURATT EQU ATTRIB+2 & PWCC EQU CURATT+2 WCC/CCC CHARACTER , . PKBINH EQU WCC+2 KEYBOARD INHIBIT INDICATOR V $ PLINCNT EQU KBINH+2 LINE COUNTER 0 PDCLENG EQU LINCNT+2 DC READ EFFECTIVE LENGTH 2 PICWORK EQU DCLENG+2 WORK FIELD INTER
0x1fbdc4…1fbf58 Dummy {f00=0x00f0, f01=0x0190, f02=»SK ID r * PCCC EQU COPNO+2 COPY COMMAND CHARACTER PMAIN EQU CCC+2 MAIN FRAME < & PMODE EQU MAIN+2 INSERT MODE SWITCH ^ $ PKEYS EQU MODE+2 KEY LOCK STATUS . PECBDCC EQU KEYS+2 ECB ADDRESS LAST READ DC 2 PECBBLK EQU ECBDCC+2 ECBS FOR MULTIPLE
0x1fbf58…1fc0ec Dummy {f00=0x00f0, f01=0x0190, f02=»TER DISPLAY v " PLPAGE EQU 48 LINES ON ONE PAGE * PLLINE EQU 80 80 CHAR PER DISPLAY LINE : . PTID EQU -4 TASK IDENTITY T:A DISPLACEMENT h P* & P* CONFIG DATA 'CB1' REL ADDRESSES P* " PNBRKBV EQU 0 NUMBER OF KB/VDUS & PNBRGTP EQU
0x1fc0ec…1fc280 Dummy {f00=0x00f0, f01=0x0190, f02=»F # 1 h P IFT DCLIN=2 PMF2KBV EQU MF1GTP+16 " PMF2GTP EQU MF2KBV+16 > P XIF Z P* f P p P x D P**************************************************************** P* P* INPUT FROM DC P* 8 P******************
0x1fc280…1fc414 (0, 644) Dummy {f00=0x00f1, f01=0x018e, f02=»* PDCINP EQU * & P CF A14,GTRBUF GET RECEIVE BUFFER P LD A8,ECBDCC,TCABAS H P CF A14,DCGETM READ MESSAGE d P IFF DCLIN=2 P CM ECBBLK+DC1,TCABAS P XIF P IFT DCLIN=2 P LD A1,MAIN,TCABAS P CW A8,ECBBLK+DC2,TC
0x1fc414…1fc5a8 Dummy {f00=0x00f1, f01=0x0190, f02=» PDCIN20 EQU * P CM ECBBLK+DC2,TCABAS P LDR A1,A1 6 P RF(Z) DCIN90 WRONG MF H P XIF f PDCIN30 EQU * r P IFT OFLIN=1 P LD A1,OFFFLG,TCABAS P RF(NZ) DCIN90 P XIF ( P LD A1,ECBEL,A8 EFFECTIVE DC-LENGTH P ST
0x1fc5a8…1fc73c Dummy {f00=0x00f1, f01=0x0190, f02=»15 = 0 AFTER DISPLAYING. ~ P ST A5,KBINH,TCABAS . P CF A14,LINHON TURN ON 'KEYBOARD INHIBIT' < . P CF A14,LSAVON TURN ON "SYSTEM AVAILABLE" n P CF A14,UPDATE P CF A14,DISPL P LD A2,PCURS,TCABAS P CF A14,ATMASB P P
0x1fc73c…1fc8d0 Dummy {f00=0x00f1, f01=0x0190, f02=»IT 15:=0 KEYBOARD NOT TOTALLY P* INHIBITED ANY LONGER & P ST A2,KBINH,TCABAS F P LD A2,WCC,TCABAS b P ANK A2,2 | P RF(Z) DCIN95 PDCIN60 EQU * . P CF A14,LINHOF TURN OFF 'KEYBOARD INHIBIT' P LD A2,KBINH,TCABAS , P A
0x1fc8d0…1fca64 Dummy {f00=0x00f1, f01=0x0190, f02=» P LD A4,ECBBA,A8 P CF A14,RLRBUF PDCIN95 EQU * 2 P CF A14,SNBUSY F P RTN A14 P l P* v P* READ DC P* PDCGETM EQU * P LDK A1,0 P CF A14,REQTIM P LDK A7,/82 READ, WAIT ( P CM ECBCW,A8 NO TI
0x1fca64…1fcbf8 Dummy {f00=0x00f1, f01=0x0190, f02=» P RTN A14 P > P********************************************************** P* ` P* BUFFER HANDLING j P* > P********************************************************** P* PRLINK EQU RBUFL+RBUFL+2 P* PRBUF
0x1fcbf8…1fcd8c Dummy {f00=0x00f1, f01=0x0190, f02=»ATA *+RLINK P RES RBUFL P IFF RBUFNR=3 & P DATA *+RLINK < P RES RBUFL R P IFF RBUFNR=4 d P DATA *+RLINK z P RES RBUFL P XIF P DATA 0 END OF CHAIN P RES RBUFL P* P* PTLINK EQU TBUFL+TBUFL+2
0x1fcd8c…1fcf20 Dummy {f00=0x00f1, f01=0x0190, f02=»FF TBUFNR=2 P DATA *+TLINK P RES TBUFL * P IFF TBUFNR=3 < P DATA *+TLINK R P RES TBUFL h P IFF TBUFNR=4 z P DATA *+TLINK P RES TBUFL P XIF P DATA 0 END OF CHAIN P RES TBUFL P* P* P*
0x1fcf20…1fd0b4 (0, 645) Dummy {f00=0x00f1, f01=0x018e, f02=» ADK A7,2 SKIP P LDKL A9,2 FOR DV ADDRESS P RTN A14 : P* J P* GET RECEIVE BUFFER T P* p PGTRBUF EQU * z P LDKL A5,RBUF P* P* PGETBUF EQU * P LDR* A4,A5 P RF(Z) GETB50 NO BUFFER FREE P LDR
0x1fd0b4…1fd248 Dummy {f00=0x00f1, f01=0x0190, f02=» P RB GETBUF P* P* RELEASE BUFFER P* 8 PRLRBUF EQU * B P LDKL A2,RBUF V PRELB05 EQU * l P SUK A4,2 POINT TO LINK PRELB10 EQU * P LDR* A3,A2 P RF(Z) RELB20 P LDR A2,A3 P RB RELB10 PRELB20
0x1fd248…1fd3dc Dummy {f00=0x00f1, f01=0x0190, f02=» P* P* " P* STORE CHARACTER IN DC BUFFER P* B P* A2=CHAR L P* A7=BUFFER POINTER ^ " P* A9=BUFFER CHARACTER COUNTER z P* P* PPDCCH EQU * P CWK A9,TBUFL+TBUFL =3 P RF(G) PDCCHR OVERFLOW P S
0x1fd3dc…1fd570 Dummy {f00=0x00f1, f01=0x0190, f02=»ROM A2 z P* P* PPAID CF A14,PDCCH " P RTN A14 < P* L P* V ( P* GET CHARACTER FROM DC BUFFER TO A2 ` P* P* PGDCCH LCR A2,A7 P ANK A2,/FF & P RF(NZ) GDCC:1 NOT NULL CHARACTER $ P LDK A2,/7F LOAD N
0x1fd570…1fd704 Dummy {f00=0x00f1, f01=0x0190, f02=» P* P* PGETADR CF A14,GDCCH P LC A1,TEBCDI,A2 4 P ANK A1,/3F L P SLL A1,6 ` P CF A14,GDCCH r P LC A2,TEBCDI,A2 P ANK A2,/3F P ORR A1,A2 P RTN A14 P P* P* " P* WRITE MESSAGE TO M
0x1fd704…1fd898 Dummy {f00=0x00f1, f01=0x0190, f02=» DCLIN=2 P LD A7,MAIN,TCABAS P RF(Z) DC050 * P LDKL A8,ECBDC2 > P XIF V PDC050 EQU * b P ADR A8,CREBAS v P LDKL A1,TIMDC P CF A14,REQTIM P ST A9,ECBRL,A8 REQ LENGTH $ P ST A12,ECBBA,A8 BUFFER ADDRESS P LD A7
0x1fd898…1fda2c Dummy {f00=0x00f1, f01=0x0190, f02=»EQU * P LKM P DATA 1 PDC200 EQU * * P LDR A4,A12 > P CF A14,RLWBUF R $ P LD A1,ECBRC,A8 GET RETURN CODE h P RF(Z) DC300 P LD A7,KBINH,TCABAS ( P ANK A7,/D BIT 14:=0 ALLIWE KEYBOARD P ST A7,KBINH,TCABAS . P
0x1fda2c…1fdbc0 Dummy {f00=0x00f1, f01=0x0190, f02=» ECB BUFFER v P LDKL A8,ECBKB P ADR A8,CREBAS * P LKM @ P DATA 1 L P* P RTN A14 f PDC300 EQU * v . P CF A14,LSAVON TURN ON 'SYSTEM AVAILABLE' P RTN A14 P P* P* ( P* STORE CURSOR ADDRESS IN DC B
0x1fdbc0…1fdd54 (0, 646) Dummy {f00=0x00f1, f01=0x0190, f02=»FER p P* P* A1=BINARY BUFFER ADDRESS P* 8 P* B PBUFADR LDR A2,A1 L P SRL A2,6 d P ANK A2,/3F v & P LC A2,TASCII,A2 CONVERT TO ASCII P CF A14,PDCCH P LDR A2,A1 P ANK A2,/3F P LC A2,TASCII,A2 P
0x1fdd54…1fdee8 Dummy {f00=0x00f1, f01=0x0190, f02=»=BUFFER POSITION BINARY P* A4=BUFFER POINTER P* < P* F " PRDMOD LDK A3,0 RESET POSITION P P LDKL A4,BVDU v " P ADR A4,TCABAS BUFFER POINTER & P ADKL A4,1919 LAST SCREEN POSITION P LCR A2,A4 GET CHARACTER . P LDKL A4,BVD
0x1fdee8…1fe07c Dummy {f00=0x00f1, f01=0x0190, f02=»!!! P PRD100 CWK A3,LBVDU P RF(NL) RDMODE ALL EXAMINED . P LCR A2,A4 GET CHAR R P ADK A3,1 n P ADK A4,1 PRD105 EQU * P LDR A1,A2 P ANK A1,/60 P RF(Z) RD200 ATTRIBUTE CHAR PRD110 CWK A2,NULL "
0x1fe07c…1fe210 Dummy {f00=0x00f1, f01=0x0190, f02=» P RF(NZ) RD300 MODIFIED FIELD ! PRD210 CWK A3,LBVDU ! ( P RF(NL) RDMODE ALL EXAMINED ! B P LCR A2,A4 ! f P ADK A3,1 ! x P ADK A4,1 ! P LDR A1,A2 ! P ANK A1,/60 ! $ P RB(NZ) RD210 NO ATTRIBUTE CHAR ! * P CWK A3,LBVDU ALL BUFFER EXAMI
0x1fe210…1fe3a4 Dummy {f00=0x00f1, f01=0x0190, f02=» P LDR A1,A3 BUFFER POSITION " P CF A14,BUFADR TO DC BUFFER " & P RB RD100 " J PRDMODE RTN A14 " P " r P* " | P* " 4 P* UPDATE VIDEO DISPLAY BUFFER IMAGE BY THE DATA " P* " P* RECEIVED FROM THE DC LINE " P* " P* " "
0x1fe3a4…1fe538 Dummy {f00=0x00f1, f01=0x0190, f02=»UFFER POSITION " P* A4=DISPLAY BUFFER POINTER # P* # : P* # D PUPDATE EQU * # N P CM ICWORK,TCABAS # b P LD A8,ECBDCC,TCABAS # | & P LD A7,ECBBA,A8 DC BUFFER ADDRESS # $ P SUR A9,A9 RESET DC BUFFER INDEX # 0 P CF A14,GDCCH GET FIRST CHAR F
0x1fe538…1fe6cc Dummy {f00=0x00f1, f01=0x0190, f02=»2,/31 # P RF(E) UPD100 WRITE $ P CWK A2,/35 $ * P RF(E) UPD120 ERASE/WRITE $ > P CWK A2,/3F $ ` ( P RF(E) UPD140 ERASE ALL UNPROTECTED $ t P IFT COPCMD=1 $ P CWK A2,/37 $ P ABL(E) UPD600 COPY COMMAND $ P XIF $ $ P RF UPDEND INV
0x1fe6cc…1fe860 Dummy {f00=0x00f1, f01=0x0190, f02=» $ l P LD A3,PCURS,TCABAS % ( P LDR A4,A3 START IN CURSOR POSITION % $ P ADKL A4,BVDU % P P ADR A4,TCABAS % f $ P LDK A5,1 INDICATE WCC, IC OR RA % | P RF UPD220 % P* % P* ERASE/WRITE COMMAND % P* % PUPD120 EQU * % P CF A14,ERAS
0x1fe860…1fe9f4 (0, 647) Dummy {f00=0x00f1, f01=0x0190, f02=» UNPROTECTED % x ( P RF UPDEND NO TEXT WITH THIS COMMAND & P* & @ . P* TAKE CARE OF WRITE CONTROL CHARACTER WCC & J P* & | " PUPD200 CF A14,PWCC PROCESS WCC & $ P LDK A5,1 INDICATE WCC, IC OR RA & P & P* & P* & " P* PROCESS DATA FROM DC
0x1fe9f4…1feb88 Dummy {f00=0x00f1, f01=0x0190, f02=»W A9,DCLENG,TCABAS & 0 P RF(NL) UPDEND ALL RECEIVED CHARS PROCESSED ' * P CF A14,GDCCH GET CHAR FROM DC BUFFER ' N P CWK A2,/20 ' | P RF(L) UPD300 ORDER ' PUPD230 EQU * ' P ORK A2,/80 SET DISPLAY BIT ' PUPD240 EQU * ' ( P LDK A5,0 INDICA
0x1feb88…1fed1c Dummy {f00=0x00f1, f01=0x0190, f02=»O BUFFER ' x P ADK A3,1 ( P ADK A4,1 ( " P RB UPD220 ( 4 PUPD260 LDK A3,0 ( F P LDKL A4,BVDU ( ^ P ADR A4,TCABAS ( t P RB UPD250 ( PUPD300 EQU * ( , P CWK A3,LBVDU END OF DISPLAY BUFFER ??? ( P RF(NE) UPD302 NO!!! ( $ P SUR A3,A3 F
0x1fed1c…1feeb0 Dummy {f00=0x00f1, f01=0x0190, f02=»PD320 START FIELD ( P CWK A2,/11 ) $ P RF(E) UPD340 SET BUFFER ADDRESS ) . P CWK A2,/13 ) V P RF(E) UPD360 INSERT CURSOR ) j P CWK A2,/09 ) P RF(E) UPD400 PROGRAM TAB ) P CWK A2,/14 ) $ P RF(E) UPD500 REPEAT TO ADDRESS ) P CWK A2,
0x1feeb0…1ff044 Dummy {f00=0x00f1, f01=0x0190, f02=» RB UPD230 ) PUPD305 CWK A2,/19 * P RF(NE) UPD310 * , P LDK A2,ENDMES END MESSAGE * B P RB UPD230 * d PUPD310 EQU * * v P CWK A2,/0A * P RF(NE) UPD315 * P LDK A2,NEWLIN NEW LINE * P RB UPD230 * PUPD315 EQU * * P CWK A2,/18 *
0x1ff044…1ff1d8 Dummy {f00=0x00f1, f01=0x0190, f02=» * ~ P RF(NE) UPD319 SKIP USM DK5 + P ADK A3,1 DK5 + , P RB UPD220 DK5 + B PUPD319 EQU * DK5 + Z " P CWK A2,/00 NULL CHARACTER ??? + t & P RF(NE) UPDEND NO!! ILLEGAL ORDER + " P LDK A2,/7F PTS NULL CHARACTER + P RB UPD230 + P + @ P****
0x1ff1d8…1ff36c Dummy {f00=0x00f1, f01=0x0190, f02=»******************* + ~ P , PUPDEND EQU * , $ P LD A8,ECBDCC,TCABAS , 8 P LD A4,ECBBA,A8 , T P CF A14,RLRBUF , l P RTN A14 , P , P* , P* , P* START FIELD ORDER , P* , * PUPD320 CF A14,GDCCH GET ATTRIBUTE CHAR , P LC
0x1ff36c…1ff500 Dummy {f00=0x00f1, f01=0x0190, f02=» P RB UPD240 - P* - P* SET BUFFER ADDRESS - P* - < $ PUPD340 CF A14,GETADR GET ADDRESS - F P CWK A1,LBVDU - n " P RB(NL) UPDEND INVALID ADDRESS - P LDR A3,A1 - P LDR A4,A3 - P ADKL A4,BVDU - P ADR A4,TCABAS - P RB UPD220 -
0x1ff500…1ff694 (0, 648) Dummy {f00=0x00f2, f01=0x0190, f02=» P RB UPD220 . P . P* . P* PROGRAM TAB . * P* . @ PUPD400 LDR A5,A5 . J * P RF(NZ) UPD430 PT AFTER WCC, IC OR RA . b 0 P LDK A1,NULL+/80 FILL CURRENT FIELD BY NULLS . PUPD410 EQU * . P LDK A5,0 . P CWK A3,LBVDU . P RB(NL)
0x1ff694…1ff828 Dummy {f00=0x00f2, f01=0x0190, f02=» STORE NULL . P ADK A4,1 / P RB UPD410 / & PUPD415 EQU * / 8 P ADK A4,1 / L PUPD420 ANK A2,/10 / ^ $ P ABL(Z) UPD220 UNPROTECTED FIELD / x PUPD430 EQU * / P LDK A5,0 / P CWK A3,LBVDU / * P ABL(NL) UPD210 END OF DISPLAY BUFFER /
0x1ff828…1ff9bc Dummy {f00=0x00f2, f01=0x0190, f02=» / P* 0 P* REPEAT TO ADDRESS 0 P* 0 0 ( PUPD500 CF A14,GETADR GET END ADDRESS 0 : P CWK A1,LBVDU 0 f " P RB(NL) UPDEND INVALID ADDRESS 0 | * P CF A14,GDCCH GET CHAR TO BE REPEATED 0 $ P LDK A5,1 INDICATE WCC, IC OR RA 0 " P ORK A2,/80 INDI
0x1ff9bc…1ffb50 Dummy {f00=0x00f2, f01=0x0190, f02=»UPD510 CWK A3,LBVDU 0 $ P RF(L) UPD520 NOT END OF SCREEN 1 P LDK A3,0 1 D P LDKL A4,BVDU WRAP AROUND 1 V P ADR A4,TCABAS 1 x PUPD520 CWR A3,A1 1 $ P ABL(E) UPD220 ALL CHAR REPEATED 1 P 1 PUPD530 EQU * 1 P 1 P SCR A2,A4 1 P ADK
0x1ffb50…1ffce4 Dummy {f00=0x00f2, f01=0x0190, f02=»GETADR GET END ADDRESS 1 P CWK A3,LBVDU 2 " P RB(NL) UPDEND INVALID ADDRESS 2 4 0 P CF A14,ERASUA ERASE UNPROTECTED TO ADDRESS 2 Z P ABL UPD220 2 P IFT COPCMD=1 2 P 2 P* 2 P* COPY COMMAND 2 P* 2 PUPD600 EQU * 2 P LD A1,P
0x1ffce4…1ffe78 Dummy {f00=0x00f2, f01=0x0190, f02=»FROM DEVICE 2 ~ P IFT EBCDIC=1 3 & P LC A2,TEBCDI,A2 CONVERT TO EBCDIC 3 * P XIF 3 T P IFT COPCMD=1 3 ` " P LD A3,6,CREBAS 'CB1' ADDRESS 3 v P LDK A4,MF1KBV-1 3 P IFT DCLIN=2 3 P LD A1,ECBBLK+DC2,TCABAS 3 P RF(NZ) UPD602 3 P LDK A4,MF
0x1ffe78…20000c Dummy {f00=0x00f2, f01=0x0190, f02=»R OF KB/VDUS 3 z ( P ADR A4,A5 LAST KB/VDU CONFIGURATED 4 PUPD604 EQU * 4 @ $ P CCR A2,A4 DV-ADDRESS MATCHES ? 4 T P RF(E) UPD610 YES 4 | P SUK A4,1 4 P SUK A5,1 4 P RB(P) UPD604 TRY NEXT 4 P ABL UPDEND NO MATCH 4 P* 4 PUPD610 EQU
0x20000c…2001a0 Dummy {f00=0x00f2, f01=0x0190, f02=»ASKID FROM DEVICE 4 $ P LD A2,-4,CREBAS GET OWN TASKID 5 & P ST A2,ICWORK,TCABAS PUT IN BUFFER 5 B * P LDK A4,/0B WRITE ADDRESSED , NO WAIT 5 l P LDK A6,2 REQ LENGTH 5 P LDKL A3,ICWORK 5 " P ADR A3,TCABAS BUFFER ADDRESS 5 " P CF A14,ICWRTE WRITE
0x2001a0…200334 (0, 649) Dummy {f00=0x00f2, f01=0x0190, f02=»LY RESET MDT BIT IS TAKEN CARE OF 5 P* 6 * P* 6 4 PPWCC CF A14,GDCCH GET WCC 6 > P LC A2,TEBCDI,A2 IN EBCDIC 6 ` P ST A2,WCC,TCABAS SAVE IT 6 P ANK A2,/04 6 P RF(Z) PWCC1 6 P LD A2,PRINTER,TCABAS 6 P RF(NZ) PWCC1 6 P LDR A10
0x200334…2004c8 Dummy {f00=0x00f2, f01=0x0190, f02=»7 BELL =1 6 P SC A7,2,A2 =1 7 P SC A7,3,A2 =1 7 * P LDK A7,4 7 B P ST A7,ECBRL,A8 7 T P LDK A7,/86 7 l P LKM 7 P DATA 1 7 P LD A8,ECBDCC,TCABAS 7 P LDR A7,A10 7 PPWCC1 EQU * 7 P LD A2,WCC,TCABAS 7 P ANK A2,1 7
0x2004c8…20065c Dummy {f00=0x00f2, f01=0x018e, f02=» PRESMDT LDK A3,0 8 P LDKL A4,BVDU 8 P ADR A4,TCABAS 8 2 PRESM10 CWK A3,LBVDU 8 H P RB(NL) PWCC10 ALL DONE 8 d P LCR A2,A4 GET CHAR 8 P ANK A2,/60 8 P RF(NZ) RESM20 NO ATTRIBUTE 8 P LCR A2,A4 8 P ANK A2,/FE RESET MDT 8 P
0x20065c…2007f0 Dummy {f00=0x00f2, f01=0x0190, f02=» P* 9 P* 9 PERASE LDK A3,0 9 P LDKL A4,BVDU 9 . P ADR A4,TCABAS 9 D P LDK A2,NULL 9 Z PERAS20 CWK A3,LBVDU 9 n P RF(NL) ERAS25 ALL ERASED 9 P SCR A2,A4 9 P ADK A3,1 9 P ADK A4,1 9 P RB ERAS20 9 , PERAS25 CM PCURS,TCAB
0x2007f0…200984 Dummy {f00=0x00f2, f01=0x018e, f02=»,PRINTER,TCABAS CHECK DEVISE TYPE 9 ( P RF(NZ) ERAEND PRINTER, NOT DISPLAY : * ( P STR A7,A14 SAVE A7 AND A8 ON STACK : V P ST A8,-2,A14 : P LDKL A8,ECBVDU : P ADR A8,CREBAS VDUECB : " P LDK A7,'1' ERASE CONTROL CHAR : P LD A1,ECBBA,A8 =1
0x200984…200b18 Dummy {f00=0x00f2, f01=0x0190, f02=» : P LD A8,-2,A14 ; " P LDR* A7,A14 RESTORE A7 AND A8 ; PERAEND RTN A14 ; D P ; Z P* ; d P* ; n P* ERASE ALL UNPROTECTED ; x P* ; P* ; PERASUP LDK A2,2 ; . P ST A2,WCC,TCABAS SET KEYBOARD RESTORE BIT ; 2 P SUR A1,A1 INDICAT
0x200b18…200cac Dummy {f00=0x00f2, f01=0x0190, f02=»D POS ; j , P LC A2,1919,A4 GET LAST SCREEN CHARACTER < P ANK A2,/7F < > P CWK A2,/20 ATTRIBUTE ??? < R $ P RF(L) ERU:01 YES!! WE GOT IT!! < t 0 P LDK A1,1 ATTRIBUTE NOT IN LAST SCREEN POS. < PERASU1 CWK A3,LBVDU < P RF(NL) ERASU2 < P LCR A
0x200cac…200e40 Dummy {f00=0x00f2, f01=0x0190, f02=»U:01 EQU * < P ANK A2,/10 = P RB(NZ) ERASU1 PROTECTED = & * P ST A3,PCURS,TCABAS SET NEW CURSOR POS = F P LDR A1,A1 = t 0 P RF(Z) ERASU3 ATTRIBUTE IN LAST SCREEN POS. = PERASU2 LDK A3,0 = P LDKL A4,BVDU = P ADR A4,TCABAS = P RF ERASU4
0x200e40…200fd4 (0, 650) Dummy {f00=0x00f2, f01=0x0190, f02=» = p P SUK A4,1 - " - > PERASU4 EQU * > & " P LDKL A1,/0F00 (LDK A1,0) DK3 > : P LDK A6,NULL+/80 ERASE CHAR > ` P RF ERAS35 > P EJECT > P* > P* > . P* ERASE UNPROTECTED TO ADDRESS GIVEN IN A1 > P* > P* > * PERASUA LDK
0x200fd4…201168 Dummy {f00=0x00f2, f01=0x0190, f02=» P LDK A3,0 BUFFERINDEX ? P LDKL A4,BVDU ? " , P ADR A4,TCABAS ABSOLUTE BUFFER ADDRESS ? 8 P ? h 8 PERAS:1 LDR A3,A3 START IN FIRST SCREEN POSITION ??? ? p P RF(NZ) ERAS35 NO!! ? ( P LC A2,1919,A4 LAST BUFFER CHARACTER ? P ANK A2,/7F ? ( P
0x201168…2012fc Dummy {f00=0x00f2, f01=0x0190, f02=»2,1919,A4 DK3 ? P* ANK A2,/FE DK3 @ & P* SC A2,1919,A4 RESET MDT BIT DK3 @ 0 P RF ERAS35 @ Z $ P ******************** 78-09-11 @ l PERAS30 CWK A3,LBVDU @ $ P RF(L) ERAS33 NOT END OF SCREEN @ P LDK A3,0 @ P LDKL A4,BVDU WRAP AROUND @
0x2012fc…201490 Dummy {f00=0x00f2, f01=0x0190, f02=»NISHED EUA COMMAND? DK3 @ $ P RF(NZ) ERAS35 NO, CONTINUE DK3 A P LDK A1,0 YES FINISHED DK3 A H P RB ERAEND DK3 A j PERAS34 EQU * DK3 A P CWR A3,A1 A ( P RB(E) ERAEND ALL UNPROTECTED ERASED A . PERAS35 LCR A2,A4 GET CHAR FROM VDU BUFFER A
0x201490…201624 Dummy {f00=0x00f2, f01=0x0190, f02=»CR A6,A4 STORE MODIFIED NULL A PERAS40 ADK A3,1 B $ P ADK A4,1 B < P RB ERAS30 B N PERAS50 ADK A3,1 B ` P ADK A4,1 B x P ANK A2,/10 B " P RF(NZ) ERAS60 PROTECTED FIELD B " P CWK A1,/0F00 EUA COMMAND? DK3 B P RB(L) ERAS30 NO DK3 B & P*
0x201624…2017b8 Dummy {f00=0x00f2, f01=0x0190, f02=»60 CWK A3,LBVDU B P RF(L) ERAS65 C P LDK A3,0 C . P LDKL A4,BVDU WRAP AROUND C @ P ADR A4,TCABAS C b PERAS65 EQU * C x " P CWK A1,/0F00 EUA COMMAND? DK3 C $ P RF(L) ERAS67 NO, EUA ORDER DK3 C ( P CWK A3,0 FINISHED EUA COMMAND? DK3 C " P R
0x2017b8…20194c Dummy {f00=0x00f2, f01=0x0190, f02=» ( P RB(E) ERAEND ALL UNPROTECTED ERASED D PERAS70 EQU * D 0 P LCR A2,A4 D D P ANK A2,/7F D V P CWK A2,/20 D j " P RB(L) ERAS50 ATTRIBUTE FOUND D ~ P ADK A3,1 D P ADK A4,1 D P RB ERAS60 D P D P* D P* D P* TRANSMIT PROGR
0x20194c…201ae0 Dummy {f00=0x00f2, f01=0x0190, f02=» AID D x PTRANS EQU * E P CF A14,DCWRTE WRITE MESSAGE E PTR050 EQU * E D " P RTN A14 TRANSMISSION TROUBLE E X PTRRTN RTN A14 E ~ P E P* E P* E P* TRANSMIT PROGRAM FUNCTION E P* E P* A2=AID E P* E P* E * PTRPF
0x201ae0…201c74 (0, 651) Dummy {f00=0x00f2, f01=0x0190, f02=»AD MODIFIED E " P RB TRANS SEND MODIFIED FIELDS F P F : P* F D P* F N $ P* DISPLAY MODIFIED FIELDS ON VDU F X P* F P* F P* A3=VDU POSITION F P* A4=VDU IMAGE POINTER F P* A5=MODIFIED INDICATOR F P* A7=VDU LINE OUTPUT POINTER
0x201c74…201e08 Dummy {f00=0x00f2, f01=0x0190, f02=»DKL A1,/101 START FROM LINE 1 POS 1 F P ST A1,ECBCW,A8 G , 8 P SUR A10,A10 RESET COUNT FOR INTENSIFIED DISPLAYING G D P LDK A3,0 G P LDKL A4,BVDU G P ADR A4,TCABAS G , P CF A14,SPACES PUT SPACES IN LINE BUFFER G 6 P LC A2,1919,A4 CHECK IF AT
0x201e08…201f9c Dummy {f00=0x00f2, f01=0x0190, f02=» P XRK A2,6 H > P ST A2,INTATT,TCABAS CHECK DISPLAY/NONDISPLAY INFORMATION H P RF(Z) DIS210 NON DISPLAY H X 4 P CF A14,INTCHK INSERT HIGH/LOW INTENS. IN BUFFER H z PDIS100 EQU * H P CWK A9,LLINE H " P RF(L) DIS110 NOT END OF LINE H $ P CF A1
0x201f9c…202130 Dummy {f00=0x00f2, f01=0x0190, f02=»S900 ALL SCANNED H P LCR A2,A4 GET CHAR I P I 4 " P CF A14,SET:M SET MODIFIED BIT I < P I b PDIS115 EQU * I j " P ANK A2,/7F RESET DISPLAY BIT I ~ P SCR A2,A4 I P ADK A3,1 I P ADK A4,1 I P ADK A7,1 I P ADKL A9,1 I P CWK A2,/2
0x202130…2022c4 Dummy {f00=0x00f2, f01=0x0190, f02=» RF(NE) DIS120 I P LDK A2,/39 J PDIS120 CWK A2,/7E J * P RF(NE) DIS121 J D P LDK A2,/35 J Z PDIS121 CWK A2,/7C J n P RF(NE) DIS122 J P LDK A2,/3C J PDIS122 EQU * J P CF A14,RFMDUP DK4 J 4 P SC A2,-1,A7 STORE CHAR IN DISPLAY OUT
0x2022c4…202458 Dummy {f00=0x00f2, f01=0x0190, f02=»ARACTER J j P RF(Z) DIS210 NON DISPLAY K P ANK A2,4 K 2 P RF(Z) DIS205 HIGH INTENSITY K D P LDK A2,/1E LOW INTENSITY K h P RF DIS206 K PDIS205 EQU * K P LDK A2,/1F HIGH K PDIS206 EQU * K * P SC A2,-1,A7 STORE INTENSITY CHARACTER K "
0x202458…2025ec Dummy {f00=0x00f2, f01=0x0190, f02=» $ P CF A14,DISLIN DISPLAY THIS LINE L PDIS220 EQU * L , P CWK A3,LBVDU L @ P RF(NL) DIS900 ALL DISPLAYED L V P LCR A2,A4 L z P L " P CF A14,SET:M SET MODIFIED BIT L P L PDIS225 EQU * L " P ANK A2,/7F RESET DISPLAY BIT L P SCR A2,A4 L
0x2025ec…202780 Dummy {f00=0x00f2, f01=0x0190, f02=» RB DIS210 L P M P* M P* M & P* POSITION THE CURSOR M 0 P* M N P* M X PSETCUR EQU * M b PDIS900 LDK A1,2 REQ LENGTH M v PDIS905 ST A1,ECBRL,A8 M & P LD A1,PCURS,TCABAS GET CURSOR POS M & P LDKL A2,/101 START ON LIN 1 POS 1 M
0x202780…202914 (0, 652) Dummy {f00=0x00f3, f01=0x0190, f02=» M P RB DIS910 N PDIS920 ADS A1,ECBCW,A8 N $ P LDK A7,/8B SET CURSOR AND WRITE N 8 P LKM N ` P DATA 1 N l 0 P CM INTATT,TCABAS CLEAR INTENSITY ATTRIBUTE N | P RTN A14 N P N P* N P* N 0 P* WRITE ONE CHAR FROM A2 IN CURSOR POSITIO
0x202914…202aa8 Dummy {f00=0x00f3, f01=0x0190, f02=» A1,4 N P RB DIS905 REQ LENGTH = 3 O P* O 0 J P********************************************************************* O : P* O 8 P* REPLACE FM & DUP WITH '*' RESP. ';', IF PRESENT O P* CHARACTER IN A2 O P* O J P******************
0x202aa8…202c3c Dummy {f00=0x00f3, f01=0x0190, f02=»DK A2,/2A DUP O PRFMD10 EQU * P P CWK A2,FMCH P * P RF(NE) RFMD20 P > P LDK A2,/3B P T PRFMD20 EQU * P h P RTN A14 P | P P P* P P* P ( P* PUT SPACES TO DISPLAY LINE BUFFER P P* P P* P PSPACES LD A7,ECBBA,A8 P P
0x202c3c…202dd0 Dummy {f00=0x00f3, f01=0x0190, f02=»A7 =1 P P SC A2,1,A7 =1 Q P ADK A7,2 Q & P SUKL A9,2 Q 8 P RB(P) SPAC10 Q J $ P LDK A2,0 CLEAR A2=CHAR REGISTER Q ` & P LDK A5,0 RESET MODIFIED INDICATOR Q P LD A7,ECBBA,A8 Q P ADK A7,2 BUFFER ADDRESS Q & P SUR A9,A9 RESET LINE CHAR COU
0x202dd0…202f64 Dummy {f00=0x00f3, f01=0x0190, f02=» EQU * Q P LDR A7,A5 R $ P ANK A5,/80 ANY MODIFICATIONS ?? R " P RF(Z) DISL10 NO MODIFICATIONS R H P LDK A1,2 R n ( P XRK A7,/A0 ONLY SPACES IN BUFFER ?? R P RF(Z) DIS:10 YES!! R P LDKL A1,LLINE+2 R . P ADR A1,A10 ADD NR OF INTENSITY CHARACTE
0x202f64…2030f8 Dummy {f00=0x00f3, f01=0x018e, f02=» DATA 1 R P S P S H P******************************************************************** S " P* S n 0 P* EXECUTE FAST OUTPUT TO BLANK REMAINIG PART S x P* OF THE LINE S P* S H P************************************************************
0x2030f8…20328c Dummy {f00=0x00f3, f01=0x0190, f02=» 4 P RF(NL) DISL10 YES, NO FAST OUTPUT THIS LINE DK1 T P T < " P LD A1,ECBBA,A8 BUFFER ADRESS T D , P LDK A2,X'2B' DONT MOVE CURSOR ONE LINE T j P SC A2,1,A1 =1 T * P LDKL A2,X'1420' FAST OUTPUT OF SPACES T P SC A2,3,A1 =1 T P SRL A2,8 =1 T
0x20328c…203420 Dummy {f00=0x00f3, f01=0x0190, f02=» DATA 1 T P U PDISL10 EQU * U P LDK A2,1 U , ( P SC A2,ECBCW+1,A8 POS 1 ON NEXT LINE U > P LDKL A2,/100 U j * P ADS A2,ECBCW,A8 INCREMENT LINE NUMBER U $ P RB SPACES PUT SPACES TO BUFFER U P U P U P U P U D P****************
0x203420…2035b4 (0, 653) Dummy {f00=0x00f3, f01=0x0190, f02=» HIGH OR LOW INTENSITY U P* V 0 J P********************************************************************** V : P V , PINTCHK SUR A10,A10 RESET INTENSITY COUNT V 0 P LD A2,INTATT,TCABAS GET INTENSITY ATTRIBUTE V P RF(Z) INTRTN NON DI
0x2035b4…203748 Dummy {f00=0x00f3, f01=0x0190, f02=»IGH INTENSITY V P W & PINT:10 LDK A2,X'1F' HIGH INTENSITY W P W H 8 PINT:20 SCR A2,A7 SAVE INTENSITY CHARACTER IN BUFFER W P & P ADK A7,1 INCREMENT BUFFER POINTER W * P ADKL A10,1 INTENSITY COUNT W PINTRTN RTN A14 RETURN W P* W
0x203748…2038dc Dummy {f00=0x00f3, f01=0x0190, f02=»CHARACTER HAS BEEN MODIFIED W p P* X $ F P****************************************************************** X . P X x PSET:M CWK A2,/20 X & P RF(L) SET:M2 ATTRIBUTE CHARACTER X P CWK A2,/7F X & P RF(E) SET:M2 UNMODIFIED ATTRIBUTE X P CWK A2,
0x2038dc…203a70 Dummy {f00=0x00f3, f01=0x403c, f02=» MODIFIED BIT X | PSET:M2 RTN A14 Y P END Y ,@ Y 8**************************************************** X . P X x PSET:M CWK A2,/20 X & P RF(L) SET:M2 ATTRIBUTE CHARACTER X P CWK A2,/7F X & P RF(E) SET:M2 UNMODIFIED ATTRIBUTE X P CWK A2,
0x203a70…203c04 Dummy {f00=0x00f3, f01=0x2008, f02=» Z NT DUMMY END @ (
0x203c04…203d98 Dummy {f00=0x00f3, f01=0x018e, f02=»PA1 EQU * Z P LDK A2,/2C PA1 POS [ P RB CAN100 [ . P* [ @ P* [ J $ P* PA3 PROGRAM ATTENTION KEY [ T P* [ | P* [ PPA3 EQU * [ P LDK A2,/2B PA3 POS [ P RB CAN100 [ P* [ P* PA4 - PA10 (ALFASKOP) [ P IFT PA49=1 D
0x203d98…203f2c Dummy {f00=0x00f3, f01=0x018e, f02=» [ ~ P XIF DK3 P* PPA410 EQU * $ P SUK A2,/20 8 P RB CAN200 L P EJECT ^ P* l < P******************************************************** v P* P* ENTER P* 8 P* PROGRAM FUNCTION KEY WHICH CAUSES AN I/O OPE
0x203f2c…2040c0 Dummy {f00=0x00f3, f01=0x0190, f02=» P* NULLS ARE SUPRESSED ] P* ] " > P********************************************************* ] , P* ] n PENTER EQU * ] x P LDK A2,/3D ENTER POS ] PENT100 EQU * ] & P LC A2,TASCII,A2 CONVERT TO ASCII ] . P CF A14,LINHON TURN ON "KEYBOARD
0x2040c0…204254 (0, 654) Opaque[0x194]
0x204254…2043e8 # DirEnt {nam=»REMDUM«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1e70, f03=0x0000}
0x204254…2043e8 IdxSect {
0x204254…2043e8 f00 = 0x00f3 // 0x204254 @0x0
0x204254…2043e8 f01 = 0x0004 // 0x204256 @0x2
0x204254…2043e8 gno = [ // 0x204258 @0x4
0x204254…2043e8 [0x00]: C0x00f3.0x2.0
0x204254…2043e8 [0x01]: C0x00f3.0x3.0
0x204254…2043e8 ]
0x204254…2043e8 }
0x2043e8…20457c Dummy {f00=0x00f3, f01=0x018e, f02=» IDENT REMDUM DDUM KMD08 PDIV . P ENTRY LEVOPR < P ENTRY LEVRD R P ENTRY VARRD f P ENTRY VARWRT z P ENTRY IDXGET P ENTRY LEVDEL P ENTRY SETIDX P ENTRY LEVSPG P ENTRY LEVPRT P ENTRY CHD
0x20457c…204710 Dummy {f00=0x00f3, f01=0x0190, f02=» P ENTRY SETKEY P ENTRY WSTRCH P ENTRY TRINS 0 P ENTRY TRGETF D ENTRY AD4100 Z ENTRY AD4200 p ENTRY AD4300 * P EXT ADMRET P EJECT AD4100 P* CREATE PRINTLEV P B ADMRET AD4200
0x204710…2048a4 Dummy {f00=0x00f3, f01=0x0190, f02=» P PEND P LEVOPR PROC RET 2 PEND > P L P T LEVDEL PROC RET p PEND | P PLEVRD PROC P RET P PEND P PLEVWRT PROC P RET P PEND P* PLEVINT PRO
0x2048a4…204a38 Dummy {f00=0x00f3, f01=0x0190, f02=»END P* PVARRD PROC P RET ( P PEND 4 P* B VARWRT PROC L RET ` PEND l P* z VARINT PROC RET PEND " IDXGET PROC LEVNR,INDX,LEVDEX RET PEND PIDXINS
0x204a38…204bcc Dummy {f00=0x00f3, f01=0x0190, f02=» PEND P* RESTIX PROC RET , PEND 8 F N INITIX PROC V RET j PEND v P* P PCHDATO PROC P********** P* & P* CHANGES GSWBCD6 (DDMMYY) TO P* GSWBCD7 (
0x204bcc…204d60 Dummy {f00=0x00f3, f01=0x0190, f02=»F XCOP,GSWBCD7,=W'5',=W'1',GSWBCD6,=W'5' 0 P PERF XCOP,GSWBCD7,=W'4',=W'1',GSWBCD6,=W'6' 0 P RET d P PEND p P* ~ , PXCOP PROC TO,$TOPNT,$SIZE,FROM,$FROMPNT P PLIT $TOPNT P PLIT $SIZE P PLIT $FROMPNT P* P* FU
0x204d60…204ef4 (0, 655) Dummy {f00=0x00f3, f01=0x018e, f02=»OF BYTES b P* COPIED IS $SIZE P* . 2 P MOVE GSWBIN1,$TOPNT START OF RECEIVING FIELD 8 P MOVE GSWBIN4,$SIZE LENGTH n 2 P MOVE GSWBIN5,$FROMPNT START OF SENDING FIELD * P XCOPY TO,GSWBIN1,GSWBIN4,FROM,GSWBIN5 P RET P PEND
0x204ef4…205088 Dummy {f00=0x00f3, f01=0x0190, f02=» z ( P************************************ P* 4 ( P* THE PROCEDURE REPLACES HEX-ZEROES > $ P* BY SPACES, IN ANY STRINGFIELD. j & P* THIS IS ACCOMPLISHED BY FINDING " P* THE FIRST 00-BYTE, COMPUTING $ P* THE LENGTH OF THE REST OF THE $
0x205088…20521c Dummy {f00=0x00f3, f01=0x0190, f02=»CBIN0 P MOVE GSWSTR1,=X'00' 4 P MATCH STRG,GSWBIN1,GSWBIN7,GSWSTR1,CBIN0,CBIN1 * P BNE REPL10 NO MATCH FOUND b P SUB GSWBIN7,GSWBIN1 P DLETE STRG,GSWBIN1,GSWBIN7 P CMP CBIN0,CBIN0 P RET PREPL10 P CMP CBIN4,CBIN0
0x20521c…2053b0 Dummy {f00=0x00f3, f01=0x0190, f02=» P PTXTRD PROC BIN P RET & P PEND 2 P @ P H PTXTWR PROC BIN P P RET f P PEND r P P PSETKEY PROC . P***************************************** P* $ P* SETS SPKEY TO 1 IF KASSE OPEN, P
0x2053b0…205544 Dummy {f00=0x00f3, f01=0x4148, f02=»=D'0',SETKRET | P MOVE SPKEY,CBIN2 CLOSED PSETKRET 6 P RET F P PEND R PWSTRCH PROC P ` P RET v P PEND P PTRINS PROC PT CMP CBIN0,CBIN0 RET PEND P PTRGETF PROC PT P CMP CBIN0
0x205544…2056d8 Dummy {f00=0x00f3, f01=0x2008, f02=» NT REMDUM DDUM KMD08 PDIV .@ < 8 !!JN REMLVD3,6 F !!JN REMLVD,8,15 !!JN REMTXD,3,7 t ENTRY WSTRCH ENTRY TRINS ENTRY TRGETF !!JN REMPRD,3,7 EJECT !!JN REMPRD,8,16
0x2056d8…20586c Dummy {f00=0x00f3, f01=0x0190, f02=» P* 8 P*************************************************** PDATCH PROC J P MOVE WORK6,CDEC1 ^ P MOVE WORK1,INBUF x P CBL WFIELD,=W'49',DATCH05 & P MUL WORK1,CDEC100 ADJUST FOR TEST PDATCH05 P MOVE P2,CBIN10 $ P C
0x20586c…205a00 Dummy {f00=0x00f3, f01=0x0190, f02=»WORK6,CBIN2,CBIN2,WORK1,P2 P CB GT,WORK6,=D'31',DATCH10 " P CB LT,WORK6,CDEC1,DATCH10 F P MOVE SPBINW4,CBIN0 h P RET PDATCH10 " P MOVE SPBINW4,=W'19' ERRORCODE P RET P PEND P* P* P* . P**********
0x205a00…205b94 (0, 656) Opaque[0x194]
0x205b94…205d28 # DirEnt {nam=»PRTX «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1e80, f03=0x0000}
0x205b94…205d28 IdxSect {
0x205b94…205d28 f00 = 0x00f4 // 0x205b94 @0x0
0x205b94…205d28 f01 = 0x000c // 0x205b96 @0x2
0x205b94…205d28 gno = [ // 0x205b98 @0x4
0x205b94…205d28 [0x00]: C0x00f4.0x0.0
0x205b94…205d28 [0x01]: C0x00f4.0x1.0
0x205b94…205d28 [0x02]: C0x00f4.0x2.0
0x205b94…205d28 [0x03]: C0x00f4.0x3.0
0x205b94…205d28 [0x04]: C0x00f5.0x0.0
0x205b94…205d28 [0x05]: C0x00f5.0x1.0
0x205b94…205d28 ]
0x205b94…205d28 }
0x205d28…205ebc Dummy {f00=0x00f4, f01=0x0190, f02=» 2 P IDENT PRT 2.1DK 4 800930 870150540210 P : P =1, ODD BUFFER ADDRESS B P REL 2.1 79-05-23 d P DK4 - SUPPRESS SPACES P DK3 - CHECK PRINTER P DK2 - DC TIMEOUT P DK1 - LP400, DEC. PRINT N P************
0x205ebc…206050 Dummy {f00=0x00f4, f01=0x0190, f02=»SED TO THE X B P* GENERAL PRINTER. LOCAL HARDCOPY PRINTING IS ALSO , P* CARRIED OUT IN THIS MODULE X P* J P********************************************************************** P* P* P P P*
0x206050…2061e4 Dummy {f00=0x00f4, f01=0x0190, f02=»* P* EXTERNAL PARAMETERS P* ( P* 2 ( P EXTRN UPDATE UPDATE BUFFER CONTENTS < ( P EXTRN RFMDUP REPLACE FM & DUP CHARS h P EXTRN GTRBUF P EXTRN DCGETM P EXTRN RELBUF P EXTRN DC1INQ P EXTRN DC2INQ P EXTRN
0x2061e4…206378 Dummy {f00=0x00f4, f01=0x0190, f02=»******************************************* P* 4 ( P* CONDITIONAL ASSEMBLY PARAMETERS > P* j . P***************************************** t P 2 POFLIN EQU 1 OFFLINE HANDLING POSSIBLE IF ::= 1 , PDCLIN EQU 1 NUMBER OF MAIN FRAMES (1
0x206378…20650c Dummy {f00=0x00f4, f01=0x018e, f02=» DK4 v PSUSPA EQU 0 DK4 P* $ P* EQUATES . P* @ P* J P* T ( PTIMDC EQU 600 DC TIME OUT: 60 S DK2 ^ PESC EQU /1B PSBA EQU /11 PNULL EQU /7F NULL CHARACTER & PNEWLIN EQU /7E NEW LINE CHARACTER $ PENDMES E
0x20650c…2066a0 Dummy {f00=0x00f4, f01=0x0190, f02=» P* P* P* P* EQUATES " P* 8 " P* COMMON EQU FOR ECB HANDLING B P* h P r PECBBA EQU 2 z PECBRL EQU 4 PECBEL EQU 6 PECBRC EQU 8 PECBCW EQU 10 P* P* P* CREDIT USED EQU
0x2066a0…206834 (0, 657) Dummy {f00=0x00f4, f01=0x0190, f02=»=2 PECBDC2 EQU ECBDC-DIS PECBICR EQU ECBDC2-DIS & P XIF D P IFF DCLIN=2 P PECBICR EQU ECBDC-DIS d P XIF P IFT COPCMD=1 PECBICW EQU ECBICR-DIS PECBPR EQU ECBICW-DIS P XIF P IFF COPCMD=1 PECBPR EQU
0x206834…2069c8 Dummy {f00=0x00f4, f01=0x018e, f02=»CB P* & P* CONFIG DATA 'CB1' REL ADDRESSES P* > " PNBRKBV EQU 0 NUMBER OF KB/VDUS H & PNBRGTP EQU NBRKBV+2 NUMBER OF GTPS n P* 2 PMF1KBV EQU NBRGTP+2 DV ADDRESSES KB/VDU MF #1 2 PMF1GTP EQU MF1KBV+16 DV ADDRESSES GTPS MF # 1
0x2069c8…206b5c Dummy {f00=0x00f4, f01=0x0190, f02=» z P* PTCT01 EQU 0 PPRINTER EQU TCT01+2 & ( PBVDU EQU PRINTER+2 VDU SCREEN BUFFER B 0 PPCURS EQU BVDU+1920 CURSOR ADDRESS , BINARY n * PATTRIB EQU PCURS+2 LAST ATTRIBUTE CHAR PCURATT EQU ATTRIB+2 & PWCC EQU CURATT+2 WCC/CCC CHA
0x206b5c…206cf0 Dummy {f00=0x00f4, f01=0x0190, f02=»CTIVE LENGTH p 2 PICWORK EQU DCLENG+2 WORK FIELD INTERTASK COMM , PINTATT EQU ICWORK+2 INTENSITY ATTRIBUTE J $ POFFFLG EQU INTATT+2 OFFLINE FLAG z ( PCOPNO EQU OFFFLG+2 HARDCOPY TASK ID * PCCC EQU COPNO+2 COPY COMMAND CHARACTER PMAIN EQU CCC
0x206cf0…206e84 Dummy {f00=0x00f4, f01=0x0190, f02=»ST READ DC p 2 PECBBLK EQU ECBDCC+2 ECBS FOR MULTIPLE WAIT &C 4 PRDMORE EQU ECBBLK+10 BRANCH ADDRESS NEXT READ KB H P* : PPRBUSY EQU -2 PRINTER BUSY. OCCUPIES BOOLEAN VARAIBLE P* P P* P* * PLBVDU EQU 1920 1920 CHARAC
0x206e84…207018 Dummy {f00=0x00f4, f01=0x0190, f02=»MINES PRINT LINE LENGTH $ PLPLIN EQU 132 LINELENGTH FOR LP P* H P R P Z P b PPRINT EQU * l P CF A14,I:EVA0 & P LDR TCABAS,A9 LOAD ASSEM TCA BASE P LDR* A4,TCABAS REL TASK NO " P AD A4,6,CREBAS 'CB1' ADDRESS
0x207018…2071ac Dummy {f00=0x00f4, f01=0x0190, f02=»************************************************* P : P LC A1,MF1GTP-1,A4 B P ANK A1,/FF P LDKL A8,ECBDC p P CF A14,EMULA P IFT DCLIN=2 6 P************************************************* P* , P* TRANSFER PARAMET
0x2071ac…207340 Dummy {f00=0x00f4, f01=0x0190, f02=»1,/FF P LDKL A8,ECBDC2 $ P CF A14,EMULA TRANSFER PARAMETER & P XIF N P* Z P* d P* RELATIVE POS IN ECBBLK n PICR EQU 2 PDC1 EQU 4 PDC2 EQU 6 P* P IFF DCLIN=2 P LDK A1,2 P XIF P IFT DCL
0x207340…2074d4 (0, 658) Dummy {f00=0x00f4, f01=0x0190, f02=»ABAS | P RF(NZ) PRI110 PENDING 0 P CF A14,DC1INQ TEST IF ANY MESSAGE, NO WAIT * PPRI110 EQU * ^ P IFT DCLIN=2 r P LD A1,ECBBLK+DC2,TCABAS P RF(NZ) PRI120 PENDING 6 P CF A14,DC2INQ TEST IF ANY MESSAGE MF # 2, NO WAIT P XIF
0x2074d4…207668 Dummy {f00=0x00f4, f01=0x0190, f02=»ER ~ P ADR A3,TCABAS ADDRESS * P CF A14,ICREAD READ INTERTASK NO WAIT * P ST A8,ECBBLK+ICR,TCABAS X PPRI150 EQU * x P LDKL A7,ECBBLK P ADR A7,TCABAS P LKM P DATA 7 MULTIPLE WAIT P CW A8,ECBBLK+ICR,TCABAS & P RF(
0x207668…2077fc Dummy {f00=0x00f4, f01=0x018e, f02=» RB PRI100 P* P* P* READ INTERTASK, NOWAIT & P* F P* A3 = BUFFER ADDRESS P P* A6 = REQ LENGTH n P* PICREAD EQU * P LDKL A8,ECBICR P ADR A8,CREBAS P LDKL A1,-1 P CF A14,REQTIM P ST A6,ECB
0x2077fc…207990 Dummy {f00=0x00f4, f01=0x0190, f02=» P* D P**************************************************************** P* V P* INPUT FROM DC ` P* x 8 P**************************************************** P* PDCINP EQU * ( P CF A14,ICABOR ABORT INTERTASK READ P
0x207990…207b24 Dummy {f00=0x00f4, f01=0x0190, f02=» OR BUFFER WILL BE DESTROYED IN 'UPDATE' PDCIN10 EQU * 2 & P CF A14,GTRBUF GET RECEIVE BUFFER F P LD A8,ECBDCC,TCABAS p P CF A14,DCGETM READ MESSAGE P IFF DCLIN=2 P CM ECBBLK+DC1,TCABAS P XIF P IFT DCLIN=2 P CW A8
0x207b24…207cb8 Dummy {f00=0x00f4, f01=0x0190, f02=»,TCABAS P XIF PDCIN30 EQU * $ P LD A1,ECBEL,A8 EFFECTIVE LENGTH 0 . P ST A1,DCLENG,TCABAS SAVE IT IN SAVE AREA X P 2 P CF A14,UPDATE MOVE FROM DC TO PRINTER BUFFER; P IFT COPCMD=1 P LD A1,ICWORK,TCABAS P RF(NZ) DCIN90
0x207cb8…207e4c Dummy {f00=0x00f4, f01=0x0190, f02=»ON PRINTER ~ PDCIN90 EQU * P CF A14,SNBUSY & P RTN A14 < P* L P* V P* ABORT INTERTASK READ ` P* ~ PICABOR EQU * P LDK A7,0 P CM ECBBLK+ICR,TCABAS P LDKL A8,ECBICR P ADR A8,CREBAS P LKM P D
0x207e4c…207fe0 Dummy {f00=0x00f4, f01=0x0190, f02=» P * P LDK A1,X'38' PRINT BIT, 80 CHAR./LINE 4 P ST A1,CCC,TCABAS SAVE AS COPY CONTROL CHARACTER : * P CF A14,COPY PRINT ON HARDCOPY DEVICE r P LD A1,ICWORK,TCABAS ( P RB(NZ) DCIN10 TAKE CARE OF DC INPUT P RB PRI100 P* P*
0x207fe0…208174 (0, 659) Dummy {f00=0x00f4, f01=0x0190, f02=»0 CHARS ^ P* P* PCOPY LDKL A8,ECBPR $ P ADR A8,CREBAS PRINTER ECB > P LD A7,ECBBA,A8 ` P SUR A3,A3 =1 x P SC A3,0,A7 =1 P SC A3,1,A7 =1 " P ADK A7,2 PRINt BUFFER ADDRESS " P SUR A9,A9 RESET BUFFER INDEX
0x208174…208308 Dummy {f00=0x00f4, f01=0x0190, f02=» SET p PCOPRTN RTN A14 PCOP100 EQU * " P LD A2,CCC,TCABAS 6 P ANK A2,/30 P , P ABL(Z) COP111 NL DETERMINES LINE LENGTH d P SRL A2,4 P LDK A6,0 $ P LC A6,LINLEN,A2 GET LINE LENGTH PCOP110 CWR A9,A6 P RF(L) COP120
0x208308…20849c Dummy {f00=0x00f4, f01=0x0190, f02=» P LCR A2,A4 " P ANK A2,/7F RESET DISPLAY BIT P SCR A2,A4 < P CWK A2,/20 N P RF(NL) COP130 b PCOP123 EQU * x P ANK A2,6 P XRK A2,6 P RF(Z) COP150 , PCOP125 LDK A2,/20 REPLACE ATTR BY SPACE P RF COP140 P
0x20849c…208630 Dummy {f00=0x00f4, f01=0x0190, f02=» A2,/39 PCOP141 CWK A2,/7E P RF(NE) COP142 * P LDK A2,/35 @ PCOP142 EQU * T P CF A14,RFMDUP FM OR DUP ? h . PCOP143 CWK A2,/61 LOWER CASE CHARACTER ?? P RF(L) COP144 NO!! P SUK A2,/20 PCOP144 SCR A2,A7 P ADK A
0x208630…2087c4 Dummy {f00=0x00f4, f01=0x0190, f02=» A2,A7 P ADK A3,1 P ADK A4,1 P ADK A7,1 2 P ADKL A9,1 D P CWR A9,A6 V P RF(L) COP160 h ( P CF A14,PRLINE LINE FULL : PRINT IT ~ PCOP160 LCR A2,A4 P ANK A2,/7F P CWK A2,/20 P RB(L) COP123 ATTRIBUTE (
0x2087c4…208958 Dummy {f00=0x00f4, f01=0x018e, f02=»THE FIRST INSTR. ORIGINALLY HAD LABEL 'COP200'. P* 8 P* B PCOP111 EQU * L P CWK A9,LPLIN DK3 ` " P RF(L) COP220 BUFFER NOT FULL z $ PCOP210 CF A14,PRLINE PRINT LINE P ABL COP111 PCOP220 CWK A3,LBVDU " P RF(NL) COP300 P
0x208958…208aec Dummy {f00=0x00f4, f01=0x0190, f02=» ( PCOP223 ANK A2,/6 ATTRIBUTE CHARACTER P XRK A2,6 0 " P RF(Z) COP250 PROTECTED FIELD B 0 PCOP225 LDK A2,/20 REPLACE ATTRIBUTE BY SPACE h P RF COP240 PCOP230 CWK A2,NULL , P RB(E) COP225 NULL IS REPLACED BY SPACE PCOP240 EQU *
0x208aec…208c80 Dummy {f00=0x00f4, f01=0x0190, f02=» P CWK A2,NEWLIN & P RB(E) COP210 NL CHAR: PRINT LINE P CWK A2,FORMFD DK1 H P RB(E) COP210 DK1 d P CWK A2,ENDMES ~ . P RF(E) COP300 UND MESSAGE: PRINT LAST LINE P ADKL A9,1 P ABL COP111 , PCOP250 LDK A2,/20 REPLACE TE
0x208c80…208e14 (0, 660) Dummy {f00=0x00f5, f01=0x0190, f02=»OP260 ( P CF A14,PRLINE LINE FULL : PRINT IT PCOP260 LCR A2,A4 : P ANK A2,/7F R P CWK A2,/20 f " P RB(L) COP223 ATTRIBUTE FOUND z ( P RB COP250 STILL IN PROTECTED FIELD PCOP300 LDR A9,A9 P ABL(Z) COPRTN ALL PRINTED " P C
0x208e14…208fa8 Dummy {f00=0x00f5, f01=0x0190, f02=»=NUMBER OF CHAR IN PRINT BUFFER P* ( P* 2 PPRLINE EQU * < P IFT SUSPA=1 DK4 P P CF A14,SKIPSP DK4 j P XIF DK4 . P IM LINCNT,TCABAS COUNT NBR OF PRINTLINES " P RF(N) PRL100 NOT END OF PAGE P LDK A7,LPAGE END OF PAG
0x208fa8…20913c Dummy {f00=0x00f5, f01=0x0190, f02=»UPPORT ********* DK r ( P LC A2,2,A7 GET FORMCONTROL CHAR DK $ P ANK A2,/7F REMOVE PARITY BIT DK H P CWK A2,FORMFD DK p & P RF(NE) PRL106 NO, NORMAL PRINT DK P LDK A2,/31 DK & P SC A2,1,A7 CHANGE TO FORMFEED DK P LDK A7,2 DK
0x20913c…2092d0 Dummy {f00=0x00f5, f01=0x0190, f02=»ABAS RESET LINE COUNTER DK P RF PRL220 ! " PPRL105 EQU * DK ! 4 . P******************** END LP400 SUPPORT DK ! L ( P LC A2,2,A7 GET FIRST CHAR IN BUFFER ! ~ P ANK A2,/7F ! PPRL106 EQU * DK ! P CWK A2,FORMFD ! P RF(NE) PRL200 NOT FORM FEED
0x2092d0…209464 Dummy {f00=0x00f5, f01=0x0190, f02=»DK A7,2 ! 4 P ST A7,ECBRL,A8 SET REQ LENGTH TO 2 FOR NEW LINE " PPRL120 EQU * " H P CF A14,PRLKM DK3 " P ADK A1,1 COUNT LINES " v P RB(N) PRL120 " P LDK A7,LPAGE " P NGR A7,A7 " , P ST A7,LINCNT,TCABAS RESET LINE COUNTER " 0 PPRL200
0x209464…2095f8 Dummy {f00=0x00f5, f01=0x0190, f02=» EQU * DK " P LDK A7,0 # P LD A7,ECBBA,A8 # $ P SUR A9,A9 =1 # < P SCR A9,A7 =1 # R P SC A9,1,A7 =1 # h $ P ADK A7,2 RESTORE BUFFER ADDRESS # P RTN A14 # P* EJECT # P* # P* # P* SET STATUS NOT BUSY FOR DC # P*
0x2095f8…20978c Dummy {f00=0x00f5, f01=0x0190, f02=»ATA 1 # P RTN A14 $ P* $ P* $ ( P* $ 2 P* $ < PPRLKM EQU * DK3 $ F P LDK A7,/86 DK3 $ ^ P LKM DK3 $ v P DATA 1 DK3 $ ( P LD A7,ECBRC,A8 GET RETURN CODE DK3 $ " P ANKL A7,/2005 BIT 2,3,15? DK3 $ $ P RB(NZ) PRLKM NO, TRY AGAI
0x20978c…209920 Dummy {f00=0x00f5, f01=0x0190, f02=»ACES $ n ( P* IN END OF ECB-BUFFER. % 4 P* REQUESTED LENGTH IN A9 IS UPDATED. % 8 " P* A1,A2 - WORK REG % p P* % PSKIPSP EQU * % P ADKL A9,2 % ( P LD A1,2,A8 GET BUFFER ADDRESS (BA) % $ P ADR A1,A9 GET ADD END
0x209920…209ab4 (0, 661) Dummy {f00=0x00f5, f01=0x0190, f02=»020 SPACE ? % P RF(NE) SKIP20 NO & PSKIP07 SUKL A9,1 DECR RL & . P RB SKIP05 GET NEXT & N PSKIP20 CWK A9,4 & j P RF(NG) SKIP30 RL < 5 & P LC A2,-2,A1 GET CHAR & $ P CCK A2,/1111 TABULATION CHAR ? & P RF(NE) SKIP30 NO & P SUK A1,
0x209ab4…209c48 Dummy {f00=0x00f5, f01=0x4036, f02=» XIF DK4E & P* ' P END ' @ ' 2UKL A9,1 DECR RL & . P RB SKIP05 GET NEXT & N PSKIP20 CWK A9,4 & j P RF(NG) SKIP30 RL < 5 & P LC A2,-2,A1 GET CHAR & $ P CCK A2,/1111 TABULATION CHAR ? & P RF(NE) SKIP30 NO & P SUK A1,
0x209c48…209ddc Dummy {f00=0x00f5, f01=0x2008, f02=» ( IDENT PRT END "@ 6
0x209ddc…209f70 Dummy {f00=0x00f5, f01=0x0190, f02=» ; h < h = h $ > h 4 ? h D @ h T A h d B h t C ] h D h E h F h G h H h I h J A h
0x209f70…20a104 Dummy {f00=0x00f5, f01=0x0190, f02=» T i U i V i $ W i 4 X i D Y i T Z i d [ i t i ] m i ^ i _ i ` i a ) i b i c i
0x20a104…20a298 Dummy {f00=0x00f5, f01=0x0190, f02=» m j n j o j $ p j 4 q j D r j T s j d t j t u j v j w u j J F " D RRRRRRRRRRRRRRRRRR2 cRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRR j z
0x20a298…20a42c Dummy {f00=0x00f5, f01=0x0190, f02=» 0 k k 0 k & 0 k 8 0 k J 0 k 0 k n k k k k J F " D L LW ?R% L # L ! L ! L W ! L ?R$ " W LH8 L
0x20a42c…20a5c0 Dummy {f00=0x00f5, f01=0x0190, f02=»0 k 0 l l l 0 l B J F " D R ?R L L_$! L* R( - L L ) L LH8 LW L l T l l 0 l 0 l l l
0x20a5c0…20a754 (0, 662) Opaque[0x194]
0x20a754…20a8e8 # DirEnt {nam=»KM305 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1eb0, f03=0x0000}
0x20a754…20a8e8 IdxSect {
0x20a754…20a8e8 f00 = 0x00f5 // 0x20a754 @0x0
0x20a754…20a8e8 f01 = 0x0004 // 0x20a756 @0x2
0x20a754…20a8e8 gno = [ // 0x20a758 @0x4
0x20a754…20a8e8 [0x00]: C0x00f5.0x2.0
0x20a754…20a8e8 [0x01]: C0x00f5.0x3.0
0x20a754…20a8e8 ]
0x20a754…20a8e8 }
0x20a8e8…20aa7c Dummy {f00=0x00f5, f01=0x0190, f02=» PSCR PPRT KM305 PPRT C305 " & PMES DRAGSHOLM KOMMUNE, FELT 90-94 2 PSCR PLED KMD08,/S h P!!CH $$EJECT$$ $$ | P!!CH $$DCTASK$$DCTSK$$ P!!CH $$26$$20$$ P!!DL 52,60 DK05 -> DK12 P!!DL 61,62 FD03,FD04 P
0x20aa7c…20ac10 Dummy {f00=0x00f5, f01=0x0190, f02=»$$ CBKOFLG z $ P!!RE 199,$$FALSE$$TRUE$$ CKTFLAG & P!!RE 200,$$FALSE$$FALSE$$ CCLKTFLG : & P!!RE 201,$$FALSE$$FALSE$$ CTESTFLG d 2 P!!RE 202,$$FALSE$$FALSE$$ CTRVALG (NU VIBORG) $ P!!RE 203,$$FALSE$$FALSE$$ CFLT46 $ P!!RE 204,$$FALSE$$FALSE$$ CF
0x20ac10…20ada4 Dummy {f00=0x00f5, f01=0x0190, f02=»08,$$FALSE$$FALSE$$ CADM22F & P!!RE 209,$$FALSE$$FALSE$$ C5MDISK $ $ P!!RE 210,$$TRUE$$FALSE$$ CKASFLG N $ P!!RE 211,$$TRUE$$FALSE$$ CSLDFLG v & P!!RE 212,$$FALSE$$FALSE$$ CGLREGFL & P!!RE 213,$$FALSE$$FALSE$$ CCONVERT & P!!RE 237,$$FALSE$$FALS
0x20ada4…20af38 Dummy {f00=0x00f5, f01=0x0190, f02=»LG p P!!DL 287 PCFLAG BINI (12),X'0011' $ P!!RE 317,$$FALSE$$FALSE$$ BUDGET : $ P!!RE 318,$$FALSE$$TRUE$$ FAKT10 b ( P!!RE 319,$$FALSE$$TRUE$$ FELT 90-94 P!!DL 346,347 PCLEVBUF STRG 1 PCVARBUF STRG 1 P!!DL 378 PED
0x20af38…20b0cc Dummy {f00=0x00f5, f01=0x0190, f02=»E$$ C167FLG z 8 P!!RE 432,$$FALSE$$FALSE$$GENERATE LEVNR 5X XXXXXX CC . P!!RE 433,$$FALSE$$FALSE$$ C539FLG-TINGLEV P * P!!RE 434,$$TRUE$$FALSE$$ NO VSL CHECK $ P!!RE 440,$$1400$$1400$$DISK SIZE P!!RE 441,$$21$$21$$ CKTMAX P!!RE 446,$$128
0x20b0cc…20b260 Dummy {f00=0x00f5, f01=0x0190, f02=»!!RE 451,$$5$$5$$ CKTTOP P!!DL 777 P!!DL 779 0 P!!DL 783 @ P!!DL 787,790 P P!!DL 796 DUMMY T:IO d P!!DL 808,827 P!!DL 828,843 P!!DL 844,855 LP P!!DL 876,879 P!!DL 885,891 P!!DL 893,897 P!!EN P
0x20b260…20b3f4 (0, 663) Dummy {f00=0x00f5, f01=0x0190, f02=»EN PTRA /S,NL PINC RGSTRT PINC RGKLAR . PNOD R @ PINC RGSUB4 N PINC RGADM ` PNOD R r PINC RGMAIN PINC RGSUBS PINC RGSUB1 PINC RGSUB2 PINC RGSUB3 PNOD R PINC RGFRMT PINC ADM6
0x20b3f4…20b588 Dummy {f00=0x00f5, f01=0x012e, f02=»C KTPLN PINC KTOPR PTLK U,4K " PLED DCTSK 2 P!!RE 18,$$2$$1$$ D P!!RE 19,$$400$$200$$ P!!EN x PASM /S,NL P$INCGEN LKE M PKPF /L,RGLOAD PSCR P$PDISC A=RGLOAD 2 PMES $PDISC M=M:305,MU=M:PO
0x20b588…20b71c Dummy {f00=0x00f5, f01=0x2008, f02=» PINC KTOPR PTLK U,4K " PLED DCTSK 2 P!!RE 18,$$2$$1$$ D P!!RE 19,$$400$$200$$ P!!EN x PASM /S,NL P$INCGEN LKE M PKPF /L,RGLOAD PSCR P$PDISC A=RGLOAD 2 PMES $PDISC M=M:305,MU=M:PO
0x20b71c…20b8b0 Dummy {f00=0x00f5, f01=0x0190, f02=» nP ! ! d A V z @ dT ! _ T J_ d A T B B A f A h A j A Z A ! ! d A V_R @ V | ! @ X ! t X Zd X Xd Xh_r @ TP6 X R0 X P T$ T Y W d P C , J A V A T 4 @ @ T @ l A j @ j A l A ! T2 P4
0x20b8b0…20ba44 Dummy {f00=0x00f5, f01=0x0190, f02=» A r A sW W W A r A s ! @ r ! @ s ! ! ! B J 4 ! ! @ f @ j A l @ jT( @ ! 8 ! @ ^P - ! x ! W 0 " @ ^PL R ~T }T T0 W, ! P " ! " :A *@ H X T 0 ! W R ! A j @ h @ jUH
0x20ba44…20bbd8 Dummy {f00=0x00f5, f01=0x0190, f02=» @ ! 8 ! X ! 9a D v ! X ! P ! T & ! _b B J B ! ! 4 A J Z 4J T A bT 2PZ ! H X 4 ! t z A J Z 4_ I " P A A b 4 A _$" P H!XB P W ! 5|_ ! ! 1 4 A @ ` @ P 0 M A 4
0x20bbd8…20bd6c Dummy {f00=0x00f5, f01=0x0190, f02=» > "* t Z A p 4 A p ! @ VP ! ! d z @ pP a p A p 4 A A A ?a :a# P @ @ @ 4 8 ! A b ! ! A b @ :H 4 l ! P " ! " :A *@ H T 0 ! W R ! A j @ h @ jU
0x20bd6c…20bf00 Dummy {f00=0x00f5, f01=0x0190, f02=» @ ! 8 ! X ! 9a D v ! X ! P ! T & ! _b B J B ! ! 4 A J Z 4J T A bT 2P ! H 4 ! z A J Z 4_ I " P A A b 4 A _$" P H B P W ! _ ! ! 1 4 :f"? H ! "? H ! 4 ABCDEFGHI#.<(
0x20bf00…20c094 (0, 664) Opaque[0x194]
0x20c094…20c228 # DirEnt {nam=»C305 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1ec0, f03=0x0000}
0x20c094…20c228 IdxSect {
0x20c094…20c228 f00 = 0x00f6 // 0x20c094 @0x0
0x20c094…20c228 f01 = 0x0002 // 0x20c096 @0x2
0x20c094…20c228 gno = [ // 0x20c098 @0x4
0x20c094…20c228 [0x00]: C0x00f6.0x0.0
0x20c094…20c228 ]
0x20c094…20c228 }
0x20c228…20c3bc Dummy {f00=0x00f6, f01=0x010e, f02=» PT; P01; TID=TC; TCL=TC; * LEV=60; : P02; J PTDC=T03; V PLC=01L; f PTDC=T07; v PLC=01L; P01; PSCL=S04; PC; P00; P01; PSCL=S01; U; 001; TB2; P00
0x20c3bc…20c550 Dummy {f00=0x00f6, f01=0x2008, f02=» P01; TID=TC; TCL=TC; * LEV=60; : P02; J PTDC=T03; V PLC=01L; f PTDC=T07; v PLC=01L; P01; PSCL=S04; PC; P00; P01; PSCL=S01; U; 001; TB2; P00
0x20c550…20c6e4 Dummy {f00=0x00f6, f01=0x0190, f02=» P O W O B O I T N O : O ( : O 8 O N Z_ (@P B ] ] N " T : N "0 :d H> R _ 0" 1 V " 2 P W X }T 9 ~T 5 aR = _X =
0x20c6e4…20c878 Dummy {f00=0x00f6, f01=0x0190, f02=» = R ?X 0" ZZ_" >@ ?X >@ O R 0 O B " |T 1 ] C ? 0 O W8 " |T ] N C ? Z 0 O ? B : C ( : ( B ' : O N T B O N - O
0x20c878…20ca0c Dummy {f00=0x00f6, f01=0x0190, f02=» P O W O B O I T N O : O ( : O 8 O N Z_ (@P B ] ] N " T : N "0 :d H> R _ 0" 1 V " 2 P W X }T 9 ~T 5 aR = _X =
0x20ca0c…20cba0 Dummy {f00=0x00f6, f01=0x0190, f02=» = R ?X 0" ZZ_" >@ ?X >@ O R 0 O B " |T 1 ] C ? 0 O W8 " |T ] N C ? Z 0 O ? B : C ( : ( B ' : O N T B O N - O
0x20cba0…20cd34 (0, 665) Opaque[0x194]
0x20cd34…20cec8 # DirEnt {nam=»DIV499«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1ec8, f03=0x0000}
0x20cd34…20cec8 IdxSect {
0x20cd34…20cec8 f00 = 0x00f6 // 0x20cd34 @0x0
0x20cd34…20cec8 f01 = 0x0014 // 0x20cd36 @0x2
0x20cd34…20cec8 gno = [ // 0x20cd38 @0x4
0x20cd34…20cec8 [0x00]: C0x00f6.0x1.0
0x20cd34…20cec8 [0x01]: C0x00f6.0x2.0
0x20cd34…20cec8 [0x02]: C0x00f6.0x3.0
0x20cd34…20cec8 [0x03]: C0x00f7.0x0.0
0x20cd34…20cec8 [0x04]: C0x00f7.0x1.0
0x20cd34…20cec8 [0x05]: C0x00f7.0x2.0
0x20cd34…20cec8 [0x06]: C0x00f7.0x3.0
0x20cd34…20cec8 [0x07]: C0x00f8.0x0.0
0x20cd34…20cec8 [0x08]: C0x00f8.0x1.0
0x20cd34…20cec8 [0x09]: C0x00f8.0x2.0
0x20cd34…20cec8 ]
0x20cd34…20cec8 }
0x20cec8…20d05c Dummy {f00=0x00f6, f01=0x018e, f02=» P IDENT DIV499 03.01.XXX.1 P DDUM KMD08 & P PDIV D P ENTRY FRMTJT Z P ENTRY FRMXJT p P ENTRY FRMTTA P ENTRY FRMXTA P ENTRY FRMTVO P ENTRY FRMTKV P ENTRY FRMXVO P ENTRY FRMTKT
0x20d05c…20d1f0 Dummy {f00=0x00f6, f01=0x0190, f02=» PFRMTJT PROC 0 P CALL FMOVE,GTSTRFMT,FTBJT(GTREGDEX) P RET R P PEND f P* | PFRMXJT PROC XJTDEX ( P CALL FMOVE,GTSTRFMT,FTBXJT(XJTDEX) P RET P PEND P* PFRMTTA PROC 0 P
0x20d1f0…20d384 Dummy {f00=0x00f6, f01=0x018e, f02=»OVE,GTSTRFMT,FTBXTA(XTADEX) P RET $ P PEND 0 P* > PFRMTVO PROC H 0 P CALL FMOVE,GTSTRFMT,FTBVO(GTREGDEX) P RET P PEND P* PFRMXVO PROC XVODEX ( P CALL FMOVE,GTSTRFMT,FTBXVO(XVODEX)
0x20d384…20d518 Dummy {f00=0x00f6, f01=0x0190, f02=» PFRMTKT PROC 0 P CALL FMOVE,GTSTRFMT,FTBKT(GTREGDEX) P RET N P PEND b P* x PFRMXKT PROC XKTDEX ( P CALL FMOVE,GTSTRFMT,FTBXKT(XKTDEX) P RET P PEND P* PFRMTGP PROC ( P CALL
0x20d518…20d6ac Dummy {f00=0x00f6, f01=0x0190, f02=»,FTBXGP(XGPDEX) | P RET P PEND $ P EJECT 2 P* H P* FORMATS FOR JOURNAL R P* v @ PFTBJT FTABLE JTFMT01,JTFMT02,JTFMT03,JTFMT04,JTFMT02, C 2 P JTFMT01,JTFMT02,JTFMT08,JTFMT08,JTFMT02, C . P JTFMT12,JTFM
0x20d6ac…20d840 Dummy {f00=0x00f6, f01=0x0190, f02=» FLINK JTSUB01 LINE 1 P FEOR 2 2 P FLINK JTSUB04 LINE 2 H P FMEND ~ P* PJTFMT02 FRMT P FLINK JTFMT02L P FMEND P* PJTFMT02L FRMT 2 P FLINK J
0x20d840…20d9d4 (0, 666) Dummy {f00=0x00f6, f01=0x0190, f02=»UB08 VALUE P FEOR P FILLR ' ',8 ( F P FMEL 'X',GTDUPF(CBIN6) RE$ D P FILLR ' ',2 P FLINK JTSUB06 FOR TRANS 10 P FLINK JTSUB30 ARKIV KNT.NR P FILLR ' ',15 P
0x20d9d4…20db68 Dummy {f00=0x00f6, f01=0x0190, f02=» JTSUBST START INF P FILLR ' ',9 * $ P FCOPY TT16TXT RATE/RENTE/GEBYR F 2 P FLINK JTSUB06 CPR/CIR n 0 P FLINK JTSUB08 VALUE P FEOR P FILLR ' ',6 F P
0x20db68…20dcfc Dummy {f00=0x00f6, f01=0x018e, f02=» VALGR h F P FMEL 'BBZ',GTDUPF(CBIN8) BETALINGSFORM BFO $ 8 P FLINK JTSUB30 ARK KONTO NR n P FILLR ' ',2 8 P FMEL 'XX',GTDUPF(CBIN11) PALIGNINGSAR P
0x20dcfc…20de90 Dummy {f00=0x00f6, f01=0x0190, f02=» PJTFMT04 FRMT P FLINK JTFMT04L P FMEND 0 P* > PJTFMT04L FRMT H P FLINK JTSUBST START INF ^ P FILLR ' ',15 ~ 2 P FLINK JTSUB06 CPR/CIR 0 P FLINK JTSUB08 VALUE P
0x20de90…20e024 Dummy {f00=0x00f6, f01=0x0190, f02=» VALOR h P FILLR ' ',3 6 P FLINK JTSUB30 ARK KNT NR < B P FMEL 'BBBZZ',GTDUPF(CBIN10) F$R v F P FMEL 'BBZZ',GTDUPF(CBIN11) RES $R D P
0x20e024…20e1b8 Dummy {f00=0x00f6, f01=0x0190, f02=» P FMEND P* PJTFMT08 FRMT $ P FLINK JTFMT08L 8 P FMEND P P* ^ PJTFMT08L FRMT h 4 P FLINK JTSUBST START INF ~ 2 P FLINK JTSUB01 LINE 1 P FEOR 2 P
0x20e1b8…20e34c Dummy {f00=0x00f6, f01=0x0190, f02=»ND P* PJTFMT12 FRMT P FLINK JTFMT12L ( P FMEND @ P* N PJTFMT12L FRMT X 4 P FLINK JTSUBST START INF n 8 P FLINK JTSUB05 REG KONTO NR D P FMEL 'B999',TTCNTNR
0x20e34c…20e4e0 Dummy {f00=0x00f6, f01=0x0190, f02=» 2 P FMEL 'BZZZZZZZZZZ',GTDUPF(CBIN2) DIVERSE TEXT P FILLR ' ',16 : P FMEND P P* ^ $ PJTFMT18 FRMT TRANS 18,19,28,29 h ( P FLINK JTFMT01 2 LINES AS TRANS 1,6 P FEOR P FLINK JTSUB18 3 LINIE P FMEND P* 4 PJTSUBST
0x20e4e0…20e674 (0, 667) Dummy {f00=0x00f6, f01=0x0190, f02=» CYCLE MARKERING l 8 P FMEL '99B',GTREGNR TRANS, TYPE P FLINK FLBNR V P FMEND j P* : PJTSUB01 FRMT LINE 1,- 1,5,6 P FLINK JTSUB05 CPR/CIR P FLINK JTSUB06 REG-KONTO-NR 0
0x20e674…20e808 Dummy {f00=0x00f6, f01=0x0190, f02=»Z',GTDUPF(CBIN3) BKO * P FMEL 'BZZ.ZZ.ZZ',GTDUPF(CBIN7) V.DATO B P FMEL 'BBX',GTDUPF(CBIN6) RE$ J D P FMEL 'BBX',GTDUPF(CBIN8) BFO P FLINK JTSUB30 0 P FMEL 'XXXXXXE-XXX
0x20e808…20e99c Dummy {f00=0x00f6, f01=0x0190, f02=» REG KNT NR v , P FMEL 'B999E-99E-999E-99B',GTDUPF(CBIN1) P FMEND P P* f 2 PJTSUB06 FRMT CPR/CIR p P FBT BCPR,JTLAB06 ( P FMEL 'XE-XXE-XXE-XXB',GTDUPF(CBIN2) P FB JTLAB08
0x20e99c…20eb30 Dummy {f00=0x00f6, f01=0x0190, f02=»XX.XXB',GTDUPF(CBIN2) PJTLAB08 P FMEND . P* D P* N 8 PJTSUB08 FRMT VALUE AND D/K X 6 P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) P FCOPY TTDBKRM P FMEND P*
0x20eb30…20ecc4 Dummy {f00=0x00f6, f01=0x0190, f02=»,2 " P FMEL 'XXX',GTDUPF(CBIN15) TXT * P FMEL 'BXXXXXXXXXX',GTDUPF(CBIN13) NR- 0 , P FMEL 'BXXXXXXXXXX',GTDUPF(CBIN14) NR-2 ^ , P FMEL 'BXX.XX.XX',GTDUPF(CBIN18) DATO-1 , P FMEL 'BXX.XX.XX',GTDUPF(CBIN19) DATO-2 P FMEND P* 6 PJT
0x20ecc4…20ee58 Dummy {f00=0x00f6, f01=0x0190, f02=» FRMT LINE 3 - 8 P FILLR ' ',2 2 F P FMEL 'ZZ.ZZ.ZZ',GTDUPF(CBIN12) FAKT DATO N F P FMEL 'BZZZZZZZZZZ',GTDUPF(CBIN13) FAKT NR D P FMEL 'BZZZZZZZZ',GTDUPF(CBIN
0x20ee58…20efec Dummy {f00=0x00f6, f01=0x0190, f02=»IN16) OMR NR r D P FMEL 'BZZ.ZZ.ZZ',GTDUPF(CBIN18) PER FRA * D P FMEL 'BZZ.ZZ.ZZ',GTDUPF(CBIN19) PER TIL r F P FMEL 'BZ',GTDUPF(CBIN17) ADR KODE P
0x20efec…20f180 Dummy {f00=0x00f6, f01=0x0190, f02=»JTF02,XJTF03,XJTF04,XJTF05,XJTF06, C z 2 P XJTF07,FMTFMT,XJTF09,XJTF10,XJTF11,VOX15, C . " P XJTF13,XJTF14,VOFMT02,XJTF16 d P* PXJTF01 FRMT KVITTERING P FILLR ' ',2 P FLINK FLBNR P FCOPY =' KVIT' P FMEND P*
0x20f180…20f314 (0, 668) Dummy {f00=0x00f7, f01=0x0190, f02=» P FILLR ' ',2 P FCOPY ='KONTOKORT' P FBF GTSLDFLG,XJTF02EX 4 & P FMEL 'B*.***.***.**9.99-',TTKTSLD R PXJTF02EX | P FMEND P* PXJTF03 FRMT P FILLR ' ',2 P FCOPY ='START SUM' P FMEND P* PXJTF04 F
0x20f314…20f4a8 Dummy {f00=0x00f7, f01=0x0190, f02=»* PXJTF05L FRMT P FILLR ' ',2 P FILLR '*',50 2 P FEOR H P FILLR ' ',2 V P FTEXT 'VERSNR ' j P FCOPY ='DAGS-DATO' P FILLR ' ',2 P FCOPY ='POST-DATO' P FILLR ' ',2 P FCOPY ='MASKIN NR' P FCOPY
0x20f4a8…20f63c Dummy {f00=0x00f7, f01=0x0190, f02=» FMEL '99E-99E-99',CMASKDAT P FILLR ' ',3 $ P FMEL '99E-99E-99',GTDATO 8 P FILLR ' ',3 Z P FMEL '999',GTMSK n P FILLR ' ',7 P FMEL '***99',TTSTLBNR P FILLR ' ',3 P FEOR P FILLR ' ',2 : P FCOPY ='VERSURKONTONR
0x20f63c…20f7d0 Dummy {f00=0x00f7, f01=0x0190, f02=»,TTCASHAC x $ P FMEL 'ZZZ.ZZZ.ZZ9.ZZ-',TTSTCASH P FEOR : P FILLR ' ',2 H P FILLR '*',40 P FMEND r P* PXJTF06 FRMT P FLINK XJTF06L P FMEND P* PXJTF06L FRMT P FILLR ' ',2 P FILLR '*',50
0x20f7d0…20f964 Dummy {f00=0x00f7, f01=0x0190, f02=»R' P FILLR ' ',10 P FCOPY ='DEBET' P FILLR ' ',12 8 P FCOPY ='KREDIT' N P FMEND f P* t PXJTF07 FRMT ~ P FLINK XJTF07L P FMEND P* PXJTF07L FRMT P FILLR ' ',2 P FMEL 'ZZ',GTWBCD1 6 P FMEL
0x20f964…20faf8 Dummy {f00=0x00f7, f01=0x0190, f02=»TF09 FRMT P FCOPY =' START TEST' P FMEND 0 P* > PXJTF10 FRMT H P FCOPY =' SLUT TEST' P FMEND z P* PXJTF11 FRMT P FILLR ' ',2 P FCOPY ='DISKETTE SKIFT ' P FMEND P* PXJTF13 FRMT P
0x20faf8…20fc8c Dummy {f00=0x00f7, f01=0x0190, f02=»UPF(CBIN2) COUNTER NO 2 P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) VALUE P FILLR ' ',2 T P FCOPY ='ADM ' h $ P FMEL 'BZZ',GTDUPF(CBIN5) ADM NO P FMEND P* PXJTF14 FRMT P FSL P FMEL '99B',GTWBCD2 P FCOPY GSWST
0x20fc8c…20fe20 Dummy {f00=0x00f7, f01=0x0190, f02=»NR | P FCOPY =' CHECK' P FMEND " P* 0 PFMTFMT FRMT : P FTEXT 'DIVERSE FORMATER' N P FMEND p P EJECT ~ P* : P* FORMATS FOR VOUCHER 'BILAG AFSTEMPLING' P* @ PFTBVO FTABLE BAFST01,BAFST02,BA
0x20fe20…20ffb4 (0, 669) Dummy {f00=0x00f7, f01=0x0190, f02=»BAFST01 n P* P* PBAFST01 FRMT TRANS 01-06 $ P FLINK BAFST01L F P FMEND ^ P* l PBAFST01L FRMT v 8 P FLINK BSUB01 HEADER P FBT TTKORTFL,B1LAB1 P FILLR ' ',6 " P FMEL 'B**B',GTD
0x20ffb4…210148 Dummy {f00=0x00f7, f01=0x0190, f02=»TDUPF(CBIN3) BKO PB1LAB2 < P FLINK JTSUB06 CPR-CIR-NR & @ P FLINK BSUB02 REGKONTO-BELOB f P FMEND P* P* B PBAFST02 FRMT TRANS 0
0x210148…2102dc Dummy {f00=0x00f7, f01=0x0190, f02=»DER ` P FILLR ' ',1 8 P FMEL '******E-****',GTDUPF(CBIN2) CPR/CIR TRANS 10 P FILLR '*',3 P FBT TTKORTFL,B2LAB1 p P FILLR '*',13 PB2LAB1 @ P FLINK BSUB02 REGKONTO-BELOB P FMEND
0x2102dc…210470 Dummy {f00=0x00f7, f01=0x018e, f02=»FST08L FRMT 8 P FLINK BSUB01 HEADER ! $ P FMEL 'BBB**B',GTDUPF(CBIN3) BKO ! P P FBZ GTUSED(CBIN13),B8LAB1 ! x . P FMEL 'ZZZZZZZZZZB',GTDUPF(CBIN13) FAKTNR ! P FB B8LAB5 ! PB8LAB1 ! P FBZ GTUSED(CBIN12),B8LAB2 !
0x210470…210604 Dummy {f00=0x00f7, f01=0x0190, f02=» ! d PB8LAB5 " P FLINK JTSUB10 LEVERAND. " > P FLINK BSUB02 REGKONTO-BELOB " 6 P FMEND " x P* " P* " PBAFST12 FRMT TRANS 12 " P FLINK BAFST12L " P FMEND " P* " PBAFST12L FRMT " P
0x210604…210798 Dummy {f00=0x00f7, f01=0x0190, f02=»',GTMSK MASKINNR " | P FLINK FLBNR # . @ P FMEL 'B99.99.99',GTDATO POSTERINGSDATO # B B P FCOPY TTSUPMRK SUPPLEMENTS-MARK # < P FMEL '99',GTREGNR TRANSTYPE-NR #
0x210798…21092c Dummy {f00=0x00f7, f01=0x018e, f02=»B12LAB1 # P FILLR '*',13 $ PB12LAB1 $ & @ P FLINK BSUB02 REGKONTO-BELOB $ 6 P FMEND $ z P* $ P* $ PBAFST03 FRMT BILAG TRANS 3 $ P FLINK BSUB10 $ P FLINK BSUB11 $ P FLINK BSUB13 $
0x21092c…210ac0 Dummy {f00=0x00f7, f01=0x0190, f02=» $ P* % P* % 8 PBSUB01 FRMT HEADER % P FILLR '+',2 % X P FCOPY GTTESTMK % t > P FCOPY TTCYM CYKLE-MARKERING % > P FMEL '999B',GTMSK MASKINNR
0x210ac0…210c54 (0, 670) Dummy {f00=0x00f7, f01=0x0190, f02=» SUPPLEMENTS-MARK % h < P FMEL '99',GTREGNR TRANSTYPE-NR & P FMEND & ^ P* & t P & ~ PBSUB02 FRMT & @ P FMEL 'B999.99999.99B',GTDUPF(CBIN1) REGKONTONR & < P FMEL '*.***.***.**9.99-',GTDUP
0x210c54…210de8 Dummy {f00=0x00f7, f01=0x0190, f02=» & P* ' P* ' PBSUB04 FRMT ' P FCOPY GTTESTMK ' 2 P FCOPY TTCYM ' J @ P FMEL '99.99.99B',GTDATO POSTERINGSDATO ' ^ P FCOPY CKMDNAM ' : P FMEL 'B999B',GTMSK MASKINNR ' " P FMEL '99B',GTDUPF
0x210de8…210f7c Dummy {f00=0x00f7, f01=0x018e, f02=»9-',GTDUPF(CBIN4) BELOB ' p B P FCOPY TTDBKRM DEBET/KREDIT-MARK ( " P FILLR ' ',1 ( h P FMEND ( | P* ( P* ( PBSUB06 FRMT ( " P FMEL 'B99B',GTDUPF(CBIN3) BKO ( P FBT TTKORTFL,B6LAB1 ( P FCOPY TT0
0x210f7c…211110 Dummy {f00=0x00f7, f01=0x018e, f02=» PBSUB07 FRMT ) P FILLR ' ',1 ) < P FLINK JTSUB06 CPR/CIR-NR ) . < P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) BELOB ) n D P FCOPY TTDBKRM DEBET/KREDIT-MARK ) P FILLR ' ',1 )
0x211110…2112a4 Dummy {f00=0x00f7, f01=0x0190, f02=» P FMEL '999B',GTMSK MASKINNR * P FLINK FLBNR * ( & P FMEL 'B99.99.99',GTDATO POSTDATO * < " P FMEL 'BXX.',GTDUPF(CBIN3) BKO * f P FMEND * P* * PBSUB11 FRMT * $ P FMEL 'XX',GTDUPF(CBIN11) P]L]R * 2 P FMEL 'E-9999999999B',GTDUPF(CBIN2) DEBI
0x2112a4…211438 Dummy {f00=0x00f7, f01=0x0190, f02=»RMT * P FBF TTASKAT,B12LAB5 + $ P FMEL 'XX',GTDUPF(CBIN11) REST]R + ( P FB B12LAB6 + P PB12LAB5 + d ( P FMEL 'XX',GTDUPF(CBIN10) FORFALDS]R + t PB12LAB6 + 2 P FMEL 'E-9999999999B',GTDUPF(CBIN2) DEBITORNR + , P FMEL 'XX.XXPP',GTDUPF(CBIN7) VALO
0x211438…2115cc Dummy {f00=0x00f7, f01=0x0190, f02=»PY TTDBKRM + P FILLR ' ',1 , P FMEND , & P* , 4 PFLBNR FRMT EKSP LB. NR. , > P FBT GTLOKSPG,FLBNR10 , ^ P FMEL '****9',TTLBNR , | P FB FLBNR20 , PFLBNR10 , P FMEL '****9',GTLBNR , PFLBNR20 , P FMEND , P* , P EJECT ,
0x2115cc…211760 Dummy {f00=0x00f7, f01=0x0190, f02=»BAXF06,VOSUM07,VOX08,VOX09,VOX10, C , ( P VOX11,VOX12,VOX13,VOX14,VOX15, C - , $ P VOX16,VOX17,VOX18,VOX20,VOX20 - X P* - P* - PVOFMT02 FRMT TOTAL IN CYCLE - P FLINK VOFMT02L - P FMEND - P* - PVOFMT02L FRMT - P FILLR '+'
0x211760…2118f4 (0, 671) Dummy {f00=0x00f7, f01=0x0190, f02=» - & P FMEL '*.***.***.**9.99+',TTCYKTOT . P FILLR ' ',2 . 2 P FMEND . F P* . T PBAXF04 FRMT . ^ P FLINK BAFST03 . r P FLINK BAXF05L . P FMEND . P* . PBAXF05 FRMT . P FILLR '+',2 . P FLINK BAXF05L . P FMEND . P* .
0x2118f4…211a88 Dummy {f00=0x00f7, f01=0x0190, f02=»T . P FLINK BAXF06L / P FMEND / P* / . PBAXF06L FRMT / 8 P FLINK BAFST03 / L P FEOR / b P FILLR '0',2 / p P FEOR / P FILLR '0',2 / P FEOR / P FLINK KVIT03 / P FMEND / P* / PVOSUM07 FRMT SUMBILAG / P FLINK V
0x211a88…211c1c Dummy {f00=0x00f7, f01=0x0190, f02=»,GTDATO EKSP.LB.NR / ~ P FMEL '****9',GTSUMST 0 P FCOPY ='-' 0 8 P FLINK FLBNR 0 L P FILLR ' ',1 0 ` P FCOPY ='TOTAL ' 0 v & P FMEL '*.***.***.**9,99+',GTSUMCNT 0 P FILLR ' ',2 0 P FMEND 0 P* 0 PVOX08 FRMT 0 P FLINK VOX08L 0
0x211c1c…211db0 Dummy {f00=0x00f7, f01=0x0190, f02=»9',GTDATO 0 P FMEL 'BBZ999',CKMDNR 1 P FMEL 'BB****9',TTSTLBNR 1 0 P FTEXT ' - ' 1 P P FLINK FLBNR 1 d P FILLR ' ',2 1 x P FCOPY GSWSTR9 1 P FILLR ' ',2 1 P FCOPY GSWSTR20 TEXT 1 P FEOR 1 P FILLR '2',2 1 P FILLR '*',60 1
0x211db0…211f44 Dummy {f00=0x00f7, f01=0x0190, f02=»,9 1 P FTEXT 'NETTO' 2 P FILLR ' ',12 2 P FCOPY ='DEBET' 2 6 P FILLR ' ',12 2 N P FCOPY ='KREDIT' 2 d P FMEND 2 | P* 2 PVOX09 FRMT 2 P FLINK VOX09L 2 P FMEND 2 P* 2 PVOX09L FRMT 2 P FILLR '2',2 2 ( P FMEL 'XXXE-
0x211f44…2120d8 Dummy {f00=0x00f7, f01=0x0190, f02=» FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',C12ACC(GSWBIN5,CBIN2) DEBET 2 > P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',C12ACC(GSWBIN5,CBIN1) KREDIT 3 B P FMEND 3 P* 3 PVOX10 FRMT 3 P FLINK VOX10L 3 P FMEND 3 P* 3 PVOX10L FRMT 3 P FILLR '2',2 3 P FME
0x2120d8…21226c Dummy {f00=0x00f7, f01=0x0190, f02=»L 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(GSWBIN5,CBIN1) 3 P FMEND 4 6 P* 4 D PVOX11 FRMT 4 N P FLINK VOX11L 4 ` P FMEND 4 v P* 4 PVOX11L FRMT 4 P FILLR '4',2 4 P FTEXT 'TOTAL' 4 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) 4 0 P FMEL 'B
0x21226c…212400 Dummy {f00=0x00f7, f01=0x0190, f02=» 'SUPL ' 4 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN5) 5 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(CBIN8,CBIN2) 5 D 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(CBIN8,CBIN1) 5 | P FEOR 5 P FILLR '2',2 5 P FTEXT 'KOR' 5 P FILLR ' ',19 5 4 P FMEL 'B
0x212400…212594 (0, 672) Dummy {f00=0x00f8, f01=0x0190, f02=»MT 5 P FLINK VOX12L 6 P FMEND 6 P* 6 . PVOX12L FRMT 6 8 P FILLR '4',2 6 L $ P FMEL '999E-99999E-99',TTCASHAC 6 ` P FILLR ' ',1 6 P FTEXT ' PRIMO' 6 * P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTSTCASH 6 P FILLR ' ',34 6 P FEOR 6 P F
0x212594…212728 Dummy {f00=0x00f8, f01=0x0190, f02=» 6 d 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN6) 7 P FEOR 7 < P FILLR '2',2 7 J P FTEXT 'ULTIMO' 7 ^ ( P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTCASH 7 v P FILLR ' ',34 7 P FMEND 7 P* 7 PVOX13 FRMT 7 P FLINK VOX13L 7 P FMEND 7 P*
0x212728…2128bc Dummy {f00=0x00f8, f01=0x0190, f02=» ' ',2 7 P FCOPY ='BEHOLDNINGST[LLERE' 8 P FILLR ' ',2 8 2 P FCOPY GSWSTR20 8 F P FILLR ' ',3 8 ^ P FEOR 8 r P FILLR '2',2 8 P FILLR '*',56 8 P FEOR 8 P FILLR '4',2 8 P FCOPY ='T[LLER' 8 P FILLR ' ',4 8 P FCOPY ='KONTONR
0x2128bc…212a50 Dummy {f00=0x00f8, f01=0x0190, f02=»ND 8 P* 9 PVOX14 FRMT 9 P FLINK VOX14L 9 & P FMEND 9 < P* 9 J PVOX14L FRMT 9 T P FILLR '2',2 9 h P FMEL 'ZZ',GTWBCD1 9 | P FILLR ' ',4 9 0 P FMEL 'XXXE-XXXXXE-XX',CBACC(GSWBIN3,CBIN1) 9 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',CBACC(GSWBIN
0x212a50…212be4 Dummy {f00=0x00f8, f01=0x0190, f02=» FCOPY GSWSTR20 9 P FMEND : P* : & PVOX16 FRMT : 0 P FILLR ' ',2 : B P FLINK VOX16L : V P FMEND : l P* : z PVOX16L FRMT : P FILLR X'24',40 NO. : P FILLR X'3C',40 5. : P FNL : P FNL : P FILLR X'5D',40 ] : P FILLR X
0x212be4…212d78 Dummy {f00=0x00f8, f01=0x0190, f02=» : ~ P FILLR X'5C',40 OE ; P FMEND ; " P* ; 0 PVOX17 FRMT ; : P FLINK VOX17L ; L P FMEND ; b P* ; p PVOX17L FRMT ; z P FILLR '+',2 ; , P FMEL '99E-99E-99',GTDATO POSTERINGSDATO ; P FILLR ' ',6 ; P FLINK FLBNR ; P FILLR ' ',8 ;
0x212d78…212f0c Dummy {f00=0x00f8, f01=0x0190, f02=»NR(DIV.TXT) ; l P FILLR ' ',8 < P FMEND < ( P* < 6 PVOX18 FRMT < @ P FLINK VOX18L < R P FMEND < h P* < v PVOX18L FRMT < P FILLR '2',2 < P FILLR ' ',17 < * P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GSWBCD6 < * P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-
0x212f0c…2130a0 Dummy {f00=0x00f8, f01=0x0190, f02=»,2 < P FBF GTDYFLG,V20L10 = P FCOPY ='TOTAL' = & P FILLR ' ',59 = > P FEOR = T P FILLR '2',2 = b PV20L10 = v ( P FMEL 'XXXE-XXXXXE-XX',GTDUPF(CBIN1) = P FILLR ' ',4 = P FMEL 'XX',GTWBCD1 = P FBT GTSWFLAG,V20L20 = 0 P FMEL 'BBZZZ.Z
0x2130a0…213234 (0, 673) Dummy {f00=0x00f8, f01=0x0190, f02=»Z9,99-',GTDUPF(CBIN5) = z 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9,99-',GTDUPF(CBIN6) > PV20L90 > R P FMEND > ` P* > n . P* FORMATS FOR EXTRA 'KVITTERING' > x ( P* (MOSTLY AS NORMAL 'BILAG' > P* > : PFTBKV FTABLE BAFST01,BAFST02,KVIT03,KVIT
0x213234…2133c8 Dummy {f00=0x00f8, f01=0x0190, f02=»* > PKVIT03 FRMT ? P FILLR '+',2 ? P FLINK BSUB04 ? 2 P FLINK BSUB05 ? H P FMEND ? ^ P* ? l P* ? v " P* FORMATS FOR KONTOKORT ? P* ? @ PFTBKT FTABLE KAFST01,KAFST02,KAFST03,KAFST04,KAFST00, C ? 2 P KAFST01,KAFST00,KA
0x2133c8…21355c Dummy {f00=0x00f8, f01=0x0190, f02=»MEND ? P* @ P* @ < PKAFST01 FRMT TRANS 01-06 @ P FLINK BAFST01 @ ` P FLINK SKAF01 LINE NR @ ~ P FMEND @ P* @ P* @ : PKAFST02 FRMT TRANS 02 @ P
0x21355c…2136f0 Dummy {f00=0x00f8, f01=0x0190, f02=» TRANS 12 @ h P FLINK BAFST12 A P FLINK SKAF01 LINE NR A 4 P FMEND A R P* A h P* A r : PKAFST03 FRMT TRANS 03 A | P FLINK KAFST03L A P FMEND A P* A PKAFST03L FRMT A 8 P
0x2136f0…213884 Dummy {f00=0x00f8, f01=0x0190, f02=»DATE, DD.MM A n PKLAB31 B > P FMEL 'BXX',GTDUPF(CBIN11) PALIGNINGS$R B " $ P FCOPY TT16TXT RENTE/GEBYR/INDB B d ( P FLINK BSUB07 CPR/CIR/BELOB/LINIENR B P FMEND B P* B P* B : PKAFST04 FRMT
0x213884…213a18 Dummy {f00=0x00f8, f01=0x0190, f02=» HEADER B f < P FLINK BSUB06 BETART/DATO C P FBF TTKORTFL,KLAB40 C R 2 P FMEL 'XX.XXPP',GTDUPF(CBIN7) VAL DATE, DD.MM C n PKLAB40 C P FBF TTASKAT,KLAB41 C 0 P FMEL 'B**',GTDUPF(CBIN12) REST.MAANED - CIR C . P FMEL
0x213a18…213bac Dummy {f00=0x00f8, f01=0x0190, f02=»R, BSKAT C h PKLAB42 D F P FLINK BSUB07 CPR/CIR-BELOB-LINIENR D P FMEND D h P* D ~ PSKAF01 FRMT D P FBF CKTFLAG,SKAF02 D P FBT GTSLDFLG,SKAF04 D P FILLR ' ',13 D P FB SKAF03 D PSKAF04 D ,
0x213bac…213d40 Dummy {f00=0x00f8, f01=0x0190, f02=» P FB SKAF05 E PSKAF02 E P FMEL '99B',TTKTLIN E $ PSKAF05 E @ P FMEND E N P* E P* E f . P* VARIOUS FORMATS FOR 'KONTOKORT' E p P* E PFTBXKT FTABLE XKTTRP E P* E PXKTTRP FRMT E P FLINK XKTTRPL E P FMEND E
0x213d40…213ed4 (0, 674) Dummy {f00=0x00f8, f01=0x0190, f02=»KTSLD E t P FILLR ' ',2 F P FCOPY ='TRP ' F " P FMEND F 8 P* F F $ P* FORMATS FOR TALLY ROLL F P P* F x PFTBTA FTABLE FMTFMT F P* F P* F P* F . P* VARIOUS FORMATS FOR TALLY ROLL F P* F P* F @ PFTBXTA
0x213ed4…214068 Dummy {f00=0x00f8, f01=0x0190, f02=» P FNL G P FILLR '*',1 G P FILLR ' ',1 G $ P FMEND G 8 P* G F PTAFMT02 FRMT G P P FLINK TAFMT02L G d P FMEND G | P* G PTAFMT02L FRMT G P FILLR '0',2 G P FCOPY GSWSTR9 G & P FMEL '*.***.***.**9.99+B',GSWBCD6 G P FLINK TAF
0x214068…2141fc Dummy {f00=0x00f8, f01=0x0190, f02=»RM G P FMEND H P* H PTAFMT05 FRMT H " P FILLR '+',2 H 6 & P FMEL 'Z.ZZZ.ZZZ.ZZ9.99-',GSWBCD6 H J P FILLR ' ',1 H t P FMEND H P* H PTAFMT07 FRMT H P FNL H P FNL H P FNL H P FNL H P FNL H P FNL H P FNL H P
0x2141fc…214390 Dummy {f00=0x00f8, f01=0x4092, f02=»* VARIOUS FORMATS FOR GENERAL PRINTER H P* I 6 PFTBXGP FTABLE FMTFMT I @ P* I P* I f P* I p P END I z@ I P* H PTAFMT07 FRMT H P FNL H P FNL H P FNL H P FNL H P FNL H P FNL H P FNL H P
0x214390…214524 Dummy {f00=0x00f8, f01=0x2008, f02=» J P* CAN NOT BE IDENTIFIED BY TRANSTYPE (OR GTREGDEX) ' P* ' L PFTBXX FTABLE ' V P* ' n P* ' x P END ' @ ' & z P* & PFTBTA FTABLE & P* & P* & P EJECT & P* & ( P* FORMATS
0x214524…2146b8 Dummy {f00=0x00f8, f01=0x009e, f02=»SG1 PASG /E1,TY10 PRDA /A PEND . P$ASG2 : PASG /E0,TY10 H PEND P$TLK3 h PTLK U,X v PSCR /7D PEND Y,NL PLKE PKPF /L,@N= , P$PCAS M=M:KONV,MU=M:KONV,A=@N=,C=KONFIG PEND P$TLK
0x2146b8…21484c Dummy {f00=0x00f8, f01=0x2008, f02=» PASG /E1,TY10 PRDA /A PEND . P$ASG2 : PASG /E0,TY10 H PEND P$TLK3 h PTLK U,X v PSCR /7D PEND Y,NL PLKE PKPF /L,@N= , P$PCAS M=M:KONV,MU=M:KONV,A=@N=,C=KONFIG PEND P$TLK
0x21484c…2149e0 Dummy {f00=0x00f8, f01=0x0190, f02=» & 0 $ ( " . $ > ( N Z $ j & z & 0 & 0 & 0 & 0 $ ( $ (
0x2149e0…214b74 (0, 675) Opaque[0x194]
0x214b74…214d08 # DirEnt {nam=»KM441 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1f18, f03=0x0000}
0x214b74…214d08 IdxSect {
0x214b74…214d08 f00 = 0x00f8 // 0x214b74 @0x0
0x214b74…214d08 f01 = 0x0004 // 0x214b76 @0x2
0x214b74…214d08 gno = [ // 0x214b78 @0x4
0x214b74…214d08 [0x00]: C0x00f8.0x3.0
0x214b74…214d08 [0x01]: C0x00f9.0x0.0
0x214b74…214d08 ]
0x214b74…214d08 }
0x214d08…214e9c Dummy {f00=0x00f8, f01=0x0190, f02=» PPRT KM441 PPRT C441 & PMES LANGESKOV KOMMUNE, REMITTERING & PMES INCL. BUDGET P PSCR h PLED KMD08 t P!!CH $$26$$22$$ P!!CH $$-4$$4$$ BUDGET $ P!!RE 41,$$56$$100$$ SCREEN SIZE P!!DL 61,62 FD03,FD04 P!!DL 109
0x214e9c…215030 Dummy {f00=0x00f8, f01=0x0190, f02=» ADR, GTP/LP l P!!DL 186 " PMF1CU STRG X'E2C2' CU ADDRESS $ P!!DL 188 J PCNFHC STRGI (16),'GA',' ' Z P!!DL 193,194 | " POFF STRGI (12)2C'TD',' ',' ' $ P!!RE 198,$$FALSE$$TRUE$$ CBKOFLG $ P!!RE 199,$$FALSE$$TRUE$$ CKTFLAG & P!!
0x215030…2151c4 Dummy {f00=0x00f8, f01=0x0190, f02=»SE$$FALSE$$ CFLT46 $ P!!RE 204,$$FALSE$$FALSE$$ CFLT48 $ P!!RE 205,$$TRUE$$FALSE$$ CKTAUTO B P!!RE 206,$$FALSE$$TRUE$$ DC j & P!!RE 207,$$FALSE$$FALSE$$ CCYWRTF & P!!RE 208,$$FALSE$$FALSE$$ CADM22F & P!!RE 209,$$FALSE$$FALSE$$ C5MDISK
0x2151c4…215358 Dummy {f00=0x00f8, f01=0x0190, f02=»$FALSE$$FALSE$$ CCONVERT & P!!RE 237,$$FALSE$$TRUE$$ CREMITFL & P!!RE 246,$$FALSE$$TRUE$$ CTEXTFLG J & P!!RE 247,$$FALSE$$TRUE$$ CSTRKFLG t & P!!RE 248,$$FALSE$$TRUE$$ CBUDTFLG P!!DL 287 $ PCFLAG BINI (12),X'0051',X'0068' , P!!RE 317
0x215358…2154ec Dummy {f00=0x00f8, f01=0x018e, f02=»$FALSE$$FALSE$$ C167FLG 8 P!!RE 432,$$FALSE$$FALSE$$GENERATE LEVNR 5X XXXXXX CC . P!!RE 433,$$FALSE$$FALSE$$ C539FLG-TINGLEV * P!!RE 434,$$TRUE$$FALSE$$ NO VSL CHECK $ P!!RE 440,$$1400$$1400$$DISK SIZE P!!RE 441,$$21$$21$$ CKTMAX " P!!
0x2154ec…215680 Dummy {f00=0x00f8, f01=0x0190, f02=» p P!!RE 451,$$5$$5$$ CKTTOP P!!DL 452,453 ( & PON STRGI (12)2C' ','KA',' ',' ' < P!!DL 783 f P!!DL 844,855 LP v P!!EN PNOD C PTRA /S,NL PINC DIV539 PNOD R PLED SCREEN,/S P!!CH $$KEY461$$KEY539$$
0x215680…215814 (0, 676) Dummy {f00=0x00f9, f01=0x018e, f02=»INC RGSUBS PINC RGSUB1 PINC RGSUB2 $ PINC RGSUB3 6 PNOD R H PINC RGKLAR V PINC KTPLN h PINC KTOPR z PNOD R PINC RGADM PINC REMSUB PNOD R PINC ADM5 PINC SUBAPL PINC REMPRT PNOD R
0x215814…2159a8 Dummy {f00=0x00f9, f01=0x014c, f02=» PINC ADM6 PNOD R PINC REMTR & PINC REMBDT 8 PNOD R J PINC BUDGET X PTLK U,4K j PASM PRTX,NL z PASM VDUPRX,NL PASM STARTX,NL PINC TB3270 P$INCGEN LKE M PKPF /L,RGLOAD PSCR
0x2159a8…215b3c Dummy {f00=0x00f9, f01=0x2008, f02=» INC ADM6 PNOD R PINC REMTR & PINC REMBDT 8 PNOD R J PINC BUDGET X PTLK U,4K j PASM PRTX,NL z PASM VDUPRX,NL PASM STARTX,NL PINC TB3270 P$INCGEN LKE M PKPF /L,RGLOAD PSCR
0x215b3c…215cd0 Dummy {f00=0x00f9, f01=0x0190, f02=» PJTFMT04 FRMT P FLINK JTFMT04L P FMEND 0 P* > PJTFMT04L FRMT H P FLINK JTSUBST START INF ^ P FILLR ' ',15 ~ 2 P FLINK JTSUB06 CPR/CIR 0 P FLINK JTSUB08 VALUE P
0x215cd0…215e64 Dummy {f00=0x00f9, f01=0x0190, f02=» VALOR h P FILLR ' ',3 6 P FLINK JTSUB30 ARK KNT NR < B P FMEL 'BBBZZ',GTDUPF(CBIN10) F$R v F P FMEL 'BBZZ',GTDUPF(CBIN11) RES $R D P
0x215e64…215ff8 Dummy {f00=0x00f9, f01=0x0190, f02=» P FMEND P* PJTFMT08 FRMT $ P FLINK JTFMT08L 8 P FMEND P P* ^ PJTFMT08L FRMT h 4 P FLINK JTSUBST START INF ~ 2 P FLINK JTSUB01 LINE 1 P FEOR 2 P
0x215ff8…21618c Dummy {f00=0x00f9, f01=0x0190, f02=»ND P* PJTFMT12 FRMT P FLINK JTFMT12L ( P FMEND @ P* N PJTFMT12L FRMT X 4 P FLINK JTSUBST START INF n 8 P FLINK JTSUB05 REG KONTO NR D P FMEL 'B999',TTCNTNR
0x21618c…216320 Dummy {f00=0x00f9, f01=0x0190, f02=» 2 P FMEL 'BZZZZZZZZZZ',GTDUPF(CBIN2) DIVERSE TEXT P FILLR ' ',16 : P FMEND P P* ^ $ PJTFMT18 FRMT TRANS 18,19,28,29 h ( P FLINK JTFMT01 2 LINES AS TRANS 1,6 P FEOR P FLINK JTSUB18 3 LINIE P FMEND P* 4 PJTSUBST
0x216320…2164b4 (0, 677) Opaque[0x194]
0x2164b4…216648 # DirEnt {nam=»KM499 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1f28, f03=0x0000}
0x2164b4…216648 IdxSect {
0x2164b4…216648 f00 = 0x00f9 // 0x2164b4 @0x0
0x2164b4…216648 f01 = 0x0004 // 0x2164b6 @0x2
0x2164b4…216648 gno = [ // 0x2164b8 @0x4
0x2164b4…216648 [0x00]: C0x00f9.0x1.0
0x2164b4…216648 [0x01]: C0x00f9.0x2.0
0x2164b4…216648 ]
0x2164b4…216648 }
0x216648…2167dc Dummy {f00=0x00f9, f01=0x0190, f02=» PPRT KM499 PPRT C499 " PMES ]RUP KOMMUNE, REMITTERING & PSCR L PLED KMD08 X P!!CH $$26$$22$$ j P!!CH $$-4$$-4$$ NO BUDGET " P!!RE 41,$$56$$56$$ SCREEN SIZE P!!DL 61,62 FD03,FD04 P!!DL 109,126 LP P!!DL 182
0x2167dc…216970 Dummy {f00=0x00f9, f01=0x0190, f02=»86 " PMF1CU STRG X'E2C2' CU ADDRESS P!!DL 188 0 PCNFHC STRGI (16),'GA',' ' @ P!!DL 193,194 b " POFF STRGI (12)2C'TD',' ',' ' v $ P!!RE 198,$$FALSE$$TRUE$$ CBKOFLG $ P!!RE 199,$$FALSE$$TRUE$$ CKTFLAG & P!!RE 200,$$FALSE$$TRUE$$ CCL
0x216970…216b04 Dummy {f00=0x00f9, f01=0x018e, f02=»!!RE 204,$$FALSE$$FALSE$$ CFLT48 $ P!!RE 205,$$TRUE$$FALSE$$ CKTAUTO ( P!!RE 206,$$FALSE$$TRUE$$ DC P & P!!RE 207,$$FALSE$$FALSE$$ CCYWRTF t & P!!RE 208,$$FALSE$$FALSE$$ CADM22F & P!!RE 209,$$FALSE$$FALSE$$ C5MDISK $ P!!RE 210,$$TRUE$$FALSE
0x216b04…216c98 Dummy {f00=0x00f9, f01=0x0190, f02=» l & P!!RE 237,$$FALSE$$TRUE$$ CREMITFL & P!!RE 246,$$FALSE$$TRUE$$ CTEXTFLG 2 & P!!RE 247,$$FALSE$$TRUE$$ CSTRKFLG & P!!RE 248,$$FALSE$$TRUE$$ CBUDTFLG P!!DL 287 $ PCFLAG BINI (12),X'0051',X'0068' 0 P!!RE 317,$$FALSE$$FALSE$$ BUDGET
0x216c98…216e2c Dummy {f00=0x00f9, f01=0x0190, f02=»FLG r 8 P!!RE 432,$$FALSE$$FALSE$$GENERATE LEVNR 5X XXXXXX CC . P!!RE 433,$$FALSE$$FALSE$$ C539FLG-TINGLEV H * P!!RE 434,$$TRUE$$FALSE$$ NO VSL CHECK z $ P!!RE 440,$$1400$$1400$$DISK SIZE P!!RE 441,$$21$$21$$ CKTMAX " P!!RE 446,$$128$$128$$
0x216e2c…216fc0 Dummy {f00=0x00f9, f01=0x0190, f02=»5$$ CKTTOP P!!DL 452,453 & PON STRGI (12)2C' ','KA',' ',' ' & P!!DL 783 P P!!DL 844,855 LP ` P!!EN x PNOD C PTRA /S,NL PINC DIV499 PNOD R PLED SCREEN,/S P!!CH $$KEY461$$KEY539$$ P!!CH $$SL461$$
0x216fc0…217154 (0, 678) Dummy {f00=0x00f9, f01=0x0190, f02=»RGSUB1 PINC RGSUB2 PINC RGSUB3 PNOD R 2 PINC RGKLAR @ PINC KTPLN R PINC KTOPR d PNOD R v PINC RGADM PINC REMSUB PNOD R PINC ADM5 PINC SUBAPL PINC REMPRT PNOD R PINC KMDIO
0x217154…2172e8 Dummy {f00=0x00f9, f01=0x0124, f02=»NOD R PINC REMTR PINC REMBDT PINC BUDD 2 PTLK U,4K B PASM PRTX,NL R PASM VDUPRX,NL f PASM STARTX,NL | PINC TB3270 P$INCGEN LKE M PKPF /L,RGLOAD PSCR 2 PMES $PDISC M=M:221,MU=M:POOL92,A=RGL
0x2172e8…21747c Dummy {f00=0x00f9, f01=0x2008, f02=» PINC REMTR PINC REMBDT PINC BUDD 2 PTLK U,4K B PASM PRTX,NL R PASM VDUPRX,NL f PASM STARTX,NL | PINC TB3270 P$INCGEN LKE M PKPF /L,RGLOAD PSCR 2 PMES $PDISC M=M:221,MU=M:POOL92,A=RGL
0x21747c…217610 Dummy {f00=0x00f9, f01=0x0190, f02=» P 8 2 0 F 1 d
0x217610…2177a4 Dummy {f00=0x00f9, f01=0x0190, f02=»)6 ( @ P a KA B KA @ * * )N ( 0 a
0x2177a4…217938 Dummy {f00=0x00f9, f01=0x0190, f02=» * )N ) R ~ % TB2
0x217938…217acc Dummy {f00=0x00f9, f01=0x0190, f02=»
[…0x1…]
0x217c60…217df4 (0, 679) Opaque[0x194]
0x217df4…217f88 # DirEnt {nam=»DIV569«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0758, f03=0x0000}
0x217df4…217f88 IdxSect {
0x217df4…217f88 f00 = 0x003a // 0x217df4 @0x0
0x217df4…217f88 f01 = 0x0014 // 0x217df6 @0x2
0x217df4…217f88 gno = [ // 0x217df8 @0x4
0x217df4…217f88 [0x00]: C0x003a.0x3.0
0x217df4…217f88 [0x01]: C0x003b.0x0.0
0x217df4…217f88 [0x02]: C0x0104.0x2.0
0x217df4…217f88 [0x03]: C0x0104.0x3.0
0x217df4…217f88 [0x04]: C0x0105.0x0.0
0x217df4…217f88 [0x05]: C0x0105.0x1.0
0x217df4…217f88 [0x06]: C0x0105.0x2.0
0x217df4…217f88 [0x07]: C0x0105.0x3.0
0x217df4…217f88 [0x08]: C0x0106.0x0.0
0x217df4…217f88 [0x09]: C0x0106.0x1.0
0x217df4…217f88 ]
0x217df4…217f88 }
0x217f88…21811c Dummy {f00=0x003a, f01=0x0190, f02=» P IDENT DIV569 03.01.XXX.1 P DDUM KMD08 & P PDIV D P ENTRY FRMTJT Z P ENTRY FRMXJT p P ENTRY FRMTTA P ENTRY FRMXTA P ENTRY FRMTVO P ENTRY FRMTKV P ENTRY FRMXVO P ENTRY FRMTKT
0x21811c…2182b0 Dummy {f00=0x003a, f01=0x0190, f02=» PROC 0 P CALL FMOVE,GTSTRFMT,FTBJT(GTREGDEX) P RET B P PEND V P* l PFRMXJT PROC XJTDEX v ( P CALL FMOVE,GTSTRFMT,FTBXJT(XJTDEX) P RET P PEND P* PFRMTTA PROC ( P CALL FMOV
0x2182b0…218444 Dummy {f00=0x003a, f01=0x0190, f02=»EX) p P RET P PEND P* & PFRMTVO PROC 0 0 P CALL FMOVE,GTSTRFMT,FTBVO(GTREGDEX) D P RET x P PEND P* PFRMXVO PROC XVODEX ( P CALL FMOVE,GTSTRFMT,FTBXVO(XVODEX) P RET P PEND
0x218444…2185d8 Dummy {f00=0x003a, f01=0x0190, f02=» CALL FMOVE,GTSTRFMT,FTBKT(GTREGDEX) P RET 4 P PEND H P* ^ PFRMXKT PROC XKTDEX h ( P CALL FMOVE,GTSTRFMT,FTBXKT(XKTDEX) P RET P PEND P* PFRMTGP PROC P CALL FMOVE,GTSTRFMT,FMTFMT
0x2185d8…21876c Dummy {f00=0x003a, f01=0x0190, f02=» P* P* P* P EJECT & P* < P* FORMATS FOR JOURNAL F P* j @ PFTBJT FTABLE JTFMT01,JTFMT02,JTFMT03,JTFMT04,JTFMT02, C t 2 P JTFMT01,JTFMT02,JTFMT08,JTFMT08,JTFMT02, C . P JTFMT12,JTFMT18,JTFMT18,
0x21876c…218900 Dummy {f00=0x003a, f01=0x018e, f02=»TSUB01 LINE 1 P FEOR & 2 P FLINK JTSUB04 LINE 2 < P FMEND r P* PJTFMT02 FRMT P FLINK JTFMT02L P FMEND P* PJTFMT02L FRMT 2 P FLINK JTSUBST
0x218900…218a94 (0, 680) Dummy {f00=0x003b, f01=0x0190, f02=» z P FEOR P FILLR ' ',8 F P FMEL 'X',GTDUPF(CBIN6) RE$ : P FILLR ' ',2 P FLINK JTSUB06 FOR TRANS 10 P FLINK JTSUB30 ARKIV KNT.NR P FILLR ' ',15 P F
0x218a94…218c28 Dummy {f00=0x003b, f01=0x0190, f02=» START INF x P FILLR ' ',9 $ P FCOPY TT16TXT RATE/RENTE/GEBYR < 2 P FLINK JTSUB06 CPR/CIR d 0 P FLINK JTSUB08 VALUE P FEOR P FILLR '',6 F P FMEL '
0x218c28…218dbc Dummy {f00=0x003b, f01=0x0190, f02=» VALGR ^ F P FMEL 'BBZ',GTDUPF(CBIN8) BETALINGSFORM BFO 8 P FLINK JTSUB30 ARK KONTO NR d P FILLR ' ',2 8 P FMEL 'XX',GTDUPF(CBIN11) PALIGNINGSAR P FILLR '
0x218dbc…218f50 Dummy {f00=0x003b, f01=0x0190, f02=»FRMT P FLINK JTFMT04L P FMEND $ P* 2 PJTFMT04L FRMT < P FLINK JTSUBST START INF R P FILLR ' ',15 r 2 P FLINK JTSUB06 CPR/CIR 0 P FLINK JTSUB08 VALUE P FEOR
0x218f50…2190e4 Dummy {f00=0x003b, f01=0x0190, f02=» VALOR P FILLR ' ',3 6 P FLINK JTSUB30 ARK KNT NR 0 B P FMEL 'BBBZZ',GTDUPF(CBIN10) F$R j F P FMEL 'BBZZ',GTDUPF(CBIN11) RES $R D P FMEL
0x2190e4…219278 Dummy {f00=0x003b, f01=0x0190, f02=» FMEND P* PJTFMT08 FRMT P FLINK JTFMT08L , P FMEND D P* R PJTFMT08L FRMT 4 P FLINK JTSUBST START INF r 2 P FLINK JTSUB01 LINE 1 P FEOR 2 P FLINK JTS
0x219278…21940c Dummy {f00=0x003b, f01=0x0190, f02=» PJTFMT12 FRMT P FLINK JTFMT12L P FMEND 4 P* B PJTFMT12L FRMT L 4 P FLINK JTSUBST START INF b 8 P FLINK JTSUB05 REG KONTO NR D P FMEL 'B999',TTCNTNR
0x21940c…2195a0 Dummy {f00=0x003b, f01=0x0190, f02=»ZZZZZZZZZZ',GTDUPF(CBIN2) DIVERSE TEXT P FILLR ' ',16 . P FMEND D P* R $ PJTFMT18 FRMT TRANS 18,19,28,29 ( P FLINK JTFMT01 2 LINES AS TRANS 1,6 P FEOR P FLINK JTSUB18 3 LINIE P FMEND P* 4 PJTSUBST FRMT
0x2195a0…219734 (0, 681) Dummy {f00=0x0104, f01=0x0190, f02=»KERING ` 8 P FMEL '99B',GTREGNR TRANS, TYPE P FLINK FLBNR J P FMEND ^ P* t : PJTSUB01 FRMT LINE 1,- 1,5,6 ~ P FLINK JTSUB05 CPR/CIR P FLINK JTSUB06 REG-KONTO-NR 0 P F
0x219734…2198c8 Dummy {f00=0x0104, f01=0x0190, f02=»IN3) BKO | * P FMEL 'BZZ.ZZ.ZZ',GTDUPF(CBIN7) V.DATO B P FMEL 'BBX',GTDUPF(CBIN6) RE$ > D P FMEL 'BBX',GTDUPF(CBIN8) BFO P FLINK JTSUB30 0 P FMEL 'XXXXXXE-XXXX',GTDUPF(CB
0x2198c8…219a5c Dummy {f00=0x0104, f01=0x0190, f02=» REG KNT NR j 6 P FMEL 'B999E-99E-999E-99B',GTDUPF(CBIN1) P FMEND N P* d 2 PJTSUB06 FRMT CPR/CIR n P FBT BCPR,JTLAB06 ( P FMEL 'XE-XXE-XXE-XXB',GTDUPF(CBIN2) P FB JTLAB08 P
0x219a5c…219bf0 Dummy {f00=0x0104, f01=0x0190, f02=».XXB',GTDUPF(CBIN2) PJTLAB08 P FMEND , P* B P* L 8 PJTSUB08 FRMT VALUE AND D/K V 6 P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) P FCOPY TTDBKRM P FMEND P*
0x219bf0…219d84 Dummy {f00=0x0104, f01=0x0190, f02=» " P FMEL 'XXX',GTDUPF(CBIN15) TXT * P FMEL 'BXXXXXXXXXX',GTDUPF(CBIN13) NR- . , P FMEL 'BXXXXXXXXXX',GTDUPF(CBIN14) NR-2 , P FMEL 'BXX.XX.XX',GTDUPF(CBIN18) DATO-1 , P FMEL 'BXX.XX.XX',GTDUPF(CBIN19) DATO-2 P FMEND P* 6 PJTSU
0x219d84…219f18 Dummy {f00=0x0104, f01=0x0190, f02=»JTSUB31 FRMT LINE 3 - 8 P FILLR ' ',2 : F P FMEL 'ZZ.ZZ.ZZ',GTDUPF(CBIN12) FAKT DATO V F P FMEL 'BZZZZZZZZZZ',GTDUPF(CBIN13) FAKT NR D P FMEL 'BZZZZZZZZ',GTD
0x219f18…21a0ac Dummy {f00=0x0104, f01=0x0190, f02=»TDUPF(CBIN16) OMR NR z D P FMEL 'BZZ.ZZ.ZZ',GTDUPF(CBIN18) PER FRA 2 D P FMEL 'BZZ.ZZ.ZZ',GTDUPF(CBIN19) PER TIL z F P FMEL 'BZ',GTDUPF(CBIN17) ADR KODE
0x21a0ac…21a240 Dummy {f00=0x0104, f01=0x0190, f02=»XJTF01,XJTF02,XJTF03,XJTF04,XJTF05,XJTF06, C 2 P XJTF07,FMTFMT,XJTF09,XJTF10,XJTF11,VOX15, C 6 " P XJTF13,XJTF14,VOFMT02,XJTF16 l P* PXJTF01 FRMT KVITTERING P FILLR ' ',2 P FLINK FLBNR P FCOPY =' KVIT' P FMEND
0x21a240…21a3d4 (0, 682) Dummy {f00=0x0104, f01=0x0190, f02=»LBNR P FILLR ' ',2 P FCOPY ='KONTOKORT' P FBF GTSLDFLG,XJTF02EX < & P FMEL 'B*.***.***.**9.99-',TTKTSLD Z PXJTF02EX P FMEND P* PXJTF03 FRMT P FILLR ' ',2 P FCOPY ='START SUM' P FMEND P* P
0x21a3d4…21a568 Dummy {f00=0x0104, f01=0x0190, f02=» P* PXJTF05L FRMT P FILLR ' ',2 & P FILLR '*',50 : P FEOR P P FILLR ' ',2 ^ P FTEXT 'VERSNR ' r P FCOPY ='DAGS-DATO' P FILLR ' ',2 P FCOPY ='POST-DATO' P FILLR ' ',2 P FCOPY ='MASKIN NR'
0x21a568…21a6fc Dummy {f00=0x0104, f01=0x0190, f02=» P FMEL '99E-99E-99',CMASKDAT P FILLR ' ',3 , P FMEL '99E-99E-99',GTDATO @ P FILLR ' ',3 b P FMEL '999',GTMSK v P FILLR ' ',7 P FMEL '***99',TTSTLBNR P FILLR ' ',3 P FEOR P FILLR ' ',2 P FCOPY ='VERSUR'
0x21a6fc…21a890 Dummy {f00=0x0104, f01=0x0190, f02=»MO ' P FCOPY ='KASSE' P FILLR ' ',1 $ P FEOR 8 P FILLR ' ',2 F $ P FMEL '999E-99999E-99BB',TVERSUR Z & P FMEL '999E-99999E-99BB',TTCASHAC $ P FMEL 'ZZZ.ZZZ.ZZ9.ZZ-',TTSTCASH P FEOR P FILLR ' ',2 P FILLR '*',40
0x21a890…21aa24 Dummy {f00=0x0104, f01=0x018e, f02=»ILLR '*',50 P FEOR P FILLR ' ',2 " P FCOPY ='KASSE' 6 P FCOPY ='LUKNING' N P FILLR ' ',30 h P FEOR ~ P FILLR ' ',2 P FCOPY ='T[LLER' P FILLR ' ',10 P FCOPY ='DEBET' P FILLR ' ',12 P FCOPY ='KRE
0x21aa24…21abb8 Dummy {f00=0x0104, f01=0x0190, f02=» P FMEL 'ZZ',GTWBCD1 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(GSWBIN5,CBIN2) " 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(GSWBIN5,CBIN1) P FMEND P* PXJTF09 FRMT P FCOPY =' START TEST' P FMEND P* PXJTF10 FRMT
0x21abb8…21ad4c Dummy {f00=0x0104, f01=0x0190, f02=»ND P* PXJTF13 FRMT P FILLR ' ',2 ( P FLINK XJTF13L < P FMEND R P* ` PXJTF13L FRMT j P FLINK JTSUB05 REG KNT NO ~ * P FMEL 'BZZZ',GTDUPF(CBIN2) COUNTER NO 2 P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) VALUE P FIL
0x21ad4c…21aee0 Dummy {f00=0x0104, f01=0x0190, f02=» FMEL '99B',GTWBCD2 P FCOPY GSWSTR9 P FMEL '99',GTWBCD1 2 P FMEND L P* Z PXJTF16 FRMT d P FILLR ' ',2 x P P P FMEL '****9',CCHKLBNR P FCOPY =' CHECK' P FMEND P* PFMTFMT FRMT P FILLR ' '
0x21aee0…21b074 (0, 683) Dummy {f00=0x0105, f01=0x0190, f02=»MPLING' b P* @ PFTBVO FTABLE BAFST01,BAFST02,BAFST03,BAFST04,BAFST02, C @ P BAFST01,BAFST02,BAFST08,BAFST08,BAFST02, C ^ . P BAFST12,BAFST01,BAFST01,BAFST01,BAFST01 P* P* PBAFST01 FRMT TRANS 01-06
0x21b074…21b208 Dummy {f00=0x0105, f01=0x0190, f02=» TTKORTFL,B1LAB1 P FILLR ' ',6 " P FMEL 'B**B',GTDUPF(CBIN3) BKO , @ P FMEL 'ZZ.ZZ.ZZB',GTDUPF(CBIN7) BET/VALORDATO R P FB B1LAB2 PB1LAB1 " P FMEL 'B**B',GTDUPF(CBIN3) BKO PB1LAB2 < P FLINK JTSUB06
0x21b208…21b39c Dummy {f00=0x0105, f01=0x0190, f02=» B PBAFST02 FRMT TRANS 02-05-07-10 P FLINK BAFST02L N P FMEND f P* t PBAFST02L FRMT ~ 8 P FLINK BSUB01 HEADER P FILLR ' ',1 8 P FMEL '******E-****',GTDUPF(CBIN2) C
0x21b39c…21b530 Dummy {f00=0x0105, f01=0x0190, f02=» REGKONTO-BELOB t P FMEND ! ( P* ! > P* ! H < PBAFST08 FRMT TRANS 08-09 ! R P FLINK BAFST08L ! P FMEND ! P* ! PBAFST08L FRMT ! 8 P FLINK BSUB01 HEA
0x21b530…21b6c4 Dummy {f00=0x0105, f01=0x0190, f02=» FB B8LAB5 ! PB8LAB1 " P FBZ GTUSED(CBIN12),B8LAB2 " 2 P FMEL 'BBZZ.ZZ.ZZBBB',GTDUPF(CBIN12) FAKTDATO " B P FB B8LAB5 " x PB8LAB2 " . P FMEL 'ZZZZ9999.99B',GTDUPF(CBIN14) LEVNR " PB8LAB5 " P FLINK JTSUB10 LEVERAND. " > P FLINK BS
0x21b6c4…21b858 Dummy {f00=0x0105, f01=0x0190, f02=»L " P FMEND # P* # PBAFST12L FRMT # " P FILLR '+',2 # 8 P FCOPY GTTESTMK # T > P FCOPY TTCYM CYKLE-MARKERING # l > P FMEL '999B',GTMSK MASKINNR # P FLINK FLBNR # @ P
0x21b858…21b9ec Dummy {f00=0x0105, f01=0x0190, f02=» FMEL '99',GTREGNR TRANSTYPE-NR # < P FMEL 'B999',TTCNTNR TAELLER-NR $ > 2 P FMEL 'BZZZZZZZZZZ',GTDUPF(CBIN2) DIVERSE TEXT $ ~ P FBT TTKORTFL,B12LAB1 $ P FILLR '*',13 $ PB12LAB1 $ @ P FLINK B
0x21b9ec…21bb80 Dummy {f00=0x0105, f01=0x0190, f02=» BSUB10 $ P FLINK BSUB11 % P FLINK BSUB13 % & P FMEND % < P* % J PBAFST04 FRMT BILAG TRANS 4 % T P FLINK BSUB10 % x P FLINK BSUB12 % P FLINK BSUB13 % P FMEND % P* % P* % 8 PBSUB01 FRMT
0x21bb80…21bd14 (0, 684) Dummy {f00=0x0105, f01=0x0190, f02=» FMEL '999B',GTMSK MASKINNR % P FLINK FLBNR & @ @ P FMEL 'B99.99.99',GTDATO POSTERINGSDATO & T B P FCOPY TTSUPMRK SUPPLEMENTS-MARK & < P FMEL '99',GTREGNR
0x21bd14…21bea8 Dummy {f00=0x0105, f01=0x0190, f02=»GKONTONR & < P FMEL '*.***.***.**9.99-',GTDUPF(CBIN4) BELOB ' B P FCOPY TTDBKRM DEBET/KREDIT-MARK ' P P FILLR ' ',1 ' P FMEND ' P* ' P* ' PBSUB04 FRMT ' P FCOPY GTTESTMK '
0x21bea8…21c03c Dummy {f00=0x0105, f01=0x0190, f02=»TMSK MASKINNR ' x " P FMEL '99B',GTDUPF(CBIN3) BKO ( & P FMEND ( L P* ( b P* ( l PBSUB05 FRMT ( v P FLINK FLBNR ( > P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) BELOB ( B P FCOPY TTDBKRM
0x21c03c…21c1d0 Dummy {f00=0x0105, f01=0x0190, f02=»CBIN3) BKO ( | P FBT TTKORTFL,B6LAB1 ) P FCOPY TT07TXT ) . P FILLR ' ',1 ) D . P FMEL 'ZZ.ZZ.ZZB',GTDUPF(CBIN7) VAL. DATO ) X PB6LAB1 ) P FMEND ) P* ) P* ) PBSUB07 FRMT ) P FILLR ' ',1 ) < P FLINK JTSUB06
0x21c1d0…21c364 Dummy {f00=0x0105, f01=0x0190, f02=» DEBET/KREDIT-MARK ) l P FILLR ' ',1 * $ P FLINK SKAF01 LINE NR * 8 P FMEND * V P* * l PBSUB10 FRMT * v P FILLR '+',2 * P FCOPY GTTESTMK TEST MARK * P FMEL '999B',GTMSK MASKINNR * P FLINK FLBNR * & P FMEL 'B99.99.99
0x21c364…21c4f8 Dummy {f00=0x0105, f01=0x0190, f02=»L]R * t 2 P FMEL 'E-9999999999B',GTDUPF(CBIN2) DEBITOR NR + , P FMEL 'XX.XXPP',GTDUPF(CBIN7) VALOERDATO + B & P FMEL 'BXB',GTDUPF(CBIN12) RTE/GEB + r P FMEND + P* + PBSUB12 FRMT + P FBF TTASKAT,B12LAB5 + $ P FMEL 'XX',GTDUPF(CBIN11) REST]R +
0x21c4f8…21c68c Dummy {f00=0x0105, f01=0x0190, f02=»DEBITORNR + l , P FMEL 'XX.XXPP',GTDUPF(CBIN7) VALOERDATO , P FILLR ' ',3 , B P FMEND , V P* , d PBSUB13 FRMT , n 2 P FMEL '*.***.***.**9.99-',GTDUPF(CBIN4) VALUE , P FCOPY TTDBKRM , P FILLR ' ',1 , P FMEND , P* , PFLBNR FRMT EK
0x21c68c…21c820 Dummy {f00=0x0105, f01=0x0190, f02=» PFLBNR20 - P FMEND - P* - " P EJECT - , P* - : * P* VARIOUS FORMATS FOR VOUCHER - D P* - r : PFTBXVO FTABLE FMTFMT,VOFMT02,VOFMT02,BAXF04,BAXF05, C - | * P BAXF06,VOSUM07,VOX08,VOX09,VOX10, C - ( P VOX11,VOX12,VOX13,VOX14,VOX15,
0x21c820…21c9b4 (0, 685) Dummy {f00=0x0105, f01=0x0190, f02=»ND - P* . PVOFMT02L FRMT . P FILLR '+',2 . * P FBF TTCY1FLG,VOLAB02 . > P FCOPY ='ARKIV' . P FLINK JTSUB30 . t PVOLAB02 . P FILLR ' ',4 . P FCOPY GSWSTR9 . & P FMEL '*.***.***.**9.99+',TTCYKTOT . P FILLR ' ',2 . P FMEND
0x21c9b4…21cb48 Dummy {f00=0x0105, f01=0x0190, f02=»,2 . P FLINK BAXF05L / P FMEND / P* / . PBAXF05L FRMT / 8 P FLINK BSUB04 / L P FEOR / b P FILLR '0',2 / p P FLINK BSUB05 / P FMEND / P* / PBAXF06 FRMT / P FLINK BAXF06L / P FMEND / P* / PBAXF06L FRMT / P
0x21cb48…21ccdc Dummy {f00=0x0105, f01=0x0190, f02=» P* 0 PVOSUM07 FRMT SUMBILAG 0 P FLINK VOSUM07L 0 , P FMEND 0 D P* 0 R PVOSUM07L FRMT 0 P FILLR '+',2 0 r P FMEL '999B',GTMSK MASKINNR 0 ( P FMEL 'B99.99.99B',GTDATO EKSP.LB.NR 0 P FMEL '****9',GTSUMST 0 P FCOPY ='-' 0 P
0x21ccdc…21ce70 Dummy {f00=0x0105, f01=0x0190, f02=» 0 P* 1 PVOX08 FRMT 1 P FLINK VOX08L 1 $ P FMEND 1 : P* 1 H PVOX08L FRMT 1 R P FILLR '+',2 1 f P FCOPY GTTESTMK 1 z P FMEL '999',GTMSK 1 P FMEL 'BB99.99.99',GTDATO 1 P FMEL 'BBZ999',CKMDNR 1 P FMEL 'BB****9',TTSTLBNR 1
0x21ce70…21d004 Dummy {f00=0x0105, f01=0x0190, f02=»EOR 1 P FILLR '2',2 2 P FILLR '*',60 2 P FILLR '*',8 2 6 P FEOR 2 J P FILLR '4',2 2 X P FCOPY ='KONTONR' 2 l P FILLR ' ',6 2 P FCOPY ='T[LLER' 2 P FILLR ' ',9 2 P FTEXT 'NETTO' 2 P FILLR ' ',12 2 P FCOPY ='DEBET' 2
0x21d004…21d198 Dummy {f00=0x0105, f01=0x0190, f02=»VOX09L FRMT 2 P FILLR '2',2 3 ( P FMEL 'XXXE-XXXXXE-XX',GTDUPF(CBIN1) 3 ( P FILLR ' ',4 3 T P FMEL '99',GTWBCD1 3 h 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) NETTO 3 > P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',C12ACC(GSWBIN5,CBIN2) DEBET 3 > P FMEL 'BBZ
0x21d198…21d32c Dummy {f00=0x0105, f01=0x0190, f02=» 3 PVOX10L FRMT 4 P FILLR '2',2 4 P FMEL 'ZZ',GTWBCD1 4 0 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) 4 J 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(GSWBIN5,CBIN2) 4 ~ 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(GSWBIN5,CBIN1) 4 P FMEND 4 P* 4
0x21d32c…21d4c0 Dummy {f00=0x0105, f01=0x018e, f02=»BZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) 4 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTREGF(CBIN2) 5 , 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTREGF(CBIN1) 5 ` P FEOR 5 P FILLR '4',2 5 P FTEXT 'SUPL ' 5 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN5) 5 4 P FMEL 'B
0x21d4c0…21d654 (0, 686) Dummy {f00=0x0105, f01=0x0190, f02=» P FTEXT 'KOR' 6 P FILLR ' ',19 6 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(CBIN7,CBIN2) 6 . 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(CBIN7,CBIN1) 6 f P FMEND 6 P* 6 PVOX12 FRMT 6 P FLINK VOX12L 6 P FMEND 6 P* 6 PVOX12L FRMT 6
0x21d654…21d7e8 Dummy {f00=0x0105, f01=0x0190, f02=»TTSTCASH 6 r P FILLR ' ',34 7 P FEOR 7 & P FILLR '2',2 7 4 P FTEXT 'BEV ' 7 H 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) 7 ^ 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN5) 7 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN6) 7 P FEOR 7 P
0x21d7e8…21d97c Dummy {f00=0x0105, f01=0x0190, f02=»X13 FRMT 7 P FLINK VOX13L 8 P FMEND 8 & P* 8 4 PVOX13L FRMT 8 > P FILLR ' ',2 8 R P FCOPY GTTESTMK 8 f P FMEL '999B',GTMSK 8 ~ P FMEL 'B99.99.99',GTDATO 8 P FILLR ' ',2 8 P FCOPY ='BEHOLDNINGST[LLERE' 8 P FILLR ' ',2 8 P FCO
0x21d97c…21db10 Dummy {f00=0x0105, f01=0x0190, f02=» ='T[LLER' 8 P FILLR ' ',4 9 P FCOPY ='KONTONR' 9 & P FILLR ' ',10 9 @ P FCOPY ='BEV.PERIODE' 9 V P FILLR ' ',12 9 t P FCOPY ='SALDO' 9 P FILLR ' ',1 9 P FMEND 9 P* 9 PVOX14 FRMT 9 P FLINK VOX14L 9 P FMEND 9 P
0x21db10…21dca4 Dummy {f00=0x0105, f01=0x0190, f02=»N1) 9 h 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',CBACC(GSWBIN3,CBIN2) : 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',CBACC(GSWBIN3,CBIN3) : F P FMEND : P* : PVOX15 FRMT : P FILLR '2',2 : P FCOPY GSWSTR20 : P FMEND : P* : PVOX16 FRMT : P FILLR '
0x21dca4…21de38 Dummy {f00=0x0105, f01=0x0190, f02=» : P FNL ; P FILLR X'5D',40 ] ; P FILLR X'4E',40 N ; . P FNL ; H P FNL ; T P FILLR X'45',40 E ; ` P FILLR X'53',40 S ; z P FNL ; P FNL ; P FILLR X'5B',40 [ ; P FILLR X'5C',40 OE ; P FMEND ; P* ; PVOX17 FRMT ;
0x21de38…21dfcc Dummy {f00=0x0105, f01=0x0190, f02=» FILLR ' ',6 ; P FLINK FLBNR < P FILLR ' ',8 < ( 2 P FMEL 'B*.***.***.**9E,99',GTDUPF(CBIN4) BELOB < < P FILLR '*',2 < r P FILLR ' ',3 < 4 P FMEL 'ZZ999999',GTDUPF(CBIN2) CHECKNR(DIV.TXT) < P FILLR ' ',8 < P FMEND < P* < PVOX18 FRMT
0x21dfcc…21e160 Dummy {f00=0x0105, f01=0x0190, f02=».ZZ9.99-',GSWBCD6 < | * P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GSWBCD7 = P FMEND = H P* = V PVOX20 FRMT = ` P FLINK VOX20L = r P FMEND = P* = PVOX20L FRMT = P FILLR '2',2 = P FBF GTDYFLG,V20L10 = P FCOPY ='TOTAL' = P FILLR ' ',5
0x21e160…21e2f4 (0, 687) Dummy {f00=0x0106, f01=0x0190, f02=»BCD1 = P FBT GTSWFLAG,V20L20 > 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9,99-',GTDUPF(CBIN4) > ( P FILLR ' ',35 > P FB V20L90 > r PV20L20 > P FILLR ' ',17 > 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9,99-',GTDUPF(CBIN5) > 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9,99-',GTDUPF(CBIN6)
0x21e2f4…21e488 Dummy {f00=0x0106, f01=0x018e, f02=»AL 'BILAG' > v P* ? : PFTBKV FTABLE BAFST01,BAFST02,KVIT03,KVIT03,BAFST02, C ? 2 P BAFST01,BAFST02,BAFST08,BAFST08,BAFST02, C ? Z . P BAFST12,BAFST01,BAFST01,BAFST01,BAFST01 ? P* ? P* ? PKVIT03 FRMT ? P FILLR '+',2 ? P FLINK BSU
0x21e488…21e61c Dummy {f00=0x0106, f01=0x018e, f02=» @ PFTBKT FTABLE KAFST01,KAFST02,KAFST03,KAFST04,KAFST00, C @ 2 P KAFST01,KAFST00,KAFST01,KAFST01,KAFST02, C @ H . P KAFST12,KAFST01,KAFST01,KAFST01,KAFST01 @ ~ P* @ P* @ PKAFST00 FRMT @ P FMEND @ P* @ P* @ < PKAFS
0x21e61c…21e7b0 Dummy {f00=0x0106, f01=0x0190, f02=» @ P* A P* A : PKAFST02 FRMT TRANS 02 A P FLINK BAFST02 A Z P FLINK SKAF01 LINE NR A x P FMEND A P* A P A : PKAFST12 FRMT TRANS 12 A P FLI
0x21e7b0…21e944 Dummy {f00=0x0106, f01=0x0190, f02=»RANS 03 A b P FLINK KAFST03L B P FMEND B ( P* B 6 PKAFST03L FRMT B @ 8 P FLINK BSUB01 HEADER B V P FLINK BSUB06 B P FBF TTKORTFL,KLAB31 B 2 P FMEL 'XX.XXPP',GTDUPF(CBIN7) VAL.DATE, DD.MM B PKLAB31 B > P
0x21e944…21ead8 Dummy {f00=0x0106, f01=0x0190, f02=»NIENR B r P FMEND C P* C $ P* C . : PKAFST04 FRMT TRANS 04 C 8 P FLINK KAFST04L C v P FMEND C P* C PKAFST04L FRMT C 8 P FLINK BSUB01 HEADER C < P FLINK B
0x21ead8…21ec6c Dummy {f00=0x0106, f01=0x0190, f02=» C P FBF TTASKAT,KLAB41 D 0 P FMEL 'B**',GTDUPF(CBIN12) REST.MAANED - CIR D $ . P FMEL 'B**',GTDUPF(CBIN11) REST.AAR - CIR D X P FB KLAB42 D PKLAB41 D P FILLR ' ',3 D 4 P FMEL 'B**',GTDUPF(CBIN10) FORF.AAR - CPR, BSKAT D PKLAB42 D F P
0x21ec6c…21ee00 Dummy {f00=0x0106, f01=0x018e, f02=»KAF02 D P FBT GTSLDFLG,SKAF04 E P FILLR ' ',13 E * P FB SKAF03 E @ PSKAF04 E R , P FMEL '*.***.***.**9.99-',TTKTSLD SALDO E ` PSKAF03 E " P FMEL 'B99.',TTKTLIN NEW LINE E " P FMEL '9',TTKTCHK CHECK DIGIT E P FB SKAF05 E PSKAF02 E
0x21ee00…21ef94 (0, 688) Dummy {f00=0x0106, f01=0x0190, f02=» E d P* F PFTBXKT FTABLE XKTTRP F P* F . PXKTTRP FRMT F 8 P FLINK XKTTRPL F L P FMEND F b P* F p PXKTTRPL FRMT F z P FILLR '+',2 F P FMEL 'BB99.99.99',GTDATO F P FILLR ' ',43 F & P FMEL '*.***.***.**9.99-',TTKTSLD F P FIL
0x21ef94…21f128 Dummy {f00=0x0106, f01=0x018e, f02=»* F @ PFTBXTA FTABLE TAFMT01,TAFMT02,TAFMT02,TAFMT04,TAFMT05, C G P VOX15,TAFMT07 G N P* G f PTAFMT01 FRMT G p P FSL G P FNL G P FNL G P FILLR '*',1 G P FILLR ' ',1 G P FMEND G P* G PTAFMT02 FRMT G P FLINK TAFMT
0x21f128…21f2bc Dummy {f00=0x0106, f01=0x018e, f02=» G l P FLINK TAFMT07 H P FMEND H P* H , PTAFMT04 FRMT H 6 P FILLR '+',2 H J , P FMEL 'Z.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) H ^ P FCOPY TTDBKRM H P FMEND H P* H PTAFMT05 FRMT H P FILLR '+',2 H & P FMEL 'Z.ZZZ.ZZZ.ZZ9.99-',GSWBCD6 H
0x21f2bc…21f450 Dummy {f00=0x0106, f01=0x4044, f02=» H P FNL I P FMEND I P* I " P END I ,@ I @ 6 P FILLR '+',2 H J , P FMEL 'Z.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) H ^ P FCOPY TTDBKRM H P FMEND H P* H PTAFMT05 FRMT H P FILLR '+',2 H & P FMEL 'Z.ZZZ.ZZZ.ZZ9.99-',GSWBCD6 H
0x21f450…21f5e4 Dummy {f00=0x0106, f01=0x2008, f02=» J P* CAN NOT BE IDENTIFIED BY TRANSTYPE (OR GTREGDEX) ' P* ' L PFTBXX FTABLE ' V P* ' n P* ' x P END ' @ ' & z P* & PFTBTA FTABLE & P* & P* & P EJECT & P* & ( P* FORMATS
0x21f5e4…21f778 Dummy {f00=0x0106, f01=0x0190, f02=»WA % r3# y/_ " B)? W%% !! # ? ! % ? % # ? 4 0 ( 4 & * T z b g 4 : J ^ d f
0x21f778…21f90c Dummy {f00=0x0106, f01=0x0190, f02=» - 6 f 0 SX h 3 8 @ e # ( 0 B T % u e 1 4P 4i 4p 5 5 5 56 59 5@ 5G 5` 5p 5 6 6 6 P ` P 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 !0 #0 %0 '0 )0
0x21f90c…21faa0 Dummy {f00=0x0106, f01=0x0190, f02=» u0 x0 {0 ~0 0 f N e N e! # ? ! % ? % # ? 4 0 ( 4 & * T z b g 4 : J ^ d f
0x21faa0…21fc34 (0, 689) Opaque[0x194]
0x21fc34…21fdc8 # DirEnt {nam=»KEY261«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1f90, f03=0x0000}
0x21fc34…21fdc8 IdxSect {
0x21fc34…21fdc8 f00 = 0x00fc // 0x21fc34 @0x0
0x21fc34…21fdc8 f01 = 0x0004 // 0x21fc36 @0x2
0x21fc34…21fdc8 gno = [ // 0x21fc38 @0x4
0x21fc34…21fdc8 [0x00]: C0x00fc.0x2.0
0x21fc34…21fdc8 [0x01]: C0x00fc.0x3.0
0x21fc34…21fdc8 ]
0x21fc34…21fdc8 }
0x21fdc8…21ff5c Dummy {f00=0x00fc, f01=0x0190, f02=» PNOKEY EQU X'FF' PBSPKY1 EQU X'87' PCANKY1 EQU X'91' 4 PMACKY1 EQU X'95' L PEORKY1 EQU X'90' d PFTABKY1 EQU X'8B' | PBTABKY1 EQU X'83' PDUPKY1 EQU X'A2' PSLUTKY1 EQU X'A3' PREGKY1 EQU X'A1' PCOPKY1 EQU X'F
0x21ff5c…2200f0 Dummy {f00=0x00fc, f01=0x0190, f02=»Y1 EQU X'FF' PCY2KY1 EQU X'FF' PCYCKY1 EQU X'89' , PINVKY1 EQU X'82' D PKONKY1 EQU X'85' PKVITKY1 EQU X'86' t PSUPLKY1 EQU X'FF' PSUMKY1 EQU X'81' PADMKY1 EQU X'A0' PDIVKY1 EQU X'84' PHBOGKY1 EQU X'80'
0x2200f0…220284 Dummy {f00=0x00fc, f01=0x0190, f02=»BKY1 EQU X'87' PINSKY1 EQU X'81' PDELKY1 EQU X'82' . PCL1KY1 EQU X'89' F PCL2KY1 EQU X'8A' ^ PCL3KY1 EQU X'8B' v POUTKY1 EQU X'A0' P* PBSPKY2 EQU X'C7' PCANKY2 EQU X'D1' PEORKY2 EQU X'D0' PMACKY2 EQU X'D5'
0x220284…220418 Dummy {f00=0x00fc, f01=0x018e, f02=»EKY2 EQU X'D2' PREGKY2 EQU X'E1' PADMKY2 EQU X'E0' . PSPGKY2 EQU X'FF' F PKONKY2 EQU X'FF' ^ PKVITKY2 EQU X'C6' v PONKY2 EQU X'D9' PCOPKY2 EQU X'C5' P* * P* THIS PART IS USED FOR R]KONVERTERING P* PBSPKY4
0x220418…2205ac Dummy {f00=0x00fc, f01=0x40be, f02=» | PSLUTKY4 EQU X'E3' PONKY4 EQU X'D9' " PCOPKY4 EQU X'C6' : PCRUPKY4 EQU X'C1' R PCRDWNKY4 EQU X'CA' l PCRNLKY4 EQU X'C5' PCRHOMKY4 EQU X'D7' @ P* * P* THIS PART IS USED FOR R]KONVERTERING P* PBSPKY4
0x2205ac…220740 Dummy {f00=0x00fc, f01=0x2008, f02=» * ERRFMT FRMT FSL , " FMEL 'ZZ9B',GTWBCD1 FILE NR. 8 FCOPY ERRTXT ^ " FMEL 'BZZ9',GTWBCD2 ERRORNR. t FCOPY =X'07' FMEND @ 8SPKTAB2 KTAB BSPKY1,CANKY1,NOKEY,MACKY1,NOKEY,EORKY1, C D ? FT
0x220740…2208d4 (0, 690) Dummy {f00=0x00fc, f01=0x0190, f02=» P SET TBOOL5 P B RKT150 PRKT104 . P SET TBOOL6 < P B RKT150 P PRKT105 b P SET TBOOL7 p P B RKT150 PRKT106 P SET TBOOL8 P B RKT150 PRKT107 P SET TBOOL9 P B RKT150 PRKT108
0x2208d4…220a68 Dummy {f00=0x00fc, f01=0x0190, f02=» P* SELECT GIFTE BIPERSONER P TBF TBOOL1,RKT1316 & P* NOW WE HAVE HOVEDPERSONER B P TBT TBOOL2,RKT0912 GIFT? f & P* NOW WE HAVE ENLIGE HOVEDPERSONER PRKT0108 P TEST TBOOL3 P BNE RKT01 P TEST TBOOL4 P BNE RKT02
0x220a68…220bfc Dummy {f00=0x00fc, f01=0x018e, f02=» P BNE RKT06 P TEST TBOOL9 P BNE RKT07 * P TEST TBOOL10 < P BNE RKT08 R $ P B RKT22 INVALID BOOLEAN SETTING d P PRKT0912 P TEST TBOOL3 P BNE RKT09 P TEST TBOOL7 P BNE RKT10 P TEST TBOOL8 P BNE
0x220bfc…220d90 Dummy {f00=0x00fc, f01=0x018e, f02=» P BNE RKT13 P TEST TBOOL8 P BNE RKT14 * P TEST TBOOL10 < P BNE RKT15 R P TEST TBOOL7 d P BNE RKT16 x $ P B RKT22 INVALID BOOLEAN SETTING P EJECT PRKT01 $ P* HOVEDPERSON, ENLIG, FULD SKPL P PERF E3454
0x220d90…220f24 Dummy {f00=0x00fc, f01=0x0190, f02=» P PERF E3577 P PERF E3593 P PERF E3598 0 P PERF E3604 D P PERF E3605 X P PERF E3614 l P PERF E3683 P B RKT21 P P PRKT02 * P* HOVEDPERSON, ENLIG, BEGR. SKPL U/PF P PERF E3454 P PER
0x220f24…2210b8 Dummy {f00=0x00fc, f01=0x0190, f02=» PERF E3572 P PERF E3573 P PERF E3574 ( P PERF E3576 < P PERF E3577 P P PERF E3593 d P PERF E3598 x P PERF E3604 P PERF E3605 P PERF E3614 P PERF E3683 P B RKT21 P P PRKT03 "
0x2210b8…22124c Dummy {f00=0x00fc, f01=0x0190, f02=»SON, ENLIG, BEGR.SKPL M/PF P PERF E3454 " P PERF E3475 6 P PERF E3478 J P PERF E3481 ^ P PERF E3500 r P PERF E3510 P PERF E3517 P PERF E3564 P PERF E3569 P PERF E3572 P PERF E3573 P PERF E357
0x22124c…2213e0 Dummy {f00=0x00fc, f01=0x0190, f02=»E3605 P PERF E3614 P PERF E3683 " P B RKT21 6 P F P N P V PRKT05 ^ $ P* HOVEDPERSON, ENLIG, DIPLOMAT l P PERF E3454 P PERF E3475 P PERF E3481 P PERF E3500 P PERF E3510 P PERF E3517
0x2213e0…221574 (0, 691) Opaque[0x194]
0x221574…221708 # DirEnt {nam=»SL261 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1fa0, f03=0x0000}
0x221574…221708 IdxSect {
0x221574…221708 f00 = 0x00fd // 0x221574 @0x0
0x221574…221708 f01 = 0x0006 // 0x221576 @0x2
0x221574…221708 gno = [ // 0x221578 @0x4
0x221574…221708 [0x00]: C0x00fd.0x0.0
0x221574…221708 [0x01]: C0x00fd.0x1.0
0x221574…221708 [0x02]: C0x00fd.0x2.0
0x221574…221708 ]
0x221574…221708 }
0x221708…22189c Dummy {f00=0x00fd, f01=0x0190, f02=» < PSPKTAB1 KTAB BSPKY1,CANKY1,NOKEY,EORKY1,NOKEY,MACKY1, C > P FTABKY1,BTABKY1,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C D & P COPKY1,DUPKY1,EDTKY1,SLUTKY1, C . P KREKY1,REGKY2,LISTKY1,SBTKY1,SPGKY1, C < P CY1KY1,CY2KY1,INVKY1,KONKY1,KVITKY1,
0x22189c…221a30 Dummy {f00=0x00fd, f01=0x0190, f02=»CANKY1,NOKEY,EORKY1,NOKEY,MACKY1, C | > P FTABKY1,BTABKY1,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C , & P COPKY1,DUPKY1,EDTKY1,SLUTKY1, C n . P KREKY1,REGKY2,LISTKY1,SBTKY1,SPGKY1, C < P CY1KY1,CY2KY1,INVKY1,KONKY1,KVITKY1,SUPLKY1,SUMKY1, C <
0x221a30…221bc4 Dummy {f00=0x00fd, f01=0x0190, f02=» d " P CL1KY1,CL2KY1,CL3KY1,OUTKY1 P* . > PSPKTAB12 KTAB BSPKY2,CANKY2,NOKEY,EORKY2,NOKEY,MACKY2, C 8 2 P FTABKY2,BTABKY2,NOKEY,NOKEY,NOKEY,NOKEY, C z 2 P NOKEY,NOKEY,COPKY2,DUPKY2,EDTKY2,SLUTKY2, C 6 P KREKY2,REGKY2,ADMKY2,SPGKY2,KONK
0x221bc4…221d58 Dummy {f00=0x00fd, f01=0x0190, f02=»NOKEY, C l 2 P NOKEY,NOKEY,NOKEY,DUPKY2,EDTKY2,SLUTKY2, C 6 P KREKY2,REGKY2,ADMKY2,SPGKY2,KONKY2,KVITKY2,ONKY2 H P* * P* INQUIRY KEYTABLES (SPKEY=3) P* < PSPKTAB13 KTAB BSPKY1,NOKEY,CANKY1,NOKEY,NOKEY,MACKY1, C . P NO
0x221d58…221eec Dummy {f00=0x00fd, f01=0x018e, f02=» C j " P NOKEY,INVKY1,KONKY1,KVITKY1 P* 2 < PSPKTAB23 KTAB BSPKY1,NOKEY,CANKY1,NOKEY,NOKEY,MACKY1, C < . P NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C | . P NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C . P NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,
0x221eec…222080 Dummy {f00=0x00fd, f01=0x0190, f02=» P* 6 PSPKTAB14 KTAB BSPKY4,CANKY4,NOKEY,EORKY4,NOKEY, C 2 P MACKY4,FTABKY4,BTABKY4,CRHOMKY4,CRNLKY4, C L 4 P NOKEY,NOKEY,CRDWNKY4,CRUPKY4,COPKY4,NOKEY, C 0 P NOKEY,SLUTKY4,NOKEY,NOKEY,NOKEY,NOKEY, C . P NOKEY,NOKEY,NOKEY,NOKEY,
0x222080…222214 (0, 692) Dummy {f00=0x00fd, f01=0x0190, f02=» KTAB BSPKY4,CANKY4,NOKEY,EORKY4,NOKEY, C 2 P MACKY4,FTABKY4,BTABKY4,CRHOMKY4,CRNLKY4, C 2 4 P NOKEY,NOKEY,CRDWNKY4,CRUPKY4,COPKY4,NOKEY, C h 0 P NOKEY,SLUTKY4,NOKEY,NOKEY,NOKEY,NOKEY, C . P NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C . P
0x222214…2223a8 Dummy {f00=0x00fd, f01=0x018e, f02=»RRFMT,ERRFMT,ERRFMT,ERRFMT, C x , P ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C & , P ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C V , P ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C , P ERRDSK,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C 2 P ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRF
0x2223a8…22253c Dummy {f00=0x00fd, f01=0x0190, f02=» l & P MSFMT11,MSFMT12,MSFMT13,MSFMT14 P* 2 P* < PERRFMT FRMT F P FSL Z P FCOPY ='FEJL ' f " P FMEL 'ZZZ9',GSWBCD4 ERRORNR. ~ P FMEND P* PERRDSK FRMT P FSL P FMEL '99B',GTWBCD2 P FCOPY GSWSTR9
0x22253c…2226d0 Dummy {f00=0x00fd, f01=0x0190, f02=» PMSFMT2 FRMT P FSL P FCOPY ='LINIE NR' ( P FILLR '.',1 D P FMEND Z P* h PMSFMT3 FRMT r P FSL P FTEXT ='NY SIDE. ' P FMEND P* PMSFMT4 FRMT P FSL P FBF TTSUMFLG,FMT4END P FTA
0x2226d0…222864 Dummy {f00=0x00fd, f01=0x018e, f02=»T P FSL P FCOPY ='BILAG' P FMEND . P* < PMSFMT6 FRMT F P FSL Z P FCOPY ='KONTOKORT' f P FMEND P* PMSFMT7 FRMT P FSL P FCOPY TTINF1 P FMEND P* PMSFMT8 FRMT P FSL P
0x222864…2229f8 Dummy {f00=0x00fd, f01=0x0190, f02=» P FMEND P* PMSFMT10 FRMT P FSL 0 " P FMEL 'TTTTTTTTTTTT9-',GTWBCD2 < P FMEND b P* p PMSFMT11 FRMT z P FSL P FCOPY ='OPRET LEV. ' P FMEND P* PMSFMT12 FRMT P FSL P FMEND P* P
0x2229f8…222b8c Dummy {f00=0x00fd, f01=0x402a, f02=»ISK ' ~ P FMEND P* @ & P FSL 0 " P FMEL 'TTTTTTTTTTTT9-',GTWBCD2 < P FMEND b P* p PMSFMT11 FRMT z P FSL P FCOPY ='OPRET LEV. ' P FMEND P* PMSFMT12 FRMT P FSL P FMEND P* P
0x222b8c…222d20 Dummy {f00=0x00fd, f01=0x2008, f02=» * ERRFMT FRMT FSL , " FMEL 'ZZ9B',GTWBCD1 FILE NR. 8 FCOPY ERRTXT ^ " FMEL 'BZZ9',GTWBCD2 ERRORNR. t FCOPY =X'07' FMEND @ 8SPKTAB2 KTAB BSPKY1,CANKY1,NOKEY,MACKY1,NOKEY,EORKY1, C D ? FT
0x222d20…222eb4 (0, 693) Dummy {f00=0x00fd, f01=0x0190, f02=» PE3454 PROC P TBT TERROR,E3454EX P PERF FINDFLD,=D'252' 6 P BNOK E3454EX T P PERF FINDFLD,=D'245' j P BOK E3454EX P PERF FINDFLD,=D'207' P BOK E3454EX P SET TERROR P MOVE GSWBCD4,=D'3454' PE3454EX
0x222eb4…223048 Dummy {f00=0x00fd, f01=0x0190, f02=»NOK E3457EX , P CBNE GSWBCD6,=D'7',E3457EX ENKEKODE 7? P MOVE GSWBIN7,CBIN12 D P MOVE GSWBIN8,CBIN4 ` PE345710 | ( P MOVE GSWBCD6,FIELD(GSWBIN7,GSWBIN8) P CBE GSWBCD6,=D'120',E3457ER P CBE GSWBCD6,=D'187',E345720 P CBE GSW
0x223048…2231dc Dummy {f00=0x00fd, f01=0x018e, f02=» CBE GSWBCD6,=D'473',E3457ER P CBE GSWBCD6,=D'651',E3457ER $ P CBE GSWBCD6,=D'675',E3457ER H P CBE GSWBCD6,=D'687',E3457ER l P CBE GSWBCD6,=D'702',E3457ER P CBE GSWBCD6,=D'707',E3457ER P CBE GSWBCD6,=D'997',E3457ER P SUB GSWBIN8
0x2231dc…223370 Dummy {f00=0x00fd, f01=0x0190, f02=» P MOVE GSWBIN1,GSWBCD6 ! 4 P IB GSWBIN1,E3457EX,E3457ER,E3457ER,E3457ER, C ! & P E3457ER,E3457EX,E3457ER ! ^ P B E3457EX ! PE3457ER ! P SET TERROR ! P MOVE GSWBCD4,=D'3457' ! PE3457EX ! P RET ! P PEND ! P ! P !
0x223370…223504 Dummy {f00=0x00fd, f01=0x0190, f02=» P MOVE GSWBIN7,CBIN12 " P MOVE GSWBIN8,CBIN4 " PE345810 " < ( P MOVE GSWBCD6,FIELD(GSWBIN7,GSWBIN8) " L P CBE GSWBCD6,=D'120',E3458ER " x P CBE GSWBCD6,=D'264',E3458ER " P CBE GSWBCD6,=D'271',E3458ER " P CBE GSWBCD6,=D'473',E3458ER " P
0x223504…223698 Dummy {f00=0x00fd, f01=0x0190, f02=»P E345810 " P MOVE GSWBIN8,CBIN4 # P SUB GSWBIN7,CBIN1 # . P BP E345810 # H P B E3458EX # PE3458ER # n P SET TERROR # ~ P MOVE GSWBCD4,=D'3458' # PE3458EX # P RET # P PEND # P # P # PE3469 PROC # P TBT TERROR,
0x223698…22382c Dummy {f00=0x00fd, f01=0x0190, f02=» P MOVE GSWBCD4,=D'3469' $ PE3469EX $ " P RET $ 2 P PEND $ > P $ L P $ T PE3475 PROC $ P TBT TERROR,E3475EX $ n P PERF FINDFLD,=D'517' $ P BOK E347510 $ P PERF FINDFLD,=D'618' $ P BOK E347510 $ P PERF FINDFLD,=D'668' $
0x22382c…2239c0 Dummy {f00=0x00fd, f01=0x0190, f02=»WBCD4,=D'3475' $ PE3475EX % P RET % & P PEND % 2 P % @ P % H PE3478 PROC % P P TBT TERROR,E3478EX % b $ P PERF FINDFLD,=D'168' ERKL KODE % ~ P BNOK E3478EX % P* 1) % P MOVE GSWBIN1,OMF % 4 P IB GSWBIN1,E3478ER,E3478ER,E3478ER,E3
0x2239c0…223b54 (0, 694) Opaque[0x194]
0x223b54…223ce8 # DirEnt {nam=»C267T «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1fb8, f03=0x0000}
0x223b54…223ce8 IdxSect {
0x223b54…223ce8 f00 = 0x00fd // 0x223b54 @0x0
0x223b54…223ce8 f01 = 0x0002 // 0x223b56 @0x2
0x223b54…223ce8 gno = [ // 0x223b58 @0x4
0x223b54…223ce8 [0x00]: C0x00fd.0x3.0
0x223b54…223ce8 ]
0x223b54…223ce8 }
0x223ce8…223e7c Dummy {f00=0x00fd, f01=0x018e, f02=» T; P01; TID=TC; TCL=TC; * LEV=60; : P02; J PTDC=T03; V PLC=01L; f PTDC=T07; v PLC=01L; P01; PSCL=S04; PT; P01; PTID=TD; PTCL=TC; PLEV=60; P01; PTDC=
0x223e7c…224010 Dummy {f00=0x00fd, f01=0x0190, f02=» PTDC=T04; PLC=02L; P03; $ PSCL=S02; 0 PSCL=S03; @ PSCL=S04; P PT; ` P01; j PTID=RA; v PTCL=RA; PLEV=60; P02; PTDC=T02; PLC=06L; PTDC=T06; PLC=06L; P00; PT; P
0x224010…2241a4 Dummy {f00=0x00fd, f01=0x0190, f02=»00; PT; P01; PTID=GB; " PTCL=GA; 2 PLEV=60; B P01; R PTDC=T05; ^ PLC=06L; n P03; ~ PSCL=S02; PSCL=S03; PSCL=S04; PT; P02; PTID=GD; PTCL=GA; PLEV=60; P01;
0x2241a4…224338 Dummy {f00=0x00fd, f01=0x0092, f02=»L=D0; LEV=60; 00; P00; * PC; 6 P00; @ P01; L PSCL=S01; X U; h 001; r TB2; ~ P002; PSCL=S03; PSCL=S04; PT; P02; PTID=GD; PTCL=GA; PLEV=60; P01;
0x224338…2244cc Dummy {f00=0x00fd, f01=0x2008, f02=» LEV=60; 00; P00; * PC; 6 P00; @ P01; L PSCL=S01; X U; h 001; r TB2; ~ P002; PSCL=S03; PSCL=S04; PT; P02; PTID=GD; PTCL=GA; PLEV=60; P01;
0x2244cc…224660 Dummy {f00=0x00fd, f01=0x0190, f02=» D0 D0 * 9 99 x , @ - TB2
0x224660…2247f4 (0, 695) Opaque[0x194]
0x2247f4…224988 # DirEnt {nam=»KM980 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1fc0, f03=0x0000}
0x2247f4…224988 IdxSect {
0x2247f4…224988 f00 = 0x00fe // 0x2247f4 @0x0
0x2247f4…224988 f01 = 0x0004 // 0x2247f6 @0x2
0x2247f4…224988 gno = [ // 0x2247f8 @0x4
0x2247f4…224988 [0x00]: C0x00fe.0x0.0
0x2247f4…224988 [0x01]: C0x00fe.0x1.0
0x2247f4…224988 ]
0x2247f4…224988 }
0x224988…224b1c Dummy {f00=0x00fe, f01=0x0190, f02=» PPRT KM980 PPRT C980 PMES KONVERTERING, MED CREBUG & PMES 81.05.08 J PMES L1: TC, L8: CREBUG ^ PSCR | PLED KMD08,/S P!!CH $$EJECT$$ $$ P!!CH $$'26'$$'22'$$ P!!CH $$(26)$$(22)$$ P!!DL 49,62 DCOMM-FD04
0x224b1c…224cb0 Dummy {f00=0x00fe, f01=0x0190, f02=»36 TB9,CB9 $ P!!RE 240,$$FALSE$$TRUE$$ CBKOFLG $ P!!RE 241,$$FALSE$$TRUE$$ CKTFLAG : & P!!RE 242,$$FALSE$$TRUE$$ CCLKTFLG b 0 P!!RE 243,$$FALSE$$FALSE$$ CTESTFLG=INDEX 13 $ P!!RE 244,$$FALSE$$TRUE$$ CTRVALG $ P!!RE 245,$$FALSE$$FALSE$$ CFLT46
0x224cb0…224e44 Dummy {f00=0x00fe, f01=0x0190, f02=»50,$$FALSE$$FALSE$$ CADM22F & P!!RE 251,$$FALSE$$FALSE$$ 5M DISK $ $ P!!RE 252,$$TRUE$$FALSE$$ CKASFLG N $ P!!RE 253,$$TRUE$$FALSE$$ CSLDFLG v & P!!RE 254,$$FALSE$$FALSE$$ CGLREGFL & P!!RE 255,$$FALSE$$TRUE$$ CCONVERT P!!DL 331 4 PCFLAG
0x224e44…224fd8 Dummy {f00=0x00fe, f01=0x0190, f02=»63,$$FALSE$$FALSE$$ FELT 90-94 $ P!!RE 416,$$01014610$$04019800$$ & & P!!RE 466,$$FALSE$$FALSE$$ C167FLG N 8 P!!RE 476,$$FALSE$$FALSE$$GENERATE LEVNR 5X XXXXXX CC x . P!!RE 477,$$FALSE$$FALSE$$ C539FLG-TINGLEV * P!!RE 478,$$TRUE$$FALSE$$ NO VSL CH
0x224fd8…22516c Dummy {f00=0x00fe, f01=0x0190, f02=»CKTINDX ~ " P!!RE 494,$$20$$20$$ INDEX FILE P!!RE 495,$$5$$5$$ CKTTOP 6 P!!DL 496,497 V PFROMTX STRGI (2),' ',' ' j P!!DL 817,1091 RKONV BLOKKE P!!DL 1095,1105 ENTRY P!!DL 1107 RKGO P!!DL 1109,1113 EXT P!!DL 1115 OFFL
0x22516c…225300 Dummy {f00=0x00fe, f01=0x0190, f02=» 1274,1278 REENTER P!!EN PNOD C & PTRA /S 4 PINC DIV461 B PNOD R T PINC SCREEN b PINC RGSUB4 t PINC RGSTRT PNOD R PINC RGMAIN PINC RGSUBS PINC RGSUB1 PINC RGSUB2 PINC RGSUB3 PNOD R
0x225300…225494 (0, 696) Dummy {f00=0x00fe, f01=0x0190, f02=» PNOD R PLED KMDIO,/S P!!DL 149,181 WRFD090-WRFD095 & PWRFD090 J PWRFD091 Z PWRFD092 j PWRFD093 z PWRFD094 PWRFD095 P!!EN PTRA /S,NL PINC DKSUBS PNOD R PINC RGFRMT PINC ADM6D
0x225494…225628 Dummy {f00=0x00fe, f01=0x0030, f02=»73,MU=M:POOL92,A=RGLOAD,C=C980 P$ASG2 &81 WRFD090-WRFD095 & PWRFD090 J PWRFD091 Z PWRFD092 j PWRFD093 z PWRFD094 PWRFD095 P!!EN PTRA /S,NL PINC DKSUBS PNOD R PINC RGFRMT PINC ADM6D
0x225628…2257bc Dummy {f00=0x00fe, f01=0x2008, f02=» POOL92,A=RGLOAD,C=C980 P$ASG2 &81 WRFD090-WRFD095 & PWRFD090 J PWRFD091 Z PWRFD092 j PWRFD093 z PWRFD094 PWRFD095 P!!EN PTRA /S,NL PINC DKSUBS PNOD R PINC RGFRMT PINC ADM6D
0x2257bc…225950 Dummy {f00=0x00fe, f01=0x018e, f02=»H050 STRAKSCHECK P MOVE GTLEVNR,GTDUPF(CBIN2) P PERF VARRD > P BOK WCH051 R P SET TTLEVFLG f PWCH051 | $ P TBT GTCYFLG,WCH060 CYKEL/STABEL P TBT TTCY2FLG,WCH057 P TBF TTCY1FLG,WCH055 P MOVE GTDUPF(CBIN4),TTCYKTOT
0x225950…225ae4 Dummy {f00=0x00fe, f01=0x0190, f02=» P BOK WCH059 P MOVE GTRETUR,CBIN3 P PERF LEVIN 4 P BNOK WCH057 H P PERF WSTRCH,CBIN1 P BNOK WCH095 v P B WCH090 PWCH059 P PERF WSTRCH,CBIN1 P BNOK WCH095 P B WCH080 PWCH060 P TBT TTCY2FLG,WC
0x225ae4…225c78 Dummy {f00=0x00fe, f01=0x0190, f02=»RIV CHECK HVIS FYLDT OP PWCH080 P PERF VARWRT . P BNOK WCH095 B PWCH090 V P CMP CBIN0,CBIN0 d P B WCH099 | PWCH095 P CMP CBIN0,CBIN1 PWCH099 P RET P PEND P EJECT PWCHUPD PROC , P* THE PROC
0x225c78…225e0c Dummy {f00=0x00fe, f01=0x0190, f02=»(CBIN10),GSWBCD7 UDB.DATO 2 P MOVE GTREGF(CBIN11),GTDUPF(CBIN4) UDB. BELOB " . P ADD GTREGF(CBIN12),GTDUPF(CBIN4) UDB ]TD X P TBF GTBDTFLG,WCHUPD90 & P CBL GTDUPF(CBIN4),=D'0',WCHUPD12 0 P ADD GTREGF(CBIN14),GTDUPF(CBIN4) VENT DEBET P B
0x225e0c…225fa0 Dummy {f00=0x00fe, f01=0x0190, f02=») SKYLDIGT BELOB p 2 P MOVE GSWBCD6,GTREGF(CBIN13) GET LOW VALORDATE P CBL GSWBCD6,=D'1',WCHUP155 N $ P CBG GSWBCD6,=D'800000',WCHUP150 r P PERF CHDATO TO GSWBCD7 P MOVE GTREGF(CBIN13),GSWBCD7 PWCHUP150 P MOVE GSWBCD6,GTDUPF(CBIN7
0x225fa0…226134 (0, 697) Opaque[0x194]
0x226134…2262c8 # DirEnt {nam=»C980 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1fd0, f03=0x0000}
0x226134…2262c8 IdxSect {
0x226134…2262c8 f00 = 0x00fe // 0x226134 @0x0
0x226134…2262c8 f01 = 0x0002 // 0x226136 @0x2
0x226134…2262c8 gno = [ // 0x226138 @0x4
0x226134…2262c8 [0x00]: C0x00fe.0x2.0
0x226134…2262c8 ]
0x226134…2262c8 }
0x2262c8…22645c Dummy {f00=0x00fe, f01=0x018c, f02=» T; P01; PTID=TB; PTCL=TB; * PLEV=55; : P01; J PTDC=T01; V PLC=08L; f P00; v PT; P01; TID=TC; TCL=TC; LEV=60; P02; PTDC=T03; PLC=01L; PTDC=T07; PLC=0
0x22645c…2265f0 Dummy {f00=0x00fe, f01=0x2008, f02=» P01; PTID=TB; PTCL=TB; * PLEV=55; : P01; J PTDC=T01; V PLC=08L; f P00; v PT; P01; TID=TC; TCL=TC; LEV=60; P02; PTDC=T03; PLC=01L; PTDC=T07; PLC=0
0x2265f0…226784 Dummy {f00=0x00fe, f01=0x0190, f02=»00; PT; P01; PTID=GB; " PTCL=GA; 2 PLEV=60; B P01; R PTDC=T05; ^ PLC=06L; n P03; ~ PSCL=S02; PSCL=S03; PSCL=S04; PT; P02; PTID=GD; PTCL=GA; PLEV=60; P01;
0x226784…226918 Dummy {f00=0x00fe, f01=0x0092, f02=»L=D0; LEV=60; 00; P00; * PC; 6 P00; @ P01; L PSCL=S01; X U; h 001; r TB2; ~ P002; PSCL=S03; PSCL=S04; PT; P02; PTID=GD; PTCL=GA; PLEV=60; P01;
0x226918…226aac Dummy {f00=0x00fe, f01=0x2008, f02=» LEV=60; 00; P00; * PC; 6 P00; @ P01; L PSCL=S01; X U; h 001; r TB2; ~ P002; PSCL=S03; PSCL=S04; PT; P02; PTID=GD; PTCL=GA; PLEV=60; P01;
0x226aac…226c40 Dummy {f00=0x00fe, f01=0x2008, f02=» 01; TID=D0; TCL=D0; * LEV=60; : 00; J P00; V PC; b P00; l P01; x PSCL=S01; U; 001; TB2; P002; PSCL=S02; PSCL=S03; PSCL=S04; PT; P01;
0x226c40…226dd4 (0, 698) Opaque[0x194]
0x226dd4…226f68 # DirEnt {nam=»RAADUM«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1fd8, f03=0x0000}
0x226dd4…226f68 IdxSect {
0x226dd4…226f68 f00 = 0x00fe // 0x226dd4 @0x0
0x226dd4…226f68 f01 = 0x0002 // 0x226dd6 @0x2
0x226dd4…226f68 gno = [ // 0x226dd8 @0x4
0x226dd4…226f68 [0x00]: C0x00fe.0x3.0
0x226dd4…226f68 ]
0x226dd4…226f68 }
0x226f68…2270fc Dummy {f00=0x00fe, f01=0x40b6, f02=» . P IDENT RAADUM R]KONVERTERING DUMMY MODULE DDUM KMD08 6 PDIV J ENTRY RKAPPL X P* n RKAPPL PROC x RET PEND END @ /L,RGL173 PSCR 2 PMES $PDISC M=M:173,MU=M:POOL92,A=RGL173,C=C173
0x2270fc…227290 Dummy {f00=0x00fe, f01=0x2008, f02=» NT RAADUM DDUM KMD08 PDIV . ENTRY RKAPPL < PDIV R RKAPPL PROC ` RET t PEND END @
0x227290…227424 Dummy {f00=0x00fe, f01=0x0190, f02=»CT ) PGB2 BLK * P* * PSPPROMPT BOOL FALSE * $ PSPCHANGE BOOL FALSE * @ 2 PSPDUPL BOOL FALSE TRUE: FIELD HAS BEEN DUPPED * 2 PSPME BOOL FALSE FALSE: NO CHECK FOR ME FIELDS * 0 PSPKEYFLG BOOL TRUE FALSE NO KOR-KEY IN SPERR * " PSPWARNFL BOO
0x227424…2275b8 Dummy {f00=0x00fe, f01=0x0190, f02=»LSE KEY4 * ( PTTKEYFLG BOOL FALSE T=KB: 6271,6272 + ( PTTSUMFLG BOOL FALSE SUM ON SCREEN ? + < PGTGTPFLG BOOL FALSE T=GTP + h PGTLPFLG BOOL FALSE T=LP + P* + P* + P* + P* + PSPBINW1 BIN + PSPBINW2 BIN + PSPBINW3 BIN +
0x2275b8…22774c Dummy {f00=0x00fe, f01=0x0190, f02=»R BIN + $ PGTREGDEX BIN '0' TRANSTYPE INDEX , ( PGTDFLIN BIN '27' DEFAULT LINE NUMBER , 6 & PGTHCDEV BIN HARDCOPY 1=GTP, 2=LP , b PTTASKNR BIN , PGSSWITCH BINI (26) , PGTUSED BINI (26) , P EJECT , PGB3 BLK , P* , PPSIGNFLG BOOL
0x22774c…2278e0 Dummy {f00=0x00fe, f01=0x0190, f02=»L FALSE , 2 PGTKORTFL BOOL FALSE T=KONTO FOUND IN KONTOPLAN - & PGTTESTFL BOOL FALSE T=IN TEST MODE - F $ PGTSWFLAG BOOL FALSE SCRATCH FLAG - p & PGTSUMKEY BOOL FALSE SUM INDIKATOR - " PGTNWFLG BOOL FALSE T= USE .NW - , PGTADMFLG BOOL FALSE T= IN ADM FU
0x2278e0…228580 (1, 0) DirGranule ((1, 0)) {
0x2278e0…228580 DirEnt {nam=» SEEK-«, typ=»,T«, f00=0x4852, f01=0x4f55, f02=0x4748, f03=0x5055}
0x2278e0…228580 DirEnt {nam=»T ERRO«, typ=»R,«, f00=0x4e4f, f01=0x5420, f02=0x4f50, f03=0x4552}
0x2278e0…228580 DirEnt {nam=»ABLE 5«, typ=» «, f00=0x002a, f01=0x0050, f02=0x5c43, f03=0x465c}
0x2278e0…228580 DirEnt {nam=»A5,WER«, typ=»:R«, f00=0x355c, f01=0x4558, f02=0x4543, f03=0x5554}
0x2278e0…228580 DirEnt {nam=»E WER «, typ=»IN«, f00=0x5354, f01=0x5255, f02=0x4354, f03=0x494f}
0x2278e0…228580 DirEnt {nam=»NS 6 ,«, typ=» "«, f00=0x0050, f01=0x5c4c, f02=0x444b, f03=0x5c41}
0x2278e0…228580 DirEnt {nam=»2,0 CY«, typ=»LI«, f00=0x4e44, f01=0x4552, f02=0x204e, f03=0x554d}
0x2278e0…228580 DirEnt {nam=»BER = «, typ=»0 «, f00=0x0036, f01=0x005a, f02=0x0014, f03=0x0050}
0x2278e0…228580 DirEnt {nam=» ST A2«, typ=»,D«, f00=0x5754, f01=0x4359, f02=0x4c2c, f03=0x4136}
0x2278e0…228580 DirEnt {nam=» 6 «, typ=» P«, f00=0x5c43, f01=0x465c, f02=0x4135, f03=0x2c43}
0x2278e0…228580 DirEnt {nam=»IO REA«, typ=»D «, f00=0x564f, f01=0x4c55, f02=0x4d45, f03=0x204c}
0x2278e0…228580 DirEnt {nam=»ABEL 6«, typ=» «, f00=0x000e, f01=0x0050, f02=0x5c41, f03=0x4e4b}
0x2278e0…228580 DirEnt {nam=» A1,3 «, typ=» 6«, f00=0x00bc, f01=0x0030, f02=0x0050, f03=0x5c52}
0x2278e0…228580 DirEnt {nam=»F(NZ) «, typ=»VO«, f00=0x3a4e, f01=0x4138, f02=0x5c54, f03=0x4852}
0x2278e0…228580 DirEnt {nam=»OUGHPU«, typ=»T «, f00=0x4552, f01=0x524f, f02=0x522c, f03=0x4e4f}
0x2278e0…228580 DirEnt {nam=»T OPER«, typ=»AB«, f00=0x4c45, f01=0x0036, f02=0x00ce, f03=0x0012}
0x2278e0…228580 DirEnt {nam=» P LDK«, typ=» A«, f00=0x322c, f01=0x4457, f02=0x544e, f03=0x414d}
0x2278e0…228580 DirEnt {nam=» 6 «, typ=» P«, f00=0x5c41, f01=0x4452, f02=0x5c41, f03=0x322c}
0x2278e0…228580 DirEnt {nam=»A6 6 «, typ=» «, f00=0x0050, f01=0x5c4c, f02=0x445c, f03=0x4133}
0x2278e0…228580 DirEnt {nam=»,DWTOR«, typ=»,A«, f00=0x365c, f01=0x0036, f02=0x012a, f03=0x001c}
0x2278e0…228580 DirEnt {nam=» P RF(«, typ=»Z)«, f00=0x5c44, f01=0x554e, f02=0x4131, f03=0x305c}
0x2278e0…228580 DirEnt {nam=»FIXED «, typ=»DI«, f00=0x5343, f01=0x0036, f02=0x0142, f03=0x001c}
0x2278e0…228580 DirEnt {nam=» P ADK«, typ=» A«, f00=0x322c, f01=0x365c, f02=0x4341, f03=0x5254}
0x2278e0…228580 DirEnt {nam=»RIDGE «, typ=»DI«, f00=0x5343, f01=0x0036, f02=0x0162, f03=0x0006}
0x2278e0…228580 DirEnt {nam=» P* 6«, typ=» «, f00=0x0014, f01=0x0050, f02=0x5c45, f03=0x4a45}
0x2278e0…228580 DirEnt {nam=»CT D«, typ=»RD«, f00=0x5530, f01=0x3120, f02=0x0036, f03=0x018c}
0x2278e0…228580 DirEnt {nam=» P* «, typ=» 7«, f00=0x0014, f01=0x0006, f02=0x0050, f03=0x2a20}
0x2278e0…228580 DirEnt {nam=» 7 ,«, typ=» P«, f00=0x4455, f01=0x4e41, f02=0x3130, f03=0x5c4c}
0x2278e0…228580 DirEnt {nam=»DKL A3«, typ=»,B«, f00=0x5546, f01=0x2b32, f02=0x5c47, f03=0x4554}
0x2278e0…228580 DirEnt {nam=» BUFFE«, typ=»R «, f00=0x4144, f01=0x4452, f02=0x4553, f03=0x5320}
0x2278e0…228580 DirEnt {nam=» 7 ( &«, typ=» P«, f00=0x5c53, f01=0x545c, f02=0x4134, f03=0x2c44}
0x2278e0…228580 DirEnt {nam=»WTA4,A«, typ=»6 «, f00=0x5341, f01=0x5645, f02=0x2052, f03=0x4554}
0x2278e0…228580 DirEnt {nam=»RY COU«, typ=»NT«, f00=0x4552, f01=0x0037, f02=0x0058, f03=0x000e}
0x2278e0…228580 DirEnt {nam=» P LDK«, typ=» A«, f00=0x342c, f01=0x3620, f02=0x0037, f03=0x0082}
0x2278e0…228580 DirEnt {nam=» P* «, typ=» 7«, f00=0x0094, f01=0x0026, f02=0x0050, f03=0x4455}
0x2278e0…228580 DirEnt {nam=»NA20 L«, typ=»DR«, f00=0x2a5c, f01=0x4137, f02=0x2c41, f03=0x335c}
0x2278e0…228580 DirEnt {nam=»GET VO«, typ=»LU«, f00=0x4d45, f01=0x204e, f02=0x414d, f03=0x4520}
0x2278e0…228580 DirEnt {nam=» 7 .«, typ=» P«, f00=0x5c43, f01=0x5752, f02=0x2a5c, f03=0x4137}
0x2278e0…228580 DirEnt {nam=»,A2 CO«, typ=»MP«, f00=0x4152, f01=0x4520, f02=0x5749, f03=0x5448}
0x2278e0…228580 DirEnt {nam=» LAST «, typ=»VO«, f00=0x4c55, f01=0x4d45, f02=0x204e, f03=0x414d}
0x2278e0…228580 DirEnt {nam=»E 7 «, typ=» «, f00=0x0050, f01=0x5c52, f02=0x4628, f03=0x4529}
0x2278e0…228580 DirEnt {nam=» DUNA3«, typ=»0 «, f00=0x5341, f01=0x4d45, f02=0x2044, f03=0x4953}
0x2278e0…228580 DirEnt {nam=»C 7 «, typ=» «, f00=0x0050, f01=0x5c4c, f02=0x444b, f03=0x5c41}
0x2278e0…228580 DirEnt {nam=»1,/80 «, typ=»NE«, f00=0x5720, f01=0x4449, f02=0x5343, f03=0x204c}
0x2278e0…228580 DirEnt {nam=»OADED «, typ=» 7«, f00=0x011a, f01=0x0006, f02=0x0050, f03=0x2a20}
0x2278e0…228580 DirEnt {nam=» 7 > $«, typ=» P«, f00=0x4455, f01=0x4e41, f02=0x3330, f03=0x5c53}
0x2278e0…228580 DirEnt {nam=»TR A7,«, typ=»A2«, f00=0x5c53, f01=0x4156, f02=0x4520, f03=0x4449}
0x2278e0…228580 DirEnt {nam=»SC NAM«, typ=»E «, f00=0x0037, f01=0x0148, f02=0x0020, f03=0x0050}
0x2278e0…228580 DirEnt {nam=» ADK A«, typ=»2,«, f00=0x325c, f01=0x494e, f02=0x4352, f03=0x454d}
0x2278e0…228580 DirEnt {nam=»ENT PO«, typ=»IN«, f00=0x5445, f01=0x5253, f02=0x0037, f03=0x0170}
0x2278e0…228580 DirEnt {nam=» P A«, typ=»DK«, f00=0x5c41, f01=0x332c, f02=0x3220, f03=0x0038}
0x2278e0…228580 DirEnt {nam=» P«, typ=» S«, f00=0x554b, f01=0x5c41, f02=0x342c, f03=0x3220}
0x2278e0…228580 DirEnt {nam=» 8 «, typ=» P«, f00=0x5c52, f01=0x4228, f02=0x4e5a, f03=0x295c}
0x2278e0…228580 DirEnt {nam=»DUNA20«, typ=» G«, f00=0x4554, f01=0x204e, f02=0x4558, f03=0x5420}
0x2278e0…228580 DirEnt {nam=»WORD 8«, typ=» («, f00=0x0014, f01=0x0050, f02=0x5c41, f03=0x444b}
0x2278e0…228580 DirEnt {nam=» A1,0 «, typ=»SE«, f00=0x5420, f01=0x4352, f02=0x0038, f03=0x004c}
0x2278e0…228580 DirEnt {nam=» P R«, typ=»F(«, f00=0x5a29, f01=0x5c44, f02=0x554e, f03=0x4134}
0x2278e0…228580 DirEnt {nam=»0 VOLU«, typ=»ME«, f00=0x204d, f01=0x4154, f02=0x4348, f03=0x0038}
0x2278e0…228580 DirEnt {nam=» d , P«, typ=» L«, f00=0x445c, f01=0x4134, f02=0x2c49, f03=0x4e49}
0x2278e0…228580 DirEnt {nam=»FLG CH«, typ=»EC«, f00=0x4b20, f01=0x494e, f02=0x4954, f03=0x4941}
0x2278e0…228580 DirEnt {nam=»LIZATI«, typ=»ON«, f00=0x2046, f01=0x4c41, f02=0x4720, f03=0x0038}
0x2278e0…228580 DirEnt {nam=» P«, typ=» R«, f00=0x4628, f01=0x4e5a, f02=0x295c, f03=0x4455}
0x2278e0…228580 DirEnt {nam=»NA40 N«, typ=»OT«, f00=0x2050, f01=0x4f57, f02=0x4552, f03=0x2055}
0x2278e0…228580 DirEnt {nam=»P? 8 «, typ=» «, f00=0x0050, f01=0x5c4c, f02=0x435c, f03=0x4134}
0x2278e0…228580 DirEnt {nam=»,DWTOR«, typ=»,A«, f00=0x365c, f01=0x494e, f02=0x4445, f03=0x5820}
0x2278e0…228580 DirEnt {nam=» 8 «, typ=» P«, f00=0x5c41, f01=0x4452, f02=0x5c41, f03=0x342c}
0x2278e0…228580 DirEnt {nam=»A4 8 «, typ=» «, f00=0x0050, f01=0x5c41, f02=0x4452, f03=0x5c41}
0x2278e0…228580 DirEnt {nam=»4,A6 8«, typ=» «, f00=0x0026, f01=0x0050, f02=0x5c53, f03=0x545c}
0x2278e0…228580 DirEnt {nam=»A1,DWT«, typ=»BS«, f00=0x592c, f01=0x4134, f02=0x5c4e, f03=0x4557}
0x2278e0…228580 DirEnt {nam=» VOLUM«, typ=»E «, f00=0x4c4f, f01=0x4144, f02=0x4544, f03=0x0038}
0x2278e0…228580 DirEnt {nam=» P«, typ=»* «, f00=0x0038, f01=0x0146, f02=0x0014, f03=0x0050}
0x2278e0…228580 DirEnt {nam=» EJECT«, typ=» «, f00=0x5c44, f01=0x5244, f02=0x5530, f03=0x3120}
0x2278e0…228580 DirEnt {nam=» 8 P «, typ=» P«, f00=0x2a20, f01=0x0038, f02=0x0168, f03=0x0006}
0x2278e0…228580 DirEnt {nam=» P* 8«, typ=» r«, f00=0x0010, f01=0x0050, f02=0x4455, f03=0x4e41}
0x2278e0…228580 DirEnt {nam=»40 EQU«, typ=» *«, f00=0x0038, f01=0x017c, f02=0x002a, f03=0x0050}
0x2278e0…228580 DirEnt {nam=» LD A4«, typ=»,D«, f00=0x5754, f01=0x4134, f02=0x2c41, f03=0x365c}
0x2278e0…228580 DirEnt {nam=»RESTOR«, typ=»E «, f00=0x5245, f01=0x5452, f02=0x5920, f03=0x434f}
0x2278e0…228580 DirEnt {nam=»UNTER «, typ=» 8«, f00=0x0190, f01=0x001a, f02=0x0050, f03=0x5c4c}
0x2278e0…228580 DirEnt {nam=»D A1,D«, typ=»WT«, f00=0x4f52, f01=0x2c41, f02=0x365c, f03=0x4f52}
0x2278e0…228580 DirEnt {nam=»DER 9«, typ=» .«, f00=0x0012, f01=0x0050, f02=0x5c52, f03=0x4628}
0x2278e0…228580 DirEnt {nam=»NZ) VO«, typ=»:N«, f00=0x4136, f01=0x0039, f02=0x004c, f03=0x000e}
0x2278e0…228580 DirEnt {nam=» P LDK«, typ=» A«, f00=0x312c, f01=0x3120, f02=0x0039, f03=0x0062}
0x2278e0…228580 DirEnt {nam=» P S«, typ=»C «, f00=0x4131, f01=0x2c44, f02=0x5754, f03=0x4f52}
0x2278e0…228580 DirEnt {nam=»,A6 IN«, typ=»DE«, f00=0x583d, f01=0x3120, f02=0x0039, f03=0x0074}
0x2278e0…228580 DirEnt {nam=» P R«, typ=»B «, f00=0x564f, f01=0x3a4e, f02=0x4135, f03=0x0039}
0x2278e0…228580 DirEnt {nam=» P«, typ=»* «, f00=0x0039, f01=0x00a6, f02=0x0026, f03=0x0050}
0x2278e0…228580 DirEnt {nam=»VO:NA6«, typ=» L«, f00=0x444b, f01=0x5c41, f02=0x312c, f03=0x305c}
0x2278e0…228580 DirEnt {nam=»RESET «, typ=»RE«, f00=0x5455, f01=0x524e, f02=0x2043, f03=0x4f44}
0x2278e0…228580 DirEnt {nam=»E 9 «, typ=» «, f00=0x0050, f01=0x2a20, f02=0x0039, f03=0x00da}
0x2278e0…228580 DirEnt {nam=» PVO«, typ=»:N«, f00=0x4138, f01=0x5c45, f02=0x5155, f03=0x5c2a}
0x2278e0…228580 DirEnt {nam=» 9 «, typ=» P«, f00=0x5c4c, f01=0x444b, f02=0x4c5c, f03=0x4132}
0x2278e0…228580 DirEnt {nam=»,-1 9«, typ=» «, f00=0x0014, f01=0x0050, f02=0x5c53, f03=0x545c}
0x2278e0…228580 DirEnt {nam=»A2,DWT«, typ=»SA«, f00=0x562c, f01=0x4136, f02=0x0039, f03=0x010c}
0x2278e0…228580 DirEnt {nam=» P R«, typ=»TN«, f00=0x5c41, f01=0x3520, f02=0x0039, f03=0x0124}
0x2278e0…228580 DirEnt {nam=» P* «, typ=» 9«, f00=0x0134, f01=0x0016, f02=0x0050, f03=0x2a20}
0x2278e0…228580 DirEnt {nam=» TIME«, typ=»R «, f00=0x504f, f01=0x494e, f02=0x5445, f03=0x5220}
0x2278e0…228580 DirEnt {nam=» 9 > «, typ=» P«, f00=0x2a20, f01=0x0039, f02=0x0158, f03=0x001e}
0x2278e0…228580 DirEnt {nam=» PTIME«, typ=»R «, f00=0x4441, f01=0x5441, f02=0x5c30, f03=0x5c54}
0x2278e0…228580 DirEnt {nam=»IMER P«, typ=»OI«, f00=0x4e54, f01=0x4552, f02=0x0039, f03=0x0162}
0x2278e0…228580 DirEnt {nam=» P* «, typ=» 9«, f00=0x0184, f01=0x001c, f02=0x0050, f03=0x5c45}
0x2278e0…228580 DirEnt {nam=»JECT «, typ=» D«, f00=0x5244, f01=0x5530, f02=0x315c, f03=0x5c5c}
0x2278e0…228580 DirEnt {nam=»DRDU01«, typ=» 9«, f00=0x018e, f01=0x0006, f02=0x0050, f03=0x2a20}
0x2278e0…228580 DirEnt {nam=» : «, typ=» P«, f00=0x2a20, f01=0x003a, f02=0x0028, f03=0x002a}
0x2278e0…228580 DirEnt {nam=» P* «, typ=»DE«, f00=0x5649, f01=0x4345, f02=0x2057, f03=0x4f52}
0x2278e0…228580 DirEnt {nam=»K TABL«, typ=»E «, f00=0x4449, f01=0x5343, f02=0x2055, f03=0x4e49}
0x2278e0…228580 DirEnt {nam=»T NO. «, typ=»2 «, f00=0x003a, f01=0x0032, f02=0x0006, f03=0x0050}
0x2278e0…228580 DirEnt {nam=»* : `«, typ=» «, f00=0x0050, f01=0x2a20, f02=0x003a, f03=0x006a}
0x2278e0…228580 DirEnt {nam=» PDW«, typ=»DU«, f00=0x3032, f01=0x5c45, f02=0x5155, f03=0x5c2a}
0x2278e0…228580 DirEnt {nam=» : t «, typ=» P«, f00=0x5c49, f01=0x4654, f02=0x5c4e, f03=0x554e}
0x2278e0…228580 DirEnt {nam=»ITS=2 «, typ=» :«, f00=0x0088, f01=0x0026, f02=0x0050, f03=0x5c44}
0x2278e0…228580 DirEnt {nam=»ATA DW«, typ=»DU«, f00=0x3031, f01=0x5c50, f02=0x4f49, f03=0x4e54}
0x2278e0…228580 DirEnt {nam=»ER TO «, typ=»OT«, f00=0x4845, f01=0x5220, f02=0x4457, f03=0x5420}
0x2278e0…228580 DirEnt {nam=» : «, typ=» P«, f00=0x5c44, f01=0x4154, f02=0x415c, f03=0x2f38}
0x2278e0…228580 DirEnt {nam=»000 DW«, typ=»T «, f00=0x5354, f01=0x4154, f02=0x5553, f03=0x003a}
0x2278e0…228580 DirEnt {nam=» P«, typ=» D«, f00=0x4154, f01=0x415c, f02=0x305c, f03=0x4543}
0x2278e0…228580 DirEnt {nam=»B ADDR«, typ=»ES«, f00=0x5320, f01=0x003a, f02=0x00e6, f03=0x0012}
0x2278e0…228580 DirEnt {nam=» P DAT«, typ=»A «, f00=0x305c, f01=0x4f52, f02=0x4445, f03=0x5220}
0x2278e0…228580 DirEnt {nam=» : "«, typ=» P«, f00=0x5c44, f01=0x4154, f02=0x415c, f03=0x4455}
0x2278e0…228580 DirEnt {nam=»ADR AC«, typ=»TI«, f00=0x5641, f01=0x5449, f02=0x4f4e, f03=0x2041}
0x2278e0…228580 DirEnt {nam=»DDRESS«, typ=» :«, f00=0x0118, f01=0x0018, f02=0x0050, f03=0x5c44}
0x2278e0…228580 DirEnt {nam=»ATA 0 «, typ=»TT«, f00=0x4142, f01=0x2041, f02=0x4444, f03=0x5245}
0x2278e0…228580 DirEnt {nam=»SS : >«, typ=» $«, f00=0x0050, f01=0x5c44, f02=0x4154, f03=0x415c}
0x2278e0…228580 DirEnt {nam=»0 WAIT«, typ=»/A«, f00=0x4354, f01=0x4956, f02=0x4154, f03=0x4520}
0x2278e0…228580 DirEnt {nam=»INDICA«, typ=»TO«, f00=0x5220, f01=0x003a, f02=0x015a, f03=0x001a}
0x2278e0…228580 DirEnt {nam=» P DAT«, typ=»A «, f00=0x305c, f01=0x5445, f02=0x524d, f03=0x494e}
0x2278e0…228580 DirEnt {nam=»AL QUE«, typ=»UE«, f00=0x003a, f01=0x0182, f02=0x0012, f03=0x000d}
0x2278e0…228580 DirEnt {nam=» IFT M«, typ=»MU«, f00=0x5041, f01=0x473d, f02=0x3120, f03=0x003b}
0x2278e0…228580 DirEnt {nam=» & "«, typ=» D«, f00=0x4154, f01=0x415c, f02=0x305c, f03=0x5341}
0x2278e0…228580 DirEnt {nam=»VE ARE«, typ=»A «, f00=0x5553, f01=0x4552, f02=0x2045, f03=0x4342}
0x2278e0…228580 DirEnt {nam=» ADDRE«, typ=»SS«, f00=0x003b, f01=0x0026, f02=0x0020, f03=0x0050}
0x2278e0…228580 DirEnt {nam=» DATA «, typ=»EC«, f00=0x4244, f01=0x5532, f02=0x5c4d, f03=0x4d55}
0x2278e0…228580 DirEnt {nam=» ECB A«, typ=»DD«, f00=0x5245, f01=0x5353, f02=0x003b, f03=0x0050}
0x2278e0…228580 DirEnt {nam=» X«, typ=»IF«, f00=0x003b, f01=0x0074, f02=0x0012, f03=0x0050}
0x2278e0…228580 DirEnt {nam=» IFT N«, typ=»UN«, f00=0x4954, f01=0x533d, f02=0x3220, f03=0x003b}
0x2278e0…228580 DirEnt {nam=» ( P«, typ=» D«, f00=0x4154, f01=0x415c, f02=0x2f30, f03=0x3046}
0x2278e0…228580 DirEnt {nam=»F LEFT«, typ=» B«, f00=0x5954, f01=0x453d, f02=0x5345, f03=0x4354}
0x2278e0…228580 DirEnt {nam=»OR NUM«, typ=»BE«, f00=0x5220, f01=0x003b, f02=0x0096, f03=0x0028}
0x2278e0…228580 DirEnt {nam=» P DAT«, typ=»A «, f00=0x302c, f01=0x302c, f02=0x305c, f03=0x5341}
0x2278e0…228580 DirEnt {nam=»VE ARE«, typ=»A «, f00=0x464f, f01=0x5220, f02=0x5245, f03=0x4749}
0x2278e0…228580 DirEnt {nam=»STERS «, typ=» ;«, f00=0x00c2, f01=0x0014, f02=0x0050, f03=0x5c44}
0x2278e0…228580 DirEnt {nam=»ATA 0,«, typ=»0 «, f00=0x5354, f01=0x4143, f02=0x4b20, f03=0x003b}
0x2278e0…228580 DirEnt {nam=» P«, typ=» D«, f00=0x4154, f01=0x415c, f02=0x302c, f03=0x3020}
0x2278e0…228580 DirEnt {nam=» ; $«, typ=» P«, f00=0x5c44, f01=0x4154, f02=0x415c, f03=0x305c}
0x2278e0…228580 DirEnt {nam=»DISC U«, typ=»NI«, f00=0x5420, f01=0x4255, f02=0x5359, f03=0x2049}
0x2278e0…228580 DirEnt {nam=»NDICAT«, typ=»OR«, f00=0x003b, f01=0x0118, f02=0x000c, f03=0x0050}
0x2278e0…228580 DirEnt {nam=» DATA «, typ=»0 «, f00=0x003b, f01=0x0140, f02=0x0024, f03=0x0050}
0x2278e0…228580 DirEnt {nam=» RIG«, typ=»HT«, f00=0x2042, f01=0x5954, f02=0x4520, f03=0x3d20}
0x2278e0…228580 DirEnt {nam=»CYLIND«, typ=»ER«, f00=0x204e, f01=0x554d, f02=0x4245, f03=0x5220}
0x2278e0…228580 DirEnt {nam=» ; P («, typ=» P«, f00=0x5c43, f01=0x494f, f02=0x5c41, f03=0x322c}
0x2278e0…228580 DirEnt {nam=»1,DAF2«, typ=» C«, f00=0x494f, f01=0x2d53, f02=0x5441, f03=0x5254}
0x2278e0…228580 DirEnt {nam=» FIXED«, typ=» D«, f00=0x4953, f01=0x4320, f02=0x003b, f03=0x0178}
0x2278e0…228580 DirEnt {nam=» , P C«, typ=»IO«, f00=0x5c41, f01=0x322c, f02=0x312c, f03=0x4441}
0x2278e0…228580 DirEnt {nam=»C2 CIO«, typ=»-S«, f00=0x5441, f01=0x5254, f02=0x2043, f03=0x4152}
0x2278e0…228580 DirEnt {nam=»TRIDGE«, typ=» D«, f00=0x4953, f01=0x4320, f02=0x003c, f03=0x0014}
0x2278e0…228580 DirEnt {nam=» P* «, typ=» <«, f00=0x0044, f01=0x0014, f02=0x0050, f03=0x5c45}
0x2278e0…228580 DirEnt {nam=»JECT «, typ=» D«, f00=0x5244, f01=0x5530, f02=0x3120, f03=0x003c}
0x2278e0…228580 DirEnt {nam=» N P«, typ=»* «, f00=0x003c, f01=0x0066, f02=0x0006, f03=0x0050}
0x2278e0…228580 DirEnt {nam=»* < p«, typ=» «, f00=0x0050, f01=0x5c57, f02=0x4552, f03=0x5c41}
0x2278e0…228580 DirEnt {nam=»2,WER1«, typ=» <«, f00=0x007a, f01=0x0012, f02=0x0050, f03=0x5c57}
0x2278e0…228580 DirEnt {nam=»ER A3,«, typ=»WE«, f00=0x5231, f01=0x2b31, f02=0x003c, f03=0x008e}
0x2278e0…228580 DirEnt {nam=» & P D«, typ=»AT«, f00=0x415c, f01=0x302c, f02=0x302c, f03=0x305c}
0x2278e0…228580 DirEnt {nam=»VOLUME«, typ=» N«, f00=0x414d, f01=0x4520, f02=0x4649, f03=0x5845}
0x2278e0…228580 DirEnt {nam=»D DISC«, typ=» <«, f00=0x00a4, f01=0x002a, f02=0x0050, f03=0x5c44}
0x2278e0…228580 DirEnt {nam=»ATA 0,«, typ=»0,«, f00=0x305c, f01=0x564f, f02=0x4c55, f03=0x4d45}
0x2278e0…228580 DirEnt {nam=» NAME «, typ=»CA«, f00=0x5254, f01=0x5249, f02=0x4447, f03=0x4520}
0x2278e0…228580 DirEnt {nam=»DISC <«, typ=» «, f00=0x000c, f01=0x0050, f02=0x5c44, f03=0x4154}
0x2278e0…228580 DirEnt {nam=»A -1 <«, typ=» «, f00=0x000c, f01=0x0050, f02=0x5c44, f03=0x4154}
0x2278e0…228580 DirEnt {nam=»A 0 <«, typ=» «, f00=0x001c, f01=0x0050, f02=0x5c44, f03=0x4154}
0x2278e0…228580 DirEnt {nam=»A /FFF«, typ=»F «, f00=0x4359, f01=0x4c49, f02=0x4e44, f03=0x4552}
0x2278e0…228580 DirEnt {nam=» NO. <«, typ=» «, f00=0x0010, f01=0x0050, f02=0x5c49, f03=0x4654}
0x2278e0…228580 DirEnt {nam=» TYPE2«, typ=»=0«, f00=0x003c, f01=0x013c, f02=0x0020, f03=0x0050}
0x2278e0…228580 DirEnt {nam=» DATA «, typ=»MA«, f00=0x5843, f01=0x5935, f02=0x5c4d, f03=0x4158}
0x2278e0…228580 DirEnt {nam=» CYLIN«, typ=»DE«, f00=0x5220, f01=0x4e4f, f02=0x003c, f03=0x0150}
0x2278e0…228580 DirEnt {nam=» P X«, typ=»IF«, f00=0x003c, f01=0x0174, f02=0x0018, f03=0x0050}
0x2278e0…228580 DirEnt {nam=» IFT N«, typ=»UN«, f00=0x4954, f01=0x532b, f02=0x5459, f03=0x5045}
0x2278e0…228580 DirEnt {nam=»2=3 <«, typ=» «, f00=0x0020, f01=0x0050, f02=0x5c44, f03=0x4154}
0x2278e0…228580 DirEnt {nam=»A MAXC«, typ=»Y6«, f00=0x5c4d, f01=0x4158, f02=0x2043, f03=0x594c}
0x2278e0…228580 DirEnt {nam=»INDER «, typ=»NO«, f00=0x003d, f01=0x000c, f02=0x0008, f03=0x0050}
0x2278e0…228580 DirEnt {nam=» XIF =«, typ=» 0«, f00=0x0006, f01=0x0050, f02=0x2a20, f03=0x003d}
0x2278e0…228580 DirEnt {nam=» < P«, typ=» I«, f00=0x4654, f01=0x5c4e, f02=0x554e, f03=0x4954}
0x2278e0…228580 DirEnt {nam=»S=2 =«, typ=» F«, f00=0x0012, f01=0x0050, f02=0x5c49, f03=0x4654}
0x2278e0…228580 DirEnt {nam=» MMUPA«, typ=»G=«, f00=0x3120, f01=0x003d, f02=0x005c, f03=0x002a}
0x2278e0…228580 DirEnt {nam=» P DAT«, typ=»A «, f00=0x305c, f01=0x5041, f02=0x4745, f03=0x204e}
0x2278e0…228580 DirEnt {nam=»UMBER «, typ=»(P«, f00=0x5345, f01=0x5544, f02=0x4f20, f03=0x4d4d}
0x2278e0…228580 DirEnt {nam=»U TABL«, typ=»E)«, f00=0x003d, f01=0x0072, f02=0x002a, f03=0x0050}
0x2278e0…228580 DirEnt {nam=» DATA «, typ=»0 «, f00=0x3136, f01=0x2042, f02=0x4954, f03=0x204c}
0x2278e0…228580 DirEnt {nam=»OGICAL«, typ=» B«, f00=0x5546, f01=0x4645, f02=0x5220, f03=0x4144}
0x2278e0…228580 DirEnt {nam=»DRESS «, typ=» =«, f00=0x00a0, f01=0x0010, f02=0x0050, f03=0x4543}
0x2278e0…228580 DirEnt {nam=»BDU2 E«, typ=»QU«, f00=0x5c2a, f01=0x003d, f02=0x00ce, f03=0x0016}
0x2278e0…228580 DirEnt {nam=» P DAT«, typ=»A «, f00=0x302c, f01=0x302c, f02=0x302c, f03=0x302c}
0x2278e0…228580 DirEnt {nam=»0,0 =«, typ=» «, f00=0x0008, f01=0x0050, f02=0x5c58, f03=0x4946}
0x2278e0…228580 DirEnt {nam=» = «, typ=» P«, f00=0x2a20, f01=0x003d, f02=0x0108, f03=0x001c}
0x2278e0…228580 DirEnt {nam=» P EJE«, typ=»CT«, f00=0x5c5c, f01=0x5c44, f02=0x5244, f03=0x5530}
0x2278e0…228580 DirEnt {nam=»1 DR«, typ=»DU«, f00=0x3031, f01=0x003d, f02=0x0112, f03=0x0006}
0x2278e0…228580 DirEnt {nam=» P* =«, typ=» 2«, f00=0x0006, f01=0x0050, f02=0x2a20, f03=0x003d}
0x2278e0…228580 DirEnt {nam=» < * P«, typ=»* «, f00=0x2020, f01=0x4445, f02=0x5649, f03=0x4345}
0x2278e0…228580 DirEnt {nam=» WORK «, typ=»TA«, f00=0x424c, f01=0x4520, f02=0x4449, f03=0x5343}
0x2278e0…228580 DirEnt {nam=» UNIT «, typ=»NO«, f00=0x2e20, f01=0x3120, f02=0x003d, f03=0x0146}
0x2278e0…228580 DirEnt {nam=» P* «, typ=» =«, f00=0x0174, f01=0x0006, f02=0x0050, f03=0x2a20}
0x2278e0…228580 DirEnt {nam=» = ~ «, typ=» P«, f00=0x4457, f01=0x4455, f02=0x3031, f03=0x5c45}
0x2278e0…228580 }
0x228580…29d200 (1, 1) [
0x228580…29d200 [0x000]: Pad {f00=0x007d, f01=0x0190, f02=»QU * = & P DATA DWDU02 POINTER TO OTHER DWT > P DATA /8000 DWT STATUS > 6 P DATA 0 ECB ADDRESS > T P DATA 0 ORDER > p " P DATA DUADR ACTIVATION ADDRESS > P DATA 0 TTAB ADDRESS > $ P DATA 0 WAIT/ACTIVATE INDICATOR > P DATA 0 TERMINAL QUEUE >
0x228580…29d200 [0x001]: Pad {f00=0x007d, f01=0x0190, f02=»1 > ~ ( P DATA /00FF LEFT BYTE=SECTOR NUMBER ? ( P DATA 0,0,0 SAVE AREA FOR REGISTERS ? 6 P DATA 0,0 STACK ? b P DATA 0,0 ? z PDWTBSY EQU *-DWDU01 ? P DATA 0 UNIT BUSY INDICATOR ? P DATA 0 UNIT BUSY INDICATOR ? " PDWTCIO EQU *-DWDU01 CIO-ST
0x228580…29d200 [0x002]: Pad {f00=0x007d, f01=0x018e, f02=» WER INSTRUCTION ? x P WER A2,WER1 @ , PDWTWR2 EQU *-DWDU01 2:ND WER INSTRUCTION @ , P WER A3,WER1+1 @ PDWTNAM EQU *-DWDU01 @ r & P DATA 0,0,0 VOLUME NAME FIXED DISC @ * P DATA 0,0,0 VOLUME NAME CARTRIDGE DISC @ PDWTSAV EQU *-DWDU01 @ P DATA -1
0x228580…29d200 [0x003]: Pad {f00=0x007d, f01=0x0190, f02=» PDWTCMX EQU *-DWDU01 A $ P DATA MAXCY5 MAX CYLINDER X/1215 A P XIF A H P IFT TYPE1=1 A T PDWTCMX EQU *-DWDU01 A h ( P DATA MAXCY6 MAX CYLINDER NO X/1216 A P XIF A P* A P EJECT DRDU01 A P* A P* A P IFT MMUPAG=1 A PDW
0x228580…29d200 [0x004]: Pad {f00=0x007d, f01=0x4074, f02=»ESS A n PECBDU1 EQU * B P DATA 0,0,0,0,0,0 B P XIF B : P* B F P* B P P* B Z P END B d@ B p-DWDU01 A h ( P DATA MAXCY6 MAX CYLINDER NO X/1216 A P XIF A P* A P EJECT DRDU01 A P* A P* A P IFT MMUPAG=1 A PDW
0x228580…29d200 [0x005]: Pad {f00=0x007d, f01=0x2008, f02=» C -DWDU01 2:ND WER INSTRUCTION - P WER A3,WER1+1 . , PDWTNAM EQU *-DWDU01 . B PDWTVOL EQU *-DWDU01 . ^ & P DATA 0,0,0 VOLUME NAME FIXED DISC . z * P DATA 0,0,0 VOLUME NAME CARTRIDGE DISC . PDWTSAV EQU *-DWDU01 . P DATA -1 . P END . @
0x228580…29d200 [0x006]: Pad {f00=0x007d, f01=0x0190, f02=» PFL020 EQU * P C1R A3,A3 P ANS A3,SPDLCI . P RF SOPONOF D P* X P EJECT b P* p PFLTUT EQU * FLASH TIME OUT z P LDKL A6,DWSO01 P LD A3,FLASH 0 P RF(Z) FL030 NO MORE FLASHING FOR THIS TIME P LDKL A1,-TIME
0x228580…29d200 [0x007]: Pad {f00=0x007d, f01=0x018e, f02=» RF EXIT END I/O P XIF P EJECT $ P* 2 PSOPOFF EQU * < , P C1R A3,A3 GET COMPLEMENTED CONTROL WORD P 4 P ANS A3,SPDLCI MASK OUT LIGHTS TO BE TURNED OFF P IFT WRFLA=1 $ P ANS A3,FLASH STOP SOME FLASHING P XIF , P RF SOPONO
0x228580…29d200 [0x008]: Pad {f00=0x007d, f01=0x0190, f02=» " P* A3 CONTAINS CONTROL WORD . P ORS A3,SPDLCI SET LIGHTS TO BE TURNED ON * P IFT WRFLA=1 P C1R A3,A3 p * P ANS A3,FLASH STOP SOME OTHER FLASHING P XIF P* P* COMMON ON/OFF PATH: P* 0 PSOPONOFF LD A1,SPDLCI GET LI
0x228580…29d200 [0x009]: Pad {f00=0x007d, f01=0x0008, f02=»
0x228580…29d200 [0x00a]: Pad {f00=0x007d, f01=0x0190, f02=» 2 P IDENT DRLP01 REL 9.2 79-11-16 870105040920 P : $ P =1, INTERFACE UNKNOWN HANG-UP B P REL 9.1 79-05-23 j P* P* > P********************************************************** P* $ P* PHILIPS TERMINAL SYSTEM PTS
0x228580…29d200 [0x00b]: Pad {f00=0x007d, f01=0x0190, f02=»************************************** | P* . P* 8 @ P* THIS DRIVER HANDLES ONE LINE PRINTER PTS 6881 CONNECTED B < P* TO CPU VIA CHLP ON MULTIPLEX CHANNEL OR PROGRAMMED P* CHANNEL P* P EJECT DRLP01 P* P*
0x228580…29d200 [0x00c]: Pad {f00=0x007d, f01=0x0190, f02=» ADDRESS BLOCK " P ENTRY ACLP ACTIVATION DRIVER " P ENTRY IHLP INTERRUPT HANDLER < P ENTRY LPON RECOVERY ROUTINE b & P ENTRY DWLP01 DWT FOR LINE PRINTER P P P P* P* , P**************************************** ,
0x228580…29d200 [0x00d]: Pad {f00=0x007d, f01=0x0190, f02=»PATCHER P EXTRN TENDIO END I/O & P EXTRN SAVE8 SAVE 8 REGS ON STACK . P EXTRN DISIOE REQUEST ERROR X EXTRN DWTST STATUS | EXTRN DWTBC BYTE COUNTER EXTRN DWTECB ECB ADDRESS $ EXTRN DWTOR DWT INDEX AND ORDER P EXTRN
0x228580…29d200 [0x00e]: Pad {f00=0x007d, f01=0x018e, f02=» * P EXTRN INTSAV SAVE AREA LAST INTERRUPT P EJECT DRLP01 2 P* J P* T " P***************************** ^ " P* CONSTANTS * " P***************************** P* P* PDWALP EQU /0F & PMUXLP EQU DWALP+
0x228580…29d200 [0x00f]: Pad {f00=0x007d, f01=0x018e, f02=» P* CONDITIONAL ASSEMBLY P* & . P***************************************** 0 P* b 2 P* PROGRAMMED CHANNEL MAY BE USED INSTEAD OF l , P* MULTIPLEX CHANNEL BY SETTING X:A=1 P* PX:A EQU 0 PCHAN EQU 0 P* . P
0x228580…29d200 [0x010]: Pad {f00=0x007d, f01=0x0190, f02=» P* 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. H P* z PCPU852 EQU 0 P* P* MMU BUFFER SIZE P* PX:B EQU 67 PDVBLEN EQU 081 P* P* MMU DEVICE I
0x228580…29d200 [0x011]: Pad {f00=0x007d, f01=0x0190, f02=» P*********************** P* ORDERS * ( P*********************** H P* h P* ORDER /00: TEST STATUS. r 8 P* A TST INSTRUCTION IS EXECUTED TO SEE 0 P* IF LINE PRINTER IS OPERABLE. P*
0x228580…29d200 [0x012]: Pad {f00=0x007d, f01=0x0190, f02=» TO THE LINE PRINTER WITHOUT ANY CHECK. | P* 0 $ P* ORDER /06: STANDARD WRITE. : @ P* FIRST WORD IN ECB BUFFER CONTAINS A CONTROL b P* CHARACTER. < P* /2B: PRINT LINE WITHOUT ADVANCING PAPER : P*
0x228580…29d200 [0x013]: Pad {f00=0x007d, f01=0x0190, f02=» OTHER CHARACTERS GIVES A LINE FEED BEFORE P* PRINTING. 8 P* Z P* d > P* CHARACTERS IN BUFFER SHOULD BE WITHIN THE n > P* INTERVAL /20-/5F. NO CHECK IS CARRIED OUT B P* BY DRIVE
0x228580…29d200 [0x014]: Pad {f00=0x007d, f01=0x0190, f02=»CHARACTER. z P* P EJECT DRLP01 P* 4 P* > ( P************************************ H ( P* NORMAL REGISTER USAGE * t ( P************************************ P* P* P* A1 = RETURN CODE P* A2 = WO
0x228580…29d200 [0x015]: Pad {f00=0x007d, f01=0x0190, f02=» z P* A7 = ORDER P* A8 = ECB ADDRESS P* > P* H $ P******************************** R $ P* TABLES * z $ P******************************** P* P* * P DATA DVBLEN+DVBLEN MMU BUFFER LENGTH
0x228580…29d200 [0x016]: Pad {f00=0x007d, f01=0x0190, f02=» DRLP01 P* P* P* A C T I V A T I O N $ P* D P* N PACLP EQU * X P LDK A1,/0D CARRIAGE RETURN j P LDR A7,A7 ORDER 0 ? P RF(NE) ACLP05 NO P LDKL A4,DWTBC BYTE COUNTER P ADR A4,A6 ADD DWT ADDRESS $ P
0x228580…29d200 [0x017]: Pad {f00=0x007d, f01=0x0190, f02=»,A8 REQ. LENGTH P SUK A7,5 ORDER 5 ? P RF(E) ACLP30 4 P SUK A7,1 ORDER 6 ? J P RF(E) ACLP10 f P* | PACERR ABL DISIOE P* P EJECT DRLP01 P* P* PACLP10 EQU * P CWK A2,2 REQ. LENGTH < 2 ?
0x228580…29d200 [0x018]: Pad {f00=0x007d, f01=0x018e, f02=»ADDRESS ~ & P ADR A3,A2 ADDED WITH REQ. LENGTH $ P SCR A1,A3 STORE PRINT CHARACTER : P ADK A2,1 b P LCR A3,A4 t P ECR A3,A3 & P LC A3,1,A4 GET CONTROL CHARACTER P ST A3,CONCHA P ANK A3,/FF $ P SUK A3,/2B SUPER POSITIONING
0x228580…29d200 [0x019]: Pad {f00=0x007d, f01=0x0190, f02=» P* PACLP15 LDK A1,/0A LINE FEED * P SC A1,1,A4 SECOND CHARACTER IN BUFFER 2 P SUK A3,5 TWO LINE FEEDS ? ` P RF(E) ACLP20 YES P LDK A1,/0C TOP OF FORM P SUK A3,1 WANTED ? P RF(E) ACLP20 YES P LDK A1,/0D CARRIAGE RETUR
0x228580…29d200 [0x01a]: Pad {f00=0x007d, f01=0x0190, f02=»IOSTA SEND BUFFER P SUK A7,6 ORDER 6 ? P RF(NE) ENDIO 6 P LDR A2,A2 L P RF(NN) ACLP35 ^ 4 P IM 6,A8 ADD FOR EXTRA CHAR. AT BUFFER END (/0D) t P* PACLP35 EQU * P LD A4,2,A8 BUFFER ADDRESS P LDKL A3,0 PCONCHA EQU *
0x228580…29d200 [0x01b]: Pad {f00=0x007d, f01=0x0190, f02=»DIO CF A15,TENDIO END REQUEST PEXIT ABL TDISP & P* < P EJECT DRLP01 F P* ^ P* h P* CIOSTA r " P* SUBROUTINE TO SEND BUFFER P* P* PCIOSTA EQU * P ST A5,DWTA5,A6 SAVE A5 P IFT CHAN=0 6 P O
0x228580…29d200 [0x01c]: Pad {f00=0x007d, f01=0x0190, f02=»FIRST WRITE EXTERNAL REGISTER 2 P WER A4,MUXLP+1 SECOND WRITE EXTERNAL REGISTER & P XIF P* h P IFT CHAN=1 r ( P ST A4,DWTA3,A6 SAVE BUFFER ADDRESS P ADR A4,A2 . P ST A4,DWTA4,A6 SAVE BUFFER END ADDRESS+1 P XIF P*
0x228580…29d200 [0x01d]: Pad {f00=0x007d, f01=0x0190, f02=»1 P* P* P* RECOVERY ROUTINE P* < P* F PLPON EQU * P P IFT CPU852=1 b & P CF A15,SAVE8 SAVE A1-A8 ON STACK x P XIF P* P IFT CPU852=0 " P MSR 8,A15 SAVE A1-A8 ON STACK P XIF P* P
0x228580…29d200 [0x01e]: Pad {f00=0x007d, f01=0x018e, f02=»LP30 P* P EJECT DRLP01 P* . P* 8 P* I N T E R R U P T B P* ` P* j PIHLP EQU * t $ P ST P,INTSAV SAVE LAST INTERRUPT P IFT CHAN=0 P IFT CPU852=1 & P CF A15,SAVE8 SAVE A1-A8 ON STACK P XIF
0x228580…29d200 [0x01f]: Pad {f00=0x007d, f01=0x0190, f02=» P STR A1,A15 P STR A2,A15 P LDKL A2,DWLP01 DWT-ADDRESS , 2 P LD A1,DWTA3,A2 POINTER AT NEXT BYTE IN BUFFER P P LCR A2,A1 NEXT BYTE " P OTR A2,0,DWALP WRITE ONE BYTE P RF(NA) IHLP20 NOT ACCEPTED P LDKL A2,DWLP01 DWT-ADDRESS
0x228580…29d200 [0x020]: Pad {f00=0x007e, f01=0x018e, f02=»ALP CIO HALT PIHLP10 EQU * P LDR* A2,A15 ( P LDR* A1,A15 < P RTN A15 P P* ` P* j P* t PIHLP20 STR A3,A15 ~ P STR A4,A15 P STR A5,A15 P STR A6,A15 P STR A7,A15 P STR A8,A15 P XIF P*
0x228580…29d200 [0x021]: Pad {f00=0x007e, f01=0x0190, f02=» P ANK A7,/FF P LD A8,DWTECB,A6 ECB ADDRESS P* < P IFT CHAN=0 F 4 P RER A3,MUXLP GET NUMBER OF NOT TRANSFERED CHAR. Z P ANKL A3,/FFF 8 P LD A2,4,A8 CALCULATE NUMB. OF TRANSFERED CHARACTERS P SUR A2,A3 P XIF P*
0x228580…29d200 [0x022]: Pad {f00=0x007e, f01=0x0190, f02=» RF(NE) IHLP35 P ADK A2,1 YES PIHLP35 EQU * , 8 P SU A2,2,A8 CALCULATE NUMB. OF TRANSFERED CHARACTERS @ P XIF | " P ST A2,6,A8 STORE EFF. LENGTH $ P LD A5,DWTA5,A6 GET STACK VALUE P RTN A5 P* P EJECT DRLP01 P*
0x228580…29d200 [0x023]: Pad {f00=0x007e, f01=0x0190, f02=»L PARAMETER P DATA /8000 STATUS P DATA 0 ECB ADDRESS . P DATA 0 ORDER J ( P DATA LPADR ADDRESS TO ADDRESS BLOCK ` P DATA 0 TTAB ADDRESS $ P DATA 0 WAIT/ACTIVATE INDICATOR P DATA 0 TERMINAL QUEUE IFT MMUPAG=1 & " DATA
0x228580…29d200 [0x024]: Pad {f00=0x007e, f01=0x4118, f02=»A FOR A3 P DATA 0 SAVE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 0 P RES 4 DWT STACK P P* h P IFT MMUPAG=1 r PDEVECB EQU * P DATA 0 P DATA LP:BUF P DATA 0,0,0,0 PLP:BUF RES DVBLEN+1 P XIF P* P E
0x228580…29d200 [0x025]: Pad {f00=0x007e, f01=0x2008, f02=» P DATA 0 TTAB-ADDRESS $ P DATA 0 WAIT/ACTIVATE INDICATOR ( P DATA 0 TERMINAL QUEUE P P DATA 0 OUTPUT QUEUE LINK n P DATA 0 SAVE AREA FOR A3 P DATA 0 SAVE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P RES 4 DWT-STACK P E
0x228580…29d200 [0x026]: Pad {f00=0x007e, f01=0x0190, f02=»619,/1C1F,/1215,/181B,/1E11,/1417,/1A1D P* 0 P EJECT DRDU01 DRDU01 : P* Z P* d P***************** n P* * P* ACTIVATION * P* * P***************** P* P* PDUAD E
0x228580…29d200 [0x027]: Pad {f00=0x007e, f01=0x018e, f02=» SET OTHER DISC UNIT BUSY P XIF " P* . PDUA:00 EQU * 8 0 P LDK A4,QRETRY GET MAX NO OF RETRIES TO MAKE L P ADK A7,0 SET CR " P RF(Z) TEST TEST STATUS ORDER P* P IFT MMUPAG=1 P IFF 1-ONLYDM+DSKPAG=0 & P LDR* A1,A8 GE
0x228580…29d200 [0x028]: Pad {f00=0x007e, f01=0x018e, f02=» P EJECT DRDU01 P* P* & " P LD A2,2,A8 GET BUFFER ADDRESS 0 P LDR A3,A2 V P ANKL A2,/F000 h P SRL A2,2 ~ P SLL A1,2 P ORR A1,A2 4 P ST A1,DWT:PA,A6 PAGE NUMBER (PSEUDO MMU TABLE) P ANKL A3,/FFF P LDR A1,
0x228580…29d200 [0x029]: Pad {f00=0x007e, f01=0x000a, f02=»
0x228580…29d200 [0x02a]: Pad {f00=0x007e, f01=0x0190, f02=» 2 P IDENT DRIC01 9.2DK 0 80-01-02 870105040920 P : P =DK0, MMU BUF SIZE B P 80-03-11 ` P* t P* ~ 2 P********************************************** P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 0 P* DRIC01 = INT
0x228580…29d200 [0x02b]: Pad {f00=0x007e, f01=0x0190, f02=»******** j P* 8 P* THIS MODULE HANDLES THE INTERTASK COMMUNICATION P* V P EJECT DRIC01 ` P* x P* ORDERS: P* P* /02 READ, NOT ADDRESSED " P* /06 WRITE, NOT ADDRESSED P* /0A READ, ADDRESSED P
0x228580…29d200 [0x02c]: Pad {f00=0x007e, f01=0x018e, f02=» z P* A6 DWT ADDRESS P* A7 ORDER CODE $ P* A8 ECB ADDRESS @ , P* A12 ADDRESS TO DRIVER ADDRESS BLOCK P* P EJECT DRIC01 P* P* P*********** P* ENTRIES * P*********** P* P*
0x228580…29d200 [0x02d]: Pad {f00=0x007e, f01=0x0190, f02=» b P EJECT DRIC01 P* P* * P************* 4 P* EXTERNALS * J P************* ` P* v P* P EXTRN TDISP DISPATCHER P EXTRN TENDIO ENDIO P EXTRN DISIOE REQUEST ERROR & P EXTRN DISEND TENDIO AND DISPATC
0x228580…29d200 [0x02e]: Pad {f00=0x007e, f01=0x0190, f02=»T TTAB ADDRESS & P EXTRN DWTSB1 STACK BASE 1 IN DWT & P EXTRN BUFLEN DRIVER BUFFER LENGTH @ P EXTRN SETIMP TIMER j , P EXTRN FNDTID FIND TTAB ADDRESS FROM TID P EXTRN TTB:ST TASK STATUS " P EXTRN TTB:TD TERMINAL DEVICES 4 P EXTRN IHRTN
0x228580…29d200 [0x02f]: Pad {f00=0x007e, f01=0x0190, f02=»CBEL ECB EFFECTIVE LENGTH P EXTRN ECBRC ECB RETURN CODE " " P EXTRN ECBCW ECB CONTROL WORD F P EJECT DRIC01 TOSSIO l P* P* . P***************************************** P* P* CONDITIONAL ASSEMBLY P* . P******
0x228580…29d200 [0x030]: Pad {f00=0x007e, f01=0x018e, f02=»G EQU 1. r P* PMMUPAG EQU 1 P* . 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION 8 . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. r P* PCPU852 EQU 0 P* P* MMU BUFFER SIZE P* PX:A EQU 50 PX:Q EQU
0x228580…29d200 [0x031]: Pad {f00=0x007e, f01=0x0190, f02=» P* P EJECT DRIC01 P* * P* 4 P********************* > P* DWT DISPLACEMENTS * P********************* z P* P* 0 PDWTDRD EQU /10 START OF DRIVER DEFINED PART P* P IFT MMUPAG=0 PSTART EQU
0x228580…29d200 [0x032]: Pad {f00=0x007e, f01=0x0190, f02=»INTER t PDWTIME EQU START+/02 TIME 6 PDWTANC EQU START+/04 POINTER TO FIRST DWT IN QUEUE 0 . PDWTQUE EQU START+/06 QUEUE ANCHOR ADDRESS j P* P EJECT DRIC01 P* P* P***************** P* ADDRESS BLOCK * P****
0x228580…29d200 [0x033]: Pad {f00=0x007e, f01=0x018e, f02=» DATA ICAD ACTIVATION ADDRESS P DATA ITABRT ABORT ADDRESS & P* H P* R 6 PRD:QUE DATA 0 QUEUE ANCHOR NOT ADDRESSED READ REQ. 8 PWR:QUE DATA 0 QUEUE ANCHOR NOT ADDRESSED WRITE REQ. P* $ P* INTERTASK DRIVER BUFFER (MMU) P*
0x228580…29d200 [0x034]: Pad {f00=0x007e, f01=0x0190, f02=» P* A C T I V A T I O N P* " PICAD EQU * , P LDR A1,A7 ORDER CODE TO A1 > P SUK A1,2 b & P RF(Z) RD:NAD READ NOT ADDRESSED? t P SUK A1,4 ( P ABL(Z) WR:NAD WRITE NOT ADDRESSED? P SUK A1,4 " P RF(Z) RD:ADR READ ADDRESSED
0x228580…29d200 [0x035]: Pad {f00=0x007e, f01=0x0190, f02=»* S E T T I M E O U T P* " P LD A2,ECBCW,A8 GET TIME , P ST A2,DWTIME,A6 L P RF END:IO d P* v P EJECT DRIC01 P* P* R E A D, A D D R E S S E D P* " P* W R I T E, A D D R E S S E D P* PRD:ADR EQU
0x228580…29d200 [0x036]: Pad {f00=0x007e, f01=0x0190, f02=»CW,A8 TID & P CF A15,FNDTID TTAB ADDRESS TO A2 P ADK A2,0 SET CR < P RF(Z) DIS:OE NOT FOUND? T P CW A2,DWTTAB,A6 t P RF(E) DIS:OE ILLEGAL TID? 4 P ADKL A2,TTB:TD ADDRESS TO TERMINAL DEVICE TABLE P LDR* A1,A2 TABLE LENGTH $ P LDR
0x228580…29d200 [0x037]: Pad {f00=0x007e, f01=0x0190, f02=» $ P* FIND DWT OF ADDRESSED TASK P* , 0 PADR:20 ADK A2,4 ADDRESS TO NEXT DWT ADDRESS 6 P SUK A1,4 j P RF(N) DIS:OE NOT FOUND? | P* P LDR* A4,A2 DWT ADDRESS " P CW A7,DWTADR,A4 SEARCHED DWT? P RB(NE) ADR:20 NO, TRY NEXT
0x228580…29d200 [0x038]: Pad {f00=0x007f, f01=0x0190, f02=»NCHOR ADDRESS t " P CWR A1,A6 CHECK QUEUE ANCHOR 0 P RF(E) ADR:30 REQUEST ISSUED FOR THIS TASK? < P* p P ANK A7,1 z P RF(Z) ADR:25 READ? P CWK A1,RD:QUE ( P RF(E) ADR:30 COMPLEMENTARY REQUEST? P RF ADR:50 NO P* P
0x228580…29d200 [0x039]: Pad {f00=0x007f, f01=0x0190, f02=» ABORT TIMER IF ANY P* > PADR:30 CF A15,ITAB05 ABORT TIMER AND REMOVE DWT FROM QUEUE & P ANK A7,1 h P RF(Z) RD:N05 READ? z P* P* MOVE BUFFER P* PADR:35 EQU * " P LDKL A5,DWTSB1 GET STACK BASE P ADR A5,A6
0x228580…29d200 [0x03a]: Pad {f00=0x007f, f01=0x0190, f02=»G BUFFER ADDRESS v P ANK A3,1 & P RF(Z) ADR:38 BUFFER ADDRESS EVEN? * : P ORS A3,ECBBA,A9 MAKE RECEIVING BUFFER ADDRESS UNEVEN T P RF END:IO P* PADR:38 EQU * P SUK A3,2 A3 := /FFFE 8 P ANS A3,ECBBA,A9 MAKE RECEIVING BUFFER ADD
0x228580…29d200 [0x03b]: Pad {f00=0x007f, f01=0x0190, f02=»C01 P* P* OUEUE REQUEST P* . . PADR:40 LDK A7,0 INDICATE ADDRESSED REQUEST 8 P* j PADR:50 EQU * t P LD A3,DWTIME,A6 TIME P RF(Z) TWR:30 P ADK A3,1 $ P RF(Z) ADR:70 NO TIMING WANTED? P SUK A3,1 P R
0x228580…29d200 [0x03c]: Pad {f00=0x007f, f01=0x0190, f02=»NTER | P ST A3,TIME P CF A15,SETIMP SET TIMER P DATA TIMOUT TIMEOUT ADDRESS @ PTIME DATA 0 d P* x P EJECT DRIC01 P* ( P* INSERT IN QUEUE WITHIN PRIORITY P* PADR:70 EQU * . P ST A2,DWTQUE,A6 STORE QUEUE
0x228580…29d200 [0x03d]: Pad {f00=0x007f, f01=0x0190, f02=»SED REQUEST? x : P ADK A2,DWTANC POINT TO ADDRESS OF FIRST DWT IN QUEUE P* R PADR:80 LDR A4,A2 SAVE P LDR* A2,A2 NEXT IN QUEUE z P RF(Z) ADR:90 END FOUND? " P LD A5,DWTTAB,A2 TTAB ADDRESS & P CC A1,TTB:ST+1,A5 COMPARE LEVELS
0x228580…29d200 [0x03e]: Pad {f00=0x007f, f01=0x0190, f02=»IOE REQUEST ERROR P* P EJECT DRIC01 $ P* < ( P* R E A D, N O T A D D R E S S E D F P* r $ PRD:NAD EQU * READ, NOT ADDRESSED | < P LD A2,DWTANC,A6 CHECK QUEUE OF ADDRESSED WRITE REQUESTS & P RF(NZ) RD:N10 ANYTHING IN QUEUE?
0x228580…29d200 [0x03f]: Pad {f00=0x007f, f01=0x0190, f02=» n & P ST A3,WR:QUE UPDATE QUEUE ANCHOR P* 2 PRD:N00 EQU * < & P CF A15,ABTIM2 ABORT TIMER IF ANY P P* z PRD:N05 EQU * " P LDR A4,A6 EXCHANGE A2 AND A6 P LDR A6,A2 P LDR A2,A4 P RB ADR:35 P* ( PRD:N10 LDR*
0x228580…29d200 [0x040]: Pad {f00=0x007f, f01=0x0190, f02=»UE ADDRESS r P RB ADR:50 INSERT IN QUEUE P* 4 P EJECT DRIC01 > P* V * P* W R I T E, N O T A D D R E S S E D ` P* & PWR:NAD EQU * WRITE, NOT ADDRESSED < P LD A2,DWTANC,A6 CHECK QUEUE OF ADDRESSED READ REQUESTS & P RF(NZ)
0x228580…29d200 [0x041]: Pad {f00=0x007f, f01=0x0190, f02=»A3,A2 NO, REMOVE FROM QUEUE & P ST A3,RD:QUE UPDATE QUEUE ANCHOR $ P* N , PWR:N05 CF A15,ABTIM2 ABORT TIMER IF ANY X P RB ADR:35 P* ( PWR:N10 LDR* A3,A2 REMOVE FROM QUEUE ( P ST A3,DWTANC,A6 UPDATE QUEUE ANCHOR P RB WR:N05
0x228580…29d200 [0x042]: Pad {f00=0x007f, f01=0x0190, f02=»O U T P* PTIMOUT LDR A6,A1 DWT ADDRESS " P CM* 0,A2 RESET TIMER POINTER < P LDR A2,A6 b $ P CF A15,ITAB10 REMOVE FROM QUEUE t P* PTWR:30 EQU * P CMR A6 RESET QUEUE LINK P LDK A1,/40 RETURN CODE P RB END:IO
0x228580…29d200 [0x043]: Pad {f00=0x007f, f01=0x0190, f02=»WILL UPDATE QUEUE AND ABORT TIMER (IF ANY). P* 4 P* INPUT: A6 = DWT ADDRESS > P* b " P* OUTPUT: A1-A4 ARE DESTROYED l P* PITABRT EQU * P LDR A2,A6 P* PITAB05 EQU * P CF A15,ABTIM ABORT TIMER P*
0x228580…29d200 [0x044]: Pad {f00=0x007f, f01=0x0190, f02=» ITAB20 NOT-ADDRESSED READ REQUEST? P CWK A1,WR:QUE , . P RF(E) ITAB20 NOT-ADDRESSED WRITE REQUEST? B : P ADK A1,DWTANC POINT TO ADDRESS OF FIRST DWT IN QUEUE t P* P EJECT DRIC01 P* P* PITAB20 LDR A4,A1 SAVE P LDR
0x228580…29d200 [0x045]: Pad {f00=0x007f, f01=0x0190, f02=»A4 UPDATE QUEUE LINKS P CMR A2 RESET QUEUE LINK P* > P IFT CPU852=1 H P RF IH:RTN ^ P XIF p P* | P IFT CPU852=0 P RTN A15 P XIF P* P EJECT DRIC01 P* P* A B T I M P* . P* SUBRO
0x228580…29d200 [0x046]: Pad {f00=0x007f, f01=0x0190, f02=» P* PABTIM2 EQU * P CMR A2 RESET QUEUE LINK " P* B PABTIM LDK A1,DWTTP L $ P ADR A1,A2 TIMER POINTER ADDRESS f P LDR* A3,A1 " P RF(Z) IH:RTN NO TIMER ACTIVE? P CM* 0,A1 " P CMR A1 INDICATE NO TIMER SET P* P
0x228580…29d200 [0x047]: Pad {f00=0x007f, f01=0x018e, f02=» EJECT DRIC01 P* P* M O V B U F " P* 8 4 P* SUBROUTINE TO MOVE BUFFER FROM SENDING TASK B P* TO ADDRESSED TASK. z > P* EFFECTIVE LENGTH IN BOTH INPUT AND OUTPUT ECB ARE SET. B P* A1 WILL CONTAIN RETURN CODE /8 IF SENDING RE
0x228580…29d200 [0x048]: Pad {f00=0x007f, f01=0x0190, f02=» X P* P* INPUT PARAMETERS: P* A2 RECEIVING DWT 0 P* A5 STACK POINTER N P* A6 SENDING DWT l P* P* REGISTER USAGE: P* A1 RETURN CODE P* A2 DWT RECEIVING TASK P* A3 WORKING REGISTER
0x228580…29d200 [0x049]: Pad {f00=0x007f, f01=0x0190, f02=» A8 ECB ADDRESS SENDING TASK & P* A9 ECB ADDRESS RECEIVING TASK & P* P PMOVBUF EQU * Z P LD A8,DWTECB,A6 SENDING ECB n $ P ENB GIVE OTHER TASKS A CHANCE P* P EJECT DRIC01 P* P* P LDK A1,0 " P LD A9,D
0x228580…29d200 [0x04a]: Pad {f00=0x007f, f01=0x0190, f02=»V:05 , P LDK A1,8 RETURN CODE (INCORRECT LENGTH) P LD A3,ECBRL,A9 < P RB(N) DIS:OE T P* j PMOV:05 EQU * t P IFT MMUPAG=1 6 P LDKL A4,ITAD GET ADDRESS TO DRIVER ADDRESS BLOCK * P CW A3,BUFLEN,A4 CHECK MMU BUFFER SIZE , P RF(
0x228580…29d200 [0x04b]: Pad {f00=0x007f, f01=0x018e, f02=» P* ! PMOV:10 EQU * ! P XIF ! " P* ! . P ! 8 $ P ST A3,ECBEL,A8 EFFECTIVE LENGTH ! @ $ P ST A3,ECBEL,A9 EFFECTIVE LENGTH ! h P* ! P EJECT DRIC01 ! P* ! P* ! P IFT MMUPAG=0 ! * P LD A4,ECBBA,A8 SENDING BUFFER ADDRESS ! , P
0x228580…29d200 [0x04c]: Pad {f00=0x007f, f01=0x40e0, f02=» ! j P LCR A9,A4 " P SCR A9,A7 " P ADK A4,1 " , P ADK A7,1 " > P RB MOV:15 " P P* " b PMOV:20 EQU * " l P XIF " P* " P INH " P RTN A5 " P* " P* " P* " P END " @ " A4,ECBBA,A8 SENDING BUFFER ADDRESS ! , P
0x228580…29d200 [0x04d]: Pad {f00=0x007f, f01=0x2008, f02=» # A5 END @ ODE LD A3,4,A1 0 D MOV:10 EQU * L & " LD A4,2,A8 SENDING BUFFER ADDRESS ` " LD A7,2,A2 REC. BUFFER ADDR. ADR A3,A4 END OF BUFFER CWR A4,A3 " RF(E) MOV:20 ALL CHAR. MOVED L
0x228580…29d200 [0x04e]: Pad {f00=0x007f, f01=0x018e, f02=»IO A2,1,DAF2 CIO-START FIXED DISC ; , P CIO A2,1,DAC2 CIO-START CARTRIDGE DISC < * P* < Z P EJECT DRDU01 < d P* < | P* < P WER A2,WER1 < P WER A3,WER1+1 < & P DATA 0,0,0 VOLUME NAME FIXED DISC < * P DATA 0,0,0 VOLUME NAME CARTRIDGE DISC
0x228580…29d200 [0x04f]: Pad {f00=0x007f, f01=0x018e, f02=» < P IFT NUNITS+TYPE2=3 = P DATA MAXCY6 MAX CYLINDER NO = $ P XIF = H P* = T P IFT NUNITS=2 = ^ P IFT MMUPAG=1 = t * P DATA 0 PAGE NUMBER (PSEUDO MMU TABLE) = * P DATA 0 16 BIT LOGICAL BUFFER ADDRESS = PECBDU2 EQU * = P DATA 0,0,0,0,0,
0x228580…29d200 [0x050]: Pad {f00=0x007f, f01=0x0190, f02=» = P* > PDWDU01 EQU * > & P DATA DWDU02 POINTER TO OTHER DWT > & P DATA /8000 DWT STATUS > P P DATA 0 ECB ADDRESS > n P DATA 0 ORDER > " P DATA DUADR ACTIVATION ADDRESS > P DATA 0 TTAB ADDRESS > $ P DATA 0 WAIT/ACTIVATE INDICATOR > P
0x228580…29d200 [0x051]: Pad {f00=0x007f, f01=0x002a, f02=» ( 0 8 @ x
0x228580…29d200 [0x052]: Pad {f00=0x007f, f01=0x0190, f02=» 2 P IDENT DRDC15 9.2DK 2 80-01-03 870105040920 P : P DK2, TBUFL B P 80-03-11 X 0 P DK, COND.ASM., TIMPRO, TIMNAK, READ BUF. l P 80-03-11 P REL 9.1 79-08-16 P =8, ASCII-MODE FOR SALCUZ P REL 9.1 79-07-19
0x228580…29d200 [0x053]: Pad {f00=0x007f, f01=0x0190, f02=»9-05-23 $ P =5, INCOMPLETE POLL SEQUENCE P REL 9.1 79-05-23 8 P =3, TRANSFER PARAMETER T P PRR 9.1 79-04-06 v P =4, ANY MESSAGE ORDER P PRR 9.1 79-04-06 P =2, ABORT HANDLING P PRR 9.1 78-11-29 P
0x228580…29d200 [0x054]: Pad {f00=0x007f, f01=0x0190, f02=»*********************** z P* $ P* PHILIPS TERMINAL SYSTEM PTS * P* R * P* DRDC15: DRIVER DATA COMMUNICATION . P* BSC MULTIPOINT LINE PROCEDURE P* OR SIEMENS MSV1 P* P* P* P* P*
0x228580…29d200 [0x055]: Pad {f00=0x007f, f01=0x0190, f02=» ENTRY DC15AD ADDRESS BLOCK TERMINAL REQUESTS " P ENTRY IH1501 INPUT INTERRUPT 6 " P ENTRY IH1502 OUTPUT INTERRUPT " P ENTRY DC15ON POWER ON ROUTINE " P ENTRY DW1500 DWT FOR DC TASK P* P* P* EXTERNAL REFERENCES P* P
0x228580…29d200 [0x056]: Pad {f00=0x007f, f01=0x0190, f02=»XTRN DISIOE REQUEST ERROR P EXTRN SETIME SET TIMER " P EXTRN DWTST DWT STATUS B P EXTRN DWTOR DWT ORDER b P EXTRN DWTECB DWT ECB * P EXTRN INTSAV SAVE AREA LAST INTERRUPT ( P EXTRN TEBCDIC ASCII TO EBCDIC TABLE ( P EXTRN TASCII EBCD
0x228580…29d200 [0x057]: Pad {f00=0x007f, f01=0x0190, f02=» LENGTH v P EXTRN ECBRC ECB RETURN CODE " P EXTRN ECBCW ECB CONTROL WORD 4 * P EXTRN DC:MIN MOVE DATA TO USER BUFFER Z , P EXTRN DC:MOT MOVE DATA FROM USER BUFFER 0 P EXTRN DISEND COMPLETE REQUEST AND DISPATCH P EJECT P* P*
0x228580…29d200 [0x058]: Pad {f00=0x0080, f01=0x0190, f02=»TS P* J P* DWTCHP TERMINAL ADDRESS AS GIVEN AT PARAMETER TRANSFER (BIT #08-#15) P* b P EJECT l < P******************************************************* z P* * P* PARAMETERS FOR CONDITIONAL ASSEMBLY P* ( PXRVI EQU /5C S
0x228580…29d200 [0x059]: Pad {f00=0x0080, f01=0x0190, f02=» BUFFER LENGTH | PRBUFL EQU 650+X:X DK PX:B EQU /60 DCTASK FILE CODE 4 PDC15FC EQU /60 X $ PX:C EQU 1 IF 1 INTERRUPT LOGGING n PLOGG EQU 0 P* * PTIMPOL EQU 600 POLL TIMEOUT VALUE DK * PX:E EQU 1 STATUS AND RVI HANDLING IF=1
0x228580…29d200 [0x05a]: Pad {f00=0x0080, f01=0x0190, f02=»U 252 ( PX:H EQU 1 CODE , 0=ASCII , 1=EBCDIC PCODE EQU 1 : * PX:I EQU 0 IF 1 SPECIFIC POLL HANDLING L PSPECP EQU 0 z , PX:J EQU 1 IF = 1 LINE SPEED SET TO HIGH ( P IF = 0 LINE SPEED IS SET TO LOW PSPEED EQU 1 * PX:K EQU 0 IF
0x228580…29d200 [0x05b]: Pad {f00=0x0080, f01=0x0190, f02=» = 1 PTS 6805 ADAPTION SALCUZ PP6805 EQU 00 & PX:N EQU /02 : P IFT P6805=0 N , PLCUIN EQU 02 DEVICE ADDRESS OF RECEIVER b P XIF P IFT P6805=1 , PLCUIN EQU /0A DEVICE ADDRESS OF RECEIVER P XIF PX:O EQU 0 , PIBMCHR EQU
0x228580…29d200 [0x05c]: Pad {f00=0x0080, f01=0x0190, f02=»ON PACKAGE, IF NOT = 0 v PEM3270 EQU 1 PX:R EQU 1000 2 P DK2 F * PBINTRM EQU 0 IF 1 BINARY TRANSMISSION V , PTSTREQ EQU 0 IF 1 TEST REQUEST HANDLING , PDMRK EQU 1 SPECIAL CONDITION FOR DENMARK 4 PNOWACK EQU 0 WHEN WORKING WITH A MAIN-
0x228580…29d200 [0x05d]: Pad {f00=0x0080, f01=0x0190, f02=»ING IF STAT IS SET TO "ONE". P IFT P6805=0 SALCUZ $ < PLCUUT EQU LCUIN+/10 DEVICE ADDRESS OF TRANSMITTER SALCUZ @ P XIF SALCUZ P IFT P6805=1 < PLCUUT EQU LCUIN+/01 DEVICE ADDRESS OF TRANSMITTER SALCUZ P XIF SALCUZ P* P
0x228580…29d200 [0x05e]: Pad {f00=0x0080, f01=0x018e, f02=»***************************************** P* 2 . P* A PROGRAM VERSION USING TOSS MMU PAGING < * P* IS OBTAINED BY SETTING MMUPAG EQU 1. n P* PMMUPAG EQU 1 P* P DB P IFT MMUPAG=0 DK2 PTBUFL EQU 0 DK2 P XIF
0x228580…29d200 [0x05f]: Pad {f00=0x0080, f01=0x0190, f02=» 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. > P* p PCPU852 EQU 0 z P* 2 PDEVIND EQU -2 DEVICE INDEX DATA COMMUNICATION * PBUFLEN EQU TBUFL+TBUFL MMU BUFFER SIZE P* P EJE
0x228580…29d200 [0x060]: Pad {f00=0x0080, f01=0x018e, f02=» PSTART EQU DWTDRD P XIF P* , P IFT MMUPAG=1 6 PSTART EQU DWTDRD+4 L P XIF f P* r 4 PDWTTP EQU START+/00 TIMER POINTER ORDER PROCESS | . PDWTWQ EQU START+/02 WRITE/GET BUFFER QUEUE $ PDWTSQ EQU START+/04 STATUS QUEUE
0x228580…29d200 [0x061]: Pad {f00=0x0080, f01=0x0190, f02=» j , PDWTTIM EQU START+/0C REQUEST TIMER VALUE P* 8 P EJECT B P* P P* REQUEST HANDLING Z P* t P* ~ P* P* A7=ORDER P* P* /02: READ P* /06: WRITE P* /37: TRANSFER PARAMETERS P* /38: SET STATUS
0x228580…29d200 [0x062]: Pad {f00=0x0080, f01=0x0190, f02=»0 ON- / OFFLINESWITCH * PDCSTOL DATA 0 OLD DC EQUIPMENT STATUS PDCSTCU DATA 0 CURRENT STATUS L $ PDCWRQ DATA 0 WRITE REQUEST QUEUE p , PDCTPGP DATA 0 TIMER POINTER GENERAL POLL P EJECT P* P* DC TASK ADDRESS BLOCK P* $ P
0x228580…29d200 [0x063]: Pad {f00=0x0080, f01=0x0190, f02=»ORT ROUTINE ADDRESS $ P DATA DCRBUF REC. BUFFER ANCHOR P* D P* DRIVER ADDRESS BLOCK N P* l P DATA BUFLEN MMU BUFFER SIZE v P DATA DEVIND DEVICE INDEX ( PDC15AD DATA DCACT ACTIVATION ADDRESS 4 P DATA ABORT ABORT ROUTINE ABORT RO
0x228580…29d200 [0x064]: Pad {f00=0x0080, f01=0x018e, f02=» " P RES 1 AND FOR TRANSFER PARAM PSTB2 RES 1 * P < P IFT SPEED=1 D PLSPEED EQU /0200 X P XIF p P IFT SPEED=0 | PLSPEED EQU 0 P XIF P EJECT P* P* $ P* ACTIVATION FROM TERMINAL TASKS P* PDCACT
0x228580…29d200 [0x065]: Pad {f00=0x0080, f01=0x0190, f02=» l P XIF P SUK A7,/02 P RF(Z) DCRD READ SPECIFIC ( P SUK A7,/06-/02 J P RF(Z) DCWR b P SUK A7,/37-/06 v $ P RF(Z) DCTP TRANSFER PARAMETERS P IFF STAT=0 P SUK A7,/38-/37 P RF(Z) DCSS SET STATUS P SUK A7,/3
0x228580…29d200 [0x066]: Pad {f00=0x0080, f01=0x0190, f02=»T REQUEST TIMER P XIF P RF DCA100 $ P EJECT 6 P* D P* N P* ACTIVATION FROM DCTASK X P* x P* PDCACTD EQU * $ P SUR A1,A1 PRESET RETURN CODE =4 P IFT EM3270=1 =4 P LDR A7,A7 =4 & P RF(Z) ANYMSG ANY
0x228580…29d200 [0x067]: Pad {f00=0x0080, f01=0x0190, f02=»ERS t P PDCA100 EQU * REQUEST ERROR P ABL DISIOE INVALID ORDER 6 P* X P* b P* READ FROM DCTASK l P* P* P* REQUEST FROM DC-TASK P* COMPLETE WHEN: & P* STATUS CHANGE ON DC EQUIPMENT $ P* SPONTANOUS M
0x228580…29d200 [0x068]: Pad {f00=0x0080, f01=0x0190, f02=»O TO DISPATCHER P IFT EM3270=1 =4 P EJECT 2 . P***************************************** @ P* r P* ANY MESSAGE ORDER | P* " P***************************** P 2 PANYMSG LD A4,DWTRQ,A6 ANY QUEUED MESSAGE ?? =4 P R
0x228580…29d200 [0x069]: Pad {f00=0x0080, f01=0x0190, f02=»ETERS P* P* > P* REQUEST FROM DC-TASK: TRANSFER TERMINAL COMPUTER ADDRESS " : P* FROM TERMINALS: TRANSFER TERMINAL ADDRESSES d P* P* P IFF CODE=1 & PDCTP LD A2,ECBCW,A8 GET PARAMETER P XIF P IFT CODE=
0x228580…29d200 [0x06a]: Pad {f00=0x0080, f01=0x0190, f02=» P SLL A2,8 PDCTP10 EQU * $ P LC A3,ECBCW+1,A8 GET TCP OR DV * P ANK A3,/FF R ( P LC A2,TASCII,A3 TRANSLATE TO ASCII f P XIF ( P STR A2,A6 SAVE IN FIRST WORD OF DWT P P IFT RCOM=1 * P LD A3,ECBBA,A8 DEVICE BUFFER ADDRES
0x228580…29d200 [0x06b]: Pad {f00=0x0080, f01=0x0190, f02=»K DWT ??? | 2 P RF(E) DCTP30 YES!!! SHOULD NOT BE IN DC:TAB * P LD A1,DC:IN GET DC:TAB INPUT POINTER H * P CWK A1,DC:END TABLE ALREADY FULL ???? v & P ABL(E) DISIOE YES!! REQUEST ERROR P EJECT P P PDCTP20 EQU * " P LD A4,DCT
0x228580…29d200 [0x06c]: Pad {f00=0x0080, f01=0x0190, f02=»RIES CHECKED?? =3 | * P RF(E) DCTP25 YES.DWT NOT IN TABLE =3 P CWR* A6,A4 IN TABLE ?? =3 H P RF(E) DCTP30 YES!! =3 j " P RB DCTP22 CHECK NEXT ENTRY =3 PDCTP25 EQU * =3 P $ P STR A6,A1 INSERT DWT IN DC:TAB P LDK A1,2 * P A
0x228580…29d200 [0x06d]: Pad {f00=0x0080, f01=0x0190, f02=» END P ORS A1,DWTST,A6 ( P CF A15,INSSQ INSERT IN STATUS QUEUE $ P XIF P PDCTP30 EQU * P SUR A1,A1 RETURN CODE ::= 0 p PENDIO EQU * $ P CF A15,TENDIO COMPLETE REQUEST P RB DCRTN P EJECT P* P* P* WRIT
0x228580…29d200 [0x06e]: Pad {f00=0x0080, f01=0x0190, f02=»QU * P IFT MMUPAG=1 $ P LD A1,ECBRL,A8 REQUESTED LENGTH " " P CWK A1,BUFLEN ILLEGAL LENGTH? J P RF(G) IL:LEN YES!! p P XIF P CF A15,TIMEWR SET TIMER P CF A15,INSWQ QUEUE REQUEST P RB DCRTN P* P* P*
0x228580…29d200 [0x06f]: Pad {f00=0x0080, f01=0x0190, f02=»QU * P LD A8,DWTECB,A6 GET ECB . P LD A4,DWTRQ,A6 AND RECEIVE MESSAGE QUEUE , " P RF(Z) DCRD10 NOTHING IN QUEUE ^ P P P ( P LDR* A2,A4 TAKE THE FIRST IN QUEUE P ST A2,DWTRQ,A6 P ADK A4,6 " P LD A3,-4,A4 EFFECTIVE L
0x228580…29d200 [0x070]: Pad {f00=0x0081, f01=0x0190, f02=»RTN P $ PDCRD10 CF A15,TIMERE START TIMER P RB DCRTN < P EJECT N P* P* f P* SET STATUS p P* P* P IFF STAT=0 PDCSS EQU * * P LD A1,ECBCW,A8 GET STATUS INFORMATION P ANK A1,3 MASK DB,IR P R
0x228580…29d200 [0x071]: Pad {f00=0x0081, f01=0x0190, f02=»A1,DWTST,A6 P ANK A1,9 ( P RB(Z) DCSS10 WACK HAS NOT BEEN SENT & PDCSS30 EQU * R , P CF A15,INSSQ INSERT DWT IN STATUS QUEUE f P LDK A1,4 SET DE P RB DCSS10 P XIF P EJECT P P* " P* SET REQUEST TIMEOUT VALUE
0x228580…29d200 [0x072]: Pad {f00=0x0081, f01=0x0190, f02=» RB DCTP30 TENDIO & DISPATCH P $ P* , ( P* ILLEGAL APPLICATION BUFFER SIZE 6 P* b P l 8 PIL:LEN LDKL A1,/8008 REQUEST ERROR + ILLEGAL LENGTH t P ABL DISEND COMPLETE REQUEST P EJECT P* P* P* P* TIMER HA
0x228580…29d200 [0x073]: Pad {f00=0x0081, f01=0x0190, f02=»WTTIM,A6 GET REQUEST TIMEOUT VALUE P RF(Z) TIME10 NO TIMING ! * P ST A2,TIMERR ! J P CF A15,SETIME ! ` P DATA TOUTRE ! v PTIMERR DATA 0 ! ( P ST A4,DWTTP,A6 STORE TIMER POINTER ! PTIME10 EQU * ! P RF GBUF10 RETURN ! P* ! P* TIME
0x228580…29d200 [0x074]: Pad {f00=0x0081, f01=0x018e, f02=»DICATE TIME OUT ! $ PTOUTR2 RB ENDIO COMPLETE REQUEST " P* " @ P* WRITE TIMER=TIMWR " J P* " f PTIMEWR LDR A1,A6 " p . P LD A2,DWTTIM,A6 GET REQUEST TIMEOUT VALUE " P RB(Z) TIME10 NO TIMING " P ST A2,TIMWR " P CF A15,SETIME " P DATA
0x228580…29d200 [0x075]: Pad {f00=0x0081, f01=0x0190, f02=» " PTOUTWR EQU * # P LDR A6,A1 FETCH DWT # P CM DWTTP,A6 # 8 * P CF A15,REMOVW REMOVE FROM WRITE QUEUE # L P* # z & P* THIS INSTRUCTION DOES NOT BELONG # P* TO THE STANDARD INTERFACE # P LD A2,FDWTUT # P CWR A2,A6 # * P RB(NE) TOUTR1 T
0x228580…29d200 [0x076]: Pad {f00=0x0081, f01=0x0190, f02=»CT # P* $ P* $ P* STOP REQUEST TIMING $ P* $ < & P* REMAINING TIME IS RETURNED IN A2 $ F P* $ p P* $ z PCTIME EQU * $ & P LD A2,DWTTP,A6 GET TIMER POINTER $ P RF(Z) CTIM10 NOT RUNNING $ P LDR* A2,A2 $ " P NGR A2,A2 GET REM
0x228580…29d200 [0x077]: Pad {f00=0x0081, f01=0x0190, f02=»* GET RECEIVE BUFFER $ P* % $ P* CALLING SEQUENCE: CF A15,GRBUF % & P* A4=0 IF NO BUFFER IS FREE % N & P* ELSE A4 CONTAINS BUFFER ADDRESS % r P* A2 AND A3 ARE DESTROYED % P* % P* % ( PGRBUF LDKL A2,DCRBUF RECEIVE BUFFERS % PGBUF INH %
0x228580…29d200 [0x078]: Pad {f00=0x0081, f01=0x0190, f02=» ADKL A15,4 ADJUST STACK POINTER % P ABR* A15 RETURN TO CALLER & ( P EJECT & J P* & X P* & b ( P* INSERT DWT IN WRITE REQUEST QUEUE & l P* & P* A2,A3,A4 DESTROYED & P* A6=DWT & P* & ( PINSWQ LDKL A2,DCWRQ GET QUEUE ANCHOR & PINSWQ1
0x228580…29d200 [0x079]: Pad {f00=0x0081, f01=0x018e, f02=» A4,A6 & P STR A4,A2 INSERT IN QUEUE ' " P CMR A4 INDICATE END OF QUEUE ' 0 P RB GBUF10 RETURN ' V P* ' p P* ' z * P* REMOVE DWT FROM WRITE REQUEST QUEUE ' P* ' P* A2,A3,A4 DESTROYED ' P* A6=DWT ' P* ' * PREMOVW LDKL A2,DCWRQ GET
0x228580…29d200 [0x07a]: Pad {f00=0x0081, f01=0x0190, f02=» ' ~ & P RB(Z) GBUF10 NOT ON QUEUE: RETURN ( P CWR A3,A4 ( 2 P RF(E) REM15 ( D P LDR A2,A3 GET NEXT ( X P RB REM10 ( t PREM15 LDR* A3,A4 REMOVE ( P STR A3,A2 ( P RB GBUF10 RETURN ( P EJECT ( P* ( P* ( P* INSERT DWT IN STATUS
0x228580…29d200 [0x07b]: Pad {f00=0x0081, f01=0x018e, f02=» ( l P LDK A4,DWTSQ ) P RB INSWQ2 ) P* ) 0 P* ) : " P* REMOVE DWT FROM STATUS QUEUE ) D P* ) j P* A2,A3,A4 DESTROYED ) t P* A6=DWT ) P* ) * PREMOVS LDKL A2,DCSTQ GET QUEUE ANCHOR ) P LDK A4,DWTSQ ) P RB REM06 ) P XIF )
0x228580…29d200 [0x07c]: Pad {f00=0x0081, f01=0x0190, f02=» P* * PQRBUF EQU * * P IFT MESPAS=1 * " ( P LDKL A2,DW1500 QUEUE ON DC-TASK DWT * 8 P XIF * d P IFT MESPAS=0 * p $ P LDR A2,A6 QUEUE ON TERMINAL DWT * P XIF * , P ADK A2,DWTRQ BEGINNING OF RECEIVE QUEUE * PQR100 EQU * * P LDR* A3,A2
0x228580…29d200 [0x07d]: Pad {f00=0x0081, f01=0x0190, f02=»INDICATE END OF QUEUE * P RTN A5 + P EJECT + . P* + < P* + F 2 P* CHECK IF UNEXPECTED MESSAGE OR STATUS CHANGE + P P* + 4 P* REGISTERS A1,A2,A3,A4,A6 AND A8 ARE DESTROYED + P* + PCKMESS LDKL A6,DW1500 + P LD A1,DWTST,A6 + P R
0x228580…29d200 [0x07e]: Pad {f00=0x0081, f01=0x0190, f02=»DDR TO A8 + z * P LD A3,DWTRQ,A6 A3=ADDR TO READ QUEUE , " P RF(Z) CKM200 NO READ IN QUEUE , @ P , f P , n , P LDR* A2,A3 A2=ADDR TO NEXT READ BUFFER , v . P ST A2,DWTRQ,A6 STORE THIS ADDR INTO QUEUE , " P ADK A3,6 MOVE POINTER TO TEXT , & P DONT DEST
0x228580…29d200 [0x07f]: Pad {f00=0x0081, f01=0x0190, f02=»,A8 STORE LINE DEVICE ADDRESS , P - & P LDK A1,0 RESET RETURN CODE - . & P LDR A4,A3 RECEIVE BUFFER ADDRESS - R , P CF A15,DC:MIN MOVE DATA TO USER BUFFER - | * PCKM110 ADKL A15,4 ADJUST STACK POINTER - P ABR* A15 RETURN - 8 PCKM200 LD A1,DCSTCU NO M
0x228580…29d200 [0x080]: Pad {f00=0x0081, f01=0x0190, f02=» CKM110 NO CHANGE OF STATUS - * P ORKL A1,/2000 INDICATE STATUS CHANGE . $ 0 P CF A15,TENDIO COMPLETE READ GENERAL REQUEST . R P RB CKM110 . P EJECT . P . @ P************************************************************ . P* . P* ABORT ROU
0x228580…29d200 [0x081]: Pad {f00=0x0081, f01=0x0190, f02=» . r P CM* DWTTP,A6 KILL TIMER / P CM DWTTP,A6 / ( P / < $ PAB:10 LD A1,DWTOR,A6 ORDER CODE / D P SUK A1,2 / l * P RF(Z) AB:RTN READ REQUEST. NO ACTION / ~ P SUK A1,4 / . P RF(NZ) AB:RTN NO ACTION IF NOT READ/WRITE / P / . P CF A15,REMOVW REM
0x228580…29d200 [0x082]: Pad {f00=0x0081, f01=0x0190, f02=»CK RESET ACK EXPECTED / P CM FDWTUT RESET WRITING DWT 0 P 0 B PAB:RTN EQU * 0 J P IFT CPU852=1 0 ^ P ADKL A15,4 0 t $ P ABR* A15 RETURN IN INHIBIT MODE 0 P XIF 0 P IFF CPU852=1 0 P RTN A15 0 P XIF 0 P EJECT 0 P 0 P EJECT
0x228580…29d200 [0x083]: Pad {f00=0x0081, f01=0x0190, f02=»G SEQUENCE: CF A15,LDREG 0 P* 1 P* 1 * PSTREG ST A3,LCA3 1 4 P ST A4,LCA4 1 L P ST A5,LCA5 1 ` P ST A6,LCA6 1 t P ST A7,LCA7 1 P ST A8,LCA8 1 P RF RTNA15 RETURN 1 P EJECT 1 PLDREG LDKL A3,0 1 PLCA3 EQU *-2 1 P LDKL
0x228580…29d200 [0x084]: Pad {f00=0x0081, f01=0x0190, f02=» *-2 1 P LDKL A8,0 2 PLCA8 EQU *-2 2 PRTNA15 EQU * 2 2 P ADKL A15,4 2 F P ABR* A15 2 Z P EJECT 2 l P* 2 z P* 2 P* TIMER VALUES 2 P* 2 P* 2 * PTIMPRO EQU 90 PROCEDURE TIMER 9 SEC DK 2 " PTIMNAK EQU 3 DELAY FOR NAK DK 2
0x228580…29d200 [0x085]: Pad {f00=0x0081, f01=0x0190, f02=» 2 PETX EQU /03 3 PETB EQU /17 3 PITB EQU /1F 3 0 PSOH EQU /01 3 D PENQ EQU /05 3 X PDLE EQU /10 3 l PEOT EQU /04 3 PNAK EQU /15 3 PESC EQU /1B 3 PSBA EQU /11 3 PGP EQU /22 3 PRDBCOM EQU /32 3 PRDMCOM EQU /36 3
0x228580…29d200 [0x086]: Pad {f00=0x0081, f01=0x0190, f02=»0 3 PWACK EQU /3B 4 P XIF 4 P IFT CODE=0 4 * P IFT MSV1=1 4 > 0 PWACK EQU /BF =WABT - SIEMENS MSV1 PROCEDURE 4 R P XIF 4 P IFT CODE=1 4 PPAR EQU /00 4 PWACK EQU /2C 4 PRVI EQU XRVI DK 4 PACK0 EQU /18 4 PACK1 EQU /2F 4
0x228580…29d200 [0x087]: Pad {f00=0x0081, f01=0x0190, f02=» CURRENT DWT FOR RECEPTION 4 . PFDWTUT RES 1 CURRENT DWT FOR TRANSMISSION 5 " PXACK DATA 0 ACK EXPECTED 5 T PXSEL DATA 0 SELECTED 5 t PXETX DATA 0 ETX SENT 5 2 PXSTA DATA 0 STATUS SENT / MESSAGE INPUT RESULT 5 " PXRB DATA 0 READ BUFFER SWITCH 5 PCA
0x228580…29d200 [0x088]: Pad {f00=0x0081, f01=0x0190, f02=»NG BUFFER ADDRESS 5 ~ & PFECBRL RES 1 WRITING BUFFER LENGTH 6 PFBAX DATA 0 BUFFER INDEX 6 D 0 PFBLST DATA 0 START OF LAST TRANSMITTED BLOCK 6 d $ PDCSTQ DATA 0 STATUS QUEUE ANCHOR 6 . PDCTPP DATA 0 POINTER FOR PROCEDURE TIMING 6 , PRESEND DATA 0 CONTROL SE
0x228580…29d200 [0x089]: Pad {f00=0x0081, f01=0x0190, f02=» P* 7 P IFF STAT=0 7 . PSSTAB EQU * S/S 0 : NO STATUS,DB,DE,DB+DE 7 " P* 7 T P* 7 ^ P DATA /4248 7 h P DATA /4242 7 | P* 7 2 PNOIR EQU /20 S/S 1 : NO INTERVENTION REQUIRED 7 , PIR EQU /26 S/S 1 : INTERVENTION REQUIRED 7 P XIF 7
0x228580…29d200 [0x08a]: Pad {f00=0x0081, f01=0x0190, f02=» MASTER SIDE 7 z P* 8 P* 8 P IFT P6805=1 SALCUZ 8 ( , PBRMHLT CF A5,HALTIN HALT RECEIVER SALCUZ 8 D P XIF SALCUZ 8 t PBRM EQU * 8 P LDKL A5,STB LOAD STACKBASE 8 P IFT P6805=0 SALCUZ 8 2 P CF A5,HALTIN HALT RECEIVER AND UPDATE STATUS
0x228580…29d200 [0x08b]: Pad {f00=0x0081, f01=0x0190, f02=»M010 EQU * 8 P IFT CODE+P6805=0 SALCUZ 9 0 P LDKL A2,/100+LSPEED+SYN SPECIFY SYN PATTERN 9 4 P XIF SALCUZ 9 h P IFT P6805=0 SALCUZ 9 ~ P IFT CODE=1 9 4 P LDKL A2,/100+LSPEED+SYNEBC SPECIFY SYN PATTERN 9 P XIF SALCUZ 9 P IFT P6805=0
0x228580…29d200 [0x08c]: Pad {f00=0x0081, f01=0x0190, f02=» A2,/0C SALCUZ 9 * P CIO A2,1,LCUIN START RECEIVER SALCUZ : P LDK A2,SYN SALCUZ : F 2 P OTR A2,1,LCUIN SPECIFY SYNC CHARACTER SALCUZ : b P RB(NA) BRMHLT SALCUZ : P XIF SALCUZ : P IFT CODE+P6805=2 SALCUZ : P LDK A2,0 SALCUZ : * P C
0x228580…29d200 [0x08d]: Pad {f00=0x0081, f01=0x0190, f02=») BRMHLT SALCUZ : P XIF SALCUZ ; PBRM100 EQU * ; . $ P CF A5,READP READ ONE CHARACTER ; B P RF(NZ) BRM150 PARITY ERROR ; j P LDR A1,A2 ; P SUK A1,STX ; P RF(Z) BRM300 STX RECEIVED ; P SUK A1,EOT-STX ; P RF(Z) BRM200 EOT RECEIVED ;
0x228580…29d200 [0x08e]: Pad {f00=0x0081, f01=0x018e, f02=»NAK-DLE ; P ABL(Z) BRM500 NAK RECEIVED < P IFT MSV1=0 < 4 P LDR A8,A2 < H $ P CF A5,READP READ ONE CHARACTER < Z P RF(NZ) BRM150 PARITY ERROR < P CWR A2,A8 < & P RF(NE) BRM150 INVALID ADDRESSING < P XIF < P LDK A3,0 < P CC A2,DW1
0x228580…29d200 [0x08f]: Pad {f00=0x0081, f01=0x0190, f02=» < P CF A5,READP READ 1:ST STA = P RF(NZ) BRM150 PARITY ERROR = * P LDR A8,A2 = N P IFT MSV1=0 = ` P CF A5,READP READ 2:ND STA = t P RF(NZ) BRM150 PARITY ERROR = P CWR A2,A8 = , P RF(NE) BRM150 INVALID ADDRESS SEQUENCE = P XIF = " P C
0x228580…29d200 [0x090]: Pad {f00=0x0082, f01=0x018e, f02=» P SUK A2,ENQ SALCUZ > P XIF SALCUZ > P RF(NZ) BRM150 NOT ENQ > 6 P IFT P6805=0 SALCUZ > T $ P CF A5,READ READ LAST CHARACTER > p P > " P* TRAILING PAD CAN BE CHECKED > P > P CIO A1,0,LCUIN HALT INPUT > P SST A1,LCUIN > P XIF
0x228580…29d200 [0x091]: Pad {f00=0x0082, f01=0x0190, f02=» P XIF SALCUZ ? P LDK A1,1 ? P ST A1,CACK LOAD ACK COUNTER ? , P LDR A2,A8 ? P P SUK A3,2 ? b P RF(Z) BRM120 SELECTING ? t P CWK A8,GP ? P ABL(E) GPOLL GENERAL POLL ? P IFT MSV1=1 ? 6 P CF A5,FINTEP CHECK IF STA PRESENT (POLL ADDRE
0x228580…29d200 [0x092]: Pad {f00=0x0082, f01=0x0190, f02=»BL(NZ) SPOLL SPECIFIC POLL ? P RB BRM INVALID POLL @ " PBRM120 EQU * @ > & P CF A5,FINTER CHECK IF STA PRESENT @ R P LDR A6,A3 LOAD DWT TO A6 @ | P RF(NZ) BRM130 STA FOUND @ P IFT MSV1=0 @ $ P LDKL A6,DW1500 SELECT TO DCTASK @ PBRM130 EQU * @
0x228580…29d200 [0x093]: Pad {f00=0x0082, f01=0x0190, f02=» MARK HOLD TO RESYNCHRONIZE @ P* A $ PBRM150 EQU * A . P ANK A2,/7F A B P SUK A2,/7F A V P RB(Z) BRM RESYNCHRONIZE A j & P CF A5,READ READ ANOTHER CHARACTER A P RB BRM150 A P EJECT A P* A P* A P* EOT HAS BEEN RECEIVED A P*
0x228580…29d200 [0x094]: Pad {f00=0x0082, f01=0x0190, f02=» XIF A P LD A1,XACK B & P RF(Z) BRM220 ACK IS NOT EXPECTED B " P LD A6,FDWTUT GET WRITING DWT B J P RF(Z) BRM210 NO ONE WRITING B p P LDK A1,2 SET RC=2 B ( P CF A5,CWRITE COMPLETE WRITE REQUEST B PBRM210 EQU * B " P CM XACK RESET 'ACK EXPECTED
0x228580…29d200 [0x095]: Pad {f00=0x0082, f01=0x0190, f02=»VED B | P* C P* C PBRM300 EQU * C P CF A5,HPTIM C 4 P LD A1,XSEL C H P RF(Z) BRM315 NOT SELECTED C P LD A1,DCRBUF C ~ ( P*********************CHAINED COMMAND C & P RB(Z) BRM150 NO BUFFER AVAILABLE C P********************* C PBR
0x228580…29d200 [0x096]: Pad {f00=0x0082, f01=0x0190, f02=»NDICATE 'INVALID MESSAGE' C PBRM312 EQU * D " P CF A5,TRNAK SEND NAK D 6 P ABL BRM D T PBRM315 EQU * D d P IFT RCOM=1 D x P LD A1,XACK D & P RF(Z) BRM316 ACK IS NOT EXPECTED D P LD A1,DCRBUF D & P RF(Z) BRM316 NO BUFFER AVAILABLE D " P
0x228580…29d200 [0x097]: Pad {f00=0x0082, f01=0x0190, f02=» RCOM=1 D , P CF A5,PRREC PREPARE FOR TEXT RECEPTION E P LDK A1,0 SET RC=0 E @ ( P CF A5,CWRITE COMPLETE WRITE REQUEST E Z P CM CACK PRESET ACK-1 =7 E P RB BRM305 READ THE MESSAGE E P XIF E ( PBRM316 CF A5,READ READ ONE CHARACTER E P IFF P68
0x228580…29d200 [0x098]: Pad {f00=0x008b, f01=0x0190, f02=»312 FORWARD ABORT SEQUENCE E P RB BRM220 F " PBRM320 EQU * F 4 P IM XSTA INDICATE MESSAGE OK F H $ P LD A4,DCRBUF GET BUFFER ADDRESS F l P ADK A4,6 F P CW A4,FBLST F " P RF(NE) BRM325 NOT FIRST BLOCK F P IFF RCOM=0 F P LDK A1,ESC F P C
0x228580…29d200 [0x099]: Pad {f00=0x008b, f01=0x0190, f02=»BCOM F ( P RF(Z) RDBUF READ MODIFIED RECEIVED G P SUK A1,RDMCOM-RDBCOM G 8 & P RF(Z) RDMOD READ BUFFER RECEIVED G V P XIF G PBRM325 EQU * G P SUK A7,1 G & P RF(Z) BRM340 MESSAGE ENDED BY ETB G P CM FBAX G * P CF A15,GRBUF ALLOCATE RECEIVE
0x228580…29d200 [0x09a]: Pad {f00=0x008b, f01=0x0190, f02=»COM=1 G P LDR* A2,A6 H P LC A2,TEBCDIC,A2 H " P LD A1,DCRBUF H < P RF(Z) BRM326 H R P ST A2,+4,A1 H h P XIF H | PBRM326 EQU * H P CWK A6,DW1500 H , P RF(E) BRM330 MESSAGE IS MENT FOR DCTASK H P LD A2,DWTST,A6 GET STATUS H P RF(N)
0x228580…29d200 [0x09b]: Pad {f00=0x008b, f01=0x0190, f02=»4 H P LDK A2,2 I P CW A2,DWTOR,A6 I " P RF(NE) BRM330 NO READ REQUEST I 4 PBRM327 EQU * I Z P LDK A1,0 SET RC=0 I n $ P LD A8,DWTECB,A6 GET ECB ADDRESS I P LD A3,-4,A4 GET LENGTH I * P ST A3,ECBEL,A8 STORE EFFECTIVE LENGTH I & P CF A15,CTIM
0x228580…29d200 [0x09c]: Pad {f00=0x008b, f01=0x018e, f02=»IT SET IN CCC/WCC I v P* J P* J $ P IFT STAT=1 J . P LC A2,+2,A4 GET WCC/CCC J B P ANK A2,/FF J b P LC A2,TEBCDI,A2 TRANSLATE J v P ANK A2,8 J P RF(Z) BRM328 J P LD A2,DWTST,A6 GET STATUS J P ORK A2,/A J P ST A2,DWTST,A6 J
0x228580…29d200 [0x09d]: Pad {f00=0x008b, f01=0x0190, f02=» J f & P SUK A4,6 ADJUST BUFFER ADDRESS =4 K ( P CF A5,QRBUF QUEUE MESSAGE ON DWT =4 K 2 P RF BRM32A =4 K ^ P XIF =4 K t PBRM329 EQU * =4 K P K P LDK A1,0 RESET RETURN CODE K & P CF A15,DC:MIN MOVE TO USER BUFFER K P RF BRM345 K PBRM32A
0x228580…29d200 [0x09e]: Pad {f00=0x008b, f01=0x0190, f02=»4 K P LD A1,DWTST,A6 STATUS =4 L P RF(N) BRM335 NO REQUEST =4 L , P LD A1,DWTOR,A6 ORDER =4 L P , P RF(NZ) BRM335 NOT ANY MESSAGE ORDER =4 L p & P CF A15,TENDIO COMPLETE REQUEST =4 L PBRM335 EQU * =4 L P XIF =4 L P SUK A4,6 GET BUFFER B
0x228580…29d200 [0x09f]: Pad {f00=0x008b, f01=0x0190, f02=»RACK SEND ACK 0/1 L P ABL BRM M PBRM345 EQU * M * P IFT STAT=1 M > P LD A1,DWTST,A6 M R P ANK A1,8 M j $ P RB(Z) BRM340 ACK SHOULD BE SENT M | P CF A5,TRWACK SEND WACK M P RF BRM410 M P XIF M P IFF STAT=1 M P RB BRM340 M P X
0x228580…29d200 [0x0a0]: Pad {f00=0x008c, f01=0x0190, f02=»BUF EQU * READ BUFFER COMMAND M PRDMOD EQU * N & " P CM XSEL RESET SELECT EXPECTED N : 4 P LD A6,FDWTIN DWT-ADDRESS FOR ADDRESSED TERMINAL N ` $ P LD A4,DWTBUF,A6 BUFFER ADDRESS N $ P SUK A4,2 SDJUST BUFFER ADDRESS N " P LDKL A3,1922 REQUESTED LENGTH N
0x228580…29d200 [0x0a1]: Pad {f00=0x008c, f01=0x018e, f02=» LD A1,CRDBUF INCREMENT READ BUFFER DK N P ADK A1,1 COUNTER DK O . P ST A1,CRDBUF DK O J P DE O d P ABL POL127 O r P XIF O P* O P* O P* ENQ HAS BEEN RECEIVED O P* O P* O PBRM400 EQU * O & P CF A5,HPTIM STOP PROCEDURE
0x228580…29d200 [0x0a2]: Pad {f00=0x008c, f01=0x0190, f02=» O p . P CF A5,TRREP REPEAT LAST CONTROL SEQUENCE P PBRM410 EQU * P : P ABL BRM P N P EJECT P ^ P* P l P* P v P* NAK HAS BEEN RECEIVED P P* P P* P PBRM500 EQU * P & P CF A5,HPTIM STOP PROCEDURE TIMER P P LD A1,XACK P P RF(
0x228580…29d200 [0x0a3]: Pad {f00=0x008c, f01=0x0190, f02=» P P LDK A1,0 Q P CIO A1,0,LCUIN DK Q P SST A1,LCUIN DK Q 6 P CF A15,STREG DK Q P P CF A15,SETIME DK Q j P DATA BRM520,TIMNAK DK Q P ABL TDISP DK Q PBRM520 EQU * DK Q P CF A15,LDREG DK Q P DE Q " P LD A6,FDWTUT GE
0x228580…29d200 [0x0a4]: Pad {f00=0x008c, f01=0x0190, f02=»BLST GET START POINT FOR LAST BLOCK Q & P SU A1,FECBBA COMPUTE BUFFER INDEX R , P ST A1,FBAX R V P ABL POL130 R j P* R ~ P* R P* DLE HAS BEEN RECEIVED R P* R P* R PBRM600 EQU * R & P CF A5,HPTIM STOP PROCEDURE TIMER R P LD A1
0x228580…29d200 [0x0a5]: Pad {f00=0x008c, f01=0x018e, f02=» R P XIF =8 S P IFT P6805=1 =8 S P CWK A2,ACK0 =8 S 2 P XIF =8 S J P RF(NE) BRM620 S P* S r P* ACK , 0 RECEIVED S | P* S P LD A1,CACK GET ACKCOUNTER S P RF(Z) BRM630 ACK,0 EXPECTED S PBRM610 EQU * S P CF A5,TRENQ SEN
0x228580…29d200 [0x0a6]: Pad {f00=0x008c, f01=0x0190, f02=» P* T P* ACK , 1 RECEIVED T P* T ( P LD A1,CACK GET ACK COUNTER T 2 $ P RB(Z) BRM610 ACK,1 NOT EXPECTED T V PBRM630 EQU * T ~ P LD A1,XETX T P RF(Z) BRM640 ETX NOT SENT T P EJECT T P* T , P* ACK HAS BEEN RECEIVED TO AN ETX BLOCK T
0x228580…29d200 [0x0a7]: Pad {f00=0x008c, f01=0x018e, f02=»RANSMITTED T p P XIF U ( P CF A5,CWRITE COMPLETE WRITE REQUEST U PBRM636 EQU * U J P CF A5,TREOT SEND EOT U ^ P IFT RCOM=1 U | P U P CM XRB RESET READ BUFFER U P XIF U P RB BRM410 U PBRM640 EQU * U P LDK A1,1 U & P XRS A1,CACK
0x228580…29d200 [0x0a8]: Pad {f00=0x008d, f01=0x0190, f02=» P IFT P6805=1 =8 V P CWK A2,RVI =8 V P XIF =8 V 4 ( P RB(NE) BRM610 INVALID DLE SEQUENCE V F " P CM XACK RESET 'EXPECTING ACK' V r P LD A1,XETX V $ P RF(NZ) BRM660 ETX HAS BEEN SENT V P LDK A1,2 SET RC=2 V P RB BRM635 V PBRM660 EQU
0x228580…29d200 [0x0a9]: Pad {f00=0x008d, f01=0x018e, f02=»TED V v P* W P* W PBRM670 EQU * W " P LD A6,FDWTUT GET DWT ADDRESS W 4 , P CF A15,REMOVS REMOVE FROM STATUS QUEUE W Z P CM XSTA CLEAR 'STATUS SENT' W " P CM XACK CLEAR 'ACK EXPECTED' W P LD A1,DWTST,A6 GET STATUS W P ANK A1,4 W P R
0x228580…29d200 [0x0aa]: Pad {f00=0x008d, f01=0x0190, f02=» W P* X P* SELECT HAS BEEN RECEIVED X P* X 4 P* X > PSELECT EQU * X H P LD A1,XACK =5 X * P RF(NZ) POL010 ERROR. ACK EXPECTED =5 X t P IFF STAT=0 X P LD A1,DWTST,A6 GET STATUS X P LDR A3,A1 X P ANK A1,1 X $ P RF(Z) SEL110
0x228580…29d200 [0x0ab]: Pad {f00=0x008d, f01=0x0190, f02=» P ABL BRM Y PSEL110 EQU * Y P IFT STAT+NOWACK=1 Y ( P ANK A3,8 Y B P RF(NZ) SEL115 BUSY Y T P XIF Y p P IFT STAT+NOWACK=2 Y | P ANK A3,8 Y " P RF(Z) SEL111 DEVICE NOT BUSY Y P CF A5,TRWACK TRANSMIT WACK Y P ABL BRM Y PSEL111 E
0x228580…29d200 [0x0ac]: Pad {f00=0x008d, f01=0x0190, f02=»F A5,TRWACK SEND WACK Y P XIF Z P RB SEL100 Z * PSEL120 EQU * Z < , P CF A5,PRREC PREPARE FOR TEXT RECEPTION Z P P CF A5,TRACK SEND ACK,0 Z P RB SEL100 Z P EJECT Z P* Z P* Z P* PREPARE FOR TEXT RECEPTION Z P* Z P* Z
0x228580…29d200 [0x0ad]: Pad {f00=0x008d, f01=0x0190, f02=»ATE STA TO EBCDIC Z x P XIF [ $ P ST A2,+4,A1 SAVE STA IN BUFFER [ & P IM XSTA [ N " P ST A6,FDWTIN STORE INPUT DWT [ ^ P RTN A5 [ P EJECT [ P* [ P* [ $ P* GENERAL POLL HAS BEEN RECEIVED [ P* [ P* [ PGPOLL EQU * [ P LD
0x228580…29d200 [0x0ae]: Pad {f00=0x008d, f01=0x0190, f02=» =5 [ n " P ABL BRM WAIT FOR RESPONSE =5 PPOL020 EQU * =5 2 " P CF A5,CPTIM CHECK POLL TIMER J P IFF STAT=0 p P LD A6,DCSTQ & P RF(Z) POL110 NO STATUS TO BE SENT " P SUK A6,DWTSQ GET DWT ADDRESS PPOL050 EQU * P CF A5,TRSTA
0x228580…29d200 [0x0af]: Pad {f00=0x008d, f01=0x0190, f02=»POL110 P XIF ] PPOL100 EQU * ] P ABL BRM ] . PPOL110 EQU * ] > P LD A6,DCWRQ ] R " P RF(NZ) POL120 WRITE ON QUEUE ] f PPOL115 EQU * ] P CF A5,TREOT SEND EOT ] P RB POL100 ] PPOL120 EQU * ] " P SUK A6,DWTWQ GET DWT ADDRESS ] P
0x228580…29d200 [0x0b0]: Pad {f00=0x008d, f01=0x0190, f02=» ] P ST A8,FECB SAVE ECB ADDRESS ^ P ST A6,FDWTUT SAVE A6 ^ , P ^ J P IFF MMUPAG=0 ^ R $ P LDKL A4,MMUBUF MMU WORK BUFFER ^ h P ST A4,ECBBA,A8 ^ . P CF A15,DC:MOT MOVE DATA FROM USER BUFFER ^ P XIF ^ & P LD A4,ECBBA,A8 GET BUFFER ADDRESS ^
0x228580…29d200 [0x0b1]: Pad {f00=0x008d, f01=0x0190, f02=»FER ^ p P ST A3,FECBRL SAVE LENGTH _ P CM FBAX RESET BUFFER INDEX _ . PPOL130 EQU * _ R P CM XETX RESET 'ETX SENT' _ f P CM XSTA _ P CF A5,TRTEXT SEND ONE BLOCK _ & P CF A5,SPTIM START PROCEDURE TIMER _ P IM XACK SET 'ACK EXPECTED' _ P
0x228580…29d200 [0x0b2]: Pad {f00=0x008d, f01=0x0190, f02=» IFF STAT+SPECP=0 _ P LD A1,XACK =5 ` " P RB(NZ) POL010 ACK EXPECTED =5 ` 2 P LDR A7,A6 SAVE A6 ` X P CF A5,CPTIM CHECK POLLTIMER ` r P LDR A6,A7 RESTORE A6 ` P IFT STAT=1 ` P LD A1,DWTST,A6 GET STATUS ` P ANK A1,7 ` " P RB(NZ) POL050
0x228580…29d200 [0x0b3]: Pad {f00=0x008d, f01=0x0190, f02=»GET ORDER ` P SUK A1,6 a P RB(Z) POL125 WRITE REQUEST a $ P SUK A1,2 a H " P RB(Z) POL125 EXCHANGE REQUEST a Z P XIF a P RB POL115 SEND EOT a P EJECT a P* a P* a 8 P* CHECK IF THERE IS A WRITE REQUEST TO BE COMPLETED a P* a
0x228580…29d200 [0x0b4]: Pad {f00=0x008d, f01=0x0190, f02=»,DWTST,A6 a P RF(N) CWR900 NO REQUEST b P LD A2,DWTOR,A6 GET ORDER b 2 P SUK A2,6 b T P RF(Z) CWR100 WRITE REQUEST b f P SUK A2,2 b ( P RF(NZ) CWR900 NOT EXCHANGE REQUEST b P LDR A1,A1 b 2 P RF(NZ) CWR100 TRANSMISSION ERROR, RC NOT ZERO b
0x228580…29d200 [0x0b5]: Pad {f00=0x008d, f01=0x0190, f02=» b n P CF A15,CTIME STOP TIMING c P LDR A8,A8 c * P RF(Z) CWR150 c < P ST A2,ECBCW,A8 c R $ P CF A15,TENDIO COMPLETE REQUEST c j PCWR150 EQU * c * P CF A15,REMOVW REMOVE FROM WRITE QUEUE c PCWR200 EQU * c PCWR900 EQU * c " P CM XACK RESET
0x228580…29d200 [0x0b6]: Pad {f00=0x008d, f01=0x0190, f02=»ON EXIT A3 CONTAINS : c ( P* 0 : IF CORRECT ETX BLOCK RECEIVED d 2 P* 1 : IF LRC OR PARITY ERROR , BUFFER OVERFLOW d J ( P* 2 : IF CORRECT ETB BLOCK RECEIVED d P* d PRDMESS EQU * d $ P LD A4,DCRBUF GET BUFFER ADDRESS d P ADK A4,6 RESERVE HEADER
0x228580…29d200 [0x0b7]: Pad {f00=0x008d, f01=0x0190, f02=» d P ST A1,FBAX e PRDM050 EQU * e P AD A4,FBAX ADD BUFFER INDEX e 0 ( P ST A4,FBLST REMEMBER START OF BLOCK e T PRDM075 EQU * e P CM XSTA e P LDK A7,0 RESET LRC e P e P IFT IBMCHR=1 e P LD A1,FBAX e " P RF(NZ) RDM100 NOT FIRST
0x228580…29d200 [0x0b8]: Pad {f00=0x008d, f01=0x0190, f02=» TWO CHARACTERS e z P CF A5,READP f P XIF f , PRDM100 EQU * f 8 $ P CF A5,READP READ ONE CHARACTER f L P RF(NZ) RDM120 PARITY ERROR f t PRDM110 EQU * f P CWK A2,ETX f P RF(E) RDM130 ETX RECEIVED f P CWK A2,ETB f P RF(E) RDM160 ETB RE
0x228580…29d200 [0x0b9]: Pad {f00=0x008d, f01=0x0190, f02=» f b P CWK A2,/FF g $ P RF(E) RDM140 MARK HOLD RECEIVED g P g D P IFT CODE=0 g L P IFT BINTRM=1 g ` P g v P LDR A1,A2 g ~ P SUK A1,DC1+3 g P RF(P) RDM115 NOT DC1-DC3 g P ADK A1,3 g P RF(N) RDM115 NOT DC1-DC3 g P SLL A1,6 g
0x228580…29d200 [0x0ba]: Pad {f00=0x008d, f01=0x018e, f02=»ARACTER g r P ORR A2,A8 h PRDM115 EQU * h " P XIF h 6 P h B P SCR A2,A4 STORE CHARACTER h J P ADK A4,1 INCREMENT POINTER h l $ P IM FBAX INCREMENT BUFFER INDEX h P LD A1,FBAX h P CWK A1,RBUFL+RBUFL h P RB(NG) RDM100 NOT OVERFLOW h
0x228580…29d200 [0x0bb]: Pad {f00=0x008d, f01=0x0190, f02=» h l P SUK A2,/7F i $ P RF(Z) RDM150 MARK HOLD RECEIVED i P RB RDM100 i D P* i V P* ETX RECEIVED i ` P* i v PRDM130 EQU * i $ P LD A1,DCRBUF GET BUFFER ADDRESS i P LD A2,FBAX GET BUFFER INDEX i 2 P ST A2,+2,A1 STORE EFFECTIVE LENGTH IN HEA
0x228580…29d200 [0x0bc]: Pad {f00=0x008d, f01=0x0190, f02=»CRC AND CHECK IT i ~ P RF(E) RDM150 CRC WAS OK j P XIF j 8 PRDM140 EQU * j D & P LDK A3,1 INDICATE INVALID MESSAGE j X PRDM150 EQU * j $ P LDR A7,A3 SAVE RESULT REGISTER j P CF A5,HALTIN HALT INPUT j P IFT P6805=1 j " P ORR A7,A1 PARITY ERROR
0x228580…29d200 [0x0bd]: Pad {f00=0x008d, f01=0x0190, f02=»B(NZ) RDM130 ALREADY INVALID j " P LDK A3,2 INDICATE CORRECT ETB k $ P RB RDM130 k J P* k P* ITB RECEIVED k f P* k | PRDM170 EQU * k P IFF CODE=1 k P CF A5,RDLRC k " P RB(NZ) RDM120 LRC WAS NOT OK k P XIF k P IFT CODE=1 k & P C
0x228580…29d200 [0x0be]: Pad {f00=0x008d, f01=0x0190, f02=»TRANSMIT ACK 0 OR 1 k P* l PTRACK LDK A2,1 l & P LDK A3,ACK1 PRELOAD ACK1 l < & P XRS A2,CACK INCREMENT ACK COUNTER l ^ P RF(NZ) TRDLE l P LDK A3,ACK0 LOAD ACK0 l P RF TRDLE l P* l P* TRANSMIT WACK l P* l PTRWACK LDK A3,WA
0x228580…29d200 [0x0bf]: Pad {f00=0x008d, f01=0x018e, f02=» XIF l P* m P* TRANSMIT DLE m P* m , PTRDLE LDK A2,DLE LOAD DLE m 6 " P SC A2,RESEND PUT INSAVE AREA m X P SC A3,RESEND+1 m ~ P RF TRREP m P EJECT m P* m P* TRANSMIT NAK m P* m PTRNAK LDK A3,NAK LOAD NAK m P RF TREN
0x228580…29d200 [0x0c0]: Pad {f00=0x008d, f01=0x018e, f02=» P* n PTRENQ LDK A3,ENQ LOAD ENQ n P* n 0 ( PTREN10 SC A3,RESEND PUT IN SAVE AREA n : P LDK A2,/FF n f P SC A2,RESEND+1 n z $ PTRREP CF A5,TRSYNC START OUTPUT n & P LC A2,RESEND GET FIRST CHARACTER n P CF A5,WRITEP SEND IT n & P LC A2,R
0x228580…29d200 [0x0c1]: Pad {f00=0x008d, f01=0x0190, f02=» n P CF A5,WRIT05 o P LDK A2,0 SALCUZ o $ P CIO A2,0,LCUUT STOP TRANSMITTER o 8 P IFT P6805=1 SALCUZ o ` $ P CF A5,READ WAIT FOR END SALCUZ o | P XIF SALCUZ o & P SST A2,LCUUT PERFORM SST AT ONCE o P IFF LOGG=0 o ( P CF A5,LOGSST LOG
0x228580…29d200 [0x0c2]: Pad {f00=0x008d, f01=0x0190, f02=» o PTRTEXT EQU * p P CF A5,TRSYNC START OUTPUT p P IFT TSTREQ=1 p > P* p T P* p ^ P* TEST REQUEST HANDLING p h P* p P* p P LD A4,FBAX p ( P RF(NZ) TRT050 NOT START OF MESSAGE p P p 2 P LD A1,XRB READ BUFFER COMMAND IN PROC
0x228580…29d200 [0x0c3]: Pad {f00=0x008d, f01=0x018e, f02=» RF(NZ) TRT050 NOT TEST REQUEST p P LDK A2,SOH q ( P CF A5,WRITE SEND SOH q < P LDK A7,0 RESET BCC q Z P LDK A2,'%' q v P CF A5,WRITE SEND % q P LDK A2,'/' q P CF A5,WRITE SEND / q P LDK A2,STX q P CF A5,WRITE SEND STX q ( P S
0x228580…29d200 [0x0c4]: Pad {f00=0x008d, f01=0x0190, f02=» P ST A2,FBAX r P RF TRT100 r PTRT050 EQU * r * P* r > P* r H P* r R P XIF r P LDK A2,STX r h P CF A5,WRITE SEND STX r | P LDK A7,0 RESET LRC r $ P LD A4,FECBBA GET BUFFER ADDRESS r P AD A4,FBAX ADD BUFFER INDEX r ( P ST A4,F
0x228580…29d200 [0x0c5]: Pad {f00=0x008d, f01=0x0190, f02=»GET BUFFER INDEX r " P RF(NZ) TRT100 NOT FIRST BLOCK s P LC A2,DW1500+1 GET TCA s > P CF A5,WRITEP SEND TCA s ^ P LDR* A2,A6 GET STA s | P CF A5,WRITEP SEND STA s P IFT IBMCHR=1 s P IFF RCOM=1 s " P LDK A2,/27 SEND ENTER AS AID s P CF
0x228580…29d200 [0x0c6]: Pad {f00=0x008d, f01=0x0190, f02=»FT RCOM=1 s P t & P LD A1,XRB READ BUFFER COMMAND ??? t P RF(Z) TRT070 NO!! t D P t ^ P ******************** t f " P LDK A2,X'2D' AID FOR DISPLAY t PTRT060 CF A5,WRITEP SEND AID t P t $ P LD* A3,DWTCUR,A6 CURSOR ADDRESS t . P CF A5,LIN
0x228580…29d200 [0x0c7]: Pad {f00=0x008d, f01=0x0190, f02=»DK A3,2 t PTRT100 EQU * u P LCR A2,A4 GET ONE CHARACTER u $ P ADK A4,1 INCREMENT POINTER u H P ANK A2,/7F u l P IFT RCOM=1 u & P LD A1,XRB READ BUFFER COMMAND ??? u P RF(Z) TRT105 NO!! u P u @ P******************************************
0x228580…29d200 [0x0c8]: Pad {f00=0x008e, f01=0x018e, f02=»******* u h P v & P CWK A2,X'20' ATTRIBUTE CHARACTER v P RF(L) TRT101 YES!!! v B P XIF v ^ P IFT DMRK=1 v j P CWK A2,/7E LINE FEED ? v ~ " P RF(NE) TRT102 NO,GO TO TRT102 v P LDK A2,/0A v PTRT102 EQU * v P CWK A2,/7D END OF MESSAGE ? v
0x228580…29d200 [0x0c9]: Pad {f00=0x008e, f01=0x0190, f02=» P SUK A2,1 w P XIF w P IFT RCOM=1 w " P RF TRT105 w 6 P w H PTRT101 EQU * w P P w d P LDK A2,SF w l " P CF A5,WRITEP SEND START FIELD w ~ P w ( P LC A2,-1,A4 GET ATTRIBUTE CHARACTER w P ANK A2,X'7F' w ( P LDR A1,A2 CONVERT TO IBM AT
0x228580…29d200 [0x0ca]: Pad {f00=0x008e, f01=0x0190, f02=»ALWAYS SET ONE w P LC A2,TASCII,A2 x & P CWK A2,/18 CHECK SPECIAL ATTRIBUT x . P RF(NE) TRT104 x X P LDK A2,/30 x n PTRT104 EQU * x P CF A5,WRITEP SEND ATTRIBUTE x P ADK A3,1 x P RF TRT110 x PTRT105 EQU * x P XIF x P EJECT x
0x228580…29d200 [0x0cb]: Pad {f00=0x008e, f01=0x0190, f02=»REMENT BUFFER INDEX x & P LD A1,FECBRL GET REQUESTED LENGTH y P CW A1,FBAX y F " P RF(NG) TRT130 END OF MESSAGE y Z * P ADK A3,1 INCREMENT CHARACTER COUNTER y P CWK A3,TBLEN y P RB(L) TRT100 NOT FULL BLOCK y P IFT RCOM=1 y , P LDK A1,SBA CH
0x228580…29d200 [0x0cc]: Pad {f00=0x008e, f01=0x0190, f02=» LCR A2,A4 GET FIRST BYTE AFTER SBA y P ADK A4,1 INREMENT POINTER z , P CF A5,WRITEP SEND IT z N P IM FBAX INCREMENT INDEX z l . PTRT115 LCR A2,A4 GET SECOND BYTE AFTER SBA z P CF A5,WRITEP SEND IT z P IM FBAX INCREMENT INDEX z P XIF z PTR
0x228580…29d200 [0x0cd]: Pad {f00=0x008e, f01=0x018e, f02=» z ~ P CF A5,WRITEP SEND LRC { P XIF { & P IFT CODE=1 { 2 P LDR A8,A7 SAVE CURRENT CRC { F P LDR A2,A7 { j P ANK A2,/FF { | " P CF A5,WRIT05 SEND CRC BYTE 1 { P ECR A2,A8 { P ANK A2,/FF { " P CF A5,WRIT05 SEND CRC BYTE 2 { P XIF {
0x228580…29d200 [0x0ce]: Pad {f00=0x008e, f01=0x018e, f02=» { z P RB TRT120 SEND ETX AND LRC | P EJECT | , P* | : P* | D P* TRANSMIT STATUS MESSAGE | N P* | p P* | z P IFF STAT=0 | PTRSTA EQU * | $ P IM XSTA INDICATE 'STATUS SENT' | P ST A6,FDWTUT SAVE A6 | P CF A5,TRSYNC START OUTP
0x228580…29d200 [0x0cf]: Pad {f00=0x008e, f01=0x0190, f02=» P LDK A2,'R' } P CF A5,WRITEP SEND 'R' } P LDK A2,STX } 6 P CF A5,WRITE SEND STX } J P LC A2,DW1500+1 } h P CF A5,WRITEP SEND TCA } P LDR* A2,A6 } P CF A5,WRITEP SEND STA } P LD A1,DWTST,A6 GET STATUS } P ANK A1,/06 MASK FOR S/S
0x228580…29d200 [0x0d0]: Pad {f00=0x008e, f01=0x0190, f02=» LD A1,DWTST,A6 GET STATUS } P ANK A1,5 ~ " P RF(Z) TRST10 NOT 'IR' ~ 4 P ANK A1,4 ~ R P RF(NZ) TRST10 NO IR IF DE ~ d P LDK A2,IR ~ PTRST10 EQU * ~ P CF A5,WRITEP SEND S/S 1 ~ P RB TRT130 SEND ETX AND LRC ~ P XIF ~ P EJECT ~ P
0x228580…29d200 [0x0d1]: Pad {f00=0x008e, f01=0x0190, f02=»HALT INPUT IF NOT DONE ~ P SST A2,LCUIN PERFORM SST P IFT P6805=0 SALCUZ @ & P CIO A2,1,LCUUT START TRANSMITTER P XIF SALCUZ P IFT P6805=1 SALCUZ P IFT CODE=1 SALCUZ P LDK A2,0 SALCUZ , P CIO A2,1,LCUUT START TRANSM
0x228580…29d200 [0x0d2]: Pad {f00=0x008e, f01=0x018e, f02=»TRS005 CIO A2,1,LCUUT SALCUZ PTRS010 EQU * SALCUZ & P LDK A2,SYNEBC SALCUZ B 2 P OTR A2,1,LCUUT SPECIFY SYNC CHARACTER SALCUZ ` P XIF SALCUZ P IFT P6805=1 SALCUZ P IFT CODE=0 SALCUZ P LDK A2,/0C SALCUZ P CIO A2,1,
0x228580…29d200 [0x0d3]: Pad {f00=0x008e, f01=0x0190, f02=» " PTRS005 CIO A2,1,LCUUT SALCUZ PTRS010 EQU * * P LDK A2,SYN SALCUZ > 2 P OTR A2,1,LCUUT SPECIFY SYNC CHARACTER SALCUZ Z P XIF SALCUZ * P CF A5,READ WAIT FOR OUTPUT INTERRUPT P LDK A3,4 4 SYNS PTRS100 LDK A2,SYN P CF
0x228580…29d200 [0x0d4]: Pad {f00=0x008e, f01=0x0190, f02=»RUPT ~ P* P* PIH1501 EQU * P ST P,INTSAV 4 P IFT CPU852=1 H P CF A15,SAVE8 SAVE A1-A8 ^ P XIF ~ P P IFF CPU852=1 P MSR 8,A15 SAVE A1-A8 =1 P XIF * P CF A15,LDREG RESTORE DC REGS A3 - A8 P INR A2,
0x228580…29d200 [0x0d5]: Pad {f00=0x008e, f01=0x0190, f02=» P XIF P IFF CODE=1 P C2 SYNSW $ P RF(NZ) IHLCI2 6 P CWK A2,SYN SKIP SYNS L P RF(E) READ j " PIHLCI2 XRR A7,A2 CALCULATE LRC ~ P XIF P IFT CODE=1 P C2 SYNSW 2 P RF(NZ) IHLCI1 DO NOT SKIP SYNCS IN BCC FRAME
0x228580…29d200 [0x0d6]: Pad {f00=0x008e, f01=0x018e, f02=»RANSLATE TO ASCII ~ P XIF PIHIN10 RTN A5 & P IFT P6805=0 SALCUZ < PIHIN20 CF A5,SST PERFORM SST X P ABL BRM | P XIF SALCUZ P IFT P6805=1 SALCUZ $ PIHIN20 RF SST PERFORM SST SALCUZ P XIF SALCUZ P EJECT P
0x228580…29d200 [0x0d7]: Pad {f00=0x008e, f01=0x0190, f02=» P CF A15,SAVE8 SAVE A1 - A8 P XIF & P 2 P IFF CPU852=1 : P MSR 8,A15 SAVE A1-A8 =1 P P XIF p * P CF A15,LDREG RESTORE DC REGS A3 - A8 | P RB IHIN10 P EJECT P* P* & P* SST INSTRUCTION AND STATUS CHECK P*
0x228580…29d200 [0x0d8]: Pad {f00=0x008e, f01=0x0190, f02=»UT ERROR p , P* BIT 15=MODEM NOT READY P* @ PSST SST A1,LCUIN J P IFT P6805=1 SALCUZ b 2 P RF(NA) SST200 ALREADY INACTIVE SALCUZ SALCUZ ~ P XIF SALCUZ P LDR A2,A1 P IFF LOGG=0 & P CF A5,LOGSST LOG SST INFO
0x228580…29d200 [0x0d9]: Pad {f00=0x008e, f01=0x0190, f02=»LCUZ P ANK A2,6 SALCUZ P RF(Z) SST100 SALCUZ & P ANK A2,2 SALCUZ D & P RF(NZ) SST050 THROUGH PUT SALCUZ ^ & P LDK A1,1 SET PARITY ERROR SALCUZ P RF SSTRET SALCUZ P XIF SALCUZ PSST050 EQU * SALCUZ P CM XSTA TRO
0x228580…29d200 [0x0da]: Pad {f00=0x008e, f01=0x0190, f02=»A15,CKMESS CHECK IF STATUS CHANGE P RTN A5 * P XIF SALCUZ : P IFT P6805=1 SALCUZ P P ANK A1,/21 SALCUZ l P RF(Z) SST200 LSALCUZ 6 P CF A15,SETIME LINE ERROR, WAIT 0.2 SECONDS SALCUZ P DATA BRM RESTART SALCUZ P DATA 2 WA
0x228580…29d200 [0x0db]: Pad {f00=0x008e, f01=0x018e, f02=» CR SALCUZ P ABR* A5 RETURN SALCUZ P XIF SALCUZ 0 P* F P* P P* HALT INPUT Z P* n P* x PHALTIN LDK A1,0 SALCUZ P CIO A1,0,LCUIN P IFT P6805=0 SALCUZ 4 P RB SST PERFORM SST INSTRUCTION AND STATUS CHECK
0x228580…29d200 [0x0dc]: Pad {f00=0x008e, f01=0x0190, f02=» P* P* , P* WRITE FROM OR READ ONE CHARACTER TO A2 P* H P* R PWRITE EQU * P IFT CODE=1 p P ANK A2,/FF P CWK A2,/FF 0 P RF(E) WRIT05 NO TRANSLATION OF TRAILING PAD * P LC A2,TEBCDIC,A2 TRANSLATE TO EBCDIC
0x228580…29d200 [0x0dd]: Pad {f00=0x008e, f01=0x0190, f02=» CODE=1 $ PWRIT10 XRR A7,A2 ACCUMULATE BCC P XIF 8 P IFT CODE=1 D & PWRIT10 CF A5,CRCCAL CALCULATE CRC X P XIF P IFF LOGG=0 & P CF A5,LOGOUT LOG OUTPUT CHARACTER P XIF P* PREAD CF A15,STREG P ABL TDISP
0x228580…29d200 [0x0de]: Pad {f00=0x008e, f01=0x018e, f02=»0 SALCUZ PWRITEP ANK A2,/FF P ECR A1,A2 , P ORK A2,/80 > PWRI100 SLL A1,1 R P RB(P) WRI100 j P RB(Z) WRITE WRITE P XRK A2,/80 P RB WRI100 P XIF P IFF CODE+P6805=0 SALCUZ PWRITEP RB WRITE P XIF
0x228580…29d200 [0x0df]: Pad {f00=0x008e, f01=0x0190, f02=» PREADP CF A5,READ P IFT CODE+P6805=0 SALCUZ P ECR A1,A2 > PRE100 SLL A1,1 P P RF(Z) RE110 f P RB(NN) RE100 z P XRK A2,/80 P RB RE100 PRE110 LDR A1,A2 P ANK A2,/7F P XIF P IFF CODE+P6805=0 SALCUZ
0x228580…29d200 [0x0e0]: Pad {f00=0x008e, f01=0x018e, f02=»JECT P* < P* FIND DWT CONTAINING SUBTERMINAL ADDRESS AS GIVEN IN A2 P* V $ P* CALLING SEQUENCE: CF A5,FINTER ` P* A2=SUBTERMINAL ADDRESS P* A4 DESTROYED " P* A3#0: DWT TO FOUND TERMINAL P* B P* NOTE: FOR SIEMENS MSV1 - S
0x228580…29d200 [0x0e1]: Pad {f00=0x008e, f01=0x0190, f02=» P* . PRBYTE DATA 0 IF 1 COMPARE WITH RIGTH BYTE P* @ P* J PFINTEP EQU * T P IFT MSV1=0 h PFINTER EQU * | P XIF P IM RBYTE P IFT MSV1=1 PFINTER EQU * P XIF & P LD A4,DCTAB GET ADDRESS TO DC:TAB *
0x228580…29d200 [0x0e2]: Pad {f00=0x008e, f01=0x018e, f02=» ( P RF(E) FINT20 SUBTERMINAL NOT FOUND P LDR* A3,A4 LOAD DWT ADDRESS 0 P IFT MSV1=1 T $ P AD A3,RBYTE CHOOSE ADDRESS TYPE h * P CCR A2,A3 COMPARE SUBTERMINAL ADDRESS P XIF P IFT MSV1=0 . P CC A2,1,A3 COMPARE TO SUBTERMINAL ADDRESS
0x228580…29d200 [0x0e3]: Pad {f00=0x008e, f01=0x0190, f02=» P* P* P* POWER ON FUNCTIONS P* 4 P* > PDC15ON EQU * H P IFT CPU852=1 P CF A15,SAVE8 SAVE A1-A8 r P XIF P P IFF CPU852=1 P MSR 8,A15 SAVE A1-A8 =1 P XIF P IFT STAT=1 P LDK A5,4 SET
0x228580…29d200 [0x0e4]: Pad {f00=0x008e, f01=0x018e, f02=»F(E) DRDC06 END OF TABLE P LDR* A6,A1 GET DWT ADDRESS 0 P ORS A5,DWTST,A6 STORE DEVICE END FOR DEVICE D ( P CF A15,INSSQ INSERT IN STATUS QUEUE x P RB DRDC05 PDRDC06 EQU * P XIF P LDK A2,/40 P ORS A2,DCONOF P CF A15,CK
0x228580…29d200 [0x0e5]: Pad {f00=0x008e, f01=0x0190, f02=» h PDRDC20 ABL BRM P EJECT P* , P* POLL TIME OUT 6 P* N ( PPTOUT LDKL A5,STB LOAD A5 STACK BASE X P LDK A2,/40 ( P ST A2,DCONOF INDICATE POLL TIME OUT * P CF A15,CKMESS CHECK IF STATUS CHANGE $ P CF A15,SPOTIM START POL
0x228580…29d200 [0x0e6]: Pad {f00=0x008e, f01=0x0190, f02=» POLLING x P LDKL A2,-TIMPOL P ST* A2,DCTPGP RESTART TIMER ( * P CF A15,CKMESS CHECK IF STATUS CHANGE L P RTN A5 z P* P* START POLL TIMER P* $ PSPOTIM CF A15,SETIME START TIMER P DATA PTOUT,TIMPOL & P ST A4,DCTPGP ST
0x228580…29d200 [0x0e7]: Pad {f00=0x008e, f01=0x0190, f02=»M EQU * $ P LDR A1,A6 LOAD DWT AS PARAMETER P CF A15,SETIME 8 P DATA PRTOUT,TIMPRO N $ P ST A4,DCTPP SAVE TIMER POINTER j P RTN A5 P* P* PROCEDURE TIMEOUT P* PPRTOUT CM DCTPP P LDR A6,A1 RELOAD A6 P LDK
0x228580…29d200 [0x0e8]: Pad {f00=0x008f, f01=0x0190, f02=» P CF A5,TRENQ SEND ENQ & P CF A5,SPTIM START PROCEDURE TIMER " PPRT10 ABL BRM L P EJECT b P* p P* STOP PROCEDURE TIMER z P* ( PHPTIM LD A1,DCTPP GET TIMER POINTER P RF(Z) HPT10 NOT RUNNING P CM* DCTPP STOP TIMER
0x228580…29d200 [0x0e9]: Pad {f00=0x008f, f01=0x0190, f02=»A2 = CHARACTER P* A7 = ACCUMULATED CRC P* 4 P* > PCRCCAL EQU * H P ST A1,CRCSAV P ST A2,CRCSAV+2 r P ST A3,CRCSAV+4 P LDK A1,8 PCRC100 LDR A3,A7 P SRL A7,1 P XRR A3,A2 P SRL A2,1 P ANK A3,
0x228580…29d200 [0x0ea]: Pad {f00=0x008f, f01=0x0190, f02=»V+2 P LD A3,CRCSAV+4 P RTN A5 $ PCRCSAV RES 3 4 P EJECT H P* V P* ` ( P* READ CRC CHARACTERS AND CHECK THEM j P* CR = (E) IF CRC WAS OK P* P* $ PRDCRC LDR A6,A7 SAVE CURRENT CRC $ P IM SYNSW DO NOT SKIP SY
0x228580…29d200 [0x0eb]: Pad {f00=0x008f, f01=0x018e, f02=» SKIPPED AGAIN z P LD A2,CRCSAV+2 SAVE IT P SLL A2,8 6 P XRR A2,A8 H P ADK A5,4 Z . P CWR A2,A6 COMPARE RECEIVED WITH COMPUTED l P ABR* A5 P XIF P IFT CODE=0 P* & P* RDLRC READ LRC CHARACTER " P*
0x228580…29d200 [0x0ec]: Pad {f00=0x008f, f01=0x0190, f02=» P ANK A7,/7F PLRCEND EQU * P CM SYNSW 0 P ABR* A5 B P R P XIF Z P EJECT f P* t P* ~ " P* DEVICE WORK TABLE FOR DCTASK P* P* PDW1500 EQU * TABLE ENTRY P DATA 0 CU LINE ADDRESS P DATA /8
0x228580…29d200 [0x0ed]: Pad {f00=0x008f, f01=0x018e, f02=» | $ P DATA 0 WAIT/ACTIVATE INDICATOR P DATA 0 TASK QUEUE 0 P* J P IFT MMUPAG=1 T P DATA 0 USER ECB ADDRESS j P DATA DC:ECB MMU ECB ADDRESS P XIF P* P DATA 0 TIMER POINTER ( P DATA 0 WRITE QUEUE OR BUFFER QUEUE
0x228580…29d200 [0x0ee]: Pad {f00=0x008f, f01=0x018e, f02=» f P DATA 0 CURSOR ADDRESS " P DATA 0 REQUEST TIMEOUT VALUE & P* L P IFT MMUPAG=1 V PDC:ECB EQU * MMU ECB l P DATA 0,0,0,0,0,0 P XIF P* P EJECT P* P* P* DC RECEIVE BUFFER POOL P* PRLINK
0x228580…29d200 [0x0ef]: Pad {f00=0x008f, f01=0x0190, f02=» P RES RBUFL+3 P IFF RBUFNR=3 P DATA *+RLINK . P RES RBUFL+3 D P IFF RBUFNR=4 X P DATA *+RLINK n P RES RBUFL+3 P XIF P DATA *+RLINK P RES RBUFL+3 P DATA 0 END OF CHAIN P RES RBUFL+3 P P IFF
0x228580…29d200 [0x0f0]: Pad {f00=0x008f, f01=0x0190, f02=» t P* P* P IFF LOGG=0 PLOGSST ST A2,SAVE2 0 P ORKL A2,/F000 J P RF LOG10 ` PLOGOUT ST A2,SAVE2 r P ORKL A2,/0F00 P RF LOG10 PLOGIN CWK A2,/FF P RF(E) LOGE10 P ST A2,SAVE2 PLOG10 ST A3,SAVE3
0x228580…29d200 [0x0f1]: Pad {f00=0x008f, f01=0x0190, f02=»GEXI ST A3,LOGPNT P LD A2,SAVE2 P LD A3,SAVE3 . PLOGE10 RTN A5 B P EJECT X P* f P* p PLOGPNT DATA LOGSTA z PLOGSTA EQU * P RES 300 PLOGEND EQU *-4 PSAVE2 DATA 0 PSAVE3 DATA 0 P XIF P*
0x228580…29d200 [0x0f2]: Pad {f00=0x008f, f01=0x0190, f02=» L I N C O L P* : P* CONVERT CURSOR ADDRESS TO LINE AND COLUMN NUMBER P* ^ > P********************************************************** h P PLINCOL EQU * " P LDR A2,A3 COPY CURSOR ADDRESS P SRL A2,6 P ANK A2,X'3F
0x228580…29d200 [0x0f3]: Pad {f00=0x008f, f01=0x0190, f02=» ( P LC A2,LICO:T,A2 ASCII COLUMN NUMBER $ P CF A5,WRITEP SEND COLUMN NUMBER 0 P RTN A5 RETURN X P* n P* x P* P EJECT P P* SCANDINAVIAN ALPHABET P DB PLICO:T EQU * * P DATA /2041,/4243,/4445,/4647 /00-
0x228580…29d200 [0x0f4]: Pad {f00=0x008f, f01=0x0190, f02=»/18-/1F r * P DATA /2D2F,/5354,/5556,/5758 /20-/27 * P DATA /595A,/402C,/255F,/3E3F /28-/2F > ( P DATA /3031,/3233,/3435,/3637 /30-37 l ( P DATA /3839,/3A5B,/5C27,/3D22 /38-3F P DE P XIF P EJECT P PDC:IN DATA DC:TAB+2
0x228580…29d200 [0x0f5]: Pad {f00=0x008f, f01=0x4054, f02=»0,0,0,0,0,0,0,0,0,0 ~ PDC:END EQU * P* 0 P* : P END D@ PF,/3E3F /28-/2F > ( P DATA /3031,/3233,/3435,/3637 /30-37 l ( P DATA /3839,/3A5B,/5C27,/3D22 /38-3F P DE P XIF P EJECT P PDC:IN DATA DC:TAB+2
0x228580…29d200 [0x0f6]: Pad {f00=0x008f, f01=0x2008, f02=» H P X ` h p x
0x228580…29d200 [0x0f7]: Pad {f00=0x008f, f01=0x0190, f02=»(N) CLT170 YES d & PCLT018 LDK A1,0 RESET RETURN CODE e ( P LDR A3,A2 DATA REQUEST IMMEDIATE ? e @ P RF(N) CLT050 e l $ P ANKL A3,/7000 DEVICE ADDRESS ? e ( P ABL(NE) CLT100 YES, DIN, STD OR DRD e P EJECT e P* e P* e , P* DETERMINE TYP
0x228580…29d200 [0x0f8]: Pad {f00=0x0082, f01=0x0190, f02=»* P IFT MMUPAG=0 PSTART EQU DWTDRD P XIF 8 P* D P IFT MMUPAG=1 N PSTART EQU DWTDRD+4 d P XIF ~ P* 4 PDWTTP EQU START+/00 TIMER POINTER ORDER PROCESS . PDWTWQ EQU START+/02 WRITE/GET BUFFER QUEUE $ PDWTSQ EQU ST
0x228580…29d200 [0x0f9]: Pad {f00=0x0082, f01=0x0004, f02=» X `
0x228580…29d200 [0x0fa]: Pad {f00=0x0082, f01=0x018e, f02=» 0 P IDENT EBCDIC 9.2DK 1 79-11-16 870105040920 P 8 P* @ 4 P************************************************ J P* $ P* PHILIPS TERMINAL SYSTEM PTS P* $ P* EBCDIC = EBCDIC/ASCII TABLE P* P* P* P*
0x228580…29d200 [0x0fb]: Pad {f00=0x0082, f01=0x018e, f02=» P* P* . P* CONDITIONAL ASSEMBLY (SEE ALSO DRDC15) P* J 2 PX:A EQU 1 CODE , 0=ASCII , 1=EBCDIC (DRDC15) T PCODE EQU X:A 4 PX:B EQU 1 READ COMMAND HANDLING IF = 1 (DRDC15) PRCOM EQU X:B P* : P* VERSION FOR SCAND.
0x228580…29d200 [0x0fc]: Pad {f00=0x0082, f01=0x0190, f02=» P* 7C 5C P* 00 7C P* 5A 24 $ P* 6A 40 4 P EJECT D P* R P* 2 P* TABLE FOR CONVERSION OF EBCDIC CODE TO ASCII f P* P* PTASCII EQU * P IFT CODE=1 ( P DATA /7F01,/0203,/0009,/0000 00-07 ( P DATA
0x228580…29d200 [0x0fd]: Pad {f00=0x0082, f01=0x0190, f02=»000,/0000,/0000,/171B 20-27 ( P DATA /0000,/0000,/0005,/0000 28-2F $ ( P DATA /0000,/1600,/0000,/0004 30-37 P ( P DATA /0000,/0000,/1415,/001A 38-3F | ( P DATA /2041,/4243,/4445,/4647 40-47 ( P DATA /4849,/232E,/3C28,/2B21 48-4F ( P DATA /264
0x228580…29d200 [0x0fe]: Pad {f00=0x0082, f01=0x0190, f02=»/402C,/255F,/3E3F 68-6F ( P DATA /1831,/3233,/3435,/3637 70-77 ( P DATA /3839,/3A5B,/5C27,/3D22 78-7F L ( P DATA /2061,/6263,/6465,/6667 80-87 x ( P DATA /6869,/5B2E,/3C28,/2B21 88-8F ( P DATA /266A,/6B6C,/6D6E,/6F70 90-97 ( P DATA /7172,/5
0x228580…29d200 [0x0ff]: Pad {f00=0x0082, f01=0x0190, f02=»3,/3435,/3637 B0-B7 ( P DATA /3839,/3A23,/4027,/3D22 B8-BF ( P DATA /2041,/4243,/4445,/4647 C0-C7 H ( P DATA /4849,/5B2E,/3C28,/2B21 C8-CF t ( P DATA /264A,/4B4C,/4D4E,/4F50 D0-D7 ( P DATA /5152,/5D24,/2A29,/3B5E D8-DF ( P DATA /7F2F,/5354,
0x228580…29d200 [0x100]: Pad {f00=0x0083, f01=0x0190, f02=»027,/3DFF F8-FF | P XIF P EJECT $ P* 2 P* < 2 P* TABLE FOR CONVERSION OF ASCII CODE TO EBCDIC F P* | P* PTEBCDIC EQU * P IFF CODE+RCOM=0 ( P DATA /0001,/0203,/372D,/0000 00-07 ( P DATA /0005,/1500,/0C00,/0000 08
0x228580…29d200 [0x101]: Pad {f00=0x0083, f01=0x018e, f02=»7 n ( P DATA /4D5D,/5C4E,/6B60,/4B61 28-2F ( P DATA /F0F1,/F2F3,/F4F5,/F6F7 30-37 6 ( P DATA /F8F9,/7A5E,/4C7E,/6E6F 38-3F b ( P DATA /6AC1,/C2C3,/C4C5,/C6C7 40-47 ( P DATA /C8C9,/D1D2,/D3D4,/D5D6 48-4F ( P DATA /D7D8,/D9E2,/E3E4,/E5E6 50-57
0x228580…29d200 [0x102]: Pad {f00=0x0083, f01=0x40b4, f02=» j ( P DATA /9798,/99A2,/A3A4,/A5A6 70-77 ( P DATA /A7A8,/A91C,/0000,/00E0 78-7F 4 4 P DATA /544F,/5353 SPEC. FLEX CHAR. 'TOSS' 80-84 ` P XIF P END @ ( P DATA /C8C9,/D1D2,/D3D4,/D5D6 48-4F ( P DATA /D7D8,/D9E2,/E3E4,/E5E6 50-57
0x228580…29d200 [0x103]: Pad {f00=0x0083, f01=0x2008, f02=» 68-6F z ( P DATA /9798,/99A2,/A3A4,/A5A6 70-77 ( P DATA /A7A8,/A91C,/0000,/00E0 78-7F B 4 P DATA /544F,/5353 SPEC. FLEX CHAR. 'TOSS' 80-84 n P XIF P END @ ( P DATA /C8C9,/D1D2,/D3D4,/D5D6 48-4F ( P DATA /D7D8,/D9E2,/E
0x228580…29d200 [0x104]: Pad {f00=0x0083, f01=0x0190, f02=» CW A4,DCTAB ALL ENTRIES CHECKED?? =3 * P RF(E) DCTP25 YES.DWT NOT IN TABLE =3 . P CWR* A6,A4 IN TABLE ?? =3 P RF(E) DCTP30 YES!! =3 ~ " P RB DCTP22 CHECK NEXT ENTRY =3 PDCTP25 EQU * =3 P $ P STR A6,A1 INSERT DWT IN DC:TAB P
0x228580…29d200 [0x105]: Pad {f00=0x0083, f01=0x0190, f02=» P LDK A1,4 DEVICE END P ORS A1,DWTST,A6 ( P CF A15,INSSQ INSERT IN STATUS QUEUE 8 P XIF d PDCTP30 EQU * p P SUR A1,A1 RETURN CODE ::= 0 PENDIO EQU * $ P CF A15,TENDIO COMPLETE REQUEST P RB DCRTN P EJECT P*
0x228580…29d200 [0x106]: Pad {f00=0x0083, f01=0x0190, f02=» P* PDCWR EQU * P IFT MMUPAG=1 $ P LD A1,ECBRL,A8 REQUESTED LENGTH 6 " P CWK A1,BUFLEN ILLEGAL LENGTH? ^ P RF(G) IL:LEN YES!! P XIF P CF A15,TIMEWR SET TIMER P CF A15,INSWQ QUEUE REQUEST P RB DCRTN P*
0x228580…29d200 [0x107]: Pad {f00=0x0083, f01=0x0190, f02=» P* PDCRD EQU * P LD A8,DWTECB,A6 GET ECB . P LD A4,DWTRQ,A6 AND RECEIVE MESSAGE QUEUE @ " P RF(Z) DCRD10 NOTHING IN QUEUE r P P P ( P LDR* A2,A4 TAKE THE FIRST IN QUEUE P ST A2,DWTRQ,A6 P ADK A4,6 " P LD
0x228580…29d200 [0x108]: Pad {f00=0x0091, f01=0x0190, f02=» P STR A2,A15 SAVE A2 $ P LDR* A4,A5 GET LAST OUTPUT DWT $ . P CM CWTRTC,A5 RESET RETRANSMISSION COUNTER L P CMR A5 SET CHANNEL FREE ~ P LDK A1,0 P LDR A7,A7 LOCAL ? P RF(N) QUEU01 YES " P LDK A1,1 INDICATE FIRST TRIAL " P
0x228580…29d200 [0x109]: Pad {f00=0x0091, f01=0x0006, f02=» ( 0
0x228580…29d200 [0x10a]: Pad {f00=0x0091, f01=0x0190, f02=» 0 P IDENT TIMER REL 9.2 79-11-16 870105040920 P 8 P* @ P* J 8 P*************************************************** T P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TIMER = TIMER FUNCTIONS P* P* P*
0x228580…29d200 [0x10b]: Pad {f00=0x0091, f01=0x0190, f02=»AINS TIMER LKM PROCESSORS AND | " P* THE FOLLOWING SUBROUTINES: & P* L * P* -SETIME: SET BLOCK IN TIMER QUEUE V . P* -SETIMP: SETIME + STORE TIMER POINTER P* P* P EJECT TIMER P* P* P*********** P*
0x228580…29d200 [0x10c]: Pad {f00=0x0091, f01=0x0190, f02=» . P ENTRY SETIMP SETIME + STORE TIMER POINTER P 6 P > P F P* N P* X P*********** b P* EXTRNALS * v P************ P* P* P EXTRN TDISP DISPATCHER . P EXTRN LKMQDI QUEUE TERMINAL AND DISPATCH $ P EXTRN
0x228580…29d200 [0x10d]: Pad {f00=0x0091, f01=0x018e, f02=»ADDRESS x $ P EXTRN ACTOT ACTIVATE A TERMINAL * P EXTRN SAVE8 SAVE 8 REGISTERS ON STACK 8 8 P EXTRN TIMQUE POINTER TO FIRST BLOCK IN TIMER QUEUE f 0 P EXTRN IHRET8 RESTORE 8 REGISTERS FROM STACK P EJECT TIMER P* P* . P**********
0x228580…29d200 [0x10e]: Pad {f00=0x0091, f01=0x0190, f02=» d P* 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. L P* ~ PCPU852 EQU 0 P* P EJECT TIMER P* P* P* T I M E R P* ( P* THIS IS THE TIMER LKM
0x228580…29d200 [0x10f]: Pad {f00=0x0091, f01=0x018e, f02=»ELAY P* P* A4 = 0 P* A5 = TTAB ADDRESS ( P* A8 = DELAY F P* P* f P* 2. TIMING AND ACTIVATION p P* P* A1 = PARAMETER 8 P* A4 = DISPATCH ADDRESS OF PROGRAM TO BE ACTIVATED , P* A5 = TTAB ADDRESS
0x228580…29d200 [0x110]: Pad {f00=0x0091, f01=0x0190, f02=» PTIMER EQU * P ADK A4,0 SET CR * P RF(NZ) TIM010 TIMING AND ACTIVATION? 0 P* ^ P EJECT TIMER h P* ~ P* PROGRAM DELAY P* P LDR A1,A5 SET PARAMETER P ST A8,PAR1+2 SET TIME P CF A15,SETIME PPAR1 DATA
0x228580…29d200 [0x111]: Pad {f00=0x0091, f01=0x0190, f02=» PTIM010 EQU * $ P CF A15,FNDTID FIND TTAB ADDRESS P ADK A2,0 SET CR D " P ABL(Z) LKMRQE TTAB NOT FOUND? ( P LDR A3,A2 IN BLOCK: A3=TTAB ADDRESS , P LDR A2,A4 A2=DISPATCH ADDRESS ( P CF A15,GETBLK A1=PARAMETER . P
0x228580…29d200 [0x112]: Pad {f00=0x0091, f01=0x0190, f02=» PQUEDIS EQU * P ABL LKMQDI P* , P EJECT TIMER 6 P* L P* V P* RETURN AFTER TIME OUT ` P* P* 1.PROGRAM DELAY P* PDELAY EQU * P LDR A5,A1 SET TTAB ADDRESS * P RB QUEDIS QUEUE TASK FOR DISPAT
0x228580…29d200 [0x113]: Pad {f00=0x0091, f01=0x0190, f02=»FREBLK AND SET IT FREE P LDR A5,A3 SET TTAB ADDRESS * P LDK A7,0 MONITOR ACTIVATION PARAMETER B ( P CF A15,ACTOT AND ACTIVATE TERMINAL p P RB TTDIS P* P EJECT TIMER P* P* " P* S E T I M E , S E T I M P P*
0x228580…29d200 [0x114]: Pad {f00=0x0091, f01=0x0190, f02=»RS:- ~ P* P* A1 = PARAMETER . P* A4 = IF SETIMP: TIMER POINTER ADDRESS 0 , P* P1 = DISPATCH ADDRESS AFTER TIME OUT b P* P2 = DELAY P* : P* P1 AND P2 ARE STORED AFTER THE SUBROUTINE REQUEST. P* P* EXIT PARAMET
0x228580…29d200 [0x115]: Pad {f00=0x0091, f01=0x018e, f02=» * P IFT CPU852=1 & P CF A15,SAVE8 SAVE A1-A8 ON STACK P XIF J P* V P IFT CPU852=0 ` P INH v " P MSR 8,A15 SAVE A1-A8 ON STACK P XIF P* P EJECT TIMER P* P* * P LDR A6,A4 SAVE TIMER POINTER ADDR
0x228580…29d200 [0x116]: Pad {f00=0x0091, f01=0x0190, f02=» P LDR* A8,A5 TIME IN A8 P ADK A5,2 & ( P ST A5,20,A15 ADJUST PROGRAM COUNTER 8 $ P CF A15,GETBLK GET A FREE BLOCK d P LDR A2,A4 P C1R A1,A8 " P CF A15,GETBLK GET TIMER BLOCK P LD A1,TIMQUE " P STR A1,A4 SET BLOCK IN QUEUE
0x228580…29d200 [0x117]: Pad {f00=0x0091, f01=0x417a, f02=»ETIME? , P STR A4,A6 -SETIMP. STORE TIMER POINTER P* > P EJECT TIMER H P* ^ P* h PSETEND EQU * r P IFT CPU852=1 ( P ABL IHRET8 RESTORE A1-A8 AND RETURN P XIF P* P IFT CPU852=0 * P MLR 8,A15 RESTORE A1-
0x228580…29d200 [0x118]: Pad {f00=0x0091, f01=0x2008, f02=» ST A4,TIMQUE P ADK A4,4 0 P ST A4,10,A15 SET TIMER ADDRESS A4 ON STACK 0 P LDR A6,A6 d P RF(Z) SETEND -SETIME v , P STR A4,A6 -SETIMP STORE TIMER POINTER PSETEND ABL IHRET8 P* P END @ GET A FREE BLOCK
0x228580…29d200 [0x119]: Pad {f00=0x0091, f01=0x0190, f02=»NEL UNIT FREE ? P RF(NE) OUL800 NO P LDR A7,A7 REMOTE ? 2 P RF(N) OUL500 N P LDR A3,A2 d P SUK A3,/82 STX ? v P RF(NE) OUL200 NO P EJECT P* P* S T X P* * P LD A3,LRCDWT,A7 LRC-PROCESS RUNNING ?
0x228580…29d200 [0x11a]: Pad {f00=0x0091, f01=0x0190, f02=» INDICATE FIRST OBC , POUL150 LDR* A3,A6 GET CHANNEL PARAMETER , P ANKL A3,/E00 SET DEVICE NUMBER TO ZERO N P RF OUL510 ~ & POUL175 CWR A3,A6 SAME LRC-DEVICE ? P RF(NE) OUL800 QUEUE OUTPUT P RF OUL350 POUL200 SUK A3,/15 ETB ?
0x228580…29d200 [0x11b]: Pad {f00=0x0091, f01=0x0190, f02=»RCACK+1,A7 GET LRC-ACKUMULATOR P RB OUL150 & P* 8 P* OTHER OUTPUT B P* 8 POUL300 CW A6,LRCDWT,A7 SAME DEVICE SENDING WITH LRC f P RF(Z) OUL350 YES P LD A3,CWTBLK,A5 , P RF(NN) OUL500 BLOCKSENDING NOT RUNNING * P RF OU
0x228580…29d200 [0x11c]: Pad {f00=0x0091, f01=0x0190, f02=» P LD A3,CWTBLK,A5 P RF(Z) OUL500 ( P ORKL A2,/8000 INDICATE BLOCKSENDING 2 P LDK A3,/80 ^ 2 P SC A3,CWTBLK,A5 INDICATE BLOCKSENDING RUNNING r P EJECT P* P* & P* SEND CHARACTER SECTION. 2 P* CHARACTER IS
0x228580…29d200 [0x11d]: Pad {f00=0x0091, f01=0x0190, f02=»ERS FOR f . P* DWT AND ACKUMULATOR IS UPDATED. P B POUL500 EQU * J " P LDR* A3,A6 CHANNEL PARAMETER ^ P ANKL A3,/7E00 & POUL510 ORR A2,A3 OUTPUT WORD IN A2 P* P* P* POUL515 EX CWTOTR,A5 OTR P RF(R) O
0x228580…29d200 [0x11e]: Pad {f00=0x0091, f01=0x0190, f02=»ESSBLOCK p . P ABI INTADR,A2 GO TO INTERRUPT HANDLER =8 POUL520 EQU * B P* V P IFT LOGING=1 ` P* v 0 P CF A15,LOGG ** LOGG OF OUTPUT CHARACTER ** P* P XIF P* P STR A6,A5 SET CHANNEL BUSY , P ST A2,CWTLOW,A5 S
0x228580…29d200 [0x11f]: Pad {f00=0x0091, f01=0x018e, f02=»ULATOR n . P CF A15,RESTSY START OR RESTART SYNC-TIMER 4 POUL600 SC A2,DWTOCH,A6 SET LAST OUTPUT CHARACTER @ POUL700 EQU * x P IFT CPU852=1 ( P ABL IHRET8 RESTORE A1-A8 AND RETURN P XIF P* P IFT CPU852=0 * P MLR 8,A15 RESTO
0x228580…29d200 [0x120]: Pad {f00=0x0084, f01=0x0190, f02=» ( PFECBBA RES 1 WRITING BUFFER ADDRESS 6 & PFECBRL RES 1 WRITING BUFFER LENGTH 6 0 PFBAX DATA 0 BUFFER INDEX 6 Z 0 PFBLST DATA 0 START OF LAST TRANSMITTED BLOCK 6 z $ PDCSTQ DATA 0 STATUS QUEUE ANCHOR 6 . PDCTPP DATA 0 POINTER FOR PROCEDURE TIMING 6 , PRE
0x228580…29d200 [0x121]: Pad {f00=0x0084, f01=0x0006, f02=»
0x228580…29d200 [0x122]: Pad {f00=0x0084, f01=0x0190, f02=» 2 P IDENT TMMLKM REL 9.2 79-11-16 870105040920 P : P* B P* L 6 P************************************************** V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* ( P* TMMLKM = TOSS MMU LKM PROCESSORS P* P*
0x228580…29d200 [0x123]: Pad {f00=0x0084, f01=0x0190, f02=»WING n P* TOSS MMU LKM PROCESSORS: P* 0 " P* - TCHPAG = CHANGE MMU PAGE : P* ` $ P* - TCHMMU = CHANGE MMU TABLE j P* & P* - TLUSEG = LOCK/UNLOCK SEGMENT P* P* P EJECT TMMLKM P* P* P****
0x228580…29d200 [0x124]: Pad {f00=0x0084, f01=0x0190, f02=» MMU TABLE | & P ENTRY TLUSEG LOCK/UNLOCK SEGMENT P < P D P L P* T P* ^ P************* h P* EXTERNALS * ~ P************* P* P* 0 P EXTRN FNDTID FIND TTAB ADDRESS FROM TASK ID , P EXTRN LKMQDI QUEUE TASK
0x228580…29d200 [0x125]: Pad {f00=0x0084, f01=0x0190, f02=»AB ADDRESS ~ $ P EXTRN SCTNOS NUMBER OF SEGMENTS P EJECT TMMLKM : P* R P* P********** f P* TCHPAG * x P********** P* P* 2 P* THIS IS THE CHANGE MMU PAGE LKM PROCESSOR. P* B P* TCHPAG WILL CHANGE THE
0x228580…29d200 [0x126]: Pad {f00=0x0084, f01=0x0190, f02=»TERED FROM THE LKM HANDLER & P* WITH THE FOLLOWING PARAMETERS: " P* L P* A5 = TTAB ADDRESS V ( P* A7 = PAGE TO BE CHANGED, 0 - 15 t * P* A8 = NEW LOCATION OF PAGE, 0 - 63 P* < P* IT RETURNS TO CALLING TASK WITH A7 AND A8 UNCH
0x228580…29d200 [0x127]: Pad {f00=0x0084, f01=0x0190, f02=»XING IN MMU TABLE v P ADR A7,A5 ADD TTAB ADDRESS P LDR A2,A8 NEW PAGE LOCATION > . P ANK A2,/3F SKIP IRRELEVANT BITS (IF ANY) b P SLL A2,2 < P SC A2,TTB:MT,A7 STORE NEW LOCATION OF PAGE IN MMU TABLE P* 0 PT:DISP ABL LKMQDI QUEUE TA
0x228580…29d200 [0x128]: Pad {f00=0x0084, f01=0x018e, f02=»* P* 4 P* THIS IS THE CHANGE MMU TABLE LKM PROCESSOR. P* L D P* TCHMMU WILL CHANGE THE MMU TABLE CONTENTS OF REQUESTING TASK V 4 P* TO THE MMU TABLE CONTENTS OF SPECIFIED TASK. P* * P* IT IS ENTERED FROM THE LKM HANDLER
0x228580…29d200 [0x129]: Pad {f00=0x0084, f01=0x0190, f02=» ` P* ( P* IT RETURNS TO CALLING TASK WITH P* THE FOLLOWING PARAMETER: > P* b 2 P* A7 = UNCHANGED IF REQUEST SUCCESSFUL, ELSE l & P* A7 = -1 IF TASK NOT IN SYSTEM P* " PTCHMMU EQU * CHANGE MMU TABLE * P CF A15,FNDTID
0x228580…29d200 [0x12a]: Pad {f00=0x0084, f01=0x0190, f02=»NTENTS h 4 P TS TTB:MT,A5 STORE IN MMU TABLE OF CALLING TASK * P RB T:DISP QUEUE TASK FOR DISPATCHING F P* t P EJECT TMMLKM ~ P* P* P********** P* TLUSEG * P********** P* P* 6 P* THIS IS THE LOCK/U
0x228580…29d200 [0x12b]: Pad {f00=0x0084, f01=0x0190, f02=»OCK SEGMENT REQUEST IS ISSUED FOR THAT SEGMENT. P* 8 * P* IT IS ENTERED FROM THE LKM HANDLER B & P* WITH THE FOLLOWING PARAMETERS: p P* P* A5 = TTAB ADDRESS P* A7 = SEGMENT NUMBER & P* A8 = 0 IF LOCK SEGMENT REQUEST (
0x228580…29d200 [0x12c]: Pad {f00=0x0084, f01=0x0190, f02=» P* > P* A7 = UNCHANGED IF SEGMENT LOADING IS SUCCESSFUL, ELSE & P* A7 = -1 IF REQUEST ERROR, ELSE P P* z P* P EJECT TMMLKM P* P* $ PTLUSEG EQU * LOCK/UNLOCK SEGMENT * P LDR A1,A7 CHECK IF SEGMENT NUMBER < 0
0x228580…29d200 [0x12d]: Pad {f00=0x0084, f01=0x0190, f02=»TLCERR EQU * , P ABL LKMRQE BRANCH TO LKM REQUEST ERROR P* D PTLUS00 EQU * N , P SLL A1,3 ADJUST FOR INDEXING IN SEGTAB b $ P AD A1,SCTSEG ADD SEGTAB ADDRESS " P LCR A4,A1 GET SEGMENT STATUS P ANK A4,/8 " P RB(NZ) TLCERR CORE RESI
0x228580…29d200 [0x12e]: Pad {f00=0x0084, f01=0x4164, f02=» P EJECT TMMLKM P* P* LOCK SEGMENT & P* < 4 P ORRS A4,A1 INDICATE SEGMENT TO BE CORE RESIDENT F P RB T:DISP ~ P* P* UNLOCK SEGMENT P* PTLUS10 EQU * P C1R A4,A4 A4 := /FDFF 2 P ANRS A4,A1 INDICATE SEGMENT
0x228580…29d200 [0x12f]: Pad {f00=0x0084, f01=0x2008, f02=» NT TCHPAG PRR 9.1 78-10-16 870105040910 END <@ H
0x228580…29d200 [0x130]: Pad {f00=0x0084, f01=0x0190, f02=» n P LDK A3,0 P* P IFT MMUPAG=0 $ * P LDR* A1,A7 GET NO OF ECB:S IN ECBBLK : P XIF h P* t P IFT MMUPAG=1 ~ ( P ELR A1,A7 GET NO OF ECB:S IN ECBBLK P XIF P* ( P RF(NP) TP:RQE REQUEST ERROR IF <= 0 P*
0x228580…29d200 [0x131]: Pad {f00=0x0084, f01=0x0190, f02=»S v & P LDR* A2,A8 GET FIRST WORD OF ECB P XIF 4 P* @ P IFT MMUPAG=1 J P ELR A8,A7 GET ECB ADDRESS ` $ P ELR A2,A8 GET FIRST WORD OF ECB P XIF P* ( P RF(N) TMW:30 I/O ALREADY COMPLETED? 8 P CF A15,FNDDWT NO, SEARCH DWT
0x228580…29d200 [0x132]: Pad {f00=0x0084, f01=0x0190, f02=» " P LD A2,DWTST,A6 GET DWT STATUS P RF(N) TP:RQE NOT BUSY? * P CW A5,DWTTAB,A6 J 4 P RF(NE) TP:RQE REQUEST NOT ISSUED BY THIS TASK? b 0 P LD A2,DWTWAT,A6 GET WAIT/ACTIVATE INDICATOR , P RF(NZ) TP:RQE REQUEST ISSUED WITH WAIT? P ORK A6,1 SE
0x228580…29d200 [0x133]: Pad {f00=0x0084, f01=0x0190, f02=»AVE FIRST DWT ADDRESS P LDR A3,A6 P* 0 PTMW:20 EQU * : 8 P ST A6,DWTWAT,A9 CHAIN THIS DWT WITH THE ONE BEFORE N $ P LDR A9,A6 SAVE THIS DWT ADDRESS P SUK A1,1 ( P RB(P) TMW:10 MORE ECB:S IN ECBBLK? : P ST A3,DWTWAT,A9 NO, SET F
0x228580…29d200 [0x134]: Pad {f00=0x0084, f01=0x0190, f02=» TTAB SAVE AREA p 2 P ADK A3,0 CHECK FLAG IF FIRST ECB TO WAIT FOR & P RF(Z) TP:QDI FIRST ECB IN ECBBLK? N P* x : PTMW:40 ADKL A3,DWTWAT POINT TO WAIT/ACTIVATE INDICATOR $ P LDR* A2,A3 GET NEXT DWT ADDRESS P RF(Z) TP:QDI NO MORE DWT:S?
0x228580…29d200 [0x135]: Pad {f00=0x0084, f01=0x40aa, f02=»QU * " P ABL LKMRQE LKM REQUEST ERROR P* 2 PTP:QDI EQU * < ( P ABL LKMQDI QUEUE TASK AND DISPATCH P P* | P* P* P END @ VATE INDICATOR $ P LDR* A2,A3 GET NEXT DWT ADDRESS P RF(Z) TP:QDI NO MORE DWT:S?
0x228580…29d200 [0x136]: Pad {f00=0x0084, f01=0x2008, f02=» TERMINAL NOT IN SYSTEM 8 P CF A15,QTJOB QUEUE CALLING TERMINAL FOR DISPATCHING ( P LDR A5,A2 d P LDR A2,A4 v 0 P RB(Z) TPQUE RESTART: QUEUE FOR DISPATCHING P CF A15,ACTOT ACTIVATION P RB TPDIS GO TO DISPACHER P EJECT
0x228580…29d200 [0x137]: Pad {f00=0x0084, f01=0x0000, f02=»
0x228580…29d200 [0x138]: Pad {f00=0x0031, f01=0x0190, f02=»F REMOVED BLK n " P STR A2,A4 UPDATE QUEUE LINKS P ST A4,PAG:QB,A2 < P XIF T P* ` P EJECT TLDSEG j P* , P* GET PAGE ADDRESS OF REQUESTED SEGMENT P* & PTLDS20 EQU * ENTRY USED BY LDTASK & P LD A1,PAG:PA,A1 GET PAGE
0x228580…29d200 [0x139]: Pad {f00=0x0031, f01=0x0006, f02=» 0 8 @
0x228580…29d200 [0x13a]: Pad {f00=0x0031, f01=0x0190, f02=» 2 P IDENT TLDSEG REL 9.2 79-11-16 870105040920 P : P* B P* L 6 P************************************************** V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TLDSEG = LOAD SEGMENT P* P* P*
0x228580…29d200 [0x13b]: Pad {f00=0x0031, f01=0x0190, f02=»M PROCESSOR, d 0 P* USED IN TOSS MEMORY MANAGEMENT SYSTEMS. P* H P* R P EJECT TLDSEG P* t P* ~ P*********** P* ENTRIES * P*********** P* P* P ENTRY TLDSEG LOAD SEGMENT & P ENTRY TLDS15 EN
0x228580…29d200 [0x13c]: Pad {f00=0x0031, f01=0x0190, f02=»* EXTERNALS * P************* P* , P* 6 0 P EXTRN PRUN TTAB ADDRESS OF RUNNING PROGRAM @ P EXTRN TDISP DISPATCHER t $ P EXTRN LKM030 LKM REQUEST ERROR & P EXTRN PAG:QB QUEUE LINK BACKWARDS P EXTRN PAG:PA PAGE ADDRESS & P E
0x228580…29d200 [0x13d]: Pad {f00=0x0031, f01=0x018e, f02=»A TTAB SAVE AREA P EXTRN TTB:MT MMU TABLE ( P EXTRN TTB:SB SEGMENT BLOCK ADDRESS 8 2 P EXTRN QLTDSK ACTIVATE LDTASK AT ENTRY LT:DSK d P EXTRN SCTSEG SEGTAB ADDRESS $ P EXTRN SCTNOS NUMBER OF SEGMENTS & P EXTRN SCTMMP MMU TABLE PAGE ENTRY
0x228580…29d200 [0x13e]: Pad {f00=0x0031, f01=0x0190, f02=» . P***************************************** P* : P* CONDITIONAL ASSEMBLY D P* b . P***************************************** l P* . P* A PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAINED BY SETTING MMUPAG EQU 1. P*
0x228580…29d200 [0x13f]: Pad {f00=0x0031, f01=0x0190, f02=» CPU852 EQU 0. t P* PCPU852 EQU 0 P* 4 * > . ** A PROGRAM VERSION USING TOSS DISC PAGING H * &* IS OBTAINED BY SETTING DSKPAG EQU 1. z * PDSKPAG EQU 1 * P* 4 P* A PROGRAM VERSION USING TOSS ASSEMBLER OVERLAY
0x228580…29d200 [0x140]: Pad {f00=0x0031, f01=0x0190, f02=» P********** P* TLDSEG * P********** ( P* : P* D 0 P* THIS IS THE LOAD SEGMENT LKM PROCESSOR. N P* * P* IT IS ENTERED FROM THE LKM HANDLER & P* WITH THE FOLLOWING PARAMETERS: P* 4 P* A2 = DISPATCH ADDRESS (N
0x228580…29d200 [0x141]: Pad {f00=0x0031, f01=0x0190, f02=»S) d P* ( P* IT RETURNS TO CALLING TASK WITH " P* THE FOLLOWING PARAMETERS: @ P* f > P* A7 = UNCHANGED IF SEGMENT LOADING IS SUCCESSFUL, ELSE p & P* A7 = -1 IF REQUEST ERROR, ELSE ( P* A7 = -2 IF DISC I/O ERROR, ELSE $ P*
0x228580…29d200 [0x142]: Pad {f00=0x0031, f01=0x018e, f02=»UGH THE DISPATCHER AFTER p > P* COMPLETION, THUS NO TASK SWITCHING WILL BE PERFORMED, < P* IN PURPOSE TO MAKE THE REQUEST AS FAST AS POSSIBLE. b P* : P* WHEN REQUESTED SEGMENT IS NOT IN CORE TLDSEG WILL : P* ACTIVATE LDTASK WHICH WILL L
0x228580…29d200 [0x143]: Pad {f00=0x0031, f01=0x018e, f02=» PTLDSEG EQU * LOAD SEGMENT * P LDR A1,A7 CHECK IF SEGMENT NUMBER < 0 & P RF(N) TLDERR REQUEST ERROR? T 2 P CW A1,SCTNOS CHECK IF SEGMENT NUMBER TOO BIG x P RF(NG) TLDS00 OK? P* $ PTLDERR LDK A6,/FF INDICATE ERROR , P ABL LKM030 BRAN
0x228580…29d200 [0x144]: Pad {f00=0x0031, f01=0x0190, f02=» P LDR A3,A5 GET TTAB ADDRESS , P SLL A1,3 ADJUST FOR INDEXING IN SEGTAB , $ P AD A1,SCTSEG ADD SEGTAB ADDRESS & P ADK A2,2 UPDATE DISPATCH ADDRESS P* P IFT DSKPAG=0 $ P SUKL A15,4 ADJUST STACKPOINTER . P ST A2,4,A15 SET DIS
0x228580…29d200 [0x145]: Pad {f00=0x0031, f01=0x0190, f02=»,TTB:SB,A3 RESET SEGMENT BLOCK ADDRESS 6 P LD A1,SEG:DS,A1 GET LOGICAL ADDRESS OF SEGMENT 0 . P* h P IFT DSKPAG=1 r $ P SUKL A15,4 ADJUST STACKPOINTER . P ST A2,4,A15 SET DISPATCH ADDRESS ON STACK P XIF P* P RF TLDS40 P
0x228580…29d200 [0x146]: Pad {f00=0x0031, f01=0x0190, f02=»ADDRESS j " P LDR* A4,A1 GET SEGMENT STATUS * P RF(N) TLDS10 SEGMENT LOADED IN CORE? 6 P ST A2,TTB:SA,A3 d P CM PRUN | P* P* ACTIVATE LOAD TASK P* 6 P CF A15,QLTDSK ACTIVATE LOAD TASK AT ENTRY LT:DSK P ABL TDISP GO TO DIS
0x228580…29d200 [0x147]: Pad {f00=0x0031, f01=0x0190, f02=»4 ADJUST STACKPOINTER . P ST A2,4,A15 SET DISPATCH ADDRESS ON STACK P* P ( P* REMOVE PAGE BLOCK FROM PAGE QUEUE Z P* P XIF P* & PTLDS15 EQU * ENTRY USED BY LDTASK P IFT DSKPAG=1 & P LDR* A2,A1 GET QUEUE LINK FORWARD
0x228580…29d200 [0x148]: Pad {f00=0x0032, f01=0x0190, f02=»F REMOVED BLK n " P STR A2,A4 UPDATE QUEUE LINKS P ST A4,PAG:QB,A2 < P XIF T P* ` P EJECT TLDSEG j P* , P* GET PAGE ADDRESS OF REQUESTED SEGMENT P* & PTLDS20 EQU * ENTRY USED BY LDTASK & P LD A1,PAG:PA,A1 GET PAGE
0x228580…29d200 [0x149]: Pad {f00=0x0032, f01=0x0190, f02=»MMU TABLE j P* 0 P AD A3,SCTMMP POINT TO FIRST USED PAGE ENTRY , P LD A4,SCTNPE GET NUMBER OF PAGE ENTRIES P P* P* UPDATE PAGE ENTRY/ENTRIES P* PTLDS25 EQU * P SCR A2,A3 UPDATE PAGE ENTRY P SUK A4,1 ( P RF(NP)
0x228580…29d200 [0x14a]: Pad {f00=0x0032, f01=0x0190, f02=»* P EJECT TLDSEG P* " P* , 4 PTLDS30 ANKL A1,/300 COMPUTE CURRENT SEGMENT BASE 6 P SLL A1,2 n P OR A1,SCTLAP $ P TL TTB:MT,A5 LOAD MMU REGISTERS P* PTLDS40 EQU * P IFT ASSOLY=0 2 P ES A1,T:ACSB,A13 UPDATE
0x228580…29d200 [0x14b]: Pad {f00=0x0032, f01=0x0190, f02=» BASE h P XIF P* P IFT CPU852=0 $ P LDR A6,A5 : $ P ML 6,TTB:SA+2,A6 RESTORE A1-A6 L $ P RTN A15 RETURN TO CALLING TASK t P XIF P* P IFT CPU852=1 $ P LD A1,TTB:SA+2,A5 RESTORE A1-A6 P LD A2,TTB:SA+4,A5 P
0x228580…29d200 [0x14c]: Pad {f00=0x0032, f01=0x4048, f02=» TASK v P XIF P* P* $ P* . END 8@ D $ P ML 6,TTB:SA+2,A6 RESTORE A1-A6 L $ P RTN A15 RETURN TO CALLING TASK t P XIF P* P IFT CPU852=1 $ P LD A1,TTB:SA+2,A5 RESTORE A1-A6 P LD A2,TTB:SA+4,A5 P
0x228580…29d200 [0x14d]: Pad {f00=0x0032, f01=0x2008, f02=» NT TLDSEG PREREL.9.1 780907 BOFE END 6@ B
0x228580…29d200 [0x14e]: Pad {f00=0x0032, f01=0x0190, f02=»D OF QUEUE P IM 4,A4 INCREMENT TIMER P RB(N) CLK10 NOT TIME OUT? 2 P RF(Z) CLK30 TIME OUT? T P LDR* A3,A4 RELEASE TIMER r P STR A3,A6 P CF A15,FREBLK P LDR A4,A2 P CF A15,FREBLK P RB CLK20 P* P EJECT L
0x228580…29d200 [0x14f]: Pad {f00=0x0032, f01=0x018e, f02=» P IFT CPU852=1 & P CF A15,SAVE8 SAVE A1-A8 ON STACK P XIF H P* T P IFT CPU852=0 ^ " P MSR 8,A15 SAVE A1-A8 ON STACK t P XIF P* $ P CF A15,SWL48 SWITCH TO LEVEL 48 P INH P LD A2,2,A4 LOAD DISP BLOCK P L
0x228580…29d200 [0x150]: Pad {f00=0x0084, f01=0x018e, f02=»FF RCOM=0 M $ PRDBUF EQU * READ BUFFER COMMAND N PRDMOD EQU * N : " P CM XSEL RESET SELECT EXPECTED N N 4 P LD A6,FDWTIN DWT-ADDRESS FOR ADDRESSED TERMINAL N t $ P LD A4,DWTBUF,A6 BUFFER ADDRESS N $ P SUK A4,2 SDJUST BUFFER ADDRESS N " P LDKL A3,1922
0x228580…29d200 [0x151]: Pad {f00=0x0084, f01=0x0004, f02=»
0x228580…29d200 [0x152]: Pad {f00=0x0084, f01=0x0190, f02=» 2 P IDENT TABORT REL 9.2 79-11-16 870105040920 P : P* B P* L 6 P************************************************* V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* " P* TABORT = ABORT I/O REQUEST P* P* P*
0x228580…29d200 [0x153]: Pad {f00=0x0084, f01=0x0190, f02=»AINS THE | ( P* ABORT I/O REQUEST LKM PROCESSOR. P* < P* F P EJECT TABORT P P* h P* r P*********** | P* ENTRIES * P*********** P* P* P ENTRY TABORT P P P P* P*
0x228580…29d200 [0x154]: Pad {f00=0x0084, f01=0x0190, f02=» DWTST DWT STATUS & P EXTRN DWTADR DRIVER ADDRESS BLOCK & P EXTRN DWTTAB TTAB ADDRESS IN DWT D 0 P EXTRN DWTWAT WAIT ACTIVATE INDICATOR IN DWT n " P EXTRN DWTECH ECHO DEVICE DWT ( P EXTRN ABTADR ABORT ROUTINE ADDRESS P EXTRN TENDIO END I/O
0x228580…29d200 [0x155]: Pad {f00=0x0084, f01=0x0190, f02=» TABORT P* P* . P***************************************** & P* X P* CONDITIONAL ASSEMBLY b P* . P***************************************** P* . P* A PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAINED BY S
0x228580…29d200 [0x156]: Pad {f00=0x0084, f01=0x0190, f02=»BORT * P********** P* P* * 4 P* THIS IS THE ABORT I/O REQUEST LKM PROCESSOR. 4 P* l * P* IT IS ENTERED FROM THE LKM HANDLER v & P* WITH THE FOLLOWING PARAMETERS: P* P* A5 = TTAB ADDRESS P* A8 = ECB ADDRESS
0x228580…29d200 [0x157]: Pad {f00=0x0084, f01=0x0190, f02=»AT MADE THE I/O REQUEST. THUS I/O WITH WAIT CAN P* NOT BE ABORTED. 8 P* T P* ^ PTABORT EQU * h P IFT MMUPAG=0 | & P LDR* A3,A8 GET FIRST WORD OF ECB P XIF P* P IFT MMUPAG=1 $ P ELR A3,A8 GET FIRST WORD OF ECB
0x228580…29d200 [0x158]: Pad {f00=0x0085, f01=0x0190, f02=» P RF(Z) TABOER DWT UNKNOWN? P* & P EJECT TABORT 0 P* H P* R P CW A5,DWTTAB,A6 P RF(NE) TABOER ILLEGAL TASK? t P LD A7,DWTST,A6 " P RF(N) TABOER DEVICE NOT BUSY? P SLC A7,2 $ P RF(NN) TABO20 NOT ECHO REQUEST?
0x228580…29d200 [0x159]: Pad {f00=0x0085, f01=0x018e, f02=»RESS BLOCK f 8 P LD A2,ABTADR,A2 GET ABORT ROUTINE ADDRESS (IF ANY) , P RF(Z) TABO10 NO SPECIAL ABORT ROUTINE? N & P CFR A15,A2 PERFORM ABORT ROUTINE ~ P* PTABO10 EQU * $ P CF A15,TENDIO ABORT ECHO DEVICE P LDR A6,A8 RESTORE DWT
0x228580…29d200 [0x15a]: Pad {f00=0x0085, f01=0x0190, f02=» n : P CF A15,FREBLK I/O AND ACTIVATE. FREE DISPATCHER BLOCK " P CM DWTWAT,A6 INDICATE NO WAIT F P* l PTABO30 EQU * v 8 P LD A2,DWTADR,A6 GET ADDRESS TO DRIVER ADDRESS BLOCK 8 P LD A2,ABTADR,A2 GET ABORT ROUTINE ADDRESS (IF ANY) , P RF(Z) T
0x228580…29d200 [0x15b]: Pad {f00=0x0085, f01=0x40c8, f02=»CODE z P CF A15,TENDIO ABORT 0 P ABL LKMQDI QUEUE TASK AND GO TO DISPATCHER ( P* 0 PTABOER ABL LKMRQE GO AND INDICATE LKM ERROR f P* P* P* P END @ D A2,ABTADR,A2 GET ABORT ROUTINE ADDRESS (IF ANY) , P RF(Z) T
0x228580…29d200 [0x15c]: Pad {f00=0x0085, f01=0x2008, f02=»
0x228580…29d200 [0x15d]: Pad {f00=0x0085, f01=0x0190, f02=»,TTB:SB,A3 RESET SEGMENT BLOCK ADDRESS 6 P LD A1,SEG:DS,A1 GET LOGICAL ADDRESS OF SEGMENT 0 . P* h P IFT DSKPAG=1 r $ P SUKL A15,4 ADJUST STACKPOINTER . P ST A2,4,A15 SET DISPATCH ADDRESS ON STACK P XIF P* P RF TLDS40 P
0x228580…29d200 [0x15e]: Pad {f00=0x0085, f01=0x0190, f02=»ADDRESS j " P LDR* A4,A1 GET SEGMENT STATUS * P RF(N) TLDS10 SEGMENT LOADED IN CORE? 6 P ST A2,TTB:SA,A3 d P CM PRUN | P* P* ACTIVATE LOAD TASK P* 6 P CF A15,QLTDSK ACTIVATE LOAD TASK AT ENTRY LT:DSK P ABL TDISP GO TO DIS
0x228580…29d200 [0x15f]: Pad {f00=0x0085, f01=0x0190, f02=»4 ADJUST STACKPOINTER . P ST A2,4,A15 SET DISPATCH ADDRESS ON STACK P* P ( P* REMOVE PAGE BLOCK FROM PAGE QUEUE Z P* P XIF P* & PTLDS15 EQU * ENTRY USED BY LDTASK P IFT DSKPAG=1 & P LDR* A2,A1 GET QUEUE LINK FORWARD
0x228580…29d200 [0x160]: Pad {f00=0x0085, f01=0x0190, f02=»F REMOVED BLK n " P STR A2,A4 UPDATE QUEUE LINKS P ST A4,PAG:QB,A2 < P XIF T P* ` P EJECT TLDSEG j P* , P* GET PAGE ADDRESS OF REQUESTED SEGMENT P* & PTLDS20 EQU * ENTRY USED BY LDTASK & P LD A1,PAG:PA,A1 GET PAGE
0x228580…29d200 [0x161]: Pad {f00=0x0085, f01=0x0006, f02=»
0x228580…29d200 [0x162]: Pad {f00=0x0085, f01=0x0190, f02=» 2 P IDENT MONTIM REL 9.2 79-11-16 870105040920 P : P* B P* L < P******************************************************* V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* * P* MONTIM = MONITOR CLOCK PROCESSORS P* P
0x228580…29d200 [0x163]: Pad {f00=0x0085, f01=0x0190, f02=»* THIS MODULE CONTAINS TOSS MONITOR CLOCK PROCESSORS P* @ 0 P* -GETTIM GET TIME FROM MONITOR CLOCK J P* ~ . P* -SETTIM SET TIME IN MONITOR CLOCK P* P EJECT MONTIM P* P* P*********** P* ENTR
0x228580…29d200 [0x164]: Pad {f00=0x0085, f01=0x0190, f02=»TOR CLOCK r P P P " P* * P* 4 P************* > P* EXTERNALS * T P************* j P* P* P EXTRN MONCLO MONITOR CLOCK * P EXTRN LKMQDI QUEUE TASK AND DISPATCH P EXTRN TTB:SA TTAB SAVE AREA P
0x228580…29d200 [0x165]: Pad {f00=0x0085, f01=0x0190, f02=»* . P***************************************** P* < . P* A PROGRAM VERSION USING TOSS MMU PAGING F * P* IS OBTAINED BY SETTING MMUPAG EQU 1. x P* PMMUPAG EQU 1 P* P EJECT MONTIM P* P* P* G E T T I M
0x228580…29d200 [0x166]: Pad {f00=0x0085, f01=0x0190, f02=»ADDRESS TO THE USER TIMER CONTROL 2 P* BLOCK IN A8. MONITOR CLOCK IS COPIED INTO * P* TIMER CONTROL BLOCK. ` P* P* PGETTIM EQU * 6 P LDKL A7,MONCLO+6 ADDRESS TO MONITOR CLOCK SECOND P LDK A3,6 COUNTER P INH P
0x228580…29d200 [0x167]: Pad {f00=0x0085, f01=0x018e, f02=» v P SUK A7,2 P LDR* A6,A7 HOURS P ENB 4 P* @ * PGETT10 CF A15,BYTASC CONVERT TO ASCII J P IFT MMUPAG=0 x * P SC A6,1,A8 STORE RIGHTHAND CHARACTER P ECR A6,A6 ( P SCR A6,A8 STORE LEFTHAND CHARACTER P XIF P*
0x228580…29d200 [0x168]: Pad {f00=0x0085, f01=0x0190, f02=» $ P RF(Z) GETT15 TCB ADDRESS EVEN? P LDR A1,A6 0 P EL A4,1,A8 B P ANK A4,/FF V P SLL A1,8 j P ORR A1,A4 | P ES A1,1,A8 P ELR A4,A8 P SRL A6,8 P ANKL A4,/FF00 P ORR A6,A4 P* 6 PGETT15 ESR A6,A8 S
0x228580…29d200 [0x169]: Pad {f00=0x0085, f01=0x0190, f02=»ET ACTUAL TIME FROM STACK P RB GETT10 " P* 4 P EJECT MONTIM > P* V P* ` PGETT20 SUK A7,2 j . P LDR* A6,A7 GET ACCUMULATED 24 HOUR CARRY 2 P ST A6,TTB:SA+14,A5 STORE IN TTAB SAVE AREA A7 P CMR A7 CLEAR MIDNIGTH CARRY
0x228580…29d200 [0x16a]: Pad {f00=0x0085, f01=0x0190, f02=»S IS THE SET TIME LKM PROCESSOR. P* ( 0 P* IT IS ENTERED FROM THE LKM HANDLER WITH 2 0 P* ADDRESS TO THE USER TIMER CONTROL BLOCK f 0 P* IN A8. VALUE IN TIMER CONTROL BLOCK IS $ P* COPIED INTO MONITOR CLOCK. P* P* P
0x228580…29d200 [0x16b]: Pad {f00=0x0085, f01=0x0190, f02=»QU * P IFT MMUPAG=0 & P LCR A6,A8 GET LEFTHAND CHARACTER " P ECR A6,A6 L ( P LC A6,1,A8 GET RIGHTHAND CHARACTER ^ P XIF P* P IFT MMUPAG=1 2 P ELR A6,A8 GET VALUE FROM TIMER CONTROL BLOCK . P LDR A4,A8 GET TIMER CONTROL B
0x228580…29d200 [0x16c]: Pad {f00=0x0085, f01=0x0190, f02=»LL A6,8 P SRL A4,8 P ORR A6,A4 " P* 4 PSETT15 EQU * > P XIF R P* ^ P EJECT MONTIM h P* P* $ P CF A15,ASCTBY CONVERT TO BINARY P SUK A3,2 END ? P RF(E) SETT20 P ADKL A8,2 0 P STR A6,A15 SA
0x228580…29d200 [0x16d]: Pad {f00=0x0085, f01=0x0190, f02=» l P SUK A7,2 P LDR* A6,A15 ( P STR A6,A7 MINUTES TO MONITOR CLOCK . P SUK A7,2 Z P LDR* A6,A15 l & P STR A6,A7 HOURS TO MONITOR CLOCK P SUK A7,2 P CMR A7 RESET MIDNIGTH CARRY P RB TPDIS P* P EJECT MONTI
0x228580…29d200 [0x16e]: Pad {f00=0x0085, f01=0x0190, f02=» RESULT IN A6. P* P* ( PBYTASC EQU * 2 P LDK A4,0 F P* X PBYTA10 SUK A6,/A b P RF(N) BYTA20 z P ADKL A4,/100 P RB BYTA10 P* PBYTA20 ADK A6,/A P ADR A6,A4 P ORKL A6,/3030 P RTN A15
0x228580…29d200 [0x16f]: Pad {f00=0x0085, f01=0x415c, f02=» ASCII TO BINARY. ~ P* RESULT IN A6. P* > P* H PASCTBY EQU * R P LDR A4,A6 f P ANK A6,/F x P SRL A4,8 P ANK A4,/F P RF(E) ASCT20 P* PASCT10 ADK A6,/A P SUK A4,1 P RB(NE) ASCT10
0x228580…29d200 [0x170]: Pad {f00=0x0085, f01=0x2008, f02=» ASCT10 ADK A6,/A P SUK A4,1 P RB(NE) ASCT10 2 PASCT20 RTN A15 H P END ^@ j P RTN A15 p P* P* 2 P* ASCTBY = SUBROUTINE TO CONVERT A6-CONTENT ( P* FROM ASCII TO BINARY. P* RESULT
0x228580…29d200 [0x171]: Pad {f00=0x0085, f01=0x018e, f02=»RESS BLOCK f 8 P LD A2,ABTADR,A2 GET ABORT ROUTINE ADDRESS (IF ANY) , P RF(Z) TABO10 NO SPECIAL ABORT ROUTINE? N & P CFR A15,A2 PERFORM ABORT ROUTINE ~ P* PTABO10 EQU * $ P CF A15,TENDIO ABORT ECHO DEVICE P LDR A6,A8 RESTORE DWT
0x228580…29d200 [0x172]: Pad {f00=0x0085, f01=0x0190, f02=» n : P CF A15,FREBLK I/O AND ACTIVATE. FREE DISPATCHER BLOCK " P CM DWTWAT,A6 INDICATE NO WAIT F P* l PTABO30 EQU * v 8 P LD A2,DWTADR,A6 GET ADDRESS TO DRIVER ADDRESS BLOCK 8 P LD A2,ABTADR,A2 GET ABORT ROUTINE ADDRESS (IF ANY) , P RF(Z) T
0x228580…29d200 [0x173]: Pad {f00=0x0085, f01=0x40c8, f02=»CODE z P CF A15,TENDIO ABORT 0 P ABL LKMQDI QUEUE TASK AND GO TO DISPATCHER ( P* 0 PTABOER ABL LKMRQE GO AND INDICATE LKM ERROR f P* P* P* P END @ D A2,ABTADR,A2 GET ABORT ROUTINE ADDRESS (IF ANY) , P RF(Z) T
0x228580…29d200 [0x174]: Pad {f00=0x0085, f01=0x2008, f02=»
0x228580…29d200 [0x175]: Pad {f00=0x0085, f01=0x0190, f02=» EJECT TPROC P* P* P********** * P* TPAUSE * < P********** N P* ` P* j ( P* THIS IS THE PAUSE LKM PROCESSOR. t P* : P* THIS MODULE IS ENTERED FROM THE LKM HANDLER WHEN A : P* TASK WANTS TO (TEMPORARILY) HA
0x228580…29d200 [0x176]: Pad {f00=0x0085, f01=0x0190, f02=» P********** P* TMWAIT * P********** , P* > P* H 0 P* THIS IS THE MULTIPLE WAIT LKM PROCESSOR. R P* * P* IT IS ENTERED FROM THE LKM HANDLER & P* WITH THE FOLLOWING PARAMETERS: P* P* A5 = TTAB ADDRESS
0x228580…29d200 [0x177]: Pad {f00=0x0085, f01=0x018e, f02=»LLING TASK VIA TENDIO t & P* WITH THE FOLLOWING PARAMETERS: P* H , P* A8 = ECB ADDRESS OF COMPLETED EVENT R P* > P* IF REQUEST ERROR, A7 := -1 (AND NO RETURN VIA TENDIO). P* ( P* NOTICE THAT ALL EVENTS MUST HAVE ( P* BE
0x228580…29d200 [0x178]: Pad {f00=0x0096, f01=0x0190, f02=»P @ , t EXTDMIH EXTLENT & , ( ! ! T W P . D Y T P 0 8 EXTBAS h , ( 9I Y V P 0 Y X U ! T z TASLFD , ( S ! X6 _R _V D Z" TASTBE , ( q$ P
0x228580…29d200 [0x179]: Pad {f00=0x0096, f01=0x000c, f02=»
0x228580…29d200 [0x17a]: Pad {f00=0x0096, f01=0x0190, f02=» 0 P IDENT TASS REL 9.2 79-11-16 870105040920 P 8 P =1, PR 4313 @ P* REL 9.1 78-10-25 V P r P* z P* 8 P**************************************************** P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 2 P*
0x228580…29d200 [0x17b]: Pad {f00=0x0096, f01=0x0190, f02=»**************************** x P* $ " P* THIS MODULE IS ENTERED VIA . $ P* ASSIGN REQUEST (DATA 15) OR T ( P* ASSIGN INDEX REQUEST (DATA 16). | P* P* LDK A7,TC P* LDKL A8,ASBLK P* LKM P* DATA 15 P*
0x228580…29d200 [0x17c]: Pad {f00=0x0096, f01=0x018e, f02=»K IS A PARAMETER BLOCK z D P* AND TC = 1 WHEN TASK LOCAL ASSIGN IN TTAB IS WANTED B P* TC = 0 WHEN GLOBAL ASSIGN IN SCTCDT IS WANETED f P* P EJECT P* +----------+----------+ $ P* ASBLK I NO OF VOL FC I
0x228580…29d200 [0x17d]: Pad {f00=0x0096, f01=0x0190, f02=» t . P* I I P* +---------------------+ : P* I I P* I VOL NAME I ~ P* I I P* +---------------------+ P* I I P*
0x228580…29d200 [0x17e]: Pad {f00=0x0096, f01=0x018e, f02=»* CREATED IN TTAB/CD:TAB. P* $ F P* THE FDB IS INITIALIZED WITH INFORMATION FROM THE VTOC:S OF THE . $ P* VOLUMES MENTIONED IN ASBLK. x P* J P* UPON COMPLETION OF THE ASSIGN REQUEST REG A7 WILL HAVE ONE OF THE P* FOLLOWING RETU
0x228580…29d200 [0x17f]: Pad {f00=0x0096, f01=0x0190, f02=» x " P* 2 = NO FREE ENTRY IN TABLE P* 3 = NO FDB AVAILABLE . ( P* 4 = ONE OR MORE VOLUMES UNKNOWN N " P* 5 = FILE CODE ALREADY USED z P* 6 = FILE NAME UNKNOWN 0 P* 7 = FILE SECTION MISSING OR FOUND TWICE P* 8 = FAULTY DISC
0x228580…29d200 [0x180]: Pad {f00=0x0097, f01=0x0190, f02=»K P* LKM P* DATA 16 P* 0 " P* INPUT A5 = TTAB ADDRESS : " P* A8 = ASBLK ADDRESS ` 0 P* WHERE ASBLK IS A PARAMETER BLOCK P* +----------+----------+ $ P* ASBLK I NO OF VOL FC I P* +--
0x228580…29d200 [0x181]: Pad {f00=0x0097, f01=0x0190, f02=»---------------------+ P* I I P* I VOL NAME I @ P* I I b P* +---------------------+ $ P* I MASTER INDEX " P* I FILE NAME P* D P* UPON COM
0x228580…29d200 [0x182]: Pad {f00=0x0097, f01=0x0190, f02=»ORMED j P* -1 = REQUEST ERROR P* 1 = DISC I/O ERROR , " P* 2 = NO FREE ENTRY IN TABLE J 8 P* 3 = NO FDB AVAILABLE OR MASTER INDEX CORE AVAIL p ( P* 4 = ONE OR MORE VOLUMES UNKNOWN " P* 5 = FILE CODE ALREADY USED P* 6 = FILE
0x228580…29d200 [0x183]: Pad {f00=0x0097, f01=0x0190, f02=»S EXIST v " P* 10= NO DATA FILE ASSIGNED * P* 11= 4 INDEX FILES ALREADY ASSIGNED 6 $ P* 12= MAX KEY LENGTH TOO SMALL d 0 P* 13= REQUEST BUSY. REPEAT ASSIGN REQUEST P EJECT P* P*************** P* ENTRIES * P**
0x228580…29d200 [0x184]: Pad {f00=0x0097, f01=0x0190, f02=»TTA P ENTRY TASASB P ENTRY TASCVO " P ENTRY TASVOL 8 P ENTRY TASCXO N P ENTRY TASSEX d P ENTRY TASXLB z P ENTRY TASFDB P ENTRY TASVRL P ENTRY TASVLE P ENTRY TASVRN P ENTRY TASECB & P ENTRY TASFI
0x228580…29d200 [0x185]: Pad {f00=0x0097, f01=0x0190, f02=»HLT HALT SYSTEM DUE TO DM (SYSGEN) ERROR P EJECT 0 P* > P***************** H P* EXTERNALS * b P***************** | P* P EXTRN DFTAB P EXTRN DFTABE P EXTRN SCTCDT P EXTRN DWTVOL P EXTRN FNDTID
0x228580…29d200 [0x186]: Pad {f00=0x0097, f01=0x0190, f02=» TTB:TD,DMTASX P EXTRN ECBFC,ECBRC 0 P EXTRN MOV:US MOVE FROM USER TO SYSTEM AREA 0 $ P EXTRN HALT HALT SYSTEM ROUTINE d P EJECT TOSSIO P* P* . P***************************************** P* P* CONDITIONAL ASSEMBLY
0x228580…29d200 [0x187]: Pad {f00=0x0097, f01=0x018e, f02=»BTAINED BY SETTING MMUPAG EQU 1. P* ( PMMUPAG EQU 1 2 P* F P EJECT P P* ^ P******************* h P* DATA AREAS * P******************* P* PTASBLK DATA 0 USE INDICATOR $ PTASQUE DATA 0 ASSIGN QUEUE ANCOR
0x228580…29d200 [0x188]: Pad {f00=0x0097, f01=0x018e, f02=» 0 PTASVOL DATA 0 VOLUME IDENTIFICATION (DMI,FC) " P DATA 0,0,0 THREE MORE ENTRIES 8 6 PTASCXO DATA 0 CURRENT OFFSET IN TASSEX AND TASXLB ^ 0 PTASSEX DATA 0 SECTION NUMBER, EXTENT NUMBER * P DATA 0 OFFSET IN TASVOL FOR THIS EXT ( P DATA 0,0,0,0,0,
0x228580…29d200 [0x189]: Pad {f00=0x0097, f01=0x0190, f02=» PTASFDB DATA 0 FDB ADDRESS $ PTASVRL DATA 0 VTOC RECORD LENGTH & PTASVLE DATA 0 VTOC LENGTH N PTASVRN DATA 0 VTOC RECORD NO p PTASECB DATA 0,0 ECBFC,ECBBA P DATA 410 ECBRL P DATA 0,0,0 ECBEL,-RC,-CW P DATA 0 CW2 0 PTASF
0x228580…29d200 [0x18a]: Pad {f00=0x0097, f01=0x0190, f02=»TASSPW DATA 0 TTAB ADDRESS DMTASK $ PTASFDD DATA 0 FDB ADDR DATA FILE * ( PTASTBE DATA 0 TTAB/SCTCDT ENTRY ADDR R 2 PTASLFD DATA 0,0 LOCKED FLEXDISC FILE CODES =1 ~ P DATA 0,0 P DATA 0,0 " PTASS14 EQU *-2 TASS A14 STACK P* P I
0x228580…29d200 [0x18b]: Pad {f00=0x0097, f01=0x0190, f02=» * P************** P* , P* ENTRY TASCAQ CHECK ASSIGN QUEUE * P* Z P* A7= RETURN CODE d P* * P* SET OFF USE BIT IN TASBLK H P* IF TASQUE = 0 THEN RETURN ELSE QUEUE FIRST IN CHAIN AND 2 P*
0x228580…29d200 [0x18c]: Pad {f00=0x0097, f01=0x0190, f02=»QUE P RF(Z) TASCEX EMPTY QUEUE " P LDR* A1,A5 GET NEXT IN CHAIN . , P ST A1,TASQUE AND PUT IT FIRST IN QUEUE T P LDKL A1,-4 ( P ADS A1,TTB:SA,A5 UPD DISPATCH ADDR P CF A15,QTJOB NEXT ASSIGN P RF TASC05 & PTASCEX CM TASQUE A
0x228580…29d200 [0x18d]: Pad {f00=0x0097, f01=0x0190, f02=» CODE IN SAVED A7 r P RTN A14 P EJECT * 8 P****DESCRIPTION************************************* 8 P* t : P* VOLCHE WILL COMPARE EACH VOLUME NAME IN ASBLK WITH ~ & P* VOLUME NAMES IN DWT FOR DISCS P* 8 P****ENTRY PARAMETERS******
0x228580…29d200 [0x18e]: Pad {f00=0x0097, f01=0x0190, f02=»S WANTED. v : P* 1 LOCK WANTED. ONLY FROM DMTASS FOR FLEXDISC P* P 8 P****EXIT PARAMETERS********************************* Z P* P* A1 = 0 OK P* 1 VOLUME UNKNOWN P* A5 = TTAB ADDR P* 8 P****USED REGIS
0x228580…29d200 [0x18f]: Pad {f00=0x0097, f01=0x0190, f02=»************** h PVOLCHE EQU * P CM TASLFD =1 * $ P CM TASLFD+2 LOCKED FLEXDISCS =1 @ P SLL A2,1 h P SUK A2,2 z P ST A2,TASCVO INIT. TASCVO P LDR A4,A8 2 P ADK A4,10 POINTER TO FIRST VOL NAME IN ASBLK PTAS110 EQU * 2 P
0x228580…29d200 [0x190]: Pad {f00=0x0098, f01=0x0190, f02=» ADDRESS IN CD:TAB AND COMPARE DWTVOL P* . P LD* A6,SCTCDT 8 PTAS130 SUK A6,4 N 2 P RF(N) TASHLT FC NOT FOUND? SHOULD NOT OCCUR. f P LD A5,SCTCDT P ADR A5,A6 P CC A1,1,A5 P RB(NE) TAS130 NOT THIS FC P LDR A11,A11
0x228580…29d200 [0x191]: Pad {f00=0x0098, f01=0x0190, f02=» P* LOCK FLEXDISC P* P LDKL A8,TASECB ( " P ST A1,ECBFC,A8 FLEX FILE CODE @ P SUR A12,A12 f P LDK A7,/A6 LOCK,WAIT z P LKM P DATA 1 P LD A7,ECBRC,A8 P RF(Z) TAS131 P ANKL A7,/7FFF " P RF(NZ) TASF10 NOT
0x228580…29d200 [0x192]: Pad {f00=0x0098, f01=0x0190, f02=»NZ) TAS150 GRAVE ERR PTAS131 EQU * P ST A1,TASVOL,A2 SAVE FC 0 P P P AD A6,SCTCDT X P LDR* A5,A6 INDEX n $ P LDK A1,0 DISC NAME DISPLACEMENT P SRL A5,8 P RF(Z) TAS135 , P* DECIDE DISC DISPL FOR THIS FILE CODE $ P*
0x228580…29d200 [0x193]: Pad {f00=0x0098, f01=0x0190, f02=»AS132 PTAS135 EQU * P LD A6,2,A6 DWT ADDR " & P RF(Z) TASHLT NO DWT ADDRESS FOUND > & P ADR A6,A1 POINTER TO VOLUME NAME h P LDK A1,3 VOL NAMES 3 WORDS & P LDR A5,A4 POINTER ASBLK VOL NAME P* , P* CHECK VOLUME NAMES IN DWT AN
0x228580…29d200 [0x194]: Pad {f00=0x0098, f01=0x0190, f02=»2 P SUK A1,1 . P RB(P) TAS140 CHECK NEXT WORD IN VOL NAME P* N P* VOL NAME MATCH X P* STORE DMI , FC IN TASVOL r P* P LD A1,TASVOL,A2 P ANK A1,/0F P CWK A1,/8 $ P RF(L) TAS143 NOT FLEXIBLE DISC P LDK
0x228580…29d200 [0x195]: Pad {f00=0x0098, f01=0x0190, f02=» t P* 1 FOR DRIVE 2 " P* 2 FOR FLEXDISC , P* R P SC A1,TASVOL,A2 P* t 6 P* SAVE FILE CODES FOR NEWLY LOCKED FLEXDISCS =1 ~ 2 P* (ONLY SIGNIFICANT WHEN A11 = 1 ) =1 START P* P SUK A1,2 P
0x228580…29d200 [0x196]: Pad {f00=0x0098, f01=0x0190, f02=»,TASVOL+1,A2 FILE CODE P SC A3,TASLFD,A1 SAVE PTAS147 EQU * =1 END < P* X P* CHECK NEXT VOL IN ASBLK b P* P LDK A1,0 RET CODE P ADK A4,6 P SUK A2,2 ( P RB(NN) TAS110 MORE VOLUMES TO CHECK * P RF TAS155 OK AL
0x228580…29d200 [0x197]: Pad {f00=0x0098, f01=0x0190, f02=» P ANK A1,/F8 P SUK A1,/F8 P RF(NZ) TAS150 NO FLEXDISC , P LDR A12,A12 LFLAG N P RF(NZ) TAS150 LOCKED BEFORE h P* P* UNLOCK P* P LDK A7,/B8 UNLOAD,WAIT P LKM P DATA 1 P* & P* NO MATCH TRY N
0x228580…29d200 [0x198]: Pad {f00=0x0098, f01=0x0190, f02=» LDK A1,1 PTAS155 EQU * P RTN A14 & P* 6 ( PTASHLT LDK A1,/11 INDICATE DM ERROR @ P CF A15,HALT HALT SYSTEM l P* P EJECT P* P************ P* TASS * P************ P* PIXTASS EQU * P I
0x228580…29d200 [0x199]: Pad {f00=0x0098, f01=0x0190, f02=» A7,A8 GET FIRST WORD OF USER ASSIGN BLOCK $ P ANK A7,/FF SKIP LEFT CHARACTER 2 0 P ORKL A7,/8100 BIT 0+7 IND. ASSIGN ONE INDEX Z ( P ESR A7,A8 SET WORD IN ASSIGN BLOCK P XIF P*~ ( P LDK A7,0 ONLY GLOBAL ASSIGN ALLOWED P* PTASS
0x228580…29d200 [0x19a]: Pad {f00=0x0098, f01=0x0190, f02=»NOT COMPLETED t 4 P* AND IF SO QUEUE THIS REQUEST VIA THE TASQUE P* N P LD A1,TASBLK X & P RF(Z) TAS050 NO CONCURRENT ASSIGN n * P LDKL A1,TASQUE START OF ASSIGN QUEUE ( PTAS020 EQU * QUEUE AS FOR GETBUFFER P LDR A2,A1 P LDR*
0x228580…29d200 [0x19b]: Pad {f00=0x0098, f01=0x0190, f02=»QU * & P IM TASBLK INDICATE ASSIGN STARTED ! " P CM TASFDD FDB ADDR DATA FILE ! 6 P* ! 6 P ST A5,TASTTA SAVE TTAB ADDRESS OF REQUESTING TASK ! f P* ! P IFT MMUPAG=1 ! P* ! 2 P* MOVE USER ASSIGN BLOCK TO SYSTEM AREA MASBLK ! P* ! , P
0x228580…29d200 [0x19c]: Pad {f00=0x0098, f01=0x0190, f02=»BLOCK ADDRESS ! p , P LDK A3,34 ASSIGN BLOCK LENGTH IN BYTES " $ P CF A14,MOV:US MOVE ASSIGN BLOCK " F P XIF " n P* " z $ P ST A8,TASASB SAVE ASBLK ADDRESS " P* " P LDK A1,16 " : P ST A1,TASCXO INIT. TASCXO TO LAST ENTRY IN TASSEXXLB " P* "
0x228580…29d200 [0x19d]: Pad {f00=0x0098, f01=0x0190, f02=» " P LCR A2,A8 NO OF VOLUMES # . P ANK A2,/1F REMOVE INDEX BIT +DELAY+BASIC # ( P RF(Z) TAS090 NO VOL # Z P CWK A2,4 # v P RF(NG) TAS100 <=4 # PTAS090 RF TASSEM # P EJECT # P* # $ P* CHECK IF VOLUMES ARE ON LINE # P* # PTAS100
0x228580…29d200 [0x19e]: Pad {f00=0x0098, f01=0x0190, f02=»1,0 SET CR # $ P RF(Z) TAS160 ALL VOLUMES FOUND $ P* $ : , P* ALL VOL NOT FOUND. ACT FLEXDISCTASK $ D P* $ t P LD A1,TASCVO $ ~ P LDK A2,2 ID DMTASK FLEXDISC $ P SC A2,TASVOL,A1 SEE TAS195 $ P EJECT $ P* $ , P* CHECK IF FILE CODE
0x228580…29d200 [0x19f]: Pad {f00=0x0098, f01=0x0190, f02=»D $ j P LDR A10,A10 TC % P RF(Z) TAS165 GLOBAL ASSIGN % " P LD A2,TASTTA TTAB ADDR % F P LDR A4,A2 % f P LD A2,TTB:TD,A4 % x P ADKL A4,TTB:TD+1 % P RF TAS170 % PTAS165 EQU * % P LD A4,SCTCDT % P LDR* A2,A4 % P ADK A4,1 %
0x228580…29d200 [0x1a0]: Pad {f00=0x0098, f01=0x0190, f02=»S170 NO MATCH % P* & P* FILE CODE USED & . P* OK WHEN REQ = ASS INDEX AND INDEX = 1 & : P* & l P LDR* A2,A8 ASBLK 1ST WORD & v P RF(NN) TASSE5 NORMAL ASSIGN & P LDK A2,1 & P CC A2,-1,A1 INDEX & * P RF(NE) TASSE5 FILE CODE ALREADY U
0x228580…29d200 [0x1a1]: Pad {f00=0x0098, f01=0x0190, f02=»* & P* ' > P* FIND A FREE ENTRY IN TTAB/CD:TAB (FC AND DWTADR = 0 ) ' P* ' V PTAS180 EQU * ' ` P LDK A1,0 ' t P LDR A10,A10 TC ' P RF(Z) TAS185 GLOBAL ASSIGN ' P LD A2,TASTTA TTAB ADDR ' P LDR A4,A2 ' P LD A2,TTB:TD,A4 '
0x228580…29d200 [0x1a2]: Pad {f00=0x0098, f01=0x0190, f02=»UK A2,4 ' ( P RF(L) TASSE2 NO FREE ENTRY IN TABLE ( P LDR A9,A4 ( < P ADR A9,A2 ( N P CCR A1,A9 FILE CODE ( ` " P RB(NE) TAS190 FC NOT EQUAL 0 ( | P CW A1,1,A9 ( & P RB(NE) TAS190 DWTADR NOT EQUAL 0 ( P LDR* A1,A8 ASBLK 1ST WORD ( P RF(N) T
0x228580…29d200 [0x1a3]: Pad {f00=0x0098, f01=0x0190, f02=»Y ( f P ST A9,TASTBE SAVE ENTRY ) P* ) * 0 P* GET FIRST VOLUME AND ACTIVATE ITS DMTASK ) 4 P* ) h P LD A1,TASCVO ) r P LDK A7,0 ) P LC A7,TASVOL,A1 ) P ADKL A7,'#D' TID DMTASK ) P CF A15,FNDTID ) " P LDR A5,A2 TTAB ADDRESS DMTASK )
0x228580…29d200 [0x1a4]: Pad {f00=0x0098, f01=0x0190, f02=»RY ) | P LDK A7,4 VOL UNKNOWN * P RF TASSEM * ( PTAS200 EQU * * : P LDK A2,2 * N 4 P ST A2,TASFIL MASTER INDEX LOOP IDENT IN DMTSAK * ` & P LDKL A2,DMTASS ASSIGN INDEX ENTRY * P LDR* A6,A8 * P RF(N) TAS210 INDEX ASSIGN * P CM TASFIL * P
0x228580…29d200 [0x1a5]: Pad {f00=0x0098, f01=0x4182, f02=»F A15,ACTOT ACTIVATE DMTASK * P ABL TDISP GO TO DISPATCHER + $ P EJECT + H P* + V P* ERROR RETURNS + ` P* + z PTASSE5 ADK A7,1 + PTASSE4 ADK A7,1 + PTASSE3 ADK A7,1 + PTASSE2 ADK A7,1 + PTASSE1 ADK A7,1 + P ADK A7,1 +
0x228580…29d200 [0x1a6]: Pad {f00=0x0098, f01=0x2008, f02=» ,
0x228580…29d200 [0x1a7]: Pad {f00=0x0098, f01=0x2008, f02=» + t P INH , P CF A15,TENDIO , P ENB , 2 P* , > P* EXIT , H P* , X P LKM , b P DATA 3 , n P* , ~ P END , @ , RD ADDR A2:=EA BIT + & P C1R A2,A2 ONE COMPLEMENT BIT MASK + P ANRS A2,A3 SET OFF EA BIT + P* + P
0x228580…29d200 [0x1a8]: Pad {f00=0x00a3, f01=0x0190, f02=» P RF(E) FKY200 USED RECORD P* & & P* NO MORE RECORDS IN THIS SECTOR 0 P* Z * P LD A13,FDBRRO,A1 SAVE CURRENT OFFSET d P LD A4,FDBMRO,A1 & P ST A4,FDBRRO,A1 LAST REC IN SECT P* P* *CHECK IF EOF P* P LDR A
0x228580…29d200 [0x1a9]: Pad {f00=0x00a3, f01=0x000c, f02=» ` h p x
0x228580…29d200 [0x1aa]: Pad {f00=0x00a3, f01=0x0190, f02=» 0 P IDENT TIODM REL 9.2 79-11-16 870105040920 P 8 P =1, PR 5649 @ P REL 9.1 79-05-23 V P* r 8 P**************************************************** | P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 0 P* TIODM = DATA MANA
0x228580…29d200 [0x1ab]: Pad {f00=0x00a3, f01=0x018e, f02=»******** d P* B P* THIS MODULE IS ENTERED IN THE SAME WAY AS A DRIVER VIA TIO . P* AND THE DWTADR IN FDB FOR CURRENT FILE ` P* H P* THE DM REQUEST IS PROCESSED HERE UP TO THE POINT WHERE A SECTOR $ P* FROM A DISC MUST BE ACCESSED
0x228580…29d200 [0x1ac]: Pad {f00=0x00a3, f01=0x0190, f02=» P* A7 = ORDER P* A8 = ECB ADDRESS " P* F P* USED REGISTERS A1 - A10 P P* t D P* BEFORE EXIT A DMTASK IS ACTIVATED WITH THE FDB ADDRESS IN A1 ~ P* AS THE ONLY PARAMETER P* 4 P* THE FOLLOWING WORDS
0x228580…29d200 [0x1ad]: Pad {f00=0x00a3, f01=0x0190, f02=» FOR CALLING TASK x . P* FDBCEX CURRENT EXTENT BLOCK POINTER P* L P* V D P* IF AN ERROR CONDITION IS DETECTED THE ERROR RETURN WILL BE: ` P* LDKL A1,/<RETURN CODE> P* ABL DISEND P* P* P EJECT P*
0x228580…29d200 [0x1ae]: Pad {f00=0x00a3, f01=0x0190, f02=»DBLNK P ENTRY FDBECB P ENTRY FDBSNR $ P ENTRY FDBRRO : P ENTRY FDBRLE P P ENTRY FDBBLF f P ENTRY FDBTNR | P ENTRY FDBVTO P ENTRY FDBCEX P ENTRY FDBEXT P ENTRY EXTDMI P ENTRY EXTFC P ENTRY EXTLE
0x228580…29d200 [0x1af]: Pad {f00=0x00a3, f01=0x0190, f02=»NTRY FDBAI1,CRNTID,CRNCDF,CRNCIF P ENTRY FDBMRN,FDBDBR,FDBMRO ( & P ENTRY FDBMEC MMU ECB DISPLACEMENT L 6 P ENTRY FDBKEY SAVE AREA FOR KEY IN INDEXED ACCESS v P EJECT P* P***************** P* EXTERNALS * P**************
0x228580…29d200 [0x1b0]: Pad {f00=0x00a3, f01=0x0190, f02=» P EXTRN DISEND EXTRN DWTECB ECB ADDRESS $ EXTRN DWTOR DWT INDEX AND ORDER < & P EXTRN DWTTDM DM TASK TTAB ADDRESS d P EXTRN TTB:ID TASK ID 0 P EXTRN MOV:US MOVE FROM USER TO SYSTEM AREA " P EXTRN DMTGCA GET CRN ADDRESS , P EXT
0x228580…29d200 [0x1b1]: Pad {f00=0x00a3, f01=0x0190, f02=» ECBRL P EXTRN ECBEL P EXTRN ECBRC " P EXTRN ECBCW 6 & P EXTRN ECBCW2 SECOND CONTROL WORD J P EXTRN FDBLEN t " P EXTRN SQR SEQ READ ORDER CODE & P EXTRN EARELB,DWTST,CRNGET,EATEST & P EXTRN TASHLT HALT SYSTEM ROUTINE P EJECT
0x228580…29d200 [0x1b2]: Pad {f00=0x00a3, f01=0x0190, f02=»* A VERSION CONTAINING INDEXED REQUEST ORDERS IS OBTAINED P* BY SETTING INDXAC EQU 1 D * P* INDXAC EQU 0 OTHRERWISE h PX:A EQU 0 PINDXAC EQU 00000 P* . P* A PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAINED
0x228580…29d200 [0x1b3]: Pad {f00=0x00a3, f01=0x0190, f02=»TA DEFINITIONS * P************************ P* : P* D P DATA 0,0 4 WORDS N P DATA 0,0 h " PTIOD14 EQU *-2 TIODM A14 STACK z P* P* & PTIODMF EQU * TIODM FUNCTION TABLE P DATA CLOSE CLOSE " P DATA REVTOC READ
0x228580…29d200 [0x1b4]: Pad {f00=0x00a3, f01=0x0190, f02=»DELETE | P DATA IXREWR INDEXED REWRITE $ P DATA IXRARE INDEXED RANDOM READ 2 P XIF Z P IFF INDXAC=1 f P DATA TIODME | P DATA TIODME P DATA TIODME P DATA TIODME P DATA TIODME P XIF P DATA RANDEL RANDOM DELETE
0x228580…29d200 [0x1b5]: Pad {f00=0x00a3, f01=0x0190, f02=» SEQUENTIAL WRITE " P DATA SEQREAD SEQUENTIAL READ P DATA GETCUR GET CURRENCY @ P IFT INDXAC=1 b $ P DATA INSIXR INSERT INDEX RECORD x $ P DATA DELIXR DELETE INDEX RECORD P XIF P IFF INDXAC=1 P DATA TIODME P DATA TIODME
0x228580…29d200 [0x1b6]: Pad {f00=0x00a3, f01=0x0190, f02=»LETE r $ P DATA RANREB RAND READ REL BUFF P DATA SETLRN SET LRN 4 P* P P* Z PTIODMO EQU * DM ORDERS d $ P DATA /221E CLOSE,IND READ NEXT & P DATA /1D1C IND INSERT,IND DELETE . P DATA /1B1A INDEXED REWRITE,IND RAND READ $ P DAT
0x228580…29d200 [0x1b7]: Pad {f00=0x00a3, f01=0x0190, f02=»SEQ WR. , BASIC WRITE $ P DATA /0302 READ VTOC, SEQ READ ( P DATA /0123 BASIC READ,GET CURRENCY F * P DATA /1F20 INS INDEXREC,DEL INDEXREC r . P DATA /240D GET CURR INDEX,DELAYED RAND WR 0 P DATA /0E0F DELAY RAN DEL,RAN READ REL BUFF P DAT
0x228580…29d200 [0x1b8]: Pad {f00=0x00a3, f01=0x0190, f02=»ATA /0E10 P DATA /1214 P DATA /1616 & P DATA /1616 : P DATA /0218 N P DATA /181A b P DATA /1C1E v P DATA /2022 P DATA /2426 P DATA /281A SET LRN P* $ PNOOFOR EQU 25 NO OF ORDER CODES P* P
0x228580…29d200 [0x1b9]: Pad {f00=0x00a3, f01=0x0190, f02=»RD P XIF P* P IFT MMUPAG=1 PSTART EQU DWTDRD+4 6 P XIF P P* P* f P* FDB OFFSET DEFINITIONS p P* " PFDBLNK EQU 0 LINK TO NEXT FDB PFDBECB EQU START+2 ECB START & PFDBSNR EQU START+16 SECTOR NUMBER
0x228580…29d200 [0x1ba]: Pad {f00=0x00a3, f01=0x0190, f02=» l 0 PFDBTNR EQU START+23 TASK NUMBER CALLING TASK & PFDBVTO EQU START+24 VTOC RECORD NO < 4 PFDBCEX EQU START+26 CURRENT EXTENT BLOCK POINTER f 0 PFDBEXT EQU START+28 FIRST EXTENT BLOCK START PEXTDMI EQU 0 DMTAST IDENT PEXTFC EQU 1 VOLUME FIL
0x228580…29d200 [0x1bb]: Pad {f00=0x00a3, f01=0x0190, f02=»+53 LAST RECORD NUMBER * PFDBNIF EQU START+52 NO OF INDEX FILES $ PFDBEAL EQU START+56 EA LINK ROOT L & PFDBCRL EQU START+58 CRN LINK ROOT t 0 PFDBKA EQU START+60 KEY ADDRESS IN DATA FILE 0 PFDBMIA EQU START+62 ADDRESS OF MASTER INDEX 0 PFDBA
0x228580…29d200 [0x1bc]: Pad {f00=0x00a3, f01=0x0190, f02=»AND REL BUFFER FLAGS p , PFDBMRN EQU START+75 LAST REC NR IN FILE " PFDBMRO EQU START+78 MAX FDBRRO L , PFDBMEC EQU START+80 MMU ECB DISPLACEMENT r < PFDBKEY EQU START+94 SAVE AREA FOR KEY IN INDEXED ACCESS P* & P* CRN BUFFER OFFSET DEFINITI
0x228580…29d200 [0x1bd]: Pad {f00=0x00a3, f01=0x0190, f02=» P EJECT P* P************* P* TIODM * 2 P************* H P* ^ P* h ( P DATA 0 DATA MANAGEMENT DEVICE INDEX r & PTIODM DATA *+2 TIODM START ADDRESS P* P* SET UP A14 STACK P* P LDKL A14,TIOD14
0x228580…29d200 [0x1be]: Pad {f00=0x00a3, f01=0x018e, f02=» A1,A2 P LD A3,2,A1 P CW A3,DWTTDM,A6 " P RF(E) TIOD10 THIS TASK : P ADK A2,2 NO Z P RB TIOD05 TRY NEXT n PTIOD10 EQU * P LC A1,TTB:ID,A3 GET TASK ID P CCK A1,'##' ( P RF(E) TIO13 JUMP IF DMTASK CALLING P*
0x228580…29d200 [0x1bf]: Pad {f00=0x00a3, f01=0x0190, f02=» P LDKL A4,/4000 REQ BUSY BIT PTIO11 EQU * ( P SUK A3,2 < P RF(N) TIO13 ALL FDB READY N P LDR* A5,A1 FDB ADDR p P RF(E) TIO12 NO FDB P SC A2,FDBTNR,A5 TASK ID " P ORS A4,DWTST,A5 REQ BUSY BIT PTIO12 EQU * P ADK A1,
0x228580…29d200 [0x1c0]: Pad {f00=0x00a3, f01=0x0190, f02=»R IN A7 , P* PUT ORDER INDEX IN DWTOR RIGHT BYTE P* @ P LDKL A1,/8000 REQUEST ERROR J & P LDK A2,NOOFOR-1 NO OF ORDERS - 1 n 2 PTIOD15 CC A7,TIODMO,A2 START AT END OF TIODMO P RF(E) TIOD20 MATCH P SUK A2,1 P RB(NN) TIOD15
0x228580…29d200 [0x1c1]: Pad {f00=0x00a3, f01=0x0190, f02=»BI TIODMF,A2 BRANCH TO DM FUNCTION P EJECT * P* 8 $ PIXRARE EQU * INDEXED RANDOM READ B P LD A3,ECBCW2,A8 =1 j P ANK A3,/FF REQ KEY LGTH =1 P LD A4,FDBRLE,A6 =1 P SUK A4,6 MAX LGTH =1 P CWR A3,A4 =1 P RF(NG) IXRAR1 O
0x228580…29d200 [0x1c2]: Pad {f00=0x00a3, f01=0x0190, f02=»GET USER KEY ADDRESS 0 P LDK A2,FDBKEY GET FDB KEY AREA DISPLACEMENT P ADR A2,A6 ADD FDB ADDRESS P P* =1 r 2 P CF A14,MOV:US MOVE KEY FROM USER TO FDB AREA P XIF P* $ PDELIXR EQU * DELETE INDEX RECORD P* $ PINSIXR EQU
0x228580…29d200 [0x1c3]: Pad {f00=0x00a3, f01=0x018e, f02=»U * CLOSE A FILE P LDK A4,0 PTIOC10 EQU * * $ P ST A4,FDBRRO,A6 MARK ORDER TYPE > P LDK A2,0 f , P ST A2,FDBSNR,A6 SECTOR #0 VOLUME LABLE x P* ( P* LET FDBCEX POINT TO FIRST EXTENT P* P LDR A4,A6 P ADK A4,FDBEXT
0x228580…29d200 [0x1c4]: Pad {f00=0x00a3, f01=0x0190, f02=» P LDR A1,A6 FDB ADDR 0 P LDKL A2,/C000 REMOVE BUFFERS FOR THIS TASK P CF A14,EARELB T PREL090 EQU * j P LDK A1,0 CORRECT RETURN ~ P ABL TIODME P EJECT ( PSETLRN EQU * SET LAST RECORD NUMBER P LC A1,ECBCW+3,A8 P SC
0x228580…29d200 [0x1c5]: Pad {f00=0x00a3, f01=0x0190, f02=»DATA REC p P RF GET010 . PGETCUX LDK A7,CRNCIF+1 GET CURR INDEX REC " PGET010 LDR A1,A6 FDB ADDR T " P CF A14,CRNGET GET CRN BUFFER v P ADR A7,A2 ADDR CURR REC NO P LDK A2,0 P LC A3,-1,A7 FILE CODE P CC A3,ECBFC,A8 P R
0x228580…29d200 [0x1c6]: Pad {f00=0x00a3, f01=0x0190, f02=»REC NO ~ P LD A2,1,A7 PGET030 EQU * " P ST A2,ECBCW,A8 6 P RB REL090 N P EJECT ` " PSEQREAD EQU * SEQUENTIAL READ n P* $ P* FIND CRN+1 AND TEST IF > LRN P* P LDR A1,A6 FDB ADDR " P CF A14,CRNGET GET CRN-BUFFER
0x228580…29d200 [0x1c7]: Pad {f00=0x00a3, f01=0x018e, f02=»ERFLOW P RF SEQR20 PSEQR10 EQU * " P ANKL A2,/7FFF REMOVE OVERFLOW 4 P ADK A1,1 ADD CARRY Z PSEQR20 EQU * v P SC A1,ECBCW+3,A8 REC NO P ST A2,ECBCW,A8 P* $ P* CONTINUE AS FOR RANDOM READ P* P EJECT
0x228580…29d200 [0x1c8]: Pad {f00=0x00a4, f01=0x0190, f02=» P LDK A2,0 P LC A2,ECBCW+3,A8 REC NO P LD A3,ECBCW,A8 6 P LDK A1,/8 INCORRECT LENGTH N P LD A4,ECBRL,A8 r * P RF(NP) TIODME ERROR RETURN IF RL <= 0 P* * P* EA MUST NOT BE SET FOR OTHER TASK P* P LDR A1,A6 FDB A
0x228580…29d200 [0x1c9]: Pad {f00=0x00a4, f01=0x018e, f02=»EQU * INDEXED INSRERT P IFT MMUPAG=1 P* 4 " P* MOVE KEYS TO FDB KEY AREAS > P* d P LDK A5,8 n PIXINS3 EQU * P LDR A2,A6 FDB DATA P ADR A2,A5 P LD A3,FDBADF,A2 FDB INDEX P RF(Z) IXINS4 NO INDEX P LD A1,F
0x228580…29d200 [0x1ca]: Pad {f00=0x00a4, f01=0x0190, f02=» P LD A3,FDBRLE,A3 REC LGTH P SUK A3,6 KEY LGTH & " P CF A14,MOV:US KEY TO FDB AREA @ PIXINS4 EQU * f P SUK A5,2 z P RB(NZ) IXINS3 MORE INDEXS P XIF P* $ PSEQWRITE EQU * SEQUENTIAL WRITE P* 2 P* GET LRN+1 INTO F
0x228580…29d200 [0x1cb]: Pad {f00=0x00a4, f01=0x0190, f02=» x P LDK A1,0 ! P LC A1,FDBMRN,A6 LAST REC NR ! P LD A2,FDBMRN+1,A6 ! > P LDK A6,0 ! X P LC A6,FDBLRN,A5 ! j P LD A7,FDBLRN+1,A5 LRN ! P CF A14,DSUMOD SUBTRACT ! P SUK A2,1 ! P LDR A1,A1 ! P RF(Z) SEQ005 NOT MANY ! P LDKL A2
0x228580…29d200 [0x1cc]: Pad {f00=0x00a4, f01=0x0190, f02=»,FDBLRN+1,A6 LRN ! P IFT INDXAC=1 " P RF IXR020 STORE LOG REC NO " . P EJECT " R $ PIXRDNX EQU * INDEXED EREAD NEXT " ` P* " P* GET CRN " P* " P LD A1,FDBADF,A6 FDB ADDR " " P CF A14,CRNGET GET CRN BUFFER " P LDR A4,A2 BUFFADR
0x228580…29d200 [0x1cd]: Pad {f00=0x00a4, f01=0x0190, f02=»C A5,CRNCIF,A4 " . P RF(NE) IXR020 OTHER INDEX FILE IS CURRENT # P LC A1,CRNCIF+1,A4 # H " P LD A2,CRNCIF+2,A4 LOG REC NO # b PIXR020 EQU * # P XIF # P ADK A2,1 # P RF(O) IXR030 OVERFLOW # P RF IXR040 # , PIXR030 ANKL A2,/7FFF REMOVE OVER
0x228580…29d200 [0x1ce]: Pad {f00=0x00a4, f01=0x0190, f02=»NOT CHECK EOF CONDITION # P EJECT $ P* $ . PIXREWR EQU * INDEXED REWRITE $ 8 P* $ PIXDEL EQU * INDEXED DELETE $ f P* $ PRANWRITE EQU * RANDOM WRITE $ P* $ & PRANWRD EQU * DELAYED RANDOM WRITE $ P* $ & PRANDLD EQU * DELAYED R
0x228580…29d200 [0x1cf]: Pad {f00=0x00a4, f01=0x018e, f02=» $ P************************* % P* DMTASK ACTIVATION * % * P************************* % L P* % n PTIODMA EQU * % x P* % P* SET EOF IF CRN > LRN % P* % P LDK A1,0 % P LC A1,ECBCW+3,A8 REC NO % P LD A2,ECBCW,A8 DITTO %
0x228580…29d200 [0x1d0]: Pad {f00=0x00a4, f01=0x0190, f02=» % t P RF(NG) TIOD25 CRN <= LRN & PTIOD23 EQU * & * P LDKL A3,/1000 END OF FILE & > P ORS A3,ECBRC,A8 & ` P ANK A7,/3F & x P SUKL A7,SQR SEQ READ & P RF(NE) TIOD25 NOT SR & P LDR A1,A3 & P RF TIODME & PTIOD25 EQU * & 6 P CF A14,CA
0x228580…29d200 [0x1d1]: Pad {f00=0x00a4, f01=0x0190, f02=»TE DMTASK WITH FDB ADDRESS IN A1 & P* ' ( PTIOD68 EQU * ' 2 P ENB ' F P ENB ' R P INH ' ^ P LDR A1,A6 FDB ADDRESS ' j P LDK A7,0 ' $ P LC A7,EXTDMI,A4 TID FOR DMTASK ' P ADKL A7,'#D' ' P CF A15,FNDTID A2:=TTAB ADDR ' P LDR A5,A2 '
0x228580…29d200 [0x1d2]: Pad {f00=0x00a4, f01=0x0190, f02=»TE DMTASK ' | P* ( P* EXIT TO TDISP ( P* ( 6 P ABL TDISP ( @ P* ( R P EJECT ( P* ( j P************** ( t P* TIODME * ( P************** ( P* ( J P* TIODM ERROR CALL TENDIO WITH RETURN CODE IN A1 AND GOTO DISPATCHER (
0x228580…29d200 [0x1d3]: Pad {f00=0x00a4, f01=0x4056, f02=»RESS ( , P ABL DISEND CALL TENDIO GOTO DISPATCHER ) P* ) < P END ) F@ ) R R P EJECT ( P* ( j P************** ( t P* TIODME * ( P************** ( P* ( J P* TIODM ERROR CALL TENDIO WITH RETURN CODE IN A1 AND GOTO DISPATCHER (
0x228580…29d200 [0x1d4]: Pad {f00=0x00a4, f01=0x2008, f02=» *
0x228580…29d200 [0x1d5]: Pad {f00=0x00a4, f01=0x0190, f02=» A2,8 BUFSTA " , P CM BUFDMI,A2 CLEAR VOL IDENT IN BUFFER # P LDK A1,/02 DISC IO ERROR # D " P LDKL A2,/FF7E NOT BIT 8 OR 15 # f P AN A2,ECBRC,A8 # P RF(NZ) DMTIOX # P LD A1,ECBRC,A8 BIT 8 OR 15 # PDMTIOX RTN A14 # P EJECT # P* # :
0x228580…29d200 [0x1d6]: Pad {f00=0x00a4, f01=0x0190, f02=» P* A8 = ECB ADDR $ P* OUT: $ P* A1 = RET CODE $ . P* A2 = DESTROYED $ H P* A6 = FDB ADDR $ b P* A8 = ECB ADDR $ | P* A9 == USER ECB $ P* $ PDMTIOZ LDR A6,A1 $ P LD A2,DWTOR,A6 ORDER $ P ANK A2,/3F $ P CWK A
0x228580…29d200 [0x1d7]: Pad {f00=0x00a4, f01=0x0190, f02=»DB DATA FILE $ ~ PDMTIZ1 EQU * % P LD A9,DWTECB,A1 USER ECB % ( P RB DMTIT0 % J P EJECT DMSUBR % 8 P****DESCRIPTION************************************* % t P* % 8 P* GTBKBU WILL GET A BLOCK BUFFER FOR DISC I/O AND % 2 P* PREPARE IT. ECB
0x228580…29d200 [0x1d8]: Pad {f00=0x0069, f01=0x0190, f02=» P LDK A2,0 P LC A2,ECBCW+3,A8 REC NO P LD A3,ECBCW,A8 6 P LDK A1,/8 INCORRECT LENGTH N P LD A4,ECBRL,A8 r * P RF(NP) TIODME ERROR RETURN IF RL <= 0 P* * P* EA MUST NOT BE SET FOR OTHER TASK P* P LDR A1,A6 FDB A
0x228580…29d200 [0x1d9]: Pad {f00=0x0069, f01=0x0026, f02=» 8 p x
0x228580…29d200 [0x1da]: Pad {f00=0x0069, f01=0x0190, f02=» 2 P IDENT DMTASK REL 9.2 79-11-16 870105040920 P : P =5, PR5649 B P REL 9.1 79-11-01 X P =4,CURRENCY INSERT t P REL 9.1 79-07-02 P =3,TEST KEY P REL 9.1 79-07-02 P =2,CH REQ P REL 8.2 P =
0x228580…29d200 [0x1db]: Pad {f00=0x0069, f01=0x0190, f02=»M PTS v P* 0 P* DMTASK = HANDLES DATAMANAGEMENT DISC I/O P* L P* V P* ` P* j P* t 8 P**************************************************** ~ P* , P* THIS MODULE IS ACTIVATED FROM TIODM. P* P* INPUT PA
0x228580…29d200 [0x1dc]: Pad {f00=0x0069, f01=0x0190, f02=» TO BE ACCESSED IS DEFINED IN FDB (FDBDMI, -FC, -SNR). : P* ALL BUFFERS ARE CHECKED TO FIND OUT IF THIS SECTOR > F P* IS ALREADY PRESENT IN A BUFFER. IF SO THE BUFFER STATUS IS SET | D P* TO USED AND ACTIONS ACCORDING TO THE ORDER ARE TAKEN. IF NOT
0x228580…29d200 [0x1dd]: Pad {f00=0x0069, f01=0x0190, f02=»N AND ARE V ( P* FOLLOWED BY AN EXIT LKM REQUEST. : P* INDEX FILES ARE HANDLED IN SUBROUTINE RDNXTR WHERE > & P* ALL I/O ARE MADE IN WAIT MODE | P* D P* BY MEANS OF CONDITIONAL ASSEMBLY THE EXCLUSIVE ACCESS CHECK 6 P* FOR INDEXED DE
0x228580…29d200 [0x1de]: Pad {f00=0x0069, f01=0x018e, f02=»SIVE ACCESS CHECK INCLUDED | 2 P* QNOEXA=0 EXCLUSIVE ACCESS CHECK EXCLUDED " P EJECT X P* f P*************** p P* ENTRIES * P*************** P* P* P ENTRY DMTASK & P ENTRY SQR EXTERNAL CODE SEQ READ
0x228580…29d200 [0x1df]: Pad {f00=0x0069, f01=0x0190, f02=» | P***************** P* " P* , P EXTRN SCTTCT,SCTCDT 6 & P EXTRN TTB:ID TASK IDENTIFICATION R P EXTRN TTB:TD,FDBSTA | P EXTRN FNDTID P EXTRN TENDIO P EXTRN FDBECB P EXTRN FDBSNR P EXTRN FDBRRO P EXT
0x228580…29d200 [0x1e0]: Pad {f00=0x009b, f01=0x0190, f02=» EXTDMI P EXTRN EXTFC P EXTRN EXTLEN $ P EXTRN EXTBAS : P EXTRN EXTELE P P EXTRN FDBLRN f P EXTRN FDBMIA | P EXTRN FDBEAL P EXTRN FDBADF P EXTRN FDBAI1 P EXTRN FDBCRL P EXTRN FDBDBR,FDBMRN,FDBMRO
0x228580…29d200 [0x1e1]: Pad {f00=0x009b, f01=0x0190, f02=»BUF P EXTRN BUFLNK P EXTRN BUFDMI " P EXTRN BUFFC 8 P EXTRN BUFSNR L P EXTRN BUFOR b P EXTRN BUFSTA v P EXTRN CURBUF P EXTRN DWTECB P EXTRN DWTUEC P EXTRN DWTOR P EXTRN DWTST,DWTTDM,DWTTQ P EXTRN
0x228580…29d200 [0x1e2]: Pad {f00=0x009b, f01=0x0190, f02=»DIVMOD P EXTRN MPYMOD,CHKKEY P EXTRN CALSNO * P EXTRN DSUMOD @ . P EXTRN EATEST,EASETB,CRNGET,EARELB,GTBKBU V P EXTRN QTJOB,GTLGRN P EXTRN FNDKEY P EXTRN CRNCIF,CRNCDF,CRNQUE P EXTRN MXIND P EXTRN FDBKA,FDBNIF,RDNX
0x228580…29d200 [0x1e3]: Pad {f00=0x009b, f01=0x0190, f02=»VE FROM USER TO SYSTEM AREA 0 P EXTRN MOV:SU MOVE FROM SYSTEM TO USER AREA $ P EXTRN MONMMU X , P EXTRN PRUN TTAB ADDRESS OF RUNNING TASK n P EXTRN TTB:MT MMU TABLE ( P EXTRN SCTPLD PROGRAM LOADING DEVICE P EJECT P* P*
0x228580…29d200 [0x1e4]: Pad {f00=0x009b, f01=0x0190, f02=»LUSIVE ACCESS BIT CAN BE EXCLUDED AT 8 P* RANDOM WRITE AND RANDOM DELETE BY SETTING X:A=0. , P* h P* r PX:A EQU 1 | PX:B EQU 0 PX:C EQU 0 PX:D EQU 1 PX:E EQU 0 P* PQNOEXA EQU 00001 6 P* INDEXED ACCEXS
0x228580…29d200 [0x1e5]: Pad {f00=0x009b, f01=0x018e, f02=»TED b PINDXAC EQU 00000 6 PRECBFZ EQU 00004 INDEX RECORD BUFFER SIZE IN WORDS $ 4 PFLXDSC EQU X:D FLEXIBLE DISC INCLUDED WHEN EQU 1 ^ 0 PINSLAS EQU X:E INSERT SAME KEY LAST WHEN = 1 P* P EJECT DMTASK P* P* . P* A PROGRA
0x228580…29d200 [0x1e6]: Pad {f00=0x009b, f01=0x0190, f02=» . ** A PROGRAM VERSION USING TOSS DISC PAGING * &* IS OBTAINED BY SETTING DSKPAG EQU 1. 6 * d PDSKPAG EQU 1 n * P* 6 P* A PROGRAM VERSION INCLUDING TOSS SWAPPABLE WORK 2 P* BLOCKS IS OBTAINED BY SETTING SWPBLK EQU 1. P*
0x228580…29d200 [0x1e7]: Pad {f00=0x009b, f01=0x0190, f02=»************** P* P* , PEABIT EQU /20 EA-BIT IN DWT STATUS BYTE * P* Z & PVTOBLK EQU 9 VTOC BLOCKING FACTOR d P* : P* THE FOLLOWING INTERNAL ORDER CODES IS THE RELATIVE & P* POSITION IN TIODM-TABLE TIODMF P* P
0x228580…29d200 [0x1e8]: Pad {f00=0x009b, f01=0x0190, f02=»XAC=1 " P DATA DMIRN INDEXED READ NEXT PQINS EQU 6 4 P DATA DMINS INDEXED INSERT F PQDEL EQU 8 h P DATA DMDEL INDEXED DELETE z PQIRW EQU 10 P DATA DMIRW INDEXED REWRITE $ P DATA DMIRR INDEXED RANDOM RESAD P XIF PQI
0x228580…29d200 [0x1e9]: Pad {f00=0x009b, f01=0x0190, f02=»DOM DELETE PQRW EQU 16 P DATA DMRDWR RANDOM WRITE $ PQRR EQU 18 F P DATA DMRDRE RANDOM READ X PQREA EQU 20 x * P DATA DMTERR RELEASE EXCLUSIVE ACCESS PQSW EQU 22 " P DATA DMSQWR SEQUENTIAL WRITE * PSQR EQU 2 EXTERNAL ORDER
0x228580…29d200 [0x1ea]: Pad {f00=0x009b, f01=0x0190, f02=» INDXAC=1 PQINIX EQU 28 P DATA DMINIX INSERT INDEX & PQDELX EQU 30 H P DATA DMDELX DELETE INDEX P XIF ~ P IFF INDXAC=1 P DATA DMTERR,DMTERR P XIF PQGCURX EQU 32 " P DATA DMTERR GET CURRENT INDEX PQRWD E
0x228580…29d200 [0x1eb]: Pad {f00=0x009b, f01=0x0190, f02=» $ P DATA DMRRRB RAND READ REL BUFF P* , $ PVTOCRL DATA 0 VTOC RECORD LENGTH 6 P EJECT ^ P* l P************** v P* DMTFRL * P************** P* , P* ENTRY DMTFRL FIND RECORD LENGTH P* 4 P* INPUT A1
0x228580…29d200 [0x1ec]: Pad {f00=0x009b, f01=0x0190, f02=»OUTPUT A2 = RECORD LENGTH TO BE USED < P* A1 IS ORED INTO ECBRC IF ECBRL < REC LENGTH . & P* A2 IS STORED IN ECBEL n P* PDMTFRL EQU * P LD A2,ECBRL,A9 P CW A2,FDBRLE,A6 $ P RF(E) DMTF20 ECBRL = REC LENGTH
0x228580…29d200 [0x1ed]: Pad {f00=0x009b, f01=0x0190, f02=»ETURN CODE t . PDMTF20 ST A2,ECBEL,A9 SET EFFECTIVE LENGTH P RTN A14 D P EJECT T P* b P************ l P* DMTWM * P************ P* " P* ENTRY DMTWM WORD MOVE P* " P* INPUT A1 = FROM ADDRESS , P*
0x228580…29d200 [0x1ee]: Pad {f00=0x009b, f01=0x0190, f02=» P* PDMTWM EQU * P SUK A2,2 & " P RF(N) DMTW10 LAST WORD MOVED 8 P LDR* A4,A1 ^ P STR A4,A3 r P ADK A1,2 P ADK A3,2 P RB DMTWM PDMTW10 ANK A2,/01 P RF(E) DMTW20 P LCR A4,A1 MOVE LAST CHAR
0x228580…29d200 [0x1ef]: Pad {f00=0x009b, f01=0x0190, f02=» " P* ENTRY DMTBM BYTE MOVE P* . " P* INPUT A1 = FROM ADDRESS 8 , P* A2 = NO OF BYTES TO BE MOVED ^ P* A3 = TO ADDRESS P* $ P* A4 WILL BE DESTROYED P* P* OUTPUT A3 = NEXT CHAR
0x228580…29d200 [0x1f0]: Pad {f00=0x009c, f01=0x0190, f02=» P ADK A1,1 P ADK A3,1 P RB DMTBM ( PDMTB10 RTN A14 : P* P 2 P* DMTBMR HAS THE SAME FUNCTION AS DMTBM BUT Z P* MOVES FROM THE END P* PDMTBMR ADR A1,A2 P ADR A3,A2 PDMTB20 SUK A2,1 P RB(N) DMTB10
0x228580…29d200 [0x1f1]: Pad {f00=0x009c, f01=0x0190, f02=»**************************** x P* $ : P* FNDFDB WILL SEARCH TTAB AND SCTCDT FOR A FILE CODE . P* l 8 P****ENTRY PARAMETERS******************************** v P* P* A1 = TTAB ADDR $ P* A2 = FILE CODE TO SEARCH FOR 4 P* A5 NOT=
0x228580…29d200 [0x1f2]: Pad {f00=0x009c, f01=0x0190, f02=»NCHANGED 2 P* A2 = FILE CODE. = 0 WHEN NO CODE IS FOUND 6 P* A4 = TTAB/SCTCDT ENTRY ADDR WHEN CODE IS FOUND F 2 P* A5 = 0 WHEN FOUND IN SCTCDT = 1 WHEN TTAB P* 8 P****USED REGISTERS********************************** P* P*
0x228580…29d200 [0x1f3]: Pad {f00=0x009c, f01=0x0190, f02=»* PFNDFDB EQU * & P LD A3,TTB:TD,A1 LENGTH DEV DESCR PFND030 EQU * H P SUK A3,4 ( P RF(NP) FND040 FILE CODE NOT IN TTAB n P LDR A4,A1 P ADKL A4,TTB:TD =1 P ADR A4,A3 P CWR* A2,A4 =1 P RB(NE) FND030 P*
0x228580…29d200 [0x1f4]: Pad {f00=0x009c, f01=0x0190, f02=» EQU * P LDR A5,A5 ( P RF(NZ) FND060 ONLY TTAB IS SEACHED P LD* A4,SCTCDT L PFND050 EQU * b P SUK A4,4 v ( P RF(NP) FND060 CODE NOT FOUND AT ALL P LD A3,SCTCDT P ADR A3,A4 P CWR* A2,A3 =1 P RB(NE) FND050 P
0x228580…29d200 [0x1f5]: Pad {f00=0x009c, f01=0x0190, f02=» EJECT P* P************** P* DMTREM * . P************** D P* Z D P* ENTRY DMTREM MOVE RECORD FROM BUFFER TO USER RECORD AREA d P* 0 P* INPUT RELATIVE REC OFFSET IN FDBRRO,A6 $ P* BUFFER ADDRESS IN A5
0x228580…29d200 [0x1f6]: Pad {f00=0x009c, f01=0x0190, f02=»HE RECORD > P* IF (FROM) AND (TO) ADDRESSES BOTH EVEN THEN WORD MOVE B P* IF (FROM AND (TO) ADDRESSES BOTH ODD THEN MOVE FIRST BYTE T > P* WITH BYTE INSTRUCTIONS AND THE REST WITH WORD MOVE : P* ELSE USE BYTE MOVE INSTRUCTIONS FOR THE WH
0x228580…29d200 [0x1f7]: Pad {f00=0x009c, f01=0x0190, f02=» LDR A4,A1 P LD A3,ECBBA,A9 TO ADDRESS P XRR A4,A3 4 P ANK A4,/01 F ( P RF(Z) DMT210 BOTH ODD OR BOTH EVEN Z & P CF A14,DMTBM ONE ODD AND ONE EVEN P RF DMT225 P* PDMT210 LDR A4,A1 P ANK A4,/01 P RF(E) DMT220 BOTH
0x228580…29d200 [0x1f8]: Pad {f00=0x009c, f01=0x0190, f02=»RD MOVE z PDMT225 EQU * P XIF $ P* 0 P IFT MMUPAG=1 : & P LD A4,DWTTDM,A6 GET TTAB ADDRESS P $ P LC A3,TTB:ID,A4 ID CALLING TASK z P CCK A3,'##' P RF(NE) DMTREN NOT DMTASK P LDK A3,QRR P CC A3,DWTOR+1,A6 " P RF(
0x228580…29d200 [0x1f9]: Pad {f00=0x009c, f01=0x0190, f02=»SER TTAB ~ PDMTREN EQU * P INH $ $ P TL TTB:MT,A4 LOAD MMU REGISTERS 0 PDMTREP EQU * X $ P LD A4,PRUN GET DM TTAB ADDRESS l 0 P TS TTB:MT,A4 STORE USER MMU IN DM MMU TABLE P ENB P LDR A3,A2 GET LENGTH 0 P LD A2,ECBBA,A9 GET RECE
0x228580…29d200 [0x1fa]: Pad {f00=0x009c, f01=0x018e, f02=»PAG=1 PDMTREQ INH P TL MONMMU SYSTEM MMU P RB DMTREP > P XIF P P EJECT P* j P* SET UP A14 STACK t P* PGETA14 EQU * $ P LD A14,PRUN GET DM TTAB ADDRESS * P AD A14,TTB:TD,A14 LENGTH DEVICE DESCR P ADKL
0x228580…29d200 [0x1fb]: Pad {f00=0x009c, f01=0x0190, f02=» P************** ! P* ! P* ! ( PDMTASK EQU * ! 2 P* ! F P* SET UP A14 STACK ! P P* ! l P CF A15,GETA14 ! v P LDR A6,A1 FDB ADDR ! P LDKL A5,-1 ! * P CW A5,FDBRRO,A6 SPECIAL PARAMETER -1 ! 2 P RF(E) DMT090 FOR ORDERS XR,DX,I
0x228580…29d200 [0x1fc]: Pad {f00=0x009c, f01=0x0190, f02=»1 ! P ANK A2,/3F " P CWK A2,QCL " P RF(E) DMT024 CLOSE " 2 P CWK A2,QRV " N P RF(E) DMT024 READ VTOC " b P SUK A2,QRRRB " & P RF(E) DMT024 RAND READ REL BUFFER " P ORKL A4,/100 " PDMT024 EQU * " P ST A4,FDBDBR,A1 " PDMT025
0x228580…29d200 [0x1fd]: Pad {f00=0x009c, f01=0x0190, f02=»80 BUFFER WAS BEFORE " P* # ( P* READ SECTOR INTO BUFFER AND EXIT # & P* # R P SUK A5,QCL # P RF(Z) DMT030 CLOSE # p P LDK A7,/11 PHYSICAL READ # P LKM # P DATA -1 I/O AND ACTIVATION # " P DATA DMTAR1 DMTASK RESTART #1 # P LKM #
0x228580…29d200 [0x1fe]: Pad {f00=0x009c, f01=0x0190, f02=»T050 CHECK RETURN CODES # P EJECT $ P************** $ . P* DMTAR1 * $ D P************** $ Z P* RESTART POINT AFTER READ $ p P* $ PDMTAR1 EQU * $ P* $ P* SET UP A14 STACK $ P* $ P CF A15,GETA14 $ PDMT050 EQU * $ 4
0x228580…29d200 [0x1ff]: Pad {f00=0x009c, f01=0x0190, f02=» $ 0 PDMT080 EQU * ENTRY IF SECT ALREADY IN BUFFER % P LDR A5,A3 % < P ADK A5,8 SKIP BUFFER HEADER % N * P ST A5,ECBBA,A8 PUT BUFFER ADDR IN ECB % r PDMT090 EQU * % P* % 4 P* HANDLE ACTUAL ORDER ORDER INDEX IN DWTOR % P* % P ADK A5,2
0x228580…29d200 [0x200]: Pad {f00=0x00a4, f01=0x0190, f02=» TABLE % r P EJECT & $ PDMRRRB EQU * RAND READ REL BUFF & P* & D PDMSQRE EQU * SEQUENTIAL READ & N P* & r PDMRDRE EQU * RANDOM READ & | P* & 4 P* CHECK STATUS IF NOT USED THEN ERROR RETURN & P* & P LD A2,FDBRRO,A6 & P AD A2,FDB
0x228580…29d200 [0x201]: Pad {f00=0x00a4, f01=0x018e, f02=»A & | P ABL DMTERR ' & PDMT200 LDK A1,/8 INCORRECT LENGTH ' & P CF A14,DMTFRL A2 := RECORD LENGTH ' H P* ' r P* MOVE THE RECORD ' | P* ' P CF A14,DMTREM ' P* ' 0 P* UPDATE CRN AND SET EXCLUSIVE ACCESS BIT ' P* ' PDMT230 EQU
0x228580…29d200 [0x202]: Pad {f00=0x00a4, f01=0x0190, f02=» ' t P* ( P LD A2,FDBSNR,A6 ( ( P RF(NZ) DMT270 VTOC SECTOR IN BUFFER ( * P* ( V P* VOLUME LABEL IN BUFFER ( ` H P* FIND VTOC SECTOR NUMBER AND RELATIVE RECORD OFFSET WITHIN SECTOR ( 8 P* FOR VTOC RECORD AND READ THIS SECTOR INTO BUFFER ( P
0x228580…29d200 [0x203]: Pad {f00=0x00a4, f01=0x0190, f02=»OBLK VTOC BLOCKING FACTIOR ( ( P LD A2,FDBVTO,A10 VTOC RECORD NUMBER ) " P LDK A1,0 ) N , P CF A14,DIVMOD A2=A1,A2/A6.A1=REMAINDRER ) ` P LDR A3,A2 QUOTIENT ) P LDR A6,A10 FDB ADDR ) P LDR A2,A1 REST ) P RF(Z) DMT240 REST = 0 ) $ P ADK A3,1 RE
0x228580…29d200 [0x204]: Pad {f00=0x00a4, f01=0x0190, f02=» P ST A3,FDBSNR,A6 * P LDK A3,0 * PDMT255 SUK A2,1 * . P RF(Z) DMT260 * F P AD A3,VLVRL-2,A5 * P ADK A3,1 SKIP STATUS BYTE * v P RB DMT255 * PDMT260 ST A3,FDBRRO,A6 * P* * P* RELEASE BUFFER * P* * P LD A3,ECBBA,A9 *
0x228580…29d200 [0x205]: Pad {f00=0x00a4, f01=0x0190, f02=» ADDR * P RB DMT020 READ VTOC SECTOR + P EJECT + 2 PDMT270 EQU * + @ P SUK A7,QRV + T $ P ABL(Z) DMT500 READ VTOC RECORD + h P* CLOSE FILE + & P* UPDATE VTOC LAST RECORD NUMBER + & P* AND WRITE SECTOR BACK ON DISC + P AD A5,FDBRRO,A6
0x228580…29d200 [0x206]: Pad {f00=0x00a4, f01=0x0190, f02=»E FILE. WRITE VTOC + P* , P LDK A7,/95 , $ P LKM , 8 P DATA 1 , D P* , T P LDR A1,A6 FDBADDRESS IN A1 , ^ & P CF A14,DMTIOT CHECK RETURN CODES , P LDR A1,A1 , P RF(NZ) DMT724 ERROR , PDMT720 EQU * , P LD A1,DWTTDM,A6 TTAB ADDR ,
0x228580…29d200 [0x207]: Pad {f00=0x00a4, f01=0x0190, f02=» A2,1 0 OR 1 , P ECR A2,A2 =1 END - P LC A2,ECBFC,A9 FILE CODE - . " P LDK A5,0 TRY LOCAL AND GLOBAL - P . P CF A14,FNDFDB GET ENTRY IN TTAB CDTADTAB - v & P LDR A13,A5 LOCAL/GLOBAL INDICATOR - P LDR A2,A2 - P RF(NZ) DMT725 FC FOUND - P LDKL
0x228580…29d200 [0x208]: Pad {f00=0x00a4, f01=0x0190, f02=»R - p P LDR A12,A1 SAVE TTEAB ADDR . 4 P SUR A10,A10 MARK THAT FDB NOT SHALL BE RELEASED . . P EJECT . f 0 P* CHECK IF THIS FDB ADDR IS USED ELEWHERE . t P* . P* SEARCH ALL TTABS . P* . P LD* A2,SCTTCT . PDMT730 EQU * . P SUK A2,
0x228580…29d200 [0x209]: Pad {f00=0x00a4, f01=0x018e, f02=»K ID . | P CCK A3,'##' / & P RB(E) DMT730 JUMP IF MONITOR TASK / P LD A3,TTB:TD,A1 / J ( P ADKL A1,TTB:TD+2 DEV DESCR TABLE +2 / b PDMT770 EQU * / P SUK A3,4 / $ P RB(NP) DMT730 NOT IN THIS TTAB / P LDR A4,A1 / P ADR A4,A3 / P CWR* A5,A
0x228580…29d200 [0x20a]: Pad {f00=0x00a4, f01=0x0190, f02=» / v & P RF DMT895 MORE USERS ON THIS FDB 0 P* 0 2 P* NOW SEARCH SCTCDT 0 < P* 0 Z PDMT780 EQU * 0 d P LD* A4,SCTCDT 0 x PDMT790 EQU * 0 P SUK A4,4 0 . P RF(NP) DMT800 THIS FDB HAS NO OTHER USER 0 P LD A2,SCTCDT 0 P ADR A2,A4 0
0x228580…29d200 [0x20b]: Pad {f00=0x00a4, f01=0x018e, f02=» & P RF DMT895 THIS FDB HAS MORE USERS 1 P EJECT 1 . P* 1 < P* NOW RELEASE THIS FDB 1 F P* 1 f PDMT800 EQU * 1 p P* 1 P* RELEASE EA-BUFFERS 1 P* 1 . P LDKL A2,/8000 ALL EA-BUFFERS ARE RELEASED 1 P LDR A1,A6 FDB ADDR 1 P CF A1
0x228580…29d200 [0x20c]: Pad {f00=0x00a4, f01=0x0190, f02=» 1 P CMR A5 CLEAR FDB 2 P RF DMT830 2 " PDMT820 EQU * 2 4 P LDR A4,A5 BUFFER ADDRESS 2 H PDMT830 EQU * 2 j & P RF(Z) DMT840 ALL BUFFER S REMOVED 2 ~ $ P LDR* A5,A4 NEXT BUFFER ADDRESS 2 P* 2 P* RETIURN BUFFER TO POOL 2 P* 2 P INH
0x228580…29d200 [0x20d]: Pad {f00=0x00a4, f01=0x0190, f02=» 2 P* 3 < P* NOW CHECK DEVICE CODES. WHEN LAST FILE IS CLOSED ON 3 > P* A FLEXIBLE DISC UNIT, AN UNLOC IS MADE FOR THIS VOLUME 3 R P* 3 P LDK A1,4 EXTENT COUNTER 3 P LDR A5,A6 FDB ADDR 3 . P ADKL A5,FDBEXT+1 ZADDR OF FIRST VOL CODE 3 &
0x228580…29d200 [0x20e]: Pad {f00=0x00a4, f01=0x0190, f02=»1 LOOP 3 & P ABL(NN) DMT900 CHECK THIS EXTENT 4 P XIF 4 8 P IFT INDXAC=1 4 D P EJECT 4 Z P* 4 h P* ALL EXTENTS CHECKED 4 r P* RELEASE MASRTER INDEX 4 P* 4 P INH 4 & P LD A1,FDBMIA,A6 MASTER INDEX ADDR 4 P RF(Z) DMT894 NO MATER
0x228580…29d200 [0x20f]: Pad {f00=0x00a4, f01=0x018e, f02=» DMT894 NO MATER IX 4 P CW A1,MXIND+2,A5 5 P RB(NE) DMT885 5 6 P LD A4,MXIND,A5 5 L & P RF(N) DMT890 PREVIOUS ENTRY USED 5 d " P LD A4,MXIND+4,A5 NO OF WORDS 5 P ANKL A4,/7FFF REMOV USE BIT 5 P ADS A4,MXIND,A5 NR OF WORDS 5 P* 5 P*
0x228580…29d200 [0x210]: Pad {f00=0x00a5, f01=0x0190, f02=» P LD A2,MXIND 6 P SUR A2,A5 6 P SUK A2,2 NO OF CHAR 6 * P CF A14,DMTWM MOVE UOP 6 F P RF DMT894 6 d PDMT890 EQU * 6 v P LDKL A4,/7FFF 6 & P ANS A4,MXIND+4,A5 REMOVE USE BIT 6 P XIF 6 P EJECT 6 PDMT894 EQU * 6 0 P LDKL A10,1 MARK T
0x228580…29d200 [0x211]: Pad {f00=0x00a5, f01=0x0190, f02=»11 FILE CODE 6 P CM 2,A11 FDB ADDR 7 P* 7 . * P* RELEASE DWT-QUEUQ IN THIS FDB-DWT 7 8 P* 7 f P LDR A1,A6 FDBADDR 7 p $ P ADKL A1,DWTTQ ADDR QUEUE START 7 P LDR* A5,A1 NEXT TTAB ADDR 7 P RF(Z) DMTA20 NO Q 7 P CMR A1 KILL ROOT 7 $ PDM
0x228580…29d200 [0x212]: Pad {f00=0x00a5, f01=0x0190, f02=» 7 P* 8 " P* NEXT ENTRY IN TTAB/CDATAB 8 P* 8 8 P LDR A1,A12 TTAB ADDR 8 B P LDK A2,0 8 ` ( P LC A2,ECBFC,A9 FILE CODE USERT ECB 8 r & P LDR A5,A13 LOCAL/GLOBAL INDICATOR 8 & P CF A14,FNDFDB SEARCH TTAB SCTCDT 8 P LDK A7,0 INDICATES A2 =
0x228580…29d200 [0x213]: Pad {f00=0x00a5, f01=0x018e, f02=»ALL ALSO BE RELEASED 8 | P* 9 & P LD A7,2,A4 NEXT FDB ADDR TO CLOSE 9 & P LDK A1,2 9 P P ADR A1,A6 FROM ADDR 9 b P LDK A3,2 9 ~ P ADR A3,A7 TO ADDR 9 P LDK A2,12 NO OF BYTES 9 P CF A14,DMTWM MOVE DWT 9 P IFT MMUPAG=1 9 P LD A3,DWTUEC,
0x228580…29d200 [0x214]: Pad {f00=0x00a5, f01=0x018e, f02=» 9 x P CM FDBSNR,A7 SECTOR NR : P LDKL A3,FDBEXT : ( P ADR A3,A7 : @ P ST A3,FDBCEX,A7 1ST EXTENT : R P LDR A10,A10 =1 : v P RF(Z) DMTA30 NO RELEASE =1 : P LDKL A3,/8000 : P ST A3,DWTST,A6 NOT BUSY : PDMTA30 EQU * : P XIF : P E
0x228580…29d200 [0x215]: Pad {f00=0x00a5, f01=0x0190, f02=» P* RELEASE FDB ; P* ; P LDR A10,A10 ; & P RF(Z) DMTA40 NO RELEASE ; : P IFT INDXAC=1 ; Z P* ; p 0 P* REMOVE ALL OTHER REFERAENCES TO THIS FDB ; z P* ; P LDK A1,10 2*MAX NR OF FDBS ; PDMTA50 SUK A1,2 ; " P RF(N) DMTA70 ALL FDBS
0x228580…29d200 [0x216]: Pad {f00=0x00a5, f01=0x0190, f02=»OF FDBS ; | PDMTA60 SUK A4,2 < 0 P RB(N) DMTA50 ALL ADDR CHECKED IN OTHER FDB < ( P LDR A5,A3 < P ADR A5,A4 < n P CW A6,FDBADF,A5 < P RB(NE) DMTA60 < P* < @ P* DELETE THIS REFERENCE TO THE FDB THAT SHALL BE RELEASED < P* < P CM
0x228580…29d200 [0x217]: Pad {f00=0x00a5, f01=0x0190, f02=»SET FDB FREE < PDMTA40 EQU * = * P CF A14,CLRBUF REMOVE ALL FREE BUFFERS = ( P LDR A1,A7 NEW FDB ADDR = V P ABL(Z) DMTERX NO MORE FDBS = v P IFT INDXAC=1 = P ENB ENB = P* = 4 P* FIND WHICH DMTASK IS NEXT AND ACTIVATE THAT = P* =
0x228580…29d200 [0x218]: Pad {f00=0x00a5, f01=0x0190, f02=» P LKM > P DATA 3 EXIT > P XIF > $ P IFT FLXDSC=1 > 0 P EJECT > F PDMT900 EQU * > T $ P* UNLOCK FLEXDISC IN THIS LOOP > h P* > P* REGISTERS > P* A1 = EXTENT COUNTER > 6 P* A4 = LAST VOL CODE FLEXDOISC A5 = EXT ADDR > P
0x228580…29d200 [0x219]: Pad {f00=0x00a5, f01=0x0190, f02=»NGTH IN FDB > z P LCR A7,A5 VOLUME CODE ? P ANK A7,/FF ? 2 P ABL(Z) DMT880 NO CODE ? F P* ? d & P* FLEXDICSC IF BIT 8-13 = 111110 ? n P* ? P ANK A7,/F8 ? P SUK A7,/F8 ? P ABL(NE) DMT880 NO FLEXDISC ? P* ? 6 P* IF SAME FLEXDI
0x228580…29d200 [0x21a]: Pad {f00=0x00a5, f01=0x0190, f02=»THOIS FLEXIBLE DISC VOL CODE ? t P* @ $ PDMT910 EQU * @ . P LCR A4,A5 SAVE VOL CODE @ B " P LDKL A3,FDBSTA FDB LINK ROOT @ b P INH INH @ P RF DMT925 @ PDMT920 EQU * @ P LDR* A3,A3 FDB ADDR @ PDMT925 EQU * @ P ANKL A3,/FFFE FDB ADDR
0x228580…29d200 [0x21b]: Pad {f00=0x00a5, f01=0x018e, f02=» DMT920 CURRENT FDB @ P LDK A7,4 EXTENT COUNTER A P LDR A2,A3 FDB ADDR A < P ADKL A2,FDBEXT+1 A X P* ADDR OF 1ST VOL CODE A r & P SUKL A2,EXTELE EXT LENGTH IN FDB A PDMT930 EQU * A P SUK A7,1 A & P RB(N) DMT920 ALL EXTENTS CHECKED A
0x228580…29d200 [0x21c]: Pad {f00=0x00a5, f01=0x018e, f02=» A & P* ALL FSDBS CHECKED. MAKE UNLOAD B P* B 2 PDMT980 EQU * B < P ENB ENB B P P* B b 6 P* NOTE THAT ECBBUF IS ASSUMED NOT TO BE CHANGED B l P* WITH THIS REQUEST B P* B P SC A4,ECBFC,A8 VOL CODE B P* B P IFF DSKPAG+SWPBLK
0x228580…29d200 [0x21d]: Pad {f00=0x00a5, f01=0x0190, f02=» P IFT FLXDSC=1 C P LDK A7,/B8 UNLOAD WAIT C P LKM C : P DATA 1 C F P LD A1,ECBRC,A8 C V P ANK A1,1 INOPER C n P ABL(NZ) DMTERR C P ABL DMT880 CHECK NEXT EXT C P XIF C P EJECT C " PDMT500 EQU * READ VTOC RECORD C P* C " P
0x228580…29d200 [0x21e]: Pad {f00=0x00a5, f01=0x0190, f02=»H C v ( P ORS A1,ECBRC,A9 SET RC BUT CONTINUE D , P LD A2,ECBRL,A9 MOVE WHAT USER TOLD YOU D 6 PDMT510 EQU * D f P ST A2,ECBEL,A9 D z P CF A14,DMTREM MOVE RECORD D PDMAEX EQU * D P ABL DMTAEX EXIT D P EJECT D " PDMSQWR EQU * SEQUENTIAL WRIT
0x228580…29d200 [0x21f]: Pad {f00=0x00a5, f01=0x0190, f02=» D v P* E PDMDEL EQU * INDEXED DELETE E P* E 4 PDMIRW EQU * INDEXED REWRITE E > P* E b & PDMRDWD EQU * DELAYED RANDOM WRITE E l P* E & PDMRDDD EQU * DELAYED RANDOM DELETE E P* E P* TEST STATUS E P LD A10,FDBRRO,A6 E P AD
0x228580…29d200 [0x220]: Pad {f00=0x00a5, f01=0x0190, f02=»+2,A9 E P ANK A2,/FF F P LD A3,ECBCW,A9 LOG REC NR F " P LDK A4,0 F D P CCR A4,A10 F V P RF(E) DMS010 FREE F j P IFT INDXAC=1 F P LDR A4,A7 F P SUK A4,QINS F P RF(E) DMEAER INDEXED INSERT F P XIF F P LDR A4,A7 F P SUK A4,
0x228580…29d200 [0x221]: Pad {f00=0x00a5, f01=0x0190, f02=» P ANK A4,EABIT G " P RF(NZ) DMS020 EA=1, NO CHECK G P* EA MUST BE SET G @ P* G Z P CF A14,EATEST G d P LDR A4,A4 RTN CODE G z " P RF(NP) DMEAER NO EA THIS TASK G P XIF G P RF DMS100 G PDMS010 EQU * G P IFT INDXAC=1 G P LDR A
0x228580…29d200 [0x222]: Pad {f00=0x00a5, f01=0x0190, f02=»TE G v P XIF H PDMS020 EQU * H P CF A14,EATEST H * P LDR A4,A4 RTN CODE H @ P RF(N) DMEAER EA OTHER TASK H PDMS100 EQU * H P LDK A1,0 SET STATUS FREE H P IFT INDXAC=1 H P LDR A2,A7 H P SUK A2,QIRW H " P RF(E) CHK010 INDEXED RE
0x228580…29d200 [0x223]: Pad {f00=0x00a5, f01=0x0190, f02=»HK010 INDEXED DELETE H P XIF I P LDR A2,A7 I ( P SUK A2,QRD I : P RF(E) DMT350 RANDOM DELETE I N P LDR A2,A7 I r P SUK A2,QRDD I ( P RF(E) DMT350 DELAYED RANDOM DELETE I P RF DMT310 RW,RWD,SW I P IFT INDXAC=1 I P EJECT I PCHK010
0x228580…29d200 [0x224]: Pad {f00=0x00a5, f01=0x0190, f02=»* COMPARE KEYS IN FILE AND USER BUFFER I P* J 0 P LDR A1,A6 FDB ADDR J : P LDK A5,8 MAX 4 INDEX J V P SUR A12,A12 INDEX COUNTER J t PCHK040 EQU * J P SUK A5,2 J $ P RF(N) CHK100 ALL INDEX CHECKED J P LDR A2,A1 FDB ADD J P ADR A2,A5 J
0x228580…29d200 [0x225]: Pad {f00=0x00a5, f01=0x0190, f02=»ORDER =3 J P ANK A2,/3F ORDER INDEX K P SUK A2,QIRW K 0 & P RB(NE) CHK040 NOT INDEXED REWRITE K D P* K n P IFT MMUPAG=1 K x P LDR A7,A1 SAVE A1 K * P LD A1,FDBKA,A6 GET KEY START ADDRESS K P AD A1,ECBBA,A9 K 2 P LDKL A2,FDBKEY GET KEY SAVE
0x228580…29d200 [0x226]: Pad {f00=0x00a5, f01=0x0190, f02=»6 KEY LENGTH K P INH L & P LD A4,DWTTDM,A7 GET TTAB ADDRESS L $ P TL TTB:MT,A4 LOAD MMU REGISTERS L J $ P LD A4,PRUN GET DM TTAB ADDRESS L r 0 P TS TTB:MT,A4 STORE USER MMU IN DM MMU TABLE L P ENB L , P CF A14,MOV:US MOVE KEY TO FDB KEY AREA L P
0x228580…29d200 [0x227]: Pad {f00=0x00a5, f01=0x0190, f02=»NDXAC=1 L P IFT MMUPAG=0 M " P LD A2,FDBKA,A6 KEY START ADDR M & P LDR A3,A2 M L " P AD A2,ECBBA,A9 KEY IN BUFFER M ^ P XIF M P* M P IFT INDXAC=1 M P AD A3,FDBRRO,A1 M P ADR A3,A11 KEY IN FILE M P LDK A7,0 M " P LD A6,FDBRLE,A6
0x228580…29d200 [0x228]: Pad {f00=0x00a6, f01=0x0190, f02=»ECK NEXT M r P LDR A6,A1 FDB ADDR N P LDKL A1,/4000 KEY NOT FOUND N , P RF DMERR N P PCHK100 EQU * N b P LDR A6,A1 FDB ADDR N v P LD A7,DWTOR,A6 N P ANK A7,/3F ORDER INDEX N P LDK A2,0 N P LC A2,FDBNIF,A6 N P CWR A2,A12 N ( P R
0x228580…29d200 [0x229]: Pad {f00=0x00a6, f01=0x0190, f02=»R N P XIF O $ PDMEAER LDKL A1,/2000 EA PROTECT O PDMERR ABL DMTERR O > P EJECT O V P* O d P* MOVE RECORD O n P* O PDMT310 EQU * O P IFT INDXAC=1 O P LDR A2,A7 O P SUK A2,QDEL O " P ABL(E) DMXDEL INDEXED DELETE O P XIF
0x228580…29d200 [0x22a]: Pad {f00=0x00a6, f01=0x0190, f02=»FROM ADDRESS O P* P P IFT MMUPAG=0 P P XRR A4,A1 P 4 P ANK A4,/01 P F ( P RF(E) DMT320 BOTH ODD OR BOTH EVEN P Z & P CF A14,DMTBM ONE ODD AND ONE EVEN P P RF DMT340 P P* P PDMT320 LDR A4,A3 P P ANK A4,/01 P P RF(E) DMT330 BOTH
0x228580…29d200 [0x22b]: Pad {f00=0x00a6, f01=0x018e, f02=»RD MOVE P z P* Q P XIF Q P* Q & P IFT MMUPAG=1 Q 0 P LDR A3,A2 GET LENGTH Q F , P LDR A2,A4 GET RECEIVING BUFFER ADDRESS Q d P INH Q & P LD A4,DWTTDM,A6 GET TTAB ADDRESS Q $ P TL TTB:MT,A4 LOAD MMU REGISTERS Q $ P LD A4,PRUN GET DM TTAB
0x228580…29d200 [0x22c]: Pad {f00=0x00a6, f01=0x0190, f02=» Q Z P XIF R P* R PDMT340 EQU * R P* R 2 P* SET STATUS USED R < P* R X P LDK A1,/FF R b PDMT350 SCR A1,A10 R v P LD A3,FDBDBR,A6 R P RF(NN) DMT394 NO DELAY R P LDR A2,A7 R P SUK A2,QSW R " P RF(E) DMT360 SEQUENTIAL WRI
0x228580…29d200 [0x22d]: Pad {f00=0x00a6, f01=0x0190, f02=»NDOM DELETE R x P RF DMT390 S $ P* WRITE IF LAST REC IN SECTOR S & P* S N PDMT360 LD A4,FDBRRO,A6 S X P CW A4,FDBMRO,A6 S v " P RF(NE) DMT400 NOT LAST RECORD S " PDMT390 LDK A7,/05 BASIC WRITE S P SLL A3,1 S P RF(N) DMT395 BASIC WANTED S
0x228580…29d200 [0x22e]: Pad {f00=0x00a6, f01=0x0190, f02=»1,A6 FDB ADDRESS AS PARAMETER S P LKM T & P DATA -1 I/O AND ACTIVATION T 2 " P DATA DMTAR2 DMTASK RESTART #2 T V P LKM T | P DATA 3 EXIT T P EJECT T P* T P************** T P* DMTAR2 * T P************** T P* T P* T , P
0x228580…29d200 [0x22f]: Pad {f00=0x00a6, f01=0x0190, f02=»4,DMTIOT CHECK DISC I/O T P LDR A1,A1 U P RF(NZ) DMTERR U 2 P LDKL A1,/C0FF U H $ P ANS A1,FDBDBR,A6 RELEASE BUFFER U ^ PDMT400 EQU * U " P LDR A1,A6 FDB ADDR DATA FILE U P LD A2,ECBCW+2,A9 U P ANK A2,/FF U P LD A3,ECBCW,A9 LOG REC NR U
0x228580…29d200 [0x230]: Pad {f00=0x00a6, f01=0x0190, f02=» RF(E) DMT460 SEQ WRITE U P LDK A4,QRD V P CWR A7,A4 V 4 P RF(E) DMT420 RAND DEL V F P LDK A4,QRDD V d P CWR A7,A4 V x ( P RF(E) DMT420 DELAYED RANDEOM DELETE V P IFT INDXAC=1 V P LDK A4,QDEL V P CWR A7,A4 V P RF(E) DMT420 INDEXED DE
0x228580…29d200 [0x231]: Pad {f00=0x00a6, f01=0x0190, f02=»ET GET CRN BUFFER V P LDR A10,A2 BUFFER ADDR W P IFT INDXAC=1 =2 START W : P LDK A3,QIRW W Z P CWR A7,A3 W n " P RF(E) DMT410 INDEXED REWRITE W P XIF =2 END W P CM CRNCIF,A2 W P* CLEAR INDEX CRN W P CM CRNCIF+2,A2 W PDMT4
0x228580…29d200 [0x232]: Pad {f00=0x00a6, f01=0x018e, f02=»NCDF,A10 CRN FIL E CODE W P IFT INDXAC=1 X P LDK A4,QINS X 6 P CWR A7,A4 X J P RF(E) DMT460 INDEXED INSERT X P XIF X PDMT420 EQU * X P LDK A4,QSR X P CWR A7,A4 X P RF(E) DMT450 SEQ READ X P LDK A4,QRR X P CWR A7,A4 X P
0x228580…29d200 [0x233]: Pad {f00=0x00a6, f01=0x018e, f02=» P* Y P* RELEASE EA Y P* Y $ P CF A14,EARELB REL EA Y . P RF DMTAEX Y L PDMT450 EQU * Y ^ P LC A4,DWTST,A1 DWTSTATUS Y r P ANK A4,EABIT EA-BIT Y & P RF(NZ) DMTAEX EA=1. NO EA WANTED Y P* Y " P* CHECK IF EA IS SET ALREADY Y P
0x228580…29d200 [0x234]: Pad {f00=0x00a6, f01=0x0190, f02=» P CF A14,EASETB Z P RF DMTAEX Z PDMT460 EQU * Z , P* Z @ P* UPDATE LRN Z J P* Z ` P SC A2,FDBLRN,A1 Z j P ST A3,FDBLRN+1,A1 Z P IFT INDXAC=1 Z P LDK A4,QINS Z P CWR A7,A4 Z " P ABL(E) DMINS2 INDEXED INSERT Z P XIF Z P
0x228580…29d200 [0x235]: Pad {f00=0x00a6, f01=0x0190, f02=»3F00 Z ( P RF(NZ) DMTERX NO RELEASE OF BUFFER [ PDMTEX1 LD A3,ECBBA,A8 [ 8 P SUK A3,8 [ V PDMTEX2 EQU * [ h ( P CF A14,DMTRBU RELEASE BUFFER AT A3 [ | PDMTERX EQU * [ P INH [ P* A1 = RET CODE [ P* A6 = DWT ADDR [ P CF A15,TENDIO
0x228580…29d200 [0x236]: Pad {f00=0x00a6, f01=0x0190, f02=»RANDOM READ [ 2 P********************************************* " P LD A9,DWTECB,A1 USER ECB ADDR J P IFT MMUPAG=0 p P LD A8,ECBCW,A9 ADDR OF KEY P XIF P IFT INDXAC=1 P IFT MMUPAG=1 P LDR A8,A1 FDB ADDR " P ADKL A8,FDB
0x228580…29d200 [0x237]: Pad {f00=0x00a6, f01=0x018e, f02=» LDR A13,A1 P ADKL A13,FDBECB ECB ADDR ] $ P CF A14,FNDKEY GET INDEX RECORD ] 6 ( PDMR006 EQU * FROM INDEXED READ NEXT ] ^ P LD A9,DWTECB,A1 ] P LDR A6,A1 FDB ADR ] P LDKL A8,FDBECB ] P ADR A8,A6 ECB ADDRESS ] P LDR A2,A2 RETURN CODE ]
0x228580…29d200 [0x238]: Pad {f00=0x00a6, f01=0x018e, f02=» ] " P LD A2,FDBRRO,A1 RECORD OFFSET ^ P ADK A2,10 BUFFER HEADER ^ . P ADR A2,A3 REC ADDR ^ N P LD A4,FDBRLE,A1 REC LENGTH ^ j P SUK A4,6 KEY LENGTH ^ P ADR A2,A4 ^ " P CC A4,2,A2 DUPLICATE KEY CHAR ^ $ P RF(NE) DMR020 NEXT KEY NOT SAME ^ P
0x228580…29d200 [0x239]: Pad {f00=0x00a6, f01=0x0190, f02=» ^ P LDK A5,0 _ P LC A5,3,A2 _ P SC A5,ECBCW+3,A8 _ . P LC A5,4,A2 _ H P ECR A5,A5 _ P LC A5,5,A2 _ n P ST A5,ECBCW,A8 _ P* _ P* RELEASE BLOCK BUFFER _ P* _ P CF A14,DMTRBU _ P EJECT _ P* _ 0 P* PERFORM RA
0x228580…29d200 [0x23a]: Pad {f00=0x00a6, f01=0x018e, f02=» BIT _ | P SLL A2,1 ` " P LDK A7,/A RANDOM READ NO WAIT ` P ORR A7,A2 EA BIT ` D P* ` ^ P* MOVE USER ECB ` h P* ` P LDR A1,A9 FROM ECB ADDR ` P LDR A3,A8 TO ECB ADDR ` P LDK A2,6 NO OF CHAR ` P CF A14,DMTWM MOVE ECB ` P LDR A
0x228580…29d200 [0x23b]: Pad {f00=0x00a6, f01=0x0190, f02=» P DATA 3 EXIT a PDMTAR4 EQU * a P* a , P* SET UP A14 STACK a 6 P* a R P CF A15,GETA14 a P LDR A6,A1 a r P LDKL A8,FDBECB a P ADR A8,A6 RR ECB a P LD A9,DWTECB,A6 USER ECB a P LD A1,ECBRC,A8 a & P ORS A1,ECBRC,A9 RET CODE
0x228580…29d200 [0x23c]: Pad {f00=0x00a6, f01=0x0190, f02=»LE a x P* b ( P LD A1,FDBADF,A6 FDB ADDR DATA FILEP b & P CF A14,CRNGET GET CRN BUFFER ADDR b @ P LDR A10,A2 CRN BUFFER ADDR b j " P LDR A1,A6 FDB ADDR INDEX FILE b ( P CF A14,GTLGRN GET INDE X LOG REC NO b P SC A2,CRNCIF+1,A10 b & P ST A3,CRNCIF+
0x228580…29d200 [0x23d]: Pad {f00=0x00a6, f01=0x0190, f02=»URN CODEXS b P* c $ P LD A2,ECBEL,A8 EFFECTIVE LENGTH c P ST A2,ECBEL,A9 c D P LDK A1,0 RETURN CODE c P ABL DMTERX TENDIO c z P EJECT c " PDMIRN EQU * INDEXED READ NEXT c 2 P********************************************* c P LDR A1,A6 F
0x228580…29d200 [0x23e]: Pad {f00=0x00a6, f01=0x0190, f02=»UFFADR c P ADK A2,10 RECORD ADDR d ( P AD A2,FDBRLE,A1 ADDR OF STATUS CHAR d , P LDK A5,/FF USED MARK d X P CCR A5,A2 STATUS d v P RF(E) DMI120 USED d P LD A4,FDBMRO,A1 d & P ST A4,FDBRRO,A1 LAST REC IN SECT d P* d P* CHECK IF END OF
0x228580…29d200 [0x23f]: Pad {f00=0x00a6, f01=0x0190, f02=» RF(G) DMI105 EOF d P CW A3,FDBLRN+1,A1 e P RF(L) DMI106 NOT EOF e 4 PDMI105 LDR A3,A9 e R P RF DMI030 EOF e j PDMI106 LDR A3,A9 RESTORE e P RF DMI010 NEXT REC e PDMI120 EQU * e P* INDEX RECORD IS FOUND e P* e P LDK A2,0 MA
0x228580…29d200 [0x240]: Pad {f00=0x00a6, f01=0x0190, f02=»DMI100 RECORD FOUND e P LDR A6,A1 FDB ADDR f & PDMI030 LDKL A1,/4000 KEY NOT FOUND f 8 PDMI035 EQU * f b P LDR A3,A3 BUFFER ADDR f v P ABL(Z) DMTERX NO BUFFER f P ABL DMTERR ERROR AND BUFFER f P EJECT f P* f & PDMINS2 EQU * INDEXED INSER
0x228580…29d200 [0x241]: Pad {f00=0x00a6, f01=0x0190, f02=»FSTA f " P CF A14,DMTRBU RELEASE BUFFER g PDMXDEL EQU * INDEXED DELETE g 2 6 P************************************************* g V P LDR A11,A7 ORDER CODE g P LDR A12,A8 PHYS ECB ADDR g P LDK A5,0 g . P SC A5,FDBDBR,A1 ZEROE INDEX FILE COUNTE
0x228580…29d200 [0x242]: Pad {f00=0x00a6, f01=0x0190, f02=» A6,A10 g P ADR A6,A5 h ( P LD A1,FDBAI1,A6 FDB ADDR INDEX FILE h " P RB(Z) DXI020 NO INDEX h N P* h l ( P* GET FILE CODE FOR THIS FDB ADDR h v P* h P LD* A6,SCTCDT h PDXI030 SUK A6,4 h P LD A7,SCTCDT h P ADR A7,A6 h P CW A1,2
0x228580…29d200 [0x243]: Pad {f00=0x00a6, f01=0x0190, f02=»CBFC,A8 INDEX FILE h P LDR A6,A11 i P SUK A6,QINS i . P RF(E) DXI080 INDEXED DELETE i B P* i f $ P* GET ADDRESSS OF DATA RECORD i p P* i P LD A6,ECBBA,A12 SECTOR ADDR i P ADK A6,2 CYLID i $ P AD A6,FDBRRO,A10 ADDR DATA REC i P AD
0x228580…29d200 [0x244]: Pad {f00=0x00a6, f01=0x0190, f02=» ADDR i v $ P LD A6,ECBBA,A9 USER BUFFER ADDR j P AD A6,FDBKA,A1 KEY OFFSET j 6 P IFT MMUPAG=1 j X P LDR A6,A1 j n " P ADKL A6,FDBKEY ADDR KEY AREA j P XIF j P IFT INDXAC=1 j $ P LDK A7,/1F INSERT INDEX NOWAIT j PDXI090 EQU * j P* j
0x228580…29d200 [0x245]: Pad {f00=0x00a6, f01=0x0190, f02=» DATA DMTAR5 j P LD A7,ECBRC,A8 k P RF(N) DMTAR5 REQ ERR k , P RB DXI020 NEXT INDEX DIRECT k J PDXI100 LKM k n P DATA 3 EXIT k PDMTAR5 EQU * k " P LD A6,FDBADF,A1 FDB DATA FILE k P LD A9,DWTECB,A6 USER ECB k P LDKL A8,FDBECB k P A
0x228580…29d200 [0x246]: Pad {f00=0x00a6, f01=0x0190, f02=»A9 RC TO USER k P LDK A1,0 RETURN CODE l & P LC A2,FDBDBR,A6 NR OF READY INDEX l 4 P ADK A2,1 COUNT INDEXES l ^ $ P CC A2,FDBNIF,A6 TOT NR OF INDEX l ~ P RF(NE) DXI200 l P LD A7,DWTOR,A6 l P ANK A7,/3F ORDER CODE l P SUK A7,QINS INDEXED INS
0x228580…29d200 [0x247]: Pad {f00=0x00a6, f01=0x0190, f02=» P ADKL A10,2 CYLID m P AD A10,FDBRRO,A6 m & P AD A10,FDBRLE,A6 ADDR STATUS CHAR m 8 P LDK A1,0 STATUS FREE m b . P ABL DMT350 CONTINUE AS FOR RANDOM DELETE m PDXI200 EQU * m P SC A2,FDBDBR,A6 m P LKM m " P DATA 3 EXIT. MORE INDEX LEFT m
0x228580…29d200 [0x248]: Pad {f00=0x00a7, f01=0x0190, f02=»*************** m r " P LD A9,DWTECB,A1 USER ECB ADDR n $ P LD A8,ECBBA,A9 BUFFER ADDR USER n > P LDR A12,A8 n f $ P LD A11,FDBRLE,A1 RECORD LENGTH n z P SUKL A11,6 KEY LENGTH n P LDR A13,A14 n 0 P ADKL A13,2 ECB ADDR TO RECORD BUFFER AREASS n $ P C
0x228580…29d200 [0x249]: Pad {f00=0x00a7, f01=0x0190, f02=»OR FOUND n z P LDR A13,A3 BUFFER ADDR o " P LD A4,FDBADF,A6 FDB DATA FILE o 0 P LD A5,DWTECB,A4 USER ECB o V P LD A1,DWTOR,A6 o x P ANK A1,/3F o P SUK A1,QDELX o & P ABL(E) DEL000 DELETE INDEX RECORD o P* o ( P* SET RC BIT 6 TO USER IF
0x228580…29d200 [0x24a]: Pad {f00=0x00a7, f01=0x018e, f02=»EY NOT ALLOWED IN FILE) o P* p P LC A4,ECBFC,A5 FILE CODE p * P CC A4,FDBECB+1,A6 p L * P RF(NE) INS049 NOT REQUESTED FILE CODE p f P LDKL A4,/200 BIT 6 p " P ORS A4,ECBRC,A5 NEXT KEY SAME p PINS049 EQU * p P IFT INSLAS=1 p P* p P
0x228580…29d200 [0x24b]: Pad {f00=0x00a7, f01=0x018e, f02=» P CF A14,RDNXTR GET NEXT REC q P RF INS100 OK q ( P ABL DEL045 ERROR q > PINS100 EQU * q X P ADR A2,A3 q l P ADK A2,10 REC ADDR q ~ P AD A2,FDBRLE,A1 ADDR STATUS q P LDK A5,/FF q P CCR A5,A2 q P RF(E) INS150 USED q P LD A5,FDBMR
0x228580…29d200 [0x24c]: Pad {f00=0x00a7, f01=0x0190, f02=» P CWR A5,A11 KEY LENGTH r $ P RB(E) INS080 NEXT SAME GET NEXT r " P* r J P* UPDATE LAST SAME RECORD r T P* r x P SC A11,-4,A2 NEXT SAME r P LD A7,FDBRRO,A1 r P CW A7,FDBMRO,A1 r & P RF(NE) INS160 SECT WRITTEN LATER r P* r P*
0x228580…29d200 [0x24d]: Pad {f00=0x00a7, f01=0x018e, f02=» P ABL(NZ) DMTERR s P* s P* GET NEXT RECORD s & P* s B PINS160 EQU * s L " P LDR A7,A5 NR OF SAME IN NEXT s ` P LDR A1,A6 FDB s P CF A14,RDNXTR GET NEXT RC s P RF INS170 OK s P ABL DEL045 ERROR s PINS170 EQU * s P LDR A13
0x228580…29d200 [0x24e]: Pad {f00=0x00a7, f01=0x0190, f02=» s P* t ( P* CREATE AN INDE XRECORD IN AREA 1 t P* t > P LDR A1,A12 FROM ADDR t H P* t f P LDR A3,A14 t p P ADK A3,2 TO ADDR t P LDR A2,A11 KEY LENGTH t P CF A14,DMTBM MOVE KEY t P LDK A2,0 t P SCR A2,A3 DUMMY t P ADK A
0x228580…29d200 [0x24f]: Pad {f00=0x00a7, f01=0x0190, f02=»R t t P LD A2,ECBCW+2,A5 u ( P LD A3,ECBCW,A5 REC NR DATA FILE REC u $ P SCR A2,A7 u P P ADK A7,2 u b P SCR A3,A7 u t P ECR A3,A3 u P SUK A7,1 u P SCR A3,A7 LOG REC NR u P ADK A7,2 u P LDK A1,/FF USED u P SCR A1,A7 STATUS CHAR u
0x228580…29d200 [0x250]: Pad {f00=0x00a7, f01=0x0190, f02=» u P ST A2,-28,A14 v P ST A3,-26,A14 v P EJECT v 4 P* v B : P* BELOW IS A NEW INDEX RECORD INSERTED AND FOLLOWING v L $ P* USED RECORDS ROLLED FORWARD v $ P* A6,A11,A13 IS USED AT ENTRY v $ P ADKL A11,7 RECORD LENGTH TOTAL v P* v
0x228580…29d200 [0x251]: Pad {f00=0x00a7, f01=0x0190, f02=»A12 = AREA INDEX 0=BUFAR1,1=BUFAR2 v $ P* A13 = BUFFER ADDRESS SECTOR w , P* w T PINS190 EQU * w ^ P LDKL A12,1 BUFADR2 w r PINS200 EQU * w P LDK A1,0 w P LDR A12,A12 w P RF(Z) INS210 BUFAR1 w ( P LDKL A1,RECBFZ RECORD BUUFFER SIZE w
0x228580…29d200 [0x252]: Pad {f00=0x00a7, f01=0x0190, f02=» LAST RECORD w P* x P LDR A1,A13 x P ADK A1,10 BUFSTA+2 x 2 . P AD A1,FDBMRO,A6 ADDR OF LAST REC IN SECT x N P LDR A2,A11 x P LDR A3,A10 x " P CF A14,DMTBM SAVE LAST RECORD x P* MOVE REST OF SECTOR x P* x P LDR A1,A13 x
0x228580…29d200 [0x253]: Pad {f00=0x00a7, f01=0x0190, f02=» x t P LDR A3,A1 y P ADR A3,A11 TO ADDR y P CF A14,DMTBMR MOVE y 6 P* INSERT NEW RECORD y R P* y p P LDKL A1,RECBFZ BUFFER SIZE y z P SLL A1,1 BYTE NO y P LDR A12,A12 y P RF(Z) INS250 BUFAR1 y " P LDK A1,0 SELECT OTHER BUFFER y
0x228580…29d200 [0x254]: Pad {f00=0x00a7, f01=0x0190, f02=» P CF A14,DMTBM MOVE z P* WRITE BUFFER z P* z 6 P LDR A8,A14 USE STACK AS ECB z @ P SUKL A8,24 z d $ P LC A2,FDBEXT+1,A6 VOL DEV CODE z x P ANK A2,/FF z P STR A2,A8 z P LDR A2,A13 z P ADK A2,8 BUFSTA z P ST A2,ECBBA,A8 SECTOR
0x228580…29d200 [0x255]: Pad {f00=0x00a7, f01=0x0190, f02=» z v P LDK A7,/95 WRITE , WAIT { P LKM { ( P DATA 1 { 4 P LDR A1,A6 FDB INDEX { D P CF A14,DMTIOZ IO CHECK { ` P LDR A1,A1 { P ABL(NZ) DMTERR { P* { 6 P* IF SPILLED RECORD IS FREE, OPERATION IS READY { P* { P LDR A2,A10 RECORD
0x228580…29d200 [0x256]: Pad {f00=0x00a7, f01=0x0190, f02=»T IN SECT { v P CCR A1,A2 | P RF(Z) INS400 FREE RECORD | $ P* | F P* GET NEXT SECTOR | P P* | l P LDR A1,A6 FDB ADDR | v P LDR A3,A13 BUFFER ADDR | 2 P CF A14,RDNXTR GET FIRST RECORD IN NEXT SECTOR | P RF INS260 OK | P LDR A1,A5 |
0x228580…29d200 [0x257]: Pad {f00=0x00a7, f01=0x0190, f02=»D BUFFERS | v P SUR A12,A12 } P RB INS200 } & P EJECT } 8 PINS400 EQU * } F P* } Z ( P* UPDATE LRN IF EOF IS ENCOUNTERED } d P* } P LDR A1,A6 FDB INDEX } P CF A14,GTLGRN } P CC A2,FDBLRN,A1 } P RF(L) INS430 NO EOF } P RF(G) I
0x228580…29d200 [0x258]: Pad {f00=0x00a7, f01=0x0190, f02=»T A3,FDBLRN+1,A6 } P LDKL A1,/1000 EOF ~ P ORS A1,ECBRC,A9 EOF TO USER ~ 4 PINS430 EQU * ~ X P* ~ l 0 P* UPDATE CRN-LINK FOR MOVED INDEX RECORDS ~ v P* ~ P LDKL A12,1 ADD ON E TO CRN ~ P LDR A8,A2 ~ P LDR A9,A3 LAST REC NR MOVED ~
0x228580…29d200 [0x259]: Pad {f00=0x00a7, f01=0x0190, f02=»TE CRN IF SAME FILE CODE ~ P* P LD A1,FDBADF,A5 FDB DATA F * " P CF A14,CRNGET GET CRN BUFFER N & P LD A9,DWTECB,A1 USER ECB ADDR =4 t " P LC A4,ECBFC,A9 USER FILE CODE P CC A4,FDBECB+1,A5 P RF(NE) INS440 OTHRER FILE P ST A10,CR
0x228580…29d200 [0x25a]: Pad {f00=0x00a7, f01=0x0190, f02=»DK A1,0 OK RET CODE P LDR A3,A13 BUFFER ADDR P ABL DMTEX2 < P EJECT P * PDEL000 EQU * DELETE INDEX RECORD CONT ^ P LDR A12,A5 USER ECB ADDR P LDR A2,A2 PDEL010 EQU * " P ABL(NZ) DMI030 KEY NOT FOUND P* P* CH
0x228580…29d200 [0x25b]: Pad {f00=0x00a7, f01=0x0190, f02=»7 BUFSTA+2-3=ADDR REC NR P LCR A2,A1 P CC A2,ECBCW+3,A12 REC NR 2 P RF(NE) DEL030 WRONG RECORD T P LC A2,1,A1 x P ECR A2,A2 P LC A2,2,A1 REC NR P CW A2,ECBCW,A12 P RF(E) DEL200 RECORD FOUND PDEL030 EQU * P*
0x228580…29d200 [0x25c]: Pad {f00=0x00a7, f01=0x018e, f02=»DB INDEX PDEL040 EQU * ( P CF A14,RDNXTR GET NEXT INDEX RECORD $ P RF DEL050 OK P PDEL045 LDR A1,A5 ERROR CODE f P ABL DMI035 ERROR PDEL050 EQU * P* P* CHECK IF RECORD IS USED P* P LDR A13,A3 NEW BUFFER ADD
0x228580…29d200 [0x25d]: Pad {f00=0x00a7, f01=0x0190, f02=» P RB(E) DEL020 USED P LD A4,FDBMRO,A1 ( P ST A4,FDBRRO,A1 LAST REC IN SECTOR 6 P RB DEL040 NEXT REC b P EJECT ~ PDEL200 EQU * RECORD FOUND P* & P* SET RC BIT 6 IF NEXT KEY SAME P* $ P LC A2,ECBFC,A12 USER FILE COD
0x228580…29d200 [0x25e]: Pad {f00=0x00a7, f01=0x0190, f02=»A6 * P RF(NE) DEL220 NOT REQUESTED FILE CODE P CWR A11,A7 KEY LENGTH : $ P RF(NE) DEL220 NEXT KEY NOT SAME X P LDKL A4,/200 $ P ORS A4,ECBRC,A12 NEXT KEY SAME PDEL220 EQU * P* $ P* MOVE UP RECORDS OVER DELETED P*
0x228580…29d200 [0x25f]: Pad {f00=0x00a7, f01=0x0190, f02=» P ADR A1,A11 FROM ADDR P LD A2,FDBMRO,A6 & P SU A2,FDBRRO,A6 NR OF CHAR > P CF A14,DMTBM MOVE b P* | P* SET LAST RECORD FREE P* P ADR A3,A11 P SUK A3,1 P LDK A1,0 P SCR A1,A3 STATUS FREE P*
0x228580…29d200 [0x260]: Pad {f00=0x00a7, f01=0x018e, f02=» " P LDR A11,A3 FIRST REC NR MOVED P LD A12,FDBRRO,A6 OLD OFFSET * P LD A4,FDBMRO,A6 N P ST A4,FDBRRO,A6 MAX OFFSET f $ P CF A14,GTLGRN LAST REC NR MOVED P LDR A8,A2 P LDR A9,A3 REC NR " P ST A12,FDBRRO,A6 RESET OFFSET P LDKL
0x228580…29d200 [0x261]: Pad {f00=0x00a7, f01=0x0190, f02=» ~ $ P RF(NZ) DEL290 NOT FIRST RECORD P LDR A1,A5 FDB 0 P CF A14,GTLGRN GET REC NR F P LDR A1,A2 h P LDR A2,A3 z P LDK A6,0 P LDK A7,1 $ P CF A14,DSUMOD A1,A2 = A1,A2 - 1 P RF(Z) DEL600 FILE START P LDR A6,A5 FDB ADD
0x228580…29d200 [0x262]: Pad {f00=0x00a7, f01=0x0190, f02=»A14 P ADKL A8,2 ECB ADDR P LDR A12,A12 ( $ P RF(Z) DEL245 BUFFER NOT CHANGED < P* d P* WRITE SECTOR n P* P LDK A7,/95 WRITE WAIT P LKM P DATA 1 P LDR A1,A5 FDB P CF A14,DMTIOZ IO CHECK P LDR A1,A1
0x228580…29d200 [0x263]: Pad {f00=0x00a7, f01=0x018e, f02=»EASE BUFFER ~ P* P* GET PREVIOUS SECTOR P* > P LDR A1,A5 FDB ADDR H P LDK A3,0 d P CF A14,RDNXTR GET SECTOR v P RF DEL250 OK P LDR A6,A1 FDB ADDR P RB DEL045 PDEL250 EQU * P LDR A5,A1 FDB P LDR
0x228580…29d200 [0x264]: Pad {f00=0x00a7, f01=0x018e, f02=» PDEL300 EQU * * P ST A4,FDBRRO,A5 PREVIOS RECORD OFFSET P ADK A4,10 BUFSTA+2 F P ADR A4,A13 RECORD ADDR b & P AD A4,FDBRLE,A5 STATUS CHAR ADDR P LDK A2,/FF P CCR A2,A4 P RB(NE) DEL240 FREE . P LC A2,17,A14 NR OF SAME IN
0x228580…29d200 [0x265]: Pad {f00=0x00a7, f01=0x0190, f02=» v PDEL600 EQU * P LDR A12,A12 $ P RF(Z) DEL900 BUFFER NOT CHANGED 0 P* X P* WRITE SECTOR b P* z PDEL700 EQU * P LDR A8,A14 P ADKL A8,2 ECB ADDR P LDK A7,/95 WRITE WAIT P LKM P DATA 1 P LDR A1,
0x228580…29d200 [0x266]: Pad {f00=0x00a7, f01=0x401c, f02=» XIF P END @ LDR A12,A12 $ P RF(Z) DEL900 BUFFER NOT CHANGED 0 P* X P* WRITE SECTOR b P* z PDEL700 EQU * P LDR A8,A14 P ADKL A8,2 ECB ADDR P LDK A7,/95 WRITE WAIT P LKM P DATA 1 P LDR A1,
0x228580…29d200 [0x267]: Pad {f00=0x00a7, f01=0x2008, f02=» + t P INH , P CF A15,TENDIO , P ENB , 2 P* , > P* EXIT , H P* , X P LKM , b P DATA 3 , n P* , ~ P END , @ , RD ADDR A2:=EA BIT + & P C1R A2,A2 ONE COMPLEMENT BIT MASK + P ANRS A2,A3 SET OFF EA BIT + P* + P
0x228580…29d200 [0x268]: Pad {f00=0x00a8, f01=0x0190, f02=» P EXTRN DISEND EXTRN DWTECB ECB ADDRESS $ EXTRN DWTOR DWT INDEX AND ORDER < & P EXTRN DWTTDM DM TASK TTAB ADDRESS d P EXTRN TTB:ID TASK ID 0 P EXTRN MOV:US MOVE FROM USER TO SYSTEM AREA " P EXTRN DMTGCA GET CRN ADDRESS , P EXT
0x228580…29d200 [0x269]: Pad {f00=0x00a8, f01=0x0190, f02=» ECBRL P EXTRN ECBEL P EXTRN ECBRC " P EXTRN ECBCW 6 & P EXTRN ECBCW2 SECOND CONTROL WORD J P EXTRN FDBLEN t " P EXTRN SQR SEQ READ ORDER CODE & P EXTRN EARELB,DWTST,CRNGET,EATEST & P EXTRN TASHLT HALT SYSTEM ROUTINE P EJECT
0x228580…29d200 [0x26a]: Pad {f00=0x00a8, f01=0x0190, f02=»* A VERSION CONTAINING INDEXED REQUEST ORDERS IS OBTAINED P* BY SETTING INDXAC EQU 1 D * P* INDXAC EQU 0 OTHRERWISE h PX:A EQU 0 PINDXAC EQU 00000 P* . P* A PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAINED
0x228580…29d200 [0x26b]: Pad {f00=0x00a8, f01=0x0190, f02=»TA DEFINITIONS * P************************ P* : P* D P DATA 0,0 4 WORDS N P DATA 0,0 h " PTIOD14 EQU *-2 TIODM A14 STACK z P* P* & PTIODMF EQU * TIODM FUNCTION TABLE P DATA CLOSE CLOSE " P DATA REVTOC READ
0x228580…29d200 [0x26c]: Pad {f00=0x00a8, f01=0x0190, f02=»DELETE | P DATA IXREWR INDEXED REWRITE $ P DATA IXRARE INDEXED RANDOM READ 2 P XIF Z P IFF INDXAC=1 f P DATA TIODME | P DATA TIODME P DATA TIODME P DATA TIODME P DATA TIODME P XIF P DATA RANDEL RANDOM DELETE
0x228580…29d200 [0x26d]: Pad {f00=0x00a8, f01=0x0190, f02=» SEQUENTIAL WRITE " P DATA SEQREAD SEQUENTIAL READ P DATA GETCUR GET CURRENCY @ P IFT INDXAC=1 b $ P DATA INSIXR INSERT INDEX RECORD x $ P DATA DELIXR DELETE INDEX RECORD P XIF P IFF INDXAC=1 P DATA TIODME P DATA TIODME
0x228580…29d200 [0x26e]: Pad {f00=0x00a8, f01=0x0190, f02=»LETE r $ P DATA RANREB RAND READ REL BUFF P DATA SETLRN SET LRN 4 P* P P* Z PTIODMO EQU * DM ORDERS d $ P DATA /221E CLOSE,IND READ NEXT & P DATA /1D1C IND INSERT,IND DELETE . P DATA /1B1A INDEXED REWRITE,IND RAND READ $ P DAT
0x228580…29d200 [0x26f]: Pad {f00=0x00a8, f01=0x0190, f02=»SEQ WR. , BASIC WRITE $ P DATA /0302 READ VTOC, SEQ READ ( P DATA /0123 BASIC READ,GET CURRENCY F * P DATA /1F20 INS INDEXREC,DEL INDEXREC r . P DATA /240D GET CURR INDEX,DELAYED RAND WR 0 P DATA /0E0F DELAY RAN DEL,RAN READ REL BUFF P DAT
0x228580…29d200 [0x270]: Pad {f00=0x0093, f01=0x0190, f02=» LD A2,VTRLE,A4 P ST A2,FDBRLE,A12 P LC A2,VTBLF,A4 2 P SC A2,FDBBLF,A12 J P LC A2,VTNIF,A4 d P SC A2,FDBNIF,A12 | P LD A2,VTKA,A4 P ST A2,FDBKA,A12 P LD A2,TASVRN P ST A2,FDBVTO,A12 P* P IFT MMUPAG=
0x228580…29d200 [0x271]: Pad {f00=0x0093, f01=0x0004, f02=» h
0x228580…29d200 [0x272]: Pad {f00=0x0093, f01=0x0190, f02=» 2 P IDENT DMINIT REL 9.2 79-11-16 870105040920 P : P* B 8 P**************************************************** L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 0 P* DMINIT = DATA MANAGEMENT INITIALIZATION P* P*
0x228580…29d200 [0x273]: Pad {f00=0x0093, f01=0x018e, f02=»FDB:S IN THE FDB AREA z > P* CLEAR THE USE BIT AND THE BUFFER HEADER IN DM BUFFERS 0 P* CLEAR USE BIT AND QUEUE ANCHOR IN TASBLK ` , P* CLEAR DM FILE CODE ENTRIES IN CD:TAB P* , P* DMINIT IS CALLED AS A PFINIT ROUTINE P* " P*
0x228580…29d200 [0x274]: Pad {f00=0x0093, f01=0x0190, f02=» P EXTRN FDBSTA P EXTRN FDBEND P EXTRN CURBUF 0 P EXTRN BUFDMI F P EXTRN BUFSNR P EXTRN BUFOR r P EXTRN TASBLK P EXTRN TASQUE P EXTRN CRNQUE,CRNEND P EXTRN CRBUFL P EJECT P* P* P* I
0x228580…29d200 [0x275]: Pad {f00=0x0093, f01=0x0190, f02=» P* DIV W. 2 FOR 16 K LIMIT P* ( P LDR A5,A4 2 P SRL A5,1 D P LDR A1,A6 V P SRL A1,1 h P CWR A5,A1 z " P RF(G) DMIN40 END OF FDB AREA P STR A4,A3 CHAIN P LDR A3,A4 P RB DMIN30 PDMIN40 EQU * P SUR A3,
0x228580…29d200 [0x276]: Pad {f00=0x0093, f01=0x0190, f02=»ALIZATIONS IF POWER FAIL RESTART P* ( P LD A1,INIFLG 2 P RF(Z) DMINEX H P LDKL A2,QFDBFL FDB LENGTH ^ P* $ P* CHAIN FDB:S IN THE FDB AREA P* P LDKL A3,FDBSTA P LDKL A6,FDBEND P CF A15,DMIN30 P*
0x228580…29d200 [0x277]: Pad {f00=0x0093, f01=0x0190, f02=» P CF A15,DMIN30 P* < P* CLEAR USE BIT AND BUFFER HEADER WORDS IN DM BUFFERS $ P* d P LDKL A2,/FFFE n P LD A3,CURBUF PDMIN50 LDR* A3,A3 P ANRS A2,A3 CLEAR USE BIT P CM BUFDMI,A3 P CM BUFSNR,A3 P CM BUFO
0x228580…29d200 [0x278]: Pad {f00=0x0096, f01=0x405a, f02=»LK P CM TASQUE P* PDMINEX EQU * & P RTN A15 : P END J@ V
0x228580…29d200 [0x279]: Pad {f00=0x0096, f01=0x2008, f02=» PDMINEX EQU * P RTN A15 " P END 2@ >TASBLK P CM TASBLK P P CM TASQUE b P* t , P* CLEAR DM FILE CODE ENTRIES IN CDTAB ~ P* P LD A2,CDTAB PDMIN60 SUK A2,4 P LDR A3,A2 P ADKL A3,CDTAB
0x228580…29d200 [0x27a]: Pad {f00=0x0096, f01=0x0190, f02=» J F IDENT DMTASS REL 9.2 79-11-16 870105040920 ( $ DMTASSK VTLRN VLVBA VLVRL SECTLEA R VLVBA ~ VLVRL VTLRN SECTLEA TASECB ECBBA ECBRC , (
0x228580…29d200 [0x27b]: Pad {f00=0x0096, f01=0x018e, f02=» : t TASMXAE TASASB & VOLCHE 8 , ( 7H@ A A " P "" J TASCVO z CLRBUF * & Q H P @ TASVOL ECBFC ECBRL ECBCW
0x228580…29d200 [0x27c]: Pad {f00=0x0096, f01=0x0190, f02=» TASVLEP , ( L " TOP A " L TASVRL F , ( B A $ L C & @ $ X TASFIL , ( " A $Q @ A @ DMTRBU , ( ( B * D *
0x228580…29d200 [0x27d]: Pad {f00=0x0096, f01=0x018e, f02=» j , ( G & @ (T , ( a A " 0" : , ( U _ L !SSP !LL j TASCXOS , ( W L @ , A ,V TASSEXR TASXLBP , (
0x228580…29d200 [0x27e]: Pad {f00=0x0096, f01=0x0190, f02=» FDBVTO , ( H 4 2% P R 6 X T R FDBMIA# J , ( 8 @ "T R :T @ ( , ( 6 4 2% P QFDBFL , ( = 2 < P % DWTST
0x228580…29d200 [0x27f]: Pad {f00=0x0096, f01=0x0190, f02=» E 3 P S F P S FDBRLE " FDBBLF 4 FDBNIF F * & F P S H P S J P % S X FDBKA FDBMEC * & L P & S N @ " S 8 DWTMEC , ( @ P S R B |
0x228580…29d200 [0x280]: Pad {f00=0x0094, f01=0x4076, f02=» T P P U W P #P 'P 7W CR OV WT gP wW Rb R T W, R < `@ r
0x228580…29d200 [0x281]: Pad {f00=0x0094, f01=0x0010, f02=»
0x228580…29d200 [0x282]: Pad {f00=0x0094, f01=0x0190, f02=» 2 P IDENT DMTASS REL 9.2 79-11-16 870105040920 P : P* =3 PR 5141 B P* = 79-04-06 X P* =2 WAIT AT VTOC READ n P* REL 9.1 79-04-06 P* =1, PR 3413 P* REL 9.1 78-10-25 P P P* P* 8 P********
0x228580…29d200 [0x283]: Pad {f00=0x0094, f01=0x0190, f02=»LE CODE DISC I/O HANDLING z P* " P* , P* 6 P* @ P* J P* T 8 P**************************************************** ^ P* * P* THIS MODULE IS ACTIVATED FROM TASS P* B P* INPUT A2 = TID TASK IDENT OF DMTASK AT P
0x228580…29d200 [0x284]: Pad {f00=0x0094, f01=0x0190, f02=» ASSIGNED CAN X L P* RECIDE ARE DEFINED. ON THESE VOLUMES THE VTOC:S ARE SEARCHED TO FIND D P* ALL EXTENTS FOR THE FILE TO BE ASSIGNED. FOR EACH EXTENT ITS f > P* FILE-SECTION-NO, FILE-EXTENT-NO,FILE-EXTENT-LENGTH AND . P* FILE-EXTENT-BASE ARE S
0x228580…29d200 [0x285]: Pad {f00=0x0094, f01=0x0190, f02=»-LENGTH, BLOCKING-FACTOR AND VTOC-REC-NO r P* ARE SAVED TOO. 0 L P* WHEN THE FIRST EXTENT HAS BEEN FOUND EXISTING FDB:S CAN BE SEARCHED J L P* TO CHECK IF THE FILE TO BE ASSIGNED HAS PREVIOUSLY BEEN ASSIGNED TO L P* ANOTHER FILE CODE. IF SO THE
0x228580…29d200 [0x286]: Pad {f00=0x0094, f01=0x0190, f02=»EN A NEW FDB MUST BE INITIALIZED AND THE REST OF THE 4 P* VOLUMES ARE CHECKED TO FIND ALL FILE EXTENTS < P* t 2 P* FOR INDEX ASIGN THE PRODGRAM IS RUN TWICE. ~ 4 P* DURING THE FIRST LOOP A MASTERINDEX IS READ. . P* FC 13 IN TTAB FOR DMTASK I
0x228580…29d200 [0x287]: Pad {f00=0x0094, f01=0x018e, f02=»MTASS P ENTRY VTLRN P ENTRY VLVBA " P ENTRY VLVRL 6 P ENTRY SECTLE J P EJECT ` P* n P***************** x P* EXTERNALS * P***************** P* P EXTRN QTJOB P EXTRN FNDTID,TTB:TD P* P
0x228580…29d200 [0x288]: Pad {f00=0x0094, f01=0x0190, f02=» P EXTRN ECBRL P EXTRN ECBRC P EXTRN ECBCW , P* @ P EXTRN TIODM J P EXTRN DMTGBU ^ P EXTRN DMTRBU t P EXTRN CLRBUF P EXTRN BUFSTA P EXTRN BUFSNR P EXTRN BUFDMI P* P EXTRN QFDBFL P EXTRN F
0x228580…29d200 [0x289]: Pad {f00=0x0094, f01=0x0190, f02=»BAS P EXTRN FDBRLE P EXTRN FDBBLF " P EXTRN FDBVTO 8 P EXTRN FDBLRN N P EXTRN FDBNIF,FDBKA d & P EXTRN FDBMIA,FDBAI1,FDBADF,FDBCRL . P EXTRN FDBSNR,FDBMRN,GTLGRN,EXTELE,FDBCEX P EXTRN FDBDBR,FDBMRO . P EXTRN FDBMEC MMU
0x228580…29d200 [0x28a]: Pad {f00=0x0094, f01=0x0190, f02=» P EXTRN TASCXO P EXTRN TASSEX P EXTRN TASXLB 0 P EXTRN TASFDB F P EXTRN TASVRL P EXTRN TASVLE r P EXTRN TASVRN P EXTRN TASECB P EXTRN TASFIL,TASTID,TASMXA P EXTRN TASSPW,TASFDD,TASTBE P EXTRN TASCAQ
0x228580…29d200 [0x28b]: Pad {f00=0x0094, f01=0x018e, f02=» PX:B EQU 0 4 PINDXAC EQU 00000 INDEX ACCESS FUNCTIONS WHEN = 1 P* N . P* A PROGRAM VERSION USING TOSS MMU PAGING X * P* IS OBTAINED BY SETTING MMUPAG EQU 1. P* PMMUPAG EQU 1 P* P EJECT P* P************
0x228580…29d200 [0x28c]: Pad {f00=0x0094, f01=0x0190, f02=» PVLVRL EQU 14 PVLVER EQU 34 P* , PVTFSNO EQU 8 6 PVTFXNO EQU 10 J PVTFXLE EQU 14 ` PVTFXBA EQU 18 v PVTLRN EQU 21 PVTRLE EQU 24 PVTBLF EQU 26 PVTFIOR EQU 27 PVTNIF EQU 37 PVTKA EQU 38 P*
0x228580…29d200 [0x28d]: Pad {f00=0x0094, f01=0x0190, f02=»RDS P DATA 0,0 STACK PDMTA14 EQU *-2 $ P EJECT : P* H P************** R P* DMTIOC * h P************** ~ P* : P* ENTRY DMTIOC CHECK RETURN CODES AFTER DISC I/O > P* RETURN TO DMTASX WITH A7=
0x228580…29d200 [0x28e]: Pad {f00=0x0094, f01=0x0190, f02=»FF BIT 7 ONLY RETRIES P RF(Z) DMTIOX P ADKL A14,4 4 P ANK A1,/80 H $ P RF(NZ) DMT060 NEW VOLUME LOADED P SUKL A3,BUFSTA , P CM BUFDMI,A3 CLEAR VOL IDENT IN BUFFER P LDK A7,1 P ABL DMTASX DISC I/O ERROR PDMTIOX EQU
0x228580…29d200 [0x28f]: Pad {f00=0x0094, f01=0x0190, f02=»QU * 8 P LDKL A14,DMTA14 INITIALIZE DMTASK A14 STACK POINTER P ST A2,TASTID TASK IDENT H P CM TASMXA MASTER INDEX ADDR h P ANK A2,/2 P RF(Z) DMT010 NOT FLEXTASC P* & P* PERFORM VOLUME CHECK WITH LOCK P* P LD A8,TASAS
0x228580…29d200 [0x290]: Pad {f00=0x0094, f01=0x0190, f02=»DR A1,A1 P RF(Z) DMT010 OK P LDK A7,4 VOL UNKNOWN ( P SUR A8,A8 NO BUFFER =3 F P ABL DMTASX f PDMT010 EQU * z P* P LDKL A8,TASECB P* 6 P LD A1,TASCVO OFFSET INTO TASVOL FOR FIRST VOLUME PDMT050 EQU * , P C
0x228580…29d200 [0x291]: Pad {f00=0x0094, f01=0x0190, f02=» LDKL A2,SECTLE " P ST A2,ECBRL,A8 SECTOR LENGTH P LDK A2,0 > 0 P ST A2,ECBCW,A8 SECTOR #0 VL (VOLUME LABEL) P P* P* 2 P CF A14,DMTGBU GET A DM BUFFER ADDRESS IN A3 P DATA /5700 NOP. READ ALWAYS P ADKL A3,BUFSTA & P
0x228580…29d200 [0x292]: Pad {f00=0x0094, f01=0x0190, f02=»IT =2 P LKM P DATA 1 =2 . P LDKL A14,DMTA14 SET UP A14 STACK POINTER . P CF A14,DMTIOC I/O CHECK ` P LD A2,VLVER,A3 VERSION & P CWK A2,'TO' DTOSS FORMATED DISC? P RF(E) DMT100 YES P LDK A7,8 NO P ABL DMTASX ERROR
0x228580…29d200 [0x293]: Pad {f00=0x0094, f01=0x018e, f02=»3 VTOC BASE . P ST A2,ECBCW,A8 1:ST VTOC SECTOR NO = FSAT & P LD A9,VLVRL,A3 VTOC RECORD LENGTH F P ST A9,TASVRL p P EJECT P* P* SEARCH ALL VTOC:S P* PDMT110 EQU * P LD A6,TASVLE P SUK A6,1 P ST A6,T
0x228580…29d200 [0x294]: Pad {f00=0x0094, f01=0x018e, f02=» P LD A1,TASCVO P SUK A1,2 & P ABL(N) DMT300 ALL VOLUMES CHECKED 0 P ST A1,TASCVO UPDATE TASCVO Z $ P LDK A7,7 TOO MANY FILE SECTIONS ~ P LD A3,TASFIL " P ABL(NZ) DMTASX NOT DATA FILE P LD A3,ECBBA,A8 P SUKL A3,BUFSTA
0x228580…29d200 [0x295]: Pad {f00=0x0094, f01=0x0190, f02=» P* ACTIVATE NEXT DM TASK P* * P ADKL A7,'#D' 4 P LKM J P DATA -4 V P DATA DMTASS f P LKM z P DATA 3 EXIT P EJECT P* & P* READ NEXT VTOC SECTOR AND EXIT P* PDMT115 EQU * P LD A3,ECBBA,A8
0x228580…29d200 [0x296]: Pad {f00=0x0094, f01=0x0190, f02=» LD A1,TASVOL,A1 P CF A14,DMTGBU GET BUFFER P DATA /5700 NOP. READ ALWAYS : P ADKL A3,BUFSTA ^ P ST A3,ECBBA,A8 v P ST A2,ECBCW,A8 P LDK A7,/91 WAIT =2 P LKM P DATA 1 =2 P LDKL A14,DMTA14 P CF A14,DMTIOC
0x228580…29d200 [0x297]: Pad {f00=0x0094, f01=0x0190, f02=» $ P RF(NE) DMT135 NOT MASTER INDEX " P ADKL A11,14 MX FILE NAME ADDR , PDMT135 EQU * R P ADK A3,2 SKIP CYLID f PDMT120 EQU * ( P IM TASVRN INCREMENT VTOC RECORD NO P LDR A4,A3 " P ADR A4,A9 ADDRESS STATUS BYTE P LCR A2,A4
0x228580…29d200 [0x298]: Pad {f00=0x0095, f01=0x0190, f02=»AME MAX 4 WORDS PDMT150 EQU * P LDR* A10,A4 , P CWR* A10,A7 @ P ABL(NE) DMT250 NO MATCH T P SUK A2,1 t . P RF(NP) DMT160 ALL 4 FILE NAME WORDS MATCH P ADK A4,2 P ADK A7,2 P RB DMT150 CHECK NEXT WORD P* ( P*
0x228580…29d200 [0x299]: Pad {f00=0x0095, f01=0x0190, f02=»F(E) DMT165 YES P CCK A2,'LL' LIBRARY FILE ? P ABL(NZ) DMT250 NO < P LDK A2,0 FILE EXTENT NUMBER V P RF DMT167 z . PDMT165 LD A2,VTFSNO,A3 FILE SECTION NUMBER P EJECT PDMT167 EQU * P* . P* GET INFO FROM VTOC AND SAVE
0x228580…29d200 [0x29a]: Pad {f00=0x0095, f01=0x0190, f02=»1,4 P ST A1,TASCXO P RF(NN) DMT170 <= 4 EXTENTS " P LDK A7,9 F * P ABL DMTASX MORE THAN 4 EXTENTS EXIST X PDMT170 EQU * " P ECR A2,A2 TO LEFT HALF OF A2 4 P LC A2,VTFXNO+1,A4 EXT NO INTO RIGHT HALF OF A2 P ST A2,TASSEX,A1
0x228580…29d200 [0x29b]: Pad {f00=0x0095, f01=0x0190, f02=» P LD A2,VTFXBA,A4 EXTENT BASE P ST A2,TASXLB+2,A1 ( P LD A2,TASSEX,A1 B $ P RF(NZ) DMT250 NOT FIRST EXTENT Z P EJECT P* FIRST FILE EXTENT < P* CHECK IF AN FDB DESCRIBING THE FILE ALREADY EXISTS. P* P LD A12,TASFDB
0x228580…29d200 [0x29c]: Pad {f00=0x0095, f01=0x0190, f02=»A12,FDBSTA PDMT200 EQU * P LDR* A5,A12 & P ANK A5,/01 : P RF(Z) DMT210 FREE N P LD A2,FDBEXT,A12 h P CW A2,TASVOL,A6 " P RF(NE) DMT210 NOT SAME VOLUME P LD A2,FDBVTO,A12 P CW A2,TASVRN $ P RF(NE) DMT210 NOT SAME VT
0x228580…29d200 [0x29d]: Pad {f00=0x0095, f01=0x0190, f02=»DB FOUND n PDMT205 EQU * P LDK A7,5 FILE CODE USED $ P ABL DMTASX D P* X $ PDMT210 LDR* A12,A12 GET NEXT FDB b P ANKL A12,/FFFE ( P RB(NE) DMT200 MORE FDB:S TO SEARCH P* 0 P* NO MATCHING FDB EXIST FIND A FREE FDB
0x228580…29d200 [0x29e]: Pad {f00=0x0095, f01=0x0190, f02=» v P ANKL A12,/FFFE & P RB(NE) DMT220 MORE FDB:S TO CHECK P LDK A7,3 J P ABL DMTASX NO FDB AVAILABLE ( P* INITIALIZE FDB ZERO FROM FDB+2 P* PDMT230 EQU * P ST A12,TASFDB P LDR A10,A12 P ADKL A10,QFDBFL
0x228580…29d200 [0x29f]: Pad {f00=0x0095, f01=0x0190, f02=» RB DMT233 PDMT237 EQU * P LDKL A2,/8000 & P* DEV NOT BUSY < P ST A2,DWTST,A12 T P LDKL A2,TIODM l P ST A2,DWTADR,A12 P LDKL A2,SECTLE P LDR A1,A12 P ADKL A1,FDBECB P ST A2,ECBRL,A1 P LDK A2,/01
0x228580…29d200 [0x2a0]: Pad {f00=0x0095, f01=0x0190, f02=» P LD A2,VTRLE,A4 P ST A2,FDBRLE,A12 P LC A2,VTBLF,A4 6 P SC A2,FDBBLF,A12 N P LC A2,VTNIF,A4 h P SC A2,FDBNIF,A12 P LD A2,VTKA,A4 P ST A2,FDBKA,A12 P LD A2,TASVRN P ST A2,FDBVTO,A12 P* P IFT MMU
0x228580…29d200 [0x2a1]: Pad {f00=0x0095, f01=0x0190, f02=» ECB IN FDB l P XIF P* P EJECT * P* 8 P* CHECK NEXT VTOC RECORD B P* d PDMT250 EQU * n P* A3 = ADR 1ST REC P* A9 = VTOC REC LGTH P ADR A3,A9 P ADK A3,1 SKIP STATUS BYTE P LDR A2,A3 P SU A2,E
0x228580…29d200 [0x2a2]: Pad {f00=0x0095, f01=0x0190, f02=»* ALL VTOCS IN ALL VOLUMES ARE SEARCHED AT THIS POINT P* @ PDMT300 EQU * J P LDK A3,16 ^ P SU A3,TASCXO p P RF(NZ) DMT310 P LDK A7,6 P RF DMTASX FILE NAME UNKNOWN PDMT310 EQU * P LD A12,TASFDB P RF(NZ) DMT320
0x228580…29d200 [0x2a3]: Pad {f00=0x0095, f01=0x0190, f02=»ENDING ORDER f 8 P* ACCORDING TO INCREASING SECTOR NO AND EXTENT NO ! P* ! P PDMT320 EQU * ! Z P* ! n @ P* CHECK IF RECORD BUFFERS ARE LARGE ENOUGH FOR INDEX FILE ! x P* ! P LD A6,TASFIL ! P RF(Z) DMT330 DATA FILE ASS ! $ P LD A6,FDB
0x228580…29d200 [0x2a4]: Pad {f00=0x0095, f01=0x0190, f02=» OK ! P LDK A7,12 " * P RF DMTASX RECORD BUFFER IS TOO SMALL " PDMT330 EQU * " L P LDR A6,A12 " ` P* FDB ADDR " t P ADKL A6,FDBEXT " P LDK A2,0 " P LDR A5,A3 " P SRL A5,2 NUMBER OF EXTENTS " PDMT340 EQU * " P LDK A4,16 "
0x228580…29d200 [0x2a5]: Pad {f00=0x0095, f01=0x0190, f02=»E EXTENTS TO CHECK " ~ P* # , P* THE EXTENT SEARCHED FOR IS NOT FOUND # $ 2 P* CHECK IF RIGHT HALF OF A2 = 0 (EXT-NO = 0) # T P* # P LDR A1,A2 # P ANK A1,/FF # $ P RF(NZ) DMT370 TRY NEXT SECTION # P* # PDMT355 EQU * # P LDK A7,7
0x228580…29d200 [0x2a6]: Pad {f00=0x0095, f01=0x0190, f02=» LD A1,TASSEX+2,A4 # P LD A1,TASVOL,A1 $ P ST A1,EXTDMI,A6 $ 2 P LD A1,TASXLB,A4 $ J P ST A1,EXTLEN,A6 $ b P LD A1,TASXLB+2,A4 $ z P ST A1,EXTBAS,A6 $ P ADK A6,6 $ P SUK A5,1 $ & P RF(NP) DMT500 ALL EXTENTS HANDLED $ P* $ : P* FI
0x228580…29d200 [0x2a7]: Pad {f00=0x0095, f01=0x0190, f02=» A1,3 $ " P RF(NE) DMT380 NOT EXT-NO = 3 % PDMT370 EQU * % 4 P ECR A1,A2 % H P ANK A1,/FF % Z P SUK A1,3 % n P RB(E) DMT355 SECTION-NO = 3 % " P ADK A1,4 INCREMENT SECTION-NO % P ECR A2,A1 EXT-NO = 0 % P RB DMT340 % $ PDMT380 ADK A2,1
0x228580…29d200 [0x2a8]: Pad {f00=0x0095, f01=0x018e, f02=»CH WERE UNLOCKED BEFORE % j P* & P LDR A5,A7 & * P LDR A6,A8 SAVE & < P LDK A1,3 LOOP & T PDMTASY EQU * & j P LC A2,TASLFD,A1 FILE CODES & ~ P ANK A2,/FF & P RF(Z) DMTASZ NO CODE & P LDKL A8,TASECB & P SC A2,TASECB+1 & P LDK A
0x228580…29d200 [0x2a9]: Pad {f00=0x0095, f01=0x0190, f02=» & P LDR A8,A6 ' P RF DMT401 =1 END ' P* ' 4 ( P* PUT FDB ADDRESS INTO TTAB/CD:TAB ' > P* ' j PDMT400 EQU * ' t P LDK A7,0 ' PDMT401 EQU * =1 ' , P LD A2,TASTBE TTAB/CDTAB FILE CODE ADDR ' P LDR A7,A7 ' P RF(Z) DMT420 CORRECT
0x228580…29d200 [0x2aa]: Pad {f00=0x0095, f01=0x018e, f02=»DDR ' t " P RF(Z) DMT410 NO MASTER INDEX ( P INH INH ( 2 ( P LD A2,MXIND SIEZE MASTERINDEXINDEX ( D P SUK A2,2 ( p PDMT405 EQU * ( P SUK A2,4 NEXT OFFSET ( P RF(NN) DMT407 OK ( * P RF DMT408 MASTER INDEX MUST BE FOUND ( PDMT407 CW A4,M
0x228580…29d200 [0x2ab]: Pad {f00=0x0095, f01=0x0190, f02=» ( ~ PDMT410 EQU * ) P LD A3,TASFDB ) P RF(Z) DMT430 NO FDB USED ) 2 P LDKL A2,/FFFE ) T " P ANRS A2,A3 CLEAR FDB USE BIT ) j P RF DMT430 ) PDMT420 EQU * ) P ST A12,1,A2 FDB ADDR ) PDMT430 EQU * ) P LDR A8,A8 ) P RF(Z) DMT440 NO
0x228580…29d200 [0x2ac]: Pad {f00=0x0095, f01=0x0190, f02=»UF RELEASE ALL FREE BUFFERS ) & P CF A14,TASCAQ CHECK ASSIGN QUEUE * $ $ P CF A15,QTJOB QUEUE CALLING TASK * N P ENB * v P LKM * P DATA 3 * P EJECT * PDMT500 EQU * * P LD A6,TASFIL * P ABL(Z) DMT700 DATA FILE * P IFF INDXAC=1 *
0x228580…29d200 [0x2ad]: Pad {f00=0x0095, f01=0x018e, f02=» EJECT * P* + " P* THIS IS MASTER INDEX LOOP. + 8 P* CONNECT FDB TO FILE CODE IN DMTASK TTAB AND READ + > < P* MASTER INDEX WITH SEQUENTIAL READ ON THIS FILE CODE + z P* + P LD A7,TASTID DMTASK ID + P INH + " P CF A15,FNDTID TTAB ADDR T
0x228580…29d200 [0x2ae]: Pad {f00=0x0095, f01=0x0190, f02=» P SC A3,TASECB+1 , " P ST A3,TTB:TD+2,A2 TTAB ENTRY , P ST A12,TTB:TD+4,A2 FDB ADR , B P LD A3,ECBBA,A8 , f P SUKL A3,BUFSTA , ~ " P CF A14,DMTRBU RELEASE BUFFER , P* , 0 P* CALC NO OF WORDS NEEDED IN MASTRE INDEX , P* , P LD A6
0x228580…29d200 [0x2af]: Pad {f00=0x0095, f01=0x018e, f02=»RR A2,A1 GET MOST SIGN BIT , P ADK A2,5 - " P SRL A2,1 NO OF WORDS NEEDED - 4 P RF(Z) DMT570 WRONG SIZE - X P INH - x P LD A4,MXIND LENGTH MXIND - P SUK A4,4 MAX A5 VALUE - P LDKL A5,-2 OFFSET - PDMT540 EQU * - P ADK A5,4 GET ENTRY -
0x228580…29d200 [0x2b0]: Pad {f00=0x0095, f01=0x0190, f02=» - | P RB(N) DMT540 ENTRY USED . P SUR A6,A2 NO OF SPARE WORDS . ( & P RB(N) DMT540 LARGER ENTRY NEEDED . L P* . v P* SUFFICIENT SPACE FOUND . P* . P LDKL A1,/8000 USED BIT . & P ORS A1,MXIND+2,A5 MARK ENTRY USED . $ P ST A3,TASMXA MASTER
0x228580…29d200 [0x2b1]: Pad {f00=0x0095, f01=0x0190, f02=»T A1,2,A3 ENTRY LENGTH . P ADK A3,4 SKIP MX HEADRER / P ST A3,ECBBA,A8 BUFFER ADDR / @ P ST A1,ECBRL,A8 REQ LGTH / d . P LDR A1,A5 MXIND ENTRY PAR TO REACTIVATION / P CWR A1,A4 MXIND ENTRY / P RF(NL) DMT590 LAST ENTRY / P LD A3,MXIND+6,A1 /
0x228580…29d200 [0x2b2]: Pad {f00=0x0095, f01=0x0190, f02=»NKL A2,/7FFF REMOVE USE BIT / P SUR A2,A6 0 $ P ORKL A2,/8000 USE BIT 0 6 P ST A2,MXIND+2,A1 0 T . P ADS A6,MXIND+6,A1 MAKE NEXT ENTRY LARGER 0 n $ P LD A7,MXIND,A1 PREVIOUS POINTER 0 P SLL A2,1 NO OF BYTES 0 P ADR A7,A2 0 P ST A7,MXIND+4,A1
0x228580…29d200 [0x2b3]: Pad {f00=0x0095, f01=0x0190, f02=» 0 8 P* OTHER REQ TO THE SAME FILE CODE ARE NOT POSSIBLE 1 < P* BECAUSE AN INDEX FILE MUST ALWAYS BE ASSIGNED COMMON 1 D P* 1 PDMT550 EQU * 1 & P LDK A7,/42 SEQ READ,NOWAIT,NO EA 1 P LKM 1 P DATA -1 1 P DATA DMTAR5 1 P LKM 1 P D
0x228580…29d200 [0x2b4]: Pad {f00=0x0095, f01=0x0190, f02=»NKL A2,/FEFF BIT 7 ONLY RETRIES 1 P RF(Z) DMT560 NO ERROR 2 ( P* 2 F " P* REMOVE THE ONLY CRN BUFFER 2 P P* 2 v P LD A4,TASFDB FDB ADDR 2 P LD A5,FDBCRL,A4 CRN BUF ADR 2 P RF(Z) DMT553 NO CRN 2 P CM FDBCRL,A4 2 P INH 2 P LD A6,CRN
0x228580…29d200 [0x2b5]: Pad {f00=0x0095, f01=0x018e, f02=»EADY ,WHOLIE MXINDEX IS READ 2 P LDK A7,7 3 $ PDMT555 SUR A8,A8 NO BUFFER 3 6 P ABL DMTASX DISC IO ERR 3 X PDMT560 EQU * 3 x P* 3 P* RECORD READ,READ NEXRT 3 P* 3 P LD A2,ECBRL,A8 3 P ADS A2,ECBBA,A8 REC LENGTH 3 P RB DMT550 R
0x228580…29d200 [0x2b6]: Pad {f00=0x0095, f01=0x0190, f02=» 3 P* 4 2 P* MASTER INDE X READUY. RERUN FOR INDEX FILE 4 P* 4 H P LDK A1,1 4 R P ST A1,TASFIL INDEX FILE 4 d " P LD A3,TASSPW TTAB ADR DMTASK 4 P CM TTB:TD+2,A3 DELETE ENTRY 4 P CM TTB:TD+4,A3 4 P LD A3,TASFDB FDB ADDR 4 P LDKL
0x228580…29d200 [0x2b7]: Pad {f00=0x0095, f01=0x0190, f02=» ENTRY POSSIBLE 4 ~ P LDK A1,0 5 2 P* TASCVO REMAINS ZERO FROM MASTER INDEX LOOP 5 * P ABL DMT050 ASSIGN INDEX 5 ` P EJECT 5 PDMT600 EQU * 5 P* 5 P* INDEX FILE ASSIGN 5 P* 5 P LDK A7,10 RET CODE 5 & P LD A10,TASFDD FDB ADDR DA
0x228580…29d200 [0x2b8]: Pad {f00=0x0096, f01=0x0190, f02=» LC A3,DWTST,A10 5 P ANK A3,/40 6 & P RF(NZ) DMT639 OTHER REQUEST BUSY 6 , P LDK A3,8 MAX NO OF INDE*2 6 V PDMT620 EQU * 6 x P SUK A3,2 6 $ P RF(N) DMT640 MORE THAN 4 INDEX 6 P LDR A6,A10 6 P ADR A6,A3 6 P LD A2,FDBAI1,A6 6 P RB(NZ
0x228580…29d200 [0x2b9]: Pad {f00=0x0096, f01=0x0190, f02=» 6 X P* 7 P LDK A5,8 NR OF INDEX *2 7 PDMT625 EQU * 7 2 P SUK A5,2 7 F " P RF(N) DMT635 ALL FDB UPPDATED 7 X P LDR A1,A10 FDB DATA 7 ~ P ADR A1,A5 7 $ P LD A3,FDBAI1,A1 FDB ADDR INDEX 7 P RB(Z) DMT625 NO INDEX FILE 7 P LDKL A1,FDBADF 7
0x228580…29d200 [0x2ba]: Pad {f00=0x0096, f01=0x0190, f02=»25 7 PDMT635 EQU * 8 P LC A1,DWTST,A10 8 0 P SC A1,DWTST,A12 SAME BUSY BITS AS DATA FILE 8 6 P ENB ENB 8 j P LD A1,TASMXA 8 | ( P ST A1,FDBMIA,A12 MASTER INDEX ADDR 8 P RF DMT720 8 ( PDMT639 ADK A7,2 A7=13=OTHER REQ BUSY 8 * PDMT640 ADK A7,
0x228580…29d200 [0x2bb]: Pad {f00=0x0096, f01=0x0190, f02=»IGN DATA FILE 8 & P ST A12,FDBADF,A12 FDB ADDR TO FDB 9 P LD* A1,TASASB ASBLK ADDR 9 @ P ANKL A1,/6000 9 b P SLL A1,1 9 x $ P ORS A1,FDBDBR,A12 DELAY + BASIC 9 PDMT720 EQU * 9 P* 9 ( P* SET FDBMRN TO MAX REC NO IN FILE 9 P* 9 P LDR
0x228580…29d200 [0x2bc]: Pad {f00=0x0096, f01=0x018e, f02=»750 9 P AD A2,-2,A1 : P SUKL A1,EXTELE-2 : P ST A1,FDBCEX,A12 : : P SUK A2,1 : T P ST A2,FDBSNR,A12 : f P LDR A1,A12 : " P CF A14,GTLGRN GET LOG REC NO : P LDK A1,0 : " P LC A1,FDBBLF,A12 BLOCK FACTOR : P SUK A1,1 : P ADR A
0x228580…29d200 [0x2bd]: Pad {f00=0x0096, f01=0x4154, f02=» P ST A3,FDBMRN+1,A12 ; P* ; 4 P* CALCULATE FDBMRO WHICH IS MAX FDBRRO IN FILE ; * P* ; b P LD A6,FDBRLE,A12 REC LENGTH ; l P ADK A6,1 ; P LDK A7,0 ; P LC A7,FDBBLF,A12 BLOCK FACT ; P SUK A7,1 ; P CF A14,MPYMOD A1,A2=A6*A7 ;
0x228580…29d200 [0x2be]: Pad {f00=0x0096, f01=0x2008, f02=» < EXIT P* P ENB P LKM * P DATA 3 6 P END F@ RA2,/FFFE P " P ANRS A2,A3 CLEAR FDB USE BIT f P RF DMT430 PDMT420 EQU * P ST A12,CDTAB+2,A2 PDMT430 EQU * P LD A3,ECBBA,A8 P SUKL A3,BUFSTA
0x228580…29d200 [0x2bf]: Pad {f00=0x0096, f01=0x0190, f02=»SET FDB FREE < PDMTA40 EQU * = * P CF A14,CLRBUF REMOVE ALL FREE BUFFERS = ( P LDR A1,A7 NEW FDB ADDR = V P ABL(Z) DMTERX NO MORE FDBS = v P IFT INDXAC=1 = P ENB ENB = P* = 4 P* FIND WHICH DMTASK IS NEXT AND ACTIVATE THAT = P* =
0x228580…29d200 [0x2c0]: Pad {f00=0x0013, f01=0x0190, f02=»TCDA2 SAVE STATUS - P LDR* A5,A15 RESTORE A5 . P IFT CPU852=1 . : & P CF A15,SAVE8 SAVE A1-A8 ON STACK . P P XIF . z P* . P IFT CPU852=0 . " P MSR 8,A15 SAVE A1-A8 ON STACK . P XIF . P* . P LDKL A1,0 . PTCDA1 EQU *-2 . P
0x228580…29d200 [0x2c1]: Pad {f00=0x0013, f01=0x0008, f02=» h (
0x228580…29d200 [0x2c2]: Pad {f00=0x0013, f01=0x0190, f02=» 0 P IDENT DMBUF REL 9.2 79-11-16 870105040920 P 8 P* @ 8 P**************************************************** J P* $ P* PHILIPS TERMINAL SYSTEM PTS P* . P* DMBUF = DATA MANAGEMENT BUFFER AREAS P* P* P*
0x228580…29d200 [0x2c3]: Pad {f00=0x0013, f01=0x018e, f02=»FOR DMTASK v P* . P* A ROUTINE DMTGBU TO GET A DISC BUFFER P* N L P* BY MEANS OF CONDITIONAL ASSEMBLY QNBUF NUMBER OF BUFFERS WILL BE ALL X P* P* MAX VALUE OF QNBUF IS 16 P* > P* AT LEAST TWO BUFFERS PER DISC DRIVE MU
0x228580…29d200 [0x2c4]: Pad {f00=0x0013, f01=0x018e, f02=» ( P ENTRY CURBUF CURRENT BUFFER POINTER P ENTRY BUFLNK BUFFER LINK 4 P ENTRY BUFDMI DMTASK IDENT V P ENTRY BUFFC FILE CODE x P ENTRY BUFSNR SECTOR NO P ENTRY BUFOR ORDER * P ENTRY BUFSTA DATA AREA START ADDRESS P ENTRY DMTGB
0x228580…29d200 [0x2c5]: Pad {f00=0x0013, f01=0x0190, f02=» P EJECT $ PX:A EQU 8 NUMBER OF DISC BUFFERS PQNBUF EQU 00004 : P* R P* PCURBUF DATA BUF1 f PNEWBUF DATA 0 ~ P* P* PBUFLNK EQU 0 2 PBUF1 DATA BUF2 BUFFER LINK STATUS IN BIT 15 PBUFDMI EQU *-BUF1 DMI
0x228580…29d200 [0x2c6]: Pad {f00=0x0013, f01=0x0190, f02=» LRU-WORD " P DATA 0 BUFFER STATUS,DM ORDER ( PBUFSTA EQU *-BUF1 DATA BUFFER START 8 P RES 205 d P* t P* ~ P IFT QNBUF=1 PBUF2 EQU BUF1 P XIF P* P* P IFF QNBUF=1 PBUF2 DATA BUF3 P DATA 0,0,0
0x228580…29d200 [0x2c7]: Pad {f00=0x0013, f01=0x018e, f02=»NBUF=1 P IFF QNBUF=2 PBUF3 DATA BUF4 " P DATA 0,0,0 8 P RES 205 L P XIF P* h P* r P IFT QNBUF=3 | PBUF4 EQU BUF1 P XIF P* P* P IFF QNBUF=1 P IFF QNBUF=2 P IFF QNBUF=3 PBUF4 DAT
0x228580…29d200 [0x2c8]: Pad {f00=0x002d, f01=0x0190, f02=» P* P* P IFF QNBUF=1 P IFF QNBUF=2 , P IFF QNBUF=3 @ P IFF QNBUF=4 T PBUF5 DATA BUF6 h P DATA 0,0,0 ~ P RES 205 P XIF P* P* P IFT QNBUF=5 PBUF6 EQU BUF1 P XIF P* P*
0x228580…29d200 [0x2c9]: Pad {f00=0x002d, f01=0x018e, f02=»0 P RES 205 P XIF P* & P* 0 P IFT QNBUF=6 : PBUF7 EQU BUF1 N P XIF d P* p P* z P IFF QNBUF=1 P IFF QNBUF=2 P IFF QNBUF=3 P IFF QNBUF=4 P IFF QNBUF=5 P IFF QNBUF=6 PBUF7 DATA BUF8
0x228580…29d200 [0x2ca]: Pad {f00=0x002d, f01=0x018e, f02=» P* P IFF QNBUF=1 P IFF QNBUF=2 & P IFF QNBUF=3 : P IFF QNBUF=4 N P IFF QNBUF=5 b P IFF QNBUF=6 v P IFF QNBUF=7 PBUF8 DATA BUF9 P DATA 0,0,0 P RES 205 P XIF P* P* P IFT QNBUF=8
0x228580…29d200 [0x2cb]: Pad {f00=0x002d, f01=0x0190, f02=» P IFF QNBUF=5 P IFF QNBUF=6 P IFF QNBUF=7 , P IFF QNBUF=8 @ PBUF9 DATA BUF10 T P DATA 0,0,0 l P RES 205 P XIF P* P* P IFT QNBUF=9 PBUF10 EQU BUF1 P XIF P* P* P IFF QNBUF=1
0x228580…29d200 [0x2cc]: Pad {f00=0x002d, f01=0x0190, f02=»=8 P IFF QNBUF=9 PBUF10 DATA BUF11 P DATA 0,0,0 6 P RES 205 J P XIF Z P IFT QNBUF=10 f PBUF11 EQU BUF1 | P XIF P* P* P IFF QNBUF=1 P IFF QNBUF=2 P IFF QNBUF=3 P IFF QNBUF=4 P IFF QNB
0x228580…29d200 [0x2cd]: Pad {f00=0x002d, f01=0x0190, f02=» P DATA 0,0,0 P RES 205 P XIF ( P IFT QNBUF=11 4 PBUF12 EQU BUF1 J P XIF ` P* l P* v P IFF QNBUF=1 P IFF QNBUF=2 P IFF QNBUF=3 P IFF QNBUF=4 P IFF QNBUF=5 P IFF QNBUF=6 P IFF QNBUF=7
0x228580…29d200 [0x2ce]: Pad {f00=0x002d, f01=0x018e, f02=» 205 P XIF P IFT QNBUF=12 PBUF13 EQU BUF1 . P XIF D P* P P* Z P IFF QNBUF=1 d P IFF QNBUF=2 x P IFF QNBUF=3 P IFF QNBUF=4 P IFF QNBUF=5 P IFF QNBUF=6 P IFF QNBUF=7 P IFF QNBUF=8 P IFF Q
0x228580…29d200 [0x2cf]: Pad {f00=0x002d, f01=0x0190, f02=» P XIF P IFT QNBUF=13 PBUF14 EQU BUF1 * P XIF @ P* L P* V P IFF QNBUF=1 ` P IFF QNBUF=2 t P IFF QNBUF=3 P IFF QNBUF=4 P IFF QNBUF=5 P IFF QNBUF=6 P IFF QNBUF=7 P IFF QNBUF=8 P IFF QNBUF
0x228580…29d200 [0x2d0]: Pad {f00=0x002e, f01=0x018e, f02=» P RES 205 P XIF P IFT QNBUF=14 $ PBUF15 EQU BUF1 : P XIF P P* P* f P IFF QNBUF=1 p P IFF QNBUF=2 P IFF QNBUF=3 P IFF QNBUF=4 P IFF QNBUF=5 P IFF QNBUF=6 P IFF QNBUF=7 P IFF QNBUF=8
0x228580…29d200 [0x2d1]: Pad {f00=0x002e, f01=0x0190, f02=» PBUF15 DATA BUF16 P DATA 0,0,0 P RES 205 0 P XIF @ P IFT QNBUF=15 L PBUF16 EQU BUF1 b P XIF x P* P* P IFF QNBUF=1 P IFF QNBUF=2 P IFF QNBUF=3 P IFF QNBUF=4 P IFF QNBUF=5 P IFF QNBUF=6
0x228580…29d200 [0x2d2]: Pad {f00=0x002e, f01=0x0190, f02=»FF QNBUF=13 P IFF QNBUF=14 P IFF QNBUF=15 * PBUF16 DATA BUF1 @ P DATA 0,0,0 X P RES 205 l P XIF | P EJECT P* P************** P* DMTGBU * P************** P* * P* ENTRY DMTGBU GET A DIS
0x228580…29d200 [0x2d3]: Pad {f00=0x002e, f01=0x0190, f02=»ER t P* $ P* OUTPUT A3 = BUFFER ADDRESS J P* SKIP RETURN (+2) IF SECTOR MUST BE READ INTO BUFFER AT A3 < , P* A5 AND A7 WILL BE DESTROYED P* 8 P* CURBUF, BUFDMI, -FC AND -SNR WILL BE SET < P*
0x228580…29d200 [0x2d4]: Pad {f00=0x002e, f01=0x0190, f02=»* SEARCHED FOR IS ALREADY PRESENT IN ANY FREE BUFFER. F P* IF THIS SECTOR IS NOT FOUND A FREE SECTOR MUS BE FOUND AND IN @ P* P* P* PDMTGBU EQU * P INH INH P* 4 P* CHECK IF THIS SECTOR IS FOUND IN ANY BUFFER
0x228580…29d200 [0x2d5]: Pad {f00=0x002e, f01=0x0190, f02=») DMT020 WRONG VOLUME P CW A2,BUFSNR,A3 P RF(E) DMT050 SAME SECTOR NO 6 PDMT020 EQU * Z P LDK A7,/01 n & P AN A7,BUFLNK,A3 STATUS IN BIT 15 P RF(NZ) DMT041 USED P IM BUFOR,A3 MAKE OLDER P RF(P) DMT030 P LDK A7,/FF
0x228580…29d200 [0x2d6]: Pad {f00=0x002e, f01=0x0190, f02=»T A3,NEWBUF PDMT041 EQU * P CW A3,CURBUF ( * P RB(NE) DMT010 MORE BUFFERS TO SERARCH > P LDR A5,A5 l P RF(NZ) DMT043 BUFFER FOUND ~ P LDK A1,3 LAMP 10 AND 11 P CF A15,HALT NO MORE BUFFERS PDMT043 LD A3,NEWBUF P* *
0x228580…29d200 [0x2d7]: Pad {f00=0x002e, f01=0x0190, f02=» t " P ST A2,BUFSNR,A3 SECTOR NUMBER PDMT050 EQU * . " P CM BUFOR,A3 RESET OLD-COUNTER B P ST A3,CURBUF h P LDK A7,/01 ~ ( P ORRS A7,A3 SET STATUS USED BIT 15 P ENB ENB P RTN A14 P EJECT P* P**************
0x228580…29d200 [0x2d8]: Pad {f00=0x0031, f01=0x0190, f02=» BUFFER ADDRESS P* A2 IS DESTROYED P* < P* F PDMTRBU EQU * P P LDKL A2,/FFFE d P ANRS A2,A3 SET OFF BIT 15 z P RTN A14 P* P* ( PCLRBUF EQU * CLEAR ALL FREE BUFFERS @ P******************************
0x228580…29d200 [0x2d9]: Pad {f00=0x0031, f01=0x40b4, f02=» P AN A2,BUFLNK,A3 P RF(NZ) DMT750 USED P CM BUFDMI,A3 REMOVE 8 PDMT750 CW A3,CURBUF T P RB(NE) DMT700 MORE BUFFERS p P RTN A14 P END @ P* ( PCLRBUF EQU * CLEAR ALL FREE BUFFERS @ P******************************
0x228580…29d200 [0x2da]: Pad {f00=0x0031, f01=0x2008, f02=» P* DMTRBU * P************** " P* 8 . P* ENTRY DMTRBU RELEASE A DISC BUFFER B P* t $ P* INPUT A3 = BUFFER ADDRESS ~ P* A2 IS DESTROYED P* P* PDMTRBU EQU * P LDKL A2,/FFFE P A
0x228580…29d200 [0x2db]: Pad {f00=0x0031, f01=0x018e, f02=»U * CLOSE A FILE P LDK A4,0 PTIOC10 EQU * * $ P ST A4,FDBRRO,A6 MARK ORDER TYPE > P LDK A2,0 f , P ST A2,FDBSNR,A6 SECTOR #0 VOLUME LABLE x P* ( P* LET FDBCEX POINT TO FIRST EXTENT P* P LDR A4,A6 P ADK A4,FDBEXT
0x228580…29d200 [0x2dc]: Pad {f00=0x0031, f01=0x0190, f02=» P LDR A1,A6 FDB ADDR 0 P LDKL A2,/C000 REMOVE BUFFERS FOR THIS TASK P CF A14,EARELB T PREL090 EQU * j P LDK A1,0 CORRECT RETURN ~ P ABL TIODME P EJECT ( PSETLRN EQU * SET LAST RECORD NUMBER P LC A1,ECBCW+3,A8 P SC
0x228580…29d200 [0x2dd]: Pad {f00=0x0031, f01=0x0190, f02=»DATA REC p P RF GET010 . PGETCUX LDK A7,CRNCIF+1 GET CURR INDEX REC " PGET010 LDR A1,A6 FDB ADDR T " P CF A14,CRNGET GET CRN BUFFER v P ADR A7,A2 ADDR CURR REC NO P LDK A2,0 P LC A3,-1,A7 FILE CODE P CC A3,ECBFC,A8 P R
0x228580…29d200 [0x2de]: Pad {f00=0x0031, f01=0x0190, f02=»REC NO ~ P LD A2,1,A7 PGET030 EQU * " P ST A2,ECBCW,A8 6 P RB REL090 N P EJECT ` " PSEQREAD EQU * SEQUENTIAL READ n P* $ P* FIND CRN+1 AND TEST IF > LRN P* P LDR A1,A6 FDB ADDR " P CF A14,CRNGET GET CRN-BUFFER
0x228580…29d200 [0x2df]: Pad {f00=0x0031, f01=0x018e, f02=»ERFLOW P RF SEQR20 PSEQR10 EQU * " P ANKL A2,/7FFF REMOVE OVERFLOW 4 P ADK A1,1 ADD CARRY Z PSEQR20 EQU * v P SC A1,ECBCW+3,A8 REC NO P ST A2,ECBCW,A8 P* $ P* CONTINUE AS FOR RANDOM READ P* P EJECT
0x228580…29d200 [0x2e0]: Pad {f00=0x0086, f01=0x0190, f02=» P EXTRN ECBRL P EXTRN ECBRC P EXTRN ECBCW , P* @ P EXTRN TIODM J P EXTRN DMTGBU ^ P EXTRN DMTRBU t P EXTRN CLRBUF P EXTRN BUFSTA P EXTRN BUFSNR P EXTRN BUFDMI P* P EXTRN QFDBFL P EXTRN F
0x228580…29d200 [0x2e1]: Pad {f00=0x0086, f01=0x0004, f02=» X
0x228580…29d200 [0x2e2]: Pad {f00=0x0086, f01=0x0190, f02=» 0 P IDENT DMFDB REL 9.2 79-11-16 870105040920 P 8 P @ P* H P* R 8 P**************************************************** P* $ P* PHILIPS TERMINAL SYSTEM PTS P* , P* DMFDB = FILE DESCRIPTOR BLOCKS FDB P*
0x228580…29d200 [0x2e3]: Pad {f00=0x0086, f01=0x0190, f02=»TE FDB AREA H P* BY MEANS OF CONDITIONAL ASSEMBLY QFDBAR WORDS WILL BE ALLOCATED P* ` P ENTRY FDBSTA j P ENTRY FDBEND P ENTRY QFDBFL P ENTRY CRNQUE,CRBUFL P ENTRY CRNEND P ENTRY MXIND P EJECT P* 6 P
0x228580…29d200 [0x2e4]: Pad {f00=0x0086, f01=0x0190, f02=»REA r " PCRBUFL EQU 12 SIZE CRN BUFFER P* 2 < P* CRNBAR IS THE SIZE OF THE CRN BUFFER ARERA IN WORDS < 4 P* WHERE CRBUFL BYTES ARE USED FOR EACH BUFFER | P* PX:B EQU 50 " PCRNBAR EQU 00360 CURRENCY AREA P* P* P
0x228580…29d200 [0x2e5]: Pad {f00=0x0086, f01=0x0190, f02=» P* PQFDBAR EQU 00684 P* & PX:D EQU 96 0 ( PQFDBFL EQU 00114 FDB FIX PART LENGTH B P* n P EJECT x P* PFDBSTA EQU * P RES QFDBAR PFDBEND EQU * PCRNQUE DATA 0 CRN LINK ROOT P RES CRNBAR PCRNEND
0x228580…29d200 [0x2e6]: Pad {f00=0x0086, f01=0x410a, f02=» IFF MXSIZ=0 * P DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 * P DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 B P XIF p PMXINDE EQU * END INDEX INDEX | 2 P DATA 0,0 SIGNIFICANT ZEROES AFTER INDEXINDEX PMXAR EQU * P RES MXSIZ P END @
0x228580…29d200 [0x2e7]: Pad {f00=0x0086, f01=0x2008, f02=» PFDBSTA EQU * P RES QFDBAR PFDBEND EQU * 2 P END F@ R OF CONDITIONAL ASSEMBLY QFDBAR WORDS WILL BE ALLOCATED J P* P ENTRY FDBLEN P ENTRY FDBSTA P ENTRY FDBEND P ENTRY QFDBFL P* P* ,
0x228580…29d200 [0x2e8]: Pad {f00=0x0092, f01=0x0190, f02=»MAX 4 WORDS | PDMT150 EQU * P LDR* A10,A4 ( P CWR* A10,A7 < P ABL(NE) DMT250 NO MATCH P P SUK A2,1 p . P RF(NP) DMT160 ALL 4 FILE NAME WORDS MATCH P ADK A4,2 P ADK A7,2 P RB DMT150 CHECK NEXT WORD P* ( P* ON
0x228580…29d200 [0x2e9]: Pad {f00=0x0092, f01=0x0190, f02=» DMT165 YES P CCK A2,'LL' LIBRARY FILE ? P ABL(NZ) DMT250 NO 8 P LDK A2,0 FILE EXTENT NUMBER R P RF DMT167 v . PDMT165 LD A2,VTFSNO,A3 FILE SECTION NUMBER P EJECT PDMT167 EQU * P* . P* GET INFO FROM VTOC AND SAVE IN T
0x228580…29d200 [0x2ea]: Pad {f00=0x0092, f01=0x0190, f02=» P ST A1,TASCXO P RF(NN) DMT170 <= 4 EXTENTS P LDK A7,9 B * P ABL DMTASX MORE THAN 4 EXTENTS EXIST T PDMT170 EQU * " P ECR A2,A2 TO LEFT HALF OF A2 4 P LC A2,VTFXNO+1,A4 EXT NO INTO RIGHT HALF OF A2 P ST A2,TASSEX,A1
0x228580…29d200 [0x2eb]: Pad {f00=0x0092, f01=0x0190, f02=» LD A2,VTFXBA,A4 EXTENT BASE P ST A2,TASXLB+2,A1 $ P LD A2,TASSEX,A1 > $ P RF(NZ) DMT250 NOT FIRST EXTENT V P EJECT ~ P* FIRST FILE EXTENT < P* CHECK IF AN FDB DESCRIBING THE FILE ALREADY EXISTS. P* P LD A12,TASFDB * P
0x228580…29d200 [0x2ec]: Pad {f00=0x0092, f01=0x0190, f02=»FDBSTA PDMT200 EQU * P LDR* A5,A12 " P ANK A5,/01 6 P RF(Z) DMT210 FREE J P LD A2,FDBEXT,A12 d P CW A2,TASVOL,A6 ~ " P RF(NE) DMT210 NOT SAME VOLUME P LD A2,FDBVTO,A12 P CW A2,TASVRN $ P RF(NE) DMT210 NOT SAME VTOC R
0x228580…29d200 [0x2ed]: Pad {f00=0x0092, f01=0x0190, f02=»OUND j PDMT205 EQU * P LDK A7,5 FILE CODE USED P ABL DMTASX @ P* T $ PDMT210 LDR* A12,A12 GET NEXT FDB ^ P ANKL A12,/FFFE ( P RB(NE) DMT200 MORE FDB:S TO SEARCH P* 0 P* NO MATCHING FDB EXIST FIND A FREE FDB P*
0x228580…29d200 [0x2ee]: Pad {f00=0x0092, f01=0x0190, f02=» P ANKL A12,/FFFE & P RB(NE) DMT220 MORE FDB:S TO CHECK P LDK A7,3 F P ABL DMTASX NO FDB AVAILABLE X ( P* INITIALIZE FDB ZERO FROM FDB+2 | P* PDMT230 EQU * P ST A12,TASFDB P LDR A10,A12 P ADKL A10,QFDBFL P L
0x228580…29d200 [0x2ef]: Pad {f00=0x0092, f01=0x0190, f02=»DMT233 PDMT237 EQU * P LDKL A2,/8000 " P* DEV NOT BUSY 8 P ST A2,DWTST,A12 P P LDKL A2,TIODM h P ST A2,DWTADR,A12 ~ P LDKL A2,SECTLE P LDR A1,A12 P ADKL A1,FDBECB P ST A2,ECBRL,A1 P LDK A2,/01 P O
0x228580…29d200 [0x2f0]: Pad {f00=0x0086, f01=0x0190, f02=»***************** u r P v & P CWK A2,X'20' ATTRIBUTE CHARACTER v " P RF(L) TRT101 YES!!! v L P XIF v h P IFT DMRK=1 v t P CWK A2,/7E LINE FEED ? v " P RF(NE) TRT102 NO,GO TO TRT102 v P LDK A2,/0A v PTRT102 EQU * v P CWK A2,/7D END OF M
0x228580…29d200 [0x2f1]: Pad {f00=0x0086, f01=0x0002, f02=»
0x228580…29d200 [0x2f2]: Pad {f00=0x0086, f01=0x0190, f02=» 0 P IDENT DFTAB REL 9.2 79-11-16 870105040920 P 8 P* @ 8 P**************************************************** J P* $ P* PHILIPS TERMINAL SYSTEM PTS P* & P* DFTAB = DISC FILE CODE TABLE P* P* P* LEVEL
0x228580…29d200 [0x2f3]: Pad {f00=0x0086, f01=0x40c8, f02=»** ^ P* P* DISC FILE CODE TABLE P* 4 P ENTRY DFTAB > P ENTRY DFTABE R P* h P* r PDFTAB EQU * | P DATA /F0F1 PDFTABE EQU * P END @ TAB = DISC FILE CODE TABLE P* P* P* LEVEL
0x228580…29d200 [0x2f4]: Pad {f00=0x0086, f01=0x2008, f02=» NT DFTAB P* P* DISC FILE CODE TABLE " P* B P ENTRY DFTAB L P ENTRY DFTABE ` P* v P* PDFTAB EQU * P DATA /F0F1 PDFTABE EQU * P END @ END P ENTRY QFDBFL P* P* ,
0x228580…29d200 [0x2f5]: Pad {f00=0x0086, f01=0x0190, f02=»-LENGTH, BLOCKING-FACTOR AND VTOC-REC-NO r P* ARE SAVED TOO. 0 L P* WHEN THE FIRST EXTENT HAS BEEN FOUND EXISTING FDB:S CAN BE SEARCHED J L P* TO CHECK IF THE FILE TO BE ASSIGNED HAS PREVIOUSLY BEEN ASSIGNED TO L P* ANOTHER FILE CODE. IF SO THE
0x228580…29d200 [0x2f6]: Pad {f00=0x0086, f01=0x0190, f02=»EN A NEW FDB MUST BE INITIALIZED AND THE REST OF THE 4 P* VOLUMES ARE CHECKED TO FIND ALL FILE EXTENTS < P* t 2 P* FOR INDEX ASIGN THE PRODGRAM IS RUN TWICE. ~ 4 P* DURING THE FIRST LOOP A MASTERINDEX IS READ. . P* FC 13 IN TTAB FOR DMTASK I
0x228580…29d200 [0x2f7]: Pad {f00=0x0086, f01=0x018e, f02=»MTASS P ENTRY VTLRN P ENTRY VLVBA " P ENTRY VLVRL 6 P ENTRY SECTLE J P EJECT ` P* n P***************** x P* EXTERNALS * P***************** P* P EXTRN QTJOB P EXTRN FNDTID,TTB:TD P* P
0x228580…29d200 [0x2f8]: Pad {f00=0x0098, f01=0x0190, f02=» * | : P* EXIT: * * : P* * h : P* SUBROUTINES: CASSIN,SOPIN,CHCRIO,LODCOM * : P* LODSEG,REBUF,MOVBUF,R
0x228580…29d200 [0x2f9]: Pad {f00=0x0098, f01=0x000c, f02=» ( 0 8 @
0x228580…29d200 [0x2fa]: Pad {f00=0x0098, f01=0x0190, f02=» 2 P IDENT DMSUBX REL 9.2 79-11-16 870105040920 P : P* B 8 P**************************************************** L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 2 P* DMSUBX = DM-ROUTINES FOR INDEXED REQUESTS P* P*
0x228580…29d200 [0x2fb]: Pad {f00=0x0098, f01=0x0190, f02=»ROM :***************** r P* P* DMTASK ( P* : P*************** D P* ENTRIES * P*************** t P* P ENTRY FNDKMX,CHKKEY P ENTRY RDNXTR P ENTRY FNDKEY P ENTRY CRNUPD P* P************
0x228580…29d200 [0x2fc]: Pad {f00=0x0098, f01=0x0190, f02=»DBRLE,FDBSNR,ECBCW l . P EXTRN FDBRRO,FDBCEX,FDBBLF,EXTBAS,BUFSNR . P EXTRN FDBLRN,FDBMRO,FDBCRL,FDBADF,CRNCIF L 4 P EXTRN DMTIOT,GTLGRN,GTBKBU,ADDMOD,CALSNO,DMTRBU ~ P EXTRN DMTIOZ P EJECT 8 P****DESCRIPTION*********************************
0x228580…29d200 [0x2fd]: Pad {f00=0x0098, f01=0x0190, f02=»1 ALG. U. ` 4 P* THE SEARCH KEY MAY BE TERMINATED WITH A /EE. 0 P* THE FIRST TWO WORDS IN MASTER INDEX IS : J P* - NO OF ENTRIES N ~ $ P* - NO OF CHARACTERS PER ENTRY P* 8 P****ENTRY PARAMETERS******************************** P
0x228580…29d200 [0x2fe]: Pad {f00=0x0098, f01=0x0190, f02=»CF A14,FNDKMX P* 8 P****EXIT PARAMETERS********************************* " P* ^ 0 P* A1,A2 = LODGICAL RECORD NO IN INDEX FILE h P* A8,A11= UNCHANGED P* 8 P****USED REGISTERS********************************** P* P
0x228580…29d200 [0x2ff]: Pad {f00=0x0098, f01=0x0190, f02=»9,A2 P ANKL A9,/1 GET BIT 15 P SRA A2,1 * P LDR A10,A2 M=N/2 FLOOR < P ADR A9,A2 I=N/2 CEILING P ADK A5,2 TABLE BASE - 2 | PFND020 EQU * P LDK A2,0 P LDR* A7,A5 ENTRY LENGTH P LDR A6,A9 I P SUK A6,1 $ P R
0x228580…29d200 [0x300]: Pad {f00=0x0099, f01=0x0190, f02=»25 EQU * " P ADR A2,A5 ADD MI BASE ADR - 2 P ADK A2,2 ENTRY KEY ADR 6 P LDR A1,A2 SAVE ENTRY ADR V P LDR A3,A8 SEARCH KEY ADR x P LDR A6,A11 MAX KEY LENGTH P LDK A7,0 CHAR ADR P CF A14,CHKKEY COMPARE KEYS P LDR A7,A10 M
0x228580…29d200 [0x301]: Pad {f00=0x0099, f01=0x0190, f02=» v . P RF(NG) FND040 SEARCHED KEY LESS OR EQUAL P* : P* SEARCHED KEY GREATER D P* d P LDR A10,A10 M n P RF(Z) FND050 SEARCH READY P ADR A9,A6 I=I+(M/2 CEIL) PFND030 EQU * P LDR A10,A7 M=M/2 FLOOR P RB FND020
0x228580…29d200 [0x302]: Pad {f00=0x0099, f01=0x0190, f02=»D045 EQU * NO MASTER INDEX P LDK A1,0 " P LDK A2,1 REC NR 1 4 P RF FND070 N PFND050 EQU * ` P ADR* A1,A5 ARDR NEXT ENTRY t PFND060 EQU * P LDR A3,A1 ENTRY ADR P SUK A3,3 P ADR* A3,A5 ADR REC NO P* P* MOVE
0x228580…29d200 [0x303]: Pad {f00=0x0099, f01=0x0190, f02=»2,A2 P LCR A2,A3 PFND070 EQU * P RTN A14 2 P EJECT B 8 P****DESCRIPTION************************************* P P* D P* CHKKEY COMPARE TWO CHARACTER STRINGS. THE SEARCH KEY MAY BE P* TERMINATED WITH A /EE. P* 8 P
0x228580…29d200 [0x304]: Pad {f00=0x0099, f01=0x0190, f02=» * P* A6 = MAX NO OF CAHARACTERS IN KEY 2 P* A7 = REL NO OF FIRST CHAR TO CHECK IN KEY 2 P* h P* CF A14,CHKKEY r P* 8 P****EXIT PARAMETERS********************************* P* : P* A3 = 0 WHEN SEARCED KEY IS CONTAINED IN
0x228580…29d200 [0x305]: Pad {f00=0x0099, f01=0x0190, f02=»CHAR TO CHECK = NO OF SAME CHARACTERS IN WHOLE KEY x " P* A6 = MAX NO OF CHAR IN KEY : P* ` 8 P****USED REGISTERS********************************** j P* P* A2-A4,A6-A7 < P******************************************************** P E
0x228580…29d200 [0x306]: Pad {f00=0x0099, f01=0x0190, f02=»CR A4,A3 SEARCED KEY CHAR P CCK A4,/EE00 " " P RF(E) CHK060 END OF KEY CHAR 8 P CCR A4,A2 SC=EC? ^ P RF(G) CHK100 SC GT TH EC x " P RF(L) CHK120 SC LESS THAN EC P ADK A7,1 NO OF SAME CHAR P CWR A7,A6 NO OF CHAR $ P RF(NL) CH
0x228580…29d200 [0x307]: Pad {f00=0x0099, f01=0x0190, f02=» LDK A3,0 FOUND P RF CHK140 PCHK120 EQU * * $ P LDKL A3,-1 SEARCHED KEY SMALLER > P RF CHK140 f PCHK100 EQU * x $ P LDK A3,1 SEARCHED KEY SGREATER PCHK140 EQU * P RTN A14 P EJECT 8 P****DESCRIPTION*********************
0x228580…29d200 [0x308]: Pad {f00=0x0099, f01=0x0190, f02=»WHEN NO RECORD IS READ BEFORE, THE FIRST RECORD IN SPECIFIED & P* SECTOR WILL BE MADE AVAILABLE D P* n 8 P****ENTRY PARAMETERS******************************** x P* : P* A1 = FDB ADDRESS FOR CURRENT RECORD (BEFORE NEXT) P* FDBCE
0x228580…29d200 [0x309]: Pad {f00=0x0099, f01=0x0190, f02=»NTED ` : P* A3 = ADDRESS OF BLOCK BUFFER FROM PREVIOUS CALL IN > P* SAME DM-REQUEST. =0 WHEN NO BYUFFER IS ALLOCATED J P* A8 = ECB ADDRESS P* 8 P****EXIT PARAMETERS********************************* P* 2 P* RETURN AT ADDR
0x228580…29d200 [0x30a]: Pad {f00=0x0099, f01=0x018e, f02=»DE FOM PHYS I/O) WHEN NO BUFFER IS ALLOCATED r $ P* A2 = FDBRRO = RECORD OFFSET 4 P* A3 = BUFFER ADDRESS * P* = 0 WHEN NO BUFFER IS ALLOCATED | P* A8 = ECB ADDRESS P* 8 P****USED REGISTERS**********************************
0x228580…29d200 [0x30b]: Pad {f00=0x0099, f01=0x0190, f02=» X P EJECT PRDNXTR EQU * P LDR A10,A3 SAVE BUFFER ADDR * P RF(NZ) RDN200 BUFFER EXIST N P STR A7,A14 r P SUKL A14,4 P ST A6,2,A14 P* P* GET A BUFFER P* PRDN040 EQU * & P CF A14,GTBKBU GET BLOCKBUFF
0x228580…29d200 [0x30c]: Pad {f00=0x0099, f01=0x0190, f02=»DR A10,A3 BUFFER ADDR $ P LDK A7,/91 PHYS READ WITH WAIT P LKM F P DATA 1 R & P CF A14,DMTIOZ CHECK RETURN CODES b P LDR A1,A1 P RF(NZ) RDN900 ERROR P LDR A1,A6 FDB ADDR PRDN080 EQU * P LDR A6,A1 FDB ADDR P LDK
0x228580…29d200 [0x30d]: Pad {f00=0x0099, f01=0x0190, f02=»RDN200 EQU * $ P LD A2,FDBRRO,A1 REC ORD OFFSET P RF(NN) RDN220 NOT FIRST REC < P STR A7,A14 ` P SUKL A14,4 t P ST A6,2,A14 P RB RDN080 FIRST REC WANTED P* : P* CHECK IF THIS OFFSET POINTS TO LAST REC IN BUFFER P*
0x228580…29d200 [0x30e]: Pad {f00=0x0099, f01=0x0190, f02=»EC IN CURRENT BLOCKBUFFER P* " $ P AD A2,FDBRLE,A1 RECOR D LENGTH , P ADK A2,1 STATUS CHAR T P ST A2,FDBRRO,A1 NEW OFFSET r P RF RDN950 RETURN P* 4 P* CHECK IF THIS RECORD ALSO IS LAST IN EXTENT P* PRDN300 EQU *
0x228580…29d200 [0x30f]: Pad {f00=0x0099, f01=0x0190, f02=» AD A5,EXTLEN,A3 EXTENT LENGTH P SUK A5,1 & $ P CW A5,FDBSNR,A1 SECT NO CURRENT 8 , P RF(NG) RDN400 IT WAS LAST REC IN EXTENT ` P* P* NEW SECTOR P* P IM FDBSNR,A1 SECT NO P LDR A6,A1 FDB ADDR P RF RDN500 P*
0x228580…29d200 [0x310]: Pad {f00=0x0099, f01=0x0190, f02=» NO v P LDR A1,A2 P LDR A2,A3 P LDK A6,0 0 P LDK A7,1 B P CF A14,ADDMOD NEXT REC NO T P LDR A6,A5 RESTORE FDB ADDR v * P CF A14,CALSNO GET NEXT REC ADDR PHYS P LDR A8,A13 $ P LDR A1,A1 CHECK EN D OF MEDIUM P RF(Z)
0x228580…29d200 [0x311]: Pad {f00=0x0099, f01=0x0190, f02=» x " P CF A14,DMTRBU RELEASE BUFFER P LDR A1,A6 FDB ADDR . P RB RDN040 NEXT SECTOR J P* h P* EXIT r P* PRDN900 EQU * P LDR A5,A1 RET CODE P LDR A1,A6 FDB ADDR P LDR A3,A10 BUFFER ADDR P RF(Z) RDN960 NO B
0x228580…29d200 [0x312]: Pad {f00=0x0099, f01=0x0190, f02=»ER ADDR PRDN940 EQU * P LD A6,2,A14 $ P ADKL A14,4 8 P LDR* A7,A14 L PRDN950 EQU * ` P RTN A14 t P EJECT 8 P****DESCRIPTION************************************* P* > P* FNDKEY WILL READ THE FIRST USED INDEX RECORD W
0x228580…29d200 [0x313]: Pad {f00=0x0099, f01=0x0190, f02=»ENTRY PARAMETERS******************************** P* 8 P* A1 = FDB ADDRESS B P* A8 = SEARCH KEY ADDR ^ & P* A11 = NO OF CHARACTERS IN KEY ~ " P* A13= PHYSICAL ECB ADDRESS P* 8 P****EXIT PARAMETERS*******************************
0x228580…29d200 [0x314]: Pad {f00=0x0099, f01=0x0190, f02=» 2 P* = /4000 WHEN NEXT HIGHER KEY IS FOUND . P* = RETURN CODE WHEN KEY IS NOT FOUND : 4 P* BIT 1 CAN NEVBER BE SET BY DISC DRIVER l P* A3 = BUFFER ADDRESS & P* = 0 WHEN NO RECORD IS FOUND " P* A7 = NO OF SAME CHARACTE
0x228580…29d200 [0x315]: Pad {f00=0x0099, f01=0x0190, f02=»**** ` P* , P* A1 - A11,A13 + 4 WORDS ON A14 STACK P* F : P****************************************************** P P EJECT PFNDKEY EQU * P* & P* FIRST SEARCH THE NMASTER INDEX P* * P LD A5,FDBMIA,A1 ADDR OF MAS
0x228580…29d200 [0x316]: Pad {f00=0x0099, f01=0x0190, f02=» GET KEY ENTRY IN MASTER INDEX P LD A6,8,A14 FDB ADDR & P CF A14,CALSNO GET PHYS ADDR D P LDR A1,A1 h P RF(NZ) FKY900 ERROR z P LDR A1,A6 FDBADDR " P LDR A6,A11 NO OF CHAR IN KEY $ P LDK A7,0 START CHAR KEY SEARCH & P SUR A9,A9 N
0x228580…29d200 [0x317]: Pad {f00=0x0099, f01=0x018e, f02=»ECORD v P RF FKY150 P LDR A1,A5 RET CODE P RF FKY900 ERROR EXIT < P* Z " P* BUFFER AND ADATA IS FOUND d P* PFKY150 EQU * P LDR A9,A3 BUFFER ADDR P ADR A2,A3 BUFFER ADR P ADK A2,10 REC ADDR P LDR A10,A
0x228580…29d200 [0x318]: Pad {f00=0x0099, f01=0x0190, f02=» P RF(E) FKY200 USED RECORD P* & & P* NO MORE RECORDS IN THIS SECTOR 0 P* Z * P LD A13,FDBRRO,A1 SAVE CURRENT OFFSET d P LD A4,FDBMRO,A1 & P ST A4,FDBRRO,A1 LAST REC IN SECT P* P* *CHECK IF EOF P* P LDR A
0x228580…29d200 [0x319]: Pad {f00=0x0099, f01=0x0190, f02=»N,A1 P RB(L) FKY100 NOT EOF P RF(G) FKY180 EOF * P CW A3,FDBLRN+1,A1 D P RB(L) FKY100 NOT EOF ^ PFKY180 EQU * | P* P* EOF IS IN THIS SECTOR P* 2 P ST A13,FDBRRO,A1 OFFSET TO FIRST FREE RECORD P LDK A7,0 NR O
0x228580…29d200 [0x31a]: Pad {f00=0x0099, f01=0x0190, f02=» P LD A3,6,A14 SEARCH KEY ADDR P CF A14,CHKKEY COMPARE KEYS , P LDR A3,A3 P & P RF(P) FKY840 SEARCHED KEY GREATER b " P RF(N) FKY850 SEARCH KEY LESS P RF FKY870 KEY FOUNFD PFKY840 EQU * P CC A7,-4,A10 NEXT KEY FLAG 0 P R
0x228580…29d200 [0x31b]: Pad {f00=0x0099, f01=0x0190, f02=» THAT HAS BEEN CHECKED FOR THIS KEY . P LC A7,-4,A10 REDUCE NO OF SAME CHARACTERS ! 0 P RB FKY100 NEXT KEY ! b PFKY850 EQU * ! ~ P LDKL A2,/4000 KEY NOT FOUND ! P RF FKY950 ! PFKY870 EQU * ! P LDK A2,0 KEY FOUND ! P RF FKY950 ! P
0x228580…29d200 [0x31c]: Pad {f00=0x0099, f01=0x0190, f02=» P ADKL A14,8 RESTORE STACK " P LDR* A1,A14 FDB ADDR " & P LDR A3,A9 BUFFER ADDR " D P RTN A14 " b P EJECT " r P* " J P* CRNUPD UPDATES CRN-BUFFERS SO THAT RECORD NUMBERS FOR MOVED INDEX " P* RECORDS ARE UPDATED " P* " P* IN:
0x228580…29d200 [0x31d]: Pad {f00=0x0099, f01=0x0190, f02=»2 = ADD PARAMETER +1, -1 " P* # $ P* USED REGISTERS: # . P* A1 -A12 # J P* # ^ P* OUT: # h P* A5 = FDB ADDR INDEX # x P* A10,A11 = UNCHANGED # P* # PCRNUPD EQU * # P STR A12,A14 # P SUKL A14,2 # $ P LD A12,FDBA
0x228580…29d200 [0x31e]: Pad {f00=0x0099, f01=0x0190, f02=»F(Z) CRU900 END OF LINK # P LC A7,FDBECB+1,A5 FILE CODE $ P CC A7,CRNCIF,A12 $ D P RB(NE) CRU100 WRONG FC $ ^ P CC A10,CRNCIF+1,A12 $ ~ P RB(G) CRU100 $ P RF(L) CRU200 $ P CW A11,CRNCIF+2,A12 $ P RB(G) CRU100 $ PCRU200 EQU * $
0x228580…29d200 [0x31f]: Pad {f00=0x0099, f01=0x018e, f02=» * $ P* % P* UPDATE CRN % P* % * P LD A7,2,A14 ADD PARAM % 4 P LDR A6,A7 % R P RF(N) CRU230 -1 % d P LDK A6,0 % | PCRU230 EQU * % P ANKL A7,/7FFF % P LDK A1,0 % P LC A1,CRNCIF+1,A12 % P LD A2,CRNCIF+2,A12 % P CF A14,
0x228580…29d200 [0x320]: Pad {f00=0x009a, f01=0x4028, f02=» % P RTN A14 & P END & @ & $
0x228580…29d200 [0x321]: Pad {f00=0x009a, f01=0x2008, f02=» ' + t P INH , P CF A15,TENDIO , P ENB , 2 P* , > P* EXIT , H P* , X P LKM , b P DATA 3 , n P* , ~ P END , @ , RD ADDR A2:=EA BIT + & P C1R A2,A2 ONE COMPLEMENT BIT MASK + P ANRS A2,A3 SET OFF EA BIT + P* + P
0x228580…29d200 [0x322]: Pad {f00=0x009a, f01=0x0190, f02=»TASSPW DATA 0 TTAB ADDRESS DMTASK $ PTASFDD DATA 0 FDB ADDR DATA FILE * ( PTASTBE DATA 0 TTAB/SCTCDT ENTRY ADDR R 2 PTASLFD DATA 0,0 LOCKED FLEXDISC FILE CODES =1 ~ P DATA 0,0 P DATA 0,0 " PTASS14 EQU *-2 TASS A14 STACK P* P I
0x228580…29d200 [0x323]: Pad {f00=0x009a, f01=0x0190, f02=» * P************** P* , P* ENTRY TASCAQ CHECK ASSIGN QUEUE * P* Z P* A7= RETURN CODE d P* * P* SET OFF USE BIT IN TASBLK H P* IF TASQUE = 0 THEN RETURN ELSE QUEUE FIRST IN CHAIN AND 2 P*
0x228580…29d200 [0x324]: Pad {f00=0x009a, f01=0x0190, f02=»QUE P RF(Z) TASCEX EMPTY QUEUE " P LDR* A1,A5 GET NEXT IN CHAIN . , P ST A1,TASQUE AND PUT IT FIRST IN QUEUE T P LDKL A1,-4 ( P ADS A1,TTB:SA,A5 UPD DISPATCH ADDR P CF A15,QTJOB NEXT ASSIGN P RF TASC05 & PTASCEX CM TASQUE A
0x228580…29d200 [0x325]: Pad {f00=0x009a, f01=0x0190, f02=» CODE IN SAVED A7 r P RTN A14 P EJECT * 8 P****DESCRIPTION************************************* 8 P* t : P* VOLCHE WILL COMPARE EACH VOLUME NAME IN ASBLK WITH ~ & P* VOLUME NAMES IN DWT FOR DISCS P* 8 P****ENTRY PARAMETERS******
0x228580…29d200 [0x326]: Pad {f00=0x009a, f01=0x0190, f02=»S WANTED. v : P* 1 LOCK WANTED. ONLY FROM DMTASS FOR FLEXDISC P* P 8 P****EXIT PARAMETERS********************************* Z P* P* A1 = 0 OK P* 1 VOLUME UNKNOWN P* A5 = TTAB ADDR P* 8 P****USED REGIS
0x228580…29d200 [0x327]: Pad {f00=0x009a, f01=0x0190, f02=»************** h PVOLCHE EQU * P CM TASLFD =1 * $ P CM TASLFD+2 LOCKED FLEXDISCS =1 @ P SLL A2,1 h P SUK A2,2 z P ST A2,TASCVO INIT. TASCVO P LDR A4,A8 2 P ADK A4,10 POINTER TO FIRST VOL NAME IN ASBLK PTAS110 EQU * 2 P
0x228580…29d200 [0x328]: Pad {f00=0x009a, f01=0x0190, f02=» ADDRESS IN CD:TAB AND COMPARE DWTVOL P* . P LD* A6,SCTCDT 8 PTAS130 SUK A6,4 N 2 P RF(N) TASHLT FC NOT FOUND? SHOULD NOT OCCUR. f P LD A5,SCTCDT P ADR A5,A6 P CC A1,1,A5 P RB(NE) TAS130 NOT THIS FC P LDR A11,A11
0x228580…29d200 [0x329]: Pad {f00=0x009a, f01=0x0004, f02=» H X
0x228580…29d200 [0x32a]: Pad {f00=0x009a, f01=0x0190, f02=» 2 P IDENT ADDMOD REL 9.2 79-11-16 870105040920 P : P* =1 RETURN CONDITION B P* b 8 P**************************************************** l P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TOSS DATA MANAGEMENT P*
0x228580…29d200 [0x32b]: Pad {f00=0x009a, f01=0x0190, f02=»CTION ON THE ALPHA ^ P* COMPUTER P*CALLING SEQUENCE: , $ P* A1-A2 = ARG1 F $ P* AG-A7 = ARG2 n P* CF A14,ADDMOD & P*RETURN : RESULT IN A1-A2 4 P* CAUTION REGISTERS A3,A4,A6,A7 ARE
0x228580…29d200 [0x32c]: Pad {f00=0x009a, f01=0x0190, f02=»NDITIONAL ASSEMBLY P* . P***************************************** $ P* V 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION ` . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* PCPU852 EQU 0 P* P EJECT PADDMOD E
0x228580…29d200 [0x32d]: Pad {f00=0x009a, f01=0x0190, f02=».L A7,/7FFF P ANK.L A2,/7FFF P ADR A2,A7 8 P RF(3) OVER1 X 0 PNOVER ADR A1,A6 * NO OVERFLOW x P RF(1) END1 P RF(2) END2 P RF(3) END3 PNOVE
0x228580…29d200 [0x32e]: Pad {f00=0x009a, f01=0x018e, f02=» A1,1 P RF(3) OVER3 P RB(7) NOVER 0 POVER3 ADR A1,A6 P P RF(2) END3 p P ADK A1,0 P RF(1) END1 P RB(7) NOVER1 P XIF =1 P IFT CPU852=0
0x228580…29d200 [0x32f]: Pad {f00=0x009a, f01=0x4184, f02=» t PEND2 ADK A3,/80 PEND1 ADK A3,/80 * B PEND0 SLL A3,1 ********************************** L P ANK.L A3,/0300 P LDK.L A4,/FCFF P AN.S A4,2,A14 B P OR.S
0x228580…29d200 [0x330]: Pad {f00=0x009a, f01=0x2008, f02=» ANK.L A3,/0300 P LDK.L A4,/FCFF * P AN.S A4,2,A14 L B P OR.S A3,2,A14 UPDATE CR IN PSW CALLING PROGRAM n P RTN A14 P END @ D1 P RB(7) NOVE
0x228580…29d200 [0x331]: Pad {f00=0x009a, f01=0x0190, f02=»* & P* ' > P* FIND A FREE ENTRY IN TTAB/CD:TAB (FC AND DWTADR = 0 ) ' P* ' V PTAS180 EQU * ' ` P LDK A1,0 ' t P LDR A10,A10 TC ' P RF(Z) TAS185 GLOBAL ASSIGN ' P LD A2,TASTTA TTAB ADDR ' P LDR A4,A2 ' P LD A2,TTB:TD,A4 '
0x228580…29d200 [0x332]: Pad {f00=0x009a, f01=0x0190, f02=»UK A2,4 ' ( P RF(L) TASSE2 NO FREE ENTRY IN TABLE ( P LDR A9,A4 ( < P ADR A9,A2 ( N P CCR A1,A9 FILE CODE ( ` " P RB(NE) TAS190 FC NOT EQUAL 0 ( | P CW A1,1,A9 ( & P RB(NE) TAS190 DWTADR NOT EQUAL 0 ( P LDR* A1,A8 ASBLK 1ST WORD ( P RF(N) T
0x228580…29d200 [0x333]: Pad {f00=0x009a, f01=0x0190, f02=»Y ( f P ST A9,TASTBE SAVE ENTRY ) P* ) * 0 P* GET FIRST VOLUME AND ACTIVATE ITS DMTASK ) 4 P* ) h P LD A1,TASCVO ) r P LDK A7,0 ) P LC A7,TASVOL,A1 ) P ADKL A7,'#D' TID DMTASK ) P CF A15,FNDTID ) " P LDR A5,A2 TTAB ADDRESS DMTASK )
0x228580…29d200 [0x334]: Pad {f00=0x009a, f01=0x0190, f02=»RY ) | P LDK A7,4 VOL UNKNOWN * P RF TASSEM * ( PTAS200 EQU * * : P LDK A2,2 * N 4 P ST A2,TASFIL MASTER INDEX LOOP IDENT IN DMTSAK * ` & P LDKL A2,DMTASS ASSIGN INDEX ENTRY * P LDR* A6,A8 * P RF(N) TAS210 INDEX ASSIGN * P CM TASFIL * P
0x228580…29d200 [0x335]: Pad {f00=0x009a, f01=0x4182, f02=»F A15,ACTOT ACTIVATE DMTASK * P ABL TDISP GO TO DISPATCHER + $ P EJECT + H P* + V P* ERROR RETURNS + ` P* + z PTASSE5 ADK A7,1 + PTASSE4 ADK A7,1 + PTASSE3 ADK A7,1 + PTASSE2 ADK A7,1 + PTASSE1 ADK A7,1 + P ADK A7,1 +
0x228580…29d200 [0x336]: Pad {f00=0x009a, f01=0x2008, f02=» ,
0x228580…29d200 [0x337]: Pad {f00=0x009a, f01=0x0190, f02=»****************************************** T 6 P* * U 2 6 P* RDBLK - READ ONE CASSETTE BLOCK * U l 6 P* =============================== * U 6 P*
0x228580…29d200 [0x338]: Pad {f00=0x009b, f01=0x0190, f02=» RB(N) DMT540 ENTRY USED - P SUR A6,A2 NO OF SPARE WORDS . & P RB(N) DMT540 LARGER ENTRY NEEDED . D P* . n P* SUFFICIENT SPACE FOUND . x P* . P LDKL A1,/8000 USED BIT . & P ORS A1,MXIND+2,A5 MARK ENTRY USED . $ P ST A3,TASMXA MASTER INDEX A
0x228580…29d200 [0x339]: Pad {f00=0x009b, f01=0x0004, f02=» `
0x228580…29d200 [0x33a]: Pad {f00=0x009b, f01=0x0190, f02=» 2 P IDENT DSUMOD REL 9.2 79-11-16 870105040920 P : P* =1 RETURN CONDITION B P* b 8 P**************************************************** l P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TOSS DATA MANAGEMENT P*
0x228580…29d200 [0x33b]: Pad {f00=0x009b, f01=0x0190, f02=»STRUCTION ON THE ALPHA ^ P*COMPUTER P*CALLING SEQUENCE 0 $ P* A1-A2 = ARG1 J $ P* A6-A7 = ARG2 r P* CF A14,DSUMOD & P*RETURN: RESULT IN A1-A2 4 P* CAUTION REGISTERS A3,A4,A6,A7
0x228580…29d200 [0x33c]: Pad {f00=0x009b, f01=0x0190, f02=»* CONDITIONAL ASSEMBLY P* . P***************************************** ( P* Z 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION d . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* PCPU852 EQU 0 P* P EJECT PDSUM
0x228580…29d200 [0x33d]: Pad {f00=0x009b, f01=0x0190, f02=» C1R A6,A6 P C1R A7,A7 P ANK.L A7,X'7FFF' 8 P ANK.L A2,/7FFF P ADK A7,1 ~ P RF(1) NOVER1 P ADK A6,1 P RF(3) OVER4 P RF(7)
0x228580…29d200 [0x33e]: Pad {f00=0x009b, f01=0x0190, f02=» z P RF(2) END2 P RF(3) END3 & P ADK A2,0 D P RF(0) END0 b P RF(7) END1 POVER1 ANK.L A2,X'7FFF' P ADK A1,1 P RF(3) OVER4 P R
0x228580…29d200 [0x33f]: Pad {f00=0x009b, f01=0x0190, f02=»VER2 | P XIF =1 P IFT CPU852=0 6813 =1 P RF(0) END0 =1 < P RF(1) END1 =1 T P RF(2) END2 =1 l P XIF =1 PEND3 ADK A3,/80 PEND2 ADK A3,/80 PEND1 ADK A3,/80 F PEND0 SLL
0x228580…29d200 [0x340]: Pad {f00=0x009c, f01=0x40a8, f02=» AN.S A4,2,A14 B P OR.S A3,2,A14 UPDATE CR IN PSW CALLING PROGRAM P* =1 b P RTN A14 r P END @
0x228580…29d200 [0x341]: Pad {f00=0x009c, f01=0x2008, f02=» ,0 P RB(7) NOVER2 PEND3 ADK A3,/80 6 PEND2 ADK A3,/80 X PEND1 ADK A3,/80 z PEND0 SLL1 A3 P ANK.L A3,/0300 P LDK.L A4,/FCFF P AN.
0x228580…29d200 [0x342]: Pad {f00=0x009c, f01=0x0190, f02=» 0 P IDENT DMFDB REL 9.2 79-11-16 870105040920 P 8 P @ P* H P* R 8 P**************************************************** P* $ P* PHILIPS TERMINAL SYSTEM PTS P* , P* DMFDB = FILE DESCRIPTOR BLOCKS FDB P*
0x228580…29d200 [0x343]: Pad {f00=0x009c, f01=0x0190, f02=»TE FDB AREA H P* BY MEANS OF CONDITIONAL ASSEMBLY QFDBAR WORDS WILL BE ALLOCATED P* ` P ENTRY FDBSTA j P ENTRY FDBEND P ENTRY QFDBFL P ENTRY CRNQUE,CRBUFL P ENTRY CRNEND P ENTRY MXIND P EJECT P* 6 P
0x228580…29d200 [0x344]: Pad {f00=0x009c, f01=0x0190, f02=»A r " PCRBUFL EQU 12 SIZE CRN BUFFER P* 0 < P* CRNBAR IS THE SIZE OF THE CRN BUFFER ARERA IN WORDS : 4 P* WHERE CRBUFL BYTES ARE USED FOR EACH BUFFER z P* PX:B EQU 50 PCRNBAR EQU X:B CURRENCY AREA P* P* PX:A
0x228580…29d200 [0x345]: Pad {f00=0x009c, f01=0x0190, f02=»* PQFDBAR EQU X:A P* PX:D EQU 96 * & PQFDBFL EQU X:D FDB FIX PART LENGTH < P* f P EJECT p P* ~ PFDBSTA EQU * P RES QFDBAR PFDBEND EQU * PCRNQUE DATA 0 CRN LINK ROOT P RES CRNBAR PCRNEND EQU *
0x228580…29d200 [0x346]: Pad {f00=0x009c, f01=0x4102, f02=»IZ=0 * P DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 * P DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 : P XIF h PMXINDE EQU * END INDEX INDEX t 2 P DATA 0,0 SIGNIFICANT ZEROES AFTER INDEXINDEX PMXAR EQU * P RES MXSIZ P END @ EQU *
0x228580…29d200 [0x347]: Pad {f00=0x009c, f01=0x2008, f02=» PFDBSTA EQU * P RES QFDBAR PFDBEND EQU * 2 P END F@ R OF CONDITIONAL ASSEMBLY QFDBAR WORDS WILL BE ALLOCATED J P* P ENTRY FDBLEN P ENTRY FDBSTA P ENTRY FDBEND P ENTRY QFDBFL P* P* ,
0x228580…29d200 [0x348]: Pad {f00=0x009c, f01=0x0190, f02=» P LKM > P DATA 3 EXIT > P XIF > $ P IFT FLXDSC=1 > 0 P EJECT > F PDMT900 EQU * > T $ P* UNLOCK FLEXDISC IN THIS LOOP > h P* > P* REGISTERS > P* A1 = EXTENT COUNTER > 6 P* A4 = LAST VOL CODE FLEXDOISC A5 = EXT ADDR > P
0x228580…29d200 [0x349]: Pad {f00=0x009c, f01=0x0004, f02=»
0x228580…29d200 [0x34a]: Pad {f00=0x009c, f01=0x0190, f02=» 2 P IDENT MPYMOD REL 9.2 79-11-16 870105040920 P : P* =1 RETURN CONDITIONS B P* b 8 P**************************************************** l P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TOSS DATA MANAGEMENT P*
0x228580…29d200 [0x34b]: Pad {f00=0x009c, f01=0x0190, f02=»N THE ALPLA COMPUTER ^ P* CALLING SEQUENCE: ( P* LD A6,ARG1 8 ( P* LD A7,ARG1 d P* CF A14,MPYMOD ( P* RETURN : RESULT IN A1,A2 0 P* REGISTERS A3,A4,A6,A7, ARE CRUSH
0x228580…29d200 [0x34c]: Pad {f00=0x009c, f01=0x0190, f02=»L ASSEMBLY P* . P***************************************** P* N 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION X . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* PCPU852 EQU 0 P* P EJECT PMPYMOD EQU *
0x228580…29d200 [0x34d]: Pad {f00=0x009c, f01=0x0190, f02=»A3,/8000 IF A6=A7=/8000 RETURN IN ERROR EXIT ~ P CWR A3,A6 8 P RF(4) SUITE X P CWR A3,A7 x P RF(0) END3 < P LDR A6,A7 * A6= X'8000' A7# X'8000' 4 P LDR A7
0x228580…29d200 [0x34e]: Pad {f00=0x009c, f01=0x0190, f02=»A3,0 ~ P LDK A4,15 P ADK A6,0 , P RF(0) END0 J P RF(6) ARG1PS h 0 P ADK A3,1 *ARG1 NEGATIVE P C1R A6,A6 P ADK A6,1 PARG1PS ADK
0x228580…29d200 [0x34f]: Pad {f00=0x009c, f01=0x0190, f02=» C1R A7,A7 P ADK A7,1 P RF(3) CASSPE 8 PARG2PS SRC A7,1 X P RF(6) NOVER1 v P ADR A1,A6 PNOVER1 SRA A2,1 P SRC A1,1 P RF(6) NOVER2
0x228580…29d200 [0x350]: Pad {f00=0x009d, f01=0x0190, f02=» 4 PNOVER3 ADK A3,0 *END* RESTORE SI=N P RF(0) END1 < P C1R A1,A1 Z P C1R A2,A2 z P ADK A2,1 D P*CAUTION THE NEXT INSTRUCTION IS ABSOLUTELY NECESSARY TO SET CR < P* WHEN THE
0x228580…29d200 [0x351]: Pad {f00=0x009d, f01=0x0190, f02=»A1,1 ~ PNOVER4 ANK.L A2,/7FFF P RF(7) END2 . P XIF =1 L P IFT CPU852=0 6813 =1 ^ P RF(0) END0 =1 | P RF(1) END1 =1 P RF(2) END2 =1 P XIF =1 PEND3 ADK A3,/81 PEND2 ADK A3
0x228580…29d200 [0x352]: Pad {f00=0x009d, f01=0x4168, f02=» v P AN.S A4,2,A14 B P OR.S A3,2,A14 UPDATE CR IN PSW CALLING PROGRAM * P* =1 p P RTN A14 P IFT CPU852=1 : PCASSPE LDR A1,A6 *A7=X'8000' THEN A4= 1 . P*
0x228580…29d200 [0x353]: Pad {f00=0x009d, f01=0x2008, f02=» 4 : PCASSPE LDR A1,A6 *A7=X'8000' THEN A4= 1 . P* *AND A1= A6 P P RB(7) NOVER3 P END @
0x228580…29d200 [0x354]: Pad {f00=0x009d, f01=0x0190, f02=»DBRLE,FDBSNR,ECBCW l . P EXTRN FDBRRO,FDBCEX,FDBBLF,EXTBAS,BUFSNR . P EXTRN FDBLRN,FDBMRO,FDBCRL,FDBADF,CRNCIF L 4 P EXTRN DMTIOT,GTLGRN,GTBKBU,ADDMOD,CALSNO,DMTRBU ~ P EXTRN DMTIOZ P EJECT 8 P****DESCRIPTION*********************************
0x228580…29d200 [0x355]: Pad {f00=0x009d, f01=0x0190, f02=»1 ALG. U. ` 4 P* THE SEARCH KEY MAY BE TERMINATED WITH A /EE. 0 P* THE FIRST TWO WORDS IN MASTER INDEX IS : J P* - NO OF ENTRIES N ~ $ P* - NO OF CHARACTERS PER ENTRY P* 8 P****ENTRY PARAMETERS******************************** P
0x228580…29d200 [0x356]: Pad {f00=0x009d, f01=0x0190, f02=»CF A14,FNDKMX P* 8 P****EXIT PARAMETERS********************************* " P* ^ 0 P* A1,A2 = LODGICAL RECORD NO IN INDEX FILE h P* A8,A11= UNCHANGED P* 8 P****USED REGISTERS********************************** P* P
0x228580…29d200 [0x357]: Pad {f00=0x009d, f01=0x0190, f02=»9,A2 P ANKL A9,/1 GET BIT 15 P SRA A2,1 * P LDR A10,A2 M=N/2 FLOOR < P ADR A9,A2 I=N/2 CEILING P ADK A5,2 TABLE BASE - 2 | PFND020 EQU * P LDK A2,0 P LDR* A7,A5 ENTRY LENGTH P LDR A6,A9 I P SUK A6,1 $ P R
0x228580…29d200 [0x358]: Pad {f00=0x009d, f01=0x0190, f02=»25 EQU * " P ADR A2,A5 ADD MI BASE ADR - 2 P ADK A2,2 ENTRY KEY ADR 6 P LDR A1,A2 SAVE ENTRY ADR V P LDR A3,A8 SEARCH KEY ADR x P LDR A6,A11 MAX KEY LENGTH P LDK A7,0 CHAR ADR P CF A14,CHKKEY COMPARE KEYS P LDR A7,A10 M
0x228580…29d200 [0x359]: Pad {f00=0x009d, f01=0x0004, f02=»
0x228580…29d200 [0x35a]: Pad {f00=0x009d, f01=0x0190, f02=» 2 P IDENT DIVMOD REL 9.2 79-11-16 870105040920 P : P* =1 RET COND B P* Z 8 P**************************************************** d P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TOSS DATA MANAGEMENT P* P*
0x228580…29d200 [0x35b]: Pad {f00=0x009d, f01=0x018e, f02=»A COMPUTER V P* CALLING SEQUENCE & P* A1-A2= DIVIDEND , $ P* A6 = DIVISOR V P* CF A14,DIVMOD ~ B P*RETURN* RESUT IN A1-A2 ; A1= REMAINDER;A2= QUOTIENT 6 P* CAUTION : REGISTERS A3,A4,A6,A7,
0x228580…29d200 [0x35c]: Pad {f00=0x009d, f01=0x0190, f02=» P* CONDITIONAL ASSEMBLY P* " . P***************************************** , P* ^ 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION h . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* PCPU852 EQU 0 P* P EJECT P
0x228580…29d200 [0x35d]: Pad {f00=0x009d, f01=0x0190, f02=»,A1 SAVE DIVIDEND SIGN | P* =1 $ P ADK A6,0 4 @ P RF(0) END3 * IF DIVISOR IS NULL, OVREFLOW R P ADK A1,0 P RF(4) SIGNE P ANK.L A2,/7FFF @ P RF(0) EN
0x228580…29d200 [0x35e]: Pad {f00=0x009d, f01=0x018e, f02=» P LDK A4,16 4 P ADK A1,0 *SIGN OF DIVIDEND $ P RF(6) DIVENP 8 P ADK A3,1 * DIVIDEND IS NEGATIVE | P C1R A1,A1 P C1R A2,A2 P ANK.L
0x228580…29d200 [0x35f]: Pad {f00=0x009d, f01=0x018e, f02=» x 2 PDIVENP ADK A6,0 *SIGN OF DIVISOR P RF(6) DIVORP > 4 P SUK A3,1 *NEGATIVE DIVISOR ^ P C1R A6,A6 P ADK A6,1 < P ADK A6,0 RESET IF OVERFL
0x228580…29d200 [0x360]: Pad {f00=0x009e, f01=0x0190, f02=» 2 PSHIFT SUK A4,1 *A1 LESS THAN A6 P RF(0) END : P SLL A1,1 X P SLL A7,1 v P SLL A2,1 P RF(6) *+4 P ADK A1,1 P ADK A1,0
0x228580…29d200 [0x361]: Pad {f00=0x009e, f01=0x0190, f02=» ADK A7,1 P RB(7) SHIFT 4 P*THIS SEQUENCE RESTORES THE SIGN OF THE RESULTS : PEND LDR A2,A7 r P ADK A3,0 P RF(0) NOSIGN 8 P RF(2) AA DIVIDEND +. DIVISOR + ,
0x228580…29d200 [0x362]: Pad {f00=0x009e, f01=0x018e, f02=» ADK A2,1 D P*CAUTION THE NEXT INSTRUCTION IS ABSOLUTELY NECESSARY TO SET CR > P* WHEN THE ADK A2,1 SET AN OVERFLOW CR EX (QUOTIENT=8000) ` P ADK A2,0 P XIF =1 P IFT CPU852=0 6813 =1 P RF(1) END1 =1 P X
0x228580…29d200 [0x363]: Pad {f00=0x009e, f01=0x0190, f02=» v PEND1 ADK A3,/81 B PEND0 SLL A3,1 ********************************** ( P ANK.L A3,/0300 n P LDK.L A4,/FCFF P AN.S A4,2,A14 B P OR.S A3,2,A14 UPDATE CR IN PSW CALLING
0x228580…29d200 [0x364]: Pad {f00=0x009e, f01=0x0190, f02=»N ^ P RF(6) BB 6 P C1R A1,A1 DIVIDEND- .DIVISOR - & . P ADK A1,1 REMAINDER - ` PBB ADK A2,0 P RB(0) END0 P RB(2) END2 P RB(7) END1 P
0x228580…29d200 [0x365]: Pad {f00=0x009e, f01=0x4056, f02=» LDK A1,0 P RB(7) END P XIF 2 P END >@ R - & . P ADK A1,1 REMAINDER - ` PBB ADK A2,0 P RB(0) END0 P RB(2) END2 P RB(7) END1 P
0x228580…29d200 [0x366]: Pad {f00=0x009e, f01=0x2008, f02=» A2,0 P RB(0) END0 P RB(2) END2 2 P RB(7) END1 P PCASSPE LDR A7,A1 n P LDR A1,A2 P CWK A1,/8000 P RB(4) END P LDK A1,0 P
0x228580…29d200 [0x367]: Pad {f00=0x009e, f01=0x018e, f02=»ECORD v P RF FKY150 P LDR A1,A5 RET CODE P RF FKY900 ERROR EXIT < P* Z " P* BUFFER AND ADATA IS FOUND d P* PFKY150 EQU * P LDR A9,A3 BUFFER ADDR P ADR A2,A3 BUFFER ADR P ADK A2,10 REC ADDR P LDR A10,A
0x228580…29d200 [0x368]: Pad {f00=0x009e, f01=0x0190, f02=» P RF(E) FKY200 USED RECORD P* & & P* NO MORE RECORDS IN THIS SECTOR 0 P* Z * P LD A13,FDBRRO,A1 SAVE CURRENT OFFSET d P LD A4,FDBMRO,A1 & P ST A4,FDBRRO,A1 LAST REC IN SECT P* P* *CHECK IF EOF P* P LDR A
0x228580…29d200 [0x369]: Pad {f00=0x009e, f01=0x0012, f02=»
0x228580…29d200 [0x36a]: Pad {f00=0x009e, f01=0x0190, f02=» 2 P IDENT DMSUBR REL 9.2 79-11-16 870105040920 P : P =1 CLEAR ECB B P REL 9.1 79-04-06 Z P* v 8 P**************************************************** P* $ P* PHILIPS TERMINAL SYSTEM PTS P* $ P* DMSUBR = COMMO
0x228580…29d200 [0x36b]: Pad {f00=0x009e, f01=0x0190, f02=» 8 P****THIS MODULE IS ACTIVATED FROM :***************** P* D P* DMTASK,TIODM,DMTASS N P* n P*************** x P* ENTRIES * P*************** P* P* & P ENTRY EATEST,EASETB,EARELB,CRNGET P ENTRY CALSN
0x228580…29d200 [0x36c]: Pad {f00=0x009e, f01=0x0190, f02=»USER TO SYSTEM AREA x 0 P ENTRY MOV:SU MOVE FROM SYSTEM TO USER AREA P* P P***************** Z P* EXTERNALS * t P***************** P* P* 4 P EXTRN FDBEAL,FDBTNR,FDBCRL,FDBRLE,FDBSNR,FDBRRO P EXTRN FDBCEX,FDBBLF,F
0x228580…29d200 [0x36d]: Pad {f00=0x009e, f01=0x0190, f02=»D | P EXTRN DWTTDM,DWTTQ P EXTRN QTJOB & P EXTRN ECBRL,SECTLE : P EXTRN DIVMOD,MPYMOD V P EXTRN EXTELE r P EXTRN CRNTID P EXTRN DMTGBU P EXTRN EXTLEN,EXTBAS P EXTRN CRNQUE,GETBLK,FREQUE P EXTRN HALT P E
0x228580…29d200 [0x36e]: Pad {f00=0x009e, f01=0x0190, f02=»UTINE t P EJECT DMSUBR TOSSIO P* . P* 8 . P***************************************** B P* t P* CONDITIONAL ASSEMBLY ~ P* . P***************************************** P* . P* A PROGRAM VERSION USING TOSS MMU PAGIN
0x228580…29d200 [0x36f]: Pad {f00=0x009e, f01=0x0190, f02=»CHKIND IS USED FROM FNDDWT TO SELECT DM-DWT 2 P* INDEX FILE (INDEX 0) SHALL BE SELECTED FOR 4 ( P* DX,IX,XR,XN, DATA FILE OTHERWISE j P* PCHKIND EQU * P STR A1,A15 P STR A2,A15 " P LDK A2,1 INDEX FOR DATA FILE P LDR A1,
0x228580…29d200 [0x370]: Pad {f00=0x009e, f01=0x0190, f02=»AD x P ANK A1,/3E REMOVE BIT 15 P SUK A1,/1E , 4 P RF(E) FND320 INSERT INDEX OR INDEXED READ NEXT @ P RF FND340 x ( PFND320 LDK A2,0 INDEX FOR INDEX FILE PFND340 EQU * P CCR A2,A6 INDEX P RF(E) FND390 ENTRY FOUND P LDK A
0x228580…29d200 [0x371]: Pad {f00=0x009e, f01=0x0190, f02=»ED IN TENDIO TO RESET REQUEST BUSY BIT P* FOR ALL FILES . " P* AND TO RESOLVE ALL QUEUES H P* n PREQEND EQU * x P LC A2,TTB:ID,A5 GET TASK ID P CCK A2,'##' ( P RF(E) TEN117 JUMP IF DMTASK CALLING P* , P* RESET REQUES
0x228580…29d200 [0x372]: Pad {f00=0x009e, f01=0x0190, f02=»QU * P SUK A2,2 P RF(N) TEN115 NO MORE FILES P LDR A3,A6 B P ADR A3,A2 T P LD A3,FDBADF,A3 FDB ADDR f P RB(Z) TEN112 P CWR A3,A6 DWT ADDR P RF(E) TEN114 MASTER DWT P LD A5,DWTTQ,A3 P RF(Z) TEN113 NO QUEUE
0x228580…29d200 [0x373]: Pad {f00=0x009e, f01=0x0190, f02=»TEN114 EQU * $ P LDKL A4,/BFFF REQUEST BUSY BIT P ANS A4,DWTST,A3 RESET < P LDKL A4,/8000 Z $ P ORS A4,DWTST,A3 DEVICE NOT BUSY r P RB TEN112 PTEN115 EQU * P LDR* A4,A15 RESTORE A4 P* PTEN117 EQU * P ABL IHRTN
0x228580…29d200 [0x374]: Pad {f00=0x009e, f01=0x0190, f02=» FOR A LOG RECORD NO. n P* 8 P****ENTRY PARAMETERS******************************** ( P* d P* A1 = FDB ADRESS n P* A2,A3 = LOG RECORD NO P* P* CF A14,EATEST P* 8 P****EXIT PARAMETERS***************************
0x228580…29d200 [0x375]: Pad {f00=0x009e, f01=0x018e, f02=»* = -1 EA FOUND FO R OTHER TASK P* . 8 P****USED REGISTERS********************************** 8 P* t P* A1 - A4 ~ P EJECT DMSUBR PEATEST EQU * " P LD A4,FDBEAL,A1 BUFFER QUEUE P RF EAT030 PEAT020 EQU * P
0x228580…29d200 [0x376]: Pad {f00=0x009e, f01=0x018e, f02=» P* P CC A2,3,A4 FIRST CHAR P RB(NE) EAT020 , P CW A3,4,A4 2 AND 3 CHAR B P RB(NE) EAT020 b P* x P* RECORD NO FOUND P* P LC A4,2,A4 P CC A4,FDBTNR,A1 TASK ID P RF(E) EAT060 P LDKL A4,-1 EA OTHER TAS
0x228580…29d200 [0x377]: Pad {f00=0x009e, f01=0x0190, f02=» ~ 8 P****DESCRIPTION************************************* P* D B P* EASETB WILL UNCONDITIONALLY PUT A NEW EA BUFFER IN EA-LINK N L P* IF NO BUFFERS ARE AVAILABLE THE SYSTEM WILL HALT AND LITE SOP-LAMPS P* 8 P****ENTRY PARAMETERS********
0x228580…29d200 [0x378]: Pad {f00=0x009f, f01=0x018e, f02=»B ~ P* 8 P****EXIT PARAMETERS********************************* P* P P* A6 = FDB ADDR Z P* t 8 P****USED REGISTERS********************************** ~ P* P* A1-A4,A6 P* < P****************************************
0x228580…29d200 [0x379]: Pad {f00=0x009f, f01=0x0190, f02=» P LDR A1,A3 LOG REC NO P INH " , P CF A15,GETBLK GET BUFF AND STORE A1,A2 . P* ^ P* LINK BUFFER TO FDB h P* P LD A2,FDBEAL,A6 LINK ROOT P STR A2,A4 THREAD P ST A4,FDBEAL,A6 NEW ROOT P RTN A14 P EJECT DMS
0x228580…29d200 [0x37a]: Pad {f00=0x009f, f01=0x0190, f02=» P* TIO THE FREE LINK. P* & 8 P****ENTRY PARAMETERS******************************** 0 P* l P* A1 = FDB-ADDRESS v " P* A2,A3 = LOGICAL RECORD NO B P* A2: BIT 0=1,BIT 1=1 ALL BUFFERS WITH TASK ID SAME AS FDB ( P*
0x228580…29d200 [0x37b]: Pad {f00=0x009f, f01=0x0190, f02=»FER WITH TASK ID AND LOG REC NO j 0 P* AS SPEC IS REMOVED. ( P* 8 P****EXIT PARAMETERS********************************* f P* P* A1 = UNCHANGED P* 8 P****USED REGISTERS**********************************
0x228580…29d200 [0x37c]: Pad {f00=0x009f, f01=0x0190, f02=»,A5 EA ROOT P RF EAR030 PEAR020 EQU * & P LDR A5,A4 SAVE OLD ROOT : P LDR* A4,A4 NEXT BUFFER ADR Z PEAR030 EQU * ~ P RF(Z) EAR100 EA LINK END P LDR A2,A2 REC NO & P RF(N) EAR050 RELEASE MANY BUFFERS P* P* SEAR
0x228580…29d200 [0x37d]: Pad {f00=0x009f, f01=0x018e, f02=»EAR050 EQU * P CWK A2,/A000 CHECK BIT 1 0 P RF(L) EAR080 BIT 1 ZERO,ALL BUFFERS REMOVED 6 PEAR060 EQU * j P* ~ P* SEARCH TASK IDENT P* P LC A3,FDBTNR,A1 TAK ID P CC A3,2,A4 P RB(NE) EAR020 P* P* EA
0x228580…29d200 [0x37e]: Pad {f00=0x009f, f01=0x0190, f02=» P* RETURN BUFFER TO POOL P* & P INH 0 P LD A3,FREQUE < P STR A3,A4 NEXT FREE R P ST A4,FREQUE NEW ROOT n P LDR A4,A5 BUFFER ROOT P LDR A2,A2 P RB(N) EAR020 RELEASE MORE PEAR100 EQU * P RTN A14 P EJECT
0x228580…29d200 [0x37f]: Pad {f00=0x009f, f01=0x0190, f02=» IF NO BUFFER IS ` D P* FOUND A NEW IS FETCHED FROM THE FREE LINK AND B FILLED WITH H P* ZEROES AND PUT ON THE CRN LINK. IF NO FREE BUFFERS ARE AVAILABLE ` 0 P* THE SYSTEM WILL HALT AND LITE SOP-LAMPS. ( P* TASK ID IS PLACED IN THE BUFFER
0x228580…29d200 [0x380]: Pad {f00=0x009f, f01=0x0190, f02=»EXIT PARAMETERS********************************* P* 8 P* A1 = UNCHANGED B ( P* A2 = ADDRESS OF FOUND CRN-BUFFER P* 8 P****USED REGISTERS********************************** P* P* A1 - A4 P EJECT DMSUBR PCRNGET
0x228580…29d200 [0x381]: Pad {f00=0x009f, f01=0x0190, f02=» P RF(Z) CRN100 LINK END P* " P* CHECK ATASK IDENT , P* J P LC A3,FDBTNR,A1 TASK ID T P CC A3,CRNTID,A2 t P RB(NE) CRN020 OTHER TASK P RF CRN200 BUFFER FOUND P* P* GET NEW BUFFER P* PCRN100 EQU *
0x228580…29d200 [0x382]: Pad {f00=0x009f, f01=0x018e, f02=»RS v PCRN120 EQU * P LDR* A3,A2 NEXT FREE P ST A3,CRNQUE UPD ROOT < P* Z P* FILL BUFFER WITH ZEROES d P* * P LDKL A3,CRBUFL BUFFER LENGTH IN BYTES PCRN140 EQU * P SUK A3,2 ZEROE WORDS 2 - N P RF(NP) CRN160 BUF
0x228580…29d200 [0x383]: Pad {f00=0x009f, f01=0x0190, f02=» " P* CONNECT NEW BUFFER TO LINK P* . PCRN160 EQU * 8 P LC A3,FDBTNR,A1 L P SC A3,CRNTID,A2 TASK ID d P LD A3,FDBCRL,A1 LINK ROOT P STR A3,A2 THREAD P ST A2,FDBCRL,A1 NEW ROOT PCRN200 EQU * P RTN A14 P EJE
0x228580…29d200 [0x384]: Pad {f00=0x009f, f01=0x018e, f02=»TO d P* SECTOR AND OFFSET P* ( 8 P****ENTRY PARAMETERS******************************** 2 P* n " P* A1,A2 = LOGICAL RECORD NO x P* A6 = FDB ADDR P* P* CF A14,CALSNO P* 8 P****EXIT PARAMETERS***************
0x228580…29d200 [0x385]: Pad {f00=0x009f, f01=0x0190, f02=» P* A6 = UNCHANGED $ P* IN FDB : FDBSNR = SECTOR NR , P* FDBRRO = OFFSET IN SECTOR F * P* FDBCEX = CURRENT EXTENT v P* 8 P****USED REGISTERS********************************** P* P* A1 - A9 P E
0x228580…29d200 [0x386]: Pad {f00=0x009f, f01=0x0190, f02=»DK A6,0 $ P LC A6,FDBBLF,A5 BLOCKING FACTOR , P CF A14,DIVMOD A2=A1,A2//A6,A1=REMAINDER 8 P RF(O) TIOD99 OVERFLOW h P LDR A3,A2 QUOTIENT P LDR A6,A5 FDB ADDR P LDR A2,A1 REMAINDER P RF(Z) TIOD30 REST = 0 $ P ADK A3,1 RECORD I
0x228580…29d200 [0x387]: Pad {f00=0x009f, f01=0x018e, f02=» PTIOD40 EQU * P LDR A4,A6 & P ADKL A4,FDBEXT FIRST FILE EXTENT * , P LD A9,EXTLEN,A4 LENGTH OF FIRST EXTENT T P LDK A5,4 NUMBER OF EXTENTS PTIOD45 CWR A3,A9 ( P RF(NG) TIOD55 SECTOR IN THIS EXTENT P SUK A5,1 NO & P RF(NP) TI
0x228580…29d200 [0x388]: Pad {f00=0x009f, f01=0x0190, f02=» P* * P* SAVE CURRENT EXTENT BLOCK POINTER P* < PTIOD55 ST A4,FDBCEX,A6 F P* d * P* FIND LOGICAL SECTOR NUMBER ON DISC n P* 6 P SU A9,EXTLEN,A4 NO OF SECTORS IN PREVIOUS EXTENTS $ P SUR A3,A9 SECTOR NO WITHIN EXT P S
0x228580…29d200 [0x389]: Pad {f00=0x009f, f01=0x0190, f02=»GICAL SECTOR NUMBER x 2 P* FIND RELATIVE RECORD OFFSET WITHIN SECTOR P* R P LDK A3,0 & PTIOD60 SUK A2,1 A2=RELATIVE REC NO n ( P RF(Z) TIOD65 REL REC OFFS IN A3 NOW * P AD A3,FDBRLE,A6 NO ADD RECORD LENGTH P ADK A3,1 SKIP STATUS BY
0x228580…29d200 [0x38a]: Pad {f00=0x009f, f01=0x0190, f02=»RELATIVE REC OFFSET IN FBDRRO P* & PTIOD65 EQU * 0 P LDK A1,0 OK D P ST A3,FDBRRO,A6 X PTIODMF EQU * p P RTN A14 P EJECT DMSUBR P* P************** P* DMTIOT P************** P* > P* ENTRY
0x228580…29d200 [0x38b]: Pad {f00=0x009f, f01=0x0190, f02=»RESS x P* A1 = 0 WHEN OK ! $ P* = ERROR CODE ELSE ! . $ P* A9 = DM ECB ADDRESS ! V * P* A8 = PHYS I/O ECB ADDRESS ! ~ $ P* A2 WILL BE DESTROYED ! P* ! ( P* USED REGISTERS : A1,A2,A6,A8,A9 ! P
0x228580…29d200 [0x38c]: Pad {f00=0x009f, f01=0x0190, f02=»B ADDRESS ! z PDMTIT0 EQU * " P LD A1,ECBRC,A8 " & P RF(Z) DMTIOX DISC I/O OK " > P ANKL A1,/FEFF " ` $ P RF(NZ) DMTIT1 NOT ONLY RETRIES " v P LDKL A2,/100 " P ORS A2,ECBRC,A9 USER RC " P RF DMTIOX " PDMTIT1 EQU * " P LD A2,FDBDBR,A6
0x228580…29d200 [0x38d]: Pad {f00=0x009f, f01=0x0190, f02=» A2,8 BUFSTA " , P CM BUFDMI,A2 CLEAR VOL IDENT IN BUFFER # P LDK A1,/02 DISC IO ERROR # D " P LDKL A2,/FF7E NOT BIT 8 OR 15 # f P AN A2,ECBRC,A8 # P RF(NZ) DMTIOX # P LD A1,ECBRC,A8 BIT 8 OR 15 # PDMTIOX RTN A14 # P EJECT # P* # :
0x228580…29d200 [0x38e]: Pad {f00=0x009f, f01=0x0190, f02=» P* A8 = ECB ADDR $ P* OUT: $ P* A1 = RET CODE $ . P* A2 = DESTROYED $ H P* A6 = FDB ADDR $ b P* A8 = ECB ADDR $ | P* A9 == USER ECB $ P* $ PDMTIOZ LDR A6,A1 $ P LD A2,DWTOR,A6 ORDER $ P ANK A2,/3F $ P CWK A
0x228580…29d200 [0x38f]: Pad {f00=0x009f, f01=0x0190, f02=»DB DATA FILE $ ~ PDMTIZ1 EQU * % P LD A9,DWTECB,A1 USER ECB % ( P RB DMTIT0 % J P EJECT DMSUBR % 8 P****DESCRIPTION************************************* % t P* % 8 P* GTBKBU WILL GET A BLOCK BUFFER FOR DISC I/O AND % 2 P* PREPARE IT. ECB
0x228580…29d200 [0x390]: Pad {f00=0x009f, f01=0x0190, f02=» % | , P* FDB-CEX,ECB,SNR,RRO & 8 P* ECB-FC,CW,BA,DWT-OR,ECB,EXTDMI & 8 P* A8 = ECB ADDR & t P* & 8 P****EXIT PARAMETERS********************************* & P* & P* A1 = A6 = FDB ADDR & 0 P* A2 = FDBRR
0x228580…29d200 [0x391]: Pad {f00=0x009f, f01=0x0190, f02=» THE FOUND CORE BUFFER & v P* A3 = BUFFER ADDRESS ' & P* A5 = ORDE R CODE ' F P* A8 = ECB ADDR ' b P* A9 = DM ECB ADDR ' | P* ' 8 P****USED REGISTERS********************************** ' P* ' P* A1 - A9 ' P* ' : P****
0x228580…29d200 [0x392]: Pad {f00=0x009f, f01=0x0190, f02=»RENT EXTENT BLOCK POINTER ' | P LD A1,EXTDMI,A4 DMIDENT, FC ( " " P LD A2,FDBSNR,A6 SECTOR NUMBER ( F P LD A9,DWTECB,A6 DM ECB ( l P ANK A1,/FF =1 ( $ P STR A1,A8 DISC VOL FILE CODE =1 ( P LDR A4,A2 SAVE ( P LDKL A5,SECTLE ( " P ST A5,ECBRL,A
0x228580…29d200 [0x393]: Pad {f00=0x009f, f01=0x0190, f02=»SECTOR MUST BE READ FROM DISC ( P LDKL A2,-1 RET CODE ) & PGTB040 EQU * ) B P ST A4,ECBCW,A8 SECTOR NR ) V P LDR A5,A3 ) x 2 P ADKL A5,BUFSTA A5 = DATA BUFFER START ADDRESS ) P ST A5,ECBBA,A8 ) P LD A5,DWTOR,A6 ) P ANK A5,/3F ) ( P LDR A
0x228580…29d200 [0x394]: Pad {f00=0x009f, f01=0x018e, f02=» ORDER CODE ) P EJECT DMSUBR * 8 P****DESCRIPTION************************************* * , P* * h D P* GTLGRN WILL CONVERT FDBSNR AND FDBRRO TO A LOGICAL RECORD NO * r P* * 8 P****ENTRY PARAMETERS******************************** * P* * P
0x228580…29d200 [0x395]: Pad {f00=0x009f, f01=0x0190, f02=» * Z P* + P* A1=A5=A6= FDB ADDRESS + P* A2,A3 = LOG RECORD NO + 4 P* + V 8 P****USED REGISTERS********************************** + ` P* + P* A1 - A7 + P* + : P****************************************************** + P EJECT
0x228580…29d200 [0x396]: Pad {f00=0x009f, f01=0x0190, f02=» + p P LD A7,FDBCEX,A1 EXT ADDR , ( P ADKL A7,EXTLEN ADDR TO LAST LENGTH , * PGTL050 EQU * , V P CWR A3,A7 , j . P RF(E) GTL100 ALL PREVIOUS EXTENTS COUNTED , | ( P* NOTE THAT ONLY (E) CAN BE TESTED , $ P ADR* A6,A3 NO OF SECT IN EXTENT , $ P ADKL A3
0x228580…29d200 [0x397]: Pad {f00=0x009f, f01=0x0190, f02=»OTAL NO OF SECTORS , ~ ( P AD A6,FDBSNR,A1 TOTAL NR OF SECTORS - P* - F ( P* CONVERT FDBRRO TO NO OF RECORDS - P P* - | P LDK A7,0 - " P LC A7,FDBBLF,A1 BLOCK FACTOR - P LDR A5,A1 SAVE FDB ADDR - P CF A14,MPYMOD A1,A2=A6*A7 - P LD A4,FDB
0x228580…29d200 [0x398]: Pad {f00=0x00a0, f01=0x0190, f02=» PGTL150 EQU * . P ADK A7,1 RECORD COUNTER . P SUR A6,A4 . 8 * P RB(NN) GTL150 COUNT RECORDS IN SECTOR . J P* . x , P* ADD SECT*BLOCFACT AND RECINCURRSECT . P* . P ADR A2,A7 . P RF(O) GTL160 OVERFLOW . P RF GTL170 . PGTL160 EQU *
0x228580…29d200 [0x399]: Pad {f00=0x00a0, f01=0x0190, f02=» LDR A1,A5 FDB ADDR . P LDR A6,A5 / P RTN A14 / . P EJECT DMSUBR / > P* / V P* / ` P IFT MMUPAG=1 / j P* / P* M O V : U S / P* / D P* THIS ROUTINE MOVES DATA FROM THE USER AREA (SENDING BUFFER) TO / L P* THE SYSTEM AREA (RECEI
0x228580…29d200 [0x39a]: Pad {f00=0x00a0, f01=0x0190, f02=»* / 8 P* INPUT: A1 = ADDRESS OF SENDING BUFFER (USER AREA) 0 < P* A2 = ADDRESS OF RECEIVING BUFFER (SYSTEM AREA) 0 F . P* A3 = NUMBER OF BYTES TO BE MOVED 0 P* 0 " P* OUTPUT: A1-A4 ARE DESTROYED 0 P* 0 , PMOV:US LDR A3,A3 CHECK R
0x228580…29d200 [0x39b]: Pad {f00=0x00a0, f01=0x0190, f02=»ER ADDRESS 0 v P ANK A4,1 1 . P RF(NZ) MVUS40 USER BUFFER ADDRESS UNEVEN? 1 $ . P LDR A4,A2 NO, CHECK SYSTEM BUFFER ADDRESS 1 V P ANK A4,1 1 0 P RF(NZ) MVUS55 SYSTEM BUFFER ADDRESS UNEVEN? 1 P* 1 , PMVUS10 LDR A4,A3 CHECK REQUESTED LENGTH 1 P A
0x228580…29d200 [0x39c]: Pad {f00=0x00a0, f01=0x0190, f02=»5 1 t P* 2 PMVUS35 RTN A14 2 P* 2 * P EJECT DMSUBR 2 4 P* 2 L P* 2 V 0 PMVUS40 EQU * USER BUFFER ADDRESS WAS UNEVEN 2 ` * P LDR A4,A2 CHECK SYSTEM BUFFER ADDRESS 2 P ANK A4,1 2 0 P RF(NZ) MVUS80 SYSTEM BUFFER ADDRESS UNEVEN? 2 4 P E
0x228580…29d200 [0x39d]: Pad {f00=0x00a0, f01=0x0190, f02=» SYSTEM BUFFER ADDRESS 2 ( P SUK A3,1 DECREMENT REQUESTED LENGTH 3 $ P RB(NP) MVUS30 LAST CHAR. MOVED? 3 J , P ADK A1,2 NO, UPDATE USER BUFFER ADDRESS 3 r P* 3 8 PMVUS55 ELR A4,A1 GET NEXT TWO CHAR. FROM USER BUFFER 3 P ECR A5,A4 3 0 P SCR A5,A2 STORE
0x228580…29d200 [0x39e]: Pad {f00=0x00a0, f01=0x0190, f02=»VUS50 MORE CHAR. TO MOVE? 3 P RB MVUS30 NO, RETURN 4 " P* 4 @ P EJECT DMSUBR 4 J P* 4 b P* 4 l , PMVUS60 EQU * REQUESTED LENGTH WAS UNEVEN 4 v ( P SUK A3,1 MAKE REQUESTED LENGTH EVEN 4 * P RF(NP) MVUS70 ONLY ONE CHAR. TO MOVE? 4 P LDR A4,A1
0x228580…29d200 [0x39f]: Pad {f00=0x00a0, f01=0x0190, f02=»FROM USER BUFFER 4 v P* 5 PMVUS65 ECR A5,A5 5 " 0 P SCR A5,A2 STORE LAST CHAR. IN SYSTEM BUFFER 5 : P RB MVUS30 RETURN 5 n P* 5 4 PMVUS70 ELR A5,A1 GET LAST CHAR. FROM USER BUFFER 5 P RB MVUS65 5 P* 5 2 PMVUS80 EQU * BOTH BUFFER ADDRESSES W
0x228580…29d200 [0x3a0]: Pad {f00=0x00a0, f01=0x0190, f02=»UPDATE BUFFER ADDRESSES 5 P ADK A2,1 6 ( P SUK A3,1 DECREMENT REQUESTED LENGTH 6 2 & P RB(P) MVUS10 MORE CHAR. TO MOVE? 6 ^ P RB MVUS30 NO, RETURN 6 P* 6 P EJECT DMSUBR 6 P* 6 P* M O V : S U 6 P* 6 F P* THIS ROUTINE MOVES DAT
0x228580…29d200 [0x3a1]: Pad {f00=0x00a0, f01=0x0190, f02=»USED, DEPENDING ON WHETHER THE BUFFER ADDRESSES ARE EVEN OR NOT. 6 P* 7 H : P* INPUT: A1 = ADDRESS OF SENDING BUFFER (SYSTEM AREA) 7 R : P* A2 = ADDRESS OF RECEIVING BUFFER (USER AREA) 7 . P* A3 = NUMBER OF BYTES TO BE MOVED 7 P* 7 " P
0x228580…29d200 [0x3a2]: Pad {f00=0x00a0, f01=0x0190, f02=»F REQUESTED LENGTH <= 0 7 x P STR A5,A14 SAVE A5 8 ( P LDR A4,A2 CHECK USER BUFFER ADDRESS 8 < P ANK A4,1 8 h . P RF(NZ) MVSU40 USER BUFFER ADDRESS UNEVEN? 8 z . P LDR A4,A1 NO, CHECK SYSTEM BUFFER ADDRESS 8 P ANK A4,1 8 0 P RF(NZ) MVSU60 SYSTEM BUFF
0x228580…29d200 [0x3a3]: Pad {f00=0x00a0, f01=0x018e, f02=»UNEVEN? 8 p P* 9 PMVSU20 MVSU A3 9 P* 9 0 " PMVSU30 LDR* A5,A14 RESTORE A5 9 : P* 9 ` PMVSU35 RTN A14 9 j P* 9 P EJECT DMSUBR 9 P* 9 P* 9 0 PMVSU40 EQU * USER BUFFER ADDRESS WAS UNEVEN 9 * P LDR A4,A1 CHECK SYSTEM BUFFER A
0x228580…29d200 [0x3a4]: Pad {f00=0x00a0, f01=0x0190, f02=» 9 ^ P RF MVSU65 : P* : 2 PMVSU60 EQU * SYSTEM BUFFER ADDRESS WAS UNEVEN : $ 0 P LCR A4,A1 GET ONE CHAR. FROM SYSTEM BUFFER : Z P ECR A4,A4 : * P ADK A1,1 UPDATE SYSTEM BUFFER ADDRESS : ( P SUK A3,1 DECREMENT REQUESTED LENGTH : * P RF(NP) MVSU70 I
0x228580…29d200 [0x3a5]: Pad {f00=0x00a0, f01=0x0190, f02=»ER BUFFER : p & P ADK A1,1 UPDATE BUFFER ADDRESSES ; P ADK A2,2 ; < ( P SUK A3,1 DECREMENT REQUESTED LENGTH ; N & P RB(P) MVSU60 MORE CHAR. TO MOVE? ; z P RB MVSU30 NO, RETURN ; P* ; 4 PMVSU70 ELR A3,A2 GET LAST CHAR. FROM USER BUFFER ; $ P ANK A
0x228580…29d200 [0x3a6]: Pad {f00=0x00a0, f01=0x018e, f02=»FFER ; j P RB MVSU30 RETURN < P* < & P EJECT DMSUBR < 0 P* < H P* < R 2 PMVSU80 EQU * BOTH BUFFER ADDRESSES WERE UNEVEN < 2 P LDR* A4,A1 GET FIRST CHAR. FROM SYSTEM BUFFER < 0 P ELR A5,A2 GET FIRST CHAR. FROM USER BUFFER < $ P ANK A4,/FF SK
0x228580…29d200 [0x3a7]: Pad {f00=0x00a0, f01=0x0190, f02=» < b & P ADK A1,1 UPDATE BUFFER ADDRESSES = P ADK A2,1 = 2 ( P SUK A3,1 DECREMENT REQUESTED LENGTH = D * P RB(P) MVSU10 MORE CHARACTERS TO MOVE? = p P RB MVSU30 NO, RETURN = P* = , PMVSU90 EQU * REQUESTED LENGTH WAS UNEVEN = ( P SUK A3,1 MAKE REQUE
0x228580…29d200 [0x3a8]: Pad {f00=0x00a0, f01=0x0190, f02=» = & P ADR A4,A5 UPDATE BUFFER ADDRESSES > P ADR A2,A5 > 2 2 P LDR* A4,A4 GET LAST CHAR. FROM SYSTEM BUFFER > D P RB MVSU70 > z P* > 8 PMVSU95 LDR* A4,A1 GET LAST CHAR. FROM SYSTEM BUFFER > P RB MVSU70 > P XIF > P* > P IFT MMUPAG=0 >
0x228580…29d200 [0x3a9]: Pad {f00=0x00a0, f01=0x402e, f02=»IF > P* ? P* ? P END ? @ ? * P ADR A2,A5 > 2 2 P LDR* A4,A4 GET LAST CHAR. FROM SYSTEM BUFFER > D P RB MVSU70 > z P* > 8 PMVSU95 LDR* A4,A1 GET LAST CHAR. FROM SYSTEM BUFFER > P RB MVSU70 > P XIF > P* > P IFT MMUPAG=0 >
0x228580…29d200 [0x3aa]: Pad {f00=0x00a0, f01=0x2008, f02=» @ + t P INH , P CF A15,TENDIO , P ENB , 2 P* , > P* EXIT , H P* , X P LKM , b P DATA 3 , n P* , ~ P END , @ , RD ADDR A2:=EA BIT + & P C1R A2,A2 ONE COMPLEMENT BIT MASK + P ANRS A2,A3 SET OFF EA BIT + P* + P
0x228580…29d200 [0x3ab]: Pad {f00=0x00a0, f01=0x0190, f02=» v PEND1 ADK A3,/81 B PEND0 SLL A3,1 ********************************** ( P ANK.L A3,/0300 n P LDK.L A4,/FCFF P AN.S A4,2,A14 B P OR.S A3,2,A14 UPDATE CR IN PSW CALLING
0x228580…29d200 [0x3ac]: Pad {f00=0x00a0, f01=0x0190, f02=»N ^ P RF(6) BB 6 P C1R A1,A1 DIVIDEND- .DIVISOR - & . P ADK A1,1 REMAINDER - ` PBB ADK A2,0 P RB(0) END0 P RB(2) END2 P RB(7) END1 P
0x228580…29d200 [0x3ad]: Pad {f00=0x00a0, f01=0x4056, f02=» LDK A1,0 P RB(7) END P XIF 2 P END >@ R - & . P ADK A1,1 REMAINDER - ` PBB ADK A2,0 P RB(0) END0 P RB(2) END2 P RB(7) END1 P
0x228580…29d200 [0x3ae]: Pad {f00=0x00a0, f01=0x2008, f02=» A2,0 P RB(0) END0 P RB(2) END2 2 P RB(7) END1 P PCASSPE LDR A7,A1 n P LDR A1,A2 P CWK A1,/8000 P RB(4) END P LDK A1,0 P
0x228580…29d200 [0x3af]: Pad {f00=0x00a0, f01=0x018e, f02=» 4 | P XIF 5 P IFT CHR14=1 5 & P CCK A7,/1414 SPECIAL CHARACTER ? 5 ( P RF(E) PRB230 YES 5 R P XIF 5 l P* 5 x " P LDK A1,CCERR CODE CHECK ERROR 5 * P ORS A1,ECBRC,A8 STORE IN RETURN CODE 5 P LD A7,DWTOR,A6 GET ORDER 5 P ANK A7,/FF 5
0x228580…29d200 [0x3b0]: Pad {f00=0x00a0, f01=0x0190, f02=» P ADK A1,1 P ADK A3,1 P RB DMTBM ( PDMTB10 RTN A14 : P* P 2 P* DMTBMR HAS THE SAME FUNCTION AS DMTBM BUT Z P* MOVES FROM THE END P* PDMTBMR ADR A1,A2 P ADR A3,A2 PDMTB20 SUK A2,1 P RB(N) DMTB10
0x228580…29d200 [0x3b1]: Pad {f00=0x00a0, f01=0x0002, f02=»
0x228580…29d200 [0x3b2]: Pad {f00=0x00a0, f01=0x0190, f02=» 2 P IDENT CTAB01 REL 9.2 79-11-16 870105040920 P : P* B P* CODE CONVERSION TABLE L P* n P* x P ENTRY CTAB01 P* P* * PC0 EQU 0 CODE CONVERSION COLUMN NO. 0 ( PC1 EQU 0 1 < PC2 D
0x228580…29d200 [0x3b3]: Pad {f00=0x00a0, f01=0x415a, f02=» 4 r ( PC5 EQU 0 5 ( PC6 EQU 0 6 : ( PC7 EQU 0 7 f P* P* P* PCTAB01 DATA C0 P DATA C1 P DATA C2 P DATA C3 P DATA C4 P DAT
0x228580…29d200 [0x3b4]: Pad {f00=0x00a0, f01=0x2008, f02=» C7 EQU 0 7 * 4 * > * H CTABX DATA C1 R DATA C2 h DATA C2 x DATA C3 DATA C4 DATA C5 DATA C6 DATA C7 * * END @ 3
0x228580…29d200 [0x3b5]: Pad {f00=0x00a0, f01=0x0190, f02=»D | P EXTRN DWTTDM,DWTTQ P EXTRN QTJOB & P EXTRN ECBRL,SECTLE : P EXTRN DIVMOD,MPYMOD V P EXTRN EXTELE r P EXTRN CRNTID P EXTRN DMTGBU P EXTRN EXTLEN,EXTBAS P EXTRN CRNQUE,GETBLK,FREQUE P EXTRN HALT P E
0x228580…29d200 [0x3b6]: Pad {f00=0x00a0, f01=0x0190, f02=»UTINE t P EJECT DMSUBR TOSSIO P* . P* 8 . P***************************************** B P* t P* CONDITIONAL ASSEMBLY ~ P* . P***************************************** P* . P* A PROGRAM VERSION USING TOSS MMU PAGIN
0x228580…29d200 [0x3b7]: Pad {f00=0x00a0, f01=0x0190, f02=»CHKIND IS USED FROM FNDDWT TO SELECT DM-DWT 2 P* INDEX FILE (INDEX 0) SHALL BE SELECTED FOR 4 ( P* DX,IX,XR,XN, DATA FILE OTHERWISE j P* PCHKIND EQU * P STR A1,A15 P STR A2,A15 " P LDK A2,1 INDEX FOR DATA FILE P LDR A1,
0x228580…29d200 [0x3b8]: Pad {f00=0x00a1, f01=0x0190, f02=»AD x P ANK A1,/3E REMOVE BIT 15 P SUK A1,/1E , 4 P RF(E) FND320 INSERT INDEX OR INDEXED READ NEXT @ P RF FND340 x ( PFND320 LDK A2,0 INDEX FOR INDEX FILE PFND340 EQU * P CCR A2,A6 INDEX P RF(E) FND390 ENTRY FOUND P LDK A
0x228580…29d200 [0x3b9]: Pad {f00=0x00a1, f01=0x0002, f02=»
0x228580…29d200 [0x3ba]: Pad {f00=0x00a1, f01=0x0190, f02=» 2 P IDENT CTAB02 REL 9.2 79-11-16 870105040920 P : P* B P* CODE CONVERSION TABLE L P* n P* x P ENTRY CTAB02 P* P* * PC0 EQU 0 CODE CONVERSION COLUMN NO. 0 ( PC1 EQU 0 1 < PC2 D
0x228580…29d200 [0x3bb]: Pad {f00=0x00a1, f01=0x416e, f02=» 4 ( PC5 EQU 0 5 " ( PC6 EQU 0 6 N ( PC7 EQU 0 7 z P* P* P* PCTAB02 DATA C0 P DATA C1 P DATA C2 P DATA C3 P
0x228580…29d200 [0x3bc]: Pad {f00=0x00a1, f01=0x2008, f02=» C7 EQU 0 7 * 4 * > * H CTABX DATA C1 R DATA C2 h DATA C2 x DATA C3 DATA C4 DATA C5 DATA C6 DATA C7 * * END @ 3
0x228580…29d200 [0x3bd]: Pad {f00=0x00a1, f01=0x018e, f02=»* = -1 EA FOUND FO R OTHER TASK P* . 8 P****USED REGISTERS********************************** 8 P* t P* A1 - A4 ~ P EJECT DMSUBR PEATEST EQU * " P LD A4,FDBEAL,A1 BUFFER QUEUE P RF EAT030 PEAT020 EQU * P
0x228580…29d200 [0x3be]: Pad {f00=0x00a1, f01=0x018e, f02=» P* P CC A2,3,A4 FIRST CHAR P RB(NE) EAT020 , P CW A3,4,A4 2 AND 3 CHAR B P RB(NE) EAT020 b P* x P* RECORD NO FOUND P* P LC A4,2,A4 P CC A4,FDBTNR,A1 TASK ID P RF(E) EAT060 P LDKL A4,-1 EA OTHER TAS
0x228580…29d200 [0x3bf]: Pad {f00=0x00a1, f01=0x0190, f02=» ~ 8 P****DESCRIPTION************************************* P* D B P* EASETB WILL UNCONDITIONALLY PUT A NEW EA BUFFER IN EA-LINK N L P* IF NO BUFFERS ARE AVAILABLE THE SYSTEM WILL HALT AND LITE SOP-LAMPS P* 8 P****ENTRY PARAMETERS********
0x228580…29d200 [0x3c0]: Pad {f00=0x00a1, f01=0x0190, f02=»EXIT PARAMETERS********************************* P* 8 P* A1 = UNCHANGED B ( P* A2 = ADDRESS OF FOUND CRN-BUFFER P* 8 P****USED REGISTERS********************************** P* P* A1 - A4 P EJECT DMSUBR PCRNGET
0x228580…29d200 [0x3c1]: Pad {f00=0x00a1, f01=0x0002, f02=» 0
0x228580…29d200 [0x3c2]: Pad {f00=0x00a1, f01=0x0190, f02=» 2 P IDENT CTAB03 REL 9.2 79-11-16 870105040920 P : P* B P* CODE CONVERSION TABLE L P* n P* x P ENTRY CTAB03 P* P* * PC0 EQU 0 CODE CONVERSION COLUMN NO. 0 ( PC1 EQU 0 1 < PC2 D
0x228580…29d200 [0x3c3]: Pad {f00=0x00a1, f01=0x416e, f02=» 4 ( PC5 EQU 0 5 " ( PC6 EQU 0 6 N ( PC7 EQU 0 7 z P* P* P* PCTAB03 DATA C0 P DATA C1 P DATA C2 P DATA C3 P
0x228580…29d200 [0x3c4]: Pad {f00=0x00a1, f01=0x2008, f02=» C7 EQU 0 7 * 4 * > * H CTABX DATA C1 R DATA C2 h DATA C2 x DATA C3 DATA C4 DATA C5 DATA C6 DATA C7 * * END @ 3
0x228580…29d200 [0x3c5]: Pad {f00=0x00a1, f01=0x0190, f02=» P* A6 = UNCHANGED $ P* IN FDB : FDBSNR = SECTOR NR , P* FDBRRO = OFFSET IN SECTOR F * P* FDBCEX = CURRENT EXTENT v P* 8 P****USED REGISTERS********************************** P* P* A1 - A9 P E
0x228580…29d200 [0x3c6]: Pad {f00=0x00a1, f01=0x0190, f02=»DK A6,0 $ P LC A6,FDBBLF,A5 BLOCKING FACTOR , P CF A14,DIVMOD A2=A1,A2//A6,A1=REMAINDER 8 P RF(O) TIOD99 OVERFLOW h P LDR A3,A2 QUOTIENT P LDR A6,A5 FDB ADDR P LDR A2,A1 REMAINDER P RF(Z) TIOD30 REST = 0 $ P ADK A3,1 RECORD I
0x228580…29d200 [0x3c7]: Pad {f00=0x00a1, f01=0x018e, f02=» PTIOD40 EQU * P LDR A4,A6 & P ADKL A4,FDBEXT FIRST FILE EXTENT * , P LD A9,EXTLEN,A4 LENGTH OF FIRST EXTENT T P LDK A5,4 NUMBER OF EXTENTS PTIOD45 CWR A3,A9 ( P RF(NG) TIOD55 SECTOR IN THIS EXTENT P SUK A5,1 NO & P RF(NP) TI
0x228580…29d200 [0x3c8]: Pad {f00=0x0069, f01=0x0190, f02=» r P* 6 P* DISPLACEMENTS IN SEGTAB, PAGTAB, SWBTAB AND T:A P* L PSEG:ST EQU 0 STATUS V $ PSEG:DS EQU 2 DISC SECTOR ADDRESS r " PSEG:EL EQU 4 EFFECTIVE LENGTH $ PSEG:PB EQU 6 PAGE BLOCK ADDRESS P* & PPAG:QF EQU 0 QUEUE POINT
0x228580…29d200 [0x3c9]: Pad {f00=0x0069, f01=0x0002, f02=»
0x228580…29d200 [0x3ca]: Pad {f00=0x0069, f01=0x0190, f02=» 2 P IDENT DVKB00 REL 9.2 79-11-16 870105040920 P : " P* KEYBOARD DEVICE WORK TABLE B P* h P ENTRY DVKB00 TABLE ENTRY r P EXTRN CTAB01 ( P EXTRN KBAD POINTER TO ADDRESSBLOCK P EXTRN DVDY00 PMMUPAG EQU 1 P* P
0x228580…29d200 [0x3cb]: Pad {f00=0x0069, f01=0x0190, f02=»ADDRESS P DATA DWTEND-DVKB00 ORDER ( P DATA KBAD POINTER TO ADDRESS BLOCK 2 P DATA 'KB' TTAB-ADDRESS ^ $ P DATA 0 WAIT/ACTIVATE INDICATOR ~ P DATA 0 TERMINAL QUEUE IFT MMUPAG=1 & " DATA 0 SAVE AREA USER ECB ADDRESS DATA
0x228580…29d200 [0x3cc]: Pad {f00=0x0069, f01=0x0190, f02=»REA FOR A4 P DATA 0 SAVE AREA FOR A5 P RES 4 DWT-STACK 2 P DATA 0 TIMER POINTER J P DATA DVDY00 DVDY00O DEVICE h $ P DATA /95A3 BACKSPACE AND CANCEL $ P DATA /FFBA EOR AND DOUBLE ZERO 6 P DATA DWTSQ+DVKB00 POINTER TO FIRST PLACE IN Q
0x228580…29d200 [0x3cd]: Pad {f00=0x0069, f01=0x40fc, f02=»0,0,0,0,0,0,0 P DATA 0,0,0,0 P IFT MMUPAG=1 , PDEVECB EQU * B P DATA 0,0,0,0,0,0 V P DATA 0,0,0,0,0,0,0,0 p P DATA 0,0,0,0,0,0,0,0 P DATA 0,0,0,0 P XIF PDWTEND EQU * P* P END @ RST PLACE IN Q
0x228580…29d200 [0x3ce]: Pad {f00=0x0069, f01=0x2008, f02=» BLE ZERO 6 P DATA DWTSQ+DVTKB POINTER TO FIRST PLACE IN QUEUE 4 P DATA DWTSQ+DVTKB POINTER TO LAST PLACE IN QUEUE R PDWTSQ EQU *-DVTKB P RES 0 P* P END @ 0 SAVE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P RES
0x228580…29d200 [0x3cf]: Pad {f00=0x0069, f01=0x0190, f02=» P XRR A13,A13 P XRR A14,A14 P LD A1,SCTBUG 0 P ABR(NZ) A1 F P HLT Z P f P EJECT SYSTAB n P P* P* SYSTEM CONTROL TABLE P* P PSCT EQU * P * PSCTMSZ DATA 0 MEMORY SIZE MOD K BYTES
0x228580…29d200 [0x3d0]: Pad {f00=0x0067, f01=0x0190, f02=»KWARD t ( P EXTRN TTB:SB SEGMENT BLOCK POINTER & P EXTRN TTB:PW PROGRAM STATUS WORD : 2 P EXTRN TTB:SA FIRST WORD OF SAVE AREA IN TTAB d " P EXTRN LKMAL LKM REQUEST TABLE P EJECT LRPINT P* P* . P******************************
0x228580…29d200 [0x3d1]: Pad {f00=0x0067, f01=0x0002, f02=»
0x228580…29d200 [0x3d2]: Pad {f00=0x0067, f01=0x0190, f02=» 2 P IDENT DVDY00 REL 9.2 79-11-16 870105040920 P : * P* DEVICE WORK TABLE FOR VIDEO DISPLAY B P* p P ENTRY DVDY00 TABLE ENTRY z P* P* ( P EXTRN DYAD POINTER TO ADDRESS BLOCK PMMUPAG EQU 1 P* PDVDY00 EQU * TAB
0x228580…29d200 [0x3d3]: Pad {f00=0x0067, f01=0x0190, f02=» DATA DWTEND-DVDY00 ORDER ( P DATA DYAD POINTER TO ADDRESS-BLOCK " P DATA 'DY' TTAB-ADDRESS N $ P DATA 0 WAIT/ACTIVATE INDICATOR n P DATA 0 TERMINAL QUEUE IFT MMUPAG=1 & " DATA 0 SAVE AREA USER ECB ADDRESS DATA DEVECB MMU ECB A
0x228580…29d200 [0x3d4]: Pad {f00=0x0067, f01=0x4158, f02=»VE AREA FOR A5 P RES 4 DWT-STACK P DATA 0 TIMER POINTER . P DATA /101 CURSOR POINTER L * P DATA /1850 LEFT BYTE=NUMBER OF LINES n " P RIGHT BYTE=CHARACTERS/LINE P DATA 0 BUFFER INDEX P IFT MMUPAG=1 PDEVECB DATA 0,0,0,0,0,
0x228580…29d200 [0x3d5]: Pad {f00=0x0067, f01=0x2008, f02=» S-BLOCK | P DATA 0 TTAB-ADDRESS $ P DATA 0 WAIT/ACTIVATE INDICATOR 4 P DATA 0 TERMINAL QUEUE P DATA 0 OUTPUT QUEUE LINK z P DATA 0 SAVE AREA FOR A3 P DATA 0 SAVE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P RES 4 DWT-STA
0x228580…29d200 [0x3d6]: Pad {f00=0x0067, f01=0x2008, f02=» BLE ZERO 6 P DATA DWTSQ+DVTKB POINTER TO FIRST PLACE IN QUEUE 4 P DATA DWTSQ+DVTKB POINTER TO LAST PLACE IN QUEUE R PDWTSQ EQU *-DVTKB P RES 0 P* P END @ 0 SAVE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P RES
0x228580…29d200 [0x3d7]: Pad {f00=0x0067, f01=0x0190, f02=» ORDER v EXTRN DWTA2 SAVE AREA A2 EXTRN DWTA5 SAVE AREA A5 0 & ! EXTRN DWTSB2 STACK BASE 2 IN DWT R ( P EXTRN SCTPLD PROGRAM LOADING DEVICE | ( P EXTRN SAVE8 SAVE A1-A8 ON A15 STACK P EXTRN SETIMP TIMER & P EXTRN INTSAV INTERRUPT SA
0x228580…29d200 [0x3d8]: Pad {f00=0x00aa, f01=0x0190, f02=» P LD A2,MXIND 6 P SUR A2,A5 6 P SUK A2,2 NO OF CHAR 6 * P CF A14,DMTWM MOVE UOP 6 F P RF DMT894 6 d PDMT890 EQU * 6 v P LDKL A4,/7FFF 6 & P ANS A4,MXIND+4,A5 REMOVE USE BIT 6 P XIF 6 P EJECT 6 PDMT894 EQU * 6 0 P LDKL A10,1 MARK T
0x228580…29d200 [0x3d9]: Pad {f00=0x00aa, f01=0x0002, f02=» @
0x228580…29d200 [0x3da]: Pad {f00=0x00aa, f01=0x0190, f02=» 2 P IDENT DVKB01 REL 9.2 79-11-16 870105040920 P : " P* KEYBOARD DEVICE WORK TABLE B P* h P ENTRY DVKB01 TABLE ENTRY r P EXTRN CTAB02 ( P EXTRN KBAD POINTER TO ADDRESSBLOCK P EXTRN DVDY01 PMMUPAG EQU 1 P* P
0x228580…29d200 [0x3db]: Pad {f00=0x00aa, f01=0x0190, f02=»ADDRESS P DATA DWTEND-DVKB01 ORDER ( P DATA KBAD POINTER TO ADDRESS BLOCK 2 P DATA 'KB' TTAB-ADDRESS ^ $ P DATA 0 WAIT/ACTIVATE INDICATOR ~ P DATA 0 TERMINAL QUEUE IFT MMUPAG=1 & " DATA 0 SAVE AREA USER ECB ADDRESS DATA
0x228580…29d200 [0x3dc]: Pad {f00=0x00aa, f01=0x0190, f02=»REA FOR A4 P DATA 0 SAVE AREA FOR A5 P RES 4 DWT-STACK 2 P DATA 0 TIMER POINTER J P DATA DVDY01 DVDY01O DEVICE h $ P DATA /8791 BACKSPACE AND CANCEL $ P DATA /FFBA EOR AND DOUBLE ZERO 6 P DATA DWTSQ+DVKB01 POINTER TO FIRST PLACE IN Q
0x228580…29d200 [0x3dd]: Pad {f00=0x00aa, f01=0x40fc, f02=»0,0,0,0,0,0,0 P DATA 0,0,0,0 P IFT MMUPAG=1 , PDEVECB EQU * B P DATA 0,0,0,0,0,0 V P DATA 0,0,0,0,0,0,0,0 p P DATA 0,0,0,0,0,0,0,0 P DATA 0,0,0,0 P XIF PDWTEND EQU * P* P END @ RST PLACE IN Q
0x228580…29d200 [0x3de]: Pad {f00=0x00aa, f01=0x2008, f02=» BLE ZERO 6 P DATA DWTSQ+DVTKB POINTER TO FIRST PLACE IN QUEUE 4 P DATA DWTSQ+DVTKB POINTER TO LAST PLACE IN QUEUE R PDWTSQ EQU *-DVTKB P RES 0 P* P END @ 0 SAVE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P RES
0x228580…29d200 [0x3df]: Pad {f00=0x00aa, f01=0x0190, f02=»SET FDB FREE < PDMTA40 EQU * = * P CF A14,CLRBUF REMOVE ALL FREE BUFFERS = ( P LDR A1,A7 NEW FDB ADDR = V P ABL(Z) DMTERX NO MORE FDBS = v P IFT INDXAC=1 = P ENB ENB = P* = 4 P* FIND WHICH DMTASK IS NEXT AND ACTIVATE THAT = P* =
0x228580…29d200 [0x3e0]: Pad {f00=0x00a8, f01=0x2008, f02=»
0x228580…29d200 [0x3e1]: Pad {f00=0x00a8, f01=0x0002, f02=»
0x228580…29d200 [0x3e2]: Pad {f00=0x00a8, f01=0x0190, f02=» 2 P IDENT DVDY01 REL 9.2 79-11-16 870105040920 P : * P* DEVICE WORK TABLE FOR VIDEO DISPLAY B P* p P ENTRY DVDY01 TABLE ENTRY z P* P* ( P EXTRN DYAD POINTER TO ADDRESS BLOCK PMMUPAG EQU 1 P* PDVDY01 EQU * TAB
0x228580…29d200 [0x3e3]: Pad {f00=0x00a8, f01=0x0190, f02=» DATA DWTEND-DVDY01 ORDER ( P DATA DYAD POINTER TO ADDRESS-BLOCK " P DATA 'DY' TTAB-ADDRESS N $ P DATA 0 WAIT/ACTIVATE INDICATOR n P DATA 0 TERMINAL QUEUE IFT MMUPAG=1 & " DATA 0 SAVE AREA USER ECB ADDRESS DATA DEVECB MMU ECB A
0x228580…29d200 [0x3e4]: Pad {f00=0x00a8, f01=0x4158, f02=»VE AREA FOR A5 P RES 4 DWT-STACK P DATA 0 TIMER POINTER . P DATA /101 CURSOR POINTER L * P DATA /1850 LEFT BYTE=NUMBER OF LINES n " P RIGHT BYTE=CHARACTERS/LINE P DATA 0 BUFFER INDEX P IFT MMUPAG=1 PDEVECB DATA 0,0,0,0,0,
0x228580…29d200 [0x3e5]: Pad {f00=0x00a8, f01=0x2008, f02=» S-BLOCK | P DATA 0 TTAB-ADDRESS $ P DATA 0 WAIT/ACTIVATE INDICATOR 4 P DATA 0 TERMINAL QUEUE P DATA 0 OUTPUT QUEUE LINK z P DATA 0 SAVE AREA FOR A3 P DATA 0 SAVE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P RES 4 DWT-STA
0x228580…29d200 [0x3e6]: Pad {f00=0x00a8, f01=0x2008, f02=» BLE ZERO 6 P DATA DWTSQ+DVTKB POINTER TO FIRST PLACE IN QUEUE 4 P DATA DWTSQ+DVTKB POINTER TO LAST PLACE IN QUEUE R PDWTSQ EQU *-DVTKB P RES 0 P* P END @ 0 SAVE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P RES
0x228580…29d200 [0x3e7]: Pad {f00=0x00a8, f01=0x018e, f02=»ERFLOW P RF SEQR20 PSEQR10 EQU * " P ANKL A2,/7FFF REMOVE OVERFLOW 4 P ADK A1,1 ADD CARRY Z PSEQR20 EQU * v P SC A1,ECBCW+3,A8 REC NO P ST A2,ECBCW,A8 P* $ P* CONTINUE AS FOR RANDOM READ P* P EJECT
0x228580…29d200 [0x3e8]: Pad {f00=0x00ab, f01=0x0190, f02=» RF(E) DMT460 SEQ WRITE U P LDK A4,QRD V P CWR A7,A4 V 4 P RF(E) DMT420 RAND DEL V F P LDK A4,QRDD V d P CWR A7,A4 V x ( P RF(E) DMT420 DELAYED RANDEOM DELETE V P IFT INDXAC=1 V P LDK A4,QDEL V P CWR A7,A4 V P RF(E) DMT420 INDEXED DE
0x228580…29d200 [0x3e9]: Pad {f00=0x00ab, f01=0x0002, f02=» `
0x228580…29d200 [0x3ea]: Pad {f00=0x00ab, f01=0x0190, f02=» 2 P IDENT DVKB02 REL 9.2 79-11-16 870105040920 P : " P* KEYBOARD DEVICE WORK TABLE B P* h P ENTRY DVKB02 TABLE ENTRY r P EXTRN CTAB03 ( P EXTRN KBAD POINTER TO ADDRESSBLOCK P EXTRN DVDY02 PMMUPAG EQU 1 P* P
0x228580…29d200 [0x3eb]: Pad {f00=0x00ab, f01=0x0190, f02=»ADDRESS P DATA DWTEND-DVKB02 ORDER ( P DATA KBAD POINTER TO ADDRESS BLOCK 2 P DATA 'KB' TTAB-ADDRESS ^ $ P DATA 0 WAIT/ACTIVATE INDICATOR ~ P DATA 0 TERMINAL QUEUE IFT MMUPAG=1 & " DATA 0 SAVE AREA USER ECB ADDRESS DATA
0x228580…29d200 [0x3ec]: Pad {f00=0x00ab, f01=0x0190, f02=»REA FOR A4 P DATA 0 SAVE AREA FOR A5 P RES 4 DWT-STACK 2 P DATA 0 TIMER POINTER J P DATA DVDY02 DVDY02O DEVICE h $ P DATA /8791 BACKSPACE AND CANCEL $ P DATA /FFBA EOR AND DOUBLE ZERO 6 P DATA DWTSQ+DVKB02 POINTER TO FIRST PLACE IN Q
0x228580…29d200 [0x3ed]: Pad {f00=0x00ab, f01=0x40fc, f02=»0,0,0,0,0,0,0 P DATA 0,0,0,0 P IFT MMUPAG=1 , PDEVECB EQU * B P DATA 0,0,0,0,0,0 V P DATA 0,0,0,0,0,0,0,0 p P DATA 0,0,0,0,0,0,0,0 P DATA 0,0,0,0 P XIF PDWTEND EQU * P* P END @ RST PLACE IN Q
0x228580…29d200 [0x3ee]: Pad {f00=0x00ab, f01=0x2008, f02=» BLE ZERO 6 P DATA DWTSQ+DVTKB POINTER TO FIRST PLACE IN QUEUE 4 P DATA DWTSQ+DVTKB POINTER TO LAST PLACE IN QUEUE R PDWTSQ EQU *-DVTKB P RES 0 P* P END @ 0 SAVE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P RES
0x228580…29d200 [0x3ef]: Pad {f00=0x00ab, f01=0x018e, f02=» LDR A13,A1 P ADKL A13,FDBECB ECB ADDR ] $ P CF A14,FNDKEY GET INDEX RECORD ] 6 ( PDMR006 EQU * FROM INDEXED READ NEXT ] ^ P LD A9,DWTECB,A1 ] P LDR A6,A1 FDB ADR ] P LDKL A8,FDBECB ] P ADR A8,A6 ECB ADDRESS ] P LDR A2,A2 RETURN CODE ]
0x228580…29d200 [0x3f0]: Pad {f00=0x00aa, f01=0x0190, f02=»+2,A9 E P ANK A2,/FF F P LD A3,ECBCW,A9 LOG REC NR F " P LDK A4,0 F D P CCR A4,A10 F V P RF(E) DMS010 FREE F j P IFT INDXAC=1 F P LDR A4,A7 F P SUK A4,QINS F P RF(E) DMEAER INDEXED INSERT F P XIF F P LDR A4,A7 F P SUK A4,
0x228580…29d200 [0x3f1]: Pad {f00=0x00aa, f01=0x0002, f02=» P
0x228580…29d200 [0x3f2]: Pad {f00=0x00aa, f01=0x0190, f02=» 2 P IDENT DVDY02 REL 9.2 79-11-16 870105040920 P : * P* DEVICE WORK TABLE FOR VIDEO DISPLAY B P* p P ENTRY DVDY02 TABLE ENTRY z P* P* ( P EXTRN DYAD POINTER TO ADDRESS BLOCK PMMUPAG EQU 1 P* PDVDY02 EQU * TAB
0x228580…29d200 [0x3f3]: Pad {f00=0x00aa, f01=0x0190, f02=» DATA DWTEND-DVDY02 ORDER ( P DATA DYAD POINTER TO ADDRESS-BLOCK " P DATA 'DY' TTAB-ADDRESS N $ P DATA 0 WAIT/ACTIVATE INDICATOR n P DATA 0 TERMINAL QUEUE IFT MMUPAG=1 & " DATA 0 SAVE AREA USER ECB ADDRESS DATA DEVECB MMU ECB A
0x228580…29d200 [0x3f4]: Pad {f00=0x00aa, f01=0x4158, f02=»VE AREA FOR A5 P RES 4 DWT-STACK P DATA 0 TIMER POINTER . P DATA /101 CURSOR POINTER L * P DATA /0824 LEFT BYTE=NUMBER OF LINES n " P RIGHT BYTE=CHARACTERS/LINE P DATA 0 BUFFER INDEX P IFT MMUPAG=1 PDEVECB DATA 0,0,0,0,0,
0x228580…29d200 [0x3f5]: Pad {f00=0x00aa, f01=0x2008, f02=» S-BLOCK | P DATA 0 TTAB-ADDRESS $ P DATA 0 WAIT/ACTIVATE INDICATOR 4 P DATA 0 TERMINAL QUEUE P DATA 0 OUTPUT QUEUE LINK z P DATA 0 SAVE AREA FOR A3 P DATA 0 SAVE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P RES 4 DWT-STA
0x228580…29d200 [0x3f6]: Pad {f00=0x00aa, f01=0x2008, f02=» BLE ZERO 6 P DATA DWTSQ+DVTKB POINTER TO FIRST PLACE IN QUEUE 4 P DATA DWTSQ+DVTKB POINTER TO LAST PLACE IN QUEUE R PDWTSQ EQU *-DVTKB P RES 0 P* P END @ 0 SAVE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P RES
0x228580…29d200 [0x3f7]: Pad {f00=0x00aa, f01=0x0190, f02=»NDXAC=1 L P IFT MMUPAG=0 M " P LD A2,FDBKA,A6 KEY START ADDR M & P LDR A3,A2 M L " P AD A2,ECBBA,A9 KEY IN BUFFER M ^ P XIF M P* M P IFT INDXAC=1 M P AD A3,FDBRRO,A1 M P ADR A3,A11 KEY IN FILE M P LDK A7,0 M " P LD A6,FDBRLE,A6
0x228580…29d200 [0x3f8]: Pad {f00=0x00ac, f01=0x0190, f02=» u P ST A2,-28,A14 v P ST A3,-26,A14 v P EJECT v 4 P* v B : P* BELOW IS A NEW INDEX RECORD INSERTED AND FOLLOWING v L $ P* USED RECORDS ROLLED FORWARD v $ P* A6,A11,A13 IS USED AT ENTRY v $ P ADKL A11,7 RECORD LENGTH TOTAL v P* v
0x228580…29d200 [0x3f9]: Pad {f00=0x00ac, f01=0x0002, f02=»
0x228580…29d200 [0x3fa]: Pad {f00=0x00ac, f01=0x018e, f02=» 2 P IDENT DVKB03 REL 9.2 79-11-16 870105040920 P : " P* KEYBOARD DEVICE WORK TABLE B P* h P ENTRY DVKB03 TABLE ENTRY r P*** ( P EXTRN KBAD POINTER TO ADDRESSBLOCK P EXTRN DVDY03 PMMUPAG EQU 1 P* PDVKB03 EQU
0x228580…29d200 [0x3fb]: Pad {f00=0x00ac, f01=0x0190, f02=» z P DATA DWTEND-DVKB03 ORDER ( P DATA KBAD POINTER TO ADDRESS BLOCK * P DATA 'KB' TTAB-ADDRESS V $ P DATA 0 WAIT/ACTIVATE INDICATOR v P DATA 0 TERMINAL QUEUE IFT MMUPAG=1 & " DATA 0 SAVE AREA USER ECB ADDRESS DATA DEVECB M
0x228580…29d200 [0x3fc]: Pad {f00=0x00ac, f01=0x0190, f02=»A4 z P DATA 0 SAVE AREA FOR A5 P RES 4 DWT-STACK * P DATA 0 TIMER POINTER B P DATA DVDY03 DVDY03O DEVICE ` $ P DATA /FFFF BACKSPACE AND CANCEL $ P DATA /FFBA EOR AND DOUBLE ZERO 6 P DATA DWTSQ+DVKB03 POINTER TO FIRST PLACE IN QUEUE
0x228580…29d200 [0x3fd]: Pad {f00=0x00ac, f01=0x40f4, f02=»0,0,0 P DATA 0,0,0,0 P IFT MMUPAG=1 $ PDEVECB EQU * : P DATA 0,0,0,0,0,0 N P DATA 0,0,0,0,0,0,0,0 h P DATA 0,0,0,0,0,0,0,0 P DATA 0,0,0,0 P XIF PDWTEND EQU * P* P END @ RST PLACE IN QUEUE
0x228580…29d200 [0x3fe]: Pad {f00=0x00ac, f01=0x2008, f02=» BLE ZERO 6 P DATA DWTSQ+DVTKB POINTER TO FIRST PLACE IN QUEUE 4 P DATA DWTSQ+DVTKB POINTER TO LAST PLACE IN QUEUE R PDWTSQ EQU *-DVTKB P RES 0 P* P END @ 0 SAVE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P RES
0x228580…29d200 [0x3ff]: Pad {f00=0x00ac, f01=0x0190, f02=»D BUFFERS | v P SUR A12,A12 } P RB INS200 } & P EJECT } 8 PINS400 EQU * } F P* } Z ( P* UPDATE LRN IF EOF IS ENCOUNTERED } d P* } P LDR A1,A6 FDB INDEX } P CF A14,GTLGRN } P CC A2,FDBLRN,A1 } P RF(L) INS430 NO EOF } P RF(G) I
0x228580…29d200 [0x400]: Pad {f00=0x00ab, f01=0x0190, f02=»DMI100 RECORD FOUND e P LDR A6,A1 FDB ADDR f & PDMI030 LDKL A1,/4000 KEY NOT FOUND f 8 PDMI035 EQU * f b P LDR A3,A3 BUFFER ADDR f v P ABL(Z) DMTERX NO BUFFER f P ABL DMTERR ERROR AND BUFFER f P EJECT f P* f & PDMINS2 EQU * INDEXED INSER
0x228580…29d200 [0x401]: Pad {f00=0x00ab, f01=0x0002, f02=» p
0x228580…29d200 [0x402]: Pad {f00=0x00ab, f01=0x0190, f02=» 2 P IDENT DVDI03 REL 9.2 79-11-16 870105040920 P : P =1,HANG UP AT /03 OUTPUT B P REL 9.1 79-05-23 f P* . P* DEVICE WORK TABLE FOR DISPLAY INDICATOR P* P* & P ENTRY DVDI03 DISPLAY INDICATOR 03 P* P*
0x228580…29d200 [0x403]: Pad {f00=0x00ab, f01=0x0190, f02=»RAMETER z 0 P DATA /8000 STATUS. /8000 MEANS DEVICE READY P DATA 0 ECB ADDRESS D P DATA DWTEND-DVDI03 ORDER ` ( P DATA DIAD POINTER TO ADDRESS-BLOCK 6 P DATA 'DI',0 TERM.NUMBER AND PROGRAM START ADDRESS $ P DATA 0 ECB QUEUE ANCHOR ADDRESS
0x228580…29d200 [0x404]: Pad {f00=0x00ab, f01=0x4162, f02=»UEUE P DATA /0000 P DATA /3F4F,/5F6F * P DATA 0 SAVE AREA FOR FLASHING LIGHTS : P DATA 0 TIMER POINTER h P DATA 0 DUMMY WORD =1 P DATA 0 DUMMY WORD =1 " P DATA 0 DUMMY TIMER POINTER =1 P IFT MMUPAG=1 PDEVECB DATA
0x228580…29d200 [0x405]: Pad {f00=0x00ab, f01=0x2008, f02=» A DIAD POINTER TO ADDRESS-BLOCK 4 P DATA 0,0 TERM.NUMBER AND PROGRAM START ADDRESS 0 $ P DATA 0 ECB QUEUE ANCHOR ADDRESS h P DATA 0 OUTPUT QUEUE P DATA /2010 P DATA /3F4F,/5F6F P* P* P END @ BLE ENTRY
0x228580…29d200 [0x406]: Pad {f00=0x00ab, f01=0x2008, f02=» BLE ZERO 6 P DATA DWTSQ+DVTKB POINTER TO FIRST PLACE IN QUEUE 4 P DATA DWTSQ+DVTKB POINTER TO LAST PLACE IN QUEUE R PDWTSQ EQU *-DVTKB P RES 0 P* P END @ 0 SAVE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P RES
0x228580…29d200 [0x407]: Pad {f00=0x00ab, f01=0x0190, f02=» P ADKL A10,2 CYLID m P AD A10,FDBRRO,A6 m & P AD A10,FDBRLE,A6 ADDR STATUS CHAR m 8 P LDK A1,0 STATUS FREE m b . P ABL DMT350 CONTINUE AS FOR RANDOM DELETE m PDXI200 EQU * m P SC A2,FDBDBR,A6 m P LKM m " P DATA 3 EXIT. MORE INDEX LEFT m
0x228580…29d200 [0x408]: Pad {f00=0x00ac, f01=0x018e, f02=» " P LDR A11,A3 FIRST REC NR MOVED P LD A12,FDBRRO,A6 OLD OFFSET * P LD A4,FDBMRO,A6 N P ST A4,FDBRRO,A6 MAX OFFSET f $ P CF A14,GTLGRN LAST REC NR MOVED P LDR A8,A2 P LDR A9,A3 REC NR " P ST A12,FDBRRO,A6 RESET OFFSET P LDKL
0x228580…29d200 [0x409]: Pad {f00=0x00ac, f01=0x0002, f02=»
0x228580…29d200 [0x40a]: Pad {f00=0x00ac, f01=0x0190, f02=» 2 P IDENT DVDY03 REL 9.2 79-11-16 870105040920 P : * P* DEVICE WORK TABLE FOR VIDEO DISPLAY B P* p P ENTRY DVDY03 TABLE ENTRY z P* P* ( P EXTRN DYAD POINTER TO ADDRESS BLOCK PMMUPAG EQU 1 P* PDVDY03 EQU * TAB
0x228580…29d200 [0x40b]: Pad {f00=0x00ac, f01=0x0190, f02=» DATA DWTEND-DVDY03 ORDER ( P DATA DYAD POINTER TO ADDRESS-BLOCK " P DATA 'DY' TTAB-ADDRESS N $ P DATA 0 WAIT/ACTIVATE INDICATOR n P DATA 0 TERMINAL QUEUE IFT MMUPAG=1 & " DATA 0 SAVE AREA USER ECB ADDRESS DATA DEVECB MMU ECB A
0x228580…29d200 [0x40c]: Pad {f00=0x00ac, f01=0x4158, f02=»VE AREA FOR A5 P RES 4 DWT-STACK P DATA 0 TIMER POINTER . P DATA /101 CURSOR POINTER L * P DATA /1850 LEFT BYTE=NUMBER OF LINES n " P RIGHT BYTE=CHARACTERS/LINE P DATA 0 BUFFER INDEX P IFT MMUPAG=1 PDEVECB DATA 0,0,0,0,0,
0x228580…29d200 [0x40d]: Pad {f00=0x00ac, f01=0x2008, f02=» S-BLOCK | P DATA 0 TTAB-ADDRESS $ P DATA 0 WAIT/ACTIVATE INDICATOR 4 P DATA 0 TERMINAL QUEUE P DATA 0 OUTPUT QUEUE LINK z P DATA 0 SAVE AREA FOR A3 P DATA 0 SAVE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P RES 4 DWT-STA
0x228580…29d200 [0x40e]: Pad {f00=0x00ac, f01=0x401c, f02=» XIF P END @ LDR A12,A12 $ P RF(Z) DEL900 BUFFER NOT CHANGED 0 P* X P* WRITE SECTOR b P* z PDEL700 EQU * P LDR A8,A14 P ADKL A8,2 ECB ADDR P LDK A7,/95 WRITE WAIT P LKM P DATA 1 P LDR A1,
0x228580…29d200 [0x40f]: Pad {f00=0x00ac, f01=0x2008, f02=» + t P INH , P CF A15,TENDIO , P ENB , 2 P* , > P* EXIT , H P* , X P LKM , b P DATA 3 , n P* , ~ P END , @ , RD ADDR A2:=EA BIT + & P C1R A2,A2 ONE COMPLEMENT BIT MASK + P ANRS A2,A3 SET OFF EA BIT + P* + P
0x228580…29d200 [0x410]: Pad {f00=0x00ad, f01=0x018e, f02=» LDK A2,DLE m P CF A5,WRBCCN SEND ONE DLE n P XIF n 6 P LDK A2,STX n B P CF A5,WRITEP SEND STX n V P IFT TRANSP=1 n t P LDK A2,DLE n P CF A5,WRBCCN SEND ONE DLE n P XIF n P CF A5,WRENQ5 SEND ENQ n P LDR A1,A6 DWT ADDRESS n P C
0x228580…29d200 [0x411]: Pad {f00=0x00ad, f01=0x0002, f02=»
0x228580…29d200 [0x412]: Pad {f00=0x00ad, f01=0x018e, f02=» 2 P IDENT DVGP04 REL 9.2 79-11-16 870105040920 P : , P* DEVICE WORK TABLE FOR GENERAL PRINTER B P* r P ENTRY DVGP04 TABLE ENTRY | P* P* ( P EXTRN GPAD POINTER TO ADDRESS BLOCK PMMUPAG EQU 1 P* PDVGP04 EQU * T
0x228580…29d200 [0x413]: Pad {f00=0x00ad, f01=0x0190, f02=» P DATA DWTEND-DVGP04 ORDER ( P DATA GPAD POINTER TO ADDRESS-BLOCK & P DATA 'GP' TTAB-ADDRESS R $ P DATA 0 WAIT/ACTIVATE INDICATOR r P DATA 0 TERMINAL QUEUE IFT MMUPAG=1 & " DATA 0 SAVE AREA USER ECB ADDRESS DATA DEVECB MMU E
0x228580…29d200 [0x414]: Pad {f00=0x00ad, f01=0x40f0, f02=»0 SAVE AREA FOR A5 P RES 4 DWT-STACK P DATA 0 TIMER POINTER 2 " P DATA 0 HEAD POSITIPN POINTER P P IFT MMUPAG=1 v PDEVECB DATA 0,0,0,0,0,0 P XIF PDWTEND EQU * P* P* P END @ DATA DEVECB MMU E
0x228580…29d200 [0x415]: Pad {f00=0x00ad, f01=0x2008, f02=» ESS-BLOCK ~ P DATA 0 TTAB-ADDRESS $ P DATA 0 WAIT/ACTIVATE INDICATOR 6 P DATA 0 TERMINAL QUEUE ^ P DATA 0 OUTPUT QUEUE LINK | P DATA 0 SAVE AREA FOR A3 P DATA 0 SAVE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P RES 4 DWT-S
0x228580…29d200 [0x416]: Pad {f00=0x00ad, f01=0x2008, f02=» BLE ZERO 6 P DATA DWTSQ+DVTKB POINTER TO FIRST PLACE IN QUEUE 4 P DATA DWTSQ+DVTKB POINTER TO LAST PLACE IN QUEUE R PDWTSQ EQU *-DVTKB P RES 0 P* P END @ 0 SAVE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P RES
0x228580…29d200 [0x417]: Pad {f00=0x00ad, f01=0x0190, f02=» GTBKBU , EXTDMI , ( ) 8_ X , P H X 0 8 & SECTLE V ECBRL h DMTGBU x ECBCW , ( ? ! # J C L NW C BUFSTAH , ( Y P R C > X B%? : X
0x228580…29d200 [0x418]: Pad {f00=0x00ad, f01=0x0190, f02=»U * } ( P CM DWTLCI,A6 CLEAR I/P ACTIVE FLAG ~ & P ADK A5,4 INCREMENT STACK POINTER ~ : P IFT SALCUZ=1 ~ d P LDK A2,CBDISC ~ | P EX DWTCHI,A6 ~ P XIF ~ P IFF SALCUZ=1 ~ P LDK A2,0 ~ P EX DWTCSI,A6 ~ P XIF ~
0x228580…29d200 [0x419]: Pad {f00=0x00ad, f01=0x0002, f02=»
0x228580…29d200 [0x41a]: Pad {f00=0x00ad, f01=0x018e, f02=» 2 P IDENT DVGP05 REL 9.2 79-11-16 870105040920 P : , P* DEVICE WORK TABLE FOR GENERAL PRINTER B P* r P ENTRY DVGP05 TABLE ENTRY | P* P* ( P EXTRN GPAD POINTER TO ADDRESS BLOCK PMMUPAG EQU 1 P* PDVGP05 EQU * T
0x228580…29d200 [0x41b]: Pad {f00=0x00ad, f01=0x0190, f02=» P DATA DWTEND-DVGP05 ORDER ( P DATA GPAD POINTER TO ADDRESS-BLOCK & P DATA 'GP' TTAB-ADDRESS R $ P DATA 0 WAIT/ACTIVATE INDICATOR r P DATA 0 TERMINAL QUEUE IFT MMUPAG=1 & " DATA 0 SAVE AREA USER ECB ADDRESS DATA DEVECB MMU E
0x228580…29d200 [0x41c]: Pad {f00=0x00ad, f01=0x40f0, f02=»0 SAVE AREA FOR A5 P RES 4 DWT-STACK P DATA 0 TIMER POINTER 2 " P DATA 0 HEAD POSITIPN POINTER P P IFT MMUPAG=1 v PDEVECB DATA 0,0,0,0,0,0 P XIF PDWTEND EQU * P* P* P END @ DATA DEVECB MMU E
0x228580…29d200 [0x41d]: Pad {f00=0x00ad, f01=0x2008, f02=» ESS-BLOCK ~ P DATA 0 TTAB-ADDRESS $ P DATA 0 WAIT/ACTIVATE INDICATOR 6 P DATA 0 TERMINAL QUEUE ^ P DATA 0 OUTPUT QUEUE LINK | P DATA 0 SAVE AREA FOR A3 P DATA 0 SAVE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P RES 4 DWT-S
0x228580…29d200 [0x41e]: Pad {f00=0x00ad, f01=0x018e, f02=»SST STATUS ~ " P ANK A1,SBCALL INCOMING CALL ? ( P RF(Z) SST150 NOT CALLING INDICATOR 8 & P LD A1,DWTST,A6 CALLING INDICATOR d P ABL(N) BMM NO REQUEST P LD A1,DWTOR,A6 GET ORDER P SUK A1,/31 ( P ABL(NZ) BMM NOT ACCEPT CALL REQUEST
0x228580…29d200 [0x41f]: Pad {f00=0x00ad, f01=0x0190, f02=» P IFT SALCUZ=1 P IFT CODE=0 P LDR A1,A2 MOVE STATUS 2 ( P ANK A1,SBPARI CHAR PARITY ERROR ? R P RF(NZ) SST205 YES ~ P XIF P LDR A1,A2 MOVE STATUS P ANK A1,SBNOOP P RF(NZ) SST200 YES 0 P LD A1,DWTLC
0x228580…29d200 [0x420]: Pad {f00=0x00ae, f01=0x0190, f02=» t P XIF P IFT CODE=1 P EJECT , P* : P* D P* CALCULATION OF CRC N P* j P* A2 = CHARACTER t P* A7 = ACCUMULATED CRC P* P* PACBPAR EQU * P ST A1,CRCSAV P ST A2,CRCSAV+2 P ST A3,C
0x228580…29d200 [0x421]: Pad {f00=0x00ae, f01=0x0002, f02=»
0x228580…29d200 [0x422]: Pad {f00=0x00ae, f01=0x018e, f02=» 2 P IDENT DVTP06 REL 9.2 79-11-16 870105040920 P : 4 P* DEVICE WORK TABLE FOR TELLER TERMINAL PRINTER B P* z P ENTRY DVTP06 TABLE ENTRY P* P* ( P EXTRN TPAD POINTER TO ADDRESS-BLOCK $ PMMUPAG EQU 1 MEM. MAN.UNIT COND.
0x228580…29d200 [0x423]: Pad {f00=0x00ae, f01=0x018e, f02=» P DATA 0 ECB ADDRESS P DATA DWTEND-DVTP06 ORDER ( P DATA TPAD POINTER TO ADDRESS BLOCK B P DATA 'TP' TTAB-ADDRESS n $ P DATA 0 WAIT/ACTIVATE INDICATOR P DATA 0 TERMINAL QUEUE IFT MMUPAG=1 & " DATA 0 SAVE AREA USER ECB ADDRE
0x228580…29d200 [0x424]: Pad {f00=0x00ae, f01=0x40f6, f02=» f P DATA 0,0,0,0 STACK P DATA 0 TIMER POINTER $ ( P DATA 0 REQUESTED,ACTUAL LINE NUMBER B P IFT MMUPAG=1 n PDEVECB EQU * P DATA 0,0,0,0,0,0 P XIF PDWTEND EQU * P* P* P END @ AREA USER ECB ADDRE
0x228580…29d200 [0x425]: Pad {f00=0x00ae, f01=0x2008, f02=» A TPAD POINTER TO ADDRESS BLOCK P DATA 0 TTAB-ADDRESS 0 $ P DATA 0 WAIT/ACTIVATE INDICATOR L P DATA 0 TERMINAL QUEUE t P DATA 0 OUTPUT QUEUE LINK , P DATA 0,0,0 SAVE AREA FOR REGS. A3,A4,A5 P DATA 0,0,0,0 STACK P DATA 0 TI
0x228580…29d200 [0x426]: Pad {f00=0x00ae, f01=0x0190, f02=»IH1705 EQU * P ST P,INTSAV * P CF A15,SAVE8 SAVE A1-A8 ON A15 STACK ( $ P LDKL A6,DW1703 LOAD DWT ADDRESS V , P INR A2,0,DAMI03 GET CHARACTER FROM LINE ~ P RB IHI100 P IFF NLINE=3 P* P* P* PIH1707 EQU * P ST
0x228580…29d200 [0x427]: Pad {f00=0x00ae, f01=0x0190, f02=»RACTER FROM LINE x P RB IHI100 P XIF * P EJECT 6 < P******************************************************* D P* * P* INTERRUPT HANDLER , CHLC TRANSMITTER P* < P******************************************************* P*
0x228580…29d200 [0x428]: Pad {f00=0x00b0, f01=0x0190, f02=»AVE * P LD A2,SCTPLD GET PROGRAM LOAD DEVICE P LDR A1,A2 SAVE : P* R P* CHECK PROGRAM LOAD MEDIUM P* " P ANK A2,/C0 CHECK IF CASSETTE P RF(P) AP:210 YES! , P ADKL A3,BUFLEN+8 NEW START OF FREE AREA P ST A3,SCTSFA
0x228580…29d200 [0x429]: Pad {f00=0x00b0, f01=0x001e, f02=» ( 0 8 @ H P X ` h p
0x228580…29d200 [0x42a]: Pad {f00=0x00b0, f01=0x0190, f02=» v "P"| c @ Tg t z ^ b bLPL H b2 Z ` zP
0x228580…29d200 [0x42b]: Pad {f00=0x00b0, f01=0x0190, f02=» 4c @S{ D d 2Z $"z y B % y D Dbf d * F :P }B W [~ ? d j% L "~ T &b ICn 1 d _ A " [ _ @[ > > U # T @ , H ( ( P c P W~ T P> , T6 L [b M 0 - A[b Q @ P A 0
0x228580…29d200 [0x42c]: Pad {f00=0x00b0, f01=0x0190, f02=» A x 6 A 4Q _0 A 4 < Q . P . Q . Z Y _ z 8 [ Q Z P 0 9 _ h _, ? P H H #P A A Q ? @[ ~ ) A[ _ A l A[ _ ? ? ? ? ? ^ A _ _ ^ [ $P T
0x228580…29d200 [0x42d]: Pad {f00=0x00b0, f01=0x0190, f02=»T - 1_( U T P 0 U _t ? @[`T 0 A[` 1 Q Q > > 0 @[` 1 A[` P P > ? * X " R" Y T ? X D C T> W W8 > _& @ 8 R" Y T ? X D C T W W > _& W2 > 8 X W( ? ` @ @ P $ H W W > > > > > > @[R
0x228580…29d200 [0x42e]: Pad {f00=0x00b0, f01=0x0190, f02=»#M 1 F $ ( , 0 4 8 < C 8W T 8P Y ^ 5 ) P U [ XH D #DP @ R XV Y @ P, C T W X &P T X I
0x228580…29d200 [0x42f]: Pad {f00=0x00b0, f01=0x0190, f02=» T # P W Y P R R P P (@ (@ " 2 X $? P $ > > F C F C > B R Q F ! P C > C > F :c" H :b"? #" : C > B R Q~ P0 B P*
0x228580…29d200 [0x430]: Pad {f00=0x00b0, f01=0x0190, f02=» X 9BV X & j [ X B D C > X H UJ H B P PL $ # Q > P _0 # T p > P p (_H _2 B U X > ? _ X T (@ ^ > > ? _ X T X X T
0x228580…29d200 [0x431]: Pad {f00=0x00b0, f01=0x0190, f02=» U [ 6 Y _| ?(@ X P& T D #DP 0P X T 4 Y X C X T X W 1 1 X P - M T $ PD _ T " # p X L R P P (@ ^ X P8 P0 # P T P 0P 1 _
0x228580…29d200 [0x432]: Pad {f00=0x00b0, f01=0x0190, f02=» X 9BV X & X B D C > X H U H B P P $ # Q > P _0 # T p > P p (_H _2 B U X > ? _ X T (@ ^ > > ? _ X T X X T
0x228580…29d200 [0x433]: Pad {f00=0x00b0, f01=0x0190, f02=» $ 0 $V D B0 v A ( @[d [bX H A[d ) @ H P 1 % E I L U B@ M (@ D >a @ <a H D b C 9b;BT C 0 @ # W( C UH R C W C R
0x228580…29d200 [0x434]: Pad {f00=0x00b0, f01=0x0190, f02=» Q '_D W Z 0 [fJ B B ? A J ;h # <c$ <" P P` 4 5 T P ? X U X > P PX P P( P ] 0 X T Y W U Z U U T Xp T E [ Y T 8R X $P y $W
0x228580…29d200 [0x435]: Pad {f00=0x00b0, f01=0x0190, f02=»P " > [ Z X "X 8' T 8Z" X ' X # T 8R X $P y $ Y $ X (@ L P P "& x ? $P$ D P P0 P P _ E W Q Y W 8 " E 4 % E Y > >B @ P A x" P> P: Y Y Y Y
0x228580…29d200 [0x436]: Pad {f00=0x00b0, f01=0x0190, f02=» " X D V j X F T 8TV 9WD B 7P P [ A[ W A[ @[ A.W ? A I.9 N X R C C j [ ?A @[ A. N X V 9_: b @ V P y $W
0x228580…29d200 [0x437]: Pad {f00=0x00b0, f01=0x0190, f02=»P " > Z X "X 8' T 8Z" X ' X # T 8R X $P y $ Y $ X (@ L P P "& ? $P D P P P P _ E W Q Y W 8 " E 4 % E Y > >B @ P A " P P Y Y Y Y
0x228580…29d200 [0x438]: Pad {f00=0x00b0, f01=0x0190, f02=» H $ P P P P [ ! W B B # L 6 Y :e X BY, X @P& Y @ ! 9 R ! 9 R Y @ Wb P UH ! ! ! P WF X @ @ @ ! ! ! P W* P& ! ! ! P W ! ! ! P X FP _ X D ( ^ W b X @X$_ W
0x228580…29d200 [0x439]: Pad {f00=0x00b0, f01=0x0190, f02=» ! E ( Y Y [ ? @ P: Y " ! P X > Y '? V j_< @ X2 a W<_J Y " ! P X> X4 0P -_z A _ A _v A ? I F 9AZf9a X <V # T X X X '? 4 T B C X P X " I $ j
0x228580…29d200 [0x43a]: Pad {f00=0x00b0, f01=0x0190, f02=»T Y _l Y < 4 B B r s T 1 WP B B PD P [ V - 0 P A l# +T W Q P P 1 ! ~ T V C B Q 1 j [ Y @ r t
0x228580…29d200 [0x43b]: Pad {f00=0x00b0, f01=0x0190, f02=» E Y Y ? @ P Y " ! P X Y '? V j_< @ X2 a W _J Y " ! P X> X4 0P -_z _ A _v A $ $ T X X X '? 4 T B C P, P P 1P( P W P
0x228580…29d200 [0x43c]: Pad {f00=0x00b0, f01=0x0190, f02=» % A? A? j_r B Q< T_ X P 0 Y P C _ _ B Y _N [ X P A A Y Wb Y @_x X X A A Y _& Y j @ ^ 0 A ` A ^_: X P ( y Y W $ (P 0 ) > (P _ ) 1_ (X( P
0x228580…29d200 [0x43d]: Pad {f00=0x00b0, f01=0x0190, f02=»X j_" X P y Y X P T j @ ^ T A ` A ^ > A @ A D A H A L A P TW > 0P !" 2B !" T P P !" Tf Tb A# P A# TR !" TL !" TD T@ !" T8 !" A I A
0x228580…29d200 [0x43e]: Pad {f00=0x00b0, f01=0x0190, f02=» @ T< A f ! @ `P @$ P @ ^ 8 ! h ! A j_: !" X6_Z A f @$ @ vT 1 R 0 2P P P A t @ @ 8 H@ @$ P E # PF X R@ X P X T2 P C , C X T ! W W( jW" X R X T j ! ! _ A b @ X
0x228580…29d200 [0x43f]: Pad {f00=0x00b0, f01=0x0190, f02=» t !# @ `XN !" T @ jP ! !#X_h /T& @ jX @ dP ! ! A h_ A j < A ` @ dT _, _0 @ `T<W @$ T ! _ ! h ! _ A b A t H@ E A f A 4 @ `P ! !#X !#4W @ T ! _ T j_ n A ^ 6* C B B A p A r A t
0x228580…29d200 [0x440]: Pad {f00=0x00b0, f01=0x0190, f02=» v A t @ t A v A f !" T2 P4 PJ PL P P. 1 A t @ t ]6W P _@ @$ @ t E !# P !" 4 _$ !# 2_l / A jT W ,W A | A }W W W A | A } !"6 @ | !" @ } !" !" !" B J 4 !"6 !" @ p @ t A v @ tT( @# !" 8 !
0x228580…29d200 [0x441]: Pad {f00=0x00b0, f01=0x0190, f02=»" W R !" A t @ r @ tUH Zx Q P Q T 0 !" A t 0 !" A t !" " !" " !" ! A d _" B J B !" !" 4 A ? >J T A lT 2PX !# H? 4 !" A ? >_ I " P A f A 4 A _$" P H@ B P W !# $ [ _ !"
0x228580…29d200 [0x442]: Pad {f00=0x00b0, f01=0x0190, f02=» 4 A # X A > A #h Z A z 4 A z !" @ `P ! !#X @ zP a z A z 4 A# A# A# ?a :a# P @# @# @# 4 jT A l !" # !" A l @# :H 4 $ $"-& @ p @ t A v @ tT @ ! 8 !
0x228580…29d200 [0x443]: Pad {f00=0x00b0, f01=0x0190, f02=» W R ! A t @ r @ tU Zx Q P Q T 0 ! A t 0 ! A t ! " ! " ! ! A d _" B J B ! ! 4 A ? >J T A lT 2P ! H 4 ! A ? >_ I " P A f A 4 A _$" P H B P W ! $ _ !"
0x228580…29d200 [0x444]: Pad {f00=0x00b0, f01=0x0190, f02=» 4 # X A > Z A z 4 A z !" @ `P ! !#X @ zP a z A z 4 A A A ?a :a# P @ @ @ 4 jT A l !" # !" A l @# :H 4 $"-& @ p @ t A v @ tT @ ! 8 !
0x228580…29d200 [0x445]: Pad {f00=0x00b0, f01=0x0190, f02=» W R ! A t @ r @ tU Zx Q P Q T 0 ! A t 0 ! A t ! " ! " ! ! A d _" B J B ! ! 4 A ? >J T A lT 2P ! H 4 ! A ? >_ I " P A f A 4 A _$" P H B P W ! $ _ !"
0x228580…29d200 [0x446]: Pad {f00=0x00b0, f01=0x0190, f02=» 4 # X A > Z A z 4 A z !" @ `P ! !#X @ zP a z A z 4 A A A ?a :a# P @ @ @ 4 jT A l !" # !" A l @# :H 4 $"-& @ p @ t A v @ tT @ ! 8 !
0x228580…29d200 [0x447]: Pad {f00=0x00b0, f01=0x0190, f02=» W R ! A t @ r @ tU Zx Q P Q T 0 ! A t 0 ! A t ! " ! " ! ! A d _" B J B ! ! 4 A ? >J T A lT 2P ! H 4 ! A ? >_ I " P A f A 4 A _$" P H B P W ! $ _ !"
0x228580…29d200 [0x448]: Pad {f00=0x00b1, f01=0x0190, f02=» 4 # X A > Z A z 4 A z !" @ `P ! !#X @ zP a z A z 4 A A A ?a :a# P @ @ @ 4 jT A l !" # !" A l @# :H 4 $"-& @ p @ t A v @ tT @ ! 8 !
0x228580…29d200 [0x449]: Pad {f00=0x00b1, f01=0x0190, f02=» W R ! A t @ r @ tU Zx Q P Q T 0 ! A t 0 ! A t ! " ! " ! ! A d _" B J B ! ! 4 A ? >J T A lT 2P ! H 4 ! A ? >_ I " P A f A 4 A _$" P H B P W ! $ _ !"
0x228580…29d200 [0x44a]: Pad {f00=0x00b1, f01=0x0190, f02=» 4 # X A > Z A z 4 A z !" @ `P ! !#X @ zP a z A z 4 A A A ?a :a# P @ @ @ 4 jT A l !" # !" A l @# :H 4 $"-& @ p @ t A v @ tT @ ! 8 !
0x228580…29d200 [0x44b]: Pad {f00=0x00b1, f01=0x0190, f02=» W R ! A t @ r @ tU Zx Q P Q T 0 ! A t 0 ! A t ! " ! " ! ! A d _" B J B ! ! 4 A ? >J T A lT 2P ! H 4 ! A ? >_ I " P A f A 4 A _$" P H B P W ! $ _ !"
0x228580…29d200 [0x44c]: Pad {f00=0x00b1, f01=0x0190, f02=» 4 # X A > Z A z 4 A z !" @ `P ! !#X @ zP a z A z 4 A A A ?a :a# P @ @ @ 4 jT A l !" # !" A l @# :H 4 $"-& @ p @ t A v @ tT @ ! 8 !
0x228580…29d200 [0x44d]: Pad {f00=0x00b1, f01=0x0190, f02=» W R ! A t @ r @ tU Zx Q P Q T 0 ! A t 0 ! A t ! " ! " ! ! A d _" B J B ! ! 4 A ? >J T A lT 2P ! H 4 ! A ? >_ I " P A f A 4 A _$" P H B P W ! $ _ !"
0x228580…29d200 [0x44e]: Pad {f00=0x00b1, f01=0x0190, f02=» 4 # X A > Z A z 4 A z !" @ `P ! !#X @ zP a z A z 4 A A A ?a :a# P @ @ @ 4 jT A l !" # !" A l @# :H 4 $"-& @ p @ t A v @ tT @ ! 8 !
0x228580…29d200 [0x44f]: Pad {f00=0x00b1, f01=0x0190, f02=» W R ! A t @ r @ tU Zx Q P Q T 0 ! A t 0 ! A t ! " ! " ! ! A d _" B J B ! ! 4 A ? >J T A lT 2P ! H 4 ! A ? >_ I " P A f A 4 A _$" P H B P W ! $ _ !"
0x228580…29d200 [0x450]: Pad {f00=0x00b1, f01=0x0190, f02=» 4 # X A > Z A z 4 A z !" @ `P ! !#X @ zP a z A z 4 A A A ?a :a# P @ @ @ 4 jT A l !" # !" A l @# :H 4 $"-& @ p @ t A v @ tT @ ! 8 !
0x228580…29d200 [0x451]: Pad {f00=0x00b1, f01=0x0190, f02=» W R ! A t @ r @ tU Zx Q P Q T 0 ! A t 0 ! A t ! " ! " ! ! A d _" B J B ! ! 4 A ? >J T A lT 2P ! H 4 ! A ? >_ I " P A f A 4 A _$" P H B P W ! $ _ !"
0x228580…29d200 [0x452]: Pad {f00=0x00b1, f01=0x0190, f02=» 4 # X A > Z A z 4 A z !" @ `P ! !#X @ zP a z A z 4 A A A ?a :a# P @ @ @ 4 jT A l !" # !" A l @# :H 4 $"-& @ p @ t A v @ tT @ ! 8 !
0x228580…29d200 [0x453]: Pad {f00=0x00b1, f01=0x0190, f02=» W R ! A t @ r @ tU Zx Q P Q T 0 ! A t 0 ! A t ! " ! " ! ! A d _" B J B ! ! 4 A ? >J T A lT 2P ! H 4 ! A ? >_ I " P A f A 4 A _$" P H B P W ! $ _ !"
0x228580…29d200 [0x454]: Pad {f00=0x00b1, f01=0x0190, f02=» 4 # X A > Z A z 4 A z !" @ `P ! !#X @ zP a z A z 4 A A A ?a :a# P @ @ @ 4 jT A l !" # !" A l @# :H 4 $"-& @ p @ t A v @ tT @ ! 8 !
0x228580…29d200 [0x455]: Pad {f00=0x00b1, f01=0x0190, f02=» :f"? H?D !" "? H?D !" 4 ABCDEFGHI#.<(+!&JKLMNOPQR$]*);^-/STUVWXYZ@,%_>?0123456789:[ '="? ? ABCDEFGHI#.<(+!&JKLMNOPQR$]*);^-/STUVWX
0x228580…29d200 [0x456]: Pad {f00=0x00b1, f01=0x0190, f02=»OPQR]$*);^ /STUVWXYZ|,%_>?0123456789:#@'= 7- <=2&p ?' @O JZlP}M] Nk`Ka z^L~noj {|[_m TOSS T A^ A A [ @ A A A _ _< ? ^
0x228580…29d200 [0x457]: Pad {f00=0x00b1, f01=0x0190, f02=» A[ [ D _ $P D % 1 I D " @ @ - U _ 9B @ T W X > & ~ AN v A v w wh y|ypvbvv C C E E E E E D D D(C DlD C E E C D D D(C " # $ % "$&( C B @ D X P _ L
0x228580…29d200 [0x458]: Pad {f00=0x00b1, f01=0x0190, f02=» Zr W Y & Y $ 0 Y . D X E B Y I B Y J_ W X C P C W < C C _H X H H S W C C B B B U X R Wp H TP L P B r L ( Zr $ X _ X ` T I T J W. P C X
0x228580…29d200 [0x459]: Pad {f00=0x00b1, f01=0x0190, f02=»F. [ [ F F JhJhJhJhJhI I F JhI F JhJhJhJhI I F F X (P R X (W G G : R $ - _ " P $ - : R $ - _ : Z $ -_ D ( U ( 0 W T ` U @ , @ W : X & X P !##T Y T( X P P P @[ Q (@ F
0x228580…29d200 [0x45a]: Pad {f00=0x00b1, f01=0x0190, f02=»( ( W F Y` Jh B W C X '? E X & X ( )T Jh EF E I X $TT T AED J , Wx P W T Y $ P T _ Y & F (@ _ H X & X I U X J U ( Y` T$ X X RP F E T Jh P
0x228580…29d200 [0x45b]: Pad {f00=0x00b1, f01=0x0190, f02=» 4 5W P 0 @TR 1 ATR(@_ 1 (@ H / O $P % 4 F E (@ B P 9 J~ 4' H$' H$ 5 H$ 4 N W , P& ,' X X 1 Z" ) H$_ (@ C A H$ ( B ! Jh H$ @ED F U
0x228580…29d200 [0x45c]: Pad {f00=0x00b1, f01=0x0190, f02=» X & F X P @[ Q (@ Zr + X ^V" P "P8 $P4W X & X bT( ;AR ( I ( F Y` T Y ^ F " F D '? P P( $ P" X I I K K P P & P X W D $ T X T X@W E I E J X ^V ? T B
0x228580…29d200 [0x45d]: Pad {f00=0x00b1, f01=0x0190, f02=» x @w (@ Dw C C C PW C ( J J L " TOP M Ax L Ax L C x @x Ax Q< @w M^ Aw @x M B Dw Ew X #D( J ( B B @w Dw PW C C ( J J x w @x T A
0x228580…29d200 [0x45e]: Pad {f00=0x00b1, f01=0x0190, f02=» P Ew Dw T x P M N 2% P( R 0 Xw T R , @x T R RT @x N M 6 N 2% P M x r P %_ S C S E 3 P S I P S J P S ( P S * P % S H P & S P @x S , d S B | K KT @w T W
0x228580…29d200 [0x45f]: Pad {f00=0x00b1, f01=0x0190, f02=» T ! X6 _R _V Dx&" P x Ax ( ^ W @x$ P6 I @x P @W$ V W HW& IW((@ @x P -W P B xT (@( @x N _ T `w ` 9A S ^ H $X D S . S $ Z R * S W S _ S ` R
0x228580…29d200 [0x460]: Pad {f00=0x00b1, f01=0x0190, f02=» P E D T P 2% P R 0 X T R , @ T R RT @ 6 2% P P %_ S C S E 3 P S I P S J P S ( P S * P % S H P & S P @ S , d S B | K KT @ T W
0x228580…29d200 [0x461]: Pad {f00=0x00b1, f01=0x0190, f02=» T ! X6 _R _V D " P A ( ^ W @ P6 I @ P @ V W H I (@ @ P -W P B (@( @ N _ T ` ` 9A S ^ H $X D S . S $ R * S W S _ S ` R
0x228580…29d200 [0x462]: Pad {f00=0x00b1, f01=0x0190, f02=» P E D T P 2% P R 0 X T R , @ T R RT @ 6 2% P P %_ S C S E 3 P S I P S J P S ( P S * P % S H P & S P @ S , d S B | K KT @ T W
0x228580…29d200 [0x463]: Pad {f00=0x00b1, f01=0x0190, f02=» T ! X6 _R _V D " P A ( ^ W @ P6 I @ P @ V W H I (@ @ P -W P B (@( @ N _ T ` ` 9A S ^ H $X D S . S $ R * S W S _ S ` R
0x228580…29d200 [0x464]: Pad {f00=0x00b1, f01=0x0190, f02=» P E D T P 2% P R 0 X T R , @ T R RT @ 6 2% P P %_ S C S E 3 P S I P S J P S ( P S * P % S H P & S P @ S , d S B | K KT @ T W
0x228580…29d200 [0x465]: Pad {f00=0x00b1, f01=0x0190, f02=» T ! X6 _R _V D " P A ( ^ W @ P6 I @ P @ V W H I (@ @ P -W W. P Q R ;A [ [ : P Q R ;A [ [ : Q R P ;A [ [ : ? ? !? P P
0x228580…29d200 [0x466]: Pad {f00=0x00b1, f01=0x0190, f02=» Q P P E +P W : X + X L 1 Y L : L 4W 0P8 R Q P W R D + Q ( 0 5 @[` 1 A[` Z> : D NW (P D + I W6 @TRT ( ATR U 1_ D + I D N ) E N : T * WxSP P W X * 0 U U.
0x228580…29d200 [0x467]: Pad {f00=0x00b1, f01=0x0190, f02=» ~ B T B : X "? P P X T _ X . P X $ ! # C PW C C X %? : X &_ 0 D . P , _ D . D $ D * WR T ( T & ^ S W : U ; $ T $ T $ T&x : : $ T2 $ ) ]
0x228580…29d200 [0x468]: Pad {f00=0x00b2, f01=0x0190, f02=» Y _& (# )_4 $ ($ ) YR_L U p 0_8 $_< # 4 & l k ] ` c e f" > > @[ t A[ W j ^ ! Z( [ (X0 @[ P T M ]@ , ) L P $R _, A[ P* P Y U ( ) 5 & > > [ [ [
0x228580…29d200 [0x469]: Pad {f00=0x00b2, f01=0x0190, f02=»R Y W t [ @ Pl T Pb _ <UR "R4 PB X R< X T6 X T0. T G Y6 G _b P ,P - _ ( ( ]< _N]" ? X V Y [ ! JW@ Y U -P -P R ^ X , ) Y . ^ X P Y C ^ 8!@P$ X $P
0x228580…29d200 [0x46a]: Pad {f00=0x00b2, f01=0x0190, f02=» B _T B P $$ R % C _ WV Y *X !_ 8$ P W 8$ P $ T W $ Y +PX Y )P Y (P T _ ! B Z W _ W !_ * T ! X $P y $ Y $ C ! [ 0 Z _ ! B Z ZX X . 0T X W X ,P Y . 0 %_. % Y . _t _
0x228580…29d200 [0x46b]: Pad {f00=0x00b2, f01=0x0190, f02=»$ <c ,P $ , X R ;GV X $P y $ 6 X , $4 P _ X .T * W Y , - [ Y $ X Z @_8 B 1 " W XT 0 (@ > d `4 b b !"&';<>@^_ 9: X ! Y M`,P ^ [ Y L` `l`l` aN` ` a a ! ! ! W B
0x228580…29d200 [0x46c]: Pad {f00=0x00b2, f01=0x0190, f02=»W !cF !a Y ! T ! V `* ! B C ! ! T " T W Q " T ) [ !c, ` Y _ ! !c Y &P Q W ! Y '" b _" ` _< !b _n !c,_t B B , ! T _ D ! P ! P W C V B P ! ! ! Y 4
0x228580…29d200 [0x46d]: Pad {f00=0x00b2, f01=0x0190, f02=» !__U C X ' W Y ! _ X RT U TJ 6 X aJ ? Y X P " ! Y ' ! X T ! [ `B [ R _ 4 ! ! ! " T ! ! ! ! 4 X ' 4 Y ' ` ! ! " P ,$ , ! 4 cf d eNd PB P8
0x228580…29d200 [0x46e]: Pad {f00=0x00b2, f01=0x0190, f02=» T Y &_. P4 R( Pj O]> V _F T Y Y & V Y _^ C _P ^ ^" $ P X & X ]r ! Y Y Y _ " _ ! ! d j [ X C _ X Y & Y > B B U$ $ ! T _ U D ! T _ C > X Z^<BR P j 6 X
0x228580…29d200 [0x46f]: Pad {f00=0x00b2, f01=0x0190, f02=» ! P4 P dt dx X " cf ! ! X & dH d| e e f B 8# T $ # ;D 7P P [ Y W Y X Y 8# T W$ T( X $ P X P B V *@ Y [ [ ? X _F f2k i i j i@ ! 8! P ! P P hl &
0x228580…29d200 [0x470]: Pad {f00=0x00b2, f01=0x0190, f02=» iv B B U4 $ ! T _ U D ! T _ $$ X" X& X* C ^ i X`" Ef,P( 8'0P Ef,TJ ! T 9 _ ! T @_ ! ^ B P 8' T( !k" B C i ^T PR RF ?] _ X X &" X )# C V C ! Y B
0x228580…29d200 [0x471]: Pad {f00=0x00b2, f01=0x0190, f02=»R ! _ B !kj V Z, ! _ 8! T B Y & !k@W B Y (U X ( X & R P ! W Y &_ Y & B Y )U X ) T T W V X ' Y )U P"R ! _ R _ ! Y ' g " ! 8!0T 8 !@P ! $ P ! ! if ! T Y &
0x228580…29d200 [0x472]: Pad {f00=0x00b2, f01=0x0190, f02=» 8" P d ! Y ! *0 ! X ! Y & Z iR T _ ! X $ P !j g R V P P" ! ivW if X $ X !j _ X $ X 8! P !j _( X & !k@ !k" Y _D X " X &" Y )U W ! ! ! Y 4 B f
0x228580…29d200 [0x473]: Pad {f00=0x00b2, f01=0x0190, f02=» ! 4 ! V ! V W :h ! 4 X )" X '# R 4 if > t u Y &_ Y & B Y )U X ) T T W V X ' Y )U P R ! _ R _ ! Y ' g " ! 8!0T 8 !@P ! $ P ! ! ! T Y &
0x228580…29d200 [0x474]: Pad {f00=0x00b2, f01=0x0190, f02=» 8" P d ! Y ! *0 ! X ! Y & Z iR T _ ! X $ P ! g R V P P ! ivW if X $ X ! _ X $ X 8! P ! _( X & ! ! Y _D X " X &" Y )U W ! ! ! Y 4 B f
0x228580…29d200 [0x475]: Pad {f00=0x00b2, f01=0x0190, f02=» ! 4 ! V ! V W :h ! 4 X )" X '# R 4 if > Y &_ Y & B Y )U X ) T T W V X ' Y )U P R ! _ R _ ! Y ' g " ! 8!0T 8 !@P ! $ P ! ! ! T Y &
0x228580…29d200 [0x476]: Pad {f00=0x00b2, f01=0x0190, f02=» 8" P d ! Y ! *0 ! X ! Y & Z iR T _ ! X $ P ! g R V P P ! ivW if X $ X ! _ X $ X 8! P ! _( X & ! ! Y _D X " X &" Y )U W ! ! ! Y 4 B f
0x228580…29d200 [0x477]: Pad {f00=0x00b2, f01=0x0190, f02=» ! 4 ! V ! V W :h ! 4 X )" X '# R 4 if > Y &_ Y & B Y )U X ) T T W V X ' Y )U P R ! _ R _ ! Y ' g " ! 8!0T 8 !@P ! $ P ! ! ! T Y &
0x228580…29d200 [0x478]: Pad {f00=0x00b2, f01=0x0190, f02=» 8" P d ! Y ! *0 ! X ! Y & Z iR T _ ! X $ P ! g R V P P ! ivW if X $ X ! _ X $ X 8! P ! _( X & ! ! Y _D X " X &" Y )U W ! ! ! Y 4 B f
0x228580…29d200 [0x479]: Pad {f00=0x00b2, f01=0x0190, f02=» ! 4 ! V ! V W :h ! 4 X )" X '# R 4 if > Y &_ Y & B Y )U X ) T T W V P u P P .T B Y Wx B @ P X P ( ( 7 R ( P H RN H P ' P k P W< k T6 u ' P
0x228580…29d200 [0x47a]: Pad {f00=0x00b2, f01=0x0190, f02=»_N [ X T @k P ( Ak v _ ( Y _ k _x X T @k P ( Ak v _ ( Y _ k _ i u 9 @_ v H k P k P $ $ 1 ) > ) $P e % > (@ B Z F U F Z k P U [ C G 4' "?:B ] @ P H U _
0x228580…29d200 [0x47b]: Pad {f00=0x00b2, f01=0x0190, f02=» H P j 2 < ? < ? <(@ w $ P B $ 9H C ">h # P >_2 < U = 2 (@ " $ P B >H<h w P ?_" = > = > = =_D R _ 00 > & <h$ P >
0x228580…29d200 [0x47c]: Pad {f00=0x00b2, f01=0x0190, f02=»w Aw @w U : Ax& Ax(:A Aw , ` R @ U P. ,% T& x C ( B P T W ' T| Iw @ 8 =hP Y X Pl 0T< Y Hw ! R W 9a Iw T T 9a Hw Ex& ^ W P ,! T T ( : "' #
0x228580…29d200 [0x47d]: Pad {f00=0x00b2, f01=0x0190, f02=» Ew "# P P @w P ( )W @ 0 R % "V E T D Ax"_" P @w P ( )W @ 0 Rb ' F "R G x$ @w Dw #D @ T G W, Ax J "R Ax Ax [ xT z |j
0x228580…29d200 [0x47e]: Pad {f00=0x00b2, f01=0x0190, f02=»w Aw @w U : Ax& Ax(:A Aw , ` R @ U P ,% T x C ( B P T W ' T Iw @ 8 =hP Y X P 0T Y Hw ! R W 9a Iw T T 9a Hw Ex& ^ W P ,! T T ( : "' #
0x228580…29d200 [0x47f]: Pad {f00=0x00b2, f01=0x0190, f02=» Ew "# P P @w P ( )W @ 0 R % "V E T D Ax"_" P @w P ( )W @ 0 Rb ' F "R G x$ @w Dw #D @ T G W, Ax J "R Ax Ax [ xT
0x228580…29d200 [0x480]: Pad {f00=0x00b2, f01=0x0190, f02=»w Aw @w U : Ax& Ax(:A Aw , ` R @ U P ,% T x C ( B P T W ' T Iw @ 8 =hP Y X P 0T Y Hw ! R W 9a Iw T T 9a Hw Ex& ^ W P ,! T T ( : "' #
0x228580…29d200 [0x481]: Pad {f00=0x00b2, f01=0x0190, f02=» Ew "# P P @w P ( )W @ 0 R % "V E T D Ax"_" P @w P ( )W @ 0 Rb ' F "R G x$ @w Dw #D @ T G W, Ax J "R Ax Ax [ xT
0x228580…29d200 [0x482]: Pad {f00=0x00b2, f01=0x0190, f02=»w Aw @w U : @z , L T L PF L T M Q M L V L Az @z : T @z [ [ M M M Az -(@ : - : @z , L T M @z : =a 9a Q - _ - > @ PJ r N TR TT ATR W$ @z , - M M M
0x228580…29d200 [0x483]: Pad {f00=0x00b2, f01=0x0190, f02=»,-. 0123456789:;<=>/ ($SWAP A A A A. UU @ @ ! P$>B @ A @ E D P _ $ % $P _ % A @ " Q A : R W2 A A r P. _ " :c* A r W " :d2 * A
0x228580…29d200 [0x484]: Pad {f00=0x00b2, f01=0x0190, f02=»W =J F CRTT F PN A @ $ P( @ R W 8 !RRT W V P A Y W @ " T> W @ V W Q Y P @ T W - P _ T <B :L A W A
0x228580…29d200 [0x485]: Pad {f00=0x00b2, f01=0x0190, f02=» :L < P W <9B @ V W Q W @ @ A @ CRT @ P @ ! P W @ V P _ @ ! P !RRP V @ P W _: h V @ PZ W @ @ ! T _
0x228580…29d200 [0x486]: Pad {f00=0x00b2, f01=0x0190, f02=»TJ V 0 !;;P P V P$ _ P !;;T X$ W _J T W * W W V 0 !;;P P V Xb _ P !;;T X$ W nP XZ_V S A ' A m @ R @ ! T A A
0x228580…29d200 [0x487]: Pad {f00=0x00b2, f01=0x0190, f02=» C.9h! # " :A K : A T.I T P 1 I P < R P A _> : 4 A r A A A A < A @ A ` A d : 9e9C) A I " 9A ! 9B r @ r A I ! ( : A r A A A A ! T A A I
0x228580…29d200 [0x488]: Pad {f00=0x00b3, f01=0x0190, f02=» 9PJ S Y T@ $ 1T: C !CCTt : 1P P$_ P =H P @ T X W n : YX d C !CCTZ B. x X B.9 H Q r_ _ !SST& 0 U R X A X W : @ ' R xW V W$ V P P v W P
0x228580…29d200 [0x489]: Pad {f00=0x00b3, f01=0x0190, f02=» P X 9A_ : @ ! P (W ( :W> 2 W 0 . " A T I T P 1 I 2 ; Z [ : : [ [ : j A A A A ! T A
0x228580…29d200 [0x48a]: Pad {f00=0x00b3, f01=0x0190, f02=» 6Q@ V V v x W V V v p R( W V W ^< _@ V _P V V : V J P " r 6V U " _ V " Z K W W :K W r 6Q R t 6V
0x228580…29d200 [0x48b]: Pad {f00=0x00b3, f01=0x0190, f02=» V |P v w v : V $ V l $ t V M : W V R RR > R W > <B V x V |P v 1 v W V z ` _f V : W R R P D j W x _ V : " D Pd W V PL $;A^ D E
0x228580…29d200 [0x48c]: Pad {f00=0x00b3, f01=0x0190, f02=» t " R P( |P v v : V W 0 : V P 9a _ " ( ) 8 ( ) : " $ V P 9A _ 0 : W W W ?AP ^ 0 : W ; V : : , X G : J @ 0 V @ 0 H W :
0x228580…29d200 [0x48d]: Pad {f00=0x00b3, f01=0x0190, f02=» , H H $ M v b - I Y0 : @ ` V b pP ` $ $ W $ H ) P _ " = D 4 Q R_d < = G $ ( V W $ V V E J K _N V r V :B A V 9n A @ A
0x228580…29d200 [0x48e]: Pad {f00=0x00b3, f01=0x0190, f02=» V W U6 T 9BW P P( P V W U " @ Q @ P A. @ P _b A 9n A :B A @ .V 3 S Y& P4 [b [b S P 3 _ [b 3 [d B A. @
0x228580…29d200 [0x48f]: Pad {f00=0x00b3, f01=0x0190, f02=» N V l W H V ]" . nT" W v j W n V ~P W x R F _v V d , V P _ N L % V d V f v G G v U j v G v : P D hV : j V ~P W x _$ 8 V V x % V
0x228580…29d200 [0x490]: Pad {f00=0x00b3, f01=0x0190, f02=» ) W b G t v ) - V t W f v ) G v ` " W p W ~ pP0 . R P : _ W ~ R X4 : _ ` @ ` W W ~ pPn < V W % . R , t " E R W ~ R R P
0x228580…29d200 [0x491]: Pad {f00=0x00b3, f01=0x0190, f02=» I ( " R E R T E D E @ v H v E V #_v W | ;b W W t V b v ( v W p V ` $ W ` ;h 0 :C # : .=H N .=H N N : d 8" R _ ZY
0x228580…29d200 [0x492]: Pad {f00=0x00b3, f01=0x0190, f02=» - N !TTP N :H N TBT W W8 2 " T @ N =H N @ ) !TTXX !CCT !UUT d LWh : 2 .:H N P V _ R :h " : YV : v `?A @
0x228580…29d200 [0x493]: Pad {f00=0x00b3, f01=0x0190, f02=» pP. " 4X 1 R Z0 _ W l a w ` :A W V d 4 W P _ W ` W d V V W W V V >k 8 W W t V V : x A P ` W r `
0x228580…29d200 [0x494]: Pad {f00=0x00b3, f01=0x0190, f02=» @ ] @ P @ P " P " P " P W W . !TTP @ T Y !TTX" A 9 A : @ @ P. @ " P #D l " P #E l " P #F l : @ " P @ P 3 _ @ " P S 1 S 9J S ( 3 (
0x228580…29d200 [0x495]: Pad {f00=0x00b3, f01=0x0190, f02=» p N =H N W | ( @ % P W @ % P P0 r " U _2 P0 " U _2 V V tPJ S ( V | S =J @ " S V l S W l V p S W p
0x228580…29d200 [0x496]: Pad {f00=0x00b3, f01=0x0190, f02=» ( CRT 3 @ ( ( S @ ( PP ( !RRP @ ! T 3 @ & P ( 3 ( 3 YL @ @ T : [` ` @ P _ 3 S S V V W @ @ T
0x228580…29d200 [0x497]: Pad {f00=0x00b3, f01=0x0190, f02=» r _ Ph W p W V 8 8 4 D P$ @ # P H I K T + Y@ V p _j V t Y !TTX @ @ T : @ R @ T P / _ T @
0x228580…29d200 [0x498]: Pad {f00=0x00b3, f01=0x0190, f02=» < V f P W f _B V W V t Yr !TTX @ @ T : !TTX !CCTr P, V r 4 U $ $ _. P, V 4 U $ $ _. @ @ @ ! P V 8 8 8 @
0x228580…29d200 [0x499]: Pad {f00=0x00b3, f01=0x0190, f02=» U^ V 8 8 8 4 D P$ @ # P H I K T + Y@ _`R& @ @ @ % P V 4 4 4 _r @ @ T : W V @ 0 V P _ W $ q > R P >b W >b & 8P D P U &
0x228580…29d200 [0x49a]: Pad {f00=0x00b3, f01=0x0190, f02=» -W H P U & I @ % PD H I H T P( H U V U W < + + P V : V $ F !LLT # W ;I # ;b W ;a WR# T W W,# T W W # T W W W R _ $ W :
0x228580…29d200 [0x49b]: Pad {f00=0x00b3, f01=0x0190, f02=» _ / V z U Y$ P W | V z 3 % W P _ V |P V v ][fW v P _ @ @ T : N =H N : N =H N : &=H F : F =H F : F =H F : P N =H N T _ : 00
0x228580…29d200 [0x49c]: Pad {f00=0x00b3, f01=0x0190, f02=» ! P ` @ E "W ` @ E " ! ! 1 V P R R P @ P 0 3 @ 0 t 1 t 2 t $ * 0 6 N n D p a `# ,k d k ,k
0x228580…29d200 [0x49d]: Pad {f00=0x00b3, f01=0x0190, f02=» _ / V 8f"DY : N =H P U ] KB :
0x228580…29d200 [0x49e]: Pad {f00=0x00b3, f01=0x0190, f02=» E "W ` 8f"DY $ * 0 $ ] KB n F F
0x228580…29d200 [0x49f]: Pad {f00=0x00b3, f01=0x0190, f02=» 8f"DY P 4c GP 4 4c GP h : 4` TP
0x228580…29d200 ]
0x29d200…29dea0 (2, 0) DirGranule ((2, 0)) {
0x29d200…29dea0 DirEnt {nam=»REMIT2«, typ=» «, f00=0x0000, f01=0x0000, f02=0x02a0, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»VDUPRT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0548, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»PRT «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0730, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»START «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0c40, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»KMD08 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1930, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»DUMMY «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1878, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»M:PROC«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1a78, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»EQUATE«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1898, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»DKSUBS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1850, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»EQULST«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x18e8, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»CONNJ «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x18f0, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»KM080 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x18f8, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»SCREEN«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1940, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»CONNJT«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1948, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»/OBJCT«, typ=»OB«, f00=0x0000, f01=0x0000, f02=0x0380, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»SL461 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2208, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»SUBAPL«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2a90, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»RGMAIN«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2270, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»RGFRMT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2298, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»RGSUBS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x22e0, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»DIVFMT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2320, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»KMDIO «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2370, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»RGSUB1«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x23a0, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»RGSUB2«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x23c8, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»DKEBCD«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x23d8, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»RGLIST«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x23e8, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»DKLICO«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x23f0, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»CONNJ1«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x23f8, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»CONNJ6«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2400, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»RGSTRT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1fa0, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»RGLOAD«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0120, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»CONNJ2«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x24f8, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»TEST «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x01f0, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»RGADM «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1880, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»CONNJ7«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x25a8, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»KM0801«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x25b0, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»KMDFIL«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1a18, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»RGOBJ «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x25d0, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»KM0806«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x25d8, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»X «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1a90, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»RGSUB3«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x18b8, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»DKLD «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x2608, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»KM0808«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2610, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»CONNJ8«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2620, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»KTPLN «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2628, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»HELP «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2640, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»KM0809«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2648, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»LEDFIL«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2650, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»CONNJ9«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2658, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»LEDLS «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2660, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»KTPLND«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2668, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»KTOPR «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2670, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»KTOPRD«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2688, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»RGMND «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2690, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»LISTE «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2698, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»ADM6 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x26a0, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»DCTSK «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1fd8, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»ADM6D «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x26e0, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»RELUP «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x26e8, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»KEY461«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x26f0, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»TB3270«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x26f8, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»KMDNR «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2708, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»KM0802«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2710, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»KM0803«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2718, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»KM0804«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2720, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»KM0805«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2728, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»KM0807«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2730, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»CONNJ3«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2738, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»CONNJ4«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2740, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»CONNJ5«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2748, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»REMTXT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x18d8, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»REMFMT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2190, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»DIV461«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2778, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»DIV167«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x27c8, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»DIV259«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2818, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»DIV805«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2868, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»DIV525«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x28b8, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»DIV743«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2908, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»SL525 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2958, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»SL167 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2970, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»SL787 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2988, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»KEY525«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x29a0, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»KEY167«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x29a8, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»KEY787«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x29b0, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»REMLEV«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x18b0, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»KMD08T«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x29d8, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»CONREM«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2a18, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»CONRT «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1a28, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»RGTEST«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x1e40, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»CONRST«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x21f0, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»KMREMT«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1a30, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»KMREMP«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2b10, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»CONRS2«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x21f8, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»OBDIR «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2ee0, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»TEST «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1840, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»REORG «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1a70, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»DC82 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x18e0, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»KEYCOP«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1900, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»SLCOP «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1920, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»KM173 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1848, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»C173 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1f98, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»KM379 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2148, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»C379 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2140, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»KM805 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2158, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»C805 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2508, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»KT805 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x00f0, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»KMREMF«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x02b8, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»CONRF «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x02c8, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»C805T «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x00d8, f03=0x0000}
0x29d200…29dea0 DirEnt {nam=»RUNOBX«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x00e0, f03=0x0000}
0x29d200…29dea0 }
0x29dea0…29e034 (2, 1) Opaque[0x194]
0x29e034…29e1c8 # DirEnt {nam=»VDUPRT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0548, f03=0x0000}
0x29e034…29e1c8 IdxSect {
0x29e034…29e1c8 f00 = 0x002a // 0x29e034 @0x0
0x29e034…29e1c8 f01 = 0x0018 // 0x29e036 @0x2
0x29e034…29e1c8 gno = [ // 0x29e038 @0x4
0x29e034…29e1c8 [0x00]: C0x002a.0x1.0
0x29e034…29e1c8 [0x01]: C0x002a.0x2.0
0x29e034…29e1c8 [0x02]: C0x002a.0x3.0
0x29e034…29e1c8 [0x03]: C0x002b.0x1.0
0x29e034…29e1c8 [0x04]: C0x002d.0x3.0
0x29e034…29e1c8 [0x05]: C0x0035.0x2.0
0x29e034…29e1c8 [0x06]: C0x0035.0x3.0
0x29e034…29e1c8 [0x07]: C0x0036.0x0.0
0x29e034…29e1c8 [0x08]: C0x0036.0x1.0
0x29e034…29e1c8 [0x09]: C0x0036.0x2.0
0x29e034…29e1c8 [0x0a]: C0x0039.0x0.0
0x29e034…29e1c8 [0x0b]: C0x0039.0x1.0
0x29e034…29e1c8 ]
0x29e034…29e1c8 }
0x29e1c8…29e35c Dummy {f00=0x002a, f01=0x0190, f02=» 2 P IDENT VDUPRT 2.1DK 1 79-10-20 870150540210 P : P =1,ODD BUFFER ADDRESS B P REL 2.1 79-05-23 b P =2,KEYBOARD LAMPS ~ P REL 2.1 79-05-23 " P =3, TRANSMIT BUFFER LENGTH P REL 2.1 79-05-23 F P****************
0x29e35c…29e4f0 Dummy {f00=0x002a, f01=0x0190, f02=» MAIN FRAME, AND DISPLAYING THEM ON . P* THE VDU ( PTS 6344 ) . : P* l H P******************************************************************** v P* P* P EJECT P* P* P* ENTRIES
0x29e4f0…29e684 Dummy {f00=0x002a, f01=0x018e, f02=»NTIRE SCREEN | $ P ENTRY SETCUR CURSOR POSITIONING ( P ENTRY ERASUP ERASE ALL UNPROTECTED < & P ENTRY DISPL DISPLAY MODIFIED DATA h . P ENTRY ERASUA ERASE UNPROTECTED TO ADDRESS . P ENTRY WCHAR WRITE ONE CHAR IN CURSOR POS P ENTRY UPDATE
0x29e684…29e818 Dummy {f00=0x002a, f01=0x0190, f02=» P* P* EXTERNALS P* " P* , P EXTRN LINHON,LINHOF START 6 P EXTRN LSAVON,LSAVOF START X P EXTRN ATMASB z P EXTRN EMULA P EXTRN REQTIM P EXTRN ICWRTE P* P EXTRN SNBUSY PRT P* * P EXTRN I:E
0x29e818…29e9ac Dummy {f00=0x002a, f01=0x0190, f02=»********************************** r P* * ( P* CONDITIONAL ASSEMBLY PARAMETERS 4 P* ` 2 P********************************************** j P 2 POFLIN EQU 1 OFFLINE HANDLING POSSIBLE IF ::= 1 , PDCLIN EQU 1 NUMBER OF MAIN FRAMES (1-2)
0x29e9ac…29eb40 Dummy {f00=0x002a, f01=0x0190, f02=»BUFFER LENGTH IN WORDS x 2 PTBUFNR EQU 2 NUMBER OF TRANSMIT BUFFERS (1-5) 8 PCOPCMD EQU 1 COPY COMMAND (ONLY TO PRINTER) IF := 1 T & PEBCDIC EQU 1 ASCII = 0,EBCDIC = 1 P* P* EQUATES P* P* * PTIMDC EQU 300 DC TIME OUT VALU
0x29eb40…29ecd4 (2, 2) Dummy {f00=0x002a, f01=0x018e, f02=»DMES EQU /7D END MESSAGE CHAR " PFORMFD EQU /7C FORM FEED CHAR & PDUPCH EQU /7B L PFMCH EQU /60 b P EJECT v P* P* P* EQUATES P* " P* COMMON EQU FOR ECB HANDLING P* P PECBBA EQU 2 PECBR
0x29ecd4…29ee68 Dummy {f00=0x002a, f01=0x018e, f02=» P* ECB REL. ADDRESSES P* $ P* . PDIS EQU 20 8 P* J PECBDC EQU -DIS-14 T P IFT DCLIN=2 n P IFT COPCMD=1 PECBDC2 EQU ECBDC-DIS PECBICR EQU ECBDC2-DIS PECBICW EQU ECBICR-DIS P XIF P IFT DCLIN=2
0x29ee68…29effc Dummy {f00=0x002a, f01=0x0190, f02=» PECBICR EQU ECBDC-DIS PECBICW EQU ECBICR-DIS $ P XIF B P IFF DCLIN=2 N P IFF COPCMD=1 b PECBICW EQU ECBDC-DIS x P XIF PECBVDU EQU ECBICW-DIS PECBKB EQU ECBVDU-DIS PECBSD EQU ECBKB-DIS P EJECT P*
0x29effc…29f190 Dummy {f00=0x002a, f01=0x0190, f02=»A REL. ADDRESSES P* PTCT01 EQU 0 " PPRINTER EQU TCT01+2 6 ( PBVDU EQU PRINTER+2 VDU SCREEN BUFFER R 0 PPCURS EQU BVDU+1920 CURSOR ADDRESS , BINARY ~ * PATTRIB EQU PCURS+2 LAST ATTRIBUTE CHAR PCURATT EQU ATTRIB+2 & PWCC EQU CURA
0x29f190…29f324 Dummy {f00=0x002a, f01=0x0190, f02=»T+2 DC READ EFFECTIVE LENGTH 2 PICWORK EQU DCLENG+2 WORK FIELD INTERTASK COMM $ , PINTATT EQU ICWORK+2 INTENSITY ATTRIBUTE Z $ POFFFLG EQU INTATT+2 OFFLINE FLAG ( PCOPNO EQU OFFFLG+2 HARDCOPY TASK ID * PCCC EQU COPNO+2 COPY COMMAND CHARACTER
0x29f324…29f4b8 Dummy {f00=0x002a, f01=0x0190, f02=»2 ECB ADDRESS LAST READ DC 2 PECBBLK EQU ECBDCC+2 ECBS FOR MULTIPLE WAIT &C " 4 PRDMORE EQU ECBBLK+10 BRANCH ADDRESS NEXT READ KB X P EJECT P P* P* * PLBVDU EQU 1920 1920 CHARACTER DISPLAY " PLPAGE EQU 48 LINES ON ONE PAGE
0x29f4b8…29f64c Dummy {f00=0x002a, f01=0x0190, f02=»ADDRESSES x P* " PNBRKBV EQU 0 NUMBER OF KB/VDUS & PNBRGTP EQU NBRKBV+2 NUMBER OF GTPS B P* l 2 PMF1KBV EQU NBRGTP+2 DV ADDRESSES KB/VDU MF #1 v 2 PMF1GTP EQU MF1KBV+16 DV ADDRESSES GTPS MF # 1 P IFT DCLIN=2 PMF2KBV EQU MF1GTP+
0x29f64c…29f7e0 Dummy {f00=0x002a, f01=0x018e, f02=»********** Z P* P* INPUT FROM DC P* 4 8 P**************************************************** > P* z P* RELATIVE POS IN ECBBLK PKB EQU 2 PDC1 EQU 4 PDC2 EQU 6 P* PDCINP EQU * & P CF A14,GTRBUF GET
0x29f7e0…29f974 (2, 3) Dummy {f00=0x002a, f01=0x0190, f02=» P XIF P IFT DCLIN=2 P LD A1,MAIN,TCABAS $ P CW A8,ECBBLK+DC2,TCABAS > P RF(E) DCIN20 MF # 2 ^ P CM ECBBLK+DC1,TCABAS z P LDR A1,A1 P RF(NZ) DCIN90 WRONG MF P RF DCIN30 PDCIN20 EQU * P CM ECBBLK+DC2,TCABAS
0x29f974…29fb08 Dummy {f00=0x002a, f01=0x0190, f02=»F(NZ) DCIN90 P XIF ( P LD A1,ECBEL,A8 EFFECTIVE DC-LENGTH P ST A1,DCLENG,TCABAS L P h P p P LD A5,KBINH,TCABAS x . P ORK A5,3 BIT 14,15:= 1. TOTALLY DISABLED . P* KEYBOARD. BIT 15 = 0 AFTER DISPLAYING. P ST A5,KBINH,TCA
0x29fb08…29fc9c Dummy {f00=0x002a, f01=0x0190, f02=»F A14,DISPL P LD A2,PCURS,TCABAS P CF A14,ATMASB 0 P F P N P* V P LD A2,KBINH,TCABAS ` P ANK A2,1 BIT 15 = 0? | P RF(Z) DCIN60 P LD A2,KBINH,TCABAS . P ANK A2,/E BIT 15:=0 KEYBOARD NOT TOTALLY P* INHIBI
0x29fc9c…29fe30 Dummy {f00=0x002a, f01=0x0190, f02=» CF A14,LINHOF TURN OFF 'KEYBOARD INHIBIT' P LD A2,KBINH,TCABAS 2 , P ANK A2,4 BITS 14,15:=0 RESTORE KEYBOARD N P ST A2,KBINH,TCABAS ~ P RF DCIN95 PDCIN90 EQU * P LD A8,ECBDCC,TCABAS P LD A4,ECBBA,A8 P CF A14,RLRBUF
0x29fe30…29ffc4 Dummy {f00=0x002a, f01=0x0190, f02=» A1,0 P CF A14,REQTIM P LDK A7,/82 READ, WAIT $ ( P CM ECBCW,A8 NO TIME OUT SUPERVISION B P LDKL A1,RBUFL+RBUFL n P ST A1,ECBRL,A8 REQ LENGTH P ST A4,ECBBA,A8 P LKM P DATA 1 P RTN A14 P EJECT > P**********
0x29ffc4…2a0158 Dummy {f00=0x002a, f01=0x0190, f02=»************************ n P* PRLINK EQU RBUFL+RBUFL+2 * P* J PRBUF EQU * T P DATA *+2 POINTER FIRST FREE f P IFF RBUFNR=1 P DATA *+RLINK P RES RBUFL P IFF RBUFNR=2 P DATA *+RLINK P RES RBUFL P I
0x2a0158…2a02ec Dummy {f00=0x002a, f01=0x0190, f02=»ATA 0 END OF CHAIN P RES RBUFL P* , P* 6 PTLINK EQU TBUFL+TBUFL+2 @ P* ` PTBUF EQU * j P DATA *+2 POINTER FIRST FREE | P IFF TBUFNR=1 P DATA *+TLINK P RES TBUFL P IFF TBUFNR=2 P DATA *+TLINK
0x2a02ec…2a0480 Dummy {f00=0x002a, f01=0x0190, f02=» P XIF P DATA 0 END OF CHAIN P RES TBUFL 0 P* B P* L P* GET WRITE BUFFER V P* p PGTWBUF EQU * z P LDKL A5,TBUF P CF A14,GETBUF P LDR A7,A4 P LDR A12,A4 P ADK A7,2 SKIP P LDKL A9,2 FOR D
0x2a0480…2a0614 (2, 4) Dummy {f00=0x002b, f01=0x018e, f02=» PGETBUF EQU * P LDR* A4,A5 P RF(Z) GETB50 NO BUFFER FREE 0 P LDR* A3,A4 T P STR A3,A5 h P ADK A4,2 SKIP LINK z P RTN A14 PGETB50 EQU * P LKM P DATA 0 SWITCH TASK P RB GETBUF P* P* RELEASE
0x2a0614…2a07a8 Dummy {f00=0x002b, f01=0x0190, f02=» P LDR* A3,A2 P RF(Z) RELB20 P LDR A2,A3 . P RB RELB10 @ PRELB20 EQU * R P STR A4,A2 f P CMR A4 x P RTN A14 P* PRLWBUF EQU * P LDKL A2,TBUF P RB RELB05 P EJECT P* P* " P* STORE
0x2a07a8…2a093c Dummy {f00=0x002b, f01=0x0190, f02=» PPDCCH EQU * P CWK A9,TBUFL+TBUFL =3 P RF(G) PDCCHR OVERFLOW < P SCR A2,A7 Z PPDCCH1 EQU * l P ADK A7,1 P ADKL A9,1 PPDCCHR RTN A14 P* P* P* STORE ATTENTION ID FROM A2 P* P* PPA
0x2a093c…2a0ad0 Dummy {f00=0x002b, f01=0x0190, f02=»,A7 P ANK A2,/FF & P RF(NZ) GDCC:1 NOT NULL CHARACTER $ P LDK A2,/7F LOAD NULL CHARACTER J PGDCC:1 EQU * r P RB PDCCH1 P EJECT P* P* . P* GET BUFFER ADDRESS TO A1 FROM DC BUFFER P* P* PGETADR C
0x2a0ad0…2a0c64 Dummy {f00=0x002b, f01=0x0190, f02=»/3F P ORR A1,A2 P RTN A14 P EJECT . P* < P* F " P* WRITE MESSAGE TO MAIN FRAME P P* v & P* ON EXIT A1 CONTAINS RETURN CODE P* P* PDCWRTE EQU * P LDKL A8,ECBDC P IFT DCLIN=2 P LD A7,MAIN,
0x2a0c64…2a0df8 Dummy {f00=0x002b, f01=0x0190, f02=»F A14,REQTIM P ST A9,ECBRL,A8 REQ LENGTH $ P ST A12,ECBBA,A8 BUFFER ADDRESS 6 P LD A7,KBINH,TCABAS ^ 8 P ORK A7,2 BIT 14 :=1 DISABLE KEYBOARD.RESET ALLOWED z P ST A7,KBINH,TCABAS P LDK A7,/86 PDC100 EQU * P LKM P D
0x2a0df8…2a0f8c Dummy {f00=0x002b, f01=0x0190, f02=» LD A7,KBINH,TCABAS ( P ANK A7,/D BIT 14:=0 ALLIWE KEYBOARD P ST A7,KBINH,TCABAS H . P CF A14,LINHOF TURN OFF "KEYBOARD INHIBIT d . P CF A14,LSAVOF TURN OFF "SYSTEM AVAILABLE" P* * P LDK A7,/04 RESET KEYBOARD ECB BUFFER P LDKL A8
0x2a0f8c…2a1120 Dummy {f00=0x002b, f01=0x0190, f02=»STEM AVAILABLE' v P RTN A14 P EJECT ( P* 6 P* @ ( P* STORE CURSOR ADDRESS IN DC BUFFER J P* v P* PCURSA LD A1,PCURS,TCABAS P RF BUFADR P* P* ( P* STORE BUFFER ADDRESS IN DC BUFFER P* P*
0x2a1120…2a12b4 (2, 5) Dummy {f00=0x002d, f01=0x0190, f02=»RT TO ASCII z P CF A14,PDCCH P LDR A2,A1 * P ANK A2,/3F < P LC A2,TASCII,A2 P P CF A14,PDCCH h P RTN A14 ~ P EJECT P* P* 2 P* GET MODIFIED DATA FROM DISPLAY IMAGE BUFFER P* P* A3=BUFFER POSITION BIN
0x2a12b4…2a1448 Dummy {f00=0x002d, f01=0x0190, f02=»UFFER POINTER @ P************************************************************ & P ADKL A4,1919 LAST SCREEN POSITION Z P LCR A2,A4 GET CHARACTER . P LDKL A4,BVDU RELOAD FIRST BUFFER POSITION P ADR A4,TCABAS P P LDR A1,A2 P A
0x2a1448…2a15dc Dummy {f00=0x002d, f01=0x0190, f02=»RD100 CWK A3,LBVDU P RF(NL) RDMODE ALL EXAMINED P LCR A2,A4 GET CHAR > P ADK A3,1 Z P ADK A4,1 l @ P************************************************************ ~ PRD105 EQU * @ P**************************************************
0x2a15dc…2a1770 Dummy {f00=0x002d, f01=0x0190, f02=» STORE NULL ~ * P CF A14,PDCCH STORE CHAR IN DC BUFFER ! P RB RD100 ! B PRD200 ANK A2,1 CHECK MDT BIT ! T P RF(NZ) RD300 MODIFIED FIELD ! x PRD210 CWK A3,LBVDU ! P RF(NL) RDMODE ALL EXAMINED ! P LCR A2,A4 ! P ADK A3,1 ! P ADK A4,1
0x2a1770…2a1904 Dummy {f00=0x002d, f01=0x018e, f02=»****** 78-05-11 ! ^ * P CWK A3,LBVDU ALL BUFFER EXAMINED ??? " P RF(NL) RDMODE YES!! " F F P******************************************************** 78-05-11 " b P RB RD200 ATTRIBUTE FOUND " PRD300 LDK A2,SBA " " P CF A14,PDCCH SBA TO DC BUFFER "
0x2a1904…2a1a98 Dummy {f00=0x002d, f01=0x0190, f02=» P* # 4 P* UPDATE VIDEO DISPLAY BUFFER IMAGE BY THE DATA # P* # F P* RECEIVED FROM THE DC LINE # P P* # t P* # ~ " P* A7=DC RECEIVE BUFFER POINTER # P* A8=DC ECB ADDRESS # ( P* A9=DC BUFFER INDEX, INITIALLY ZERO # P* # P* A3=DIS
0x2a1a98…2a1c2c Dummy {f00=0x002d, f01=0x0190, f02=»,ECBDCC,TCABAS # & P LD A7,ECBBA,A8 DC BUFFER ADDRESS $ $ P SUR A9,A9 RESET DC BUFFER INDEX $ @ 0 P CF A14,GDCCH GET FIRST CHAR FROM DC BUFFER $ h P CWK A2,ESC SHOULD BE ESCAPE $ P RF(NE) UPDEND NOT ESCAPE $ " P CF A14,GDCCH GET COMMAND CODE $ P
0x2a1c2c…2a1dc0 Dummy {f00=0x002d, f01=0x0190, f02=»ERASE ALL UNPROTECTED $ P IFT COPCMD=1 % P CWK A2,/37 % 4 P ABL(E) UPD600 COPY COMMAND % H P XIF % l $ P RF UPDEND INVALID COMMAND CODE % x P EJECT % P* % P* WRITE COMMAND % P* % PUPD100 EQU * % ( P CF A14,PWCC PROCESS WCC F
0x2a1dc0…2a1f54 (2, 6) Dummy {f00=0x0035, f01=0x0190, f02=»DK A5,1 INDICATE WCC, IC OR RA % P RF UPD220 & & P* & 8 P* ERASE/WRITE COMMAND & B P* & ` PUPD120 EQU * & j P CF A14,ERASE ERASE SCREEN & ~ P RF UPD200 & P* & P* ERASE ALL UNPROTECTED & P* & PUPD140 EQU * & ( P CF A14,ERASUP
0x2a1f54…2a20e8 Dummy {f00=0x0035, f01=0x018e, f02=» & " PUPD200 CF A14,PWCC PROCESS WCC ' $ P LDK A5,1 INDICATE WCC, IC OR RA ' . P EJECT ' V P* ' d P* ' n " P* PROCESS DATA FROM DC BUFFER ' x P* ' P* ' , PUPD210 LDK A3,0 START FROM POSITION ZERO ' P LDKL A4,BVDU ' P ADR A4,TCABAS '
0x2a20e8…2a227c Dummy {f00=0x0035, f01=0x0190, f02=» P CWK A2,/20 ( P RF(L) UPD300 ORDER ( PUPD230 EQU * ( 4 P ORK A2,/80 SET DISPLAY BIT ( H PUPD240 EQU * ( l ( P LDK A5,0 INDICATE NOT WCC, IC OR RA ( P CWK A3,LBVDU ( & P RF(E) UPD260 END OF VIDEO BUFFER ( PUPD250 EQU * ( $ P SCR A2,
0x2a227c…2a2410 Dummy {f00=0x0035, f01=0x0190, f02=» A4,TCABAS ( P RB UPD250 ) PUPD300 EQU * ) $ : P******************************************* 78-08-15 ) 8 , P CWK A3,LBVDU END OF DISPLAY BUFFER ??? ) v P RF(NE) UPD302 NO!!! ) $ P SUR A3,A3 FIRST SCREEN POSITION ) P LDKL A4,BVDU ) " P ADR A4,
0x2a2410…2a25a4 Dummy {f00=0x0035, f01=0x0190, f02=»E) UPD320 START FIELD ) P CWK A2,/11 * $ P RF(E) UPD340 SET BUFFER ADDRESS * 2 P CWK A2,/13 * Z P RF(E) UPD360 INSERT CURSOR * n P CWK A2,/09 * P RF(E) UPD400 PROGRAM TAB * P CWK A2,/14 * $ P RF(E) UPD500 REPEAT TO ADDRESS * P CWK
0x2a25a4…2a2738 Dummy {f00=0x0035, f01=0x0190, f02=» P RB UPD230 + PUPD305 CWK A2,/19 + P RF(NE) UPD310 + 0 P LDK A2,ENDMES END MESSAGE + F P RB UPD230 + h PUPD310 EQU * + z P CWK A2,/0A + P RF(NE) UPD315 + P LDK A2,NEWLIN NEW LINE + P RB UPD230 + PUPD315 EQU * + P CWK A2,/1
0x2a2738…2a28cc Dummy {f00=0x0035, f01=0x0190, f02=»0 NULL CHARACTER ??? + & P RF(NE) UPDEND NO!! ILLEGAL ORDER , " P LDK A2,/7F PTS NULL CHARACTER , F P RB UPD230 , l P , ~ @ P************************************************************ , P* , P* RELEASE RECEIVE BUFFER , P* , * P********
0x2a28cc…2a2a60 Dummy {f00=0x0035, f01=0x0190, f02=» P RTN A14 - P EJECT - P* - " P* - , P* START FIELD ORDER - 6 P* - R * PUPD320 CF A14,GDCCH GET ATTRIBUTE CHAR - P LC A2,TEBCDI,A2 - * P LDR A1,A2 COMPOSE PTS ATTRIBUTE CHAR - P ANK A1,1 - P SRL A2,1 - P ANK A2,/1E - P
0x2a2a60…2a2bf4 (2, 7) Dummy {f00=0x0035, f01=0x0190, f02=»U - " P RB(NL) UPDEND INVALID ADDRESS . P LDR A3,A1 . 0 P LDR A4,A3 . B P ADKL A4,BVDU . T P ADR A4,TCABAS . j P RB UPD220 . P* . P* INSERT CURSOR . P* . 0 PUPD360 ST A3,PCURS,TCABAS SET NEW CURSOR POS . $ P LDK A5,1 INDICATE WCC
0x2a2bf4…2a2d88 Dummy {f00=0x0035, f01=0x018e, f02=»TER WCC, IC OR RA . | 0 P LDK A1,NULL+/80 FILL CURRENT FIELD BY NULLS / PUPD410 EQU * / N P LDK A5,0 / b P CWK A3,LBVDU / t P RB(NL) UPD210 END OF BUFFER / P LCR A2,A4 / P ADK A3,1 / P ANK A2,/7F / P CWK A2,/20 / P RF(L) UPD415
0x2a2d88…2a2f1c Dummy {f00=0x0035, f01=0x0190, f02=» $ P RB(Z) UPD220 UNPROTECTED FIELD 0 PUPD430 EQU * 0 , P LDK A5,0 0 @ P CWK A3,LBVDU 0 R * P ABL(NL) UPD210 END OF DISPLAY BUFFER 0 h P LCR A2,A4 0 P ADK A3,1 0 P ADK A4,1 0 P ANK A2,/7F 0 P CWK A2,/20 0 P RB(L) UPD420 0
0x2a2f1c…2a30b0 Dummy {f00=0x0035, f01=0x0190, f02=»VDU 0 " P RB(NL) UPDEND INVALID ADDRESS 1 * P CF A14,GDCCH GET CHAR TO BE REPEATED 1 2 $ P LDK A5,1 INDICATE WCC, IC OR RA 1 ` " P ORK A2,/80 INDICATE MODIFIED 1 P 1 B P**************************************************** 78-07-02 1 P 1 2 P CWR
0x2a30b0…2a3244 Dummy {f00=0x0035, f01=0x0190, f02=»*** 78-07-02 1 ^ P 2 PUPD510 CWK A3,LBVDU 2 $ P RF(L) UPD520 NOT END OF SCREEN 2 : P LDK A3,0 2 b P LDKL A4,BVDU WRAP AROUND 2 t P ADR A4,TCABAS 2 PUPD520 CWR A3,A1 2 $ P ABL(E) UPD220 ALL CHAR REPEATED 2 P 2 F P********************
0x2a3244…2a33d8 Dummy {f00=0x0035, f01=0x018e, f02=»2 2 R P 3 P SCR A2,A4 3 P ADK A3,1 3 $ P ADK A4,1 3 6 P RB UPD510 NEXT POSITION 3 H P* 3 h " P* ERASE UNPROTECTED TO ADDRESS 3 r P* 3 ( PUPD540 CF A14,GETADR GET END ADDRESS 3 P CWK A3,LBVDU 3 " P RB(NL) UPDEND INVALID ADDRESS 3 0
0x2a33d8…2a356c Dummy {f00=0x0035, f01=0x0190, f02=» 3 P* 4 PUPD600 EQU * 4 P LD A1,PRINTER,TCABAS 4 & 4 P ABL(Z) UPDEND COPYCOMMAND NOT SUPPORTED FOR VDU 4 D P ADK A7,1 4 | P BYPASS CCC 4 " P CF A14,GDCCH GET FROM DEVICE 4 P IFT EBCDIC=1 4 & P LC A2,TEBCDI,A2 CONVERT TO EBCDIC 4
0x2a356c…2a3700 Dummy {f00=0x0035, f01=0x0190, f02=»TCABAS 4 ~ P RF(NZ) UPD602 5 P LDK A4,MF2KBV-1 MF # 2 READ 5 $ P XIF 5 H P IFT COPCMD=1 5 T PUPD602 EQU * 5 j P ADR A4,A3 CONFIG TABLE -1 5 ~ & P LD A5,NBRKBV,A3 NUMBER OF KB/VDUS 5 ( P ADR A4,A5 LAST KB/VDU CONFIGURATED 5 PUPD604 EQU * 5 $
0x2a3700…2a3894 (2, 8) Dummy {f00=0x0036, f01=0x0190, f02=»BL UPDEND NO MATCH 5 P* 6 PUPD610 EQU * 6 $ P LDKL A8,ECBICW 6 8 P ADR A8,CREBAS 6 P P LKM 6 f 0 P DATA 10 ABORT LAST REQUEST IF NOT COMPLETED 6 r & P ADKL A5,/4B40 TASKID FROM DEVICE 6 $ P LD A2,-4,CREBAS GET OWN TASKID 6 & P ST A2,ICWORK,TC
0x2a3894…2a3a28 Dummy {f00=0x0036, f01=0x0190, f02=»AS BUFFER ADDRESS 6 " P CF A14,ICWRTE WRITE INTERTASK 7 P ABL UPDEND 7 @ P XIF 7 T P EJECT 7 ` P* 7 n P* 7 x & P* PROCESS WRITE CONTROL CHARACTER 7 P* 7 * P* ONLY RESET MDT BIT IS TAKEN CARE OF 7 P* 7 P* 7 PPWCC CF A14,GDCC
0x2a3a28…2a3bbc Dummy {f00=0x0036, f01=0x0190, f02=»NTER,TCABAS 7 P RF(NZ) PWCC1 8 P LDR A10,A7 8 * P LDKL A8,ECBVDU 8 > P ADR A8,CREBAS 8 V P LD A2,ECBBA,A8 8 l P LDK A7,/2B 8 P SC A7,1,A2 =1 8 P LDK A7,/07 BELL =1 8 P SC A7,2,A2 =1 8 P SC A7,3,A2 =1 8 P LDK A7,4 8
0x2a3bbc…2a3d50 Dummy {f00=0x0036, f01=0x018e, f02=»* 8 P LD A2,WCC,TCABAS 9 P ANK A2,1 9 $ P RF(NZ) RESMDT RESET ALL MDT 9 6 PPWCC10 RTN A14 NO ACTION 9 Z P* 9 z P* 9 P* RESET ALL MDT BITS 9 P* 9 P* 9 PRESMDT LDK A3,0 9 P LDKL A4,BVDU 9 P ADR A4,TCABAS 9 PRESM10
0x2a3d50…2a3ee4 Dummy {f00=0x0036, f01=0x0190, f02=» P LCR A2,A4 : P ANK A2,/FE RESET MDT : P SCR A2,A4 : 4 PRESM20 ADK A3,1 : F P ADK A4,1 : ^ P RB RESM10 : p P EJECT : P* : P* : P* ERASE ENTIRE SCREEN : P* : P* : PERASE LDK A3,0 : P LDKL A4,BVDU : P ADR A
0x2a3ee4…2a4078 Dummy {f00=0x0036, f01=0x0190, f02=»DK A4,1 : P RB ERAS20 ; , PERAS25 CM PCURS,TCABAS RESET CURSOR POS ; " P LDKL A1,LBVDU+1 ; R 0 P ST A1,CURATT,TCABAS INDICATE UNFORM. SCREEN ; j P CM ATTRIB,TCABAS ; , P LD A1,PRINTER,TCABAS CHECK DEVISE TYPE ; ( P RF(NZ) ERAEND PRINTER, NOT DISP
0x2a4078…2a420c Dummy {f00=0x0036, f01=0x0190, f02=» A7,'1' ERASE CONTROL CHAR ; P LD A1,ECBBA,A8 =1 < " P SC A7,1,A1 =1 < > P LDK A7,2 < V " P ST A7,ECBRL,A8 REQ LENGTH = 2 < h P LDK A7,/86 WRITE < P LKM < P DATA 1 < P LD A8,-2,A14 < " P LDR* A7,A14 RESTORE A7 AND A8 < PERAEND R
0x2a420c…2a43a0 Dummy {f00=0x0036, f01=0x0190, f02=»CABAS SET KEYBOARD RESTORE BIT < 2 P SUR A1,A1 INDICATE ATT IN LAST SCREEN POS DK = & P LDK A3,0 = P LDKL A4,BVDU = n P ADR A4,TCABAS = 0 P CM PCURS,TCABAS FIND FIRST UNPROTECTED POS = H P**********************************************************
0x2a43a0…2a4534 (2, 9) Dummy {f00=0x0036, f01=0x018e, f02=»S!! WE GOT IT!! = 0 P LDK A1,1 ATTRIBUTE NOT IN LAST SCREEN POS. > < P******************************************************** > L PERASU1 CWK A3,LBVDU > P RF(NL) ERASU2 > P LCR A2,A4 GET CHAR > P ANK A2,/7F > P ADK A3,1 > P ADK A4,
0x2a4534…2a46c8 Dummy {f00=0x0036, f01=0x0190, f02=» * P ST A3,PCURS,TCABAS SET NEW CURSOR POS ? P LDR A1,A1 ? 2 0 P RF(Z) ERASU3 ATTRIBUTE IN LAST SCREEN POS. ? D PERASU2 LDK A3,0 ? x P LDKL A4,BVDU ? P ADR A4,TCABAS ? P RF ERASU4 ? PERASU3 EQU * ? P LDR A3,A3 ? 6 P RF(Z) ERASU4 UNPROT
0x2a46c8…2a485c Dummy {f00=0x0036, f01=0x0190, f02=»0 ? P LDK A6,NULL+/80 ERASE CHAR @ P RF ERAS35 @ . P EJECT @ @ P* @ N P* @ X . P* ERASE UNPROTECTED TO ADDRESS GIVEN IN A1 @ b P* @ P* @ * PERASUA LDK A6,NULL+/80 ERASE CHARACTER @ $ P ******************* 78-09-11 @ " P CWK A3,LB
0x2a485c…2a49f0 Dummy {f00=0x0036, f01=0x0190, f02=» ADDRESS @ r P A 8 PERAS:1 LDR A3,A3 START IN FIRST SCREEN POSITION ??? A P RF(NZ) ERAS35 NO!! A V ( P LC A2,1919,A4 LAST BUFFER CHARACTER A r P ANK A2,/7F A ( P CWK A2,/20 ATTRIBUTE CHARACTER ??? A P RF(NL) ERAS35 NO!!! A P ANK A2,/10 A
0x2a49f0…2a4b84 Dummy {f00=0x0036, f01=0x0190, f02=» $ P ******************** 78-09-11 B PERAS30 CWK A3,LBVDU B , $ P RF(L) ERAS33 NOT END OF SCREEN B H P LDK A3,0 B p P LDKL A4,BVDU WRAP AROUND B P ADR A4,TCABAS B PERAS33 EQU * B P CWR A3,A1 B ( P RB(E) ERAEND ALL UNPROTECTED ERASED B
0x2a4b84…2a4d18 Dummy {f00=0x0036, f01=0x018e, f02=»2,NULL B P RF(Z) ERAS40 ALREADY NULL C " P SCR A6,A4 STORE MODIFIED NULL C 0 PERAS40 ADK A3,1 C V P ADK A4,1 C n P RB ERAS30 C PERAS50 ADK A3,1 C P ADK A4,1 C P ANK A2,/10 C " P RF(NZ) ERAS60 PROTECTED FIELD C P LC A2,-1,A4 C
0x2a4d18…2a4eac Dummy {f00=0x0036, f01=0x0190, f02=» C P LDKL A4,BVDU WRAP AROUND D P ADR A4,TCABAS D * PERAS65 CWR A3,A1 D @ ( P RB(E) ERAEND ALL UNPROTECTED ERASED D X PERAS70 EQU * D P LCR A2,A4 D P ANK A2,/7F D P CWK A2,/20 D " P RB(L) ERAS50 ATTRIBUTE FOUND D P ADK A3,1 D
0x2a4eac…2a5040 Dummy {f00=0x0036, f01=0x0190, f02=» D P* E * PTRPA CF A14,GTWBUF GET TRANSMIT BUFFER E PTRPA10 CF A14,PAID STORE AID E @ PTRANS EQU * E d P CF A14,DCWRTE WRITE MESSAGE E x PTR050 EQU * E " P RTN A14 TRANSMISSION TROUBLE E PTRRTN RTN A14 E P EJECT E P* E P* E
0x2a5040…2a51d4 (2, 10) Dummy {f00=0x0036, f01=0x0190, f02=»PF10 CF A14,PAID STORE AID E & P CF A14,CURSA STORE CURSOR ADDRESS F " P CF A14,RDMOD READ MODIFIED F L " P RB TRANS SEND MODIFIED FIELDS F p P EJECT F P* F P* F $ P* DISPLAY MODIFIED FIELDS ON VDU F P* F P* F P* A3=VDU POSITION F
0x2a51d4…2a5368 Dummy {f00=0x0036, f01=0x018e, f02=»PUT CHAR COUNTER F P* G P* G " PDISPL LDKL A8,ECBVDU G , P ADR A8,CREBAS G H * P LDKL A1,/101 START FROM LINE 1 POS 1 G ^ P ST A1,ECBCW,A8 G 8 P SUR A10,A10 RESET COUNT FOR INTENSIFIED DISPLAYING G P LDK A3,0 G P LDKL A4,BVDU G P
0x2a5368…2a54fc Dummy {f00=0x0036, f01=0x0190, f02=» G N 6 P LC A2,1919,A4 CHECK IF ATTRIBUTE IN LAST POSITION H P ANK A2,/7F H B P CWK A2,/1F ATTRIBUTE ??? H V P RF(G) DIS100 NO!!! H x P H P ANK A2,6 H P XRK A2,6 H > P ST A2,INTATT,TCABAS CHECK DISPLAY/NONDISPLAY INFORMATION H P RF(Z)
0x2a54fc…2a5690 Dummy {f00=0x0036, f01=0x0190, f02=»*************** H PDIS100 EQU * I P CWK A9,LLINE I , " P RF(L) DIS110 NOT END OF LINE I B $ P CF A14,DISLIN DISPLAY THIS LINE I h . P CF A14,INTCHK CHECK IF LOW/HIGH INTENSITY I PDIS110 EQU * I P CWK A3,LBVDU I P RF(NL) DIS900 ALL SCANNED I
0x2a5690…2a5824 Dummy {f00=0x0036, f01=0x0190, f02=»IT I t P J > P************************************************ 78-08-15 J PDIS115 EQU * J T " P ANK A2,/7F RESET DISPLAY BIT J h P SCR A2,A4 J P ADK A3,1 J P ADK A4,1 J P ADK A7,1 J P ADKL A9,1 J P CWK A2,/20 J P RF(L) DIS20
0x2a5824…2a59b8 Dummy {f00=0x0036, f01=0x0190, f02=» LDK A2,/39 J PDIS120 CWK A2,/7E K P RF(NE) DIS121 K . P LDK A2,/35 K D PDIS121 CWK A2,/7C K X P RF(NE) DIS122 K r P LDK A2,/3C K PDIS122 EQU * K 4 P SC A2,-1,A7 STORE CHAR IN DISPLAY OUTPUT BUFFER K P RB DIS100 K PDIS200 ANK A2,
0x2a59b8…2a5b4c Dummy {f00=0x0036, f01=0x0190, f02=» ANK A2,4 K P RF(Z) DIS205 HIGH INTENSITY L P LDK A2,/1E LOW INTENSITY L 6 P RF DIS206 L X PDIS205 EQU * L j P LDK A2,/1F HIGH L ~ PDIS206 EQU * L * P SC A2,-1,A7 STORE INTENSITY CHARACTER L " P ADKL A10,1 INCREMENT COUNTER L P ADK A7,1
0x2a5b4c…2a5ce0 Dummy {f00=0x0036, f01=0x018e, f02=» EQU * L P CWK A3,LBVDU M P RF(NL) DIS900 ALL DISPLAYED M $ P LCR A2,A4 M H > P************************************************* 78-08-15 M Z P M " P CF A14,SET:M SET MODIFIED BIT M P M > P************************************************ 78-08
0x2a5ce0…2a5e74 (2, 11) Dummy {f00=0x0039, f01=0x0190, f02=» M P ADKL A9,1 N P CWK A2,/20 N " P RB(L) DIS200 ATTRIBUTE FOUND N . P RB DIS210 N T P EJECT N f P* N t P* N ~ P* POSITION THE CURSOR N P* N P* N PSETCUR EQU * N PDIS900 LDK A1,2 REQ LENGTH N PDIS905 ST A1,ECBRL,A8 N
0x2a5e74…2a6008 Dummy {f00=0x0039, f01=0x0190, f02=»DIS910 CWK A1,LLINE N P RF(L) DIS920 O P ADS A2,ECBCW,A8 O 2 P SUKL A1,LLINE O J P RB DIS910 O ` PDIS920 ADS A1,ECBCW,A8 O r $ P LDK A7,/8B SET CURSOR AND WRITE O P LKM O P DATA 1 O 0 P CM INTATT,TCABAS CLEAR INTENSITY ATTRIBUTE O P
0x2a6008…2a619c Dummy {f00=0x0039, f01=0x0190, f02=»BBA,A8 O P CF A14,RFMDUP P 0 P SC A2,3,A1 STORE CHAR IN VDU OUTPUT BUFFER P $ P LDK A1,4 P X P RB DIS905 REQ LENGTH = 3 P j P* P J P********************************************************************* P P* P 8 P* REPLACE FM & DUP WITH
0x2a619c…2a6330 Dummy {f00=0x0039, f01=0x0190, f02=»******* P R P* Q PRFMDUP EQU * Q P CWK A2,DUPCH Q . P RF(NE) RFMD10 Q D P LDK A2,/2A DUP Q Z PRFMD10 EQU * Q r P CWK A2,FMCH Q P RF(NE) RFMD20 Q P LDK A2,/3B Q PRFMD20 EQU * Q P RTN A14 Q P EJECT Q P* Q P* Q (
0x2a6330…2a64c4 Dummy {f00=0x0039, f01=0x018e, f02=»,LLINE LINE LENGTH Q P ADR A9,A9 DOUBLE IT R P LDKL A2,' ' SPACES R 6 PSPAC10 SCR A2,A7 =1 R R P SC A2,1,A7 =1 R n P ADK A7,2 R P SUKL A9,2 R P RB(P) SPAC10 R $ P LDK A2,0 CLEAR A2=CHAR REGISTER R & P LDK A5,0 RESET MODIFIED INDICAT
0x2a64c4…2a6658 Dummy {f00=0x0039, f01=0x0190, f02=» P* S P* S ( P* DISPLAY LINE IF ANY MODIFICATIONS S P* S D P* S N > P************************************************* 78-08-15 S X P S PDISLIN EQU * S P LDR A7,A5 S $ P ANK A5,/80 ANY MODIFICATIONS ?? S " P RF(Z) DISL10 NO MODIFIC
0x2a6658…2a67ec Dummy {f00=0x0039, f01=0x0190, f02=»A10 ADD NR OF INTENSITY CHARACTERS S PDIS:10 EQU * T * < P*********************************************** 78-08-15 T > " P ST A1,ECBRL,A8 SET REQ LENGTH T ~ P T P T $ P LDK A7,/8B SET CURSOR AND WRITE T P LKM T P DATA 1 T P EJECT T P T
0x2a67ec…2a6980 Dummy {f00=0x0039, f01=0x0190, f02=» T d P* OF THE LINE U P* U H P******************************************************************* U ( P U t $ P LD A1,ECBCW,A8 CURSOR POSITION U | P ANK A1,X'FF' COLUMN NUMBER U $ P* SUK A1,81 LAST POSITION ??? DK U " P SUK A1,80 LAST POSITION
0x2a6980…2a6b14 (2, 12) Dummy {f00=0x0039, f01=0x0190, f02=»D A1,ECBBA,A8 BUFFER ADRESS U , P LDK A2,X'2B' DONT MOVE CURSOR ONE LINE V $ P SC A2,1,A1 =1 V T * P LDKL A2,X'1420' FAST OUTPUT OF SPACES V l P SC A2,3,A1 =1 V P SRL A2,8 =1 V P SC A2,2,A1 =1 V P LDK A2,84 REQUESTED LENGTH V P ST
0x2a6b14…2a6ca8 Dummy {f00=0x0039, f01=0x0190, f02=»CBCW+1,A8 POS 1 ON NEXT LINE V P LDKL A2,/100 W $ * P ADS A2,ECBCW,A8 INCREMENT LINE NUMBER W : $ P RB SPACES PUT SPACES TO BUFFER W h P W P EJECT W P W P W D P**************************************************************** W P* W > P
0x2a6ca8…2a6e3c Dummy {f00=0x0039, f01=0x018e, f02=»************************************************************** W P X F , PINTCHK SUR A10,A10 RESET INTENSITY COUNT X N 0 P LD A2,INTATT,TCABAS GET INTENSITY ATTRIBUTE X ~ P RF(Z) INTRTN NON DISPLAY X $ P ANK A2,X'4' HIGH INTENSITY ??? X P RF(Z) INT:1
0x2a6e3c…2a6fd0 Dummy {f00=0x0039, f01=0x0190, f02=» X l P Y 8 PINT:20 SCR A2,A7 SAVE INTENSITY CHARACTER IN BUFFER Y & P ADK A7,1 INCREMENT BUFFER POINTER Y L * P ADKL A10,1 INTENSITY COUNT Y v PINTRTN RTN A14 RETURN Y P* Y P EJECT Y P Y D P**************************************
0x2a6fd0…2a7164 Dummy {f00=0x0039, f01=0x4190, f02=»**************************************************** Y P Z < PSET:M CWK A2,/20 Z D & P RF(L) SET:M2 ATTRIBUTE CHARACTER Z P CWK A2,/7F Z & P RF(E) SET:M2 UNMODIFIED ATTRIBUTE Z P CWK A2,/FF Z ( P RF(NE) SET:M1 NOT NULL OR ATTRIBUTE Z ( P ORK
0x2a7164…2a72f8 Dummy {f00=0x0039, f01=0x2008, f02=» [ NT DUMMY END @ (
0x2a72f8…2a748c Dummy {f00=0x0039, f01=0x0190, f02=» 0 1 ! 4! R 6 0! W 0! W 0! $2 _, 4 6 0!V W 0!V W 0!V 4 0 1 4 4 % L% B! ) : q I ! q* rb { { ! q 4 r b # | % r b # % r W
0x2a748c…2a7620 Dummy {f00=0x0039, f01=0x0190, f02=» ! q 4 4 0 ! = 6 6 4 K W&J W! t W " t _+J .W 4 # *H @ , W H @ , ( , ? 2 r !"#$ %&%%%%%'%%%%%%%%%%%%%%%$%%%%%$%%%%%%%$%%%%$$($$$$$$$$%)*% +, -./0123456789:;<%%% =>?@ABCDEFGH
0x2a7620…2a77b4 (2, 13) Opaque[0x194]
0x2a77b4…2a7948 # DirEnt {nam=»PRT «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0730, f03=0x0000}
0x2a77b4…2a7948 IdxSect {
0x2a77b4…2a7948 f00 = 0x0039 // 0x2a77b4 @0x0
0x2a77b4…2a7948 f01 = 0x000a // 0x2a77b6 @0x2
0x2a77b4…2a7948 gno = [ // 0x2a77b8 @0x4
0x2a77b4…2a7948 [0x00]: C0x0039.0x2.0
0x2a77b4…2a7948 [0x01]: C0x0039.0x3.0
0x2a77b4…2a7948 [0x02]: C0x003a.0x0.0
0x2a77b4…2a7948 [0x03]: C0x003b.0x3.0
0x2a77b4…2a7948 [0x04]: C0x003d.0x2.0
0x2a77b4…2a7948 ]
0x2a77b4…2a7948 }
0x2a7948…2a7adc Dummy {f00=0x0039, f01=0x0190, f02=» 2 P IDENT PRT REL 2.1*79-10-20 870150540210 P : P =1, ODD BUFFER ADDRESS B P REL 2.1 79-05-23 d N P************************************************************************* P* F P* P R T : MODULE PRINTING MAIN FRAME MES
0x2a7adc…2a7c70 Dummy {f00=0x0039, f01=0x0190, f02=»ULE l P* J P********************************************************************** P* d P EJECT n P | P P* P* P* ENTRY PARAMETERS P* P* P ENTRY SNBUSY P ENTRY PRINT P ENTRY ICREAD
0x2a7c70…2a7e04 Dummy {f00=0x0039, f01=0x0190, f02=»PLACE FM & DUP CHARS P EXTRN GTRBUF P EXTRN DCGETM 2 P EXTRN RELBUF H P EXTRN DC1INQ ^ P EXTRN DC2INQ t P EXTRN REQTIM P* , P EXTRN I:EVA0 CREDIT EVALUATION ROUTINE P* P EXTRN EMULA START P EJECT
0x2a7e04…2a7f98 Dummy {f00=0x0039, f01=0x0190, f02=»***************************************** P 2 2 POFLIN EQU 1 OFFLINE HANDLING POSSIBLE IF ::= 1 : , PDCLIN EQU 1 NUMBER OF MAIN FRAMES 81-2) p & PCOPCMD EQU 1 COPY COMMAND IF := 1 P* P* EQUATES P* P* P* * PTIMD
0x2a7f98…2a812c Dummy {f00=0x0039, f01=0x0190, f02=» LINE CHARACTER ~ $ PENDMES EQU /7D END MESSAGE CHAR " PFORMFD EQU /7C FORMFEED CHAR. @ PFMCH EQU /60 f PDUPCH EQU /7B z P EJECT P* P* P* EQUATES P* " P* COMMON EQU FOR ECB HANDLING P* P
0x2a812c…2a82c0 Dummy {f00=0x0039, f01=0x0190, f02=»EQU P* P* P* ECB REL. ADDRESSES P* < P* F PDIS EQU 20 P P* b PECBDC EQU -DIS-14 l P IFT DCLIN=2 PECBDC2 EQU ECBDC-DIS PECBICR EQU ECBDC2-DIS P XIF P IFF DCLIN=2 PECBICR EQU ECBDC-DIS
0x2a82c0…2a8454 (2, 14) Dummy {f00=0x0039, f01=0x0190, f02=»BPR EQU ECBICR-DIS P XIF P* & P* 0 " P* BASE ADDRESS FOR TCA AND ECB : P* ` PTCABAS EQU A11 j PCREBAS EQU A13 ECB P* & P* CONFIG DATA 'CB1' REL ADDRESSES P* " PNBRKBV EQU 0 NUMBER OF KB/VDUS & PNBRGTP EQU
0x2a8454…2a85e8 Dummy {f00=0x0039, f01=0x0190, f02=»F # 1 h P IFT DCLIN=2 PMF2KBV EQU MF1GTP+16 " PMF2GTP EQU MF2KBV+16 > P XIF Z P EJECT f P* t P* TCA REL. ADDRESSES ~ P* PTCT01 EQU 0 PPRINTER EQU TCT01+2 ( PBVDU EQU PRINTER+2 VDU SCREEN BUFFER 0 PPCURS EQ
0x2a85e8…2a877c Dummy {f00=0x0039, f01=0x0190, f02=»CC/CCC CHARACTER ~ . PKBINH EQU WCC+2 KEYBOARD INHIBIT INDICATOR $ PLINCNT EQU KBINH+2 LINE COUNTER J 0 PDCLENG EQU LINCNT+2 DC READ EFFECTIVE LENGTH r 2 PICWORK EQU DCLENG+2 WORK FIELD INTERTASK COMM , PINTATT EQU ICWORK+2 INTENSITY ATTRIBUTE
0x2a877c…2a8910 Dummy {f00=0x0039, f01=0x0190, f02=»IN EQU CCC+2 MAIN FRAME & PMODE EQU MAIN+2 INSERT MODE SWITCH $ PKEYS EQU MODE+2 KEY LOCK STATUS J . PECBDCC EQU KEYS+2 ECB ADDRESS LAST READ DC r 2 PECBBLK EQU ECBDCC+2 ECBS FOR MULTIPLE WAIT &C 4 PRDMORE EQU ECBBLK+10 BRANCH ADDRESS NEXT READ
0x2a8910…2a8aa4 Dummy {f00=0x0039, f01=0x0190, f02=»20 1920 CHARACTER DISPLAY " PLPAGE EQU 48 LINES ON ONE PAGE " : PGTPLIN EQU 112 LINELENGTH MAX 112 CHAR. 'NL' ORDER IN H , P* BUFFER DETERMINES PRINT LINE LENGTH P* P P P EJECT PPRINT EQU * P CF A14,I:EVA0 & P
0x2a8aa4…2a8c38 Dummy {f00=0x0039, f01=0x018e, f02=»************************************* P* . , P* TRANSFER PARAMETER FOR MAIN-FRAME #1 8 P* h 6 P************************************************* r P P LC A1,MF1GTP-1,A4 P ANK A1,/FF P LDKL A8,ECBDC P CF A14,EMULA
0x2a8c38…2a8dcc Dummy {f00=0x0039, f01=0x0190, f02=» f P* 6 P************************************************* P L P LC A1,MF2GTP-1,A4 T P ANK A1,/FF n P LDKL A8,ECBDC2 $ P CF A14,EMULA TRANSFER PARAMETER P XIF P EJECT P* P* RELATIVE POS IN ECBBLK PIC
0x2a8dcc…2a8f60 Dummy {f00=0x0039, f01=0x018e, f02=» A1,3 P XIF P ST A1,ECBBLK,TCABAS PPRI100 EQU * 6 P CM ICWORK,TCABAS J P LD A1,ECBBLK+DC1,TCABAS d P RF(NZ) PRI110 PENDING 0 P CF A14,DC1INQ TEST IF ANY MESSAGE, NO WAIT PPRI110 EQU * P IFT DCLIN=2 P LD A1,ECB
0x2a8f60…2a90f4 (2, 15) Dummy {f00=0x003a, f01=0x0190, f02=» P LD A1,ECBBLK+ICR,TCABAS P RF(NZ) PRI150 PENDING ( P LDKL A6,LBVDU REQ LENGTH F P LDKL A3,BVDU BUFFER h P ADR A3,TCABAS ADDRESS * P CF A14,ICREAD READ INTERTASK NO WAIT P ST A8,ECBBLK+ICR,TCABAS PPRI150 EQU * P L
0x2a90f4…2a9288 Dummy {f00=0x003a, f01=0x0190, f02=»T FROM INTERTASK ~ : P ST A8,ECBDCC,TCABAS SAVE ECB ADDRESS FOR CURRENT READ P CF A14,DCINP INPUT FROM DC V P RB PRI100 z P EJECT P* P* READ INTERTASK, NOWAIT P* P* A3 = BUFFER ADDRESS P* A6 = REQ LENGTH P*
0x2a9288…2a941c Dummy {f00=0x003a, f01=0x0190, f02=»LENGTH | P ST A3,ECBBA,A8 * P LDK A7,2 READ NOT ADDRESSED, NO WAIT & P LKM T P DATA 1 ` P RTN A14 p P EJECT D P**************************************************************** P* P* INPUT FROM DC P* 8 P******
0x2a941c…2a95b0 Dummy {f00=0x003a, f01=0x0190, f02=»A7 P RF(Z) DCIN10 NOT COMPLETED P IM ICWORK,TCABAS SET FLAG . , P RF ICRINP TAKE CARE OF INTERTASK INPUT P . P OR BUFFER WILL BE DESTROYED IN 'UPDATE' PDCIN10 EQU * & P CF A14,GTRBUF GET RECEIVE BUFFER P LD A8,ECBDCC,TCABAS
0x2a95b0…2a9744 Dummy {f00=0x003a, f01=0x0190, f02=»DC2,TCABAS P RF(E) DCIN20 MF # 2 P CM ECBBLK+DC1,TCABAS . P RF DCIN30 L PDCIN20 EQU * ^ P CM ECBBLK+DC2,TCABAS r P XIF PDCIN30 EQU * $ P LD A1,ECBEL,A8 EFFECTIVE LENGTH . P ST A1,DCLENG,TCABAS SAVE IT IN SAVE AREA
0x2a9744…2a98d8 Dummy {f00=0x003a, f01=0x0190, f02=»MMAND z P XIF . P LD A1,WCC,TCABAS WRITE CONTROL CHARACTER P ST A1,CCC,TCABAS COPY IT L P CF A14,COPY COPY ON PRINTER n PDCIN90 EQU * P CF A14,SNBUSY P RTN A14 P EJECT P* P* ABORT INTERTASK READ P*
0x2a98d8…2a9a6c Dummy {f00=0x003a, f01=0x0190, f02=»10 P RTN A14 P EJECT P* ( P* INPUT FROM INTERTASK 2 P* P PICRINP EQU * Z P CM ECBBLK+ICR,TCABAS n P * P LDK A1,X'38' PRINT BIT, 80 CHAR./LINE 4 P ST A1,CCC,TCABAS SAVE AS COPY CONTROL CHARACTER * P CF A14,COPY P
0x2a9a6c…2a9c00 Dummy {f00=0x003a, f01=0x018e, f02=»* P* . P* PRINT THE CONTENTS OF THE PRINTER BUFFER P* F P* P > PLINLEN DATA /0028,/4050 LINE LENGTHS /40, 64 AND 80 CHARS Z P* P* PCOPY LDKL A8,ECBPR P ADR A8,CREBAS PRINTER ECB P LD A7,ECBBA,A8 P SUR
0x2a9c00…2a9d94 (2, 16) Dummy {f00=0x003b, f01=0x0190, f02=» p P LDKL A4,BVDU P ADR A4,TCABAS " P LD A2,CCC,TCABAS GET CCC/CCC 4 P ANK A2,/08 Z ( P RF(NZ) COP100 START PRINTER BIT SET n PCOPRTN RTN A14 PCOP100 EQU * P LD A2,CCC,TCABAS P ANK A2,/30 , P ABL(Z) COP111 NL DETE
0x2a9d94…2a9f28 Dummy {f00=0x003b, f01=0x018e, f02=»120 , PCOP115 CF A14,PRLINE LINE FULL: PRINT IT P RB COP110 < PCOP120 CWK A3,LBVDU N $ P ABL(NL) COP300 PRINT LAST LINE j P LCR A2,A4 " P ANK A2,/7F RESET DISPLAY BIT P SCR A2,A4 P CWK A2,/20 P RF(NL) COP130 PCO
0x2a9f28…2aa0bc Dummy {f00=0x003b, f01=0x018e, f02=» PCOP130 CWK A2,NULL ( P RB(E) COP125 REPLACE NULL BY SPACE " PCOP140 EQU * N P CWK A2,/7D b P RF(NE) COP141 v P LDK A2,/39 PCOP141 CWK A2,/7E P RF(NE) COP142 P LDK A2,/35 PCOP142 EQU * P CF A14,RFMDUP F
0x2aa0bc…2aa250 Dummy {f00=0x003b, f01=0x0190, f02=» P ADK A3,1 P ADK A4,1 P ADK A7,1 ( P ADKL A9,1 : P RB COP110 L , PCOP150 LDK A2,/20 SPACE INSTEAD OF TEXT ^ P SCR A2,A7 P ADK A3,1 P ADK A4,1 P ADK A7,1 P ADKL A9,1 P CWR A9,A6 P RF(L) COP160
0x2aa250…2aa3e4 Dummy {f00=0x003b, f01=0x0190, f02=»UTE | ( P RB COP150 STILL IN PROTECTED FIELD P* 8 P* B , P* LINE LENGTH AS DEFINED BY NL CHARACTER L P* | P* 6 P* THE FIRST INSTR. ORIGINALLY HAD LABEL 'COP200'. P* P* PCOP111 EQU * P CWK A9,GTPLIN P
0x2aa3e4…2aa578 Dummy {f00=0x003b, f01=0x0190, f02=»F(NL) COP300 PRINT LAST LINE P LCR A2,A4 $ P ANK A2,/7F 6 P SCR A2,A4 RESET DISPLAY BIT J P CWK A2,/20 n P RF(NL) COP230 ( PCOP223 ANK A2,/6 ATTRIBUTE CHARACTER P XRK A2,6 " P RF(Z) COP250 PROTECTED FIELD 0 PCOP225 LDK A
0x2aa578…2aa70c Dummy {f00=0x003b, f01=0x0190, f02=»40 EQU * P CWK A2,/7B P RF(NE) COP241 $ P LDK A2,/2A : PCOP241 SCR A2,A7 N P ADK A3,1 f P ADK A4,1 x P ADK A7,1 P CWK A2,NEWLIN & P RB(E) COP210 NL CHAR: PRINT LINE P CWK A2,ENDMES . P RF(E) COP300 UND MESS
0x2aa70c…2aa8a0 Dummy {f00=0x003b, f01=0x0190, f02=» A3,1 P ADK A4,1 P ADK A7,1 P ADKL A9,1 2 P CWR A9,A6 D P RF(L) COP260 V ( P CF A14,PRLINE LINE FULL : PRINT IT l PCOP260 LCR A2,A4 P ANK A2,/7F P CWK A2,/20 " P RB(L) COP223 ATTRIBUTE FOUND ( P RB COP250
0x2aa8a0…2aaa34 (2, 17) Dummy {f00=0x003d, f01=0x0190, f02=»OPRTN P EJECT P* P* & P* PRINT ONE LINE ON PRINTER 0 P* T ( P* A9=NUMBER OF CHAR IN PRINT BUFFER ^ P* P* 4 PPRLINE IM LINCNT,TCABAS COUNT NBR OF PRINTLINES " P RF(N) PRL100 NOT END OF PAGE P LDK A7,LPAG
0x2aaa34…2aabc8 Dummy {f00=0x003d, f01=0x0190, f02=»RST CHAR IN BUFFER ~ P ANK A2,/7F P CWK A2,FORMFD . P RF(NE) PRL200 NOT FORM FEED D P LDK A2,/20 h $ P SC A2,2,A7 REPLACE LF BY SPACE | P PPRL110 EQU * " P LD A1,LINCNT,TCABAS FORM FEED P LDK A7,2 4 P ST A7,ECBRL,A8
0x2aabc8…2aad5c Dummy {f00=0x003d, f01=0x018e, f02=»B(N) PRL120 P LDK A7,LPAGE P NGR A7,A7 * , P ST A7,LINCNT,TCABAS RESET LINE COUNTER < 0 PPRL200 ADKL A9,2 ADJUST LENGTH FOR BUFFER CW l P ST A9,ECBRL,A8 REQ LENGTH P LDK A7,/86 STD WRITE P LKM P DATA 1 P LDK A7,0
0x2aad5c…2aaef0 Dummy {f00=0x003d, f01=0x412e, f02=» P RTN A14 ! P EJECT ! P* ! " P* ! , P* SET STATUS NOT BUSY FOR DC ! 6 P* ! Z P* ! d PSNBUSY EQU * ! n P LD A8,ECBDCC,TCABAS ! P CM ECBCW,A8 ! P LDK A7,/B8 SET STATUS ORDER ! P LKM ! P DATA 1 ! P RTN A14 ! P* !
0x2aaef0…2ab084 Dummy {f00=0x003d, f01=0x2008, f02=» " IDENT PRT END "@ 6
0x2ab084…2ab218 Dummy {f00=0x003d, f01=0x0190, f02=» P ST A8,ECBBLK+DC1,TCABAS # PDC1I20 EQU * # $ P LDK A1,0 # 8 P CF A14,REQTIM # J P LDK A7,0 # ` PDC1I30 EQU * # r P LKM # P DATA 1 # P RTN A14 # PDC2INQ EQU * # P IFT DCLIN=2 # P LDKL A8,ECBDC2 # P ADR A8,CREBAS # P
0x2ab218…2ab3ac Dummy {f00=0x003d, f01=0x0190, f02=»K # t P* $ PBUFCOP EQU * $ P CM ECBBLK+ICR,TCABAS $ ( P LDKL A3,BVDU BUFFER $ F P ADR A3,TCABAS ADDRESS $ b P IFT COPL=1 $ P* $ P* CHECK IF COPY LOCK $ P* $ P LCR A2,A3 $ P ANK A2,/18 $ P XRK A2,/10 $ P RB(Z) V
0x2ab3ac…2ab540 Dummy {f00=0x003d, f01=0x0190, f02=»ID $ v P LDKL A6,LBVDU REQ LENGTH % P CF A14,ICWRTE % , P LD A1,KBINH,TCABAS % B ( P ANK A1,/E NOT INHIBITED ANY LONGER % ^ P ST A1,KBINH,TCABAS % P RB VDU100 % P XIF % P EJECT % P** KEYBOARD INPUT % P* % PKBINP EQU * %
0x2ab540…2ab6d4 (2, 18) Opaque[0x194]
0x2ab6d4…2ab868 # DirEnt {nam=»START «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0c40, f03=0x0000}
0x2ab6d4…2ab868 IdxSect {
0x2ab6d4…2ab868 f00 = 0x0062 // 0x2ab6d4 @0x0
0x2ab6d4…2ab868 f01 = 0x0022 // 0x2ab6d6 @0x2
0x2ab6d4…2ab868 gno = [ // 0x2ab6d8 @0x4
0x2ab6d4…2ab868 [0x00]: C0x0062.0x0.0
0x2ab6d4…2ab868 [0x01]: C0x0062.0x1.0
0x2ab6d4…2ab868 [0x02]: C0x0062.0x2.0
0x2ab6d4…2ab868 [0x03]: C0x00b3.0x3.0
0x2ab6d4…2ab868 [0x04]: C0x00b8.0x1.0
0x2ab6d4…2ab868 [0x05]: C0x00b8.0x2.0
0x2ab6d4…2ab868 [0x06]: C0x00b8.0x3.0
0x2ab6d4…2ab868 [0x07]: C0x00b9.0x0.0
0x2ab6d4…2ab868 [0x08]: C0x00b9.0x1.0
0x2ab6d4…2ab868 [0x09]: C0x00b9.0x2.0
0x2ab6d4…2ab868 [0x0a]: C0x00b9.0x3.0
0x2ab6d4…2ab868 [0x0b]: C0x00ba.0x0.0
0x2ab6d4…2ab868 [0x0c]: C0x00c0.0x2.0
0x2ab6d4…2ab868 [0x0d]: C0x00c0.0x3.0
0x2ab6d4…2ab868 [0x0e]: C0x00c1.0x0.0
0x2ab6d4…2ab868 [0x0f]: C0x00c1.0x1.0
0x2ab6d4…2ab868 [0x10]: C0x00c1.0x2.0
0x2ab6d4…2ab868 ]
0x2ab6d4…2ab868 }
0x2ab868…2ab9fc Dummy {f00=0x0062, f01=0x0190, f02=» 2 P IDENT START REL 2.1*79-10-20 870150540210 P : P =1, ODD BUFFER ADDRESS B P REL 2.1 79-05-23 d P =2, 6234 LAMPS P REL 2.1 79-05-23 P =3, UNDEFINED LABEL P REL 2.1 79-05-23 . P =4, CURSOR STOPS AT L
0x2ab9fc…2abb90 Dummy {f00=0x0062, f01=0x0190, f02=»******************************************* ~ P* 4 H P* S T A R T : MODULE HANDLING KEYBOARD INPUT.KEYBOARD INITIATED > H P* MESSAGES ADDRESSED TO THE MAIN FRAME ARE COMPOSED B P* AND SENT BY USING ROUTINES IN MO
0x2abb90…2abd24 Dummy {f00=0x0062, f01=0x0190, f02=» P EJECT P* P* P* ENTRY PARAMETERS * P* D P* N P* X P ENTRY LINHON,LINHOF,ATMASB b P ENTRY LSAVOF,LSAVON P ENTRY EMULA & P ENTRY LIOLON TURN ON OFFLINE LAMP ( P ENTRY LIOLOF TURN OFF OFFLINE LAMP
0x2abd24…2abeb8 Dummy {f00=0x0062, f01=0x0190, f02=»R r P ENTRY ICWRTE P* P* * P* 4 P* EXTERNAL REFERENSES > P* ` P* j P* t P EXTRN DCINP ~ P EXTRN DCGETM P EXTRN ICREAD P EXTRN GTRBUF P EXTRN RLRBUF P EXTRN ERASE VDUPRT P E
0x2abeb8…2ac04c Dummy {f00=0x0062, f01=0x0190, f02=» P* 0 P EXTRN KEYCNV KEY CONVERSION IF NOT PTS 6272 P EXTRN TASCII F P* , P EXTRN I:EVA0 CREDIT EVALUATION ROUTINE f & P EXTRN I:RT1 RETURN TO CREDIT CODE P EJECT P P > P******************************************
0x2ac04c…2ac1e0 Dummy {f00=0x0062, f01=0x0190, f02=»KB6272 EQU 0 IF PTS 6272 (6236) IS NOT USED YOU MUST USE 'KEYCNV' 0 P USE THE KEY CONVERSION TABLE IN 'TB3270' J 0 PKEYLST EQU 0 KEY LOCK STATUS SAVED IN 'KEYS' ~ POFLIN EQU 1 . PDCLIN EQU 1 NUMBER OF MAIN FRAMES (1 OR 2) PPFX EQU 1
0x2ac1e0…2ac374 (2, 19) Dummy {f00=0x0062, f01=0x0190, f02=»OPY LOCK IF := 1 P EJECT P* & P* 0 P* EQUATES : P* P PRSET EQU /B2 RESET KEY Z " P* COMMON EQU FOR ECB HANDLING x P* P PECBBA EQU 2 PECBRL EQU 4 PECBEL EQU 6 PECBRC EQU 8 PECBCW EQ
0x2ac374…2ac508 Dummy {f00=0x0062, f01=0x0190, f02=» P* PECBDC EQU -DIS-14 P IFT DCLIN=2 , P IFT COPCMD=1 @ PECBDC2 EQU ECBDC-DIS V PECBICR EQU ECBDC2-DIS r PECBICW EQU ECBICR-DIS P XIF P IFT DCLIN=2 P IFF COPCMD=1 PECBDC2 EQU ECBDC-DIS PECBICW E
0x2ac508…2ac69c Dummy {f00=0x0062, f01=0x0190, f02=»IF P IFF DCLIN=2 P IFF COPCMD=1 PECBICW EQU ECBDC-DIS 4 P XIF P PECBVDU EQU ECBICW-DIS PECBKB EQU ECBVDU-DIS z PECBSD EQU ECBKB-DIS P EJECT P* P* " P* BASE ADDRESS FOR TCA AND ECB P* PTCAB
0x2ac69c…2ac830 Dummy {f00=0x0062, f01=0x0190, f02=»T01+2 ( PBVDU EQU PRINTER+2 VDU SCREEN BUFFER 0 PPCURS EQU BVDU+1920 CURSOR ADDRESS , BINARY : * PATTRIB EQU PCURS+2 LAST ATTRIBUTE CHAR n PCURATT EQU ATTRIB+2 & PWCC EQU CURATT+2 WCC/CCC CHARACTER . PKBINH EQU WCC+2 KEYBOARD INHIBIT INDIC
0x2ac830…2ac9c4 Dummy {f00=0x0062, f01=0x0190, f02=»NTERTASK COMM p , PINTATT EQU ICWORK+2 INTENSITY ATTRIBUTE $ POFFFLG EQU INTATT+2 OFFLINE FLAG F ( PCOPNO EQU OFFFLG+2 HARDCOPY TASK ID n * PCCC EQU COPNO+2 COPY COMMAND CHARACTER PMAIN EQU CCC+2 MAIN FRAME & PMODE EQU MAIN+2 INSERT MODE SW
0x2ac9c4…2acb58 Dummy {f00=0x0062, f01=0x0190, f02=»PLE WAIT &C n 4 PRDMORE EQU ECBBLK+10 BRANCH ADDRESS NEXT READ KB P EJECT L PNULL EQU /7F NULL CHARACTER Z PDUPCH EQU /7B ~ PFMCH EQU /60 * PLBVDU EQU 1920 1920 CHAR DISPLAY 6344 " PLPAGE EQU 48 LINES ON ONE PAGE * PLLINE EQU 80
0x2acb58…2accec Dummy {f00=0x0062, f01=0x0190, f02=»RGTP EQU NBRKBV+2 NUMBER OF GTPS P* ( 2 PMF1KBV EQU NBRGTP+2 DV ADDRESSES KB/VDU MF #1 2 2 PMF1GTP EQU MF1KBV+16 DV ADDRESSES GTPS MF # 1 h P IFT DCLIN=2 PMF2KBV EQU MF1GTP+16 PMF2GTP EQU MF2KBV+16 P XIF P EJECT P*
0x2accec…2ace80 Dummy {f00=0x0062, f01=0x0190, f02=»CHAR " P DATA CHAR # P DATA CHAR $ " P DATA CHAR % 6 P DATA CHAR & J P DATA CHAR ' ^ P DATA CHAR ( r P DATA CHAR ) P DATA CHAR * P DATA CHAR + P DATA NUM , DK P DATA NUM - P DATA NUM . P DATA CH
0x2ace80…2ad014 (2, 20) Dummy {f00=0x0062, f01=0x0190, f02=» P DATA NUM 6 P DATA NUM 7 P DATA NUM 8 , P DATA NUM 9 @ P DATA CHAR : T P DATA CHAR ; h P DATA CHAR < | P DATA CHAR = P DATA CHAR > P DATA CHAR ? P* P DATA CHAR E' P DATA CHAR A P DATA CH
0x2ad014…2ad1a8 Dummy {f00=0x0062, f01=0x0190, f02=»A CHAR I P DATA CHAR J P DATA CHAR K $ P DATA CHAR L 8 P DATA CHAR M L P DATA CHAR N ` P DATA CHAR O t P* P DATA CHAR P P DATA CHAR Q P DATA CHAR R P DATA CHAR S P DATA CHAR T P DATA CHAR U
0x2ad1a8…2ad33c Dummy {f00=0x0062, f01=0x0190, f02=»K SLASH P DATA CHAR ] P DATA CHAR CIRCOMFLEX $ P DATA CHAR UNDERLINE B P* ^ $ P DATA RETURN /60 CANNOT BE USED h P DATA CHAR LOWER CASE P DATA CHAR P DATA CHAR P DATA CHAR P DATA CHAR P DATA CHAR P
0x2ad33c…2ad4d0 Dummy {f00=0x0062, f01=0x0190, f02=» P DATA CHAR P* P IFT KEYLST=1 $ P DATA KEYL KEYLOCK : P DATA KEYL T P DATA KEYL f P DATA KEYL x P DATA KEYL P DATA KEYL P DATA KEYL P DATA KEYL P XIF P IFF KEYLST=1 P DATA RETURN P
0x2ad4d0…2ad664 Dummy {f00=0x0062, f01=0x0190, f02=» P XIF P DATA CHAR LOWER CASE X P DATA CHAR 0 P DATA CHAR B ( P DATA RETURN /7B-/7F CANNOT BE USED T P DATA RETURN P DATA RETURN P DATA RETURN P DATA RETURN P* P IFT PAX=1 P DATA PAEX P XIF
0x2ad664…2ad7f8 Dummy {f00=0x0062, f01=0x0190, f02=»OP) r P DATA PA410 P DATA PA410 P DATA PA410 4 P DATA PA410 H P DATA PA410 P DATA PA410 p P DATA CLEAR P IFT PFX=1 P DATA PFEX P XIF P IFF PFX=1 P DATA RETURN P XIF P DATA PF 1
0x2ad7f8…2ad98c Dummy {f00=0x0062, f01=0x0190, f02=» P DATA PF 9 P DATA PF 10 P DATA PF 11 * P DATA PF 12 > . P DATA RETURN /99-/A4 RESERVED FOR PF13-24 R P DATA RETURN P DATA RETURN P DATA RETURN P DATA RETURN P DATA RETURN P DATA RETURN P* P D
0x2ad98c…2adb20 Dummy {f00=0x0062, f01=0x018e, f02=» DATA CRLEFT P DATA CRRIGT P DATA CRDOWN ( P DATA BAKTAB < P DATA TAB P P DATA CRNL b P DATA RDHOME t P DATA ERINPT P DATA EREOF P* P IFT IN:DL=1 P DATA INSERT P DATA DELETE P XIF P IFF I
0x2adb20…2adcb4 (2, 21) Dummy {f00=0x00b3, f01=0x0190, f02=» P IFT OFLIN=1 P DATA OFLINE P XIF 0 P IFF OFLIN=1 < P DATA RETURN P P XIF d P IFT DCLIN=2 p P DATA MFCHGE P XIF P IFF DCLIN=2 P DATA RETURN P XIF P DATA RETURN P DATA RETURN P DATA ZE
0x2adcb4…2ade48 Dummy {f00=0x00b3, f01=0x0190, f02=»OWER CASE P - W (BECAUSE OF KEYLOCK) P DATA LCASPW , P DATA LCASPW @ P DATA LCASPW T P DATA LCASPW h P DATA LCASPW | P DATA LCASPW P DATA LCASPW P EJECT B P*************************************************************
0x2ade48…2adfdc Dummy {f00=0x00b3, f01=0x0190, f02=»QU * P CF A14,I:EVA0 & P LDR* A1,A9 POLL & SELECT ADDRESS " P LDKL A8,ECBDC L P ADR A8,CREBAS b P ST A1,ECBCW,A8 x $ P LDK A7,/B7 TRANSFER PARAMETERS P LKM P DATA 1 PDCT100 EQU * . P LDK A7,/80 TEST IF ANY MESSAGE
0x2adfdc…2ae170 Dummy {f00=0x00b3, f01=0x018e, f02=»A14,DCGETM P LD A4,ECBBA,A8 " P CF A14,RLRBUF RELEASE BUFFER * P RB DCT100 P P EJECT b P* p P* z ( P* SUBROUTINE ACTIVATED BY ALL TASKS P* P* PEMULA EQU * " P ADR A8,CREBAS GET ECB ADDRESS $ P ST A1,ECB
0x2ae170…2ae304 Dummy {f00=0x00b3, f01=0x018e, f02=» : P***************************************************** P* B P* VDUKB L P* ` " P* MAIN MODULE FOR KEYBOARD VDU j P* < P******************************************************** PVDUKB EQU * P CF A14,I:EVA0 & P LDR
0x2ae304…2ae498 Dummy {f00=0x00b3, f01=0x0190, f02=» P ST A13,-2,A14 $ P SUKL A14,4 UPDATE STACK POINTER P CM OFFFLG,TCABAS B * P CF A14,LIOLOF TURN OFF OFF LINE LAMP P XIF P P EJECT B P************************************************************** P* , P* TRANSFER
0x2ae498…2ae62c Dummy {f00=0x00b3, f01=0x0190, f02=»BAS REL TASK NO " P AD A4,6,CREBAS 'CB1' ADDRESS & P LC A1,MF1KBV-1,A4 GET DV-ADDRESS > P ANK A1,/FF h P LDKL A8,ECBDC | P CF A14,EMULA P P IFT DCLIN=2 B P*************************************************************
0x2ae62c…2ae7c0 Dummy {f00=0x00b3, f01=0x018e, f02=» P & P LC A1,MF2KBV-1,A4 GET DV ADDRESS P ANK A1,/FF 6 P LDKL A8,ECBDC2 J P CF A14,EMULA b P XIF x P EJECT PVDU080 EQU * P CF A14,ERASE ERASE SCREEN P P LDK A1,1 P LDKL A1,LBVDU+1 6 P ST A1,CURATT,
0x2ae7c0…2ae954 (2, 22) Dummy {f00=0x00b8, f01=0x018e, f02=» P* RELATIVE POS IN ECBBLK PKB EQU 2 $ PDC1 EQU 4 4 P IFT DCLIN=2 F P IFT COPCMD=1 Z PDC2 EQU 6 p PICR EQU 8 PECBBS EQU 4 P XIF P IFT DCLIN=2 P IFF COPCMD=1 PDC2 EQU 6 PECBBS EQU 3 P XIF
0x2ae954…2aeae8 Dummy {f00=0x00b8, f01=0x018e, f02=» PECBBS EQU 2 P XIF P* ( P LDK A1,ECBBS 2 P ST A1,ECBBLK,TCABAS H PVDU100 EQU * d P LD A1,ECBBLK+DC1,TCABAS x P RF(NZ) VDU110 PENDING 0 P CF A14,DC1INQ TEST IF ANY MESSAGE, NO WAIT PVDU110 EQU * P IFT DCLIN
0x2aeae8…2aec7c Dummy {f00=0x00b8, f01=0x0190, f02=» PVDU120 EQU * P IFT COPCMD=1 P LD A1,ECBBLK+ICR,TCABAS 2 P RF(NZ) VDU125 PENDING R P LDKL A3,ICWORK BUFFER p P ADR A3,TCABAS ADDRESS P LDK A6,2 REQ LENGTH P CF A14,ICREAD P ST A8,ECBBLK+ICR,TCABAS P XIF
0x2aec7c…2aee10 Dummy {f00=0x00b8, f01=0x0190, f02=» EQU * P LDKL A7,ECBBLK ! P ADR A7,TCABAS ! & P LKM ! < P DATA 7 MULTIPLE WAIT ! H P CW A8,ECBBLK+KB,TCABAS ! f $ P RF(E) KBINP INPUT FROM KEYBOARD ! P IFT COPCMD=1 ! P CW A8,ECBBLK+ICR,TCABAS ! ( P RF(E) BUFCOP SEND BUFFER TO PRINTER
0x2aee10…2aefa4 Dummy {f00=0x00b8, f01=0x018e, f02=» EJECT ! P* " P* READ KEYBOARD WITH NO WAIT " P* " < PRDKBNW EQU * " F P LDKL A8,ECBKB " Z P ADR A8,CREBAS " p P LDK A7,1 " " P ST A7,ECBRL,A8 REQ LENGTH = 1 " * P ST A7,ECBCW,A8 INDICATE NOT POWER OFF " P ST A8,ECBBLK+KB,TCABAS "
0x2aefa4…2af138 Dummy {f00=0x00b8, f01=0x0190, f02=» P ST A8,ECBBLK+DC1,TCABAS # PDC1I20 EQU * # $ P LDK A1,0 # 8 P CF A14,REQTIM # J P LDK A7,0 # ` PDC1I30 EQU * # r P LKM # P DATA 1 # P RTN A14 # PDC2INQ EQU * # P IFT DCLIN=2 # P LDKL A8,ECBDC2 # P ADR A8,CREBAS # P
0x2af138…2af2cc Dummy {f00=0x00b8, f01=0x0190, f02=»K # t P* $ PBUFCOP EQU * $ P CM ECBBLK+ICR,TCABAS $ ( P LDKL A3,BVDU BUFFER $ F P ADR A3,TCABAS ADDRESS $ b P IFT COPL=1 $ P* $ P* CHECK IF COPY LOCK $ P* $ P LCR A2,A3 $ P ANK A2,/18 $ P XRK A2,/10 $ P RB(Z) V
0x2af2cc…2af460 Dummy {f00=0x00b8, f01=0x0190, f02=»ID $ v P LDKL A6,LBVDU REQ LENGTH % P CF A14,ICWRTE % , P LD A1,KBINH,TCABAS % B ( P ANK A1,/E NOT INHIBITED ANY LONGER % ^ P ST A1,KBINH,TCABAS % P RB VDU100 % P XIF % P EJECT % P** KEYBOARD INPUT % P* % PKBINP EQU * %
0x2af460…2af5f4 (2, 23) Dummy {f00=0x00b8, f01=0x0190, f02=»05 EQU * % $ P LDK A7,4 RESET KEYBOARD BUFFER & P LKM & 8 P DATA 1 & D P RB VDU100 & T PKBIN10 EQU * & f P LD A1,KBINH,TCABAS & z , P ANK A1,1 RESETTING BY 'RESET' ALLOWED ? & P RB(NZ) KBIN05 NO & ( P LC* A2,ECBBA,A8 GET INPUT CHARACTER &
0x2af5f4…2af788 Dummy {f00=0x00b8, f01=0x0190, f02=»RESET KEY ? & ~ P RF(Z) KBIN20 NO ' P CWK A2,RSET RESET KEY ? ' , P RB(NE) KBIN05 NO ' L PKBIN20 EQU * ' f $ P LDR A5,A2 COPY INPUT CHARACTER ' z P SUK A5,/20 INDEX ' P RB(N) VDU100 ILLEGAL CHAR ' P CWK A5,/A7 ' P RB(G) VDU100 ILLEGAL
0x2af788…2af91c Dummy {f00=0x00b8, f01=0x0190, f02=» ' ^ P ADR A5,A5 TO KEY TABLE ( P* ( ( P LDKL A8,ECBVDU ( 2 P ADR A8,CREBAS ( J P LD A1,RDMORE,TCABAS ( ` P RF(Z) KBIN30 ( | P* ( P CFR A14,A1 ( P ABL VDU100 ( P* ( PKBIN30 EQU * ( : P CFI A14,KEYTAB,A5 BRANCH TO RESPECTIV
0x2af91c…2afab0 Dummy {f00=0x00b8, f01=0x0190, f02=» P LDK A7,0 ) P LDKL A8,ECBDC ) P IFT DCLIN=2 ) , P LD A1,MAIN,TCABAS ) @ P RF(NZ) DCAB05 ) Z P XIF ) p P CM ECBBLK+DC1,TCABAS ) | P IFT DCLIN=2 ) P RF DCAB10 ) PDCAB05 EQU * ) P CM ECBBLK+DC2,TCABAS ) P LDKL A8,ECBDC2 )
0x2afab0…2afc44 Dummy {f00=0x00b8, f01=0x0190, f02=»T TIMER ) P* A1 = TIME OUT VALUE * P* A8 = ECB ADDRESS * . P* * H PREQTIM EQU * * R P ST A1,ECBCW,A8 * f P LDK A7,/B9 * ~ P LKM * P DATA 1 * P RTN A14 * P EJECT * P * P* * P* * > P********************************
0x2afc44…2afdd8 Dummy {f00=0x00b8, f01=0x0190, f02=» P* + PRETURN RTN A14 + P EJECT + $ P* + 2 < P******************************************************* + < P* + | P* CRLEFT + P* + 6 P* THIS MODULE MOVES THE CURSOR ONE POS TO LEFT + P* + < P********************************
0x2afdd8…2aff6c Dummy {f00=0x00b8, f01=0x0190, f02=»L050 NOT LEFTMOST POS + P LDKL A2,LBVDU-1 , PCRL050 RF CRH100 , 6 P* , N < P******************************************************** , X P* , P* CRRIGT , P* , < P* THIS MODULE MOVES THE CURSOR ONE POS. TO THE RIGHT , P* , <
0x2aff6c…2b0100 Dummy {f00=0x00b8, f01=0x0190, f02=»CURS,TCABAS GET CURSOR BINARY , P ADK A2,1 - & P CWK A2,LBVDU END OF BUFFER? - 8 P RF(L) CRR050 NO - P LDK A2,0 - t PCRR050 RF CRH100 - P EJECT - P* - @ P*********************************************************** - P* - P* CR
0x2b0100…2b0294 (2, 24) Dummy {f00=0x00b8, f01=0x0190, f02=»******************** - h P* . PCRDOWN EQU * . & & P LD A2,PCURS,TCABAS GET CURSOR POS . : P ADKL A2,LLINE . d P CWK A2,LBVDU LAST LINE? . z P RF(L) CRD050 NO . P SUKL A2,LBVDU . PCRD050 RF CRH100 . P* . B P******************************
0x2b0294…2b0428 Dummy {f00=0x00b8, f01=0x018e, f02=»****************************************************** . P* / > PCRUP EQU * / H * P LD A2,PCURS,TCABAS GET CURSOR BINARY / Z P SUKL A2,LLINE / P RF(NN) CRU050 UPMOST LINE / P ADKL A2,LBVDU / PCRU050 RF CRH100 / P EJECT / P* / : P**
0x2b0428…2b05bc Dummy {f00=0x00b8, f01=0x0190, f02=» / : P****************************************************** 0 P* 0 F PCRHOME EQU * 0 P P LDK A2,0 0 d PCRH100 EQU * 0 v * P ST A2,PCURS,TCABAS GET CURSOR BINARY 0 P CF A14,ATMASB UPDATE ATTRIB 0 " P CF A14,SETCUR DISPLAY CURSOR 0 P RTN A
0x2b05bc…2b0750 Dummy {f00=0x00b8, f01=0x0190, f02=»OR IN FIRST UNPROTECTED POS ON NEW LINE 0 P* 1 0 : P***************************************************** 1 : P* 1 x PCRNL EQU * 1 & P LD A2,PCURS,TCABAS GET CURSOR POS 1 P ADKL A2,LLINE NEXT LINE 1 P CWK A2,LBVDU 1 P RF(L) CRN050 1
0x2b0750…2b08e4 Dummy {f00=0x00b8, f01=0x0190, f02=»F(N) CRN120 1 P ADKL A1,LLINE 2 P RB CRN100 2 * 2 PCRN120 ST A1,PCURS,TCABAS STORE CURSOR ADDRESS 2 < P EJECT 2 r P 2 F P****************************************************************** 2 P LDR A2,A1 2 . P CF A14,ATMASB SEARCH ATTRIBUTE BACK
0x2b08e4…2b0a78 Dummy {f00=0x00b8, f01=0x0190, f02=»CURS,TCABAS CURSOR ON ATTRIBUTE ?? 2 P RF(NE) CRN150 NO!! 3 * ( P CWK A2,1919 LAST SCREEN POSITION?? 3 F P RF(NE) CRN140 NO!! 3 r PCRN130 LDKL A2,-1 3 PCRN140 ADK A2,1 3 P ST A2,PCURS,TCABAS 3 ( PCRN150 CF A14,SETCUR POSITION CURSOR 3 P
0x2b0a78…2b0c0c Dummy {f00=0x00b8, f01=0x0190, f02=»******************************** 3 | P* 4 ( P* TAB 4 2 P* 4 @ 2 P* MOVE THE CURSOR TO THE FIRST CHAR. LOCATION 4 J ( P* OF THE NEXT UNPROTECTED DATA FIELD 4 P* 4 8 P**************************************************** 4 P* 4 2 P* A1=END OF
0x2b0c0c…2b0da0 Dummy {f00=0x00b8, f01=0x0190, f02=»CTGR 4 P* 5 PTAB EQU * 5 P LDK A5,1 5 ( & P LD A2,PCURS,TCABAS GET CURSOR POS 5 : * PTAB100 CF A14,ATMASF SEARCH ATTRIBUTE 5 d P CWK A1,0 END OF BUFFER? 5 P RF(G) TAB300 YES 5 P ADK A2,1 5 " PTAB150 ANK A3,/10 UNPROTECTED? 5 P RF(
0x2b0da0…2b0f34 (2, 25) Dummy {f00=0x00b9, f01=0x0190, f02=»14 5 PTAB300 LDK A2,0 6 , P CWK A1,3 ATTRIBUTE IN LAST POSITION ?? 6 " P EJECT 6 R < P******************************************************** 6 ` P RF(NE) TAB350 NO!! 6 ( P ANK A5,1 WHOLE BUFFER CONTROLLED ?? 6 P RB(Z) TAB200 YES!! 6 P SUR
0x2b0f34…2b10c8 Dummy {f00=0x00b9, f01=0x0190, f02=»NK A5,1 WHOLE BUFF. CONTROLED? 6 P RF(G) TAB400 NO 7 & 0 P RB TAB200 ALL PROT. OR NON-FORMATTED BUFF. 7 > PTAB400 LDK A5,0 7 r P RB TAB100 7 P EJECT 7 P* 7 @ P*********************************************************** 7 P* 7 P* DUP
0x2b10c8…2b125c Dummy {f00=0x00b9, f01=0x0190, f02=» BUFFER AND A STANDARD 7 p ( P* TAB KEY OPERATION TO BE PERFORMED 8 P* 8 J @ P************************************************************ 8 T P* 8 PDUP EQU * 8 & P LD A1,MODE,TCABAS INSERT MODE ?? 8 6 P ABL(NZ) ERROR FUNCTION NOT ALLOWED IN INS
0x2b125c…2b13f0 Dummy {f00=0x00b9, f01=0x0190, f02=»TAB 8 P RTN A14 9 P EJECT 9 P* 9 * @ P*********************************************************** 9 4 P* 9 x P* FIELD MARK 9 P* 9 @ P* OPERATION OF THIS KEY CAUSES A UNIQUE CHARACTER CODE 9 < P* TO BE ENTERED IN THE D
0x2b13f0…2b1584 Dummy {f00=0x00b9, f01=0x0190, f02=»************** 9 d P* : PFLDMRK EQU * : $ P LD A1,MODE,TCABAS INSERT MODE?? : 4 6 P ABL(NZ) ERROR FUNCTION NOT ALLOWED IN INSERT MODE : P LDK A2,FMCH : 2 P LD A3,ECBKB+ECBBA,CREBAS GET KB BUFFER ADDR. : P SCR A2,A3 : P CF A14,NUM : P R
0x2b1584…2b1718 Dummy {f00=0x00b9, f01=0x0190, f02=»* : P* READY HOME KEY ; 8 P* OPERATION OF THIS KEY CAUSES THE CURSOR TOBE ; ( : P* POSITIONED AT THE FIRST UNPROTECTED CHARACTER ; d P* ON THE SCREEN ; P* ; < P******************************************************** ;
0x2b1718…2b18ac Dummy {f00=0x00b9, f01=0x0190, f02=»2,/7F ; P CWK A2,/20 < P RF(NL) RDH10 < " P ANK A2,/10 < 8 $ P ABL(Z) CRHOME UNPROTECTED FIELD < L PRDH10 CM PCURS,TCABAS < t , P CF A14,TAB SEARCH 1ST UNPROTECTED FIELD < P RTN A14 < P EJECT < P* < : P******************************
0x2b18ac…2b1a40 Dummy {f00=0x00b9, f01=0x0190, f02=»EXT PRECIDING UNPROTECTED DATA FIELD < P* = , 8 P**************************************************** = 6 P* = r P* A2=CURSOR BINARY ADDRESS = | P* A3=CHARACTER = PBAKTAB EQU * = P LDK A5,1 = & P LD A2,PCURS,TCABAS GET CURSOR POS = " P CF
0x2b1a40…2b1bd4 (2, 26) Dummy {f00=0x00b9, f01=0x018e, f02=»E) BAK400 YES = P SUK A2,1 > ( PBAK100 CWK A2,0 UPPER LEFTMOST POS? > ( P RF(E) BAK400 YES > T PBAK200 SUK A2,1 > n $ P CF A14,ATMASB SEARCH ATTRIBUTE > @ P************************************************************ > P SUK A1,1 > P RF(
0x2b1bd4…2b1d68 Dummy {f00=0x00b9, f01=0x0190, f02=» P RF BAK300 ? PBAK250 EQU * ? > P********************************************************* ? * P ANK A3,/10 PROTECTED? ? l P RB(NE) BAK100 YES ? P ADK A2,1 ? PBAK300 ST A2,PCURS,TCABAS ? P CF A14,SETCUR SET CURSOR ? P RTN A14 ? *
0x2b1d68…2b1efc Dummy {f00=0x00b9, f01=0x0190, f02=» BUFF CHAR. ? ~ P CWK A3,/1F ATTRIBUTE CHAR? @ P RB(G) BAK200 NO @ 8 P ANK A3,/10 PROTECTED? @ P P RB(NE) BAK200 YES @ n . P ST A3,ATTRIB,TCABAS UPDATE NEW ATTRIBUTE @ P ST A2,CURATT,TCABAS @ D P**************************************************
0x2b1efc…2b2090 Dummy {f00=0x00b9, f01=0x0190, f02=» P* A > P********************************************************* A P* A P P* CHAR A Z P* A h : P* ALPHABETIC AND SPECIAL CHAR UPDATING AND DISPLAYING A r P* A > P********************************************************* A P* A PLC
0x2b2090…2b2224 Dummy {f00=0x00b9, f01=0x0190, f02=»CURS,TCABAS GET CURSOR POS A . P LD A3,CURATT,TCABAS GET ATTRIBUTE ADDRESS B " P CWR A2,A3 CURSOR ON ATTRIB? B T P RF(E) CHA300 YES B x 2 PCHA100 LD A3,ATTRIB,TCABAS GET ATTRIBUTE CHAR B P LDR A4,A3 B " P ANK A4,/10 PROTECTRED FIELD? B P RF(NE)
0x2b2224…2b23b8 Dummy {f00=0x00b9, f01=0x0190, f02=» POS B l P EJECT C D P*************************************************************** C P* C b & P* Z E R O : 3 TRIPLE ZERO KEY C l ( P* Z E R O : 2 DOUBLE ZERO KEY C P* C 6 P************************************************* C P C
0x2b23b8…2b254c Dummy {f00=0x00b9, f01=0x018e, f02=»SPLAY CHARACTER C P D PZERO:2 EQU * D P LDK A1,X'30' CHARACTER ZERO D 4 8 P SC* A1,ECBKB+ECBBA,CREBAS STORE CHARACTER IN BUFFER D X " P CF A14,NUM DISPLAY CHARACTER D " P CF A14,NUM DISPLAY CHARACTER D P RTN A14 RETURN D P* D > P******
0x2b254c…2b26e0 Dummy {f00=0x00b9, f01=0x0190, f02=» D > P********************************************************** E P* E J PNUMCOM EQU * E T P LDK A2,/2C E h P SC* A2,ECBKB+ECBBA,CREBAS E | P* E PNUM EQU * E & P LD A2,PCURS,TCABAS GET CURSOR POS E . P LD A3,CURATT,TCABAS GET ATTRIBUTE A
0x2b26e0…2b2874 (2, 27) Dummy {f00=0x00b9, f01=0x0190, f02=»DR A4,A3 E P ANK A4,/10 PROTECTED FIELD? F P RF(E) ANCOMM NO F 4 , PNUM200 ABL ERROR NOT ALLOWED DISPLAY POS F L P EJECT F | P* F > P********************************************************** F P* F P* ANCOMM F P* F < P* COMMON SUBMO
0x2b2874…2b2a08 Dummy {f00=0x00b9, f01=0x0190, f02=» F V P* G PANCOMM EQU * G " P LC* A4,ECBKB+ECBBA,CREBAS =1 G & PANC005 EQU * G L P LDKL A6,BVDU G ` P ADR A6,TCABAS G v P ADR A6,A2 G P G & P LD A1,MODE,TCABAS INSERT MODE ?? G P RF(NZ) ANC010 YES!! G P SCR A4,A6 UPDATE VDU BUFF G
0x2b2a08…2b2b9c Dummy {f00=0x00b9, f01=0x0190, f02=»0 YES G P SUR A6,A2 BVDU START ADDR. H P ADR A6,A5 ATTRIB. POS H 2 , P LD A3,ATTRIB,TCABAS GET ATTRIBUTE CHAR H P P ORK A3,1 MDT-BIT ON H P SCR A3,A6 H PANC100 EQU * H P IFT IN:DL=1 =3 H & P LD A1,MODE,TCABAS INSERT MODE ?? H P RF(
0x2b2b9c…2b2d30 Dummy {f00=0x00b9, f01=0x0190, f02=» NO!! H $ P SCR A4,A7 STORE INPUT CHARACTER I P XIF =3 I 6 PANC120 EQU * I H P I 2 P LDK A5,/2B CURSOR NOT MOVED BEFORE DISPLAYING I d P LD A1,ECBVDU+ECBBA,CREBAS I P SC A5,1,A1 =1 I P LDK A5,/1E I P ADK A1,2 NEXT POS I ( P SCR
0x2b2d30…2b2ec4 Dummy {f00=0x00b9, f01=0x0190, f02=»NTENSIFIED DISPLAYING? I P RF(Z) ANC150 YES J P LDK A2,/20 LOAD SPACE J 8 P RF ANC250 NON DISPLAYING J V ( PANC150 LDK A5,/1F SET HIGH INTENSITY J x P SCR A5,A1 STORE IN BUFFER J ( PANC200 LDR A2,A4 UPDATE A2 WITH CHAR J 0 PANC250 CF A14,WCHAR DI
0x2b2ec4…2b3058 Dummy {f00=0x00b9, f01=0x0190, f02=»NE) ANC255 J P LDKL A2,0 K PANC255 EQU * K $ P ST A2,PCURS,TCABAS K 8 " P CF A14,GBUFFC GET BUFFER CHAR K T P CWK A3,/1F ATTRIBUTE CHAR? K z P RF(G) ANC300 NO K P K ( P CF A14,TAB SKIP TO NEXT UNPROTECTED K PANC300 EQU * K P LD A1,ECB
0x2b3058…2b31ec Dummy {f00=0x00b9, f01=0x0190, f02=»F A14,SETCUR POSITION CURSOR TO 1:ST POS. NEXT LINE K PANC350 EQU * L < P RTN A14 L P P IFT IN:DL=1 L ` P EJECT L t P L 8 P*************************************************** L P* L < P* DELETE CHARACTER AT CURSOR POSITION. SHIFT CARACTERS
0x2b31ec…2b3380 Dummy {f00=0x00b9, f01=0x0190, f02=» L PDELETE EQU * M P LDKL A6,-1 M & P LD A2,PCURS,TCABAS CURSOR ADDRESS M 0 ( PDEL:10 ADK A6,80 END OF LINE POINTER M Z . P CWR A6,A2 LAST POSITION ON CURRENT LINE?? M $ P RB(L) DEL:10 NO!! TRY NEXT LINE M P M * P CF A14,S:ATT SEARCH ATTRIBUTE F
0x2b3380…2b3514 (2, 28) Dummy {f00=0x00b9, f01=0x0190, f02=»:20 YES!! M P SUK A2,1 SKIP ATTRIBUTE N P LDR A6,A2 N 2 PDEL:20 LDR A2,A6 N D P N P N d P LDK A1,BVDU N l * P ADR A1,TCABAS ABSOLUTE BUFFER ADDRESS N P ADR A2,A1 END OF FIELD/LINE N ( P AD A1,PCURS,TCABAS CURSOR POSITION N P N . PDE
0x2b3514…2b36a8 Dummy {f00=0x00b9, f01=0x018e, f02=»IT N v * P SCR A3,A1 SHIFT CHARACTER 1 POS. LEFT O P ADK A1,1 O 8 " P RB DEL:30 GET NEXT CHARACTER O J P O p P O x * PDEL:40 LDK A3,NULL+/80 NULL CHARACTER O * P SCR A3,A2 STORE AT END OF FIELD/LINE O " P LD A3,ATTRIB,TCABAS ATTRIBUTE O $ P ORK A
0x2b36a8…2b383c Dummy {f00=0x00b9, f01=0x0190, f02=» O h P RF(E) INS:60 YES!!! P P ADKL A1,BVDU P $ . P ADR A1,TCABAS ABSOLUTE ATTRIBUTE ADDRESS P : " P SCR A3,A1 SAVE NEW ATTRIBUTE P l & P RF INS:60 DISPLAY MODIFIED FIELD P P EJECT P P P B P******************************************************
0x2b383c…2b39d0 Dummy {f00=0x00b9, f01=0x018e, f02=»N TO THE RIGHT P f P* Q 8 P**************************************************** Q P Q PINSERT EQU * Q d $ P IM MODE,TCABAS SET INSERT MODE Q x . P CF A14,LIOLON TURN ON "INSERT MODE" LAMP Q P RTN A14 Q P Q P Q PINS:10 LDR A6,A7 Q
0x2b39d0…2b3b64 Dummy {f00=0x00b9, f01=0x0190, f02=» P R P R 0 PINS:20 CF A14,S:ATT SEARCH ATTRIBUTE FORWARD R P R H P R P P SUK A1,2 ATTRIBUTE FOUND ?? R X P RF(Z) INS:30 NO!! R | P SUK A2,1 R P R PINS:30 ADR A2,TCABAS R 6 P ADK A2,BVDU ADD BUFFER DISPLACEMENT IN WORK-BLOCK R . P C
0x2b3b64…2b3cf8 Dummy {f00=0x00b9, f01=0x0190, f02=»A2 GET CHARACTER R P ORK A3,/80 SET MODIFIED BIT S * P SCR A3,A2 SHIFT CHAR ONE POS TO RIGHT S < P SUK A2,1 S j " P RB INS:40 GET NEXT CHARACTER S | P S P S ( PINS:50 ORKL A9,/80 SET MODIFIED BIT S . P SCR A9,A6 SAVE INPUT CHARACTER IN BUFFER
0x2b3cf8…2b3e8c Dummy {f00=0x00b9, f01=0x0190, f02=»,TCABAS CURSOR POSITION S P RB ANC252 T P XIF T 2 P EJECT T > P T L > P********************************************************** T T P* T 4 P* SEARCH FIRST NULL CHARACTER AFTER CURSOR POS T P* T : P**************************************
0x2b3e8c…2b4020 Dummy {f00=0x00b9, f01=0x0190, f02=»ET CHARACTER T & P ANK A3,/7F MASK AWAY MODIFIED BIT U P CWK A3,NULL NULL CHARACTER U > P RF(E) S:NU20 YES!! U b P ADK A1,1 U ~ * P RB S:NU10 CHECK NEXT BUFFER CHARACTER U P U * PS:NU20 LDR A2,A1 ADDRESS OF FIRST NULL U PS:NU30 RTN A14 U
0x2b4020…2b41b4 (2, 29) Dummy {f00=0x00ba, f01=0x0190, f02=»M ATTENTION KEY WHICH CAUSES AN I/O OPERATION U $ P* AND GENERATE AN AID CHARACTER V 6 P* V ^ > P********************************************************* V h P* V PCANCEL EQU * V PPA2 EQU * V P LDK A2,/2E CANCEL POS V PCAN100 EQU * V
0x2b41b4…2b4348 Dummy {f00=0x00ba, f01=0x0190, f02=»D AND TRANSMIT V z P RTN A14 W P* W & P W 0 P IFT PAX=1 W 8 P W J P* W R P* W F P* PROGRAM ATTENTION KEY IS PRESSED AND NUMBER WILL BE INSERTED TO W f : P* DEFINE ONE OF THE FUNCTIONS UNDER PA1.CANCEL OR PA3 W P* W P* W PPAEX E
0x2b4348…2b44dc Dummy {f00=0x00ba, f01=0x0190, f02=»CHECK IF NUM.1-3 W P RF(L) PFERR ILLEGAL CHAR. X P SUK A2,/2 CHECK IF NUM.1-3 X : P RF(G) PFERR ILLEGAL CHAR. X ^ P RF(Z) PA3 X P ADK A2,1 X P RB(Z) PA2 X P RF PA1 X & P RTN A14 RETURN TO MAIN READ LOOP X P X P XIF X P EJE
0x2b44dc…2b4670 Dummy {f00=0x00ba, f01=0x0190, f02=» RB CAN100 X P* Y P* Y $ P* PA3 PROGRAM ATTENTION KEY Y & P* Y N P* Y X PPA3 EQU * Y b P LDK A2,/2B PA3 POS Y t P RB CAN100 Y P* Y P* PA4 - PA10 (ALFASKOP) Y P* Y PPA410 EQU * Y P SUK A2,/20 Y P RB CAN200
0x2b4670…2b4804 Dummy {f00=0x00ba, f01=0x0190, f02=»OGRAM FUNCTION KEY WHICH CAUSES AN I/O OPERATION Y < P* AND GENERATE AN AID CHARACTER FOLLOWED BY AN SBA ORDER Z 8 8 P* ATTRIBUTE ADDRESS AND TEXT FOR EACH MODIFIED FIELD Z x P* NULLS ARE SUPRESSED Z P* Z > P********************************************
0x2b4804…2b4998 Dummy {f00=0x00ba, f01=0x0190, f02=» Z n . P CF A14,LINHON TURN ON "KEYBOARD INHIBIT" [ . P CF A14,TRPF AID+MODIFIED FIELDS+TRANSMIT [ : PENT200 EQU * [ l P RTN A14 [ P* [ P [ P IFT PFX=1 [ P [ P* [ P* [ F P* PROGRAM FUNCTION KEY IOS PRESSED AND NUMBER WILL BE IN
0x2b4998…2b4b2c Dummy {f00=0x00ba, f01=0x0190, f02=»NXT [ PPFEXA EQU * P CM RDMORE,TCABAS P SUK A2,/30 LEGAL CHAR ? : , P RF(L) PFERR ILLEGAL,GO TO ERR.HANDLING Z & P RF(Z) PF0 FIRST NUM. 0 GO TO PF0 P SUK A2,/1 FIRST NUM. 1 ? P RF(G) PFERR ILLEGAL NUM. P LDKL A1,PF1A
0x2b4b2c…2b4cc0 Dummy {f00=0x00ba, f01=0x018e, f02=»ING l P SUK A2,/2 LEGAL NUM ? ] , P RF(G) PFERR ILLEGAL GO TO ERR.HANDLING ] * P ADK A2,/3C PF10-12 POS ] Z P RB ENT100 ] z P ] PPF0 EQU * ] P LDKL A1,PF0A ] PPFNXT EQU * ] P ST A1,RDMORE,TCABAS ] P RTN A14 ] PPF0A EQU * ]
0x2b4cc0…2b4e54 (2, 30) Dummy {f00=0x00c0, f01=0x0190, f02=» ] x , P RF(G) PFERR ILLEGAL GO TO ERR.HANDLING ^ P ADK A2,/39 PF1-9 POS ^ 8 P RB ENT100 ^ V P XIF ^ h PPFERR EQU * ^ t * P CF A14,ERROR GO TO ERR-HANDLING RUTIN ^ $ P RTN A14 GO TO MAIN READ MODULE ^ P ^ P ^ PPF EQU * ^ P SUK A2,/5
0x2b4e54…2b4fe8 Dummy {f00=0x00c0, f01=0x0190, f02=» P* OFLINE _ < P* THE OFFLINE SWITCH "OFFFLG" IS SET = 1 AND _ 8 P* A BRANCH IS MADE BACK TO CREDIT PROGRAM _ T P* _ B P************************************************************* _ POFLINE EQU * _ P CF A14,CLEAR _
0x2b4fe8…2b517c Dummy {f00=0x00c0, f01=0x018e, f02=»F A14,DCABOR ABORT REQUEST NOT CURRENT MF _ P XIF ` 2 P IFT OFLIN=1 ` > 6 P LDK A1,0 DV ADDRESS ::= 0MESSAGES TO VDU IGNORED ` R P LDKL A8,ECBDC MF # 1 ` & P CF A14,EMULA TRANSFER PARAMETERS ` P IFT DCLIN=2 ` P LDKL A8,ECBDC2 MF # 2 ` & P C
0x2b517c…2b5310 Dummy {f00=0x00c0, f01=0x018e, f02=» ( P CF A14,LIOLON TURN ON OFFLINE LAMP a & P IM OFFFLG,TCABAS SET OFFLINE FLAG a 0 $ P ADKL A14,4 SKIP ONE STACK LEVEL a Z * P LD A13,2,A14 RELOAD REGISTERS A12-A13 a P LD A12,4,A14 a $ P ADKL A14,4 UPDATE STACK POINTER a * P ABL I:RT1 RETURN TO "OFFL
0x2b5310…2b54a4 Dummy {f00=0x00c0, f01=0x0190, f02=» a R P* b P* MAINFRAME CHANGE b H P* THE SWITCH 'MAIN' IS CHANGED, AND THE APPROPRIATE 'SYSTEM' LAMP b , P* IS TTURNED ON b x P* b J P********************************************************************* b P* b PMFCHGE EQU * b
0x2b54a4…2b5638 Dummy {f00=0x00c0, f01=0x018e, f02=»D A1,MAIN,TCABAS b P XRK A1,1 c P RF(NZ) MFCH10 c * P CF A14,LMF1ON c @ P RF MFCH90 c V PMFCH10 EQU * c h P CF A14,LMF2ON c | PMFCH90 EQU * c P ST A1,MAIN,TCABAS c P RTN A14 c P XIF c P EJECT c P* c < P********************
0x2b5638…2b57cc Dummy {f00=0x00c0, f01=0x018e, f02=» c X 8 P* AND GENERATE AN AID CHARACTER. THE ENTIRE DISPLAY d : P* BUFFER IS CLEARED TO NULLS AND CURSOR IS LOCATED IN d D P* HOME POS d P* d < P******************************************************** d P* d PCLEAR EQU * d P LDK A2,/2D
0x2b57cc…2b5960 Dummy {f00=0x00c0, f01=0x0190, f02=» d j & P CF A14,ERASE ERASE ENTIRE SCREEN e P RTN A14 e 2 P EJECT e B P* e P @ P************************************************************ e Z P* e P* EREOF e P* e P* ERASE TO END OF FIELD e P* e @ P****************************
0x2b5960…2b5af4 (2, 31) Dummy {f00=0x00c0, f01=0x018e, f02=»3,/10 UNPROTECTED? e P RF(E) ERE100 YES f P ABL ERROR f 4 PERE100 LD A2,PCURS,TCABAS f F P f h ( P************************ 77.06.01 f p P f 2 P CW A2,CURATT,TCABAS STANDING ON ATTRIBUTE ?? f * P ABL(E) ERROR YES!! TURN ON ERROR LAMP f P
0x2b5af4…2b5c88 Dummy {f00=0x00c0, f01=0x0190, f02=» P RF(G) ERE200 NO g PERE160 LDR A1,A2 g P LD A3,PCURS,TCABAS g 4 PERE170 EQU * g P P LDKL A4,BVDU g d P ADR A4,TCABAS g z P ADR A4,A3 g 0 P CF A14,ERASUA ERASE AND REPLASE WITH NULLS g ( P CF A14,DISPL DISPLAY ERASED SCREEN g P* g
0x2b5c88…2b5e1c Dummy {f00=0x00c0, f01=0x0190, f02=»RMATTED SCREEN g ~ P h P ADK A2,BVDU h . P ADR A2,TCABAS ABSOLUTE ATTRIBUTE ADDRESS h 2 P LCR A1,A2 GET ATTRIBUTE h d P ORK A1,1 SET MDT BIT h P SCR A1,A2 h PERE180 EQU * h P RTN A14 h ( PERE200 CWK A2,LBVDU-1 END OF BUFFER? h P RF(
0x2b5e1c…2b5fb0 Dummy {f00=0x00c0, f01=0x0190, f02=» A2,0 WRAP AROUND. h P RB ERE150 i P EJECT i , P* i : < P******************************************************** i D P* i P* ERINPT i P* i : P* CLEARS ALL UNPROTECTED CHARACTER LOCATIONS TO NULLS i : P* AND REPOSITIONS THE CURSOR TO TH
0x2b5fb0…2b6144 Dummy {f00=0x00c0, f01=0x0190, f02=» P* j PERINPT EQU * j ( P CF A14,ERASUP ERASE ALL UNPROTECTED j " P CF A14,DISPL j N P LD A2,PCURS,TCABAS j d P CF A14,ATMASB j > P********************************************************* j P SUK A1,1 j $ P RF(Z) ERI:10 NO ATTRIBUTE FOU
0x2b6144…2b62d8 Dummy {f00=0x00c0, f01=0x0190, f02=»************************************************** j P ADK A2,1 k : P k L PERI:10 EQU * k T P ST A2,PCURS,TCABAS k h P RTN A14 k P EJECT k P* k @ P************************************************************ k P* k P* ERROR k
0x2b62d8…2b646c Dummy {f00=0x00c0, f01=0x0190, f02=» P* l PERROR EQU * l ( P CF A14,LERRON TURN ON 'ERROR' LAMP l " P LD A5,KBINH,TCABAS l N 4 P ORK A5,4 BIT 13:=1,ERROR HANDLING.RESET ALLOWED l j P ST A5,KBINH,TCABAS l P l P* l P* TURN ON SOUND ALARM l P* l P l P LDKL
0x2b646c…2b6600 Dummy {f00=0x00c0, f01=0x0190, f02=»C A7,1,A2 l P LDK A7,X'07' BELL CHARACTER m P SC A7,2,A2 m 6 P LDK A7,3 REQUESTED LENGTH m J P ST A7,ECBRL,A8 m l P LDK A7,X'86' SOUND ALARM m P LKM m P DATA 1 m P m P RTN A14 m P IFT KEYLST=1 m P EJECT m F P**********
0x2b6600…2b6794 (2, 32) Dummy {f00=0x00c1, f01=0x0190, f02=»EY LOCK VALUE /70-/77 m ~ P* n F P****************************************************************** n ( P* n r PKEYL EQU * n | & P SUK A2,/78 GET NEG KEY LOCK VALUE n " P LD A3,KEYS,TCABAS OLD STATUS n P LDK A4,/10 n PKEYL10 EQU * n P S
0x2b6794…2b6928 Dummy {f00=0x00c1, f01=0x0190, f02=» LDR A2,A2 WAS OFF n & P RF(NZ) KEYL99 NOW OFF, NO CHANGE o P RF KEYL30 NOW ON o D PKEYL20 EQU * WAS ON o ^ P LDR A2,A2 o z $ P RF(Z) KEYL99 NOW ON, NO CHANGE o PKEYL30 EQU * CHANGE o P LD A3,KEYS,TCABAS o P XRR A3,A4 CHANGE STATUS o (
0x2b6928…2b6abc Dummy {f00=0x00c1, f01=0x0190, f02=»OCK, BIT ON = LOCK ON o ` * P* A4 = KEYLOCK CHANGED, LAYOUT AS A3 p ( P* A2 = 1, IF CHANGED TO OFF ELSE 0 p L P* p x * P* INSERT USER ROUTINE BELOW THIS LINE p P* p PKEYL99 EQU * p P RTN A14 p P XIF p P EJECT p P* p < P******
0x2b6abc…2b6c50 Dummy {f00=0x00c1, f01=0x0190, f02=»**************************** p t P* q $ PLON EQU /B7 q . PLOF EQU /B8 q B P IFT KB6272=1 q V PLMF1 EQU /20 q l PLMF2 EQU /10 q PLIOL EQU 8 q PLINH EQU 4 q PLERR EQU 2 q PLSAV EQU 1 q P XIF q P IFF KB6272=1 q PLMF1 EQU 0
0x2b6c50…2b6de4 Dummy {f00=0x00c1, f01=0x0190, f02=»F1ON LDK A3,LMF1 q P RF LMPON r PLMF1OF LDK A3,LMF1 r * P RF LMPOF r D PLMF2ON LDK A3,LMF2 r V P RF LMPON r p PLMF2OF LDK A3,LMF2 r P RF LMPOF r PLIOLON LDK A3,LIOL r P RF LMPON r PLIOLOF LDK A3,LIOL r P RF LMPOF r PLI
0x2b6de4…2b6f78 Dummy {f00=0x00c1, f01=0x018e, f02=» LDK A3,LERR r P RF LMPOF s PLSAVON LDK A3,LSAV s & P RF LMPON s @ PLSAVOF LDK A3,LSAV s R P RF LMPOF s l P* s ~ PLMPON LDK A7,LON s P RF SDISP s PLMPOF LDK A7,LOF s P RF SDISP s P EJECT s P s P* s < P************
0x2b6f78…2b710c Dummy {f00=0x00c1, f01=0x0190, f02=» < P******************************************************** t P* t D PSDISP EQU * t N P LDKL A8,ECBSD t b P ADR A8,CREBAS t x P ST A3,ECBCW,A8 t P LKM t P DATA 1 t P RTN A14 t P EJECT t P* t < P******************************
0x2b710c…2b72a0 Dummy {f00=0x00c1, f01=0x0190, f02=»* t < P******************************************************** u P* u J " P* A2=CURSOR BINARY ADDRESS u T $ P* A1=BUFFER SCANNING PARAM. u z . P* 0=ATTRIB FOUND 1=END OF BUFFER LEFT u ( P* 2= ATTRIBUTE IN LAST POSITION u P* u
0x2b72a0…2b7434 (2, 33) Dummy {f00=0x00c1, f01=0x0190, f02=»G) ASB10 NO u PASB08 ST A3,ATTRIB,TCABAS v , P ST A2,CURATT,TCABAS CURSOR ON ATTRIBUTE v 6 P RTN A14 v f PASB10 CWK A2,0 END OF BUFFER v v P RF(E) ASB20 YES v P SUK A2,1 v P RB ASB05 NEXT v PASB20 EQU * v P EJECT v P v 6 P****
0x2b7434…2b75c8 Dummy {f00=0x00c1, f01=0x0190, f02=» CF A14,GBUFFC GET CHARACTER v P CWK A3,/1F ATTRIBUTE ??? w $ P RB(NG) ASB08 YES!!! w F P SUR A2,A2 FIRST SCREEN POS. w b 2 P********************************************* w P w P LDK A1,1 END BUFFER LEFT w P CM ATTRIB,TCABAS w P LDKL A7
0x2b75c8…2b775c Dummy {f00=0x00c1, f01=0x0190, f02=»******************************** w x P* x ( P* ATMASF x 2 P* x F : P* SEARCH FOR ATTRIBUTE CHAR. FORWARDS AND MASK IT x P P* x > P********************************************************* x P* x P* A3=CHARACTER x " P* A2=CURSO
0x2b775c…2b78f0 Dummy {f00=0x00c1, f01=0x0190, f02=»BUFF POS x z P* y P y P y " PS:ATT EQU * y * P LD A7,ATTRIB,TCABAS y > P LD A8,CURATT,TCABAS y Z , P CF A14,ATMASF SEARCH ATTRIBUTE FORWARD y v P ST A7,ATTRIB,TCABAS y P ST A8,CURATT,TCABAS y P RTN A14 y P y PATMASF EQU * y
0x2b78f0…2b7a84 Dummy {f00=0x00c1, f01=0x0190, f02=»********************************************************** y , P CWK A2,LBVDU-1 EOB +ATTRIB IN LAST POS z B @ P************************************************************ z r P RF(NE) ASF08 NO z P LDK A1,3 z PASF08 ST A3,ATTRIB,TCABAS z , P ST A2
0x2b7a84…2b7c18 Dummy {f00=0x00c1, f01=0x0190, f02=» z P RTN A14 { PASF20 ADK A2,1 { P RB ASF05 { . P EJECT { @ P* { N 6 P************************************************** { X P* { P* GBUFFC { P* { 6 P* GET VDU BUFFER CHAR WHICH IS INDICATED BY CURSOR { P* { 6 P**************
0x2b7c18…2b7dac Dummy {f00=0x00c1, f01=0x0190, f02=»QU * { P LDK A3,0 | P LDKL A4,BVDU | " P ADR A4,TCABAS GET VDU BUFFER | 4 P ADR A4,A2 | Z & P LCR A3,A4 GET CHARACTER IN BUFF. | l P RTN A14 | P EJECT | P* | @ P************************************************************ | P* |
0x2b7dac…2b7f40 Dummy {f00=0x00c1, f01=0x0190, f02=»CUTING | b $ P* A COMMAND. BIT 14=1 IN KBINH } 2 P* 2- A PA-KEY OPERATION IS IN PROCESS PRIOR TO } 6 < P* INITIATION OF A COMMAND FOR A DEVICE WITH AN ATTACHED } l " P* KEYBOARD. BIT 14=1 IN KBINH } * P* 3- ERRORSITUATION. BIT 14=1 IN KBINH } P* } :
0x2b7f40…2b80d4 (2, 34) Dummy {f00=0x00c1, f01=0x0190, f02=»************************************* } z P* ~ . PRESET EQU * ~ 8 & P CM MODE,TCABAS RESET INSERT MODE ~ L * P CF A14,LIOLOF TURN OFF "INSERT" LAMP ~ v & P CM KBINH,TCABAS RESSTORE KEYBOARD ~ ( P CF A14,LERROF TURN OFF 'ERROR' LAMP ~ 4 P CF A14,LINHOF
0x2b80d4…2b8268 Dummy {f00=0x00c1, f01=0x0190, f02=»*************** ~ ` P* 4 P* C O P Y : COPY CONTENTS IN VDU BUFFER ON " $ P* HARDCOPY DEVICE Z P* @ P************************************************************ P PCOPY EQU * P LD A5,COPNO,TCABAS P A
0x2b8268…2b83fc Dummy {f00=0x00c1, f01=0x0190, f02=»WRITE ADDRESSED WAIT | P EJECT P* * $ P* WRITE INTERTASK COMMUNICATION 4 P* P* A3 = BUFFER ADDRESS f P* A4 = ORDER P* A5 = "TO-TID" P* A6 = REQ LENGTH P* PICWRTE EQU * P LDKL A8,ECBICW P ADR A8,
0x2b83fc…2b8590 Dummy {f00=0x00c1, f01=0x4078, f02=»NGTH z P ST A3,ECBBA,A8 P LDR A7,A4 ORDER $ P LKM < P DATA 1 H P RTN A14 X P END h@ tESS f P* A4 = ORDER P* A5 = "TO-TID" P* A6 = REQ LENGTH P* PICWRTE EQU * P LDKL A8,ECBICW P ADR A8,
0x2b8590…2b8724 Dummy {f00=0x00c1, f01=0x2008, f02=» A7,/B7 TRANSFER PARAMETERS LKM , DATA 1 8 CF A14,ERASE ERASE SCREEN H 0 ,EM100 CF A14,TRPF TRANSMIT, PROGRAM FUNCTION j RB EM100 AGAIN * * END START @ 4,2,A13 ADR A14,A13 LOAD STACK
0x2b8724…2b88b8 Dummy {f00=0x00c1, f01=0x0190, f02=» *9h P( P P Y +W^ Y + WL T LW> Q W Y + U Q P W W Y ( C X *! P V L ! X 0 Y 8 z P Y 0 X 0 X 2] X 8 Y 0 z : X 0 :H* : X 2T Y 2 : C 1 B ]
0x2b88b8…2b8a4c Dummy {f00=0x00c1, f01=0x0190, f02=» C : C B _, _ X * ` P < B _R ( X D D : K + Q 2 P. P8 l ( B X # V : _0 _> P x t @ @ 6 ` b b T W W X 0Q Y ( Y *P
0x2b8a4c…2b8be0 Dummy {f00=0x00c1, f01=0x0190, f02=» 0] Y (_r " X _& X *# P B 1 W " P X X$ C : X *! P C W @ X (T W X y 6 Y ( : X (;n z P x t , 6 6 ` 4 4 J T Y .W Y . X ( X ." PV X 0RzT$ Y *P U :H . K
0x2b8be0…2b8d74 (2, 35) Opaque[0x194]
0x2b8d74…2b8f08 # DirEnt {nam=»KMD08 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1930, f03=0x0000}
0x2b8d74…2b8f08 IdxSect {
0x2b8d74…2b8f08 f00 = 0x00c9 // 0x2b8d74 @0x0
0x2b8d74…2b8f08 f01 = 0x0010 // 0x2b8d76 @0x2
0x2b8d74…2b8f08 gno = [ // 0x2b8d78 @0x4
0x2b8d74…2b8f08 [0x00]: C0x00c9.0x2.0
0x2b8d74…2b8f08 [0x01]: C0x00cb.0x3.0
0x2b8d74…2b8f08 [0x02]: C0x00ff.0x3.0
0x2b8d74…2b8f08 [0x03]: C0x0108.0x3.0
0x2b8d74…2b8f08 [0x04]: C0x0109.0x0.0
0x2b8d74…2b8f08 [0x05]: C0x0109.0x1.0
0x2b8d74…2b8f08 [0x06]: C0x0110.0x0.0
0x2b8d74…2b8f08 [0x07]: C0x0110.0x3.0
0x2b8d74…2b8f08 ]
0x2b8d74…2b8f08 }
0x2b8f08…2b909c Dummy {f00=0x00c9, f01=0x0190, f02=» P IDENT KMD08 03.01.XXX.1 < P******************************************************** & P* f 4 P* THIS IS THE MAIN MODULE FOR KMDAPLICATION p 2 P* CONTAINING THE CWB'S, TWB'S AND INITIAL P* START POINTS P* P*
0x2b909c…2b9230 Dummy {f00=0x00c9, f01=0x0190, f02=»RETAGET IFM DECENTRAL PRINT: ( P* TILF JET: TERM LA, MED TILBEHLR $ & P* STARTADRESSE 'LPGO' P < P* NDRET: CNFHC FRA BINI (16),'1','2', ....... TIL z 0 P* STRGI (16),'GA','GB',........ P* DELETED: I KBVGO:
0x2b9230…2b93c4 Dummy {f00=0x00c9, f01=0x018e, f02=» $ P* TRANSACTION TASK TC P* 0 8 P**************************************************** : P TERM TC v P* P CWB CB1 P CWB CB2 P CWB CB3 P CWB CB4 P CWB CB6 P DWB CD3(CB3) P DWB CD4(CB4)
0x2b93c4…2b9558 Dummy {f00=0x00c9, f01=0x0190, f02=» P* PFD01 DSET FC=F8 VOL 999001 PFD02 DSET FC=F9 VOL 999002 0 & PKVOUCH DSET FC=31,DEV=TV,BUFL=100 R 2 PKJTAPE DSET FC=30,DEV=TJ,BUFL=70,BUFDS=KVOUCH | 2 PKTALLY DSET FC=32,DEV=TR,BUFL=30,BUFDS=KVOUCH PSCREEN DSET FC=50,BUFL=56
0x2b9558…2b96ec Dummy {f00=0x00c9, f01=0x0190, f02=»LE SET t $ PDK04 DSET FC=C4 FD999004 KT PLAN PDSSOPI DSET FC=10 6 PDSSOPO DSET FC=11 P PDCOMM DSET FC=61 j PKCASS DSET FC=12 PDK05 DSET FC=C5 GL REGSET " PDK06 DSET FC=C6 TEXT REGISTER " PDK07 DSET FC=C7 INDEX REGISTER " P
0x2b96ec…2b9880 Dummy {f00=0x00c9, f01=0x0190, f02=»UFL=162 v & PDSHCLP DSET FC=80,DEV=LP,BUFL=162 PFD03 DSET FC=FA VOL 999003 : PFD04 DSET FC=FB VOL 999004 " P FMTCTL INDS=KEYB,OUTDS=SCREEN ~ P START REGGO P STACK 256 P EJECT P* P* P* P* DATA DIVISION
0x2b9880…2b9a14 (2, 36) Dummy {f00=0x00cb, f01=0x0190, f02=»* P START KBVGO P* PDSDC DSET FC=61 ( $ PDSICR DSET FC=E0,DEV=II COPCMD=1 @ PDSICW DSET FC=E1,DEV=IO h $ PDSVDU DSET FC=50,DEV=DY,BUFL=162 $ PDSKBAN DSET FC=20,DEV=KA,BUFL=2 $ PDSKBSD DSET FC=40,DEV=KI,BUFL=2 P EJECT
0x2b9a14…2b9ba8 Dummy {f00=0x00cb, f01=0x0190, f02=» START GTPGO P* PDSDC DSET FC=61 PDSICR DSET FC=E0,DEV=II 6 $ PDSICW DSET FC=E1,DEV=IO COPCMD=1 V $ PDSGTP DSET FC=30,DEV=GP,BUFL=162 ~ P* P EJECT P* P* LINE PRINTER P* P* P TERM LA P*
0x2b9ba8…2b9d3c Dummy {f00=0x00cb, f01=0x0190, f02=»W DSET FC=E1,DEV=IO COPCMD=1 $ PDSLP DSET FC=80,DEV=LP,BUFL=162 $ P L P* T P* ^ P* DCTASK h P* x P* P TERM D0 P* P CWB CB9 P START DC1GO PDSDC DSET FC=60 P* P EJECT P* P*
0x2b9d3c…2b9ed0 Dummy {f00=0x00cb, f01=0x018e, f02=»KBASE t * PPRINTER STRG 4X'0' KEYBARD/VDU/PRINTER & PBVDU STRG 3840X'0' VDU SCREEN BUFF < ( PPCURS STRG 4X'0' CURSOR ADDR. BINARY f . PATTRIB STRG 4X'0' LAST ATTRIBUTE CHARACTER & PCURATT STRG 4X'0' CURSOR ATTRIBUTE $ PWCC STRG 4X'0' WCC/CCC CHA
0x2b9ed0…2ba064 Dummy {f00=0x00cb, f01=0x0190, f02=» PICWORK STRG 4X'0' * PINTATT STRG 4X'0' INTENSITY ATTRIBUTE " POFFFLG STRG 4X'0' OFFLINE FLAG L PCOPNO BIN TID FOR HARDCOPY r PMISCAR STRG 44X'0' CCC,MAIN, P MODE,KEYS,ECBDCC,ECBBLK, PSTRG2 STRG 4X'0' DK P EJECT P
0x2ba064…2ba1f8 Dummy {f00=0x00cb, f01=0x0190, f02=»************* t P PCB9 BLK P* . PCNFIGD BOOL 8 PCNFBSY BOOL L P* ` P* CONFIGURATION DATA j P* " PNBRKBV BIN NUMBER OF KB/VDUS PNBRGTP BIN NUMBER OF GTPS P* : PMF1KBV STRG 32X'40C1C2C3C4C5C6C7' DV
0x2ba1f8…2ba38c Dummy {f00=0x00cb, f01=0x0190, f02=»D NOT BE CHANGED P* ( PMF1CU STRG X'6040' CU-ADDRESS MF # 1 " P* N > PCNFHC STRGI (16),'GA','GB','GC','GD','GE' HARDCOPY PRINTER X P FOR KB-VDU 1-16 P* PBINWK1 BIN P* 6 POFF STRGI (12)2C'TC','TD','TE','TF','TG','TH',
0x2ba38c…2ba520 Dummy {f00=0x00cb, f01=0x0190, f02=» FALSE T=ALL BKO-CODES ALLOWED 0 PCKTFLAG BOOL FALSE F=NO SALDO AT ALL IN KORT & . PCCLKTFLG BOOL FALSE T=KONTOKORT I KASSELUK Z 0 PCTESTFLG BOOL FALSE T=CONVERSION, TEST MODE , PCTRVALG BOOL FALSE T: SKOVBO. F: VIBORG . PCFLT46 BOOL FALSE T=SPEC
0x2ba520…2ba6b4 (2, 37) Dummy {f00=0x00ff, f01=0x0190, f02=» FALSE T=INCLUDES DATATRANSMISSION . PCCYWRTF BOOL FALSE T=DO NOT USE CYCLE SET * 2 PCADM22F BOOL FALSE T=ALLOWED FUNCTION (ADM 22) PC5MDISK BOOL FALSE T=5M DISK * PCKASFLG BOOL TRUE T=BACKUP ON CASSETTE 4 PCSLDFLG BOOL TRUE T=GL.SALDO PRESENT
0x2ba6b4…2ba848 Dummy {f00=0x00ff, f01=0x0190, f02=»CBIN1 BIN '1' PCBIN2 BIN '2' PCBIN3 BIN '3' , PCBIN4 BIN '4' B PCBIN5 BIN '5' X PCBIN6 BIN '6' n PCBIN7 BIN '7' PCBIN8 BIN '8' PCBIN9 BIN '9' PCBIN10 BIN '10' PCBIN11 BIN '11' H PWEIGTH BCDI (13),'
0x2ba848…2ba9dc Dummy {f00=0x00ff, f01=0x0190, f02=»* P EJECT PCB2 BLK P* ( & PCPFLG BOOL FALSE T: DISK OCCUPIED 2 ( PCSPLITFL BOOL FALSE T: SPLIT RECORD " PCWFLAG BOOL FALSE F=COLD START " PCREMITFL BOOL FALSE F=NO REMIT & PCSKIFTFL BOOL FALSE T=FD CHANGING ( PCEORFLG BO
0x2ba9dc…2bab70 Dummy {f00=0x00ff, f01=0x0190, f02=»CCONVFLG BOOL FALSE T=CONVERSION GOING ON $ PCSWFLAG BOOL FALSE SCRATCH FLAG 2 2 PCSKIFTWN BOOL FALSE T=WARNING ABOUT FD CHANGE Z . PCKFLAG BOOL FALSE T=EXCL ACCESS, KNT. PLAN , PCTEXTFLG BOOL FALSE T=TEXT REG. PRESENT 0 PCSTRKFLG BOOL FALSE T=
0x2bab70…2bad04 Dummy {f00=0x00ff, f01=0x0190, f02=»14 BIN '14' PCBIN15 BIN '15' PCBIN16 BIN '16' , PCBIN17 BIN '17' D PCBIN18 BIN '18' PCBIN19 BIN '19' t PCBIN20 BIN '20' PCBIN21 BIN '21' PCBIN22 BIN '22' PCBINMAX BIN '26' P EJECT @ P**************
0x2bad04…2bae98 Dummy {f00=0x00ff, f01=0x0190, f02=» FIELD NR GIVES DISPLACEMENT IN TABLE P* . @ P************************************************************ 8 PCFLTDEX BINI (90), C | : P '26','26','26','26','1','2','3','4','5','6', 1-10 C < P '7','8','9','4','11','12','10','11','12','13',
0x2bae98…2bb02c Dummy {f00=0x00ff, f01=0x0190, f02=» C Z @ P '18','14','20','21','22','17','12','15','10','1', 41-50 C 6 P '2','3','4','2','3','4','5','6','7','8', 51-60 C N > P '9','10','11','12','13','6','26','26','26','26', 61-70 C @ P '26','26','26','26','26','26','26','26','26','26', 71-80 C
0x2bb02c…2bb1c0 Dummy {f00=0x00ff, f01=0x0190, f02=»'6','5','0' n P* 8 PCFLAG BINI (12),X'8800',X'0800' TASK DEPENDENT FLAGS P* Z P EJECT d PCB3 BLK r P* P* PCTWBIN1 BIN PCTWBIN2 BIN PCVOUTOP BIN W'56' PCMAXLIN BIN W'54' PCMINLIN BIN W'2'
0x2bb1c0…2bb354 (2, 38) Dummy {f00=0x0108, f01=0x0190, f02=»398X'FF' PCCONBUF5 STRG 398X'FF' PCCONBUF6 STRG 398X'FF' . PCCONBUF7 STRG 398X'FF' L PCCONBUF8 STRG 398X'FF' j PCTRANBUF STRG 698 8 PCTID STRGI (12),2C'TC','TD','TE','TF','TG','TH', C $ P 'TI','TJ','TK','TL','TM','TN' P*
0x2bb354…2bb4e8 Dummy {f00=0x0108, f01=0x018e, f02=»O. OF 0PEN TASKS PCRECLGD BIN W'128' $ PCRECNR BIN PHYSICAL RECORD NR. 2 PCCONBUF9 STRG 398X'FF' Z & PCRECBCD BCD 6D LOGICAL RECORD NR. x PCEDATNR BCD 4 DATASET NR. PSOPINP STRG 4 PASVOL STRG 6 PASFNAME STRG 8 PCKMD
0x2bb4e8…2bb67c Dummy {f00=0x0108, f01=0x0190, f02=» P* TEXT FOR BKO & P* ONLY RELEVANT IF EITHER $ ( P* CBKOFLG=F (CHECK BKO) OR N , P* CKTFLAG=F (NOT SALDO IN KT.) z PCTTXT07 STRG 13'00008 C P 99 0' & PCREGTAB BCDI (25,2),'01','-01', C P
0x2bb67c…2bb810 Dummy {f00=0x0108, f01=0x0190, f02=» P '08','-01', C P '09','-01', C P '10','-01', C 8 P '12','-01', C P P '40','-01', C h P '41','-01', C P '42','-01', C P '45','-01', C P '46','-01', C P '47','-01', C P '48','-01', C
0x2bb810…2bb9a4 Dummy {f00=0x0108, f01=0x018e, f02=»-01', C P '-01','-01' P* & P EJECT 0 PCB6 BLK > P* N ( PCCYPFLG BOOL FALSE CYSET OCCUPIED ? X * PC167FLG BOOL FALSE T=KMD167 (HVIDOVRE) $ PCTALLY BOOL F T: OUTPUT ON TALLY & PCTXTFLG BOOL F T: TEXTBUF OCCUPIED , PCLEV
0x2bb9a4…2bbb38 Dummy {f00=0x0108, f01=0x0190, f02=» d , PCCYSIZE BIN '30' MAX SIZE OF CYCLE PAGE , PCKTLAST BIN '0' LAST RECORD USED, KTPLAN 8 4 PCMAXREC BIN W'1400' GIVES WARNING OF FULL REGSET h * PCGLRECNR BIN '0' LAST RECNR, GL REGSET & PCKTMAX BIN '21' MAX SIZE KONTOPLAN * PCIXLAST BIN LAS
0x2bbb38…2bbccc Dummy {f00=0x0108, f01=0x0190, f02=»NDX BCDI (7),14D KNT.PLAN MASTER INDEX 0 PCIXINDX BCDI (20),14D IDX.FILE MASTER INDEX . PCTXBUF STRG 24 b " PCIXBUF STRG 8 IDX.FILE BUFFER x PCCYBUF STRG 128 CYSET BUFFER " PCKTBUF STRG 128 KTPLAN BUFFER . PCKTTOP BCD 4D'5' FIRST LINE KORT
0x2bbccc…2bbe60 Dummy {f00=0x0108, f01=0x0190, f02=»', C ` P 'KH','KI','KJ','KK','KL' P EJECT 0 P* > PTB1 BLK H " PTTCY1FLG BOOL FALSE IN CYCLE? X " PTTCY2FLG BOOL FALSE IN STABEL? ~ PTTLSTFLG BOOL FALSE $ PTTPSEFLG BOOL FALSE PAUSE STATE ( PTTSUMFLG BOOL FALSE SUM ON SCREE
0x2bbe60…2bbff4 (2, 39) Dummy {f00=0x0109, f01=0x0190, f02=»NAL r * PTTEORFLG BOOL FALSE *-- END OF RECORD ( PTTSUPFLG BOOL FALSE SUPPLEMENT POST : , PTTSMALL BOOL FALSE *-- SMALL GIRO KVIT? f & PTTR11FLG BOOL FALSE T: KASSE CLOSE * PTREMFLG BOOL FALSE T= REMOTE TERMINAL , PTTKORTFL BOOL FALSE T: IN
0x2bbff4…2bc188 Dummy {f00=0x0109, f01=0x0190, f02=»N NO OF OLD TRANS PTTASKNR BIN PTTDKBCD BCD 2 D/K VALUE . $ PTTARKSAV BCD 12 SAVED ARK KT NR N & PTTCYKTOT BCD 14 SAVED CYKLE TOTAL v & PTTCYKPOS BCD 4 SAVED CYKLE LINE NR $ PTTLINNR BCD 4 LINE NR ON VOUCHER $ PTTCNTNR BCD 4 COUNTER
0x2bc188…2bc31c Dummy {f00=0x0109, f01=0x0190, f02=» & PTTCYM STRG 1 CYKLE MARK ON JOURNAL . PGTREGF BCDI (26),16X'F' TRANSACTION FIELDS . P EJECT ` PGB1 BLK n P* ~ P* PGTEXFLAG BOOL FALSE PGTADUPFL BOOL FALSE PGTAUTODP BOOL FALSE PGTREGFLG BOOL FALSE PGTCYFL
0x2bc31c…2bc4b0 Dummy {f00=0x0109, f01=0x018e, f02=»3 BOOL FALSE *-- 4 PGTKASSE BOOL FALSE *-- TRUE- IN KASSE FUNCTIONS ! 4 PGTSLUTFL BOOL TRUE FALSE: SLUT KEY IS SIMULATED ! P ( PGTDIVTR BOOL FALSE T: DIVERSE TRANS ! . PGTTRSEL BOOL FALSE T: TRANSACTION SELECTED ! * PGTMASTFL BOOL FALSE T=MASTER TERMI
0x2bc4b0…2bc644 Dummy {f00=0x0109, f01=0x018e, f02=» PGSWBIN3 BIN " PGSWBIN4 BIN " PGSWBIN5 BIN " , PGSWBIN6 BIN " @ PGSWBCD1 BCD 14 " T PGSWBCD2 BCD 14 " j PGSWBCD3 BCD 6 " PGSWBCD4 BCD 6D " PGSWBCD5 BCD 6 " PGSWBCD6 BCD 14 " PGSWBCD7 BCD 14 " PGTWBCD1 BCD 14 " PGTWB
0x2bc644…2bc7d8 Dummy {f00=0x0109, f01=0x0190, f02=» " PSPPROMPT BOOL FALSE # PSPCHANGE BOOL FALSE # $ 2 PSPDUPL BOOL FALSE TRUE: FIELD HAS BEEN DUPPED # @ 2 PSPME BOOL FALSE FALSE: NO CHECK FOR ME FIELDS # v 0 PSPKEYFLG BOOL TRUE FALSE NO KOR-KEY IN SPERR # " PSPWARNFL BOOL FALSE T: WARNING # P*
0x2bc7d8…2bc96c Dummy {f00=0x0109, f01=0x0190, f02=»N '1' # ( PSPERASE BIN '0' 0:ERASE; 4:NO ERASE $ PSPLINTOP BIN $ : PSPLINLOW BIN $ N " PGTCLASS BIN '1' TERMINAL CLASS $ b $ PGTREGDEX BIN '0' TRANSTYPE INDEX $ ( PGTDFLIN BIN '27' DEFAULT LINE NUMBER $ PGSSWITCH BINI (26) $ PGTUSED BINI (26) $
0x2bc96c…2bcb00 Dummy {f00=0x0109, f01=0x0190, f02=»T=LEV., F=CPR $ PGTDYFLG BOOL FALSE T=DISPLAY % PGTSPGFLG BOOL FALSE % : 2 PGTKORTFL BOOL FALSE T=KONTO FOUND IN KONTOPLAN % V & PGTTESTFL BOOL FALSE T=IN TEST MODE % $ PGTSWFLAG BOOL FALSE SCRATCH FLAG % & PGTSUMKEY BOOL FALSE SUM INDIKATOR % " P
0x2bcb00…2bcc94 (2, 40) Dummy {f00=0x0109, f01=0x0190, f02=»DFLG BOOL FALSE T=SALDO PRESENT. F=NOT PRESENT % 0 PGTGLSPG BOOL FALSE T=INQUIRIES ON GL REGSET & 6 P* & j P* & t PGTPPOIN BIN & ~ PGTPAGE BIN & PGTRETUR BIN & PGTSUM BCD 14 & PGTANTAL BCD 4 & PGTCYSUM BCD 14 & PGTREGNR BCD 3 TR
0x2bcc94…2bce28 Dummy {f00=0x0109, f01=0x018e, f02=»CTION & n " PGTL8TXT STRG 8 TEXT FOR LINE 8 ' PSPINPUT STRG 35 ' 4 PGSWSTR1 STRG 1 ' L PGSWSTR2 STRG 2 ' b PGSWSTR9 STRG 9 ' x PGSWSTR20 STRG 20 ' P* ' P EJECT ' P* ' PGB4 BLK ' , PGTCYWRTF BOOL FALSE T=NO WRITE ON CYSET ' , P
0x2bce28…2bcfbc Dummy {f00=0x0109, f01=0x0190, f02=» ' j " PGTCYIN BIN NEXT USED, CYCSET ( " PGTCYOUT BIN NEXT FREE, CYCSET ( . PGTRECNR BIN SPG. RECORD NO. ( T " PGTLBNR BCD 6D SPG. EKSP.LB.NO. ( x ( PGTLBNRIN BCD 6D EKSP.LB.NR ASKED FOR ( PGTKTTYP BCD 4D KTPLAN TYPE ( P* ( P* ( P* (
0x2bcfbc…2bd150 Dummy {f00=0x0109, f01=0x0190, f02=» ( p & PGTTTPFLG BOOL TRUE T=TTP,F=NO TTP ) PGTGTPFLG BOOL FALSE T=GTP ) 2 PGTLPFLG BOOL FALSE T=LP ) T P* ) t P* ) ~ P ) P ) & PGTHCDEV BIN HARDCOPY 1=GTP, 2=LP ) PGTLINE BIN CURRENT LINE ) PGSWBIN7 BIN ) PGSWBIN8 BIN )
0x2bd150…2bd2e4 Dummy {f00=0x0109, f01=0x0190, f02=»LEVTKO BCD 2 ) PGTLEVDAT BCD 8 OPRET DATO * PGTTXTTKO BCD 4 TEXT KODE * 6 PGTLEVNVN STRG 30 * V PGTLEVADR STRG 32 * n PGTLEVBY STRG 20 * PGTLEVPDI STRG 13 * PGTLEVTXT STRG 22 * PGTPRTDAT BCD 8 PRINT DATO * PGTPRTFRA BCD 12 LEV FRA
0x2bd2e4…2bd478 Dummy {f00=0x0109, f01=0x0190, f02=»T * v PGTTESTMK STRG 1 + $ PTTSUPMRK STRG 1 SUPPLEMENT MARK + " PTTSUMMRK STRG 1 SUM MARK + J PGTTEXT STRG 6 + j PTTSPARE3 STRG 1C'.' + PTCONBUF STRG 398X'FF' + & PTTCYKST BCD 4 1. LINE CYCLE/STABEL + $ PTTKTSLD BCD 14 KONTOKORT, SALDO +
0x2bd478…2bd60c Dummy {f00=0x0109, f01=0x0190, f02=» $ PTT16TXT STRG 3 RENTE/GEBYR/RATE , PTT07TXT STRG 5 BKO TEXTS , , & PGTDUPF BCDI (26),16X'F' DUP FIELDS , L P* , v P* , P EJECT , PCD3 DBLK , P* , P* , P* , P* , P* , PDUMCD3 STRG 10 , PCMASK BCDI (12),4D , &
0x2bd60c…2bd7a0 Dummy {f00=0x0109, f01=0x0190, f02=» , * PC12ACC BCDI (60,2),14D EJ-EDB COUNTERS - P* - 6 P* - @ P - J P* - R PCD4 DBLK - P* - l P* - v P* - P* - P* - PDUMCD4 BINI (4) - . PCBEH BINI (12,2) FIRST AND SIZE OF BEHLDN. - . PCTR12 BINI (12,2) FIRST AND SIZE
0x2bd7a0…2bd934 (2, 41) Dummy {f00=0x0110, f01=0x0190, f02=» - v PCVOL STRGI (4),6 . P* . P EJECT . * PTD2 DBLK . 8 P* . H P* . R P* . P* . f P* . p PTTINF1 STRG 14 . z . PTTRECOPN BCD 6 REC. NO. FOR OPEN OR CLOSE . * PTTRECCHN BCD 6 REC. NO. FOR FD CHANGE . $ PTTSTLBNR BCD 6D FIRST EK
0x2bd934…2bdac8 Dummy {f00=0x0110, f01=0x0190, f02=»CASH BCD 14D CURRENT CASH AMOUNT . $ PTTLBNR BCD 6D CURRENT EKSP.LBNR / ( ( PTTACC BCDI (8,2),16D'0' EDB COUNTERS / P , PTTGLREC BCD 6 SAVE RECORD NO, GL REGSET / | P* / P* / P* / P* / P PDIV / P ENTRY REGGO / P ENTRY KBVGO /
0x2bdac8…2bdc5c Dummy {f00=0x0110, f01=0x0190, f02=» EXT SWITCH / " P EXT GETTID GET TASK IDENTITY 0 ( P ENTRY OFFLNE OFFLINE START ADDRESS 0 : P ENTRY ONLINE 0 f P 0 | & P DSC0 DSDC,2 DUMMY REFERENCE T:IO 0 , P**************************************** 0 P* 0 P* START OF REGISTRATION 0
0x2bdc5c…2bddf0 Dummy {f00=0x0110, f01=0x0190, f02=»**************************** 0 P* 1 $ ( P* START ADDRESS FOR KEYBOARD TASK 1 . , P**************************************** 1 Z PKBVGO 1 P ADD NBRKBV,='1' 1 P CALL GETTID,TCT01 1 P SUB TCT01,=X'4B40' 1 * P* PERF CONF READ & CONVERT CONFIG
0x2bddf0…2bdf84 Dummy {f00=0x0110, f01=0x0190, f02=»SE YES, WAIT FOR RESTART 1 PKB050 2 " P CALL VDUKB,TCT01 2 0 & P PERF OFFLNE BRANCH TO CREDIT CODE 2 J * P B KB050 RETURN TO IBM-3270 EMULATION 2 t P 2 P 2 P 2 2 P********************************************* 2 P* 2 . P* START ADDR
0x2bdf84…2be118 Dummy {f00=0x0110, f01=0x0190, f02=»1' 2 P CALL GETTID,TCT01 3 P SUB TCT01,=X'4740' 3 $ P MOVE PRINTER,=X'0001' 3 @ P* PERF CONF 3 ^ P CALL PRINT,TCT01 3 r P 3 P 3 P 3 4 P************************************************ 3 P* 3 * P* START ADDRESS FOR LINE PRINTER T
0x2be118…2be2ac Dummy {f00=0x0110, f01=0x0190, f02=»T01,=W'2' 3 P CALL PRINT,TCT01 4 P 4 , P 4 4 4 P*********************************************** 4 < P* 4 t " P* START ADDRESS FOR DC-TASK 4 ~ P* 4 & P********************************* 4 P 4 PDC1GO 4 P CALL DCTASK,MF1CU 4 P
0x2be2ac…2be440 Dummy {f00=0x0110, f01=0x018e, f02=»**************************** 4 P 5 $ POFFLNE PROC 5 , 2 P MOVE STRG2,OFF(TCT01) GET OFF LINE TASK NAME 5 @ * P CBE STRG2,=C' ',RETOFF ANY OFFLINE ? 5 v P RSTRT STRG2 YES 5 P PAUSE 5 PRETOFF 5 P RET 5 P PEND 5 P* 5 P 5 P 5
0x2be440…2be5d4 (2, 42) Dummy {f00=0x0110, f01=0x40f8, f02=» P 6 PONLINE PROC 6 2 P MOVE GSWSTR2,ON(TTASKNR) GET ONLINE TASK NAME 6 , P CBE GSWSTR2,CBLANKS,RETON ANY ON LINE ? 6 V P RSTRT GSWSTR2 YES 6 P PAUSE 6 PRETON 6 P RET 6 P PEND 6 P* 6 P 6 P END 6 @ 6
0x2be5d4…2be768 Dummy {f00=0x0110, f01=0x2008, f02=» 7 CBE GSWSTR2,CBLANKS,RETON ANY ON LINE ? 3 P RSTRT GSWSTR2 YES 3 8 P PAUSE 3 R PRETON 3 ` P RET 3 n P PEND 3 z P* 3 P 3 P END 3 @ 3 P* 2 P 2 P 2 P************************** 2 P* 2 P* RESTART ON LINE
0x2be768…2be8fc Dummy {f00=0x0110, f01=0x0190, f02=» 4 F IDENT T:DUPL P,REL=4.2,791116,870136940420 T:DUPLK T:DUPX < T:DUPLK V T:GRFC j I:EVA0 | T:RNOK T:ROK T:DUPX , ( HB X T:LOFS , (
0x2be8fc…2bea90 Dummy {f00=0x0110, f01=0x4046, f02=» : CT OV ` 0@ B
0x2bea90…2bec24 Dummy {f00=0x0110, f01=0x4136, f02=» 4 F IDENT T:GETC P,REL=4.2,791116,870136940420 T:GETCK < T:GETCK N T:GRFC b I:EVA0 t , ( @ 2' R P P X I:RT1 , ( ' ' X _ X ' _ X '? ; _
0x2bec24…2bedb8 Dummy {f00=0x0110, f01=0x411a, f02=» 4 F IDENT T:GETA P,REL=4.2,791116,870136940420 T:GETAK < T:GETAK N T:GRFC b I:EVA0 t T:RNOK T:ROK , ( H X ' X ! T:RCR H
0x2bedb8…2bef4c Dummy {f00=0x0110, f01=0x4104, f02=» 4 F IDENT T:TSTC P,REL=4.2,791116,870136940420 T:TSTCK < T:TSTCK N T:GRFC b , ( @ X " 9b! X :c 2" t T:RTES $ H @ % , 4 @ 0,/8
0x2bef4c…2bf0e0 Dummy {f00=0x0110, f01=0x0190, f02=» 4 F IDENT T:TFWD P,REL=4.2,791116,870136940420 D @ T:TLEFK T:TRIG T:TLDO T:TDOW T:TUP T:TFWD T:TBWD T:THOMC < T:TLEFK T:TRIG T:TLDO T:TDOW T:TUP T:TFWD T:TBWD
0x2bf0e0…2bf274 (2, 43) Opaque[0x194]
0x2bf274…2bf408 # DirEnt {nam=»DUMMY «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1878, f03=0x0000}
0x2bf274…2bf408 IdxSect {
0x2bf274…2bf408 f00 = 0x00c3 // 0x2bf274 @0x0
0x2bf274…2bf408 f01 = 0x0002 // 0x2bf276 @0x2
0x2bf274…2bf408 gno = [ // 0x2bf278 @0x4
0x2bf274…2bf408 [0x00]: C0x00c3.0x3.0
0x2bf274…2bf408 ]
0x2bf274…2bf408 }
0x2bf408…2bf59c Dummy {f00=0x00c3, f01=0x0190, f02=» IDENT DUMMY 77-04-21 * " & "* DUMMY MODULE TO REPLACE TRABUG , * V * ` j ENTRY TC:CHK r ENTRY TC:ERR P ENTRY I:ERR9 P ENTRY I:ERRA P ENTRY I:ERRB EXTRN I:ECB EXTRN I:BUF
0x2bf59c…2bf730 Dummy {f00=0x00c3, f01=0x4086, f02=» TC:ERR EQU * PI:ERR9 EQU * $ PI:ERRA EQU * 8 PI:ERRB EQU * L RB * ` n END v@ ENTRY TC:ERR P ENTRY I:ERR9 P ENTRY I:ERRA P ENTRY I:ERRB EXTRN I:ECB EXTRN I:BUF
0x2bf730…2bf8c4 Dummy {f00=0x00c3, f01=0x2008, f02=» NT DUMMY 77-04-21 * " & "* DUMMY MODULE TO REPLACE TRABUG , * V * ` j ENTRY TC:CHK r ENTRY TC:ERR EXTRN I:ECB EXTRN I:BUF PS EQU A14 WK1 EQU 1 WAIT EQU X'80'
0x2bf8c4…2bfa58 Dummy {f00=0x00c3, f01=0x40ae, f02=» * F IDENT D:CB30 TRA 3.1 78-08-08 O111 D:CB30 2 D:CB30C D * & 0 0 ! X - @ D @ * & [
0x2bfa58…2bfbec Dummy {f00=0x00c3, f01=0x0190, f02=» * F IDENT C:CB30 TRA 3.1 78-08-08 O111 C:CB30 2 C:CB30C D * & / 8 6 7 X & 8.1.1 & = & [ & y * & 51ASKAT58A/S 5 * & 2BSKAT
0x2bfbec…2bfd80 Dummy {f00=0x00c3, f01=0x404e, f02=»RBR65BOL]N67BOSIK46FERIE66 - FERSHA " 2 8@ J
0x2bfd80…2bff14 (2, 44) Opaque[0x194]
0x2bff14…2c00a8 # DirEnt {nam=»M:PROC«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1a78, f03=0x0000}
0x2bff14…2c00a8 IdxSect {
0x2bff14…2c00a8 f00 = 0x00d3 // 0x2bff14 @0x0
0x2bff14…2c00a8 f01 = 0x0006 // 0x2bff16 @0x2
0x2bff14…2c00a8 gno = [ // 0x2bff18 @0x4
0x2bff14…2c00a8 [0x00]: C0x00d3.0x3.0
0x2bff14…2c00a8 [0x01]: C0x00eb.0x1.0
0x2bff14…2c00a8 [0x02]: C0x00eb.0x2.0
0x2bff14…2c00a8 ]
0x2bff14…2c00a8 }
0x2c00a8…2c023c Dummy {f00=0x00d3, f01=0x0190, f02=» P$KMDALL PSKF 1 @ P$KMDGEN KMD=080,VER=@VER=03$$,REL=@REL=01$$,MOD=0801$$ @080= " B P$KMDGEN KMD=0801,VER=@VER=03$$,REL=@REL=01$$,MOD=0802$$ @0801= f B P$KMDGEN KMD=0802,VER=@VER=03$$,REL=@REL=01$$,MOD=0802$$ @0802= B P$KMDGEN KMD=0803,VER=@
0x2c023c…2c03d0 Dummy {f00=0x00d3, f01=0x0190, f02=»ER=@VER=03$$,REL=@REL=01$$,MOD=0802$$ @0805= ~ B P$KMDGEN KMD=0806,VER=@VER=03$$,REL=@REL=01$$,MOD=0802$$ @0806= 4 B P$KMDGEN KMD=0807,VER=@VER=03$$,REL=@REL=01$$,MOD=0802$$ @0807= z B P$KMDGEN KMD=0808,VER=@VER=03$$,REL=@REL=01$$,MOD=0802$$ @0808= B P$K
0x2c03d0…2c0564 Dummy {f00=0x00d3, f01=0x0190, f02=»$KMDGEN KMD=975,VER=@VER=03$$,REL=@REL=01$$,MOD=9751$$ @975= @ P$KMDGEN KMD=173,VER=@VER=03$$,REL=@REL=01$$,MOD=1731$$ @173= D @ P$KMDGEN KMD=167,VER=@VER=03$$,REL=@REL=01$$,MOD=1671$$ @167= @ P$KMDGEN KMD=255,VER=@VER=03$$,REL=@REL=01$$,MOD=2551$$ @255=
0x2c0564…2c06f8 Dummy {f00=0x00d3, f01=0x0190, f02=» T @ P$KMDGEN KMD=269,VER=@VER=03$$,REL=@REL=01$$,MOD=2691$$ @269= @ P$KMDGEN KMD=305,VER=@VER=03$$,REL=@REL=01$$,MOD=3051$$ @305= L @ P$KMDGEN KMD=379,VER=@VER=03$$,REL=@REL=01$$,MOD=3791$$ @379= @ P$KMDGEN KMD=461,VER=@VER=03$$,REL=@REL=01$$,MOD=4611
0x2c06f8…2c088c Dummy {f00=0x00d3, f01=0x0190, f02=»613$$ @4613= ^ @ P$KMDGEN KMD=525,VER=@VER=03$$,REL=@REL=01$$,MOD=5251$$ @525= @ P$KMDGEN KMD=527,VER=@VER=03$$,REL=@REL=01$$,MOD=5271$$ @527= X @ P$KMDGEN KMD=539,VER=@VER=03$$,REL=@REL=01$$,MOD=5391$$ @539= @ P$KMDGEN KMD=743,VER=@VER=03$$,REL=@REL=0
0x2c088c…2c0a20 Dummy {f00=0x00d3, f01=0x0190, f02=»1$$,MOD=7871$$ @787= h @ P$KMDGEN KMD=805,VER=@VER=03$$,REL=@REL=01$$,MOD=8051$$ @805= PEND ` P$KMDNR l PPRT KMDNR z PEND P$HELP PPRT HELP PEND P$LEDLS PLED LEDLS,/A PKPF /A,LEDFIL PASG /E0,DK,LED
0x2c0a20…2c0bb4 (2, 45) Dummy {f00=0x00eb, f01=0x0190, f02=»D$$@MOD=9751$$ P!!EN PKPF /A,KMDFIL " PASG /E0,DK,KMDFIL 8 PEND R P$INCGEN ^ PINC FMOVE,INT:PROD n PINC EMPTYT,INT:PROD PINC T:EDFL,INT:PROD PINC T:DYKI,INT:PROD PINC T:UPDF,INT:PROD PINC T:DUPL,INT:P
0x2c0bb4…2c0d48 Dummy {f00=0x00eb, f01=0x018e, f02=»NT:PROD PINC T:GETF,INT:PROD PINC T:REWR,INT:PROD , PINC T:DEDT,INT:PROD H PINC T:ENLI,INT:PROD d PINC T:EINP,INT:PROD PINC T:ENIN,INT:PROD PINC T:SETC,INT:PROD PINC T:CLMI,INT:PROD PINC T:ATTF,INT:PROD
0x2c0d48…2c0edc Dummy {f00=0x00eb, f01=0x018e, f02=» z PINC T:DMR,INT:PROD PINC T:TEI,INT:PROD " PINC T:DEL,INT:PROD < PINC T:MSK0,INT:PROD V PINC T:SCD,INT:PROD r PINC T:GTID,INT:PROD PINC T:IO,INT:PROD PINC I:NTP,INT:PROD PINC I:EVA,INT:PROD PINC I:ADS,INT:PROD
0x2c0edc…2c1070 Dummy {f00=0x00eb, f01=0x0190, f02=» PINC I:NTF,INT:PROD PINC I:EDT,INT:PROD PINC I:EDTE,INT:PROD 8 PINC I:EDS,INT:PROD T PINC I:STR,INT:PROD n PINC I:EVS,INT:PROD PINC T:USE,INT:PROD PINC I:EPIC,INT:PROD PEND P$REL PMES @NAM PLED @NAM
0x2c1070…2c1204 Dummy {f00=0x00eb, f01=0x0190, f02=»R0D PRDA /A PKPF /A,@NAM=TEST PEND 2 P$RDS > PASG /E1,@DEV=CR0D J PRDS d PKPF /S,@NAM=TEST p PEND P$LED PLED @NAM=,@FC=/S,@CC PKPF @FC=/S,@NAM= PEND P$MOVE PMOV @NAM=,@FC=/S,@ID=KMDPR
0x2c1204…2c1398 Dummy {f00=0x00eb, f01=0x0190, f02=» MONITOR=@M=M:KONV, APPLICATION=@A=AAAA, 0 PMES CONFIGURATION DATA=@C=KONFIG 6 PTRA @NAM=/S,@NL j PKPF /O PSCR /7D PASG /7D,DK PASG /02,NO @TLK= PTLK M,X PASG /02,LP0F @TLK= PSCR /7D PBEA
0x2c1398…2c152c Dummy {f00=0x00eb, f01=0x0190, f02=»C=@C=KONFIG t PEND P$LETRA PLED @NAM= . PKPF /S,@NAM= @ P$TRA N=@NAM=,L=@LS= T P$TRA1 N=@NAM p PEND P$TRA PTRA @N=,@L= PKPF /O PEND P$TRA1 PTRA @N= PKPF /O PEND P$LINK
0x2c152c…2c16c0 Dummy {f00=0x00eb, f01=0x0190, f02=»LS= P$TLK1 N=@NAM= PEND " P$TLK . PTLK M : PSCR /7D H PBEA DUMMY,NL X PLKE M l PKPF /L,@N= z , P$PCAS M=M:KONV,MU=M:KONV,A=@N=,C=KONFIG PEND P$TLK1 PTLK PSCR /7D PBEA DUMMY,NL PLK
0x2c16c0…2c1854 (2, 46) Dummy {f00=0x00eb, f01=0x00fa, f02=»E M PKPF /L,@N= , P$PCAS M=M:KONV,MU=M:KONV,A=@N=,C=KONFIG PEND N P$ASG1 Z PASG /E1,TY10 h PRDA /A | PEND P$ASG2 PASG /E0,TY10 PEND P$TLK3 PTLK U,X PSCR /7D PEND
0x2c1854…2c19e8 Dummy {f00=0x00eb, f01=0x2008, f02=» PKPF /L,@N= , P$PCAS M=M:KONV,MU=M:KONV,A=@N=,C=KONFIG PEND N P$ASG1 Z PASG /E1,TY10 h PRDA /A | PEND P$ASG2 PASG /E0,TY10 PEND P$TLK3 PTLK U,X PSCR /7D PEND
0x2c19e8…2c1b7c Dummy {f00=0x00eb, f01=0x018e, f02=»WFLAG P MOVE GSWBIN1,GSWBCD5 P IB GSWBIN1,SKIP20,SKIP10 , P B SKIP90 N PSKIP10 ` $ P PERF GENWRT,CBIN3,TXTFF1 TALLY n P B SKIP90 PSKIP20 P IB GTHCDEV,SKIP21,SKIP22 P B SKIP90 PSKIP21 $ P PERF GENWRT,GTH
0x2c1b7c…2c1d10 Dummy {f00=0x00eb, f01=0x0190, f02=» P PEND P EJECT P* PTXTOPR PROC * & P********************************* > P* h , P* THE PROCEDURE MAINTAINS TEXTREGISTER. r P* & P********************************** PTXTO000 P TBF CTEXTFLG,TXTO990 P MOV
0x2c1d10…2c1ea4 Dummy {f00=0x00eb, f01=0x0190, f02=»IN3,TXTO980 PTXTO010 , P TBF CTXTFLG,TXTO020 BUFFER AVAILABLE ? $ " P DELAY CBIN1 ELSE WAIT 0.1 SEC T P B TXTO010 z PTXTO020 P SET CTXTFLG P MOVE GSWBIN8,GSWBCD1 P MOVE GSWBIN1,=W'24' P MOVE CTXBUF,CBLANKS 2 P P
0x2c1ea4…2c2038 Dummy {f00=0x00eb, f01=0x018e, f02=» P CLEAR GTSWFLAG P PERF SPCLRN P CBNE SPBINW2,CBIN3,TXTO000 0 PTXTO030 T P TBF CTXTFLG,TXTO040 d P DELAY CBIN1 P B TXTO030 PTXTO040 P SET CTXTFLG P PERF TXTPAK * P PERF RAWRIT,DK06,=D'6',CTXBUF,GSWBIN8
0x2c2038…2c21cc Dummy {f00=0x00eb, f01=0x0190, f02=» P PERF SETKEY P CMP CBIN0,CBIN0 OK P RET 8 PTXTO910 D P CLEAR CTXTFLG T P CLEAR GTSWFLAG j P PERF SETKEY P CMP CBIN4,CBIN0 P RET P PEND P EJECT PREPL00 PROC STRG,LEN ( P**********************
0x2c21cc…2c2360 Dummy {f00=0x00eb, f01=0x0190, f02=»ED BY FINDING | " P* THE FIRST 00-BYTE, COMPUTING $ P* THE LENGTH OF THE REST OF THE < $ P* FIELD, AND DELETING THIS REST. d P* ( P************************************ P MOVE GSWBIN7,LEN P MOVE GSWBIN1,CBIN0 P MOVE GSWSTR1,=X
0x2c2360…2c24f4 (2, 47) Opaque[0x194]
0x2c24f4…2c2688 # DirEnt {nam=»EQUATE«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1898, f03=0x0000}
0x2c24f4…2c2688 IdxSect {
0x2c24f4…2c2688 f00 = 0x00c4 // 0x2c24f4 @0x0
0x2c24f4…2c2688 f01 = 0x0004 // 0x2c24f6 @0x2
0x2c24f4…2c2688 gno = [ // 0x2c24f8 @0x4
0x2c24f4…2c2688 [0x00]: C0x00c4.0x3.0
0x2c24f4…2c2688 [0x01]: C0x00c5.0x0.0
0x2c24f4…2c2688 ]
0x2c24f4…2c2688 }
0x2c2688…2c281c Dummy {f00=0x00c4, f01=0x0190, f02=» P* 6 P************************************************** P* H P* EQUATES R P* p 6 P************************************************** z P* P* LITERAL EQUATES P* * P* BINARY EQUATES=====
0x2c281c…2c29b0 Dummy {f00=0x00c4, f01=0x0190, f02=»U 5 PBLIT6 EQU 6 PBLIT7 EQU 7 PBLIT8 EQU 8 4 PBLIT9 EQU 9 H PBLIT10 EQU 10 P* r P* | P* DECIMAL LITERALS P* P* PDLIT0 EQU 0 PDLIT1 EQU 1 PDLIT2 EQU 2 PDLIT3 EQU 3
0x2c29b0…2c2b44 Dummy {f00=0x00c4, f01=0x018e, f02=»0 P* 2 P********************************************* P* J " P* EQUATES FOR SOPLAMPS T P* z 2 P********************************************** P* P* $ P* EQUATES FOR DATASET CONTROL P* P*
0x2c2b44…2c2cd8 Dummy {f00=0x00c4, f01=0x0190, f02=» PSKIB EQU 2 SKIP BUFFER PWTM EQU 3 WRITE TAPE MARK " PCLOSE EQU 3 CLOSE FILE D PLOCK EQU 4 LOCK CASSETTE b PTSTAT EQU 7 TEST STATUS ( PRACCS EQU 9 RELEASE EXCLUSIVE ACCESS $ PBSP EQU 10 B10CKSP10CE ONE BLOCK P* P*
0x2c2cd8…2c2e6c Dummy {f00=0x00c4, f01=0x0190, f02=»OFF EQU 1 TURN OFF INDICATOR & PPOS EQU 6 POSITION VOUCHER/CURSOR $ PDEL EQU 8 RANDOM DELETE N P* n P* x " P* EQUATES FOR KEYTABLAS P* P* P* SKOVBO KEYS P* PREGKY1 EQU X'A1' PREGKY2 EQU X
0x2c2e6c…2c3000 Dummy {f00=0x00c4, f01=0x0190, f02=»Y2 EQU X'D0' PSLUTKY1 EQU X'91' PSLUTKY2 EQU X'D1' . PKREKY1 EQU X'92' H PKREKY2 EQU X'D2' ` PSBTKY1 EQU X'93' x PSBTKY2 EQU X'D3' PNOTUSE1 EQU X'94' PNOTUSE2 EQU X'D4' PBSPKY1 EQU X'95' PBSPKY2 EQU X'D5'
0x2c3000…2c3194 (2, 48) Dummy {f00=0x00c5, f01=0x4060, f02=»QU X'E3' P P* P* " P* VIBORG KEYS , P* H P* R@
0x2c3194…2c3328 Dummy {f00=0x00c5, f01=0x2008, f02=»
0x2c3328…2c34bc Dummy {f00=0x00c5, f01=0x0190, f02=» P B T1005 PT1005A P USE TB2,TTASKNR " P CBE TTASKNR,CBIN1,T1010 : " P MOVE SPBINW4,CBIN9 'OPSTART' Z P MOVE SPBINW3,=W'-1' P PERF SPLIN8 P PAUSE & P B T1400 BRANCH TO NON-MASTER CODE PT1010 P PERF CLOSE1
0x2c34bc…2c3650 Dummy {f00=0x00c5, f01=0x0190, f02=»ERF SPCLRA P MOVE GSWBIN2,SPBINW2 2 P IB SPBINW2,T1011,T1011,T1012,T1012,T1011, C 0 P T1011,T1011,T1011,T1012 f PT1011 P B T1010 PT1012 0 P MOVE GTTEXT,=C'FD' INSERT PREFIX IN DSNAME P MOVE GSWBIN1,CBIN1 4 P INS
0x2c3650…2c37e4 Dummy {f00=0x00c5, f01=0x0190, f02=»T1013,T1015,T1014,T1013, C ~ P T1013,T1013,T1013,T1018 $ PT1013 F P B T1010 T PT1014 KRE KEY d P MOVE CCONBUF0,=X'00' | P MOVE GSWBIN2,CBIN0 PT10140 P ADD GSWBIN2,CBIN1 $ P IF FINISH: TO VERY COLD START P C
0x2c37e4…2c3978 Dummy {f00=0x00c5, f01=0x018e, f02=»SLUT KEY P CLEAR CSWFLAG P B T1020 & P* 6 PT1018 KVIT KEY @ P SET CSWFLAG X PT1020 l P TBF CSWFLAG,T1025 z P CLEAR CSWFLAG P PERF CONFRS P BNOK T1010 PT1025 P PERF CONFRD READ CONFDATA P BNOK
0x2c3978…2c3b0c Dummy {f00=0x00c5, f01=0x0190, f02=» P* P* P* PT1030 " P SET CCOLDFLG 0 P SET SPPROMPT F P ATTFMT CSFRM02 YES P PERF SPCLRA x " P IB SPBINW2,T1030,T1030,T1032 P B T1030 PT1032 0 P MOVE GTTEXT,=C'FD' INSERT PREFIX IN DSNAME P MOV
0x2c3b0c…2c3ca0 Dummy {f00=0x00c5, f01=0x018e, f02=»N9,T1035 PT1037 " P MOVE CBEH(CBIN1,CBIN1),CBIN0 " P MOVE CTR12(CBIN1,CBIN1),CBIN0 D P MOVE GSWBIN1,CBIN0 j PT1040 P ADD GSWBIN1,CBIN1 P CBG GSWBIN1,CMAXTASK,T1045 P MOVE GSWBCD5,GSWBIN1 P SET SPPROMPT P A
0x2c3ca0…2c3e34 (2, 49) Opaque[0x194]
0x2c3e34…2c3fc8 # DirEnt {nam=»DKSUBS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1850, f03=0x0000}
0x2c3e34…2c3fc8 IdxSect {
0x2c3e34…2c3fc8 f00 = 0x00c2 // 0x2c3e34 @0x0
0x2c3e34…2c3fc8 f01 = 0x0010 // 0x2c3e36 @0x2
0x2c3e34…2c3fc8 gno = [ // 0x2c3e38 @0x4
0x2c3e34…2c3fc8 [0x00]: C0x00c2.0x2.0
0x2c3e34…2c3fc8 [0x01]: C0x00c3.0x0.0
0x2c3e34…2c3fc8 [0x02]: C0x00c3.0x1.0
0x2c3e34…2c3fc8 [0x03]: C0x00c3.0x2.0
0x2c3e34…2c3fc8 [0x04]: C0x00c5.0x1.0
0x2c3e34…2c3fc8 [0x05]: C0x00eb.0x0.0
0x2c3e34…2c3fc8 [0x06]: C0x00fc.0x1.0
0x2c3e34…2c3fc8 [0x07]: C0x00ff.0x1.0
0x2c3e34…2c3fc8 ]
0x2c3e34…2c3fc8 }
0x2c3fc8…2c415c Dummy {f00=0x00c2, f01=0x0190, f02=» P IDENT DKSUBS 03.01.XXX.1 P DDUM KMD08 & P PDIV D P ENTRY RAREAD Z P ENTRY RAWRIT p P ENTRY SQREAD P ENTRY SQWRIT P ENTRY ASSG P ENTRY RGREAD P ENTRY RADEL P ENTRY GETBIT P E
0x2c415c…2c42f0 Dummy {f00=0x00c2, f01=0x0190, f02=» P EXT SETDEB P EXT SPERR P EXT WRITJT * P EXT LAMPON > P INCLUDE EQUATE R 6 P************************************************** r P* 4 P* THIS MODULE CONTAINS ALL DISC HANDLING * P* ROUTINES: RANDOM
0x2c42f0…2c4484 Dummy {f00=0x00c2, f01=0x0190, f02=»OUTINE t * P* DISK ERROR ROUTINE < P* GET STATUS FROM EXTENDED STATUSWORD < 0 P* READ RECORD FROM REGSET | 6 P************************************************** P EJECT P*
0x2c4484…2c4618 Dummy {f00=0x00c2, f01=0x0190, f02=»A VOLUMENAME. x 2 P*-* IT TRIES ON ALL VOLUMES CONNECTED. " P* ON SPECIFIED VOLUME L P* r & P* ALTERED PARAMETERS: NONE | P* B P* ALTERED FIELDS: SPBINW4 - OK - DATASETNR NOK - 21 @ P*
0x2c4618…2c47ac Dummy {f00=0x00c2, f01=0x0190, f02=» - OK - VOLUMENAME NOK - X'00' p H P* GTWBCD1 - OK - N/A NOK - ATTEMPT+1 ( H P* GTWBCD2 - OK - N/A NOK - DATASETNR t P* P* C/R: OK - 0, NOK - 4 P* < P*-* CALL :
0x2c47ac…2c4940 Dummy {f00=0x00c2, f01=0x0190, f02=»************************************************* P* : P*-*ASSG PROC DK,DNR D $ P*-* MOVE SPBINW4,CBIN0 INITIATE ` P*-* MOVE GSWBIN1,CBIN1 " P*-* DSC0 DK,CLOSE CLOSE FIRST P* PASSG PROC VOL,DK,DNR P MOVE SPBINW4,CBIN0 IN
0x2c4940…2c4ad4 (2, 50) Dummy {f00=0x00c3, f01=0x018e, f02=»3,ASVOL P CBE GSWBCD3,=D'0',ASSGRET ( P MOVE GTWBCD1,ASVOL GET VOLUME NAME 2 ( P MOVE GTWBCD2,DNR GET DATASET NUMBER ^ ( P EDIT ASFNAME,FDFMT SET UP FILENAME P DSC0 DK,CLOSE CLOSE FIRST P* & P ASSIGN DK,0,SPBINW4,ASFNAME,ASVOL
0x2c4ad4…2c4c68 Dummy {f00=0x00c3, f01=0x0190, f02=» : P*-* CBNE CVOL(GSWBIN1),ASVOL,ASSG10 TRY ON NEW VOLUME PASSGERR B > P* ASSIGNMENT IMPOSSIBLE R 0 P MOVE GTWBCD1,SPBINW4 (MORE THEN 3 RETRIES) P MOVE SPBINW4,CBIN21 P MOVE GTWBCD2,DNR P MOVE GSWS
0x2c4c68…2c4dfc Dummy {f00=0x00c3, f01=0x0190, f02=» RET P PEND P* P* $ PFDFMT FRMT SET UP FILENAME . P FCOPY =C'FD' R & P FMEL '999PPP',GTWBCD1 VOLUME PART h & P FMEL '999',GTWBCD2 DATASET NUMBER P FMEND P* P* P EJECT 6 P****************************
0x2c4dfc…2c4f90 Dummy {f00=0x00c3, f01=0x0190, f02=»ER>,<LENGTH>,<RECNR> ^ P* RETURN: 0 P* CR=0 > OK CR = 4 NOK OK 0 P* d * P* IN CASE OF ERROR ERDK IS CALLED n : P* EXCLUSIVE ACCES IS RELEASED IF GTEXFLAG IS FALSE P* H P* ALTERED PARAMETERS: BUF OK
0x2c4f90…2c5124 Dummy {f00=0x00c3, f01=0x0190, f02=» SPBINW4 - OK - 0 NOK - ALTERED BY DISERRORROUTINE | & P* GTWBCD1 - 0 D P* n 8 P**************************************************** x 0 PRAREAD PROC DSET,$NR,BUF,LENG,RECNR P PLIT $NR : P MOVE
0x2c5124…2c52b8 Dummy {f00=0x00c3, f01=0x0190, f02=» RREAD DSET,BUF,GSWBIN1,RECNR READ RECORD 4 P BEOF RAR10 OK ? @ P BOK RAR10 x 2 P PERF ERDK,DSET,$NR NO PRAR10 & P TBT GTEXFLAG,RAR20 D P
0x2c52b8…2c544c Dummy {f00=0x00c3, f01=0x0190, f02=»BINW4 SET CR t P RET P PEND 6 P EJECT L > P********************************************************* d P* * P* DISC ERROR ROUTINE ERDK P* CALL: * P* PERF ERDK,<DAT
0x2c544c…2c55e0 Dummy {f00=0x00c3, f01=0x0190, f02=» THE ERRORCODE IS FOUND WITH ROUTINE GETBIT : P* AND THE TEXT IS DISPLAYED WITH SCREENPACKAGE 4 P* ENTRY SPERR r P* P* ALTERED PARAMETERS: NONE P* : P* ALTERED FIELDS: SPBINW4 - NO-DATA/NEW-VOL: 0, ELSE 2 * P*
0x2c55e0…2c5774 (2, 51) Dummy {f00=0x00c3, f01=0x0190, f02=»* B P************************************************************* PERDK PROC DSET,$NR P P PLIT $NR t $ P PERF GETBIT,DSET & P CBE GTWBCD1,=D'4',ERDKRET NO DATA & P CBE GTWBCD1,=D'8',ERDKRET NEW VOL D P
0x2c5774…2c5908 Dummy {f00=0x00c3, f01=0x0190, f02=» MOVE GSWSTR9,=C'DISCFEJL ' TEXT P TBF GTTTPFLG,ERDK10 0 $ P CLEAR SPKEYFLG NO KORKEY IF TTP L PERDK10 t < P PERF SPERR DISPLAY TEXT P SET SPKEYFLG P SET GTNWFLG P TBF GTTTPFLG,ERDK20 P
0x2c5908…2c5a9c Dummy {f00=0x00c3, f01=0x0190, f02=»NW4,CBIN0 PREPARE FOR OK PERDKEND " P CMP SPBINW4,CBIN0 SET CR 2 P RET V P PEND l P EJECT > P********************************************************** P* P* GETBIT P* CALL:
0x2c5a9c…2c5c30 Dummy {f00=0x00c3, f01=0x0190, f02=» RETURN: < P* THE BITNR IN GTWBCD1 UNDEFINED GTWBCD1=1 P* P P* ALTERED FIELDS: Z 2 P* GSWBIN1 - EXTENDED STATUSWORD t P* GTWBCD1 - 1 P* GSWBIN2 P* GSWBCD2
0x2c5c30…2c5dc4 Dummy {f00=0x00c3, f01=0x0190, f02=» V PGETBIT PROC DSET 6 P XSTAT DSET,GSWBIN1 GET STATUS $ : P MOVE GTWBCD1,=D'15' BIT NR IN BCD ^ : P MOVE GSWBIN2,CBIN1 BIT NR IN BIN > PGET10 CALL MASK,GSWBIN1,GSWBIN2 AND
0x2c5dc4…2c5f58 Dummy {f00=0x00c3, f01=0x0190, f02=» GSWBCD2,=D'2' NEXT BIT 6 P MOVE GSWBIN2,GSWBCD2 CONVERT * > P SUB GTWBCD1,=D'1' UPDATE BCD BITNR d : P CBG GTWBCD1,=D'1',GET10 NO BIT FOUND PGETRET P RET P
0x2c5f58…2c60ec Dummy {f00=0x00c3, f01=0x0190, f02=» x P* CALL: > P* PERF RAWRIT,<DATASET>,<SETNR>,<BUFFER>,<RECNR> P* > P* WRITES RECORD RANDOM AND PERFORMS THE NECESSARY f P* ERROR HANDLING P* RETURN ( P* CR=0 OK CR=4 NOT OK P
0x2c60ec…2c6280 Dummy {f00=0x00c3, f01=0x0190, f02=»******************************************** & PRAWRIT PROC DSET,$NR,BUF,RECNR 4 P PLIT $NR ^ " P MOVE SPBINW4,CBIN0 p P MOVE GSWBIN1,$NR P CBG GSWBIN1,CBIN2,RAW10 P TBT GTTESTFL,RAWRET PRAW10 P MOVE GSWBIN1,
0x2c6280…2c6414 (2, 52) Dummy {f00=0x00c3, f01=0x0190, f02=» X 4 P BEOF RAWRET OK? P BOK RAWRET @ " P PERF ERDK,DSET,$NR ` P CMP SPBINW4,CBIN0 SET CR=4 P RET PRAWRET 8 P CMP CBIN0,CBIN0 SET CR=0 P
0x2c6414…2c65a8 Dummy {f00=0x00c3, f01=0x0190, f02=»- RANDOM DELETE ROUTINE P* * P* CALL: PERF RADEL,<DATASET>,<RECNR> * P* X 4 P* THE ROUTINE DELETES ANY RECORD IN ANY DATASET b P* " P* ALTERED FIELDS: SPBINW4 - 0 " P* GSWBIN1 - 6 P* P* CR: OK -
0x2c65a8…2c673c Dummy {f00=0x00c3, f01=0x0190, f02=»NW4,CBIN0 P MOVE GSWBIN1,CBIN6 P TBT GTTESTFL,RADELRET . 0 P RREAD DSET,GSWSTR9,GSWBIN1,RECNR DUMMY READ L ( P DSC1 DSET,DEL,RECNR DELETE RECORD " P BEOF RADELRET IF EOF, RETURN P BOK RADELRET IF OK, RETURN . P PERF ERDK,DSET,=D
0x2c673c…2c68d0 Dummy {f00=0x00c3, f01=0x0190, f02=» P PEND P EJECT @ P*********************************************************** . P* r P* SEQ READ | P* CALL: < P* PERF SQREAD,<DSET>,<SETNR>,<BUFFER>,<LENGTH> B P* IF GTEXFLAG=FALSE
0x2c68d0…2c6a64 Dummy {f00=0x00c3, f01=0x0190, f02=» 0 P* GSWBIN4 - LENGTH FROM CALL P* 8 P**** RETURN: B 6 P* CR=0 OK CR=1 EOF CR=4 NOT OK V P* @ P*********************************************************** * PSQREAD PROC DSET,$NR,BUF,LENG
0x2c6a64…2c6bf8 Dummy {f00=0x00c3, f01=0x0190, f02=»BIN1 READ RECORD p 8 P BOK SQRRET OK & P BEOF SQR10 b 8 P PERF ERDK,DSET,$NR NO PSQRRET J P TBT GTEXFLAG,SQR05 RELEAS
0x2c6bf8…2c6d8c Dummy {f00=0x00c3, f01=0x0190, f02=» SET CR h PSQR10 P RET ( P PEND > P EJECT T @ P*********************************************************** l P* P* SEQ WRITE P* CALL: 0 P* PERF SQWRIT,<DSET>,
0x2c6d8c…2c6f20 Dummy {f00=0x00c3, f01=0x0190, f02=»0 t P* @ P*********************************************************** $ PSQWRIT PROC DSET,$NR,BUF X P PLIT $NR P MOVE SPBINW4,CBIN0 P TBT GTTESTFL,SQWRET > P WRITE DSET,BUF WRITE RECORD
0x2c6f20…2c70b4 (2, 53) Dummy {f00=0x00c5, f01=0x0190, f02=»ERDK,DSET,$NR NO | PSQWRET $ 8 P CMP SPBINW4,CBIN0 SET CR 2 PSQW10 n 8 P RET RETURN | P PEND P EJECT * PBACKUP PROC DSET,$DNR,FDSIZE,BUF,$LENG
0x2c70b4…2c7248 Dummy {f00=0x00c5, f01=0x0190, f02=» P* CALL: P* > P* PERF BACKUP,<DSET>,<$DSET-NR>,<NO-OF-RECORDS>, * 2 P* <BUFFER>,<$RECORD-SIZE> l P* P******************** P CLEAR CERRORFL P SET CPFLG RESERVE DISK * P MOVE GS
0x2c7248…2c73dc Dummy {f00=0x00c5, f01=0x0190, f02=» MOVE GSWBIN3,$DNR ASSIGN BACKUP FILE " P PERF ASSG,CBIN3,DK02,GSWBIN3 . P BNOK BKUPNOK T P B BKUP60 j P* | PBKUP50 P LOAD CASSETT P MOVE GSWBIN1,CBIN1 P DSC1 KCASS,LOAD,GSWBIN1 P WRITE TAPE MARK P DSC0
0x2c73dc…2c7570 Dummy {f00=0x00c5, f01=0x0190, f02=»BG GSWBIN3,FDSIZE,BKUPOK FINISH? P MOVE GSWBIN1,$LENG ! ( . P PERF RAREAD,DSET,$DNR,BUF,GSWBIN1,GSWBIN3 ! D P BNOK BKUP200 NOT OK ! v P* ! & P CBE GTWBCD1,=D'4',BKUP210 NO DATA ! P TBT CKASFLG,BKUP150 ! . P PERF RAWRIT,DK02,$DNR,BUF,GSWBIN3 ON
0x2c7570…2c7704 Dummy {f00=0x00c5, f01=0x0190, f02=» ! r P BOK BKUP100 " P B BKUPNOK " P* " . PBKUP200 ERROR " 8 P PERF LAMPON,=W'2' LAMP 10 " P P SET CERRORFL INDICATE ERROR " r PBKUP210 " P TBT CKASFLG,BKUP220 " * P PERF RADEL,DK02,GSWBIN3 DELETE RECORD " P B BKUP100 " PBKUP22
0x2c7704…2c7898 Dummy {f00=0x00c5, f01=0x018e, f02=» DSC0 DK02,CLOSE " P B BKUP310 # PBKUP300 # * P DSC0 KCASS,WTM # : P DSC0 KCASS,WTM # R P DSC0 KCASS,UNLOD # j PBKUP310 # P CLEAR CPFLG # P CMP CBIN0,CBIN0 OK # P RET # P* # PBKUPNOK # P PERF LAMPON,=W'2' LAMP 10 #
0x2c7898…2c7a2c Dummy {f00=0x00c5, f01=0x0190, f02=» P DSC0 KCASS,UNLOD $ PBKUP360 $ P CLEAR CERRORFL $ . P CLEAR CPFLG $ F P CMP CBIN1,CBIN0 $ Z P RET $ r P PEND $ ~ P EJECT $ * PRSTORE PROC DSET,$DNR,FDSIZE,BUF,$LENG $ P PLIT $DNR $ P PLIT $LENG $ P******************** $
0x2c7a2c…2c7bc0 Dummy {f00=0x00c5, f01=0x0190, f02=»,<DSET>,<$DSET-NO>,<NO-OF-RECORDS>, $ z 2 P* <BUFFER>,<$RECORD-SIZE> % , P* % b P******************** % l P CLEAR CERRORFL % P SET CPFLG RESERVE DISK % * P MOVE GSWBIN3,$DNR ASSIGN SYSTEM FILE % " P PERF ASSG,CBIN1,DSET,GSWB
0x2c7bc0…2c7d54 (2, 54) Dummy {f00=0x00eb, f01=0x0190, f02=»GSWBIN3 % z P BNOK RSTRNOK & P B RSTR60 & & PRSTR50 & 8 P BACKUP FILE, CASSETTE & F P LOAD CASSETTE & f P MOVE GSWBIN1,CBIN1 & ~ P DSC1 KCASS,LOAD,GSWBIN1 & P READ FIRST TAPE MARK & P MOVE GSWBIN1,$LENG & * P PERF SQREAD,KCASS
0x2c7d54…2c7ee8 Dummy {f00=0x00eb, f01=0x0190, f02=» & P CBG GSWBIN3,FDSIZE,RSTROK FINISH? ' P MOVE GSWBIN1,$LENG ' . P TBT CKASFLG,RSTR150 ' J . P PERF RAREAD,DK02,$DNR,BUF,GSWBIN1,GSWBIN3 ' f P BNOK RSTR200 ' & P CBE GTWBCD1,=D'4',RSTR210 NO DATA ' P B RSTR160 ' PRSTR150 ' * P PERF SQREAD,K
0x2c7ee8…2c807c Dummy {f00=0x00eb, f01=0x0190, f02=» ' n P BOK RSTR100 ( P* ( PRSTR200 ( & P SET CERRORFL ( 6 P PERF LAMPON,=W'2' LAMP 10 ( L PRSTR210 ( n * P PERF RADEL,DSET,GSWBIN3 DELETE RECORD ( ~ P ADD GSWBIN3,CBIN1 ( P CBNG GSWBIN3,FDSIZE,RSTR210 ( P TBT CERRORFL,RSTRNOK ( P
0x2c807c…2c8210 Dummy {f00=0x00eb, f01=0x0190, f02=»RSTR300 ( 2 P DSC0 KCASS,UNLOD CLOSE BACKUP FILE, CASSETTE ) PRSTR310 ) F P CLEAR CERRORFL ) V P CLEAR CPFLG ) n P CMP CBIN0,CBIN0 OK ) P RET ) P* ) PRSTRNOK ) P PERF LAMPON,=W'2' LAMP 10 ) P TBT CKASFLG,RSTR350 ) , P DSC0
0x2c8210…2c83a4 Dummy {f00=0x00eb, f01=0x0190, f02=» PRSTR360 * P CLEAR CERRORFL * P CLEAR CPFLG * , P CMP CBIN0,CBIN1 * @ P RET * X P PEND * d P EJECT * r PRGREAD PROC DSET,$DNR * P PLIT $DNR * P******************** * P* * 0 P* RGREAD - READ RECORD FROM REGSET * 8
0x2c83a4…2c8538 Dummy {f00=0x00eb, f01=0x0190, f02=» $ P* OTHER FIELDS UPDATED: + @ P* GTREGNR, GTDKBCD, GTDBKRC, TTDKDEX, TTDBKRM, + , P* GTREGDEX + p , P* GSWBCD3 = LOG. RECORD NR + P* + 2 P* CR=0 CORRECT TRANS, INCL TR 12 + 6 P*
0x2c8538…2c86cc Dummy {f00=0x00eb, f01=0x018e, f02=»**** + PRGR000 , & P TBF CPFLG,RGR001 DISK OCCUPIED? , P DELAY CBIN2 WAIT 200 MSEC , D P B RGR000 TRY ONCE MORE , h PRGR001 , P SET CPFLG RESERVE DISK , P TBT CWFLAG,RGR005 , & P MOVE GTRECNR,CRECNR IN KOLDSTART , PRGR005 , P
0x2c86cc…2c8860 Dummy {f00=0x00eb, f01=0x0190, f02=» P MOVE GSWBIN1,=W'128' - 2 P PERF RAREAD,DSET,$DNR,CPCKBUF,GSWBIN1,GTRECNR - " P BNOK RGRRET2 - X P CMP GTWBCD1,=D'4' - n P BE RGRRET2 - P MOVE GSWSTR20,CBLANKS - . P COPY GSWSTR20,CBIN0,CBIN3,CPCKBUF,CBIN13 - 0 P CBE GSWSTR20,=C'&01',RGR008
0x2c8860…2c89f4 (2, 55) Dummy {f00=0x00fc, f01=0x0190, f02=» COPY GSWSTR20,CBIN0,CBIN3,CPCKBUF,CBIN0 - " P MOVE GSWBCD5,GSWSTR20 CONVERT . 0 P CMP GTMSK,GSWBCD5 . V P BNE RGRRET2 . p P* . * P MOVE GSWSTR20,=X'00' CHECK TRANSTYPE . . P COPY GSWSTR20,CBIN0,CBIN2,CPCKBUF,CBIN11 . P MOVE GSWBCD5,GSWSTR20 .
0x2c89f4…2c8b88 Dummy {f00=0x00fc, f01=0x018e, f02=»D5,=D'11' IF TRANS 11 . P BE RGRRET1 / P* / 2 $ P MOVE GTREGNR,GSWBCD5 TRANSTYPE / < P CMP GTREGNR,=D'12' / d P BNL RGRRET / , P MOVE GTREGDEX,CBIN0 GET TRANSTYPE INDEX / PRGR010 / P ADD GTREGDEX,CBIN1 / 2 P CBE GTREGNR,CREGTAB(GTREG
0x2c8b88…2c8d1c Dummy {f00=0x00fc, f01=0x0190, f02=» / x P MOVE GSWBIN6,CBIN2 0 P MOVE GSWBIN5,CRECLGD 0 $ PRGR030 0 B P TEST CEORFLG 0 P P BNE RGRRET BRANCH IF TRUE 0 f P MOVE GSWSTR1,=C'&' 0 P SUB GSWBIN6,CBIN2 0 6 P MATCH CPCKBUF,GSWBIN6,GSWBIN5,GSWSTR1,CBIN0,CBIN1 0 P ADD GSWBIN6,CBI
0x2c8d1c…2c8eb0 Dummy {f00=0x00fc, f01=0x0190, f02=»PCKBUF,GSWBIN6,GSWBIN5,GSWSTR1,CBIN0,CBIN1 0 P FIND LENGTH FIELD 1 2 P BNE RGR100 LAST FIELD 1 N PRGR035 1 l P MOVE GSWBIN3,GSWBIN6 1 z * P SUB GSWBIN3,GSWBIN4 LENGTH IN GSWBIN3 1 6 P COPY GSWSTR2,CBIN0,CBIN2,CPCKBUF,GSWBIN4 FIELDNR 1 P ADD GSW
0x2c8eb0…2c9044 Dummy {f00=0x00fc, f01=0x0190, f02=»LD NR IS IN GSWSTR2 1 & P AND FIELD CONTENTS IN GSWSTR20 2 P ADJUST POINTERS 2 F P ADD GSWBIN6,CBIN1 2 ` P SUB GSWBIN5,GSWBIN3 2 z P SUB GSWBIN5,CBIN3 2 " P MOVE GSWBCD5,GSWSTR2 FIELDNR 2 " P MOVE GSWBIN3,GSWBCD5 CONVERT 2 P CMP GSWBIN3
0x2c9044…2c91d8 Dummy {f00=0x00fc, f01=0x0190, f02=»,RGR036 ARKIV.KNT.NO. 2 | $ P TBT CWFLAG,RGR030 NOT KOLDSTART 3 PRGR036 3 F " P UPDATE GTDUPF,GTREGF,GTUSED 3 T 2 P MOVE GSWBIN4,CFLTDEX(GSWBIN3) GSWBIN3=FIELDNR 3 z " P MOVE GTUSED(GSWBIN4),GSWBIN3 3 " P MOVE GTDUPF(GSWBIN4),GSWSTR20 3 " P MOVE GTREGF
0x2c91d8…2c936c Dummy {f00=0x00fc, f01=0x0190, f02=»WSTR2,=C'-' 3 6 P MATCH GSWSTR20,GSWBIN3,CBIN20,GSWSTR2,CBIN0,CBIN1 4 P BNE RGR040 4 N P MUL GTUSED(GSWBIN4),=W'-1' 4 b P MUL GTDUPF(GSWBIN4),=D'-1' 4 P MUL GTREGF(GSWBIN4),=D'-1' 4 P B RGR030 4 PRGR040 4 P MOVE GSWBIN3,CBIN0 4 6
0x2c936c…2c9500 Dummy {f00=0x00fc, f01=0x0190, f02=»R060 SET D/K INFO 4 " P MOVE GSWBIN3,GTDUPF(GSWBIN4) 5 P PERFI GSWBIN3,SETKRE,SETDEB 5 B P B RGR030 5 f PRGR100 5 x P END OF RECORD 5 P MOVE GSWSTR2,=X'7F' 5 " P MOVE GSWBIN6,GSWBIN4 RESTORE 5 6 P MATCH CPCKBUF,GSWBIN6,GSWBIN5,GSWSTR2,C
0x2c9500…2c9694 (2, 56) Dummy {f00=0x00ff, f01=0x0190, f02=»E GSWBIN6,GSWBIN4 5 6 P MATCH CPCKBUF,GSWBIN6,GSWBIN5,GSWSTR2,CBIN0,CBIN1 6 P BNE RGRRET2 6 T P DLETE CPCKBUF,CBIN0,GSWBIN4 6 h P MOVE GSWSTR20,CPCKBUF 6 P ADD CTWBIN1,CBIN1 6 P TBT CWFLAG,RGR113 6 P ADD CRECNR,CBIN1 KOLDSTART 6 PRGR113
0x2c9694…2c9828 Dummy {f00=0x00ff, f01=0x0190, f02=» P DELETE HEADER 7 P DLETE CPCKBUF,CBIN0,CBIN11 7 * P MOVE GSWBIN6,CBIN0 INSERT SAVED INFO 7 @ P MOVE GSWSTR2,CBLANKS 7 n P CBE CRECLGD,=W'128',RGR115 7 P MOVE GSWSTR2,=X'00' 7 PRGR115 7 6 P MATCH GSWSTR20,GSWBIN6,CBIN19,GSWSTR2,CBIN0,C
0x2c9828…2c99bc Dummy {f00=0x00ff, f01=0x0190, f02=» UPDATE LOG. REC. NO 7 ~ P B RGR032 8 PRGR200 8 . P MOVE GTLBNR,GSWSTR20 8 < P TBT CWFLAG,RGR205 8 Z $ P MOVE TTLBNR,GTLBNR IN KOLDSTART 8 t PRGR205 8 P B RGR030 8 PRGR210 8 P TBT CWFLAG,RGR220 8 & P MOVE GTDATO,GSWSTR20 IF COLDSTART 8
0x2c99bc…2c9b50 Dummy {f00=0x00ff, f01=0x4140, f02=» OK 8 v P RET 9 PRGRRET1 9 P CLEAR CPFLG DISK FREE 9 ( P SET GTSWFLAG 9 H P CMP CBIN1,CBIN0 CR=1, TR=11 9 ^ P RET 9 PRGRRET 9 P CLEAR CPFLG DISK FREE 9 P SET TTEORFLG 9 P CLEAR GTSWFLAG 9 P CMP CBIN0,CBIN0 CR=0, OK 9
0x2c9b50…2c9ce4 Dummy {f00=0x00ff, f01=0x2008, f02=» : PERF ERDK,DSET,$NR NO PSQWRET 6 8 P CMP SPBINW4,CBIN0 SET CR D PSQW10 8 P RET RETURN P PEND P EJECT P END
0x2c9ce4…2c9e78 Dummy {f00=0x00ff, f01=0x0190, f02=»T Y _ N _ B U C Q C DK K K0KBK M M K X X * $" ~_> @ Y X * JH_R X !@XX y X # x V y X X * S P P 1 _ 1 L X * J, X X * $" X D % " X # X * S y _< X # X * y S X 1 1 X !@T X
0x2c9e78…2ca00c Dummy {f00=0x00ff, f01=0x0190, f02=» C y X C C X ( x Tf B M 9 R 9 M| X ! T N _` y C Q " T SD S X ! Nf X X ! x Y Y _ X "@P B R y C B P 9 V N _F9 VV X ! T X !@X y C _d y C C X !? x P Q( B
0x2ca00c…2ca1a0 Dummy {f00=0x00ff, f01=0x0190, f02=» @ Y c C y XR X x S Nf L x X X # S _ B N2 C R : + SD X S S ( J j& ( V [r : B Nv C _J + . [ X 9 V ! P @ Y j� { Y Y . X ! { : i j& N j& N
0x2ca1a0…2ca334 (2, 57) Opaque[0x194]
0x2ca334…2ca4c8 # DirEnt {nam=»EQULST«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x18e8, f03=0x0000}
0x2ca334…2ca4c8 IdxSect {
0x2ca334…2ca4c8 f00 = 0x00c7 // 0x2ca334 @0x0
0x2ca334…2ca4c8 f01 = 0x0002 // 0x2ca336 @0x2
0x2ca334…2ca4c8 gno = [ // 0x2ca338 @0x4
0x2ca334…2ca4c8 [0x00]: C0x00c7.0x1.0
0x2ca334…2ca4c8 ]
0x2ca334…2ca4c8 }
0x2ca4c8…2ca65c Dummy {f00=0x00c7, f01=0x4068, f02=» IDENT EQULST DDUM KMD08 PDIV . INCLUDE EQUATE,LIST < END X@ d
0x2ca65c…2ca7f0 Dummy {f00=0x00c7, f01=0x2008, f02=» NT EQULST DDUM KMD08 PDIV . INCLUDE EQUATE,LIST < END X@ d
0x2ca7f0…2ca984 Dummy {f00=0x00c7, f01=0x0190, f02=»MPTY COMP. FIELD FOUND 4 P MOVE SPBINW2,='3' INDICATE ENTER KEY DEPRESSED P RET V P* b " P* EMPTY COMPULSORY FIELD FOUND l P* PKENT10 6 P GETFLD 0,SPBINW3,SPBINW2 GET THE COMPULSORY FIELD P* P EJECT PERRPRT *
0x2ca984…2cab18 Dummy {f00=0x00c7, f01=0x0190, f02=»C ALARME t 0 P CBE SPBINW4,='0',CNDTAB JUMP IF NO PRINTOUT ( P MOVE SPBINW3,=X'1801' ROW 24 COL. 1 D 2 P DSC1 SPDSSCRN,6,SPBINW3 SET CURSOR ON ROW 24 p P* : P* WRITING FROM SPFTBERR SHOULD BE INSERTED HERE LATER P* $ P****************
0x2cab18…2cacac Dummy {f00=0x00c7, f01=0x0190, f02=»***** v P* P* READ AFTER ERROR P* 2 PERREAD < ( P SETCUR SET CURSOR AT THE BEGINNING J P OF THE CURRENT FIELD v PERR100 * P MOVE SPBINW3,=W'14' REQUESTED LENGTH 6 P NKIA .NE,SPDSDYKB,SPINPUT,SPKTAB1,SPBINW3,SPBINW2
0x2cacac…2cae40 Dummy {f00=0x00c7, f01=0x0190, f02=»ERRCONT,ERRCONT P B ERR100 CONTINUE P* 2 P* CLEAR ERROR PRINTOUT < P* Z PERRCONT d * P MOVE SPBINW3,='24' INDICATE LAST LINE t , P ERASE 0,SPBINW3,SPBINW3 ERASE LAST LINE P IB SPBINW2,DUMMY,CLER,CLER 0 P SUB SPBINW2,='3'
0x2cae40…2cafd4 (2, 58) Opaque[0x194]
0x2cafd4…2cb168 # DirEnt {nam=»CONNJ «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x18f0, f03=0x0000}
0x2cafd4…2cb168 IdxSect {
0x2cafd4…2cb168 f00 = 0x00c7 // 0x2cafd4 @0x0
0x2cafd4…2cb168 f01 = 0x0002 // 0x2cafd6 @0x2
0x2cafd4…2cb168 gno = [ // 0x2cafd8 @0x4
0x2cafd4…2cb168 [0x00]: C0x00c7.0x2.0
0x2cafd4…2cb168 ]
0x2cafd4…2cb168 }
0x2cb168…2cb2fc Dummy {f00=0x00c7, f01=0x018e, f02=» T; P01; TID=TC; TCL=TC; * LEV=60; : 01; J PTDC=T01; V PLC=01L; f P01; v PSCL=S04; PT; P03; TID=KA; TCL=KA; LEV=60; 01; TDC=T03; PLC=01L; P03;
0x2cb2fc…2cb490 Dummy {f00=0x00c7, f01=0x011a, f02=» TDC=T04; PLC=02L; P03; $ PSCL=S02; 0 PSCL=S03; @ PSCL=S04; P T; ` 01; j TID=D0; v TCL=D0; LEV=60; 00; P00; PC; P00; P01; PSCL=S01; U; 001; TB
0x2cb490…2cb624 Dummy {f00=0x00c7, f01=0x2008, f02=» T04; PLC=02L; P03; $ PSCL=S02; 0 PSCL=S03; @ PSCL=S04; P T; ` 01; j TID=D0; v TCL=D0; LEV=60; 00; P00; PC; P00; P01; PSCL=S01; U; 001; TB
0x2cb624…2cb7b8 Dummy {f00=0x00c7, f01=0x018e, f02=»','26','26','26','26', 61-70 C t @ P '26','26','26','26','26','26','26','26','26','26', 71-80 C & > P '19','26','26','26','26','26','26','26','26','26' 81-90 j PCCNTDEX BINI (11), C 2 P '1','2','3','4','5','1','5','6','6','5','0' P EJECT
0x2cb7b8…2cb94c Dummy {f00=0x00c7, f01=0x0190, f02=» PCMAXLIN BIN W'54' PCMINLIN BIN W'2' PCCONBUF0 STRG 398X'FF' 6 PCCONBUF1 STRG 398X'FF' T PCCONBUF2 STRG 398X'FF' r PCCONBUF3 STRG 398X'FF' PCCONBUF4 STRG 398X'FF' PCCONBUF5 STRG 398X'FF' PCCONBUF6 STRG 398X'FF' P
0x2cb94c…2cbae0 Dummy {f00=0x00c7, f01=0x018e, f02=»C ^ $ P 'TI','TJ','TK','TL','TM','TN' P* 2 P EJECT < PCB4 BLK J P* Z P* d P* n P* x P* PCMAXTASK BIN NO OF TASKS " PCTASKNR BIN NO. OF 0PEN TASKS PCRECLGD BIN W'128' $ PCRECNR BIN PHYSICAL RECOR
0x2cbae0…2cbc74 (2, 59) Opaque[0x194]
0x2cbc74…2cbe08 # DirEnt {nam=»KM080 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x18f8, f03=0x0000}
0x2cbc74…2cbe08 IdxSect {
0x2cbc74…2cbe08 f00 = 0x00c7 // 0x2cbc74 @0x0
0x2cbc74…2cbe08 f01 = 0x0002 // 0x2cbc76 @0x2
0x2cbc74…2cbe08 gno = [ // 0x2cbc78 @0x4
0x2cbc74…2cbe08 [0x00]: C0x00c7.0x3.0
0x2cbc74…2cbe08 ]
0x2cbc74…2cbe08 }
0x2cbe08…2cbf9c Dummy {f00=0x00c7, f01=0x0190, f02=» PMES NJ-AMT - S PSCR PLED KMD08,/S * P!!DL 50 FD BACKUP > P!!DL 51 DK05 X P!!DL 52,54 DK06-DK08 l P!!DL 55,56 FD03,FD04 P!!DL 169 0 PMF1KBV STRG 32X'C1C2C3C4C5C6C750' DEV. ADR. P!!RE 173,$$6040$$6C4C$$ P
0x2cbf9c…2cc130 Dummy {f00=0x00c7, f01=0x0190, f02=»$$ BKO z ( P!!RE 188,$$FALSE$$TRUE$$ SALDO KORT * P!!RE 194,$$TRUE$$FALSE$$ NO AUTO-KORT : P!!RE 195,$$FALSE$$TRUE$$ DC h P!!RE 199,$$TRUE$$FALSE$$ P!!RE 301,$$128$$80$$ P!!RE 309,$$OD-KOM$$NJ-AMT$$ 2 P!!RE 310,$$01014610$$%VER%RE
0x2cc130…2cc2c4 Dummy {f00=0x00c7, f01=0x0190, f02=»T LINE v P!!EN PNOD C PTRA /S,NL ( PINC DIVFMT : PINC RGADM L PNOD R ^ PINC RGSUBS l PINC KMDIO ~ PINC RGSUB3 PNOD R PINC SCREEN PINC SUBAPL PNOD R PINC RGFRMT PNOD R PINC KT
0x2cc2c4…2cc458 Dummy {f00=0x00c7, f01=0x0116, f02=»R PINC RGSTRT PASG 2,LP0F PTLK U,4K . PINC PRT > PINC VDUPRT N PINC START ` PINC TB3270 r P$INCGEN LKE M PKPF /L,RGLOAD PSCR D PMES $PDISC M=MUKDCN,MU=MON:POOL,A=RGLOAD,C=CONNJT,COUT=$CONF:01
0x2cc458…2cc5ec Dummy {f00=0x00c7, f01=0x2008, f02=» PINC RGSTRT PASG 2,LP0F PTLK U,4K . PINC PRT > PINC VDUPRT N PINC START ` PINC TB3270 r P$INCGEN LKE M PKPF /L,RGLOAD PSCR D PMES $PDISC M=MUKDCN,MU=MON:POOL,A=RGLOAD,C=CONNJT,COUT=$CONF:01
0x2cc5ec…2cc780 Dummy {f00=0x00c7, f01=0x0190, f02=»8 8 I # W % W O O x ? ! ! ! ? W A A ? @ ) A ) ! j! f b N L + " :hN b N ) , Lb N ! q % ! r W ! s W I ? ?%! ! ?% b b b b b b
0x2cc780…2cc914 (2, 60) Opaque[0x194]
0x2cc914…2ccaa8 # DirEnt {nam=»SCREEN«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1940, f03=0x0000}
0x2cc914…2ccaa8 IdxSect {
0x2cc914…2ccaa8 f00 = 0x00ca // 0x2cc914 @0x0
0x2cc914…2ccaa8 f01 = 0x000c // 0x2cc916 @0x2
0x2cc914…2ccaa8 gno = [ // 0x2cc918 @0x4
0x2cc914…2ccaa8 [0x00]: C0x00ca.0x0.0
0x2cc914…2ccaa8 [0x01]: C0x0104.0x0.0
0x2cc914…2ccaa8 [0x02]: C0x0104.0x2.0
0x2cc914…2ccaa8 [0x03]: C0x0104.0x3.0
0x2cc914…2ccaa8 [0x04]: C0x0106.0x1.0
0x2cc914…2ccaa8 [0x05]: C0x0107.0x0.0
0x2cc914…2ccaa8 ]
0x2cc914…2ccaa8 }
0x2ccaa8…2ccc3c Dummy {f00=0x00ca, f01=0x0190, f02=» P IDENT SCREEN 03.01.XXX.1 P 1.1,78-04-20,870138040310 & P* J , P* A STANDARD PROGRAM PACKAGE HANDLING T 0 P* A COMPLETE PICTURE ON A DISPLAY SCREEN P* ( P* RUNNING UNDER: CREDIT REL 3.1 ( P* TOSS
0x2ccc3c…2ccdd0 Dummy {f00=0x00ca, f01=0x0190, f02=»EAR SOME VARIABLE FIELDS * P ENTRY SPCLRN CLEAR NO VARIABLE FIELDS ( P ENTRY SPERR DISPLAY ERROR PRINTOUT N P AND CONTINUE HANDLING z $ P ENTRY SPLIN8 MESSAGE ON LINE 8 P ENTRY SPCA AS SPCLRA-- P ENTRY SPCN AS SPCLRN-- $ P SPC
0x2ccdd0…2ccf64 Dummy {f00=0x00ca, f01=0x0190, f02=»N ON LINE 1 x ( P ENTRY SPINF8 INFORMATION ON LINE 8 P ENTRY BELL @ P* T , P EXT SPCHK1 STANDARD CHECK ROUTINE NO. 1 ^ , P EXT SPCHK2 STANDARD CHECK ROUTINE NO. 2 , P EXT SPCHK3 STANDARD CHECK ROUTINE NO. 3 , P EXT SPCHK4 STANDARD CHECK
0x2ccf64…2cd0f8 Dummy {f00=0x00ca, f01=0x0190, f02=»RD CHECK ROUTINE NO. 7 ~ & P EXT SPAPPL USER ROUTINE TO HANDLE P APPL VALUES H ( P EXT SPTCHK USER ROUTINE TO EVALUATE ^ P CONDITIONAL TABULATION P* . P EXT EMPTYT ASSEMBLY SUBROUTINE EMPTYT - " P TEST IF DATA ITEM IS EMPTY
0x2cd0f8…2cd28c Dummy {f00=0x00ca, f01=0x0190, f02=»N FORMATS p P INCLUDE SL461,LIST P . PSPCLRA PROC 6 P* J D P* SPCLRA - CLEAR ALL VARABLE FIELDS BEFORE HANDLING THE PICTURE T P* P MOVE SPERASE,=W'0' & P MOVE SPLINTOP,=W'1' WHOLE SCREEN P MOVE SPLINLOW,=W'0' P
0x2cd28c…2cd420 Dummy {f00=0x00ca, f01=0x0190, f02=»THE PICTURE Z P* P MOVE SPERASE,=W'0' & P MOVE SPLINTOP,=W'1' WHOLE SCREEN : P MOVE SPLINLOW,=W'0' d P PERF SCREEN,=W'2' P RET P PEND PSPCLRN PROC P* D P* SPCLRN - CLEAR NO VARIABLE FIELDS BEFORE HANDLING TH
0x2cd420…2cd5b4 (2, 61) Dummy {f00=0x0104, f01=0x018e, f02=»EN,=W'3' P RET P PEND PSPERR PROC * P* < 0 P* HANDLE ERRORS DETECTED OUTSIDE THE PACKAGE F P* z P PERF SCREEN,=W'0' P RET P PEND PSPCA PROC P* D P* SPCA - AS SPCLRA, BUT ONLY BETWEEN LINES SPLINTOPA
0x2cd5b4…2cd748 Dummy {f00=0x0104, f01=0x0190, f02=» D P* SPCN - AS SPCLRN, BUT ONLY BETWEEN LINES SPLINTOP AND SPLINLOW P* L P MOVE SPERASE,=W'4' V P PERF SCREEN,=W'3' r P RET P PEND P PSCREEN PROC $OPT P* $ P* SCREEN SCREEN HANDLING MODULE P* P* CALL
0x2cd748…2cd8dc Dummy {f00=0x0104, f01=0x0190, f02=»$OPT MOVE TO VARIABLE " P TO ALLOW INSTR.S CMP AND IB & P CMP SPBINW2,='0' "SPERR" ENTRY ? D P BE ERRPRINT YES ! n P . P TBT SPPROMPT,ENTIRE JUMP IF ENTIRE FORMAT P SHOULD BE DISPLAYED P* P* ONLY VARIABLE FIELDS
0x2cd8dc…2cda70 Dummy {f00=0x0104, f01=0x0190, f02=»FROM 1 AND UP j P THOME P B CONT $ P* 4 PCLEARS > 8 P ERASE 5,SPLINTOP,SPLINLOW ERASE SOME FROM 1 AND UP L P B CONT P P* P* DISPLAY ENTIRE FORMAT P* PENTIRE 8 P IB SPBINW2,ECLRA,ECLRS,ECLRN JUMP O
0x2cda70…2cdc04 Dummy {f00=0x0104, f01=0x0190, f02=» IN MEMORY P B ECLRN P* $ P* CLEAR SOME VARIABLES . P* P PECLRS Z 6 P ERASE 6,SPLINTOP,SPLINLOW CLEAR SOME FIELDS FROM h P 1 AND UP IN MEMORY P* & P* CLEAR NO VARIABLES IN MEMORY P* PECLRN
0x2cdc04…2cdd98 Dummy {f00=0x0104, f01=0x0190, f02=»P,SPLINLOW ~ P B CONT PECLRN2 " P DISPLAY 2,SPLINTOP,SPLINLOW 0 P B CONT T PECLRN3 d P DISPLAY 3,SPLINTOP,SPLINLOW r P B CONT PECLRN4 P DISPLAY 4,SPLINTOP,SPLINLOW P B CONT P PCONT & P GETABX SP
0x2cdd98…2cdf2c Dummy {f00=0x0104, f01=0x0190, f02=»ION b P BZ SETCREAD JUMP IF FOUND " P BL KTHOME POSITION NOT FOUND . P* T P* COMPULSORY FIELD FOUND ^ P* & P MOVE SPBINW4,SPBINW3 CHANGE INDEX P B CONT5 SEARCH AGAIN P* P P* & P* SET CURSOR AND READ
0x2cdf2c…2ce0c0 Dummy {f00=0x0104, f01=0x018e, f02=»DISPLAY r P* PREADIN P* SET FLAG IF AUTODUP ( P* USES VERIF-FIELD J P MOVE SPBINW2,=W'3' h P MOVE SPBINW1,=W'1' P TSTCTL 6 P BOK DYKIN P SET GTADUPFL P B DYK20 P* PDYKIN P IB SP
0x2ce0c0…2ce254 (2, 62) Dummy {f00=0x0104, f01=0x0190, f02=» PDYK10 0 P DYKI SPINPUT,SPKTAB12,SPKTAB22,SPBINW1, C P SPBINW2,SPBINW4 F P B DYKOUT ` PDYK15 r 0 P DYKI SPINPUT,SPKTAB13,SPKTAB23,SPBINW1, C P SPBINW2,SPBINW4 PDYKOUT P BL ERRPRT ERROR P CLEAR SPDUPL 2
0x2ce254…2ce3e8 Dummy {f00=0x0104, f01=0x0190, f02=»UPD300,CLEA20 JUMP ON C P UPDATE,CANC,CANC, C . P UPDATE,UPDATE,UPDATE,UPDATE CONVERTED C > 4 P UPDATE,UPDATE,UPDATE,UPDATE END-OF-ITEM-KEY C p P UPDATE,KDUPL,KEDIT P P* 4 P* HANDLE THE RESPECTIVE KEY AS EOI-KEY FIRST
0x2ce3e8…2ce57c Dummy {f00=0x0104, f01=0x0190, f02=»W4,='0',UPD050 JUMP IF NOT STANDARD CHECK * P PERFI SPBINW4,SPCHK1,SPCHK2,SPCHK3 C 2 " P SPCHK4,SPCHK5,SPCHK6,SPCHK7 ` & P IB SPBINW3,UPD050,UPD070,ERRPRINT P* P* CONDITIONAL DISPLAYING P* PUPD050 P TBT SPDUPL,UPD100
0x2ce57c…2ce710 Dummy {f00=0x0104, f01=0x0190, f02=»BINW3,='0',UPD210 JUMP IF APPL VALUE P B SETCREAD , P* @ " P* UNCONDITIONAL DISPLAYING J P* p PUPD100 z 6 P MOVE SPBINW4,='2' INDICATE UNCONDITIONAL DISPLAY PUPD200 $ P GETCTL 0,SPBINW3 GET APPL-VALUE 2 P CBE SPBINW3,='0
0x2ce710…2ce8a4 Dummy {f00=0x0104, f01=0x0190, f02=» IB SPBINW3,UPD400,SETCREAD,ERRPRINT P B UPD400 , P* > P* OK AFTER APPL CONTROL H " P* UNCONDITIONAL DISPLAYING j P* PUPD260 2 P UPDFLD 1,SPINPUT UPDATE FIELD WITH DISPLAYING PUPD300 4 P CBE SPBINW1,='0',UPD350 SKI
0x2ce8a4…2cea38 Dummy {f00=0x0104, f01=0x0190, f02=»D360 * P MOVE SPBINW1,SPBINW2 STORE KEY VALUE $ P MOVE SPBINW4,=W'26' SET MESSAGE : P PERF SPERR b ( P CBNE SPBINW2,CBIN2,UPD360 KOR-KEY ? v , P MOVE SPBINW2,SPBINW1 RESET OLD KEYVALUE PUPD360 $ P* JUMP ON FUNCTION KEY INDEX P
0x2cea38…2cebcc Dummy {f00=0x0104, f01=0x0190, f02=»KCOPY,DUMMY,DUMMY,KENTER , P SUB SPBINW2,=W'14' ADJUST EOI-KEY INDEX PDUMMY P PRETUR ^ P RET l P* x PUPD400 8 P CBE SPBINW4,='2',UPD260 JUMP IF UNCONDITIONAL DISPL 0 P UPDFLD 0,SPINPUT UPDATE FIELD DISPL. COND. P B UPD30
0x2cebcc…2ced60 Dummy {f00=0x0104, f01=0x0190, f02=» $ PKTBWD TABULATION 1 STEP BACKW. P TBWD 0 P B TSTTAB > P* P " PKTHOME TAB. TO HOME POSITION Z P THOME P B TSTTAB P* ( PKTLDOWN TAB. TO FIRST ON NEXT LINE P TLDOWN P B TSTTAB P* PKTLEFT
0x2ced60…2ceef4 (2, 63) Dummy {f00=0x0104, f01=0x0190, f02=» P* PKTDOWN TAB 1 DOWN P TDOWN * P B TSTTAB 8 P* J PKTUP TAB 1 UP T P TUP l P x PTSTTAB TEST TAB OUTPUT P BE READIN OK P BL READIN NOT FOUND * P BOFL SETCREAD EMPTY COMPULSORY FIELD P*
0x2ceef4…2cf088 Dummy {f00=0x0104, f01=0x018e, f02=»DUMMY,DUMMY, C " P KTFWD,DUMMY,DUMMY,KTFWD, C " P KTBWD,KTFWD,KTFWD,KTFWD, C > P KTBWD,KTFWD,KTBWD d < P* BRANCH LIST EXHAUSTED - SPBINW2 CLOBBERED BY SPTCHK P P B SETCREAD P PKCOPY HARD COPY P MOVE SP
0x2cf088…2cf21c Dummy {f00=0x0104, f01=0x0190, f02=» " P PRINT DSHCGP,SPBINW3,='0' GTP P B KCOPY10 * PKCOPY08 < P EDWRT DSHCLP,FFEED L " P PRINT DSHCLP,SPBINW3,='0' LP h P B KCOPY10 PKCOPY10 $ P B SETCREAD SET CURSOR AND READ P* PKDUPL DUPLICATION . P MOVE SPBI
0x2cf21c…2cf3b0 Dummy {f00=0x0104, f01=0x0190, f02=»T BYTE 1 f P CBE GSWSTR1,=X'00',KDUPL2 . P MOVE SPBINW1,='10' SET LENGTH IN DUPFIELD 2 P SET SPDUPL d P B UPDATE DUPL ALLOWED x PKDUPL2 0 P MOVE SPBINW4,='4' INDICATE ILLEGAL EOI-KEY P B ERRPRINT DUPL NOT ALLOWED P P*
0x2cf3b0…2cf544 Dummy {f00=0x0104, f01=0x0190, f02=» P B SETCREAD PKED100 & P EDFLD SPINPUT,SPKTAB3,SPBINW1, C & P SPBINW2,SPBINW4 P " P B DYKOUT CONTINUE AS FOR DYKI j P* P* ENTER KEY P* PKENTER ( P TBT SPCHANGE,KENT00 NO TESTS ON ME P TBF SPME,KENT05 FIE
0x2cf544…2cf6d8 Dummy {f00=0x0104, f01=0x0190, f02=»BINW2,='0' SET INDEX TO SEARCHED FIELD < P GETFLD 0,SPBINW2,SPBINW3 SEARCH FOR EMPTY COMP. FIELDS . ( P BOFL KENT10 EMPTY COMP. FIELD FOUND n & P TSTCTL 2 LOOK IF COMPULSORY FIELD P BZ KENT05 NO! . P CALL EMPTYT,:FMTITEM LOOK IF EMPTY FIELD
0x2cf6d8…2cf86c Dummy {f00=0x0104, f01=0x0190, f02=»LSORY FIELD FOUND P* PKENT10 $ 6 P GETFLD 0,SPBINW3,SPBINW2 GET THE COMPULSORY FIELD 2 P l PERRPRT t * P CBE SPBINW2,='16',KEDIT JUMP IF EDIT * P CBE SPBINW2,='4',CANC JUMP IF CANCEL1 * P CBE SPBINW2,='5',CANC JUMP IF CANCEL2
0x2cf86c…2cfa00 Dummy {f00=0x0104, f01=0x0190, f02=»BNE SPBINW2,SPBINW3,ERRPRT20 P TIMEOUT $ & P EDWRT SCREEN,ERAFMT ERASE SCREEN 6 P B ERRC20 ` PERRPRT20 r P CBE SPBINW4,='0',ERRC20 P PERF BELL ( P MOVE SPBINW3,=X'0801' ROW 24 COL. 1 2 P DSC1 SCREEN,6,SPBINW3 SET CURSOR ON LAS
0x2cfa00…2cfb94 (2, 64) Dummy {f00=0x0106, f01=0x0190, f02=» P* READ AFTER ERROR P* & PERREAD 0 ( P SETCUR SET CURSOR AT THE BEGINNING > P OF THE CURRENT FIELD j PERR100 * P MOVE SPBINW3,=W'14' REQUESTED LENGTH " P IB SPKEY,ERR105,ERR110,ERR115 PERR105 2 P NKI .NE,KEYB,
0x2cfb94…2cfd28 Dummy {f00=0x0106, f01=0x0190, f02=» PERR115 2 P NKI .NE,KEYB,SPINPUT,SPKTAB13,SPBINW3,SPBINW2 PERR120 L P BNZ ERR100 JUMP IF NOT OK Z ( P CMP SPBINW2,='0' JUMP IF POWER OFF | P BE RETUR " P IB SPBINW2,ERR100,ERRCONT C $ P ERRCONT,ERR100,ERRCONT,ERRCONT P
0x2cfd28…2cfebc Dummy {f00=0x0106, f01=0x0190, f02=»L SPBINW4,=W'26',CANC IF WARNING & P SUB SPBINW2,='1' ADJUST KEY INDEX ( PCANC R 0 P CBE SPBINW1,='0',ERRC10 JUMP IF LENGTH = 0 ^ 0 P MOVE SPINPUT,:FMTITEM SAVE CURRENT CONTENTS 4 P MOVE :FMTITEM,=C'1' PUT SOMETHING IN THE FIELD & P GETABX SP
0x2cfebc…2d0050 Dummy {f00=0x0106, f01=0x0190, f02=» SPBINW2,='3' ADJUST FOR CANCEL1,CANCEL2 P RET ! 0 PCLEAR1 ! < 0 P CBE SPBINW1,='0',ERRC20 JUMP IF LENGTH = 0 ! J ( P SET SPCHANGE INDICATE CHANGED FIELD ! ~ PERRC20 ! & P MOVE SPBINW5,$OPT CHECHK IF SPERR ! P CBE SPBINW5,=W'0',SPERRRET ! P B
0x2d0050…2d01e4 Dummy {f00=0x0106, f01=0x0190, f02=»GET CURRENT TAB INDEX ! , P DISPLAY 1,SPBINW4,SPBINW4 DISPLAY FIELD " & P MOVE SPBINW5,$OPT CHECK IF SPERR " N P CBE SPBINW5,=W'0',SPERRRET " x P B SETCREAD CONTINUE " P* " PSPERRRET " P RET " P* " P PEND " P* " PBELL PRO
0x2d01e4…2d0378 Dummy {f00=0x0106, f01=0x0190, f02=»7',1 " P FMEND # P # P PEND # " P* # 0 PERAFMT FRMT # : P FILLR '1',2 # N P FMEND # b P* # p PFFEED FRMT # z P FILLR '1',2 # P FMEND # P* # P* # P # PSPLIN8 PROC WRTMES,WRTTYP # P******************** #
0x2d0378…2d050c Dummy {f00=0x0106, f01=0x0190, f02=»N FORMAT TABLE SPFTBMES # P* $ $ P* WRTTYP: =0 NO WAIT $ * " P* =1 WAIT $ R $ P* =2 RETURN $ x P* $ P******************* $ P MOVE SPBINW1,=X'0801' $ 2 P DSC1 SCREEN,6,SPBINW1 SET CURSOR ON
0x2d050c…2d06a0 Dummy {f00=0x0106, f01=0x0190, f02=»RTTYP,=W'0',LIN8NW $ P CBE WRTTYP,=W'2',LINRET % P* READ % : PLIN8IN % H ( P MOVE SPBINW1,=W'3' REQUESTED LENGTH % V " P IB SPKEY,LIN805,LIN810,LIN815 % PLIN805 % . P NKI KEYB,SPINPUT,SPKTAB1,SPBINW1,SPBINW2 % P B LIN820 % PLIN810 % . P
0x2d06a0…2d0834 (2, 65) Dummy {f00=0x0107, f01=0x0190, f02=»20 % P BNOK LIN8IN JUMP IF NOT OK & $ P IB SPBINW2,LIN8IN,LIN8CT,LIN8IN & . P B LIN8IN & V P* CLEAR LINE & h PLIN8CT & | P PERF CLEAR8 ERASE LAST LINE & P RET & P* READ WITH NO WAIT & PLIN8NW & ( P MOVE SPBINW1,=W'3' REQUESTED LENGTH
0x2d0834…2d09c8 Dummy {f00=0x0107, f01=0x0190, f02=»60 & 2 P NKI .NW,KEYB,SPINPUT,SPKTAB12,SPBINW1,SPBINW2 ' P B LIN870 ' @ PLIN865 ' R 2 P NKI .NW,KEYB,SPINPUT,SPKTAB13,SPBINW1,SPBINW2 ' ` PLIN870 ' PLINRET ' P RET ' P PEND ' P ' PSPINF1 PROC ' P******************** ' P*
0x2d09c8…2d0b5c Dummy {f00=0x0107, f01=0x0190, f02=»REEN,6,SPBINW1 SET CURSOR ON FIRST LINE ' P MOVE SPBINW1,CBIN0 ( 0 2 P EDWRT SCREEN,SPFTBMES(CBIN7) WRITE MESSAGE 7 ( L P RET ( P PEND ( P* ( P* ( P* ( PSPINF8 PROC ( P******************** ( P* ( . P* SPINF8 -
0x2d0b5c…2d0cf0 Dummy {f00=0x0107, f01=0x402c, f02=»* ( P* ) P ) P END ) @ ) ( P MOVE SPBINW1,CBIN0 ( 0 2 P EDWRT SCREEN,SPFTBMES(CBIN7) WRITE MESSAGE 7 ( L P RET ( P PEND ( P* ( P* ( P* ( PSPINF8 PROC ( P******************** ( P* ( . P* SPINF8 -
0x2d0cf0…2d0e84 Dummy {f00=0x0107, f01=0x2008, f02=» *
0x2d0e84…2d1018 Dummy {f00=0x0107, f01=0x0190, f02=» * h B IGET110 LOOK AT NEXT + PIGET200 FOUND + ( MOVE INDX,GSWBIN4 SET INDEX + @ P MOVE GSWBIN1,CBIN5 + d . P XCOPY GSWBIN5,CBIN0,CBIN2,CIXBUF,GSWBIN1 + & P MOVE LEVDEX,GSWBIN5 SET LEV INDX + " P CLEAR CIDXFLG RELEASE BUFFER + CMP C
0x2d1018…2d11ac Dummy {f00=0x0107, f01=0x0190, f02=»AR CIDXFLG RELEASE BUFFER + CMP CBIN1,CBIN0 NOK , " RET , > PIGET300 SET COND = ERR , J MOVE LEVDEX,CBIN0 , j MOVE INDX,CBIN0 , " P CLEAR CIDXFLG RELEASE BUFFER , CMP CBIN0,CBIN1 , RET , PEND , , P EJECT ,
0x2d11ac…2d1340 Dummy {f00=0x0107, f01=0x0190, f02=»EVNR,GSWBIN4,GSWBIN5 , GSWBIN5 LEV INDEX - GSWBIN4 INDEX - : BERR XINSNOK DISK ERROR - T BOK XINSNOK ALREADY PRESENT - t * NOT FOUND, INSERT - XINS000 - & ! TBF CIDXFLG,XINS010 BUFFER FREE? - DELAY CBIN2 NO , WAIT
0x2d1340…2d14d4 (2, 66) Opaque[0x194]
0x2d14d4…2d1668 # DirEnt {nam=»CONNJT«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1948, f03=0x0000}
0x2d14d4…2d1668 IdxSect {
0x2d14d4…2d1668 f00 = 0x00ca // 0x2d14d4 @0x0
0x2d14d4…2d1668 f01 = 0x0002 // 0x2d14d6 @0x2
0x2d14d4…2d1668 gno = [ // 0x2d14d8 @0x4
0x2d14d4…2d1668 [0x00]: C0x00ca.0x1.0
0x2d14d4…2d1668 ]
0x2d14d4…2d1668 }
0x2d1668…2d17fc Dummy {f00=0x00ca, f01=0x0190, f02=» T; 01; TID=TB; TCL=TB; * LEV=55; : 01; J TDC=T02; V LC=08L; f P00; v T; P01; TID=TC; TCL=TC; LEV=60; 01; PTDC=T01; PLC=01L; P01; PSCL=S04;
0x2d17fc…2d1990 Dummy {f00=0x00ca, f01=0x0190, f02=»L=S02; PSCL=S03; PSCL=S04; T; . P02; 8 TID=GA; D TCL=GA; T LEV=60; d 01; t TDC=T04; PLC=02L; P03; PSCL=S02; PSCL=S03; PSCL=S04; T; 01; TID=D0; TCL=D0
0x2d1990…2d1b24 Dummy {f00=0x00ca, f01=0x0006, f02=»1; PSCL=S03; PSCL=S04; T; . P02; 8 TID=GA; D TCL=GA; T LEV=60; d 01; t TDC=T04; PLC=02L; P03; PSCL=S02; PSCL=S03; PSCL=S04; T; 01; TID=D0; TCL=D0
0x2d1b24…2d1cb8 Dummy {f00=0x00ca, f01=0x2008, f02=» PSCL=S03; PSCL=S04; T; . P02; 8 TID=GA; D TCL=GA; T LEV=60; d 01; t TDC=T04; PLC=02L; P03; PSCL=S02; PSCL=S03; PSCL=S04; T; 01; TID=D0; TCL=D0
0x2d1cb8…2d1e4c Dummy {f00=0x00ca, f01=0x0190, f02=» BIN '1' HBOG/DEBP/REM PTTTROLD BIN NO OF OLD TRANS PTTASKNR BIN B PTTDKBCD BCD 2 D/K VALUE V $ PTTARKSAV BCD 12 SAVED ARK KT NR v & PTTCYKTOT BCD 14 SAVED CYKLE TOTAL & PTTCYKPOS BCD 4 SAVED CYKLE LINE NR $ PTTLINNR BCD 4 LINE NR
0x2d1e4c…2d1fe0 Dummy {f00=0x00ca, f01=0x0190, f02=»FFFFFFFF' PTSWBCD2 BCD 2 *-- & PTTCYM STRG 1 CYKLE MARK ON JOURNAL , . PGTREGF BCDI (26),16X'F' TRANSACTION FIELDS V P* P EJECT P* PGB1 BLK P* P* P* P* P* PGTEXFLAG BOOL FALSE P
0x2d1fe0…2d2174 (2, 67) Opaque[0x194]
0x2d2174…2d2308 # DirEnt {nam=»/OBJCT«, typ=»OB«, f00=0x0000, f01=0x0000, f02=0x0380, f03=0x0000}
0x2d2174…2d2308 IdxSect {
0x2d2174…2d2308 f00 = 0x001c // 0x2d2174 @0x0
0x2d2174…2d2308 f01 = 0x00ce // 0x2d2176 @0x2
0x2d2174…2d2308 gno = [ // 0x2d2178 @0x4
0x2d2174…2d2308 [0x00]: C0x001c.0x0.0
0x2d2174…2d2308 [0x01]: C0x001c.0x1.0
0x2d2174…2d2308 [0x02]: C0x001c.0x2.0
0x2d2174…2d2308 [0x03]: C0x001c.0x3.0
0x2d2174…2d2308 [0x04]: C0x001d.0x0.0
0x2d2174…2d2308 [0x05]: C0x001d.0x1.0
0x2d2174…2d2308 [0x06]: C0x001d.0x2.0
0x2d2174…2d2308 [0x07]: C0x001d.0x3.0
0x2d2174…2d2308 [0x08]: C0x001e.0x0.0
0x2d2174…2d2308 [0x09]: C0x001e.0x1.0
0x2d2174…2d2308 [0x0a]: C0x001e.0x2.0
0x2d2174…2d2308 [0x0b]: C0x001e.0x3.0
0x2d2174…2d2308 [0x0c]: C0x001f.0x0.0
0x2d2174…2d2308 [0x0d]: C0x001f.0x1.0
0x2d2174…2d2308 [0x0e]: C0x001f.0x2.0
0x2d2174…2d2308 [0x0f]: C0x001f.0x3.0
0x2d2174…2d2308 [0x10]: C0x0020.0x0.0
0x2d2174…2d2308 [0x11]: C0x0020.0x1.0
0x2d2174…2d2308 [0x12]: C0x0020.0x2.0
0x2d2174…2d2308 [0x13]: C0x0020.0x3.0
0x2d2174…2d2308 [0x14]: C0x0021.0x0.0
0x2d2174…2d2308 [0x15]: C0x0021.0x1.0
0x2d2174…2d2308 [0x16]: C0x0021.0x2.0
0x2d2174…2d2308 [0x17]: C0x0021.0x3.0
0x2d2174…2d2308 [0x18]: C0x0022.0x0.0
0x2d2174…2d2308 [0x19]: C0x0022.0x1.0
0x2d2174…2d2308 [0x1a]: C0x0022.0x2.0
0x2d2174…2d2308 [0x1b]: C0x0022.0x3.0
0x2d2174…2d2308 [0x1c]: C0x0023.0x0.0
0x2d2174…2d2308 [0x1d]: C0x0023.0x1.0
0x2d2174…2d2308 [0x1e]: C0x0023.0x2.0
0x2d2174…2d2308 [0x1f]: C0x0023.0x3.0
0x2d2174…2d2308 [0x20]: C0x0024.0x0.0
0x2d2174…2d2308 [0x21]: C0x0024.0x1.0
0x2d2174…2d2308 [0x22]: C0x0024.0x2.0
0x2d2174…2d2308 [0x23]: C0x0024.0x3.0
0x2d2174…2d2308 [0x24]: C0x0025.0x0.0
0x2d2174…2d2308 [0x25]: C0x0025.0x1.0
0x2d2174…2d2308 [0x26]: C0x0025.0x2.0
0x2d2174…2d2308 [0x27]: C0x0025.0x3.0
0x2d2174…2d2308 [0x28]: C0x0026.0x0.0
0x2d2174…2d2308 [0x29]: C0x0026.0x1.0
0x2d2174…2d2308 [0x2a]: C0x0026.0x2.0
0x2d2174…2d2308 [0x2b]: C0x0026.0x3.0
0x2d2174…2d2308 [0x2c]: C0x0027.0x0.0
0x2d2174…2d2308 [0x2d]: C0x0027.0x1.0
0x2d2174…2d2308 [0x2e]: C0x0027.0x2.0
0x2d2174…2d2308 [0x2f]: C0x0027.0x3.0
0x2d2174…2d2308 [0x30]: C0x0028.0x0.0
0x2d2174…2d2308 [0x31]: C0x0028.0x1.0
0x2d2174…2d2308 [0x32]: C0x0028.0x2.0
0x2d2174…2d2308 [0x33]: C0x0028.0x3.0
0x2d2174…2d2308 [0x34]: C0x0029.0x0.0
0x2d2174…2d2308 [0x35]: C0x0029.0x1.0
0x2d2174…2d2308 [0x36]: C0x0029.0x2.0
0x2d2174…2d2308 [0x37]: C0x0029.0x3.0
0x2d2174…2d2308 [0x38]: C0x002a.0x0.0
0x2d2174…2d2308 [0x39]: C0x002b.0x0.0
0x2d2174…2d2308 [0x3a]: C0x002b.0x2.0
0x2d2174…2d2308 [0x3b]: C0x002c.0x0.0
0x2d2174…2d2308 [0x3c]: C0x002c.0x1.0
0x2d2174…2d2308 [0x3d]: C0x002d.0x2.0
0x2d2174…2d2308 [0x3e]: C0x002e.0x1.0
0x2d2174…2d2308 [0x3f]: C0x002e.0x2.0
0x2d2174…2d2308 [0x40]: C0x002e.0x3.0
0x2d2174…2d2308 [0x41]: C0x002f.0x0.0
0x2d2174…2d2308 [0x42]: C0x002f.0x1.0
0x2d2174…2d2308 [0x43]: C0x002f.0x2.0
0x2d2174…2d2308 [0x44]: C0x002f.0x3.0
0x2d2174…2d2308 [0x45]: C0x0030.0x0.0
0x2d2174…2d2308 [0x46]: C0x0030.0x1.0
0x2d2174…2d2308 [0x47]: C0x0030.0x2.0
0x2d2174…2d2308 [0x48]: C0x0030.0x3.0
0x2d2174…2d2308 [0x49]: C0x0031.0x0.0
0x2d2174…2d2308 [0x4a]: C0x0033.0x0.0
0x2d2174…2d2308 [0x4b]: C0x0036.0x3.0
0x2d2174…2d2308 [0x4c]: C0x0037.0x0.0
0x2d2174…2d2308 [0x4d]: C0x0037.0x1.0
0x2d2174…2d2308 [0x4e]: C0x0037.0x2.0
0x2d2174…2d2308 [0x4f]: C0x0037.0x3.0
0x2d2174…2d2308 [0x50]: C0x0038.0x0.0
0x2d2174…2d2308 [0x51]: C0x0038.0x1.0
0x2d2174…2d2308 [0x52]: C0x0038.0x2.0
0x2d2174…2d2308 [0x53]: C0x0038.0x3.0
0x2d2174…2d2308 [0x54]: C0x003a.0x1.0
0x2d2174…2d2308 [0x55]: C0x003a.0x2.0
0x2d2174…2d2308 [0x56]: C0x003a.0x3.0
0x2d2174…2d2308 [0x57]: C0x003b.0x0.0
0x2d2174…2d2308 [0x58]: C0x003b.0x1.0
0x2d2174…2d2308 [0x59]: C0x003b.0x2.0
0x2d2174…2d2308 [0x5a]: C0x003c.0x0.0
0x2d2174…2d2308 [0x5b]: C0x003c.0x1.0
0x2d2174…2d2308 [0x5c]: C0x003c.0x2.0
0x2d2174…2d2308 [0x5d]: C0x015e.0x3.0
0x2d2174…2d2308 [0x5e]: C0x015f.0x0.0
0x2d2174…2d2308 [0x5f]: C0x015f.0x1.0
0x2d2174…2d2308 [0x60]: C0x015f.0x2.0
0x2d2174…2d2308 [0x61]: C0x015f.0x3.0
0x2d2174…2d2308 [0x62]: C0x0160.0x0.0
0x2d2174…2d2308 [0x63]: C0x0160.0x1.0
0x2d2174…2d2308 [0x64]: C0x0160.0x2.0
0x2d2174…2d2308 [0x65]: C0x0160.0x3.0
0x2d2174…2d2308 [0x66]: C0x0165.0x1.0
0x2d2174…2d2308 ]
0x2d2174…2d2308 }
0x2d2308…2d249c Dummy {f00=0x001c, f01=0x018e, f02=» J F IDENT START REL 2.1*79-10-20 870150540210 J F " LINHONK LINHOF ATMASB LSAVOF LSAVON EMULA LIOLON LIOLOFC VDUKB R . * DCTASK DC1INQN DC2INQ REQTIM ICWRTE@ , ( , ( !
0x2d249c…2d2630 Dummy {f00=0x001c, f01=0x0190, f02=» , ( , ( 4 , ( d , ( , ( , ( !
0x2d2630…2d27c4 Dummy {f00=0x001c, f01=0x018e, f02=»CGETM , ( _ ( ( RLRBUF > EMULA P VDUKB b , ( { B _ C ( : t , ( O . V P ! ERASE , ( O
0x2d27c4…2d2958 Dummy {f00=0x001c, f01=0x018e, f02=» , ( P P _J C DC1INQN : 8 , ( 1 C W ( L DC2INQ R | , ( Q : O ," 2 X N , ( q N ! O _ O B P B P KEYCNV , (
0x2d2958…2d2aec Dummy {f00=0x001c, f01=0x0190, f02=» REQTIM , ( ( : C ( : : N V , ( W N R W N P H , ( / R W N PV W O x SETCUR , ( O : N P R , ( m PR P_ O
0x2d2aec…2d2c80 Dummy {f00=0x001c, f01=0x0190, f02=»% Q _ _6 N z , ( { V - : N ` V , ( - : P " V " H J , ( ) O : N U P z , ( I P P R W # O , ( i : Y2# 6 ,
0x2d2c80…2d2e14 (2, 68) Dummy {f00=0x001c, f01=0x0190, f02=» j , ( $ P v N T 9 , ( N P N + 9 N P <! : , ( ' T = + V E % # P & j WCHAR , ( G P W % N T , ( @ e O Q B ! PT ,
0x2d2e14…2d2fa8 Dummy {f00=0x001c, f01=0x0190, f02=» O j , ( : T W P , ( P H + ) _ : DISPL j , ( # O N _ P $# P z TASCII TRPAN , ( A _ : . H : , ( ] O
0x2d2fa8…2d313c Dummy {f00=0x001c, f01=0x0190, f02=»R l , ( Q <_8 O : O 1R Q 9_R , ( : _ < I:RT1 l , ( O | , ( D$ - H : , ( 1 N # P N N
0x2d313c…2d32d0 Dummy {f00=0x001c, f01=0x0190, f02=» Z: _H " N P R , ( O : N - O 0 , ( B + I I C ( : ` LIOLON LIOLOFC LINHONK LINHOF , ( W W W W W W W W
0x2d32d0…2d3464 Dummy {f00=0x001c, f01=0x0190, f02=» Q O O : | , ( I P _ ]$ O , ( i O : N O : L , ( Q T O O : | , ( R : _* 0 : O , ( O : N
0x2d3464…2d35f8 Dummy {f00=0x001c, f01=0x0190, f02=» d H D ! ! # % ' ) + - / 1 3 5 7 9 ; = ? H D ! A C E G I K M O Q S U W Y [ ] _ l H D ! a c e g i k m o q s u w y { } H D !
0x2d35f8…2d378c Dummy {f00=0x001c, f01=0x0190, f02=» P H D ! X x H | H D ! X H D ! 8 $ 2 X 0 H D ! ! # % ' )
0x2d378c…2d3920 Dummy {f00=0x001c, f01=0x0190, f02=» 9W I q P P P P V W6 R #W& 1R 7W AV H D !HC GW Q . eR oR . P T T T Q P T Q D H D ! !V ; AU GP( OP U . YP [R _W { P T P> H D ! P P T P !P +T
0x2d3920…2d3ab4 (2, 69) Dummy {f00=0x001c, f01=0x411e, f02=» W( R6 P Q0 W R" Q t H D ! R Q % 9P = I M SQ, 0 H D !$ sP P . P R W, W, W$ W$ W W W W W W | < 8 W W W W 3 9Q IP W { Q T R
0x2d3ab4…2d3c48 Dummy {f00=0x001c, f01=0x0190, f02=» J F IDENT PRT REL 2.1*79-10-20 870150540210 SNBUSYK PRINT ICREAD R PRINT r I:EVA0 EMULA , ( @ . V P ! DC1INQ , ( O O N T N
0x2d3c48…2d3ddc Dummy {f00=0x001c, f01=0x0190, f02=» C n GTRBUF DCGETM , ( y ( : P O W 2 UPDATE b , ( @ O B O N T N t , ( O : O ( : , ( O 8 O N Z_ (@P , (
0x2d3ddc…2d3f70 Dummy {f00=0x001c, f01=0x018e, f02=» RFMDUP , ( S X }T 9 ~T 5 aR , ( q = _X = R F , ( 0" ZZ_" pR v , ( V 0" 1 V " 2 P W X , ( {T * = ~X@ }P , (
0x2d3f70…2d4104 Dummy {f00=0x001c, f01=0x4162, f02=» f , ( Q ( Z 0 O ( SNBUSYK 8 , ( q B : C ( L : | H D !,u )T 3T A ` UP| ] ~ P WF T T )R - $ H D ! 7 CV IP4 MW YT aT mR R $ R
0x2d4104…2d4298 Dummy {f00=0x001c, f01=0x0190, f02=» J F IDENT VDUPRT 2.1DK 1 79-10-20 870150540210 D @ TRPFY TRPAY ERASE SETCUR ERASUPA DISPL ERASUAL WCHAR UPDATE R , ( RFMDUP DCINP RLRBUF DCGETM GTRBUF DCINP , ( O N T B O N
0x2d4298…2d442c Dummy {f00=0x001c, f01=0x018e, f02=» N " P N " O N " P SNBUSY $ , ( [@ N " O W B 6 DCGETM | f REQTIM~ z , ( y : C C C ( :
0x2d442c…2d45c0 Dummy {f00=0x001c, f01=0x0190, f02=» f , ( $ _ Q = : $ : <" T TEBCDI 8 , ( $ _ $ H !?9F $ H "? J , ( % : , N / z , ( %1 O ( $ B P N ' O LSAVOF , ( %QH
0x2d45c0…2d4754 (2, 70) Dummy {f00=0x001c, f01=0x0190, f02=»% !`P V 0 !`P X $ , ( % _ " T V 0 !` V _ , UPDATE % , ( $ % $ %r_J : O B p , ( & $ T $ 1P 5P ?P , ( &% 7 W N W , ( &E
0x2d4754…2d48e8 Dummy {f00=0x001c, f01=0x0190, f02=» & P P P P T |_X , ( & T }_b T ~_l T 0_v 0 , ( & T _ B $ : $ H ` , ( ' ! :a" _ $ ^, _ , ( '# O _ T ^ 0 " , ( 'C R 1 _ " X
0x2d48e8…2d4a7c Dummy {f00=0x001c, f01=0x018e, f02=» &Z N & $ H , ( ' V L 1P Y & ICWRTE P * & ' ( K@ V O b , ( ' & $ H O " P N T , ( ( B + I I I C , ( (; ( N
0x2d4a7c…2d4c10 Dummy {f00=0x001c, f01=0x0190, f02=» , ( ( N T ; 1 B E C ERASUPA( 4 , ( ( ( : : O H , ( ( O P " R V 0" x , ( ( ^ " O P W P ERASUAL)$ , ( ) W R
0x2d4c10…2d4da4 Dummy {f00=0x001c, f01=0x0190, f02=» " Q _< R | TRPAY) , ( ) X 0" Z0 _" $ $ . TRPFY) ^ DISPL) p , ( EP) % : : $ $ %l % _ , ( ) C P " , ( ) Q " 2 O P PR
0x2d4da4…2d4f38 Dummy {f00=0x001c, f01=0x0190, f02=» ] r , ( *{ _r PR V 0 " 1 SETCUR * B , ( * ZJ_, C N C V , ( * PR C P_ C ( O WCHAR* RFMDUP * , ( * : B E _D {T * `
0x2d4f38…2d50cc Dummy {f00=0x001c, f01=0x018e, f02=» + E l , ( +[ E :h E T C ( C , ( +{ C _ N P " P W = < , ( + : R P T - : l + : H D ! $ | TT 3% 7) GP YP iW u$ $ $ $ P $ P $ Q $ T %EP %qW H D ! *% P % VD%
0x2d50cc…2d5260 Dummy {f00=0x001c, f01=0x4146, f02=» H D ! & T & T '-T"'CR ' P ' R ' )$' P ( P4( T.(OT (eT ( V ( T(( R ( V H D ! ) P ) W ) P )#WB)+R )7T.)CV")GTZ)SW )YR )oR )sP ) T ) R ) + ) Q P H D !Z * Pv* + * R * +,* + * V *#+ *7R$*CT *KT *ST *eP *iP *mW * R * +, D @ P * V * + * R * * * T * T +1PD
0x2d5260…2d53f4 (2, 71) Dummy {f00=0x001d, f01=0x0190, f02=» J F IDENT TB3270 2.1DK 1 79-05-23 870150540210 TASCIIK TEBCDI KEYCNV R TASCIIK t , ( ABCDEFGHI#.<(+!&JKLMNOPQR$]*);^ TEBCDI @ , ( ! -/STUVWXYZ@,%_>?0123456789:[ '=" , ( A
0x2d53f4…2d5588 Dummy {f00=0x001d, f01=0x4126, f02=»EYCNV , ( , ( pR wQ PW R R W @ , ( H : p , ( 01234567 ! 89 $ R Q W R R W
0x2d5588…2d571c Dummy {f00=0x001d, f01=0x0190, f02=» : H IDENT RGMAIN TRA 4.2 80-03-17 F2 O2222 03.01.XXX.1 " FUNCT INITRG TRINP TRPAGE B $$$TRAM h * & FUNCT " INITRGT TRINP TRPAGE z D @ hADM BELLIhCYK DIVTR ENTER FMSTYR FRMTSP0 KORTX KVIT LSTINT @ < MODPT PACKCLR SETDEBI
0x2d571c…2d58b0 Dummy {f00=0x001d, f01=0x0190, f02=» 0 " ( . 4 > > P J F " D LL LL A @ LL R RH RA W @ LLW A LL b J M T _ h " n "
0x2d58b0…2d5a44 Dummy {f00=0x001d, f01=0x0190, f02=» & 0 $ B R J F " D LL W @ R_%_XA 4 RA 6 Ldr R_p R LL @ R_NK R( b ( $ . .
0x2d5a44…2d5bd8 Dummy {f00=0x001d, f01=0x0190, f02=» & ? ' ? . ( I > ) _ N * q ^ + x n , ~ ~ - . / 0 1 2 3 4
0x2d5bd8…2d5d6c Dummy {f00=0x001d, f01=0x0190, f02=» D @ @ _ K h LL@ _r A R_ 2 RRRRRRRRRRRRRRRRRRRRRRRW @ Q r L S U l W ( | c r e g i ( y } ~ * J F " D @
0x2d5d6c…2d5f00 Dummy {f00=0x001d, f01=0x0190, f02=» J F " D T W R 4 R T 4 R T 4 RT ! LL W 4 RT j z , r r r
0x2d5f00…2d6094 (2, 72) Dummy {f00=0x001d, f01=0x0190, f02=» ( 1 8 A J J F " D RRRRRRR R TeWo R T]Wg R TUW_ RTO 4 I D LL 4 I 4 Q _ h u J F " D @ LL 4 I $ LL
0x2d6094…2d6228 Dummy {f00=0x001d, f01=0x40c0, f02=» 4 I LL RT 6 4 p 0 . J F " D 4 4 0X 4 4 A @ @ 6 > 4 A 4 A 4 @ _ h u J F " D @ LL 4 I $ LL
0x2d6228…2d63bc Dummy {f00=0x001d, f01=0x40a0, f02=» : H IDENT RGMND TRA 4.2 80-03-17 F2 O2222 03.01.XXX.1 INITRG B $$$TRAM T INITRG f 4 z NI @
0x2d63bc…2d6550 Dummy {f00=0x001d, f01=0x0190, f02=» : H IDENT RGSTRT TRA 4.2 80-03-26 F2 O2222 03.01.XXX.1 < 8 CNFWRT CONFRD CONFWR CONRDX T1GO TCONFR TCONFW B $$$TRAS @ < CNFWRT ] CONFRDC } CONFWRN CONRDX T1GO TCONFR 6 TCONFWS a B > hADM ASGVOLC CLBEH CLEDB C
0x2d6550…2d66e4 Dummy {f00=0x001d, f01=0x018e, f02=»PCLRNE SPLIN8O STRTWRO T:ATTFO T:DSC0 x B > T:DSC1S T:GETIA T:PAUS0 T:RSTRR T:USE UPDAKK1 WRITID ZEROK . 6 t # < ) 1 , 7 8 9 A @ J F " D 0X
0x2d66e4…2d6878 Dummy {f00=0x001d, f01=0x0190, f02=» f 2 n 0 o ( r ( 8 J F " D @ LL0X LL R R R R @ A 0X A 1XFF R 6 H FD D J F " D _M LL d R j@ 6 %_|
0x2d6878…2d6a0c Dummy {f00=0x001d, f01=0x0190, f02=» " 2 & D J F " D # LL} R LL _ A Wj@ RLL RLL RLL RLL R6 ; ! T
0x2d6a0c…2d6ba0 Dummy {f00=0x001d, f01=0x0190, f02=» .0 4 9 " $ = 4 > D J F " D _ RLL RLL LL R LL LL 9 R_A RLL RLL R LL LL S R_[ RLL V A E : I } K : O0 U0
0x2d6ba0…2d6d34 (2, 73) Dummy {f00=0x001d, f01=0x0190, f02=» * FD J F " D A A 0X 1XFF R6 _ LL d * 2 x < J F " D K " 4 0X A 0X 0
0x2d6d34…2d6ec8 Dummy {f00=0x001d, f01=0x0190, f02=» R<R " h G0 X & O0 X 8 R < J X 6 Z ^ < j d : z f < s w { 2 J F " D @ #- LL LL0X R X&0X ?R0X
0x2d6ec8…2d705c Dummy {f00=0x001d, f01=0x0190, f02=» : : * : : J Z : j z " J F " D A 1XFF R6 _#?R LL LL R <R R <R R <R R <R R R 0 A
0x2d705c…2d71f0 Dummy {f00=0x001d, f01=0x0190, f02=» h ! LL/ R LL LLb t 2 2 ! 0 B " R % ( b 8 - r <0 J F " D I ) >I 0X A 1XFF R6 _!_ ?R LL+ G . I : K
0x2d71f0…2d7384 Dummy {f00=0x001d, f01=0x0190, f02=» A 1XFF R6 _ _ LL @ v 4 0 D 0 V h SLUTDR x L J F " D LL R LL T I LL8R LL h P LLb 0 R :
0x2d7384…2d7518 Dummy {f00=0x001d, f01=0x0190, f02=» 0 0 #0 $ 0 a 6 4 F J F " D n I - LL_$ YI .# LL LL R R@ , A V B > K0 [0 `0 h a l
0x2d7518…2d76ac Dummy {f00=0x001d, f01=0x018e, f02=» J ( x x ( $ 8 H J F " D FF R6 _ _ @ ?RA ?R@ W I A R?R I ,_ X : 8 0 R : 2 0 R
0x2d76ac…2d7840 Dummy {f00=0x001d, f01=0x0190, f02=» $ ( 4 , D 20 U T 5 f J F " D LL) A LL R R R LL@ A R ?R LL?R v C F I0 n T
0x2d7840…2d79d4 (2, 74) Dummy {f00=0x001d, f01=0x0190, f02=» * : J Z j J F " D TF R T> R T6 R T. R T& R T R T R T R z 0
0x2d79d4…2d7b68 Dummy {f00=0x001d, f01=0x0190, f02=» 4 R LL Tj R LL T^ R r 0 0 T @ R 0 T b " t %0 T . 10 T : =0 T J F " D LL TR R LL TF R LL T: R LL
0x2d7b68…2d7cfc Dummy {f00=0x001d, f01=0x0190, f02=» y a < J F " D @ T R LL T R LL 4 " 0X LL R _ 0X l | J F " D R
0x2d7cfc…2d7e90 Dummy {f00=0x001d, f01=0x0190, f02=» * ( 1 & * & START 8 & L & VOLUME= Z & U p & U & & DATASET= & A & A ( &
0x2d7e90…2d8024 Dummy {f00=0x001d, f01=0x018e, f02=»4R v $ * & & A ( & A : & A L & A ^ & A p & A & $ DSN02 DSN03 DSN04R $ * & & A & A
0x2d8024…2d81b8 Dummy {f00=0x001d, f01=0x0190, f02=» $ * & & A " & A 4 & A F & A X & A j & A | & A & A ( = & 99 " * A &
0x2d81b8…2d834c Dummy {f00=0x001d, f01=0x0190, f02=»NGST[LLERE $ * & g " 99 4 " * F & X EJ-EDB T[LLER f $ * & h 99 " * & EKS.LBNR $ * &
0x2d834c…2d84e0 Dummy {f00=0x001d, f01=0x0190, f02=» 99999= " * & ( DAGS-DATO 6 $ * P & ` 99E-99E-99 r " * & DAG NR $ * & f ZZZE " *
0x2d84e0…2d8674 (2, 75) Dummy {f00=0x001e, f01=0x4158, f02=» * ( & & OPSTART 4 $ * L & ? & j $ * x ( & KORREKT $ * & ? & $ *
0x2d8674…2d8808 Dummy {f00=0x001e, f01=0x0190, f02=» : H IDENT DKSUBS TRA 4.2 80-03-25 F2 O2222 03.01.XXX.1 @ < ASSG BACKUP ERDK GETBIT RADEL RAREAD RAWRIT RGREAD B RSTORES SQREADA SQWRIT0 $$$TRAB F B ASSGR BACKUPA ERDK0 GETBIT RADEL [ RAREAD1 b RAWRIT . * R
0x2d8808…2d899c Dummy {f00=0x001e, f01=0x0190, f02=»:DSC1R T:READS T:RREA T:RWRII T:WRITA | T:XSTA WRITJTP . 0 H ) Z , j 1 z J F " D ! LL? a FF0X 0X P P ASSIGN S
0x2d899c…2d8b30 Dummy {f00=0x001e, f01=0x0190, f02=»0 r J F " D @ LL R 4 4 LL0X Q P , z 0 0 DISCFEJL J F " D R I 0X @ 4 R
0x2d8b30…2d8cc4 Dummy {f00=0x001e, f01=0x0190, f02=» A H RLL@ W 4 0X LL 0R T 0 A F 0 A X 0 A j 2 | < J F " D LL LL LL"4 " I ( 0X 0X H j
0x2d8cc4…2d8e58 Dummy {f00=0x001e, f01=0x018e, f02=» J F " D LL 4 4 0X P Q R I 0X 4 * x J F " D I 0X Q P R 4 @ A R T I R
0x2d8e58…2d8fec Dummy {f00=0x001e, f01=0x0190, f02=» H H V Y0 ( b : c J m [ J F " D @LL%I R T _6 R LL X@WB RLLA I R _U _&I $I l
0x2d8fec…2d9180 Dummy {f00=0x001e, f01=0x0190, f02=» W 0X 0X 0X * : J F " D @ @ 4 @ A R T I R T W 0X J 0 - b =0 J F " D R LL " W
0x2d9180…2d9314 (2, 76) Dummy {f00=0x001e, f01=0x018e, f02=» J F " D @W R LL Q T R XDA RLL R I W I 0X l | J F " D W 0X @ @ 4 RLLI 0X W 0X @ @ 4 H 0X
0x2d9314…2d94a8 Dummy {f00=0x001e, f01=0x0190, f02=» J F " D _ A I @ LL R R LL R <R LL8R b &01I R 0 f 1 x 5 0 J F " D ! LL _H LLb <R LLb J _0
0x2d94a8…2d963c Dummy {f00=0x001e, f01=0x0190, f02=» 0 & . J F " D LL8R_ C <R LL h @ J F " D h T b LLb ' { 4 k
0x2d963c…2d97d0 Dummy {f00=0x001e, f01=0x0190, f02=» M LLh T L 0 > 0 P b r J F " D L LL LL_ h <R LL
0x2d97d0…2d9964 Dummy {f00=0x001e, f01=0x418e, f02=» 0 b ( : 8 @ J J F " D I LL LL R T`f ! LL g0 j z J F " D @LLh d
0x2d9964…2d9af8 Dummy {f00=0x001e, f01=0x0190, f02=» : H IDENT SCREEN TRA 4.2 80-04-09 F2 O2222 03.01.XXX.1 > : BELL SCREEN SPCA SPCLRA SPCLRN SPCLRS SPCN SPERR B SPINF1R SPINF8A SPLIN80 $$$TRAS > : BELLF SCREENA [ SPCA0 E SPCLRA SPCLRN. * SPCLRS 4 0 SPCNR P SPE
0x2d9af8…2d9c8c Dummy {f00=0x001e, f01=0x0190, f02=»PTCHKF T:DISPL T:DSC1C T:DUPLR t > : T:DYKI T:EDFLA T:EDWR0 T:ERASR T:GETAC T:GETCS T:GETF & D @ T:NKI T:PRINK T:SETCK T:TBWDH T:TDOWS T:TFWDC T:THOMP T:TLDO h 4 0 T:TLEF T:TRIGA T:TSTC0 T:TUP T:UPDFT T:XSTAT 4 / - '&
0x2d9c8c…2d9e20 Dummy {f00=0x001e, f01=0x0190, f02=» r & " * % # 6 , ( & d * < " ** " ** " ** " ** " ** " ** "
0x2d9e20…2d9fb4 (2, 77) Dummy {f00=0x001e, f01=0x0190, f02=» " ** " ** " ** $ " ** 4 " ** D " ** T " ** d " ** t " ** " ** " ** " ** " ** " ** " ** ( *
0x2d9fb4…2da148 Dummy {f00=0x001e, f01=0x0190, f02=» " ** ( & , FEJL : $ * N ZZ9 ^ " * r ( & 99B " * & 99 " *
0x2da148…2da2dc Dummy {f00=0x001e, f01=0x0190, f02=» LINIE NR $ * & . " ( 0 < & . L & NY SIDE. Z ( p | & & & & & ZZZZZVZZ9,99+ " * S
0x2da2dc…2da470 Dummy {f00=0x001e, f01=0x0190, f02=»T, $ * ( & & 6 & * D ( T ` & p DISKETTE SKIFT ~ $ * & ( & OPSTART $ *
0x2da470…2da604 Dummy {f00=0x001e, f01=0x0190, f02=» " % [ & & - 8 2 J 7 : [ n ; ~ @ [ A J F " D LL LL LL RLL4 LL LL LL RLL4 LL LL LL RLL4 H
0x2da604…2da798 Dummy {f00=0x001e, f01=0x0190, f02=» $ } 8 J F " D @RLL4 LL RLL4 LL RLL4 @ LL8RI 6 `0X 0XWU $ h $ x $ J F " D 0X WL6 0X W 0X 6 $0X W$0X W
0x2da798…2da92c Dummy {f00=0x001e, f01=0x0190, f02=» @ J F " D W 0X W 0X W 0X :R0X P :R _ 0X LL LL0X P A * x + . 0
0x2da92c…2daac0 Dummy {f00=0x001e, f01=0x0190, f02=» I W J K ( L W 8 M W H N W X O W h P W x Q W R W S W T W U p V Z ^ (
0x2daac0…2dac54 (2, 78) Dummy {f00=0x001e, f01=0x018e, f02=» w z x y , J F " D @LL 2 RRRRRRRRRRRRRRRR! LL^0X ! LL 3 RRRRRRR2 RRRI > ( (
0x2dac54…2dade8 Dummy {f00=0x001e, f01=0x0190, f02=» ? & 6 F V f v ?
0x2dade8…2daf7c Dummy {f00=0x001e, f01=0x0190, f02=» 2 RRRRRRRRRRRRRRRRR LL4 LLK0X _M0 z 2 8 8 H : X < h > x 4 B " $ ( +
0x2daf7c…2db110 Dummy {f00=0x001e, f01=0x018e, f02=» ! U . Z _ " , b ! < e . L j o n s ~ v J F " D @ LLI I W 1X FF1X LLW 1X FF1X LLW ?R LL0X T b L
0x2db110…2db2a4 Dummy {f00=0x001e, f01=0x0190, f02=» 8 J F " D ! LL LLA ?R LLWh0X ) LL R?R0X KK ?RI H f x * @ *
0x2db2a4…2db438 Dummy {f00=0x001e, f01=0x0190, f02=» " ! $ % 6 ) F , X 8 " h ; x J F " D LL LL0X ( 1X FFW ! LL R LL0X 1X FF H D 0 H R ,
0x2db438…2db5cc Dummy {f00=0x001e, f01=0x0190, f02=»X KK W 0X KK 6 LL j ( E 8 H X E h x 1 & $
0x2db5cc…2db760 Dummy {f00=0x001e, f01=0x018e, f02=» RRR R " 4 & D T d v " J F " D LL4 ! LL A ! LL ?R 0X 0X ! LL ?R4 1X FF4 &
0x2db760…2db8f4 (2, 79) Dummy {f00=0x001f, f01=0x0190, f02=» " $ # 4 ) F / X 9 , j > z J F " D LL0X 1X FF ! LLI! LLw LL6 0X KK G , L U ,
0x2db8f4…2dba88 Dummy {f00=0x001f, f01=0x4154, f02=» W 0X KK W 0X KK 62 RRR_? R4 LL6 0X , H X , h x " J F " D KK W 0X KK W 0X KK 4 LL0X 1X
0x2dba88…2dbc1c Dummy {f00=0x001f, f01=0x0190, f02=» : H IDENT RGFRMT TRA 4.2 80-03-17 F2 O2222 03.01.XXX.1 FMSTYR FRMTSP FRMXSP B $$$TRAF d $ FMSTYR FRMTSPF FRMXSP v T:ATTFF
0x2dbc1c…2dbdb0 Dummy {f00=0x001f, f01=0x0190, f02=» +** " 6** " =** " @** , " K** < " P** L " Y** " d** l " i** | " ** " ** " ** " ** " ** " ** " ** " **
0x2dbdb0…2dbf44 Dummy {f00=0x001f, f01=0x0190, f02=» " ** " ** " ** ( " ** 8 " ** H " ** X " ** h " ** x " ** " ** " ** " ** ( H & &
0x2dbf44…2dc0d8 Dummy {f00=0x001f, f01=0x018e, f02=» ~ $ * & YDELSESMODT4 & $ * B & R & P ` XXXXXXXXE-XX v " * & Q XXXXXXE-XXXX " * & R
0x2dc0d8…2dc26c Dummy {f00=0x001f, f01=0x0190, f02=» POST. $ * $ v* * & : DEBITOR H $ * ` & p NR ~ $ * & BET-ART $ * & & S XXXXXX
0x2dc26c…2dc400 Dummy {f00=0x001f, f01=0x0190, f02=»* ( K & * & 8 REMITTERING F $ * b $ v* r & REGKONTONR $ * & LEVERAND $ * NR $
0x2dc400…2dc594 (2, 80) Dummy {f00=0x001f, f01=0x0190, f02=» * & V XXXXXXE-XXXX & " * B & W V XXXXXXE-XXXX l " * ( ( Z & & $ 99 "
0x2dc594…2dc728 Dummy {f00=0x001f, f01=0x0190, f02=» $ !* & " CPR/CIR/NR $ "* 8 & H $ * V $ * f & v & & # HOVEDBOG $ #* $ v* & & & $
0x2dc728…2dc8bc Dummy {f00=0x001f, f01=0x0190, f02=» % BFON $ %* & $ $ * 2 $ * B $ * R $ w* b ( r & 3 ~ & & ' 99 " '* P ( NORMALPOST $ (* $ v*
0x2dc8bc…2dca50 Dummy {f00=0x001f, f01=0x018e, f02=» * HOVEDBOG $ ** $ v* & & 6 & D & R $ ~* ` & p $ * ~ & & $ w* ( + ~ & & 5 , 99
0x2dca50…2dcbe4 Dummy {f00=0x001f, f01=0x0190, f02=» . BET-ARTN $ .* & 0 $ * > & N / XX d " /* v & / & & 0 DEBITORN $ 0* 1 POST. $ 1* $
0x2dcbe4…2dcd78 Dummy {f00=0x001f, f01=0x0190, f02=» |* & $ * $ * * $ * : & J 3 RTE/GEBN X $ 3* p & 4 DEB $ 4* & 5 BFO $ 5* & $ * $
0x2dcd78…2dcf0c Dummy {f00=0x001f, f01=0x0190, f02=» & SD-INCASSOB $ v* & * & 8 8 CPR/CIR/NR F $ 8* ` & p 9 BET-ARTS ~ $ 9* & $ * & M : XX " :* N & :
0x2dcf0c…2dd0a0 Dummy {f00=0x001f, f01=0x0190, f02=» & & $ ~* & 0 $ * > & N & F]R RE] REM OPK & z $ |* & $ * $ * $ w* ( = * & >
0x2dd0a0…2dd234 (2, 81) Dummy {f00=0x001f, f01=0x018e, f02=» $ * & $ ~* " & 2 $ * @ & P & ^ $ w* l ( | @ d & & & A 99 " A* L B BRILLER $ B* C
0x2dd234…2dd3c8 Dummy {f00=0x001f, f01=0x0190, f02=» ~ $ E* & F YDELSESMODTP & $ F* B & R $ * ` $ * p $ * & & & G HOVEDBOG $ G* $ v* & &
0x2dd3c8…2dd55c Dummy {f00=0x001f, f01=0x0190, f02=» |* & I BFOO $ I* . & > J MTBO L $ J* ` & p $ * ~ $ * $ * $ * $ w* ( K # & L 99
0x2dd55c…2dd6f0 Dummy {f00=0x001f, f01=0x0190, f02=»GKONTONR $ O* & $ * . & > $ ~* L & $ * j & z & $ w* ( P Y & & Q 99 " Q* L
0x2dd6f0…2dd884 Dummy {f00=0x001f, f01=0x018e, f02=»VERAND $ T* & $ * , $ * < & L & Z & j U REMITTERING x $ U* $ v* & & & $ ~* & V FAKT
0x2dd884…2dda18 Dummy {f00=0x001f, f01=0x0190, f02=» & X TXTO $ X* & & 6 $ |* D & T $ * b $ * r $ * $ w* ( Y d & & & Z 99 " Z* L [
0x2dda18…2ddbac Dummy {f00=0x001f, f01=0x0190, f02=» ]* & ^ LEVERAND $ ^* 2 & B _ YDELSESMODTG P $ _* l & | $ * $ * $ * & & & ` REMITTERING $
0x2ddbac…2ddd40 Dummy {f00=0x001f, f01=0x018e, f02=» a* & $ * $ * * & : b LEVKONTO H $ b* ` & p c TXTO ~ $ c* & $ |* & $ * $ * $ * $ w*
0x2ddd40…2dded4 (2, 82) Dummy {f00=0x001f, f01=0x0190, f02=» f REGKONTONR $ f* " & 2 $ * @ & P $ ~* ^ & n g CPR/CIR/NR | $ g* & $ * & h XXXXXXE-XXXX " h*
0x2dded4…2de068 Dummy {f00=0x001f, f01=0x0190, f02=»ERSE $ k* & l EJ EDB * $ l* @ $ v* P & ` m TNR n $ m* n KONTONRL $ n* & & L o XXX " o* &
0x2de068…2de1fc Dummy {f00=0x001f, f01=0x018e, f02=» $ ~* & r DIVERSE " $ r* : & J $ * X & Y h s XXXXXXXXXX z " s* & s & s $ w* ( t & u 99
0x2de1fc…2de390 Dummy {f00=0x001f, f01=0x018e, f02=» & x ****9 " x* , & > & N & & l y ZZZZZVZZ9,99+ z " y* $ z* ( z & & Z { B
0x2de390…2de524 Dummy {f00=0x001f, f01=0x018e, f02=» BE $ * & L & & 4 & B B ( P & RATE l $ ~* ~ ( & XXXXXXXXE-XX " * (
0x2de524…2de6b8 Dummy {f00=0x001f, f01=0x018e, f02=» " * ( ( & 8 XX N " * ` ( t & TTTTTTTVTTX,XX- " * ( &
0x2de6b8…2de84c Dummy {f00=0x001f, f01=0x0190, f02=» ( & $ X : " * L ( ` l & @ | X " * ( & X " *
0x2de84c…2de9e0 Dummy {f00=0x001f, f01=0x0190, f02=» XX " * & 0 XX F " * X & l XX " * & X " * ( &
0x2de9e0…2deb74 (2, 83) Dummy {f00=0x0020, f01=0x0190, f02=»* ( & * TTTTTTTX @ " * X & l XXVXXVXX " * ( & TTTTTTTX " *
0x2deb74…2ded08 Dummy {f00=0x0020, f01=0x0190, f02=» XX " * ( . : & J XXXXXXXXE-XX ` " * | ( & B XXVXXVXX " * (
0x2ded08…2dee9c Dummy {f00=0x0020, f01=0x0190, f02=» " * & & XXVXXVXX * " * B ( V b & ' r TTTTTTTVTTX,XX- " * ( & . X " *
0x2dee9c…2df030 Dummy {f00=0x0020, f01=0x0190, f02=» * $ * ! $ * ! & ! * & : ! 8 TTTTTTTTTX-R ! N " * ! j & ; ! ~ TTTTTTTTTX-R ! " * ! & ! & < ! TTTTTTTTTX-R ! "
0x2df030…2df1c4 Dummy {f00=0x0020, f01=0x0190, f02=»TTTX-R ! " * " ( " " " . & 7 " > TTTTTTTTTX-R " P " * " l ( " " & 8 " TTTTTTTTTX-R " " * " ( " " & 9
0x2df1c4…2df358 Dummy {f00=0x0020, f01=0x018e, f02=» ( " # $ * # ( # , # 8 $ * # H $ * # X ( # h # t & # & @ @ # X # " * # ( # # & # & @
0x2df358…2df4ec Dummy {f00=0x0020, f01=0x0190, f02=» ( $ $ $ * $ $ * $ 0 ( $ @ $ L & $ & 6 $ n TTTTTTTTTX-R $ " * $ ( $ $ & $ & 6 P $ TTTTTTTTTX-R
0x2df4ec…2df680 Dummy {f00=0x0020, f01=0x0190, f02=» $ & F @ % TTTX % $ " * % 8 ( % L . % X & % h & % v & % & % BKO % $ * % & % OMR % $ * % & %
0x2df680…2df814 (2, 84) Dummy {f00=0x0020, f01=0x018e, f02=» * % $ * & & & PER FRA PER TIL & ( $ * & H & & X $ * & f $ w* & v ( & 6 & & & & & & & & & BKO & $ * & & &
0x2df814…2df9a8 Dummy {f00=0x0020, f01=0x0190, f02=» & & ' $ * ' $ * ' & $ * ' 6 $ * ' F & ' V PER FRA PER TIL ' d $ * ' & ' MTB ' $ * ' & ' $ * ' $ * ' $ w* ' (
0x2df9a8…2dfb3c Dummy {f00=0x0020, f01=0x0190, f02=»3-2P ' $ * ( ( ( ( ( & ( 8 SIDE 51-3P ( F $ * ( ` ( ( p ( | & ( SIDE 53-3P ( $ * ( ( ( ( & ( FEJL FORMATR (
0x2dfb3c…2dfcd0 Dummy {f00=0x0020, f01=0x0190, f02=» ( ARKIV@ ) $ * ) KONTONRL ) 0 $ * ) H & ) X & KONTROLSUM ) f & ) ~ LINIES ) $ * ) & ) & ) & T ) XXXXXXXXE-XX ) " *
0x2dfcd0…2dfe64 Dummy {f00=0x0020, f01=0x0190, f02=» z* ) ( * ] * & * ( & * 6 & * D & * R & * ` & * n & < * | & * & GL. SALDOM * & * LINIE NR * $ * * & CHECKD * & *
0x2dfe64…2dfff8 Dummy {f00=0x0020, f01=0x0190, f02=» * X + " * + $ z* + , & + < & + J KONTOKORTT + X $ * + r & + LINIE NR + $ * + & + & + XX + " * + $ z* +
0x2dfff8…2e018c Dummy {f00=0x0020, f01=0x40d0, f02=»FAST + LINIE NR , $ * , $ & , 4 & T , B XX , T " * T , f $ z* , x ( , " 1XFF 4 1XFF 4 1XFF 4 , , @ , + XX + " * + $ z* +
0x2e018c…2e0320 Dummy {f00=0x0020, f01=0x018e, f02=» : H IDENT DIVFMT TRA 4.2 80-03-17 F2 O2222 03.01.XXX.1 > : FRMTGP FRMTJT FRMTKT FRMTKV FRMTTA FRMTVO FRMXGP B & " FRMXJTV FRMXKTA FRMXTA0 FRMXVOF $$$TRA B > FRMTGPV Z FRMTJTF FRMTKTM F FRMTKV2 < FRMTTAX FRMTVO ( 8 4
0x2e0320…2e04b4 (2, 85) Dummy {f00=0x0020, f01=0x018e, f02=» , $ " - 4 ) D , o T 3 d 6 t = @ J F " D 0R FF 4 0R FF 4 0R FF 4 0R FF 4 0R FF 4 0R FF 4 0R G J
0x2e04b4…2e0648 Dummy {f00=0x0020, f01=0x018e, f02=» " ** " ** " ** $ " ** 4 " ** D " ** T " ** d " ** t " ** " ** ( $ * $ * & $ * (
0x2e0648…2e07dc Dummy {f00=0x0020, f01=0x0190, f02=» & X " * $ & 8 $ &* F $ .* V & f ( t $ * ( < $ * & & * $ &* $ **
0x2e07dc…2e0970 Dummy {f00=0x0020, f01=0x0190, f02=» BBZ " * $ .* , & < XX J " * & p ZZZ ~ " * & ( $ * ( ; $ *
0x2e0970…2e0b04 Dummy {f00=0x0020, f01=0x0190, f02=» ZZ.ZZ.ZZ " * & 4 $ .* B BBBZZ R " * h BBZZ | " * BZZ " * BBZB " * (
0x2e0b04…2e0c98 Dummy {f00=0x0020, f01=0x0190, f02=» ( $ * $ ( 4 @ $ * P $ $* ` B999 p " * & & $ ** & & BZZZZZZZZZZ " *
0x2e0c98…2e0e2c Dummy {f00=0x0020, f01=0x0190, f02=» * ( $ $* ( $ &* 8 $ ** H ( X + d & t & ZZ " * BZZ.ZZ.ZZ " * BBX " *
0x2e0e2c…2e0fc0 Dummy {f00=0x0020, f01=0x0190, f02=» ( $ % B999E-99E-999E-99B ( " %* J ( ^ & j & z ' XE-XXE-XXE-XXB " '* & & ( XXXXXXE-XXXX " (*
0x2e0fc0…2e1154 (2, 86) Dummy {f00=0x0020, f01=0x018e, f02=» & ( , ( - XXXXXXXXE-XX 8 " -* T ( h . t / BBZZZE-ZZE-ZZZE-ZZ " /* ( 0 2 & 1 ZZ.ZZ.ZZ " 1*
0x2e1154…2e12e8 Dummy {f00=0x0020, f01=0x0190, f02=» 5 BZZ " 5* 6 BZZ.ZZ.ZZ 0 " 6* J 7 BZZ.ZZ.ZZ ^ " 7* x 8 BZ " 8* ( * 9 " :** " <** " @** " B**
0x2e12e8…2e147c Dummy {f00=0x0020, f01=0x0190, f02=»" d** " j** " ** ( . : : & J $ * X ; KVIT h $ ;* ~ ( < & $ =* ( = $ * & >
0x2e147c…2e1610 Dummy {f00=0x0020, f01=0x0190, f02=» A START SUM* $ A* $ ( 4 B @ $ * P C SUM ` $ C* t ( D $ E* ( E a & & * & * & &
0x2e1610…2e17a4 Dummy {f00=0x0020, f01=0x018e, f02=»MASKIN NR $ H* I EKS.LBNR " $ I* < & L & Z & * h J 99.99.999.9 x " J* S & K 99E-99E-99 " K* S & L 99E-99E-99
0x2e17a4…2e1938 Dummy {f00=0x0020, f01=0x018e, f02=» & & 6 2 0 O *VERSURKONTONR KASSEKONTONR PRIMO KASSE $ O* Z & j & x P B999.99.999.99BBBS " P* S Q B999.99.999.99BBBS " Q* S R ZZZ.ZZZ.ZZ9.ZZ-B
0x2e1938…2e1acc Dummy {f00=0x0020, f01=0x0190, f02=» & & * & * & . U KASSELUKNING < $ U* X & h & v & V T[LLER $ V* & W DEBET $ W* & X KREDIT
0x2e1acc…2e1c60 Dummy {f00=0x0020, f01=0x0190, f02=» S " BBZZZ.ZZZ.ZZZ.ZZ9.99-O " * 0 " ] BBZZZ.ZZZ.ZZZ.ZZ9.99-O F " ]* l ( ^ _ START TEST $ _* ( ` a SLUT TESTT $
0x2e1c60…2e1df4 (2, 87) Dummy {f00=0x0021, f01=0x0190, f02=» $ e* ( e $ $* 0 f BZZZ @ " f* T g B*.***.***.**9.99- h " g* & h ADM $ h* i BZZ " i* (
0x2e1df4…2e1f88 Dummy {f00=0x0021, f01=0x0190, f02=» $ n* ( n $ & 4 & DIVERSE FORMATER B ( ` * o 0 l " p** | " u** " ** " ** " u** " p** " u** " x** " x**
0x2e1f88…2e211c Dummy {f00=0x0021, f01=0x0190, f02=» ** " ** " ** " ** , " ** < " ** L " ** ( l p x $ q* ( q # $ * & & r B**B " r* S
0x2e211c…2e22b0 Dummy {f00=0x0021, f01=0x0190, f02=»( u $ v* ( * v 6 $ * F & V w ******E-**** d " w* S & * & & * $ * ( x $ y* (
0x2e22b0…2e2444 Dummy {f00=0x0021, f01=0x0190, f02=» & & | BBZZ.ZZ.ZZBBBR $ " |* S B & V } ZZZZ9999.99B d " }* S $ ,* $ * ( ~ $ * ( - & +
0x2e2444…2e25d8 Dummy {f00=0x0021, f01=0x0190, f02=» 99 " * B999 0 " * D BZZZZZZZZZZB V " * S r & & * $ * ( $ * $ * $ * (
0x2e25d8…2e276c Dummy {f00=0x0021, f01=0x0190, f02=» ( ( , 8 ( H T ( d p ( ( ( ( (
0x2e276c…2e2900 Dummy {f00=0x0021, f01=0x0190, f02=» $ * B99.99.99M " * 2 & D 99 T " * f ( x B999.99.999.99B " * S *.***.***.**9.99- " * S &
0x2e2900…2e2a94 (2, 88) Dummy {f00=0x0021, f01=0x0190, f02=» B999B " * 99BS , " * S @ ( T ` $ * p B*.***.***.**9.99- " * S & & ( B99B "
0x2e2a94…2e2c28 Dummy {f00=0x0021, f01=0x0190, f02=» & $ &* B*.***.***.**9.99- " * S @ & T & d $ !* r ( & + & * 999B " * $ * B99.99.99M
0x2e2c28…2e2dbc Dummy {f00=0x0021, f01=0x0190, f02=»E-9999999999B9 " * S XX.XXPPO * " * S B BXBS V " * S j ( ~ & XX " * S & XX " * S
0x2e2dbc…2e2f50 Dummy {f00=0x0021, f01=0x018e, f02=» *.***.***.**9.99-- " * S & 2 & B ( P & l ****9 | " * & ****9 " * ( * & " m**
0x2e2f50…2e30e4 Dummy {f00=0x0021, f01=0x0190, f02=» " ** " ** " ** ( " ** 8 " ** H " ** X " ** h " ** x " ** ( $ * ( & + & AR
0x2e30e4…2e3278 Dummy {f00=0x0021, f01=0x0190, f02=» ( $ * $ * 0 ( @ L & + $ * j ( z $ * & & 0 $ * ( $ * (
0x2e3278…2e340c Dummy {f00=0x0021, f01=0x0190, f02=» $ * ( ( & + 8 999B F " * Z B99.99.99B l " * ****9 " * - $ * $ * &
0x2e340c…2e35a0 Dummy {f00=0x0021, f01=0x018e, f02=» ( L & + & * . 999S > " * R BB99.99.99 d " * ~ BBZ999 " * BB****9O " * & - $ * &
0x2e35a0…2e3734 (2, 89) Dummy {f00=0x0021, f01=0x0190, f02=» KONTONRO ! $ * ! & ! , T[LLER ! : $ * ! P & ! ` & NETTOS ! n & ! DEBET ! $ * ! & ! KREDIT ! $ * ! ( ! !
0x2e3734…2e38c8 Dummy {f00=0x0021, f01=0x0190, f02=» " * " " BBZZZ.ZZZ.ZZZ.ZZ9.99- " " * S " < " BBZZZ.ZZZ.ZZZ.ZZ9.99- " P " * " v " BBZZZ.ZZZ.ZZZ.ZZ9.99- " " * " ( " " $ * " ( "
0x2e38c8…2e3a5c Dummy {f00=0x0021, f01=0x0190, f02=»Z.ZZ9.99- " | " * # " BBZZZ.ZZZ.ZZZ.ZZ9.99- # ( " * # N ( # d # p $ * # ( # U # & 4 # & TOTAL # " BBZZZ.ZZZ.ZZZ.ZZ9.99- # " * # "
0x2e3a5c…2e3bf0 Dummy {f00=0x0021, f01=0x0190, f02=» # & SUPL $ " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ " * $ @ " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ T " * $ z " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ " * $ & $ & 2 $ & KOR $ & $ "
0x2e3bf0…2e3d84 Dummy {f00=0x0021, f01=0x0190, f02=» $ $ * % ( % C % ( & 4 % 8 999E-99E-999E-99 % F " * % f & % x & PRIMO % " BBZZZ.ZZZ.ZZZ.ZZ9.99- % " * I % & % & % & 2 % & BEV %
0x2e3d84…2e3f18 Dummy {f00=0x0021, f01=0x0190, f02=»ZZZ.ZZZ.ZZ9.99- % " * O & & & , & 2 & : & ULTIMO & H " BBZZZ.ZZZ.ZZZ.ZZ9.99- & " * I & & & ( & & $ * & ( & 5 & & & & * &
0x2e3f18…2e40ac Dummy {f00=0x0021, f01=0x0190, f02=» * & & ' & * ' & ' ( & ' 6 & 2 ' D & * ' R & * ' ` & 4 ' n T[LLER ' | $ * ' & ' KONTONRO ' $ * ' & ' BEV.PERIODET ' $
0x2e40ac…2e4240 Dummy {f00=0x0021, f01=0x0190, f02=» ' & 2 ( ZZ ( " * I ( , & ( > BXXX.XX.XXX.XXBE ( L " * ( l " BBZZZ.ZZZ.ZZZ.ZZ9.99- ( " * ( " BBZZZ.ZZZ.ZZZ.ZZ9.99- ( " * ( ( (
0x2e4240…2e43d4 (2, 90) Dummy {f00=0x0021, f01=0x0190, f02=» ( & < ) & < ) & < ) $ & ] ) 2 & N ) @ & N ) N & N ) & E ) j & S ) x & S ) & S ) & [ ) & ) ( ) ) $ * ) ( ) )
0x2e43d4…2e4568 Dummy {f00=0x0021, f01=0x0190, f02=»" * ) & * * & * ZZ999999 * . " * * F & * Z ( * h * t $ * * ( * * & 2 * & * " BBZZZ.ZZZ.ZZZ.ZZ9.99- * " * * "
0x2e4568…2e46fc Dummy {f00=0x0021, f01=0x0190, f02=» " p** + " u** + " ** + $ " ** + 4 " u** + D " p** + T " u** + d " x** + t " x** + " u** + " ~** + ( + + & + + $ * + $ * + ( +
0x2e46fc…2e4890 Dummy {f00=0x0021, f01=0x0190, f02=»** + " ** , " ** , " ** , * ( , : , F ( , V , b $ p* , r $ !* , ( , , $ u* , $ !* , ( , , $ ~* , $ !* ,
0x2e4890…2e4a24 Dummy {f00=0x0021, f01=0x0190, f02=»PO , " * - BXX - " * - 2 & - F $ * - V ( - f - r $ * - ( - - - $ * - $ * - & - XX.XXPPO - " * -
0x2e4a24…2e4bb8 Dummy {f00=0x0021, f01=0x0190, f02=»* - " * . $ * . ( . . ! . : & . J & . Z & . j & . x " *.***.***.**9.99-. . " "* . # B99. . " #* . $ 9 . " $* . &
0x2e4bb8…2e4d4c Dummy {f00=0x0021, f01=0x0190, f02=» ( . ( / & + / ) BB99.99.99 / * " )* / D & / V * *.***.***.**9.99-. / d " ** / & / + TRP / $ +* / ( / * , / " m** / ( / * -
0x2e4d4c…2e4ee0 Dummy {f00=0x0021, f01=0x0190, f02=» . / & 0 & 0 & 0 * & * 0 8 & 0 F ( 0 T / 0 ` $ 0* 0 p ( 0 0 0 & 0 0 & * 0 1 *.***.***.**9.99+B 0 " 1* 0 $ 6* 0 ( 0
0x2e4ee0…2e5074 (2, 91) Dummy {f00=0x0022, f01=0x417e, f02=» 0 5 Z.ZZZ.ZZZ.ZZ9.99-B 1 " 5* 1 * & 1 < ( 1 J 6 1 V & 1 f & 1 t & 1 & 1 & 1 & 1 & 1 ( 1 * 7 1 " m** 1 ( 1 * 8
0x2e5074…2e5208 Dummy {f00=0x0022, f01=0x018e, f02=» : H IDENT DIV461 TRA 4.2 80-03-17 F2 O2222 03.01.XXX.1 > : FRMTGP FRMTJT FRMTKT FRMTKV FRMTTA FRMTVO FRMXGP B & " FRMXJTV FRMXKTA FRMXTA0 FRMXVOF $$$TRA B > FRMTGPV Z FRMTJTF FRMTKTM F FRMTKV2 < FRMTTAX FRMTVO ( 8 4
0x2e5208…2e539c Dummy {f00=0x0022, f01=0x018e, f02=» + $ " , 4 ) D , o T 3 d 6 t = @ J F " D 0R FF 4 0R FF 4 0R FF 4 0R FF 4 0R FF 4 0R FF 4 0R G J
0x2e539c…2e5530 Dummy {f00=0x0022, f01=0x018e, f02=» " ** " ** " ** $ " ** 4 " ** D " ** T " ** d " ** t " ** " ** ( $ * $ * & $ * (
0x2e5530…2e56c4 Dummy {f00=0x0022, f01=0x0190, f02=» & X " * $ & 8 $ &* F $ .* V & f ( t $ * ( < $ * & & * $ &* $ **
0x2e56c4…2e5858 Dummy {f00=0x0022, f01=0x0190, f02=» BBZ " * $ .* , & < XX J " * & p ZZZ ~ " * & ( $ * ( ; $ *
0x2e5858…2e59ec Dummy {f00=0x0022, f01=0x0190, f02=» ZZ.ZZ.ZZ " * & 4 $ .* B BBBZZ R " * h BBZZ | " * BZZ " * BBZB " * (
0x2e59ec…2e5b80 Dummy {f00=0x0022, f01=0x0190, f02=» ( $ * $ ( 4 @ $ * P $ $* ` B999 p " * & & $ ** & & BZZZZZZZZZZ " *
0x2e5b80…2e5d14 (2, 92) Dummy {f00=0x0022, f01=0x0190, f02=» * ( $ $* ( $ &* 8 $ ** H ( X + d & t & ZZ " * BZZ.ZZ.ZZ " * BBX " *
0x2e5d14…2e5ea8 Dummy {f00=0x0022, f01=0x0190, f02=» ( $ % B999E-999E-99E-99B ( " %* J ( ^ & j & z ' XE-XXE-XXE-XXB " '* & & ( XXXXXXE-XXXX " (*
0x2e5ea8…2e603c Dummy {f00=0x0022, f01=0x0190, f02=» & ( , ( - XXXXXXXXE-XX 8 " -* T ( h . t / BBZZZE-ZZZE-ZZE-ZZ " /* ( 0 2 & 1 ZZ.ZZ.ZZ " 1*
0x2e603c…2e61d0 Dummy {f00=0x0022, f01=0x0190, f02=» 5 BZZ " 5* 6 BZZ.ZZ.ZZ 0 " 6* J 7 BZZ.ZZ.ZZ ^ " 7* x 8 BZ " 8* ( * 9 " :** " <** " @** " B**
0x2e61d0…2e6364 Dummy {f00=0x0022, f01=0x0190, f02=»" d** " j** " ** ( . : : & J $ * X ; KVIT h $ ;* ~ ( < & $ =* ( = $ * & >
0x2e6364…2e64f8 Dummy {f00=0x0022, f01=0x0190, f02=» A START SUM* $ A* $ ( 4 B @ $ * P C SUM ` $ C* t ( D $ E* ( E a & & * & * & &
0x2e64f8…2e668c Dummy {f00=0x0022, f01=0x018e, f02=»MASKIN NR $ H* I EKS.LBNR " $ I* < & L & Z & * h J 99.99.999.9 x " J* S & K 99E-99E-99 " K* S & L 99E-99E-99
0x2e668c…2e6820 Dummy {f00=0x0022, f01=0x0190, f02=» & & 6 2 0 O *VERSURKONTONR KASSEKONTONR PRIMO KASSE $ O* Z & j & x P 999E-99999E-99BB " P* S Q 999E-99999E-99BB " Q* S R ZZZ.ZZZ.ZZ9.ZZ-B
0x2e6820…2e69b4 (2, 93) Dummy {f00=0x0022, f01=0x0190, f02=»& & * & * & ( U KASSELUKNING 6 $ U* R & b & p & ~ V T[LLER $ V* & W DEBET $ W* & X KREDIT
0x2e69b4…2e6b48 Dummy {f00=0x0022, f01=0x0190, f02=» " BBZZZ.ZZZ.ZZZ.ZZ9.99-O " * * " ] BBZZZ.ZZZ.ZZZ.ZZ9.99-O @ " ]* f ( | ^ _ START TEST $ _* ( ` a SLUT TESTT $ a*
0x2e6b48…2e6cdc Dummy {f00=0x0022, f01=0x018e, f02=»$ e* ( e $ $* * f BZZZ : " f* N g B*.***.***.**9.99- b " g* & h ADM $ h* i BZZ " i* ( j
0x2e6cdc…2e6e70 Dummy {f00=0x0022, f01=0x0190, f02=» $ n* ( n & 0 & DIVERSE FORMATER > ( * o 0 h " p** x " u** " ** " ** " u** " p** " u** " x** " x**
0x2e6e70…2e7004 Dummy {f00=0x0022, f01=0x018e, f02=» " ** " ** " ** ( " ** 8 " ** H " ** X ( h p t $ q* ( q # $ * & & r B**B " r* S
0x2e7004…2e7198 Dummy {f00=0x0022, f01=0x018e, f02=» u $ v* ( ( v 4 $ * D & T w ******E-**** b " w* S ~ & * & & * $ * ( x $ y* (
0x2e7198…2e732c Dummy {f00=0x0022, f01=0x0190, f02=» & & | BBZZ.ZZ.ZZBBBR $ " |* S B & V } ZZZZ9999.99B d " }* S $ ,* $ * ( ~ $ * ( - & +
0x2e732c…2e74c0 Dummy {f00=0x0022, f01=0x0190, f02=» 99 " * B999 0 " * D BZZZZZZZZZZB V " * S r & & * $ * ( $ * $ * $ * (
0x2e74c0…2e7654 (2, 94) Dummy {f00=0x0022, f01=0x0190, f02=» ( ( , 8 ( H T ( d p ( ( ( ( (
0x2e7654…2e77e8 Dummy {f00=0x0022, f01=0x018e, f02=» $ * B99.99.99M " * 2 & D 99 T " * f ( x B999.99999.99B " * S *.***.***.**9.99- " * S &
0x2e77e8…2e797c Dummy {f00=0x0022, f01=0x0190, f02=» B999B " * 99BS , " * S @ ( T ` $ * p B*.***.***.**9.99- " * S & & ( B99B "
0x2e797c…2e7b10 Dummy {f00=0x0022, f01=0x0190, f02=» & $ &* B*.***.***.**9.99- " * S @ & T & d $ * r ( & + & * 999B " * $ * B99.99.99M
0x2e7b10…2e7ca4 Dummy {f00=0x0022, f01=0x0190, f02=»E-9999999999B9 " * S XX.XXPPO * " * S B BXBS V " * S j ( ~ & XX " * S & XX " * S
0x2e7ca4…2e7e38 Dummy {f00=0x0022, f01=0x018e, f02=» *.***.***.**9.99-- " * S & 2 & B ( P & l ****9 | " * & ****9 " * ( * $ " m**
0x2e7e38…2e7fcc Dummy {f00=0x0022, f01=0x0190, f02=» " ** " ** " ** ( " ** 8 " ** H " ** X " ** h " ** x ( $ * ( & + & ARKIV $
0x2e7fcc…2e8160 Dummy {f00=0x0022, f01=0x0190, f02=» $ * $ * ( 0 < & + L $ * Z ( j v $ * & & 0 $ * ( $ * (
0x2e8160…2e82f4 (2, 95) Dummy {f00=0x0023, f01=0x0190, f02=» * ( & + ( 999B 6 " * J B99.99.99B " * v ****9 " * - $ * $ * & TOTAL
0x2e82f4…2e8488 Dummy {f00=0x0023, f01=0x0190, f02=» L & + & * 999S . " * B BB99.99.99 T " * n BBZ999 " * BB****9O " * & - $ * & & *
0x2e8488…2e861c Dummy {f00=0x0023, f01=0x018e, f02=»RO $ * ! & ! T[LLER ! ( $ * ! > & ! N & NETTOS ! & ! p DEBET ! ~ $ * ! & ! KREDIT ! $ * ! ( ! ! $ * ! (
0x2e861c…2e87b0 Dummy {f00=0x0023, f01=0x0190, f02=» " BBZZZ.ZZZ.ZZZ.ZZ9.99- " " * S " * " BBZZZ.ZZZ.ZZZ.ZZ9.99- " > " * " d " BBZZZ.ZZZ.ZZZ.ZZ9.99- " z " * " ( " " $ * " ( " " & 2 "
0x2e87b0…2e8944 Dummy {f00=0x0023, f01=0x0190, f02=» " * " " BBZZZ.ZZZ.ZZZ.ZZ9.99- # " * # < ( # R # ^ $ * # n ( # ~ U # & 4 # & TOTAL # " BBZZZ.ZZZ.ZZZ.ZZ9.99- # " * # " BBZZZ.ZZZ.
0x2e8944…2e8ad8 Dummy {f00=0x0023, f01=0x0190, f02=» # " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ " * $ . " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ B " * $ h " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ ~ " * $ & $ & 2 $ & KOR $ & $ " BBZZZ.ZZZ.
0x2e8ad8…2e8c6c Dummy {f00=0x0023, f01=0x0190, f02=» * $ ( % C % & 4 % & 999E-99999E-99 % 4 " * % R & % d & PRIMO % r " BBZZZ.ZZZ.ZZZ.ZZ9.99- % " * I % & % & % & 2 % & BEV % " BBZZZ.
0x2e8c6c…2e8e00 Dummy {f00=0x0023, f01=0x0190, f02=» " * O & & & & 2 & & & ULTIMO & 4 " BBZZZ.ZZZ.ZZZ.ZZ9.99- & H " * I & n & & ( & & $ * & ( & 5 & & & & * & 999B &
0x2e8e00…2e8f94 (2, 96) Dummy {f00=0x0023, f01=0x018e, f02=» & * ' & ' & ' " & 2 ' 0 & * ' > & * ' L & 4 ' Z T[LLER ' h $ * ' ~ & ' KONTONRO ' $ * ' & ' BEV.PERIODET ' $ * ' & '
0x2e8f94…2e9128 Dummy {f00=0x0023, f01=0x018e, f02=» ' ZZ ( " * I ( & ( , XXXE-XXXXXE-XX ( : " * ( X " BBZZZ.ZZZ.ZZZ.ZZ9.99- ( n " * ( " BBZZZ.ZZZ.ZZZ.ZZ9.99- ( " * ( ( ( ( & 2
0x2e9128…2e92bc Dummy {f00=0x0023, f01=0x0190, f02=» & < ) & < ) & ] ) & N ) . & N ) < & N ) J & E ) X & S ) f & S ) t & S ) & [ ) & ) ( ) ) $ * ) ( ) ) & + )
0x2e92bc…2e9450 Dummy {f00=0x0023, f01=0x018e, f02=» & * ) & * ZZ999999 * " * * 4 & * H ( * V * b $ * * r ( * * & 2 * & * " BBZZZ.ZZZ.ZZZ.ZZ9.99- * " * * " BBZZZ.ZZZ.ZZZ.
0x2e9450…2e95e4 Dummy {f00=0x0023, f01=0x0190, f02=» * " p** + " u** + " x** + ( " x** + 8 " u** + H " ~** + X ( + h + t & + + $ * + $ * + ( + * + " ** + " ** + " ** + " ** +
0x2e95e4…2e9778 Dummy {f00=0x0023, f01=0x0190, f02=» + ( , , $ p* , & $ * , 6 ( , F , R $ u* , b $ * , r ( , , $ ~* , $ * , ( , , $ * , ( , ,
0x2e9778…2e990c Dummy {f00=0x0023, f01=0x0190, f02=» , $ * - ( - - & $ * - 6 ( - F - - R $ * - b $ * - r & - XX.XXPPO - " * - & - B** - " * - B** -
0x2e990c…2e9aa0 Dummy {f00=0x0023, f01=0x0190, f02=»& - & . & . & . , ! *.***.***.**9.99-. . : " !* . " B99. . n " "* . # 9 . " #* . & . $ 99B . " $* . ( . * % .
0x2e9aa0…2e9c34 (2, 97) Dummy {f00=0x0023, f01=0x0190, f02=» . & / ) *.***.***.**9.99-. / " )* / : & / L * TRP / Z $ ** / n ( / ~ * + / " m** / ( / * , / " -** / " .** / " .** / " 1** /
0x2e9c34…2e9dc8 Dummy {f00=0x0023, f01=0x0190, f02=» / ( 0 . 0 $ /* 0 $ ( 0 4 / 0 @ & 0 0 P & * 0 ^ 0 *.***.***.**9.99+B 0 n " 0* 0 $ 5* 0 ( 0 1 0 & + 0 2 Z.ZZZ.ZZZ.ZZ9.99-B 0 " 2*
0x2e9dc8…2e9f5c Dummy {f00=0x0023, f01=0x4132, f02=»( 0 5 1 & 1 & 1 ( & 1 6 & 1 D & 1 R & 1 ` & 1 n ( 1 | * 6 1 " m** 1 ( 1 * 7 1 " m** 1 ( 1 8 4 2 @FF 4 0R FF 4 0R FF 4 0R FF
0x2e9f5c…2ea0f0 Dummy {f00=0x0023, f01=0x018e, f02=» : H IDENT DIV167 TRA 4.2 80-03-17 F2 O2222 03.01.XXX.1 > : FRMTGP FRMTJT FRMTKT FRMTKV FRMTTA FRMTVO FRMXGP B & " FRMXJTV FRMXKTA FRMXTA0 FRMXVOF $$$TRA B > FRMTGPV Z FRMTJTF FRMTKTM F FRMTKV2 < FRMTTAX FRMTVO ( 8 4
0x2ea0f0…2ea284 Dummy {f00=0x0023, f01=0x018e, f02=» * $ " + 4 ) D , o T 3 d 6 t = @ J F " D 0R FF 4 0R FF 4 0R FF 4 0R FF 4 0R FF 4 0R FF 4 0R G J
0x2ea284…2ea418 Dummy {f00=0x0023, f01=0x018e, f02=» " ** " ** " ** $ " ** 4 " ** D " ** T " ** d " ** t " ** " ** ( $ * $ * & $ * (
0x2ea418…2ea5ac Dummy {f00=0x0023, f01=0x0190, f02=» & X " * $ & 8 $ &* F $ .* V & f ( t $ * ( < $ * & & * $ &* $ **
0x2ea5ac…2ea740 Dummy {f00=0x0023, f01=0x0190, f02=» BBZ " * $ .* , & < XX J " * & p ZZZ ~ " * & ( $ * ( ; $ *
0x2ea740…2ea8d4 (2, 98) Dummy {f00=0x0023, f01=0x0190, f02=» ZZ.ZZ.ZZ " * & 4 $ .* B BBBZZ R " * h BBZZ | " * BZZ " * BBZB " * (
0x2ea8d4…2eaa68 Dummy {f00=0x0023, f01=0x0190, f02=» ( $ * $ ( 4 @ $ * P $ $* ` B999 p " * & & $ ** & & BZZZZZZZZZZ " *
0x2eaa68…2eabfc Dummy {f00=0x0023, f01=0x0190, f02=» * ( $ $* ( $ &* 8 $ ** H ( X + d & t & ZZ " * BZZ.ZZ.ZZ " * BBX " *
0x2eabfc…2ead90 Dummy {f00=0x0023, f01=0x0190, f02=» ( $ % B999V99V999E-99B ( " %* H ( & h & x ' XE-XXE-XXE-XXB " '* & & ( XXXXXXE-XXXX " (*
0x2ead90…2eaf24 Dummy {f00=0x0023, f01=0x0190, f02=» & ( , $ - XXXXXXXXE-XX 4 " -* P ( d . p / BBZZZVZZVZZZE-ZZ " /* ( 0 2 & 1 ZZ.ZZ.ZZ " 1*
0x2eaf24…2eb0b8 Dummy {f00=0x0023, f01=0x018e, f02=» 5 BZZ " 5* 6 BZZ.ZZ.ZZ ( " 6* B 7 BZZ.ZZ.ZZ V " 7* p 8 BZ " 8* ( * 9 " :** " <** " @** " B**
0x2eb0b8…2eb24c Dummy {f00=0x0023, f01=0x0190, f02=» " j** " ** ( ( : 4 & D $ * R ; KVIT b $ ;* x ( < & $ =* ( = $ * & > KONT
0x2eb24c…2eb3e0 Dummy {f00=0x0023, f01=0x0190, f02=» A START SUM* $ A* ( . B : $ * J C SUM Z $ C* n ( ~ D $ E* ( E a & & * & * & & VERS
0x2eb3e0…2eb574 (2, 99) Dummy {f00=0x0024, f01=0x0190, f02=» NR $ H* I EKS.LBNR $ I* 6 & F & T & * b J 99.99.999.9 r " J* S & K 99E-99E-99 " K* S & L 99E-99E-99 " L
0x2eb574…2eb708 Dummy {f00=0x0024, f01=0x0190, f02=» & 6 2 0 O *VERSURKONTONR KASSEKONTONR PRIMO KASSE $ O* R & b & p P 999V99V999E-99BK ~ " P* S Q 999V99V999E-99BK " Q* S R ZZZ.ZZZ.ZZ9.ZZ-K " R
0x2eb708…2eb89c Dummy {f00=0x0024, f01=0x0190, f02=» & * & * & U KASSELUKNING . $ U* J & Z & h & v V T[LLER $ V* & W DEBET $ W* & X KREDIT $
0x2eb89c…2eba30 Dummy {f00=0x0024, f01=0x018e, f02=» BBZZZ.ZZZ.ZZZ.ZZ9.99-O " * " " ] BBZZZ.ZZZ.ZZZ.ZZ9.99-O 8 " ]* ^ ( t ^ _ START TEST $ _* ( ` a SLUT TESTT $ a* (
0x2eba30…2ebbc4 Dummy {f00=0x0024, f01=0x0190, f02=» ( e $ $* $ f BZZZ 4 " f* H g B*.***.***.**9.99- " g* ~ & h ADM $ h* i BZZ " i* ( j
0x2ebbc4…2ebd58 Dummy {f00=0x0024, f01=0x0190, f02=» n* ( n & ( & DIVERSE FORMATER 6 ( T * o 0 ` " p** p " u** " ** " ** " u** " p** " u** " x** " x** " u**
0x2ebd58…2ebeec Dummy {f00=0x0024, f01=0x0190, f02=» " ** " ** " ** " ** 0 " ** @ " ** P ( ` p l $ q* | ( q # $ * & & r BE " r* S s ZZ.Z
0x2ebeec…2ec080 Dummy {f00=0x0024, f01=0x0190, f02=» $ v* ( v & $ * 6 & F w ******E-**** T " w* S p & * & & * $ * ( x $ y* ( y 1
0x2ec080…2ec214 (2, 100) Dummy {f00=0x0024, f01=0x0190, f02=» & | BBZZ.ZZ.ZZBBBR " |* S 0 & D } ZZZZ9999.99B R " }* S n $ &* $ * ( ~ $ * ( & & + & *
0x2ec214…2ec3a8 Dummy {f00=0x0024, f01=0x018e, f02=»" * BZZZZZZZZZZB " * S , & @ & * P $ * ^ ( n z $ * $ * $ * ( $ * $ * $ *
0x2ec3a8…2ec53c Dummy {f00=0x0024, f01=0x0190, f02=» ( ( , ( < H ( X d ( t ( ( ( ( & +
0x2ec53c…2ec6d0 Dummy {f00=0x0024, f01=0x0190, f02=» & 99 " * " ( 4 @ B999V99V999E-99B P " * S p *.***.***.**9.99- " * S & & ( & &
0x2ec6d0…2ec864 Dummy {f00=0x0024, f01=0x0190, f02=» * S ( $ * , B*.***.***.**9.99- < " * S ^ & r & ( B99B " * S & & &
0x2ec864…2ec9f8 Dummy {f00=0x0024, f01=0x0190, f02=» * S & & $ * . ( > J & + Z & * h 999B x " * $ * B99.99.99M " * BXX. " * S (
0x2ec9f8…2ecb8c Dummy {f00=0x0024, f01=0x0190, f02=»" * S BXBS " * S & ( : F & V XX f " * S x & XX " * S E-9999999999B9 " * S XX.XXPPO
0x2ecb8c…2ecd20 Dummy {f00=0x0024, f01=0x018e, f02=»& ( & ( ****9 8 " * N & ` ****9 n " * ( * $ " m** " ** " ** " ** " ** "
0x2ecd20…2eceb4 (2, 101) Dummy {f00=0x0024, f01=0x0190, f02=» " ** " ** " ** $ " ** 4 ( D P $ * ` ( p | & + & ARKIV $ * $ .* & & * *.
0x2eceb4…2ed048 Dummy {f00=0x0024, f01=0x018e, f02=» & + $ * ( & 2 $ * B & R & 0 ` $ * n ( ~ $ * ( $ * & & 0 & 0 & 0
0x2ed048…2ed1dc Dummy {f00=0x0024, f01=0x0190, f02=» " * B99.99.99B " * 4 ****9 F " * - n $ * $ * & TOTAL $ * *.***.***.**9,99+- " *
0x2ed1dc…2ed370 Dummy {f00=0x0024, f01=0x0190, f02=» " * BB99.99.99 " * , BBZ999 > " * T BB****9O f " * ~ & - $ * & & * & & * & & 2
0x2ed370…2ed504 Dummy {f00=0x0024, f01=0x0190, f02=» * & ! & NETTOS ! & ! . DEBET ! < $ * ! R & ! b KREDIT ! p $ * ! ( ! ! $ * ! ( ! $ ! & 2 ! XXXVXXVXXXE-XX !
0x2ed504…2ed698 Dummy {f00=0x0024, f01=0x0190, f02=» BBZZZ.ZZZ.ZZZ.ZZ9.99- ! " * " " BBZZZ.ZZZ.ZZZ.ZZ9.99- " 6 " * " ( " r " ~ $ * " ( " " & 2 " ZZ " " * " " BBZZZ.ZZZ.ZZZ.ZZ9.99
0x2ed698…2ed82c Dummy {f00=0x0024, f01=0x0190, f02=» " ( # # $ * # * ( # : U # F & 4 # V & TOTAL # d " BBZZZ.ZZZ.ZZZ.ZZ9.99- # x " * # " BBZZZ.ZZZ.ZZZ.ZZ9.99- # " * # " BBZZZ.ZZZ.ZZZ.ZZ9.99
0x2ed82c…2ed9c0 Dummy {f00=0x0024, f01=0x0190, f02=» BBZZZ.ZZZ.ZZZ.ZZ9.99- # " * $ $ " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ : " * $ ` & $ v & 2 $ & KOR $ & $ " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ " * $ " BBZZZ.ZZZ.ZZZ.ZZ9.
0x2ed9c0…2edb54 (2, 102) Dummy {f00=0x0024, f01=0x0190, f02=»99E-99 $ " * % & % & PRIMO % . " BBZZZ.ZZZ.ZZZ.ZZ9.99- % B " * I % h & % z & % & 2 % & BEV % " BBZZZ.ZZZ.ZZZ.ZZ9.99- % " * O % " BBZZZ.ZZZ.ZZZ.ZZ
0x2edb54…2edce8 Dummy {f00=0x0024, f01=0x0190, f02=» " BBZZZ.ZZZ.ZZZ.ZZ9.99- & " * I & * & & < ( & J & V $ * & f ( & v 5 & & & & * & 999B & " * I & B99.99.99. & " * I & &
0x2edce8…2ede7c Dummy {f00=0x0024, f01=0x0190, f02=» & & * ' & 4 ' T[LLER ' $ $ * ' : & ' J KONTONRO ' X $ * ' p & ' BEV.PERIODET ' $ * ' & ' SALDO ' $ * ' & ' ( '
0x2ede7c…2ee010 Dummy {f00=0x0024, f01=0x018e, f02=»XXVXXXE-XX ' " * ( " BBZZZ.ZZZ.ZZZ.ZZ9.99- ( ( " * ( N " BBZZZ.ZZZ.ZZZ.ZZ9.99- ( d " * ( ( ( ( & 2 ( & ( ( ( ( & ( $
0x2ee010…2ee1a4 Dummy {f00=0x0024, f01=0x018e, f02=» & N ) & E ) & S ) & S ) . & S ) < & [ ) J & ) X ( ) f ) r $ * ) ( ) ) & + ) 99E-99E-99 ) " * ) & ) $ * )
0x2ee1a4…2ee338 Dummy {f00=0x0024, f01=0x018e, f02=» & * ( * * $ * * . ( * > * J & 2 * Z & * h " BBZZZ.ZZZ.ZZZ.ZZ9.99- * v " * * " BBZZZ.ZZZ.ZZZ.ZZ9.99- * " * * ( * * * " p
0x2ee338…2ee4cc Dummy {f00=0x0024, f01=0x018e, f02=» " u** + " ~** + ( + $ + 0 & + + @ $ * + N $ * + ^ ( + n * + z " ** + " ** + " ** + " ** + " ** + " ** + " ** + " ** +
0x2ee4cc…2ee660 Dummy {f00=0x0024, f01=0x0190, f02=» ( , , $ u* , $ * , 0 ( , @ , L $ ~* , $ * , l ( , | , $ * , ( , , $ * , $ * , & , XX.XXPPO ,
0x2ee660…2ee7f4 (2, 103) Dummy {f00=0x0025, f01=0x0190, f02=» ( - - - $ * - $ * - 0 & - @ XX.XXPPO - P " * - h & - | B** - " * - B** - " * - & - & - B** -
0x2ee7f4…2ee988 Dummy {f00=0x0025, f01=0x0190, f02=»*.***.***.**9.99-. - " * . ! B99. . , " !* . @ " 9 . R " "* . d & . v # 99B . " #* . ( . * $ . " %** . ( . % . $ &* . ( .
0x2ee988…2eeb1c Dummy {f00=0x0025, f01=0x0190, f02=» . & / ) TRP / $ )* / , ( / < * * / H " m** / X ( / h * + / t " ,** / " -** / " -** / " 0** / " 2** / " ** / " 4** / ( / ,
0x2eeb1c…2eecb0 Dummy {f00=0x0025, f01=0x018e, f02=» . / & 0 0 & * 0 / *.***.***.**9.99+B 0 , " /* 0 N $ 4* 0 ` ( 0 p 0 0 | & + 0 1 Z.ZZZ.ZZZ.ZZ9.99-B 0 " 1* 0 & 0 ( 0 2 0 & + 0
0x2eecb0…2eee44 Dummy {f00=0x0025, f01=0x40f2, f02=» & 1 & 1 & 1 & 1 . ( 1 < * 5 1 H " m** 1 X ( 1 h * 6 1 t " m** 1 ( 1 8 4 2 @FF 4 0R FF 4 0R FF 4 0R FF 4 0R FF 4 1 n 1 @ 1 0 & + 0
0x2eee44…2eefd8 Dummy {f00=0x0025, f01=0x018e, f02=» : H IDENT DIV259 TRA 4.2 80-03-17 F2 O2222 03.01.XXX.1 > : FRMTGP FRMTJT FRMTKT FRMTKV FRMTTA FRMTVO FRMXGP B & " FRMXJTV FRMXKTA FRMXTA0 FRMXVOF $$$TRA B > FRMTGPV Z FRMTJTF FRMTKTM F FRMTKV2 < FRMTTAX FRMTVO ( 8 4
0x2eefd8…2ef16c Dummy {f00=0x0025, f01=0x018e, f02=» + $ " , 4 ) D , o T 3 d 6 t = @ J F " D 0R FF 4 0R FF 4 0R FF 4 0R FF 4 0R FF 4 0R FF 4 0R G J
0x2ef16c…2ef300 Dummy {f00=0x0025, f01=0x018e, f02=» " ** " ** " ** $ " ** 4 " ** D " ** T " ** d " ** t " ** " ** ( $ * $ * & $ * (
0x2ef300…2ef494 (2, 104) Dummy {f00=0x0025, f01=0x0190, f02=» & X " * $ & 8 $ &* F $ .* V & f ( t $ * ( < $ * & & * $ &* $ **
0x2ef494…2ef628 Dummy {f00=0x0025, f01=0x0190, f02=» BBZ " * $ .* , & < XX J " * & p ZZZ ~ " * & ( $ * ( ; $ *
0x2ef628…2ef7bc Dummy {f00=0x0025, f01=0x0190, f02=» ZZ.ZZ.ZZ " * & 4 $ .* B BBBZZ R " * h BBZZ | " * BZZ " * BBZB " * (
0x2ef7bc…2ef950 Dummy {f00=0x0025, f01=0x0190, f02=» ( $ * $ ( 4 @ $ * P $ $* ` B999 p " * & & $ ** & & BZZZZZZZZZZ " *
0x2ef950…2efae4 Dummy {f00=0x0025, f01=0x0190, f02=» * ( $ $* ( $ &* 8 $ ** H ( X + d & t & ZZ " * BZZ.ZZ.ZZ " * BBX " *
0x2efae4…2efc78 Dummy {f00=0x0025, f01=0x0190, f02=» ( $ % BB99.99.99.99.99BBBR ( " %* L ( ` & l & | ' XE-XXE-XXE-XXB " '* & & ( XXXXXXE-XXXX " (*
0x2efc78…2efe0c Dummy {f00=0x0025, f01=0x0190, f02=»* & ( , * - XXXXXXXXE-XX : " -* V ( j . v / BBZZZE-ZZZE-ZZE-ZZ " /* ( 0 2 & 1 ZZ.ZZ.ZZ " 1*
0x2efe0c…2effa0 Dummy {f00=0x0025, f01=0x0190, f02=» 5 BZZ " 5* 6 BZZ.ZZ.ZZ 0 " 6* J 7 BZZ.ZZ.ZZ ^ " 7* x 8 BZ " 8* ( * 9 " :** " <** " @** " B**
0x2effa0…2f0134 (2, 105) Dummy {f00=0x0025, f01=0x0190, f02=»" d** " j** " ** ( . : : & J $ * X ; KVIT h $ ;* ~ ( < & $ =* ( = $ * & >
0x2f0134…2f02c8 Dummy {f00=0x0025, f01=0x0190, f02=» A START SUM* $ A* $ ( 4 B @ $ * P C SUM ` $ C* t ( D $ E* ( E a & & * & * & &
0x2f02c8…2f045c Dummy {f00=0x0025, f01=0x018e, f02=»MASKIN NR $ H* I EKS.LBNR " $ I* < & L & Z & * h J 99.99.999.9 x " J* S & K 99E-99E-99 " K* S & L 99E-99E-99
0x2f045c…2f05f0 Dummy {f00=0x0025, f01=0x018e, f02=» & & 6 2 0 O *VERSURKONTONR KASSEKONTONR PRIMO KASSE $ O* Z & j & x P 99.99.99.99.99BBBB " P* S Q 99.99.99.99.99BBBB " Q* S R ZZZ.ZZZ.ZZ9.ZZ-B
0x2f05f0…2f0784 Dummy {f00=0x0025, f01=0x0190, f02=» & & * & * & . U KASSELUKNING < $ U* X & h & v & V T[LLER $ V* & W DEBET $ W* & X KREDIT
0x2f0784…2f0918 Dummy {f00=0x0025, f01=0x0190, f02=» S " BBZZZ.ZZZ.ZZZ.ZZ9.99-O " * 0 " ] BBZZZ.ZZZ.ZZZ.ZZ9.99-O F " ]* l ( ^ _ START TEST $ _* ( ` a SLUT TESTT $
0x2f0918…2f0aac Dummy {f00=0x0025, f01=0x0190, f02=» $ e* ( e $ $* 0 f BZZZ @ " f* T g B*.***.***.**9.99- h " g* & h ADM $ h* i BZZ " i* (
0x2f0aac…2f0c40 Dummy {f00=0x0025, f01=0x0190, f02=» $ n* ( n $ & 4 & DIVERSE FORMATER B ( ` * o 0 l " p** | " u** " ** " ** " u** " p** " u** " x** " x**
0x2f0c40…2f0dd4 (2, 106) Dummy {f00=0x0025, f01=0x0190, f02=» ** " ** " ** " ** , " ** < " ** L " ** ( l p x $ q* ( q # $ * & & r B**B " r* S
0x2f0dd4…2f0f68 Dummy {f00=0x0025, f01=0x0190, f02=»( u $ v* ( * v 6 $ * F & V w ******E-**** d " w* S & * & & * $ * ( x $ y* (
0x2f0f68…2f10fc Dummy {f00=0x0025, f01=0x0190, f02=» & & | BBZZ.ZZ.ZZBBBR $ " |* S B & V } ZZZZ9999.99B d " }* S $ ,* $ * ( ~ $ * ( - & +
0x2f10fc…2f1290 Dummy {f00=0x0025, f01=0x0190, f02=» 99 " * B999 0 " * D BZZZZZZZZZZB V " * S r & & * $ * ( $ * $ * $ * (
0x2f1290…2f1424 Dummy {f00=0x0025, f01=0x0190, f02=» ( ( , 8 ( H T ( d p ( ( ( ( (
0x2f1424…2f15b8 Dummy {f00=0x0025, f01=0x0190, f02=» $ * B99.99.99M " * 2 & D 99 T " * f ( x B99.99.99.99.99B " * S *.***.***.**9.99- " * S &
0x2f15b8…2f174c Dummy {f00=0x0025, f01=0x0190, f02=» B999B " * 99BS , " * S @ ( T ` $ * p B*.***.***.**9.99- " * S & & ( B99B "
0x2f174c…2f18e0 Dummy {f00=0x0025, f01=0x0190, f02=» & $ &* B*.***.***.**9.99- " * S @ & T & d $ * r ( & + & * 999B " * $ * B99.99.99M
0x2f18e0…2f1a74 (2, 107) Dummy {f00=0x0026, f01=0x0190, f02=»E-9999999999B9 " * S XX.XXPPO * " * S B BXBS V " * S j ( ~ & XX " * S & XX " * S
0x2f1a74…2f1c08 Dummy {f00=0x0026, f01=0x018e, f02=» *.***.***.**9.99-- " * S & 2 & B ( P & l ****9 | " * & ****9 " * ( * $ " m**
0x2f1c08…2f1d9c Dummy {f00=0x0026, f01=0x0190, f02=» " ** " ** " ** ( " ** 8 " ** H " ** X " ** h " ** x ( $ * ( & + & ARKIV $
0x2f1d9c…2f1f30 Dummy {f00=0x0026, f01=0x0190, f02=» $ * $ * ( 0 < & + L $ * Z ( j v $ * & & 0 $ * ( $ * (
0x2f1f30…2f20c4 Dummy {f00=0x0026, f01=0x0190, f02=» * ( & + ( 999B 6 " * J B99.99.99B " * v ****9 " * - $ * $ * & TOTAL
0x2f20c4…2f2258 Dummy {f00=0x0026, f01=0x0190, f02=» L & + & * 999S . " * B BB99.99.99 T " * n BBZ999 " * BB****9O " * & - $ * & & *
0x2f2258…2f23ec Dummy {f00=0x0026, f01=0x0190, f02=»RO $ * ! & ! T[LLER ! ( $ * ! > & ! N & NETTOS ! & ! p DEBET ! ~ $ * ! & ! KREDIT ! $ * ! ( ! ! $ * ! (
0x2f23ec…2f2580 Dummy {f00=0x0026, f01=0x0190, f02=» " BBZZZ.ZZZ.ZZZ.ZZ9.99- " " * S " * " BBZZZ.ZZZ.ZZZ.ZZ9.99- " > " * " d " BBZZZ.ZZZ.ZZZ.ZZ9.99- " z " * " ( " " $ * " ( " " & 2 "
0x2f2580…2f2714 (2, 108) Dummy {f00=0x0026, f01=0x0190, f02=» " * " " BBZZZ.ZZZ.ZZZ.ZZ9.99- # " * # < ( # R # ^ $ * # n ( # ~ U # & 4 # & TOTAL # " BBZZZ.ZZZ.ZZZ.ZZ9.99- # " * # " BBZZZ.ZZZ.
0x2f2714…2f28a8 Dummy {f00=0x0026, f01=0x0190, f02=» # " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ " * $ . " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ B " * $ h " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ ~ " * $ & $ & 2 $ & KOR $ & $ " BBZZZ.ZZZ.
0x2f28a8…2f2a3c Dummy {f00=0x0026, f01=0x018e, f02=» * $ ( % C % & 4 % & 99.99.99.99.99BB % 4 " * % T & % f & PRIMO % t " BBZZZ.ZZZ.ZZZ.ZZ9.99- % " * I % & % & % & 2 % & BEV % " BBZZ
0x2f2a3c…2f2bd0 Dummy {f00=0x0026, f01=0x0190, f02=» % p " * O & & & & 2 & * & ULTIMO & 8 " BBZZZ.ZZZ.ZZZ.ZZ9.99- & L " * I & r & & ( & & $ * & ( & 5 & & & & * & 999B &
0x2f2bd0…2f2d64 Dummy {f00=0x0026, f01=0x0190, f02=» & & * ' & ' & ' & & 2 ' 4 & * ' B & * ' P & 4 ' ^ T[LLER ' l $ * ' & ' KONTONRO ' $ * ' & ' BEV.PERIODET ' $ * ' &
0x2f2d64…2f2ef8 Dummy {f00=0x0026, f01=0x018e, f02=» 2 ' ZZ ( " * I ( & ( . XX.XX.XX.XX.XXBB ( < " * ( " BBZZZ.ZZZ.ZZZ.ZZ9.99- ( r " * ( " BBZZZ.ZZZ.ZZZ.ZZ9.99- ( " * ( ( ( (
0x2f2ef8…2f308c Dummy {f00=0x0026, f01=0x0190, f02=» ( & < ) & < ) & ] ) $ & N ) 2 & N ) @ & N ) N & E ) & S ) j & S ) x & S ) & [ ) & ) ( ) ) $ * ) ( ) ) & + )
0x2f308c…2f3220 Dummy {f00=0x0026, f01=0x0190, f02=» & * * & * ZZ999999 * " * * 8 & * L ( * Z * f $ * * v ( * * & 2 * & * " BBZZZ.ZZZ.ZZZ.ZZ9.99- * " * * " BBZZZ.ZZZ.
0x2f3220…2f33b4 (2, 109) Dummy {f00=0x0026, f01=0x0190, f02=»** * " p** + " u** + " x** + * " x** + : " u** + J " ~** + Z ( + j + v & + + $ * + $ * + ( + * + " ** + " ** + " ** + " **
0x2f33b4…2f3548 Dummy {f00=0x0026, f01=0x0190, f02=» + ( , , $ p* , ( $ * , 8 ( , H , T $ u* , d $ * , t ( , , $ ~* , $ * , ( , , $ * , ( , ,
0x2f3548…2f36dc Dummy {f00=0x0026, f01=0x0190, f02=» , $ * - ( - - ( $ * - 8 ( - H - - T $ * - d $ * - t & - XX.XXPPO - " * - & - B** - " * - B** -
0x2f36dc…2f3870 Dummy {f00=0x0026, f01=0x0190, f02=» & - & . & . & . . ! *.***.***.**9.99-. . < " !* . ^ " B99. . p " "* . # 9 . " #* . & . $ 99B . " $* . ( . * % .
0x2f3870…2f3a04 Dummy {f00=0x0026, f01=0x0190, f02=»* . & / ) *.***.***.**9.99-. / " )* / < & / N * TRP / $ ** / p ( / * + / " m** / ( / * , / " -** / " .** / " .** / " 1** /
0x2f3a04…2f3b98 Dummy {f00=0x0026, f01=0x0190, f02=» / ( 0 . 0 $ /* 0 & ( 0 6 / 0 B & 0 0 R & * 0 ` 0 *.***.***.**9.99+B 0 p " 0* 0 $ 5* 0 ( 0 1 0 & + 0 2 Z.ZZZ.ZZZ.ZZ9.99-B 0 " 2*
0x2f3b98…2f3d2c Dummy {f00=0x0026, f01=0x4134, f02=» ( 0 5 1 & 1 & 1 * & 1 8 & 1 F & 1 T & 1 b & 1 p ( 1 ~ * 6 1 " m** 1 ( 1 * 7 1 " m** 1 ( 1 8 4 2 @FF 4 0R FF 4 0R FF 4 0R FF
0x2f3d2c…2f3ec0 Dummy {f00=0x0026, f01=0x018e, f02=» : H IDENT DIV525 TRA 4.2 80-03-17 F2 O2222 03.01.XXX.1 > : FRMTGP FRMTJT FRMTKT FRMTKV FRMTTA FRMTVO FRMXGP B & " FRMXJTV FRMXKTA FRMXTA0 FRMXVOF $$$TRA B > FRMTGPV Z FRMTJTF FRMTKTM F FRMTKV2 < FRMTTAX FRMTVO ( 8 4
0x2f3ec0…2f4054 (2, 110) Dummy {f00=0x0026, f01=0x018e, f02=» " $ " # 4 ) D , o T 3 d 6 t = @ J F " D 0R FF 4 0R FF 4 0R FF 4 0R FF 4 0R FF 4 0R FF 4 0R G J
0x2f4054…2f41e8 Dummy {f00=0x0026, f01=0x018e, f02=» " ** " ** " ** $ " ** 4 " ** D " ** T " ** d " ** t " ** " ** ( $ * $ * & $ * (
0x2f41e8…2f437c Dummy {f00=0x0026, f01=0x0190, f02=» & X " * $ & 8 $ &* F $ .* V & f ( t $ * ( < $ * & & * $ &* $ **
0x2f437c…2f4510 Dummy {f00=0x0026, f01=0x0190, f02=» BBZ " * $ .* , & < XX J " * & p ZZZ ~ " * & ( $ * ( ; $ *
0x2f4510…2f46a4 Dummy {f00=0x0026, f01=0x0190, f02=» ZZ.ZZ.ZZ " * & 4 $ .* B BBBZZ R " * h BBZZ | " * BZZ " * BBZB " * (
0x2f46a4…2f4838 Dummy {f00=0x0026, f01=0x0190, f02=» ( $ * $ ( 4 @ $ * P $ $* ` B999 p " * & & $ ** & & BZZZZZZZZZZ " *
0x2f4838…2f49cc Dummy {f00=0x0026, f01=0x018e, f02=» * ( & ( $ $* 6 $ &* F $ ** V ( f + r & & ZZ " * BZZ.ZZ.ZZ " * BBX
0x2f49cc…2f4b60 Dummy {f00=0x0026, f01=0x0190, f02=» " #* ( $ ( % B999E-999E-99E-99B 8 " %* Z ( n & z & ' BBBX.XX.XX.XXE " '* & & ( XX.XX.XX.XXXXE
0x2f4b60…2f4cf4 (2, 111) Dummy {f00=0x0027, f01=0x018e, f02=»9- x " +* & ( . , : - XX.XX.XX.XXXX9 J " -* h ( | . / BBZZZE-ZZZE-ZZE-ZZ " /* ( 0 2 & 1 ZZ.ZZ.ZZ
0x2f4cf4…2f4e88 Dummy {f00=0x0027, f01=0x018e, f02=» " 4* 5 BZZ " 5* 0 6 BZZ.ZZ.ZZ D " 6* ^ 7 BZZ.ZZ.ZZ r " 7* 8 BZ " 8* ( * 9 " :** " <** " @
0x2f4e88…2f501c Dummy {f00=0x0027, f01=0x018e, f02=» " ** " d** " j** $ " ** 4 ( D : P & ` $ * n ; KVIT ~ $ ;* ( < & $ =* ( = $ *
0x2f501c…2f51b0 Dummy {f00=0x0027, f01=0x018e, f02=» @ & A START SUM* " $ A* < ( L B X $ * h C SUM x $ C* ( D $ E* ( E a & & * & *
0x2f51b0…2f5344 Dummy {f00=0x0027, f01=0x0190, f02=» & H MASKIN NR $ H* , I EKS.LBNR < $ I* V & f & t & * J 99.99.999.9 " J* S & K 99E-99E-99 " K* S &
0x2f5344…2f54d8 Dummy {f00=0x0027, f01=0x0190, f02=» N* S & & & * 6 2 0 O *VERSURKONTONR KASSEKONTONR PRIMO KASSE 8 $ O* r & & P 999E-999E-99.99BBS " P* S Q 999E-999E-99.99BBS " Q* S
0x2f54d8…2f566c Dummy {f00=0x0027, f01=0x0190, f02=»( T & & * ( & * 6 & D U KASSELUKNING R $ U* n & ~ & & V T[LLER $ V* & W DEBET $ W* &
0x2f566c…2f5800 Dummy {f00=0x0027, f01=0x0190, f02=» [ ZZ " [* S " BBZZZ.ZZZ.ZZZ.ZZ9.99-O " * F " ] BBZZZ.ZZZ.ZZZ.ZZ9.99-O " ]* ( ^ _ START TEST $ _* ( ` a SL
0x2f5800…2f5994 (2, 112) Dummy {f00=0x0027, f01=0x018e, f02=» d & $ e* ( * e 6 $ $* F f BZZZ V " f* j g B*.***.***.**9.99- ~ " g* & h ADM $ h* i BZZ " i*
0x2f5994…2f5b28 Dummy {f00=0x0027, f01=0x0190, f02=» ( m $ n* ( 0 n < & L & DIVERSE FORMATER Z ( x * o 0 " p** " r** " ** " ** " r** " t** " r** "
0x2f5b28…2f5cbc Dummy {f00=0x0027, f01=0x0190, f02=» " ** " ** " ** $ " ** 4 " ** D " ** T " ** d " ** t ( p $ q* ( q $ * & & &
0x2f5cbc…2f5e50 Dummy {f00=0x0027, f01=0x018e, f02=»& & & $ * * ( : t F $ u* V ( f u r $ * & & $ &* & & v XX.XX.XX.XXXXR " v* S
0x2f5e50…2f5fe4 Dummy {f00=0x0027, f01=0x018e, f02=» & y PPPX.XX.XX.XXR " y* S 4 & H z BZZZZZZZZB Z " z* S t & & { XX.XX.XX.XXXXR " {* S $ * ( | $
0x2f5fe4…2f6178 Dummy {f00=0x0027, f01=0x0190, f02=» B99.99.99M " * & 0 99 @ " * R B999 d " * x BXX.XX.XX.XXXX " * S & & $ * (
0x2f6178…2f630c Dummy {f00=0x0027, f01=0x0190, f02=» ( ( * 6 ( F R ( b n ( ~ ( ( ( (
0x2f630c…2f64a0 Dummy {f00=0x0027, f01=0x0190, f02=» & * 999B " * , $ * > B99.99.99M N " * h & z 99 " * & ( B999.999.99.99B " * S
0x2f64a0…2f6634 (2, 113) Dummy {f00=0x0027, f01=0x0190, f02=» 99.99.99BM " * & & 8 B999B H " * ^ 99BS p " * S ( $ * B*.***.***.**9.99- " * S &
0x2f6634…2f67c8 Dummy {f00=0x0027, f01=0x0190, f02=» ZZ.ZZ.ZZBM " * S ( ( 4 & D $ &* R B*.***.***.**9.99- b " * S & & $ * ( & + & *
0x2f67c8…2f695c Dummy {f00=0x0027, f01=0x0190, f02=»XX.S " * S ( , PXBS < " * S P $ &* d BXX.XX.XXM t " * S BXBS " * S ( & XB
0x2f695c…2f6af0 Dummy {f00=0x0027, f01=0x018e, f02=» & ( & * & : *.***.***.**9.99-- H " * S j & ~ & ( & ****9 " * & **
0x2f6af0…2f6c84 Dummy {f00=0x0027, f01=0x0190, f02=» " ** " ** " ** $ " ** 4 " ** D " ** T " ** d " ** t " ** " ** " ** " ** " ** ( $ * (
0x2f6c84…2f6e18 Dummy {f00=0x0027, f01=0x0190, f02=» *.***.***.**9.99+- " * & 2 ( @ L $ * $ * l ( | & + $ * ( $ * & & 0 $ *
0x2f6e18…2f6fac Dummy {f00=0x0027, f01=0x018e, f02=» & 0 & 0 $ * ( , 8 $ * H ( X d & + t 999B " * B99.99.99B " * ****9 " * -
0x2f6fac…2f7140 Dummy {f00=0x0027, f01=0x0190, f02=» & ( " $ * 2 ( B L N & + ^ & * l 999S | " * BB99.99.99 " * BBZ999 " * BB****9O
0x2f7140…2f72d4 (2, 114) Dummy {f00=0x0027, f01=0x0190, f02=» & * ! & * ! & * ! $ & 4 ! 2 KONTONRO ! @ $ * ! X & ! h T[LLER ! v $ * ! & ! & NETTOS ! & ! DEBET ! $ * ! & !
0x2f72d4…2f7468 Dummy {f00=0x0027, f01=0x0190, f02=».XX9 ! | " * S " & " 99 " . " * " @ " BBZZZ.ZZZ.ZZZ.ZZ9.99- " R " * S " x " BBZZZ.ZZZ.ZZZ.ZZ9.99- " " * " " BBZZZ.ZZZ.ZZZ.ZZ9.99- " " * " (
0x2f7468…2f75fc Dummy {f00=0x0027, f01=0x0190, f02=»ZZZ.ZZ9.99- " ~ " * # " BBZZZ.ZZZ.ZZZ.ZZ9.99- # ( " * # N " BBZZZ.ZZZ.ZZZ.ZZ9.99- # d " * # ( # # $ * # ( # U # & 4 # & TOTAL # "
0x2f75fc…2f7790 Dummy {f00=0x0027, f01=0x0190, f02=»ZZZ.ZZ9.99- # ~ " * $ & $ ( & 4 $ 6 & SUPL $ D " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ V " * $ | " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ " * $ " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ " * $
0x2f7790…2f7924 Dummy {f00=0x0027, f01=0x0190, f02=»Z.ZZZ.ZZ9.99- $ " * % ( % , % 8 $ * % H ( % X C % d & 4 % t 999E-999E-99.99Z % " * % & % & PRIMO % " BBZZZ.ZZZ.ZZZ.ZZ9.99- % " * I %
0x2f7924…2f7ab8 Dummy {f00=0x0027, f01=0x018e, f02=»Z.ZZZ.ZZZ.ZZ9.99- % " * O & " BBZZZ.ZZZ.ZZZ.ZZ9.99- & . " * O & T & & h & 2 & v & ULTIMO & " BBZZZ.ZZZ.ZZZ.ZZ9.99- & " * I & & & ( & & $ * &
0x2f7ab8…2f7c4c Dummy {f00=0x0027, f01=0x018e, f02=» & & ' BEHOLDNINGST[LLERE ' $ * ' 8 & ' H & * ' V & ' f & ' t & 2 ' & * ' & * ' & 4 ' T[LLER ' $ * ' & ' KONTONRO '
0x2f7c4c…2f7de0 Dummy {f00=0x0027, f01=0x0190, f02=» ( ( ( $ * ( ( ( 0 ( < & 2 ( L ZZ ( Z " * I ( l & ( ~ XXXE-XXXE-XX.XXE ( " * ( " BBZZZ.ZZZ.ZZZ.ZZ9.99- ( " * ( " BB
0x2f7de0…2f7f74 (2, 115) Dummy {f00=0x0028, f01=0x0190, f02=» & ( $ * ) ( ) ) * & $ ) : & < ) H & < ) V & < ) d & ] ) r & N ) & N ) & N ) & E ) & S ) & S ) & S ) & [ ) & ) ( )
0x2f7f74…2f8108 Dummy {f00=0x0028, f01=0x0190, f02=»$ * ) & * B*.***.***.**9E,99 * " * * > & * * R & * ` ZZ999999 * n " * * & * ( * * $ * * ( * * & 2 * & *
0x2f8108…2f829c Dummy {f00=0x0028, f01=0x0190, f02=» * " p** + " r** + " ** + ( " ** + 8 " r** + H " t** + X " r** + h " w** + x " w** + " p** + " |** + ( + + & + + $ * + $ * + ( +
0x2f829c…2f8430 Dummy {f00=0x0028, f01=0x018e, f02=»" ** + " ** , " ** , " ** , . ( , > , J ( , Z , f $ p* , v $ * , ( , , $ r* , $ * , ( , , $ t* , $ * ,
0x2f8430…2f85c4 Dummy {f00=0x0028, f01=0x018e, f02=» - $ * - $ * - $ ( - 4 - @ $ * - P $ * - ` ( - p - | & - & - & - & - *.***.***.**9.99-. - " * - B99.
0x2f85c4…2f8758 Dummy {f00=0x0028, f01=0x018e, f02=» - " ** . ( . . $ $ * . 4 ( . D . P & + . ` BB99.99.99 . n " * . & . *.***.***.**9.99-. . " * . & . ! TRP . $ !* .
0x2f8758…2f88ec Dummy {f00=0x0028, f01=0x0190, f02=» . " *** / " ** / " ,** / ( ( / 8 $ / D & / T & / b & / p & * / ~ & / ( / % / $ &* / ( / & / & 0 / & * / '
0x2f88ec…2f8a80 Dummy {f00=0x0028, f01=0x0190, f02=» " )* / & 0 ( 0 $ * 0 0 & + 0 @ + Z.ZZZ.ZZZ.ZZ9.99-B 0 N " +* 0 p & 0 ( 0 , 0 & 0 & 0 & 0 & 0 & 0 & 0 & 0
0x2f8a80…2f8c14 (2, 116) Dummy {f00=0x0028, f01=0x4034, f02=»4 0R FF 4 0R FF 4 0 r n 1 @ 1 0 * 0 0 & + 0 @ + Z.ZZZ.ZZZ.ZZ9.99-B 0 N " +* 0 p & 0 ( 0 , 0 & 0 & 0 & 0 & 0 & 0 & 0 & 0
0x2f8c14…2f8da8 Dummy {f00=0x0028, f01=0x018e, f02=» : H IDENT DIV743 TRA 4.2 80-03-17 F2 O2222 03.01.XXX.1 > : FRMTGP FRMTJT FRMTKT FRMTKV FRMTTA FRMTVO FRMXGP B & " FRMXJTV FRMXKTA FRMXTA0 FRMXVOF $$$TRA B > FRMTGPV Z FRMTJTF FRMTKTM F FRMTKV2 < FRMTTAX FRMTVO ( 8 4
0x2f8da8…2f8f3c Dummy {f00=0x0028, f01=0x018e, f02=» # $ " $ 4 ) D , o T 3 d 6 t = @ J F " D 0R FF 4 0R FF 4 0R FF 4 0R FF 4 0R FF 4 0R FF 4 0R G J
0x2f8f3c…2f90d0 Dummy {f00=0x0028, f01=0x018e, f02=» " ** " ** " ** $ " ** 4 " ** D " ** T " ** d " ** t " ** " ** ( $ * $ * & $ * (
0x2f90d0…2f9264 Dummy {f00=0x0028, f01=0x0190, f02=» & X " * $ & 8 $ &* F $ .* V & f ( t $ * ( < $ * & & * $ &* $ **
0x2f9264…2f93f8 Dummy {f00=0x0028, f01=0x0190, f02=» BBZ " * $ .* , & < XX J " * & p ZZZ ~ " * & ( $ * ( ; $ *
0x2f93f8…2f958c Dummy {f00=0x0028, f01=0x0190, f02=» ZZ.ZZ.ZZ " * & 4 $ .* B BBBZZ R " * h BBZZ | " * BZZ " * BBZB " * (
0x2f958c…2f9720 Dummy {f00=0x0028, f01=0x0190, f02=» ( $ * $ ( 4 @ $ * P $ $* ` B999 p " * & & $ ** & & BZZZZZZZZZZ " *
0x2f9720…2f98b4 (2, 117) Dummy {f00=0x0028, f01=0x0190, f02=» * ( $ $* ( $ &* 8 $ ** H ( X + d & t & ZZ " * BZZ.ZZ.ZZ " * BBX " *
0x2f98b4…2f9a48 Dummy {f00=0x0028, f01=0x0190, f02=» ( $ % B999E-999E-99E-99B ( " %* J ( ^ & j & z ' XE-XXE-XXE-XXB " '* & & ( XXXXXXE-XXXX " (*
0x2f9a48…2f9bdc Dummy {f00=0x0028, f01=0x018e, f02=» & ( , ( - XXXXXXXXE-XX 8 " -* T ( h . t / BBZZZE-ZZZE-ZZE-ZZ " /* ( 0 2 & 1 ZZ.ZZ.ZZ " 1*
0x2f9bdc…2f9d70 Dummy {f00=0x0028, f01=0x0190, f02=» 5 BZZ " 5* 6 BZZ.ZZ.ZZ 0 " 6* J 7 BZZ.ZZ.ZZ ^ " 7* x 8 BZ " 8* ( * 9 " :** " <** " @** " B**
0x2f9d70…2f9f04 Dummy {f00=0x0028, f01=0x0190, f02=»" d** " j** " ** ( . : : & J $ * X ; KVIT h $ ;* ~ ( < & $ =* ( = $ * & >
0x2f9f04…2fa098 Dummy {f00=0x0028, f01=0x0190, f02=» A START SUM* $ A* $ ( 4 B @ $ * P C SUM ` $ C* t ( D $ E* ( E a & & * & * & &
0x2fa098…2fa22c Dummy {f00=0x0028, f01=0x018e, f02=»MASKIN NR $ H* I EKS.LBNR " $ I* < & L & Z & * h J 99.99.999.9 x " J* S & K 99E-99E-99 " K* S & L 99E-99E-99
0x2fa22c…2fa3c0 Dummy {f00=0x0028, f01=0x0190, f02=» & & 6 2 0 O *VERSURKONTONR KASSEKONTONR PRIMO KASSE $ O* Z & j & x P 999E-99999E-99BB " P* S Q 999E-99999E-99BB " Q* S R ZZZ.ZZZ.ZZ9.ZZ-B
0x2fa3c0…2fa554 (2, 118) Dummy {f00=0x0028, f01=0x0190, f02=»& & * & * & ( U KASSELUKNING 6 $ U* R & b & p & ~ V T[LLER $ V* & W DEBET $ W* & X KREDIT
0x2fa554…2fa6e8 Dummy {f00=0x0028, f01=0x0190, f02=» " BBZZZ.ZZZ.ZZZ.ZZ9.99-O " * * " ] BBZZZ.ZZZ.ZZZ.ZZ9.99-O @ " ]* f ( | ^ _ START TEST $ _* ( ` a SLUT TESTT $ a*
0x2fa6e8…2fa87c Dummy {f00=0x0028, f01=0x018e, f02=»$ e* ( e $ $* * f BZZZ : " f* N g B*.***.***.**9.99- b " g* & h ADM $ h* i BZZ " i* ( j
0x2fa87c…2faa10 Dummy {f00=0x0028, f01=0x0190, f02=» $ n* ( n & 0 & DIVERSE FORMATER > ( * o 0 h " p** x " u** " ** " ** " u** " p** " u** " x** " x**
0x2faa10…2faba4 Dummy {f00=0x0028, f01=0x018e, f02=» " ** " ** " ** ( " ** 8 " ** H " ** X ( h p t $ q* ( q # $ * & r **BS " r* S &
0x2faba4…2fad38 Dummy {f00=0x0028, f01=0x018e, f02=» u $ v* ( ( v 4 $ * D & T w ******E-**** b " w* S ~ & * & & * $ * ( x $ y* (
0x2fad38…2faecc Dummy {f00=0x0028, f01=0x0190, f02=» & & | BBZZ.ZZ.ZZBBBR $ " |* S B & V } ZZZZ9999.99B d " }* S $ ,* $ * ( ~ $ * ( $ *
0x2faecc…2fb060 Dummy {f00=0x0028, f01=0x0190, f02=» ( $ * $ * , $ * < ( L X $ * h $ * x $ * ( ( ( (
0x2fb060…2fb1f4 (2, 119) Dummy {f00=0x0029, f01=0x018e, f02=» ( ( , ( < H ( X d ( t & + & * & * B999.999.99.99B " * S 99.99.99
0x2fb1f4…2fb388 Dummy {f00=0x0029, f01=0x0190, f02=» & *.***.***.**9.99- & " * S H & & l ( z & & 99.99.99BM " * & B999B
0x2fb388…2fb51c Dummy {f00=0x0029, f01=0x0190, f02=» " * S & & $ ( 2 > B99B N " * S b & v & & ZZ.ZZ.ZZBM " * S ( & $ &*
0x2fb51c…2fb6b0 Dummy {f00=0x0029, f01=0x0190, f02=» + & * $ &* B99.99.99M * " * D B99B V " * j $ * | B999 " * BXXB " * S ( XXBS
0x2fb6b0…2fb844 Dummy {f00=0x0029, f01=0x0190, f02=»& XX " * S & 4 XX B " * S T & h XX.XXPPO v " * S & ( *.***.***.**9.99-- " * S &
0x2fb844…2fb9d8 Dummy {f00=0x0029, f01=0x0190, f02=» " * ( * $ & " m** 6 " ** F " ** V " ** f " ** v " ** " ** " ** " ** " ** " ** " ** " **
0x2fb9d8…2fbb6c Dummy {f00=0x0029, f01=0x018e, f02=» & + & ARKIV , $ * B $ .* R & b & * p *.***.***.**9.99+- " * & ( & + $ * (
0x2fbb6c…2fbd00 Dummy {f00=0x0029, f01=0x0190, f02=» " * BXXB " * S . $ * B $ * R $ * b ( r ~ & + $ * ( $ * & & 0 $ * (
0x2fbd00…2fbe94 (2, 120) Dummy {f00=0x0029, f01=0x0190, f02=» & 0 $ * ( " . $ * > ( N Z & + j 999B x " * B99.99.99B " * ****9 " * - $
0x2fbe94…2fc028 Dummy {f00=0x0029, f01=0x0190, f02=» ( $ * & ( 6 L B & + R & * ` 999S p " * BB99.99.99 " * BBZ999 " * BB****9O "
0x2fc028…2fc1bc Dummy {f00=0x0029, f01=0x0190, f02=» * & * ! & * ! & 4 ! & KONTONRO ! 4 $ * ! L & ! T[LLER ! j $ * ! & ! & NETTOS ! & ! DEBET ! $ * ! & ! KREDIT !
0x2fc1bc…2fc350 Dummy {f00=0x0029, f01=0x018e, f02=»" * S ! & " 99 " " * " 2 " BBZZZ.ZZZ.ZZZ.ZZ9.99- " D " * S " j " BBZZZ.ZZZ.ZZZ.ZZ9.99- " ~ " * " " BBZZZ.ZZZ.ZZZ.ZZ9.99- " " * " ( "
0x2fc350…2fc4e4 Dummy {f00=0x0029, f01=0x0190, f02=» " p " * # " BBZZZ.ZZZ.ZZZ.ZZ9.99- # " * # B " BBZZZ.ZZZ.ZZZ.ZZ9.99- # X " * # ~ ( # # $ * # ( # U # & 4 # & TOTAL # " BB
0x2fc4e4…2fc678 Dummy {f00=0x0029, f01=0x0190, f02=» # r " * $ & $ & 4 $ * & SUPL $ 8 " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ J " * $ p " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ " * $ " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ " * $ & $
0x2fc678…2fc80c Dummy {f00=0x0029, f01=0x0190, f02=»- $ t " * % ( % % , $ * % < ( % L C % X & 4 % h 999E-99999E-99 % v " * % & % & PRIMO % " BBZZZ.ZZZ.ZZZ.ZZ9.99- % " * I % & %
0x2fc80c…2fc9a0 Dummy {f00=0x0029, f01=0x018e, f02=»99- % v " * O & " BBZZZ.ZZZ.ZZZ.ZZ9.99- & " * O & F & & Z & 2 & h & ULTIMO & v " BBZZZ.ZZZ.ZZZ.ZZ9.99- & " * I & & & ( & & $ * & ( &
0x2fc9a0…2fcb34 (2, 121) Dummy {f00=0x0029, f01=0x0190, f02=» & BEHOLDNINGST[LLERE ' $ * ' * & ' : & * ' H & ' X & ' f & 2 ' t & * ' & * ' & 4 ' T[LLER ' $ * ' & ' KONTONRO ' $ * '
0x2fcb34…2fccc8 Dummy {f00=0x0029, f01=0x0190, f02=» ' $ * ( ( ( ( , & 2 ( < ZZ ( J " * I ( & ( n XXXE-XXXXXE-XX ( | " * ( " BBZZZ.ZZZ.ZZZ.ZZ9.99- ( " * ( " BBZZZ.ZZZ.ZZZ.ZZ9.99
0x2fccc8…2fce5c Dummy {f00=0x0029, f01=0x0190, f02=» * ( ( ) ) & $ ) ( & < ) 6 & < ) D & < ) R & ] ) ` & N ) n & N ) | & N ) & E ) & S ) & S ) & S ) & [ ) & ) ( ) )
0x2fce5c…2fcff0 Dummy {f00=0x0029, f01=0x018e, f02=» ) B*.***.***.**9E,99 * " * * , & * * @ & * N ZZ999999 * " * * t & * ( * * $ * * ( * * & 2 * & * " BBZZZ.
0x2fcff0…2fd184 Dummy {f00=0x0029, f01=0x0190, f02=» * " u** + " ** + " ** + ( " u** + 8 " p** + H " u** + X " x** + h " x** + x " u** + " ~** + ( + + & + + $ * + $ * + ( + * +
0x2fd184…2fd318 Dummy {f00=0x0029, f01=0x018e, f02=»" ** + " ** , " ** , ( , . , : ( , J , V $ p* , f $ * , v ( , , $ u* , $ * , ( , , $ ~* , $ * , ( ,
0x2fd318…2fd4ac Dummy {f00=0x0029, f01=0x0190, f02=» & - & - & - $ & - 2 *.***.***.**9.99-. - @ " * - b B99. - t " * - 9 - " * - & - 99B - " * - ( - * -
0x2fd4ac…2fd640 Dummy {f00=0x0029, f01=0x0190, f02=»" * - & . ! *.***.***.**9.99-. . " !* . @ & . R " TRP . ` $ "* . t ( . * # . " m** . ( . * $ . " %** . " &** . " &** . " )** .
0x2fd640…2fd7d4 (2, 122) Dummy {f00=0x0029, f01=0x0190, f02=» & . ( / & / $ '* / * ( / : ' / F & 0 / V & * / d ( *.***.***.**9.99+B / t " (* / $ -* / ( / ) / & + / * Z.ZZZ.ZZZ.ZZ9.99-B / "
0x2fd7d4…2fd968 Dummy {f00=0x0029, f01=0x4138, f02=» ( 0 - 0 & 0 & 0 . & 0 < & 0 J & 0 X & 0 f & 0 t ( 0 * . 0 " m** 0 ( 0 * / 0 " m** 0 ( 0 8 4 2 @FF 4 0R FF 4 0R FF 4 0R
0x2fd968…2fdafc Dummy {f00=0x0029, f01=0x018e, f02=» : H IDENT DIV805 TRA 4.2 80-03-17 F2 O2222 03.01.XXX.1 > : FRMTGP FRMTJT FRMTKT FRMTKV FRMTTA FRMTVO FRMXGP B & " FRMXJTV FRMXKTA FRMXTA0 FRMXVOF $$$TRA B > FRMTGPV Z FRMTJTF FRMTKTM F FRMTKV2 < FRMTTAX FRMTVO ( 8 4
0x2fdafc…2fdc90 Dummy {f00=0x0029, f01=0x018e, f02=» + $ " , 4 ) D , o T 3 d 6 t = @ J F " D 0R FF 4 0R FF 4 0R FF 4 0R FF 4 0R FF 4 0R FF 4 0R G J
0x2fdc90…2fde24 Dummy {f00=0x0029, f01=0x018e, f02=» " ** " ** " ** $ " ** 4 " ** D " ** T " ** d " ** t " ** " ** ( $ * $ * & $ * (
0x2fde24…2fdfb8 Dummy {f00=0x0029, f01=0x0190, f02=» & X " * $ & 8 $ &* F $ .* V & f ( t $ * ( < $ * & & * $ &* $ **
0x2fdfb8…2fe14c Dummy {f00=0x0029, f01=0x0190, f02=» BBZ " * $ .* , & < XX J " * & p ZZZ ~ " * & ( $ * ( ; $ *
0x2fe14c…2fe2e0 Dummy {f00=0x0029, f01=0x0190, f02=» ZZ.ZZ.ZZ " * & 4 $ .* B BBBZZ R " * h BBZZ | " * BZZ " * BBZB " * (
0x2fe2e0…2fe474 (2, 123) Dummy {f00=0x002a, f01=0x0190, f02=» ( $ * $ ( 4 @ $ * P $ $* ` B999 p " * & & $ ** & & BZZZZZZZZZZ " *
0x2fe474…2fe608 Dummy {f00=0x002a, f01=0x0190, f02=» * ( $ $* ( $ &* 8 $ ** H ( X + d & t & ZZ " * BZZ.ZZ.ZZ " * BBX " *
0x2fe608…2fe79c Dummy {f00=0x002a, f01=0x0190, f02=» ( $ % B999V99V999E-99B ( " %* H ( & h & x ' XE-XXE-XXE-XXB " '* & & ( XXXXXXE-XXXX " (*
0x2fe79c…2fe930 Dummy {f00=0x002a, f01=0x018e, f02=» & ( , & - XXXXXXXXE-XX 6 " -* R ( f . r / BBZZZVZZVZZZE-ZZ " /* ( 0 2 & 1 ZZ.ZZ.ZZ " 1*
0x2fe930…2feac4 Dummy {f00=0x002a, f01=0x0190, f02=» 5 BZZ " 5* 6 BZZ.ZZ.ZZ , " 6* F 7 BZZ.ZZ.ZZ Z " 7* t 8 BZ " 8* ( * 9 " :** " <** " @** " B**
0x2feac4…2fec58 Dummy {f00=0x002a, f01=0x018e, f02=»** " j** " ** ( * : 6 & F $ * T ; KVIT d $ ;* z ( < & $ =* ( = $ * & > KO
0x2fec58…2fedec Dummy {f00=0x002a, f01=0x0190, f02=» A START SUM* $ A* " ( 2 B > $ * N C SUM ^ $ C* r ( D $ E* ( E a & & * & * & &
0x2fedec…2fef80 Dummy {f00=0x002a, f01=0x0190, f02=»SKIN NR $ H* I EKS.LBNR $ I* : & J & X & * f J 99.99.999.9 v " J* S & K 99E-99E-99 " K* S & L 99E-99E-99
0x2fef80…2ff114 (2, 124) Dummy {f00=0x002b, f01=0x0190, f02=» & & 6 2 0 O *VERSURKONTONR KASSEKONTONR PRIMO KASSE $ O* V & f & t P 999V99V999E-99BK " P* S Q 999V99V999E-99BK " Q* S R ZZZ.ZZZ.ZZ9.ZZ-K
0x2ff114…2ff2a8 Dummy {f00=0x002b, f01=0x0190, f02=» & * & * & $ U KASSELUKNING 2 $ U* N & ^ & l & z V T[LLER $ V* & W DEBET $ W* & X KREDIT
0x2ff2a8…2ff43c Dummy {f00=0x002b, f01=0x0190, f02=» BBZZZ.ZZZ.ZZZ.ZZ9.99-O " * & " ] BBZZZ.ZZZ.ZZZ.ZZ9.99-O < " ]* b ( x ^ _ START TEST $ _* ( ` a SLUT TESTT $ a*
0x2ff43c…2ff5d0 Dummy {f00=0x002b, f01=0x0190, f02=»e* ( e $ $* & f BZZZ 6 " f* J g B*.***.***.**9.99- ^ " g* & h ADM $ h* i BZZ " i* ( j
0x2ff5d0…2ff764 Dummy {f00=0x002b, f01=0x018e, f02=»$ n* ( n & * & DIVERSE FORMATER 8 ( V * o 0 b " p** r " u** " ** " ** " u** " p** " u** " x** " x** " u
0x2ff764…2ff8f8 Dummy {f00=0x002b, f01=0x018e, f02=» " ** " ** " ** $ " ** 4 " ** D " ** T ( d p p $ q* ( q # $ * & & r B**B " r* S s
0x2ff8f8…2ffa8c Dummy {f00=0x002b, f01=0x0190, f02=» u $ v* ( $ v 0 $ * @ & P w ******E-**** ^ " w* S z & * & & * $ * ( x $ y* ( y
0x2ffa8c…2ffc20 Dummy {f00=0x002b, f01=0x018e, f02=»& & | BBZZ.ZZ.ZZBBBR " |* S < & P } ZZZZ9999.99B ^ " }* S z $ ,* $ * ( ~ $ * ( - & + &
0x2ffc20…2ffdb4 (2, 125) Dummy {f00=0x002b, f01=0x0190, f02=» 99 " * B999 , " * @ BZZZZZZZZZZB R " * S n & & * $ * ( $ * $ * $ * (
0x2ffdb4…2fff48 Dummy {f00=0x002b, f01=0x0190, f02=» ( ( ( 4 ( D P ( ` l ( | ( ( ( (
0x2fff48…3000dc Dummy {f00=0x002b, f01=0x0190, f02=» 999B " * $ * 0 & * @ 99 P " * b ( t B999.99.999.99B " * S *.***.***.**9.99- " * S &
0x3000dc…300270 Dummy {f00=0x002b, f01=0x0190, f02=» B999B " * 99BS ( " * S < ( P $ * l B*.***.***.**9.99- | " * S & & ( B99B " *
0x300270…300404 Dummy {f00=0x002b, f01=0x0190, f02=» $ &* B*.***.***.**9.99- " * S < & P & ` $ * n ( ~ & + & * 99.99.99BM " * 999B " *
0x300404…300598 Dummy {f00=0x002b, f01=0x0190, f02=»99999999B9 " * S XX.XXPPO & " * S > BXBS R " * S f ( z & XX " * S & XX " * S
0x300598…30072c Dummy {f00=0x002b, f01=0x018e, f02=»*.***.***.**9.99-- " * S & . & > ( L X & h ****9 x " * & ****9 " * ( * $ " m** "
0x30072c…3008c0 Dummy {f00=0x002b, f01=0x0190, f02=» " ** " ** " ** $ " ** 4 " ** D " ** T " ** d " ** t ( $ * ( & + & ARKIV $ *
0x3008c0…300a54 (2, 126) Dummy {f00=0x002c, f01=0x0190, f02=» $ * $ * ( , 8 & + H $ * V ( f r $ * & & 0 $ * ( $ * (
0x300a54…300be8 Dummy {f00=0x002c, f01=0x0190, f02=» ( & + $ 999B 2 " * F B99.99.99B X " * r ****9 " * - $ * $ * & TOTAL $
0x300be8…300d7c Dummy {f00=0x002c, f01=0x018e, f02=» L & + & * 999S * " * > BB99.99.99 P " * j BBZ999 | " * BB****9O " * & - $ * & & *
0x300d7c…300f10 Dummy {f00=0x002c, f01=0x0190, f02=» ~ $ * ! & ! T[LLER ! & $ * ! < & ! L & NETTOS ! Z & ! n DEBET ! | $ * ! & ! KREDIT ! $ * ! ( ! ! $ * ! ( !
0x300f10…3010a4 Dummy {f00=0x002c, f01=0x0190, f02=» BBZZZ.ZZZ.ZZZ.ZZ9.99- ! " * S " & " BBZZZ.ZZZ.ZZZ.ZZ9.99- " : " * " ` " BBZZZ.ZZZ.ZZZ.ZZ9.99- " v " * " ( " " $ * " ( " " & 2 "
0x3010a4…301238 Dummy {f00=0x002c, f01=0x0190, f02=» * " " BBZZZ.ZZZ.ZZZ.ZZ9.99- # " * # 8 ( # N # Z $ * # j ( # z U # & 4 # & TOTAL # " BBZZZ.ZZZ.ZZZ.ZZ9.99- # " * # " BBZZZ.ZZZ.ZZZ.
0x301238…3013cc Dummy {f00=0x002c, f01=0x018e, f02=» " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ " * $ * " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ > " * $ d " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ z " * $ & $ & 2 $ & KOR $ & $ " BBZZZ.ZZZ.ZZZ.
0x3013cc…301560 Dummy {f00=0x002c, f01=0x018e, f02=» $ ( % C % & 4 % $ 999E-99999E-99 % 2 " * % P & % b & PRIMO % p " BBZZZ.ZZZ.ZZZ.ZZ9.99- % " * I % & % & % & 2 % & BEV % " BBZZZ.ZZ
0x301560…3016f4 (2, 127) Dummy {f00=0x002c, f01=0x0190, f02=» " * O & & & & 2 & & & ULTIMO & 4 " BBZZZ.ZZZ.ZZZ.ZZ9.99- & H " * I & n & & ( & & $ * & ( & 5 & & & & * & 999B &
0x3016f4…301888 Dummy {f00=0x002c, f01=0x018e, f02=» & * ' & ' & ' " & 2 ' 0 & * ' > & * ' L & 4 ' Z T[LLER ' h $ * ' ~ & ' KONTONRO ' $ * ' & ' BEV.PERIODET ' $ * ' & '
0x301888…301a1c Dummy {f00=0x002c, f01=0x018e, f02=» ' ZZ ( " * I ( & ( , XXXVXXVXXX.XXL ( : " * ( X " BBZZZ.ZZZ.ZZZ.ZZ9.99- ( n " * ( " BBZZZ.ZZZ.ZZZ.ZZ9.99- ( " * ( ( ( ( & 2
0x301a1c…301bb0 Dummy {f00=0x002c, f01=0x0190, f02=» & < ) & < ) & ] ) & N ) . & N ) < & N ) J & E ) X & S ) f & S ) t & S ) & [ ) & ) ( ) ) $ * ) ( ) ) & + )
0x301bb0…301d44 Dummy {f00=0x002c, f01=0x018e, f02=» & * ) & * ZZ999999 * " * * 4 & * H ( * V * b $ * * r ( * * & 2 * & * " BBZZZ.ZZZ.ZZZ.ZZ9.99- * " * * " BBZZZ.ZZZ.ZZZ.
0x301d44…301ed8 Dummy {f00=0x002c, f01=0x0190, f02=» * " p** + " u** + " x** + ( " x** + 8 " u** + H " ~** + X ( + h + t & + + $ * + $ * + ( + * + " ** + " ** + " ** + " ** +
0x301ed8…30206c Dummy {f00=0x002c, f01=0x0190, f02=» + ( , , $ p* , & $ * , 6 ( , F , R $ u* , b $ * , r ( , , $ ~* , $ * , ( , , $ * , ( , ,
0x30206c…302200 Dummy {f00=0x002c, f01=0x0190, f02=» , $ * - ( - - & $ * - 6 ( - F - - R $ * - b $ * - r & - XX.XXPPO - " * - & - B** - " * - B** -
0x302200…302394 (2, 128) Dummy {f00=0x002d, f01=0x0190, f02=»& - & . & . & . , ! *.***.***.**9.99-. . : " !* . " B99. . n " "* . # 9 . " #* . & . $ 99B . " $* . ( . * % .
0x302394…302528 Dummy {f00=0x002d, f01=0x0190, f02=» . & / ) *.***.***.**9.99-. / " )* / : & / L * TRP / Z $ ** / n ( / ~ * + / " m** / ( / * , / " -** / " .** / " .** / " 1** /
0x302528…3026bc Dummy {f00=0x002d, f01=0x0190, f02=» / ( 0 . 0 $ /* 0 $ ( 0 4 / 0 @ & 0 0 P & * 0 ^ 0 *.***.***.**9.99+B 0 n " 0* 0 $ 5* 0 ( 0 1 0 & + 0 2 Z.ZZZ.ZZZ.ZZ9.99-B 0 " 2*
0x3026bc…302850 Dummy {f00=0x002d, f01=0x4132, f02=»( 0 5 1 & 1 & 1 ( & 1 6 & 1 D & 1 R & 1 ` & 1 n ( 1 | * 6 1 " m** 1 ( 1 * 7 1 " m** 1 ( 1 8 4 2 @FF 4 0R FF 4 0R FF 4 0R FF
0x302850…3029e4 Dummy {f00=0x002d, f01=0x018e, f02=» : H IDENT SUBAPL TRA 4.2 80-03-18 F2 O2222 03.01.XXX.1 B > CLRSW SELTR SETDEB SETKRE SPAPPL SPCHK1 SPCHK2 SPCHK3 B . * SPCHK4B SPCHK5A SPCHK60 SPCHK7F SPTCHK $$$TRAS > : CLRSW 7 SELTR P SETDEB0 ! SETKRES SPAPPL. SPCHK1
0x3029e4…302b78 Dummy {f00=0x002d, f01=0x0190, f02=» h , > % P *0 b 80 t >0 J F " D % LL{% LLk! LL ) LL_ LL LL I ! LLF LL Z _
0x302b78…302d0c Dummy {f00=0x002d, f01=0x018e, f02=» ! LL R 0 " 4 0 F 0 X j J F " D LL 4 LL LLb # LL$% LL LLb | 0 1 0 1 0
0x302d0c…302ea0 Dummy {f00=0x002d, f01=0x0190, f02=» 0 ( , 90 > ?0 P J F " D LL4 ) LL LL LL4 # LL:! L b E0 T0 r ~ J F " D @L4 LL
0x302ea0…303034 (2, 129) Dummy {f00=0x002e, f01=0x0190, f02=» = J F " D ! LL LL4 4 0X ! LLW LL6 LL d l d ~ J F " D 6 ) 4 K W8J W2 LL 'W LL" Y J F " D _?J CW 4
0x303034…3031c8 Dummy {f00=0x002e, f01=0x0190, f02=» b c W d e . f > g N h ^ i n j ~ k l m n P o p q r
0x3031c8…30335c Dummy {f00=0x002e, f01=0x0190, f02=» { | } ~ . > N ^ n ~
0x30335c…3034f0 Dummy {f00=0x002e, f01=0x0190, f02=» . > N ^ n ~
0x3034f0…303684 Dummy {f00=0x002e, f01=0x0190, f02=» - H . > N ^ 2 n > ~ _ f x
0x303684…303818 Dummy {f00=0x002e, f01=0x0190, f02=» Y k . r > y N ^ n ~ J F " D @ ( ?R2 rRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRR J F " D RRRRRRRRRRRRRRRRRRRRRR
0x303818…3039ac Dummy {f00=0x002e, f01=0x0190, f02=»RRRR % LL LLTn R 6 8??R ~ < L ^ # n 2 ~ 5 9 < J F " D 6 ?R LL?R6 ?R$ A _ LL?R LL?R
0x3039ac…303b40 Dummy {f00=0x002e, f01=0x0190, f02=» w0 2 z " J F " D @ I ?R LL?R LL?R % LL,A LLR A LL9R@ ?R 2 0 0 0 0 J F
0x303b40…303cd4 (2, 130) Dummy {f00=0x002e, f01=0x0190, f02=» 0 B R ! b J F " D LL LL?R! LL ! LL ! LL LL?R RW R r 7 $ "0 Q
0x303cd4…303e68 Dummy {f00=0x002e, f01=0x0190, f02=» J F " D @ + LL " ]h X j | 0 J F " D LLb ) LLC LL b ! 0
0x303e68…303ffc Dummy {f00=0x002e, f01=0x0190, f02=» D LL#% LL ! LL W ! LL W I LL?R?R! LL ! LL ?R b J F " D b b b b b L H L O X0 p c0 p s0 p |
0x303ffc…304190 Dummy {f00=0x002e, f01=0x0190, f02=» 0 & 8 0 9 H 0 p J F " D LL?R # LL % LL ?R LL?R # LL % LL ?R LL?R
0x304190…304324 Dummy {f00=0x002e, f01=0x0190, f02=» J F " D LL LL:R?R LL % LL LL:R LL LL l ~ 0 +0 <0 @ J F " D ?R LL:R LL " % LL
0x304324…3044b8 Dummy {f00=0x002e, f01=0x0190, f02=» ` 52 c g j 2 n B x d T J F " D @R LL?R LL LLI LL?R LL?R LL?R LL LL f
0x3044b8…30464c Dummy {f00=0x002e, f01=0x018e, f02=» P 6 I P . > N ^ p J F " D 8R(
0x30464c…3047e0 Dummy {f00=0x002e, f01=0x018e, f02=» ( P * , ( 0 8 5 J : @ n J F " D LL?RA % LL A # LL @ W @ R<R?R LL LL) LL C P E G K
0x3047e0…304974 (2, 131) Dummy {f00=0x002e, f01=0x018e, f02=» J F " D @LL R<R?R LL LL|% LL/ LLA % LL A # LL @ W @ R< R d t 0 Q 0 R
0x304974…304b08 Dummy {f00=0x002e, f01=0x0190, f02=» ( : L n 6 ~ J F " D _ LL LL ! LL LL?R LLT2 R 8R( I
0x304b08…304c9c Dummy {f00=0x002e, f01=0x0190, f02=» 1 5 : * = 7 < A L J F " D H ?R LL?R?R LL?R LL LL LL9R LL?R LL LL?R ^ F $ K T 51 W [ 52
0x304c9c…304e30 Dummy {f00=0x002e, f01=0x0190, f02=» J F " D @ LL LL LLI LL?R LL?R LL?R@ @ LL LL?R LL<R ` 0 p 0 J F " D LL?R LL $ " ?R LL?R
0x304e30…304fc4 Dummy {f00=0x002e, f01=0x018e, f02=»L?R LL LL b j 0 ( 0 0 : .0 0 L 90 ^ J F " D b LL LL LL$ LL" p F K0 N e < J F " D
0x304fc4…305158 Dummy {f00=0x002e, f01=0x0190, f02=» J F " D ?R LL?R # LL) V f x 0 J F " D ?R LL?R
0x305158…3052ec Dummy {f00=0x002e, f01=0x0190, f02=» J F " D LL LLb LL LL LL, LL LL E0 X K0 j P0 | n0 u0 |0 J F " D @ ) LL LL LL W ( W A W LLW LLW LL
0x3052ec…305480 Dummy {f00=0x002e, f01=0x0190, f02=» # LL LLWg LLW`H ! LL LL R RA W:H 0 J l | J F " D LL R RA I LLW $ KRE 0 K
0x305480…305614 (2, 132) Dummy {f00=0x002f, f01=0x417c, f02=» LL4 LL LL LL LL4 p S . Y @ _ R e d o v s ! J F " D @ 4 ! LLd! LL ! LL LL 4 RW R 6 & $ J F
0x305614…3057a8 Dummy {f00=0x002f, f01=0x0190, f02=» : H IDENT KMDIO TRA 4.2 80-03-17 F2 O2222 03.01.XXX.1 B > CLEAR8 CRKJ CRVO EDATNR GRASPV LINOPT WCHECK WRITFD B & " WRITIDD WRITJTA WRITVO0 WTALLYF $$$TRA > : CLEAR8D CRKJA a CRVO0 i EDATNR GRASPV. LINOPT B >
0x3057a8…30593c Dummy {f00=0x002f, f01=0x0190, f02=» D @ SPCHK5 SPERR SPLIN8W T:DELA T:DSC0L T:DSC1V T:EDWRA T:TEST T:WAITA L ^ n ) ~ 5 > J F " D H R H 4 H 0X _ A @ R A ! LL @ a FF C
0x30593c…305ad0 Dummy {f00=0x002f, f01=0x0190, f02=» F J F " D LL a FF LL h @ " b ! ` r 0 J F " D _[b LL b f A 0 #
0x305ad0…305c64 Dummy {f00=0x002f, f01=0x018e, f02=» k0 p0 P u DISCFEJL , x D J F " D @ LL R T6$ #@ @ LL LL LL R 4 T 0 0 0 J F " D @ @ 4 A @ A
0x305c64…305df8 Dummy {f00=0x002f, f01=0x0190, f02=» 0 I J F " D ) LL A 4 # LL LL_ # LL LL_ # LL LL_) 0 d $ v $ ! % 2 8 ? J F " D LL_04 0X 0X I 2 "
0x305df8…305f8c Dummy {f00=0x002f, f01=0x0190, f02=» & & " ( 0 j < m L & l & z ( v | J F " D @ A 4 0X 4 0X 0X 0X 4 1X FF4 1X FF4 I R R@
0x305f8c…306120 Dummy {f00=0x002f, f01=0x0190, f02=» R # LL Wt LL 6 !,,,3V R LLWR R LLWG R H Z % j | Z J F " D LLW< R LL
0x306120…3062b4 (2, 133) Dummy {f00=0x002f, f01=0x018e, f02=» - 3 5 < . J F " D LL4 0X 0X R0X 4 I RT 4 I A R R R 0X > C K0 4 P0 4 Z $ c l TRP o
0x3062b4…306448 Dummy {f00=0x002f, f01=0x0190, f02=» " $ $ 6 H 0 Z l | J F " D 4 0X 0X 4 I 0X T50X ! LL ) LLS# LLM # LLS R! LL: Z
0x306448…3065dc Dummy {f00=0x002f, f01=0x0190, f02=» $ ) FEJL 0 OPSTART 2 7 DISKETTE SKIFT J > KONVERTERING h J F " D X 4 _M R4 0X 6 %W4 LLW- LLW LLW LL E DATATRANSMISSION L BACKUP
0x3065dc…306770 Dummy {f00=0x002f, f01=0x018e, f02=» z ~ Q $ J F " D @W LLW LLW RLL R R0X Y RLL# LL R R0 . ( | J F " D X LLb W2( LLb W "
0x306770…306904 Dummy {f00=0x002f, f01=0x018e, f02=» Q $ J F " D + a FF RLL% LL % LL R R0X W # LL R R0X 4 ( v & & & & & &
0x306904…306a98 Dummy {f00=0x002f, f01=0x0190, f02=» ( > 999 $ " * 8 & G J 99 X " * j 99999 | " * & , 99 " * &01 $ * 9999
0x306a98…306c2c Dummy {f00=0x002f, f01=0x018e, f02=» &03 $ * 999 " " * 6 & H &04 X $ * l 99999 | " * ( & $ * 99 " *
0x306c2c…306dc0 Dummy {f00=0x002f, f01=0x4046, f02=» $ LL0X 0X 4 0@ B
0x306dc0…306f54 (2, 134) Dummy {f00=0x002f, f01=0x0190, f02=» : H IDENT RGADM TRA 4.2 80-03-31 F2 O2222 03.01.XXX.1 B > hADM ADMRET BCKUP CLBEH CLEDB CLEJ LAMPOF LAMPON RGA120 B @ < RGADM SKIFT SLUTID2 SOPRD STRTID STRTWR0 TCLOSEX TR2GEN WAHEADM WALINEK ZEROB $$$TRAS @ < hADM W A
0x306f54…3070e8 Dummy {f00=0x002f, f01=0x0190, f02=»TRTWRA TCLOSEB TR2GENB WAHEADB WALINE 8 ZEROA D @ ABORT ADM600A ASGVOLR BACKUPS CLEAR8S CLSVOLf CNFWRT CONFWR @ D @ CONRDXA CRKJL CRVO hCYK DIVTR EMPTYTB FRMTKVN FRMXJTR FRMXSP > : FRMXTAA FRMXVOA GRASPVB INITRGC KORTS KTOPR KTPRT KVI
0x3070e8…30727c Dummy {f00=0x002f, f01=0x0190, f02=» SPCLRAW Z B > SPCLRNA SPINF1C SPLIN8K SQWRITE SUBTOTFhSUM T:ATTFN T:DELAC D @ T:DSC0R T:DSC1R T:EDWRR T:KIR T:WAITS TCONFRK TCONFWS TRPAGE V 6 2 TXTOPRA TXTPRTC WRITFDK WRITIDE WRITJTF WTALLYA ` R
0x30727c…307410 Dummy {f00=0x002f, f01=0x0190, f02=» W 80 A ( ; ` : < J ? T Z J F " D A 1XFF R2 RRRRRRRRRR_ R _$J (K ,@ A A LL1XFF R j D E F I L0 Q0
0x307410…3075a4 Dummy {f00=0x002f, f01=0x0190, f02=»R_I LL LL LL ) LL LL LL R R | B R * d t ` = R J F " D R RLLA R R _
0x3075a4…307738 Dummy {f00=0x002f, f01=0x0190, f02=» 0 L B 0 L & J F " D @ @ @ @ @ LL LL LL LL0X 0X LL R 8 0 @ 0 @ ?0 @ J F " D LL LL LL " L
0x307738…3078cc Dummy {f00=0x002f, f01=0x0190, f02=»R Z 0 , EJ-EDB T[LLER > TOTAL l 0 O J F " D LL LL LL R 8_ LL R LL
0x3078cc…307a60 Dummy {f00=0x002f, f01=0x0190, f02=»A R 6H R! LLP d 0 " , 4 30 F 8 VERSUR KONTONR REMIT X =0 E | @ J F " D ! LL+ LL LL LL LL J , N TOTA
0x307a60…307bf4 (2, 135) Dummy {f00=0x002f, f01=0x0190, f02=» J F " D @R PH R LL R R LL LL LL@ R R R * V | h x W J F " D @ LL RLL 4 4 R ?R 0
0x307bf4…307d88 Dummy {f00=0x002f, f01=0x0190, f02=» 0 % EJ-EDB T[LLER . 0 J > 0 J P J F " D LL LL l R LL LL " J b ^0 L d0 L h d o0 % r
0x307d88…307f1c Dummy {f00=0x002f, f01=0x018e, f02=» | " 0 2 0 D 0 V 0 h 0 z J F " D 4 LL RLL R LL LL LLI LL LL " J F " D
0x307f1c…3080b0 Dummy {f00=0x002f, f01=0x0190, f02=» 5 x J F " D I 0 LL LL LL LL LL R R C | b D r G 8 M B w 8 J F " D @ RLL R _ R R J F " D
0x3080b0…308244 Dummy {f00=0x002f, f01=0x0190, f02=» % LL W LL% LL 0 D 0 V ) 8 h - d x 60 % J F " D W LL LL R 0X 4 LL G U W `
0x308244…3083d8 Dummy {f00=0x002f, f01=0x0190, f02=» SLET PERIODE SUBTOTAL 0 U 4 0 U F 0 U X ( j f z J F " D W K S LL W LL W LL LL LL R 0X & h
0x3083d8…30856c Dummy {f00=0x002f, f01=0x0190, f02=» h $0 R -0 R 20 R . 70 R @ ; d R B0 % b J F " D R 0X I 6 W LL LL LL LLn0X t G & K h Q d ^ TOTAL
0x30856c…308700 Dummy {f00=0x002f, f01=0x0190, f02=» } ~ * 0 8 @ P ` p * M < q u
0x308700…308894 (2, 136) Dummy {f00=0x0030, f01=0x0190, f02=» J F " D @ LL_ R 0X 0X 4 I V LLH LL H )2 #RRRRRRRRRR 0 ~
0x308894…308a28 Dummy {f00=0x0030, f01=0x0190, f02=» J F " D RRRRRRRRRRRRRRRRRRRRRRRRRW.2 RRRRRRRRRRRRRRRRW 8R q ^ u n y ~ ` T J F " D LL2 RRR?RA I # A A 1XFF R6
0x308a28…308bbc Dummy {f00=0x0030, f01=0x0190, f02=»A A 1XFF R6 ll _$ R LL ~ N ` < O & L R T o0 l J F " D @ @ A 1XFF R6 11 __ LL ~ | .
0x308bbc…308d50 Dummy {f00=0x0030, f01=0x0190, f02=» D RLL@ @ ?R?R R?RA @ C <R <R <RA 1XFF R L l 0 | f 0 H 0 z
0x308d50…308ee4 Dummy {f00=0x0030, f01=0x0190, f02=» @ & 8 H Z j | ) ' ' ! " + # ' $ '
0x308ee4…309078 Dummy {f00=0x0030, f01=0x0190, f02=» RRRRRRRRRR_ _>K RLL0X S Q0X n D , E < H N I ^ L p R S V W Z [ @ e h F
0x309078…30920c Dummy {f00=0x0030, f01=0x0190, f02=» ( Z 0 ( * 0 ( < N J F " D R LL b R LL T @ LL ` F 0 0 SLUTD &04T
0x30920c…3093a0 Dummy {f00=0x0030, f01=0x0190, f02=» T/ LLb b ~ E Z < H0 L O ^ P n S T W Y Z 0 c z i k z
0x3093a0…309534 (2, 137) Dummy {f00=0x0030, f01=0x0190, f02=» f $ 4 D V f J F " D _ _ @ _ A _ @ W LL R _V R <R RLL<RW R v
0x309534…3096c8 Dummy {f00=0x0030, f01=0x0190, f02=» J F " D <R RLL<RW RLLA @ ?R?R R?R?R R A R6 _ @ V SR f x " V ) / ` 0 Q ; SUBTOTAL > R C . D .
0x3096c8…30985c Dummy {f00=0x0030, f01=0x0190, f02=» V W X Y . Z > [ N ^ ] n ^ ~ _ ` a b " c & d * k { l {
0x30985c…3099f0 Dummy {f00=0x0030, f01=0x0190, f02=» u { v { w { x " . y & > z * N ~ ^ . n J F " D @ RRR?R H 2 RRRRRRRRRRRRRRRR_92 RRRRRRRRRRRRRRRR_O R? ~ 3 . .
0x3099f0…309b84 Dummy {f00=0x0030, f01=0x018e, f02=» 0 R ` x R . 0 R > J F " D R R?R R?R A 1XFF R?R R?R R ?R LL A 1XFF R LL P . ` d R J F " D ?RI 2C 8R@ A 1XF
0x309b84…309d18 Dummy {f00=0x0030, f01=0x0190, f02=» , J F " D I , R LL W , R LL - LL30R T R P S0 I b [0 I t z J F " D @ _S! LLoW ! LL5 LL K D
0x309d18…309eac Dummy {f00=0x0030, f01=0x0190, f02=» . . * . : J Z j ` z o R J F " D @ ?R @ @ LL?RH H A ?R?RC <RC <RC 8R@ A 1XFF 6 J
0x309eac…30a040 Dummy {f00=0x0030, f01=0x0190, f02=»0 { K J F " D @ R LL - LL3$ R P _S LL D l S ~ X ( 0 K J F " D LLA
0x30a040…30a1d4 (2, 138) Dummy {f00=0x0030, f01=0x018e, f02=» 0 & l 6 d F J F " D 0X R0X R LL " LL_ H @ LL LL0X 0X V # v ' : + 8 4 7 J F " D
0x30a1d4…30a368 Dummy {f00=0x0030, f01=0x0190, f02=» b X ! h b ! u ! $ y h ! 4 ! D J F " D @A 1XFF R6 AA W?A RW8H 4H 0 R 0X K R 0X 0R ! T d ! ! b ! ! ! ^ !
0x30a368…30a4fc Dummy {f00=0x0030, f01=0x0190, f02=» R0X 0R ?RI A RW @ ?RA A A LL1XFF R2 ! " B 6 " R " b 4 " r " B " 0 X " 0 " ` " / " J F " D RRR_ @ @ ?R R?R R?RI O
0x30a4fc…30a690 Dummy {f00=0x0030, f01=0x0190, f02=» " 8 6 # ; T # ?0 # ( J F " D XFF R LL86 _A RLL?RI A 1XFF R L # : L # U0 # Z0 # ] $ # a ~ # c ` # d # j R #
0x30a690…30a824 Dummy {f00=0x0030, f01=0x0190, f02=» R R1XFFA RW @ R2 RRRR! LL # n $ , 0 $ > $ $ P ~ $ ` SUBTOTAL $ p $ $ ~ $ TOTAL $ $ $ ~ $ J F " D ! LL+_ LL R R_2
0x30a824…30a9b8 Dummy {f00=0x0030, f01=0x0190, f02=» ` $ % R % % . 0 % @ h % R % b ` % r % R % % J F " D RA 1XFF R LL ?RA 0X 1XFF R) LL"! LL 1X FF@ 1XFF R LL+ %
0x30a9b8…30ab4c Dummy {f00=0x0030, f01=0x0190, f02=»A _ @ W I *I &I RLL R LLA W RLL@ LL R W H / % Q0 & F W ` & X X & h [ T & x h0 & r > & v , & z 2 & ~ ^ & J F " D @I + LLA 1XFF R6 _
0x30ab4c…30ace0 Dummy {f00=0x0030, f01=0x0190, f02=» & & ' h ' d ' ( J F " D _ RW[ RWW0X R R R $ 0X R 0X _ 0X ' 8 ' ' ' ' ' W ' ' '
0x30ace0…30ae74 (2, 139) Dummy {f00=0x0030, f01=0x0190, f02=» ' ? ( P ( h ( ( E ( 8 X ( H " ( ( X $ f ( h + ( x - & ( 1 h ( 9 & ( = h ( J F " D 3 RR1X FF R4 1X FF R R0X R R 0X 4 R
0x30ae74…30b008 Dummy {f00=0x0030, f01=0x0190, f02=» w z ( } ) J F " D @ LL4 H 0X _ A A R H LL R R LL R R ) ) j ) z 0 ) ) ) ) ) ) )
0x30b008…30b19c Dummy {f00=0x0030, f01=0x018e, f02=» LL R ) V * | * $ * 4 f * F f * V j * f * v J F " D R RLL@ @ @ 4 0X 4 0X 4 0X KK * / * H * 0 R *
0x30b19c…30b330 Dummy {f00=0x0030, f01=0x0190, f02=» * R + W ( + l + * u + < + L J F " D @a FFa FF a FF LLb 4 A ! LL @ a FF a F + 0 F + 0 F + + 0 F + +
0x30b330…30b4c4 Dummy {f00=0x0030, f01=0x0190, f02=» + , J F " D F4 LL LL R LL! RLL RLL RLL RLLH RLL R6 , , h , x , , , , 0 , , 0 ,
0x30b4c4…30b658 Dummy {f00=0x0030, f01=0x0190, f02=» - - - & - 6 - H ( - X + F - j .0 - z ;0 - A SLUTD_ - J F " D _aJ QW RLL RLLA R TU LL R LL T+! LL) - X
0x30b658…30b7ec Dummy {f00=0x0030, f01=0x018e, f02=»L h P R LL XC RLL R @ 0X W _ RLL - . F . V . h 0 . x . . . . . 0 . . 0
0x30b7ec…30b980 Dummy {f00=0x0030, f01=0x018e, f02=» / / & / & & / 4 B / F " * / X ( / j / v & / & / & / & / & / & / & / & / ( /
0x30b980…30bb14 (2, 140) Dummy {f00=0x0031, f01=0x0190, f02=» / KORREKT 0 $ * 0 & ? 0 0 & 0 > $ * 0 L ( 0 0 h 999999 0 x " * 0 B99999 0 " * 0 ( 0 0 SLUTD 0 $ * 0
0x30bb14…30bca8 Dummy {f00=0x0031, f01=0x0190, f02=» 0 & 2 1 & 1 999 1 ( " * 1 < & 1 1 N & 1 ( 1 j 1 v & 1 KLAR 1 $ * 1 ADM 1 $ * 1 & 1 ZZ 1 " *
0x30bca8…30be3c Dummy {f00=0x0031, f01=0x0190, f02=»GG 1 ~ $ * 2 & 2 & 2 ( DAGS-DATON 2 8 $ * 2 R & 2 b 99E-99E-99 2 t " * 2 & 2 DAG NR 2 $ * 2 & f 2 ZZZ 2 " * 2
0x30be3c…30bfd0 Dummy {f00=0x0031, f01=0x0190, f02=» 4 2 & 3 & 3 ADM 3 , $ * 3 @ & 3 P ! EJ-EDB T[LLER 3 ^ $ !* 3 | & 3 " NR 3 $ "* 3 & 3 # KONTONR 3 $ #* 3 & 3 &
0x30bfd0…30c164 Dummy {f00=0x0031, f01=0x018e, f02=» 3 ( 4 & [ 4 & % 4 & & 4 4 ' ADM 4 D $ '* 4 X & 4 h ( BEHOLDNINGST[LLERE 4 v $ (* 4 & 4 ) NR 4 $ )* 4 & 4 * KONTONR 4 $ ** 4
0x30c164…30c2f8 Dummy {f00=0x0031, f01=0x0190, f02=» 4 & 5 & + 5 & 5 & & 5 6 & 5 F - ZZZZZZZZE-ZZ 5 X " -* 5 t & 5 & 5 & 5 & 5 . TTTVTTTVTTTVTT9V99-R 5 " .* 5 $ *
0x30c2f8…30c48c Dummy {f00=0x0031, f01=0x0190, f02=» 5 | $ 1* 6 & 6 2 KONTONR 6 & $ 2* 6 > & 6 N 3 SALD0 6 $ 3* 6 r & 6 & 6 & 6 4 99999999E-99 6 " 4* 6 & 6 5 TTTVTTTVTTTV
0x30c48c…30c620 Dummy {f00=0x0031, f01=0x0190, f02=»7* 6 8 VERSUR KONTONR REMIT 7 $ 8* 7 . & 7 > 9 KONTONR 7 L $ 9* 7 d & 7 t & 7 : 99999999E-99 7 " :* 7 ( 7 ; 7 & : 7 < DISKETTE SKIFT 7
0x30c620…30c7b4 (2, 141) Dummy {f00=0x0033, f01=0x0190, f02=»& 7 $ * 8 ( 8 ? ( 8 ( & 1 8 8 @ KASSELUKNING 8 F $ @* 8 b & 8 r & * 8 A ZZ 8 " A* 8 & 8 & 8 & 8 B KONTONR 8 $ B* 8
0x30c7b4…30c948 Dummy {f00=0x0033, f01=0x0190, f02=» 8 ( 9 E 9 & 1 9 ( & 9 6 F KASSELUKNING 9 F $ F* 9 b & 9 r & * 9 ( 9 G 7 9 & 9 & 9 H KASSELUKNING 9 $ H* 9 & 9
0x30c948…30cadc Dummy {f00=0x0033, f01=0x0190, f02=»& 9 K DEB : $ K* : & : 0 L SLET SALDO : > $ L* : X & : h M KRE : v $ M* : & : N SUBTOTAL : $ N* : & : O KVIT : $ O* : &
0x30cadc…30cc70 Dummy {f00=0x0033, f01=0x0190, f02=» : R KLAR ; $ R* ; $ T* ; . & ; > S ZZ ; P " S* ; b ( ; t T ; & SP ; & ; & RGE ; ( ; U W ; & ; & ; V 99 ;
0x30cc70…30ce04 Dummy {f00=0x0033, f01=0x0190, f02=» ; " Y* < Z BBZZZ- < " Z* < 2 [ BBZZZ- < F " [* < & [ < p BBZZZ- < ~ " * < ] BBZZZ- < " ]* < ^ BBZZZ- < " ^* < _ BBZZ
0x30ce04…30cf98 Dummy {f00=0x0033, f01=0x0190, f02=»BBZZZ- < " b* = c BBZZZ- = " " c* = 8 $ * = L ( = d = h & = x $ T* = & = & * = & * = e EKS.LBNR = $ e* = & = f XX
0x30cf98…30d12c Dummy {f00=0x0033, f01=0x018e, f02=» h* = & h > i CPR/CIR/NR > $ i* > 6 & m > F j XXXXXXE-XXXX > X " j* > t & j > $ t* > & n > k TTTTTTTVTTX,XX-E > " k* > & k > l DIVERSE >
0x30d12c…30d2c0 Dummy {f00=0x0033, f01=0x0190, f02=» > & n ? $ v* ? ( ? & o 6 ? 2 & ? B $ T* ? P & ? ` & * ? p & * ? ~ p BILAG ? $ p* ? q EKS.LBNRT ? $ q* ? & ? & FRA ? & ?
0x30d2c0…30d454 (2, 142) Dummy {f00=0x0036, f01=0x0190, f02=» s* ? & s @ $ v* @ ( @ , t @ 8 u BEL @ H $ u* @ & @ l & B @ z ( @ v @ & B @ & Z @ w B @ " w* @ ( @ x . @ &
0x30d454…30d5e8 Dummy {f00=0x0036, f01=0x0190, f02=» { SALDO @ $ {* A & A & | 99999999E-99 A 4 " |* A P & A b } ZZZVZZZVZZZVZZ9V99-- A p " }* A & } A ~ EJ EDB A $ ~* A & A ZZZVZZZVZZZVZZ9V99-- A
0x30d5e8…30d77c Dummy {f00=0x0036, f01=0x0190, f02=» A & B REGNEFUNKTIONZ B $ * B 8 & B H & B V & [ B d TTTVTTTVTTXVXX-V B x " * B ( B B & B REGNEFUNKTIONX B $ * B &
0x30d77c…30d910 Dummy {f00=0x0036, f01=0x0190, f02=» ( C " C & C CHECKCIFFERV C . $ * C J BEREGNINGE C Z $ * C t & C & C BEREGNINGE C $ * C & SGRUNDLAG C & C & i C
0x30d910…30daa4 Dummy {f00=0x0036, f01=0x0190, f02=»REGNINGE C $ * D & D $ * D 0 & D @ & D N & D CHECKCIFFER9 D j $ * D & D FEJL D $ * D $ * D ( D D & D &
0x30daa4…30dc38 Dummy {f00=0x0036, f01=0x4184, f02=» B9BD E " * E & E * ZZZZZZZZZE-9 E 8 " * E T 9B E f " * E x ( E E & E LBNR E $ * E ***99A E " * E & - E
0x30dc38…30ddcc Dummy {f00=0x0036, f01=0x0190, f02=» : H IDENT RGSUBS TRA 4.2 80-03-17 F2 O2222 03.01.XXX.1 > : CYCLRhCYK CYKINT DIVTR ENTER FMTNXT KKCH KKTRP KORT B & " KVITR LSTINTT MODP2 SUBTOT-hSUM $$$TRAC @ < CYCLR hCYK 8 CYKINTS C DIVTR ENTER FMTNXTX KKCH Q @ < K
0x30ddcc…30df60 Dummy {f00=0x0036, f01=0x0190, f02=»RMXKT FRMXSP FRMXTA FRMXVOF GRASPVK LINOPTO SETDEBM B > SETKREC SLUT8 SPCHK5C SPCLRAP SPERR SPINF1F SPLIN8F T:DSC0 > > : T:DSC1 T:EDWR T:ERAS T:TESTF T:WAITK WCHECKO WRITJTM WRITVOC WTALLYS 0 C 0 C
0x30df60…30e0f4 (2, 143) Dummy {f00=0x0037, f01=0x0190, f02=» K Z ] ( & a < 6 b F e X l $ h p Y x t 0 J F " D @R_+H A 0R P @ H LL R_H RLL R R LL90X 0 H Q
0x30e0f4…30e288 Dummy {f00=0x0037, f01=0x0190, f02=» H H 0X @ Z ( 0 ' 8 J 0 Z 2 j , z 8 . 6 J F " D R RH H ) LL{ R 0X 0X R
0x30e288…30e41c Dummy {f00=0x0037, f01=0x0190, f02=» 8 $ : 0 J F " D 0X W 0X ! LL LL< LLL LLR R0X A n E 2 ~ M0 Y0 _0 i0 s0 }0 0
0x30e41c…30e5b0 Dummy {f00=0x0037, f01=0x0190, f02=» 0 J F " D LL LL% LL LL 4 H 3 I *H &@ A " ` p < K > J F " D LL R@ ) LL R 4
0x30e5b0…30e744 Dummy {f00=0x0037, f01=0x018e, f02=» J F " D LL@ 4 4 I gI - RT RT I ! LL LLH ) E X I h ^ z i n r " | J F " D @ LL R LL@ W ( K 7A R
0x30e744…30e8d8 Dummy {f00=0x0037, f01=0x018e, f02=» J F " D LLWV( R LLW@( R LLW*( RT'W R 0 L R d v J F " D T!@ ! LL LLW LL 4 4 ( ! LL *
0x30e8d8…30ea6c Dummy {f00=0x0037, f01=0x018e, f02=» ^ C q SY v STABEL & y C < J F " D @ gtW I I A LL LL RW W I I A LL LL RW W H L 4 * 0 J F " D %I # A
0x30ea6c…30ec00 Dummy {f00=0x0037, f01=0x018e, f02=» 2 . $ < 4 D 0 V J F " D ) LLS@ @ R@ 0X 0X LL R 0X 0X I RLL% h : ! ( & 1
0x30ec00…30ed94 (2, 144) Dummy {f00=0x0037, f01=0x0190, f02=» R J F " D @ 4 H I R 4 R4 A A H & " 0 H f 0 H x 0 H 0 H 0 H & ( J F " D
0x30ed94…30ef28 Dummy {f00=0x0037, f01=0x0190, f02=» LL LL R B R %0 s b *0 s t 9 . J F " D A I @ 4 LL LL LL LL@ @ @ @ 0X 4 I P0 S
0x30ef28…30f0bc Dummy {f00=0x0037, f01=0x0190, f02=» A LL R R LLW&0X LL R R0X @ @ @ * P SUBTOTAL ` % x J F " D LL R 4 4 LLI aI H xA R@ Wg R A R >
0x30f0bc…30f250 Dummy {f00=0x0037, f01=0x018e, f02=» RW 0 X @ & 4 6 * F * < V + f 0 * x =0 B0 J F " D X R R0X R 4 4 I RLL LLA LL G <
0x30f250…30f3e4 Dummy {f00=0x0037, f01=0x018e, f02=» J F " D @ LLWk RLLI LL@ R H 0X @ R@ R # LL ) L 0 L R 0 d t 2 . * J F " D L LL 0X R 0X R0X I K R 4 I )
0x30f3e4…30f578 Dummy {f00=0x0037, f01=0x401a, f02=» @ LL@ R H 0X @ R@ R # LL ) L 0 L R 0 d t 2 . * J F " D L LL 0X R 0X R0X I K R 4 I )
0x30f578…30f70c Dummy {f00=0x0037, f01=0x0190, f02=» : H IDENT RGSUB1 TRA 4.2 80-03-17 F2 O2222 03.01.XXX.1 2 . FLDIN FLDTST SLUT SUMWRT UPDA12 UPDAKK B $$$TRAS x > : FLDIN FLDTSTS SLUTM SUMWRT1 UPDA12 UPDAKK D @ FRMTJTS FRMTVOA FRMXTA0 KTPLANF PACKST SPERR SPINF8 WRI
0x30f70c…30f8a0 Dummy {f00=0x0037, f01=0x0190, f02=» ( " ) LL l M * S < Y N _ ` r0 r J F " D @ # LL9! LL3! LL-! LL H # LL 0
0x30f8a0…30fa34 (2, 145) Dummy {f00=0x0037, f01=0x0190, f02=» LL RT@ RH R RLL R RH R R RA 6 @ 0 D V J F " D A @ @ 4 LL LL 4 H (H I W h 0 %0 0 J F " D
0x30fa34…30fbc8 Dummy {f00=0x0037, f01=0x0190, f02=» LL9 Z 0 0 * J F " D 6 - LL W + LL " < 0 d J F " D 'I #I # LL W 4 LL
0x30fbc8…30fd5c Dummy {f00=0x0037, f01=0x018e, f02=» - . / 0 , 1 < 2 L 3 4 E l 5 E | 6 7 8 9 W : W ; i < =
0x30fd5c…30fef0 Dummy {f00=0x0037, f01=0x0190, f02=» c RTE j0 T p GEB * v > | N ` J F " D @ , ) LL LLW ) LL LLW ) LL LLC 8R LL<R p 0 ! 0 & 0 F
0x30fef0…310084 Dummy {f00=0x0037, f01=0x018e, f02=» LL:R LL8R LL8RW LL<R LL L | : J l |
0x310084…310218 Dummy {f00=0x0037, f01=0x0190, f02=» , 3 6 , A < J F " D LL LLW 6 W LLT W LLT LL R P N F R X d j v z
0x310218…3103ac Dummy {f00=0x0037, f01=0x0190, f02=» 0 ( : L J F " D ! LL R ) LLu) LL ! LLe! LLV) LLUWL) ^
0x3103ac…310540 Dummy {f00=0x0037, f01=0x417c, f02=» % + . 0 @ 8 R > d J F " D LL W 4 4 LL! LLF! LL LL! LL3! LL LL v C K Q V
0x310540…3106d4 (2, 146) Dummy {f00=0x0037, f01=0x0190, f02=» : H IDENT RGSUB2 TRA 4.2 80-03-17 F2 O2222 03.01.XXX.1 PACKCL PACKST B $$$TRAS PACKCL H PACKST n CYTRP EMPTYTT .0 E 90 E J F " D 0R P W W
0x3106d4…310868 Dummy {f00=0x0037, f01=0x401e, f02=» V i s @ -03-17 F2 O2222 03.01.XXX.1 PACKCL PACKST B $$$TRAS PACKCL H PACKST n CYTRP EMPTYTT .0 E 90 E J F " D 0R P W W
0x310868…3109fc Dummy {f00=0x0037, f01=0x0190, f02=» : H IDENT RGSUB3 TRA 4.2 80-03-18 F2 O2222 03.01.XXX.1 6 2 ASGVOL CLSVOL CYLINE CYOUT CYRD CYTRP CYWRT B $$$TRAS | D @ ASGVOL CLSVOLC CYLINEO CYOUT f CYRDC CYTRP / CYWRT B > ASSGR CLEAR8T CRVO2 FRMXVO- GRASPV2 RAREAD. RAW
0x3109fc…310b90 Dummy {f00=0x0037, f01=0x0190, f02=» = @ J F " D 6 ( R W R T R T| R TrH LL S n a ~ k u J F " D @R T_ H V R TLH H R T> R T4 R T*H
0x310b90…310d24 Dummy {f00=0x0037, f01=0x0190, f02=»0X L * : J Z j z J F " D H 0X H !0X H 0X 0X 0X H 0X 0X W 0X 0X $
0x310d24…310eb8 Dummy {f00=0x0037, f01=0x018e, f02=» r x z J F " D @ R LL T @ 4 @ 4 I >I A R R R , z 0 0 0 J F " D H 0X
0x310eb8…31104c Dummy {f00=0x0037, f01=0x0190, f02=» 0 & J F " D LL R RA 4 RA 4 H 0X _ A LL R LL T 8 " & ( >
0x31104c…3111e0 Dummy {f00=0x0037, f01=0x4144, f02=» Q x J F " D @X 0X @ LL R RT W3@ $ r TRP 0 R B = ; A R R
0x3111e0…311374 (2, 147) Dummy {f00=0x0038, f01=0x0190, f02=» : H IDENT ADM6 TRA 4.2 80-03-17 F2 O2222 03.01.XXX.1 > : ADM600 CHNGDK EXCHAN SENDRC SIGNOF SIGNON STRTRC B TERMINM TRNOK WJDC2 $$$TRA B > ADM600M CHNGDKD EXCHAN- SENDRC2 SIGNOFX V SIGNON * & STRTRC T
0x311374…311508 Dummy {f00=0x0038, f01=0x018e, f02=» SPERR T:ATTFG T:DCRER T:DCWR p 6 2 T:DELAM T:DSC1D T:EDWRC T:WAITG WRITIDL WRITJTL & " ` # p & 30 M 6 <0 M ? B0 M J F " D A @ C Tl Te T^A
0x311508…31169c Dummy {f00=0x0038, f01=0x0190, f02=» a e . g ( h 8 k J l Z q V l u | ~ J F " D @ LL J R RT RLL RT R RX R RLL RLL_ R LL@ A RL
0x31169c…311830 Dummy {f00=0x0038, f01=0x0190, f02=»a FFh I RT( R LL h x & 6 F 0 ` V TRANSMIT h 0 , J F " D T 1X FF 4 LL LL LL
0x311830…3119c4 Dummy {f00=0x0038, f01=0x0190, f02=» ' ( * + < , L 2 ^ 3 n 6 ~ J F " D LL RLL RLL RLL R6 K?$ _ RLL RLLA 1XFF R6 _F A E I
0x3119c4…311b58 Dummy {f00=0x0038, f01=0x0190, f02=» h i p & q 6 t H u X | j } z J F " D @ R J R_N RLL R P RLL_^ RLL 4 RLL RLL sW RLL RLL W RLL
0x311b58…311cec Dummy {f00=0x0038, f01=0x0190, f02=»4 RLL RLL LL R LL TD! LL> R LL D T d v J F " D b LLa FF LL RT RT 4 4
0x311cec…311e80 Dummy {f00=0x0038, f01=0x0190, f02=»R LL <R LL8R LL h P LL T !L B ` T w f } x J F " D @LLh P LL_ + LL W9 ! LL LL
0x311e80…312014 (2, 148) Dummy {f00=0x0038, f01=0x018e, f02=»F L * : J Z * j z J F " D RTd RT`_ RTO RTK LLm FF RT1 R RI 0002 4 6
0x312014…3121a8 Dummy {f00=0x0038, f01=0x0190, f02=» S ^ c CSSF ( j < r L z J F " D @ m FF RT R4 LL LLm FF RT I R4 l X X
0x3121a8…31233c Dummy {f00=0x0038, f01=0x0190, f02=» J , ( 5 : " L 5 J F " D LL R RLL 4 4 LL0X 4 LLh n ( ) / DFHR J F " D
0x31233c…3124d0 Dummy {f00=0x0038, f01=0x0190, f02=» T] $ H LLh t & 2 B J F " D T2 b 1X FF DW WF4 R 4 & J F " D % LL9 L
0x3124d0…312664 Dummy {f00=0x0038, f01=0x018e, f02=» 0 & DATATRANSMISSION ( $ * H & X & BRUGERNAVN f & G ~ AAAAAAAAAAAAAAAAAAA9 " * G & & KENDEORD & D TTT9
0x312664…3127f8 Dummy {f00=0x0038, f01=0x0190, f02=» 9999 " * N & ,NAME= * AAAAAAAAAAAAAAAAAAA9 > " * M b ( t & ' $ * & * ( & 1 DATATR
0x3127f8…31298c Dummy {f00=0x0038, f01=0x4132, f02=» " * A ( " & 2 & B ' P $ * b r $ * & * ( & & * ( . * ( LL% LL LLb
0x31298c…312b20 Dummy {f00=0x0038, f01=0x40c2, f02=» : H IDENT ADM6D TRA 4.2 80-03-17 F2 O2222 03.01.XXX.1 ADM600 B $$$TRAM T ADM600 f ADMRETM z ?R @
0x312b20…312cb4 (2, 149) Dummy {f00=0x0038, f01=0x0190, f02=» : H IDENT KTPLN TRA 4.2 80-03-17 F2 O2222 03.01.XXX.1 KTPLAN RESTMK SETMK B $$$TRAP b " KTPLAN RESTMKS SETMK t RAREADP T:DELAA 0 P J F " D " ! LL , _' (
0x312cb4…312e48 Dummy {f00=0x0038, f01=0x0190, f02=»R LL Tp LLj j x ( 0 x : J F " D " ; LL' _N LLj @ L 0 0 J F " D 4 @ LL LL 4 @ LL 4
0x312e48…312fdc Dummy {f00=0x0038, f01=0x0190, f02=» W] P LL LL f {0 $ J F " D @h P0j " LL_ 6 0 x J F " D ^F _,4 LL R LL
0x312fdc…313170 Dummy {f00=0x0038, f01=0x405a, f02=» LL R LL R4 * D@ V " LL_ 6 0 x J F " D ^F _,4 LL R LL
0x313170…313304 Dummy {f00=0x0038, f01=0x40cc, f02=» : H IDENT KTPLND TRA 4.2 80-03-17 F2 O2222 03.01.XXX.1 KTPLAN SETMK B $$$TRAP Z KTPLAN SETMK l 0 LL 4 4 @
0x313304…313498 Dummy {f00=0x0038, f01=0x018e, f02=» : H IDENT KTOPR TRA 4.2 80-03-17 F2 O2222 03.01.XXX.1 KTOPR KTPRT B $$$TRAO X KTOPR KTPRT g j > : ADMRETO FRMXTAA KTPLAN0 RAREADF RAWRIT RESTMKX SPCLRA < 8 SPCLRN SPERR T:ATTF T:DELA T:EDWR T:WAIT WTALLY
0x313498…31362c Dummy {f00=0x0038, f01=0x0190, f02=» J F " D I ?R <RA A A 1XFF R2 RRR_ @ R $ A @ B V C f F v Y0 m p0 J F " D @ 1XFF R6 _ _=H ! LL j R LL _cf (
0x31362c…3137c0 Dummy {f00=0x0038, f01=0x0190, f02=» LL R LL ^ , 0 < N ^ p 0 b x J F " D R_ R LL R_ LL R LL <R LLj
0x3137c0…313954 (2, 150) Dummy {f00=0x0038, f01=0x0190, f02=» LL <R R _ LL8R LL x A 6 D0 F M X [0 h J F " D @ R LL <R LLj j S" M z 0 0 DI
0x313954…313ae8 Dummy {f00=0x0038, f01=0x0190, f02=»L LL LL R?R LL R LL j ( x 8 J F " D <R j j LLj d S J 0 & )0 2
0x313ae8…313c7c Dummy {f00=0x0038, f01=0x0190, f02=» f r v y . J F " D @LL R LL T b _ @ ?RH ( 0X 1X FF > 0 0 0 J F " D " H
0x313c7c…313e10 Dummy {f00=0x0038, f01=0x0190, f02=» j j 0X 1X FF B R b r $ * & & 99999999E-99 " * & &
0x313e10…313fa4 Dummy {f00=0x0038, f01=0x0190, f02=» DATAS[T $ * & , REGKONTONR : $ * T & d & r KONTONR $ * & BFO $ * & & & (
0x313fa4…314138 Dummy {f00=0x0038, f01=0x404c, f02=» ( & ! LLP R R@ _ @ R R4 L 6@ H : $ * T & d & r KONTONR $ * & BFO $ * & & & (
0x314138…3142cc Dummy {f00=0x0038, f01=0x40ce, f02=» : H IDENT KTOPRD TRA 4.2 80-03-17 F2 O2222 03.01.XXX.1 KTOPR KTPRT B $$$TRAO X KTOPR KTPRT j ADMRETO ?R4 @
0x3142cc…314460 Dummy {f00=0x0038, f01=0x0190, f02=» : H IDENT REMFMT TRA 4.2 80-04-09 F2 O2222 03.01.XXX.1 FMTREM B $$$TRAM T FMTREM f T:ATTFM z * " E** " O** " ** " ** " &**
0x314460…3145f4 (2, 151) Dummy {f00=0x003a, f01=0x0190, f02=» NR $ * & , & < & L XXXXXXXXXX ^ " * x & & XXXXXXXXXX " * & & & &
0x3145f4…314788 Dummy {f00=0x003a, f01=0x0190, f02=» & & & " ADR 0 $ * D & T & b & @ r & & BY $ * & & & @ & &
0x314788…31491c Dummy {f00=0x003a, f01=0x0190, f02=» -DISTR $ * & $ & @ 4 & F & V BET.FORM d $ * | & & X " * & GIRONR $ *
0x31491c…314ab0 Dummy {f00=0x003a, f01=0x0190, f02=» & XXXXXXXXXX " * 4 & F XXVXXVXX T " * l & ~ & SLETNING EJ TILLADT0 $ * & & & $ *
0x314ab0…314c44 Dummy {f00=0x003a, f01=0x0190, f02=»& NR $ * & . XXXXXXXXXX @ " * Z & l SIDSTE UDB z $ * 99E-99E-99 " * & ZZZVZZZVZZ9E,99- " *
0x314c44…314dd8 Dummy {f00=0x003a, f01=0x0190, f02=» N[STE $ * $ C* 0 & @ 99E-99E-99 N " * h & | FAKTURA $ * $ D* & ! ZZZVZZZVZZ9E,99- " !* &
0x314dd8…314f6c Dummy {f00=0x003a, f01=0x0190, f02=»& # $ SKYLDIGT $ $* $ $ D* 4 & D % ZZZVZZZVZZ9E,99- R " %* r ( & g & % & & ' LEVERAND $ '* &
0x314f6c…315100 Dummy {f00=0x003a, f01=0x018e, f02=»E-99 " ** & * $ D* . & > + ZZVZZVZZ9E,99- L " +* j & + ~ , TEKST $ ,* - 999 " -* & & & #
0x315100…315294 (2, 152) Dummy {f00=0x003a, f01=0x0190, f02=» 1 BXXXXXXXXXX9 " 1* & 1 4 2 REG.KNT. B $ 2* Z 3 9999999999 j " 3* & 4 ]R $ 4* 5 X " 5* ( 6 D
0x315294…315428 Dummy {f00=0x003a, f01=0x018e, f02=» & : 99E-99E-99 " :* ( & : : ; VEDL. H $ ;* ^ < DATO n $ <* & = XXE-XXE-XX " =* & = > FRA/TIL NR $ >*
0x315428…3155bc Dummy {f00=0x003a, f01=0x0190, f02=» A ALLE OPLYSNINGER (1) $ A* ( & 8 B X J " B* & B n ( | C & VAL & & RDATO ( D & BELT &
0x3155bc…315750 Dummy {f00=0x003a, f01=0x0190, f02=» $ G* & H 99E-99E-99 " " H* T < & H N I FRA/TIL-NR: $ I* x & T J ZZ9 " J* T & - & T K ZZ9 " K* T
0x315750…3158e4 Dummy {f00=0x003a, f01=0x0190, f02=»22 l $ M* & # T N 9T , " N* T > ( P O 0 & N l P REMIT.TEKST NR: z $ P* & & T Q XXX " Q* T & &
0x3158e4…315a78 Dummy {f00=0x003a, f01=0x4086, f02=» $ S* & T T XT * " T* T < ( N 1XFF 4 Z p@
0x315a78…315c0c Dummy {f00=0x003a, f01=0x0190, f02=» : H IDENT REMLEV TRA 4.2 80-04-09 F2 O2222 03.01.XXX.1 > : IDXDEL IDXGET IDXINS INITIX LEVDEL LEVOPR LEVPRT B 2 . LEVRD LEVSPGT LEVWRT SETIDX9 VARINT2 VARRD $$$TRA B > IDXDELL IDXGETV IDXINSD INITIX2 0 LEVDELX LEVOPR
0x315c0c…315da0 Dummy {f00=0x003a, f01=0x0190, f02=»ETKEYD SPCLRAR SPCLRN h 4 0 SPERR SPLIN8X T:DELAI T:EDWR T:TEST2 T:WAITE VEDLIGEH.T V p % 1 " ; ? J F " D LLA A R R6 _$ R RyT R
0x315da0…315f34 (2, 153) Dummy {f00=0x003a, f01=0x018e, f02=» [ ^ u0 { ~ 2 J F " D @2 RRR_ @ @ R R2 RRR_ 6 W # LL LL R_ B
0x315f34…3160c8 Dummy {f00=0x003a, f01=0x018e, f02=» " ( 8 H X J F " D LLA A R R6 CC _ R R. & R RA " @ @ A R R h
0x3160c8…31625c Dummy {f00=0x003a, f01=0x0190, f02=» H F I0 2 Y * : ^ L b ^ r p u w { ~ $ J F " D @
0x31625c…3163f0 Dummy {f00=0x003a, f01=0x0190, f02=» " X 4 F V h [ z h
0x3163f0…316584 Dummy {f00=0x003a, f01=0x018e, f02=» m 0 m . > P s b t J F " D L LL R LLLL LL LL R LLLL LL@ 4 @ 4 H 0X _
0x316584…316718 Dummy {f00=0x003a, f01=0x0190, f02=» * - 0 D & 2 8 6 J 9 < X l > ~ B J F " D A R LLLL LL R LLLL LL R LLLL LL R LLLL LL R LLLL E H
0x316718…3168ac Dummy {f00=0x003a, f01=0x0190, f02=» ` i b f i 2 l m B n T r f z x } s J F " D @ LL R LLLL LL R LLLL LL R LLLL LL R LLLL LL R LLL
0x3168ac…316a40 Dummy {f00=0x003a, f01=0x0190, f02=» 0 L 0 L 0 L 0 L 2 FORESPG. D l | J F " D LL LL LL LL 4 LLA A A R R6 YY _ R "
0x316a40…316bd4 (2, 154) Dummy {f00=0x003b, f01=0x018e, f02=» 9 @ J F " D RMTK RTG RTC@ @ R R2 RRR_ I R R2 RRR_ D h I N x J N K 9 O t b f q0 w0 0
0x316bd4…316d68 Dummy {f00=0x003b, f01=0x0190, f02=» " $ J F " D LL@ A ! LL @ H 1X FF R " [ RT3 R$ 4
0x316d68…316efc Dummy {f00=0x003b, f01=0x0190, f02=» - 1 5 80 1 " J F " D ( W RT _a4 H 0X _ A R R T LL R LL 4 H K M Q c0 f i k
0x316efc…317090 Dummy {f00=0x003b, f01=0x0190, f02=»L R LLLL LL R LLLL f $ 4 F X j z J F " D LL
0x317090…317224 Dummy {f00=0x003b, f01=0x0190, f02=» % . / @ J F " D LL R LLLL LL R LLLL LL@ R " $ ( 2
0x317224…3173b8 Dummy {f00=0x003b, f01=0x0190, f02=» H J N . X @ [ P ] b a t k n p t ~
0x3173b8…31754c Dummy {f00=0x003b, f01=0x0190, f02=» / & 8 J l 0 | J F " D LLLL LL R LLLL LL R LLLL LL R R T R LL T 0 L 0 L 0
0x31754c…3176e0 Dummy {f00=0x003b, f01=0x0190, f02=» LL LL Z 0 $0 0 * J F " D LL4 LL " ! LL W < E 0 L d g0 0 t0 0 J F " D @4 LLH 0X _ A
0x3176e0…317874 (2, 155) Dummy {f00=0x003b, f01=0x0190, f02=» J F " D @ 4 @ 4 R R P H 0X _ " A Z 0 j | < ?0 J F " D R LL R LLLL
0x317874…317a08 Dummy {f00=0x003b, f01=0x0190, f02=» m p s * u < y N | ` 0 p J F " D @L TM R LL T< R _8 R LLLL LL R LLLL LL R L 4
0x317a08…317b9c Dummy {f00=0x003b, f01=0x0190, f02=» J F " D 1 h P LLj ) LL W+ V 0 f / x 7 :0 J F " D j R LL X& LL R LL E0
0x317b9c…317d30 Dummy {f00=0x003b, f01=0x018e, f02=» 0 4 0 . > N ^ J F " D R LL R R4 R R T H 0X _ A R R n 0 0 4
0x317d30…317ec4 Dummy {f00=0x003b, f01=0x0190, f02=» 0 & 4 8 < / H A 0 Z J F " D R LLLL LL R LL R@ 4 @ 4 LL l a 0 r0 0 J F " D @ LL : 4 LL
0x317ec4…318058 Dummy {f00=0x003b, f01=0x0190, f02=» " . ` 0 0 0 / B 0 T 0 0 f J F " D R LL ! LL ! LL4_$ LL LL " 1 x ! $0 L 30 L 6 J
0x318058…3181ec Dummy {f00=0x003b, f01=0x018e, f02=» T V X * ^0 : c L u J F " D @ W*# LL$ RT RP R R R RT LL_ R_ 4 4 R RRP l 0 # 0 #
0x3181ec…318380 Dummy {f00=0x003b, f01=0x0190, f02=» 0 & 8 J l ~ J F " D LL LL@ 4 @ 4
0x318380…318514 (2, 156) Dummy {f00=0x003b, f01=0x018e, f02=»& 9999999999 " * & & 8 99E-99E-99 F " * ` & r & & & & & & & & & &
0x318514…3186a8 Dummy {f00=0x003b, f01=0x0190, f02=» & XXXXXXX " * . & @ XXXXXXXXXX N " * h & z & & A & & 99E-99E-99 " * BZZZVZZZVZZ9E,99
0x3186a8…31883c Dummy {f00=0x003b, f01=0x0190, f02=» 99E-99E-99 " * & 2 BZZZVZZZVZZ9E,99- @ " * b & v & BZZZVZZZVZZ9E,99- " * & & BZZZVZZZVZZ9E,99-
0x31883c…3189d0 Dummy {f00=0x003b, f01=0x406a, f02=» & 1 ( , ' % LL4 j 4 $ ! T@ f b & v & BZZZVZZZVZZ9E,99- " * & & BZZZVZZZVZZ9E,99-
0x3189d0…318b64 Dummy {f00=0x003b, f01=0x0190, f02=» : H IDENT REMTXT TRA 4.2 80-04-09 F2 O2222 03.01.XXX.1 6 2 REPL00 SETKEY TXTOPR TXTPAK TXTPRT TXTUNP B $$$TRAM | B > REPL00 SETKEYT TXTOPRT ` TXTPAKR V TXTPRT TXTUNP + D @ ABORT FMTREMT RAREAD RAWRIT9 SPCLRA2 SPCLRN1 SPL
0x318b64…318cf8 Dummy {f00=0x003b, f01=0x0190, f02=» " /0 6 & 9 6 J F " D I ?R R @ LL LL LL R6 _&! LL A R FFW F C F O _ d g j0
0x318cf8…318e8c Dummy {f00=0x003b, f01=0x0190, f02=»0 R , < L J F " D @ W R! LLe 6 I@ R FF " A6 R FFW l 0 W 0 W
0x318e8c…319020 Dummy {f00=0x003b, f01=0x0190, f02=»P 0R N 0 F . . & . > ? N B ^ J F " D LL" _ 0X R 4 @ R 4 @ 6 W R n O R W Z p
0x319020…3191b4 (2, 157) Dummy {f00=0x003c, f01=0x0190, f02=» 0 0 + 0 @ P J F " D X _ A LL R LL T?! LL9 R@ R XH 0X ` V 0 _
0x3191b4…319348 Dummy {f00=0x003c, f01=0x018e, f02=» j j ` I O0 . g @ z0 P J F " D @ ) LL LL@ 4 j R j ) LL b J F " D j 4 6 H 1X W
0x319348…3194dc Dummy {f00=0x003c, f01=0x0190, f02=» & & & " & 0 99E-99E-99 > " * X & j FRA/TIL-NR x $ * & ZZ9 " * & - ZZ9 " *
0x3194dc…319670 Dummy {f00=0x003c, f01=0x0190, f02=» ZZZ " * & * & : & H & V & d & r & ( & & & & ( &
0x319670…319804 Dummy {f00=0x003c, f01=0x4058, f02=» & 1 ( # LL 4 $ B@ T& V & d & r & ( & & & & ( &
0x319804…319998 Dummy {f00=0x003c, f01=0x018e, f02=» : H IDENT T:ATC0 TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 T:ATC0 B T:ATC0A D T > : T:DTC0 D:CB10 C:CB10 D:CB20 C:CB20 D:CB30 C:CB30 h > : D:CB40A C:CB40A D:CB600 C:CB60F D:CD30 C:CB30X D:CD40 > : C:CB40 D:GB10 Z:GB10 D
0x319998…319b2c Dummy {f00=0x003c, f01=0x0190, f02=» * & f z * & 2 * & = ` * & [ * & y 3 * &
0x319b2c…319cc0 Dummy {f00=0x003c, f01=0x0190, f02=» t * & a * & - @ * & K n * & i * & * &
0x319cc0…319e54 (2, 158) Dummy {f00=0x003c, f01=0x413c, f02=» * & , ( ;@ TC N , ( Q ~ , ( a " $ & ( * , ( q , . 0 2 4 6 8 :
0x319e54…319fe8 Dummy {f00=0x003c, f01=0x40da, f02=» : H IDENT T:DTC0 TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 T:DTC0 B T:DTC0D T REGGO h * & TC * x * @ , ( q , . 0 2 4 6 8 :
0x319fe8…31a17c Dummy {f00=0x003c, f01=0x018e, f02=» : H IDENT T:AKA0 TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 T:AKA0 B T:AKA0A T . * T:DKA0 D:CB90 C:CB90 D:TB90 Z:TB90 h * & @ * & P * & =
0x31a17c…31a310 Dummy {f00=0x003c, f01=0x401e, f02=» y @
0x31a310…31a4a4 Dummy {f00=0x003c, f01=0x40be, f02=» : H IDENT T:DKA0 TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 T:DKA0 B T:DKA0D T KBVGO h , ( KA @ * * x @
0x31a4a4…31a638 Dummy {f00=0x003c, f01=0x4164, f02=» : H IDENT T:AGA0 TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 T:AGA0 B T:AGA0A ^ T . * T:DGA0 D:CB90 C:CB90 D:TB90 Z:TB90 h * & 0 * & * & = a
0x31a638…31a7cc Dummy {f00=0x003c, f01=0x40be, f02=» : H IDENT T:DGA0 TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 T:DGA0 B T:DGA0D T GTPGO h , ( GA @ * * x @ * & * & = a
0x31a7cc…31a960 Dummy {f00=0x003c, f01=0x4164, f02=» : H IDENT T:ALA0 TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 T:ALA0 B T:ALA0A ^ T . * T:DLA0 D:CB90 C:CB90 D:TB90 Z:TB90 h * & * & * & = a
0x31a960…31aaf4 (2, 159) Dummy {f00=0x003c, f01=0x40be, f02=» : H IDENT T:DLA0 TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 T:DLA0 B T:DLA0D T LPGOA h , ( LA @ * * x @ * & * & = a
0x31aaf4…31ac88 Dummy {f00=0x003c, f01=0x40f0, f02=» : H IDENT T:AD00 TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 T:AD00 B T:AD00A " T T:DD00 D:CB90 C:CB90 h * & ` D0 * @ * & = a
0x31ac88…31ae1c Dummy {f00=0x003c, f01=0x40bc, f02=» : H IDENT T:DD00 TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 T:DD00 B T:DD00D T DC1GO h * & D0 * x @ D0 * @ * & = a
0x31ae1c…31afb0 Dummy {f00=0x003c, f01=0x40d6, f02=» : H IDENT T:ATAB TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 T:ATAB B T:ATABA T . * T:AD00 T:AGA0 T:AKA0 T:ALA0 T:ATC0 h " U@ :A @
0x31afb0…31b144 Dummy {f00=0x003c, f01=0x40aa, f02=» : H IDENT U:BTAB TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 U:BTAB B U:BTABB T U:TB20 h @ TB2 z :T @ :A @
0x31b144…31b2d8 Dummy {f00=0x003c, f01=0x4090, f02=» : H IDENT S:BTAB TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 S:BTAB B S:BTABB T h :B z@ :T @ :A @
0x31b2d8…31b46c Dummy {f00=0x003c, f01=0x0190, f02=» : H IDENT Z:TB90 TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 Z:TB90 B Z:TB90T T * & h * & * & = * & [
0x31b46c…31b600 Dummy {f00=0x003c, f01=0x0190, f02=» | * & * & H * & v * & - * & K * & i
0x31b600…31b794 (2, 160) Dummy {f00=0x015e, f01=0x0190, f02=» * & ( * & V * & * & ; * & Y
0x31b794…31b928 Dummy {f00=0x015e, f01=0x0190, f02=» j * & * & 6 * & d * & + * & I * & g
0x31b928…31babc Dummy {f00=0x015e, f01=0x0190, f02=» x * & * & D * & r * & 9 * & W * & u
0x31babc…31bc50 Dummy {f00=0x015e, f01=0x0190, f02=» * & $ * & R * & ) * & G * & e *
0x31bc50…31bde4 Dummy {f00=0x015e, f01=0x0190, f02=» * & * & 2 * & ` * & 7 * & U * & s
0x31bde4…31bf78 Dummy {f00=0x015e, f01=0x4178, f02=» t * & * & @ * & ' n * & E * & c * &
0x31bf78…31c10c Dummy {f00=0x015e, f01=0x40f0, f02=» : H IDENT D:TB90 TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 D:TB90 B D:TB90T T * & B h * & = B @ * &
0x31c10c…31c2a0 Dummy {f00=0x015e, f01=0x4136, f02=» : H IDENT C:CB90 TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 C:CB90 B C:CB90C T * & @ JKLM h * & NO `@GAGBGCGDGEGEGEGEGE * & = GEGEGEGEGEGEGE TCTDTETFTGTHTI [ TJTKTLTMTN
0x31c2a0…31c434 (2, 161) Dummy {f00=0x015f, f01=0x40c8, f02=» : H IDENT D:CB90 TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 D:CB90 B D:CB90C T * & * $ & h F H * @ = GEGEGEGEGEGEGE TCTDTETFTGTHTI [ TJTKTLTMTN
0x31c434…31c5c8 Dummy {f00=0x015f, f01=0x40e8, f02=» : H IDENT C:CB10 TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 C:CB10 B C:CB10C T * & h $ 6 0 6 @ TI [ TJTKTLTMTN
0x31c5c8…31c75c Dummy {f00=0x015f, f01=0x40f0, f02=» : H IDENT D:CB10 TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 D:CB10 B D:CB10C T * & B h * & = % B @ [ TJTKTLTMTN
0x31c75c…31c8f0 Dummy {f00=0x015f, f01=0x0190, f02=» : H IDENT C:CB20 TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 C:CB20 B C:CB20C T * & h * & * & = * & [
0x31c8f0…31ca84 Dummy {f00=0x015f, f01=0x4090, f02=» | * & H f z@ h * & * & = * & [
0x31ca84…31cc18 Dummy {f00=0x015f, f01=0x40f8, f02=» : H IDENT D:CB20 TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 D:CB20 B D:CB20C T * & J h * & Z = J @
0x31cc18…31cdac Dummy {f00=0x015f, f01=0x0190, f02=» : H IDENT C:CB30 TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 ! C:CB30 ! B C:CB30C ! T * & 8 6 ! h * & ! * & = ! * & [
0x31cdac…31cf40 Dummy {f00=0x015f, f01=0x0190, f02=» ! | * & " * & " H * & " v * & - " * & K " * & i
0x31cf40…31d0d4 (2, 162) Dummy {f00=0x015f, f01=0x0190, f02=» " * & # ( * & # V * & # * & ; # * & Y #
0x31d0d4…31d268 Dummy {f00=0x015f, f01=0x0190, f02=» # j * & $ * & $ 6 * & $ d * & + $ * & I $ * & g
0x31d268…31d3fc Dummy {f00=0x015f, f01=0x0190, f02=» $ x * & % * & % D * & % r * & 9 % * & W % * & u
0x31d3fc…31d590 Dummy {f00=0x015f, f01=0x0190, f02=» % * & & $ * & & R * & ) & * & G & * & e & *
0x31d590…31d724 Dummy {f00=0x015f, f01=0x0190, f02=» * & ' * & ' 2 * & ' ` * & 7 ' * & U ' * & s
0x31d724…31d8b8 Dummy {f00=0x015f, f01=0x018e, f02=» ' t * & ( & ( @ & ' ( V & E ( f & c ( v & ( & ( & ( & ( & ( & ( & 5 ( & S ( &
0x31d8b8…31da4c Dummy {f00=0x015f, f01=0x4098, f02=» ( & ) & ) * & TCTDTETFTGTHTITJT ) ( KTLTMTN* ) V ) n ) @ ) ( & ( & ( & ( & ( & 5 ( & S ( &
0x31da4c…31dbe0 Dummy {f00=0x015f, f01=0x40f4, f02=» : H IDENT D:CB30 TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 * D:CB30 * B D:CB30C * T * & F * h * & _ & { B * = * F * @ * & S ( &
0x31dbe0…31dd74 (2, 163) Dummy {f00=0x015f, f01=0x0190, f02=» : H IDENT C:CB40 TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 + C:CB40 + B C:CB40C + T * & + h * & + * & = + * & [
0x31dd74…31df08 Dummy {f00=0x015f, f01=0x4188, f02=» + | * & OD-KOM , & F , H & , ^ & - , n & K , ~ * & i 0000899 0 , * & , * & @ A B
0x31df08…31e09c Dummy {f00=0x015f, f01=0x40f4, f02=» : H IDENT D:CB40 TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 - D:CB40 - B D:CB40C - T * & F 0 0 - h * & 0 - = s - F - @ - @ A B
0x31e09c…31e230 Dummy {f00=0x015f, f01=0x0190, f02=» : H IDENT C:CB60 TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 . C:CB60 . B C:CB60C . T * & x 0 . h * & . * & = . * & [
0x31e230…31e3c4 Dummy {f00=0x015f, f01=0x0190, f02=» . | & / & / . & / > & - / N & K / ^ & i / n & / ~ & / & / $ & / & / & / & ; / &
0x31e3c4…31e558 Dummy {f00=0x015f, f01=0x400c, f02=» / @ 0 . | & / & / . & / > & - / N & K / ^ & i / n & / ~ & / & / $ & / & / & / & ; / &
0x31e558…31e6ec Dummy {f00=0x015f, f01=0x411c, f02=» : H IDENT D:CB60 TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 1 D:CB60 1 B D:CB60C 1 T * & ^ 1 h * & E 1 * & = q0 1 s 1 [ 1
0x31e6ec…31e880 Dummy {f00=0x015f, f01=0x0190, f02=» : H IDENT Z:TB10 TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 2 Z:TB10 2 B Z:TB10T 2 T * & 2 h * & 2 * & = 2 * & [
0x31e880…31ea14 (2, 164) Dummy {f00=0x015f, f01=0x4092, f02=» 2 | * & 3 3 H 3 h 3 |@ 3 * & 2 * & = 2 * & [
0x31ea14…31eba8 Dummy {f00=0x015f, f01=0x40f4, f02=» : H IDENT D:TB10 TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 4 D:TB10 4 B D:TB10T 4 T * & F 0 0 0 4 h * & 0 0 0 0 0 #0 &0 * 4 = + , 4 F 4 @ 4 [
0x31eba8…31ed3c Dummy {f00=0x015f, f01=0x4114, f02=» : H IDENT Z:GB10 TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 5 Z:GB10 5 B Z:GB10G 5 T * & 5 h * & 5 " = * 5 R 5 = R
0x31ed3c…31eed0 Dummy {f00=0x015f, f01=0x40f0, f02=» : H IDENT D:GB10 TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 6 D:GB10 6 B D:GB10G 6 T * & B 0 6 h * & 0 0 0 0 0 #0 *0 10 6 = 8 ? 6 B 6 @ 6
0x31eed0…31f064 Dummy {f00=0x015f, f01=0x4166, f02=» : H IDENT Z:GB20 TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 7 Z:GB20 7 B Z:GB20G 7 T * & 7 h * & 7 * & = 7 * & [
0x31f064…31f1f8 Dummy {f00=0x015f, f01=0x40f0, f02=» : H IDENT D:GB20 TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 8 D:GB20 8 B D:GB20G 8 T * & B 8 h * & 8 = L 8 B 8 @ 8 & [
0x31f1f8…31f38c Dummy {f00=0x015f, f01=0x40fa, f02=» : H IDENT Z:GB30 TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 9 Z:GB30 9 B Z:GB30G 9 T * & 9 h & 9 & = 9 [ 9 r 9 [ r 9 @ 9
0x31f38c…31f520 Dummy {f00=0x015f, f01=0x40f0, f02=» : H IDENT D:GB30 TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 : D:GB30 : B D:GB30G : T * & B 0 0 0 0 : h * & 0 0 0 # # + N O : = Q Z : B : @ : @ 9
0x31f520…31f6b4 (2, 165) Dummy {f00=0x0160, f01=0x40b6, f02=» : H IDENT Z:GB40 TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 ; Z:GB40 ; B Z:GB40G ; T ; h ; ; @ ; O : = Q Z : B : @ : @ 9
0x31f6b4…31f848 Dummy {f00=0x0160, f01=0x40ac, f02=» : H IDENT D:GB40 TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 < D:GB40 < B D:GB40G < T * & 0 0 0 < h < @ < @ ; O : = Q Z : B : @ : @ 9
0x31f848…31f9dc Dummy {f00=0x0160, f01=0x4134, f02=» : H IDENT Z:GB50 TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 = Z:GB50 = B Z:GB50G = T * & = h & = & = = & [ = & y = $ =
0x31f9dc…31fb70 Dummy {f00=0x0160, f01=0x4104, f02=» : H IDENT D:GB50 TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 > D:GB50 > B D:GB50G > T * & V 0 0 > h * & 0 0 0 0 0 0 # % > & " = C c w 0 0 0 > V > @ >
0x31fb70…31fd04 Dummy {f00=0x0160, f01=0x0190, f02=» : H IDENT U:TB20 TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 ? U:TB20 ? B U:TB20T ? T * & . ? h * & ? * & = ? * & [
0x31fd04…31fe98 Dummy {f00=0x0160, f01=0x0190, f02=» ? | * & K @ * & @ H * & @ v * & - @ * & K @ * & i
0x31fe98…32002c Dummy {f00=0x0160, f01=0x4020, f02=» @ A @ A K @ * & @ H * & @ v * & - @ * & K @ * & i
0x32002c…3201c0 Dummy {f00=0x0160, f01=0x40f0, f02=» : H IDENT D:TB20 TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 B D:TB20 B B D:TB20T B T * & B B h * & 0 0 0 0 B = B B B @ B @ * & i
0x3201c0…320354 (2, 166) Dummy {f00=0x0160, f01=0x40cc, f02=» : H IDENT D:CD30 TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 C D:CD30 C B D:CD30C C T * & . " < < C h 0 v0 x { < C . C @ C B B B @ B @ * & i
0x320354…3204e8 Dummy {f00=0x0160, f01=0x40d4, f02=» : H IDENT D:CD40 TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 D D:CD40 D B D:CD40C D T * & 6 8 h D h $ 0 0 0 D 6 D @ D B B @ B @ * & i
0x3204e8…32067c Dummy {f00=0x0160, f01=0x40d0, f02=» : H IDENT D:TD20 TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 E D:TD20 E B D:TD20T E T * & 2 0 0 0 0 0 0 $ E h 0 *0 1 4 0 E 2 E @ E D B B @ B @ * & i
0x32067c…320810 Dummy {f00=0x0160, f01=0x0190, f02=» : H IDENT KMD08 TRA 4.2 80-04-22 F2 O2222 03.01.XXX.1 F 4 0 DC1GO GTPGO KBVGO LPGO OFFLNE ONLINE REGGO F B $$$TRAD F z B > DC1GO X GTPGO 3 KBVGO LPGON J OFFLNE ONLINEX q REGGO F @ < DCTASKD GETTIDA PRINT T1GO- T:DSC02 T:PAUS. T:RSTR1
0x320810…3209a4 Dummy {f00=0x0160, f01=0x0190, f02=» F 0 G 6 G 9 G , ? G@ G < J F " D 0X ?R LL0R LL ! LL 0X0R R_ LL0R L G N D G G G M G R G U G Y G f
0x3209a4…320b38 Dummy {f00=0x0160, f01=0x403a, f02=» G 0X4 H H $@ H 6 ? G@ G < J F " D 0X ?R LL0R LL ! LL 0X0R R_ LL0R L G N D G G G M G R G U G Y G f
0x320b38…320ccc Dummy {f00=0x0160, f01=0x2008, f02=» L = KMD12 DATE = 80 02 13 1216PACK NBR = 0001
0x320ccc…320e60 Dummy {f00=0x0160, f01=0x0190, f02=»I A H 0 , Av0 _ 4 T' Av% Ax 4 AA A 4 A 4 H 0 _ A A$ Aw T 1 q @ W @ 4 0 4 H I F@ @ 0 0 @ AA
0x320e60…320ff4 (2, 167) Dummy {f00=0x0160, f01=0x0190, f02=» A A A A 4 A 4 A A 4 A A 4 @ A 8 I 6 `0 0 WU0 WL6 0 W 0 6 $0 W$0 W 0 W 0 W 0 W 0 : 0 P : _ 0 A A 0 P A W@6 0 a a W 0 a a W 0 a a
0x320ff4…321188 Dummy {f00=0x0160, f01=0x0190, f02=» 2 WE0 ! A A H A ( 2 A 4 A K0 _M0 W 0 W 0 W 0 W 0 W 0 W 0 W 0 8 : ; A 8 7 MM>MM>:>>>:>:? A I I W 1 q 1 A W 1 q 1 A W ? A 0! T b ! A/ A A ? A Wh0 ) A ?
0x321188…32131c Dummy {f00=0x0160, f01=0x0190, f02=» W ! A A 0 1 q H 0 A 6 0$ a W 0$ a W 0$ a 6 A 8 2 _I - A A ! A A 0 0 2 A 4 ! A A ! A ? 0 0 ! A ? 4 1 q 4 A 0 1 q !
0x32131c…3214b0 Dummy {f00=0x0160, f01=0x0190, f02=» W 0$ a 4 A 0 1 q 4 4 0 w ` 5 b ? J S 0 ~ t K e :
0x3214b0…321644 Dummy {f00=0x0160, f01=0x0190, f02=»IDE. QY q q q q q q q q q q q q q q q q q q q q q q q q q q q q q qKq q q q q q q q q q & . :@ J@< 4 j P T 0 ! A ? 4 1 q 4 A 0 1 q !
0x321644…3217d8 Dummy {f00=0x0160, f01=0x0190, f02=» ^ R V Z % A {% A k! A ) A _ A At I ! AtF Aub A A A , A A ! At A 4 Au A b # A $% Au A b # A % Au W A A 4 # A % Au
0x3217d8…32196c Dummy {f00=0x0160, f01=0x0190, f02=» A 4 4 ! At A 4 4 0 ! A W A 6 A 6 ) 4 K W8J W2 A 'W A " _?J CW 4 # A BH @ W+H @ ( ? 2 r
0x32196c…321b00 Dummy {f00=0x0160, f01=0x0190, f02=» 6 8?? 6 ? A ? 6 ? $ A _ A ? A ? I ? A ? A ? % A ,A A R A A 9 @ ? @ ? ? A 8 A 8 I # A W!% A W A~ A ? ! A ! A
0x321b00…321c94 (2, 168) Dummy {f00=0x0160, f01=0x0190, f02=» + A " ]h A b ) A C A b ! At#% A ! Au W ! Av W I A ? ? ! A ! A ? b b b b b b = A ? % A "
0x321c94…321e28 Dummy {f00=0x0160, f01=0x0190, f02=» Au % At A : A A ?) A :) A " % Au ! At ? A ? A A I A ? A ? A ? A A A ? A A % A 6! A A ? 8*( H ?+ < ?
0x321e28…321fbc Dummy {f00=0x0160, f01=0x0190, f02=» A A |% A / A A % A A # A @ W @ < A ? A ? A A ) A A ! A ! A < ? A _ A A ! A A ? A T2 8*( H ?+ A ? ? A ? A A A 9, A ? A A ?- A A A I
0x321fbc…322150 Dummy {f00=0x0160, f01=0x0190, f02=» " ? A ? Av Au b b Au A Ay$ A " W A A ? # A ) ? A ? # A )
0x322150…3222e4 Dummy {f00=0x0160, f01=0x0190, f02=» A ) At A A W ( W A W AyW AzW A|Wy # A AtWg A W`H ! A At A W:H At A I A.W $ 4 A> A~ Au A 4 A= Au Av A 4
0x3222e4…322478 Dummy {f00=0x0160, f01=0x0190, f02=» A A 4 - e % ^ V r y ; V ( @ L m t ] g y D W E _ ) / E ^ ] < = T Y d5151 52 0
0x322478…32260c Dummy {f00=0x0160, f01=0x0190, f02=» *0 ,0 .0 00 30 60 ; R R W A W AyW AzW A|Wy # A AtWg A W`H ! A At A W:H At A I A.W $ 4 A> A~ Au A 4 A= Au Av A 4
0x32260c…3227a0 Dummy {f00=0x0160, f01=0x0190, f02=» P & & D H L1 q 4 1 q 4 1 q 4 BE]RBFOBKOMTBOMRTXTVALTNR A-ADRLINIE POST. PRIMO BRILLEBET-ARTDEBITORRTE/GEBHOVEDBOGLEVKONTOLINIE NRLEVERAND SIDE 51-2SIDE 51-3SIDE 53-2SIDE 53-3 NORMALPOSTFEJL FORMATYDELSESMODT REMITTERINGPER FRA PER TILFAKTNR FAKTDATOTTX
0x3227a0…322934 (2, 169) Dummy {f00=0x0165, f01=0x0190, f02=» Q . Q Q Q[ Q @Q Q Q Q] Q] QH Q Q: Q; Q: Q
0x322934…322ac8 Dummy {f00=0x0165, f01=0x0190, f02=»I q A_ q q q q Q SALDOOVERF q A_ q q q q A A A A q q q q A q q Q A q A_ q A q q q q A A A A q q q q A A q q q Q Q Q
0x322ac8…322c5c Dummy {f00=0x0165, f01=0x0190, f02=» S Q: T Q X Q A q A_ A^ A P Q; Q Q: R Q: AC AR KONTROLSUM A Q; QH Q q A q A_ A A: A U Q; V Q: W Q:
0x322c5c…322df0 Dummy {f00=0x0165, f01=0x0190, f02=» L QZ N Q; O Q; q AT q Y Q^ q $Q A M/P-NR q A_ A^ q q A q q q A q A q q q q < GL. SALDO A CHECK p QH Q Q q AY A Q q &Q A A
0x322df0…322f84 Dummy {f00=0x0165, f01=0x0190, f02=» A q q q A q q q A q A A q q q q q 0Q SD-INCASSO q A^ A q M Q A A q q q F]R RE] REM OPK q q q q 5Q DEBITORINDB q A^ A q Q A A q q
0x322f84…323118 Dummy {f00=0x0165, f01=0x0190, f02=» q q q q q q q q $ * 0 7 > E L T d m v $ ) 4 D T d t
0x323118…3232ac Dummy {f00=0x0165, f01=0x0190, f02=» x 6 q q A q q q A q A A q q q q q 0Q SD-INCASSO q A^ A q M Q A A q q q F]R RE] REM OPK q q q q 5Q DEBITORINDB q A^ A q Q A A q q
0x3232ac…323440 Dummy {f00=0x0165, f01=0x0190, f02=» K Z t I ? < A A A 1 q 2 _ @ $ A @ 1 q 6 _ _=H ! At j Ax _cf ( Tj ( 3 Ax A$ Ax _ Ax _ A$ Ax < A
0x323440…3235d4 (2, 170) Opaque[0x194]
0x3235d4…323768 # DirEnt {nam=»SL461 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2208, f03=0x0000}
0x3235d4…323768 IdxSect {
0x3235d4…323768 f00 = 0x0110 // 0x3235d4 @0x0
0x3235d4…323768 f01 = 0x0004 // 0x3235d6 @0x2
0x3235d4…323768 gno = [ // 0x3235d8 @0x4
0x3235d4…323768 [0x00]: C0x0110.0x1.0
0x3235d4…323768 [0x01]: C0x0110.0x2.0
0x3235d4…323768 ]
0x3235d4…323768 }
0x323768…3238fc Dummy {f00=0x0110, f01=0x0190, f02=» < PSPKTAB1 KTAB BSPKY1,CANKY1,NOKEY,EORKY1,NOKEY,MACKY1, C > P FTABKY1,BTABKY1,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C D & P COPKY1,DUPKY1,EDTKY1,SLUTKY1, C . P KREKY1,REGKY2,LISTKY1,SBTKY1,SPGKY1, C < P CY1KY1,CY2KY1,INVKY1,KONKY1,KVITKY1,
0x3238fc…323a90 Dummy {f00=0x0110, f01=0x0190, f02=»CANKY1,NOKEY,EORKY1,NOKEY,MACKY1, C | > P FTABKY1,BTABKY1,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C , & P COPKY1,DUPKY1,EDTKY1,SLUTKY1, C n . P KREKY1,REGKY2,LISTKY1,SBTKY1,SPGKY1, C < P CY1KY1,CY2KY1,INVKY1,KONKY1,KVITKY1,SUPLKY1,SUMKY1, C <
0x323a90…323c24 Dummy {f00=0x0110, f01=0x0190, f02=» d " P CL1KY1,CL2KY1,CL3KY1,OUTKY1 P* . > PSPKTAB12 KTAB BSPKY2,CANKY2,NOKEY,EORKY2,NOKEY,MACKY2, C 8 2 P FTABKY2,BTABKY2,NOKEY,NOKEY,NOKEY,NOKEY, C z 2 P NOKEY,NOKEY,NOKEY,DUPKY2,EDTKY2,SLUTKY2, C 6 P KREKY2,REGKY2,ADMKY2,SPGKY2,KONK
0x323c24…323db8 Dummy {f00=0x0110, f01=0x0190, f02=»NOKEY, C l 2 P NOKEY,NOKEY,NOKEY,DUPKY2,EDTKY2,SLUTKY2, C 6 P KREKY2,REGKY2,ADMKY2,SPGKY2,KONKY2,KVITKY2,ONKY2 H P* * P* INQUIRY KEYTABLES (SPKEY=3) P* < PSPKTAB13 KTAB BSPKY1,NOKEY,CANKY1,NOKEY,NOKEY,MACKY1, C . P NO
0x323db8…323f4c Dummy {f00=0x0110, f01=0x0190, f02=» C j " P NOKEY,INVKY1,KONKY1,KVITKY1 P* 2 < PSPKTAB23 KTAB BSPKY1,NOKEY,CANKY1,NOKEY,NOKEY,MACKY1, C < . P NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C | . P NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C . P NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,
0x323f4c…3240e0 Dummy {f00=0x0110, f01=0x0190, f02=»FMT,ERRFMT, C h , P ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C , P ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C F , P ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C v , P ERRDSK,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C 2 P ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT WARNINGS
0x3240e0…324274 (2, 171) Dummy {f00=0x0110, f01=0x0190, f02=»RFMT FRMT P FSL P FCOPY ='FEJL ' P FMEL 'ZZ9',GSWBCD4 ERRORNR. 6 P FMEND Z P* h PERRDSK FRMT r P FSL P FMEL '99B',GTWBCD2 P FCOPY GSWSTR9 P FMEL '99',GTWBCD1 P FMEND P* PMSFMT1 FRMT
0x324274…324408 Dummy {f00=0x0110, f01=0x0190, f02=»R '.',1 P FMEND P* PMSFMT3 FRMT ( P FSL < P FTEXT ='NY SIDE. ' H P FMEND d P* r PMSFMT4 FRMT | P FSL P FBF TTSUMFLG,FMT4END P FTAB 15 P FCOPY GTL8TXT P FINP 23 P FMEL 'ZZZZZVZZ9,99+',GT
0x324408…32459c Dummy {f00=0x0110, f01=0x4164, f02=»T6 FRMT P FSL P FCOPY ='KONTOKORT' P FMEND 8 P* F PMSFMT7 FRMT P P FSL d P FCOPY TTINF1 p P FMEND P* PMSFMT8 FRMT P FSL P FCOPY ='DISKETTE SKIFT ' P FILLR X'07',1 P FMEND P*
0x32459c…324730 Dummy {f00=0x0110, f01=0x2008, f02=» * ERRFMT FRMT FSL , " FMEL 'ZZ9B',GTWBCD1 FILE NR. 8 FCOPY ERRTXT ^ " FMEL 'BZZ9',GTWBCD2 ERRORNR. t FCOPY =X'07' FMEND @ 8SPKTAB2 KTAB BSPKY1,CANKY1,NOKEY,MACKY1,NOKEY,EORKY1, C D ? FT
0x324730…3248c4 Dummy {f00=0x0110, f01=0x0190, f02=»
[…0x3…]
0x324d80…324f14 (2, 172) Opaque[0x194]
0x324f14…3250a8 # DirEnt {nam=»SUBAPL«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2a90, f03=0x0000}
0x324f14…3250a8 IdxSect {
0x324f14…3250a8 f00 = 0x0154 // 0x324f14 @0x0
0x324f14…3250a8 f01 = 0x0016 // 0x324f16 @0x2
0x324f14…3250a8 gno = [ // 0x324f18 @0x4
0x324f14…3250a8 [0x00]: C0x0154.0x2.0
0x324f14…3250a8 [0x01]: C0x0155.0x0.0
0x324f14…3250a8 [0x02]: C0x0155.0x1.0
0x324f14…3250a8 [0x03]: C0x0155.0x2.0
0x324f14…3250a8 [0x04]: C0x0155.0x3.0
0x324f14…3250a8 [0x05]: C0x0156.0x0.0
0x324f14…3250a8 [0x06]: C0x0156.0x1.0
0x324f14…3250a8 [0x07]: C0x0156.0x2.0
0x324f14…3250a8 [0x08]: C0x0156.0x3.0
0x324f14…3250a8 [0x09]: C0x0157.0x0.0
0x324f14…3250a8 [0x0a]: C0x0157.0x1.0
0x324f14…3250a8 ]
0x324f14…3250a8 }
0x3250a8…32523c Dummy {f00=0x0154, f01=0x0190, f02=» P IDENT SUBAPL 03.01.XXX.1 P DDUM KMD08 & P PDIV : P ENTRY SPAPPL H P ENTRY SPCHK1 ^ P ENTRY SPCHK2 t P ENTRY SPCHK3 P ENTRY SPCHK4 P ENTRY SPCHK5 P ENTRY SPCHK6 P ENTRY SPCHK7 P ENTRY SPTCHK
0x32523c…3253d0 Dummy {f00=0x0154, f01=0x018e, f02=»H P EXT KTPLAN P INCLUDE EQUATE P STANDARD CHECKS 6 P* P PSPCHK1 PROC Z P******************** n P* P* SPCHK1 - CDVCHECK P* < P* PERFORMS CHECKDIGIT CHECK ON VALUE IN SPINPUT 8 P*
0x3253d0…325564 Dummy {f00=0x0154, f01=0x0190, f02=» $ P MOVE GSWBIN1,SPBINW1 GET LENGTH 8 P CBL GSWBIN1,=W'3',CHK1RET FOR LENGTH < 3, NO CHECK , 2 P CBL GSWBIN1,=W'7',CHK1ER IF 2<LENGTH<7, ERROR h 8 P CBE GSWBIN1,=W'7',CHK10 IF LENGTH = 7, OK (CIRNR) < P CBNE GSWBIN1,=W'10',CHK1ER IF LENGTH = 10, OK
0x325564…3256f8 Dummy {f00=0x0154, f01=0x0190, f02=» P TBT GTADMFLG,CHK11 P CBE GSWBCD6,=D'0',CHK1ER P B * PCHK11 MOVE GSWBCD3,=D'1' BLANK GSWBCD3 J < P COPY GSWBCD3,CBIN5,CBIN1,GSWBCD6,GSWBIN2 GET NEXT DIGIT x 6 P MUL GSWBCD3,WEIGTH1(GSWBIN2) MULTIPLY WITH WEIGTH ( P ADD GSWBCD5,GSWBCD3 A
0x3256f8…32588c Dummy {f00=0x0154, f01=0x018e, f02=»CHK11 BACK TO NEXT DIGIT | P MOVE GSWBCD4,GSWBCD5 $ P DIV GSWBCD5,=D'11' DIVIDE BY 11 > ( P MUL GSWBCD5,=D'11' MULTIPLY WITH 11 f . P SUB GSWBCD4,GSWBCD5 GET REMAINDER MOD 11 : P CBE GSWBCD4,=D'0',CHK1RET IF REMAINDER 0, THEN RETURN P*
0x32588c…325a20 Dummy {f00=0x0154, f01=0x0190, f02=» P EJECT PSPCHK2 PROC P******************** * P* F " P* SPCHK2 - CHECK DATE P P* v 0 P* CHECKS 0<DAY<32 AND 0<MONTH<13 * P* DATE IS IN THE FORM DDMMYY $ P* INPUT FIELD: SPINPUT
0x325a20…325bb4 (2, 173) Dummy {f00=0x0155, f01=0x0190, f02=»1 INITIAL ERRORCODE ~ & P MOVE GSWBCD3,=D'1' BLANK GSWBCD3 " P MOVE GSWBCD6,SPINPUT GET DATE F . P MOVE GSWBIN2,=W'10' SET POINTER TO MONTH l 8 P COPY GSWBCD3,CBIN4,CBIN2,GSWBCD6,GSWBIN2 GET MONTH ( P CBG GSWBCD3,=D'12',CH29 CHECK MONTH P C
0x325bb4…325d48 Dummy {f00=0x0155, f01=0x0190, f02=» CBG GSWBCD3,=D'31',CH29 P CBL GSWBCD3,=D'1',CH29 P B CH2RET @ PCH29 R & P MOVE SPBINW3,CBIN3 INDICATE ERROR ^ & P MOVE SPBINW4,=W'7' SET ERRORCODE PCH2RET P MOVE GSWBCD3,=X'FF' P RET P PEND P EJECT PSPCH
0x325d48…325edc Dummy {f00=0x0155, f01=0x0190, f02=»* MONTH IS IN THE FORM MM " P* INPUT FIELD: SPINPUT , P* R 8 P* IF ERROR, ERRORCODE 7 IS MOVED TO SPBINW4 P* P****************** $ P MOVE GSWBCD3,SPINPUT GET MONTH ( P CBG GSWBCD3,=D'12',CH39 CHECK MONTH
0x325edc…326070 Dummy {f00=0x0155, f01=0x0190, f02=»DICATE ERROR z & P MOVE SPBINW4,=W'7' SET ERRORCODE PCH3RET > P RET L P PEND X P EJECT f PSPCHK4 PROC t P******************** P* < P* SPCHK4 - CHANGE SIGN ON VALUE, IF KREDIT KEY P* P****************
0x326070…326204 Dummy {f00=0x0155, f01=0x0190, f02=»-1' P MOVE SPINPUT,GSWBCD7 ( P MOVE SPBINW2,=W'3' SIMULATE EOI-KEY * PCH4RET V P RET d P PEND p P EJECT ~ PSPCHK5 PROC P******************** P* * P* SPCHK5 - CHECK LINE NUMBER P* P**********
0x326204…326398 Dummy {f00=0x0155, f01=0x018e, f02=»? d P CBE GSWBCD3,=D'91',CH510 P MUL GSWBCD3,=D'2' , . P MOVE GSWBCD4,CVOUTOP GET NO OF LINES/PAGE F P SUB GSWBCD4,GSWBCD3 x , P CBL GSWBCD4,=D'0',CH5ERR LINE NEGATIVE? P MOVE GSWBIN1,GSWBCD4 P CBG GSWBIN1,CMAXLIN,CH5ERR P C
0x326398…32652c Dummy {f00=0x0155, f01=0x0190, f02=» P MOVE GSWBIN1,GSWBCD3 P RET & P PEND 2 P EJECT @ PSPCHK6 PROC N P******************** b P* ~ B P* SPCHK6 - CHECK THE SPCHK6 - CHECKDIGIT IN LINE NO, P* KONTOKORT P* P*******************
0x32652c…3266c0 Dummy {f00=0x0155, f01=0x0190, f02=» f " P CBE GSWBCD3,TTKTCHK,CH6RET OK P MOVE SPBINW3,CBIN3 ERROR . P MOVE SPBINW4,=W'13' P PCH6RET l P RET z P PEND P EJECT PSPCHK7 PROC P RET P PEND P EJECT PSPTCHK PROC P********************
0x3266c0…326854 (2, 174) Dummy {f00=0x0155, f01=0x0190, f02=»********** $ P GETCTL 0,SPBINW3 GET APPL-VALUE P CBE SPBINW3,=W'84',TCHK84 : $ P SUB SPBINW3,=W'16' ADJUST INDEX P IB SPBINW3, C " P TCHK17,TCHK18,TCHK19,TCHK20 P SUB SPBINW3,=W'61' +16-77 P IB SPBINW3,TCHK78,TCHK79 PTC
0x326854…3269e8 Dummy {f00=0x0155, f01=0x0190, f02=» PTCHK18 PTCHK19 PTCHK20 $ P TBF BCPR,TCHK00 2 P B TCHK99 J P* PTCHK78 f P MOVE SPBINW3,TTCNTNR t P SUB SPBINW3,=W'100' : P CBG SPBINW3,CTR12(TTASKNR,CBIN2),TCHK00 CONTINUE TAB P B TCHK99 CORRECT FIELD
0x3269e8…326b7c Dummy {f00=0x0155, f01=0x0190, f02=»IELD ^ P B TCHK00 CONTINUE TAB P* * PTCHK84 4 P TBF GTTRSEL,TCHK00 B P B TCHK99 ^ P* p PTCHK99 CONTINUE TAB z P MOVE SPBINW3,CBIN2 P RET P PEND P EJECT PSPAPPL PROC P********************
0x326b7c…326d10 Dummy {f00=0x0155, f01=0x0190, f02=»FOR ALL FIELDS. f P* @ P* APPL-VALUE IS EQUAL TO FIELD-NAME (KMD FELT-KODE) " @ P* A BRANCH IS MADE TO A PIECE OF CODE FOR RELEVANT f 4 P* TESTING AND BRANCH TO PACKING ROUTINE P* P******************** P
0x326d10…326ea4 Dummy {f00=0x0155, f01=0x0190, f02=» SIGN x " P AA01 - TEST FOR FIELD TO BE P ---- - AUTODUPPED 4 " P AA02 - TEST FOR AUTODUP KEY P P AA03 - IF LENGTH ZERO, v P ---- - DELETE FIELS P AA05 - TEST FIELD 5 P AA06 - TEST FIELD 6 P AA11 - TEST VALOERD
0x326ea4…327038 Dummy {f00=0x0155, f01=0x018e, f02=» TRANSTYPE P A64 - TEST FIELD 64 P A65 - TEST FIELD 65 0 $ P AA70 - KONTONR WITHOUT CHECK N " P AA71 - 'ANTAL' IN TRANSTYPE v P ---- - 51, 53 P A76 - COUNTER, TRANS 12 $ P A77 - TR 4, INSERT BKO 51,52 " P A78
0x327038…3271cc Dummy {f00=0x0155, f01=0x0190, f02=» t P ---- - TRANSTYPES P A88 - AUTODUP BKO, TR 4 $ P A89 - STORE IN FIELD 6 H P A90 - SPECIAL SLUT-FIELD j P A91 - ENTER TO SLUT-KEY P A100 - CHECK TR 12 P A101 - CHECK BEHL. COUNT. P A102 - REL. DAY
0x3271cc…327360 Dummy {f00=0x0155, f01=0x0190, f02=»ALC. L P A107 - AS A102 P A108 - SPG -REGKONTONR & P A109 - SPG-CPR/CIR/NR H P A110 - SPG-BELOB h P A111 - SPG-OTHER FIELD P* 6 P CBG SPBINW3,=W'89',AAA SLUT FIELD OR DIV. CHECKS P* P* PAA01 ,
0x327360…3274f4 (2, 175) Dummy {f00=0x0155, f01=0x0190, f02=» DUP FIELD n . P MOVE SPINPUT,GTDUPF(GSWBIN1) AND CONTINUE P B AAA D P* R PAA02 $ P TBF GTAUTODP,AA03 AUTO DUP KEY h $ P CLEAR GTAUTODP IF GTAUTODP KEY, 2 P MOVE GSWBIN1,CFLTDEX(SPBINW3) GET FIELD INDEX < P MOVE GSSWITCH(GSWBIN1),CB
0x3274f4…327688 Dummy {f00=0x0155, f01=0x0190, f02=»0,AAA IF LENGTH IS ZERO ~ > P MOVE GSWBIN4,CFLTDEX(SPBINW3) GET INDEX VALUE TO GSWBIN4 , P MOVE GTUSED(GSWBIN4),CBIN0 DELETE FIELD b P B ART P* PAAA IB SPBINW3, C 8 P ART,ART,ART,ART,A05,A06,A07,APF,ART, FIELDS 1-9 C > P APK,A1
0x327688…32781c Dummy {f00=0x0155, f01=0x0190, f02=»K,APF,APK,APK,APK,APK,APK,APF, FIELDS 30-39 C > P APK,APK,APK,APK,APK,APK,APK,APF,APK,APK, FIELDS 40-49 C 6 > P APK,APK,APF,APF,A54,APF,APF,APF,APF,APF, FIELDS 50-59 C x > P APF,APF,APF,APK,A64,A65,APK,ART,ART,ART, FIELDS 60-69 C > P A70,A71,AR
0x32781c…3279b0 Dummy {f00=0x0155, f01=0x018e, f02=»K,APK,ART,ART,ART,ART,ART, FIELDS 90,99 C 0 P A100,A101,A102,A103,A104, FIELDS 100,104 C 2 0 P A105,ART,A107,A108,A109, FIELDS 105,109 C f * P A110,A111,ART,ART,ART FIELDS 110,114 P********** ( PA05 CHECK REGISTRERINGSKONTONUMMER $ P M
0x3279b0…327b44 Dummy {f00=0x0155, f01=0x018e, f02=» h P BNE A058 P MOVE GSWBCD1,SPINPUT P PERF KTPLAN,GSWBCD1,GTKTTYP 8 P MOVE GSWBIN1,GTKTTYP P IB GSWBIN1, C z 0 P A053,A053,A051,A053,A053,A052,A0570,A0575 PA051 P B APK CPR NOT NECESSARY PA052 REMIT. NOT ALLO
0x327b44…327cd8 Dummy {f00=0x0155, f01=0x0190, f02=» PA0525 P MOVE SPBINW4,=W'20' ERROR P B ART 8 PA053 CPR NECESSARY F P IB GTREGDEX, C b . P A054,A055,A054,A054,A055,A054,A055,A055 z PA054 P B APK PA055 " P CBL GSWBIN1,CBIN3,A056 ERROR P SET SPWARNFL WA
0x327cd8…327e6c Dummy {f00=0x0155, f01=0x0190, f02=»E SPBINW4,=W'23' P B ART P* & * PA0575 8:KNT.NO. NOT ALLOWED IN SUPL 0 $ P CBE GTREGDEX,CBIN10,A0577 TR 10 ^ P TBT TTSUPFLG,A0577 SUPL P B APK OK PA0577 NOT OK P MOVE SPBINW4,=W'22' P B ART P* PA058
0x327e6c…328000 Dummy {f00=0x0155, f01=0x018e, f02=»GET LENGTH z 6 P CBL GSWBIN1,=W'3',A065 TRANSTYPE HANDLING IN A065 & P SET BCPR SET CPR-SWITCH (CPR-NO) L P MOVE GSWBCD1,SPINPUT v P CMP GSWBCD1,=D'10000000' P BL A061 P SET BLEV LEVERAND. P CMP GSWBCD1,=D'3200000000' P B
0x328000…328194 (2, 176) Dummy {f00=0x0155, f01=0x0190, f02=» $ PA54 FIELD 54 HAS BEEN ENTERED 8 P MOVE GSSWITCH(CBIN2),CBIN1 AND SHOULD BE AUTODUPPED 0 P B APK l P****** z PA065 6 P MOVE SPBINW1,CBIN0 SET LENGTH TO ZERO (FUNCTION) , P MOVE GSWBCD3,SPINPUT GET NEW TRANSTYPE P* $ P
0x328194…328328 Dummy {f00=0x0155, f01=0x0190, f02=» VALID TRANSTYPE | P* P* ADJUST REGDEX " PA0655 B P* P P MOVE GSWBIN1,CBIN1 Z 8 P* TEST FOR CORRECT TRANSACTIONS IN THIS CONNECTION v P TBT GTKASSE,A0672 6 P CBG GSWBCD3,=D'30',A067 CORRECT FOR NOT IN KASSE P B
0x328328…3284bc Dummy {f00=0x0155, f01=0x0190, f02=»,CREGTAB(GSWBIN1,GTCLASS),A068 SEARCH REGNR & P ADD GSWBIN1,CBIN1 ADD 1 TO INDEX 4 < P CBNE CREGTAB(GSWBIN1,GTCLASS),=D'-1',A067 END OF TABLE? ^ P* PA0675 * P MOVE SPBINW4,=W'9' INVALID TRANSTYPE P B ART PA068 " P TAKE CA
0x3284bc…328650 Dummy {f00=0x0155, f01=0x0190, f02=»BE SPBINW2,=W'3',A06DEB HANDLING OF DEBIT KEY . P MOVE SPBINW4,=W'4' HANDLING OF WRONG KEY ! 6 P B ART ! h PA06KRE ! v P PERF SETKRE ! P B A066 ! PA06DEB ! P PERF SETDEB ! PA066 ! P MOVE GTREGNR,GSWBCD3 ! P MOVE GTREGDEX,GSWBI
0x328650…3287e4 Dummy {f00=0x0155, f01=0x0190, f02=»=W'36' SIMULATE TRANSACTION SELECTED ! P B ART " , P********** " : PA07 BKO FIELD " L P INSERT TEXT IN TT07TXT " d P CLEAR TTASKAT " P MOVE GSWBCD3,SPINPUT " P CBNE GSWBCD3,=D'51',A070 " P SET TTASKAT " PA070 " P CBNE GTREGD
0x3287e4…328978 Dummy {f00=0x0155, f01=0x0190, f02=»TH OF STRING " t . P COPY TT07TXT,CBIN0,CBIN5,CTTXT07,GSWBIN1 # P MOVE GSWBCD3,TT07TXT # F P MOVE GSWBIN2,GSWBCD3 # d P MOVE TT07TXT,CBLANKS # , P MOVE GSWBIN1,CBIN5 FIRST CHAR, POINTER # P MOVE GSWBIN3,CBIN0 # P CBNG SPBINW1,=W'2',A071 #
0x328978…328b0c Dummy {f00=0x0155, f01=0x0190, f02=» CBG GSWBIN1,GSWBIN2,A075 # 6 P MATCH CTTXT07,GSWBIN1,CBIN2,SPINPUT,GSWBIN3,CBIN2 $ " P BNOK A0708 $ P* NEXT 5 CHARS CONTAIN TEXT $ p P ADD GSWBIN1,=W'2' $ . P COPY TT07TXT,CBIN0,CBIN5,CTTXT07,GSWBIN1 $ P* SEE IF ALLOWED $ 8 P CBNE
0x328b0c…328ca0 Dummy {f00=0x0155, f01=0x018e, f02=»CTTXT07,GSWBIN1 GET TYPE $ v P MOVE GSWBCD3,GSWSTR2 % P CBE GSWBCD3,=D'0',A077 OK % > ( P CBL GTREGF(CBIN2),=D'10000000',A072 % ` . P CBE GSWBCD3,=D'1',A077 CPR - BKO ALLOWED % P B A076 % PA072 % . P CBE GSWBCD3,=D'2',A077 CIR - BKO ALLOWED %
0x328ca0…328e34 (2, 177) Dummy {f00=0x0156, f01=0x0190, f02=» P********** & $ PA11 CHECK VAL DATE NOT GREATER & P THAN POST DATE & > & P CBE GTREGDEX,=W'3',A0110 TRANS 3 & X & P CBE GTREGDEX,=W'4',A0110 TRANS 4 & P B APK & PA0110 & $ P* GET AND CHANGE VALOERDATE & P MOVE GSWBCD6,SPINPUT &
0x328e34…328fc8 Dummy {f00=0x0156, f01=0x0190, f02=»CBIN4 & n " P* GET AND CHANGE POSTDATE ' P MOVE GSWBCD1,GTDATO ' 4 , P COPY GSWBCD3,CBIN4,CBIN2,GSWBCD1,CBIN12 ' P , P COPY GSWBCD1,CBIN12,CBIN2,GSWBCD1,CBIN8 ' , P COPY GSWBCD1,CBIN8,CBIN2,GSWBCD3,CBIN4 ' P* COMPARE ' P CMP GSWBCD6,GSWBC
0x328fc8…32915c Dummy {f00=0x0156, f01=0x0190, f02=»0 ' P FAAR <= YY+2 ( " P MOVE GSWBCD6,SPINPUT GET FAAR ( " 2 P CBL GSWBCD6,=D'70',A17ERR LESS THAN 70: ERROR ( H & P MOVE GSWBCD1,GTDATO GET POSTDATO ( ~ P MOVE GSWBCD3,=D'2' ( 6 P COPY GSWBCD3,CBIN4,CBIN2,GSWBCD1,CBIN12 GET YEAR ( P ADD GSWBC
0x32915c…3292f0 Dummy {f00=0x0156, f01=0x0190, f02=» ( l P B ART ) P********** ) PA64 ) ( 4 P MOVE GSWBCD3,SPINPUT GET 'PRISREGULERINGSKODE' ) 4 P CBG GSWBCD3,=D'5',A649 ) l P CBL GSWBCD3,=D'0',A649 ) $ P FIELD 64 HAS BEEN ENTERED AND ) 6 P MOVE GSSWITCH(CBIN12),CBIN1 SHOULD BE GTAUTODPPED )
0x3292f0…329484 Dummy {f00=0x0156, f01=0x0190, f02=»WBCD4,SPINPUT GET VALUE ) P CBG GSWBCD4,=D'3999',A659 * P CBL GSWBCD4,=D'1000',A659 * B P B APK * d PA659 * r P MOVE SPBINW4,=W'11' * ~ P B ART * P********** * PA70 KONTONR WITHOUT CHECK * P MOVE SPBINW3,=W'5' * P CMP SPBINW1,=
0x329484…329618 Dummy {f00=0x0156, f01=0x0190, f02=»DUP * l P MOVE GTSUM,SPINPUT + & P SUB GTSUM,=D'1' SUB 1 FROM ANTAL + ( P MOVE SPINPUT,GTSUM + R P CBL GTSUM,=D'0',A715 + n P CMP GTSUM,=D'12' IF > 12 + P BL ART + PA715 + & P MOVE SPINPUT,=C'51' SIMULATE NEW + " P MOVE SPBINW2,=W'3'
0x329618…3297ac Dummy {f00=0x0156, f01=0x018e, f02=» CMP SPBINW1,=W'3' + P BL A065 TRANSTYPE HANDLING , $ P MOVE GSWBCD3,SPINPUT GET VALUE , > P MOVE TTCNTNR,SPINPUT , f " P SUB GSWBCD3,=D'100' GET INDEX , P MOVE GSWBIN1,GSWBCD3 , , P CBG GSWBIN1,CTR12(TTASKNR,CBIN2),A76NOK , , P CBL GSWBCD3,=D'
0x3297ac…329940 Dummy {f00=0x0156, f01=0x0190, f02=» P B ART TO WRITE ON SCREEN - PA76NOK - & P MOVE SPBINW4,=W'18' - 4 P B ART - P P********** - ^ PA77 INSERT 51,52 IN TR 4 - p P MOVE SPBINW3,=W'7' FIELD 7 - P MOVE SPBINW1,=W'2' LENGTH - P TBT BCPR,A775 - ( P MOVE SPINPUT,=X'35310000'
0x329940…329ad4 (2, 178) Dummy {f00=0x0156, f01=0x0190, f02=»OUNT NO - P 11-15 . ( P MOVE SPBINW3,=W'5' SIMULATE FIELD 5 . P B APK . L P******** . Z PA79 AUTODUP ACCOUNT NO . j " P MOVE SPBINW3,=W'5' IN FIELD 5 . ( P MOVE GSWBIN1,TTCNTNR GET COUNTER NO . P SUB GSWBIN1,=W'100' . & P ADD GSWBIN1,CTR
0x329ad4…329c68 Dummy {f00=0x0156, f01=0x0190, f02=» CHECK HOVEDBOG, KONTONR . P MOVE SPBINW3,=W'5' FIELD 5 / " , P MOVE SPBINW5,=W'2' MIGHT BE TRANSTYPE 2 / F ( P CBL SPBINW1,=W'3',A805 CHECK LENGTH / v ( P CBE SPBINW1,=W'10',A801 MUST BE 10 / $ P MOVE SPBINW4,=W'3' ERROR LENGTH / P B ART / PA801
0x329c68…329dfc Dummy {f00=0x0156, f01=0x018e, f02=»T ALLOWED / p P BE A0570 0 P CBNE GSWBIN1,CBIN8,A804 0 $ P TBF TTSUPFLG,A804 0 D * P B A0577 8:KNT.NO. NOT ALLOWED IN SUPL 0 ^ PA804 0 P PERF SELTR TRANS SELECTED 0 P BNOK ART INVALID KEY 0 P B APK OK 0 PA805 CHECK FUNCTION KEYS 0
0x329dfc…329f90 Dummy {f00=0x0156, f01=0x0190, f02=» $ P MOVE SPBINW4,=W'4' INVALID KEY 1 P B ART 1 , P********** 1 : $ PA81 CHECK HOVEDBOG, CPR/CIR/NR 1 L P MOVE SPBINW3,=W'6' FIELD 6 1 t . P MOVE SPBINW5,=W'1' MIGHT BE TRANS TYPE 1 1 ( P CBG SPBINW1,=W'2',A811 CHECK LENGTH 1 $ P MOVE SPBINW4,=W'3
0x329f90…32a124 Dummy {f00=0x0156, f01=0x0190, f02=»D'10000000',A814 1 P SET BLEV 2 $ P CBG GSWBCD1,=D'3200000000',A812 2 * P CLEAR BLEV 2 R P B A812 2 f PA814 2 v P CLEAR BCPR SET CIR NO 2 PA812 2 P PERF SELTR TRANS SELECTED 2 P BNOK ART INVALID KEY 2 P B APK OK 2 P**********
0x32a124…32a2b8 Dummy {f00=0x0156, f01=0x0190, f02=» 2 * P CBNE SPBINW2,=W'3',A822 IF ENTER KEY, 3 , P MOVE SPBINW2,=W'17' SIMULATE DEBET KEY 3 6 PA822 3 f P PERF SELTR TRANS SELECTED 3 r P BNOK ART INVALID KEY 3 P B APK OK 3 P********** 3 $ PA83 CHECK DEBITOR, DEBITOR NR 3 P MOVE SPBI
0x32a2b8…32a44c Dummy {f00=0x0156, f01=0x0190, f02=»PE 4 3 l P SET BCPR SET CPR 4 P MOVE GSWBCD1,SPINPUT 4 & " P CBL GSWBCD1,=D'10000000',A831 4 D P SET BLEV 4 j $ P CBG GSWBCD1,=D'3200000000',A832 4 | P CLEAR BLEV 4 P B A832 4 PA831 4 P CLEAR BCPR SET CIR 4 PA832 4 P PERF SELTR
0x32a44c…32a5e0 Dummy {f00=0x0156, f01=0x018e, f02=»******** 4 PA84 CHECK DEBITOR, BKO 5 P MOVE SPBINW3,=W'7' FIELD 7 5 0 , P MOVE SPBINW5,=W'3' MIGHT BE TRANSTYPE 3 5 T P CBNE SPBINW2,=W'3',A842 5 P MOVE SPBINW2,=W'17' 5 PA842 5 P MOVE GSWBCD1,SPINPUT 5 P CBE GSWBCD1,=D'+51',A845 5
0x32a5e0…32a774 (2, 179) Dummy {f00=0x0156, f01=0x0190, f02=» 5 z P B A843 6 P********** 6 $ PA85 CHECK REMITTERING, KONTONR 6 * P MOVE SPBINW3,=W'5' FIELD 5 6 R ( P CBL SPBINW1,=W'3',A805 CHECK LENGTH 6 v ( P CBE SPBINW1,=W'10',A850 MUST BE 10 6 $ P MOVE SPBINW4,=W'3' ERROR LENGTH 6 P B ART 6 PA850
0x32a774…32a908 Dummy {f00=0x0156, f01=0x0190, f02=» 6 t P MOVE GSWBIN1,GTKTTYP 7 0 P CBE GSWBIN1,CBIN6,A853 6: REMIT NOT ALLOWED 7 & , P CMP GSWBIN1,CBIN7 7:KNT.NO. NOT ALLOWED 7 Z P BE A0570 7 P CBNE GSWBIN1,CBIN8,A854 7 P TBF TTSUPFLG,A854 7 * P B A0577 8:KNT.NO. NOT ALLOWED IN SUPL 7 PA853
0x32a908…32aa9c Dummy {f00=0x0156, f01=0x0190, f02=»Y 7 r P B ART 8 P********** 8 $ PA86 CHECK REMITTERING, LEV.NR. 8 * P MOVE SPBINW3,=W'6' FIELD 6 8 R , P MOVE SPBINW5,=W'8' MIGHT BE TRANSTYPE 8 8 v . P CMP SPBINW1,=W'2' CHECK LENGTH + CPR/CIR 8 P BG A811 8 $ P MOVE SPBINW4,=W'3' ERROR LENGTH
0x32aa9c…32ac30 Dummy {f00=0x0156, f01=0x0190, f02=»'9' MIGHT BE TRANSTYPE 9 8 " P B A821 CHECK FOR INVALID KEY 9 P********** 9 F PA88 9 X P MOVE SPBINW3,=W'7' FIELD 7 9 d P MOVE SPBINW2,=W'36' 9 P MOVE SPBINW1,='2' 9 P TBT BCPR,A885 9 ( P MOVE SPINPUT,=X'35310000' 51 IF CIR 9 P B A07 9
0x32ac30…32adc4 Dummy {f00=0x0156, f01=0x0190, f02=»IELD 6 9 r P B APK : P********** : PA90 SIMULATE SLUT KEY : . P CLEAR GTSLUTFL : N P CLEAR GTADUPFL : f " P MOVE SPBINW2,=W'17' SLUT KEY : ~ $ P MOVE SPBINW1,=W'0' LENGTH ZERO : P B ART : P********** : PA91 ENTER TO SLUT KEY :
0x32adc4…32af58 Dummy {f00=0x0156, f01=0x0190, f02=»S : v P MOVE GSWBCD1,SPINPUT ; P SUB GSWBCD1,=D'100' ; ( P MOVE GSWBIN6,GSWBCD1 ; D & P CBL GSWBIN6,CBIN1,A1009 TOO SMALL ; b 4 P CBG GSWBIN6,CTR12(TTASKNR,CBIN2),A1009 TOO HIGH ; & P ADD GSWBIN6,CTR12(TTASKNR,CBIN1) ; P B ART ; PA1009 ;
0x32af58…32b0ec Dummy {f00=0x0156, f01=0x0190, f02=»BCD1,=D'1',A101ER ; P MOVE GSWBIN6,GSWBCD1 < , P CBG GSWBIN6,CBEH(TTASKNR,CBIN2),A101ER < 8 $ P ADD GSWBIN6,CBEH(TTASKNR,CBIN1) < h P B ART < PA101ER < P MOVE SPBINW4,=W'11' < P B ART < P********** < PA102 CHECK RELATIVE DAY <
0x32b0ec…32b280 Dummy {f00=0x0156, f01=0x0190, f02=» MOVE GSWBIN2,CBIN8 SET POINTER TO DAY < 6 P COPY GSWBCD3,CBIN4,CBIN2,GSWBCD7,GSWBIN2 GET DAY = . , P ADD GSWBCD5,GSWBCD3 ADD DAY TO REL. DAY = h , P ADD GSWBIN2,CBIN2 SET POINTER TO MONTH = 8 P COPY GSWBCD3,CBIN4,CBIN2,GSWBCD7,GSWBIN2 GET MONTH = . P SUB
0x32b280…32b414 (2, 180) Dummy {f00=0x0156, f01=0x0190, f02=»T GET KEYED REL. DAY = | P SUB GSWBCD5,=D'5' > * P CBL GSWBCD3,GSWBCD5,A102ER TOO SMALL > 6 P ADD GSWBCD5,=D'10' > d * P CBG GSWBCD3,GSWBCD5,A102ER TOO LARGE > P B A102END > PA102ER > & P MOVE SPBINW4,=W'11' INVALID VALUE > PA102END > P
0x32b414…32b5a8 Dummy {f00=0x0156, f01=0x0190, f02=»6,GSWBCD3 > $ P ADD GSWBIN6,CBEH(GSWBIN1,CBIN1) ? ( P CBG GSWBIN6,=W'60',A103ER TOO MANY ? : P CBE GSWBIN1,CBIN12,A1035 ? f P ADD GSWBIN1,CBIN1 ? & P MOVE CBEH(GSWBIN1,CBIN1),GSWBIN6 ? P SUB GSWBIN1,CBIN1 ? PA1035 ? P MOVE GSWBIN6,GSWBCD
0x32b5a8…32b73c Dummy {f00=0x0156, f01=0x0190, f02=» PA104 SET TR 12 COUNTERS @ P MOVE GSWBCD4,SPINPUT @ & P MOVE GSWBIN6,GSWBCD4 @ D & P ADD GSWBIN6,CTR12(GSWBIN1,CBIN1) @ b ( P CBG GSWBIN6,=W'60',A104ER TOO MANY @ P CBE GSWBIN1,CBIN12,A1045 @ P ADD GSWBIN1,CBIN1 @ & P MOVE CTR12(GSWBIN1,
0x32b73c…32b8d0 Dummy {f00=0x0156, f01=0x0190, f02=» ART @ PA104ER A P MOVE SPBINW4,=W'11' A P B ART A 6 P********** A D PA105 CONRTL.DIGITCALC. A V P MOVE GSWBCD6,SPINPUT A x P CBE SPBINW2,=W'3',CALCD01 A P CMP SPBINW2,=W'17' A P BNE ART A PCALCD01 A & P MOVE GSWBIN1,SPBINW
0x32b8d0…32ba64 Dummy {f00=0x0156, f01=0x0190, f02=»3,CBIN5,CBIN1,GSWBCD6,GSWBIN2 GET NEXT DIGIT A 4 P MUL GSWBCD3,WEIGTH(GSWBIN2) MULTIPLY BY WEIGHT B 6 * P ADD GSWBCD5,GSWBCD3 ADD TO OLD SUM B n & P SUB GSWBIN1,=W'1' ADJUST LENGTH B , P SUB GSWBIN2,=W'1' ADJUST WEIGHT-INDEX B P CBG GSWBIN1,=W'0'
0x32ba64…32bbf8 Dummy {f00=0x0156, f01=0x018e, f02=» REMAINDER MOD 11 B n P CBNE GSWBCD4,=D'0',CALCD05 C P MOVE GSWBCD4,=D'11' C > PCALCD05 C Z P MOVE GSWBCD5,=D'11' C j 2 P SUB GSWBCD5,GSWBCD4 CALCULATE CONTROLDIGIT C P B ART C P********** C PA107 POSTDATO=MASKINDATO ? C P MOVE
0x32bbf8…32bd8c Dummy {f00=0x0156, f01=0x0190, f02=» C PA108 SPG-REGKONTONR D P MOVE GSWBCD6,=D'5' D & P B ART D B P********** D P PA109 SPG-CPR/CIR/NR D b P MOVE GSWBCD6,=D'6' D P B ART D P********** D PA110 SPG-BELOB D P MOVE GSWBCD6,=D'8' D P B ART D P**********
0x32bd8c…32bf20 Dummy {f00=0x0156, f01=0x0190, f02=»RT D PA111ERR E P MOVE SPBINW4,=W'11' E P B ART E 6 P********** E D PAPK KEEP INFORMATION E V $ P TBF TTEORFLG,APK00 FIRST FIELD? E t P CBE SPBINW3,=W'5',APK10 E $ P MOVE GTKTTYP,=D'0' NOT KONTONR. E PAPK10 E " P PERF PACKCL YES, CLEA
0x32bf20…32c0b4 (2, 181) Dummy {f00=0x0157, f01=0x0190, f02=» E ^ 4 P MOVE GTUSED(GSWBIN1),SPBINW3 STORE FIELDNUMBER F P B ART F @ P********** F N PAPF F ` $ P TBF TTEORFLG,APF00 FIRST FIELD? F l P MOVE GTKTTYP,=D'0' F " P PERF PACKCL YES, CLEAR GTUSED F P PERF CRKJ F " P SET SPME CHECK FOR ME FIELDS F
0x32c0b4…32c248 Dummy {f00=0x0157, f01=0x018e, f02=» F z PAPF10 G > P MOVE GSWBIN1,CFLTDEX(SPBINW3) GET INDEX OF CURRENT FIELD G * P* MULTIPLY WITH -1 IF KREDIT G X > P* STORE NEGATIVE FIELD NUMBER (NUMBER WITH SIGN) G " P MOVE GTUSED(GSWBIN1),SPBINW3 G P MUL GTUSED(GSWBIN1),=W'-1
0x32c248…32c3dc Dummy {f00=0x0157, f01=0x018e, f02=» G z PARET H P RET H P PEND H P******************** H . P EJECT H J PSETKRE PROC H X P******************** H l P* H 0 P* SETKRE - SET KREDIT INFORMATION H P* H P******************** H P MOVE GTDBKRC,=C' KRE' H
0x32c3dc…32c570 Dummy {f00=0x0157, f01=0x0190, f02=» H P* I P* I PSETDEB PROC I P******************** I 0 P* I L . P* SETDEB - SET DEBET INFORMATION I V P* I P******************** I P MOVE GTDBKRC,=C' DEB' I P MOVE GTDBKRS,=D'+1' I P MOVE TTDKBCD,=D'2' I P MOV
0x32c570…32c704 Dummy {f00=0x0157, f01=0x0190, f02=» - CLEAR ALL AUTODUP FLAGS I P* J " P******************** J , P MOVE GSWBIN1,CBIN1 J H PCLRSW1 J d " P MOVE GSSWITCH(GSWBIN1),CBIN0 J r P ADD GSWBIN1,CBIN1 J P CBL GSWBIN1,CBINMAX,CLRSW1 J P RET J P PEND J P EJECT J PSELTR PROC
0x32c704…32c898 Dummy {f00=0x0157, f01=0x0190, f02=» 0 P* SELECTED TRANSTYPE IS IN SPBINW5 K P* K 8 P******************** K B & P CBE SPBINW2,=W'3',SELOK ENTER KEY K ^ ( P CBE SPBINW2,=W'18',SEL10 KREDIT KEY K ( P CBE SPBINW2,=W'17',SEL20 DEBET KEY K $ P MOVE SPBINW4,=W'4' INVALID KEY K $ P
0x32c898…32ca2c Dummy {f00=0x0157, f01=0x018e, f02=»F SETDEB K PSEL30 TRANSTYPE SELECTED L P MOVE GSWBIN1,GTKTTYP L 2 P IB GSWBIN1, C L P $ P SEL40,SEL40,SEL90,SEL40,SEL40 L h P B SEL90 L PSEL40 L P IB SPBINW5, C L < P SEL90,SEL45,SEL90,SEL90,SEL90,SEL90,SEL90,SEL45,SEL90 L PSE
0x32ca2c…32cbc0 Dummy {f00=0x0157, f01=0x4166, f02=» P CMP CBIN1,CBIN0 M P RET M PSEL90 M ( P MOVE GTREGNR,SPBINW5 TYPE M 6 2 P MOVE GTREGDEX,SPBINW5 TYPE INDEX. OK FOR <11 M X 0 P MOVE SPBINW2,=W'36' SIMULATE TRANS SELECTED M P SET GTTRSEL M PSELOK M " P CMP CBIN0,CBIN0 OK, SET CR=0 M
0x32cbc0…32cd54 (2, 182) Dummy {f00=0x0157, f01=0x2008, f02=» N ,=W'5'@SET POINTER OF RECEIVING FIELD > P@COPY@TABCD4,TSBIN1,CBIN1,TSBCD3,CBIN2@GET DIGIT FOR TEST 6 P@CB@GT,TSBCD4,=W'3',A659 x P@CB@LT,TSBCD4,=W'1',A659 P@B@APK PA659 PMOVE 0P&&RW 0 0 89 ' P@MOVE@CR,=W'2' P@RET
0x32cd54…32cee8 Dummy {f00=0x0157, f01=0x0190, f02=»- 1 q q' q* q+ q, q- BEL B VAL RDATO Q Q 1 A Q A~Q Q! A Q Aq AnQ A Q A Q Q! A A # Q Ax A- Q% q)Q q( Q' ApQ #Q A Q&
0x32cee8…32d07c Dummy {f00=0x0157, f01=0x0190, f02=» A q( Q( Az q( Q) Ax A- Q% Q% Q% $ Q Am Ai Aj @ Au Q Ar Aw Q At Q" Av Q% Q# A q/q-q,q
0x32d07c…32d210 Dummy {f00=0x0157, f01=0x0190, f02=» 0 # " , 6 A O ^ % 3 J & d 2 g u # @ z@ v Y Ax A- Q% q)Q q( Q' ApQ #Q A Q&
0x32d210…32d3a4 Dummy {f00=0x0157, f01=0x0190, f02=»" d** " j** " ** ( . : : & J $ * X ; KVIT h $ ;* ~ ( < & $ =* ( = $ * & >
0x32d3a4…32d538 Dummy {f00=0x0157, f01=0x0190, f02=» A START SUM* $ A* $ ( 4 B @ $ * P C SUM ` $ C* t ( D $ E* ( E a & & * & * & &
0x32d538…32d6cc Dummy {f00=0x0157, f01=0x018e, f02=»MASKIN NR $ H* I EKS.LBNR " $ I* < & L & Z & * h J 99.99.999.9 x " J* S & K 99E-99E-99 " K* S & L 99E-99E-99
0x32d6cc…32d860 Dummy {f00=0x0157, f01=0x018e, f02=» & & 6 2 0 O *VERSURKONTONR KASSEKONTONR PRIMO KASSE $ O* Z & j & x P B999.99.999.99BBBS " P* S Q B999.99.999.99BBBS " Q* S R ZZZ.ZZZ.ZZ9.ZZ-B
0x32d860…32d9f4 (2, 183) Opaque[0x194]
0x32d9f4…32db88 # DirEnt {nam=»RGMAIN«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2270, f03=0x0000}
0x32d9f4…32db88 IdxSect {
0x32d9f4…32db88 f00 = 0x0113 // 0x32d9f4 @0x0
0x32d9f4…32db88 f01 = 0x000a // 0x32d9f6 @0x2
0x32d9f4…32db88 gno = [ // 0x32d9f8 @0x4
0x32d9f4…32db88 [0x00]: C0x0113.0x2.0
0x32d9f4…32db88 [0x01]: C0x0113.0x3.0
0x32d9f4…32db88 [0x02]: C0x0114.0x0.0
0x32d9f4…32db88 [0x03]: C0x0114.0x1.0
0x32d9f4…32db88 [0x04]: C0x0114.0x2.0
0x32d9f4…32db88 ]
0x32d9f4…32db88 }
0x32db88…32dd1c Dummy {f00=0x0113, f01=0x0190, f02=» P IDENT RGMAIN 03.01.XXX.1 P DDUM KMD08 & P PDIV : P ENTRY INITRG H P ENTRY FUNCT ^ P ENTRY TRINP r P ENTRY TRPAGE P EXT BELL P EXT SETKRE P EXT SETDEB P EXT PACKCL P EXT FMSTYR P EXT FRMTS
0x32dd1c…32deb0 Dummy {f00=0x0113, f01=0x0190, f02=» P EXT SUBTOT P EXT CYK P EXT MODP , P EXT KORT > P EXT KVIT P P EXT ADM b P EXT SUM r P EXT DIVTR P EXT ENTER P INCLUDE EQUATE P EJECT PINITRG PROC P******************** P* H P*
0x32deb0…32e044 Dummy {f00=0x0113, f01=0x0190, f02=» ONLY KASSEFUNCTIONS, FROM OPEN TO CLOSE. . P* TWO DIFFERENT METHODS ARE USED, 4 . P* DETERMINED BY THE FLAG CTRVALG: f 0 P* CTRVALG TRUE : 'SKOVBOMETODE' 0 P* CTRVALG FALSE: 'VIBORGMETODE' P*
0x32e044…32e1d8 Dummy {f00=0x0113, f01=0x0190, f02=»W'0' LAST LINE, SCREEN ( P MOVE SPKEY,CBIN1 USE KEY POSITION 1 P SET GTREGFLG FIRST TRANS J P CLEAR SPME l , P MOVE GTREGNR,=D'1' INITIAL TRANSTYPE 1 P MOVE GTREGDEX,CBIN1 P PERF SETKRE KREDIT " P PERF PACKCL CLEAR PACKBUFFER
0x32e1d8…32e36c Dummy {f00=0x0113, f01=0x0190, f02=»IVTR 'DIVERSE TRANS' P B TR400 P* , P* INITIATE VIBORGMETODE 6 PTR250 Z P CLEAR GTDIVTR h $ P MOVE TTSTYRDX,=W'1' 'HOVEDBOG' ~ P B TR400 P EJECT P* READ PTR400 P SET SPPROMPT , P MOVE TTTROLD,
0x32e36c…32e500 Dummy {f00=0x0113, f01=0x0190, f02=»' ~ $ P PERF FMSTYR ATTACH CONTROL INF P CLEAR GTTRSEL 2 P B TR430 H PTR420 X $ P PERF FRMTSP ATTACH FULL FORMAT f PTR430 P TBT GTLOKSPG,TR435 P MOVE SPKEY,CBIN1 * P PERF SPCLRA WRITE AND READ ON SCREEN P B TR500
0x32e500…32e694 (2, 184) Dummy {f00=0x0113, f01=0x0190, f02=» | P* FUNCTION CALL P PERF FUNCT $ P SET GTSLUTFL 8 $ P* BRANCH ON TYPE OF FUNCTION N P IB SPBINW3, C v $ P TR510,TR520,TR530,TR540,TR550 P* $ PTR510 NEW TYPE OF CONTROL INF P B TR400 P* PTR520
0x32e694…32e828 Dummy {f00=0x0113, f01=0x0190, f02=»ITHOUT INPUT ~ P CLEAR SPPROMPT P PERF SPCLRA RESTAT INPUT , P B TR500 N P* ^ PTR540 FUNCTION WITH INPUT h P B TR400 P* PTR550 OUT OF REGISTRATION P SET SPME P RET P* P EJECT PTR600
0x32e828…32e9bc Dummy {f00=0x0113, f01=0x0190, f02=» TRSEL, END 1 PG, END MORE PG, ~ P* TO NEXT PAGE) & P IB SPBINW3, C B * P TR610,TR620,TR630,TR640,TR650,TR660 Z P* PTR610 MAK TYPE P PERF TRPAGE P B TR400 P* PTR620 INVALID KEY P PERF SPERR P
0x32e9bc…32eb50 Dummy {f00=0x0113, f01=0x0190, f02=» " P TBT GTDIVTR,TR620 NOT ALLOWED P PERF TRPAGE * P CBNE TTTROLD,GTREGDEX,TR635 > * P CLEAR SPPROMPT SAME AS PREVIOUS TRANS b P PERF SPINF1 P PERF FRMTSP P PERF SPCN P B TR500 PTR635 P CBL TTTROLD,CBIN0,TR636 P
0x32eb50…32ece4 Dummy {f00=0x0113, f01=0x0190, f02=» P PERF FRMTSP P PERF SPCA P B TR500 . P* > PTR640 1 PAGE TRANS CORRECT H P TBT GTDIVTR,TR645 l 2 P ERASE 10,SPLINTOP,SPLINLOW ERASE VARIABLES IN P MOVE GTDBKRC,=C' ' P CURRENT FORMAT PTR645 P CLEAR S
0x32ece4…32ee78 Dummy {f00=0x0113, f01=0x0190, f02=»GTDBKRC,=C' ' P CLEAR GTREGFLG P B TR610 . P* > PTR660 TO NEXT PAGE H P NEXT PAGE ALREADY d P ATTACHED P MOVE TTTROLD,CBIN0 P SET SPPROMPT P PERF SPCLRA P B TR500 P* P* P PEND
0x32ee78…32f00c Dummy {f00=0x0113, f01=0x0190, f02=»LOWED. R P* INPUT: < P* SPBINW2, GIVING KEY INDEX, COMMING FROM ( , P* SCREEN PACKAGE h P* OUTPUT: 8 P* SPBINW3, GIVING THE TYPE OF FUNCTION < P* 1
0x32f00c…32f1a0 Dummy {f00=0x0113, f01=0x0190, f02=» 2 P* 4 FUNCTION WITH INPUT : P* 5 REG KEY, OUT OF REGISTRATION : P* x P******************** P* P IB SPBINW2, C < P FU01,FU02,FU03,FU04,FU05,FU06,FU07,FU08,FU09,FU10, C < P FU11,F
0x32f1a0…32f334 (2, 185) Dummy {f00=0x0114, f01=0x0190, f02=» P CLEAR GTLOKSPG P MAK P MOVE SPBINW3,CBIN1 * P RET F P* R PFU03 ENTER P TBT GTLOKSPG,FU08 p P TEST GTDIVTR P BZ FUNOK P PERF SETDEB P PERF BELL P PERF SPINF1 P MOVE SPBINW3,CBIN3 DEBET
0x32f334…32f4c8 Dummy {f00=0x0114, f01=0x0190, f02=»F SPINF1 P MOVE SPBINW3,CBIN3 KREDIT P RET 2 P* > PFU05 REG KEY H , P MOVE SPBINW3,CBIN5 OUT OF REGISTRATION ^ P RET P* PFU06 LISTE P PERF LSTINT P BNOK FUNOK P B FUOK P* PFU07 SUBTOTA
0x32f4c8…32f65c Dummy {f00=0x0114, f01=0x018e, f02=»BINW3,CBIN1 P RET P* PFU09 CYCLE * P PERF CYK,CBIN1 > P BNOK FUNOK V P MOVE SPBINW3,CBIN4 j P RET P* PFU10 STABEL P PERF CYK,CBIN2 P BNOK FUNOK P MOVE SPBINW3,CBIN4 P RET P*
0x32f65c…32f7f0 Dummy {f00=0x0114, f01=0x0190, f02=» P MOVE SPBINW3,CBIN4 P RET P* , PFU12 KONTOKORT 6 P PERF KORT N P BNOK FUNOK ` P MOVE SPBINW3,CBIN4 t P RET P* PFU13 KVIT P PERF KVIT P BNOK FUNOK P B FUOK P* PFU14 SUPL
0x32f7f0…32f984 Dummy {f00=0x0114, f01=0x018e, f02=»UOK P* PFU16 ADM KEY & P MOVE GSWBCD3,SPINPUT GET ADM TYPE , P MOVE GSWBIN1,GSWBCD3 V P PERF ADM,GSWBIN1 t P MOVE SPBINW3,CBIN4 P RET P* PFU17 CYCLE KEY , P MOVE GSWBCD3,SPINPUT GET TYPE OF CYCLE P
0x32f984…32fb18 Dummy {f00=0x0114, f01=0x018e, f02=» t ( P PERF CYK,CBIN10 END OF CYCLE/STABEL P BNOK FUNOK 4 P B FUOK H P* X " PFCYK4 PAUSE IN CYCLE STABEL b P PERF CYK,CBIN4 P BNOK FUNOK P B FUOK P* PFCYK9 ( P PERF CYK,CBIN9 CLEAR ARKIV KNT. NR P
0x32fb18…32fcac Dummy {f00=0x0114, f01=0x0190, f02=» P RET P* PFU19 HOVEDBOG P TBT GTDIVTR,FUNOK 2 P MOVE TTSTYRDX,=W'1' L P MOVE SPBINW3,CBIN1 h P RET P* PFU20 DEBITOR POSTERING P TBT GTDIVTR,FUNOK P MOVE TTSTYRDX,=W'2' P MOVE SPBINW3,CBIN1
0x32fcac…32fe40 Dummy {f00=0x0114, f01=0x018e, f02=»ET P* $ PFU22 TRANS SELECTION IN DIVTR P TBF GTDIVTR,FUNOK < P PERF TRPAGE V P MOVE SPBINW3,CBIN1 j P RET P* PFU23 ONLINE " P PERF ADM,CBIN7 PERFORM ONLINE & P MOVE SPBINW3,CBIN4 REWRITE SCREEN P RET
0x32fe40…32ffd4 (2, 186) Dummy {f00=0x0114, f01=0x0190, f02=» P MOVE SPBINW3,CBIN3 P RET $ P* 0 P* : P PEND D P EJECT R PTRINP PROC ` P******************** r P* F P* TRINP - PROCEDURE FOR HANDLING INFORMATION GIVEN OVER ( P* FROM THE SCREEN PACKAGE.
0x32ffd4…330168 Dummy {f00=0x0114, f01=0x0190, f02=»* ITSELF. $ P* SPCHANGE WILL BE SET. P* INPUT: B 8 P* SPBINW2: INDEX FOR THE KEY DEPRESSED P* OUTPUT: 6 P* SPBINW3: GIVING THE TYPE OF INPUT P* 1 MAK TYPE
0x330168…3302fc Dummy {f00=0x0114, f01=0x0190, f02=» h . P* 5 >1 PAGE TRANS CORRECT < P* 6 NEXT PAGE OF TRANS ALREADY ATTACHED : P* z P******************** P* P IB SPBINW2, C P IN01,IN02,IN03 P CBE SPBINW2,=W'22',IN22 PIN00 $ P M
0x3302fc…330490 Dummy {f00=0x0114, f01=0x0190, f02=» PIN03 AFTER SLUT, P TBT GTTRSEL,IN030 ( P CBE SPBINW1,=W'0',IN00 NOT ALLOWED 8 PIN030 d P PERF ENTER r * P BNOK IN035 ERRORS DETECTED IN FLDTST P IB GTRETUR, C P IN031,IN032,IN033 PIN031 P MOVE SPBINW3,CBIN
0x330490…330624 Dummy {f00=0x0114, f01=0x0190, f02=» P TBWD TAB OVER LAST FIELD P MOVE SPBINW3,CBIN2 * P RET F P* R PIN22 P TRANS SELECTED h P MOVE SPBINW3,CBIN3 P RET P* P PEND P EJECT PTRPAGE PROC P******************** P* F
0x330624…3307b8 Dummy {f00=0x0114, f01=0x0190, f02=» THE TRANSACTION P* P******************** * P* F & P SET GTTRSEL TRANSACTION SELECTED P P CLEAR GTTYPE2 z P CLEAR GTTYPE3 P MOVE GTPAGE,CBIN1 B P* TRANSTYPE 01, 02, 03, 04, 05, 06, 07, 08, 09, 10, B P*
0x3307b8…33094c Dummy {f00=0x0114, f01=0x4172, f02=» PG01,PG01,PG01,PG01,PG01,PG01,PG01,PG02,PG02,PG01, C < P PG01,PG01,PG01,PG01,PG01,PG01,PG01,PG01,PG01,PG01, C @ P PG03,PG01,PG03,PG01 P* PPG01 P RET P* PPG02 P SET GTTYPE2 P RET P* PPG03
0x33094c…330ae0 Dummy {f00=0x0114, f01=0x2008, f02=» NT RGMAIN @ AG&5 z < PTRERR ERRORMESSAG&5 * P PERF SPERR j P B TR90 P PEND P* P* @ NTERMEDIATE STOP OF CYCLE 8 P
0x330ae0…330c74 (2, 187) Dummy {f00=0x0114, f01=0x0000, f02=»
[…0x7…]
0x331780…331914 (2, 188) Opaque[0x194]
0x331914…331aa8 # DirEnt {nam=»RGFRMT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2298, f03=0x0000}
0x331914…331aa8 IdxSect {
0x331914…331aa8 f00 = 0x0114 // 0x331914 @0x0
0x331914…331aa8 f01 = 0x0012 // 0x331916 @0x2
0x331914…331aa8 gno = [ // 0x331918 @0x4
0x331914…331aa8 [0x00]: C0x0114.0x3.0
0x331914…331aa8 [0x01]: C0x0115.0x0.0
0x331914…331aa8 [0x02]: C0x0115.0x1.0
0x331914…331aa8 [0x03]: C0x0115.0x2.0
0x331914…331aa8 [0x04]: C0x0115.0x3.0
0x331914…331aa8 [0x05]: C0x0116.0x0.0
0x331914…331aa8 [0x06]: C0x0116.0x1.0
0x331914…331aa8 [0x07]: C0x0116.0x2.0
0x331914…331aa8 [0x08]: C0x0116.0x3.0
0x331914…331aa8 ]
0x331914…331aa8 }
0x331aa8…331c3c Dummy {f00=0x0114, f01=0x018e, f02=» P IDENT RGFRMT 03.01.XXX.1 P DDUM KMD08 & P PDIV : P ENTRY FRMTSP H P ENTRY FRMXSP ^ P ENTRY FMSTYR t P INCLUDE EQUATE PFMSTYR PROC P******************** P* 0 P* FORMATS FOR CONTROLLING CHOICE OF
0x331c3c…331dd0 Dummy {f00=0x0114, f01=0x0190, f02=» P PEND P* PFRMTSP PROC P* 4 P******************* > : P* ATTACHES A FORMAT FOR USE IN SCREEN PACKAGE Z P* > P* USES GTREGDEX TO DETERMINE WHICH FORMAT TO USE P* P********************
0x331dd0…331f64 Dummy {f00=0x0114, f01=0x0190, f02=» 0 P* ATTACHES FORMATS FOR PAGE 2 AND 3 ( P* FOR TRANSTYPES 8,9,51,53 < 2 P* PLUS OTHER EXTRA FORMATS ON SCREEN h P* P******************* P ATTFMT XSPFTB(XSPDEX) P RET P PEND P* P E
0x331f64…3320f8 Dummy {f00=0x0114, f01=0x0190, f02=» t 8 PSPFTB FTABLE FRMT01,FRMT02,FRMT03,FRMT04,FRMT05, C , P FRMT06,FRMT07,FRMT08,FRMT09,FRMT10, C D , P FRMT12,FRMT00,FRMT00,FRMT00,FRMT00, C t , P FRMT00,FRMT00,FRMT00,FRMT00,FRMT00 C ( P FRMT00,FRMT00,FRMT00,FRMT00,FRMT00 P*
0x3320f8…33228c Dummy {f00=0x0114, f01=0x018e, f02=»1, C t P XSPLIN P EJECT PSTYRHB FRMT , P FSL @ P FTAB 4 L P FCOPY ='HOVEDBOG' P FLINK FCYST v P FNL P FCOPY ='REGKONTONR' P FTAB 13 P FCOPY ='CPR/CIR/NR' P FTAB 25 P FCOPY ='YDELSESMODT'
0x33228c…332420 Dummy {f00=0x0114, f01=0x0190, f02=» @ P FKI 13,MINL=7,MAXL=10,REWRT,APPL=81,DUPL=GTDUPF(CBIN2), C P SCHK=1 H & P FMEL 'XXXXXXE-XXXX',GTREGF(CBIN2) X B P FKI 25,MINL=10,MAXL=10,REWRT,APPL=82,DUPL=GTDUPF(CBIN10), C P SCHK=1 ( P FMEL 'XXXXXXE-XXXX',GTREGF(CBIN10) P FME
0x332420…3325b4 (2, 189) Dummy {f00=0x0115, f01=0x0190, f02=»CYST P FNL P FCOPY ='DEBITOR' P FILLR ' ',1 2 P FCOPY ='NR' F P FILLR ' ',2 Z P FCOPY ='BET-ART' n P FNL 8 P FKI 1,MAXL=10,REWRT,APPL=83,DUPL=GTDUPF(CBIN2), C P SCHK=1,ME & P FMEL 'XXXXXXE-XXXX',GTREGF(CBIN2)
0x3325b4…332748 Dummy {f00=0x0115, f01=0x0190, f02=»MEL 'XX',GTREGF(CBIN3) P FMEND P* , P* 6 PSTYRRM FRMT @ P FSL T P FTAB 3 ` P FCOPY =' REMITTERING' p P FLINK FCYST P FNL P FCOPY ='REGKONTONR' P FTAB 13 P FCOPY ='LEVERAND ' P FCOPY ='NR'
0x332748…3328dc Dummy {f00=0x0115, f01=0x0190, f02=» & P FMEL 'XXXXXXXXE-XX',GTREGF(CBIN1) @ P FKI 13,MINL=7,MAXL=10,REWRT,APPL=86,DUPL=GTDUPF(CBIN2), C . P SCHK=1,ME r & P FMEL 'XXXXXXE-XXXX',GTREGF(CBIN2) B P FKI 25,MINL=10,MAXL=10,REWRT,APPL=87,DUPL=GTDUPF(CBIN10), C P SCHK=1 ( P F
0x3328dc…332a70 Dummy {f00=0x0115, f01=0x0190, f02=» P* P* 6 PFRMT01 FRMT TRANSTYPE 1 P FSL V P FBF GTDIVTR,SFMT01 b P FMEL '99',GTREGNR ~ P FCOPY =' NORMALPOST' P FTEXT ' M/P-NR' P FLINK FCYST P FNL P FCOPY ='REGKONTON
0x332a70…332c04 Dummy {f00=0x0115, f01=0x0190, f02=» SUBF06 P FNL PSFMT01 $ P FBT GTDIVTR,SFMX01 2 P FTAB 4 N P FCOPY ='HOVEDBOG' ^ P FLINK FCYST x P FNL P FNL P FNL PSFMX01 P FLINK FBELOB P FNL P FLINK SUBF08
0x332c04…332d98 Dummy {f00=0x0115, f01=0x0190, f02=» FCOPY ='BFO' P FNL P FLINK SUBV07 2 P FLINK SUBF11 P P FLINK SUBF12 n P FLINK FCYEND P FMEND P* P* 6 P TRANSTYPE 2 PFR
0x332d98…332f2c Dummy {f00=0x0115, f01=0x0190, f02=» P FNL P FCOPY ='REGKONTONR' P FNL @ P FLINK SUBF05 T P FNL r PSFMT02 P FBT GTDIVTR,SFMX02 P FTAB 4 P FCOPY ='HOVEDBOG' P FLINK FCYST P FNL P FNL P F
0x332f2c…3330c0 Dummy {f00=0x0115, f01=0x0190, f02=» P FLINK FCYEND P FMEND P* 4 P* > 6 P TRANSTYPE 3 H PFRMT03 FRMT P FSL P FBF GTDIVTR,SFMT03 P FMEL '99',GTREGNR P FTEXT ' DEBITORINDB' P FLINK FCYST
0x3330c0…333254 (2, 190) Dummy {f00=0x0115, f01=0x0190, f02=» FNL P FLINK SUBF06 0 P FKI 30,MAXL=2,APPL=7,ME,DUPL=GTDUPF(CBIN3) * P FMEL 'XX',GTREGF(CBIN3) ^ P FNL ~ PSFMT03 P FBT GTDIVTR,SFMX03 P FTAB 4 P FCOPY ='DEBITOR' P FCOPY =' POST.' P FLINK FCY
0x333254…3333e8 Dummy {f00=0x0115, f01=0x0190, f02=» FTAB 22 P FLINK FVALOR P FNL & P FLINK SUBF08 2 P FLINK SUBF15 H P FLINK SUBF11X ^ P FNL t P FCOPY ='RTE/GEB' P FTAB 9 P FCOPY =' DEB' P FTAB 18 P FCOPY ='BFO' P FNL P FLINK SUBF16 P
0x3333e8…33357c Dummy {f00=0x0115, f01=0x0190, f02=» TRANSTYPE 4 t PFRMT04 FRMT P FSL 4 P FBF GTDIVTR,SFMT04 @ P FMEL '99',GTREGNR P FTEXT ' SD-INCASSO' v P FLINK FCYST P FNL P FTAB 13 P FCOPY ='CPR/CIR/NR' P FTAB 30 P
0x33357c…333710 Dummy {f00=0x0115, f01=0x0190, f02=»CBIN3) ~ P FNL PSFMT04 " P FBT GTDIVTR,SFMX04 0 P FTAB 4 L P FCOPY ='DEBITOR' P FCOPY =' POST.' v P FLINK FCYST P FNL P FNL P FNL PSFMX04 P FLINK FBELOB P FNL P
0x333710…3338a4 Dummy {f00=0x0115, f01=0x0190, f02=»7 P FLINK SUBF11X P FLINK FCYEND P FMEND 6 P* L P* V 6 P TRANSTYPE 5 ` PFRMT05 FRMT P FSL P FMEL '99',GTREGNR P FTEXT ' SALDOOVERF' P FLINK FCYST P
0x3338a4…333a38 Dummy {f00=0x0115, f01=0x0190, f02=»NK FBELOB P FNL P FLINK SUBF08 & P FNL D P FNL X P FLINK FCYEND l P FMEND P* P* 6 P TRANSTYPE 6 PFRMT06 FRMT P FSL P
0x333a38…333bcc Dummy {f00=0x0115, f01=0x0190, f02=» P FCOPY ='REGKONTONR' P FTAB 13 , P FCOPY ='LEVERAND ' F P FTAB 25 j " P FCOPY ='YDELSESMODT' P FNL P FLINK SUBF05 P FLINK SUBF06 P FLINK SUBF21
0x333bcc…333d60 Dummy {f00=0x0115, f01=0x0190, f02=» P FNL P FNL PSFMX06 P FLINK FBELOB . P FNL L P FLINK SUBF08 ` P FNL ~ P FCOPY ='BKO' P FTAB 5 P FLINK FVALOR P FTAB 18 P FCOPY
0x333d60…333ef4 (2, 191) Dummy {f00=0x0115, f01=0x0190, f02=» SUBF11 P FLINK SUBF12 P FLINK SUBF22 . P FLINK FCYEND L P FMEND b P* x P* 8 P TRANSTYPE 07 PFRMT07 FRMT P FSL P FMEL '99',GTREGNR P FCO
0x333ef4…334088 Dummy {f00=0x0115, f01=0x0190, f02=» P FLINK SUBF05 P FNL " P FLINK FBELOB 6 P FNL T P FLINK SUBF08 h P FNL P FNL P FLINK FCYEND P FMEND P* P* < P
0x334088…33421c Dummy {f00=0x0115, f01=0x0190, f02=»COPY =' REMITTERING' P FLINK FCYST P FNL 0 P FCOPY ='REGKONTONR' D P FTAB 13 h P FCOPY ='LEVERAND ' P FNL P FLINK SUBF05 P FLINK SUBF06 P FNL
0x33421c…3343b0 Dummy {f00=0x0115, f01=0x018e, f02=»NL PSFMX08 P FLINK FBELOB P FTAB 17 6 ( P FCOPY ='FAKTNR FAKTDATO' P P FNL | P FLINK SUBF08 P FLINK SUBF24 P FNL P FCOPY ='LEVKONTO' P FTAB
0x3343b0…334544 Dummy {f00=0x0115, f01=0x0190, f02=» P FLINK SUBF11X P FLINK FCYEND P FMEND 4 P* J P* T < P TRANSTYPE 09 - 1 ^ PFRMT09 FRMT P FSL P FBF GTDIVTR,SFMT09 P FMEL '99',GTREGNR P FCOPY =' REMITTER
0x334544…3346d8 Dummy {f00=0x0115, f01=0x0190, f02=» P FCOPY ='LEVERAND ' P FTAB 25 ( " P FCOPY ='YDELSESMODT' B P FNL h P FLINK SUBF05 | P FLINK SUBF06 P FLINK SUBF21 P FNL PSFMT09 P FBT GTDIVTR,SFM
0x3346d8…33486c Dummy {f00=0x0115, f01=0x0190, f02=» FLINK FBELOB P FTAB 17 ( P FCOPY ='FAKTNR FAKTDATO' 0 P FNL P FLINK SUBF08 p P FLINK SUBF24 P FNL P FCOPY ='LEVKONTO' P FTAB 13 P FCOPY ='TXT' P
0x33486c…334a00 Dummy {f00=0x0115, f01=0x0190, f02=»NK FCYEND P FMEND P* ( P* 2 8 P TRANSTYPE 10 < PFRMT10 FRMT x P FSL P FMEL '99',GTREGNR $ P FTEXT =' POST T/GL. ]R' P FLINK FCYST P FNL P
0x334a00…334b94 (2, 192) Dummy {f00=0x0115, f01=0x0190, f02=»B 17 P FCOPY ='CPR/CIR/NR' P FNL ( P FLINK SUBF08 < 0 P FKI 17,MAXL=10,MINL=7,REWRT,APPL=6,NCLR, C Z P DUPL=GTDUPF(CBIN2),SCHK=1 & P FMEL 'XXXXXXE-XXXX',GTREGF(CBIN2) P FNL P FNL P FLI
0x334b94…334d28 Dummy {f00=0x0115, f01=0x0190, f02=» ~ P FILLR ' ',1 P FCOPY ='EJ EDB' P FLINK FCYST 4 P FNL H P FCOPY ='TNR ' T P FCOPY ='KONTONR' j P FNL P FKI 1,MAXL=3,APPL=76,ME P FMEL 'XXX',GTREGF(CBIN10) 4 P FKI 5,MINL=7,MAXL=10,REWRT,APPL=78,SCHK=1,CTAB &
0x334d28…334ebc Dummy {f00=0x0115, f01=0x0190, f02=»NL P FLINK FBELOB P FTAB 17 P FCOPY =' DIVERSE' 0 P FNL J P FLINK SUBF08 V P FKI 18,MAXL=10,APPL=89 l $ P FMEL 'XXXXXXXXXX',GTREGF(CBIN2) P FNL P FNL P FLINK FCYEND P FMEND P* P* P*
0x334ebc…335050 Dummy {f00=0x0115, f01=0x0190, f02=»ORMATS FOR TRANS 50 P* ! P* ! & P* ! 0 PFM40ST FRMT ! : P FSL ! N P FMEL '99',GTREGNR ! Z P FMEND ! t P* ! P* ! PFCYST FRMT ! P FTAB 23 ! P FCOPY TTINF1 ! P FMEND ! P* ! PFCYEND FRMT ! P FNL ! P F
0x335050…3351e4 Dummy {f00=0x0115, f01=0x018e, f02=»TL8TXT ! P FINP 23 " P FMEL 'ZZZZZVZZ9,99+',GTSUM " PFCY10 " B P FLINK FMTEND " P P FMEND " f P* " t PFMTEND FRMT " ~ P FNL " P FKI 2,MAXL=1,APPL=90,VERIF " P FMEL 'B',TSWBCD2 " P FMEND " P* " P* " PFVALOR FRM
0x3351e4…335378 Dummy {f00=0x0115, f01=0x0190, f02=» P FILLR 'L',1 # P FILLR X'5C',1 # P FILLR 'B',1 # . P FMEND # B P* # P P* # Z PFRTBEL FRMT # d P FTEXT 'RATE' # x P FLINK FBELOB # P FMEND # P* # P* # @ P REGISTRERINGSKONTONNR #
0x335378…33550c Dummy {f00=0x0115, f01=0x0190, f02=» FMEL 'XXXXXXXXE-XX',GTREGF(CBIN1) # P FMEND $ 4 P* $ J P* $ T B P CPR/CIR/LEV/DEBITOR NR $ ^ PSUBF06 FRMT $ F P FKI 13,MAXL=10,REWRT,APPL=6,DUPL=GTDUPF(CBIN2), C $ " P
0x33550c…3356a0 Dummy {f00=0x0115, f01=0x0190, f02=» BETALINGSKODE $ v PSUBF07 FRMT % " > P FKI 1,MAXL=2,APPL=7,DUPL=GTDUPF(CBIN3),ME,NCLR % 8 & P FMEL 'XX',GTREGF(CBIN3) % z P FMEND % P* % PSUBV07 FRMT % 6 P FKI 1,MAXL=2,APPL=7,DUPL=GTDUPF(CBI
0x3356a0…335834 (2, 193) Dummy {f00=0x0116, f01=0x018e, f02=»EL@B % ^ PSUBF08 FRMT & @ P FKI 1,MAXL=12,REWRT,APPL=8,DUPL=GTDUPF(CBIN4), C & " P ME,NCLR,SCHK=4 & f 2 P FMEL 'TTTTTTTVTTX,XX-',GTREGF(CBIN4) & ~ P FMEND & P* & P & P* & P* & @ P
0x335834…3359c8 Dummy {f00=0x0116, f01=0x0190, f02=» , P FMEL 'XXVXXVXX',GTREGF(CBIN7) ' P FMEND ' 4 P* ' J P* ' T PSUBF11X FRMT ' ^ < P FKI 22,MINL=6,MAXL=6,APPL=11,DUPL=GTDUPF(CBIN7),SCHK=2 ' r " P FMEL 'XXVXXVXX',GTREGF(CBIN7) ' P FMEND ' P* ' P* ' 8 P
0x3359c8…335b5c Dummy {f00=0x0116, f01=0x0190, f02=» FMEL 'X',GTREGF(CBIN8) ' P FMEND ( P* ( 6 P* ( @ PSUBF14 FRMT ( J 0 P FKI 4,MAXL=1,APPL=14,DUPL=GTDUPF(CBIN4), C ( ^ P ME,NCLR ( P FMEL 'X',GTREGF(CBIN4) ( P FMEND ( P* ( P* ( 8 P
0x335b5c…335cf0 Dummy {f00=0x0116, f01=0x0190, f02=»IN11) ( t P FMEND ) P* ) $ P* ) . < P RENTE/GEBYR KODE ) 8 PSUBF16 FRMT ) x < P FKI 1,MAXL=1,APPL=16,DUPL=GTDUPF(CBIN12), C ) P NCLR ) & P FMEL 'X',GTREGF(CBIN
0x335cf0…335e84 Dummy {f00=0x0116, f01=0x0190, f02=» OPRIKD[KKODE ) PSUBF17 FRMT * 6 D P FKI 1,MINL=2,MAXL=2,APPL=17,DUPL=GTDUPF(CBIN10),CTAB * L & P FMEL 'XX',GTREGF(CBIN10) * D P FKI 5,MINL=2,MAXL=2,APPL=18,DUPL=GTDUPF(CBIN11),CTAB * & P
0x335e84…336018 Dummy {f00=0x0116, f01=0x0190, f02=») * x > P FKI 13,MAXL=1,APPL=20,DUPL=GTDUPF(CBIN13),CTAB + & P FMEL 'X',GTREGF(CBIN13) + L P FMEND + v P* + P* + : P YDELSESMODTAGER + PSUBF21 FRMT + N P FKI 25,MI
0x336018…3361ac Dummy {f00=0x0116, f01=0x0190, f02=»(CBIN10) + l P FMEND , P* , & P* , 0 B P MODTAGERS BETALINGSART , : PSUBF22 FRMT , @ P FKI 22,MINL=2,MAXL=2,APPL=22,DUPL=GTDUPF(CBIN11) , & P FMEL 'XX',GTREGF(CBIN11) , P
0x3361ac…336340 Dummy {f00=0x0116, f01=0x0190, f02=» FKI 17,MAXL=8,APPL=24,DUPL=GTDUPF(CBIN13) , , P FMEL 'TTTTTTTX',GTREGF(CBIN13) - 6 H P FKI 26,MINL=6,MAXL=6,APPL=23,DUPL=GTDUPF(CBIN12), C - f P SCHK=2 - , P FMEL 'XXVXXVXX',GTREGF(CBIN12) - P
0x336340…3364d4 (2, 194) Dummy {f00=0x0116, f01=0x0190, f02=» 1,MAXL=8,APPL=25,DUPL=GTDUPF(CBIN14) - , P FMEL 'TTTTTTTX',GTREGF(CBIN14) . 0 P FMEND . ` P* . v P* . 6 P TEXTNUMMER . PSUBF26 FRMT . 8 P FKI 13,MAXL=4,APPL=26,DUPL=GTDUPF(C
0x3364d4…336668 Dummy {f00=0x0116, f01=0x0190, f02=» OMR]DENUMMER . l PSUBF27 FRMT / > P FKI 6,MINL=2,MAXL=2,APPL=27,DUPL=GTDUPF(CBIN16) / . & P FMEL 'XX',GTREGF(CBIN16) / p P FMEND / P* / P* / PSUBF28 FRMT / @ P FKI 1,MINL=10,MAXL=10,REWRT,APPL=28,DUPL=GTDUPF
0x336668…3367fc Dummy {f00=0x0116, f01=0x0190, f02=» : P FKI 24,MINL=6,MAXL=6,APPL=31,DUPL=GTDUPF(CBIN10), C 0 P SCHK=2,ME,NCLR 0 B $ P FMEL 'XXVXXVXX',GTREGF(CBIN10) 0 Z P FMEND 0 P* 0 P* 0 PSUBF36 FRMT 0 0 P FKI 1,MAXL=2,APPL=36,DUPL=GTDUPF(CBIN5), C 0 P ME,NCLR 0 P FMEL 'XX'
0x3367fc…336990 Dummy {f00=0x0116, f01=0x0190, f02=» H P FKI 1,MINL=6,MAXL=6,APPL=37,DUPL=GTDUPF(CBIN18), C 1 P SCHK=2 1 P , P FMEL 'XXVXXVXX',GTREGF(CBIN18) 1 n H P FKI 10,MINL=6,MAXL=6,APPL=38,DUPL=GTDUPF(CBIN19), C 1 P SCHK=2 1 , P
0x336990…336b24 Dummy {f00=0x0116, f01=0x0190, f02=»39,DUPL=GTDUPF(CBIN7), C 1 v P ME,NCLR,SCHK=4 2 " * P FMEL 'TTTTTTTVTTX,XX-',GTREGF(CBIN7) 2 : P FMEND 2 h P* 2 v P* 2 B P ALTERNATIV ADRESSEKODE 2 PSUBF46 FRMT 2 8 P FKI 11,MAXL=1,APPL=46,D
0x336b24…336cb8 Dummy {f00=0x0116, f01=0x0190, f02=» DEBITORL@BENUMMER 2 v PSUBF48 FRMT 3 & 8 P FKI 10,MAXL=3,APPL=48,DUPL=GTDUPF(CBIN15) 3 < ( P FMEL 'TTX',GTREGF(CBIN15) 3 x P FMEND 3 P* 3 P* 3 PSUBF55 FRMT 3 P FLINK SUBX55 3 P
0x336cb8…336e4c Dummy {f00=0x0116, f01=0x0190, f02=»IN5),SCHK=4 3 X 0 P FMEL 'TTTTTTTTTX-',GTREGF(CBIN6) 4 H P FKI 25,MAXL=10,REWRT,APPL=59,DUPL=GTREGF(CBIN6),SCHK=4 4 H 0 P FMEL 'TTTTTTTTTX-',GTREGF(CBIN7) 4 P FNL 4 H P FKI 13,MAXL=10,REWRT,APPL=60,DU
0x336e4c…336fe0 Dummy {f00=0x0116, f01=0x0190, f02=»F(CBIN8),SCHK=4 4 0 P FMEL 'TTTTTTTTTX-',GTREGF(CBIN9) 5 P FNL 5 L H P FKI 25,MAXL=10,REWRT,APPL=62,DUPL=GTREGF(CBIN9),SCHK=4 5 ` 2 P FMEL 'TTTTTTTTTX-',GTREGF(CBIN10) 5 P FMEND 5 P* 5 PSUBX55
0x336fe0…337174 (2, 195) Dummy {f00=0x0116, f01=0x018e, f02=»ND 5 P* 6 PSUBX56 FRMT 6 H P FKI 13,MAXL=10,REWRT,APPL=56,DUPL=GTREGF(CBIN3),SCHK=4 6 * 0 P FMEL 'TTTTTTTTTX-',GTREGF(CBIN4) 6 v P FMEND 6 P* 6 PSUBX57 FRMT 6 H P FKI 25,MAXL=10,REWRT,APPL=5
0x337174…337308 Dummy {f00=0x0116, f01=0x0190, f02=» 6 P FLINK SUBX55 7 P FLINK SUBX56 7 ( P FLINK SUBX57 7 H P FMEND 7 h PSUBF56 FRMT 7 ~ P FLINK SUBX56 7 P FMEND 7 P* 7 PSUBF64 FRMT 7 P FLINK SUB164 7 P FLINK S
0x337308…33749c Dummy {f00=0x0116, f01=0x0190, f02=»DUPF(CBIN12), C 7 f P ME,NCLR 8 P FMEL 'X',GTREGF(CBIN12) 8 < PLAB164 FMEND 8 P* 8 p PSUB264 FRMT 8 z P FBZ GSSWITCH(CBIN12),LAB264 8 & P FKI 20,MAXL=1,APPL=64,NCLR,VERIF 8 $ P FMEL 'X',GTREGF(CBIN12) 8 PLAB2
0x33749c…337630 Dummy {f00=0x0116, f01=0x0190, f02=»TTX',GTREGF(CBIN13) 8 P FMEND 9 P* 9 * P* 9 4 PSUBF54 FRMT 9 > P FLINK SUB154 9 T P FLINK SUB254 9 j P FMEND 9 P* 9 PSUB154 FRMT 9 P FBP GSSWITCH(CBIN2),LAB154 9 N P FKI 27,MAXL=10,REWRT,APPL=54,DUPL=GTDUPF(CB
0x337630…3377c4 Dummy {f00=0x0116, f01=0x0190, f02=» FRMT 9 P FBZ GSSWITCH(CBIN2),LAB254 : & P FKI 27,MAXL=10,APPL=54,NCLR,VERIF : 2 0 P FMEL 'TTTTTTTTTX-',GTREGF(CBIN2) : PLAB254 FMEND : P* : PSUBF63 FRMT : D P FKI 1,MINL=6,MAXL=6,APPL=63,DUPL=GTDUPF(CBIN11), C :
0x3377c4…337958 Dummy {f00=0x0116, f01=0x0190, f02=»RMT : B P FKI 1,MAXL=4,APPL=70,DUPL=GTDUPF(CBIN1), C ; P ME,NCLR ; R * P FMEL 'TTTX',GTREGF(CBIN1) ; r P FMEND ; P* ; P* ; P EJECT ; PFMT208 FRMT ; P FSL ; P FNL ; P FNL
0x337958…337aec Dummy {f00=0x0116, f01=0x0190, f02=» FTAB 18 ; P FCOPY ='BFO' < P FNL < 0 P FLINK SUBV07 < D P FLINK SUBF27 < b P FLINK SUBF46 < x P FLINK SUBF12 < P FNL < & P FCOPY ='PER FRA PER TIL' < P FNL < P F
0x337aec…337c80 Dummy {f00=0x0116, f01=0x0190, f02=» FCOPY ='BKO' < P FTAB 6 = P FCOPY ='OMR' = , P FTAB 11 = B P FCOPY ='A-ADR' = R P FTAB 18 = j P FCOPY ='BFO' = P FNL = P FLINK SUBV07 = P FLINK SUBF27 = P FLINK SUBF46 = P
0x337c80…337e14 (2, 196) Dummy {f00=0x0116, f01=0x0190, f02=» FNL = P FLINK SUBF37 > P FLINK SUBF22 > . P FLINK FCYEND > L P FMEND > b P* > p PFMT251 FRMT > z P FSL > P FCOPY ='SIDE 51-2' > P FMEND > PFMT253 FRMT > P FSL > P FCOPY ='SIDE 53-2' > P FMEND >
0x337e14…337fa8 Dummy {f00=0x0116, f01=0x0190, f02=» P FMEND ? PFMTERR FRMT ? P FSL ? & P FCOPY ='FEJL FORMAT' ? 2 P FMEND ? P P* ? ^ P* ? h PXSPCY1 FRMT ? r P FSL ? P FNL ? P FNL ? P FNL ? P FNL ? P FNL ? P FBT TTCY2FLG,XSPL01 ? P FCOPY ='ARKIV' ? P FCOPY
0x337fa8…33813c Dummy {f00=0x0116, f01=0x0190, f02=»TCY2FLG,XSPL02 ? ( P FKI 1,MINL=10,MAXL=10,REWRT,SCHK=1 @ & P FMEL 'XXXXXXXXE-XX',GTREGF(CBIN9) @ B P FKI 15,MAXL=12,REWRT,SCHK=4 @ l $ P FMEL 'TTTTTTTVTTX,XX-',GTCYSUM @ PXSPL02 @ P FKI 32,MAXL=2,SCHK=5,ME @ P FMEL 'XX',TTLINNR @ P FLINK F
0x33813c…3382d0 Dummy {f00=0x0116, f01=0x0190, f02=» P FBF CKTFLAG,XSPL05 A P FTAB 5 A P FTEXT 'GL. SALDO' A 0 P FTAB 18 A J P FCOPY ='LINIE NR' A Z P FTEXT ' CHECK' A t P FNL A ( P FKI 5,MAXL=12,REWRT,APPL=112,SCHK=4 A $ P FMEL 'TTTTTTTVTTX,XX-',TTKTSLD A " P FKI 18,MAXL=2,ME,NEOI,SCHK=
0x3382d0…338464 Dummy {f00=0x0116, f01=0x0190, f02=» A P FTAB 5 B P FCOPY ='KONTOKORT' B P FTAB 18 B 4 P FCOPY ='LINIE NR' B D P FNL B ^ P FKI 18,MAXL=2,ME,SCHK=5 B j P FMEL 'XX',TTKTLIN B P FLINK FMTEND B P FMEND B P* B P* B PXSPLIN FRMT B P FSL B P FNL B P
0x338464…3385f8 Dummy {f00=0x0116, f01=0x4086, f02=»=2,SCHK=5 B P FMEL 'XX',GSWBCD5 LINE NR C P FLINK FMTEND C 4 P FMEND C J P* C X P* C b P END C l P* C x@ C P FMEL 'XX',TTKTLIN B P FLINK FMTEND B P FMEND B P* B P* B PXSPLIN FRMT B P FSL B P FNL B P
0x3385f8…33878c Dummy {f00=0x0116, f01=0x2008, f02=» D L '9',GTREGF(CBIN20) 3 P FMEND 4 & P* 4 < P* 4 F < P DEBITORL@BENUMMER 4 P PSUBF48 FRMT 4 F P FKI 22,MINL=1,MAXL=3,REWRT,APPL=48,DUPL=GTREGF(CBIN25) 4 ( P FMEL 'ZZ9',GTR
0x33878c…338920 Dummy {f00=0x0116, f01=0x0000, f02=»
0x338920…338ab4 (2, 197) Opaque[0x194]
0x338ab4…338c48 # DirEnt {nam=»RGSUBS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x22e0, f03=0x0000}
0x338ab4…338c48 IdxSect {
0x338ab4…338c48 f00 = 0x0117 // 0x338ab4 @0x0
0x338ab4…338c48 f01 = 0x0010 // 0x338ab6 @0x2
0x338ab4…338c48 gno = [ // 0x338ab8 @0x4
0x338ab4…338c48 [0x00]: C0x0117.0x0.0
0x338ab4…338c48 [0x01]: C0x0117.0x1.0
0x338ab4…338c48 [0x02]: C0x0117.0x2.0
0x338ab4…338c48 [0x03]: C0x0117.0x3.0
0x338ab4…338c48 [0x04]: C0x0118.0x0.0
0x338ab4…338c48 [0x05]: C0x0118.0x1.0
0x338ab4…338c48 [0x06]: C0x0118.0x2.0
0x338ab4…338c48 [0x07]: C0x0118.0x3.0
0x338ab4…338c48 ]
0x338ab4…338c48 }
0x338c48…338ddc Dummy {f00=0x0117, f01=0x0190, f02=» P IDENT RGSUBS 03.01.XXX.1 P DDUM KMD08 & P PDIV D P ENTRY ENTER Z P ENTRY MODP x P ENTRY KORT P ENTRY KKTRP P ENTRY KVIT P ENTRY LSTINT P E
0x338ddc…338f70 Dummy {f00=0x0117, f01=0x0190, f02=» P ENTRY KKCH P ENTRY FMTNXT P EXT SETKRE 2 P EXT SETDEB F P EXT SLUT Z P EXT FRMTVO l P EXT FRMTKV P EXT FRMXJT P EXT FRMXSP P EXT FRMXVO P EXT FRMXTA P EXT FRMTKT P EXT
0x338f70…339104 Dummy {f00=0x0117, f01=0x0190, f02=» LINOPT P EXT ABORT P EXT EMPTYT " P EXT CRVO 6 P EXT SPCLRA H P EXT SPERR h P EXT SPINF1 P EXT SPLIN8 P EXT GRASPV P EXT CLEAR8 P EXT SPCHK5 P EXT FLDTST P EXT CYOUT
0x339104…339298 Dummy {f00=0x0117, f01=0x0190, f02=»RE FOR WRITING ON 'KONTOKORT v P* $ 6 P** KASSEFUNCTION OLY (TRANS 1-4, 6, 8-12) . P****************** h , P TBF TTEORFLG,KORTNOK NOT CORRECT TRANS 2 P TBT GTREGFLG,KORTNOK MUST NOT BE FIRST TRANS 6 P TBF GTKASSE,KORTNOK ONLY IN KAS
0x339298…33942c Dummy {f00=0x0117, f01=0x0190, f02=»R OLD SALDO, LINE NO AND LINE CHECKDIGIT ~ , P** WRITE 'KONTOKORT' ON JOURNAL 0 ( P** TRANSPORT LINE IF NEEDED ` P* PKORT10 P MOVE SPKEY,CBIN1 P CLEAR GTSLDFLG P TBF CKTFLAG,KORT12 P SET TTKORTFL P
0x33942c…3395c0 Dummy {f00=0x0117, f01=0x0190, f02=»T $ P IB SPBINW2,KORTOK,KORTOK,KORT30 PKORT20 ERRORKEY 2 P MOVE SPBINW4,=W'4' L P PERF SPERR h P B KORT10 | PKORT30 CORRECT ENTERED P TBF CKTFLAG,KORT40 NO SALDO P SET GTSLDFLG * P CALL EMPTYT,TTKTSLD GL SALDO PR
0x3395c0…339754 (2, 198) Dummy {f00=0x0117, f01=0x0190, f02=»WED t P PERF SPERR P B KORT10 PKORT40 2 . P PERF WRITJT,=W'2' 'KONTOKORT' ON JOURNAL @ ( P PERF KKTRP TRANSPORT LINE IF NEEDED r P MOVE SPINPUT,TTKTLIN ( P PERF SPCHK5 GET THE OLD LINE NUMBER P CBG GSWBIN1,=W'89',KORT20 (
0x339754…3398e8 Dummy {f00=0x0117, f01=0x0190, f02=»ERF KKCH NEW CHECKDIGIT P PERF FRMTKT P EDWRT KVOUCH,GTSTRFMT 4 P DSC0 .NW,KVOUCH,RLEAS R P CLEAR GTLOKSPG p PKORTOK P CLEAR TTKORTFL " P CMP CBIN0,CBIN0 OK, SET CR=0 P RET PKORTNOK P CLEAR TTKORTFL $ P
0x3398e8…339a7c Dummy {f00=0x0117, f01=0x0190, f02=»** KKTRP - WRITES KONTOKORT INF ON VOUCHER ( P** + TRANSPORT IF NECESSARY : P* f P******************** p , P PERF SPLIN8,CBIN6,CBIN2 WRITE KONTOKORT " P TBF GTCYFLG,KON20 IF IN CYCLE P TBF GTCYWRTF,KON20 P DSC0 KVOU
0x339a7c…339c10 Dummy {f00=0x0117, f01=0x0190, f02=»BF GTSLDFLG,KON90 NO SALDO . P CBNE TTKTLIN,=D'27',KON90 TRANSPORT LINE? " * P PERF FRMXKT,CBIN1 GET TRANSPORT LINE T P DSC1 KVOUCH,POS,CMINLIN . P EDWRT .NW,KVOUCH,GTSTRFMT EDWRT TRP. LINE PKON30 & P PERF SPLIN8,CBIN3,CBIN0 'NY SIDE'
0x339c10…339da4 Dummy {f00=0x0117, f01=0x0190, f02=»KEYB NO, ABORT . P DSC0 KEYB,SKIB DELETE CYCLIC INPUT BUFFER * P MOVE GSWBCD3,CKTTOP SET DEFAULT LINE H P MOVE SPINPUT,GSWBCD3 v P B KON40 PKON35 P WAIT KEYB & P CBE SPBINW2,=W'18',KON40 SLUT KEY ( P CBNE SPBINW2,=W'4',KON30
0x339da4…339f38 Dummy {f00=0x0117, f01=0x0190, f02=» l P CBL TTKTLIN,=D'1',KON30 " P PERF SPCHK5 CHANGE LINE VALUE ( P DSC1 KVOUCH,POS,GSWBIN1 N P PERF FRMXKT,CBIN1 n P EDWRT KVOUCH,GTSTRFMT P ADD TTKTLIN,=D'1' PKON90 P RET P PEND P EJECT PKKCH PROC P
0x339f38…33a0cc Dummy {f00=0x0117, f01=0x018e, f02=»D LINE NR (TTKTLIN) AND r " P** PUTS IT IN TTKTCHK " P** USED FOR KONTOKORT F P* l P**************** v P MOVE GSWBCD1,TTKTSLD SAVE ( P CBNL GSWBCD1,=D'0',KKCH10 NEGATIVE? ( P MUL GSWBCD1,=D'-1' YES, CHANGE SIGN P
0x33a0cc…33a260 Dummy {f00=0x0117, f01=0x018e, f02=» v & P ADD TTKTLIN,=D'1' RESTORE LINE NR P MOVE GSWBCD2,GSWBCD1 SAVE 2 P DIV GSWBCD1,=D'7' CALCULATE T P MUL GSWBCD1,=D'7' REMAINDER x " P SUB GSWBCD2,GSWBCD1 MODULUS 7 $ P ADD GSWBCD2,=D'1' ADD 1 ALWAYS P CBL TTKTSLD,=D'0',KKCH20
0x33a260…33a3f4 (2, 199) Dummy {f00=0x0117, f01=0x0190, f02=» PMODP PROC P********** P* , 4 P** MODP - INVERTS THE PREVIOUS TRANSACTION 6 $ P** I.E. REVERSES THE VALUE n 2 P** AND SETS FLAG TO UPDATE ACCUMULATORS , P** MUST NOT BE IN FIRST TRANBS & P**
0x33a3f4…33a588 Dummy {f00=0x0117, f01=0x018e, f02=»BT GTREGFLG,MODPNOK MUST NOT BE FIRST TRANS 6 P TBF GTKASSE,MODPNOK ONLY IN KASSEFUNCTIONS (1-12) 4 P CLEAR GTLOKSPG n P MOVE SPKEY,CBIN1 P SET TTINVFLG @ P MUL GTDUPF(CBIN4),='-1' MULTIPLY BELOB BY -1 P PER
0x33a588…33a71c Dummy {f00=0x0117, f01=0x0190, f02=» p P RET PMODPNOK $ P CMP CBIN1,CBIN0 NOK, SET CR<>0 $ P RET L P PEND ` P EJECT v PKVIT PROC P********** P* . P** KVIT - WRITES AN EXTRA RECEIPT & P** ONLY IN KASS
0x33a71c…33a8b0 Dummy {f00=0x0117, f01=0x0190, f02=»ANS f & P TBT GTCYFLG,KVITNOK NOT IN CYCLE 6 P TBF GTKASSE,KVITNOK ONLY IN KASSEFUNCTIONS(1-12) 6 P MOVE SPKEY,CBIN1 p H P PERF WRITJT,=W'1' WRITE 'KVIT' ON JOURNAL P MOVE TTCYM,=C'K' P PERF FRMTKV P PER
0x33a8b0…33aa44 Dummy {f00=0x0117, f01=0x0190, f02=»K $ P CMP CBIN1,CBIN0 NOK, SET CR<>0 P RET 2 P PEND F P EJECT PENTER PROC r P********** P* D P** ENTER - PERFORMS DIFFERENT CHECKS AFTER A PAGE HAS BEEN P** ENTERED ON SCREEN
0x33aa44…33abd8 Dummy {f00=0x0117, f01=0x0190, f02=» ( P** 3 FIELD DEPENDENCE TEST P* 0 0 P** AND THEN PERFORM PROCEDURE SLUT, TO : 6 P** WRITE TO DISK AND WRITE RELEVANT RECEIPTS n P* P********** ( P MOVE GTRETUR,CBIN0 SET RETURN CODE P TBT GTTYPE3,ENTY3
0x33abd8…33ad6c Dummy {f00=0x0117, f01=0x0190, f02=» P PERF SLUT OK P BNOK ENTNOK P TBT GTKORTFL,ENT01 2 ( P CBE GTRETUR,=W'3',ENT01 IF LINE 91 N P MOVE GTRETUR,=W'1' z P TBF CKTAUTO,ENTOK P CBNE GTREGDEX,=W'4',ENTOK PENT01 " P PERF KORT TRANS 4: KONTOKORT $ P M
0x33ad6c…33af00 Dummy {f00=0x0117, f01=0x0190, f02=»E GTPAGE,CBIN1,ENT10 P* GET PAGE 2 P TBT GTSLUTFL,ENTY1 4 P SET GTSLUTFL P P PERF FMTNXT,CBIN1 f P MOVE GTPAGE,CBIN2 P MOVE GTRETUR,=W'2' P B ENTOK P* PENT10 P PERF FLDTST P BNOK ENTNOK P P
0x33af00…33b094 (2, 200) Dummy {f00=0x0117, f01=0x0190, f02=» & P* TYPE 3 - THREE PAGE TRANSACTION PENTY3 . P CBNE GTPAGE,CBIN1,ENT20 < & P* AFTER PAGE 1, GET NEXT PAGE P PERF FMTNXT,CBIN2 P MOVE GTPAGE,CBIN2 P MOVE GTRETUR,=W'2' P B ENTOK P* PENT20 P CBNE GTPA
0x33b094…33b228 Dummy {f00=0x0117, f01=0x018e, f02=» | P B ENTOK P* PENT30 " P CBNE GTPAGE,CBIN3,ENT40 0 P* FIRST TIME PAGE 3 P P PERF FLDTST p P BNOK ENTNOK P B ENT40 P* PENT40 P* CORRECT PAGE 3 P PERF SLUT P BNOK ENTNOK P CLEAR
0x33b228…33b3bc Dummy {f00=0x0117, f01=0x0190, f02=» P* FINISHED P MOVE GTRETUR,=W'3' P* : PENTOK D " P CMP CBIN0,CBIN0 OK, SET CR =0 R P RET x PENTNOK $ P CMP CBIN1,CBIN0 NOK, SET CR<>0 P RET P* P PEND P EJECT PFMTNXT PROC
0x33b3bc…33b550 Dummy {f00=0x0117, f01=0x0190, f02=»PES 8,9,51 AND 53 ~ " P** (DEX 8,9,21,23) P* @ P****-************** J 4 P CBNE FORMAL1,CBIN1,NXT10 INDEX 1: f 2 P MOVE GSWBIN1,CBIN1 TYPE 8 ( P CBE GTREGDEX,=W'8',NXT10 2 P
0x33b550…33b6e4 Dummy {f00=0x0117, f01=0x0190, f02=»NXT20 | : P MOVE GSWBIN1,CBIN3 TYPE 51,PAGE 2 P CBE GTREGDEX,=W'21',NXT20 L 8 P MOVE GSWBIN1,CBIN4 TYPE 53,PAGE 2 n PNXT20 4 P CBNE FORMAL1,CBIN3,NXTATT INDEX 3: : P MOVE GSWBIN1,C
0x33b6e4…33b878 Dummy {f00=0x0117, f01=0x0190, f02=»3 PNXTATT P PERF FRMXSP,GSWBIN1 P RET 4 P PEND H P EJECT ^ PCYK PROC CYTYPE l P******************** P* 0 P* HANDLE DIFFERENT TYPES OF CYCLES P* P******************** P IB
0x33b878…33ba0c Dummy {f00=0x0117, f01=0x0190, f02=»K1 P******************** P* & . P** CYK1 - START OF CYCLE FUNCTION 0 P* b P******************** l " P TBT TTLSTFLG,CYK1NOK IN LISTE $ P TBT TTCY2FLG,CYK1NOK IN CYCLE 2 P SET TTCY1FLG " P MOVE TTCYM,=C'C' FOR JOURNA
0x33ba0c…33bba0 Dummy {f00=0x0117, f01=0x018e, f02=»CYK2 P******************** P* ( . P** CYK2 - START OF STABEL FUNCTION 2 P* d P******************** n " P TBT TTLSTFLG,CYK2NOK IN LISTE $ P TBT TTCY1FLG,CYK2NOK IN CYCLE 1 P SET TTCY2FLG " P MOVE TTCYM,=C'S' FOR JOUR
0x33bba0…33bd34 (2, 201) Dummy {f00=0x0118, f01=0x0190, f02=» PCYK4 P******************** P* , . P* CYK4 - PAUSE IN CYCLE / STABEL 6 P* h P******************** r P TBF GTCYFLG,CYK4NOK P TBT GTCYWRTF,CYKSUB 2 P MOVE TTARKSAV,GTDUPF(CBIN9) SAVE ARKIV KNT NR > P SET
0x33bd34…33bec8 Dummy {f00=0x0118, f01=0x0190, f02=»SE 0,CBIN8,CBIN8 ERASE LINE 8 P PERF SPINF1 & P B CYKOK : PCYK4NOK J P B CYKNOK Z PCYKSUB l P PERF SUBTOT z P B CYKOK P EJECT PCYK9 P******************** P* * P** CYK9 - CLEAR ARKIV KONTO NR
0x33bec8…33c05c Dummy {f00=0x0118, f01=0x0190, f02=»K P B CYKNOK P EJECT PCYEND * P******************** 8 P* T $ P** CYEND - END OF CYCLE ^ P* ( P** WRITE TOTAL LINE ON VOUCHER P* P******************** * P TBF GTCYFLG,CYENDNOK ONLY IF IN CYCLE
0x33c05c…33c1f0 Dummy {f00=0x0118, f01=0x0190, f02=»G CLEAR FLAGS x P CLEAR GTCYFLG ! & P PERF CYOUT ! F P CLEAR TTTSTFLG ! Z P WAIT KVOUCH ! | P MOVE GSWBIN1,TTLINNR ! . P DSC1 KVOUCH,POS,GSWBIN1 POSITION VOUCHER ! P MOVE GSWSTR9,=C'TOTAL ' ! ( P PERF
0x33c1f0…33c384 Dummy {f00=0x0118, f01=0x018e, f02=»SE VOUCHER ! ^ , P TBT C167FLG,CYEND15 T=NO WRITE JOURNAL " P PERF WRITJT,=W'15' " B PCYEND15 " ^ 6 P CBL GTREGNR,=D'18',CYEND20 CHECKS? " n P SET TTTSTFLG " @ P MOVE GTREGF(CBIN4),GTSUM FIND TOTAL VALUE "
0x33c384…33c518 Dummy {f00=0x0118, f01=0x018e, f02=» " t P PERF CYCLR # P B CYENDOK # PCYEND30 # . > P MOVE SPBINW4,=W'12' SET ERRORCODE # > P PERF SPERR # P IB SPBINW2,CYENDCNT,CYEND10 # PCYENDOK # & P ERASE 0,CBIN8,CBIN8 ERASE LINE 8 # P PERF SPINF1
0x33c518…33c6ac Dummy {f00=0x0118, f01=0x0190, f02=» PCYKNOK $ P CMP CBIN1,CBIN0 NOK $ P RET $ . P PEND $ : P EJECT $ H PCYKINT PROC $ ^ P******************** $ t P* $ . P** CYKINT - START OR END OF CYCLE $ P* $ 6 P** START SET RELEVANT INFORMATION AND READ
0x33c6ac…33c840 Dummy {f00=0x0118, f01=0x0190, f02=» P******************** % , P TBF GTCYFLG,CY10 TRUE- ALREADY IN CYCLE % B P TBT TTPSEFLG,CY05 TRUE- IN PAUSE STATE % P P PERF CYK,CBIN10 % P RET % PCY05 % P PERF CYCLR % P RET % PCY10 % ( P SET TTSUMFLG INDICATE
0x33c840…33c9d4 (2, 202) Dummy {f00=0x0118, f01=0x0190, f02=»OVE GTSUM,GTCYSUM GET SAVED SUM % F P MOVE GTREGF(CBIN9),TTARKSAV GET SAVED ARKIV KNT.NR & 6 P CBG GTPSELIN,CBIN0,CY20 & , P MOVE GTPSELIN,TTCYKST RESET START LINE & P MOVE TTCYKPOS,TTCYKST & PCY20 & P MOVE TTLINNR,
0x33c9d4…33cb68 Dummy {f00=0x0118, f01=0x0190, f02=»'0' INITIATE VALUES & z P MOVE GTCYSUM,=D'0' ' P MOVE GTSUM,=D'0' ' 8 P MOVE TTCYKTOT,=D'0' ' " P MOVE TTLINNR,=D'1' ' x H P PERF FRMXSP,CBIN11 GET FORMAT FOR CYCLE INF ' P SET SPPROMPT ' H P
0x33cb68…33ccfc Dummy {f00=0x0118, f01=0x0190, f02=»5,CY45,CY50 ' t PCY40 ERROR KEY ( P MOVE SPBINW4,=W'4' ( , P PERF SPERR ( H P B CY30 ( f PCY45 MAK ( P CLEAR TTCY1FLG ( P CLEAR TTCY2FLG ( P B CY05 ( PCY50 ( P CBL TTLINNR,=D'25',CY55 ( P MOVE
0x33ccfc…33ce90 Dummy {f00=0x0118, f01=0x0190, f02=»E GTSUM,GTCYSUM ( P MOVE TTARKSAV,GTREGF(CBIN9) ) P MOVE TTCYKST,TTLINNR ) < P MOVE TTCYKPOS,TTLINNR ) Z P MOVE GTCYIN,TTASKNR ) x P SUB GTCYIN,CBIN1 ) P MUL GTCYIN,CCYSIZE ) P ADD GTCYIN,CBIN1 ) P MOVE GTCYOUT,GTCYIN ) PCY90 )
0x33ce90…33d024 Dummy {f00=0x0118, f01=0x0190, f02=» ) PCYCLR PROC * P******************* * P* * 6 . P** CYCLR - CLEAR CYCLEINFORMATION * @ P* * r P****************** * | " P MOVE GTTEXT,=C' ' * P MOVE TTCYM,=C' ' * ( P MOVE GTREGF(CBIN9),=D'0' *
0x33d024…33d1b8 Dummy {f00=0x0118, f01=0x0190, f02=» GTCYTRPF * & P DSC0 KVOUCH,RLEAS RELEASE VOUCHER + P RET + < P PEND + H P EJECT + ^ PLSTINT PROC + t P******************** + P* + , P** LSTINT - INITIATE LISTFUNCTION + P* + P******************** + P TBT
0x33d1b8…33d34c Dummy {f00=0x0118, f01=0x0190, f02=»TLSTFLG + ~ < P MOVE GTSUM,=D'0' INITIATE SUM , H P PERF FRMXTA,CBIN1 GET HEADER FOR TALLY ROLL , P B P PERF WTALLY WRITE ON TALLY ROLL , & P MOVE GTTEXT,=C'LISTE ' ,
0x33d34c…33d4e0 Dummy {f00=0x0118, f01=0x0190, f02=» PERF FRMXTA,CBIN2 GET TOTALLINE FOR TALLY , P PERF WTALLY - 2 P ERASE 0,CBIN8,CBIN8 - R P CLEAR TTLSTFLG - n P CLEAR TTSUMFLG - " P MOVE GTTEXT,=C' ' - PLSTOK - P PERF SPINF1 - " P CMP CBIN0,CBI
0x33d4e0…33d674 (2, 203) Dummy {f00=0x0118, f01=0x0190, f02=» EJECT - PSUBTOT PROC . P******************* . ( P* . D P** SUBTOT - SUBTOTAL . N P* . p 6 P** LISTFUNCTION- WRITE SUBTOTAL ON TALLY . z P* . 2 P** CYCLEFUNCTION- SAVE CYCLE INFORMATION . $ P** WRI
0x33d674…33d808 Dummy {f00=0x0118, f01=0x0190, f02=» @ P TBT TTLSTFLG,SUBTLST IN LIST FUNCTION / " P TBT GTCYFLG,SUBTCYC IN CYCLE / H P TBF GTSUMKEY,SUBTNOK IN SUM / n P* SUBTOTAL IN SUM / P SET GTSUBFLG / P PERF SUM / P CLEAR GTSUBFLG / P B SUBTOK10 / P* SET PA
0x33d808…33d99c Dummy {f00=0x0118, f01=0x0190, f02=» INDICATE BREAK / v ( P PERF FRMXVO,CBIN3 GET SUBTOT FORMAT 0 ( P SET GTCYWRTF 0 T @ P PERF WRITVO WRITE SUBTOT LINE 0 j P WAIT KVOUCH 0 @ P DSC0 KVOUCH,RLEAS RELEASE VOUCHER 0 8 P
0x33d99c…33db30 Dummy {f00=0x0118, f01=0x0190, f02=»R 0 P MOVE GTPSELIN,TTLINNR 1 ( P MOVE GTCYIN,TTASKNR INITIATE CYSET 1 ( P SUB GTCYIN,CBIN1 1 T P MUL GTCYIN,CCYSIZE 1 n P ADD GTCYIN,CBIN1 1 P MOVE GTCYOUT,GTCYIN 1 P PERF CYCLR 1 P B SUBTOK 1 P* SUBTOTAL IN LIST 1 PSUBTLST
0x33db30…33dcc4 Dummy {f00=0x0118, f01=0x0190, f02=» WRITE ON TALLY ROLL 1 f PSUBTOK 2 & P ERASE 0,CBIN8,CBIN8 ERASE LINE 8 2 * P PERF SPINF1 2 T PSUBTOK10 2 h " P CMP CBIN0,CBIN0 OK, SET CR=0 2 x P RET 2 PSUBTNOK 2 $ P CMP CBIN1,CBIN0 NOK, SET CR<>0 2 P RET 2 P PEND 2 P EJE
0x33dcc4…33de58 Dummy {f00=0x0118, f01=0x0190, f02=»NSACTIONS FROM THE INITIATING 2 & P** POINT TO THE RELEASING. 3 & & P** FIRST TIME: INITIATING 3 P 0 P** LAST TIME: WRITE SUM ON VOUCHER 3 z P* 3 P******************** 3 P TBT GTSUMKEY,SUM50 3 P* FIRST TIME 3 0 P
0x33de58…33dfec Dummy {f00=0x0118, f01=0x0190, f02=» 3 | , P ADD GTSUMST,=D'1' INITIATE FIRST NUMBER 4 & P MOVE GTSUMCNT,=D'0' INITIATE SUM 4 8 P B SUMOK 4 b P* 4 r P* LAST TIME 4 | PSUM50 4 . P PERF WRITJT,=W'4' WRITE SLUT SUM FUNCTION 4 P TBT GTSUBFLG,SUM60 4 P MOVE TTSUMMRK,=C' ' 4
0x33dfec…33e180 Dummy {f00=0x0118, f01=0x0190, f02=»,RLEAS 4 $ P MOVE GSWBCD5,TTLINNR SAVE LINNR 5 P CLEAR TTTSTFLG 5 6 PSUM70 5 N P PERF GRASPV 5 P CLEAR GTSWFLAG 5 p P PERF LINOPT 5 P BNOK SUM60 5 P CBG GSWBIN1,=W'90',SUM75 5 , P CBNE GSWBIN1,=W'0',SUM80 DEFAULT LINE? 5 PSUM75
0x33e180…33e314 (2, 204) Dummy {f00=0x0118, f01=0x0190, f02=»R,GSWBCD5 RESTORE LINNR 5 P PERF FRMXVO,CBIN7 6 P EDWRT KVOUCH,GTSTRFMT 6 : P PERF CRVO 6 X P DSC0 .NW,KVOUCH,RLEAS 6 j P TBT GTSUBFLG,SUMOK10 6 P TBT GTASUMFL,SUM10 6 PSUMOK 6 P PERF SPINF1 6 PSUMOK10 6 " P CMP CBIN0,CBIN0 OK,
0x33e314…33e4a8 Dummy {f00=0x0118, f01=0x018e, f02=» OR CLEAR DIVTR FLAG 6 z P* 7 P******************** 7 & P TBT CTRVALG,DIVTRNOK 7 B P TBT GTDIVTR,DIVEND 7 ` P* SET DIVTR 7 | P SET GTDIVTR 7 P SET GTTRSEL 7 P CBE TTDKDEX,=W'1',DIV10 7 P PERF SETDEB 7 P B DIVTROK 7 P
0x33e4a8…33e63c Dummy {f00=0x0118, f01=0x40e4, f02=» 7 z P B DIVTROK 8 P* 8 PDIVTROK 8 $ " P CMP CBIN0,CBIN0 OK, SET CR=0 8 4 P RET 8 Z PDIVTRNOK 8 f $ P CMP CBIN1,CBIN0 NOK, SET CR<>0 8 v P RET 8 P PEND 8 P* 8 P* 8 P END 8 @ 8 ERF SETDEB 7 P B DIVTROK 7 P
0x33e63c…33e7d0 Dummy {f00=0x0118, f01=0x2008, f02=» 9 RELEASE VOUCHER x P PERF CYKINT * 8 P MOVE GTCYSUM,GTSUM SAVE SUM H P SUB GTLINNR,CB&N : P MOVE GTCYKPOS,GTLINNR SAVE LINNR P RET B P PERF
0x33e7d0…33e964 Dummy {f00=0x0118, f01=0x0000, f02=»
[…0x3…]
0x33ee20…33efb4 (2, 205) Opaque[0x194]
0x33efb4…33f148 # DirEnt {nam=»DIVFMT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2320, f03=0x0000}
0x33efb4…33f148 IdxSect {
0x33efb4…33f148 f00 = 0x0119 // 0x33efb4 @0x0
0x33efb4…33f148 f01 = 0x0014 // 0x33efb6 @0x2
0x33efb4…33f148 gno = [ // 0x33efb8 @0x4
0x33efb4…33f148 [0x00]: C0x0119.0x0.0
0x33efb4…33f148 [0x01]: C0x0119.0x1.0
0x33efb4…33f148 [0x02]: C0x0119.0x2.0
0x33efb4…33f148 [0x03]: C0x0119.0x3.0
0x33efb4…33f148 [0x04]: C0x011a.0x0.0
0x33efb4…33f148 [0x05]: C0x011a.0x1.0
0x33efb4…33f148 [0x06]: C0x011a.0x2.0
0x33efb4…33f148 [0x07]: C0x011a.0x3.0
0x33efb4…33f148 [0x08]: C0x011b.0x0.0
0x33efb4…33f148 [0x09]: C0x011b.0x1.0
0x33efb4…33f148 ]
0x33efb4…33f148 }
0x33f148…33f2dc Dummy {f00=0x0119, f01=0x0190, f02=» P IDENT DIVFMT 03.01.XXX.1 P DDUM KMD08 & P PDIV D P ENTRY FRMTJT Z P ENTRY FRMXJT p P ENTRY FRMTTA P ENTRY FRMXTA P ENTRY FRMTVO P ENTRY FRMTKV P ENTRY FRMXVO P ENTRY FRMTKT
0x33f2dc…33f470 Dummy {f00=0x0119, f01=0x0190, f02=» PROC 0 P CALL FMOVE,GTSTRFMT,FTBJT(GTREGDEX) P RET B P PEND V P* l PFRMXJT PROC XJTDEX v ( P CALL FMOVE,GTSTRFMT,FTBXJT(XJTDEX) P RET P PEND P* PFRMTTA PROC 0 P CALL FMOV
0x33f470…33f604 Dummy {f00=0x0119, f01=0x0190, f02=»XTA(XTADEX) x P RET P PEND P* . PFRMTVO PROC 8 0 P CALL FMOVE,GTSTRFMT,FTBVO(GTREGDEX) L P RET P PEND P* PFRMXVO PROC XVODEX ( P CALL FMOVE,GTSTRFMT,FTBXVO(XVODEX) P RET P P
0x33f604…33f798 Dummy {f00=0x0119, f01=0x018e, f02=» 0 P CALL FMOVE,GTSTRFMT,FTBKT(GTREGDEX) P RET < P PEND P P* f PFRMXKT PROC XKTDEX p ( P CALL FMOVE,GTSTRFMT,FTBXKT(XKTDEX) P RET P PEND P* PFRMTGP PROC ( P CALL FMOVE,GTSTRFMT,FTB
0x33f798…33f92c Dummy {f00=0x0119, f01=0x0190, f02=» j P RET P PEND P* " P* , P* 6 P EJECT @ P* V P* FORMATS FOR JOURNAL ` P* @ PFTBJT FTABLE JTFMT01,JTFMT02,JTFMT03,JTFMT04,JTFMT02, C 2 P JTFMT01,JTFMT02,JTFMT08,JTFMT08,JTFMT02, C P
0x33f92c…33fac0 Dummy {f00=0x0119, f01=0x0190, f02=» LINE 1 z P FEOR 2 P FLINK JTSUB04 LINE 2 6 P FMEND l P* PJTFMT02 FRMT P FLINK JTFMT02L P FMEND P* PJTFMT02L FRMT 2 P FLINK JTSUBST
0x33fac0…33fc54 (2, 206) Dummy {f00=0x0119, f01=0x0190, f02=» FEOR P FILLR ' ',8 F P FMEL 'X',GTDUPF(CBIN6) RE$ 2 P FILLR ' ',2 | P FLINK JTSUB06 FOR TRANS 10 P FLINK JTSUB30 ARKIV KNT.NR P FILLR ' ',15 P FMEND
0x33fc54…33fde8 Dummy {f00=0x0119, f01=0x0190, f02=» START INF p P FILLR ' ',9 $ P FCOPY TT16TXT RATE/RENTE/GEBYR 4 2 P FLINK JTSUB06 CPR/CIR 0 P FLINK JTSUB08 VALUE P FEOR P FILLR ' ',2 P FILLR '
0x33fde8…33ff7c Dummy {f00=0x0119, f01=0x0190, f02=»ZZ',GTDUPF(CBIN7) VALGR z F P FMEL 'BBZ',GTDUPF(CBIN8) BETALINGSFORM BFO 6 8 P FLINK JTSUB30 ARK KONTO NR P FILLR ' ',2 8 P FMEL 'XX',GTDUPF(CBIN11) PALIGNIN
0x33ff7c…340110 Dummy {f00=0x0119, f01=0x0190, f02=»ND P* PJTFMT04 FRMT P FLINK JTFMT04L ( P FMEND @ P* N PJTFMT04L FRMT X P FLINK JTSUBST START INF n P FILLR ' ',15 2 P FLINK JTSUB06 CPR/CIR 0 P FLINK JTSUB08
0x340110…3402a4 Dummy {f00=0x0119, f01=0x0190, f02=» D P FMEL 'ZZ.ZZ.ZZ',GTDUPF(CBIN7) VALOR P FILLR ' ',3 L 6 P FLINK JTSUB30 ARK KNT NR h B P FMEL 'BBBZZ',GTDUPF(CBIN10) F$R F P FMEL 'BBZZ',GTDUPF(CBI
0x3402a4…340438 Dummy {f00=0x0119, f01=0x0190, f02=»GTDUPF(CBIN13) OPK z P FMEND 0 P* F PJTFMT08 FRMT P P FLINK JTFMT08L d P FMEND | P* PJTFMT08L FRMT 4 P FLINK JTSUBST START INF 2 P FLINK JTSUB01
0x340438…3405cc Dummy {f00=0x0119, f01=0x0190, f02=» LINE 3 z P FMEND P* 6 PJTFMT12 FRMT @ P FLINK JTFMT12L T P FMEND l P* z PJTFMT12L FRMT 4 P FLINK JTSUBST START INF 8 P FLINK JTSUB05 REG KONTO NR
0x3405cc…340760 Dummy {f00=0x0119, f01=0x0190, f02=» FLINK JTSUB08 VALUE P FEOR 2 P FILLR ' ',2 @ 2 P FMEL 'BZZZZZZZZZZ',GTDUPF(CBIN2) DIVERSE TEXT T P FILLR ' ',16 P FMEND P* 4 PJTSUBST FRMT START INF P FILLR ' ',2
0x340760…3408f4 (2, 207) Dummy {f00=0x0119, f01=0x0190, f02=» TYPE b P FLINK FLBNR P FMEND " P* 8 : PJTSUB01 FRMT LINE 1,- 1,5,6 B P FLINK JTSUB05 CPR/CIR P FLINK JTSUB06 REG-KONTO-NR 0 P FLINK JTSUB08 VALUE P FMEND
0x3408f4…340a88 Dummy {f00=0x0119, f01=0x0190, f02=»ZZ.ZZ.ZZ',GTDUPF(CBIN7) V.DATO B P FMEL 'BBX',GTDUPF(CBIN6) RE$ & D P FMEL 'BBX',GTDUPF(CBIN8) BFO l P FLINK JTSUB30 0 P FMEL 'XXXXXXE-XXXX',GTDUPF(CBIN10) YD.MODT ( P F
0x340a88…340c1c Dummy {f00=0x0119, f01=0x0190, f02=» FMEL 'B999E-99E-999E-99B',GTDUPF(CBIN1) P FMEND 6 P* L 2 PJTSUB06 FRMT CPR/CIR V P FBT BCPR,JTLAB06 ( P FMEL 'XE-XXE-XXE-XXB',GTDUPF(CBIN2) P FB JTLAB08 PJTLAB06 P FBT BLE
0x340c1c…340db0 Dummy {f00=0x0119, f01=0x018e, f02=» PJTLAB08 P FMEND P* * P* 4 8 PJTSUB08 FRMT VALUE AND D/K > 6 P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) z P FCOPY TTDBKRM P FMEND P* PJTSUB10 FRMT LEVERAND
0x340db0…340f44 Dummy {f00=0x0119, f01=0x0190, f02=» 6 P FMEL 'BBZZZE-ZZE-ZZZE-ZZ',GTDUPF(CBIN9) P FMEND > P* L 6 PJTSUB31 FRMT LINE 3 - 8 V P FILLR ' ',2 F P FMEL 'ZZ.ZZ.ZZ',GTDUPF(CBIN12) FAKT DATO D P FMEL 'BZ
0x340f44…3410d8 Dummy {f00=0x0119, f01=0x0190, f02=»MEL 'BZZZZ',GTDUPF(CBIN15) TXT NR D P FMEL 'BZZ',GTDUPF(CBIN16) OMR NR > D P FMEL 'BZZ.ZZ.ZZ',GTDUPF(CBIN18) PER FRA D P FMEL 'BZZ.ZZ.ZZ',GTDUPF(CBIN19) P
0x3410d8…34126c Dummy {f00=0x0119, f01=0x0190, f02=» 0 P* VARIOUS FORMATS FOR JOURNAL TAPE P* < @ PFTBXJT FTABLE XJTF01,XJTF02,XJTF03,XJTF04,XJTF05,XJTF06, C F 2 P XJTF07,FMTFMT,XJTF09,XJTF10,XJTF11,VOX15, C P XJTF13,XJTF14,VOFMT02 P* PXJTF01 FRMT KVITTERING
0x34126c…341400 Dummy {f00=0x0119, f01=0x018e, f02=» P FLINK XJTF02L P FMEND P* ( PXJTF02L FRMT 2 P FLINK FLBNR F P FILLR ' ',2 Z P FCOPY ='KONTOKORT' n P FBF GTSLDFLG,XJTF02EX & P FMEL 'B*.***.***.**9.99-',TTKTSLD PXJTF02EX P FMEND P* PXJTF03 FRMT
0x341400…341594 (2, 208) Dummy {f00=0x0119, f01=0x0190, f02=» P FMEND PXJTF05 FRMT P FLINK XJTF05L * P FMEND @ P* N P* X PXJTF05L FRMT b P FILLR ' ',2 v P FILLR '*',50 P FEOR P FILLR ' ',2 P FTEXT 'VERSNR ' P FCOPY ='DAGS-DATO' P FILLR ' ',2
0x341594…341728 Dummy {f00=0x0119, f01=0x0190, f02=» P FCOPY GTTESTMK P FMEL '99.99.999.9',CVERSNR P FILLR ' ',2 D P FMEL '99E-99E-99',CMASKDAT X P FILLR ' ',3 | P FMEL '99E-99E-99',GTDATO P FILLR ' ',3 P FMEL '999',GTMSK P FILLR ' ',7 P FMEL '***99',TTSTLB
0x341728…3418bc Dummy {f00=0x0119, f01=0x0190, f02=» P FILLR ' ',2 & P FMEL 'B999.99.999.99BBB',TVERSUR & P FMEL 'B999.99.999.99BBB',TTCASHAC B $ P FMEL 'ZZZ.ZZZ.ZZ9.ZZ-',TTSTCASH l P FEOR P FILLR ' ',2 P FILLR '*',40 P FMEND P* PXJTF06 FRMT P FLINK XJTF06L
0x3418bc…341a50 Dummy {f00=0x0119, f01=0x018e, f02=»ASSELUKNING' P FILLR ' ',30 P FEOR * P FILLR ' ',2 8 P FCOPY ='T[LLER' L P FILLR ' ',10 d P FCOPY ='DEBET' z P FILLR ' ',12 P FCOPY ='KREDIT' P FMEND P* PXJTF07 FRMT P FLINK XJTF07L P FMEND
0x341a50…341be4 Dummy {f00=0x0119, f01=0x0190, f02=» 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(GSWBIN5,CBIN1) P FMEND B P* P PXJTF09 FRMT Z P FCOPY =' START TEST' n P FMEND P* PXJTF10 FRMT P FCOPY =' SLUT TEST' P FMEND P* PXJTF11 FRMT P FILLR
0x341be4…341d78 Dummy {f00=0x0119, f01=0x018e, f02=»MEND P* PXJTF13L FRMT P FLINK JTSUB05 REG KNT NO * * P FMEL 'BZZZ',GTDUPF(CBIN2) COUNTER NO L 2 P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) VALUE z P FILLR ' ',2 P FCOPY ='ADM ' $ P FMEL 'BZZ',GTDUPF(CBIN5) ADM NO P FME
0x341d78…341f0c Dummy {f00=0x0119, f01=0x0190, f02=» P* PFMTFMT FRMT P FLINK FMTFMTL & P FMEND < P* J PFMTFMTL FRMT T P FILLR ' ',2 h P FTEXT 'DIVERSE FORMATER' | P FMEND P EJECT P* : P* FORMATS FOR VOUCHER 'BILAG AFSTEMPLING'
0x341f0c…3420a0 Dummy {f00=0x0119, f01=0x0190, f02=» C X 2 P BAFST12,BAFST40,BAFST41,BAFST42,BAFST45, C 2 P BAFST46,BAFST47,BAFST48,BAFST49,BAFST50, C B & P BAFST51,BAFST52,BAFST53,BAFST54 x P* P* PBAFST01 FRMT TRANS 01-06 P FLINK BAFST01L P FMEND P* P
0x3420a0…342234 (2, 209) Dummy {f00=0x011a, f01=0x0190, f02=»'B**B',GTDUPF(CBIN3) BKO @ P FMEL 'ZZ.ZZ.ZZB',GTDUPF(CBIN7) BET/VALORDATO P FB B1LAB2 d PB1LAB1 v " P FMEL 'B**B',GTDUPF(CBIN3) BKO PB1LAB2 < P FLINK JTSUB06 CPR-CIR-NR @ P FLINK B
0x342234…3423c8 Dummy {f00=0x011a, f01=0x0190, f02=» TRANS 02-05-07-10 f P FLINK BAFST02L P FMEND 4 P* B PBAFST02L FRMT L 8 P FLINK BSUB01 HEADER b P FILLR ' ',1 8 P FMEL '******E-****',GTDUPF(CBIN2) CPR/CIR TRANS 10 P FILLR '*',3 P FBT T
0x3423c8…34255c Dummy {f00=0x011a, f01=0x0190, f02=»MEND P* P* < PBAFST08 FRMT TRANS 08-09 P FLINK BAFST08L ` P FMEND x P* PBAFST08L FRMT 8 P FLINK BSUB01 HEADER $ P FMEL 'BBB**B',GTDUPF(CBIN3) BKO
0x34255c…3426f0 Dummy {f00=0x011a, f01=0x018e, f02=»),B8LAB2 ~ 2 P FMEL 'BBZZ.ZZ.ZZBBB',GTDUPF(CBIN12) FAKTDATO ! P FB B8LAB5 ! F PB8LAB2 ! X . P FMEL 'ZZZZ9999.99B',GTDUPF(CBIN14) LEVNR ! f PB8LAB5 ! P FLINK JTSUB10 LEVERAND. ! > P FLINK BSUB02 REGKONTO-BELOB ! P
0x3426f0…342884 Dummy {f00=0x011a, f01=0x0190, f02=» ! P FILLR '+',2 " P FCOPY GTTESTMK " $ > P FCOPY TTCYM CYKLE-MARKERING " < > P FMEL '999B',GTMSK MASKINNR " ~ P FLINK FLBNR " @ P FMEL 'B99.99.99',GTDATO POSTERI
0x342884…342a18 Dummy {f00=0x011a, f01=0x0190, f02=»PE-NR " ^ < P FMEL 'B999',TTCNTNR TAELLER-NR # 2 P FMEL 'BZZZZZZZZZZ',GTDUPF(CBIN2) DIVERSE TEXT # N P FBT TTKORTFL,B12LAB1 # P FILLR '*',13 # PB12LAB1 # @ P FLINK BSUB02 REGKONTO-BELOB #
0x342a18…342bac Dummy {f00=0x011a, f01=0x018e, f02=»B13 # P FMEND $ P* $ PBAFST04 FRMT BILAG TRANS 4 $ $ P FLINK BSUB10 $ H P FLINK BSUB12 $ ^ P FLINK BSUB13 $ t P FMEND $ P* $ P* $ PBAFST40 FRMT $ P FMEND $ P* $ PBAFST41 FRMT $ P FMEND $ PBAFST42 FRMT $
0x342bac…342d40 Dummy {f00=0x011a, f01=0x0190, f02=» P FMEND % P* % PBAFST48 FRMT % P FMEND % 0 P* % > PBAFST49 FRMT % H P FMEND % P* % j PBAFST50 FRMT % t P FMEND % P* % PBAFST51 FRMT % P FMEND % P* % PBAFST52 FRMT % P FMEND % P* % PBAFST53 FRMT %
0x342d40…342ed4 (2, 210) Dummy {f00=0x011a, f01=0x0190, f02=» HEADER % d P FILLR '+',2 & P FCOPY GTTESTMK & , > P FCOPY TTCYM CYKLE-MARKERING & D > P FMEL '999B',GTMSK MASKINNR & P FLINK FLBNR & @ P FMEL 'B99.99.99',GTDATO
0x342ed4…343068 Dummy {f00=0x011a, f01=0x0190, f02=» TRANSTYPE-NR & f P FMEND ' P* ' , P ' 6 PBSUB02 FRMT ' > B P FMEL 'B999.99.999.99B',GTDUPF(CBIN1) REGKONTONR ' T < P FMEL '*.***.***.**9.99-',GTDUPF(CBIN4) BELOB ' B P FCOPY TTDBKRM D
0x343068…3431fc Dummy {f00=0x011a, f01=0x0190, f02=» P FCOPY TTCYM ( @ P FMEL '99.99.99B',GTDATO POSTERINGSDATO ( P FCOPY CKMDNAM ( : P FMEL 'B999B',GTMSK MASKINNR ( r " P FMEL '99B',GTDUPF(CBIN3) BKO ( P FMEND ( P* ( P* ( PBSUB05
0x3431fc…343390 Dummy {f00=0x011a, f01=0x0190, f02=» DEBET/KREDIT-MARK ( l P FILLR ' ',1 ) " P FMEND ) 6 P* ) L P* ) V PBSUB06 FRMT ) ` " P FMEL 'B99B',GTDUPF(CBIN3) BKO ) v P FBT TTKORTFL,B6LAB1 ) P FCOPY TT07TXT ) P FILLR ' ',1 ) . P FMEL 'ZZ.ZZ.ZZB',GTDUPF(CBIN7) VAL. D
0x343390…343524 Dummy {f00=0x011a, f01=0x0190, f02=» CPR/CIR-NR ) v < P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) BELOB * & D P FCOPY TTDBKRM DEBET/KREDIT-MARK * f P FILLR ' ',1 * P FLINK SKAF01 LINE NR * P FMEND * P* * PBSUB10 F
0x343524…3436b8 Dummy {f00=0x011a, f01=0x018e, f02=»99',GTDATO POSTDATO * " P FMEL 'BXX.',GTDUPF(CBIN3) BKO + P FMEND + B P* + P PBSUB11 FRMT + Z $ P FMEL 'XX',GTDUPF(CBIN11) P]L]R + n 2 P FMEL 'E-9999999999B',GTDUPF(CBIN2) DEBITOR NR + , P FMEL 'XX.XXPP',GTDUPF(CBIN7) VALOERDATO + & P FMEL 'BXB',
0x3436b8…34384c Dummy {f00=0x011a, f01=0x0190, f02=» + n P FB B12LAB6 , PB12LAB5 , ( P FMEL 'XX',GTDUPF(CBIN10) FORFALDS]R , , PB12LAB6 , X 2 P FMEL 'E-9999999999B',GTDUPF(CBIN2) DEBITORNR , h , P FMEL 'XX.XXPP',GTDUPF(CBIN7) VALOERDATO , P FILLR ' ',3 , P FMEND , P* , PBSUB13 FRMT ,
0x34384c…3439e0 Dummy {f00=0x011a, f01=0x0190, f02=» EKSP LB. NR. , P FBT GTLOKSPG,FLBNR10 - P FMEL '****9',TTLBNR - 4 P FB FLBNR20 - P PFLBNR10 - d P FMEL '****9',GTLBNR - t PFLBNR20 - P FMEND - P* - P EJECT - P* - * P* VARIOUS FORMATS FOR VOUCHER - P* - : P
0x3439e0…343b74 (2, 211) Dummy {f00=0x011a, f01=0x018e, f02=»X15, C - t P VOX16,VOX17,VOX18,VOX19 . P* . 2 P* . < PVOFMT02 FRMT TOTAL IN CYCLE . F P FLINK VOFMT02L . j P FMEND . P* . PVOFMT02L FRMT . P FILLR '+',2 . P FBF TTCY1FLG,VOLAB02 . P FCOPY ='ARKIV' . P FLINK JTSUB30
0x343b74…343d08 Dummy {f00=0x011a, f01=0x0190, f02=» . P* / PBAXF04 FRMT / P FLINK BAFST03 / & P FLINK BAXF05L / < P FMEND / R P* / ` PBAXF05 FRMT / j P FILLR '+',2 / ~ P FLINK BAXF05L / P FMEND / P* / PBAXF05L FRMT / P FLINK BSUB04 / P FEOR / P FILLR '0',2 /
0x343d08…343e9c Dummy {f00=0x011a, f01=0x0190, f02=» FLINK BAFST03 / P FEOR 0 P FILLR '0',2 0 $ P FEOR 0 8 P FILLR '0',2 0 F P FEOR 0 Z P FLINK KVIT03 0 h P FMEND 0 ~ P* 0 PVOSUM07 FRMT SUMBILAG 0 P FLINK VOSUM07L 0 P FMEND 0 P* 0 PVOSUM07L FRMT 0 P FILLR '+',2 0
0x343e9c…344030 Dummy {f00=0x011a, f01=0x0190, f02=» FLINK FLBNR 0 P FILLR ' ',1 1 P FCOPY ='TOTAL ' 1 * & P FMEL '*.***.***.**9,99+',GTSUMCNT 1 D P FILLR ' ',2 1 n P FMEND 1 P* 1 PVOX08 FRMT 1 P FLINK VOX08L 1 P FMEND 1 P* 1 PVOX08L FRMT 1 P FILLR '+',2 1 P FCOPY
0x344030…3441c4 Dummy {f00=0x011a, f01=0x018e, f02=» P FTEXT ' - ' 2 P FLINK FLBNR 2 P FILLR ' ',2 2 , P FCOPY GSWSTR9 2 @ P FILLR ' ',2 2 V P FCOPY GSWSTR20 TEXT 2 j P FEOR 2 P FILLR '2',2 2 P FILLR '*',60 2 P FILLR '*',8 2 P FEOR 2 P FILLR '4',2 2 P FCOPY ='KONTONR' 2
0x3441c4…344358 Dummy {f00=0x011a, f01=0x0190, f02=» P FILLR ' ',12 3 P FCOPY ='KREDIT' 3 P FMEND 3 2 P* 3 @ PVOX09 FRMT 3 J P FLINK VOX09L 3 P FMEND 3 r P* 3 PVOX09L FRMT 3 P FILLR '2',2 3 * P FMEL 'BXXX.XX.XXX.XXB',GTDUPF(CBIN1) 3 P FILLR ' ',4 3 P FMEL '99',GTWBCD1 3
0x344358…3444ec Dummy {f00=0x011a, f01=0x018e, f02=»'BBZZZ.ZZZ.ZZZ.ZZ9.99-',C12ACC(GSWBIN5,CBIN1) KREDIT 3 P FMEND 4 < P* 4 J PVOX10 FRMT 4 T P FLINK VOX10L 4 f P FMEND 4 | P* 4 PVOX10L FRMT 4 P FILLR '2',2 4 P FMEL 'ZZ',GTWBCD1 4 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) 4 6
0x3444ec…344680 Dummy {f00=0x011a, f01=0x0190, f02=» 4 PVOX11 FRMT 5 P FLINK VOX11L 5 P FMEND 5 0 P* 5 > PVOX11L FRMT 5 H P FILLR '4',2 5 P FTEXT 'TOTAL' 5 p 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) 5 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTREGF(CBIN2) 5 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.9
0x344680…344814 (2, 212) Dummy {f00=0x011a, f01=0x018e, f02=»MEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(CBIN8,CBIN2) 5 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(CBIN8,CBIN1) 6 6 P FEOR 6 n P FILLR '2',2 6 | P FTEXT 'KOR' 6 P FILLR ' ',19 6 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(CBIN7,CBIN2) 6 4 P FMEL 'BBZZZ.ZZZ.ZZZ.Z
0x344814…3449a8 Dummy {f00=0x011a, f01=0x0190, f02=» 6 P FILLR '4',2 7 & P FMEL '999E-99E-999E-99',TTCASHAC 7 P FILLR ' ',1 7 F P FTEXT ' PRIMO' 7 Z * P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTSTCASH 7 r P FILLR ' ',34 7 P FEOR 7 P FILLR '2',2 7 P FTEXT 'BEV ' 7 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.9
0x3449a8…344b3c Dummy {f00=0x011a, f01=0x0190, f02=» 7 P FILLR '2',2 8 P FTEXT 'ULTIMO' 8 ( P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTCASH 8 4 P FILLR ' ',34 8 ` P FMEND 8 v P* 8 PVOX13 FRMT 8 P FLINK VOX13L 8 P FMEND 8 P* 8 PVOX13L FRMT 8 P FILLR ' ',2 8 P FCOPY GTTESTMK 8
0x344b3c…344cd0 Dummy {f00=0x011a, f01=0x0190, f02=» P FCOPY GSWSTR20 9 P FILLR ' ',3 9 P FEOR 9 0 P FILLR '2',2 9 > P FILLR '*',56 9 R P FEOR 9 h P FILLR '4',2 9 v P FCOPY ='T[LLER' 9 P FILLR ' ',4 9 P FCOPY ='KONTONR' 9 P FILLR ' ',10 9 P FCOPY ='BEV.PERIODE' 9 P FIL
0x344cd0…344e64 Dummy {f00=0x011a, f01=0x0190, f02=» 9 P* : PVOX14L FRMT : P FILLR '2',2 : & P FMEL 'ZZ',GTWBCD1 : : P FILLR ' ',4 : T 0 P FMEL 'BXXX.XX.XXX.XXB',CBACC(GSWBIN3,CBIN1) : h 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',CBACC(GSWBIN3,CBIN2) : 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',CBACC(GSWBIN3,CBIN3)
0x344e64…344ff8 Dummy {f00=0x011a, f01=0x0190, f02=» FILLR ' ',2 : P FLINK VOX16L ; P FMEND ; * P* ; 8 PVOX16L FRMT ; B P FILLR X'24',40 NO. ; V P FILLR X'3C',40 5. ; r P FNL ; P FNL ; P FILLR X'5D',40 ] ; P FILLR X'4E',40 N ; P FNL ; P FNL ; P FILLR X'45',40 E ;
0x344ff8…34518c Dummy {f00=0x011a, f01=0x0190, f02=»MT ; P FLINK VOX17L < P FMEND < P* < . PVOX17L FRMT < 8 P FILLR '+',2 < L , P FMEL '99E-99E-99',GTDATO POSTERINGSDATO < ` P FILLR ' ',6 < P FLINK FLBNR < P FILLR ' ',8 < 2 P FMEL 'B*.***.***.**9E,99',GTDUPF(CBIN4) BELOB < P FILLR
0x34518c…345320 Dummy {f00=0x011a, f01=0x0190, f02=»X18 FRMT < P FLINK VOX18L = P FMEND = & P* = 4 PVOX18L FRMT = > P FILLR '2',2 = R P FILLR ' ',17 = f * P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GSWBCD6 = | * P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GSWBCD7 = P FMEND = P* = " PVOX19 FRMT SHORT TR 2,5
0x345320…3454b4 (2, 213) Dummy {f00=0x011b, f01=0x018e, f02=»KVITTERING' = r ( P* (MOSTLY AS NORMAL 'BILAG' > P* > @ : PFTBKV FTABLE BAFST01,BAFST02,KVIT03,KVIT03,BAFST02, C > J 2 P BAFST01,BAFST02,BAFST08,BAFST08,BAFST02, C > P BAFST12 > P* > P* > PKVIT03 FRMT > P FILLR '+',2 >
0x3454b4…345648 Dummy {f00=0x011b, f01=0x018e, f02=» > p P* ? @ PFTBKT FTABLE KAFST01,KAFST02,KAFST03,KAFST04,KAFST00, C ? 2 P KAFST01,KAFST00,KAFST01,KAFST01,KAFST02, C ? V P KAFST12 ? P* ? P* ? PKAFST00 FRMT ? P FMEND ? P* ? P* ? < PKAFST01
0x345648…3457dc Dummy {f00=0x011b, f01=0x0190, f02=» P* @ P* @ : PKAFST02 FRMT TRANS 02 @ P FLINK BAFST02 @ V P FLINK SKAF01 LINE NR @ t P FMEND @ P* @ P @ : PKAFST12 FRMT TRANS 12 @ P FLINK B
0x3457dc…345970 Dummy {f00=0x011b, f01=0x0190, f02=» 03 @ ^ P FLINK KAFST03L A P FMEND A $ P* A 2 PKAFST03L FRMT A < 8 P FLINK BSUB01 HEADER A R P FLINK BSUB06 A P FBF TTKORTFL,KLAB31 A 2 P FMEL 'XX.XXPP',GTDUPF(CBIN7) VAL.DATE, DD.MM A PKLAB31 A > P
0x345970…345b04 Dummy {f00=0x011b, f01=0x0190, f02=»R A n P FMEND B P* B P* B * : PKAFST04 FRMT TRANS 04 B 4 P FLINK KAFST04L B r P FMEND B P* B PKAFST04L FRMT B 8 P FLINK BSUB01 HEADER B < P FLINK BSUB0
0x345b04…345c98 Dummy {f00=0x011b, f01=0x0190, f02=» P FBF TTASKAT,KLAB41 C 0 P FMEL 'B**',GTDUPF(CBIN12) REST.MAANED - CIR C . P FMEL 'B**',GTDUPF(CBIN11) REST.AAR - CIR C T P FB KLAB42 C PKLAB41 C P FILLR ' ',3 C 4 P FMEL 'B**',GTDUPF(CBIN10) FORF.AAR - CPR, BSKAT C PKLAB42 C F P
0x345c98…345e2c Dummy {f00=0x011b, f01=0x018e, f02=»2 C ~ P FBT GTSLDFLG,SKAF04 D P FILLR ' ',13 D & P FB SKAF03 D < PSKAF04 D N , P FMEL '*.***.***.**9.99-',TTKTSLD SALDO D PSKAF03 D " P FMEL 'B99.',TTKTLIN NEW LINE D " P FMEL '9',TTKTCHK CHECK DIGIT D P FB SKAF05 D PSKAF02 D P F
0x345e2c…345fc0 Dummy {f00=0x011b, f01=0x0190, f02=» P* E PFTBXKT FTABLE XKTTRP E P* E * PXKTTRP FRMT E 4 P FLINK XKTTRPL E H P FMEND E ^ P* E l PXKTTRPL FRMT E v P FILLR '+',2 E P FMEL 'BB99.99.99',GTDATO E P FILLR ' ',43 E & P FMEL '*.***.***.**9.99-',TTKTSLD E P FILLR '
0x345fc0…346154 (2, 214) Dummy {f00=0x011b, f01=0x018e, f02=»FTABLE FMTFMT E P* F P* F P EJECT F * P* F 8 . P* VARIOUS FORMATS FOR TALLY ROLL F B P* F t P* F ~ @ PFTBXTA FTABLE TAFMT01,TAFMT02,TAFMT02,TAFMT04,TAFMT05, C F P VOX15,TAFMT07 F P* F PTAFMT01 FRMT F P FSL F
0x346154…3462e8 Dummy {f00=0x011b, f01=0x0190, f02=» P FMEND G P* G PTAFMT02L FRMT G P FILLR '0',2 G 2 P FCOPY GSWSTR9 G F & P FMEL '*.***.***.**9.99+B',GSWBCD6 G P FLINK TAFMT07 G P FMEND G P* G PTAFMT04 FRMT G P FILLR '+',2 G , P FMEL 'Z.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) G
0x3462e8…34647c Dummy {f00=0x011b, f01=0x0190, f02=»LR ' ',1 G P FMEND H P* H PTAFMT07 FRMT H ( P FNL H < P FNL H H P FNL H T P FNL H ` P FNL H l P FNL H x P FNL H P FMEND H P EJECT H P* H ( P* FORMATS FOR GENERAL PRINTER H P* H PFTBGP FTABLE FMTFMT
0x34647c…346610 Dummy {f00=0x011b, f01=0x403e, f02=» H | P* I P* I P* I P END I &@ I :NL H < P FNL H H P FNL H T P FNL H ` P FNL H l P FNL H x P FNL H P FMEND H P EJECT H P* H ( P* FORMATS FOR GENERAL PRINTER H P* H PFTBGP FTABLE FMTFMT
0x346610…3467a4 Dummy {f00=0x011b, f01=0x2008, f02=» J P* CAN NOT BE IDENTIFIED BY TRANSTYPE (OR GTREGDEX) ' P* ' L PFTBXX FTABLE ' V P* ' n P* ' x P END ' @ ' & z P* & PFTBTA FTABLE & P* & P* & P EJECT & P* & ( P* FORMATS
0x3467a4…346938 Dummy {f00=0x011b, f01=0x0000, f02=»
[…0x2…]
0x346c60…346df4 (2, 215) Opaque[0x194]
0x346df4…346f88 # DirEnt {nam=»KMDIO «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2370, f03=0x0000}
0x346df4…346f88 IdxSect {
0x346df4…346f88 f00 = 0x011b // 0x346df4 @0x0
0x346df4…346f88 f01 = 0x000c // 0x346df6 @0x2
0x346df4…346f88 gno = [ // 0x346df8 @0x4
0x346df4…346f88 [0x00]: C0x011b.0x2.0
0x346df4…346f88 [0x01]: C0x011b.0x3.0
0x346df4…346f88 [0x02]: C0x011c.0x0.0
0x346df4…346f88 [0x03]: C0x011c.0x1.0
0x346df4…346f88 [0x04]: C0x011c.0x2.0
0x346df4…346f88 [0x05]: C0x011c.0x3.0
0x346df4…346f88 ]
0x346df4…346f88 }
0x346f88…34711c Dummy {f00=0x011b, f01=0x0190, f02=» P IDENT KMDIO 03.01.XXX.1 P DDUM KMD08 & P PDIV D P ENTRY WRITFD R P ENTRY WRITVO h P ENTRY WRITJT P ENTRY WTALLY P ENTRY WRITID P ENTRY CRKJ P ENTRY GRASP
0x34711c…3472b0 Dummy {f00=0x011b, f01=0x018e, f02=»EL P EXT SPCHK5 P EXT SPLIN8 P EXT SPERR 2 P EXT FRMTJT D P EXT FRMXJT d P EXT ADM x P EXT CYWRT P EXT FRMXVO P EXT FRMXTA P EXT ABORT P EXT RAWRIT P INCLUDE EQU
0x3472b0…347444 Dummy {f00=0x011b, f01=0x018e, f02=» P CMP CBIN1,CBIN0 P RET PWRFD00 ( & P TBF CPFLG,WRFD010 DISC OCUPIED ? 6 " P DELAY CBIN2 YES DELAY 200 MS ` P B WRFD00 PWRFD010 P SET CPFLG P CLEAR CSPLITFL . P MOVE CTWBIN1,CBIN0 NO. OF WRITTEN RECORDS P PER
0x347444…3475d8 Dummy {f00=0x011b, f01=0x0190, f02=» PWRFD006 P EDIT CPCKBUF,PCKINIT * P EDIT CPCKBUF,TREC1 INSERT HEADER INF 2 P MOVE GSWBIN3,CBIN10 ` P MOVE GSWBIN4,CRECLGD | P SUB GSWBIN4,CBIN11 6 P MATCH CPCKBUF,GSWBIN3,GSWBIN4,CBLANKS,CBIN0,CBIN2 P MOVE GSWBIN4,CRECLGD
0x3475d8…34776c Dummy {f00=0x011b, f01=0x0190, f02=»IF SPLIT PACK REST z PWRFD020 P ADD GSWBIN5,CBIN1 * " P CBNL GSWBIN5,CBINMAX,WRFD070 D 4 P CBE GTUSED(GSWBIN5),CBIN0,WRFD020 USED FIELD ? j P MOVE GSWSTR20,=X'00' YES * P MOVE GSWBCD3,GTUSED(GSWBIN5) CONVERT P EDIT GSWSTR20,PFRM1
0x34776c…347900 Dummy {f00=0x011b, f01=0x0190, f02=»BIN1 b P CLEAR CSPLITFL , P CBG GSWBIN6,GSWBIN4,WRFD030 OVERFLOW ? $ 4 P COPY CPCKBUF,GSWBIN3,GSWBIN6,GSWSTR20,CBIN0 NO T P ADD GSWBIN3,GSWBIN6 ( P SUB GSWBIN4,GSWBIN6 ADJUST POINTERS P B WRFD020 SEE IF MORE PWRFD030 0 P COPY
0x347900…347a94 (2, 216) Dummy {f00=0x011b, f01=0x0190, f02=»WBIN3,CBIN1,GSWSTR1,CBIN0 " P DLETE GSWSTR20,CBIN0,GSWBIN4 " P SET CSPLITFL H * P PERF RAWRIT,DK02,=D'2',CPCKBUF,CRECNR ^ P BNOK WRFDERR P TBT GTTESTFL,WRFD005 P ADD CTWBIN1,CBIN1 P ADD CRECNR,CBIN1 P ADD CRECBCD,=D'1'
0x347a94…347c28 Dummy {f00=0x011b, f01=0x018e, f02=» PERF RAWRIT,DK02,=D'2',CPCKBUF,CRECNR P BNOK WRFDERR . P TBT GTTESTFL,WRFD080 D P ADD CTWBIN1,CBIN1 b P ADD CRECNR,CBIN1 | P ADD CRECBCD,=D'1' P PERF RADEL,DK02,CRECNR P BNOK WRFDERR P* P* LOOK FOR ACCOUN
0x347c28…347dbc Dummy {f00=0x011b, f01=0x0190, f02=» : P* HERE MUST BEE A WAARNING 'DISC NAESTEN FYLDT' PWRFD075 DISK N[STEN FULD F P CLEAR CPFLG h P CLEAR CSPLITFL | P MOVE SPBINW4,CBIN21 " P MOVE GTWBCD2,=D'02' FILE CODE $ P MOVE GTWBCD1,=D'50' ERROR CODE P MOVE GSWS
0x347dbc…347f50 Dummy {f00=0x011b, f01=0x0190, f02=»AR CPFLG " P CMP CBIN0,CBIN0 OK, SET CR=0 P RET 6 P* B PWRFDERR L P* " P* HERE MUST BEE RECOVERRY f P SUB CRECNR,CTWBIN1 P MOVE GSWBCD1,CTWBIN1 P SUB CRECBCD,GSWBCD1 P SET CSKIFTWN P CLEAR CPFLG
0x347f50…3480e4 Dummy {f00=0x011b, f01=0x0190, f02=»********** n P* P* EDATNR 4 P* FINDS DATASETNR FOR THE TRANSACTIONS 0 : P* AND PUT THE INFORMATION IN RELEVANT FIELDS h P* 4 P************************************************ PEDATNR PROC P CLEAR TTR11
0x3480e4…348278 Dummy {f00=0x011b, f01=0x0190, f02=»9 UPDATE D/K MARK x P MOVE GTDUPF(CBIN5),TTDKBCD PEDAT010 > P CBNE GTREGNR,=D'11',EDAT020 N P SET TTR11FLG r PEDAT020 P RET PEDAT100 P CBG GTREGNR,=D'42',EDAT110 P MOVE CEDATNR,=D'3' TR 40-42 P B EDAT020
0x348278…34840c Dummy {f00=0x011b, f01=0x018e, f02=»EGNR,=D'49',EDAT130 P MOVE CEDATNR,=D'4' TR 48-49 P B EDAT020 @ PEDAT130 R P MOVE CEDATNR,=D'2' TR 50-54 b P B EDAT020 P PEND P EJECT P* P* PWCHECK PROC P RET P PEND P EJECT PWRIT
0x34840c…3485a0 Dummy {f00=0x011b, f01=0x018e, f02=» * P* DEPENDING ON TRANSACTION TYPE P* 6 P******************** @ P WAIT KVOUCH P WAIT KTALLY p P TBT GTSPGFLG,JTRET " P MOVE GSWBIN1,$JTLIT & P CBG GSWBIN1,CBIN0,JT10 F P PERF FRMTJT
0x3485a0…348734 (2, 217) Dummy {f00=0x011c, f01=0x0190, f02=» 0 P MOVE GSWBIN1,TTCNTNR 'TAELLER' NR IN BINARY P TBT GTNWFLG,JT50 < ( P EDWRT KJTAPE,GTSTRFMT EDWRT JOURNAL V P* . P DSC0 KJTAPE,TSTAT TEST STATUS OF JOURNAL P BOK JTRET , P PERF SPLIN8,CBIN1,CBIN1 'SKIFT JOURNAL'
0x348734…3488c8 Dummy {f00=0x011c, f01=0x018e, f02=» EJECT PWTALLY PROC P******************* $ P* @ P* WRITE TALLY ROLL J P* l P******************** v P WAIT KVOUCH P WAIT KTALLY H P EDWRT .NW,KTALLY,GTSTRFMT EDWRT WITH THE FORMAT P R
0x3488c8…348a5c Dummy {f00=0x011c, f01=0x0190, f02=» z P* 8 P* DOES A CARRIAGE RETURN ON TTP WITHOUT WAIT P* N P******************** X ( P EDWRT .NW,KJTAPE,CRJTFMT t P RET PCRJTFMT FRMT P FILLR ' ',2 P FILLR X'0D',1 P FMEN
0x348a5c…348bf0 Dummy {f00=0x011c, f01=0x018e, f02=»ETURN ON VOUCHER WITH WAIT t P* " P******************** , P EDWRT KVOUCH,CRVOFMT H P RET f PCRVOFMT FRMT r P FILLR ' ',2 P FILLR X'09',1 P FMEND P PEND P* P* P EJECT PWRITVO PROC
0x348bf0…348d84 Dummy {f00=0x011c, f01=0x0190, f02=» j P* $ P* NOT CYCLE GET LINE NR ( P* POSITION VOUCHER : P* WRITE f * P* AND RELEASE VOUCHER P* P******************** $ P TBT GTCYFLG,CYVOUCH P* NOT
0x348d84…348f18 Dummy {f00=0x011c, f01=0x0190, f02=»NOPT SEE IF DEFAULT LINE P BNOK WOBILAG P CBG GSWBIN1,=W'90',WO90 @ P MOVE GSWBIN1,TTLINNR ` P B WO100 ~ PWO90 MOVE GSWBIN2,=W'100' P SUB GSWBIN2,GSWBIN1 P IB GSWBIN2, C " P WO99,WO98,WO97,WO96,WO95, C
0x348f18…3490ac Dummy {f00=0x011c, f01=0x0190, f02=»VO,CBIN4 P MOVE GSWBIN1,=W'14' P B WO100 , PWO97 < P PERF FRMXVO,CBIN5 H P MOVE GSWBIN1,=W'14' b P B WO100 ~ PWO96 P PERF FRMXVO,CBIN17 P MOVE GSWBIN1,=W'37' P B WO100 PWO95 PWO94 PWO93 P D
0x3490ac…349240 Dummy {f00=0x011c, f01=0x0190, f02=» P PERF LINOPT P BNOK WO92 P CBG GSWBIN1,=W'90',WO92 . P MOVE GSWBIN1,TTLINNR N P CLEAR GTSWFLAG l P PERF FRMXVO,CBIN19 P B WO100 PWO91 * P MOVE GTRETUR,=W'3' INDICATE KONTOKORT P RET P* PWO100
0x349240…3493d4 (2, 218) Dummy {f00=0x011c, f01=0x018e, f02=» D P DSC0 .NW,KVOUCH,RLEAS RELEASE VOUCHER P RET P P* IN CYCLE d PCYVOUCH v P TBT GTCYWRTF,WO5 P PERF CYWRT P BNOK WO5 P RET P* PWO5 " P TBT TTTSTFLG,WO10
0x3493d4…349568 Dummy {f00=0x011c, f01=0x0190, f02=» PWO10 P MOVE GSWBIN1,TTLINNR . P DSC1 KVOUCH,POS,GSWBIN1 POSITION VOUCHER . P EDWRT .NW,KVOUCH,GTSTRFMT ` P***** P* P* WRITING OF TEXTLINE " P* FOR CHECK ON WORKSET P* P***** P* > P*
0x349568…3496fc Dummy {f00=0x011c, f01=0x0190, f02=» NEXT LINE h 8 P CBL TTLINNR,=D'4',NEWPG NEW PAGE? P RET NO P P* ` PNEWPG NEW PAGE j & P TBT TTPSEFLG,WORET T: IF SUBTOTAL P WAIT KVOUCH P MOVE GSWBIN1,TTLINNR P DSC1 KVOUCH,POS,GSWBIN1 P MOVE GSWS
0x3496fc…349890 Dummy {f00=0x011c, f01=0x0190, f02=»WORET P RET P PEND P* 0 P* : P EJECT D PGRASPV PROC Z P******************** p P* P* GRASP VOUCHER P* P******************** P WAIT KVOUCH $ P DSC0 KVOUCH,GRASP GRASP V
0x349890…349a24 Dummy {f00=0x011c, f01=0x0190, f02=»**** P* & P* CHECK LINE NUMBER, IF ANY P* @ P******************** J P TBT GTSWFLAG,LINST f & P TESTIO KEYB SEE IF INPUT FINISHED P BNOK LINOP1 NO, ABORT PLINST P WAIT KEYB ( P CBE SPBINW2,=W'18',LINOP0 SLU
0x349a24…349bb8 Dummy {f00=0x011c, f01=0x0190, f02=»E GSWBCD3,SPINPUT GET LINE NR 0 P CBG GSWBCD3,=D'90',LINOP4 SPECIAL FORMATS? & " P PERF SPCHK5 OK, CHECK LINENR Z . P CBE SPBINW3,=W'3',LINOP2 ERROR IN LINE NR 0 P MOVE TTLINNR,GSWBIN1 GET CONVERTED LINE NO. PLIN90 P CMP CBIN0,CBIN0 SET
0x349bb8…349d4c Dummy {f00=0x011c, f01=0x018e, f02=»LIN ~ P B LINOP4 PLINOP101 P MOVE GSWBCD3,GTDFLIN . P MOVE SPINPUT,GSWBCD3 L P PERF SPCHK5 j . P MOVE TTLINNR,GSWBIN1 SET DEFAULT LINE NO ~ " P CMP CBIN0,CBIN0 SET CR=0, OK P MOVE GSWBIN1,=W'0' P B LINRET PLINO
0x349d4c…349ee0 Dummy {f00=0x011c, f01=0x0190, f02=» PLINOP4 P MOVE GSWBIN1,GSWBCD3 P B LIN90 0 PLINRET @ P PERF CLEAR8 DELETE LINE 8 N P RET p P PEND | P* P EJECT " PWRITID PROC WRITVAR1,WRITVAR2 P******************** P* 4 P* PRINTS HE
0x349ee0…34a074 (2, 219) Dummy {f00=0x011c, f01=0x0190, f02=» j P* P* P* WRITVAR1: P* 1 FEJL 8 P* 2 OPSTART X & P* 3 DISKETTE SKIFT | $ P* 4 KONVERTERING ( P* 5 DATATRANSMISSION P*
0x34a074…34a208 Dummy {f00=0x011c, f01=0x0190, f02=» + 40-59 x 6 P* 2 1-20 + 23-42, IF KONVERTERING : P* 2 1-20 + VOLID, IF NOT KONVERTERING J P* 3 NOTHING P* 4 VOLID P* P* P* P******************** P
0x34a208…34a39c Dummy {f00=0x011c, f01=0x0190, f02=»20,=C'FEJL ' P B WRID50 PWRID31 & P MOVE GSWSTR20,=C'OPSTART ' 4 P B WRID40 X PWRID32 j & P MOVE GSWSTR20,=C'DISKETTE SKIFT ' x P B WRID40 PWRID33 $ P MOVE GSWSTR20,=C'KONVERTERING ' P B WRID40 PWRID35 (
0x34a39c…34a530 Dummy {f00=0x011c, f01=0x0190, f02=» P PERF WRITJT,=W'12' ! P PERF FRMXTA,CBIN6 ! $ P PERF WTALLY ! > P* ! R P* ! PWRID50 ! f P WAIT KTALLY ! t P CBE WRITVAR2,CBIN3,WRID80 ! P CBE WRITVAR2,CBIN4,WRID73 ! P MOVE GSWSTR20,CPCKBUF ! P PERF WRITJT,=W'12' ! P C
0x34a530…34a6c4 Dummy {f00=0x011c, f01=0x0190, f02=»CBIN2,WRID70 ! P MOVE GSWBIN2,CBIN20 " P MOVE GSWBIN1,=W'40' " 0 0 P COPY GSWSTR20,CBIN0,GSWBIN2,CPCKBUF,GSWBIN1 " L P B WRID75 " P* " PWRID70 " P CBNE WRITVAR1,CBIN4,WRID72 " P MOVE GSWBIN2,CBIN20 " P MOVE GSWBIN1,=W'23' " 0 P C
0x34a6c4…34a858 Dummy {f00=0x011c, f01=0x0190, f02=»GSWSTR20,CBLANKS " P MOVE GSWBCD3,CVOLNO # P EDIT GSWSTR20,FRVOLID # 4 PWRID75 # R P PERF WRITJT,=W'12' # ` & P CBL WRITVAR1,=W'4',WRID76 1,2,3,6 # | " P CBL WRITVAR1,=W'6',WRID90 4,5 # PWRID76 # P PERF FRMXTA,CBIN6 # P PERF WTALLY # P
0x34a858…34a9ec Dummy {f00=0x011c, f01=0x0190, f02=»LY # P WAIT KTALLY $ PWRID90 $ P RET $ , P PEND $ 8 P EJECT $ F PCLEAR8 PROC $ T $ P* DELETE FIRST 14 CHARACTERS $ h P* OF LINE 8 $ . P MOVE GSWBIN2,=X'0801' INDICATE LAST LINE $ P DSC1 SCREEN,06,GSWBIN2 $ P MOVE GSWBIN2,
0x34a9ec…34ab80 Dummy {f00=0x011c, f01=0x018e, f02=»*********** $ j P* % P* FORMATS FOR WRITFD % P* % @ < P******************************************************** % J P* % PPCKINIT FRMT % P FBT CSWFLAG,INIT10 % P FILLR ' ',40 % P FILLR ' ',40 % P FILLR X'00',48 % P
0x34ab80…34ad14 (2, 220) Dummy {f00=0x011c, f01=0x0190, f02=» P FMEL '999999',CMASKDAT & P FMEL 'B99999',GSWBCD3 & $ P FMEND & B P* & P PTREC1 FRMT & Z P FMEL '999',GTMSK & l P FILLR C'G',1 & P FMEL '99',CEDATNR & P FMEL '99999',CRECBCD & P FBT CSPLITFL,TREC40 & P FMEL '99',GTREGNR &
0x34ad14…34aea8 Dummy {f00=0x011c, f01=0x0190, f02=»'999999',GTDATO & PTREC10 ' P FCOPY =C'&03' ' & P FMEL '999',GTMSK ' < P FBT TTR11FLG,TREC40 ' V P FCOPY =C'&04' ' r P FMEL '99999',TTLBNR ' PTREC40 ' P FMEND ' P* ' PPFRM1 FRMT ' P FCOPY =C'&' ' P FMEL '99',GSWBCD3 '
0x34aea8…34b03c Dummy {f00=0x011c, f01=0x4036, f02=»GSWBIN5) ' r P FMEND ( P END ( @ ( 2 & P FMEL '999',GTMSK ' < P FBT TTR11FLG,TREC40 ' V P FCOPY =C'&04' ' r P FMEL '99999',TTLBNR ' PTREC40 ' P FMEND ' P* ' PPFRM1 FRMT ' P FCOPY =C'&' ' P FMEL '99',GSWBCD3 '
0x34b03c…34b1d0 Dummy {f00=0x011c, f01=0x2008, f02=» ) 8 P CALL ABORT,KEYB ABORT I/O : P MOVE GTLINNR,=W'6' SET DEFAULT H : P CMP CBIN0,CBIN1 SET CR<> 0 P RET PLINOP2 > P DSC0 KVOUCH,REL
0x34b1d0…34b364 Dummy {f00=0x011c, f01=0x0000, f02=»
[…0x3…]
0x34b820…34b9b4 (2, 221) Opaque[0x194]
0x34b9b4…34bb48 # DirEnt {nam=»RGSUB1«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x23a0, f03=0x0000}
0x34b9b4…34bb48 IdxSect {
0x34b9b4…34bb48 f00 = 0x011d // 0x34b9b4 @0x0
0x34b9b4…34bb48 f01 = 0x000a // 0x34b9b6 @0x2
0x34b9b4…34bb48 gno = [ // 0x34b9b8 @0x4
0x34b9b4…34bb48 [0x00]: C0x011d.0x0.0
0x34b9b4…34bb48 [0x01]: C0x011d.0x1.0
0x34b9b4…34bb48 [0x02]: C0x011d.0x2.0
0x34b9b4…34bb48 [0x03]: C0x011d.0x3.0
0x34b9b4…34bb48 [0x04]: C0x011e.0x0.0
0x34b9b4…34bb48 ]
0x34b9b4…34bb48 }
0x34bb48…34bcdc Dummy {f00=0x011d, f01=0x0190, f02=» P IDENT RGSUB1 03.01.XXX.1 P DDUM KMD08 & P PDIV D P ENTRY SLUT Z P ENTRY FLDTST n P ENTRY UPDAKK P ENTRY SUMWRT P ENTRY UPDA12 P ENTRY FLDIN P EXT PACKST P EXT
0x34bcdc…34be70 Dummy {f00=0x011d, f01=0x0190, f02=» P EXT FRMTVO P EXT KTPLAN P EXT SPERR , P EXT SPLIN8 > P EXT SPINF8 R P INCLUDE EQUATE f P EJECT ~ PSLUT PROC P** SLUT - PACKS THE BUFFER P** WRITES TO DISK P** WRITE JOURNAL P** WRITE VOUCHER
0x34be70…34c004 Dummy {f00=0x011d, f01=0x0190, f02=» MOVE TTDBKRM,=C'K' IF KREDIT P CBE TTDKDEX,CBIN1,SLUT10 & P MOVE TTDBKRM,=C'D' IF DEBET H PSLUT10 l P TBF GTCYFLG,SLUT30 z P TBT TTCY2FLG,SLUT30 * P CBE GTREGDEX,CBIN3,SLUT30 IF TRANS 3 * P CBE GTREGDEX,CBIN4,SLUT30 IF TRANS 4
0x34c004…34c198 Dummy {f00=0x011d, f01=0x018e, f02=»,GTDUPF(CBIN1) P MOVE GTDUPF(CBIN9),TTARKSAV PSLUT30 : 2 P* INSERT 'REGNSKABSAAR IF TRANSTYPES 1,2,5-10 H P CBG GTREGDEX,=W'10',SLUT50 ~ P CBE GTREGDEX,=W'3',SLUT50 P CBE GTREGDEX,=W'4',SLUT50 P* TYPES 1,2,5-10 : P CBE GTREG
0x34c198…34c32c Dummy {f00=0x011d, f01=0x018e, f02=» , P SUB GTDUPF(CBIN6),=D'1' SUB 1 FROM YEAR 2 P MOVE TSWBCD2,GTDUPF(CBIN6) ISOLATE LAST DIGIT 4 P MOVE GTDUPF(CBIN6),TSWBCD2 j , P MOVE GTUSED(CBIN6),CBIN10 SET FIELD NO PSLUT50 P* " P ADD TTLBNR,=D'1' EKSP. LB. NR P PER
0x34c32c…34c4c0 Dummy {f00=0x011d, f01=0x0190, f02=» P PERF WRITJT,=W'0' PSLUT60 " P PERF FRMTVO 0 P PERF WRITVO D P* TEST IF IN LISTE b P TBF TTLSTFLG,SLUT80 | P PERF FRMXTA,CBIN4 P PERF WTALLY PSLUT80 P PERF UPDAKK P SET GTKORTFL P
0x34c4c0…34c654 (2, 222) Dummy {f00=0x011d, f01=0x0190, f02=»SLUT95 P SET TTEORFLG $ P CLEAR SPME READY FOR FUNCTIONS $ P CLEAR GTREGFLG L P CMP CBIN0,CBIN0 OK, SETCR=0 d P RET PSLUTNOK * P SUB TTLBNR,=D'1' CHANGE LB. NR. AFTER P DISK ERROR P MOVE SPBINW4,=W'17' P CMP
0x34c654…34c7e8 Dummy {f00=0x011d, f01=0x0190, f02=» | P* 8 P** SUMWRT - CALCULATE AND WRITE SUM/RESTSUM P* N P******************** X $ P TBF TTSUMFLG,SUMRET ONLY IF SUM t P TBF GTCYFLG,SUMADD P TBT TTCY2FLG,SUMADD 2 P SUB GTSUM,GTDUPF(CBIN4) CALCULATE NEW RESTSUM
0x34c7e8…34c97c Dummy {f00=0x011d, f01=0x0190, f02=»DUPF(CBIN4) PSUMOUT P PERF SPINF8 " PSUMRET 6 : P ADD GTSUMCNT,GTDUPF(CBIN4) ALWAYS ADD TO SUMFUNCTION D P RET P PEND P EJECT PUPDAKK PROC P******************** P* P* UPDAKK 0 P*
0x34c97c…34cb10 Dummy {f00=0x011d, f01=0x0190, f02=»TRNR x " P* IDX2 = DEB/KRE . P* TR12 UPDATES TTACC12(IDX1,IDX2) 2 & P* IDX1 = TAELLER NR d $ P* IDX2 = DEB/KRE P* 4 P* ALL TRANSACTIONS UPDATE TTTOTDK(IDX2) 6 P* AND IF
0x34cb10…34cca4 Dummy {f00=0x011d, f01=0x0190, f02=»F UPDA12 TAELLER 12 P B UPDRET 2 PUPD20 R 2 P CBG GTREGNR,=D'30',UPDRET NO ACCUMULATION FOR ` P CERTAIN TRANSACTIONS " P CBE GTUSED(CBIN6),CBIN0,UPD30 , P ADD TTACC(CBIN8,TTDKDEX),GTDUPF(CBIN4)
0x34cca4…34ce38 Dummy {f00=0x011d, f01=0x0190, f02=»CBIN1 PUPD35 8 P CBE CBACC(GSWBIN1,CBIN1),GTDUPF(CBIN3),UPD350 BKO? : P CBNE CBACC(GSWBIN1,CBIN1),GTDUPF(CBIN1),UPD36 FOUND? X PUPD350 , P ADD CBACC(GSWBIN1,CBIN2),GTDUPF(CBIN4) , P ADD CBACC(GSWBIN1,CBIN3),GTDUPF(CBIN4) PUPD3
0x34ce38…34cfcc Dummy {f00=0x011d, f01=0x0190, f02=») GET INDEX r : P ADD TTACC(GSWBIN1,TTDKDEX),GTDUPF(CBIN4) B P UPDATE ACCUMULATOR R * P IB TTDKDEX,UPDKR,UPDDB SEE IF INVERT PUPDDB @ P CBNL GTDUPF(CBIN4),='0',UPD50 IF NEGATI
0x34cfcc…34d160 Dummy {f00=0x011d, f01=0x0190, f02=»IF POSITIVE KREDIT, p 6 P ADD TTACC(CBIN7,TTDKDEX),GTDUPF(CBIN4) CORRECTION PUPD50 V , P CBG GSWBIN1,CBIN4,UPDRET IF COUNTER 5,6 d D P TBT GTTFLG,UPDRET WHEN CLOSE, NO UPDATE P TBT CWFLAG,UPD55 > P CBE TTCASHAC,GTDU
0x34d160…34d2f4 (2, 223) Dummy {f00=0x011d, f01=0x0190, f02=» GTREGNR,=D'17',UPDRET * P SUB TTCASH,GTDUPF(CBIN4) " P B UPDRET P PUPDRET p P RET ~ P PEND P EJECT PUPDA12 PROC P******************** P* & P* UPDA12 - UPDA
0x34d2f4…34d488 Dummy {f00=0x011d, f01=0x0190, f02=»100' GET INDEX & P ADD GSWBIN1,CTR12(TTASKNR,CBIN1) : P ADD C12ACC(GSWBIN1,TTDKDEX),GTDUPF(CBIN4) @ P ADD TTEJEDB,GTDUPF(CBIN4) ~ 4 P MOVE GSWBCD1,CTR12NR(GSWBIN1) GET TR 12 ACCOUNT 4 P PERF KTPLAN,GSWBCD1,GTKTTYP SEE IF KORT NEEDED
0x34d488…34d61c Dummy {f00=0x011d, f01=0x0190, f02=» FLDTST - TEST IF FIELDS ARE ENTERED CORRECT $ P* FELT AFHAENGIGHEDS TEST 8 P* ` P******************** j $ P PERF PACKST CLEAR UNUSED FIELDS " P IB GTREGDEX, C , P FLDTOK,FLDTOK,FLDT03,FLDT04,FLDTOK, C , P FL
0x34d61c…34d7b0 Dummy {f00=0x011d, f01=0x018e, f02=»OK,FLDTOK,FLDTOK,FLDT50, C t 0 P FLDT50,FLDT52,FLDT53,FLDT54 $ P* X PFLDT03 b 0 P CBE GTUSED(CBIN12),CBIN0,FLDT035 FIELD 16? p . P* YES, RTE/GEB, INSERT TEXT IN TT16TXT * P MOVE GSWBCD3,GTDUPF(CBIN12) GET FIELD P CBN
0x34d7b0…34d944 Dummy {f00=0x011d, f01=0x0190, f02=» P MOVE TT16TXT,=C'RTE' IF = 1 P B FLDT035 ( PFLDT032 : P CBNE GSWBCD3,=D'2',FLDT035 J P MOVE TT16TXT,=C'GEB' IF = 2 n PFLDT035 P TEST CFLT48 P BZ FLDTOK BRANCH IF FALSE P CMP GTUSED(CBIN15),=W'0' P BNE FLDTOK FI
0x34d944…34dad8 Dummy {f00=0x011d, f01=0x0190, f02=» BL FLDTOK BKO = 21-25 PFLDT037 P CMP GTDUPF(CBIN3),=D'46' 0 P BE FLDTOK BKO=46 R P CMP GTDUPF(CBIN3),=D'56' l P BE FLDTOK BKO=56 P B FLDT039 END ODENSE PFLDT038 HVIDOVRE P CMP GTDUPF(CBIN3),=D'46' P BNE F
0x34dad8…34dc6c Dummy {f00=0x011d, f01=0x0190, f02=»1 f P B FLDTOK P* PFLDT04 & 2 P TBT BCPR,FLDT041 CIR 4 P CMP GTUSED(CBIN10),=W'0' j " P BE FLDTOK FIELD 17 (INDEX 10) P B FLDTNOK 2 PFLDT041 CPR D P
0x34dc6c…34de00 Dummy {f00=0x011d, f01=0x0190, f02=»),=W'0' ~ P BNE FLDTOK P B FLDTNOK $ P* D PFLDT08 N P TEST CFLT46 P BZ FLDTOK p P CMP GTUSED(CBIN17),=W'0' P BNE FLDTOK FIELD 46 USED 6 P MOVE GTUSED(CBIN17),=W'46' ELSE SET FIELD 46 USED 0 P MOVE GT
0x34de00…34df94 (2, 224) Dummy {f00=0x011d, f01=0x0190, f02=» . P FLDT105,FLDT105,FLDT102,FLDT108,FLDT108 PFLDT102 6 P B FLDTOK F PFLDT105 X P CMP GTUSED(CBIN2),=W'0' h P BNE FLDTOK P B FLDTNOK PFLDT108 P CMP GTUSED(CBIN2),=W'0' P BNE FLDTOK P MOVE SPBINW4,=W'26'
0x34df94…34e128 Dummy {f00=0x011d, f01=0x0190, f02=»* PFLDT45 B P PERF FLDIN,CBIN3,CBIN4,CBIN5,CBIN0 FIELD 55,56,57 * P CBE GSWBIN1,=W'1',FLDTOK ^ P B FLDTNOK P* PFLDT50 > P PERF FLDIN,CBIN2,CBIN1,CBIN0,CBIN0 FIELD 6,28 P C
0x34e128…34e2bc Dummy {f00=0x011d, f01=0x0190, f02=»IELD 6,28 ` * P CBNE GSWBIN1,=W'1',FLDTNOK @ P PERF FLDIN,CBIN12,CBIN7,CBIN0,CBIN0 FIELD 33,40 @ * P CBE GSWBIN1,=W'2',FLDT525 > P PERF FLDIN,CBIN14,CBIN20,CBIN21,CBIN22 FIELD 42,43,44,45 * P CBNE GSW
0x34e2bc…34e450 Dummy {f00=0x011d, f01=0x0190, f02=»=W'0',FLDTNOK FIELD 43 p PFLDT527 8 P CBE GTUSED(CBIN1),=W'0',FLDTOK FIELD 28 . : P CBNE GTUSED(CBIN15),=W'0',FLDTNOK FIELD 48 j P B FLDTOK P* PFLDT53 : P CBNE GTUSED(CBIN12),=W'0',FL
0x34e450…34e5e4 Dummy {f00=0x011d, f01=0x0190, f02=» PFLDT535 : P CBNE GTUSED(CBIN7),=W'0',FLDT537 FIELD 40 : P CBNE GTUSED(CBIN12),=W'0',FLDTNOK FIELD 47 R PFLDT537 8 P CBE GTUSED(CBIN1),=W'0',FLDTOK FIELD 28 : P CBNE GTUSED(CBIN15),=W'0',FLDTNO
0x34e5e4…34e778 Dummy {f00=0x011d, f01=0x0190, f02=» CBNE GTUSED(CBIN15),=W'0',FLDTNOK FIELD 48 P B FLDTOK < P* PFLDTOK f : P CMP CBIN0,CBIN0 SET CR=0 OK t P RET P* PFLDTNOK B P CMP CBIN0,CBIN1
0x34e778…34e90c Dummy {f00=0x011d, f01=0x0190, f02=»FML2,FML3,FML4 z P******************** P* 2 6 P* FLDIN- TESTS HOW MANY OF THE GIVEN FIELDS < * P* (GIVEN BY INDEX) ARE PRESENT v P* OUTPUT IN GSWBIN1 P* P******************** " P MOVE GSWBIN1,=W'
0x34e90c…34eaa0 Dummy {f00=0x011d, f01=0x018e, f02=» CBE FML2,=W'0',FLD5 , P CBE GTUSED(FML2),=W'0',FLD2 ( " P ADD GSWBIN1,=W'1' X PFLD2 ~ $ P CBE FML3,=W'0',FLD5 , P CBE GTUSED(FML3),=W'0',FLD3 " P ADD GSWBIN1,=W'1' P
0x34eaa0…34ec34 (2, 225) Dummy {f00=0x011e, f01=0x405e, f02=» PFLD5 P RET P PEND $ P* 2 P* < P END F@ Z
0x34ec34…34edc8 Dummy {f00=0x011e, f01=0x2008, f02=» CBE GTUSED(FML3),=W'0',FLD3 " P ADD GSWBIN1,=W'1' 4 PFLD3 Z $ P CBE FML4,=W'0',FLD5 f , P CBE GTUSED(FML4),=W'0',FLD5 " P ADD GSWBIN1,=W'1' PFLD5 P RET P
0x34edc8…34ef5c Dummy {f00=0x011e, f01=0x0000, f02=»
[…0x5…]
0x34f740…34f8d4 (2, 226) Opaque[0x194]
0x34f8d4…34fa68 # DirEnt {nam=»RGSUB2«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x23c8, f03=0x0000}
0x34f8d4…34fa68 IdxSect {
0x34f8d4…34fa68 f00 = 0x011e // 0x34f8d4 @0x0
0x34f8d4…34fa68 f01 = 0x0004 // 0x34f8d6 @0x2
0x34f8d4…34fa68 gno = [ // 0x34f8d8 @0x4
0x34f8d4…34fa68 [0x00]: C0x011e.0x1.0
0x34f8d4…34fa68 [0x01]: C0x011e.0x2.0
0x34f8d4…34fa68 ]
0x34f8d4…34fa68 }
0x34fa68…34fbfc Dummy {f00=0x011e, f01=0x018e, f02=» P IDENT RGSUB2 03.01.XXX.1 P DDUM KMD08 & P PDIV D P ENTRY PACKST Z P ENTRY PACKCL p P EXT EMPTYT P EXT CYTRP P INCLUDE EQUATE P EJECT PPACKST PROC P********************
0x34fbfc…34fd90 Dummy {f00=0x011e, f01=0x018e, f02=» v P* P* ALTERED FIELDS: GSWBIN1 P* GTDUPF 4 P* GTUSED T P******************** t P MOVE GSWBIN1,CBIN1 PPST10 $ P CBE GTUSED(GSWBIN1),CBIN0,PST30 P*SOMETHING ENTERED P CALL EMPTYT
0x34fd90…34ff24 Dummy {f00=0x011e, f01=0x0190, f02=» 6 P MOVE GTDUPF(GSWBIN1),GTREGF(GSWBIN1) TO DUP FIELD P B PST40 > P* NOTHING ENTERED N PPST30 h P MOVE GTDUPF(GSWBIN1),=X'FF' v P TBF GTLOKSPG,PST40 P MOVE GTREGF(GSWBIN1),=X'FF' P* CLEAR IF SPG. FUNCTION PPST40
0x34ff24…3500b8 Dummy {f00=0x011e, f01=0x0190, f02=»******************** p P* P* PACKCL - CLEAR ROUTINE & P* F P* ALTERED FIELDS: P * P* GSWBIN1 - SET TO CBINMAX j . P* GTUSED - ALL ENTRIES SET TO 0 P* 4 P***********************************************
0x3500b8…35024c Dummy {f00=0x011e, f01=0x412e, f02=» 4 P MOVE GTUSED(GSWBIN1),CBIN0 LOOP CBINMAX TIMES P ADD GSWBIN1,CBIN1 @ P CBL GSWBIN1,CBINMAX,PCKCL10 Z $ P MOVE TT07TXT,=C' ' CLEAR TEXTS ~ P MOVE TT16TXT,=C' ' P CLEAR TTSMALL P CLEAR TTEORFLG TRANS ERASED P RET P
0x35024c…3503e0 Dummy {f00=0x011e, f01=0x2008, f02=» IDENT RGSUB2 P DDUM KMD08 $ P PDIV B P ENTRY PACK X P ENTRY PACKCL v P ENTRY PACKF P ENTRY DEPACK P INCLUDE EQUATE P END @
0x3503e0…350574 (2, 227) Dummy {f00=0x011e, f01=0x0000, f02=»
[…0x7…]
0x351080…351214 (2, 228) Opaque[0x194]
0x351214…3513a8 # DirEnt {nam=»DKEBCD«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x23d8, f03=0x0000}
0x351214…3513a8 IdxSect {
0x351214…3513a8 f00 = 0x011e // 0x351214 @0x0
0x351214…3513a8 f01 = 0x0004 // 0x351216 @0x2
0x351214…3513a8 gno = [ // 0x351218 @0x4
0x351214…3513a8 [0x00]: C0x011e.0x3.0
0x351214…3513a8 [0x01]: C0x011f.0x0.0
0x351214…3513a8 ]
0x351214…3513a8 }
0x3513a8…35153c Dummy {f00=0x011e, f01=0x018e, f02=» 0 P IDENT EBCDIC REL9.1DK79-05-23 870105040910 P 8 P* @ 4 P************************************************ J P* $ P* PHILIPS TERMINAL SYSTEM PTS P* $ P* EBCDIC = EBCDIC/ASCII TABLE P* P* P* P*
0x35153c…3516d0 Dummy {f00=0x011e, f01=0x018e, f02=» P* P* . P* CONDITIONAL ASSEMBLY (SEE ALSO DRDC15) P* J 2 PX:A EQU 1 CODE , 0=ASCII , 1=EBCDIC (DRDC15) T PCODE EQU X:A 4 PX:B EQU 1 READ COMMAND HANDLING IF = 1 (DRDC15) PRCOM EQU X:B P* : P* VERSION FOR SCAND
0x3516d0…351864 Dummy {f00=0x011e, f01=0x0190, f02=» P* 7B 5B P* 7C 5C P* 00 7C $ P* 4F 24 4 P* 6A 40 D P EJECT T P* b P* l 2 P* TABLE FOR CONVERSION OF EBCDIC CODE TO ASCII v P* P* PTASCII EQU * P IFT CODE=1 ( P DATA /7F01,/0203,/0009,/0000 00
0x351864…3519f8 Dummy {f00=0x011e, f01=0x0190, f02=» l ( P DATA /0000,/0000,/0000,/171B 20-27 ( P DATA /0000,/0000,/0005,/0000 28-2F 4 ( P DATA /0000,/1600,/0000,/0004 30-37 ` ( P DATA /0000,/0000,/1415,/001A 38-3F ( P DATA /2041,/4243,/4445,/4647 40-47 ( P DATA /4849,/232E,/3C28,/2B24 48-4F
0x3519f8…351b8c Dummy {f00=0x011e, f01=0x0190, f02=» ( P DATA /595A,/402C,/255F,/3E3F 68-6F ( P DATA /1831,/3233,/3435,/3637 70-77 0 ( P DATA /3839,/3A5B,/5C27,/3D22 78-7F ( P DATA /2061,/6263,/6465,/6667 80-87 ( P DATA /6869,/5B2E,/3C28,/2B21 88-8F ( P DATA /266A,/6B6C,/6D6E,/6F70 90-97
0x351b8c…351d20 Dummy {f00=0x011e, f01=0x0190, f02=» DATA /3031,/3233,/3435,/3637 B0-B7 ( P DATA /3839,/3A23,/4027,/3D22 B8-BF , ( P DATA /2041,/4243,/4445,/4647 C0-C7 X ( P DATA /4849,/5B2E,/3C28,/2B21 C8-CF ( P DATA /264A,/4B4C,/4D4E,/4F50 D0-D7 ( P DATA /5152,/5D24,/2A29,/3B5E D8-DF ( P
0x351d20…351eb4 (2, 229) Dummy {f00=0x011f, f01=0x0190, f02=»A /3839,/3A23,/4027,/3DFF F8-FF P XIF ( P EJECT 4 P* B P* L 2 P* TABLE FOR CONVERSION OF ASCII CODE TO EBCDIC V P* P* PTEBCDIC EQU * P IFF CODE+RCOM=0 ( P DATA /0001,/0203,/372D,/0000 00-07 ( P DATA /0005,/1
0x351eb4…352048 Dummy {f00=0x011f, f01=0x0190, f02=»/4F6C,/507D 20-27 ~ ( P DATA /4D5D,/5C4E,/6B60,/4B61 28-2F ( P DATA /F0F1,/F2F3,/F4F5,/F6F7 30-37 F ( P DATA /F8F9,/7A5E,/4C7E,/6E6F 38-3F r ( P DATA /6AC1,/C2C3,/C4C5,/C6C7 40-47 ( P DATA /C8C9,/D1D2,/D3D4,/D5D6 48-4F ( P DATA /D7D8,/D9E2,
0x352048…3521dc Dummy {f00=0x011f, f01=0x40c2, f02=»4,/9596 68-6F z ( P DATA /9798,/99A2,/A3A4,/A5A6 70-77 ( P DATA /A7A8,/A91C,/0000,/00E0 78-7F B 4 P DATA /544F,/5353 SPEC. FLEX CHAR. 'TOSS' 80-84 n P XIF P END @ ( P DATA /C8C9,/D1D2,/D3D4,/D5D6 48-4F ( P DATA /D7D8,/D9E2,
0x3521dc…352370 Dummy {f00=0x011f, f01=0x2008, f02=» 68-6F z ( P DATA /9798,/99A2,/A3A4,/A5A6 70-77 ( P DATA /A7A8,/A91C,/0000,/00E0 78-7F B 4 P DATA /544F,/5353 SPEC. FLEX CHAR. 'TOSS' 80-84 n P XIF P END @ ( P DATA /C8C9,/D1D2,/D3D4,/D5D6 48-4F ( P DATA /D7D8,/D9E2,
0x352370…352504 Dummy {f00=0x011f, f01=0x40f4, f02=»F(E) SET:M2 UNMODIFIED ATTRIBUTE Y P CWK A2,/FF Z ( ( P RF(NE) SET:M1 NOT NULL OR ATTRIBUTE Z < ( P ORK A5,/A0 MODIFIED NULL CHARACTER Z h P RTN A14 Z & PSET:M1 ORR A5,A2 SET MODIFIED BIT Z PSET:M2 RTN A14 Z P END Z @ Z ********************
0x352504…352698 Dummy {f00=0x011f, f01=0x2008, f02=» [ NT DUMMY END @ (
0x352698…35282c Dummy {f00=0x011f, f01=0x0190, f02=»" * A5E- A5 L " ! UJ ! Q L W 5 W6 T 5, B" (@ T X @ R >F >FM (% , ! R " T* L L 5dW L W L L 5xW L 5 A M 5 W W =h C L % Ph L =c M B !?PN P6! TD C B <b $ !@ <B C O C
0x35282c…3529c0 Dummy {f00=0x011f, f01=0x0190, f02=» B M 6l O| 8B M T8 L T: P* M 6 _vW C B % T L 6 5 6T M P* L P L 4 M L P <C M =C M 7 > 4 X ? ? ? ? ? ? ? 7( A8P _ =b%0 X $ L <B<j P L >>$ _ >> L
0x3529c0…352b54 (2, 230) Opaque[0x194]
0x352b54…352ce8 # DirEnt {nam=»RGLIST«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x23e8, f03=0x0000}
0x352b54…352ce8 IdxSect {
0x352b54…352ce8 f00 = 0x011f // 0x352b54 @0x0
0x352b54…352ce8 f01 = 0x0002 // 0x352b56 @0x2
0x352b54…352ce8 gno = [ // 0x352b58 @0x4
0x352b54…352ce8 [0x00]: C0x011f.0x1.0
0x352b54…352ce8 ]
0x352b54…352ce8 }
0x352ce8…352e7c Dummy {f00=0x011f, f01=0x0190, f02=» PSKF 1 PTRA RGSTRT PTRA DKSUBS $ PTRA KMD08 6 PTRA RGMAIN H PTRA RGMND Z PTRA SCREEN l PTRA KMDIO ~ PTRA RGADM PTRA RGSUB1 PTRA RGSUB2 PTRA RGSUB3 PTRA RGFRMT PTRA SUBAPL PTRA DIVFMT
0x352e7c…353010 Dummy {f00=0x011f, f01=0x0190, f02=» PTRA DIV461 PTRA DIV167 PTRA DIV259 ( PTRA DIV805 : PTRA DIV525 L PTRA DIV743 ^ P* p PPRT /S,SL461 z PPRT /S,SL525 PPRT /S,SL167 PPRT /S,SL787 P* PPRT /S,KEY461 PPRT /S,KEY525 PPRT /S,K
0x353010…3531a4 Dummy {f00=0x011f, f01=0x0044, f02=»ASM PRT PSCR PTRA EQULST PSCR . $ASG2 : : PTRA DIV525 L PTRA DIV743 ^ P* p PPRT /S,SL461 z PPRT /S,SL525 PPRT /S,SL167 PPRT /S,SL787 P* PPRT /S,KEY461 PPRT /S,KEY525 PPRT /S,K
0x3531a4…353338 Dummy {f00=0x011f, f01=0x2008, f02=» PSCR PTRA EQULST PSCR . $ASG2 : : PTRA DIV525 L PTRA DIV743 ^ P* p PPRT /S,SL461 z PPRT /S,SL525 PPRT /S,SL167 PPRT /S,SL787 P* PPRT /S,KEY461 PPRT /S,KEY525 PPRT /S,K
0x353338…3534cc Dummy {f00=0x011f, f01=0x0190, f02=» 2 F IDENT T:DYKI P,3.2,78-09-15,870136940320 J F " T:DYKIK T:PM1 T:PM2 T:CLR1 T:CLIT T:CLR2 T:IOER@ T:EKEY T:BELLC : T:DYKIK I:EVA3N , ( @ ' Y o , ( n C o N C C
0x3534cc…353660 Dummy {f00=0x011f, f01=0x0190, f02=» { T B 9 R 9 N ! T T:CASP 0 T:CLRD` B , ( _ o C Q " T T , ( N ! N N ! n , ( Y O _ N "@P B R o , ( C B P 9 V _F9 V N
0x353660…3537f4 (2, 231) Opaque[0x194]
0x3537f4…353988 # DirEnt {nam=»DKLICO«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x23f0, f03=0x0000}
0x3537f4…353988 IdxSect {
0x3537f4…353988 f00 = 0x011f // 0x3537f4 @0x0
0x3537f4…353988 f01 = 0x0002 // 0x3537f6 @0x2
0x3537f4…353988 gno = [ // 0x3537f8 @0x4
0x3537f4…353988 [0x00]: C0x011f.0x2.0
0x3537f4…353988 ]
0x3537f4…353988 }
0x353988…353b1c Dummy {f00=0x011f, f01=0x0190, f02=» P IDENT LICO:T SCAND ALPHABET P* SCANDINAVIAN ALPHABET ( P DB L PLICO:T EQU * Z * P DATA /2041,/4243,/4445,/4647 /00-/07 n * P DATA /4849,/232E,/3C28,/2B24 /08-/0F * P DATA /264A,/4B4C,/4D4E,/4F50 /10-/17 * P DATA /5152,/215
0x353b1c…353cb0 Dummy {f00=0x011f, f01=0x4068, f02=»233,/3435,/3637 /30-37 ( P DATA /3839,/3A5B,/5C27,/3D22 /38-3F P DE J P END X@ d Z * P DATA /2041,/4243,/4445,/4647 /00-/07 n * P DATA /4849,/232E,/3C28,/2B24 /08-/0F * P DATA /264A,/4B4C,/4D4E,/4F50 /10-/17 * P DATA /5152,/215
0x353cb0…353e44 Dummy {f00=0x011f, f01=0x2008, f02=» 2 /38-3F | P END @ $LICO:T EQU * ( * P DATA /2041,/4243,/4445,/4647 /00-/07 < * P DATA /4849,/232E,/3C28,/2B24 /08-/0F j * P DATA /264A,/4B4C,/4D4E,/4F50 /10-/17 * P DATA /5152,/215D,/2A29,/3B5E /18-/1F * P DATA /2D2F,/5354,/5
0x353e44…353fd8 Dummy {f00=0x011f, f01=0x0190, f02=»" !`P V 0 !`P X ! , ( " _ " T V 0 !` V _ , UPDATE " , ( $ " ! "R_J : O B p , ( " ! T ! 1P 5P ?P , ( # 7 W N W , ( #%
0x353fd8…35416c Dummy {f00=0x011f, f01=0x0190, f02=» # P P P P T |_X , ( # T }_b T ~_l T 0_v 0 , ( # T _ B ! : ! H ` , ( # ! :a" _ ! ^, _ , ( $ O _ T ^ 0 " , ( $# R 1 _ " X
0x35416c…354300 Dummy {f00=0x011f, f01=0x018e, f02=» #: N # ! H , ( $ V L 1P Y # ICWRTE P * & $ ( K@ V O b , ( $ # ! H O " P N T , ( $ B + I I I C , ( % ( N
0x354300…354494 (2, 232) Opaque[0x194]
0x354494…354628 # DirEnt {nam=»CONNJ1«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x23f8, f03=0x0000}
0x354494…354628 IdxSect {
0x354494…354628 f00 = 0x011f // 0x354494 @0x0
0x354494…354628 f01 = 0x0002 // 0x354496 @0x2
0x354494…354628 gno = [ // 0x354498 @0x4
0x354494…354628 [0x00]: C0x011f.0x3.0
0x354494…354628 ]
0x354494…354628 }
0x354628…3547bc Dummy {f00=0x011f, f01=0x018e, f02=» T; P01; TID=TC; TCL=TC; * LEV=60; : 01; J PTDC=T01; V PLC=01L; f P01; v PSCL=S04; PT; P03; TID=KA; TCL=KA; LEV=60; 01; TDC=T03; PLC=01L; P03;
0x3547bc…354950 Dummy {f00=0x011f, f01=0x011a, f02=» TDC=T04; PLC=02L; P03; $ PSCL=S02; 0 PSCL=S03; @ PSCL=S04; P T; ` 01; j TID=D0; v TCL=D0; LEV=60; 00; P00; PC; P00; P01; PSCL=S01; U; 001; TB
0x354950…354ae4 Dummy {f00=0x011f, f01=0x2008, f02=» T04; PLC=02L; P03; $ PSCL=S02; 0 PSCL=S03; @ PSCL=S04; P T; ` 01; j TID=D0; v TCL=D0; LEV=60; 00; P00; PC; P00; P01; PSCL=S01; U; 001; TB
0x354ae4…354c78 Dummy {f00=0x011f, f01=0x0190, f02=»
[…0x2…]
0x354fa0…355134 (2, 233) Opaque[0x194]
0x355134…3552c8 # DirEnt {nam=»CONNJ6«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2400, f03=0x0000}
0x355134…3552c8 IdxSect {
0x355134…3552c8 f00 = 0x0120 // 0x355134 @0x0
0x355134…3552c8 f01 = 0x0002 // 0x355136 @0x2
0x355134…3552c8 gno = [ // 0x355138 @0x4
0x355134…3552c8 [0x00]: C0x0120.0x0.0
0x355134…3552c8 ]
0x355134…3552c8 }
0x3552c8…35545c Dummy {f00=0x0120, f01=0x018e, f02=» T; P01; TID=TC; TCL=TC; * LEV=60; : 01; J PTDC=T01; V PLC=01L; f P01; v PSCL=S04; PT; P02; TID=KA; TCL=KA; LEV=60; 01; TDC=T03; PLC=01L; P03;
0x35545c…3555f0 Dummy {f00=0x0120, f01=0x011a, f02=» TDC=T04; PLC=02L; P03; $ PSCL=S02; 0 PSCL=S03; @ PSCL=S04; P T; ` 01; j TID=D0; v TCL=D0; LEV=60; 00; P00; PC; P00; P01; PSCL=S01; U; 001; TB
0x3555f0…355784 Dummy {f00=0x0120, f01=0x2008, f02=» T04; PLC=02L; P03; $ PSCL=S02; 0 PSCL=S03; @ PSCL=S04; P T; ` 01; j TID=D0; v TCL=D0; LEV=60; 00; P00; PC; P00; P01; PSCL=S01; U; 001; TB
0x355784…355918 Dummy {f00=0x0120, f01=0x0190, f02=» B m T m 1P 5P$ ?P$ 7 o W p0 N W p W p W p0 V m R * P 1 _" _ T P^ Pl P| P~ P P T |_X T }_b T ~_l T 0_v T _ B l : m H}2 !
0x355918…355aac Dummy {f00=0x0120, f01=0x0190, f02=» m * P R n 1 _ m& ^ qN n N o m H}2 V L 1P Y o ( K@ V O | o m H}2 O " P4 N T. B + I I I C ( N " T : ^ 0"`T 0" 1 _
0x355aac…355c40 Dummy {f00=0x0120, f01=0x0190, f02=» V 0" ^ " O P W P WB R T. P " V"" TZ P " Q W R X 0" R 2 P 1 _( " T P " Q _< R X 0" Z0 _" l m m@ : : l m m m _ C s* P "
0x355c40…355dd4 (2, 234) Opaque[0x194]
0x355dd4…355f68 # DirEnt {nam=»RGSTRT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1fa0, f03=0x0000}
0x355dd4…355f68 IdxSect {
0x355dd4…355f68 f00 = 0x00fd // 0x355dd4 @0x0
0x355dd4…355f68 f01 = 0x0010 // 0x355dd6 @0x2
0x355dd4…355f68 gno = [ // 0x355dd8 @0x4
0x355dd4…355f68 [0x00]: C0x00fd.0x0.0
0x355dd4…355f68 [0x01]: C0x0101.0x2.0
0x355dd4…355f68 [0x02]: C0x0101.0x3.0
0x355dd4…355f68 [0x03]: C0x0102.0x0.0
0x355dd4…355f68 [0x04]: C0x0102.0x1.0
0x355dd4…355f68 [0x05]: C0x0102.0x2.0
0x355dd4…355f68 [0x06]: C0x0102.0x3.0
0x355dd4…355f68 [0x07]: C0x0103.0x0.0
0x355dd4…355f68 ]
0x355dd4…355f68 }
0x355f68…3560fc Dummy {f00=0x00fd, f01=0x0190, f02=» P IDENT RGSTRT 03.01.XXX.1 DDUM KMD08 & PDIV : ENTRY T1GO H P ENTRY TCONFW P ENTRY TCONFR r P ENTRY CONFRD P ENTRY CONFWR P ENTRY CNFWRT P ENTRY CONRDX P EXT ASGVOL P EXT SPCLRA P
0x3560fc…356290 Dummy {f00=0x00fd, f01=0x0190, f02=» P EXT SOPRD P EXT SETMK P EXT RSTORE ( P EXT CLSVOL < P EXT UPDAKK P P EXT CLEJ d P EXT CLEDB v P EXT CLBEH P EXT ZERO P EXT ADM P EXT RGA120 P EXT RGADM P EXT RADEL P EXT WRITID P
0x356290…356424 Dummy {f00=0x00fd, f01=0x0190, f02=» 2 P MOVE SPKEY,CBIN2 INDICATE KEYSWITCH IN POS 2 P ADD CMAXTASK,CBIN1 > P GETID GSWSTR2 Z P MOVE TTASKNR,CBIN0 p PT1005 P ADD TTASKNR,CBIN1 & P CBE GSWSTR2,CTID(TTASKNR),T1005A P B T1005 PT1005A P USE TB2,TTA
0x356424…3565b8 Dummy {f00=0x00fd, f01=0x0190, f02=»TO NON-MASTER CODE PT1010 P TBF CDCFLAG,T101010 ( P MOVE GSWBIN1,=X'40' D P DSC1 DCOMM,TRPAR,GSWBIN1 ` PT101010 P MOVE CTRANBUF,=X'00' P PERF CLSVOL,CBIN1 P PERF CLSVOL,CBIN2 P PERF CLSVOL,CBIN3 P PERF CLSV
0x3565b8…35674c Dummy {f00=0x00fd, f01=0x0190, f02=»CSFRM01 P PERF SPCLRA P MOVE GSWBIN2,SPBINW2 $ 2 P IB SPBINW2,T1011,T1011,T1012,T1012,T1011, C B P T1012,T1011,T1011,T1012 x PT1011 P B T1010 PT1012 0 P MOVE GTTEXT,=C'FD' INSERT PREFIX IN DSNAME P MOVE GSWBIN1,
0x35674c…3568e0 Dummy {f00=0x00fd, f01=0x0190, f02=»AR CSWFLAG 2 P IB GSWBIN2,T1013,T1013,T1025,T1014,T1013, C P T1013,T1013,T1013,T1018 H PT1013 j P B T1010 x PT1014 KRE KEY P MOVE CCONBUF0,=X'00' P MOVE GSWBIN2,CBIN0 PT10140 P ADD GSWBIN2,CBIN1 $ P IF
0x3568e0…356a74 (2, 235) Dummy {f00=0x0101, f01=0x0190, f02=» B T10140 P* PT1018 ADM KEY * P* ONLY CHANGE VOLUME, DATASET 4 P SET CSWFLAG b P B T1025 v P* PT1020 KVIT KEY P* P* RESTORE DATASETS P* P* P CLEAR CSWFLAG PRST000 $ P
0x356a74…356c08 Dummy {f00=0x0101, f01=0x0190, f02=»ON,=W'8' LAMP 8 PRST010 P PERF SOPRD & P IB GSWBIN2, C : , P RSOP10,RSOP09,RSOP08,RSOP07,RSOP06, C R ( P RSOP05,RSOP04,RSOP03,RSOP02,RSOP01 PRSOP02 PRSOP03 PRSOP05 PRSOP06 PRSOP07 PRSOP09 PRSOP10
0x356c08…356d9c Dummy {f00=0x0101, f01=0x0190, f02=»W'1024' LAMP 1 & P MOVE GSWBIN5,=W'32' NO OF RECORDS 4 P PERF RSTORE,DK01,=D'1',GSWBIN5,CCONBUF0,=W'199' @ P BNOK RST005 NOT OK x P PERF CONFRD P B RST000 OK P* PRSOP04 RESTORE FD999004 $ P PERF LAMPOF,=W'2047' LAMPS OFF
0x356d9c…356f30 Dummy {f00=0x0101, f01=0x0190, f02=»K INIT MASTER INDEX P B RST000 OK P* 0 PRSOP08 FINISH RESTORING : $ P PERF LAMPOF,=W'2047' LAMPS OFF * P PERF ASGVOL,CBIN0 ASSIGN KONF DATASET P BNOK T1010 P B T1028 P* P* P* P* P* P
0x356f30…3570c4 Dummy {f00=0x0101, f01=0x0190, f02=»T1028 ( P MOVE CFNAME(CBIN1),ASFNAME RESTORE P MOVE CVOL(CBIN1),ASVOL : P TBT CSWFLAG,T1030 Z , P CBG CKMDNR,=D'0',T1050 VERY FIRST START t P* P* P* PT1030 P MOVE GSWBIN1,CBIN1 PT1031 & P DLETE CFNAME(
0x3570c4…357258 Dummy {f00=0x0101, f01=0x0190, f02=» P DSC0 KEYB,SKIB P ATTFMT CSFRM02 YES P PERF SPCLRN < " P IB SPBINW2,T1034,T1034,T1032 P PT1034 v P B T1033 PT1032 0 P MOVE GTTEXT,=C'FD' INSERT PREFIX IN DSNAME P MOVE GSWBIN1,CBIN1 PT1035 4 P INSRT C
0x357258…3573ec Dummy {f00=0x0101, f01=0x0190, f02=»7 " P MOVE CBEH(CBIN1,CBIN1),CBIN0 " P MOVE CTR12(CBIN1,CBIN1),CBIN0 0 P MOVE GSWBIN5,CBIN0 V PT1040 r P ADD GSWBIN5,CBIN1 P CBG GSWBIN5,CMAXTASK,T1045 P MOVE GSWBCD5,GSWBIN5 P MOVE GSWBIN1,GSWBIN5 P DSC0 KEYB,SKI
0x3573ec…357580 Dummy {f00=0x0101, f01=0x0190, f02=»NW2,T1042,T1042,T1043 PT1042 P B T1037 , PT1043 < ( P MUL TTSTLBNR,=D'-1' SIMULATE CLOSE J P PERF TCONFW,GSWBIN5 v P BNOK T1037 P B T1040 PT1045 P USE TB2,TTASKNR " P PERF CONFWR REWRITE CONFDATA P BNOK
0x357580…357714 (2, 236) Dummy {f00=0x0101, f01=0x0190, f02=»OVE GSWBIN5,CBIN0 PT1052 P ADD GSWBIN5,CBIN1 ( P CBG GSWBIN5,CMAXTASK,T1060 B $ P CBNL CMASK(GSWBIN5),=D'0',T1055 f 2 P MUL CMASK(GSWBIN5),=D'-1' SET POSITIVE (OPEN) PT1055 P GET TERMINAL BLOCK P USE TB2,GSWBIN5 , P
0x357714…3578a8 Dummy {f00=0x0101, f01=0x0190, f02=»ONF DATA HAS BEEN READ P* PT1060 ( ( P USE TB2,TTASKNR GET OWN USER BLOCK 6 4 P MOVE GTMSK,CMASK(CBIN1) SET MACNINE NO, MASTER b P* P* CHECK VOLUME NO P* PT1062 P PERF CLSVOL,CBIN2 P PERF CLSVOL,CBI
0x3578a8…357a3c Dummy {f00=0x0101, f01=0x0190, f02=»2,T1065,T1065,T1070 P B T1062 OTHER KEYS PT1065 MAK 8 P B T1010 L PT1070 SLUT KEY, OK P* x P* " P* ASSIGN OTHER FILES P* P* P MOVE GTWBCD1,=D'2' P MOVE GTTEXT,=C' ' P PERF ASGVOL
0x357a3c…357bd0 Dummy {f00=0x0101, f01=0x0190, f02=»OL,CBIN4 P BNOK T1010 P* $ P* . , P* CHECK IF DISKETTE IS CORRECT 8 P* h P PERF SETIDX r P* ( P PERF SETMK SET MASTER INDEX, KTPLAN PT1200 P MOVE CRECNR,CBIN1 P MOVE CRECBCD,=D'1' P MOVE GS
0x357bd0…357d64 Dummy {f00=0x0101, f01=0x0190, f02=»,=D'4',T1210 NO DATA , P PERF WRITID,CBIN1,CBIN1 PRINT 1. RECORD P MOVE GSWSTR20,=X'00' L P MOVE GSWBIN1,CBIN0 j P MOVE GSWBIN2,=W'47' 0 P COPY GSWSTR20,GSWBIN1,CBIN5,CPCKBUF,GSWBIN2 4 P MOVE GSWBCD3,GSWSTR20 GET VOLUME NO FROM START
0x357d64…357ef8 Dummy {f00=0x0101, f01=0x018e, f02=» TBT CCONVERT,T1219 CONVERT-VERSION P DSC0 KEYB,SKIB , P SET SPPROMPT D P ATTFMT INIT2FMT Z P PERF SPCLRA r , P IB SPBINW2,T1215,T1215,T1220,T1212, C $ P T1212,T1212,T1212,T1212,T1225 PT1212 OTHER KEYS P B T1210 P
0x357ef8…35808c Dummy {f00=0x0101, f01=0x0190, f02=» P* PT1220 SLUT, OK $ P CBE GTWBCD1,=D'4',T1210 NO DATA * $ P MOVE CVOLNO,GSWBCD3 NEW VOL NO R P B T1240 TO OPSTART z P* PT1225 KVIT " P PERF STRTWR NEW START RECORD P BNOK T1010 P PERF WRITID,CBIN1,CBIN1
0x35808c…358220 Dummy {f00=0x0101, f01=0x0190, f02=»T INIT3FMT P PERF SPCLRA " P IB SPBINW2,T1235,T1235,T1240 & P B T1230 OTHER KEYS L PT1235 MAK h P B T1062 | P* P* P* P* OPSTART P* P* PT1240 P MOVE CRECBCD,=D'0' P MOVE
0x358220…3583b4 (2, 237) Dummy {f00=0x0102, f01=0x0190, f02=»RAREAD,DK02,=D'2',CPCKBUF,GSWBIN1,CRECNR P BNOK T1300 NOT OK 0 P IF FLAG: TO REPRINT J P TBT CERRORFL,T1300 h P CMP GTWBCD1,=D'4' $ P BE T1500 NO DATA, CONTINUE REG. P MOVE GSWSTR20,=C'SLUTD' P MOVE GSWBIN5,CBIN0 6 P MATCH
0x3583b4…358548 Dummy {f00=0x0102, f01=0x018e, f02=»KBUF,CBIN0 r * P MOVE GSWBCD5,GSWSTR20 GET MACHINE NO. P MOVE GSWBIN6,CBIN0 @ PT1245 P ADD GSWBIN6,CBIN1 j & P CBE GSWBCD5,CMASK(GSWBIN6),T1247 P CBL GSWBIN6,CBIN12,T1245 P B T1242 PT1247 4 P CBE GSWBCD5,=D'0',T1250 C
0x358548…3586dc Dummy {f00=0x0102, f01=0x0190, f02=» P B T1242 PT1250 , P PERF RGREAD,DK02,=D'2' READ TRANSACTION " P BERR T1290 R , P MOVE CRECBCD,GSWBCD3 GET LOG. REC. NO. f & P TBT GTSWFLAG,T1251 TEST FOR TR 11 ( P CBNL GTREGNR,=D'12',T1290 IF TR 12 PT1251 0 P CBL CRECBCD,T
0x3586dc…358870 Dummy {f00=0x0102, f01=0x0190, f02=»O, SET POSITIVE (OPEN) z P MOVE TTCASH,TTSTCASH P MOVE TTRECOPN,CRECBCD < P PERF TCONFW,TTASKNR Z P PERF CONFWR v PT1260 P CLEAR GTTESTFL P CBNL CRECBCD,CCONFREC,T1262 & P SET GTTESTFL BEFORE BEH., REWRITE PT1262
0x358870…358a04 Dummy {f00=0x0102, f01=0x0190, f02=»NR,=D'0',T1290 CLOSED? P NO P MOVE TTSTCASH,TTCASH , P MOVE TTSTLBNR,TTLBNR J P ADD TTSTLBNR,=D'1' h P MUL TTSTLBNR,=D'-1' P MOVE TTRECOPN,CRECBCD P PERF TCONFW,TTASKNR P PERF CONFWR P PERF ZERO PT1290
0x358a04…358b98 Dummy {f00=0x0102, f01=0x0190, f02=»BIN4,CBIN2 PRINT 1. PART OF P LAST CORRECT RECORD $ P SET SPPROMPT B P ATTFMT INIT4FMT X P PERF SPCLRA p 2 P IB SPBINW2,T1310,T1310,T1315,T1320,T1310, C P T1310,T1310,T1310,T1330 P B T1300 PT1310 MAK P B T1300
0x358b98…358d2c Dummy {f00=0x0102, f01=0x0190, f02=»320 KRE, TRY NEXT P SET CERRORFL P B T1242 2 P* B PT1330 TO NEW DISK L P CLEAR CERRORFL h P B T1350 PT1350 SLUTD P* P* P* P* DISKETTE SKIFT P* P* P TBT C5MDISK,T
0x358d2c…358ec0 Dummy {f00=0x0102, f01=0x0190, f02=»* RESTART OF P* FOR NON-MASTER P* @ P******************** J P MOVE GTMSK,CMASK(TTASKNR) f PT1440 , P TBT CWFLAG,T1550 IF COLDSTART FINISHED P B T1250 PT1450 & P RSTRT CTID(CBIN1) RESTART MASTER
0x358ec0…359054 (2, 238) Dummy {f00=0x0102, f01=0x0190, f02=»IN6,CBIN1 PT1510 P ADD GSWBIN6,CBIN1 P CBG GSWBIN6,CMAXTASK,T1550 : P RSTRT CTID(GSWBIN6) ^ P B T1510 z PT1550 P CBL TTASKNR,CBIN6,T1555 P SET TREMFLG PT1555 P DSC0 KEYB,SKIB P MOVE TTEJEDB,=D'0'
0x359054…3591e8 Dummy {f00=0x0102, f01=0x0190, f02=» t P PERF CLEJ P PERF CLEDB P PERF CLBEH . P MOVE GSWSTR9,=C' ' B P CLEAR GTSPGFLG ^ P SET GTKASSE v P MOVE GSWBIN1,CBIN14 P PERF ADM,GSWBIN1 P B RGA120 PT1560 . P MUL CMASK(TTASKNR),=D'-1' SET < 0, CLOS
0x3591e8…35937c Dummy {f00=0x0102, f01=0x018e, f02=»OF CONFIGURATION DEPENDENT DATA x P* ( . P* CALL: PERF TCONFR,<CONFIGURATION NBR> 2 P* d ( P* THE DATA IS READ RANDOM FROM DK01 n P* , P* ALTERED FIELDS: GSWBIN6 - <CONF> + 12 $ P* GSWBIN1 - 199 P* $ P*
0x35937c…359510 Dummy {f00=0x0102, f01=0x0190, f02=» P MOVE GSWBIN6,TCONFRNO ! P ADD GSWBIN6,CBIN12 ! " P MOVE GSWBIN1,=W'199' ! > 4 P PERF RAREAD,DK01,=D'1',TCONBUF,GSWBIN1,GSWBIN6 ! P BNOK TCONRET1 ! P CMP CBIN0,CBIN0 ! P RET ! PTCONRET1 ! P CMP CBIN0,CBIN1 SET CR ! P RET !
0x359510…3596a4 Dummy {f00=0x0102, f01=0x0190, f02=»GURATION-DEPENDENT DATA ! v P* " 2 P* CALL: PERF TCONFW,<CONFIGURATION NBR> " * P* " ` 2 P* IF NOT IN TESTMODE, DATA IS WRITTEN TO DK01 " j P* ALTERED FIELDS: " " P* GSWBIN6 - <CONF> + 12 " P* " 8 P******************************
0x3596a4…359838 Dummy {f00=0x0102, f01=0x0190, f02=»TCFWRET IF IN TEST MODE " | , P PERF RAWRIT,DK01,=D'1',TCONBUF,GSWBIN6 # PTCFWRET # P P RET # ` P PEND # l P EJECT # z < P******************************************************** # P* # 0 P* CONFRD - READING OF COMMON CONFDATA # P*
0x359838…3599cc Dummy {f00=0x0102, f01=0x0190, f02=»CONFRET # P PERF CONRDX,CCONBUF1,CBIN2 $ P BNOK CONFRET $ 4 P PERF CONRDX,CCONBUF2,CBIN3 $ J P BNOK CONFRET $ n P PERF CONRDX,CCONBUF3,CBIN4 $ P BNOK CONFRET $ P PERF CONRDX,CCONBUF4,CBIN5 $ P BNOK CONFRET $ P PERF CONRDX,CCO
0x3599cc…359b60 Dummy {f00=0x0102, f01=0x018e, f02=» BNOK CONFRET $ P PERF CONRDX,CCONBUF8,CBIN9 % P BNOK CONFRET % : P PERF CONRDX,CCONBUF9,CBIN10 % P PCONFRET % t P RET % P PEND % P* % PCONRDX PROC CBUFRD,CBUFNO % P* % P MOVE GSWBIN1,=W'199' % 2 P PERF RAREAD,DK01,=D'1
0x359b60…359cf4 (2, 239) Dummy {f00=0x0102, f01=0x0190, f02=» P* & ( P* CONFWR - WRITING OF CONFDATA & P* & : > P********************************************************** & D PCONFWR PROC & P MOVE CCONFREC,CRECBCD & * P PERF RAWRIT,DK01,=D'1',CCONBUF0,CBIN1 & P BNOK WRET & * P PERF RAWRIT,DK0
0x359cf4…359e88 Dummy {f00=0x0102, f01=0x0190, f02=»CCONBUF3,CBIN4 & x P BNOK WRET ' * P PERF RAWRIT,DK01,=D'1',CCONBUF4,CBIN5 ' ( P BNOK WRET ' V * P PERF RAWRIT,DK01,=D'1',CCONBUF5,CBIN6 ' h P BNOK WRET ' * P PERF RAWRIT,DK01,=D'1',CCONBUF6,CBIN7 ' P BNOK WRET ' * P PERF RAWRIT,DK01,=D'1',CCONBUF7
0x359e88…35a01c Dummy {f00=0x0102, f01=0x0190, f02=» ' h PWRET ( P RET ( P PEND ( P EJECT ( . P******************** ( < P* ( X * P* CONFWRT - REWRITE CONFDATA ( b P* ( 2 P* ALTERED FIELDS: GSWBIN5 - SET TO CMAXTASK ( , P* TTRECOPN - 0 ( P* (
0x35a01c…35a1b0 Dummy {f00=0x0102, f01=0x0190, f02=»K,CNF100 ( | P USE TB2,GSWBIN5 ) P MOVE TTRECOPN,=D'0' IF OPEN ) ( P PERF TCONFW,GSWBIN5 ) L P B CNF1 ) h PCNF100 ) x P USE TB2,TTASKNR ) P PERF CONFWR ) P RET ) P PEND ) P EJECT ) * P************************************* ) P
0x35a1b0…35a344 Dummy {f00=0x0102, f01=0x018e, f02=»E PROCEDURE UNPACKS THE TASKDEPENDENT FLAGS ) & P* FROM 'CFLAG' TO VARIOUS BOOLEANS * 4 P* * ^ P* * h . P* BITS COUNTED FROM RIGHT, 0,1,2,...,15 * r P* * P* BIT 0 T=MASTER KASSE * P* F=NON-MASTER * P* BIT 1 T=REMOTE *
0x35a344…35a4d8 Dummy {f00=0x0102, f01=0x018e, f02=» P* BIT 4 T=TTP + P* F=NO TTP + P* BIT 5 T=VDU + : P* F=PDU + T P* BIT 6 T=KBN+KBA (KBAN) + n P* F=KBN + P* + P* + P* + P MOVE GSWBIN1,CFLAG(TTASKNR) + P MOVE GSWBIN2,CBIN1 +
0x35a4d8…35a66c Dummy {f00=0x0102, f01=0x018e, f02=» P PERF SETF,GTVDUFLG , P PERF SETF,GTKBAFLG , P RET , < P PEND , H P , V P , ^ P , f PSETF PROC BOO , n P CLEAR BOO , P CALL MASK,GSWBIN1,GSWBIN2 , P BZ SETF10 , P SET BOO , ( P CBE GSWBIN2,CBIN4,SETF20 X'2000'=LP , * P C
0x35a66c…35a800 Dummy {f00=0x0102, f01=0x018e, f02=» P MOVE GTHCDEV,CBIN1 GTP - PSETF10 - $ , P MUL GSWBIN2,CBIN2 PREPARE FOR NEXT TEST - 2 P RET - b P PEND - n P EJECT - | @ P************************************************************ - P* - P* FORMATS USED - P* - B P**********
0x35a800…35a994 (2, 240) Dummy {f00=0x0102, f01=0x0190, f02=» - | P FMEND . P* . PCSFRM01 FRMT . P FSL . 4 P FTEXT 'START' . @ P FNL . V P FTEXT 'VOLUME=' . b P FKI 9,MINL=6,MAXL=6,ME . z P FCOPY CVOL(CBIN1) . P FNL . P FTEXT 'DATASET=' . P FKI 9,MINL=6,MAXL=6,ME . P FCOPY CFNAME(
0x35a994…35ab28 Dummy {f00=0x0102, f01=0x0190, f02=»'ZZZZ',CKMDNR . P FNL / " P FCOPY ='VOL 2 VOL 3 VOL 4' / " P FNL / H P FKI 1,MINL=6,MAXL=6,ME / T P FCOPY CVOL(CBIN2) / t P FKI 8,MINL=6,MAXL=6 / P FCOPY CVOL(CBIN3) / P FKI 15,MINL=6,MAXL=6 / P FCOPY CVOL(CBIN4) / P FNL / & P
0x35ab28…35acbc Dummy {f00=0x0102, f01=0x0190, f02=» / z P FCOPY CFNAME(CBIN3) 0 P FKI 19,MINL=6,MAXL=6 0 $ P FCOPY CFNAME(CBIN4) 0 B P FNL 0 ^ . P FCOPY ='DSN05 DSN06 DSN07 DSN08' 0 j P FNL 0 P FKI 1,MINL=6,MAXL=6 0 P FCOPY CFNAME(CBIN5) 0 P FKI 10,MINL=6,MAXL=6 0 P FCOPY CFN
0x35acbc…35ae50 Dummy {f00=0x0102, f01=0x0190, f02=»MEND 0 P* 1 PCSFRM03 FRMT 1 P FSL 1 * P FMEL '99',GSWBCD5 1 6 P FNL 1 P P FCOPY ='MASKIN NR' 1 P FKI 22,MINL=3,MAXL=3,ME 1 x P FMEL '999',CMASK(GSWBIN1) 1 P FNL 1 P FCOPY ='BEHOLDNINGST[LLERE' 1 P FKI 23,MAXL=2,ME,APPL=103 1
0x35ae50…35afe4 Dummy {f00=0x0102, f01=0x0190, f02=»NL 1 P FCOPY =' EKS.LBNR' 2 P FKI 20,MAXL=5,ME 2 & P FMEL 'ZZZZ9',TTSTLBNR 2 @ P FMEND 2 ^ P* 2 l PINIT1FMT FRMT 2 v P FSL 2 P FCOPY ='VOLUME NR ' 2 P FMEL '99999',CVOLNO 2 P FNL 2 P FCOPY =C'DAGS-DATO' 2 . P FKI 11,MINL=6,M
0x35afe4…35b178 Dummy {f00=0x0102, f01=0x018e, f02=»L=102 2 t P FMEL 'ZZZ',CRELDAY 3 P FMEND 3 * P* 3 8 PINIT2FMT FRMT 3 B P FSL 3 X P FCOPY ='VOLUME NR ' 3 d P FTEXT 'OK' 3 P FILLR '?',1 3 P FILLR X'07',1 3 P FLINK FMTFKI 3 P FMEND 3 P* 3 PINIT3FMT FRMT 3 P FSL 3
0x35b178…35b30c Dummy {f00=0x0102, f01=0x4096, f02=» 3 P FSL 4 P FCOPY ='KORREKT' 4 P FILLR '?',1 4 . P FILLR X'07',1 4 B P FLINK FMTFKI 4 X P FMEND 4 n P* 4 | END 4 @ 4 ILLR '?',1 3 P FILLR X'07',1 3 P FLINK FMTFKI 3 P FMEND 3 P* 3 PINIT3FMT FRMT 3 P FSL 3
0x35b30c…35b4a0 Dummy {f00=0x0102, f01=0x2008, f02=» 5 NT RGSTRT DDUM KMD08 PDIV . ENTRY T1GO < INCLUDE EQUATE P EJECT h T1GO v END @
0x35b4a0…35b634 (2, 241) Dummy {f00=0x0103, f01=0x0190, f02=»GAL FORMAT CODE NO FIX BUFFER ALLOCATED FIX BUFFER NOT ALLOWED ILLEGAL CONTROL CODE ILLEGAL INDEX VALUE FORMAT CONDITIONS CHANGED ILLEGAL PARAMETER LENGTH ERROR DATASET BUSY ILLEGAL DATASET REFERENCE TOO MANY KIA/NKIA STACK LEVELS DISC ERROR; NO R
0x35b634…35b7c8 Dummy {f00=0x0103, f01=0x0190, f02=» @ P ( B _" @ >P @ @Pj Pf 4 V $ $T$ D BR V T D P T D @PL E @W . @ P$ t $ $P BT , D E @ : @ P A H A >W TW V A D B V A F TB( ( A B @ F V P ( R W TB( :
0x35b7c8…35b95c Dummy {f00=0x0103, f01=0x0190, f02=» LEGAL DATASET REFERENCE TOO MANY KIA/NKIA STACK LEVELS DISC E
0x35b95c…35baf0 Dummy {f00=0x0103, f01=0x0190, f02=» @ P ( B _" @ P @ Pj Pf V $ $T$ D R V T D P T D PL R L R B( ( B( D "! A
0x35baf0…35bc84 Dummy {f00=0x0103, f01=0x0190, f02=» ~ W N , 9a r @ xP h D . @ HP ~ @ J . A H A z A | "V # ( A zP UW T A zP T V @ @ = W Q n M 2 / S p I J T Y G : L l P H R V K _ 4 ._ NO!
0x35bc84…35be18 Dummy {f00=0x0103, f01=0x0190, f02=» , + 0 - 0 ; H : n ( . v X " , A P L A L L @ A H A N_T X ,T X ) A D A F V $ ; H : n @ NP A R1+X A R_ @ @ A 8 @ B A : @ D A < @ F A >_ A L @ HV " @ NT " @ P @ RP A B A @ " @ B N
0x35be18…35bfac Dummy {f00=0x0103, f01=0x0190, f02=» 0W W 0 A L ~W ~ A L A L @ L N W @ A H @ A L_x A | PZ @ B& 0 N P P . P @R h 6_ ~ r _T ~ 4 N T P .W T @R hW ~
0x35bfac…35c140 Dummy {f00=0x0103, f01=0x0190, f02=» P W @ JT @ HZ L A L @ @ L A ~ N ~ ~ ~ . A , @ HR V ;a Q _ 1 @ L A _ 0 N A T P 3P C @ @P @ B 1 @ |P @ H Q @ @ L Q P " T @ ~ A B @ A L @
0x35c140…35c2d4 (2, 242) Opaque[0x194]
0x35c2d4…35c468 # DirEnt {nam=»RGLOAD«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0120, f03=0x0000}
0x35c2d4…35c468 IdxSect {
0x35c2d4…35c468 f00 = 0x0009 // 0x35c2d4 @0x0
0x35c2d4…35c468 f01 = 0x0032 // 0x35c2d6 @0x2
0x35c2d4…35c468 gno = [ // 0x35c2d8 @0x4
0x35c2d4…35c468 [0x00]: C0x0009.0x0.0
0x35c2d4…35c468 [0x01]: C0x0009.0x1.0
0x35c2d4…35c468 [0x02]: C0x000a.0x2.0
0x35c2d4…35c468 [0x03]: C0x000a.0x3.0
0x35c2d4…35c468 [0x04]: C0x000b.0x0.0
0x35c2d4…35c468 [0x05]: C0x000b.0x1.0
0x35c2d4…35c468 [0x06]: C0x000b.0x2.0
0x35c2d4…35c468 [0x07]: C0x000b.0x3.0
0x35c2d4…35c468 [0x08]: C0x000c.0x0.0
0x35c2d4…35c468 [0x09]: C0x000c.0x1.0
0x35c2d4…35c468 [0x0a]: C0x000c.0x2.0
0x35c2d4…35c468 [0x0b]: C0x000c.0x3.0
0x35c2d4…35c468 [0x0c]: C0x000d.0x0.0
0x35c2d4…35c468 [0x0d]: C0x000d.0x1.0
0x35c2d4…35c468 [0x0e]: C0x000d.0x2.0
0x35c2d4…35c468 [0x0f]: C0x000d.0x3.0
0x35c2d4…35c468 [0x10]: C0x000e.0x0.0
0x35c2d4…35c468 [0x11]: C0x000e.0x1.0
0x35c2d4…35c468 [0x12]: C0x00b4.0x0.0
0x35c2d4…35c468 [0x13]: C0x00b4.0x1.0
0x35c2d4…35c468 [0x14]: C0x010b.0x1.0
0x35c2d4…35c468 [0x15]: C0x0136.0x2.0
0x35c2d4…35c468 [0x16]: C0x0159.0x1.0
0x35c2d4…35c468 [0x17]: C0x015d.0x1.0
0x35c2d4…35c468 [0x18]: C0x015d.0x2.0
0x35c2d4…35c468 ]
0x35c2d4…35c468 }
0x35c468…35c5fc Dummy {f00=0x0009, f01=0x0190, f02=»w * CR Y D r BD | D ^D PD D D ^D (D f z 3
0x35c5fc…35c790 Dummy {f00=0x0009, f01=0x0190, f02=» P 8 2 0 F 1 d TC , v 6 B #4 *
0x35c790…35c924 Dummy {f00=0x0009, f01=0x0190, f02=» P a b KA J KA @ * * +l * 0 a GA J GA @
0x35c924…35cab8 Dummy {f00=0x0009, f01=0x0190, f02=» J LA @ * * +l +. ` D0 J D0 * +l +< V f f ( TB2
0x35cab8…35cc4c Dummy {f00=0x0009, f01=0x0190, f02=»
[…0x3…]
0x35d108…35d29c Dummy {f00=0x0009, f01=0x0190, f02=» B
0x35d29c…35d430 Dummy {f00=0x0009, f01=0x0190, f02=» * $ & F H 6) B % 0
0x35d430…35d5c4 Dummy {f00=0x0009, f01=0x0190, f02=» Q h d d d d d d d d d d J Z 8 6
0x35d5c4…35d758 Dummy {f00=0x0009, f01=0x0190, f02=»
[…0x2…]
0x35da80…35dc14 (2, 244) Dummy {f00=0x000a, f01=0x0190, f02=»
[…0x2…]
0x35df3c…35e0d0 Dummy {f00=0x000a, f01=0x0190, f02=» TCTDTETFTGTHTITJTKTLTMTN* F _ & { B P
0x35e0d0…35e264 Dummy {f00=0x000a, f01=0x0190, f02=» 0000899 0 @ A B E F G H I P Q R S T F 0 0 0
0x35e264…35e3f8 Dummy {f00=0x000a, f01=0x0190, f02=»
[…0x4…]
0x35ea48…35ebdc Dummy {f00=0x000a, f01=0x0190, f02=» E ]0 1 _
0x35ebdc…35ed70 Dummy {f00=0x000a, f01=0x0190, f02=» 0 0 #0 &0 * + , R * B 0 0 0 0 0 0 #0 *0 10 8 ?
0x35ed70…35ef04 Dummy {f00=0x000a, f01=0x0190, f02=» r B 0 0 0 0 0 0 0 # # + N O Q Z 0 0 0
0x35ef04…35f098 Dummy {f00=0x000a, f01=0x0190, f02=» V 0 0 0 0 0 0 0 0 # % C c w 0 0 0 .
0x35f098…35f22c Dummy {f00=0x000a, f01=0x0190, f02=» B 0 0 0 0 .
0x35f22c…35f3c0 Dummy {f00=0x000a, f01=0x0190, f02=»0 $0 *0 1 4 0 w * ? > @ Y A Y a Y QYY q Y "" w 0 ? A 0 A* ! A9 0 0 _ A 0 A) A70 A8 A 0 0 ! A9 0 0 4 0 0 4 4 _ 0 q 4 0 q 4 0 q 4 0 q 4 0 q 4
0x35f3c0…35f554 (2, 246) Dummy {f00=0x000b, f01=0x0190, f02=» A 1 q 2 _I At A~ A~ ) At Au Au A A _ A 1 q> 2 _ @ @ @ @ @ @ @ @ @ @ A0 A0 A0 At0 0 Av A At Au "
0x35f554…35f6e8 Dummy {f00=0x000b, f01=0x0190, f02=» AU At A- Ah AtA 6H ! AtP ! At+ A- A~ Ar At PH AU Au A~ A~@ @ A1 A 4 4 ?
0x35f6e8…35f87c Dummy {f00=0x000b, f01=0x0190, f02=» " J AtD# At 0 A _^0 4 Ag A At At AtI A Au " I 0 A+ A, A Av
0x35f87c…35fa10 Dummy {f00=0x000b, f01=0x0190, f02=» _#I M % At W A~% At W A~ A~ 0 4 A 8 1 q A 6 " "_?K C Ae W K S Am W A] W At
0x35fa10…35fba4 Dummy {f00=0x000b, f01=0x0190, f02=»6 W At At Au Atn0 A _ 0 0 4 I V AUH A] H )2 # !"#$%&'()*+,-W.2 .. ...... ... W 8 A 2 !"#?/A I # A A 1 q 6 _!H @ _ @ @ ?/A I I I A A 1 q 6
0x35fba4…35fd38 Dummy {f00=0x000b, f01=0x0190, f02=» @ ?/?0 ?/A @ C <1 <1 <1A 1 q@ 2 112_0I Au Au Av N Au A(I A A A A 2 3445674444_ _>K A'0 S Q0 A' A& d A& A( A A$ ! Av P " W A
0x35fd38…35fecc Dummy {f00=0x000b, f01=0x0190, f02=» h T/ A/b b # Au X A( A ?8 # Au ?9 A 1 qG 6 _ _ @ _ A _ @ W Av _V <9 $A <9W <9 $A <9W A(A @ ?/?: %?/?/ & A 6 _ @ ?/H I
0x35fecc…360060 Dummy {f00=0x000b, f01=0x0190, f02=»O ?; ?; ?; A 1 q ?; (?; ?; A~ A 1 q A~?;I 2C 8N@ A 1 q 6 _ A I W * I , ) Av W , ) Ay - A 30 T R P _S! AtoW ! At5 A. _
0x360060…3601f4 (2, 247) Dummy {f00=0x000b, f01=0x0190, f02=»P@ A 1 q 6 _ A @ I W * I , ) Av W , ) Ay - A 3$ R P _S A4 A3A A5( @ A0I A + Az A4 0 ,0 - Av " Au_ H @ A0 A00
0x3601f4…360388 Dummy {f00=0x000b, f01=0x0190, f02=» 2 0 0 0 0 0 ?/I A 3W @ ?/A A A A 1 q 2 R_ @ @ ?/ 4?/ 5?/I O A At A 1 q At86 _A A ?/I A 1 q^ At 6 _!?/ At At 6 71 qYA W @ 2
0x360388…36051c Dummy {f00=0x000b, f01=0x0190, f02=»"! A 1 qi@ 1 qo A +W A _ @ W I *I &I A A6A W A @ A0 8 W H /I + A~A 1 q[ 6 _ A~ Wo 9Wk Wg :Wc 3W_ ;W[ <WW0 + $ 0 0 _ 0 W = W = W = W W = W >W 4 ?
0x36051c…3606b0 Dummy {f00=0x000b, f01=0x0190, f02=» H Au Av A( Au A& A( AtH B ( CH Au A @ @ @ 4 0 4 0 4 0 a 4 " Av T D T 4 4 A ! A$ @ a qWa qb a q7 A b
0x3606b0…360844 Dummy {f00=0x000b, f01=0x0190, f02=»A E Au A%T Au Au F _] F _aJ QW A( A&A TU A$ ! Av T+! Ax) AJ h P Ay XC A @ 0 W _ A( A$ E Ax A$ _ A( T T Au BP Au A W 4 4 .r8m&pXp4Y lVr
0x360844…3609d8 Dummy {f00=0x000b, f01=0x0190, f02=» M " 0 " E 4 i m q u y } ! # 5 & @ u y }
0x3609d8…360b6c Dummy {f00=0x000b, f01=0x0190, f02=» 0 ] ~ v ^ K ' { q j u e d A 3 M T M F / { D $ % (
0x360b6c…360d00 Dummy {f00=0x000b, f01=0x0190, f02=»LAR SALD0SALDOSLUTDZ300 KVITDAG NREJ EDBKREDITLBNR T[LLERKONTONRKORREKT DIVERSETOTAL EKS.LBNRBEREGNINGDAGS-DATOKONTOKORTMASKIN NRPOST-DATOSTART SUMSUBTOTAL CPR/CIR/NRREGKONTONR SLUT TEST FRA/TIL-NRBEV.PERIODECHECKCIFFERKASSE]BNINGSLET SALDO START TESTEDB-
0x360d00…360e94 (2, 248) Dummy {f00=0x000b, f01=0x0190, f02=» BEHOLDNINGST[LLEREUDSKRIFT AF TEKSTFILVERSUR KONTONR REMIT VERSURKONTONR KASSEKONTONR PRIMO KASSE %9BX999BBZXXZZ99999BB**B9BBBXBBZBXBBXXBZZZZ9ZZZ9999999BB**BB99.B999B99BBBZBBBZZBXX.BZZZ****9***9999999B999BBBBZZBZZZZXXXXX999999B99999BBB**BB
0x360e94…361028 Dummy {f00=0x000b, f01=0x0190, f02=»9.9999.99.999.9BZZZZZZZZBBBZZZZZZZZZZ******E-****99999999E-99XXXXXXE-XXXXXXXXXXXXE-XXZZZZ9999.99BZZZZZZZZE-ZZZZZZZZZZZE-9BBZZ.ZZ.ZZBBBE-9999999999BXXX.XXXXX.XXBXXXVXXVXXX.XX999E-99999E-99TTTTTTTTTTTTX-XE-XXE-XXE-XXB999V99V999E-99BB999.99.999.99BTTTTTTTVTTX,XX-TTTV
0x361028…3611bc Dummy {f00=0x000b, f01=0x0190, f02=».***.**9.99-Z.ZZZ.ZZZ.ZZ9.99-*.***.***.**9.99+BB*.***.***.**9.99-B*.***.***.**9E,99TTTVTTTVTTTVTT9V99-ZZZVZZZVZZZVZZ9V99-BTTTVTTTVTTTVTT9V99-BBZZZ.ZZZ.ZZZ.ZZ9.99-
0x3611bc…361350 Dummy {f00=0x000b, f01=0x0190, f02=»q qt qd q} q~ ql q qc qx qm qP q q qr qM Ao A qa qh qR + q; 2 Q; QL QM q qp q= q; q A? q qp q qp * A< B AJQ qN AL +QQ Q$ Q% + qe qOQS q* qq q9 qe 0 qO q` qv qD q` qf qD Ai qC Ao qC Ak qC
0x361350…3614e4 Dummy {f00=0x000b, f01=0x0190, f02=» Q 1 Ai q= 0 0 q8 Q Q qNQS qQ q: q| q Q qN qN AY QS AG AB Q AG qF Q QG QP +Q4 QP AA Al AU QK qC Al [ QI qqQS qp APQ - Q
0x3614e4…361678 Dummy {f00=0x000b, f01=0x0190, f02=» N E S [ AKQ 2 Q 1 qg Q8 * * qU + AC q+ QO Q- Q Q Q Q@ Q* Q + Q- Q qN Q q*Q QS ABQ Q> Ac =Q Q> Q 2Q QX QX QX * Ai AQ AE AO
0x361678…36180c Dummy {f00=0x000b, f01=0x0190, f02=» QP Q Q Q QE Q: QA qQ q* q9 Q qq q+ +Q2 qN QT * Q, +Q Q3 Q A2 qN AUQN 2Q QB QX QX Q Q Q@ Q* Ac AW AW SGRUNDLAG i Q> qg Q
0x36180c…3619a0 Dummy {f00=0x000b, f01=0x0190, f02=» AR q2 Q9 QW Q Q/ Q Q q+Q: Q + Q- Q qN Q Q Q7 * qU qg q] Q* Q Q Q qZ Ah AR AI Q9 QV AN QV QV qC qgQ& Q6 Q? Q< q) qU Q+ Q0
0x3619a0…361b34 (2, 249) Dummy {f00=0x000b, f01=0x0190, f02=» 2 * 4 AQ AR Ab AI qF * AD AV FRA Q# TIL Q# qH Ai Ap Am A= Ae A> A] A@ AD qC AB Ah AR AH Q9 QU qC AB Ad AX Q2 AM f Q A[ k Q2 qQ qq q9
0x361b34…361cc8 Dummy {f00=0x000b, f01=0x0190, f02=» PRIMOQX 2 BEV QX QX QX 2 ULTIMOQX + Q Q4 Q' Q) - qN 2 * * 4 AR AQ NETTO AE AO 4 TOTALQX QX QX 4 SUPL QX QX QX 2 KOR QX QX Q Aj Q( Q( Q( Q( Q(
0x361cc8…361e5c Dummy {f00=0x000b, f01=0x0190, f02=» QU qC qF * AV Q# A_ l Q; A^ m Q: q2 n QH AT o Q QD qH * VERSNR AX A[ AZ AV Q5 Q2 Q2 Q Q As QF QF QJ *q q q1q q qEq6q(q4qBq q q q qBq q q q q q q q8q8q
0x361e5c…361ff0 Dummy {f00=0x000b, f01=0x0190, f02=»q q q q q q q q q q q q q q q q q q " $ & ( * , . 0 2 4 6 8 : < > @ B D F H J L N P R T V X Z ^ _ ` a b c d e f h
0x361ff0…362184 Dummy {f00=0x000b, f01=0x0190, f02=» ) 2 ; D N X c n y - A * V0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 " % (
0x362184…362318 Dummy {f00=0x000b, f01=0x0190, f02=» ! - 9 E Q ] i u - = M ^ o % ? ' | # & )
0x362318…3624ac Dummy {f00=0x000b, f01=0x0190, f02=» ( 1 : C M W b m x % 5 F W h y 1 G ] t * F
0x3624ac…362640 Dummy {f00=0x000b, f01=0x0190, f02=» C L A U W [ 9 a @ Q@ S@ U@ c@ y@ @ @$ @0 S AvU D WTG"WpG z #0 zJ & + P _ xH z #0 0T & ! T P & ! X T C xH _. _x c Y ( x P Y * x y Wz X " [ X X . 8
0x362640…3627d4 (2, 250) Dummy {f00=0x000c, f01=0x0190, f02=» X C & C C ( l B Ph9 R^9 ^0 X !@PP X X * b ) Y * Y , X , c x X *YvP y X " x Y X " T Y _ ^ _ B U C Q C D[ [ [ [ B^>^L r X X * $" ~_> @ Y X * Z _R X !@XX y X # x V y X
0x3627d4…362968 Dummy {f00=0x000c, f01=0x0190, f02=» 1 1 X !@T X $ " P y _ x T ^ ^ X H X X * , )$ P _ : _. ' Y zN _x y x C y X C C X ( l x Tf B ^p9 R 9 ^0 X ! T ^ _` y C Q " T c c X ! _
0x362968…362afc Dummy {f00=0x000c, f01=0x0190, f02=» X !? x P Q( B y " y $ c lx C _$ _ ^ y _6 ] x X@ X c X # c C _. B ]d P C Q8X8_H x XD @ Y c C y XR X x c _ ] x X X # c _ B ^ C c : + c X c c ( l
0x362afc…362c90 Dummy {f00=0x000c, f01=0x0190, f02=» zN z _ z _ " z _ $ : ! P # P : l 2! Y " l z m z !0 l X "T X lx c l l z !0 X l `6 lv l ' z ! Y 0T V m :
0x362c90…362e24 Dummy {f00=0x000c, f01=0x0190, f02=» X ! lv lx l X " 9b! X :c 2" Ha4 l @ W W W W W W W l Y ( Y 09H Y * Y 4 Y 2 Y 69h Q X :h Y 0 d W U X Q e W Y 0 d e t s l 9H Y * c`W W cP s X 0T X 2Z X
0x362e24…362fb8 Dummy {f00=0x000c, f01=0x0190, f02=» Y Q P W W Y ( d C l X *! P V L ! l xH X 0 Y 8 b P l Y 0 X 0 X 2] X 8 Y 0 b : X 0 :H* l : X 2T Y 2 : C 1 B ] s : cP X +! X +! U 9K Y ( Y + d e l 9H Y * 2 Y ( Y + z c
0x362fb8…36314c Dummy {f00=0x000c, f01=0x0190, f02=»c c P c B _R ( l X D D : K + Q 2 P. P8 z@ P ( m B X # V : z _0 | _> z f4g<g< f& W W X 0Q e e Y ( Y *P s dv X <' X X l
0x36314c…3632e0 Dummy {f00=0x000c, f01=0x0190, f02=»" X _@ " P" s X *# P B 1 s W " P X X( C : X *! P P T P s l C W @ X (T W X y 6 Y ( : X (;n lx P f f4g g f& l Y . Y ,W l Y . X ( X ." PV X 0RzT$ Y *P U
0x3632e0…363474 (2, 251) Dummy {f00=0x000c, f01=0x0190, f02=» Y . jz Y ( l Y *T " T ! 1 W ! ) : l Y *T g( : k : l V Y " X .9H $ P & X ( " Q Y +Q R " P W " U i Y , " Q " X . X 0R P" X *:h P PD ) Y (W X *:h Pt
0x363474…363608 Dummy {f00=0x000c, f01=0x0190, f02=»jzW j Y ( : X *:h X (! # P X & V L TbW X , X 0P@ i T, X *:h XF XL X (!@T @ Y ( X , Y t X 0 l j _r X ( P Y (_ P. i P Y 8 g( l X 8 X $ l Wh_ " P X ( T X & V H "@TF i P6 V Y X (
0x363608…36379c Dummy {f00=0x000c, f01=0x0190, f02=» : " P X & V ( P i : : i "0P $ T W %T : : Y ( X $ Y X " Y X & Y X < Y @ : Y : l X : X ( T X & V H " V Y : X $ l X : l : X Y " X Y $ X Y & X @W X < Y = " l ! T W
0x36379c…363930 Dummy {f00=0x000c, f01=0x0190, f02=» Y ( : X , Y X $ Y X &T Y Y Y WD V $:H D Y D :H Y ! P V Y z W Y ! P z<W V Y k V Y : z : 2' " P T | W z@ P : k : l s l C l X l : "0P ' Q W
0x363930…363ac4 Dummy {f00=0x000c, f01=0x0190, f02=» C s :( R : V E V D ' $ W l P xH X =' V W V Y =P l : oR oj q t / m W t / m s "!@P s t / m s "!@P s ' / z #0TR C s z #0T< C z #0
0x363ac4…363c58 Dummy {f00=0x000c, f01=0x0190, f02=» Am t " Am 2 z #0 T n z #0T~ m n 2 Uh Qd Am z #0TX n m ( l P V I @n % Am xH & # T : Y _ Am t o4 z #0 TX &RX &P C u^/ "!@P s t o4 u^/ "!@P
0x363c58…363dec Dummy {f00=0x000c, f01=0x0190, f02=» ( l xH z #0 T z #0 T V xH 2 ;BP P8 J T * pJ ( w l W< ? _6 pJ ( l W z & F : ( l xH 2 & q >A >A 2 $ z & V D 9a 9
0x363dec…363f80 Dummy {f00=0x000c, f01=0x0190, f02=» 9 8 ? X Q , V ( - 4T V 5 ( W, V P& W$ U V X 9T I Y xR z #0T R W T V G 9h ' xH W W t s t u: t t P z / W t
0x363f80…364114 (2, 252) Dummy {f00=0x000c, f01=0x0190, f02=»P _B t B z 'W t ( l Wp z t t W t ^ ( 1W& C C C " ( l ' Pb t` I "%@P "% P& B C C 4 "5 # B P B P B 5 P C P B % P C + vz xH
0x364114…3642a8 Dummy {f00=0x000c, f01=0x0190, f02=» I : t t % Y zN C z & C z "!@ : B T T T V : 2 ' W 2 6 2 @* " T # ' ?D | W.' #? |~ V H ;D:B " : _, z C : : t t z4
0x3642a8…36443c Dummy {f00=0x000c, f01=0x0190, f02=» C V W V Q 0W Q W Q W v6 vn 4 ! P T 0P0W, 8 C S W C C 0 P C ;a > 4 ZP T : 49d_b B@5 @ 8 @N ' @ d P ( z= #0 T B 'W
0x36443c…3645d0 Dummy {f00=0x000c, f01=0x0190, f02=»_V ' P _d P & 1 P 1_ , @ - R T U :B@ ' d wb x x x x y xdy }"}(~ > >x^y y ypypy xHypyp J X x^z z z z x^x^x^x^ W V 7 P l P W w V X _ @w R v
0x3645d0…364764 Dummy {f00=0x000c, f01=0x0190, f02=»P V W< _ 2 # ;B y V T ? W V P L , V 2P " 2 P V D ! R T V P V l W V P _ 8^t Dw 2 ! 9BP V T @ W V P D $ V 6 V % V E @* ' T 2 % 7_ 2 # PH L> PB z 2"
0x364764…3648f8 Dummy {f00=0x000c, f01=0x0190, f02=» w4 x: | V & x~ Hw 'W 'W '_6* * * * :l:d:h z W W P W 6 2# | W4 @* Ez," T> ; [ # |~:H 2 T Z L Lz D V, W # |~ Lz E V $ W D V Lz$ , Wn 6 2 | W "
0x3648f8…364a8c Dummy {f00=0x000c, f01=0x0190, f02=» (V ; [ [ z Z H (;AR H & z ;AV: Z H # | ; 6 z : & & Z 4 | : Z 4 " 2@P : [ [ z & @* ! P Z [ 6 [ Z 7
0x364a8c…364c20 Dummy {f00=0x000c, f01=0x0190, f02=»! : 6 2 | W& " # |~;b ; : ;f" #?_" W # " T & T + : * & !@P `1` P Q [ ; 8 V W Q P [ ! X # P 4 V W Q P [ " X $
0x364c20…364db4 (2, 253) Dummy {f00=0x000c, f01=0x0190, f02=»# =_ P :" P * U P 1`! T "# 9e! # K : #0 P8" T * & : * & !`P :J +_ +Q _0 , V W R V W R XV W 1 ^ _0 R W ( V W Q P W ! W V P , V
0x364db4…364f48 Dummy {f00=0x000c, f01=0x0190, f02=» 4 V W Q P ) P 9_ &" ! 9 : & P Q 6 ,^ , < > # ; [ _n' d V W V 4! P < S S S X 4 9d * & ! R + : V W R 4 0R Y 7 Y& P Z,;D 9_8 8
0x364f48…3650dc Dummy {f00=0x000c, f01=0x0190, f02=» P V Q W Q 7 Y P._6 & Q 9d! )0 + P 7 Y Z $ _ : V ) 0 !0 " TV *V &V : V S W P 9 S W _ V P W T V E + : & 6 [ [ [ [ $ [
0x3650dc…365270 Dummy {f00=0x000c, f01=0x0190, f02=» H )_ f _X z R z ! P 1` { V (9h T W z 9e! I Z ! : 4 P 9 59D_ " P P [ ! :d" 5 : 0 !0 " Tz *V &V PP= ;@ R P W ;a=a P " R & R V T
0x365270…365404 Dummy {f00=0x000c, f01=0x0190, f02=» f f}( z " ! ! R 2` { z " P ! R 2` { 1 ! { [ Z f Q f P _ T { [ f H [ Q@ [ f}( { R [ _ f}" f Z ! Z $ Z %_N [ Q* f}" f R [ Z { f}" z 9e! W Z
0x365404…365598 Dummy {f00=0x000c, f01=0x0190, f02=» gg++ L z4zJ| | z@z P * 6 K K K K V K : z * zD V H n V Z P 2 " T W "@T '?W "? H
0x365598…36572c Dummy {f00=0x000c, f01=0x0190, f02=» 7 Z Z P l : V R (Q V : * * : J P v I < : J Qf : P 4 ! TV_ K WJ W +_ K W. _& X s W X & s J K : V : J T 1 : ! P
0x36572c…3658c0 Dummy {f00=0x000c, f01=0x0190, f02=» &X _ : : : : N : { : $0T Pb 9 _ $0T [ $0T Z : R$ P $ 1T Y TdW 5 _& : $0TH $ R W R # P W ) V E $0T
0x3658c0…365a54 (2, 254) Dummy {f00=0x000d, f01=0x0190, f02=»Y, : : z z #03 T jP kT T : & 9! " : $ : T W V 9! R W Q< R W Q0 R W Q$ : ( z4#03 T $_X (_^ W p *1 TID ADDR OP CR LVL MODIFIED OPERAND CREDIT 2.1
0x365a54…365be8 Dummy {f00=0x000d, f01=0x0190, f02=» ( l A A ( l p A ) Y V A V * v A : NWr N 2 z & JQ A W* N V D ! )0 1 6 V 9 A v w ( l <
0x365be8…365d7c Dummy {f00=0x000d, f01=0x0190, f02=» W W W W W N ** A A ER A R A R 4 4 A U 4 - _ v @ Z w ILLEGAL OPERATION MIXED ARITHMETIC ILLEGAL TYPE ODD WORD ADDR MISSING ENTRY ILLEGAL REQUESTED LENGTH STACK UN
0x365d7c…365f10 Dummy {f00=0x000d, f01=0x0190, f02=» PICTURE OVERFLOW "ALLOCATION ERR AT INITIALIZATION ILLEGAL INSTRUCTION ADDRESS ILLEGAL FORMAT CODE NO FIX BUFFER ALLOCATED FIX BUFFER NOT ALLOWED ILLEGAL CONTROL CODE ILLEGAL INDEX VALUE FORMAT CONDITIONS CHANGED ILLEGAL PARAMETER LENGTH ERROR DA
0x365f10…3660a4 Dummy {f00=0x000d, f01=0x0190, f02=» " R 0 1 Y : ;a V P V P W * Y <a R 9a V D : @ BP ( l _" @ P @ Pj Pf V $ $T$ D BR V T D P T D @PL E @W . @ 8P$ : $ $P BT , D E @ : @ @P A @ H A W TW V A
0x3660a4…366238 Dummy {f00=0x000d, f01=0x0190, f02=» V A TB( "( A B @ V P ( R W :
0x366238…3663cc Dummy {f00=0x000d, f01=0x0190, f02=» " R 0 1 Y : ;a V P V P W * Y <a R 9a V : @ BP ( l _" @ P @ P P V $ $T D R V T D P T D P * *
0x3663cc…366560 Dummy {f00=0x000d, f01=0x0190, f02=» @ P ( V R V W Z T _" = $ T W , $ 9a @ P @ P @ A A B A "V # ( A P UW T $ A P f V @ = $ W
0x366560…3666f4 (2, 255) Dummy {f00=0x000d, f01=0x0190, f02=» A A A A A A A A A A A A A A <P A A & , F + - ; : ( r . 2X " , A L A L @ A A _T < X ,T < X ) A A 8 ; : @ P A 1+X A _ @ A @
0x3666f4…366888 Dummy {f00=0x000d, f01=0x0190, f02=» A @ A @ A @ A @ A @ A P z W @ T @ Z @ A " W W 0 A W A A @ W $ @ A @ A _x A PZ @ & " 0 P P P @R _
0x366888…366a1c Dummy {f00=0x000d, f01=0x0190, f02=» A @ A @ A W @ T @ W @ @ @ R >a A A @ A @ A P z W @ T @ Z A @ B @ A j A @ R V ;a Q _ 81 @ A _ 0 A P
0x366a1c…366bb0 Dummy {f00=0x000d, f01=0x0190, f02=» A @ A @ A P z W @ T @ V @ A 0 P @ P @ 1 A @ " @ A @ A _ @ P @ V @ ( V " @ T @ 8TP @ P @ A A A " 0! T @
0x366bb0…366d44 Dummy {f00=0x000d, f01=0x0190, f02=» _ & A A @ BZ " ! U 0 A U _ "P` @ @ T @ PF R % < < " ! T @ P @ ! 5 = P @ W" 0 $ B % A
0x366d44…366ed8 Dummy {f00=0x000d, f01=0x0190, f02=» A @ A @ ! Aw Pd @ @ PL @ P 8 8 R @ T @ V :Rl ) I I @ I B A 8W PT RN )W : 0 A 8 : , A A :B A Q (P _ H B @ H A " EQ GT LT NE NG NL P2 @ R* 8 R @
0x366ed8…36706c Dummy {f00=0x000d, f01=0x0190, f02=» :B A (P _ B @ @ @ P ^ @ V @ Q B 1 @ Q Q @ A " ( R$ ( @ V @ H B ) I B " $ % " 8 # C C C C *T W #T A 8 P PR (T < Pl ,T < P^ )TX
0x36706c…367200 Dummy {f00=0x000d, f01=0x0190, f02=» A 8R Q ! 9D# 9hP Q " ;B 2 Pl L ?b P ,R PLW~ Pz9AR Tr L Qj W" P` L $ QV L % QL W C " _* Q P Q V _ W " A 4
0x367200…367394 (2, 256) Dummy {f00=0x000d, f01=0x0190, f02=» 8 8 " " A A .T @ P 2P " A " 2X X " , , A A :B A Q (P _ # # H A " A A 4 4 @ I j T A A A T A T z @ R A N @ " P P (T @ ! PD @ T @
0x367394…367528 Dummy {f00=0x000d, f01=0x0190, f02=» 9Q 0 A 0 :B 8_" A 0 " 8 A 0R$ 9U AR FQ 0:D A 8_* 'T 8:H_ A " A A 4 T A A " , "! R _U .WV A : A " 9d ! R :W& $ W $
0x367528…3676bc Dummy {f00=0x000d, f01=0x0190, f02=»( A " A @ P A ( A " ! 1 Q (P _ # # H A " A A 4 4 @ I T A A A T A T @ : + z [ [ < !AAP !TTT W !**T * [
0x3676bc…367850 Dummy {f00=0x000d, f01=0x0190, f02=» ! XBW *X& FWH :P"# U J 1 !00T ; _ 9P F " X># ; W )0_B J R( Z R 4! P ;)0 9U ? Z ] 49d_4 _HU ; :X _ _ z 9d! ) ^ _ ,_ 8 _ : W 8W 8 !++P !-- z ;$# + ^" _( |`
0x367850…3679e4 Dummy {f00=0x000d, f01=0x0190, f02=» B 6 : >H I H ! Ay ! A{ @ H A A @ 6 ^^ A _+H A 0 P @ H A _H A A 90 Au 0 0 @ @ 4 @ 4 H H 0 @ H H ) A { 0 0 0 0 0
0x3679e4…367b78 Dummy {f00=0x000d, f01=0x0190, f02=»u Au A{ A{ Au% At Au 4 H 3 I *H &@ A A~ @ ) A 4 4 H -I )I %H ! A A4 A0@ 4 4 I gI - T T I ! A A H ) A A @ W ( K 7A A Wo Tr
0x367b78…367d0c Dummy {f00=0x000d, f01=0x0190, f02=» 4 ( ! A ,( ! A ( ! A 4 6 8 gtW I I A A A W W I I A A5 A W W H %I # A 0 W W W H AtW}W H uI ) AtS@ @ @ 0 0 AU
0x367d0c…367ea0 Dummy {f00=0x000d, f01=0x0190, f02=» H & " @ W At At At At Au A @ 6 A _7@ @ _s% A Au A I @ 4 A0 A0 At At@ @ @ @ 0 4 I KI A A At A W&0
0x367ea0…368034 (2, 257) Dummy {f00=0x000d, f01=0x0190, f02=» Ax W 0 0 4 4 I A A1A Au AtWk A I A0@ H 0 @ @ # A ) A Az 0 0 0 I K 4 I )I A A ! A W !W @
0x368034…3681c8 Dummy {f00=0x000d, f01=0x0190, f02=» ! A I $ , A/ a q A/ h @ " b _[b A b f A $ Av T K Au_ A b $ Av TQI @ Au % T6$ #@ @
0x3681c8…36835c Dummy {f00=0x000d, f01=0x0190, f02=»A 4 # A Aw_ # A Ay_ # A Ax_) Av_04 0 0 I 2 " &W ' I 0 0 P A 4 0 4 0 0 0 4 1 q 4 1 q 4 I @ # A Wt A 6 !,,,3V A WR A WG A W< A W10 _f
0x36835c…3684f0 Dummy {f00=0x000d, f01=0x0190, f02=»v% Ax 4 I '0 0 AA 0 0 A 4 0 0 4 I 0 T50 ! A ) A S# A M # A S ! A : WF0 % A W. A W 0 0 4 _M 4 0 6 %W4 AFW- A W AoW AkW A W A W A
0x3684f0…368684 Dummy {f00=0x000d, f01=0x0190, f02=» a q7 A % A % A 0 W # A 0 4 A 0 0 4 ? ( : _ ~ m . Q $ j t F M 3 e / O D #
0x368684…368818 Dummy {f00=0x000d, f01=0x0190, f02=»TTTTTTTTTTTTT9- A Q QZ QY Q GQ Q ,Q A Q A Q$ A Q A;Q ! ' - 4 < E0 V0 X0 Z0 0 ^0 `0 b0 d0 f > * &
0x368818…3689ac Dummy {f00=0x000d, f01=0x0190, f02=» 6 ( W T T| TrH A T_ H V TLH H T> T4 T*H & T W W W W 4 4 6 FRTWT0 0 0 H 0 H !0 H 0 0 0 H 0 0 W 0
0x3689ac…368b40 Dummy {f00=0x000d, f01=0x0190, f02=»I A H 0 , Av0 _ 4 T' Av% Ax 4 AA A 4 A 4 H 0 _ A A$ Aw T 1 q @ W @ 4 0 4 H I F@ @ 0 0 @ AA
0x368b40…368cd4 (2, 258) Dummy {f00=0x000e, f01=0x0190, f02=» A A A A 4 A 4 A A 4 A A 4 @ A 8 I 6 `0 0 WU0 WL6 0 W 0 6 $0 W$0 W 0 W 0 W 0 W 0 : 0 P : _ 0 A A 0 P A W@6 0 a a W 0 a a W 0 a a
0x368cd4…368e68 Dummy {f00=0x000e, f01=0x0190, f02=» 2 WE0 ! A A H A ( 2 A 4 A K0 _M0 W 0 W 0 W 0 W 0 W 0 W 0 W 0 8 : ; A 8 7 MM>MM>:>>>:>:? A I I W 1 q 1 A W 1 q 1 A W ? A 0! T b ! A/ A A ? A Wh0 ) A ?
0x368e68…368ffc Dummy {f00=0x000e, f01=0x0190, f02=» W ! A A 0 1 q H 0 A 6 0$ a W 0$ a W 0$ a 6 A 8 2 _I - A A ! A A 0 0 2 A 4 ! A A ! A ? 0 0 ! A ? 4 1 q 4 A 0 1 q !
0x368ffc…369190 Dummy {f00=0x000e, f01=0x0190, f02=» W 0$ a 4 A 0 1 q 4 4 0 w ` 5 b ? J S 0 ~ t K e :
0x369190…369324 Dummy {f00=0x000e, f01=0x0190, f02=»IDE. QY q q q q q q q q q q q q q q q q q q q q q q q q q q q q q qKq q q q q q q q q q & . :@ J@< 4 j P T 0 ! A ? 4 1 q 4 A 0 1 q !
0x369324…3694b8 Dummy {f00=0x000e, f01=0x0190, f02=» ^ R V Z % A {% A k! A ) A _ A At I ! AtF Aub A A A , A A ! At A 4 Au A b # A $% Au A b # A % Au W A A 4 # A % Au
0x3694b8…36964c Dummy {f00=0x000e, f01=0x0190, f02=» A 4 4 ! At A 4 4 0 ! A W A 6 A 6 ) 4 K W8J W2 A 'W A " _?J CW 4 # A BH @ W+H @ ( ? 2 r
0x36964c…3697e0 Dummy {f00=0x000e, f01=0x0190, f02=» 6 8?? 6 ? A ? 6 ? $ A _ A ? A ? I ? A ? A ? % A ,A A R A A 9 @ ? @ ? ? A 8 A 8 I # A W!% A W A~ A ? ! A ! A
0x3697e0…369974 (2, 259) Dummy {f00=0x000e, f01=0x0190, f02=» + A " ]h A b ) A C A b ! At#% A ! Au W ! Av W I A ? ? ! A ! A ? b b b b b b = A ? % A "
0x369974…369b08 Dummy {f00=0x000e, f01=0x0190, f02=» Au % At A : A A ?) A :) A " % Au ! At ? A ? A A I A ? A ? A ? A A A ? A A % A 6! A A ? 8*( H ?+ < ?
0x369b08…369c9c Dummy {f00=0x000e, f01=0x0190, f02=» A A |% A / A A % A A # A @ W @ < A ? A ? A A ) A A ! A ! A < ? A _ A A ! A A ? A T2 8*( H ?+ A ? ? A ? A A A 9, A ? A A ?- A A A I
0x369c9c…369e30 Dummy {f00=0x000e, f01=0x0190, f02=» " ? A ? Av Au b b Au A Ay$ A " W A A ? # A ) ? A ? # A )
0x369e30…369fc4 Dummy {f00=0x000e, f01=0x0190, f02=» A ) At A A W ( W A W AyW AzW A|Wy # A AtWg A W`H ! A At A W:H At A I A.W $ 4 A> A~ Au A 4 A= Au Av A 4
0x369fc4…36a158 Dummy {f00=0x000e, f01=0x0190, f02=» A A 4 - e % ^ V r y ; V ( @ L m t ] g y D W E _ ) / E ^ ] < = T Y d5151 52 0
0x36a158…36a2ec Dummy {f00=0x000e, f01=0x0190, f02=» *0 ,0 .0 00 30 60 ; R R W A W AyW AzW A|Wy # A AtWg A W`H ! A At A W:H At A I A.W $ 4 A> A~ Au A 4 A= Au Av A 4
0x36a2ec…36a480 Dummy {f00=0x000e, f01=0x0190, f02=» P & & D H L1 q 4 1 q 4 1 q 4 BE]RBFOBKOMTBOMRTXTVALTNR A-ADRLINIE POST. PRIMO BRILLEBET-ARTDEBITORRTE/GEBHOVEDBOGLEVKONTOLINIE NRLEVERAND SIDE 51-2SIDE 51-3SIDE 53-2SIDE 53-3 NORMALPOSTFEJL FORMATYDELSESMODT REMITTERINGPER FRA PER TILFAKTNR FAKTDATOTTX
0x36a480…36a614 (2, 260) Dummy {f00=0x00b4, f01=0x0190, f02=» Q . Q Q Q[ Q @Q Q Q Q] Q] QH Q Q: Q; Q: Q
0x36a614…36a7a8 Dummy {f00=0x00b4, f01=0x0190, f02=»I q A_ q q q q Q SALDOOVERF q A_ q q q q A A A A q q q q A q q Q A q A_ q A q q q q A A A A q q q q A A q q q Q Q Q
0x36a7a8…36a93c Dummy {f00=0x00b4, f01=0x0190, f02=» S Q: T Q X Q A q A_ A^ A P Q; Q Q: R Q: AC AR KONTROLSUM A Q; QH Q q A q A_ A A: A U Q; V Q: W Q:
0x36a93c…36aad0 Dummy {f00=0x00b4, f01=0x0190, f02=» L QZ N Q; O Q; q AT q Y Q^ q $Q A M/P-NR q A_ A^ q q A q q q A q A q q q q < GL. SALDO A CHECK p QH Q Q q AY A Q q &Q A A
0x36aad0…36ac64 Dummy {f00=0x00b4, f01=0x0190, f02=» A q q q A q q q A q A A q q q q q 0Q SD-INCASSO q A^ A q M Q A A q q q F]R RE] REM OPK q q q q 5Q DEBITORINDB q A^ A q Q A A q q
0x36ac64…36adf8 Dummy {f00=0x00b4, f01=0x0190, f02=» q q q q q q q q $ * 0 7 > E L T d m v $ ) 4 D T d t
0x36adf8…36af8c Dummy {f00=0x00b4, f01=0x0190, f02=» x 6 q q A q q q A q A A q q q q q 0Q SD-INCASSO q A^ A q M Q A A q q q F]R RE] REM OPK q q q q 5Q DEBITORINDB q A^ A q Q A A q q
0x36af8c…36b120 Dummy {f00=0x00b4, f01=0x0190, f02=» K Z t I ? < A A A 1 q 2 _ @ $ A @ 1 q 6 _ _=H ! At j Ax _cf ( Tj ( 3 Ax A$ Ax _ Ax _ A$ Ax < A
0x36b120…36b2b4 (2, 261) Dummy {f00=0x00b4, f01=0x0190, f02=» S" M ! A$ _4 * A A A ? A$ Ax < j j A j d S Ax TR ? ( Ax T1 A$ Ax T b _ @ ? H ( 0
0x36b2b4…36b448 Dummy {f00=0x00b4, f01=0x0190, f02=» 0 1 q A$P @ _ @ 4 " ! At , _' ( W H 0 _ A A$ Ax Tp Auj " ; A ' _N Auj @ 4 @
0x36b448…36b5dc Dummy {f00=0x00b4, f01=0x0190, f02=»uh P0j " At_ ^F _,4 A$ Ax A h P 7 W8 h T P A$ Ax 4 A @ C Tl Te T^A 1 q 6 II _0 Au
0x36b5dc…36b770 Dummy {f00=0x00b4, f01=0x0190, f02=» T( A h T 1 q 4 A A A A 4 Au A A A 6 K?$ _ A( A A 1 q 6 _F J _N A( P A _^ A 4 A( A sW A( A W A( 4 A( A A$ Av TD! Ax>
0x36b770…36b904 Dummy {f00=0x00b4, f01=0x0190, f02=» h P A A$h P A _ + A W9 ! A$ A/ A$d m q _ A 0 1 q Td T`_ TO TK A0m q T1 I A A h T 4
0x36b904…36ba98 Dummy {f00=0x00b4, f01=0x0190, f02=» A A 0& P A A A 4 4 A 0 4 A h T A0 4 4 0 $ # A A h Px A h T] $ H A/h T2 b 1 q
0x36ba98…36bc2c Dummy {f00=0x00b4, f01=0x0190, f02=» 1 q 4 % s p 8 # ) K M ^ / & c Q { 4 x X !5 ' BFODFH0002CSSF DATAS[TDFH3504DISCFEJL TRANSMIT TERMINATE DATATRANSMISSION `
0x36bc2c…36bdc0 Dummy {f00=0x00b4, f01=0x0190, f02=» A_ AR A q Q9 Q A CSSN PS=Q ,NAME=Q A BRUGERNAVN Q KENDEORD QZ % , 3 < E O0 `0 b0 d
0x36bdc0…36bf54 (2, 262) Dummy {f00=0x010b, f01=0x0190, f02=» I F A4 A3H 2I . ( " ) At # A 9! A 3! A -! A H # Au Au T@ H A H A 6 @ A @ @ 4 Au A 4 H (H I
0x36bf54…36c0e8 Dummy {f00=0x010b, f01=0x0190, f02=» A 9 6 - At W + At " 'I #I # A W 4 A 4 2 , ) At A W ) Au A W ) Av A
0x36c0e8…36c27c Dummy {f00=0x010b, f01=0x0190, f02=» A < ? C 8 A < A AuW 6 W A T W A T A P A W ! A W ! A W ) A ! A ) A u) Au ! A e! A V) A UWL) A ) A ;) A ) A +! A
0x36c27c…36c410 Dummy {f00=0x010b, f01=0x0190, f02=» A A 4 0 P W W A H A A4 A0 A0@ @ 4 ! At? a q 0 0' P A 4 4 At0( Q P I
0x36c410…36c5a4 Dummy {f00=0x010b, f01=0x0190, f02=» T Av Au Au"4 " I ( 0( 0* Q P 4 4 I "0( 0 Q P Av 4 4 0+ P Q I 0 4 I 0, Q P 4 @ A T I
0x36c5a4…36c738 Dummy {f00=0x010b, f01=0x0190, f02=» _U _&I $I 0 W 0 0 0 @ 4 A I 0 W 0 0 0 @ @ 4 @ A T I T W 0 A " W I T"! Ax#W A Q T XDA A I
0x36c738…36c8cc Dummy {f00=0x010b, f01=0x0190, f02=» < Ax8 b ! A _H A/b < A/b A/b A 8 A > A~8 _ C < A h h T b
0x36c8cc…36ca60 Dummy {f00=0x010b, f01=0x0190, f02=» M A2h T A. A~ A~_ h < A.? 3 ? A h T A ? A h T f I Au A$ T`f ! A$ A/h d
0x36ca60…36cbf4 (2, 263) Dummy {f00=0x0136, f01=0x0190, f02=» o | d T m M & ) v # = K D { / . 0 < d!& FD&01GEBRATRTEASSIGN DISCFEJL ! & 0 F V999PPP A QY Q
0x36cbf4…36cd88 Dummy {f00=0x0136, f01=0x0190, f02=» ^ R V Z A A A @ Au H A W @ A W A A.@ I A0 @ W I W I ( A 6 _E A W @ _%_XA 4 A 6 Ldr _p A @ _NK ( @ _e$ 0 0 A _ I 0
0x36cd88…36cf1c Dummy {f00=0x0136, f01=0x0190, f02=» 4 4 T ? T W 4 T 4 T 4 T ! A W 4 T 4 T W T W T W 4 2 TeWo T]Wg TUW_ TO 4 I D A 4 I 4 A 4 I $ A 4 H 4 4
0x36cf1c…36d0b0 Dummy {f00=0x0136, f01=0x0190, f02=» 6 4 A 4 A 4 0- _ 0. 0 ? H A 0 A/ @ A 0 A 1 q 6 _M A d j@ 6 %_| A/ # A } Au _ A
0x36d0b0…36d244 Dummy {f00=0x0136, f01=0x0190, f02=»< ) At At I # At f A A 0 1 q 6 _ A d K " 4 0 A 0. 1 q 6 _I A~ % T_?0. &< " #- At A~0
0x36d244…36d3d8 Dummy {f00=0x0136, f01=0x0190, f02=» Au A$ ) Av h ! Ax/ * A/ A b I ) >I 0 A 1 q 6 _!_ ? Ax+ W% +< * W 0 A 1 q 6 _ _ At @ A$ ) Av T I Ax8 AJ h P A/b
0x36d3d8…36d56c Dummy {f00=0x0136, f01=0x0190, f02=» A -@ W'+ At! Au A~ % & .K WL * A 1 q 6 _ _ @ ? A ? @ W I A /? I ,_ 0 0 _ AuA " 0 _ $ A 0 At+ At) A A] 0 1 2 A0@ A ?! A~?"
0x36d56c…36d700 Dummy {f00=0x0136, f01=0x0190, f02=» T 3 T 3 T 3 4 A% ) Au 4 Au Tj Au T^ Au TR Au TF Au T: Au T. Au T" Au T Au T Au 4 " 0. At % _ 0. &4 4 4 4 4 4 4 4 4 @ 0)
0x36d700…36d894 (2, 264) Dummy {f00=0x0159, f01=0x0190, f02=» 8 H X h u % X K 4 0 j / M O F 3 $ T K & A z
0x36d894…36da28 Dummy {f00=0x0159, f01=0x0190, f02=»SN08ZZZZZZZZ9 Q AS ? q A ? q A OK ? q A Q AX Q2 AM f Q START VOLUME= DATASET= Q AZ Q Ap g Q An h Q AV QZ A QY A A
0x36da28…36dbbc Dummy {f00=0x0159, f01=0x0190, f02=» # / 1 R = * 2 X K 4 0 j / M O F 3 $ T K & A z
0x36dbbc…36dd50 Dummy {f00=0x0159, f01=0x0190, f02=» ( $1 q 4 I ? @ Au A Av 6 _&! Au A qzW qzW H 0 _ A A A0 Az T ! Axu) A @ W ! Ate 6 I@ qn " A6 q!W q W @ Au qz AuW A qn@
0x36dd50…36dee4 Dummy {f00=0x0159, f01=0x0190, f02=» w A A ( ]H 0 _ A A Az T?! A 9 @ XH 0 _ A Az T @ _x@ 4 @ @ 4 A/h T f 4 4 j j ) A9 At@ 4 j
0x36dee4…36e078 Dummy {f00=0x0159, f01=0x0190, f02=» K A D l ADRBY FILNR ]R DATONAVNKODE:N[STE TEKST TEKST:VEDL. -DISTR FAKTURAGIRONR POSTNR ALT.ADR TEKSTFILBET.FORM LEVERAND REG.KNT. SKYLDIGT UDB. ]TD KREDITNOTATEKST OPL FRA/TIL NR FRA/TIL-NR:PRINTENHED?SIDSTE UDB UDSKRIFT AF
0x36e078…36e20c Dummy {f00=0x0159, f01=0x0190, f02=»99999999XXE-XXE-XXXXXXXXXXXXBXXXXXXXXXXZZVZZVZZ9E,99-ZZZVZZZVZZ9E,99- BEL B VAL RDATO A QY A A A Q A A Q2 A Q - Q A A # Q A A A Q2 A A Q^ A Q_ Q_ A
0x36e20c…36e3a0 Dummy {f00=0x0159, f01=0x0190, f02=» A A Q_ A Q2 Qb A Qb A q Q2 A q Qb A q Qb A q Qb A A: Q_ Q_ Q_ A A @ A @ A QZ A @
0x36e3a0…36e534 (2, 265) Dummy {f00=0x015d, f01=0x0190, f02=» $ * 0 6 = D K R Z b k t } 0 0 * 4 ? M 0 ? G D g u 1 @ @ P A A Q2 A A Q^ A Q_ Q_ A
0x36e534…36e6c8 Dummy {f00=0x015d, f01=0x0190, f02=» ! 0 V A A A 6 _$ RyT Ts@ @ 2 _ @ @ 2 _ 6 W # At A _M R%T T _ T T _ _ 4 4 A A A 6 CC _ R. & A " @ @ A
0x36e6c8…36e85c Dummy {f00=0x015d, f01=0x0190, f02=» W{ A A A A A A A A A A A A A A A A A A A A A! A A A" Au A A A#@ 4 @ 4 H 0 _ A A A A A A A A A A A A A A A A A A A A A A A!A A A"A
0x36e85c…36e9f0 Dummy {f00=0x015d, f01=0x0190, f02=» A A A A 6 YY _ RMTK TG TC@ @ 2 _ I 2 _ 2 _ r_W4 I H A 6 # At A , A @ A ! Au @ H 1 q " [ T3 $ &H T I A W @ I 1 q W 1 q
0x36e9f0…36eb84 Dummy {f00=0x015d, f01=0x0190, f02=» W Au A A A A A A A A A A A A A A A Au A A A A A A @ 4 @ 4 H 0 _ A A A A A A A A A A A A A
0x36eb84…36ed18 Dummy {f00=0x015d, f01=0x0190, f02=»4 At At At At At At A 4 A " ! At W 4 A H 0 _ A A{ T[ Au j " &_@ j @ 4 @ 4 @
0x36ed18…36eeac Dummy {f00=0x015d, f01=0x0190, f02=» A{ T< _8 A A A A A A A{ @ 4 @ 4 A A{ ! Ax1 h P Auj ) Au W+ j A{ X& A A{ ! Ax#! A
0x36eeac…36f040 Dummy {f00=0x015d, f01=0x0190, f02=» , - A{ TK A{ T: _8 A A A A{ @ 4 @ 4 A A : 4 A T Auj W Auj " . A{
0x36f040…36f1d4 (2, 266) Dummy {f00=0x015d, f01=0x0190, f02=» R'T W*# A $ T P T Au_ _ 4 4 RRP H 0 _ A , 3 A{ T Au A A A @ 4 @ 4 Au A A A A A A A A A 4 j 4 4 l 4
0x36f1d4…36f368 Dummy {f00=0x015d, f01=0x0190, f02=» SLETNING VEDLIGEH. XXXXXXX9999999999XXXXXXXXXXBZZZVZZZVZZ9E,99- Q2 QZ Q2 Q Q QY Q[ A Q2 Q Q Q2 Q Q Q 0 0 !0 #
0x36f368…36f4fc Dummy {f00=0x015d, f01=0x0190, f02=» / KORREKT 0 $ * 0 & ? 0 0 & 0 > $ * 0 L ( 0 0 h 999999 0 x " * 0 B99999 0 " * 0 ( 0 0 SLUTD 0 $ * 0
0x36f4fc…36f690 Dummy {f00=0x015d, f01=0x0190, f02=» 0 & 2 1 & 1 999 1 ( " * 1 < & 1 1 N & 1 ( 1 j 1 v & 1 KLAR 1 $ * 1 ADM 1 $ * 1 & 1 ZZ 1 " *
0x36f690…36f824 Dummy {f00=0x015d, f01=0x0190, f02=»GG 1 ~ $ * 2 & 2 & 2 ( DAGS-DATON 2 8 $ * 2 R & 2 b 99E-99E-99 2 t " * 2 & 2 DAG NR 2 $ * 2 & f 2 ZZZ 2 " * 2
0x36f824…36f9b8 Dummy {f00=0x015d, f01=0x0190, f02=» 4 2 & 3 & 3 ADM 3 , $ * 3 @ & 3 P ! EJ-EDB T[LLER 3 ^ $ !* 3 | & 3 " NR 3 $ "* 3 & 3 # KONTONR 3 $ #* 3 & 3 &
0x36f9b8…36fb4c Dummy {f00=0x015d, f01=0x018e, f02=» 3 ( 4 & [ 4 & % 4 & & 4 4 ' ADM 4 D $ '* 4 X & 4 h ( BEHOLDNINGST[LLERE 4 v $ (* 4 & 4 ) NR 4 $ )* 4 & 4 * KONTONR 4 $ ** 4
0x36fb4c…36fce0 Dummy {f00=0x015d, f01=0x0190, f02=» 4 & 5 & + 5 & 5 & & 5 6 & 5 F - ZZZZZZZZE-ZZ 5 X " -* 5 t & 5 & 5 & 5 & 5 . TTTVTTTVTTTVTT9V99-R 5 " .* 5 $ *
0x36fce0…36fe74 (2, 267) Opaque[0x194]
0x36fe74…370008 # DirEnt {nam=»CONNJ2«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x24f8, f03=0x0000}
0x36fe74…370008 IdxSect {
0x36fe74…370008 f00 = 0x0127 // 0x36fe74 @0x0
0x36fe74…370008 f01 = 0x0002 // 0x36fe76 @0x2
0x36fe74…370008 gno = [ // 0x36fe78 @0x4
0x36fe74…370008 [0x00]: C0x0127.0x3.0
0x36fe74…370008 ]
0x36fe74…370008 }
0x370008…37019c Dummy {f00=0x0127, f01=0x014c, f02=» T; P01; TID=TC; TCL=TC; * LEV=60; : 01; J PTDC=T01; V PLC=01L; f P01; v PSCL=S04; T; 01; TID=D0; TCL=D0; LEV=60; 00; P00; PC; P00; P01
0x37019c…370330 Dummy {f00=0x0127, f01=0x2008, f02=» P01; TID=TC; TCL=TC; * LEV=60; : 01; J PTDC=T01; V PLC=01L; f P01; v PSCL=S04; T; 01; TID=D0; TCL=D0; LEV=60; 00; P00; PC; P00; P01
0x370330…3704c4 Dummy {f00=0x0127, f01=0x0190, f02=» ! Y 0T V B : 2' R P P X ' ' X _ X ' _ X '?_ X ' X ! t v X " 9b! X :c 2" H @ W W W W W W W Y ( Y 09H Y * Y 4 Y 2 Y 69h Q
0x3704c4…370658 Dummy {f00=0x0127, f01=0x0190, f02=» P( P P Y +W^ Y + WL T HW> Q W Y + U Q P W W Y ( C X *! P V L ! X 0 Y 8 v P Y 0 X 0 X 2] X 8 Y 0 v : X 0 :H* : X 2T Y 2 : C 1 B ] :
0x370658…3707ec Dummy {f00=0x0127, f01=0x0190, f02=» C : C B _, _ X & P 8 B _R ( X D D : K + Q 2 P. P8 h X ( B X # V : _0 _> L t p < < 2 ^ ^ P W W X 0Q Y ( Y *P
0x3707ec…370980 Dummy {f00=0x0127, f01=0x0190, f02=» Y (_r " X _& X *# P B 1 W " P X X$ C : X *! P C W @ X (T W X y 6 Y ( : X (;n v X L t p ( 2 2 0 0 F P Y .W Y . X ( X ." PV X 0RzT$ Y *P U :H * K
0x370980…370b14 (2, 268) Opaque[0x194]
0x370b14…370ca8 # DirEnt {nam=»TEST «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x01f0, f03=0x0000}
0x370b14…370ca8 IdxSect {
0x370b14…370ca8 f00 = 0x000f // 0x370b14 @0x0
0x370b14…370ca8 f01 = 0x0002 // 0x370b16 @0x2
0x370b14…370ca8 gno = [ // 0x370b18 @0x4
0x370b14…370ca8 [0x00]: C0x000f.0x2.0
0x370b14…370ca8 ]
0x370b14…370ca8 }
0x370ca8…370e3c Dummy {f00=0x000f, f01=0x0038, f02=» PRT KMREMT PRT CONRT ASG /E0,TY10 (; 2 PTCL=LA; B PLEV=60; R P00; b P04; n PSCL=S02; z PSCL=S03; PSCL=S04; PSCL=S05; PT; P01; PTID=D0; PTCL=D0; PLEV=60; P00;
0x370e3c…370fd0 Dummy {f00=0x000f, f01=0x2008, f02=» KMREMT PRT CONRT ASG /E0,TY10 (; 2 PTCL=LA; B PLEV=60; R P00; b P04; n PSCL=S02; z PSCL=S03; PSCL=S04; PSCL=S05; PT; P01; PTID=D0; PTCL=D0; PLEV=60; P00;
0x370fd0…371164 Dummy {f00=0x000f, f01=0x2008, f02=» MU,M+MOUT,M+MU+MOUT HMES 4 FC $ : HMES ANY COMBINATION OF ALTERNATIVE 1,2 AND 3 IS VALID, 4 0 HMES AND AT LEAST ONE OF THEM MUST BE CHOOSEN r 0 HMES ALTERNATIVE 4 MAY BE INCLUDED IF NEEDED HEND * HMES ILLEGAL PARAMETER COMBINATION
0x371164…3712f8 Dummy {f00=0x000f, f01=0x0190, f02=» r , ( q HALTN B R SCTMSZK j SCTSFA ~ SCTEFA SCTPLD SCTANO SCTADA SCTPAGL , ( @
0x3712f8…37148c Dummy {f00=0x000f, f01=0x0190, f02=»MMC SCTLACL SCTMMP " SCTLAP 6 SCTNPE J SCTSTB ^ SCTOPT r SCTTCT SCTCDT SCTBUG~ SCTDMT , (
0x37148c…371620 Dummy {f00=0x000f, f01=0x4040, f02=»_ *@ < 6 SCTNPE J SCTSTB ^ SCTOPT r SCTTCT SCTCDT SCTBUG~ SCTDMT , (
0x371620…3717b4 (2, 269) Opaque[0x194]
0x3717b4…371948 # DirEnt {nam=»RGADM «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1880, f03=0x0000}
0x3717b4…371948 IdxSect {
0x3717b4…371948 f00 = 0x00c4 // 0x3717b4 @0x0
0x3717b4…371948 f01 = 0x0028 // 0x3717b6 @0x2
0x3717b4…371948 gno = [ // 0x3717b8 @0x4
0x3717b4…371948 [0x00]: C0x00c4.0x0.0
0x3717b4…371948 [0x01]: C0x00ca.0x3.0
0x3717b4…371948 [0x02]: C0x00cf.0x3.0
0x3717b4…371948 [0x03]: C0x00ed.0x0.0
0x3717b4…371948 [0x04]: C0x00fc.0x2.0
0x3717b4…371948 [0x05]: C0x00ff.0x2.0
0x3717b4…371948 [0x06]: C0x0100.0x0.0
0x3717b4…371948 [0x07]: C0x0100.0x1.0
0x3717b4…371948 [0x08]: C0x0100.0x3.0
0x3717b4…371948 [0x09]: C0x0101.0x0.0
0x3717b4…371948 [0x0a]: C0x0101.0x1.0
0x3717b4…371948 [0x0b]: C0x0103.0x1.0
0x3717b4…371948 [0x0c]: C0x0103.0x2.0
0x3717b4…371948 [0x0d]: C0x0103.0x3.0
0x3717b4…371948 [0x0e]: C0x0104.0x1.0
0x3717b4…371948 [0x0f]: C0x0105.0x0.0
0x3717b4…371948 [0x10]: C0x0105.0x1.0
0x3717b4…371948 [0x11]: C0x0105.0x2.0
0x3717b4…371948 [0x12]: C0x0105.0x3.0
0x3717b4…371948 [0x13]: C0x0106.0x0.0
0x3717b4…371948 ]
0x3717b4…371948 }
0x371948…371adc Dummy {f00=0x00c4, f01=0x0190, f02=» P IDENT RGADM 03.01.XXX.1 DDUM KMD08 & PDIV : ENTRY RGADM H P ENTRY ADM P ENTRY CLEJ n P ENTRY CLEDB P ENTRY CLBEH P ENTRY RGA120 P ENTRY ZERO P ENTRY SKIFT P ENTRY STRTWR P ENTRY STR
0x371adc…371c70 Dummy {f00=0x00c4, f01=0x0190, f02=» TCLOSE P ENTRY TR2GEN P ENTRY WAHEAD & P ENTRY WALINE < P ENTRY BCKUP R P* f P EXT ADM600 p P EXT CNFWRT P EXT RADEL P EXT ABORT P EXT EMPTYT P EXT RGREAD P EXT TRPAGE P EXT SETKRE
0x371c70…371e04 Dummy {f00=0x00c4, f01=0x0190, f02=» P EXT FRMXTA P EXT WTALLY P EXT FRMTKV 0 P EXT CRVO D P EXT TCONFR V P EXT FRMXSP j P EXT SPCHK5 ~ P EXT SUM P EXT PACKCL P EXT CLEAR8 P EXT SPLIN8 P EXT SLUT P EXT GRASPV P EXT
0x371e04…371f98 Dummy {f00=0x00c4, f01=0x0190, f02=»YK P EXT DIVTR P EXT TCONFW P EXT CONFWR 0 P EXT WRITFD D P EXT SQWRIT X P EXT RAREAD l P EXT RAWRIT P EXT ASGVOL P EXT CLSVOL P EXT CRKJ P EXT BACKUP P EXT CONRDX P EXT RSTORE
0x371f98…37212c Dummy {f00=0x00c4, f01=0x0190, f02=» EXT LEVOPR P EXT LEVDEL P EXT LEVPRT ( P EXT LEVSPG < P* P P INCLUDE EQUATE Z P* r P EJECT | RGADM P SET SPPROMPT P MOVE SPKEY,CBIN2 P ATTFMT ADFRM01 P PERF SPCLRA @ P IB SPBINW2,RGADM,RG
0x37212c…3722c0 Dummy {f00=0x00c4, f01=0x0190, f02=»M,CBIN7 P B RGADM P* PRGA100 * P* 8 < P******************************************************** B P* $ P* OPEN ROUTINE P* < P******************************************************** P* P
0x3722c0…372454 (2, 270) Dummy {f00=0x00ca, f01=0x0190, f02=»3,=X'FF' ERASE PRGA105 P ATTFMT OPENFRM $ P PERF SPCLRN < " P IB SPBINW2,RGADM,RGADM,RGA110 P P B RGADM v PRGA110 P MOVE TTEJEDB,=D'0' , P MUL TTSTLBNR,=D'-1' SET POSITIVE (OPEN) 2 P MUL CMASK(TTASKNR),=D'-1' SET CMASK >0,
0x372454…3725e8 Dummy {f00=0x00ca, f01=0x0190, f02=»TSTLBNR P SUB TTLBNR,=D'1' P MOVE TTRECOPN,CRECBCD * P PERF ZERO H 2 P PERF TCONFW,TTASKNR STORE INF FROM ADM FUNC. Z P PERF CONFWR & P PERF WRITJT,=W'5' OPEN MES ON JT P SET GTKASSE P ADD CTASKNR,CBIN1 PRGA120 $
0x3725e8…37277c Dummy {f00=0x00ca, f01=0x0190, f02=» PTCLOSE PROC P MOVE SPKEY,CBIN2 PTCL000 6 P SET SPPROMPT D P ATTFMT CLFRM01 Z P PERF SPCLRA r $ P IB SPBINW2,TCLMAK,TCLMAK,TCL010 P B TCL000 PTCL010 P* CLEAR FLAGS P CLEAR GTSUMKEY P CLEAR T
0x37277c…372910 Dummy {f00=0x00ca, f01=0x0190, f02=» CLEAR TTSUPFLG P CLEAR GTCYFLG P CLEAR GTSUBFLG . P MOVE TTSUPMRK,=C' ' F P MOVE TTSUMMRK,=C' ' b P MOVE GTTEXT,=C' ' ~ P MOVE GTSUM,=D'0' P WAIT KVOUCH P DSC0 KVOUCH,RLEAS ( P* TR12 ACCUMULATORS
0x372910…372aa4 Dummy {f00=0x00ca, f01=0x0190, f02=»SWBIN1),=X'FF' P ADD GSWBIN1,CBIN1 P CBL GSWBIN1,CBINMAX,TCL025 0 P MOVE GSWBCD5,=D'0' T PTCL030 p P ADD GSWBCD5,=D'1' ACC NR ~ PTCL035 " P MOVE GSWBIN5,GSWBCD5 CONVERT , P CBG GSWBIN5,CTR12(TTASKNR,CBIN2),TCL100 & P ADD
0x372aa4…372c38 Dummy {f00=0x00ca, f01=0x0190, f02=»BIN1),CBIN5 INDICATE UPDATED . P MOVE GTDUPF(CBIN4),C12ACC(GSWBIN5,CBIN1) $ $ P CBE GTDUPF(CBIN4),=D'0',TCL040 V P MOVE GTUSED(CBIN4),=W'-8' ~ & P MOVE GSWSTR20,=C'EJ-EDB T[LLER ' P MOVE GTWBCD1,GSWBCD5 0 P PERF TR2GEN,CBIN1 GENERATE TR2
0x372c38…372dcc Dummy {f00=0x00ca, f01=0x0190, f02=»PF(CBIN4),C12ACC(GSWBIN5,CBIN2) $ P CBE GTDUPF(CBIN4),=D'0',TCL030 ( P MOVE GTUSED(CBIN4),=W'-8' P & P MOVE GSWSTR20,=C'EJ-EDB T[LLER ' r P MOVE GTWBCD1,GSWBCD5 . P PERF TR2GEN,CBIN2 GENERATE TR2 WITH DEBET P BNOK TCL040 P B TCL03
0x372dcc…372f60 Dummy {f00=0x00ca, f01=0x0190, f02=» P CASH MOVEMENT * P MOVE GTDUPF(CBIN1),TTCASHAC ACCOUNTNR , P MOVE GTDUPF(CBIN4),TTCASH CURRENT CASH J , P SUB GTDUPF(CBIN4),TTSTCASH INITIAL CASH z P MOVE GTUSED(CBIN1),CBIN5 P MOVE GTUSED(CBIN4),=W'-8' $ P MOVE GSWSTR20,=C'KASSE-KO
0x372f60…3730f4 (2, 271) Dummy {f00=0x00cf, f01=0x0190, f02=» PERF KORT ASK FOR KONTOKORT PTCL230 $ P CBE TVERSUR,=D'0',TCL235 2 * P MOVE GTDUPF(CBIN1),TVERSUR REMIT ACC T * P MOVE GTDUPF(CBIN4),TTACC(CBIN6,CBIN1) * P ADD GTDUPF(CBIN4),TTACC(CBIN6,CBIN2) $ P CBE GTDUPF(CBIN4),=D'0',TCL235 P M
0x3730f4…373288 Dummy {f00=0x00cf, f01=0x0190, f02=»IT ' l P MOVE GTWBCD1,=D'0' P PERF TR2GEN,CBIN0 ( P BNOK TCL230 B P TBF CCLKTFLG,TCL235 V P PERF KORT r P* 0 P* WRITING OF DISC JOURNAL AND VOUCHER P* PTCL235 P MOVE GSWSTR9,=C'TOTAL ' P PERF CLEDB
0x373288…37341c Dummy {f00=0x00cf, f01=0x0190, f02=»E TTSTLBNR,TTLBNR P ADD TTSTLBNR,=D'1' . P MUL TTSTLBNR,=D'-1' SET NEGATIVE (CLOSE) 6 4 P MUL CMASK(TTASKNR),=D'-1' SET CMASK < 0, CLOSE h P CLEAR GTTFLG PTCL550 P MOVE TTRECOPN,CRECBCD P PERF ZERO 2 P PERF TCONFW,TTASKNR
0x37341c…3735b0 Dummy {f00=0x00cf, f01=0x0190, f02=» P* TRANS 12 COUNTERS P MOVE GSWSTR20,=C'*' " P PERF WRITJT,=W'12' > P CMP CBIN0,CBIN0 DUMMY Z P RET x PTCLNOK10 PTCLMAK P CMP CBIN0,CBIN1 P RET P PEND P EJECT PRGA200 4 P************************
0x3735b0…373744 Dummy {f00=0x00cf, f01=0x0190, f02=»********************* t P* P MOVE GSWBIN1,GSWBCD3 ( P PERF ADM,GSWBIN1 F P B RGADM ` P EJECT p PZERO PROC ~ P* P* ZERONIZE COUNTERS P* TRANS 12 COUNTERS & P MOVE GSWBIN1,CTR12(TTASKNR,CBIN1) P MOVE GS
0x373744…3738d8 Dummy {f00=0x00cf, f01=0x0190, f02=» & P MOVE C12ACC(GSWBIN1,CBIN1),=D'0' & P MOVE C12ACC(GSWBIN1,CBIN2),=D'0' . P B TCL610 X PTCL615 j P* ACCUMULATORS x P MOVE GSWBIN1,CBIN0 PTCL620 P ADD GSWBIN1,CBIN1 $ P MOVE TTACC(GSWBIN1,CBIN1),=D'0' $ P MOVE TTACC(
0x3738d8…373a6c Dummy {f00=0x00cf, f01=0x0190, f02=»************************************* P* . . P* NOW ALL ACCUMULATORS NOT = 0 8 & P* HAS BEEN REGISTRATED j 2 P* A VOUCHER PRINT OF ALL TR12 ACC " P* IS NOW PERFORMED P** < P**************
0x373a6c…373c00 Dummy {f00=0x00cf, f01=0x0190, f02=»,CBIN2),CBIN0,TCLEJRET ~ P PERF WAHEAD,CBIN8 P MOVE GTWBCD1,=D'0' 8 PTCL110 T P ADD GTWBCD1,=D'1' b " P MOVE GSWBIN5,GTWBCD1 CONVERT | , P CBG GSWBIN5,CTR12(TTASKNR,CBIN2),TCL200 & P ADD GSWBIN5,CTR12(TTASKNR,CBIN1) . P MOVE GTDUPF
0x373c00…373d94 (2, 272) Dummy {f00=0x00ed, f01=0x0190, f02=»TDUPF(CBIN1),=D'0',TCL110 P CBG TTLINNR,=D'0',TCL190 " P DSC0 KVOUCH,RLEAS D P MOVE TTLINNR,=D'25' ^ P PERF WAHEAD,CBIN8 z PTCL190 P PERF WALINE,CBIN9 P B TCL110 PTCL200 P DSC0 KVOUCH,RLEAS PTCLEJRET P R
0x373d94…373f28 Dummy {f00=0x00ed, f01=0x0190, f02=»WSTR20,=C'EDB-T[LLERE ' P PERF WRITJT,=W'6' P PERF WAHEAD,CBIN8 : P MOVE GSWBCD5,=D'0' T $ P MOVE GTREGF(CBIN1),=D'0' TOTAL p P MOVE GTREGF(CBIN2),=D'0' PTCL240 P TBT GTSPGFLG,TCL242 P MOVE GTREGNR,=D'11' PTCL242
0x373f28…3740bc Dummy {f00=0x00ed, f01=0x018e, f02=»SWBIN5,CBIN1) v , P ADD GTREGF(CBIN2),TTACC(GSWBIN5,CBIN2) P MOVE GTUSED(CBIN4),CBIN0 F , P MOVE GTDUPF(CBIN4),TTACC(GSWBIN5,CBIN1) h , P ADD GTDUPF(CBIN4),TTACC(GSWBIN5,CBIN2) , P MOVE GTDUPF(CBIN6),TTACC(GSWBIN5,CBIN1) 2 P MOVE GTDUPF(CBI
0x3740bc…374250 Dummy {f00=0x00ed, f01=0x018e, f02=» P MOVE GTDUPF(CBIN1),GSWBCD5 P MOVE GTUSED(CBIN1),=W'50' ( , P MOVE GTDUPF(CBIN2),=D'2' MARK FOR TOTAL J P MOVE GTUSED(CBIN2),=W'51' z P PERF CRKJ P PERF WRITFD P BNOK TCL245 PTCL290 " P MOVE GSWBIN5,GSWBCD5 RESTORE
0x374250…3743e4 Dummy {f00=0x00ed, f01=0x0190, f02=» & P MOVE GTDUPF(CBIN4),GTREGF(CBIN1) $ P ADD GTDUPF(CBIN4),GTREGF(CBIN2) . * P MOVE GTDUPF(CBIN5),TTACC(CBIN8,CBIN1) V * P ADD GTDUPF(CBIN5),TTACC(CBIN8,CBIN2) P PERF WALINE,CBIN11 * P MOVE GTDUPF(CBIN5),TTACC(CBIN1,CBIN1) * P MOVE GTDUPF
0x3743e4…374578 Dummy {f00=0x00ed, f01=0x018e, f02=» ADD GTDUPF(CBIN5),TTACC(GSWBIN1,CBIN1) , P ADD GTDUPF(CBIN6),TTACC(GSWBIN1,CBIN2) 0 P B TCL310 ` PTCL320 r P TBT GTSPGFLG,TCL329 ( P* ADJUST FOR 'KASSE INDBERETNING' P MOVE GSWBCD1,TTCASH P SUB GSWBCD1,TTSTCASH P CBL G
0x374578…37470c Dummy {f00=0x00ed, f01=0x0190, f02=» ( P* ADJUST FOR 'VERSUR INDBERETNING' $ P MOVE GSWBCD1,TTACC(CBIN6,CBIN1) 4 $ P ADD GSWBCD1,TTACC(CBIN6,CBIN2) P MUL GSWBCD1,=D'-1' 'VEND' P CBL GSWBCD1,=D'0',TCL328 P SUB GTDUPF(CBIN6),GSWBCD1 P B TCL329 PTCL328
0x37470c…3748a0 Dummy {f00=0x00ed, f01=0x0190, f02=»SH ~ P SUB GSWBCD1,TTSTCASH P MOVE GTDUPF(CBIN4),GSWBCD1 ( P PERF WALINE,CBIN12 L P DSC0 KVOUCH,RLEAS h P RET P PEND P EJECT PCLBEH PROC P* P* BEHOLDNINGST[LLERE P* PTCL400 P MOVE TTLINN
0x3748a0…374a34 (2, 273) Dummy {f00=0x00fc, f01=0x0190, f02=» p P MOVE GTWBCD2,GSWBIN2 PTCL405 & P ATTFMT CLFRM04 4 P SET SPPROMPT L P PERF SPCLRA b P IB SPBINW2, C v , P TCL415,TCL415,TCL412,TCL411,TCL415, C , P TCL415,TCL415,TCL415,TCL413,TCL415, C P TCL415,TCL415,TCL413
0x374a34…374bc8 Dummy {f00=0x00fc, f01=0x0190, f02=» | P B TCL420 PTCL412 P TBT GTSPGFLG,TCL400 ( $ P MOVE GSWSTR20,=C'SLET PERIODE ' D P MOVE GSWBIN6,CBIN2 l P B TCL420 PTCL413 P MOVE GSWSTR20,=C'SUBTOTAL ' P MOVE GSWBIN6,CBIN3 P B TCL420 PTCL420 P
0x374bc8…374d5c Dummy {f00=0x00fc, f01=0x0190, f02=»TOP ~ P ADD GSWBIN3,CBIN6 P DSC1 KVOUCH,POS,GSWBIN3 & P PERF CLEAR8 F ( P PERF FRMXVO,CBIN13 HEAD ON VOUCHER Z P EDWRT KVOUCH,GTSTRFMT PTCL430 P ADD GTWBCD1,=D'1' P MOVE GSWBIN3,GTWBCD1 $ P ADD GSWBIN3,CBEH(TTASKNR,CBIN
0x374d5c…374ef0 Dummy {f00=0x00fc, f01=0x0190, f02=»OTAL, PERIODE AND SALDO . P ADD GSWBCD6,CBACC(GSWBIN3,CBIN2) PERIODE ! , P ADD GSWBCD7,CBACC(GSWBIN3,CBIN3) SALDO ! R P PERF FRMXVO,CBIN14 ! P EDWRT KVOUCH,GTSTRFMT ! P TBT GTTESTFL,TCL433 ! $ P IB GSWBIN6,TCL431,TCL432,TCL433 ! P B TCL43
0x374ef0…375084 Dummy {f00=0x00fc, f01=0x0190, f02=»33 ! P SUB TTLINNR,=D'1' " P CBG TTLINNR,=D'0',TCL430 " $ P DSC0 KVOUCH,RLEAS " F P MOVE TTLINNR,=D'25' " ` P B TCL425 " | PTCL490 " P* WRITE TOTAL LINE " P PERF FRMXVO,CBIN18 " P EDWRT KVOUCH,GTSTRFMT " P DSC0 KVOUCH,RLEAS "
0x375084…375218 Dummy {f00=0x00fc, f01=0x0190, f02=»NS * " z P* # $ P* ADM 1 EJ EDB T[LLERE # ( P* ADM 2 BEHOLDNINGST[LLERE # H * P* ADM 3 OPRETTELSE KONTOPLAN # t , P* ADM 4 OPRETTELSE TEXTREGISTER # " P* ADM 5 KONVERTERING # & P* ADM 6
0x375218…3753ac Dummy {f00=0x00fc, f01=0x0190, f02=» SUPPLEMENT POST # P* ADM 11 SPOERGE $ ( P* SPG 1 BILAG EJ EDB $ < 4 P* SPG 2 BILAG BEHOLDNINGST[LLERE $ h , P* SPG 3 BILAG EDB T[LLERE $ & P* SPG 4 AABNE KASSER $ , P* SPG
0x3753ac…375540 Dummy {f00=0x00fc, f01=0x0190, f02=» SPG 8 SPG. P] POSTERINGER $ * P* SPG 9 -"- GL. REGSET % 0 . P* SPG 10 SPG. PRINT INTERVAL % ^ * P* SPG 11 -"- GL. REGSET % ( P* SPG 14 PRINT TEXTREG. % $ P* SPG 15 SPG LEVR
0x375540…3756d4 (2, 274) Dummy {f00=0x00ff, f01=0x0190, f02=» DAGS DATO % ( P* ADM 15 OPRETTELSE LEVERAND & $ P* ADM 16 DELETE LEVERAND & B $ P* ADM 17 NEW KASSEKONTO & j $ P* ADM 18 NEW VERSURKONTO & " P* ADM 19 REGNEFUNKTION & P* ADM 20 CHECKCIFFER & P*
0x3756d4…375868 Dummy {f00=0x00ff, f01=0x0190, f02=»TOKORT & | P* ADM 25 KVITTERING ' " P* ADM 26 SUM FUNKTION ' 2 $ P* ADM 27 LISTE FUNCTION ' X P* ADM 28 SUBTOTAL ' $ P* ADM 29 TEST AF VOUCHER ' P* ADM 30 CYCLE SLUT ' * P* ADM 31 CYCLE 1 S
0x375868…3759fc Dummy {f00=0x00ff, f01=0x0190, f02=» ' ` " P* ADM 35 DIVERSE TRANS ( P* ( . P* ( 8 P******************** ( B P EJECT ( ^ PADM PROC ADMNO ( l P******************* ( P* ( , P* BRANCH TO SELECTED ADM ROUTINE ( P* ( P******************* ( P TBT GTLOK
0x3759fc…375b90 Dummy {f00=0x00ff, f01=0x0190, f02=»GSWBIN1,ADMNO ( P TBF GTTTPFLG,ADMGTP NO TTP ) 6 P IB GSWBIN1,ADM1,ADM2,ADM3,ADM4,ADM5,ADM6,ADM7, C ) : > P ADM8,ADM9,ADM10,ADM11,ADM12,ADM13,ADM14,ADM15,ADM16, C ) t : P ADM17,ADM18,ADM19,ADM20,ADM21,ADM22,ADM23,ADM24, C ) : P ADM25,ADM26,ADM27,
0x375b90…375d24 Dummy {f00=0x00ff, f01=0x018e, f02=»M00,ADM00, C ) l ( P ADM00,ADM00,ADM00,ADM00,ADM11, C * $ P ADM00,ADM00,ADM00,ADM15,ADM16 * B P B ADM00 * j P* * z PADM002 LOCAL INQUIRIES * P MOVE GSWBIN1,ADMNO * * P CMP GSWBIN1,CBIN11 TEST IF INQUIRIES * P BE ADM11 * P SUB GSW
0x375d24…375eb8 Dummy {f00=0x00ff, f01=0x0190, f02=» * P* EJ-EDB TAELLERE * + PADM1000 + $ P SET GTADMFLG + 4 P TBT GTKASSE,ADM1RET + J P MOVE SPKEY,CBIN2 + f P SET SPPROMPT + P SET GTDYFLG + PADM1010 + P ATTFMT ADMFRM1 + P PERF SPCLRN + ( P IB SPBINW2,ADM1RET,ADM1RET,ADM102
0x375eb8…37604c Dummy {f00=0x00ff, f01=0x0190, f02=»TADMFLG + P CLEAR GTDYFLG , P B ADMRET , & P* , 8 P* , B PADM2 , L P* BEHOLDNINGSTAELLERE * , X PADM2000 , x P SET GTADMFLG , P TBT GTSPGFLG,ADM2001 , P TBT GTKASSE,ADM2RET , P TBT GTTESTFL,ADM2RET , PADM2001 , P S
0x37604c…3761e0 Dummy {f00=0x00ff, f01=0x0190, f02=»00 , PADM2020 - P PERF PACKCL - . P MOVE GTDUPF(CBIN5),=D'2' ADM FUNCTION NO - . * P MOVE GTDUPF(CBIN2),GSWBCD1 COUNTER NO - ` : P MOVE GTDUPF(CBIN1),CBACC(GSWBIN6,CBIN1) REG. KNT. NO - 2 P MOVE GTDUPF(CBIN4),CBACC(GSWBIN6,CBIN3) SALDO - P CLEAR
0x3761e0…376374 (2, 275) Dummy {f00=0x0100, f01=0x0190, f02=» - PADM2030 . 4 P CBE GTDUPF(CBIN1),CBACC(GSWBIN6,CBIN1),ADM2040 . 2 P MOVE CBACC(GSWBIN6,CBIN2),=D'0' CLEAR PERIODE . P PADM2040 . , P MOVE CBACC(GSWBIN6,CBIN1),GTDUPF(CBIN1) . , P MOVE CBACC(GSWBIN6,CBIN3),GTDUPF(CBIN4) . P PERF WRITJT,=W'13
0x376374…376508 Dummy {f00=0x0100, f01=0x0190, f02=»SE KONTOPLAN . $ P B KTOPR BRANCH TO OTHER MODULE / P* / < P* / F PADM4 / P " P PERF TXTOPR TEXT OPRETTELSER / P B ADMRET / P EJECT / PADM5 / P* KONVERTERING * / PADM0500 / P SET CCONVFLG / P CLEAR SPKEYFLG / P TES
0x376508…37669c Dummy {f00=0x0100, f01=0x0190, f02=»05RET / P SET SPPROMPT 0 P MOVE SPKEY,CBIN2 0 $ P ATTFMT KONFRMT 0 > P PERF SPCLRN 0 V * P IB SPBINW2,ADM05RET,ADM05RET,ADM0510 0 j P B ADM0500 0 P WRITE EOF RECORD 0 P AND CLOSE ALL FILES 0 PADM0510 0 . P TBT CCONVERT,ADM051
0x37669c…376830 Dummy {f00=0x0100, f01=0x018e, f02=»CKBUF,CRECNR 0 v P BNOK ADM0500 1 P PERF WRITID,CBIN2,CBIN2 1 * PADM0513 1 J P PERF CLSVOL,CBIN1 1 Z P PERF CLSVOL,CBIN2 1 t P MOVE CRECNR,CBIN1 1 P MOVE CRECBCD,=D'1' 1 P PERF LAMPOF,=W'2047' 1 P TBT C5MDISK,ADM0514 1 P PERF LAMP
0x376830…3769c4 Dummy {f00=0x0100, f01=0x0190, f02=» 1 t PADM0515 2 P PERF SOPRD 2 P IB GSWBIN2, C 2 , 6 P ADM05010,ADM05009,ADM05008,ADM05007,ADM05006, C 2 D 2 P ADM05005,ADM05004,ADM05003,ADM05002,ADM05001 2 ~ PADM05001 2 PADM05002 2 PADM05003 2 PADM05004 2 PADM05008 2 PADM0
0x3769c4…376b58 Dummy {f00=0x0100, f01=0x0190, f02=» P* 3 PADM05005 SOP 5 3 0 P TBT C5MDISK,ADM0515 CONVERSION NOT ALLOWED 3 & , P* EQUIVALENT TO START OF ADM5 MODULE 3 Z $ P PERF LAMPON,=W'1024' LAMP 1 ON 3 " P DSC1 FD01,LOAD,CBIN7 LOAD IBM 3 P BBEOD ADM0535 3 P BNOK ADM0513 3 PADM0
0x376b58…376cec Dummy {f00=0x0100, f01=0x0190, f02=» P BNOK ADM0513 4 $ P PERF LAMPOF,=W'512' LAMP 2 OFF 4 $ P PERF LAMPOF,=W'2047' LAMPS OFF 4 B " P PERF LAMPON,=W'64' LAMP 5 ON 4 j P MOVE GSWBIN6,CBIN1 4 & P MOVE GSWBIN1,=W'128' READ HEADER 4 4 P PERF RAREAD,DK02,=D'2',CPCKBUF,GSWBIN1,GSWBIN6 4
0x376cec…376e80 Dummy {f00=0x0100, f01=0x0190, f02=»ERF WRITID,CBIN3,CBIN1 PRINT HEADER 4 P MOVE GSWBIN6,CBIN0 5 , 0 P MOVE GSWBIN1,=W'40' DELETE AND WRITE HEADER 5 H P MOVE GSWSTR20,CBLANKS 5 | 2 P COPY CPCKBUF,GSWBIN1,CBIN20,GSWSTR20,GSWBIN6 5 PADM0540 5 $ P PERF SQWRIT,FD01,=D'1',CPCKBUF 5 P
0x376e80…377014 (2, 276) Dummy {f00=0x0100, f01=0x0190, f02=» 5 | P ADD CRECNR,CBIN1 6 P MOVE GSWBIN1,=W'128' 6 " 2 P PERF RAREAD,DK02,=D'2',CPCKBUF,GSWBIN1,CRECNR 6 @ P BNOK ADM0560 NOT OK 6 v P TBT CERRORFL,ADM0560 6 * P CBE GTWBCD1,=D'4',ADM0565 END OF DATA 6 P MOVE GSWSTR20,=C'SLUTD' 6 P MOVE GSWB
0x377014…3771a8 Dummy {f00=0x0100, f01=0x0190, f02=»578 6 ~ * P* THIS PART CAN BE USED TO CHANGE 7 $ P* TTLBNR DURING CONVERSION. 7 : , P* CAN ONLY BE USED IN DEBUGGER MODE 7 b P MOVE GSWSTR20,=C'&04' 7 P MOVE GSWBIN5,=W'30' 7 P MOVE GSWBIN2,CBIN0 7 8 P MATCH CPCKBUF,GSWBIN5,CBIN20,GS
0x3771a8…37733c Dummy {f00=0x0100, f01=0x0190, f02=»KBUF,GSWBIN5 7 r P MOVE GSWBCD5,GSWSTR20 8 P ADD GSWBCD5,GSWBCD6 8 2 P MOVE GSWSTR20,GSWBCD5 8 N . P COPY CPCKBUF,GSWBIN5,CBIN5,GSWSTR20,CBIN1 8 l PADM0578 8 $ P PERF SQWRIT,FD01,=D'1',CPCKBUF 8 P BOK ADM0550 8 PADM0568 8 * P PERF LAMPOF,=
0x37733c…3774d0 Dummy {f00=0x0100, f01=0x018e, f02=»',CPCKBUF WRITE SLUTD 8 z P BNOK ADM0568 9 P PERF WRITID,CBIN3,CBIN2 9 4 P B ADM0513 LAMPS ON 9 T PADM0560 NOT OK 9 p 0 P PERF WRITID,CBIN4,CBIN2 PRINT FIRST PART OF 9 P LAST CORRECT RECORD 9 P SET SPPROMPT 9 P ATTFMT KONV4FMT 9 P
0x3774d0…377664 Dummy {f00=0x0100, f01=0x0190, f02=» PA0561 MAK : P B ADM0560 : P* : * PA0562 SLUT, CONTINUE : 4 P READ AGAIN : R P SUB CRECNR,CBIN1 : h P CLEAR CERRORFL : P B ADM0550 : P* : PA0563 KRE, TRY NEXT : P SET CERRORFL : P B ADM0550 : P* : PA0
0x377664…3777f8 Dummy {f00=0x0100, f01=0x0190, f02=»CRECNR : $ P SUB GSWBCD3,=D'2' SET UP SLUTD ; P PERF SLUTID,GSWBCD3 ; 6 P B ADM0570 ; R P* ; d P* ; n P* ; x * P* EQUVALENT TO END OF ADM5 MODULE ; P* ; P* ; ADM05006 SOP 6 ; * % PERF ASGVOL,CBIN1 ASSIGN SYSTEM DISK ;
0x3777f8…37798c Dummy {f00=0x0100, f01=0x0190, f02=»* ; P* < ADM05007 SOP 7 < PERF ASGVOL,CBIN1 < , BNOK ADM0513 < F " PERF BCKUP,=W'2' WITH BACKUP < BNOK ADM0513 < B ADM05RET < * < * < * < * < P* < PADM05RET < P PERF LAMPOF,=W'2047' <
0x37798c…377b20 Dummy {f00=0x0100, f01=0x0190, f02=»0 < P* = P* = PADM7 = P* = * P* JUMP TO 3270 ONLINE = 4 P PERF ONLINE = V P B ADMRET = j P* = | P* = PADM8 = P* = P* DUMMY *** = P B ADMRET = P* = P* = PADM9 = P********************
0x377b20…377cb4 (2, 277) Dummy {f00=0x0100, f01=0x0190, f02=» = z , P PERF FRMXSP,CBIN13 ASK FOR DEFAULT LINE > P SET SPPROMPT > 8 P PERF SPCLRN > N * P IB SPBINW2,ADM09RET,ADM09RET,ADM0910 > b P B ADM0900 > PADM0910 > P CLEAR SPPROMPT > P MOVE GTDFLIN,GSWBCD5 > PADM09RET > P CMP CBIN0,CBIN0
0x377cb4…377e48 Dummy {f00=0x0100, f01=0x0190, f02=» 2 P* SET OR CLEAR SUPPLEMENT INFORMATION ? P* ? : P******************** ? D P TBT TTSUPFLG,SUPL10 ? ` P SET TTSUPFLG ? | P MOVE TTSUPMRK,=C'S' ? P B SUPLOK ? PSUPL10 ? P MOVE TTSUPMRK,=C' ' ? P CLEAR TTSUPFLG ? PSUPLOK
0x377e48…377fdc Dummy {f00=0x0100, f01=0x0190, f02=» ? PADM11 @ P* LOCAL INQUIRIES * @ P TBT GTLOKSPG,SPGL08 @ 2 PADM1100 @ N P ATTFMT SPGFM00 @ ^ P SET SPPROMPT @ v P SET GTSPGFLG @ P MOVE GSWSTR9,=C'SUBTOTAL ' @ P PERF SPCLRA @ * P IB SPBINW2,ADM11RET,ADM11RET,ADM1110 @ P
0x377fdc…378170 Dummy {f00=0x0100, f01=0x0190, f02=» C @ h , P SPGL05,SPGL06,SPGL07,SPGL08,SPGL09, C A , P SPGL10,SPGL11,SPGL12,SPGL13,SPGL14, C A < P SPGL15,SPGL16 A l P B ADM1100 A PADM11GTP A 6 P IB GSWBIN1,SPGL00,SPGL00,SPGL00,SPGL04,SPGL00, C A , P SPGL00,SPGL00,SPGL00,SPGL00,SPGL00, C
0x378170…378304 Dummy {f00=0x0100, f01=0x0190, f02=» B ADM11RET A P* B PSPGL02 B P PERF CLBEH B , P B ADM11RET B @ P* B T PSPGL03 B ^ P PERF CLEDB B l P B ADM11RET B P* B PSPGL04 B P MOVE GSWBCD3,CTASKNR B P SET SPPROMPT B P ATTFMT SPGFM04 B P PERF SPCLRA B
0x378304…378498 Dummy {f00=0x0100, f01=0x0190, f02=»ST[LLERE B v P B ADM11RET C PSPGL07 C $ P MUL TTEJEDB,=D'-1' VEND C 2 P MOVE GSWBCD6,TTCASH C R P ADD GSWBCD6,TTEJEDB C n P SET SPPROMPT C P ATTFMT SPGFM17 C P PERF SPCLRA C $ P MUL TTEJEDB,=D'-1' VEND TILBAGE C P B ADM11RET C P
0x378498…37862c Dummy {f00=0x0100, f01=0x018e, f02=»8MAK ONLY IF 'KASSE FUNCTIONS C P CLEAR GTGLSPG D & PSPG0805 D < SET SPPROMPT D L " ATTFMT SPGFM08 INQUIRY FORMAT D b PERF SPCLRA D < 7* GTLBNRIN CONTAINS FIRST (OR ONLY) TRANSACTION D 2 -* OF INTEREST (EKSP. LB.NR.
0x37862c…3787c0 Dummy {f00=0x0100, f01=0x0190, f02=» * E * % IB SPBINW2,SPG08MAK,SPG08MAK,SPG0810 E P B SPG0805 E < * E N $ SPG0810 SPG-CONDITION ENTERED E X P MOVE SPKEY,CBIN3 E SET GTLOKSPG E P TBT GTGLSPG,SPG0815 E 0 P MOVE GTRECNR,CRECNR POINT TO START OF DSET E P B SPG08
0x3787c0…378954 (2, 278) Dummy {f00=0x0101, f01=0x0190, f02=» CBNG GTRECNR,CBIN1,SPG08RET E P TBT GTGLSPG,SPG0825 F $ P NEW REGSET F @ " P CBNL GTRECNR,CRECNR,SPG08RET F V ( P PERF RGREAD,DK02,=D'2' READ RECORD F | " P BNOK SPG0820 IF TRANS 11, OR F P NOT SAME MACHINE, OR F P DISK ERROR F P B S
0x378954…378ae8 Dummy {f00=0x0101, f01=0x0190, f02=» BNOK SPG0820 IF TRANS 11, OR F P NOT SAME MACHINE, OR G & P DISK ERROR G F PSPG0828 G & P CBE GTREGNR,=D'12',SPG0820 TR 12 G l * G * SAME MACHINE: G * GTREGNR TRANSTYPE G ( $* GTREGDEX TRANSTYPE - INDEX G
0x378ae8…378c7c Dummy {f00=0x0101, f01=0x018e, f02=» SAT FOR PRESENT FIELDS G ~ * &* GTDUPF - - - - H * &* GTREGF - - - - H N 2 -* DEB/KRE RELEVANT ROUTINE PERFORMED H | * GTDBKRC H * GTDBKRS H * TTDKBCD H * TTDKD
0x378c7c…378e10 Dummy {f00=0x0101, f01=0x0190, f02=» H d $ P BL SPG0830 WANTED EKSP. PASSED I BE SPG0840 FOUND I 0 P* NOT YET FOUND I J P* JUMP TO FIND RECORD I f P MOVE GSWBIN1,GTLBNR I " P SUB GTRECNR,GSWBIN1 GTRECNR= I $ P MOVE GSWBIN1,GTLBNRIN GTRECNR - I . P ADD GTRECNR,GSWBIN1 (
0x378e10…378fa4 Dummy {f00=0x0101, f01=0x0190, f02=»EARCH FIELD I * J SPG0840 J , ( CBE GSWBCD6,=D'0',SPGFOUND RECORD FOUND J . * J ^ SPG0850 CHECK FIELD J h * % MOVE GSWBIN1,GSWBCD6 GET FIELD INDEX J " MOVE GSWBIN2,CFLTDEX(GSWBIN1) J " MOVE GSWBIN2,GTUSED(GSWBIN2) J . * CBE GSW
0x378fa4…379138 Dummy {f00=0x0101, f01=0x0190, f02=» NOT PRESENT J * K " SPG0860 CHECK FIELD CONTENT K " MOVE GSWBIN2,CFLTDEX(GSWBIN1) K D * % CBNE GSWBCD7,GTDUPF(GSWBIN2),SPG0820 K j * K * K $ SPGFOUND A WANTED RECORD FOUND K * K P MOVE TTDBKRM,=C'K' K P CBE TTDKDEX,C
0x379138…3792cc Dummy {f00=0x0101, f01=0x0190, f02=»(CBIN6),CBIN0,SPG0880 K P CLEAR TTSUPFLG L P MOVE TTSUPMRK,=C' ' L 6 PSPG0880 L R * L b PERF TRPAGE L l " SET GTDIVTR SET DIVERSE TRANS L P CLEAR GTREGFLG L * L B ADM11RET L * L PSPG08RET L P MOVE SPKEY,CBIN1
0x3792cc…379460 Dummy {f00=0x0101, f01=0x0190, f02=» P* M PSPGL09 INQ. OLD REGSET M $ P TBF CGLREGFL,SPG09MAK ALLOWED? M . * P TBF GTKASSE,SPG09MAK ONLY IF 'KASSE' M V $ P SET GTGLSPG INDICATE OLD REGSET M P B SPG0805 M PSPG09MAK M P B ADM11RET M P* M P* M P* M 2 P*
0x379460…3795f4 (2, 279) Dummy {f00=0x0101, f01=0x0190, f02=»LE M x P TEST TTLSTFLG N P BNZ SPG10MAK NOT IN LISTE N P TEST GTKASSE N B * P BZ SPG10MAK ONLY IF 'KASSE FUNCTIONS N X * P CLEAR GTGLSPG INDICATE CURRENT REGSET N PSPG1005 N P SET SPPROMPT N " P ATTFMT SPGFM10 SCREEN FORMAT N P PERF SP
0x3795f4…379788 Dummy {f00=0x0101, f01=0x0190, f02=»SPG10MAK,SPG10MAK,SPG1010 N P B SPG1005 O " P* O 4 PSPG1010 O > P SET GTLOKSPG O N ( P CLEAR TTTSTFLG INITIATE FIRST TIME O d P TBT GTGLSPG,SPG1015 O . P MOVE GTRECNR,CRECNR POINT TO LAST RECORD O P B SPG1020 O PSPG1015 O P MOVE GT
0x379788…37991c Dummy {f00=0x0101, f01=0x0190, f02=» GTGLSPG,SPG1025 O P NEW REGSET P P CBNL GTRECNR,CRECNR,SPG1090 P . ( P PERF RGREAD,DK02,=D'2' READ RECORD P R P BNOK SPG1020 IF TR 11, OR P ~ P NOT SAME MACHINE, OR P P DISK ERROR P P B SPG1028 P PSPG1025 P P OLD REGSET P
0x37991c…379ab0 Dummy {f00=0x0101, f01=0x0190, f02=»CHINE, OR P P DISK ERROR Q PSPG1028 Q ( & P CBE GTREGNR,=D'12',SPG1020 TR 12 Q 8 ( P CBL GTLBNR,GSWBCD7,SPG1090 TOO FAR Q b . P CMP GTLBNR,GTLBNRIN ACTUAL - WANTED EKSP. Q $ P BL SPG1040 WANTED EKSP. PASSED Q P BE SPG1040 FOUND Q P*
0x379ab0…379c44 Dummy {f00=0x0101, f01=0x0190, f02=»ECNR,GSWBIN1 ( GTLBNR - GTLBNRIN ) Q P B SPG1022 R * P* R < PSPG1040 R F P MOVE TTDBKRM,=C'K' R V P CBE TTDKDEX,CBIN1,SPG1060 R r P MOVE TTDBKRM,=C'D' R PSPG1060 R P SET TTSUPFLG R P MOVE TTSUPMRK,=C'S' R & P CBNE GTUSED(CBIN6),CB
0x379c44…379dd8 Dummy {f00=0x0101, f01=0x018e, f02=» * P PERF SPLIN8,CBIN5,CBIN2 WRITE 'BILAG' S P PERF GRASPV S 2 P PERF CLEAR8 S F P MOVE TTLINNR,=D'6' LINE 25 S Z P MOVE TTCYM,=C'K' KVIT S ~ PSPG1080 S P MOVE GSWBIN1,TTLINNR S . P DSC1 KVOUCH,POS,GSWBIN1 POSITION VOUCHER S P PERF FRMTKV
0x379dd8…379f6c Dummy {f00=0x0101, f01=0x0190, f02=» S x . P CBG GSWBIN1,CMAXLIN,SPG1090 NO MORE LINES T " P SUB GTLBNRIN,=D'1' NEXT LBNR T : P B SPG1020 T ` PSPG1090 T r P TBF TTTSTFLG,SPG10RET T P CLEAR TTSUPFLG T P MOVE TTSUPMRK,=C' ' T P MOVE TTCYM,=C' ' T P WAIT KVOUCH T P DSC0
0x379f6c…37a100 Dummy {f00=0x0101, f01=0x0190, f02=»VAL, OLD REGSET T | $ P TBF CGLREGFL,SPG11MAK ALLOWED? U & P TBT GTCYFLG,SPG11MAK NOT IN CYCLE U @ ( P TBT TTLSTFLG,SPG11MAK NOT IN LISTE U j * P TBF GTKASSE,SPG11MAK ONLY IF 'KASSE' U P SET GTGLSPG U P B SPG1005 U PSPG11MAK U P B ADM11RET U
0x37a100…37a294 (2, 280) Dummy {f00=0x0103, f01=0x0190, f02=»RET U P* V P* V PSPGL14 PRINT TEXTREGISTER V P PERF TXTPRT V D P B ADM11RET V X P* V l P* V v PSPGL15 SPG. LEVERAND. V P PERF LEVSPG V P B ADM11RET V P* V P* V PSPGL16 PRINT LEVERAND. V P PERF LEVPRT
0x37a294…37a428 Dummy {f00=0x0103, f01=0x0190, f02=» B ADMRET V P* W P* W PADM12 W & P* FLOPPY DISC EXCHANGE * W 4 P TBT GTTESTFL,ADM12RET W T ( P TBF GTMASTFL,ADM1250 DISKETTE SKIFT W r P SET SPPROMPT W P ATTFMT ADM12FRM W P PERF SPCLRA W * P IB SPBINW2,ADM12RET,ADM12RET,ADM1210 W
0x37a428…37a5bc Dummy {f00=0x0103, f01=0x018e, f02=»OR NON MASTER W P* X PADM1250 X & P TBF CSKIFTFL,FDEXIT T=CHANGE DISK X 0 P TBF CWFLAG,FDEXIT X Z . P PERF SPLIN8,CBIN8,CBIN2 'DISKETTE SKIFT' X t PFD10 X P DELAY CBIN20 WAIT A SECOND X P TBT CSKIFTFL,FD10 FINISHED? X P YES X P
0x37a5bc…37a750 Dummy {f00=0x0103, f01=0x0190, f02=» P PERF CLEAR8 Y P DELAY CBIN20 Y P CALL ABORT,KJTAPE Y . P* Y H PFDEXIT Y R PADM12RET Y ` P B ADMRET Y p P* Y P* Y PADM13 Y 2 P********************************************* Y P* Y & P* SET CLEAR AUTOSUM FLAG Y
0x37a750…37a8e4 Dummy {f00=0x0103, f01=0x0190, f02=»M Y x P PERF SUM INITIATE SUM Z P B ADM13OK Z ( PADM13CL Z : " P CLEAR GTASUMFL CLEAR AUTOSUM Z J PADM13OK Z p P CMP CBIN0,CBIN0 Z P B ADMRET Z P* Z P* Z PADM14 Z 4 P*********************************************** Z P* Z
0x37a8e4…37aa78 Dummy {f00=0x0103, f01=0x018e, f02=» SET GTDYFLG Z P SET SPPROMPT [ P SET SPME [ * P MOVE GSWBCD3,=X'FF' [ < PADM1410 [ X P ATTFMT OPENFRM [ h P PERF SPCLRN [ * P IB SPBINW2,ADM14000,ADM14000,ADM14RET [ P B ADM14000 [ PADM14RET [ P CLEAR SPME [ P CLEAR GTDYFLG
0x37aa78…37ac0c Dummy {f00=0x0103, f01=0x0190, f02=» PADM16 P PERF LEVDEL DELETE LEVERAND P B ADMRET 6 P* H P* R PADM17 0 P******************************************* j P* ( P* SET NEW 'KASSEKONTONR' P* 0 P******************************************
0x37ac0c…37ada0 Dummy {f00=0x0103, f01=0x0190, f02=»OVE GTDUPF(CBIN2),=D'0' . P MOVE GTDUPF(CBIN5),=D'17' ADM FUNCTION NO ] P MOVE GTDUPF(CBIN1),TTCASHAC ] R P MOVE GTDUPF(CBIN4),TTSTCASH ] v P ATTFMT ADM17FRM ] P PERF SPCLRN ] & P CBE GTDUPF(CBIN1),=D'0',ADM17000 ] * P IB SPBINW2,ADM17RET,ADM
0x37ada0…37af34 (2, 281) Dummy {f00=0x0103, f01=0x0190, f02=»WRITJT,=W'13' ] PADM17RET ^ P B ADMRET ^ & P* ^ 8 P* ^ B PADM18 ^ L P* SET NEW VERSURKONTONR ^ Z PADM18000 ^ z P VERSUR KONTONR ^ P TBT GTKASSE,ADM18RET ^ P MOVE SPKEY,CBIN2 ^ P SET SPPROMPT ^ P ATTFMT ADM18FRM ^
0x37af34…37b0c8 Dummy {f00=0x0103, f01=0x018e, f02=» P B ADMRET _ P* _ P* _ PADM19 _ * P******************** _ 8 P* _ T P* CALCULATOR FUNCTION _ ^ P* _ P******************** _ PCALCBEG _ P MOVE SPKEY,CBIN1 _ * P MOVE GSWBCD2,=D'0' TOTAL=0 _ & P MOVE GSW
0x37b0c8…37b25c Dummy {f00=0x0103, f01=0x0190, f02=» _ P PERF SPCLRA ` P B CALCFRST ` PCALCNEXT ` 0 P CLEAR SPPROMPT ` @ P PERF SPCLRN ` X PCALCFRST ` l 2 P IB SPBINW2,CALCNEXT,CALCNEXT,CALCADD,CALCNEG ` | P CBE SPBINW2,=W'7',CALCSUB ` P CBE SPBINW2,=W'15',CALCTOT ` P B CALCNEXT `
0x37b25c…37b3f0 Dummy {f00=0x0103, f01=0x0190, f02=»TA,CBIN5 ` $ P PERF WTALLY NUMBER ON TALLY a P B CALCNEXT a 8 PCALCSUB a L P MOVE GSWBCD6,GSWBCD2 a P MOVE GSWSTR9,=C'SUBTOTAL ' a z P PERF FRMXTA,CBIN3 a & P PERF WTALLY SUBTOTAL ON TALLY a P B CALCNEXT a PCALCTOT a P M
0x37b3f0…37b584 Dummy {f00=0x0103, f01=0x018e, f02=»ROMPT a P ATTFMT CALFRM05 b " P PERF SPCLRA TOTAL ON SCREEN b & P CBE SPBINW2,=W'3',CALCBEG b L P B ADMRET b n P* b P* b PADM20 b 8 P**************************************************** b P* b 0 P* CONTROLDIGIT-VALUE
0x37b584…37b718 Dummy {f00=0x0103, f01=0x0190, f02=» P WAIT KTALLY c P ATTFMT CCDFRM01 c P PERF SPCLRA GET NUMBER c 4 " P CBNE SPBINW2,=W'3',CALCDRET c V P CBE GSWBCD5,=D'10',CALCD06 c | 6 P EDWRT .NW,KTALLY,CCDFRM03 CONTROLDIGIT ON TALLY c P CLEAR GTDYFLG c PCALCD05 c P ATTFMT
0x37b718…37b8ac Dummy {f00=0x0103, f01=0x0190, f02=» GTDYFLG ERROR (CONTR.DIGIT=10) c P B CALCD05 d ( P* d : PCALCDRET d D P CLEAR GTDYFLG d T P B ADMRET d j P* d | P* d PADM21 d P******************** d P* d " P* SET/CLEAR TEST MODE d " P* (NO WRITE ON DISKS
0x37b8ac…37ba40 Dummy {f00=0x0103, f01=0x0190, f02=» P TBT GTMASTFLG,ADM21RET e P TBT GTKASSE,ADM21RET e $ P TBT GTTESTFL,ADM2150 e B P PERF WRITJT,=W'9' e ` P PERF TCONFW,TTASKNR e z P MOVE GTTESTMK,=C'T' e P SET GTTESTFL e P B ADM21RET e PADM2150 e P PERF WRITJT,=W'10' e P
0x37ba40…37bbd4 (2, 282) Dummy {f00=0x0103, f01=0x0190, f02=»JECT e PADM22 f P********** f P* f , P* f 6 P********** f @ , P TBF CADM22F,ADM22RET FUNCTION ALLOWED? f R ( P TBT GTKASSE,ADM22RET KASSE CLOSED? f P MOVE SPKEY,CBIN2 f P MOVE GSWBCD5,TTSTLBNR f P MUL GSWBCD5,=D'-1' f PADM220
0x37bbd4…37bd68 Dummy {f00=0x0103, f01=0x018e, f02=» PADM2210 g P MUL GSWBCD5,=D'-1' g P MOVE TTSTLBNR,GSWBCD5 g 0 PADM22RET g N P B ADMRET g ^ P* g p P* g z P EJECT g PADM23 g P* MODPOSTERING * g P PERF MODP g P B ADMRET g P* g PADM24 g P* KONTOKORT * g
0x37bd68…37befc Dummy {f00=0x0103, f01=0x0190, f02=» g P* SUMMARIZE * h P PERF SUM h P B ADMRET h 0 P* h B PADM27 h L P* LISTE * h Z P PERF LSTINT h l P B ADMRET h P* h PADM28 h P* SUBTOTAL * h P PERF SUBTOT h P B ADMRET h P* h P EJECT h PADM29 h
0x37befc…37c090 Dummy {f00=0x0103, f01=0x018e, f02=» RLEASE h ~ , P PERF SPLIN8,CBIN5,CBIN2 ASK FOR 'BILAG' i P PERF GRASPV AND GRASP i @ P PERF CLEAR8 i ^ P MOVE GSWBIN1,CVOUTOP i r PADM2910 i P CBL GSWBIN1,CBIN6,ADM29RET i . P DSC1 KVOUCH,POS,GSWBIN1 POSITION ON LINE i " P PERF FRMXVO,CBIN1
0x37c090…37c224 Dummy {f00=0x0103, f01=0x0190, f02=» i | P B ADMRET j P* j P EJECT j $ PADM30 j 2 P* CYCLE END j @ P PERF CYK,CBIN10 j T P B ADMRET j l P* j ~ PADM31 j P* CYCLE START * j P PERF CYK,CBIN1 j P B ADMRET j P* j PADM32 j P* STABEL START * j P
0x37c224…37c3b8 Dummy {f00=0x0103, f01=0x0190, f02=» PAUSE IN CYCLE,STABEL j P PERF CYK,CBIN4 k P B ADMRET k 6 P* k H PADM35 k R P* VARIOUS TRANSACTIONS * k ` P PERF DIVTR k P B ADMRET k P* k P EJECT k P* k P* k P* k P* END OF ADM FUNCTIONS k P* k P
0x37c3b8…37c54c Dummy {f00=0x0103, f01=0x0190, f02=»************************************ k P* l , . P* TR2GEN GENERATES A TRANSACTION 2 l 6 P* l h 8 P**************************************************** l r PTR2GEN PROC DBKR l P MOVE TTDKDEX,DBKR l P CBNE TTDKDEX,=W'0',TR2DBKR l P MOV
0x37c54c…37c6e0 Dummy {f00=0x0103, f01=0x0190, f02=» l t P EDWRT SCREEN,CLFRM02 m P PERF SLUT m & P RET m 8 P PEND m D P EJECT m R < P******************************************************** m ` P* m < P* WAHEAD - GRASP AND WRITE HEADLINE ON VOUCHER m P* m < P********************
0x37c6e0…37c874 (2, 283) Dummy {f00=0x0104, f01=0x0190, f02=»F GRASPV m P DSC1 KVOUCH,POS,CVOUTOP n P PERF CLEAR8 n 0 P PERF FRMXVO,VOXDEX n D P EDWRT KVOUCH,GTSTRFMT n ` P RET n ~ P PEND n P EJECT n > P********************************************************* n P* n ( P* WALINE WRITE A
0x37c874…37ca08 Dummy {f00=0x0104, f01=0x0190, f02=»,LINDEX n P EDWRT KVOUCH,GTSTRFMT o P SUB TTLINNR,=D'1' o . P RET o H P PEND o T P* o b P EJECT o l PSKIFT PROC o z P************************* o P* o : P* SKIFT - THIS PROCEDURE TAKES HAND OF SHIFT o , P* OF DISK
0x37ca08…37cb9c Dummy {f00=0x0104, f01=0x0190, f02=»IED? o v " P DELAY CBIN2 YES DELAY 200 MS p P B SK00 p 2 PSK10 p B P SET CPFLG DIUSC FREE p N P SET CSKIFTWN p l . P PERF SPLIN8,CBIN8,CBIN2 'DISKETTE SKIFT' p P TBF CWFLAG,SK15 p P SUB CRECBCD,=D'1' p & P PERF SLUTID,CRECBCD WRITE 'SLUTD'
0x37cb9c…37cd30 Dummy {f00=0x0104, f01=0x0190, f02=»,=W'2047' p P ADD CVOLNO,=D'1' q PSK120 q , P PERF LAMPON,=W'512' LAMP 2 q : P PERF SOPRD q ^ P CBNE GSWBIN2,CBIN9,SK120 q r P PERF ASGVOL,CBIN2 q P BNOK SK120 q P PERF LAMPOF,=W'2047' q P MOVE CRECNR,CBIN1 q P MOVE CRECBCD,
0x37cd30…37cec4 Dummy {f00=0x0104, f01=0x0190, f02=» CWFLAG,SK150 q P MOVE CRECBCD,=D'1' r P PERF WRITID,CBIN2,CBIN1 r 2 PSK150 r R P PERF CLEAR8 r ` P PERF WRITJT,=W'11' r t P CLEAR CSKIFTFL r P CLEAR CSKIFTWN r P CLEAR CPFLG DISC FREE r P RET r P PEND r P EJECT r P
0x37cec4…37d058 Dummy {f00=0x0104, f01=0x0190, f02=». PANEL. r t P* CALL - PERF LAMPON,<$NR> s P* s 2 : P* THE LAMPS ARE FIRED CORRESPONDING TO 1-BITS IN PARAM s < P* s z . P***************************************** s P MOVE GSWBIN2,$NR s P DSC1 DSSOPO,ON,GSWBIN2 s P RET s P PEND s
0x37d058…37d1ec Dummy {f00=0x0104, f01=0x0190, f02=»LAMPS ON OPR. PANEL s z P* CALL - PERF LAMPOF,<$NR> t P* t > B P* THE LAMPS ARE EXTINGHUISHED CORRESPONDING TO 1-BITS IN PARAM t H P* t 0 P******************************************** t P MOVE GSWBIN2,$NR t P DSC1 DSSOPO,OFF,GSWBIN2 t P R
0x37d1ec…37d380 Dummy {f00=0x0104, f01=0x0190, f02=»MS OPERATOR PANEL t | P* u 2 P********************************************* u $ PSOPR10 u Z P MOVE GSWBIN1,CBIN1 u h , P KI DSSOPI,SOPINP,DUMTAB,GSWBIN1,GSWBIN2 u P BNOK SOPR10 u P RET u P PEND u P* u P EJECT u PSTRTWR PROC u
0x37d380…37d514 (2, 284) Dummy {f00=0x0105, f01=0x0190, f02=»*********** u P PERF STRTID,CVOLNO v * P PERF RAWRIT,DK02,=D'2',CPCKBUF,CRECNR v 0 P BNOK STRTNOK v ^ P ADD CRECNR,CBIN1 v t P PERF RADEL,DK02,CRECNR v P BNOK STRTNOK v P CMP CBIN0,CBIN0 OK v P RET v PSTRTNOK v P CMP CBIN1,C
0x37d514…37d6a8 Dummy {f00=0x0105, f01=0x0190, f02=»SETS UP A START ID IN PACK BUFFER v | P* w * P* CALL - PERF STRTID,<VOLID> w 4 P* w X P******************** w b P SET CSWFLAG w ~ P CBE CRECLGD,=W'128',STRT10 w P CLEAR CSWFLAG w PSTRT10 w P MOVE GSWBIN6,CBIN2 w P EDIT CPCKBUF,PCKI
0x37d6a8…37d83c Dummy {f00=0x0105, f01=0x0190, f02=»CKBUF,GSWBIN1,CBIN12,GSWSTR20,CBIN0 w PSTRTRET x , P RET x < P PEND x H P EJECT x V PSLUTID PROC SLUTNO x d P******************** x ~ P* x 2 P* SLUTID - SETS UP A SLUTD IN CPCKBUF x P* x P* x P******************** x
0x37d83c…37d9d0 Dummy {f00=0x0105, f01=0x0190, f02=»D,SLUTNO x P EDIT CPCKBUF,SLUTFRM y P RET y . P PEND y : P EJECT y H PBCKUP PROC $OPT y V P PLIT $OPT y n ******************** y * y : 6* THIS PROCEDURE TAKES CARE OF ADMINISTRATION y * OB BACKUP y * y 0
0x37d9d0…37db64 Dummy {f00=0x0105, f01=0x0190, f02=» * z * z ******************** z * z 4 MOVE CRECNR,CBIN1 z > MOVE CRECBCD,=D'1' z X $ ADD CVOLNO,=D'1' NEXT VOLUME NO z t & " PERF CNFWRT REWRITE CONFIGURATION z SUB CVOLNO,=D'1' z $ CBE CBIN1,$OPT,BCK100 NO BACKUP z
0x37db64…37dcf8 Dummy {f00=0x0105, f01=0x0190, f02=»24' LAMP 1 z ~ PERF LAMPON,=W'128' LAMP 4 { PERF LAMPON,=W'16' LAMP 7 { 6 P TBF CGLREGFL,BCK010 { X P PERF LAMPON,=W'512' LAMP 2 { t BCK010 { PERF SOPRD READ SOP LAMPS { IB GSWBIN2, C { , ( BSOP10,BSOP09,BSOP08,BSOP07,BSOP06, C
0x37dcf8…37de8c Dummy {f00=0x0105, f01=0x0190, f02=» B BCK010 OTHER LAMPS { P* | BSOP01 BACKUP FD999001 | ( $ PERF LAMPOF,=W'2047' LAMPS OFF | H PERF LAMPON,=W'1024' LAMP 1 | p & P MOVE GSWBIN5,=W'32' NO OF RECORDS | 4 P PERF BACKUP,DK01,=D'1',GSWBIN5,CCONBUF0,=W'199' | BNOK BCK050 |
0x37de8c…37e020 Dummy {f00=0x0105, f01=0x0190, f02=»ER AREA | h B BCK000 } BCK050 } " 4 / PERF CONRDX,CCONBUF0,CBIN1 RESTORE BUFFER AREA } 0 B BCK005 } h P* } z & PBSOP02 COPY FD999002 TO FD999005 } " P TBF CGLREGFL,BCK010 ALLOWED? } P B BCK02 } P* } P***** } & PBCK02 COPY
0x37e020…37e1b4 (2, 285) Dummy {f00=0x0105, f01=0x0190, f02=»,CBIN2 ASSIGN REGSET } P BNOK BCK0290 ~ P MOVE CGLRECNR,CBIN0 ~ 2 PBCK0250 ~ N P ADD CGLRECNR,CBIN1 ~ ^ * P MOVE GSWBIN1,=W'128' LENGTH OF RECORD ~ z 4 P PERF RAREAD,DK02,=D'2',CPCKBUF,GSWBIN1,CGLRECNR ~ P BNOK BCK0270 ERROR ~ & P CBE GTWBCD1
0x37e1b4…37e348 Dummy {f00=0x0105, f01=0x0190, f02=»IN5 ~ b P BE BCK0280 SLUTD , P PERF RAWRIT,DK05,=D'5',CPCKBUF,CGLRECNR & P BOK BCK0250 V PBCK0270 ERROR j P PERF LAMPON,=W'2' LAMP 10 PBCK0280 FINISH P MOVE TTGLREC,CGLRECNR , P PERF TCONFW,CBIN1 SAVE LAST RECORD NO.
0x37e348…37e4dc Dummy {f00=0x0105, f01=0x0190, f02=» BCK000 * BSOP04 BACKUP FD999004 $ PERF LAMPOF,=W'2047' LAMPS OFF : P PERF LAMPON,=W'128' LAMP 4 b 2 P PERF BACKUP,DK04,=D'4',CKTMAX,CKTBUF,=W'128' BNOK BCK005 NOK B BCK000 OK * BSOP07 FINISH $
0x37e4dc…37e670 Dummy {f00=0x0105, f01=0x0190, f02=»BIN2 BNOK BCKNOK ADD CVOLNO,=D'1' PERF STRTWR : BOK BCKOK N SUB CVOLNO,=D'1' ` PERF LAMPON,=W'2' LAMP 10 z B BCKNOK * BCKNOK CMP CBIN1,CBIN0 NOK RET * BCKOK P
0x37e670…37e804 Dummy {f00=0x0105, f01=0x018e, f02=»*************************** z P* $ P* FORMATS . P* H 6 P************************************************* R PDUMTAB KTAB EORKY1 P* PFMTFKI FRMT P FNL P FKI 1 P FMEL 'B',TSWBCD2 P FMEND P*
0x37e804…37e998 Dummy {f00=0x0105, f01=0x0190, f02=» PINIT10 P FILLR ' ',40 P FILLR ' ',40 ( P FILLR ' ',48 > P FMEND T P* b PKONFRMT FRMT l P FSL P FCOPY =C'KONVERTERING ' P FILLR X'07',1 P FLINK FMTFKI P FMEND P* PKONV4FMT FRMT P F
0x37e998…37eb2c Dummy {f00=0x0105, f01=0x0190, f02=» P FMEL '999999',CMASKDAT P FMEL 'B99999',GSWBCD3 ( P FMEND F P* T PSLUTFRM FRMT ^ P FCOPY =C'SLUTD' r P FMEL '99999',CRECBCD P FMEND P* PSTARTFR FRMT P FCOPY =C'Z300 ' " P FMEL '9999',CKMDNR KOMMUNE
0x37eb2c…37ecc0 Dummy {f00=0x0105, f01=0x0190, f02=» ',6 P FMEND P* PADFRM01 FRMT $ P FSL 8 P FCOPY ='KLAR ' D P FCOPY ='ADM ' P FKI 12,MINL=1,MAXL=2 t P FMEL 'ZZ',GSWBCD3 P FMEND P* P* POPENFRM FRMT P FSL P FCOPY ='ADM ' P F
0x37ecc0…37ee54 (2, 286) Dummy {f00=0x0105, f01=0x0190, f02=»DAGS-DATO' . P FKI 11,MINL=6,MAXL=6,ME,SCHK=2,REWRT,NCLR P FMEL '99E-99E-99',CMASKDAT D P FNL h P FCOPY =C'DAG NR' t & P FKI 11,MINL=1,MAXL=3,ME,APPL=102 P FMEL 'ZZZ',CRELDAY P FNL POPFR10 P FCOPY ='POST-DATO' 2
0x37ee54…37efe8 Dummy {f00=0x0105, f01=0x0190, f02=» FBT GTSPGFLG,ADML0001 P FCOPY ='ADM ' PADML0001 6 P FTAB 6 F P FCOPY ='EJ-EDB T[LLER ' V P FNL v P FCOPY ='NR' P FILLR ' ',2 P FCOPY ='KONTONR' P FNL P FBF GTDYFLG,AFRM20 $ P FKI 1,MINL=3,MAXL=3,ME,APPL
0x37efe8…37f17c Dummy {f00=0x0105, f01=0x0190, f02=»9999999E-99',CTR12NR(GSWBIN6) PAFRM10 & P FMEND 4 P* B PADM2FRM1 FRMT L P FSL b P FBT GTSPGFLG,ADML0201 n P FCOPY ='ADM ' PADML0201 P FTAB 6 P FCOPY ='BEHOLDNINGST[LLERE' P FNL P FCOPY ='NR' P
0x37f17c…37f310 Dummy {f00=0x0105, f01=0x0190, f02=»,MINL=1,MAXL=2,ME,APPL=101 PAFRM220 " P FMEL 'ZZ',GSWBCD1 2 P FTAB 5 L P FBT GTDYFLG,AFRM210 P FBT GTSPGFLG,AFRM225 x P FBT GTTESTFL,AFRM225 " P FKI 5,MAXL=10,ME,SCHK=1,REWRT PAFRM225 & P FMEL 'ZZZZZZZZE-ZZ',GTDUPF(CB
0x37f310…37f4a4 Dummy {f00=0x0105, f01=0x0190, f02=» 4 P FMEL 'TTTVTTTVTTTVTT9V99-',GTDUPF(CBIN4) SALDO P FLINK FMTFKI < PAFRM210 R P FMEND b P* p PADM17FRM FRMT z P FSL P FBT GTSPGFLG,ADML1705 P FCOPY ='ADM ' PADML1705 P FTAB 6 P FCOPY ='KASSE-KONTO '
0x37f4a4…37f638 Dummy {f00=0x0105, f01=0x0190, f02=» 1,MINL=10,MAXL=10,ME,SCHK=1 PADM1701 $ & P FMEL '99999999E-99',GTDUPF(CBIN1) 4 P FKI 14,MAXL=14,REWRT,SCHK=4 ^ . P FMEL 'TTTVTTTVTTTVTT9V99-',GTDUPF(CBIN4) P FBF GTSPGFLG,ADM1702 P FLINK FMTFKI PADM1702 P FMEND P*
0x37f638…37f7cc Dummy {f00=0x0105, f01=0x0190, f02=» ~ P FNL $ P FKI 1,MINL=10,MAXL=10,ME,SCHK=1 P FMEL '99999999E-99',TVERSUR < P FMEND ` P* n PADM12FRM FRMT x P FSL P FCOPY ='DISKETTE SKIFT ' P FILLR X'07',1 P FLINK FMTFKI P FMEND P* PCLFRM01
0x37f7cc…37f960 Dummy {f00=0x0105, f01=0x0190, f02=» P FILLR '1',2 P FCOPY =C'KASSELUKNING' P FNL < P FCOPY GSWSTR20 TEXT H " P FMEL 'ZZ',GTWBCD1 COUNTER NR d P FILLR ' ',4 P FCOPY GTDBKRC DEB-KRE P FNL P FCOPY =C'KONTONR' P FILLR ' ',5 P FLINK FBELOB
0x37f960…37faf4 (2, 287) Dummy {f00=0x0105, f01=0x0190, f02=»M03 FRMT P FILLR '1',2 P FBT GTSPGFLG,CLF0301 $ P FCOPY =C'KASSELUKNING' B PCLF0301 b P FNL r P FCOPY GSWSTR20 ~ P FMEND P* PCLFRM04 FRMT P FSL P FBT GTSPGFLG,CLF0401 P FCOPY ='KASSELUKNING'
0x37faf4…37fc88 Dummy {f00=0x0105, f01=0x0190, f02=»RIODE ' P FTAB 15 P FCOPY =' DEB' P FNL 6 P FCOPY ='SLET SALDO ' B P FTAB 15 ` P FCOPY =' KRE' p PCLF0402 P FNL P FCOPY ='SUBTOTAL ' P FTAB 16 P FCOPY ='KVIT' P FNL P FNL P FNL P
0x37fc88…37fe1c Dummy {f00=0x0105, f01=0x0190, f02=»' P FLINK SPGFMSPG P FKI 13,MINL=1,MAXL=2 " P FMEL 'ZZ',GSWBCD3 @ P FMEND Z P* h PSPGFMSPG FRMT r P FTEXT 'SP' P FILLR X'5C',1 P FTEXT 'RGE' P FMEND P* PSPGFM04 FRMT P FSL P FNL
0x37fe1c…37ffb0 Dummy {f00=0x0105, f01=0x0190, f02=» t P FMEL 'BBZZZ-',CMASK(CBIN3) P FMEL 'BBZZZ-',CMASK(CBIN4) , P FNL P P FMEL 'BBZZZ-',CMASK(CBIN5) P FMEL 'BBZZZ-',CMASK(CBIN6) P FMEL 'BBZZZ-',CMASK(CBIN7) P FMEL 'BBZZZ-',CMASK(CBIN8) P FNL P FMEL 'BBZZZ-',C
0x37ffb0…380144 Dummy {f00=0x0105, f01=0x0190, f02=»MTFKI P FMEND P* P* & SPGFM08 FRMT 0 FSL D P FLINK SPGFMSPG P P FBF GTGLSPG,SPGL081 h P FILLR '*',1 PSPGL081 FNL FCOPY =C' EKS.LBNR' FKI 14,MAXL=5 FMEL 'XXXXX',GTLBNRIN FNL
0x380144…3802d8 Dummy {f00=0x0105, f01=0x0190, f02=» FCOPY =C'CPR/CIR/NR' 0 , FKI 14,MINL=7,MAXL=10,SCHK=1,REWRT,APPL=109 " FMEL 'XXXXXXE-XXXX',GSWBCD7 V FNL z FLINK FBELOB * % FKI 14,MAXL=12,SCHK=4,REWRT,APPL=110 $ FMEL 'TTTTTTTVTTX,XX-',GSWBCD7 FNL FCOPY =C'
0x3802d8…38046c Dummy {f00=0x0105, f01=0x0190, f02=»SWBCD7 x FNL FLINK FMTEND FMEND 0 P* > PSPGFM10 FRMT H P FSL P FLINK SPGFMSPG h P FBF GTGLSPG,SPGL101 P FILLR '*',1 PSPGL101 P FNL P FCOPY =C'BILAG' P FCOPY =C' EKS.LBNR' P FILLR '
0x38046c…380600 Dummy {f00=0x0105, f01=0x0190, f02=» P FKI 20,MAXL=5,ME P FMEL 'XXXXX',GTLBNRIN P FNL < P FLINK FMTEND H P FMEND ^ P* l * v FBELOB FRMT FCOPY =C'BEL' FILLR X'5C',1 FILLR 'B',1 FMEND * FMTEND FRMT FNL
0x380600…380794 (2, 288) Dummy {f00=0x0106, f01=0x0190, f02=»B 6 P FCOPY ='KASSE-KONTO ' P FNL * P FCOPY ='KONTONR' 6 P FILLR ' ',6 P P FCOPY ='SALDO' d P FNL | " P FMEL '99999999E-99',TTCASHAC P FTAB 14 & P FMEL 'ZZZVZZZVZZZVZZ9V99-',TTCASH P FNL P FCOPY ='EJ EDB'
0x380794…380928 Dummy {f00=0x0106, f01=0x0190, f02=» FLINK FMTFKI P FMEND P* $ $ P* CALCULATION-FORMATS . P* V P* ` PCALFRM02 FRMT j P FSL P FCOPY =C'REGNEFUNKTION' P FNL P FNL 6 P FKI 1,MINL=1,MAXL=11,SCHK=4,APPL=91,DUPL=GSWBCD1 $ P FMEL 'T
0x380928…380abc Dummy {f00=0x0106, f01=0x0190, f02=» P FNL P FCOPY =C'TOTAL ' P FNL 0 $ P FMEL 'ZZZVZZZVZZ9V99-',GSWBCD2 < P FLINK FMTFKI d P FMEND z P* P* " P* CONTROLDIGIT-FORMATS P* P* PCCDFRM01 FRMT P FSL P FCOPY =C'C
0x380abc…380c50 Dummy {f00=0x0106, f01=0x0190, f02=» * P FKI 1,MINL=1,MAXL=10,REWRT,APPL=105 " P FMEL 'ZZZZZZZZZE-9',GSWBCD6 2 P FMEND X P* f PCCDFRM02 FRMT p P FSL P FCOPY =C'CHECKCIFFER' P FCOPY ='BEREGNING' P FBT GTDYFLG,CCDLAB02 P FLINK CCDFRM03 P
0x380c50…380de4 Dummy {f00=0x0106, f01=0x0190, f02=»DLAB03 P FLINK FMTFKI P FMEND $ P* 2 PCCDFRM03 FRMT < P FNL R P FNL ^ P FMEL 'ZZZZZZZZZE-9',GSWBCD6 j P FILLR ' ',1 P FNL P FCOPY =C'CHECKCIFFER' P FILLR '=',1 P FMEL 'B9B',GSWBCD5 P FNL
0x380de4…380f78 Dummy {f00=0x0106, f01=0x4098, f02=»R ' P FMEL '***99',TTLBNR P FILLR '-',3 ( P FKI 15,MAXL=5 < P FMEL '***99',GSWBCD5 R P FMEND p P* ~ END @ ,1 P FNL P FCOPY =C'CHECKCIFFER' P FILLR '=',1 P FMEL 'B9B',GSWBCD5 P FNL
0x380f78…38110c Dummy {f00=0x0106, f01=0x2008, f02=» NT RGADM DDUM KMD08 PDIV , ENTRY RGADM : RGADM N END @ h
0x38110c…3812a0 Dummy {f00=0x0106, f01=0x0190, f02=» @ A. )A @ ?; @ @ A.?;H H A ?O?;C <PC <PC 8P@ A 1 q 6 _ A @ I W * I , ( Aq W , ( At - A}3$ R P _S A2 A1A A3( @ A.I A * Au A
0x3812a0…381434 (2, 289) Opaque[0x194]
0x381434…3815c8 # DirEnt {nam=»CONNJ7«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x25a8, f03=0x0000}
0x381434…3815c8 IdxSect {
0x381434…3815c8 f00 = 0x012d // 0x381434 @0x0
0x381434…3815c8 f01 = 0x0002 // 0x381436 @0x2
0x381434…3815c8 gno = [ // 0x381438 @0x4
0x381434…3815c8 [0x00]: C0x012d.0x1.0
0x381434…3815c8 ]
0x381434…3815c8 }
0x3815c8…38175c Dummy {f00=0x012d, f01=0x014c, f02=» T; P01; TID=TC; TCL=TC; * LEV=60; : 01; J PTDC=T01; V PLC=01L; f P01; v PSCL=S04; T; 01; TID=D0; TCL=D0; LEV=60; 00; P00; PC; P00; P01
0x38175c…3818f0 Dummy {f00=0x012d, f01=0x2008, f02=» P01; TID=TC; TCL=TC; * LEV=60; : 01; J PTDC=T01; V PLC=01L; f P01; v PSCL=S04; T; 01; TID=D0; TCL=D0; LEV=60; 00; P00; PC; P00; P01
0x3818f0…381a84 Dummy {f00=0x012d, f01=0x0190, f02=» ! Y 0T V B : 2' R P P X ' ' X _ X ' _ X '?_ X ' X ! t v X " 9b! X :c 2" H @ W W W W W W W Y ( Y 09H Y * Y 4 Y 2 Y 69h Q
0x381a84…381c18 Dummy {f00=0x012d, f01=0x0190, f02=» P( P P Y +W^ Y + WL T HW> Q W Y + U Q P W W Y ( C X *! P V L ! X 0 Y 8 v P Y 0 X 0 X 2] X 8 Y 0 v : X 0 :H* : X 2T Y 2 : C 1 B ] :
0x381c18…381dac Dummy {f00=0x012d, f01=0x0190, f02=» C : C B _, _ X & P 8 B _R ( X D D : K + Q 2 P. P8 h X ( B X # V : _0 _> L t p < < 2 ^ ^ P W W X 0Q Y ( Y *P
0x381dac…381f40 Dummy {f00=0x012d, f01=0x0190, f02=» Y (_r " X _& X *# P B 1 W " P X X$ C : X *! P C W @ X (T W X y 6 Y ( : X (;n v X L t p ( 2 2 0 0 F P Y .W Y . X ( X ." PV X 0RzT$ Y *P U :H * K
0x381f40…3820d4 (2, 290) Opaque[0x194]
0x3820d4…382268 # DirEnt {nam=»KM0801«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x25b0, f03=0x0000}
0x3820d4…382268 IdxSect {
0x3820d4…382268 f00 = 0x012d // 0x3820d4 @0x0
0x3820d4…382268 f01 = 0x0004 // 0x3820d6 @0x2
0x3820d4…382268 gno = [ // 0x3820d8 @0x4
0x3820d4…382268 [0x00]: C0x012d.0x2.0
0x3820d4…382268 [0x01]: C0x012d.0x3.0
0x3820d4…382268 ]
0x3820d4…382268 }
0x382268…3823fc Dummy {f00=0x012d, f01=0x0190, f02=» & PMES NJ-AMT - CENTRALE BOGHOLDERI PSCR . PLED KMD08,/S : P!!DL 50 FD BACKUP N P!!DL 51 DK05 h P!!DL 52,54 DK06-DK08 | P!!DL 55,56 FD03,FD04 P!!DL 169 0 PMF1KBV STRG 32X'C1C2C3C4C5C6C750' DEV. ADR. P!!RE 173,$$6040$
0x3823fc…382590 Dummy {f00=0x012d, f01=0x0190, f02=»87,$$FALSE$$TRUE$$ BKO ( P!!RE 188,$$FALSE$$TRUE$$ SALDO KORT * P!!RE 194,$$TRUE$$FALSE$$ NO AUTO-KORT J P!!RE 195,$$FALSE$$TRUE$$ DC x P!!RE 199,$$TRUE$$FALSE$$ P!!DL 288 ***** * PCTRANBUF STRG 2300 BUFFER=2*1150 ***** P!!RE 301
0x382590…382724 Dummy {f00=0x012d, f01=0x0190, f02=»!!DL 362,363 " PON STRGI (12)2C'KA',' ',' ' $ P!!RE 473,$$27$$25$$ DEFAULT LINE : P!!EN b PNOD C n PTRA /S,NL | PINC DIVFMT PINC RGADM PNOD R PINC RGSUBS PINC KMDIO PINC RGSUB3 PNOD R PINC
0x382724…3828b8 Dummy {f00=0x012d, f01=0x0190, f02=»CH $$GSWBIN2,=W'504'$$GSWBIN2,=W'2300'$$ REQ.LENGTH P!!EN < PTRA /S,NL H PNOD R Z PINC RGSUB1 h PINC RGSUB2 z PINC DKSUBS PINC RGMAIN PNOD R PINC RGSTRT PASG 2,LP0F PTLK U,4K PINC PRT PINC VD
0x3828b8…382a4c Dummy {f00=0x012d, f01=0x003a, f02=»ON:POOL,A=RGLOAD,C=CONNJ1,COUT=$CON1:01 x P$ASG2 0 P!!EN < PTRA /S,NL H PNOD R Z PINC RGSUB1 h PINC RGSUB2 z PINC DKSUBS PINC RGMAIN PNOD R PINC RGSTRT PASG 2,LP0F PTLK U,4K PINC PRT PINC VD
0x382a4c…382be0 Dummy {f00=0x012d, f01=0x2008, f02=» A=RGLOAD,C=CONNJ1,COUT=$CON1:01 x P$ASG2 0 P!!EN < PTRA /S,NL H PNOD R Z PINC RGSUB1 h PINC RGSUB2 z PINC DKSUBS PINC RGMAIN PNOD R PINC RGSTRT PASG 2,LP0F PTLK U,4K PINC PRT PINC VD
0x382be0…382d74 (2, 291) Dummy {f00=0x012d, f01=0x0190, f02=» S M Q L i N J O J S Y m M/P-NR ^ ] ^ ^
0x382d74…382f08 Dummy {f00=0x012d, f01=0x0190, f02=» X ' SD-INCASSO ] M F]R RE] REM OPK * DEBITORINDB ] <
0x382f08…38309c Dummy {f00=0x012d, f01=0x0190, f02=» $ ! * 5 @ K V a l w 4 " O # q & ) , 4 4 C 4 w 6 ; B C ^ E J J 0 O z [ a $@ @ @ Z v 0 ^
0x38309c…383230 Dummy {f00=0x012d, f01=0x0190, f02=» J X n I ? A < A( A A 1 2 _ @) $ A)@ 1 6 _ _0H) ! q jW uW _HfW ( Q8j (W ( L" uW b Q ( uW Q x _| uW _ VL ( uV T jW V uW T WV _v qX WL ( uW L rj W j W L6
0x383230…3833c4 Dummy {f00=0x012d, f01=0x0190, f02=»uW T WL ( uW T b _R@(? H q(A m0 1 " QWH+ 0 _ A+ ( WL uW T8 r r Lj W j W j W L 0 1 (0 @+_ @+ 4 " !T q ,T _ Q( _ WZ H+ 0 _ A+ ( WL uW TF rj W " % _1 rj
0x3833c4…383558 Dummy {f00=0x012d, f01=0x0190, f02=» " T q_ ^% _ 4 ( WL uW hW L P " Q W# hW L T P ( WL uW Q 4 ? . & * 8 & w xBFODATAS[TDISCFEJL BBZ9 1H h H j A ^ Q
0x383558…3836ec Dummy {f00=0x012d, f01=0x0190, f02=» @ I , 6 5H I !) q # #! ! ! H r r T2 H H A 6 @ A @ @ 4 r 4 H H I W 4 ) | W{# w I $ c (c c c
0x3836ec…383880 Dummy {f00=0x012d, f01=0x0190, f02=» ) q W ) r W ) s C 8 # T R R P P # #rW I P W ! T T W C P % T % %rW 6 W T W T P W ! sWv ! gWj ) ` ! "()*) L) %r ! ( B! 8) # 8
0x383880…383a14 (2, 292) Opaque[0x194]
0x383a14…383ba8 # DirEnt {nam=»KMDFIL«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1a18, f03=0x0000}
0x383a14…383ba8 IdxSect {
0x383a14…383ba8 f00 = 0x00d0 // 0x383a14 @0x0
0x383a14…383ba8 f01 = 0x0004 // 0x383a16 @0x2
0x383a14…383ba8 gno = [ // 0x383a18 @0x4
0x383a14…383ba8 [0x00]: C0x00d0.0x3.0
0x383a14…383ba8 [0x01]: C0x00d1.0x0.0
0x383a14…383ba8 ]
0x383a14…383ba8 }
0x383ba8…383d3c Dummy {f00=0x00d0, f01=0x0190, f02=» PPRT KM805 PPRT C805 ( PMES BR NDERSLEV KOMMUNE, REMITTERING & PASG 2,NO R PSCR b PLED KMD08,/S n P!!DL 67,68 FD03,FD04 P!!DL 184 4 PMF1KBV STRG 32X'C1C2C3C4C5C6C750' DV ADR KB/VDU P!!DL 188 PMF1CU STRG X'6E4E'
0x383d3c…383ed0 Dummy {f00=0x00d0, f01=0x0190, f02=» ' t P!!RE 202,$$FALSE$$TRUE$$ BKO ( P!!RE 203,$$FALSE$$TRUE$$ SALDO KORT . $ P!!RE 209,$$TRUE$$FALSE$$ CKTAUTO Z P!!RE 210,$$FALSE$$TRUE$$ DC $ P!!RE 213,$$FALSE$$TRUE$$ 5M DISK ( P!!RE 214,$$TRUE$$FALSE$$ DISK BACKUP & P!!RE 239,$$FAL
0x383ed0…384064 Dummy {f00=0x00d0, f01=0x0190, f02=» (12),X'0051',X'0068',X'0064' P!!RE 316,$$128$$80$$ & , P!!RE 324,$$6'OD-KOM$$12X'42525C4E442E$$ B , P!!RE 325,$$01014610$$03018051$$ VERSION r ( P!!RE 372,$$1400$$10000$$ NO OF REG. " P!!RE 381,$$20$$200$$ LEV INDEX P!!RE 386,$$5$$1$$ KO
0x384064…3841f8 Dummy {f00=0x00d0, f01=0x0190, f02=»INC DIV805 PINC RGADM PNOD R $ PINC RGSUBS 2 PINC KMDIO D PNOD R V PINC RGSUB3 d PLED SCREEN,/S v P!!CH $$KEY461$$KEYCOP$$ P!!CH $$SL461$$SLCOP$$ P!!EN PTRA /S,NL PNOD R PINC SUBAPL P
0x3841f8…38438c Dummy {f00=0x00d0, f01=0x0178, f02=»SUB2 PINC DKSUBS PNOD R PINC RGMAIN , PINC RGSTRT > PNOD R P PINC REMFMT ^ PINC REMTXT p PNOD R PINC REMLEV PTLK U,4K PINC PRT PINC VDUPRT PINC START PINC TB3270 P$INCGEN
0x38438c…384520 Dummy {f00=0x00d0, f01=0x2008, f02=» PINC DKSUBS PNOD R PINC RGMAIN , PINC RGSTRT > PNOD R P PINC REMFMT ^ PINC REMTXT p PNOD R PINC REMLEV PTLK U,4K PINC PRT PINC VDUPRT PINC START PINC TB3270 P$INCGEN
0x384520…3846b4 (2, 293) Dummy {f00=0x00d1, f01=0x0190, f02=» PDYK10 0 P DYKI SPINPUT,SPKTAB12,SPKTAB22,SPBINW1, C P SPBINW2,SPBINW4 F P B DYKOUT ` PDYK15 r 0 P DYKI SPINPUT,SPKTAB13,SPKTAB23,SPBINW1, C P SPBINW2,SPBINW4 PDYKOUT P BL ERRPRT ERROR P CLEAR SPDUPL 2
0x3846b4…384848 Dummy {f00=0x00d1, f01=0x0190, f02=»UPD300,CLEA20 JUMP ON C P UPDATE,CANC,CANC, C . P UPDATE,UPDATE,UPDATE,UPDATE CONVERTED C > 4 P UPDATE,UPDATE,UPDATE,UPDATE END-OF-ITEM-KEY C p P UPDATE,KDUPL,KEDIT P P* 4 P* HANDLE THE RESPECTIVE KEY AS EOI-KEY FIRST
0x384848…3849dc Dummy {f00=0x00d1, f01=0x0190, f02=»W4,='0',UPD050 JUMP IF NOT STANDARD CHECK * P PERFI SPBINW4,SPCHK1,SPCHK2,SPCHK3 C 2 " P SPCHK4,SPCHK5,SPCHK6,SPCHK7 ` & P IB SPBINW3,UPD050,UPD070,ERRPRINT P* P* CONDITIONAL DISPLAYING P* PUPD050 P TBT SPDUPL,UPD100
0x3849dc…384b70 Dummy {f00=0x00d1, f01=0x0190, f02=»BINW3,='0',UPD210 JUMP IF APPL VALUE P B SETCREAD , P* @ " P* UNCONDITIONAL DISPLAYING J P* p PUPD100 z 6 P MOVE SPBINW4,='2' INDICATE UNCONDITIONAL DISPLAY PUPD200 $ P GETCTL 0,SPBINW3 GET APPL-VALUE 2 P CBE SPBINW3,='0
0x384b70…384d04 Dummy {f00=0x00d1, f01=0x0190, f02=» IB SPBINW3,UPD400,SETCREAD,ERRPRINT P B UPD400 , P* > P* OK AFTER APPL CONTROL H " P* UNCONDITIONAL DISPLAYING j P* PUPD260 2 P UPDFLD 1,SPINPUT UPDATE FIELD WITH DISPLAYING PUPD300 4 P CBE SPBINW1,='0',UPD350 SKI
0x384d04…384e98 Dummy {f00=0x00d1, f01=0x0190, f02=»D360 * P MOVE SPBINW1,SPBINW2 STORE KEY VALUE $ P MOVE SPBINW4,=W'26' SET MESSAGE : P PERF SPERR b ( P CBNE SPBINW2,CBIN2,UPD360 KOR-KEY ? v , P MOVE SPBINW2,SPBINW1 RESET OLD KEYVALUE PUPD360 $ P* JUMP ON FUNCTION KEY INDEX P
0x384e98…38502c Dummy {f00=0x00d1, f01=0x0190, f02=»KCOPY,DUMMY,DUMMY,KENTER , P SUB SPBINW2,=W'14' ADJUST EOI-KEY INDEX PDUMMY P PRETUR ^ P RET l P* x PUPD400 8 P CBE SPBINW4,='2',UPD260 JUMP IF UNCONDITIONAL DISPL 0 P UPDFLD 0,SPINPUT UPDATE FIELD DISPL. COND. P B UPD30
0x38502c…3851c0 Dummy {f00=0x00d1, f01=0x0190, f02=» $ PKTBWD TABULATION 1 STEP BACKW. P TBWD 0 P B TSTTAB > P* P " PKTHOME TAB. TO HOME POSITION Z P THOME P B TSTTAB P* ( PKTLDOWN TAB. TO FIRST ON NEXT LINE P TLDOWN P B TSTTAB P* PKTLEFT
0x3851c0…385354 (2, 294) Opaque[0x194]
0x385354…3854e8 # DirEnt {nam=»RGOBJ «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x25d0, f03=0x0000}
0x385354…3854e8 IdxSect {
0x385354…3854e8 f00 = 0x012e // 0x385354 @0x0
0x385354…3854e8 f01 = 0x0002 // 0x385356 @0x2
0x385354…3854e8 gno = [ // 0x385358 @0x4
0x385354…3854e8 [0x00]: C0x012e.0x2.0
0x385354…3854e8 ]
0x385354…3854e8 }
0x3854e8…38567c Dummy {f00=0x012e, f01=0x018e, f02=» PASG /02,NO PSCR PINC PRT " PINC VDUPRT 2 PINC START D PINC TB3270 V PDEL /OB h PKPF /O x PSCR PTRA RGMAIN,NL PKPF /O PSCR PTRA RGMND,NL PKPF /O PSCR PTRA RGSTRT,NL PKP
0x38567c…385810 Dummy {f00=0x012e, f01=0x018e, f02=» PKPF /O PSCR PTRA DIVFMT,NL " PKPF /O 8 PSCR F PTRA DIV461,NL R PKPF /O h PSCR v PTRA DIV167,NL PKPF /O PSCR PTRA DIV259,NL PKPF /O PSCR PTRA DIV525,NL PKPF /O PSC
0x385810…3859a4 Dummy {f00=0x012e, f01=0x0190, f02=» PSCR PTRA KMDIO,NL PKPF /O ( PSCR 6 PTRA RGADM,NL B PKPF /O V PSCR d PTRA RGSUBS,NL p PKPF /O PSCR PTRA RGSUB1,NL PKPF /O PSCR PTRA RGSUB2,NL PKPF /O PSCR PTRA RGSU
0x3859a4…385b38 Dummy {f00=0x012e, f01=0x0166, f02=»KTPLN,NL PKPF /O PSCR PTRA KTPLND,NL * PKPF /O @ PSCR N PTRA KTOPR,NL Z PKPF /O n PSCR | PTRA KTOPRD,NL PKPF /O PSCR PTRA REMFMT,NL PKPF /O PSCR PTRA REMLEV,NL PKPF /O
0x385b38…385ccc Dummy {f00=0x012e, f01=0x2008, f02=» PKPF /O PSCR PTRA KTPLND,NL * PKPF /O @ PSCR N PTRA KTOPR,NL Z PKPF /O n PSCR | PTRA KTOPRD,NL PKPF /O PSCR PTRA REMFMT,NL PKPF /O PSCR PTRA REMLEV,NL PKPF /O
0x385ccc…385e60 Dummy {f00=0x012e, f01=0x0190, f02=» x * & * & D * & r * & 9 * & W * & u
0x385e60…385ff4 (2, 295) Opaque[0x194]
0x385ff4…386188 # DirEnt {nam=»KM0806«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x25d8, f03=0x0000}
0x385ff4…386188 IdxSect {
0x385ff4…386188 f00 = 0x012e // 0x385ff4 @0x0
0x385ff4…386188 f01 = 0x0004 // 0x385ff6 @0x2
0x385ff4…386188 gno = [ // 0x385ff8 @0x4
0x385ff4…386188 [0x00]: C0x012e.0x3.0
0x385ff4…386188 [0x01]: C0x012f.0x0.0
0x385ff4…386188 ]
0x385ff4…386188 }
0x386188…38631c Dummy {f00=0x012e, f01=0x0190, f02=» " PMES NJ-AMT - AALBORG SYGEHUS PSCR * PLED KMD08,/S 6 P!!DL 50 FD BACKUP J P!!DL 51 DK05 d P!!DL 52,54 DK06-DK08 x P!!DL 55,56 FD03,FD04 P!!DL 169 0 PMF1KBV STRG 32X'C1C2C3C4C5C6C750' DEV. ADR. P!!RE 173,$$6040$$6A4
0x38631c…3864b0 Dummy {f00=0x012e, f01=0x0190, f02=»$FALSE$$TRUE$$ BKO ( P!!RE 188,$$FALSE$$TRUE$$ SALDO KORT * P!!RE 194,$$TRUE$$FALSE$$ NO AUTO-KORT F P!!RE 195,$$FALSE$$TRUE$$ DC t P!!RE 199,$$TRUE$$FALSE$$ P!!DL 288 ***** , PCTRANBUF STRG 2300 BUFFER = 2*1150 ***** P!!RE 301,$
0x3864b0…386644 Dummy {f00=0x012e, f01=0x0190, f02=»DL 362,363 " PON STRGI (12)2C'KA',' ',' ' $ P!!RE 473,$$27$$25$$ DEFAULT LINE 8 P!!EN ` PNOD C l PTRA /S,NL z PINC DIVFMT PINC RGADM PNOD R PINC RGSUBS PINC KMDIO PINC RGSUB3 PNOD R PINC SC
0x386644…3867d8 Dummy {f00=0x012e, f01=0x0190, f02=» $$GSWBIN2,=W'504'$$GSWBIN2,=W'2300'$$ ***** P!!EN 4 PTRA /S,NL @ PNOD R R PINC RGSUB1 ` PINC RGSUB2 r PINC DKSUBS PINC RGMAIN PNOD R PINC RGSTRT PASG 2,LP0F PTLK U,4K PINC PRT PINC VDUPRT
0x3867d8…38696c Dummy {f00=0x012e, f01=0x0032, f02=»A=RGLOAD,C=CONNJ6,COUT=$CON6:01 p P$ASG2 ( P!!EN 4 PTRA /S,NL @ PNOD R R PINC RGSUB1 ` PINC RGSUB2 r PINC DKSUBS PINC RGMAIN PNOD R PINC RGSTRT PASG 2,LP0F PTLK U,4K PINC PRT PINC VDUPRT
0x38696c…386b00 Dummy {f00=0x012e, f01=0x2008, f02=» ,C=CONNJ6,COUT=$CON6:01 p P$ASG2 ( P!!EN 4 PTRA /S,NL @ PNOD R R PINC RGSUB1 ` PINC RGSUB2 r PINC DKSUBS PINC RGMAIN PNOD R PINC RGSTRT PASG 2,LP0F PTLK U,4K PINC PRT PINC VDUPRT
0x386b00…386c94 (2, 296) Dummy {f00=0x012f, f01=0x0190, f02=» # q x E @ ,Eh A @ W + q r x E K W< A 1 6 _ _ C @'_ A'_ @'W I A$ ? a I" _ 0 ? 0 _ ErA" " @ 0 ? _ $ A 0 q+ q A A 2@ A " ? a x? ) r T 4 4 ! 8 r 4 5 T4 6 T.
0x386c94…386e28 Dummy {f00=0x012f, f01=0x0190, f02=» r; T r< T r= T rD 4 " @ 0+ q _ 0+ 4 d 5 ^ { * 4 r S r ( /FDOPSTART KOMMUNE NRVOLUME NR VOL 2 VOL 3 VOL 4DSN02 DSN0
0x386e28…386fbc Dummy {f00=0x012f, f01=0x0190, f02=» !g START VOLUME= { DATASET= v Y a n g l h U i hy { { { v v v v v v v 3 J ' - A .
0x386fbc…387150 Dummy {f00=0x012f, f01=0x0190, f02=» 0 0 0 ( 0 : L J F " D L L b b L L L$ L" W L L?R < ( 8 < J F " D r # L r r
0x387150…3872e4 Dummy {f00=0x012f, f01=0x0190, f02=» J F " D @ t t W LW ! L LT L L Lb L j | 0 0 0 0 0 0
0x3872e4…387478 Dummy {f00=0x012f, f01=0x0190, f02=» 0 0 $ 6 0 H Z j 0 z J F " D WQ # L LWE LW@H ! L L R RA , W&H L R RA I
0x387478…38760c Dummy {f00=0x012f, f01=0x417a, f02=» 8 J F " D , LW $ 4 L L L L4 L L L L4 M ^ Q p U Y ` d - J F " D @ + 4 ! LJ! L ! L L 4 RW R 6 W 6
0x38760c…3877a0 Dummy {f00=0x012f, f01=0x4016, f02=» PNOD R @ ( 0 8 @ H P
0x3877a0…387934 (2, 297) Opaque[0x194]
0x387934…387ac8 # DirEnt {nam=»X «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1a90, f03=0x0000}
0x387934…387ac8 IdxSect {
0x387934…387ac8 f00 = 0x00d4 // 0x387934 @0x0
0x387934…387ac8 f01 = 0x0002 // 0x387936 @0x2
0x387934…387ac8 gno = [ // 0x387938 @0x4
0x387934…387ac8 [0x00]: C0x00d4.0x2.0
0x387934…387ac8 ]
0x387934…387ac8 }
0x387ac8…387c5c Dummy {f00=0x00d4, f01=0x006c, f02=» SCR TRA REMFMT KPF /O " TRA REMTXT 0 KPF /O B SCR P ASG /E0,TY10 FMEND p * ~ * * TXTPRT FRMT FSL FNL FNL FM,EL '999',TXTNR FMEL 'BB9BB',TXTKODE
0x387c5c…387df0 Dummy {f00=0x00d4, f01=0x2008, f02=» TRA REMFMT KPF /O " TRA REMTXT 0 KPF /O B SCR P ASG /E0,TY10 FMEND p * ~ * * TXTPRT FRMT FSL FNL FNL FM,EL '999',TXTNR FMEL 'BB9BB',TXTKODE
0x387df0…387f84 Dummy {f00=0x00d4, f01=0x0190, f02=» | * & * & H * & v * & - * & K * & i
0x387f84…388118 Dummy {f00=0x00d4, f01=0x0190, f02=» * & ( * & V * & * & ; * & Y
0x388118…3882ac Dummy {f00=0x00d4, f01=0x0190, f02=» j * & * & 6 * & d * & + * & I * & g
0x3882ac…388440 Dummy {f00=0x00d4, f01=0x0190, f02=» x * & * & D * & r * & 9 * & W * & u
0x388440…3885d4 (2, 298) Opaque[0x194]
0x3885d4…388768 # DirEnt {nam=»RGSUB3«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x18b8, f03=0x0000}
0x3885d4…388768 IdxSect {
0x3885d4…388768 f00 = 0x00c5 // 0x3885d4 @0x0
0x3885d4…388768 f01 = 0x0008 // 0x3885d6 @0x2
0x3885d4…388768 gno = [ // 0x3885d8 @0x4
0x3885d4…388768 [0x00]: C0x00c5.0x3.0
0x3885d4…388768 [0x01]: C0x00c6.0x0.0
0x3885d4…388768 [0x02]: C0x00c6.0x1.0
0x3885d4…388768 [0x03]: C0x00c6.0x2.0
0x3885d4…388768 ]
0x3885d4…388768 }
0x388768…3888fc Dummy {f00=0x00c5, f01=0x0190, f02=» P IDENT RGSUB3 03.01.XXX.1 P DDUM KMD08 & P PDIV : P* H P ENTRY ASGVOL R P ENTRY CLSVOL h P ENTRY CYLINE ~ P ENTRY CYOUT P ENTRY CYWRT P ENTRY CYRD P ENTRY CYTRP P* P EXT ABORT P EXT ASS
0x3888fc…388a90 Dummy {f00=0x00c5, f01=0x0190, f02=»RVO P* P INCLUDE EQUATE P EJECT . PASGVOL PROC VOL < P******************** T P* p * P* ASSIGN ROUTINE - PER VOLUME z P* 4 P* ASSIGNS ALL FILES ON SPECIFIED VOLUME P* 4 P* IF VOL=0,
0x388a90…388c24 Dummy {f00=0x00c5, f01=0x0190, f02=»****** P* P IB VOL, C " P ASG100,ASG200,ASG300,ASG400 , P CBNE VOL,CBIN0,ASGNOK R P* p PASG000 ASSIGN CONF DATASET z P PERF ASSG,CBIN1,DK01,CBIN1 P B ASGRET P* ( PASG100 ASSIGN ALL FILES - VOLUME 1 ,
0x388c24…388db8 Dummy {f00=0x00c5, f01=0x0190, f02=» ( P PERF ASSG,CBIN1,DK04,CBIN4 KT PLAN P BNOK ASGRET 0 P TBF CGLREGFL,ASG160 D P MOVE CGLRECNR,=D'0' ` * P PERF ASSG,CBIN1,DK05,CBIN5 OLD REGSET | P BNOK ASGRET P MOVE CGLRECNR,TTGLREC PASG160 P TBF CTEXTFLG,ASGRET ( P P
0x388db8…388f4c Dummy {f00=0x00c5, f01=0x0190, f02=» BNOK ASGRET ( P PERF ASSG,CBIN1,DK08,CBIN8 STAM REG P BNOK ASGRET @ ( P PERF ASSG,CBIN1,DK09,CBIN9 VAR REG T P BNOK ASGRET P TBF CBUDTFLG,ASGRET * P PERF ASSG,CBIN1,DK10,CBIN10 POST REG P BNOK ASGRET P B ASGRET P*
0x388f4c…3890e0 Dummy {f00=0x00c5, f01=0x0190, f02=»SSIGN ALL FILES - VOLUME 3 P B ASGOK " P* 2 ( PASG400 ASSIGN ALL FILES - VOLUME 4 < P B ASGOK h P* x PASGNOK P CMP CBIN1,CBIN0 P RET P* PASGOK P CMP CBIN0,CBIN0 PASGRET P RET P PEND
0x3890e0…389274 (2, 299) Dummy {f00=0x00c6, f01=0x0190, f02=»* 4 P* CLOSES ALL FILES ON SPECIFIED VOLUME P* B 4 P* CALL: PERF CLSVOL,<VOLUME NUMBER> L P* P******************** P* P IB VOL, C " P CLS100,CLS200,CLS300,CLS400 P B CLSRET P* (
0x389274…389408 Dummy {f00=0x00c6, f01=0x0190, f02=»50 ~ P DSC0 DK05,CLOSE PCLS150 " P TBF CTEXTFLG,CLS190 0 P DSC0 DK06,CLOSE L P TBF CSTRKFLG,CLS190 d P DSC0 DK07,CLOSE P DSC0 DK08,CLOSE P DSC0 DK09,CLOSE P TBF CBUDTFLG,CLS190 P DSC0 DK10,CLOSE PCLS190
0x389408…38959c Dummy {f00=0x00c6, f01=0x0190, f02=»OD P B CLSRET P* ( PCLS300 CLOSE ALL FILES - VOLUME 3 & P B CLSRET R P* d ( PCLS400 CLOSE ALL FILES - VOLUME 4 n P B CLSRET P* PCLSRET P RET P PEND P* P EJECT PCYLINE PROC
0x38959c…389730 Dummy {f00=0x00c6, f01=0x0190, f02=»RATE FIELDS l P* : P* ON EXIT CR= OK DATA WRITTEN TO CYSET > P* CR=NOK DATA NOT WRITTEN TO CYSET . P* E.G. ERROR ON DISK . P* DATASET FULL < P*
0x389730…3898c4 Dummy {f00=0x00c6, f01=0x0190, f02=»N1,TTASKNR " P CBNL GTCYOUT,GSWBIN1,CYLINNOK P MOVE GSWBIN1,=W'32' 8 PCYLIN000 T * P TBF CCYPFLG,CYLIN010 WAIT FOR BUFFER d P DELAY CBIN2 P SUB GSWBIN1,CBIN2 P CBL GSWBIN1,CBIN0,CYLINNOK P B CYLIN000 P* PCYLIN0
0x3898c4…389a58 Dummy {f00=0x00c6, f01=0x0190, f02=»'3',CCYBUF,GTCYOUT | P BNOK CYLIN100 P ADD GTCYOUT,CBIN1 0 " P CLEAR CCYPFLG RELEASE BUFFER J P CMP CBIN0,CBIN0 p P RET P* PCYLIN100 " P CLEAR CCYPFLG RELEASE BUFFER PCYLINNOK P CMP CBIN1,CBIN0 P RET P
0x389a58…389bec Dummy {f00=0x00c6, f01=0x0190, f02=»CYSET f $ P* (LESS THAN ONE PAGE) P* 6 P******************** @ P TBT GTCYWRTF,CYOUT050 P TBT TTTSTFLG,CYOUT005 z P SET TTTSTFLG P PERF SPLIN8,CBIN5,CBIN2 P PERF GRASPV P PERF CLEAR8 PCYOUT005 P M
0x389bec…389d80 Dummy {f00=0x00c6, f01=0x0190, f02=»WBIN1,TTLINNR P DSC1 KVOUCH,POS,GSWBIN1 " P CBNL GTCYIN,GTCYOUT,CYOUT050 6 P PERF CYRD P SUB TTLINNR,=D'2' n P WAIT KVOUCH P B CYOUT010 P* PCYOUT050 P RET P PEND P* P EJECT PCYWRT PROC
0x389d80…389f14 (2, 300) Dummy {f00=0x00c6, f01=0x0190, f02=»O VOUCHER d 0 P* AND WRITE LINE TO VOUCHER P* F P******************** P $ P PERF CYLINE WRITE LINE TO CYSET l P BNOK CYWRT100 P SUB TTLINNR,=D'2' , P CBL TTLINNR,=D'4',CYWRT010 IF PAGE FULL P CMP CBIN0,CBIN0 OK
0x389f14…38a0a8 Dummy {f00=0x00c6, f01=0x0190, f02=» GTCYTRPF INITIATE PRINT P CMP CBIN0,CBIN0 OK P RET < P* H PCYWRT100 R P PERF CYOUT b P SET GTCYWRTF v P CMP CBIN1,CBIN0 P RET P PEND P* P EJECT PCYRD PROC P******************** P*
0x38a0a8…38a23c Dummy {f00=0x00c6, f01=0x0190, f02=»BE POSITIONED BEFORE PRINT v P* " P******************** , PCYRD000 H P TBF CCYPFLG,CYRD010 X & P DELAY CBIN2 WAIT FOR CYCLE BUFFER t P B CYRD000 PCYRD010 & P SET CCYPFLG RESERVE CYCLE BUFFER $ P MOVE GSWBIN1,=W'128' SET LENG
0x38a23c…38a3d0 Dummy {f00=0x00c6, f01=0x0190, f02=» P B CYRD100 PCYRDNOK P ADD GTCYIN,CBIN1 & P CLEAR CCYPFLG @ P PERF CRVO V P CMP CBIN1,CBIN0 NOK h P RET P* PCYRD100 P WAIT KVOUCH P PERF CRVO P ADD GTCYIN,CBIN1 P CMP CBIN0,CBIN0 OK P R
0x38a3d0…38a564 Dummy {f00=0x00c6, f01=0x018e, f02=» P******************** P* " P* PRINT A WHOLE PAGE * P* P 6 P* AND WRITE TRANSPORT LINE FIRST ON CYSET Z P* P******************** P TBF GTCYTRPF,CYTRP200 , P TBT GTCYWRTF,CYTRP100 T=ALREADY WRITTEN P
0x38a564…38a6f8 Dummy {f00=0x00c6, f01=0x0190, f02=» ~ P MOVE GSWSTR9,=C'TRP ' P PERF FRMXVO,CBIN2 & P MOVE GTCYIN,TTASKNR @ P SUB GTCYIN,CBIN1 P MUL GTCYIN,CCYSIZE v P ADD GTCYIN,CBIN1 P MOVE GTCYOUT,GTCYIN P MOVE TTLINNR,TTCYKST P MOVE TTCYKPOS,TTLINNR P PER
0x38a6f8…38a88c Dummy {f00=0x00c6, f01=0x0190, f02=»SPLIN8,CBIN3,CBIN2 ASK FOR 'NY SIDE' P PERF GRASPV GRASP , P MOVE TTCYKPOS,TTCYKST F * P MOVE TTLINNR,TTCYKST POSITION VOUCHER d P MOVE GSWBIN1,TTLINNR P DSC1 KVOUCH,POS,GSWBIN1 0 P MOVE GSWSTR9,=C'TRP ' SET UP TRANSPORT LINE P PER
0x38a88c…38aa20 Dummy {f00=0x00c6, f01=0x4034, f02=» RET P PEND P* P END $@ 0ASPV GRASP , P MOVE TTCYKPOS,TTCYKST F * P MOVE TTLINNR,TTCYKST POSITION VOUCHER d P MOVE GSWBIN1,TTLINNR P DSC1 KVOUCH,POS,GSWBIN1 0 P MOVE GSWSTR9,=C'TRP ' SET UP TRANSPORT LINE P PER
0x38aa20…38abb4 (2, 301) Dummy {f00=0x00c6, f01=0x2008, f02=» P?????????????? P RET " P PEND . P* < P END F :EOF R@ `OUT P WAIT KVOUCH p P DSC0 KVOUCH,RLEAS P MOVE GSWSTR9,=C'TRP ' P PERF FRMXVO,CBIN2 P MOVE TTLINNR,TTCYKST P PERF CYLINE P
0x38abb4…38ad48 Dummy {f00=0x00c6, f01=0x4068, f02=» | > R@ d h * & * & = * & [
0x38ad48…38aedc Dummy {f00=0x00c6, f01=0x40f0, f02=» : H IDENT D:CB20 TRA 4.2 80-03-18 F2 O2222 03.01.XXX.1 D:CB20 B D:CB20C T * & B h * & Z = B @ & [
0x38aedc…38b070 Dummy {f00=0x00c6, f01=0x0190, f02=» : H IDENT C:CB30 TRA 4.2 80-03-18 F2 O2222 03.01.XXX.1 ! C:CB30 ! B C:CB30C ! T * & 8 6 ! h * & ! * & = ! * & [
0x38b070…38b204 Dummy {f00=0x00c6, f01=0x0190, f02=» ! | * & " * & " H * & " v * & - " * & K " * & i
0x38b204…38b398 Dummy {f00=0x00c6, f01=0x0190, f02=» " * & # ( * & # V * & # * & ; # * & Y #
0x38b398…38b52c Dummy {f00=0x00c6, f01=0x0190, f02=» # j * & $ * & $ 6 * & $ d * & + $ * & I $ * & g
0x38b52c…38b6c0 Dummy {f00=0x00c6, f01=0x0190, f02=» $ x * & % * & % D * & % r * & 9 % * & W % * & u
0x38b6c0…38b854 (2, 302) Opaque[0x194]
0x38b854…38b9e8 # DirEnt {nam=»DKLD «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x2608, f03=0x0000}
0x38b854…38b9e8 IdxSect {
0x38b854…38b9e8 f00 = 0x0130 // 0x38b854 @0x0
0x38b854…38b9e8 f01 = 0x0002 // 0x38b856 @0x2
0x38b854…38b9e8 gno = [ // 0x38b858 @0x4
0x38b854…38b9e8 [0x00]: C0x0130.0x1.0
0x38b854…38b9e8 ]
0x38b854…38b9e8 }
0x38b9e8…38bb7c Dummy {f00=0x0130, f01=0x0190, f02=» d * THERE ARE I FREE GRANULES. ( Dp$ A j z H&g ` ^ 1 [ L ` `0 H } % H @__z@u ` `L GH L `H ja @ `H z@b> > @ h> ` > d @8 U ! ` @Z @ @ @]> ` }> 5 ( - @ e> ` % e> @ `
0x38bb7c…38bd10 Dummy {f00=0x0130, f01=0x0190, f02=» " @x $0 ( p ? JT M ` w > @ 3 H!+ d Z ^ -5 > @ H! 3 d @Bh 4NA~ { N4` l ; ; ; ; ; ; R Q @ - WH @ - A R* X R X _ Q @ X" A T - _0 D - Z Z Z Z Z Z
0x38bd10…38bea4 Dummy {f00=0x0130, f01=0x0190, f02=»X !XXT ( ( @ *! : F A A " ( : NP W ` A A "( ES NO A , W ! T _ !//T ( _ 0Z2 U ]@ YF< Y< ZT A B l 0DISC LABEL IS LLLLLLLL
0x38bea4…38c038 Dummy {f00=0x0130, f01=0x0190, f02=» < $" = @ A A A : A W @ n A A 0 A U 0 ( @ @ A A l ( : U l W @ #U. A @ A p @ p A : ; [ [ [ Z Z Z : : < , = = $ -
0x38c038…38c1cc Dummy {f00=0x0130, f01=0x0190, f02=»Y : @ U : @ A R _ : A : ( W ` A A "( ES NO A , W ! T _ !//T ( _ 0Z2 U ]@ 1 Y< ZT A B 0DISC LABEL IS LLLLLLLL
0x38c1cc…38c360 Dummy {f00=0x0130, f01=0x0190, f02=» < $" = @ A A A : A W @ T 8 : 8 = V Y Y : , %Q R Y W W Z ' [ : W ?B?e + A A ( @ T2 : W A A & " Y : A ]B 0TOO MANY I/O ERRORS ON DISC P
0x38c360…38c4f4 (2, 303) Opaque[0x194]
0x38c4f4…38c688 # DirEnt {nam=»KM0808«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2610, f03=0x0000}
0x38c4f4…38c688 IdxSect {
0x38c4f4…38c688 f00 = 0x0130 // 0x38c4f4 @0x0
0x38c4f4…38c688 f01 = 0x0004 // 0x38c4f6 @0x2
0x38c4f4…38c688 gno = [ // 0x38c4f8 @0x4
0x38c4f4…38c688 [0x00]: C0x0130.0x2.0
0x38c4f4…38c688 [0x01]: C0x0130.0x3.0
0x38c4f4…38c688 ]
0x38c4f4…38c688 }
0x38c688…38c81c Dummy {f00=0x0130, f01=0x0190, f02=» PMES NJ-AMT - OFFLINE PSCR " PLED KMD08,/S . P!!DL 49 DCDATASET B P!!DL 50 FD BACKUP P!!DL 51 DK05 v P!!DL 52,54 DK06-DK08 P!!DL 55,56 FD03,FD04 P!!DL 74,96 KA P!!DL 97,113 GA P!!DL 114,125 D0 P!!
0x38c81c…38c9b0 Dummy {f00=0x0130, f01=0x0190, f02=»$TRUE$$FALSE$$ NO AUTO-KORT P!!RE 199,$$TRUE$$FALSE$$ $ P!!RE 301,$$128$$80$$ D P!!RE 309,$$OD-KOM$$NJ-AMT$$ ` 2 P!!RE 310,$$01014610$$%VER%REL%MOD$$ VERSION NO P!!RE 361,$$5$$1$$ P!!DL 362,363 " PON STRGI (12)2C' ',' ',' '
0x38c9b0…38cb44 Dummy {f00=0x0130, f01=0x018e, f02=»!!DL 620 VDUKB P!!DL 621 PRINT P!!DL 622 SWITCH , P!!DL 623 GETTID D P!!DL 624 OFFLNE P!!DL 627 DSC0 t P!!DL 639,658 KBVGO P!!DL 659,675 GTPGO P!!DL 676,688 DC1GO P!!DL 689,706 OFFLNE P!!EN PNOD C
0x38cb44…38ccd8 Dummy {f00=0x0130, f01=0x0190, f02=» PINC SCREEN PINC SUBAPL PNOD R , PINC RGFRMT : PNOD R L PINC KTOPR Z PINC KTPLN l PINC ADM6D ~ PNOD R PINC RGSUB1 PINC RGSUB2 PINC DKSUBS PINC RGMAIN PNOD R PINC RGSTRT PAS
0x38ccd8…38ce6c Dummy {f00=0x0130, f01=0x002a, f02=»,C=CONNJ8,COUT=$CON8:01 h P$ASG2 PNOD R , PINC RGFRMT : PNOD R L PINC KTOPR Z PINC KTPLN l PINC ADM6D ~ PNOD R PINC RGSUB1 PINC RGSUB2 PINC DKSUBS PINC RGMAIN PNOD R PINC RGSTRT PAS
0x38ce6c…38d000 Dummy {f00=0x0130, f01=0x2008, f02=» 8,COUT=$CON8:01 h P$ASG2 PNOD R , PINC RGFRMT : PNOD R L PINC KTOPR Z PINC KTPLN l PINC ADM6D ~ PNOD R PINC RGSUB1 PINC RGSUB2 PINC DKSUBS PINC RGMAIN PNOD R PINC RGSTRT PAS
0x38d000…38d194 (2, 304) Dummy {f00=0x0130, f01=0x0190, f02=» % " k " # j # @ l l V I J I , n % & l & & ' l ' ! k ! l L b FAST
0x38d194…38d328 Dummy {f00=0x0130, f01=0x0190, f02=» ! ! = S I T X POST T/GL. ]R b a I b a P J Q I R I b = U
0x38d328…38d4bc Dummy {f00=0x0130, f01=0x0190, f02=» W Q U L i N J O J W Y m M/P-NR b a b b
0x38d4bc…38d650 Dummy {f00=0x0130, f01=0x0190, f02=» ' SD-INCASSO a M F]R RE] REM OPK * DEBITORINDB a @
0x38d650…38d7e4 Dummy {f00=0x0130, f01=0x0190, f02=» $ ! * 5 @ K V a l w 4 " O # q & ) , 4 4 C 4 w 6 ; B C ^ E J J 0 O z [ a $@ @ @ Z v 0 b
0x38d7e4…38d978 Dummy {f00=0x0130, f01=0x0190, f02=» D 8 < @I ? A < A( A A 1 2 _ @) $ A)@ 1 6 _ _0H) ! u jW yW _HfW ( Q8j (W ( L" yW b Q ( yW Q x _| yW _ VL ( yV T jW V yW T WV _v uX WL ( yW L vj W j W L6
0x38d978…38db0c Dummy {f00=0x0130, f01=0x0190, f02=»yW T WL ( yW T b _R@(? H q(A m0 1 " QWH+ 0 _ A+ ( WL yW T8 v v Lj W j W j W L 0 1 (0 @+_ @+ 4 " !T u ,T _ Q( _ WZ H+ 0 _ A+ ( WL yW TF vj W " % _1 vj
0x38db0c…38dca0 Dummy {f00=0x0130, f01=0x0190, f02=» " T u_ ^% _ 4 ( WL yW hW L P " Q W# hW L T P ( WL yW Q 4 A(@ C TS TN A TIA 1 6 99 _$ Ev E Ev wMC 5 T , T X , _ >3@(A ,? % >4a> h> L I T h> T 1 4 )
0x38dca0…38de34 (2, 305) Opaque[0x194]
0x38de34…38dfc8 # DirEnt {nam=»CONNJ8«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2620, f03=0x0000}
0x38de34…38dfc8 IdxSect {
0x38de34…38dfc8 f00 = 0x0131 // 0x38de34 @0x0
0x38de34…38dfc8 f01 = 0x0002 // 0x38de36 @0x2
0x38de34…38dfc8 gno = [ // 0x38de38 @0x4
0x38de34…38dfc8 [0x00]: C0x0131.0x0.0
0x38de34…38dfc8 ]
0x38de34…38dfc8 }
0x38dfc8…38e15c Dummy {f00=0x0131, f01=0x00de, f02=» T; P01; TID=TC; TCL=TC; * LEV=60; : 01; J PTDC=T01; V PLC=01L; f P00; v PC; P00; P01; PSCL=S01; U; 001; TB2; P001; P$ASG2 PNOD R PINC
0x38e15c…38e2f0 Dummy {f00=0x0131, f01=0x2008, f02=» P01; TID=TC; TCL=TC; * LEV=60; : 01; J PTDC=T01; V PLC=01L; f P00; v PC; P00; P01; PSCL=S01; U; 001; TB2; P001; P$ASG2 PNOD R PINC
0x38e2f0…38e484 Dummy {f00=0x0131, f01=0x0190, f02=» ! 9 " & 4 " & TOTALS " & " BBZZZ.ZZZ.ZZZ.ZZ9.99- " : " " ` " BBZZZ.ZZZ.ZZZ.ZZ9.99- " p " " " BBZZZ.ZZZ.ZZZ.ZZ9.99- " " " & " & 4 " & SUPL " "
0x38e484…38e618 Dummy {f00=0x0131, f01=0x0190, f02=»9.99- " x " L # & # & 2 # . & KORL # < & # N " BBZZZ.ZZZ.ZZZ.ZZ9.99- # " L # " BBZZZ.ZZZ.ZZZ.ZZ9.99- # " L # ( # # $ # ( #
0x38e618…38e7ac Dummy {f00=0x0131, f01=0x018e, f02=» # r " P $ & $ & $ & & 2 $ 4 & BEV $ B " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ T " $ z " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ " $ " BBZZZ.ZZZ.ZZZ.ZZ9.99- $ " $ & $ &
0x38e7ac…38e940 Dummy {f00=0x0131, f01=0x0190, f02=» $ ( % * % & % $ & % 2 999B % @ " L % T B99.99.99. % d " L % ~ & % BEHOLDNINGST[LLERE % $ L % & % & % & % & %
0x38e940…38ead4 (2, 306) Opaque[0x194]
0x38ead4…38ec68 # DirEnt {nam=»KTPLN «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2628, f03=0x0000}
0x38ead4…38ec68 IdxSect {
0x38ead4…38ec68 f00 = 0x0131 // 0x38ead4 @0x0
0x38ead4…38ec68 f01 = 0x0006 // 0x38ead6 @0x2
0x38ead4…38ec68 gno = [ // 0x38ead8 @0x4
0x38ead4…38ec68 [0x00]: C0x0131.0x1.0
0x38ead4…38ec68 [0x01]: C0x0131.0x2.0
0x38ead4…38ec68 [0x02]: C0x0131.0x3.0
0x38ead4…38ec68 ]
0x38ead4…38ec68 }
0x38ec68…38edfc Dummy {f00=0x0131, f01=0x0190, f02=» P IDENT KTPLN 03.01.XXX.1 DDUM KMD08 & PDIV : P ENTRY KTPLAN H P ENTRY RESTMK ^ P ENTRY SETMK t P EXT RAREAD P INCLUDE EQUATE P EJECT PKTPLAN PROC KTNR,TYPE 4 P****************************************
0x38edfc…38ef90 Dummy {f00=0x0131, f01=0x018e, f02=» IF FOUND - CONDITION REGISTER IS SET TO OK < P* TYPE WILL CONTAIN THE ASSOCIATED TYPE 6 * P* GSWBIN4 IS RECORD NO v < P* GSWBIN5 POINTS TO START OF FOUND NO . P* IF NOT FOUND - GSWBIN4 IS REC
0x38ef90…38f124 Dummy {f00=0x0131, f01=0x0190, f02=» P MOVE GSWBIN4,CBIN0 PKTP010 $ P ADD GSWBIN4,CBIN1 2 P MUL GSWBIN4,CBIN3 L 0 P CBG GSWBIN4,CKTMAX,KTP020 RETURN, NOT FOUND f P DIV GSWBIN4,CBIN3 8 P CBE CKTINDX(GSWBIN4),=D'0',KTP020 RETURN, NOT FOUND > P CBNL CKTINDX(GSWBIN4),K
0x38f124…38f2b8 Dummy {f00=0x0131, f01=0x0190, f02=»4,CBIN0,KTPNOK2 P MOVE GSWBIN4,CBIN1 P B KTPNOK2 4 PKTP030 FOUND F , P MUL GSWBIN4,CBIN3 LAST RECORD IN GROUP , P SUB GSWBIN4,CBIN2 FIRST RECORD IN GROUP PKTP100 & P TBF CKFLAG,KTP110 WAIT FOR BUFFER P DELAY CBIN1 P
0x38f2b8…38f44c Dummy {f00=0x0131, f01=0x0190, f02=»,DK04,=D'4',CKTBUF,GSWBIN5,GSWBIN4 GET RECORD " P BNOK KTPNOK ERROR ON READING 6 P* LOOP THROUGH BUFFER P MOVE GSWBIN5,CBIN0 ~ PKTP120 P MOVE GSWBCD7,=D'1' . P XCOPY GSWBCD7,CBIN1,CBIN6,CKTBUF,GSWBIN5 " P CBE GSWBCD7,KTNR,
0x38f44c…38f5e0 Dummy {f00=0x0131, f01=0x0190, f02=»K AT NEXT NO p * P ADD GSWBIN4,CBIN1 LOOK AT NEXT RECORD P B KTP110 B PKTP200 T P ADD GSWBIN5,CBIN6 GET TYPE b ( P MOVE GSWBCD7,=D'1' INITIATE NUMBER . P XCOPY GSWBCD7,CBIN5,CBIN2,CKTBUF,GSWBIN5 P MOVE TYPE,GSWBCD7 P SUB GSWBI
0x38f5e0…38f774 (2, 307) Dummy {f00=0x0131, f01=0x0190, f02=»PE,=D'0' P MOVE GSWBIN5,=W'-1' P CMP CBIN0,CBIN0 , P RET D PKTPNOK P P CLEAR CKFLAG ^ P MOVE TYPE,=D'0' NOT FOUND t P CMP CBIN1,CBIN0 NOT OK P RET P PEND P EJECT PRESTMK PROC ( P**********************
0x38f774…38f908 Dummy {f00=0x0131, f01=0x0190, f02=»********************** P ( P MOVE GSWBIN3,GSWBIN4 FIND GROUP NO & P ADD GSWBIN3,CBIN2 R * P DIV GSWBIN3,CBIN3 GSWBIN3 = GROUP NO l PRES010 8 P CBE GSWBIN4,CKTLAST,RES100 LAST RECORD ? YES: JUMP * P MOVE GSWBIN5,GSWBIN3 LAST IN GROUP
0x38f908…38fa9c Dummy {f00=0x0131, f01=0x0190, f02=» IN GROUP v P MOVE GSWBCD7,=D'1' : P XCOPY GSWBCD7,CBIN1,CBIN6,CKTBUF,GSWBIN5 GET LAST NO . " P MOVE CKTINDX(GSWBIN3),GSWBCD7 l P B RESOK PRES100 P P CBE CKTLAST,CBIN0,RES170 0 P MOVE GSWBIN5,=W'120' FIND LAST USED NUMBER
0x38fa9c…38fc30 Dummy {f00=0x0131, f01=0x0190, f02=»,CBIN1,CBIN6,CKTBUF,GSWBIN5 4 P MOVE CKTINDX(GSWBIN3),GSWBCD7 SET MASTER INDEX $ PRES120 4 P ADD GSWBIN3,CBIN1 SET REMAINING INDICES TO ZERO j P MUL GSWBIN3,CBIN3 P CBG GSWBIN3,CKTMAX,RESOK P DIV GSWBIN3,CBIN3 P MOVE CKTINDX(GS
0x38fc30…38fdc4 Dummy {f00=0x0131, f01=0x018e, f02=» P B RES120 PRESOK P RET $ P PEND 0 P EJECT > PSETMK PROC L P**************************** ^ P* 2 P* INITIATE MASTER INDEX FOR 'KONTOPLAN' P* P**************************** P P MOVE GSWBIN4,CB
0x38fdc4…38ff58 Dummy {f00=0x0131, f01=0x0190, f02=» P MOVE GSWBIN5,=W'120' 4 P MATCH CKTBUF,GSWBIN5,CBIN2,CBLANKS,CBIN0,CBIN2 " P BE SET100 Z P PERF RESTMK l P ADD GSWBIN4,CBIN1 P CBNG GSWBIN4,CKTMAX,SET010 P MOVE CKTLAST,CKTMAX P B SETOK PSET100 P MOVE GSWBIN5,CB
0x38ff58…3900ec Dummy {f00=0x0131, f01=0x40e4, f02=»E GSWBIN5,=W'128' P MOVE CKTBUF,CBLANKS 2 P PERF RAREAD,DK04,=D'4',CKTBUF,GSWBIN5,GSWBIN4 6 PSET120 l P MOVE CKTLAST,GSWBIN4 z P PERF RESTMK PSETOK P RET P PEND END @ PSET100 P MOVE GSWBIN5,CB
0x3900ec…390280 Dummy {f00=0x0131, f01=0x2008, f02=» @
0x390280…390414 (2, 308) Dummy {f00=0x0131, f01=0x0000, f02=»
[…0x7…]
0x390f20…3910b4 (2, 309) Opaque[0x194]
0x3910b4…391248 # DirEnt {nam=»HELP «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2640, f03=0x0000}
0x3910b4…391248 IdxSect {
0x3910b4…391248 f00 = 0x0132 // 0x3910b4 @0x0
0x3910b4…391248 f01 = 0x0002 // 0x3910b6 @0x2
0x3910b4…391248 gno = [ // 0x3910b8 @0x4
0x3910b4…391248 [0x00]: C0x0132.0x0.0
0x3910b4…391248 ]
0x3910b4…391248 }
0x391248…3913dc Dummy {f00=0x0132, f01=0x0190, f02=» $ PMES E.G. OF ALL PROCEDURE CALLS 4 PMES $KMDGEN KMD=975,VER=01$$,REL=01$$,MOD=9751$$ , PMES - FOR KMD GENERATION d PMES $INCGEN 0 PMES - INCLUDE OF PRODUCTION INTEPRETER, KMD PMES $RDA NAM=TEST,DEV=CR0D " PMES - READING OF DATA (CAR
0x3913dc…391570 Dummy {f00=0x0132, f01=0x0190, f02=»MES $MOVE NAM=,FC=/S,ID=KMDPRO8 PMES - MOVE A MODULE ( < PMES $COMPEV NAM=/S,NL,BUG,.LKE,A=AAAA,M=M:KONV,C=KONFIG D PMES - SPECIAL GENERATION * PMES $PCAS M=,MU=,A=,AU=,C=,CU=,D=,DU= PMES - SEE MANUAL PMES $LETRA NAM=,LS= PME
0x391570…391704 Dummy {f00=0x0132, f01=0x0170, f02=»K NAM=,LS=,BG= PMES - TRA KONVER AND LINK PMES $TLK N= 8 $ PMES - TLK KONVER, WITHOUT CREBUG L PMES $TLK1 N= t PMES - AS TLK PMES $TLK2 N= PMES - AS TLK, + CREBUG PMES $TLK3 PMES - TLK PMES $ASG1 PMES
0x391704…391898 Dummy {f00=0x0132, f01=0x2008, f02=» S=,BG= PMES - TRA KONVER AND LINK PMES $TLK N= 8 $ PMES - TLK KONVER, WITHOUT CREBUG L PMES $TLK1 N= t PMES - AS TLK PMES $TLK2 N= PMES - AS TLK, + CREBUG PMES $TLK3 PMES - TLK PMES $ASG1 PMES
0x391898…391a2c Dummy {f00=0x0132, f01=0x0190, f02=»
[…0x1…]
0x391bc0…391d54 (2, 310) Opaque[0x194]
0x391d54…391ee8 # DirEnt {nam=»KM0809«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2648, f03=0x0000}
0x391d54…391ee8 IdxSect {
0x391d54…391ee8 f00 = 0x0132 // 0x391d54 @0x0
0x391d54…391ee8 f01 = 0x0002 // 0x391d56 @0x2
0x391d54…391ee8 gno = [ // 0x391d58 @0x4
0x391d54…391ee8 [0x00]: C0x0132.0x1.0
0x391d54…391ee8 ]
0x391d54…391ee8 }
0x391ee8…39207c Dummy {f00=0x0132, f01=0x0190, f02=» 6 PMES NJ - AMT - AALBORG SYGEHUS (INGEN DATATRANS) PSCR > PLED KMD08,/S J P!!DL 50 FD BACKUP ^ P!!DL 51 DK05 x P!!DL 52,54 DK06-DK08 P!!DL 55,56 FD03,FD04 P!!DL 169 0 PMF1KBV STRG 32X'40C1C2C3C5C6C750' DEV. ADR. P
0x39207c…392210 Dummy {f00=0x0132, f01=0x0190, f02=» ' t P!!RE 187,$$FALSE$$TRUE$$ BKO ( P!!RE 188,$$FALSE$$TRUE$$ SALDO KORT . * P!!RE 194,$$TRUE$$FALSE$$ NO AUTO-KORT Z P!!RE 199,$$TRUE$$FALSE$$ P!!RE 301,$$128$$80$$ P!!RE 309,$$OD-KOM$$NJ-AMT$$ 2 P!!RE 310,$$01014610$$%VER%REL%MO
0x392210…3923a4 Dummy {f00=0x0132, f01=0x0190, f02=»NE r P!!EN PNOD C PTRA /S,NL $ PINC DIVFMT 6 PINC RGADM H PNOD R Z PINC RGSUBS h PINC KMDIO z PINC RGSUB3 PNOD R PINC SCREEN PINC SUBAPL PNOD R PINC RGFRMT PNOD R PINC KTOPR
0x3923a4…392538 Dummy {f00=0x0132, f01=0x0112, f02=» PINC RGSTRT PASG 2,LP0F PTLK U,4K , PINC PRT < PINC VDUPRT L PINC START ^ PINC TB3270 p P$INCGEN LKE M PKPF /L,RGLOAD PSCR B PMES $PDISC M=MUKDCN,MU=MON:POOL,A=RGLOAD,C=CONNJ9,COUT=$CON)! P
0x392538…3926cc Dummy {f00=0x0132, f01=0x2008, f02=» INC RGSTRT PASG 2,LP0F PTLK U,4K , PINC PRT < PINC VDUPRT L PINC START ^ PINC TB3270 p P$INCGEN LKE M PKPF /L,RGLOAD PSCR B PMES $PDISC M=MUKDCN,MU=MON:POOL,A=RGLOAD,C=CONNJ9,COUT=$CON)! P
0x3926cc…392860 Dummy {f00=0x0132, f01=0x0190, f02=» 0/ Q P 4 A TpI TcW 0 0 # 7 T ! y I T _$ X+W% I _9 L_ I 0 W 0 @ 4 I 0 W 0 @ 4 A TlI T_W 0 # . I T ! y W T X,
0x392860…3929f4 (2, 311) Opaque[0x194]
0x3929f4…392b88 # DirEnt {nam=»LEDFIL«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2650, f03=0x0000}
0x3929f4…392b88 IdxSect {
0x3929f4…392b88 f00 = 0x0132 // 0x3929f4 @0x0
0x3929f4…392b88 f01 = 0x0002 // 0x3929f6 @0x2
0x3929f4…392b88 gno = [ // 0x3929f8 @0x4
0x3929f4…392b88 [0x00]: C0x0132.0x2.0
0x3929f4…392b88 ]
0x3929f4…392b88 }
0x392b88…392d1c Dummy {f00=0x0132, f01=0x0190, f02=» PLED RGSTRT P!!LS $$1801$$ P!!AB , PLED DKSUBS 8 P!!LS $$1801$$ J P!!AB ` PLED KMD08 l P!!LS $$1801$$ ~ P!!AB PLED RGMAIN P!!LS $$1801$$ P!!AB PLED SL461,/S P!!LS $$1801$$ P!!AB
0x392d1c…392eb0 Dummy {f00=0x0132, f01=0x0190, f02=»$ P!!AB PLED RGSUB1 P!!LS $$1801$$ ( P!!AB > PLED RGSUB2 J P!!LS $$1801$$ P!!AB r PLED RGSUB3,/S ~ P!!LS $$1801$$ P!!AB PLED RGFRMT P!!LS $$1801$$ P!!AB PLED SUBAPL P!!LS $$1801$
0x392eb0…393044 Dummy {f00=0x0132, f01=0x00a2, f02=»S P!!LS $$1801$$ P!!AB PLED KTPLN,/S , P!!LS $$1801$$ @ P!!AB V PLED KTOPR,/S b P!!LS $$1801$$ v P!!AB $ASG2 P!!AB PLED RGFRMT P!!LS $$1801$$ P!!AB PLED SUBAPL P!!LS $$1801$
0x393044…3931d8 Dummy {f00=0x0132, f01=0x2008, f02=» P!!LS $$1801$$ P!!AB PLED KTPLN,/S , P!!LS $$1801$$ @ P!!AB V PLED KTOPR,/S b P!!LS $$1801$$ v P!!AB $ASG2 P!!AB PLED RGFRMT P!!LS $$1801$$ P!!AB PLED SUBAPL P!!LS $$1801$
0x3931d8…39336c Dummy {f00=0x0132, f01=0x0190, f02=»SEARCH CURRENT POSITION v P BZ SETCREAD JUMP IF FOUND " P BL KTHOME POSITION NOT FOUND B P* h P* COMPULSORY FIELD FOUND r P* & P MOVE SPBINW4,SPBINW3 CHANGE INDEX P B CONT5 SEARCH AGAIN P* P EJECT P* &
0x39336c…393500 Dummy {f00=0x0132, f01=0x0190, f02=» READ TO CURRENT FIELD ON DISPLAY P* * PREADIN 4 P* SET FLAG IF AUTODUP B P* USES VERIF-FIELD d P MOVE SPBINW2,=W'3' P MOVE SPBINW1,=W'1' P TSTCTL 6 P BOK DYKIN P SET GTADUPFL P B DYK20 P*
0x393500…393694 (2, 312) Opaque[0x194]
0x393694…393828 # DirEnt {nam=»CONNJ9«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2658, f03=0x0000}
0x393694…393828 IdxSect {
0x393694…393828 f00 = 0x0132 // 0x393694 @0x0
0x393694…393828 f01 = 0x0002 // 0x393696 @0x2
0x393694…393828 gno = [ // 0x393698 @0x4
0x393694…393828 [0x00]: C0x0132.0x3.0
0x393694…393828 ]
0x393694…393828 }
0x393828…3939bc Dummy {f00=0x0132, f01=0x018e, f02=» T; P01; TID=TC; TCL=TC; * LEV=60; : 01; J PTDC=T01; V PLC=01L; f P01; v PSCL=S04; PT; P02; TID=KA; TCL=KA; LEV=60; 01; TDC=T03; PLC=01L; P03;
0x3939bc…393b50 Dummy {f00=0x0132, f01=0x011a, f02=» TDC=T04; PLC=02L; P03; $ PSCL=S02; 0 PSCL=S03; @ PSCL=S04; P T; ` 01; j TID=D0; v TCL=D0; LEV=60; 00; P00; PC; P00; P01; PSCL=S01; U; 001; TB
0x393b50…393ce4 Dummy {f00=0x0132, f01=0x2008, f02=» T04; PLC=02L; P03; $ PSCL=S02; 0 PSCL=S03; @ PSCL=S04; P T; ` 01; j TID=D0; v TCL=D0; LEV=60; 00; P00; PC; P00; P01; PSCL=S01; U; 001; TB
0x393ce4…393e78 Dummy {f00=0x0132, f01=0x0190, f02=»
[…0x2…]
0x3941a0…394334 (2, 313) Opaque[0x194]
0x394334…3944c8 # DirEnt {nam=»LEDLS «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2660, f03=0x0000}
0x394334…3944c8 IdxSect {
0x394334…3944c8 f00 = 0x0133 // 0x394334 @0x0
0x394334…3944c8 f01 = 0x0002 // 0x394336 @0x2
0x394334…3944c8 gno = [ // 0x394338 @0x4
0x394334…3944c8 [0x00]: C0x0133.0x0.0
0x394334…3944c8 ]
0x394334…3944c8 }
0x3944c8…39465c Dummy {f00=0x0133, f01=0x018e, f02=» PLED RGSTRT P!!LS $$XLS$$ P!!AB * PLED DKSUBS 6 P!!LS $$XLS$$ H P!!AB PLED KMD08 h P!!LS $$XLS$$ z P!!AB PLED RGMAIN P!!LS $$XLS$$ P!!AB PLED SL461,/S P!!LS $$XLS$$ P!!AB PLED SCRE
0x39465c…3947f0 Dummy {f00=0x0133, f01=0x018e, f02=» PLED RGSUB1 P!!LS $$XLS$$ P!!AB . PLED RGSUB2 : P!!LS $$XLS$$ L P!!AB ` PLED RGSUB3,/S l P!!LS $$XLS$$ P!!AB PLED RGFRMT P!!LS $$XLS$$ P!!AB PLED SUBAPL P!!LS $$XLS$$ P!!AB PLE
0x3947f0…394984 Dummy {f00=0x0133, f01=0x0082, f02=» P!!AB PLED KTPLN,/S P!!LS $$XLS$$ $ P!!AB 8 PLED KTOPR,/S D P!!LS $$XLS$$ X P!!AB l $ASG2 x!!LS $$XLS$$ P!!AB PLED RGFRMT P!!LS $$XLS$$ P!!AB PLED SUBAPL P!!LS $$XLS$$ P!!AB PLE
0x394984…394b18 Dummy {f00=0x0133, f01=0x2008, f02=» PLED KTPLN,/S P!!LS $$XLS$$ $ P!!AB 8 PLED KTOPR,/S D P!!LS $$XLS$$ X P!!AB l $ASG2 x!!LS $$XLS$$ P!!AB PLED RGFRMT P!!LS $$XLS$$ P!!AB PLED SUBAPL P!!LS $$XLS$$ P!!AB PLE
0x394b18…394cac Dummy {f00=0x0133, f01=0x0190, f02=» " D @L L L URR RRLA Q RR Q _b A 1XFR2 RRR_ @ @ @ @ @ @ @ N ^ n 0 ~ V N 0 . 0 0 0 J F
0x394cac…394e40 Dummy {f00=0x0133, f01=0x0190, f02=» EJ-EDB T[LLER o 0 * < J F " D v g L l ! L L L R 5 v l LK N EJ-EDB T[LLER o TOTAL 0 '
0x394e40…394fd4 (2, 314) Opaque[0x194]
0x394fd4…395168 # DirEnt {nam=»KTPLND«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2668, f03=0x0000}
0x394fd4…395168 IdxSect {
0x394fd4…395168 f00 = 0x0133 // 0x394fd4 @0x0
0x394fd4…395168 f01 = 0x0002 // 0x394fd6 @0x2
0x394fd4…395168 gno = [ // 0x394fd8 @0x4
0x394fd4…395168 [0x00]: C0x0133.0x1.0
0x394fd4…395168 ]
0x394fd4…395168 }
0x395168…3952fc Dummy {f00=0x0133, f01=0x018e, f02=» P IDENT KTPLND 03.01.XXX.1 DDUM KMD08 & PDIV : ******************** H * d * %* DUMMY MODULE FOR KONTOPLAN n * ******************** * ENTRY KTPLAN P ENTRY SETMK INCLUDE EQUATE
0x3952fc…395490 Dummy {f00=0x0133, f01=0x4062, f02=» PSETMK PROC P RET P PEND & P* 4 P* > P* H END R@ ^ * d * %* DUMMY MODULE FOR KONTOPLAN n * ******************** * ENTRY KTPLAN P ENTRY SETMK INCLUDE EQUATE
0x395490…395624 Dummy {f00=0x0133, f01=0x2008, f02=» KTOPR PROC CMP CBIN0,CBIN0 RET 2 PEND > END L@ X H * d * %* DUMMY MODULE FOR KONTOPLAN n * ******************** * ENTRY KTPLAN ENTRY KTOPR INCLUDE EQUATE
0x395624…3957b8 Dummy {f00=0x0133, f01=0x0000, f02=»
[…0x2…]
0x395ae0…395c74 (2, 315) Opaque[0x194]
0x395c74…395e08 # DirEnt {nam=»KTOPR «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2670, f03=0x0000}
0x395c74…395e08 IdxSect {
0x395c74…395e08 f00 = 0x0133 // 0x395c74 @0x0
0x395c74…395e08 f01 = 0x0006 // 0x395c76 @0x2
0x395c74…395e08 gno = [ // 0x395c78 @0x4
0x395c74…395e08 [0x00]: C0x0133.0x2.0
0x395c74…395e08 [0x01]: C0x0133.0x3.0
0x395c74…395e08 [0x02]: C0x0134.0x0.0
0x395c74…395e08 ]
0x395c74…395e08 }
0x395e08…395f9c Dummy {f00=0x0133, f01=0x0190, f02=» P IDENT KTOPR 03.01.XXX.1 DDUM KMD08 & PDIV : ENTRY KTOPR H P ENTRY KTPRT P EXT ADMRET p EXT KTPLAN P EXT RESTMK P EXT RAREAD P EXT RAWRIT P EXT SPCLRA P EXT SPCLRN P EXT SPERR
0x395f9c…396130 Dummy {f00=0x0133, f01=0x018e, f02=»* OPRETTELSE/SLETNING I KONTOPLAN P* . P******************** 8 & P TBT GTMASTFL,KTCR00A ONLY MASTER T P B KTCROK1 ~ PKTCR00A * P CMP CTASKNR,CBIN0 ALL MUST BE CLOSED P BNE KTCROK1 ( P SET CCONVFLG CLOSE FOR OTHER TASKS
0x396130…3962c4 Dummy {f00=0x0133, f01=0x0190, f02=» ~ PKTCR010 P PERF SPCLRA & P IB SPBINW2,KTCROK,KTCROK,KTCR100 , P B KTCR000 V * PKTCR100 CLEAR CSWFLAG LOOK FOR NUMBER h P PERF KTPLAN,GSWBCD6,GSWBCD3 " P BNOK KTCR000 ERROR ON KTPLAN P CBL GSWBIN5,CBIN0,KTCR110 P SET C
0x3962c4…396458 Dummy {f00=0x0133, f01=0x0190, f02=»130,KTCR150 x P B KTCR120 PKTCR130 B KTCR000 & PKTCR150 @ & P TBF CSWFLAG,KTCR500 IF NOT FOUND P P* FOUND z 0 P CBE GSWBCD3,=D'0',KTCR200 BRANCH TO DELETE P ADD GSWBIN5,CBIN6 . P XCOPY CKTBUF,GSWBIN5,CBIN2,GSWBCD3,CBIN1
0x396458…3965ec Dummy {f00=0x0133, f01=0x0190, f02=» - RECORD NO | , P* GSWBIN5-6 - START OF RECORD PKTCR200 D PKTCR210 T . P DLETE CKTBUF,GSWBIN5,CBIN8 DELETE RECORD d " P CBNE GSWBIN4,CKTLAST,KTCR250 $ P NOW THIS IS LAST USED RECORD . P XCOPY GSWSTR20,CBIN0,CBIN20,CKTBUF,
0x3965ec…396780 Dummy {f00=0x0133, f01=0x0190, f02=»DELETED P SUB CKTLAST,CBIN1 P SUB GSWBIN4,CBIN1 * P CBE GSWBIN4,CBIN0,KTCR215 D P MOVE GSWBIN5,=W'128' f 2 P PERF RAREAD,DK04,=D'4',CKTBUF,GSWBIN5,CKTLAST P BNOK KTCR000 PKTCR215 P PERF RESTMK P B KTCR000 PKT
0x396780…396914 (2, 316) Dummy {f00=0x0133, f01=0x0190, f02=» & P ADD GSWBIN4,CBIN1 NOT LAST RECORD P MOVE CCYBUF,CBLANKS 2 P MOVE GSWBIN5,=W'128' N 2 P PERF RAREAD,DK04,=D'4',CCYBUF,GSWBIN5,GSWBIN4 l P BNOK KTCROK P MOVE GSWBIN5,=W'120' , P XCOPY CKTBUF,GSWBIN5,CBIN8,CCYBUF,CBIN0 P MOV
0x396914…396aa8 Dummy {f00=0x0133, f01=0x0190, f02=» MOVE CKTBUF,CCYBUF P MOVE GSWBIN5,CBIN0 P ADD GSWBIN4,CBIN1 8 P B KTCR200 R PKTCR500 d P NOT FOUND t P CMP GSWBCD3,=D'0' $ P BE KTCR000 DELETE NON-EXISTING P* CREATE NEW P MOVE CKTBUF,CBLANKS P MOVE GS
0x396aa8…396c3c Dummy {f00=0x0133, f01=0x0190, f02=»WBIN5,CBIN0 PKTCR520 P MOVE GSWBCD7,=D'1' $ . P XCOPY GSWSTR20,CBIN0,CBIN6,CKTBUF,GSWBIN5 @ . P XCOPY GSWBCD7,CBIN1,CBIN6,CKTBUF,GSWBIN5 r : P CBE GSWSTR20,CBLANKS,KTCR550 POSITION FOUND (BLANK) 0 P CBG GSWBCD7,GSWBCD6,KTCR550 POSITION
0x396c3c…396dd0 Dummy {f00=0x0133, f01=0x0190, f02=» PKTCR530 P ADD GSWBIN4,CBIN1 P CBNG GSWBIN4,CKTMAX,KTCR540 . P* SET UP ERROR 10 R PKTCR535 p P MOVE SPBINW4,CBIN21 P MOVE GTWBCD2,=D'04' P MOVE GTWBCD1,=D'10' P MOVE GSWSTR9,=C'DISCFEJL ' P PERF SPERR
0x396dd0…396f64 Dummy {f00=0x0133, f01=0x0190, f02=»SWBIN4 h P BNOK KTCR000 P MOVE GSWBIN5,CBIN0 $ PKTCR550 @ . P XCOPY GSWSTR20,CBIN0,CBIN6,GSWBCD6,CBIN1 P . P XCOPY GSWSTR20,CBIN6,CBIN2,GSWBCD3,CBIN1 PKTCR560 P MOVE GSWBIN3,=W'120' 8 P XCOPY GSWSTR20,CBIN8,CBIN8,CKTBUF,GSW
0x396f64…3970f8 Dummy {f00=0x0133, f01=0x018e, f02=»F RAWRIT,DK04,=D'4',CKTBUF,GSWBIN4 P BNOK KTCROK * P PERF RESTMK > P B KTCR000 R PKTCR600 d " P CBNE GSWBIN4,CKTLAST,KTCR610 t P CBE CKTLAST,CKTMAX,KTCR535 P ADD CKTLAST,CBIN1 PKTCR610 * P PERF RAWRIT,DK04,=D'4',CKTBUF,G
0x3970f8…39728c Dummy {f00=0x0133, f01=0x0190, f02=» 2 P PERF RAREAD,DK04,=D'4',CKTBUF,GSWBIN5,GSWBIN4 P BNOK KTCROK : P MOVE GSWBIN5,CBIN0 N . P COPY GSWSTR20,CBIN0,CBIN8,GSWSTR20,CBIN8 j P B KTCR560 PKTCROK P CLEAR CCONVFLG PKTCROK1 P B ADMRET P EJECT PKTPR
0x39728c…397420 Dummy {f00=0x0133, f01=0x0190, f02=» | & P TBF GTMASTFL,KTPRTOK ONLY MASTER P CBNE CTASKNR,CBIN0,KTPRTOK 2 P WAIT KTALLY V ( P EDWRT KTALLY,KTPF100 WRITE HEADING j P* LOOP THROUGH FILE P MOVE GSWBIN4,CBIN0 PKTPRT15 P ADD GSWBIN4,CBIN1 8 P CBG GSWBIN4
0x397420…3975b4 (2, 317) Dummy {f00=0x0134, f01=0x0190, f02=»5 P SET CKFLAG RESERVE BUFFER P MOVE GSWBIN5,=W'128' , P MOVE CKTBUF,CBLANKS J 2 P PERF RAREAD,DK04,=D'4',CKTBUF,GSWBIN5,GSWBIN4 f P BNOK KTPRT45 P* LOOP THROUGH BUFFER P MOVE GSWBIN5,CBIN0 PKTPRT35 P MOVE GS
0x3975b4…397748 Dummy {f00=0x0134, f01=0x0190, f02=»SWBCD6,CBIN1,CBIN6,CKTBUF,GSWBIN5 P ADD GSWBIN5,CBIN6 * . P XCOPY GSWBCD3,CBIN1,CBIN2,CKTBUF,GSWBIN5 D P ADD GSWBIN5,CBIN2 v " P CBE GSWSTR20,CBLANKS,KTPRT80 P WAIT KTALLY $ P EDWRT KTALLY,KTPF200 PRINT LINE P CBL GSWBIN5,=W'128',K
0x397748…3978dc Dummy {f00=0x0134, f01=0x0190, f02=»KTPRT80 P CLEAR CKFLAG PKTPRT90 & " P PERF FRMXTA,CBIN7 SKIP LINES 6 P PERF WTALLY PKTPRTOK p P RET P PEND P EJECT P* P* P* FORMATS P* P PKTPFRM01 FRMT P FLINK KTPF100
0x3978dc…397a70 Dummy {f00=0x0134, f01=0x0190, f02=» GTDYFLG,KTPF020 P FKI 13,ME,MINL=1,MAXL=1 P FMEL '9',GSWBCD3 8 PKTPF020 R P FMEND b * p PKTPF100 FRMT z P FSL P FCOPY =C'ADM ' P FNL P FCOPY =C'DATAS[T' P FILLR ' ',1 P FCOPY =C'REGKONTONR'
0x397a70…397c04 Dummy {f00=0x0134, f01=0x40dc, f02=» FNL P FMEND P* PKTPF200 FRMT $ P FILLR '1',2 8 & P FMEL '99999999E-99',GSWBCD6 KT NO L P FMEL 'BBZ9',GSWBCD3 TYPE v P FILLR ' ',2 P FMEND P* P END @ ILLR ' ',1 P FCOPY =C'REGKONTONR'
0x397c04…397d98 Dummy {f00=0x0134, f01=0x2008, f02=» NT KTOPR 01.03.XXX.1 DDUM KMD08 $ PDIV 8 ENTRY KTOPR F EXT KTPLAN Z * n END x@
0x397d98…397f2c Dummy {f00=0x0134, f01=0x0000, f02=»
[…0x1…]
0x3980c0…398254 (2, 318) Opaque[0x194]
0x398254…3983e8 # DirEnt {nam=»KTOPRD«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2688, f03=0x0000}
0x398254…3983e8 IdxSect {
0x398254…3983e8 f00 = 0x0134 // 0x398254 @0x0
0x398254…3983e8 f01 = 0x0002 // 0x398256 @0x2
0x398254…3983e8 gno = [ // 0x398258 @0x4
0x398254…3983e8 [0x00]: C0x0134.0x1.0
0x398254…3983e8 ]
0x398254…3983e8 }
0x3983e8…39857c Dummy {f00=0x0134, f01=0x018e, f02=» P IDENT KTOPRD 03.01.XXX.1 DDUM KMD08 & PDIV : ******************** H * d * %* DUMMY MODULE FOR KONTOPLAN n * ******************** * ENTRY KTOPR P ENTRY KTPRT P EXT ADMRET
0x39857c…398710 Dummy {f00=0x0134, f01=0x4028, f02=» P* P* END @ $DUM KMD08 & PDIV : ******************** H * d * %* DUMMY MODULE FOR KONTOPLAN n * ******************** * ENTRY KTOPR P ENTRY KTPRT P EXT ADMRET
0x398710…3988a4 Dummy {f00=0x0134, f01=0x2008, f02=» KTOPR PROC CMP CBIN0,CBIN0 RET 2 PEND > END L@ X H * d * %* DUMMY MODULE FOR KONTOPLAN n * ******************** * ENTRY KTPLAN ENTRY KTOPR INCLUDE EQUATE
0x3988a4…398a38 Dummy {f00=0x0134, f01=0x0000, f02=»
[…0x2…]
0x398d60…398ef4 (2, 319) Opaque[0x194]
0x398ef4…399088 # DirEnt {nam=»RGMND «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2690, f03=0x0000}
0x398ef4…399088 IdxSect {
0x398ef4…399088 f00 = 0x0134 // 0x398ef4 @0x0
0x398ef4…399088 f01 = 0x0002 // 0x398ef6 @0x2
0x398ef4…399088 gno = [ // 0x398ef8 @0x4
0x398ef4…399088 [0x00]: C0x0134.0x2.0
0x398ef4…399088 ]
0x398ef4…399088 }
0x399088…39921c Dummy {f00=0x0134, f01=0x40ea, f02=» P IDENT RGMND 03.01.XXX.1 P DDUM KMD08 & P PDIV : P ENTRY INITRG H P INCLUDE EQUATE ^ P EJECT v PINITRG PROC P RET P* P PEND P* P* P* P END @ RET P* PPG03
0x39921c…3993b0 Dummy {f00=0x0134, f01=0x2008, f02=» NT RGMAIN @ AG&5 z < PTRERR ERRORMESSAG&5 * P PERF SPERR j P B TR90 P PEND P* P* @ NTERMEDIATE STOP OF CYCLE 8 P
0x3993b0…399544 Dummy {f00=0x0134, f01=0x0000, f02=»
[…0x3…]
0x399a00…399b94 (2, 320) Opaque[0x194]
0x399b94…399d28 # DirEnt {nam=»LISTE «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2698, f03=0x0000}
0x399b94…399d28 IdxSect {
0x399b94…399d28 f00 = 0x0134 // 0x399b94 @0x0
0x399b94…399d28 f01 = 0x0002 // 0x399b96 @0x2
0x399b94…399d28 gno = [ // 0x399b98 @0x4
0x399b94…399d28 [0x00]: C0x0134.0x3.0
0x399b94…399d28 ]
0x399b94…399d28 }
0x399d28…399ebc Dummy {f00=0x0134, f01=0x0190, f02=» PSKF 1 PTRA RGSTRT PTRA DKSUBS $ PTRA KMD08 6 PTRA RGMAIN H PTRA SCREEN Z PTRA KMDIO l PTRA RGADM ~ PTRA RGSUB1 PTRA RGSUB2 PTRA RGSUB3 PTRA RGFRMT PTRA SUBAPL PTRA DIVFMT PPRT DIV167
0x399ebc…39a050 Dummy {f00=0x0134, f01=0x007c, f02=»ADM6 PTRA ADM6D PTRA KTPLND PTRA KTPLN 0 PTRA KTOPR B PTRA EQULST T PSCR f $ASG2 r PTRA RGADM ~ PTRA RGSUB1 PTRA RGSUB2 PTRA RGSUB3 PTRA RGFRMT PTRA SUBAPL PTRA DIVFMT PPRT DIV167
0x39a050…39a1e4 Dummy {f00=0x0134, f01=0x2008, f02=» PTRA ADM6D PTRA KTPLND PTRA KTPLN 0 PTRA KTOPR B PTRA EQULST T PSCR f $ASG2 r PTRA RGADM ~ PTRA RGSUB1 PTRA RGSUB2 PTRA RGSUB3 PTRA RGFRMT PTRA SUBAPL PTRA DIVFMT PPRT DIV167
0x39a1e4…39a378 Dummy {f00=0x0134, f01=0x0190, f02=» j * & * & 6 * & d * & + * & I * & g
0x39a378…39a50c Dummy {f00=0x0134, f01=0x0190, f02=» x * & * & D * & r * & 9 * & W * & u
0x39a50c…39a6a0 Dummy {f00=0x0134, f01=0x0190, f02=» * & $ * & R * & ) * & G * & e *
0x39a6a0…39a834 (2, 321) Opaque[0x194]
0x39a834…39a9c8 # DirEnt {nam=»ADM6 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x26a0, f03=0x0000}
0x39a834…39a9c8 IdxSect {
0x39a834…39a9c8 f00 = 0x0135 // 0x39a834 @0x0
0x39a834…39a9c8 f01 = 0x000c // 0x39a836 @0x2
0x39a834…39a9c8 gno = [ // 0x39a838 @0x4
0x39a834…39a9c8 [0x00]: C0x0135.0x0.0
0x39a834…39a9c8 [0x01]: C0x0135.0x1.0
0x39a834…39a9c8 [0x02]: C0x0135.0x2.0
0x39a834…39a9c8 [0x03]: C0x0135.0x3.0
0x39a834…39a9c8 [0x04]: C0x0136.0x0.0
0x39a834…39a9c8 [0x05]: C0x0136.0x1.0
0x39a834…39a9c8 ]
0x39a834…39a9c8 }
0x39a9c8…39ab5c Dummy {f00=0x0135, f01=0x0190, f02=» P IDENT ADM6 03.01.XXX.1 DDUM KMD08 $ PDIV 8 P ENTRY ADM600 F P ENTRY SIGNON P ENTRY CHNGDK r P ENTRY STRTRC P ENTRY SENDRC P ENTRY TERMIN P ENTRY SIGNOF P ENTRY EXCHAN P ENTRY TRNOK
0x39ab5c…39acf0 Dummy {f00=0x0135, f01=0x018e, f02=» ADMRET P EXT SPERR P EXT CLSVOL " P EXT LAMPON 6 P EXT SOPRD J P EXT ASGVOL P EXT BCKUP p P EXT RAREAD P EXT GETBIT P EXT WRITJT P* P INCLUDE EQUATE P EJECT PADM600 P SET CCONVFL
0x39acf0…39ae84 Dummy {f00=0x0135, f01=0x0190, f02=» " P CMP CTASKNR,CBIN0 ALL CLOSED P BNE ADM06RET * P SET SPPROMPT @ P MOVE SPKEY,CBIN2 V P ATTFMT SNDFRM p P PERF SPCLRS * P IB SPBINW2,ADM06RET,ADM06RET,ADM0610 P B ADM600 P* , P* WRITE SL
0x39ae84…39b018 Dummy {f00=0x0135, f01=0x0190, f02=»=D'2',CPCKBUF,CRECNR ~ P BNOK ADM600 . P PERF WRITID,CBIN5,CBIN2 SLUTID ON JOURNAL 0 P EJECT b 6 P************************************************** p P* $ P* BATCH TRANSMISSION P* 1) SIGNON P* 2) CHANGE
0x39b018…39b1ac Dummy {f00=0x0135, f01=0x018e, f02=»INATE j 2 P* 6) WHEN ALL TRANSMITTED SEND SIGNOFF P* D 6 P************************************************* N P PERF SIGNON P BNOK ADM06OUT PADM0620 P* SEND NEXT OR SIGNOFF P PERF LAMPOF,=W'2047' PADM063
0x39b1ac…39b340 Dummy {f00=0x0135, f01=0x0190, f02=» l P PERF SENDRC SEND BATCH P BOK ADM0620 ( P IF NOT OK < P PERF TERMIN SEND TERMINATE P P PERF LAMPOF,=W'2047' t & P PERF LAMPON,=W'2' LAMP 10, ERROR P B ADM0630 PADM6SOFF P PERF SIGNOF SEND SIGNOFF PADM06OUT
0x39b340…39b4d4 (2, 322) Dummy {f00=0x0135, f01=0x0190, f02=»2047' P B ADMRET P EJECT 4 P************************************************ . P* f P* SIGNON p P* IF NOT OK CR NOT = 0 P* 4 P************************************************ PSIGNON PROC P MOV
0x39b4d4…39b668 Dummy {f00=0x0135, f01=0x018e, f02=» FIND LENGTH v 8 P MATCH CTRANBUF,GSWBIN1,GSWBIN2,CBLANKS,CBIN0,CBIN2 P MOVE GSWBIN2,GSWBIN1 P P TBT CTESTFLG,SIGON10 n P PERF EXCHAN EXCHANGE DC P BNOK SIGON100 P PERF WJDC P MOVE GSWSTR20,=C'DFH3504' P MOVE GSWBIN1,CBIN
0x39b668…39b7fc Dummy {f00=0x0135, f01=0x0190, f02=» P CMP CBIN0,CBIN0 P RET PSIGON100 ( P MOVE SPBINW4,CBIN21 8 P MOVE GTWBCD2,=D'60' T P MOVE GSWSTR9,=C'TRANSMIT ' p P MOVE GTWBCD1,=D'16' P PERF SPERR P PERF WRITJT,=W'14' P CMP CBIN0,CBIN1 P RET P PEN
0x39b7fc…39b990 Dummy {f00=0x0135, f01=0x0190, f02=» P* STOP SEND PIN 6 P* CONTINIUE PIN 5 & P* H 2 P********************************************* R PCHNGDK PROC PCHNG000 , P PERF CLSVOL,CBIN2 CLOSE FILES ON VOL 2 P MOVE CRECNR,CBIN1 P MOVE CRECBCD,=D'1
0x39b990…39bb24 Dummy {f00=0x0135, f01=0x0190, f02=»PRD P IB GSWBIN2, C 2 P CHSOP10,CHSOP09,CHSOP08,CHSOP07,CHSOP06, C $ . P CHSOP05,CHSOP04,CHSOP03,CHSOP02,CHSOP01 Z PCHSOP01 PCHSOP02 PCHSOP03 PCHSOP04 PCHSOP08 PCHSOP09 P B CHNG010 P* P
0x39bb24…39bcb8 Dummy {f00=0x0135, f01=0x0190, f02=» P ATTFMT SNDFRM SIGNON FORMAT P PERF SPCLRS , $ P IB SPBINW2,CH1010,CH1010,CH1020 @ PCH1010 h P B CHNG000 v PCH1020 P PERF SIGNON P BNOK CHNG000 P PERF LAMPOF =W'2047' P B CHNG000 P* PCHSOP05 $
0x39bcb8…39be4c Dummy {f00=0x0135, f01=0x018e, f02=»00 PCHNG050 P PERF LAMPON,=W'64' LAMP 5 P CMP CBIN0,CBIN0 SET CR < P RET P* h PCHSOP06 SOP 6 r $ P PERF LAMPOF,=W'2047' LAMPS OFF $ P PERF BCKUP,=W'1' WITHOUT BACKUP P BNOK CHNG000 P B CHNG130 P*
0x39be4c…39bfe0 Dummy {f00=0x0135, f01=0x0190, f02=» P* PCHNG130 P PERF LAMPOF,=W'2047' 4 P CMP CBIN0,CBIN1 INDICATE ERROR OR END OF TRANS < P RET t P PEND P EJECT . P****************************************** P* * P* STRTRC - SEND OF STARTIDENT P*
0x39bfe0…39c174 (2, 323) Dummy {f00=0x0135, f01=0x0190, f02=» z P PERF LAMPON,=W'64' P MOVE GSWBIN6,CBIN1 $ P MOVE GSWBIN1,=W'128' @ 4 P PERF RAREAD,DK02,=D'2',CPCKBUF,GSWBIN1,GSWBIN6 ^ P BNOK STRTRET . P CBE GTWBCD1,=D'4',STRTRET RECORD DELETED? P PERF WRITID,CBIN5,CBIN1 P MOVE GSWB
0x39c174…39c308 Dummy {f00=0x0135, f01=0x0190, f02=»CTRANBUF,=C' ' P EDIT CTRANBUF,SNDFRM2 P MOVE GSWBIN2,=W'31' LENGTH 4 P PERF EXCHAN EXCHANGE DC X P BNOK STRTRET x P PERF TRNOK CHECK IF OK P BNOK STRTRET P CMP CBIN0,CBIN0 SET CR P RET PSTRTRET P CMP CBI
0x39c308…39c49c Dummy {f00=0x0135, f01=0x0190, f02=» - SEND BATCH UNTIL SLUTID P* " 2 P********************************************** , PSENDRC PROC b P MOVE CRECNR,CBIN1 v PSND005 $ P MOVE GSWBIN3,CBIN0 PACKPOINTER PSND010 P ADD CRECNR,CBIN1 P MOVE GSWBIN1,=W'128'
0x39c49c…39c630 Dummy {f00=0x0135, f01=0x0190, f02=» P MOVE GSWSTR20,=C'SLUTD' P MOVE GSWBIN5,CBIN0 $ 6 P MATCH GSWSTR20,GSWBIN5,CBIN5,CPCKBUF,CBIN0,CBIN5 @ P BE SNDSLUT z $ P MOVE GSWSTR9,=X'7F' FIND LENGTH PSND015 P MOVE GSWBIN4,CBIN0 P MOVE GSWBIN5,=W'128' 6 P MATCH CPC
0x39c630…39c7c4 Dummy {f00=0x0135, f01=0x0190, f02=»N4,GSWBIN3 SEE IF MORE SPACE P CBNG GSWBIN4,=W'504',SND030 $ $ P SUB CRECNR,CBIN1 NO MORE SPACE H P B SND040 SEND BUFFER p PSND030 P SUB GSWBIN4,GSWBIN3 RESTORE & P ADD GSWBIN4,CBIN1 FILL WITH X'00' P CBE GSWBIN4,=W'128',SND037
0x39c7c4…39c958 Dummy {f00=0x0135, f01=0x0190, f02=» GSWBIN5,CBIN20 4 P CBG GSWBIN5,GSWBIN4,SND035 ALL TRAILING FILLED PSND037 P 2 P EDSUB CTRANBUF,GSWBIN3,SNDFRM5 INSERT RECORD ^ P B SND010 READ NEXT PSND040 P MOVE GSWBIN2,GSWBIN3 P MOVE SPBINW1,=X'0301' P MOVE TTARKSAV
0x39c958…39caec Dummy {f00=0x0135, f01=0x018e, f02=» PERF TRNOK P BNOK SNDERR P B SND005 ( PSNDSLUT : , P CBE GSWBIN3,CBIN0,SND090 REQ.LGTH.=0 ? J P MOVE GSWBIN2,GSWBIN3 z P PERF EXCHAN EXCHANGE DC P BNOK SNDERR P PERF TRNOK P BNOK SNDERR PSND090 P MOVE
0x39caec…39cc80 Dummy {f00=0x0135, f01=0x0190, f02=» P BNOK SNDERR P PERF WRITID,CBIN5,CBIN2 P PERF WJDC PRINT ANSWER 8 P TBT CTESTFLG,SNDSL10 X P MOVE GSWSTR9,=C'0002' v P MOVE GSWBIN1,CBIN0 P MOVE GSWBIN2,=W'52' 8 P MATCH CTRANBUF,GSWBIN1,GSWBIN2,GSWSTR9,CBIN0,CBIN4 P
0x39cc80…39ce14 (2, 324) Dummy {f00=0x0135, f01=0x0190, f02=» EJECT 0 P******************************************** P* B > P* TERMIN - TERMINATE TRANSMISSION IN CASE OF ERROR L P* 0 P******************************************** PTERMIN PROC P MOVE GSWBIN3,CBIN0 P MOVE CTRANB
0x39ce14…39cfa8 Dummy {f00=0x0135, f01=0x018e, f02=»IN14 P PERF EXCHAN EXCHANGE DC P BNOK TERMRET , P PERF WJDC B PTERMRET T P RET d P PEND p P EJECT ~ 2 P********************************************* P* P* SIGNOFF P* 2 P************************
0x39cfa8…39d13c Dummy {f00=0x0135, f01=0x0190, f02=» $ P EDSUB CTRANBUF,GSWBIN3,SNDFRM2 P MOVE GSWBIN2,CBIN9 , P PERF EXCHAN H P BNOK SIGOFRET P TBT CTESTFLG,SIGOFRT1 r P PERF WJDC PRINT ANSWER PSIGOFRET P RET PSIGOFRT1 P CMP CBIN0,CBIN0 P RET P PEND
0x39d13c…39d2d0 Dummy {f00=0x0135, f01=0x0190, f02=» IN CASE OF ERROR ERRORMESSAGE , P* IS SHOWN ON SCREEN AND JOURNAL . P* ^ 2 P********************************************* h PEXCHAN PROC P TBT CTESTFLG,EXCHTEST ( P MOVE GSWBIN5,=W'600' TIMEOUT VALUE 8 P*****DCEXCH
0x39d2d0…39d464 Dummy {f00=0x0135, f01=0x018e, f02=»WBIN2,=W'504' P MOVE GSWBIN5,=W'600' * P DCREAD DCOMM,CTRANBUF,GSWBIN2,GSWBIN5 4 P* b P BOK EXCHRET l PEXCHNOK & P PERF GETBIT,DCOMM FETCH ERRORCODE P MOVE SPBINW4,CBIN21 P MOVE GTWBCD2,=D'60' P MOVE GSWSTR9,=C'TRANS
0x39d464…39d5f8 Dummy {f00=0x0135, f01=0x0190, f02=» P RET PEXCHTEST P MOVE GSWBIN2,CBIN20 P MOVE CTRANBUF,=X'35' < P DELAY GSWBIN2 Z P CMP CBIN0,CBIN0 p P RET P PEND P EJECT 2 P********************************************* P* 6 P* TRNOK - CHECK IF
0x39d5f8…39d78c Dummy {f00=0x0135, f01=0x0190, f02=» | P MOVE GSWSTR9,=X'35' 8 P MATCH CTRANBUF,GSWBIN3,GSWBIN2,GSWSTR9,CBIN0,CBIN1 $ P BNE TRNERR ` P MOVE GSWBIN2,CBIN0 t P MOVE CTRANBUF,=C' ' P CMP CBIN0,CBIN0 P RET PTRNERR P CMP CBIN0,CBIN1 P RET P PEND
0x39d78c…39d920 Dummy {f00=0x0135, f01=0x0190, f02=» b P* 6 P************************************************* PWJDC PROC L P WAIT KTALLY ^ P CBL GSWBIN2,CBIN1,WJDCRET r P CBG GSWBIN2,=W'504',WJDCRET P MOVE GSWSTR9,=C'DFH' P MOVE GSWBIN1,CBIN0 8 P MATCH CTRANBUF,GSWBIN
0x39d920…39dab4 (2, 325) Dummy {f00=0x0136, f01=0x0190, f02=»9,=X'11' P MOVE GSWBIN1,CBIN0 8 P MATCH CTRANBUF,GSWBIN1,GSWBIN2,GSWSTR9,CBIN0,CBIN1 , P BNE WJDCRET h * P* GSWBIN1=START | * P ADD GSWBIN1,CBIN3 BYPASS SBA SEQUENSE P MOVE GSWBIN4,GSWBIN1 & P SUB GSWBIN2,GSWBI
0x39dab4…39dc48 Dummy {f00=0x0136, f01=0x0190, f02=»WSTR9,CBIN0,CBIN1 n P BNE WJDC010 * P SUB GSWBIN4,GSWBIN1 GSWBIN4 = LENGTH . 0 P COPY CPCKBUF,CBIN0,GSWBIN4,CTRANBUF,GSWBIN1 P EDWRT KJTAPE,WJDCFRM P ADD GSWBIN4,CBIN3 P SUB GSWBIN2,GSWBIN4 P ADD GSWBIN4,GSWBIN1 P MOVE GS
0x39dc48…39dddc Dummy {f00=0x0136, f01=0x0190, f02=»* P* P* PWJDC100 P SUB GSWBIN2,GSWBIN1 . P CBL GSWBIN2,=W'52',WJDC200 J $ P MOVE GSWBIN4,=W'30' FIND BLANK n 8 P MATCH CTRANBUF,GSWBIN4,GSWBIN2,CBLANKS,CBIN0,CBIN1 P BNE WJDC200 P MOVE CPCKBUF,=X'00' P SUB G
0x39dddc…39df70 Dummy {f00=0x0136, f01=0x0190, f02=» GSWBIN1,GSWBIN4 PWJDC200 ! P MOVE CPCKBUF,=X'00' ! ( P CBL GSWBIN2,=W'52',WJDC210 ! D P MOVE GSWBIN2,=W'52' ! h PWJDC210 ! 0 P COPY CPCKBUF,CBIN0,GSWBIN2,CTRANBUF,GSWBIN1 ! P EDWRT KJTAPE,WJDCFRM ! P RET ! P PEND ! P EJECT !
0x39df70…39e104 Dummy {f00=0x0136, f01=0x0190, f02=»************************ ! x P* " PSNDFRM FRMT " * P FSL " > P FCOPY =C'DATATRANSMISSION ' " J P FNL " n P FTEXT 'BRUGERNAVN' " z P FKI 12,MINL=1,MAXL=13,ME " * P FMEL 'AAAAAAAAAAAAAAAAAAA9',TTCYKTOT " P FNL " P FTEXT 'KENDEORD' "
0x39e104…39e298 Dummy {f00=0x0136, f01=0x018e, f02=»LR ' ',2 " P FCOPY =X'272020' # P FTEXT 'CSSN PS=' # * P FMEL '9999',TTARKSAV # D P FTEXT ',NAME=' # b * P FMEL 'AAAAAAAAAAAAAAAAAAA9',TTCYKTOT # z P FMEND # P* # PSNDFRM2 FRMT # P FILLR ' ',2 # P FCOPY =X'272020' # P FCOPY
0x39e298…39e42c Dummy {f00=0x0136, f01=0x018e, f02=» P FMEND $ P* $ PSNDFRM4 FRMT $ P FILLR ' ',2 $ 0 P FTEXT 'ANTAL RECORDS:' $ D P FMEL 'ZZZZZ9',TTARKSAV $ d P FMEND $ P* $ PSNDFRM5 FRMT $ P FBNZ GSWBIN3,SNDLAB10 $ P FILLR ' ',2 $ P FCOPY =X'272020' $ PSNDLAB10 $
0x39e42c…39e5c0 Dummy {f00=0x0136, f01=0x402c, f02=» P FMEND % P* % END % @ % ( P FILLR ' ',2 $ 0 P FTEXT 'ANTAL RECORDS:' $ D P FMEL 'ZZZZZ9',TTARKSAV $ d P FMEND $ P* $ PSNDFRM5 FRMT $ P FBNZ GSWBIN3,SNDLAB10 $ P FILLR ' ',2 $ P FCOPY =X'272020' $ PSNDLAB10 $
0x39e5c0…39e754 (2, 326) Dummy {f00=0x0136, f01=0x2008, f02=» & NT ADM6 DDUM KMD08 * , PDIV 6 END D@ PCASE R HEND ` T HRUN JESPER M:KMDV p HWEF 3 RGLOAD HMOV RGLOAD,/L HRUN JESPER RGLOAD $ H$PCASC M=M:KMDV,A=RGLOAD,C=CONF4 H$PCASF C=CONF4
0x39e754…39e8e8 Dummy {f00=0x0136, f01=0x0000, f02=»
[…0x6…]
0x39f260…39f3f4 (2, 327) Opaque[0x194]
0x39f3f4…39f588 # DirEnt {nam=»DCTSK «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1fd8, f03=0x0000}
0x39f3f4…39f588 IdxSect {
0x39f3f4…39f588 f00 = 0x00fe // 0x39f3f4 @0x0
0x39f3f4…39f588 f01 = 0x0004 // 0x39f3f6 @0x2
0x39f3f4…39f588 gno = [ // 0x39f3f8 @0x4
0x39f3f4…39f588 [0x00]: C0x00fe.0x3.0
0x39f3f4…39f588 [0x01]: C0x00ff.0x0.0
0x39f3f4…39f588 ]
0x39f3f4…39f588 }
0x39f588…39f71c Dummy {f00=0x00fe, f01=0x0190, f02=» . P IDENT DCTSK REL2.1 DK 800317 870150540210 P ENTRY DCTSK 6 P EXTRN I:EVA0 J P* ` P* j P* t P ~ P > P********************************************************** P* P* CONDITIONAL ASSEMBLY P* & P****
0x39f71c…39f8b0 Dummy {f00=0x00fe, f01=0x0190, f02=» 0 " PRBUFNR EQU 2 2 RECEIVE BUFFERS $ PRBUFL EQU 1150 LENGTH 2300 BYTES 0 P* X P* b P* EQUATES l P* PRSET EQU /B2 RESET KEY " P* COMMON EQU FOR ECB HANDLING P* P PECBBA EQU 2 PECBRL EQU 4
0x39f8b0…39fa44 Dummy {f00=0x00fe, f01=0x0190, f02=»L. ADDRESSES P* P* PDIS EQU 20 ( P* : PECBDC EQU -DIS-14 D P IFT DCLIN=2 ^ P IFT COPCMD=1 r PECBDC2 EQU ECBDC-DIS PECBICR EQU ECBDC2-DIS PECBICW EQU ECBICR-DIS P XIF P IFT DCLIN=2 P IFF COP
0x39fa44…39fbd8 Dummy {f00=0x00fe, f01=0x018e, f02=» ECBDC-DIS PECBICW EQU ECBICR-DIS P XIF 0 P IFF DCLIN=2 < P IFF COPCMD=1 P PECBICW EQU ECBDC-DIS f P XIF PECBVDU EQU ECBICW-DIS PECBKB EQU ECBVDU-DIS PECBSD EQU ECBKB-DIS P* P* " P* BASE ADDRESS F
0x39fbd8…39fd6c Dummy {f00=0x00fe, f01=0x0190, f02=» l P* " PNBRKBV EQU 0 NUMBER OF KB/VDUS & PNBRGTP EQU NBRKBV+2 NUMBER OF GTPS 8 P* b 2 PMF1KBV EQU NBRGTP+2 DV ADDRESSES KB/VDU MF #1 l 2 PMF1GTP EQU MF1KBV+16 DV ADDRESSES GTPS MF # 1 P IFT DCLIN=2 PMF2KBV EQU MF1GTP+16 P
0x39fd6c…39ff00 Dummy {f00=0x00fe, f01=0x0190, f02=»********* P* P* START ADDRESS FOR DC TASKS B P************************************************************* @ P PDCTSK EQU * P CF A14,I:EVA0 & P LDR* A1,A9 POLL & SELECT ADDRESS P LDKL A8,ECBDC P ADR A8,CREBAS
0x39ff00…3a0094 (2, 328) Dummy {f00=0x00ff, f01=0x018e, f02=»F ANY MESSAGE WITH WAIT ~ P LKM P DATA 1 , & P CF A14,GTRBUF GET RECEIVE BUFFER < P LDKL A8,ECBDC f P ADR A8,CREBAS | P CF A14,DCGETM P LD A4,ECBBA,A8 " P CF A14,RLRBUF RELEASE BUFFER P RB DCT100 P* P*
0x3a0094…3a0228 Dummy {f00=0x00ff, f01=0x0190, f02=» x ( P CM ECBCW,A8 NO TIME OUT SUPERVISION P LDKL A1,RBUFL+RBUFL 4 P ST A1,ECBRL,A8 REQ LENGTH P P ST A4,ECBBA,A8 r P LKM P DATA 1 P RTN A14 P* P* P* > P****************************************************
0x3a0228…3a03bc Dummy {f00=0x00ff, f01=0x018e, f02=»RLINK EQU RBUFL+RBUFL+2 P* PRBUF EQU * * P DATA *+2 POINTER FIRST FREE < P IFF RBUFNR=1 ` P DATA *+RLINK v P RES RBUFL P IFF RBUFNR=2 P DATA *+RLINK P RES RBUFL P IFF RBUFNR=3 P DATA *+RLINK P
0x3a03bc…3a0550 Dummy {f00=0x00ff, f01=0x0190, f02=» P* P* P* GET RECEIVE BUFFER P* 4 PGTRBUF EQU * > P LDKL A5,RBUF R P* h P* r PGETBUF EQU * | P LDR* A4,A5 P RF(Z) GETB50 NO BUFFER FREE P LDR* A3,A4 P STR A3,A5 P ADK A4,2 SKIP LINK
0x3a0550…3a06e4 Dummy {f00=0x00ff, f01=0x0190, f02=» PRLRBUF EQU * P LDKL A2,RBUF PRELB05 EQU * . P SUK A4,2 POINT TO LINK B PRELB10 EQU * b P LDR* A3,A2 v P RF(Z) RELB20 P LDR A2,A3 P RB RELB10 PRELB20 EQU * P STR A4,A2 P CMR A4 P RTN A14
0x3a06e4…3a0878 Dummy {f00=0x00ff, f01=0x407c, f02=»REQTIM EQU * P ST A1,ECBCW,A8 P LDK A7,/B9 , P LKM @ P DATA 1 L P RTN A14 P END l@ xA3,A2 v P RF(Z) RELB20 P LDR A2,A3 P RB RELB10 PRELB20 EQU * P STR A4,A2 P CMR A4 P RTN A14
0x3a0878…3a0a0c Dummy {f00=0x00ff, f01=0x2008, f02=» A7,/B7 TRANSFER PARAMETERS LKM , DATA 1 8 CF A14,ERASE ERASE SCREEN H 0 ,EM100 CF A14,TRPF TRANSMIT, PROGRAM FUNCTION j RB EM100 AGAIN * * END START @ 4,2,A13 ADR A14,A13 LOAD STACK
0x3a0a0c…3a0ba0 Dummy {f00=0x00ff, f01=0x40f4, f02=» : H IDENT D:CB40 TRA 4.2 80-03-28 F2 O2222 03.01.XXX.1 - D:CB40 - B D:CB40C - T * & F 0 0 - h * & 0 - = s - F - @ - @ A B
0x3a0ba0…3a0d34 (2, 329) Opaque[0x194]
0x3a0d34…3a0ec8 # DirEnt {nam=»ADM6D «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x26e0, f03=0x0000}
0x3a0d34…3a0ec8 IdxSect {
0x3a0d34…3a0ec8 f00 = 0x0137 // 0x3a0d34 @0x0
0x3a0d34…3a0ec8 f01 = 0x0002 // 0x3a0d36 @0x2
0x3a0d34…3a0ec8 gno = [ // 0x3a0d38 @0x4
0x3a0d34…3a0ec8 [0x00]: C0x0137.0x0.0
0x3a0d34…3a0ec8 ]
0x3a0d34…3a0ec8 }
0x3a0ec8…3a105c Dummy {f00=0x0137, f01=0x40d4, f02=» P IDENT ADM6D 03.01.XXX.1 DDUM KMD08 & PDIV : . ** DUMMY ADM6, WITHOUT DATATRANSMISSION H ENTRY ADM600 z EXT ADMRET ADM600 B ADMRET END @ ' ',2 $ P FCOPY =X'272020' $ PSNDLAB10 $
0x3a105c…3a11f0 Dummy {f00=0x0137, f01=0x2008, f02=» NT ADM6D DDUM KMD08 PDIV , . ** DUMMY ADM6, WITHOUT DATATRANSMISSION : ENTRY ADM600 l EXT ADMRET ADM600 B ADMRET END @ & H$PCASC M=M:167P,A=RGLOAD,C=CONDC4 H$PCASF C=CONDC4
0x3a11f0…3a1384 Dummy {f00=0x0137, f01=0x0000, f02=»
[…0x3…]
0x3a1840…3a19d4 (2, 330) Opaque[0x194]
0x3a19d4…3a1b68 # DirEnt {nam=»RELUP «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x26e8, f03=0x0000}
0x3a19d4…3a1b68 IdxSect {
0x3a19d4…3a1b68 f00 = 0x0137 // 0x3a19d4 @0x0
0x3a19d4…3a1b68 f01 = 0x0002 // 0x3a19d6 @0x2
0x3a19d4…3a1b68 gno = [ // 0x3a19d8 @0x4
0x3a19d4…3a1b68 [0x00]: C0x0137.0x1.0
0x3a19d4…3a1b68 ]
0x3a19d4…3a1b68 }
0x3a1b68…3a1cfc Dummy {f00=0x0137, f01=0x0190, f02=» P$REL NAM=RGSTRT P$REL NAM=DKSUBS P$REL NAM=KMD08 4 P$REL NAM=RGMAIN J P$REL NAM=RGMND b P$REL NAM=SCREEN x P$REL NAM=KMDIO P$REL NAM=RGADM P$REL NAM=RGSUB1 P$REL NAM=RGSUB2 P$REL NAM=RGSUB3 P$REL
0x3a1cfc…3a1e90 Dummy {f00=0x0137, f01=0x013e, f02=»$REL NAM=KTPLN P$REL NAM=KTPLND P$REL NAM=KTOPR . P$REL NAM=KTOPRD D P$REL NAM=REMFMT P$REL NAM=REMLEV t P$REL NAM=REMTXT P$REL NAM=DIV461 P$REL NAM=DIV167 P$REL NAM=DIV259 P$REL NAM=DIV805 P$REL
0x3a1e90…3a2024 Dummy {f00=0x0137, f01=0x2008, f02=» =KTPLN P$REL NAM=KTPLND P$REL NAM=KTOPR . P$REL NAM=KTOPRD D P$REL NAM=REMFMT P$REL NAM=REMLEV t P$REL NAM=REMTXT P$REL NAM=DIV461 P$REL NAM=DIV167 P$REL NAM=DIV259 P$REL NAM=DIV805 P$REL
0x3a2024…3a21b8 Dummy {f00=0x0137, f01=0x00f0, f02=»/O PSCR PTRA KTPLN,NL PKPF /O * PSCR 8 PTRA KTPLND,NL D PKPF /O Z PSCR h PTRA KTOPR,NL t PKPF /O PSCR PTRA KTOPRD,NL PKPF /O PSCR PASG /02,LP0F P$ASG2 SUB2,NL PKPF /O
0x3a21b8…3a234c Dummy {f00=0x0137, f01=0x2008, f02=» PSCR PTRA KTPLN,NL PKPF /O * PSCR 8 PTRA KTPLND,NL D PKPF /O Z PSCR h PTRA KTOPR,NL t PKPF /O PSCR PTRA KTOPRD,NL PKPF /O PSCR PASG /02,LP0F P$ASG2 SUB2,NL PKPF /O
0x3a234c…3a24e0 Dummy {f00=0x0137, f01=0x0000, f02=»
0x3a24e0…3a2674 (2, 331) Opaque[0x194]
0x3a2674…3a2808 # DirEnt {nam=»KEY461«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x26f0, f03=0x0000}
0x3a2674…3a2808 IdxSect {
0x3a2674…3a2808 f00 = 0x0137 // 0x3a2674 @0x0
0x3a2674…3a2808 f01 = 0x0002 // 0x3a2676 @0x2
0x3a2674…3a2808 gno = [ // 0x3a2678 @0x4
0x3a2674…3a2808 [0x00]: C0x0137.0x2.0
0x3a2674…3a2808 ]
0x3a2674…3a2808 }
0x3a2808…3a299c Dummy {f00=0x0137, f01=0x0190, f02=» PNOKEY EQU X'FF' PBSPKY1 EQU X'87' PCANKY1 EQU X'91' 4 PMACKY1 EQU X'95' L PEORKY1 EQU X'90' d PFTABKY1 EQU X'8B' | PBTABKY1 EQU X'83' PDUPKY1 EQU X'A2' PSLUTKY1 EQU X'A3' PREGKY1 EQU X'A1' PCOPKY1 EQU X'F
0x3a299c…3a2b30 Dummy {f00=0x0137, f01=0x0190, f02=»Y1 EQU X'FF' PCY2KY1 EQU X'FF' PCYCKY1 EQU X'89' , PINVKY1 EQU X'FF' D PKONKY1 EQU X'85' PKVITKY1 EQU X'86' t PSUPLKY1 EQU X'82' PSUMKY1 EQU X'81' PADMKY1 EQU X'A0' PDIVKY1 EQU X'84' PHBOGKY1 EQU X'80'
0x3a2b30…3a2cc4 Dummy {f00=0x0137, f01=0x0190, f02=»BKY1 EQU X'87' PINSKY1 EQU X'81' PDELKY1 EQU X'82' . PCL1KY1 EQU X'89' F PCL2KY1 EQU X'8A' ^ PCL3KY1 EQU X'8B' v POUTKY1 EQU X'A0' P* PBSPKY2 EQU X'C7' PCANKY2 EQU X'D1' PEORKY2 EQU X'D0' PMACKY2 EQU X'D5'
0x3a2cc4…3a2e58 Dummy {f00=0x0137, f01=0x40b6, f02=»EKY2 EQU X'D2' PREGKY2 EQU X'E1' PADMKY2 EQU X'E0' . PSPGKY2 EQU X'FF' F PKONKY2 EQU X'C5' ^ PKVITKY2 EQU X'C6' v PONKY2 EQU X'D9' P* @ EQU X'C7' PCANKY2 EQU X'D1' PEORKY2 EQU X'D0' PMACKY2 EQU X'D5'
0x3a2e58…3a2fec Dummy {f00=0x0137, f01=0x2008, f02=» * ERRFMT FRMT FSL , " FMEL 'ZZ9B',GTWBCD1 FILE NR. 8 FCOPY ERRTXT ^ " FMEL 'BZZ9',GTWBCD2 ERRORNR. t FCOPY =X'07' FMEND @ 8SPKTAB2 KTAB BSPKY1,CANKY1,NOKEY,MACKY1,NOKEY,EORKY1, C D ? FT
0x3a2fec…3a3180 Dummy {f00=0x0137, f01=0x0190, f02=»
0x3a3180…3a3314 (2, 332) Opaque[0x194]
0x3a3314…3a34a8 # DirEnt {nam=»TB3270«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x26f8, f03=0x0000}
0x3a3314…3a34a8 IdxSect {
0x3a3314…3a34a8 f00 = 0x0137 // 0x3a3314 @0x0
0x3a3314…3a34a8 f01 = 0x0004 // 0x3a3316 @0x2
0x3a3314…3a34a8 gno = [ // 0x3a3318 @0x4
0x3a3314…3a34a8 [0x00]: C0x0137.0x3.0
0x3a3314…3a34a8 [0x01]: C0x0138.0x0.0
0x3a3314…3a34a8 ]
0x3a3314…3a34a8 }
0x3a34a8…3a363c Dummy {f00=0x0137, f01=0x0190, f02=» 2 P IDENT TB3270 2.1DK 1 79-05-23 870150540210 4 P***** SPECIAL SCANDINAVIAN ALPHABET ****** : F P****************************************************************** r P* : P* CONVERSION TABLES FOR IBM 3270 EMULATION PACKKAGE P*
0x3a363c…3a37d0 Dummy {f00=0x0137, f01=0x018e, f02=»RY TASCII P ENTRY TEBCDI P ENTRY KEYCNV ( P* > P H P* CONDITIONAL ASSEMBLIES P P* r PKB6272 EQU 0 | P* P EJECT P* P* 4 P* TABLE FOR CONVERSION OF EBCDIC 6 BIT INTERNAL P* P* CODE TO
0x3a37d0…3a3964 Dummy {f00=0x0137, f01=0x0190, f02=» * P DATA /4849,/232E,/3C28,/2B21 /08-/0F * P DATA /264A,/4B4C,/4D4E,/4F50 /10-/17 2 * P DATA /5152,/245D,/2A29,/3B5E /18-/1F ` * P DATA /2D2F,/5354,/5556,/5758 /20-/27 * P DATA /595A,/402C,/255F,/3E3F /28-/2F ( P DATA /3031,/3233,/3435,/3637
0x3a3964…3a3af8 Dummy {f00=0x0137, f01=0x0190, f02=»OM ASCII TO EBCDIC r P* 4 P* USED TO GET BINARY VALUES FROM THE EBCDIC CODE $ P* * P* INVALID CODES ARE CONVERTED TO ZEROS f P* P* PTEBCDIC EQU * P DATA 0,0,0,0 /00-/07 P DATA 0,0,0,0 /08-/0F P DATA 0,0,0,0
0x3a3af8…3a3c8c Dummy {f00=0x0137, f01=0x0190, f02=»A,/5A6C,/507D 20-27 ( P DATA /4D5D,/5C4E,/6B60,/4B61 28-2F ( P DATA /F0F1,/F2F3,/F4F5,/F6F7 30-37 H ( P DATA /F8F9,/7A5E,/4C7E,/6E6F 38-3F t ( P DATA /6AC1,/C2C3,/C4C5,/C6C7 40-47 ( P DATA /C8C9,/D1D2,/D3D4,/D5D6 48-4F ( P DATA /D7D8,/D9E
0x3a3c8c…3a3e20 Dummy {f00=0x0137, f01=0x0190, f02=»394,/9596 68-6F | ( P DATA /9798,/99A2,/A3A4,/A5A6 70-77 ( P DATA /A7A8,/A900,/0000,/0000 78-7F D P DE p P EJECT ~ P* 4 P* TRANSLATION OF FUNCTON KEYS & LOWER CASE P - W P* PKEYCNV EQU * P IFF KB6272=1 P CWK A
0x3a3e20…3a3fb4 (2, 333) Dummy {f00=0x0138, f01=0x0190, f02=»10 EQU * P CWK A2,/80 P RF(L) KEYC99 $ P DB : P CWK A2,/C0 DK H P RF(L) KEYC50 DK ` & P LDK A2,/7F KEYSWITCH 2 (C0-FF) DK z P RF KEYC99 DK PKEYC50 EQU * DK P DE P SUK A2,/80 P LC A2,KBCVTB,A2
0x3a3fb4…3a4148 Dummy {f00=0x0138, f01=0x4184, f02=»C,/B5A7 /80-/87 z * P DATA /A87F,/A98C,/7F7F,/7F7F /88-/8F * P DATA /ABB2,/AAB1,/7F8B,/AEAD /90-/97 F * P DATA /AFB6,/7F7F,/7F7F,/7F7F /98-/9F t * P DATA /7F7F,/B3A5,/7F7F,/7F7F /A0-/A7 * P DATA /7F7F,/7F7F,/7F7F,/7F7F /A8-/AF * P DATA /303
0x3a4148…3a42dc Dummy {f00=0x0138, f01=0x2008, f02=» A @ aP x (@ :P T P> H D ! P P T P P T #P 'P +W AT M SQ T H D !A( aT y }P Q P PP WF T W P P P P H D ! $ 1 d I d _ d sP w
0x3a42dc…3a4470 Dummy {f00=0x0138, f01=0x0190, f02=» TC 8 ` | h j f T B TC * * L TB2 6 B %
0x3a4470…3a4604 Dummy {f00=0x0138, f01=0x0190, f02=» B Z 8 6
0x3a4604…3a4798 Dummy {f00=0x0138, f01=0x0190, f02=»
[…0x2…]
0x3a4ac0…3a4c54 (2, 334) Opaque[0x194]
0x3a4c54…3a4de8 # DirEnt {nam=»KMDNR «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2708, f03=0x0000}
0x3a4c54…3a4de8 IdxSect {
0x3a4c54…3a4de8 f00 = 0x0138 // 0x3a4c54 @0x0
0x3a4c54…3a4de8 f01 = 0x0002 // 0x3a4c56 @0x2
0x3a4c54…3a4de8 gno = [ // 0x3a4c58 @0x4
0x3a4c54…3a4de8 [0x00]: C0x0138.0x1.0
0x3a4c54…3a4de8 ]
0x3a4c54…3a4de8 }
0x3a4de8…3a4f7c Dummy {f00=0x0138, f01=0x0190, f02=» . )MES NORDJYLLANDS AMT, FORDELT P] MASKINER MES 6 PRT KM080 GENERELT B PRT CONNJT " PRT KM0801 CENTRALE BOGHOLDERI n PRT CONNJ1 PRT KM0802 VODSKOV PRT CONNJ2 PRT KM0803 HJ RRING PRT CONNJ3 " PRT KM08
0x3a4f7c…3a5110 Dummy {f00=0x0138, f01=0x00c8, f02=»HUS z PRT CONNJ6 2 -PRT KM0807 ]LBORGSKOLEN, DR,LUND, HOBRO, REVA PRT CONNJ7 T PRT KM0808 OFFLINE f PRT CONNJ8 PRT KM0809 DIVERSE PRT CONNJ9 $ASG2 J2 PRT KM0803 HJ RRING PRT CONNJ3 " PRT KM08
0x3a5110…3a52a4 Dummy {f00=0x0138, f01=0x2008, f02=» PRT CONNJ6 2 -PRT KM0807 ]LBORGSKOLEN, DR,LUND, HOBRO, REVA PRT CONNJ7 T PRT KM0808 OFFLINE f PRT CONNJ8 PRT KM0809 DIVERSE PRT CONNJ9 $ASG2 J2 PRT KM0803 HJ RRING PRT CONNJ3 " PRT KM08
0x3a52a4…3a5438 Dummy {f00=0x0138, f01=0x0190, f02=»
[…0x2…]
0x3a5760…3a58f4 (2, 335) Opaque[0x194]
0x3a58f4…3a5a88 # DirEnt {nam=»KM0802«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2710, f03=0x0000}
0x3a58f4…3a5a88 IdxSect {
0x3a58f4…3a5a88 f00 = 0x0138 // 0x3a58f4 @0x0
0x3a58f4…3a5a88 f01 = 0x0002 // 0x3a58f6 @0x2
0x3a58f4…3a5a88 gno = [ // 0x3a58f8 @0x4
0x3a58f4…3a5a88 [0x00]: C0x0138.0x2.0
0x3a58f4…3a5a88 ]
0x3a58f4…3a5a88 }
0x3a5a88…3a5c1c Dummy {f00=0x0138, f01=0x002c, f02=» MES NJ-AMT - VODSKOV $ASG2 "ORGSKOLEN, DR,LUND, HOBRO, REVA PRT CONNJ7 T PRT KM0808 OFFLINE f PRT CONNJ8 PRT KM0809 DIVERSE PRT CONNJ9 $ASG2 J2 PRT KM0803 HJ RRING PRT CONNJ3 " PRT KM08
0x3a5c1c…3a5db0 Dummy {f00=0x0138, f01=0x2008, f02=» NJ-AMT - VODSKOV $ASG2 "ORGSKOLEN, DR,LUND, HOBRO, REVA PRT CONNJ7 T PRT KM0808 OFFLINE f PRT CONNJ8 PRT KM0809 DIVERSE PRT CONNJ9 $ASG2 J2 PRT KM0803 HJ RRING PRT CONNJ3 " PRT KM08
0x3a5db0…3a5f44 Dummy {f00=0x0138, f01=0x0190, f02=»NJ-AMT 0000899 0 @ A B E F G H I P Q R S T F
0x3a5f44…3a60d8 Dummy {f00=0x0138, f01=0x0190, f02=»
0x3a60d8…3a626c Dummy {f00=0x0138, f01=0x0190, f02=» F 0 0 0 0 0 0 0
0x3a626c…3a6400 Dummy {f00=0x0138, f01=0x0190, f02=» 0 0 0 0 0 0 #0 *0 10 8 ? B L d
0x3a6400…3a6594 (2, 336) Opaque[0x194]
0x3a6594…3a6728 # DirEnt {nam=»KM0803«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2718, f03=0x0000}
0x3a6594…3a6728 IdxSect {
0x3a6594…3a6728 f00 = 0x0138 // 0x3a6594 @0x0
0x3a6594…3a6728 f01 = 0x0002 // 0x3a6596 @0x2
0x3a6594…3a6728 gno = [ // 0x3a6598 @0x4
0x3a6594…3a6728 [0x00]: C0x0138.0x3.0
0x3a6594…3a6728 ]
0x3a6594…3a6728 }
0x3a6728…3a68bc Dummy {f00=0x0138, f01=0x002e, f02=» MES NJ-AMT - HJ RRING $ASG2 $GSKOLEN, DR,LUND, HOBRO, REVA PRT CONNJ7 T PRT KM0808 OFFLINE f PRT CONNJ8 PRT KM0809 DIVERSE PRT CONNJ9 $ASG2 J2 PRT KM0803 HJ RRING PRT CONNJ3 " PRT KM08
0x3a68bc…3a6a50 Dummy {f00=0x0138, f01=0x2008, f02=» NJ-AMT - HJ RRING $ASG2 $GSKOLEN, DR,LUND, HOBRO, REVA PRT CONNJ7 T PRT KM0808 OFFLINE f PRT CONNJ8 PRT KM0809 DIVERSE PRT CONNJ9 $ASG2 J2 PRT KM0803 HJ RRING PRT CONNJ3 " PRT KM08
0x3a6a50…3a6be4 Dummy {f00=0x0138, f01=0x0190, f02=» { r " W I - . % s & P _g " _ I / % q W x% q W x x 0 4 ~ r P r 1
0x3a6be4…3a6d78 Dummy {f00=0x0138, f01=0x0190, f02=» c "0 I 6 W c q c q r qE0 ~_d &0 0 4 I 4 TH 2 # !"#$%&'()*+,W 8 !2 !"?-A I A A 1 6 _ H @ _ @ @ ?-A I I VI SA A 1 6 DD _ s c c @ A 1 6 _C c c q c c
0x3a6d78…3a6f0c Dummy {f00=0x0138, f01=0x0190, f02=»3452222_ _1K +0 S @0 + * O * , ' ( sM P x W $ LbM ( ! rMTd@' q C C ( sM CTbI'_! u I h M P?H - : " hM ( T 1b M bM ! rMX , _ ! rM ?6 A 1 Y 6 _ _ C @'_ A'_ @'W
0x3a6f0c…3a70a0 Dummy {f00=0x0138, f01=0x0190, f02=»A A 2 889?8 2 :;<=>?@ABCD_' ?8 ?8 ?8 AA 1 ?8 &?8 ?8 x A 1 x?8I %C P @ A 1 6 _ A I CW S * I , C| ' s W , Sp ' v |$0 T R P _;! qHW ! q! , 0 _` , i 6 5A 7( @ 2 (A
0x3a70a0…3a7234 (2, 337) Opaque[0x194]
0x3a7234…3a73c8 # DirEnt {nam=»KM0804«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2720, f03=0x0000}
0x3a7234…3a73c8 IdxSect {
0x3a7234…3a73c8 f00 = 0x0139 // 0x3a7234 @0x0
0x3a7234…3a73c8 f01 = 0x0002 // 0x3a7236 @0x2
0x3a7234…3a73c8 gno = [ // 0x3a7238 @0x4
0x3a7234…3a73c8 [0x00]: C0x0139.0x0.0
0x3a7234…3a73c8 ]
0x3a7234…3a73c8 }
0x3a73c8…3a755c Dummy {f00=0x0139, f01=0x0038, f02=» & !MES NJ-AMT - ]LBORG PSYK, FARS $ASG2 .R,LUND, HOBRO, REVA PRT CONNJ7 T PRT KM0808 OFFLINE f PRT CONNJ8 PRT KM0809 DIVERSE PRT CONNJ9 $ASG2 J2 PRT KM0803 HJ RRING PRT CONNJ3 " PRT KM08
0x3a755c…3a76f0 Dummy {f00=0x0139, f01=0x2008, f02=» NJ-AMT - ]LBORG PSYK, FARS $ASG2 .R,LUND, HOBRO, REVA PRT CONNJ7 T PRT KM0808 OFFLINE f PRT CONNJ8 PRT KM0809 DIVERSE PRT CONNJ9 $ASG2 J2 PRT KM0803 HJ RRING PRT CONNJ3 " PRT KM08
0x3a76f0…3a7884 Dummy {f00=0x0139, f01=0x0190, f02=» T ` d i ~ < H $ ! ? r * 4 B ! - S L f Z i 4 7 { i J ; r c & w 3 ^
0x3a7884…3a7a18 Dummy {f00=0x0139, f01=0x0190, f02=»NR&04BEL DEB KRE SUMKVITTRP ADM ARKIVBILAGDEBETFEJL KLAR SALD0SALDOSLUTDZ300 KVITDAG NREJ EDBKREDITLBNR T[LLERKONTONRKORREKT DIVERSETOTAL EKS.LBNRBEREGNINGDAGS-DATOKONTOKORTMASKIN NRPOST-DATOSTART SUMSUBTOTAL CPR/CIR/NRREGKONTONR SLUT TESTBEV.PERIODECHECKC
0x3a7a18…3a7bac Dummy {f00=0x0139, f01=0x0190, f02=»ONSLET PERIODE EJ-EDB T[LLER DISKETTE SKIFT BEHOLDNINGST[LLEREVERSUR KONTONR REMIT VERSURKONTONR KASSEKONTONR PRIMO KASSE %9BX999BBZXXZZ99999BB**B9BBBXBBZBXBBXXBZZZZZ9999999BB**BB99.B999B99BBBZBBBZZBXX.BZZZ****9***9999999B999BBBBZZBZZZZXXXXX99
0x3a7bac…3a7d40 Dummy {f00=0x0139, f01=0x0190, f02=»9B99.99.99BBB99.99.9999.99.999.9BZZZZZZZZBBBZZZZZZZZZZ******E-****99999999E-99XXXXXXE-XXXXXXXXXXXXE-XXZZZZ9999.99BZZZZZZZZE-ZZZZZZZZZZZE-9BBZZ.ZZ.ZZBBBE-9999999999BXXX.XXXXX.XXBTTTTTTTTTTTTX-XE-XXE-XXE-XXBB999.99.999.99BBXXX.XX.XXX.XXBTTT.TTT.TTX.XX-TTTTTTTVTTX,XX
0x3a7d40…3a7ed4 (2, 338) Opaque[0x194]
0x3a7ed4…3a8068 # DirEnt {nam=»KM0805«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2728, f03=0x0000}
0x3a7ed4…3a8068 IdxSect {
0x3a7ed4…3a8068 f00 = 0x0139 // 0x3a7ed4 @0x0
0x3a7ed4…3a8068 f01 = 0x0002 // 0x3a7ed6 @0x2
0x3a7ed4…3a8068 gno = [ // 0x3a7ed8 @0x4
0x3a7ed4…3a8068 [0x00]: C0x0139.0x1.0
0x3a7ed4…3a8068 ]
0x3a7ed4…3a8068 }
0x3a8068…3a81fc Dummy {f00=0x0139, f01=0x0042, f02=» 0 +MES NJ-AMT - BR NDERSLEV, FR.HAVN, BROVST $ASG2 8BRO, REVA PRT CONNJ7 T PRT KM0808 OFFLINE f PRT CONNJ8 PRT KM0809 DIVERSE PRT CONNJ9 $ASG2 J2 PRT KM0803 HJ RRING PRT CONNJ3 " PRT KM08
0x3a81fc…3a8390 Dummy {f00=0x0139, f01=0x2008, f02=» NJ-AMT - BR NDERSLEV, FR.HAVN, BROVST $ASG2 8BRO, REVA PRT CONNJ7 T PRT KM0808 OFFLINE f PRT CONNJ8 PRT KM0809 DIVERSE PRT CONNJ9 $ASG2 J2 PRT KM0803 HJ RRING PRT CONNJ3 " PRT KM08
0x3a8390…3a8524 Dummy {f00=0x0139, f01=0x0190, f02=» f Q H H e M e e V z B : 20 ) ( ! z B : 2 ! # A l 9 Q d ! He # = n 2 * 4 P Q ` H A f Q G H d V g n k < c =
0x3a8524…3a86b8 Dummy {f00=0x0139, f01=0x0190, f02=»PRIMOg 2 BEV g g g 2 ULTIMOg A b W Az L f !g Z A L k ! 4 TOTALg g g 4 SUPL g g g 2 KOR g g + C 6y8 - W 2 * * 4 Q P NETTO D N A n 9 Q H e
0x3a86b8…3a884c Dummy {f00=0x0139, f01=0x0190, f02=» W Z Y U DK Az A - p ] ] X * K JD6SO.-,.O.++.*)(EE()(''($A>&% A AA>=C84< 367M# ##;:/"! 65 9)(IG()(''($ " $ & ( * , . 0 2 4
0x3a884c…3a89e0 Dummy {f00=0x0139, f01=0x0190, f02=» " , 6 A L W b m y * 0 ?0 @0 A0 B0 C0 D0 E0 F0 G0 H0 J0 L0 N0 P
0x3a89e0…3a8b74 (2, 339) Opaque[0x194]
0x3a8b74…3a8d08 # DirEnt {nam=»KM0807«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2730, f03=0x0000}
0x3a8b74…3a8d08 IdxSect {
0x3a8b74…3a8d08 f00 = 0x0139 // 0x3a8b74 @0x0
0x3a8b74…3a8d08 f01 = 0x0002 // 0x3a8b76 @0x2
0x3a8b74…3a8d08 gno = [ // 0x3a8b78 @0x4
0x3a8b74…3a8d08 [0x00]: C0x0139.0x2.0
0x3a8b74…3a8d08 ]
0x3a8b74…3a8d08 }
0x3a8d08…3a8e9c Dummy {f00=0x0139, f01=0x0048, f02=» 6 1MES NJ-AMT - ]LBORGSKOLEN, DR.LUND, HOBRO, REVA $ASG2 >EVA PRT CONNJ7 T PRT KM0808 OFFLINE f PRT CONNJ8 PRT KM0809 DIVERSE PRT CONNJ9 $ASG2 J2 PRT KM0803 HJ RRING PRT CONNJ3 " PRT KM08
0x3a8e9c…3a9030 Dummy {f00=0x0139, f01=0x2008, f02=» NJ-AMT - ]LBORGSKOLEN, DR.LUND, HOBRO, REVA $ASG2 >EVA PRT CONNJ7 T PRT KM0808 OFFLINE f PRT CONNJ8 PRT KM0809 DIVERSE PRT CONNJ9 $ASG2 J2 PRT KM0803 HJ RRING PRT CONNJ3 " PRT KM08
0x3a9030…3a91c4 Dummy {f00=0x0139, f01=0x0190, f02=» 1 1 X !@T X $ " P y _ x T @ ?& X H X X * , )$ P _ : @R ' Y Wt @ y x C y X C C X ( L x Tf B ? 9 R 9 ?T X ! T ? _` y C Q " T DZ D6 X ! @>
0x3a91c4…3a9358 Dummy {f00=0x0139, f01=0x0190, f02=» !? x P Q( B y " y $ c Lt C _$ _ @ y _6 >. x X@ X D$ X # D6 C _. B ]d P C Q8X8_H x XD @ Y c C y XR X x D$ @> > x X X # D6_ B @ C D : + DZ X D$ D6 ( L X
0x3a9358…3a94ec Dummy {f00=0x0139, f01=0x0190, f02=» X $ : L 2! Y " L X M X @ L X "T X Lt D< L L X X L A Lr L ' X ! Y 0T V M @ : L 2' X R P P X ' ' U X _ X ' _ X '?_ L X X ' L
0x3a94ec…3a9680 Dummy {f00=0x0139, f01=0x0190, f02=» ( Y 09H Y * Y 4 Y 2 Y 69h Q X :h Y 0 E W U X Q E W Y 0 D F RN Q L 9H Y * C W W C Q X 0 X +" X *9h P( P P Y +W^ C Y + C E WL T C CFW> Q W Y + U Q P W W Y ( D
0x3a9680…3a9814 (2, 340) Opaque[0x194]
0x3a9814…3a99a8 # DirEnt {nam=»CONNJ3«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2738, f03=0x0000}
0x3a9814…3a99a8 IdxSect {
0x3a9814…3a99a8 f00 = 0x0139 // 0x3a9814 @0x0
0x3a9814…3a99a8 f01 = 0x0002 // 0x3a9816 @0x2
0x3a9814…3a99a8 gno = [ // 0x3a9818 @0x4
0x3a9814…3a99a8 [0x00]: C0x0139.0x3.0
0x3a9814…3a99a8 ]
0x3a9814…3a99a8 }
0x3a99a8…3a9b3c Dummy {f00=0x0139, f01=0x0028, f02=» MES NJ-AMT - HJ RRING P $ HEND 0 P!!EN < PTRA /S,NL H PNOD R Z PINC RGSUB1 h PINC RGSUB2 z PINC DKSUBS PINC RGMAIN PNOD R PINC RGSTRT PASG 2,LP0F PTLK U,4K PINC PRT PINC VD
0x3a9b3c…3a9cd0 Dummy {f00=0x0139, f01=0x2008, f02=» NJ-AMT - HJ RRING P $ HEND 0 P!!EN < PTRA /S,NL H PNOD R Z PINC RGSUB1 h PINC RGSUB2 z PINC DKSUBS PINC RGMAIN PNOD R PINC RGSTRT PASG 2,LP0F PTLK U,4K PINC PRT PINC VD
0x3a9cd0…3a9e64 Dummy {f00=0x0139, f01=0x0190, f02=» X (P I L" 8 Y 0 X 2P X 0V _z Y ( " T Y ( : 8 K X 8 V Y 8 : " P X & V ( P I : : I "0P $ T W %T : : Y ( X $ Y X " Y X & Y : Y : L X : X ( T X & V H " V Y : X $ L X :
0x3a9e64…3a9ff8 Dummy {f00=0x0139, f01=0x0190, f02=» (T y 6W4 X y 6W, @ X (P W" X & V D ! P @ W X L W Y ( M : X , Y X $ Y X &T Y Y Y WD V $:H D Y D :H Y ! P V Y X W Y ! P WbW V Y K V Y : X c : 2' " P T Y W Wf dV
0x3a9ff8…3aa18c Dummy {f00=0x0139, f01=0x0190, f02=»L Y Y Y < V E U B X _ v : C C Q : C Q :( R : V E V D ' $ T ( W L P U X < V W V X <P L : N N O RN/ M|W RN/ M| Q P RN/ M| Q Q '
0x3aa18c…3aa320 Dummy {f00=0x0139, f01=0x0190, f02=»( L _ AM RN " AM 2 X M X M Nb 2 AM X Nb M ( L P V I @M % AM U & # T : Y _ RN N X &P C S / P RN N S / P X C : RN "R V I U RN
0x3aa320…3aa4b4 (2, 341) Opaque[0x194]
0x3aa4b4…3aa648 # DirEnt {nam=»CONNJ4«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2740, f03=0x0000}
0x3aa4b4…3aa648 IdxSect {
0x3aa4b4…3aa648 f00 = 0x013a // 0x3aa4b4 @0x0
0x3aa4b4…3aa648 f01 = 0x0002 // 0x3aa4b6 @0x2
0x3aa4b4…3aa648 gno = [ // 0x3aa4b8 @0x4
0x3aa4b4…3aa648 [0x00]: C0x013a.0x0.0
0x3aa4b4…3aa648 ]
0x3aa4b4…3aa648 }
0x3aa648…3aa7dc Dummy {f00=0x013a, f01=0x002a, f02=» & !MES NJ-AMT - ]LBORG PSYK, FARS $GSKOLEN, DR,LUND, HOBRO, REVA PRT CONNJ7 T PRT KM0808 OFFLINE f PRT CONNJ8 PRT KM0809 DIVERSE PRT CONNJ9 $ASG2 J2 PRT KM0803 HJ RRING PRT CONNJ3 " PRT KM08
0x3aa7dc…3aa970 Dummy {f00=0x013a, f01=0x2008, f02=» NJ-AMT - ]LBORG PSYK, FARS $GSKOLEN, DR,LUND, HOBRO, REVA PRT CONNJ7 T PRT KM0808 OFFLINE f PRT CONNJ8 PRT KM0809 DIVERSE PRT CONNJ9 $ASG2 J2 PRT KM0803 HJ RRING PRT CONNJ3 " PRT KM08
0x3aa970…3aab04 Dummy {f00=0x013a, f01=0x0190, f02=»f gtf W8W4W>W@ V 7 P L W U^ V8 9c DT X WZ Q U W [L :aW _B( 2 P V W8 _ 2 # ;B V T %>W V P L , V 2P " 2 P V D ! R T V P V L W V _ 8^n DU(
0x3aab04…3aac98 Dummy {f00=0x013a, f01=0x0190, f02=»" &] Y $! 6P Q $ T 9B U _ _ 6 @ " T 7 $ V P L W _ T U Y V & U HUF 'W 'W '_6 :l:d:h X W W P W 6 2# YlW4 @ EWR" T> ; [ # YV:H 2 T Z
0x3aac98…3aae2c Dummy {f00=0x013a, f01=0x0190, f02=»YV ;b WF " ;d# _ [ v [ L X M Z Z : :B , (Vj ; [ [ X z ;AV$ Z H # Y ; X : & Z 4 Y : Z 4 " 2@P : [ [ X & @ ! P
0x3aae2c…3aafc0 Dummy {f00=0x013a, f01=0x0190, f02=» X6 ; V Y : 2! : 6 2 YlW& " # YV;b ; : ;f" #?_" W " T & T + : * & !@P `1` P [ Q [ ; 8 V W Q P [ ! X # P 4 V W Q P [ " X
0x3aafc0…3ab154 (2, 342) Opaque[0x194]
0x3ab154…3ab2e8 # DirEnt {nam=»CONNJ5«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2748, f03=0x0000}
0x3ab154…3ab2e8 IdxSect {
0x3ab154…3ab2e8 f00 = 0x013a // 0x3ab154 @0x0
0x3ab154…3ab2e8 f01 = 0x0002 // 0x3ab156 @0x2
0x3ab154…3ab2e8 gno = [ // 0x3ab158 @0x4
0x3ab154…3ab2e8 [0x00]: C0x013a.0x1.0
0x3ab154…3ab2e8 ]
0x3ab154…3ab2e8 }
0x3ab2e8…3ab47c Dummy {f00=0x013a, f01=0x0034, f02=» 0 +MES NJ-AMT - BR NDERSLEV, FR.HAVN, BROVST .R,LUND, HOBRO, REVA PRT CONNJ7 T PRT KM0808 OFFLINE f PRT CONNJ8 PRT KM0809 DIVERSE PRT CONNJ9 $ASG2 J2 PRT KM0803 HJ RRING PRT CONNJ3 " PRT KM08
0x3ab47c…3ab610 Dummy {f00=0x013a, f01=0x2008, f02=» NJ-AMT - BR NDERSLEV, FR.HAVN, BROVST .R,LUND, HOBRO, REVA PRT CONNJ7 T PRT KM0808 OFFLINE f PRT CONNJ8 PRT KM0809 DIVERSE PRT CONNJ9 $ASG2 J2 PRT KM0803 HJ RRING PRT CONNJ3 " PRT KM08
0x3ab610…3ab7a4 Dummy {f00=0x013a, f01=0x0190, f02=» a _ P _ T { [ a a [ Q@ [ a Z { R [ _ a Y a _ Z ! Z $ Z %_N [ Q* a Y a [ R [ Z { a Y z 9e! W Z : V I _ , " -! 9H X" ,9 -9d_ Z H D & H D
0x3ab7a4…3ab938 Dummy {f00=0x013a, f01=0x0190, f02=»d&c d0c0d f f dDc f b 6WD K K K K V K : X bV bF b Wj V cn c8 V Z P 2 " T W "@T '?W "? Hb " K :e J J " J _Z Z cn Z [ Z P L [ V 6 [ 7 V
0x3ab938…3abacc Dummy {f00=0x013a, f01=0x0190, f02=» Pd 4 ! T^_ K dNWR K d WD +_ d& K d" W. _. X Q W X & Q J K : V : 1 + X [ [ < !AAP !TTT W !**T * [ R !FFP !EET W Ie 6 * B Z 9 ! ; *Xz 8 ! De 0P Wl 0W8
0x3abacc…3abc60 Dummy {f00=0x013a, f01=0x0190, f02=» R 4! P ;)0 9U ? Z ] 49d_. _BU ; :X _ _ z 9d! ) ^ _ ,_ 8 _ : W 8W d 8 !++P !-- z ;$# + ^" _( R rV. PT*AXYZ9 c f : ! P ! P ! P ! P X ! P WbW : ! )P9H # T &W &"
0x3abc60…3abdf4 (2, 343) Opaque[0x194]
0x3abdf4…3abf88 # DirEnt {nam=»REMTXT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x18d8, f03=0x0000}
0x3abdf4…3abf88 IdxSect {
0x3abdf4…3abf88 f00 = 0x00c6 // 0x3abdf4 @0x0
0x3abdf4…3abf88 f01 = 0x0008 // 0x3abdf6 @0x2
0x3abdf4…3abf88 gno = [ // 0x3abdf8 @0x4
0x3abdf4…3abf88 [0x00]: C0x00c6.0x3.0
0x3abdf4…3abf88 [0x01]: C0x00c9.0x3.0
0x3abdf4…3abf88 [0x02]: C0x00d4.0x0.0
0x3abdf4…3abf88 [0x03]: C0x00d4.0x1.0
0x3abdf4…3abf88 ]
0x3abdf4…3abf88 }
0x3abf88…3ac11c Dummy {f00=0x00c6, f01=0x0190, f02=» P IDENT REMTXT 03.01.XXX.1 DDUM KMD08 & PDIV : P ENTRY TXTPRT H P ENTRY TXTUNP ^ P ENTRY TXTPAK t P ENTRY TXTOPR P ENTRY REPL00 P ENTRY SETKEY P EXT FRMTXT P EXT FMTREM P EXT SPCLRN P
0x3ac11c…3ac2b0 Dummy {f00=0x00c6, f01=0x0190, f02=»******************************** * ( ( #* THE PROCEDURE LISTS TEXTREGISTER, 2 , (* EITHER COMPLETELY OR SELECTED PORTIONS ^ P* ON THE SPECIFIED DATASET * ( $************************************ TXTL010 P TBT CTEXTFLG,TXTL
0x3ac2b0…3ac444 Dummy {f00=0x00c6, f01=0x0190, f02=»E GSWBCD3,=D'1' FROM TXTNR " MOVE GSWBCD4,=D'999' TO TXTNR " 0 P MOVE GSWBCD5,=D'2' DEFAULT HARDCOPY DEVICE H PERF SPCLRN | ( P IB SPBINW2,TXTLRET,TXTLRET,TXTL020 P B TXTL015 & !* PRINT HEADER ON HARDCOPY DEVICE TXTL020 & P
0x3ac444…3ac5d8 Dummy {f00=0x00c6, f01=0x0190, f02=» GTLINE,CBIN4 P PERF GENWRT,GTHCDEV,TXTHDR B TXTL060 : * READ NEXT TEXTRECORD L TXTL060 j TXTL070 z 6 1 TBF CTXTFLG,TXTL080 CONTINUE IF BUFFER AVAILABLE " P DELAY CBIN1 ELSE WAIT 0.1 SEC B TXTL070 TXTL080
0x3ac5d8…3ac76c Dummy {f00=0x00c6, f01=0x0190, f02=»ERF RAREAD,DK06,=D'6',CTXBUF,GSWBIN1,GSWBIN7 BNOK TXTL200 4 ( P CBE GTWBCD1,=D'4',TXTL130 DELETED ? J P CBNE GTWBCD1,=D'10',TXTL090 v P CLEAR CTXTFLG P B TXTL195 PTXTL090 P* WRITE TEXTRECORD P PERF TXTUNP * P CBE GTT
0x3ac76c…3ac900 Dummy {f00=0x00c6, f01=0x018e, f02=»TL100 P CLEAR GTSWFLAG P PERF GENWRT,GTHCDEV,TXTPR & P SUB GTLINE,CBIN2 H P CBG GTLINE,CBIN0,TXTL135 b P IB GTHCDEV,TXTL101,TXTL109 PTXTL101 P PERF GENWRT,GTHCDEV,TXTFF0 P B TXTL109 PTXTL102 P PERF GENW
0x3ac900…3aca94 (2, 344) Dummy {f00=0x00c9, f01=0x0190, f02=» P ADD GSWBCD3,=D'1' P PERF GENWRT,GTHCDEV,TXTHDR P SUB GSWBCD3,=D'1' B P B TXTL135 PTXTL110 n P SET GTSWFLAG INDICATE TALLY ~ P PERF GENWRT,CBIN3,TXTPR PTXTL130 P CLEAR CTXTFLG PTXTL135 P PERF SPLIN8,CBI
0x3aca94…3acc28 Dummy {f00=0x00c9, f01=0x0190, f02=»BG GSWBCD3,GSWBCD4,TXTL195 P B TXTL070 " PTXTL150 TEST FOR MAK-KEY 4 P WAIT KEYB V P CBNE SPBINW2,CBIN6,TXTL140 h PTXTL195 P PERF SKIP PTXTLRET CMP CBIN0,CBIN0 OK, RETURN RET TXTL200 P CLEAR CTX
0x3acc28…3acdbc Dummy {f00=0x00c9, f01=0x018e, f02=»WFLAG P MOVE GSWBIN1,GSWBCD5 P IB GSWBIN1,SKIP20,SKIP10 , P B SKIP90 N PSKIP10 ` $ P PERF GENWRT,CBIN3,TXTFF1 TALLY n P B SKIP90 PSKIP20 P IB GTHCDEV,SKIP21,SKIP22 P B SKIP90 PSKIP21 $ P PERF GENWRT,GTH
0x3acdbc…3acf50 Dummy {f00=0x00c9, f01=0x0190, f02=» P PEND P EJECT P* PTXTOPR PROC * & P********************************* > P* h , P* THE PROCEDURE MAINTAINS TEXTREGISTER. r P* & P********************************** PTXTO000 P TBF CTEXTFLG,TXTO990 P MOV
0x3acf50…3ad0e4 Dummy {f00=0x00c9, f01=0x0190, f02=»IN3,TXTO980 PTXTO010 , P TBF CTXTFLG,TXTO020 BUFFER AVAILABLE ? $ " P DELAY CBIN1 ELSE WAIT 0.1 SEC T P B TXTO010 z PTXTO020 P SET CTXTFLG P MOVE GSWBIN8,GSWBCD1 P MOVE GSWBIN1,=W'24' P MOVE CTXBUF,CBLANKS 2 P P
0x3ad0e4…3ad278 Dummy {f00=0x00c9, f01=0x018e, f02=» P CLEAR GTSWFLAG P PERF SPCLRN P CBNE SPBINW2,CBIN3,TXTO000 0 PTXTO030 T P TBF CTXTFLG,TXTO040 d P DELAY CBIN1 P B TXTO030 PTXTO040 P SET CTXTFLG P PERF TXTPAK * P PERF RAWRIT,DK06,=D'6',CTXBUF,GSWBIN8
0x3ad278…3ad40c Dummy {f00=0x00c9, f01=0x0190, f02=» P PERF SETKEY P CMP CBIN0,CBIN0 OK P RET 8 PTXTO910 D P CLEAR CTXTFLG T P CLEAR GTSWFLAG j P PERF SETKEY P CMP CBIN4,CBIN0 P RET P PEND P EJECT PREPL00 PROC STRG,LEN ( P**********************
0x3ad40c…3ad5a0 Dummy {f00=0x00c9, f01=0x0190, f02=»ED BY FINDING | " P* THE FIRST 00-BYTE, COMPUTING $ P* THE LENGTH OF THE REST OF THE < $ P* FIELD, AND DELETING THIS REST. d P* ( P************************************ P MOVE GSWBIN7,LEN P MOVE GSWBIN1,CBIN0 P MOVE GSWSTR1,=X
0x3ad5a0…3ad734 (2, 345) Dummy {f00=0x00d4, f01=0x0190, f02=» STRG,GSWBIN1,GSWBIN7 P CMP CBIN0,CBIN0 P RET 6 PREPL10 B P CMP CBIN4,CBIN0 P P RET h P PEND t P* PTXTUNP PROC , P XCOPY GTTXTTKO,CBIN0,CBIN2,CTXBUF,CBIN0 . P XCOPY GTLEVTXT,CBIN0,CBIN22,CTXBUF,CBIN2 P MOVE
0x3ad734…3ad8c8 Dummy {f00=0x00d4, f01=0x0190, f02=»END P* PTXTPAK PROC , P XCOPY CTXBUF,CBIN0,CBIN2,GTTXTTKO,CBIN0 * P MOVE GSWBIN1,CBIN22 Z " P PERF REPL00,GTLEVTXT,GSWBIN1 v . P XCOPY CTXBUF,CBIN2,CBIN22,GTLEVTXT,CBIN0 P CBNE GTTXTTKO,=D'0',TXTPRET P MOVE GTLEVTXT,CBLANKS
0x3ad8c8…3ada5c Dummy {f00=0x00d4, f01=0x0190, f02=» P PFRMT $FRMT P IB DSET,WRT10,WRT20,WRT30 PWRT10 : P TBF GTGTPFLG,WRT90 H P EDWRT DSHCGP,$FRMT d P B WRT90 PWRT20 P TBF GTLPFLG,WRT90 P EDWRT DSHCLP,$FRMT P B WRT90 PWRT30 P TBF GTTTPFLG,WRT90
0x3ada5c…3adbf0 Dummy {f00=0x00d4, f01=0x0190, f02=»*************************************** P* 0 $ P* SETS SPKEY TO 1 IF KASSE OPEN, : P* ELSE SETS SPKEY TO 2 b P* . P***************************************** P MOVE SPKEY,CBIN1 & P CBG CMASK(TTASKNR),=D'0',SETKRET P MOVE SP
0x3adbf0…3add84 Dummy {f00=0x00d4, f01=0x0190, f02=»FT AF TEKSTFIL' P FILLR ' ',3 P FBF GTSWFLAG,TXTH10 , P FNL H PTXTH10 T P FILLR ' ',8 b P FMEL '99E-99E-99',CMASKDAT v FNL P FCOPY =C' FRA/TIL-NR' P FILLR ' ',4 FMEL 'ZZ9',GSWBCD3 P FILLR '-',1 P
0x3add84…3adf18 Dummy {f00=0x00d4, f01=0x0190, f02=»NL P FMEL '999',GTWBCD1 P FILLR ' ',1 & P FMEL 'ZZZ',GTTXTTKO : * P FBF GTSWFLAG,TXTPRT05 -, REGNERULLE ? V P FILLR ' ',16 FNL P FB TXTPRT10 PTXTPRT05 P FILLR ' ',5 TXTPRT10 P FCOPY GTLEVTXT P F
0x3adf18…3ae0ac Dummy {f00=0x00d4, f01=0x4140, f02=» P* P* P* PTXTFF1 FRMT & P FNL : P FNL F P FNL R P FNL ^ P FNL j P FNL v P FNL P FNL P FNL P FMEND P* P* P* PTXTFF2 FRMT P FILLR '1',2 P FMEND P
0x3ae0ac…3ae240 Dummy {f00=0x00d4, f01=0x2008, f02=»
0x3ae240…3ae3d4 (2, 346) Dummy {f00=0x00d4, f01=0x0190, f02=» " _#I M % Ao W Ay% Ao W Ay Ay 0 4 A 8 1 q A 6 "
0x3ae3d4…3ae568 Dummy {f00=0x00d4, f01=0x0190, f02=» " Ao( 0 I 6 W Ao Ao Ap Aon0 A _ 0 0 4 I V APH AX H )2 # !"#$%&'()*+,-W.2 .. ...... ... W 8 A 2 !"#?/A I # A A 1 q 6
0x3ae568…3ae6fc Dummy {f00=0x00d4, f01=0x0190, f02=» 11 __ Ao A @ @ ?/?0 ?/A @ C <1 <1 <1A 1 q@ 2 112_0I Ap Ap Aq N Ap A(I A A A A 2 3445674444_ _>K A'0 S Q0 A' A& d A& A( A
0x3ae6fc…3ae890 Dummy {f00=0x00d4, f01=0x0190, f02=» T I ! As AE h PeH M A6 A h T/ A-b b " Ap X A( A ?8 " Ap ?9 A 1 qG 6 _ _ @ _ A _ @ W Aq _V <9 #A <9W <9 #A <9W A(A @ ?
0x3ae890…3aea24 Dummy {f00=0x00d4, f01=0x0190, f02=»<?; H 2 =>?@ABCDEFGHIJKL_92 MMM@MMMMMMMMMJKL_O ?; ?; ?; A 1 q ?; '?; ?; Ay A 1 q Ay?;I 2C 8N@ A 1 q 6 _ A I W * I , ( Aq W , ( At - A}30 T R P
0x3aea24…3aebb8 Dummy {f00=0x00d4, f01=0x0190, f02=»A @ ?; @ @ A.?;H H A ?O?;C <PC <PC 8P@ A 1 q 6 _ A @ I W * I , ( Aq W , ( At - A}3$ R P _S A2 A1A A3( @ A.I A * Au A2 0
0x3aebb8…3aed4c Dummy {f00=0x00d4, f01=0x0190, f02=».?/I UH A 1 q? 6 AA W?A 0W8H 4H 0 * 0 K 1 0 0 0 0 0 ?/I A 2W @ ?/A A A Az1 q 2 R_ @ @ ?/ 3?/ 4?/I O A Ao A~ 1 q Ao86 _A A ?/I A 1 q^
0x3aed4c…3aeee0 Dummy {f00=0x00d4, f01=0x0190, f02=» 6_D AP 5 6A 1 qX A ?/A 0 1 qw ) A "! A{ 1 qi@ 1 qo A +W A _ @ W I *I &I A A4A W A @ A. 7 W H /I + AyA 1 q[ 6 _ Ay Wo 8Wk Wg 9Wc 2W_ :W[ ;WW0 * $ 0 0
0x3aeee0…3af074 (2, 347) Opaque[0x194]
0x3af074…3af208 # DirEnt {nam=»REMFMT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2190, f03=0x0000}
0x3af074…3af208 IdxSect {
0x3af074…3af208 f00 = 0x010c // 0x3af074 @0x0
0x3af074…3af208 f01 = 0x0006 // 0x3af076 @0x2
0x3af074…3af208 gno = [ // 0x3af078 @0x4
0x3af074…3af208 [0x00]: C0x010c.0x2.0
0x3af074…3af208 [0x01]: C0x010c.0x3.0
0x3af074…3af208 [0x02]: C0x010d.0x0.0
0x3af074…3af208 ]
0x3af074…3af208 }
0x3af208…3af39c Dummy {f00=0x010c, f01=0x0190, f02=» P IDENT REMFMT 03.01.XXX.1 P DDUM KMD08 & PDIV : P ENTRY FMTREM H P ^ P f PFMTREM PROC XFMTDEX n P ATTFMT ATTTAB(XFMTDEX) P RET P PEND P P 6 PATTTAB FTABLE TXTPDU,TXTVEDL,FMTLEVST,FMTLEVVR, C
0x3af39c…3af530 Dummy {f00=0x010c, f01=0x0190, f02=»ESPG l P FILLR ' ',1 P FCOPY ='LEVERAND ' P FTAB 24 < P FCOPY ='NR' L & P FBF GTDYFLG,FLEV010 T=FIRST TIME ` $ P FBT GTSPGFLG,FLEV005 T=FORESPG & P FKI 27,MINL=10,MAXL=10,SCHK=1,ME P FMEL 'XXXXXXXXXX',GTLEVNR P FB FLEV10
0x3af530…3af6c4 Dummy {f00=0x010c, f01=0x0190, f02=» PFLEV010 P FTAB 27 P FBF GTSPGFLG,FLEV15 $ P FKI 27 @ PFLEV15 P P FMEL 'XXXXXXXXXX',GTLEVNR ^ P FNL P FCOPY ='NAVN' P FTAB 6 P FBT GTSPGFLG,FLEV020 P FKI 6,MAXL=30,ME,ALPHA PFLEV020 P FCOPY G
0x3af6c4…3af858 Dummy {f00=0x010c, f01=0x0190, f02=» P FCOPY GTLEVADR P FNL P FCOPY ='BY ' ( P FTAB 5 > P FBT GTSPGFLG,FLEV040 N P FKI 5,MAXL=20,ALPHA l PFLEV040 P FCOPY GTLEVBY P FNL P FCOPY ='POSTNR ' P FBT GTSPGFLG,FLEV050 P FKI 8,MAXL=4,MINL=4
0x3af858…3af9ec Dummy {f00=0x010c, f01=0x0190, f02=»=13,ALPHA PFLEV060 P FCOPY GTLEVPDI " P FNL : P FCOPY ='BET.FORM ' F P FBT GTSPGFLG,FLEV070 b P FKI 10,MAXL=1,ME PFLEV070 P FMEL 'X',GTLEVBFO P FTAB 14 P FCOPY ='GIRONR ' P FBT GTSPGFLG,FLEV080
0x3af9ec…3afb80 Dummy {f00=0x010c, f01=0x018e, f02=»FLG,FLEV090 " P FKI 9,MINL=10,MAXL=10,SCHK=1 PFLEV090 : P FMEL 'XXXXXXXXXX',GTLEVALT J P FTAB 29 n P FMEL 'XXVXXVXX',GTLEVDAT ~ P FNL P FBF GTSWFLAG,FLEV095 " P FCOPY ='SLETNING EJ TILLADT' PFLEV095 P FBF GTS
0x3afb80…3afd14 (2, 348) Dummy {f00=0x010c, f01=0x0190, f02=» ( PFMTLEVVR FRMT VARIABLE OPLYSNINGER P FBT GTVDUFLG,FLEV210 4 P FSL R P FCOPY GSWSTR9 FORESPG ^ P FILLR ' ',1 | P FCOPY ='LEVERAND ' P FTAB 24 P FCOPY ='NR ' P FKI 27 P FMEL 'XXXXXXXXXX',GTLEVNR PFLEV
0x3afd14…3afea8 Dummy {f00=0x010c, f01=0x0190, f02=»',GTREGF(CBIN11) x P FNL P FCOPY ='UDB. ]TD ' $ P FTAB 22 @ , P FMEL ='ZZZVZZZVZZ9E,99-',GTREGF(CBIN12) P P FNL P FCOPY ='N[STE ' P FLINK FVALDAT P FTAB 17 & P FMEL ='99E-99E-99',GTREGF(CBIN13) P FNL P FCOPY =
0x3afea8…3b003c Dummy {f00=0x010c, f01=0x0190, f02=» | P FLINK FBELOB P FTAB 17 , P FMEL ='ZZZVZZZVZZ9E,99-',GTREGF(CBIN15) . P FNL ^ P FCOPY ='SKYLDIGT ' j P FLINK FBELOB P FTAB 17 , P FMEL 'ZZZVZZZVZZ9E,99-',GTREGF(CBIN16) P FMEND P P P PFMTLEV
0x3b003c…3b01d0 Dummy {f00=0x010c, f01=0x018e, f02=»R' " P FKI 27,MINL=10,MAXL=10,SCHK=1 P FMEL 'XXXXXXXXXX',GTLEVNR 0 P FNL R P FLINK FVALDAT ^ $ P FMEL '99E-99E-99',GTREGF(CBIN7) t P FNL P FLINK FBELOB P FILLR ' ',2 ( P FMEL 'ZZVZZVZZ9E,99-',GTREGF(CBIN4) P FNL
0x3b01d0…3b0364 Dummy {f00=0x010c, f01=0x0190, f02=» | P FNL P FCOPY ='TEKST OPL ' & P FMEL 'BXXXXXXXXXX',GTREGF(CBIN19) 0 & P FMEL 'BXXXXXXXXXX',GTREGF(CBIN20) Z P FNL P FCOPY ='REG.KNT. ' $ P FMEL '9999999999',GTREGF(CBIN1) P FTAB 23 P FCOPY =']R ' P FMEL 'X',GTRE
0x3b0364…3b04f8 Dummy {f00=0x010c, f01=0x0190, f02=» z P FCOPY ='LEVERAND ' P FCOPY ='FIL' $ P FTAB 29 : P FMEL '99E-99E-99',CMASKDAT J P FNL n P FCOPY ='VEDL. ' z P FCOPY ='DATO' P FKI 13,MINL=6,MAXL=6,SCHK=4 P FMEL 'XXE-XXE-XX',GTPRTDAT P FNL P FCOPY ='FRA
0x3b04f8…3b068c Dummy {f00=0x010c, f01=0x0190, f02=»'XXXXXXXXXX',GTPRTTIL P FNL $ P FCOPY ='ALLE OPLYSNINGER (1) ' * P FKI 22,MAXL=1 R P FMEL 'X',GTLEVBFO h P FNL P FMEND P* P* PFVALDAT FRMT P FTEXT 'VAL' P FILLR X'5C',1 P FTEXT 'RDATO' P FME
0x3b068c…3b0820 Dummy {f00=0x010c, f01=0x0190, f02=»* P* P* TXTPDU FRMT P FSL 2 P FBT GTSWFLAG,TXTP10 > P FCOPY =C'UDSKRIFT AF ' Z PTXTP10 z P FCOPY =C'TEKSTFIL' P FILLR ' ',5 P FMEL '99E-99E-99',CMASKDAT FNL FCOPY =C'FRA/TIL-NR:' F
0x3b0820…3b09b4 (2, 349) Dummy {f00=0x010d, f01=0x0190, f02=»NL FNL P FBT GTSWFLAG,TXTP20 FCOPY =C'PRINTENHED?' 2 FNL P , P FCOPY =C'JOURNALSKRIVER=1,REGNERULLE=2' P FKI 35,MINL=1,MAXL=1 FMEL '9',GSWBCD5 PTXTP20 FMEND * * P* PTXTVEDL FR
0x3b09b4…3b0b48 Dummy {f00=0x010d, f01=0x4138, f02=»'XXX',GSWBCD1 P FBT GTSWFLAG,TXTV20 P FNL 2 P FNL @ P FCOPY =C'TEKST:' L P FKI 7,MINL=1,MAXL=22,ALPHA f P FCOPY GTLEVTXT P FNL P FNL P FCOPY =C'KODE:' P FKI 7,MINL=1,MAXL=2,NUM P FMEL 'X',GTTXTTKO
0x3b0b48…3b0cdc Dummy {f00=0x010d, f01=0x2008, f02=» ND END @ GSWBCD3 FMEL 'E-ZZ9',GSWBCD4 2 FILLR ' ',4 P FNL d FMEND p * ~ * * TXTPRT FRMT FSL FNL FNL FM,EL '999',TXTNR FMEL 'BB9BB',TXTKODE
0x3b0cdc…3b0e70 Dummy {f00=0x010d, f01=0x0190, f02=» x 6 q q A q q q A q A A q q q q q 0Q SD-INCASSO q AY A q M Q A A q q q F]R RE] REM OPK q q q q 5Q DEBITORINDB q AY A q Q A A q q
0x3b0e70…3b1004 Dummy {f00=0x010d, f01=0x0190, f02=» K Z t I ? < A A A 1 q 2 _ @ $ A @ 1 q 6 _ _=H ! Ao j As _cf ( Tj ( 3 As A$ As _ As _ A$ As < A
0x3b1004…3b1198 Dummy {f00=0x010d, f01=0x0190, f02=» S" M ! A$ _4 * A A{ A ? A$ As < j j A j d S As TR ? ( As T1 A$ As T b _ @ ? H ( 0
0x3b1198…3b132c Dummy {f00=0x010d, f01=0x0190, f02=» 0 1 q A$P @ _ @ 4 " ! Ao , _' ( W H 0 _ A A$ As Tp Apj " ; A ' _N Apj @ 4 @
0x3b132c…3b14c0 Dummy {f00=0x010d, f01=0x0190, f02=»ph P0j " Ao_ ^F _,4 A$ As A h P 7 W8 h T P A$ As 4 A @ C Tl Te T^A 1 q 6 II _0 Ap
0x3b14c0…3b1654 (2, 350) Opaque[0x194]
0x3b1654…3b17e8 # DirEnt {nam=»DIV461«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2778, f03=0x0000}
0x3b1654…3b17e8 IdxSect {
0x3b1654…3b17e8 f00 = 0x013b // 0x3b1654 @0x0
0x3b1654…3b17e8 f01 = 0x0014 // 0x3b1656 @0x2
0x3b1654…3b17e8 gno = [ // 0x3b1658 @0x4
0x3b1654…3b17e8 [0x00]: C0x013b.0x3.0
0x3b1654…3b17e8 [0x01]: C0x013c.0x0.0
0x3b1654…3b17e8 [0x02]: C0x013c.0x1.0
0x3b1654…3b17e8 [0x03]: C0x013c.0x2.0
0x3b1654…3b17e8 [0x04]: C0x013c.0x3.0
0x3b1654…3b17e8 [0x05]: C0x013d.0x0.0
0x3b1654…3b17e8 [0x06]: C0x013d.0x1.0
0x3b1654…3b17e8 [0x07]: C0x013d.0x2.0
0x3b1654…3b17e8 [0x08]: C0x013d.0x3.0
0x3b1654…3b17e8 [0x09]: C0x013e.0x0.0
0x3b1654…3b17e8 ]
0x3b1654…3b17e8 }
0x3b17e8…3b197c Dummy {f00=0x013b, f01=0x0190, f02=» P IDENT DIV461 03.01.XXX.1 P DDUM KMD08 & P PDIV D P ENTRY FRMTJT Z P ENTRY FRMXJT p P ENTRY FRMTTA P ENTRY FRMXTA P ENTRY FRMTVO P ENTRY FRMTKV P ENTRY FRMXVO P ENTRY FRMTKT
0x3b197c…3b1b10 Dummy {f00=0x013b, f01=0x0190, f02=» PROC 0 P CALL FMOVE,GTSTRFMT,FTBJT(GTREGDEX) P RET B P PEND V P* l PFRMXJT PROC XJTDEX v ( P CALL FMOVE,GTSTRFMT,FTBXJT(XJTDEX) P RET P PEND P* PFRMTTA PROC 0 P CALL FMOV
0x3b1b10…3b1ca4 Dummy {f00=0x013b, f01=0x0190, f02=»XTA(XTADEX) x P RET P PEND P* . PFRMTVO PROC 8 0 P CALL FMOVE,GTSTRFMT,FTBVO(GTREGDEX) L P RET P PEND P* PFRMXVO PROC XVODEX ( P CALL FMOVE,GTSTRFMT,FTBXVO(XVODEX) P RET P P
0x3b1ca4…3b1e38 Dummy {f00=0x013b, f01=0x018e, f02=» 0 P CALL FMOVE,GTSTRFMT,FTBKT(GTREGDEX) P RET < P PEND P P* f PFRMXKT PROC XKTDEX p ( P CALL FMOVE,GTSTRFMT,FTBXKT(XKTDEX) P RET P PEND P* PFRMTGP PROC ( P CALL FMOVE,GTSTRFMT,FTB
0x3b1e38…3b1fcc Dummy {f00=0x013b, f01=0x0190, f02=» j P RET P PEND P* " P* , P* 6 P EJECT @ P* V P* FORMATS FOR JOURNAL ` P* @ PFTBJT FTABLE JTFMT01,JTFMT02,JTFMT03,JTFMT04,JTFMT02, C 2 P JTFMT01,JTFMT02,JTFMT08,JTFMT08,JTFMT02, C P
0x3b1fcc…3b2160 Dummy {f00=0x013b, f01=0x0190, f02=» LINE 1 z P FEOR 2 P FLINK JTSUB04 LINE 2 6 P FMEND l P* PJTFMT02 FRMT P FLINK JTFMT02L P FMEND P* PJTFMT02L FRMT 2 P FLINK JTSUBST
0x3b2160…3b22f4 (2, 351) Dummy {f00=0x013c, f01=0x0190, f02=» FEOR P FILLR ' ',8 F P FMEL 'X',GTDUPF(CBIN6) RE$ 2 P FILLR ' ',2 | P FLINK JTSUB06 FOR TRANS 10 P FLINK JTSUB30 ARKIV KNT.NR P FILLR ' ',15 P FMEND
0x3b22f4…3b2488 Dummy {f00=0x013c, f01=0x0190, f02=» START INF p P FILLR ' ',9 $ P FCOPY TT16TXT RATE/RENTE/GEBYR 4 2 P FLINK JTSUB06 CPR/CIR 0 P FLINK JTSUB08 VALUE P FEOR P FILLR ' ',2 P FILLR '
0x3b2488…3b261c Dummy {f00=0x013c, f01=0x0190, f02=»ZZ',GTDUPF(CBIN7) VALGR z F P FMEL 'BBZ',GTDUPF(CBIN8) BETALINGSFORM BFO 6 8 P FLINK JTSUB30 ARK KONTO NR P FILLR ' ',2 8 P FMEL 'XX',GTDUPF(CBIN11) PALIGNIN
0x3b261c…3b27b0 Dummy {f00=0x013c, f01=0x0190, f02=»ND P* PJTFMT04 FRMT P FLINK JTFMT04L ( P FMEND @ P* N PJTFMT04L FRMT X P FLINK JTSUBST START INF n P FILLR ' ',15 2 P FLINK JTSUB06 CPR/CIR 0 P FLINK JTSUB08
0x3b27b0…3b2944 Dummy {f00=0x013c, f01=0x0190, f02=» D P FMEL 'ZZ.ZZ.ZZ',GTDUPF(CBIN7) VALOR P FILLR ' ',3 L 6 P FLINK JTSUB30 ARK KNT NR h B P FMEL 'BBBZZ',GTDUPF(CBIN10) F$R F P FMEL 'BBZZ',GTDUPF(CBI
0x3b2944…3b2ad8 Dummy {f00=0x013c, f01=0x0190, f02=»GTDUPF(CBIN13) OPK z P FMEND 0 P* F PJTFMT08 FRMT P P FLINK JTFMT08L d P FMEND | P* PJTFMT08L FRMT 4 P FLINK JTSUBST START INF 2 P FLINK JTSUB01
0x3b2ad8…3b2c6c Dummy {f00=0x013c, f01=0x0190, f02=» LINE 3 z P FMEND P* 6 PJTFMT12 FRMT @ P FLINK JTFMT12L T P FMEND l P* z PJTFMT12L FRMT 4 P FLINK JTSUBST START INF 8 P FLINK JTSUB05 REG KONTO NR
0x3b2c6c…3b2e00 Dummy {f00=0x013c, f01=0x0190, f02=» FLINK JTSUB08 VALUE P FEOR 2 P FILLR ' ',2 @ 2 P FMEL 'BZZZZZZZZZZ',GTDUPF(CBIN2) DIVERSE TEXT T P FILLR ' ',16 P FMEND P* 4 PJTSUBST FRMT START INF P FILLR ' ',2
0x3b2e00…3b2f94 (2, 352) Dummy {f00=0x013c, f01=0x0190, f02=» TYPE b P FLINK FLBNR P FMEND " P* 8 : PJTSUB01 FRMT LINE 1,- 1,5,6 B P FLINK JTSUB05 CPR/CIR P FLINK JTSUB06 REG-KONTO-NR 0 P FLINK JTSUB08 VALUE P FMEND
0x3b2f94…3b3128 Dummy {f00=0x013c, f01=0x0190, f02=»ZZ.ZZ.ZZ',GTDUPF(CBIN7) V.DATO B P FMEL 'BBX',GTDUPF(CBIN6) RE$ & D P FMEL 'BBX',GTDUPF(CBIN8) BFO l P FLINK JTSUB30 0 P FMEL 'XXXXXXE-XXXX',GTDUPF(CBIN10) YD.MODT ( P F
0x3b3128…3b32bc Dummy {f00=0x013c, f01=0x0190, f02=» FMEL 'B999E-999E-99E-99B',GTDUPF(CBIN1) P FMEND 6 P* L 2 PJTSUB06 FRMT CPR/CIR V P FBT BCPR,JTLAB06 ( P FMEL 'XE-XXE-XXE-XXB',GTDUPF(CBIN2) P FB JTLAB08 PJTLAB06 P FBT BLE
0x3b32bc…3b3450 Dummy {f00=0x013c, f01=0x018e, f02=» PJTLAB08 P FMEND P* * P* 4 8 PJTSUB08 FRMT VALUE AND D/K > 6 P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) z P FCOPY TTDBKRM P FMEND P* PJTSUB10 FRMT LEVERAND
0x3b3450…3b35e4 Dummy {f00=0x013c, f01=0x0190, f02=» 6 P FMEL 'BBZZZE-ZZZE-ZZE-ZZ',GTDUPF(CBIN9) P FMEND > P* L 6 PJTSUB31 FRMT LINE 3 - 8 V P FILLR ' ',2 F P FMEL 'ZZ.ZZ.ZZ',GTDUPF(CBIN12) FAKT DATO F P FMEL 'BZ
0x3b35e4…3b3778 Dummy {f00=0x013c, f01=0x0190, f02=» FMEL 'BZZZZ',GTDUPF(CBIN15) TXT NR D P FMEL 'BZZ',GTDUPF(CBIN16) OMR NR @ D P FMEL 'BZZ.ZZ.ZZ',GTDUPF(CBIN18) PER FRA D P FMEL 'BZZ.ZZ.ZZ',GTDUPF(CBIN19)
0x3b3778…3b390c Dummy {f00=0x013c, f01=0x018e, f02=»* 0 P* VARIOUS FORMATS FOR JOURNAL TAPE P* > @ PFTBXJT FTABLE XJTF01,XJTF02,XJTF03,XJTF04,XJTF05,XJTF06, C H 2 P XJTF07,FMTFMT,XJTF09,XJTF10,XJTF11,VOX15, C P XJTF13,XJTF14,VOFMT02 P* PXJTF01 FRMT KVITTERING
0x3b390c…3b3aa0 Dummy {f00=0x013c, f01=0x0190, f02=» P FLINK XJTF02L P FMEND P* , PXJTF02L FRMT 6 P FLINK FLBNR J P FILLR ' ',2 ^ P FCOPY ='KONTOKORT' r P FBF GTSLDFLG,XJTF02EX & P FMEL 'B*.***.***.**9.99-',TTKTSLD PXJTF02EX P FMEND P* PXJTF03 FRM
0x3b3aa0…3b3c34 (2, 353) Dummy {f00=0x013c, f01=0x0190, f02=»M' P FMEND PXJTF05 FRMT P FLINK XJTF05L , P FMEND B P* P P* Z PXJTF05L FRMT d P FILLR ' ',2 x P FILLR '*',50 P FEOR P FILLR ' ',2 P FTEXT 'VERSNR ' P FCOPY ='DAGS-DATO' P FILLR ' ',2
0x3b3c34…3b3dc8 Dummy {f00=0x013c, f01=0x018e, f02=»,2 P FCOPY GTTESTMK P FMEL '99.99.999.9',CVERSNR " P FILLR ' ',2 F P FMEL '99E-99E-99',CMASKDAT Z P FILLR ' ',3 ~ P FMEL '99E-99E-99',GTDATO P FILLR ' ',3 P FMEL '999',GTMSK P FILLR ' ',7 P FMEL '***99',TTST
0x3b3dc8…3b3f5c Dummy {f00=0x013c, f01=0x0190, f02=» P FILLR ' ',2 $ P FMEL '999E-99999E-99BB',TVERSUR & P FMEL '999E-99999E-99BB',TTCASHAC D $ P FMEL 'ZZZ.ZZZ.ZZ9.ZZ-',TTSTCASH n P FEOR P FILLR ' ',2 P FILLR '*',40 P FMEND P* PXJTF06 FRMT P FLINK XJTF06L
0x3b3f5c…3b40f0 Dummy {f00=0x013c, f01=0x0190, f02=»'KASSELUKNING' P FILLR ' ',30 P FEOR , P FILLR ' ',2 : P FCOPY ='T[LLER' N P FILLR ' ',10 f P FCOPY ='DEBET' | P FILLR ' ',12 P FCOPY ='KREDIT' P FMEND P* PXJTF07 FRMT P FLINK XJTF07L P FME
0x3b40f0…3b4284 Dummy {f00=0x013c, f01=0x0190, f02=» ^ 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(GSWBIN5,CBIN1) P FMEND B P* P PXJTF09 FRMT Z P FCOPY =' START TEST' n P FMEND P* PXJTF10 FRMT P FCOPY =' SLUT TEST' P FMEND P* PXJTF11 FRMT P FILLR
0x3b4284…3b4418 Dummy {f00=0x013c, f01=0x018e, f02=»MEND P* PXJTF13L FRMT P FLINK JTSUB05 REG KNT NO * * P FMEL 'BZZZ',GTDUPF(CBIN2) COUNTER NO L 2 P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) VALUE z P FILLR ' ',2 P FCOPY ='ADM ' $ P FMEL 'BZZ',GTDUPF(CBIN5) ADM NO P FME
0x3b4418…3b45ac Dummy {f00=0x013c, f01=0x0190, f02=» P* PFMTFMT FRMT P FLINK FMTFMTL & P FMEND < P* J PFMTFMTL FRMT T P FILLR ' ',2 h P FTEXT 'DIVERSE FORMATER' | P FMEND P EJECT P* : P* FORMATS FOR VOUCHER 'BILAG AFSTEMPLING'
0x3b45ac…3b4740 Dummy {f00=0x013c, f01=0x0190, f02=» C X 2 P BAFST12,BAFST40,BAFST41,BAFST42,BAFST45, C 2 P BAFST46,BAFST47,BAFST48,BAFST49,BAFST50, C B & P BAFST51,BAFST52,BAFST53,BAFST54 x P* P* PBAFST01 FRMT TRANS 01-06 P FLINK BAFST01L P FMEND P* P
0x3b4740…3b48d4 (2, 354) Dummy {f00=0x013c, f01=0x0190, f02=»'B**B',GTDUPF(CBIN3) BKO @ P FMEL 'ZZ.ZZ.ZZB',GTDUPF(CBIN7) BET/VALORDATO P FB B1LAB2 d PB1LAB1 v " P FMEL 'B**B',GTDUPF(CBIN3) BKO PB1LAB2 < P FLINK JTSUB06 CPR-CIR-NR @ P FLINK B
0x3b48d4…3b4a68 Dummy {f00=0x013c, f01=0x0190, f02=» TRANS 02-05-07-10 f P FLINK BAFST02L P FMEND 4 P* B PBAFST02L FRMT L 8 P FLINK BSUB01 HEADER b P FILLR ' ',1 8 P FMEL '******E-****',GTDUPF(CBIN2) CPR/CIR TRANS 10 P FILLR '*',3 P FBT T
0x3b4a68…3b4bfc Dummy {f00=0x013c, f01=0x0190, f02=»MEND P* P* < PBAFST08 FRMT TRANS 08-09 P FLINK BAFST08L ` P FMEND x P* PBAFST08L FRMT 8 P FLINK BSUB01 HEADER $ P FMEL 'BBB**B',GTDUPF(CBIN3) BKO
0x3b4bfc…3b4d90 Dummy {f00=0x013c, f01=0x018e, f02=»),B8LAB2 ~ 2 P FMEL 'BBZZ.ZZ.ZZBBB',GTDUPF(CBIN12) FAKTDATO ! P FB B8LAB5 ! F PB8LAB2 ! X . P FMEL 'ZZZZ9999.99B',GTDUPF(CBIN14) LEVNR ! f PB8LAB5 ! P FLINK JTSUB10 LEVERAND. ! > P FLINK BSUB02 REGKONTO-BELOB ! P
0x3b4d90…3b4f24 Dummy {f00=0x013c, f01=0x0190, f02=» ! P FILLR '+',2 " P FCOPY GTTESTMK " $ > P FCOPY TTCYM CYKLE-MARKERING " < > P FMEL '999B',GTMSK MASKINNR " ~ P FLINK FLBNR " @ P FMEL 'B99.99.99',GTDATO POSTERI
0x3b4f24…3b50b8 Dummy {f00=0x013c, f01=0x0190, f02=»PE-NR " ^ < P FMEL 'B999',TTCNTNR TAELLER-NR # 2 P FMEL 'BZZZZZZZZZZ',GTDUPF(CBIN2) DIVERSE TEXT # N P FBT TTKORTFL,B12LAB1 # P FILLR '*',13 # PB12LAB1 # @ P FLINK BSUB02 REGKONTO-BELOB #
0x3b50b8…3b524c Dummy {f00=0x013c, f01=0x018e, f02=»B13 # P FMEND $ P* $ PBAFST04 FRMT BILAG TRANS 4 $ $ P FLINK BSUB10 $ H P FLINK BSUB12 $ ^ P FLINK BSUB13 $ t P FMEND $ P* $ P* $ PBAFST40 FRMT $ P FMEND $ P* $ PBAFST41 FRMT $ P FMEND $ PBAFST42 FRMT $
0x3b524c…3b53e0 Dummy {f00=0x013c, f01=0x0190, f02=» P FMEND % P* % PBAFST48 FRMT % P FMEND % 0 P* % > PBAFST49 FRMT % H P FMEND % P* % j PBAFST50 FRMT % t P FMEND % P* % PBAFST51 FRMT % P FMEND % P* % PBAFST52 FRMT % P FMEND % P* % PBAFST53 FRMT %
0x3b53e0…3b5574 (2, 355) Dummy {f00=0x013d, f01=0x0190, f02=» HEADER % d P FILLR '+',2 & P FCOPY GTTESTMK & , > P FCOPY TTCYM CYKLE-MARKERING & D > P FMEL '999B',GTMSK MASKINNR & P FLINK FLBNR & @ P FMEL 'B99.99.99',GTDATO
0x3b5574…3b5708 Dummy {f00=0x013d, f01=0x018e, f02=» TRANSTYPE-NR & f P FMEND ' P* ' , P ' 6 PBSUB02 FRMT ' > @ P FMEL 'B999.99999.99B',GTDUPF(CBIN1) REGKONTONR ' T < P FMEL '*.***.***.**9.99-',GTDUPF(CBIN4) BELOB ' B P FCOPY TTDBKRM DEB
0x3b5708…3b589c Dummy {f00=0x013d, f01=0x0190, f02=» P FCOPY TTCYM ( @ P FMEL '99.99.99B',GTDATO POSTERINGSDATO ( P FCOPY CKMDNAM ( : P FMEL 'B999B',GTMSK MASKINNR ( r " P FMEL '99B',GTDUPF(CBIN3) BKO ( P FMEND ( P* ( P* ( PBSUB05
0x3b589c…3b5a30 Dummy {f00=0x013d, f01=0x0190, f02=» DEBET/KREDIT-MARK ( l P FILLR ' ',1 ) " P FMEND ) 6 P* ) L P* ) V PBSUB06 FRMT ) ` " P FMEL 'B99B',GTDUPF(CBIN3) BKO ) v P FBT TTKORTFL,B6LAB1 ) P FCOPY TT07TXT ) P FILLR ' ',1 ) . P FMEL 'ZZ.ZZ.ZZB',GTDUPF(CBIN7) VAL. D
0x3b5a30…3b5bc4 Dummy {f00=0x013d, f01=0x0190, f02=» CPR/CIR-NR ) v < P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) BELOB * & D P FCOPY TTDBKRM DEBET/KREDIT-MARK * f P FILLR ' ',1 * P FLINK SKAF01 LINE NR * P FMEND * P* * PBSUB10 F
0x3b5bc4…3b5d58 Dummy {f00=0x013d, f01=0x018e, f02=»99',GTDATO POSTDATO * " P FMEL 'BXX.',GTDUPF(CBIN3) BKO + P FMEND + B P* + P PBSUB11 FRMT + Z $ P FMEL 'XX',GTDUPF(CBIN11) P]L]R + n 2 P FMEL 'E-9999999999B',GTDUPF(CBIN2) DEBITOR NR + , P FMEL 'XX.XXPP',GTDUPF(CBIN7) VALOERDATO + & P FMEL 'BXB',
0x3b5d58…3b5eec Dummy {f00=0x013d, f01=0x0190, f02=» + n P FB B12LAB6 , PB12LAB5 , ( P FMEL 'XX',GTDUPF(CBIN10) FORFALDS]R , , PB12LAB6 , X 2 P FMEL 'E-9999999999B',GTDUPF(CBIN2) DEBITORNR , h , P FMEL 'XX.XXPP',GTDUPF(CBIN7) VALOERDATO , P FILLR ' ',3 , P FMEND , P* , PBSUB13 FRMT ,
0x3b5eec…3b6080 Dummy {f00=0x013d, f01=0x0190, f02=» EKSP LB. NR. , P FBT GTLOKSPG,FLBNR10 - P FMEL '****9',TTLBNR - 4 P FB FLBNR20 - P PFLBNR10 - d P FMEL '****9',GTLBNR - t PFLBNR20 - P FMEND - P* - P EJECT - P* - * P* VARIOUS FORMATS FOR VOUCHER - P* - : P
0x3b6080…3b6214 (2, 356) Dummy {f00=0x013d, f01=0x0190, f02=»X15, C - t P VOX16,VOX17,VOX18 . P* . , P* . 6 PVOFMT02 FRMT TOTAL IN CYCLE . @ P FLINK VOFMT02L . d P FMEND . | P* . PVOFMT02L FRMT . P FILLR '+',2 . P FBF TTCY1FLG,VOLAB02 . P FCOPY ='ARKIV' . P FLINK JTSUB30 .
0x3b6214…3b63a8 Dummy {f00=0x013d, f01=0x0190, f02=»* . PBAXF04 FRMT / P FLINK BAFST03 / P FLINK BAXF05L / 4 P FMEND / J P* / X PBAXF05 FRMT / b P FILLR '+',2 / v P FLINK BAXF05L / P FMEND / P* / PBAXF05L FRMT / P FLINK BSUB04 / P FEOR / P FILLR '0',2 / P FLI
0x3b63a8…3b653c Dummy {f00=0x013d, f01=0x0190, f02=»AFST03 / P FEOR 0 P FILLR '0',2 0 P FEOR 0 0 P FILLR '0',2 0 > P FEOR 0 R P FLINK KVIT03 0 ` P FMEND 0 v P* 0 PVOSUM07 FRMT SUMBILAG 0 P FLINK VOSUM07L 0 P FMEND 0 P* 0 PVOSUM07L FRMT 0 P FILLR '+',2 0 P F
0x3b653c…3b66d0 Dummy {f00=0x013d, f01=0x0190, f02=»LBNR 0 P FILLR ' ',1 1 P FCOPY ='TOTAL ' 1 " & P FMEL '*.***.***.**9,99+',GTSUMCNT 1 < P FILLR ' ',2 1 f P FMEND 1 z P* 1 PVOX08 FRMT 1 P FLINK VOX08L 1 P FMEND 1 P* 1 PVOX08L FRMT 1 P FILLR '+',2 1 P FCOPY GTTESTM
0x3b66d0…3b6864 Dummy {f00=0x013d, f01=0x0190, f02=»XT ' - ' 1 P FLINK FLBNR 2 P FILLR ' ',2 2 $ P FCOPY GSWSTR9 2 8 P FILLR ' ',2 2 N P FCOPY GSWSTR20 TEXT 2 b P FEOR 2 ~ P FILLR '2',2 2 P FILLR '*',60 2 P FILLR '*',8 2 P FEOR 2 P FILLR '4',2 2 P FCOPY ='KONTONR' 2 P F
0x3b6864…3b69f8 Dummy {f00=0x013d, f01=0x0190, f02=» ' ',12 2 P FCOPY ='KREDIT' 3 P FMEND 3 ( P* 3 6 PVOX09 FRMT 3 @ P FLINK VOX09L 3 R P FMEND 3 h P* 3 v PVOX09L FRMT 3 P FILLR '2',2 3 ( P FMEL 'XXXE-XXXXXE-XX',GTDUPF(CBIN1) 3 P FILLR ' ',4 3 P FMEL '99',GTWBCD1 3 6 P FMEL
0x3b69f8…3b6b8c Dummy {f00=0x013d, f01=0x0190, f02=»ZZ.ZZ9.99-',C12ACC(GSWBIN5,CBIN1) KREDIT 3 ~ P FMEND 4 0 P* 4 > PVOX10 FRMT 4 H P FLINK VOX10L 4 Z P FMEND 4 p P* 4 ~ PVOX10L FRMT 4 P FILLR '2',2 4 P FMEL 'ZZ',GTWBCD1 4 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) 4 6 P FMEL 'BBZ
0x3b6b8c…3b6d20 Dummy {f00=0x013d, f01=0x0190, f02=»FRMT 4 P FLINK VOX11L 5 P FMEND 5 " P* 5 0 PVOX11L FRMT 5 : P FILLR '4',2 5 N P FTEXT 'TOTAL' 5 b 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) 5 x 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTREGF(CBIN2) 5 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTREGF(CBI
0x3b6d20…3b6eb4 (2, 357) Dummy {f00=0x013d, f01=0x0190, f02=».ZZZ.ZZ9.99-',TTACC(CBIN8,CBIN2) 5 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(CBIN8,CBIN1) 6 ( P FEOR 6 ` P FILLR '2',2 6 n P FTEXT 'KOR' 6 P FILLR ' ',19 6 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(CBIN7,CBIN2) 6 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(
0x3b6eb4…3b7048 Dummy {f00=0x013d, f01=0x0190, f02=»4',2 6 $ P FMEL '999E-99999E-99',TTCASHAC 7 P FILLR ' ',1 7 4 P FTEXT ' PRIMO' 7 H * P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTSTCASH 7 ` P FILLR ' ',34 7 P FEOR 7 P FILLR '2',2 7 P FTEXT 'BEV ' 7 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4)
0x3b7048…3b71dc Dummy {f00=0x013d, f01=0x0190, f02=»,2 7 P FTEXT 'ULTIMO' 8 ( P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTCASH 8 " P FILLR ' ',34 8 N P FMEND 8 d P* 8 r PVOX13 FRMT 8 | P FLINK VOX13L 8 P FMEND 8 P* 8 PVOX13L FRMT 8 P FILLR ' ',2 8 P FCOPY GTTESTMK 8 P FMEL '999B'
0x3b71dc…3b7370 Dummy {f00=0x013d, f01=0x0190, f02=»0 8 P FILLR ' ',3 9 P FEOR 9 P FILLR '2',2 9 , P FILLR '*',56 9 @ P FEOR 9 V P FILLR '4',2 9 d P FCOPY ='T[LLER' 9 x P FILLR ' ',4 9 P FCOPY ='KONTONR' 9 P FILLR ' ',10 9 P FCOPY ='BEV.PERIODE' 9 P FILLR ' ',12 9 P
0x3b7370…3b7504 Dummy {f00=0x013d, f01=0x018e, f02=»VOX14L FRMT 9 P FILLR '2',2 : P FMEL 'ZZ',GTWBCD1 : ( P FILLR ' ',4 : B 0 P FMEL 'XXXE-XXXXXE-XX',CBACC(GSWBIN3,CBIN1) : V 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',CBACC(GSWBIN3,CBIN2) : 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',CBACC(GSWBIN3,CBIN3) : P FMEND :
0x3b7504…3b7698 Dummy {f00=0x013d, f01=0x0190, f02=» P FLINK VOX16L ; P FMEND ; P* ; ( PVOX16L FRMT ; 2 P FILLR X'24',40 NO. ; F P FILLR X'3C',40 5. ; b P FNL ; | P FNL ; P FILLR X'5D',40 ] ; P FILLR X'4E',40 N ; P FNL ; P FNL ; P FILLR X'45',40 E ; P FILLR X'53',4
0x3b7698…3b782c Dummy {f00=0x013d, f01=0x0190, f02=» VOX17L ; P FMEND < P* < PVOX17L FRMT < ( P FILLR '+',2 < < , P FMEL '99E-99E-99',GTDATO POSTERINGSDATO < P P FILLR ' ',6 < P FLINK FLBNR < P FILLR ' ',8 < 2 P FMEL 'B*.***.***.**9E,99',GTDUPF(CBIN4) BELOB < P FILLR '*',2 < P F
0x3b782c…3b79c0 Dummy {f00=0x013d, f01=0x0190, f02=» FLINK VOX18L < P FMEND = P* = $ PVOX18L FRMT = . P FILLR '2',2 = B P FILLR ' ',17 = V * P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GSWBCD6 = l * P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GSWBCD7 = P FMEND = P* = P EJECT = P* = . P* FORMA
0x3b79c0…3b7b54 (2, 358) Dummy {f00=0x013d, f01=0x0190, f02=»02, C = ` 2 P BAFST01,BAFST02,BAFST08,BAFST08,BAFST02, C > P BAFST12 > D P* > V P* > ` PKVIT03 FRMT > j P FILLR '+',2 > ~ P FLINK BSUB04 > P FLINK BSUB05 > P FMEND > P* > P EJECT > P* > " P* FORMATS F
0x3b7b54…3b7ce8 Dummy {f00=0x013d, f01=0x0190, f02=»T02, C > j P KAFST12 ? P* ? 0 P* ? : PKAFST00 FRMT ? D P FMEND ? Z P* ? p P* ? z < PKAFST01 FRMT TRANS 01-06 ? P FLINK BAFST01 ? P FLINK SKAF01 LINE NR ? P
0x3b7ce8…3b7e7c Dummy {f00=0x013d, f01=0x0190, f02=»F01 LINE NR ? P FMEND @ P* @ * P @ 4 : PKAFST12 FRMT TRANS 12 @ < P FLINK BAFST12 @ z P FLINK SKAF01 LINE NR @ P FMEND @ P* @ P* @ : PKAFST03 FRMT
0x3b7e7c…3b8010 Dummy {f00=0x013d, f01=0x0190, f02=» HEADER @ d P FLINK BSUB06 A P FBF TTKORTFL,KLAB31 A & 2 P FMEL 'XX.XXPP',GTDUPF(CBIN7) VAL.DATE, DD.MM A B PKLAB31 A x > P FMEL 'BXX',GTDUPF(CBIN11) PALIGNINGS$R A $ P FCOPY TT16TXT RENTE/GEBYR/INDB A ( P FLINK BSUB07 CPR/CIR/BE
0x3b8010…3b81a4 Dummy {f00=0x013d, f01=0x0190, f02=»04L A P FMEND B P* B PKAFST04L FRMT B $ 8 P FLINK BSUB01 HEADER B : < P FLINK BSUB06 BETART/DATO B v P FBF TTKORTFL,KLAB40 B 2 P FMEL 'XX.XXPP',GTDUPF(CBIN7) VAL DATE, DD.MM B P
0x3b81a4…3b8338 Dummy {f00=0x013d, f01=0x0190, f02=» B f P FB KLAB42 C PKLAB41 C P FILLR ' ',3 C ( 4 P FMEL 'B**',GTDUPF(CBIN10) FORF.AAR - CPR, BSKAT C < PKLAB42 C t F P FLINK BSUB07 CPR/CIR-BELOB-LINIENR C P FMEND C P* C PSKAF01 FRMT C P FBF CKT
0x3b8338…3b84cc Dummy {f00=0x013d, f01=0x0190, f02=»SALDO C n PSKAF03 D " P FMEL 'B99.',TTKTLIN NEW LINE D " P FMEL '9',TTKTCHK CHECK DIGIT D B P FB SKAF05 D h PSKAF02 D z P FMEL '99B',TTKTLIN D PSKAF05 D P FMEND D P* D P EJECT D P* D . P* VARIOUS FORMATS FOR 'KONTOK
0x3b84cc…3b8660 Dummy {f00=0x013d, f01=0x0190, f02=»MT D P FILLR '+',2 E P FMEL 'BB99.99.99',GTDATO E P FILLR ' ',43 E @ & P FMEL '*.***.***.**9.99-',TTKTSLD E V P FILLR ' ',2 E P FCOPY ='TRP ' E P FMEND E P EJECT E P* E $ P* FORMATS FOR TALLY ROLL E P* E
0x3b8660…3b87f4 (2, 359) Dummy {f00=0x013e, f01=0x0190, f02=» E @ PFTBXTA FTABLE TAFMT01,TAFMT02,TAFMT02,TAFMT04,TAFMT05, C F P VOX15,TAFMT07 F L P* F d PTAFMT01 FRMT F n P FSL F P FNL F P FNL F P FILLR '*',1 F P FILLR ' ',1 F P FMEND F P* F PTAFMT02 FRMT F P FLINK TAFMT02
0x3b87f4…3b8988 Dummy {f00=0x013e, f01=0x018e, f02=» P FLINK TAFMT07 G P FMEND G P* G ( PTAFMT04 FRMT G 2 P FILLR '+',2 G F , P FMEL 'Z.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) G Z P FCOPY TTDBKRM G P FMEND G P* G PTAFMT05 FRMT G P FILLR '+',2 G & P FMEL 'Z.ZZZ.ZZZ.ZZ9.99-',GSWBCD6 G
0x3b8988…3b8b1c Dummy {f00=0x013e, f01=0x414e, f02=» P FNL H P FMEND H P EJECT H P* H 4 ( P* FORMATS FOR GENERAL PRINTER H > P* H j PFTBGP FTABLE FMTFMT H t P* H P* H P EJECT H P* H 2 P* VARIOUS FORMATS FOR GENERAL PRINTER H P* H PFTBXGP FTABL
0x3b8b1c…3b8cb0 Dummy {f00=0x013e, f01=0x2008, f02=» I P* CAN NOT BE IDENTIFIED BY TRANSTYPE (OR GTREGDEX) ' P* ' L PFTBXX FTABLE ' V P* ' n P* ' x P END ' @ ' & z P* & PFTBTA FTABLE & P* & P* & P EJECT & P* & ( P* FORMATS
0x3b8cb0…3b8e44 Dummy {f00=0x013e, f01=0x0000, f02=»
[…0x3…]
0x3b9300…3b9494 (2, 360) Opaque[0x194]
0x3b9494…3b9628 # DirEnt {nam=»DIV167«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x27c8, f03=0x0000}
0x3b9494…3b9628 IdxSect {
0x3b9494…3b9628 f00 = 0x013e // 0x3b9494 @0x0
0x3b9494…3b9628 f01 = 0x0014 // 0x3b9496 @0x2
0x3b9494…3b9628 gno = [ // 0x3b9498 @0x4
0x3b9494…3b9628 [0x00]: C0x013e.0x1.0
0x3b9494…3b9628 [0x01]: C0x013e.0x2.0
0x3b9494…3b9628 [0x02]: C0x013e.0x3.0
0x3b9494…3b9628 [0x03]: C0x013f.0x0.0
0x3b9494…3b9628 [0x04]: C0x013f.0x1.0
0x3b9494…3b9628 [0x05]: C0x013f.0x2.0
0x3b9494…3b9628 [0x06]: C0x013f.0x3.0
0x3b9494…3b9628 [0x07]: C0x0140.0x0.0
0x3b9494…3b9628 [0x08]: C0x0140.0x1.0
0x3b9494…3b9628 [0x09]: C0x0140.0x2.0
0x3b9494…3b9628 ]
0x3b9494…3b9628 }
0x3b9628…3b97bc Dummy {f00=0x013e, f01=0x0190, f02=» P IDENT DIV167 03.01.XXX.1 P DDUM KMD08 & P PDIV D P ENTRY FRMTJT Z P ENTRY FRMXJT p P ENTRY FRMTTA P ENTRY FRMXTA P ENTRY FRMTVO P ENTRY FRMTKV P ENTRY FRMXVO P ENTRY FRMTKT
0x3b97bc…3b9950 Dummy {f00=0x013e, f01=0x0190, f02=» PROC 0 P CALL FMOVE,GTSTRFMT,FTBJT(GTREGDEX) P RET B P PEND V P* l PFRMXJT PROC XJTDEX v ( P CALL FMOVE,GTSTRFMT,FTBXJT(XJTDEX) P RET P PEND P* PFRMTTA PROC 0 P CALL FMOV
0x3b9950…3b9ae4 Dummy {f00=0x013e, f01=0x0190, f02=»XTA(XTADEX) x P RET P PEND P* . PFRMTVO PROC 8 0 P CALL FMOVE,GTSTRFMT,FTBVO(GTREGDEX) L P RET P PEND P* PFRMXVO PROC XVODEX ( P CALL FMOVE,GTSTRFMT,FTBXVO(XVODEX) P RET P P
0x3b9ae4…3b9c78 Dummy {f00=0x013e, f01=0x018e, f02=» 0 P CALL FMOVE,GTSTRFMT,FTBKT(GTREGDEX) P RET < P PEND P P* f PFRMXKT PROC XKTDEX p ( P CALL FMOVE,GTSTRFMT,FTBXKT(XKTDEX) P RET P PEND P* PFRMTGP PROC ( P CALL FMOVE,GTSTRFMT,FTB
0x3b9c78…3b9e0c Dummy {f00=0x013e, f01=0x0190, f02=» j P RET P PEND P* " P* , P* 6 P EJECT @ P* V P* FORMATS FOR JOURNAL ` P* @ PFTBJT FTABLE JTFMT01,JTFMT02,JTFMT03,JTFMT04,JTFMT02, C 2 P JTFMT01,JTFMT02,JTFMT08,JTFMT08,JTFMT02, C P
0x3b9e0c…3b9fa0 Dummy {f00=0x013e, f01=0x0190, f02=» LINE 1 z P FEOR 2 P FLINK JTSUB04 LINE 2 6 P FMEND l P* PJTFMT02 FRMT P FLINK JTFMT02L P FMEND P* PJTFMT02L FRMT 2 P FLINK JTSUBST
0x3b9fa0…3ba134 (2, 361) Dummy {f00=0x013e, f01=0x0190, f02=» FEOR P FILLR ' ',8 F P FMEL 'X',GTDUPF(CBIN6) RE$ 2 P FILLR ' ',2 | P FLINK JTSUB06 FOR TRANS 10 P FLINK JTSUB30 ARKIV KNT.NR P FILLR ' ',15 P FMEND
0x3ba134…3ba2c8 Dummy {f00=0x013e, f01=0x0190, f02=» START INF p P FILLR ' ',9 $ P FCOPY TT16TXT RATE/RENTE/GEBYR 4 2 P FLINK JTSUB06 CPR/CIR 0 P FLINK JTSUB08 VALUE P FEOR P FILLR ' ',2 P FILLR '
0x3ba2c8…3ba45c Dummy {f00=0x013e, f01=0x0190, f02=»ZZ',GTDUPF(CBIN7) VALGR z F P FMEL 'BBZ',GTDUPF(CBIN8) BETALINGSFORM BFO 6 8 P FLINK JTSUB30 ARK KONTO NR P FILLR ' ',2 8 P FMEL 'XX',GTDUPF(CBIN11) PALIGNIN
0x3ba45c…3ba5f0 Dummy {f00=0x013e, f01=0x0190, f02=»ND P* PJTFMT04 FRMT P FLINK JTFMT04L ( P FMEND @ P* N PJTFMT04L FRMT X P FLINK JTSUBST START INF n P FILLR ' ',15 2 P FLINK JTSUB06 CPR/CIR 0 P FLINK JTSUB08
0x3ba5f0…3ba784 Dummy {f00=0x013e, f01=0x0190, f02=» D P FMEL 'ZZ.ZZ.ZZ',GTDUPF(CBIN7) VALOR P FILLR ' ',3 L 6 P FLINK JTSUB30 ARK KNT NR h B P FMEL 'BBBZZ',GTDUPF(CBIN10) F$R F P FMEL 'BBZZ',GTDUPF(CBI
0x3ba784…3ba918 Dummy {f00=0x013e, f01=0x0190, f02=»GTDUPF(CBIN13) OPK z P FMEND 0 P* F PJTFMT08 FRMT P P FLINK JTFMT08L d P FMEND | P* PJTFMT08L FRMT 4 P FLINK JTSUBST START INF 2 P FLINK JTSUB01
0x3ba918…3baaac Dummy {f00=0x013e, f01=0x0190, f02=» LINE 3 z P FMEND P* 6 PJTFMT12 FRMT @ P FLINK JTFMT12L T P FMEND l P* z PJTFMT12L FRMT 4 P FLINK JTSUBST START INF 8 P FLINK JTSUB05 REG KONTO NR
0x3baaac…3bac40 Dummy {f00=0x013e, f01=0x0190, f02=» FLINK JTSUB08 VALUE P FEOR 2 P FILLR ' ',2 @ 2 P FMEL 'BZZZZZZZZZZ',GTDUPF(CBIN2) DIVERSE TEXT T P FILLR ' ',16 P FMEND P* 4 PJTSUBST FRMT START INF P FILLR ' ',2
0x3bac40…3badd4 (2, 362) Dummy {f00=0x013e, f01=0x0190, f02=» TYPE b P FLINK FLBNR P FMEND " P* 8 : PJTSUB01 FRMT LINE 1,- 1,5,6 B P FLINK JTSUB05 CPR/CIR P FLINK JTSUB06 REG-KONTO-NR 0 P FLINK JTSUB08 VALUE P FMEND
0x3badd4…3baf68 Dummy {f00=0x013e, f01=0x0190, f02=»ZZ.ZZ.ZZ',GTDUPF(CBIN7) V.DATO B P FMEL 'BBX',GTDUPF(CBIN6) RE$ & D P FMEL 'BBX',GTDUPF(CBIN8) BFO l P FLINK JTSUB30 0 P FMEL 'XXXXXXE-XXXX',GTDUPF(CBIN10) YD.MODT ( P F
0x3baf68…3bb0fc Dummy {f00=0x013e, f01=0x0190, f02=» FMEL 'B999V99V999E-99B',GTDUPF(CBIN1) P FMEND 4 P* J 2 PJTSUB06 FRMT CPR/CIR T P FBT BCPR,JTLAB06 ( P FMEL 'XE-XXE-XXE-XXB',GTDUPF(CBIN2) P FB JTLAB08 PJTLAB06 P FBT BLEV,
0x3bb0fc…3bb290 Dummy {f00=0x013e, f01=0x0190, f02=»JTLAB08 P FMEND P* & P* 0 8 PJTSUB08 FRMT VALUE AND D/K : 6 P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) v P FCOPY TTDBKRM P FMEND P* PJTSUB10 FRMT LEVERANDOER
0x3bb290…3bb424 Dummy {f00=0x013e, f01=0x0190, f02=» FMEL 'BBZZZVZZVZZZE-ZZ',GTDUPF(CBIN9) P FMEND 6 P* D 6 PJTSUB31 FRMT LINE 3 - 8 N P FILLR ' ',2 F P FMEL 'ZZ.ZZ.ZZ',GTDUPF(CBIN12) FAKT DATO D P FMEL 'BZZZZZZZZ'
0x3bb424…3bb5b8 Dummy {f00=0x013e, f01=0x0190, f02=»ZZZ',GTDUPF(CBIN15) TXT NR ~ D P FMEL 'BZZ',GTDUPF(CBIN16) OMR NR 6 D P FMEL 'BZZ.ZZ.ZZ',GTDUPF(CBIN18) PER FRA ~ D P FMEL 'BZZ.ZZ.ZZ',GTDUPF(CBIN19) PER TIL
0x3bb5b8…3bb74c Dummy {f00=0x013e, f01=0x0190, f02=»* VARIOUS FORMATS FOR JOURNAL TAPE P* 4 @ PFTBXJT FTABLE XJTF01,XJTF02,XJTF03,XJTF04,XJTF05,XJTF06, C > 2 P XJTF07,FMTFMT,XJTF09,XJTF10,XJTF11,VOX15, C P XJTF13,XJTF14,VOFMT02 P* PXJTF01 FRMT KVITTERING P FILLR
0x3bb74c…3bb8e0 Dummy {f00=0x013e, f01=0x0190, f02=»NK XJTF02L P FMEND P* PXJTF02L FRMT * P FLINK FLBNR > P FILLR ' ',2 R P FCOPY ='KONTOKORT' f P FBF GTSLDFLG,XJTF02EX & P FMEL 'B*.***.***.**9.99-',TTKTSLD PXJTF02EX P FMEND P* PXJTF03 FRMT P F
0x3bb8e0…3bba74 (2, 363) Dummy {f00=0x013f, f01=0x0190, f02=»MEND PXJTF05 FRMT P FLINK XJTF05L P FMEND 6 P* D P* N PXJTF05L FRMT X P FILLR ' ',2 l P FILLR '*',50 P FEOR P FILLR ' ',2 P FTEXT 'VERSNR ' P FCOPY ='DAGS-DATO' P FILLR ' ',2 P FCO
0x3bba74…3bbc08 Dummy {f00=0x013f, f01=0x0190, f02=»COPY GTTESTMK P FMEL '99.99.999.9',CVERSNR P FILLR ' ',2 : P FMEL '99E-99E-99',CMASKDAT N P FILLR ' ',3 r P FMEL '99E-99E-99',GTDATO P FILLR ' ',3 P FMEL '999',GTMSK P FILLR ' ',7 P FMEL '***99',TTSTLBNR P
0x3bbc08…3bbd9c Dummy {f00=0x013f, f01=0x018e, f02=» ' ',2 $ P FMEL '999V99V999E-99B',TVERSUR $ P FMEL '999V99V999E-99B',TTCASHAC 6 $ P FMEL 'ZZZ.ZZZ.ZZ9.ZZ-',TTSTCASH ^ P FEOR P FILLR ' ',2 P FILLR '*',40 P FMEND P* PXJTF06 FRMT P FLINK XJTF06L P FMEND
0x3bbd9c…3bbf30 Dummy {f00=0x013f, f01=0x0190, f02=» x P FILLR ' ',30 P FEOR P FILLR ' ',2 , P FCOPY ='T[LLER' @ P FILLR ' ',10 X P FCOPY ='DEBET' n P FILLR ' ',12 P FCOPY ='KREDIT' P FMEND P* PXJTF07 FRMT P FLINK XJTF07L P FMEND P*
0x3bbf30…3bc0c4 Dummy {f00=0x013f, f01=0x0190, f02=»'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(GSWBIN5,CBIN1) P FMEND 4 P* B PXJTF09 FRMT L P FCOPY =' START TEST' ` P FMEND ~ P* PXJTF10 FRMT P FCOPY =' SLUT TEST' P FMEND P* PXJTF11 FRMT P FILLR ' ',2 P
0x3bc0c4…3bc258 Dummy {f00=0x013f, f01=0x018e, f02=» PXJTF13L FRMT P FLINK JTSUB05 REG KNT NO * P FMEL 'BZZZ',GTDUPF(CBIN2) COUNTER NO > 2 P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) VALUE l P FILLR ' ',2 P FCOPY ='ADM ' $ P FMEL 'BZZ',GTDUPF(CBIN5) ADM NO P FMEND P*
0x3bc258…3bc3ec Dummy {f00=0x013f, f01=0x0190, f02=» PFMTFMT FRMT P FLINK FMTFMTL P FMEND . P* < PFMTFMTL FRMT F P FILLR ' ',2 Z P FTEXT 'DIVERSE FORMATER' n P FMEND P EJECT P* : P* FORMATS FOR VOUCHER 'BILAG AFSTEMPLING' P* @ PFT
0x3bc3ec…3bc580 Dummy {f00=0x013f, f01=0x0190, f02=»BAFST12,BAFST40,BAFST41,BAFST42,BAFST45, C 2 P BAFST46,BAFST47,BAFST48,BAFST49,BAFST50, C 4 & P BAFST51,BAFST52,BAFST53,BAFST54 j P* P* PBAFST01 FRMT TRANS 01-06 P FLINK BAFST01L P FMEND P* PBAFST01L FRMT
0x3bc580…3bc714 (2, 364) Dummy {f00=0x013f, f01=0x0190, f02=»N3) BKO | @ P FMEL 'ZZ.ZZ.ZZB',GTDUPF(CBIN7) BET/VALORDATO P FB B1LAB2 T PB1LAB1 f P FMEL 'B',GTDUPF(CBIN3) BKO t PB1LAB2 < P FLINK JTSUB06 CPR-CIR-NR @ P FLINK BSUB02
0x3bc714…3bc8a8 Dummy {f00=0x013f, f01=0x0190, f02=»10 T P FLINK BAFST02L P FMEND " P* 0 PBAFST02L FRMT : 8 P FLINK BSUB01 HEADER P P FILLR ' ',1 8 P FMEL '******E-****',GTDUPF(CBIN2) CPR/CIR TRANS 10 P FILLR '*',0 P FBT TTKORTFL,B2LAB1
0x3bc8a8…3bca3c Dummy {f00=0x013f, f01=0x0190, f02=» P* < PBAFST08 FRMT TRANS 08-09 P FLINK BAFST08L N P FMEND f P* t PBAFST08L FRMT ~ 8 P FLINK BSUB01 HEADER " P FMEL 'B**',GTDUPF(CBIN3) BKO P FBZ GTUSED(CBIN13
0x3bca3c…3bcbd0 Dummy {f00=0x013f, f01=0x0190, f02=»L 'BBZZ.ZZ.ZZBBB',GTDUPF(CBIN12) FAKTDATO P FB B8LAB5 ! 2 PB8LAB2 ! D . P FMEL 'ZZZZ9999.99B',GTDUPF(CBIN14) LEVNR ! R PB8LAB5 ! P FLINK JTSUB06 LEVERAND. ! > P FLINK BSUB02 REGKONTO-BELOB ! P FMEND !
0x3bcbd0…3bcd64 Dummy {f00=0x013f, f01=0x018e, f02=» '+',2 ! P FCOPY GTTESTMK " > P FCOPY TTCYM CYKLE-MARKERING " & > P FMEL '999B',GTMSK MASKINNR " h P FLINK FLBNR " @ P FMEL 'B99.99.99',GTDATO POSTERINGSDATO " < P
0x3bcd64…3bcef8 Dummy {f00=0x013f, f01=0x0190, f02=» " x P FILLR '*',13 # PB12LAB1 # @ P FLINK BSUB02 REGKONTO-BELOB # . P FMEND # r P* # P* # PBAFST03 FRMT BILAG TRANS 3 # P FLINK BSUB10 # P FLINK BSUB11 # P FLINK BSUB13 # P FMEND
0x3bcef8…3bd08c Dummy {f00=0x013f, f01=0x0190, f02=» # P* $ PBAFST40 FRMT $ P FMEND $ & P* $ 4 PBAFST41 FRMT $ > P FMEND $ R PBAFST42 FRMT $ ` P FMEND $ t P* $ PBAFST45 FRMT $ P FMEND $ P* $ PBAFST46 FRMT $ P FMEND $ P* $ PBAFST47 FRMT $ P FMEND $ P*
0x3bd08c…3bd220 Dummy {f00=0x013f, f01=0x0190, f02=» PBAFST51 FRMT % P FMEND % P* % & PBAFST52 FRMT % 0 P FMEND % D P* % R PBAFST53 FRMT % P FMEND % p P* % ~ PBAFST54 FRMT % P FMEND % P* % P* % P* % 8 PBSUB01 FRMT HEADER % P
0x3bd220…3bd3b4 (2, 365) Dummy {f00=0x013f, f01=0x0190, f02=»GTMSK MASKINNR % z P FLINK FLBNR & , @ P FMEL 'B99.99.99',GTDATO POSTERINGSDATO & @ B P FCOPY TTSUPMRK SUPPLEMENTS-MARK & < P FMEL '99',GTREGNR TRANSTYPE-NR &
0x3bd3b4…3bd548 Dummy {f00=0x013f, f01=0x0190, f02=» FMEL '*.***.***.**9.99-',GTDUPF(CBIN4) BELOB & B P FCOPY TTDBKRM DEBET/KREDIT-MARK ' > P FILLR ' ',1 ' P FMEND ' P* ' P* ' PBSUB04 FRMT ' P FCOPY GTTESTMK ' P FCOPY TTCYM '
0x3bd548…3bd6dc Dummy {f00=0x013f, f01=0x0190, f02=» MASKINNR ' f " P FMEL '99B',GTDUPF(CBIN3) BKO ( P FMEND ( : P* ( P P* ( Z PBSUB05 FRMT ( d P FLINK FLBNR ( z > P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) BELOB ( B P FCOPY TTDBKRM DEBET/KREDI
0x3bd6dc…3bd870 Dummy {f00=0x013f, f01=0x0190, f02=» FBT TTKORTFL,B6LAB1 ( P FCOPY TT07TXT ) P FILLR ' ',1 ) 2 . P FMEL 'ZZ.ZZ.ZZB',GTDUPF(CBIN7) VAL. DATO ) F PB6LAB1 ) x P FMEND ) P* ) P* ) PBSUB07 FRMT ) P FILLR ' ',1 ) < P FLINK JTSUB06 C
0x3bd870…3bda04 Dummy {f00=0x013f, f01=0x0190, f02=»EDIT-MARK ) Z P FILLR ' ',1 * P FLINK SKAF01 LINE NR * & P FMEND * D P* * Z PBSUB10 FRMT * d P FILLR '+',2 * x P FCOPY GTTESTMK TEST MARK * P FMEL '999B',GTMSK MASKINNR * P FLINK FLBNR * & P FMEL 'B99.99.99',GTDATO POSTDATO
0x3bda04…3bdb98 Dummy {f00=0x013f, f01=0x0190, f02=»'E-9999999999B',GTDUPF(CBIN2) DEBITOR NR * , P FMEL 'XX.XXPP',GTDUPF(CBIN7) VALOERDATO + 0 & P FMEL 'BXB',GTDUPF(CBIN12) RTE/GEB + ` P FMEND + P* + PBSUB12 FRMT + P FBF TTASKAT,B12LAB5 + $ P FMEL 'XX',GTDUPF(CBIN11) REST]R + P FB B12LAB6 +
0x3bdb98…3bdd2c Dummy {f00=0x013f, f01=0x018e, f02=» FMEL 'XX.XXPP',GTDUPF(CBIN7) VALOERDATO + P FILLR ' ',3 , 0 P FMEND , D P* , R PBSUB13 FRMT , 2 P FMEL '*.***.***.**9.99-',GTDUPF(CBIN4) VALUE , p P FCOPY TTDBKRM , P FILLR ' ',1 , P FMEND , P* , PFLBNR FRMT EKSP LB. NR. , P
0x3bdd2c…3bdec0 Dummy {f00=0x013f, f01=0x0190, f02=» P FMEND - P* - P EJECT - P* - * * P* VARIOUS FORMATS FOR VOUCHER - 4 P* - b : PFTBXVO FTABLE FMTFMT,VOFMT02,VOFMT02,BAXF04,BAXF05, C - l * P BAXF06,VOSUM07,VOX08,VOX09,VOX10, C - ( P VOX11,VOX12,VOX13,VOX14,VOX15, C - P VO
0x3bdec0…3be054 (2, 366) Dummy {f00=0x013f, f01=0x0190, f02=» FRMT - P FILLR '+',2 . P FBF TTCY1FLG,VOLAB02 . " P FCOPY ='ARKIV' . @ P FLINK JTSUB30 . X PVOLAB02 . n P FILLR ' ',4 . ~ P FCOPY GSWSTR9 . & P FMEL '*.***.***.**9.99+',TTCYKTOT . P FILLR ' ',2 . P FMEND . P* . PBAXF04 FRM
0x3be054…3be1e8 Dummy {f00=0x013f, f01=0x0190, f02=» P FMEND / P* / PBAXF05L FRMT / P FLINK BSUB04 / 0 P FEOR / F P FILLR '0',2 / T P FLINK BSUB05 / h P FMEND / ~ P* / PBAXF06 FRMT / P FLINK BAXF06L / P FMEND / P* / PBAXF06L FRMT / P FLINK BAFST03 / P FEOR
0x3be1e8…3be37c Dummy {f00=0x013f, f01=0x0190, f02=»SUMBILAG / P FLINK VOSUM07L 0 P FMEND 0 ( P* 0 6 PVOSUM07L FRMT 0 @ P FILLR '+',2 0 V P FMEL '999B',GTMSK MASKINNR 0 j ( P FMEL 'B99.99.99B',GTDATO EKSP.LB.NR 0 P FMEL '****9',GTSUMST 0 P FCOPY ='-' 0 P FLINK FLBNR 0 P FILLR
0x3be37c…3be510 Dummy {f00=0x013f, f01=0x0190, f02=» 0 P FLINK VOX08L 1 P FMEND 1 P* 1 , PVOX08L FRMT 1 6 P FILLR '+',2 1 J P FCOPY GTTESTMK 1 ^ P FMEL '999',GTMSK 1 v P FMEL 'BB99.99.99',GTDATO 1 P FMEL 'BBZ999',CKMDNR 1 P FMEL 'BB****9',TTSTLBNR 1 P FTEXT ' - ' 1 P FLI
0x3be510…3be6a4 Dummy {f00=0x013f, f01=0x0190, f02=» P FILLR '*',60 2 P FILLR '*',8 2 P FEOR 2 . P FILLR '4',2 2 < P FCOPY ='KONTONR' 2 P P FILLR ' ',6 2 j P FCOPY ='T[LLER' 2 ~ P FILLR ' ',9 2 P FTEXT 'NETTO' 2 P FILLR ' ',12 2 P FCOPY ='DEBET' 2 P FILLR ' ',12 2 P FCO
0x3be6a4…3be838 Dummy {f00=0x013f, f01=0x0190, f02=»2',2 2 ( P FMEL 'XXXVXXVXXXE-XX',GTDUPF(CBIN1) 3 P FILLR ' ',4 3 8 P FMEL '99',GTWBCD1 3 L 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) NETTO 3 f > P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',C12ACC(GSWBIN5,CBIN2) DEBET 3 > P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',C12ACC(G
0x3be838…3be9cc Dummy {f00=0x013f, f01=0x0190, f02=» FILLR '2',2 3 P FMEL 'ZZ',GTWBCD1 4 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) 4 . 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(GSWBIN5,CBIN2) 4 b 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(GSWBIN5,CBIN1) 4 P FMEND 4 P* 4 PVOX11 FRMT 4 P FLINK V
0x3be9cc…3beb60 Dummy {f00=0x013f, f01=0x0190, f02=»(CBIN4) 4 l 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTREGF(CBIN2) 5 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTREGF(CBIN1) 5 D P FEOR 5 x P FILLR '4',2 5 P FTEXT 'SUPL ' 5 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN5) 5 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(
0x3beb60…3becf4 (2, 367) Dummy {f00=0x0140, f01=0x0190, f02=» ' ',19 5 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(CBIN7,CBIN2) 6 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(CBIN7,CBIN1) 6 H P FMEND 6 P* 6 PVOX12 FRMT 6 P FLINK VOX12L 6 P FMEND 6 P* 6 PVOX12L FRMT 6 P FILLR '4',2 6 $ P FMEL '9
0x3becf4…3bee88 Dummy {f00=0x0140, f01=0x0190, f02=» 6 P FEOR 7 P FILLR '2',2 7 P FTEXT 'BEV ' 7 * 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) 7 @ 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN5) 7 t 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN6) 7 P FEOR 7 P FILLR '2',2 7 P FTEXT 'UL
0x3bee88…3bf01c Dummy {f00=0x0140, f01=0x0190, f02=» 7 P FMEND 8 P* 8 PVOX13L FRMT 8 P FILLR ' ',2 8 4 P FCOPY GTTESTMK 8 H P FMEL '999B',GTMSK 8 ` P FMEL 'B99.99.99',GTDATO 8 z P FILLR ' ',2 8 P FCOPY ='BEHOLDNINGST[LLERE' 8 P FILLR ' ',2 8 P FCOPY GSWSTR20 8 P FILLR ' '
0x3bf01c…3bf1b0 Dummy {f00=0x0140, f01=0x0190, f02=» 8 P FCOPY ='KONTONR' 9 P FILLR ' ',10 9 " P FCOPY ='BEV.PERIODE' 9 8 P FILLR ' ',12 9 V P FCOPY ='SALDO' 9 l P FILLR ' ',1 9 P FMEND 9 P* 9 PVOX14 FRMT 9 P FLINK VOX14L 9 P FMEND 9 P* 9 PVOX14L FRMT 9 P
0x3bf1b0…3bf344 Dummy {f00=0x0140, f01=0x0190, f02=»ZZ.ZZ9.99-',CBACC(GSWBIN3,CBIN2) 9 ~ 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',CBACC(GSWBIN3,CBIN3) : ( P FMEND : b P* : p PVOX15 FRMT : z P FILLR '2',2 : P FCOPY GSWSTR20 : P FMEND : P* : PVOX16 FRMT : P FILLR ' ',2 : P FLINK VOX16L :
0x3bf344…3bf4d8 Dummy {f00=0x0140, f01=0x0190, f02=»D',40 ] : P FILLR X'4E',40 N ; P FNL ; * P FNL ; 6 P FILLR X'45',40 E ; B P FILLR X'53',40 S ; P FNL ; v P FNL ; P FILLR X'5B',40 [ ; P FILLR X'5C',40 OE ; P FMEND ; P* ; PVOX17 FRMT ; P FLINK VOX17L ; P FMEND
0x3bf4d8…3bf66c Dummy {f00=0x0140, f01=0x0190, f02=»NR ; P FILLR ' ',8 < 2 P FMEL 'B*.***.***.**9E,99',GTDUPF(CBIN4) BELOB < P FILLR '*',2 < T P FILLR ' ',3 < h 4 P FMEL 'ZZ999999',GTDUPF(CBIN2) CHECKNR(DIV.TXT) < | P FILLR ' ',8 < P FMEND < P* < PVOX18 FRMT < P FLINK VOX18L < P
0x3bf66c…3bf800 Dummy {f00=0x0140, f01=0x0190, f02=»L 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GSWBCD7 < P FMEND = * P* = 8 P EJECT = B P* = P . P* FORMATS FOR EXTRA 'KVITTERING' = Z ( P* (MOSTLY AS NORMAL 'BILAG' = P* = : PFTBKV FTABLE BAFST01,BAFST02,KVIT03,KVIT03,BAFST02, C = 2 P BAFST0
0x3bf800…3bf994 (2, 368) Dummy {f00=0x0140, f01=0x0190, f02=»4 = P FLINK BSUB05 > P FMEND > P* > . P EJECT > 8 P* > N " P* FORMATS FOR KONTOKORT > X P* > ~ @ PFTBKT FTABLE KAFST01,KAFST02,KAFST03,KAFST04,KAFST00, C > 2 P KAFST01,KAFST00,KAFST01,KAFST01,KAFST02, C > P
0x3bf994…3bfb28 Dummy {f00=0x0140, f01=0x0190, f02=» TRANS 01-06 > v P FLINK BAFST01 ? & P FLINK SKAF01 LINE NR ? D P FMEND ? b P* ? x P* ? : PKAFST02 FRMT TRANS 02 ? P FLINK BAFST02 ? P FLINK SKAF01 LINE NR ? P
0x3bfb28…3bfcbc Dummy {f00=0x0140, f01=0x0190, f02=» SKAF01 LINE NR ? P FMEND @ P* @ . P* @ 8 : PKAFST03 FRMT TRANS 03 @ B P FLINK KAFST03L @ P FMEND @ P* @ PKAFST03L FRMT @ 8 P FLINK BSUB01 HEADER @ P FLINK
0x3bfcbc…3bfe50 Dummy {f00=0x0140, f01=0x0190, f02=»UPF(CBIN11) PALIGNINGS$R @ x $ P FCOPY TT16TXT RENTE/GEBYR/INDB A * ( P FLINK BSUB07 CPR/CIR/BELOB/LINIENR A R P FMEND A ~ P* A P* A : PKAFST04 FRMT TRANS 04 A P FLINK KAFST04L A P FMEND A
0x3bfe50…3bffe4 Dummy {f00=0x0140, f01=0x0190, f02=» BETART/DATO A h P FBF TTKORTFL,KLAB40 B 2 P FMEL 'XX.XXPP',GTDUPF(CBIN7) VAL DATE, DD.MM B 4 PKLAB40 B j P FBF TTASKAT,KLAB41 B x 0 P FMEL 'B**',GTDUPF(CBIN12) REST.MAANED - CIR B . P FMEL 'B**',GTDUPF(CBIN11) REST.AAR - CIR B P FB KLAB42 B
0x3bffe4…3c0178 Dummy {f00=0x0140, f01=0x018e, f02=» CPR/CIR-BELOB-LINIENR B t P FMEND C . P* C D PSKAF01 FRMT C N P FBF CKTFLAG,SKAF02 C b P FBT GTSLDFLG,SKAF04 C ~ P FILLR ' ',13 C P FB SKAF03 C PSKAF04 C , P FMEL '*.***.***.**9.99-',TTKTSLD SALDO C PSKAF03 C
0x3c0178…3c030c Dummy {f00=0x0140, f01=0x0190, f02=» C z PSKAF05 D P FMEND D P* D $ P EJECT D . P* D < . P* VARIOUS FORMATS FOR 'KONTOKORT' D F P* D x PFTBXKT FTABLE XKTTRP D P* D PXKTTRP FRMT D P FLINK XKTTRPL D P FMEND D P* D PXKTTRPL FRMT D P FILLR '+'
0x3c030c…3c04a0 Dummy {f00=0x0140, f01=0x0190, f02=»'TRP ' D P FMEND E P EJECT E P* E 2 $ P* FORMATS FOR TALLY ROLL E < P* E d PFTBTA FTABLE FMTFMT E n P* E P* E P EJECT E P* E . P* VARIOUS FORMATS FOR TALLY ROLL E P* E P* E @ PFTBXTA FTABL
0x3c04a0…3c0634 (2, 369) Dummy {f00=0x0140, f01=0x0190, f02=»NL E P FILLR '*',1 F P FILLR ' ',1 F P FMEND F 2 P* F @ PTAFMT02 FRMT F J P FLINK TAFMT02L F ^ P FMEND F v P* F PTAFMT02L FRMT F P FILLR '0',2 F P FCOPY GSWSTR9 F & P FMEL '*.***.***.**9.99+B',GSWBCD6 F P FLINK TAFMT07 F
0x3c0634…3c07c8 Dummy {f00=0x0140, f01=0x018e, f02=» P FMEND G P* G PTAFMT05 FRMT G P FILLR '+',2 G 0 & P FMEL 'Z.ZZZ.ZZZ.ZZ9.99-',GSWBCD6 G D P FILLR ' ',1 G n P FMEND G P* G PTAFMT07 FRMT G P FNL G P FNL G P FNL G P FNL G P FNL G P FNL G P FNL G P FMEND
0x3c07c8…3c095c Dummy {f00=0x0140, f01=0x40b2, f02=» G P EJECT H P* H 2 P* VARIOUS FORMATS FOR GENERAL PRINTER H P* H V PFTBXGP FTABLE FMTFMT H ` P* H | P* H P* H P END H @ H G P FNL G P FNL G P FNL G P FNL G P FNL G P FNL G P FMEND
0x3c095c…3c0af0 Dummy {f00=0x0140, f01=0x2008, f02=» I P* CAN NOT BE IDENTIFIED BY TRANSTYPE (OR GTREGDEX) ' P* ' L PFTBXX FTABLE ' V P* ' n P* ' x P END ' @ ' & z P* & PFTBTA FTABLE & P* & P* & P EJECT & P* & ( P* FORMATS
0x3c0af0…3c0c84 Dummy {f00=0x0140, f01=0x0000, f02=»
[…0x3…]
0x3c1140…3c12d4 (2, 370) Opaque[0x194]
0x3c12d4…3c1468 # DirEnt {nam=»DIV259«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2818, f03=0x0000}
0x3c12d4…3c1468 IdxSect {
0x3c12d4…3c1468 f00 = 0x0140 // 0x3c12d4 @0x0
0x3c12d4…3c1468 f01 = 0x0014 // 0x3c12d6 @0x2
0x3c12d4…3c1468 gno = [ // 0x3c12d8 @0x4
0x3c12d4…3c1468 [0x00]: C0x0140.0x3.0
0x3c12d4…3c1468 [0x01]: C0x0141.0x0.0
0x3c12d4…3c1468 [0x02]: C0x0141.0x1.0
0x3c12d4…3c1468 [0x03]: C0x0141.0x2.0
0x3c12d4…3c1468 [0x04]: C0x0141.0x3.0
0x3c12d4…3c1468 [0x05]: C0x0142.0x0.0
0x3c12d4…3c1468 [0x06]: C0x0142.0x1.0
0x3c12d4…3c1468 [0x07]: C0x0142.0x2.0
0x3c12d4…3c1468 [0x08]: C0x0142.0x3.0
0x3c12d4…3c1468 [0x09]: C0x0143.0x0.0
0x3c12d4…3c1468 ]
0x3c12d4…3c1468 }
0x3c1468…3c15fc Dummy {f00=0x0140, f01=0x0190, f02=» P IDENT DIV259 03.01.XXX.1 P DDUM KMD08 & P PDIV D P ENTRY FRMTJT Z P ENTRY FRMXJT p P ENTRY FRMTTA P ENTRY FRMXTA P ENTRY FRMTVO P ENTRY FRMTKV P ENTRY FRMXVO P ENTRY FRMTKT
0x3c15fc…3c1790 Dummy {f00=0x0140, f01=0x0190, f02=» PROC 0 P CALL FMOVE,GTSTRFMT,FTBJT(GTREGDEX) P RET B P PEND V P* l PFRMXJT PROC XJTDEX v ( P CALL FMOVE,GTSTRFMT,FTBXJT(XJTDEX) P RET P PEND P* PFRMTTA PROC 0 P CALL FMOV
0x3c1790…3c1924 Dummy {f00=0x0140, f01=0x0190, f02=»XTA(XTADEX) x P RET P PEND P* . PFRMTVO PROC 8 0 P CALL FMOVE,GTSTRFMT,FTBVO(GTREGDEX) L P RET P PEND P* PFRMXVO PROC XVODEX ( P CALL FMOVE,GTSTRFMT,FTBXVO(XVODEX) P RET P P
0x3c1924…3c1ab8 Dummy {f00=0x0140, f01=0x018e, f02=» 0 P CALL FMOVE,GTSTRFMT,FTBKT(GTREGDEX) P RET < P PEND P P* f PFRMXKT PROC XKTDEX p ( P CALL FMOVE,GTSTRFMT,FTBXKT(XKTDEX) P RET P PEND P* PFRMTGP PROC ( P CALL FMOVE,GTSTRFMT,FTB
0x3c1ab8…3c1c4c Dummy {f00=0x0140, f01=0x0190, f02=» j P RET P PEND P* " P* , P* 6 P EJECT @ P* V P* FORMATS FOR JOURNAL ` P* @ PFTBJT FTABLE JTFMT01,JTFMT02,JTFMT03,JTFMT04,JTFMT02, C 2 P JTFMT01,JTFMT02,JTFMT08,JTFMT08,JTFMT02, C P
0x3c1c4c…3c1de0 Dummy {f00=0x0140, f01=0x0190, f02=» LINE 1 z P FEOR 2 P FLINK JTSUB04 LINE 2 6 P FMEND l P* PJTFMT02 FRMT P FLINK JTFMT02L P FMEND P* PJTFMT02L FRMT 2 P FLINK JTSUBST
0x3c1de0…3c1f74 (2, 371) Dummy {f00=0x0141, f01=0x0190, f02=» FEOR P FILLR ' ',8 F P FMEL 'X',GTDUPF(CBIN6) RE$ 2 P FILLR ' ',2 | P FLINK JTSUB06 FOR TRANS 10 P FLINK JTSUB30 ARKIV KNT.NR P FILLR ' ',15 P FMEND
0x3c1f74…3c2108 Dummy {f00=0x0141, f01=0x0190, f02=» START INF p P FILLR ' ',9 $ P FCOPY TT16TXT RATE/RENTE/GEBYR 4 2 P FLINK JTSUB06 CPR/CIR 0 P FLINK JTSUB08 VALUE P FEOR P FILLR ' ',2 P FILLR '
0x3c2108…3c229c Dummy {f00=0x0141, f01=0x0190, f02=»ZZ',GTDUPF(CBIN7) VALGR z F P FMEL 'BBZ',GTDUPF(CBIN8) BETALINGSFORM BFO 6 8 P FLINK JTSUB30 ARK KONTO NR P FILLR ' ',2 8 P FMEL 'XX',GTDUPF(CBIN11) PALIGNIN
0x3c229c…3c2430 Dummy {f00=0x0141, f01=0x0190, f02=»ND P* PJTFMT04 FRMT P FLINK JTFMT04L ( P FMEND @ P* N PJTFMT04L FRMT X P FLINK JTSUBST START INF n P FILLR ' ',15 2 P FLINK JTSUB06 CPR/CIR 0 P FLINK JTSUB08
0x3c2430…3c25c4 Dummy {f00=0x0141, f01=0x0190, f02=» D P FMEL 'ZZ.ZZ.ZZ',GTDUPF(CBIN7) VALOR P FILLR ' ',3 L 6 P FLINK JTSUB30 ARK KNT NR h B P FMEL 'BBBZZ',GTDUPF(CBIN10) F$R F P FMEL 'BBZZ',GTDUPF(CBI
0x3c25c4…3c2758 Dummy {f00=0x0141, f01=0x0190, f02=»GTDUPF(CBIN13) OPK z P FMEND 0 P* F PJTFMT08 FRMT P P FLINK JTFMT08L d P FMEND | P* PJTFMT08L FRMT 4 P FLINK JTSUBST START INF 2 P FLINK JTSUB01
0x3c2758…3c28ec Dummy {f00=0x0141, f01=0x0190, f02=» LINE 3 z P FMEND P* 6 PJTFMT12 FRMT @ P FLINK JTFMT12L T P FMEND l P* z PJTFMT12L FRMT 4 P FLINK JTSUBST START INF 8 P FLINK JTSUB05 REG KONTO NR
0x3c28ec…3c2a80 Dummy {f00=0x0141, f01=0x0190, f02=» FLINK JTSUB08 VALUE P FEOR 2 P FILLR ' ',2 @ 2 P FMEL 'BZZZZZZZZZZ',GTDUPF(CBIN2) DIVERSE TEXT T P FILLR ' ',16 P FMEND P* 4 PJTSUBST FRMT START INF P FILLR ' ',2
0x3c2a80…3c2c14 (2, 372) Dummy {f00=0x0141, f01=0x0190, f02=» TYPE b P FLINK FLBNR P FMEND " P* 8 : PJTSUB01 FRMT LINE 1,- 1,5,6 B P FLINK JTSUB05 CPR/CIR P FLINK JTSUB06 REG-KONTO-NR 0 P FLINK JTSUB08 VALUE P FMEND
0x3c2c14…3c2da8 Dummy {f00=0x0141, f01=0x0190, f02=»ZZ.ZZ.ZZ',GTDUPF(CBIN7) V.DATO B P FMEL 'BBX',GTDUPF(CBIN6) RE$ & D P FMEL 'BBX',GTDUPF(CBIN8) BFO l P FLINK JTSUB30 0 P FMEL 'XXXXXXE-XXXX',GTDUPF(CBIN10) YD.MODT ( P F
0x3c2da8…3c2f3c Dummy {f00=0x0141, f01=0x0190, f02=» FMEL 'BB99.99.99.99.99BBB',GTDUPF(CBIN1) P FMEND 6 P* L 2 PJTSUB06 FRMT CPR/CIR V P FBT BCPR,JTLAB06 ( P FMEL 'XE-XXE-XXE-XXB',GTDUPF(CBIN2) P FB JTLAB08 PJTLAB06 P FBT BLE
0x3c2f3c…3c30d0 Dummy {f00=0x0141, f01=0x018e, f02=» PJTLAB08 P FMEND P* * P* 4 8 PJTSUB08 FRMT VALUE AND D/K > 6 P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) z P FCOPY TTDBKRM P FMEND P* PJTSUB10 FRMT LEVERAND
0x3c30d0…3c3264 Dummy {f00=0x0141, f01=0x0190, f02=» 6 P FMEL 'BBZZZE-ZZZE-ZZE-ZZ',GTDUPF(CBIN9) P FMEND > P* L 6 PJTSUB31 FRMT LINE 3 - 8 V P FILLR ' ',2 F P FMEL 'ZZ.ZZ.ZZ',GTDUPF(CBIN12) FAKT DATO D P FMEL 'BZ
0x3c3264…3c33f8 Dummy {f00=0x0141, f01=0x0190, f02=»MEL 'BZZZZ',GTDUPF(CBIN15) TXT NR D P FMEL 'BZZ',GTDUPF(CBIN16) OMR NR > D P FMEL 'BZZ.ZZ.ZZ',GTDUPF(CBIN18) PER FRA D P FMEL 'BZZ.ZZ.ZZ',GTDUPF(CBIN19) P
0x3c33f8…3c358c Dummy {f00=0x0141, f01=0x0190, f02=» 0 P* VARIOUS FORMATS FOR JOURNAL TAPE P* < @ PFTBXJT FTABLE XJTF01,XJTF02,XJTF03,XJTF04,XJTF05,XJTF06, C F 2 P XJTF07,FMTFMT,XJTF09,XJTF10,XJTF11,VOX15, C P XJTF13,XJTF14,VOFMT02 P* PXJTF01 FRMT KVITTERING
0x3c358c…3c3720 Dummy {f00=0x0141, f01=0x018e, f02=» P FLINK XJTF02L P FMEND P* ( PXJTF02L FRMT 2 P FLINK FLBNR F P FILLR ' ',2 Z P FCOPY ='KONTOKORT' n P FBF GTSLDFLG,XJTF02EX & P FMEL 'B*.***.***.**9.99-',TTKTSLD PXJTF02EX P FMEND P* PXJTF03 FRMT
0x3c3720…3c38b4 (2, 373) Dummy {f00=0x0141, f01=0x0190, f02=» P FMEND PXJTF05 FRMT P FLINK XJTF05L * P FMEND @ P* N P* X PXJTF05L FRMT b P FILLR ' ',2 v P FILLR '*',50 P FEOR P FILLR ' ',2 P FTEXT 'VERSNR ' P FCOPY ='DAGS-DATO' P FILLR ' ',2
0x3c38b4…3c3a48 Dummy {f00=0x0141, f01=0x0190, f02=» P FCOPY GTTESTMK P FMEL '99.99.999.9',CVERSNR P FILLR ' ',2 D P FMEL '99E-99E-99',CMASKDAT X P FILLR ' ',3 | P FMEL '99E-99E-99',GTDATO P FILLR ' ',3 P FMEL '999',GTMSK P FILLR ' ',7 P FMEL '***99',TTSTLB
0x3c3a48…3c3bdc Dummy {f00=0x0141, f01=0x0190, f02=» P FILLR ' ',2 & P FMEL '99.99.99.99.99BBBB',TVERSUR ( P FMEL '99.99.99.99.99BBBB',TTCASHAC B $ P FMEL 'ZZZ.ZZZ.ZZ9.ZZ-',TTSTCASH n P FEOR P FILLR ' ',2 P FILLR '*',40 P FMEND P* PXJTF06 FRMT P FLINK XJTF06L
0x3c3bdc…3c3d70 Dummy {f00=0x0141, f01=0x0190, f02=»'KASSELUKNING' P FILLR ' ',30 P FEOR , P FILLR ' ',2 : P FCOPY ='T[LLER' N P FILLR ' ',10 f P FCOPY ='DEBET' | P FILLR ' ',12 P FCOPY ='KREDIT' P FMEND P* PXJTF07 FRMT P FLINK XJTF07L P FME
0x3c3d70…3c3f04 Dummy {f00=0x0141, f01=0x0190, f02=» ^ 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(GSWBIN5,CBIN1) P FMEND B P* P PXJTF09 FRMT Z P FCOPY =' START TEST' n P FMEND P* PXJTF10 FRMT P FCOPY =' SLUT TEST' P FMEND P* PXJTF11 FRMT P FILLR
0x3c3f04…3c4098 Dummy {f00=0x0141, f01=0x018e, f02=»MEND P* PXJTF13L FRMT P FLINK JTSUB05 REG KNT NO * * P FMEL 'BZZZ',GTDUPF(CBIN2) COUNTER NO L 2 P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) VALUE z P FILLR ' ',2 P FCOPY ='ADM ' $ P FMEL 'BZZ',GTDUPF(CBIN5) ADM NO P FME
0x3c4098…3c422c Dummy {f00=0x0141, f01=0x0190, f02=» P* PFMTFMT FRMT P FLINK FMTFMTL & P FMEND < P* J PFMTFMTL FRMT T P FILLR ' ',2 h P FTEXT 'DIVERSE FORMATER' | P FMEND P EJECT P* : P* FORMATS FOR VOUCHER 'BILAG AFSTEMPLING'
0x3c422c…3c43c0 Dummy {f00=0x0141, f01=0x0190, f02=» C X 2 P BAFST12,BAFST40,BAFST41,BAFST42,BAFST45, C 2 P BAFST46,BAFST47,BAFST48,BAFST49,BAFST50, C B & P BAFST51,BAFST52,BAFST53,BAFST54 x P* P* PBAFST01 FRMT TRANS 01-06 P FLINK BAFST01L P FMEND P* P
0x3c43c0…3c4554 (2, 374) Dummy {f00=0x0141, f01=0x0190, f02=»'B**B',GTDUPF(CBIN3) BKO @ P FMEL 'ZZ.ZZ.ZZB',GTDUPF(CBIN7) BET/VALORDATO P FB B1LAB2 d PB1LAB1 v " P FMEL 'B**B',GTDUPF(CBIN3) BKO PB1LAB2 < P FLINK JTSUB06 CPR-CIR-NR @ P FLINK B
0x3c4554…3c46e8 Dummy {f00=0x0141, f01=0x0190, f02=» TRANS 02-05-07-10 f P FLINK BAFST02L P FMEND 4 P* B PBAFST02L FRMT L 8 P FLINK BSUB01 HEADER b P FILLR ' ',1 8 P FMEL '******E-****',GTDUPF(CBIN2) CPR/CIR TRANS 10 P FILLR '*',3 P FBT T
0x3c46e8…3c487c Dummy {f00=0x0141, f01=0x0190, f02=»MEND P* P* < PBAFST08 FRMT TRANS 08-09 P FLINK BAFST08L ` P FMEND x P* PBAFST08L FRMT 8 P FLINK BSUB01 HEADER $ P FMEL 'BBB**B',GTDUPF(CBIN3) BKO
0x3c487c…3c4a10 Dummy {f00=0x0141, f01=0x018e, f02=»),B8LAB2 ~ 2 P FMEL 'BBZZ.ZZ.ZZBBB',GTDUPF(CBIN12) FAKTDATO ! P FB B8LAB5 ! F PB8LAB2 ! X . P FMEL 'ZZZZ9999.99B',GTDUPF(CBIN14) LEVNR ! f PB8LAB5 ! P FLINK JTSUB10 LEVERAND. ! > P FLINK BSUB02 REGKONTO-BELOB ! P
0x3c4a10…3c4ba4 Dummy {f00=0x0141, f01=0x0190, f02=» ! P FILLR '+',2 " P FCOPY GTTESTMK " $ > P FCOPY TTCYM CYKLE-MARKERING " < > P FMEL '999B',GTMSK MASKINNR " ~ P FLINK FLBNR " @ P FMEL 'B99.99.99',GTDATO POSTERI
0x3c4ba4…3c4d38 Dummy {f00=0x0141, f01=0x0190, f02=»PE-NR " ^ < P FMEL 'B999',TTCNTNR TAELLER-NR # 2 P FMEL 'BZZZZZZZZZZ',GTDUPF(CBIN2) DIVERSE TEXT # N P FBT TTKORTFL,B12LAB1 # P FILLR '*',13 # PB12LAB1 # @ P FLINK BSUB02 REGKONTO-BELOB #
0x3c4d38…3c4ecc Dummy {f00=0x0141, f01=0x018e, f02=»B13 # P FMEND $ P* $ PBAFST04 FRMT BILAG TRANS 4 $ $ P FLINK BSUB10 $ H P FLINK BSUB12 $ ^ P FLINK BSUB13 $ t P FMEND $ P* $ P* $ PBAFST40 FRMT $ P FMEND $ P* $ PBAFST41 FRMT $ P FMEND $ PBAFST42 FRMT $
0x3c4ecc…3c5060 Dummy {f00=0x0141, f01=0x0190, f02=» P FMEND % P* % PBAFST48 FRMT % P FMEND % 0 P* % > PBAFST49 FRMT % H P FMEND % P* % j PBAFST50 FRMT % t P FMEND % P* % PBAFST51 FRMT % P FMEND % P* % PBAFST52 FRMT % P FMEND % P* % PBAFST53 FRMT %
0x3c5060…3c51f4 (2, 375) Dummy {f00=0x0142, f01=0x0190, f02=» HEADER % d P FILLR '+',2 & P FCOPY GTTESTMK & , > P FCOPY TTCYM CYKLE-MARKERING & D > P FMEL '999B',GTMSK MASKINNR & P FLINK FLBNR & @ P FMEL 'B99.99.99',GTDATO
0x3c51f4…3c5388 Dummy {f00=0x0142, f01=0x0190, f02=» TRANSTYPE-NR & f P FMEND ' P* ' , P ' 6 PBSUB02 FRMT ' > B P FMEL 'B99.99.99.99.99B',GTDUPF(CBIN1) REGKONTONR ' T < P FMEL '*.***.***.**9.99-',GTDUPF(CBIN4) BELOB ' B P FCOPY TTDBKRM D
0x3c5388…3c551c Dummy {f00=0x0142, f01=0x0190, f02=» P FCOPY TTCYM ( @ P FMEL '99.99.99B',GTDATO POSTERINGSDATO ( P FCOPY CKMDNAM ( : P FMEL 'B999B',GTMSK MASKINNR ( r " P FMEL '99B',GTDUPF(CBIN3) BKO ( P FMEND ( P* ( P* ( PBSUB05
0x3c551c…3c56b0 Dummy {f00=0x0142, f01=0x0190, f02=» DEBET/KREDIT-MARK ( l P FILLR ' ',1 ) " P FMEND ) 6 P* ) L P* ) V PBSUB06 FRMT ) ` " P FMEL 'B99B',GTDUPF(CBIN3) BKO ) v P FBT TTKORTFL,B6LAB1 ) P FCOPY TT07TXT ) P FILLR ' ',1 ) . P FMEL 'ZZ.ZZ.ZZB',GTDUPF(CBIN7) VAL. D
0x3c56b0…3c5844 Dummy {f00=0x0142, f01=0x0190, f02=» CPR/CIR-NR ) v < P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) BELOB * & D P FCOPY TTDBKRM DEBET/KREDIT-MARK * f P FILLR ' ',1 * P FLINK SKAF01 LINE NR * P FMEND * P* * PBSUB10 F
0x3c5844…3c59d8 Dummy {f00=0x0142, f01=0x018e, f02=»99',GTDATO POSTDATO * " P FMEL 'BXX.',GTDUPF(CBIN3) BKO + P FMEND + B P* + P PBSUB11 FRMT + Z $ P FMEL 'XX',GTDUPF(CBIN11) P]L]R + n 2 P FMEL 'E-9999999999B',GTDUPF(CBIN2) DEBITOR NR + , P FMEL 'XX.XXPP',GTDUPF(CBIN7) VALOERDATO + & P FMEL 'BXB',
0x3c59d8…3c5b6c Dummy {f00=0x0142, f01=0x0190, f02=» + n P FB B12LAB6 , PB12LAB5 , ( P FMEL 'XX',GTDUPF(CBIN10) FORFALDS]R , , PB12LAB6 , X 2 P FMEL 'E-9999999999B',GTDUPF(CBIN2) DEBITORNR , h , P FMEL 'XX.XXPP',GTDUPF(CBIN7) VALOERDATO , P FILLR ' ',3 , P FMEND , P* , PBSUB13 FRMT ,
0x3c5b6c…3c5d00 Dummy {f00=0x0142, f01=0x0190, f02=» EKSP LB. NR. , P FBT GTLOKSPG,FLBNR10 - P FMEL '****9',TTLBNR - 4 P FB FLBNR20 - P PFLBNR10 - d P FMEL '****9',GTLBNR - t PFLBNR20 - P FMEND - P* - P EJECT - P* - * P* VARIOUS FORMATS FOR VOUCHER - P* - : P
0x3c5d00…3c5e94 (2, 376) Dummy {f00=0x0142, f01=0x0190, f02=»X15, C - t P VOX16,VOX17,VOX18 . P* . , P* . 6 PVOFMT02 FRMT TOTAL IN CYCLE . @ P FLINK VOFMT02L . d P FMEND . | P* . PVOFMT02L FRMT . P FILLR '+',2 . P FBF TTCY1FLG,VOLAB02 . P FCOPY ='ARKIV' . P FLINK JTSUB30 .
0x3c5e94…3c6028 Dummy {f00=0x0142, f01=0x0190, f02=»* . PBAXF04 FRMT / P FLINK BAFST03 / P FLINK BAXF05L / 4 P FMEND / J P* / X PBAXF05 FRMT / b P FILLR '+',2 / v P FLINK BAXF05L / P FMEND / P* / PBAXF05L FRMT / P FLINK BSUB04 / P FEOR / P FILLR '0',2 / P FLI
0x3c6028…3c61bc Dummy {f00=0x0142, f01=0x0190, f02=»AFST03 / P FEOR 0 P FILLR '0',2 0 P FEOR 0 0 P FILLR '0',2 0 > P FEOR 0 R P FLINK KVIT03 0 ` P FMEND 0 v P* 0 PVOSUM07 FRMT SUMBILAG 0 P FLINK VOSUM07L 0 P FMEND 0 P* 0 PVOSUM07L FRMT 0 P FILLR '+',2 0 P F
0x3c61bc…3c6350 Dummy {f00=0x0142, f01=0x0190, f02=»LBNR 0 P FILLR ' ',1 1 P FCOPY ='TOTAL ' 1 " & P FMEL '*.***.***.**9,99+',GTSUMCNT 1 < P FILLR ' ',2 1 f P FMEND 1 z P* 1 PVOX08 FRMT 1 P FLINK VOX08L 1 P FMEND 1 P* 1 PVOX08L FRMT 1 P FILLR '+',2 1 P FCOPY GTTESTM
0x3c6350…3c64e4 Dummy {f00=0x0142, f01=0x0190, f02=»XT ' - ' 1 P FLINK FLBNR 2 P FILLR ' ',2 2 $ P FCOPY GSWSTR9 2 8 P FILLR ' ',2 2 N P FCOPY GSWSTR20 TEXT 2 b P FEOR 2 ~ P FILLR '2',2 2 P FILLR '*',60 2 P FILLR '*',8 2 P FEOR 2 P FILLR '4',2 2 P FCOPY ='KONTONR' 2 P F
0x3c64e4…3c6678 Dummy {f00=0x0142, f01=0x0190, f02=» ' ',12 2 P FCOPY ='KREDIT' 3 P FMEND 3 ( P* 3 6 PVOX09 FRMT 3 @ P FLINK VOX09L 3 R P FMEND 3 h P* 3 v PVOX09L FRMT 3 P FILLR '2',2 3 * P FMEL 'XX.XX.XX.XX.XXBB',GTDUPF(CBIN1) 3 P FILLR ' ',4 3 P FMEL '99',GTWBCD1 3 6 P FME
0x3c6678…3c680c Dummy {f00=0x0142, f01=0x0190, f02=».ZZZ.ZZ9.99-',C12ACC(GSWBIN5,CBIN1) KREDIT 3 P FMEND 4 2 P* 4 @ PVOX10 FRMT 4 J P FLINK VOX10L 4 P FMEND 4 r P* 4 PVOX10L FRMT 4 P FILLR '2',2 4 P FMEL 'ZZ',GTWBCD1 4 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) 4 6 P FMEL 'B
0x3c680c…3c69a0 Dummy {f00=0x0142, f01=0x0190, f02=»1 FRMT 4 P FLINK VOX11L 5 P FMEND 5 $ P* 5 2 PVOX11L FRMT 5 < P FILLR '4',2 5 P P FTEXT 'TOTAL' 5 d 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) 5 z 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTREGF(CBIN2) 5 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTREGF(C
0x3c69a0…3c6b34 (2, 377) Dummy {f00=0x0142, f01=0x0190, f02=»ZZ.ZZZ.ZZ9.99-',TTACC(CBIN8,CBIN2) 5 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(CBIN8,CBIN1) 6 * P FEOR 6 b P FILLR '2',2 6 p P FTEXT 'KOR' 6 P FILLR ' ',19 6 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(CBIN7,CBIN2) 6 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTAC
0x3c6b34…3c6cc8 Dummy {f00=0x0142, f01=0x0190, f02=» '4',2 6 & P FMEL '99.99.99.99.99BB',TTCASHAC 7 P FILLR ' ',1 7 8 P FTEXT ' PRIMO' 7 L * P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTSTCASH 7 d P FILLR ' ',34 7 P FEOR 7 P FILLR '2',2 7 P FTEXT 'BEV ' 7 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBI
0x3c6cc8…3c6e5c Dummy {f00=0x0142, f01=0x0190, f02=» '2',2 7 P FTEXT 'ULTIMO' 8 ( P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTCASH 8 & P FILLR ' ',34 8 R P FMEND 8 h P* 8 v PVOX13 FRMT 8 P FLINK VOX13L 8 P FMEND 8 P* 8 PVOX13L FRMT 8 P FILLR ' ',2 8 P FCOPY GTTESTMK 8 P FMEL '9
0x3c6e5c…3c6ff0 Dummy {f00=0x0142, f01=0x0190, f02=»STR20 8 P FILLR ' ',3 9 P FEOR 9 " P FILLR '2',2 9 0 P FILLR '*',56 9 D P FEOR 9 Z P FILLR '4',2 9 h P FCOPY ='T[LLER' 9 | P FILLR ' ',4 9 P FCOPY ='KONTONR' 9 P FILLR ' ',10 9 P FCOPY ='BEV.PERIODE' 9 P FILLR ' ',12 9
0x3c6ff0…3c7184 Dummy {f00=0x0142, f01=0x0190, f02=» PVOX14L FRMT : P FILLR '2',2 : P FMEL 'ZZ',GTWBCD1 : , P FILLR ' ',4 : F 2 P FMEL 'XX.XX.XX.XX.XXBB',CBACC(GSWBIN3,CBIN1) : Z 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',CBACC(GSWBIN3,CBIN2) : 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',CBACC(GSWBIN3,CBIN3) : P FME
0x3c7184…3c7318 Dummy {f00=0x0142, f01=0x0190, f02=» : P FLINK VOX16L ; P FMEND ; P* ; , PVOX16L FRMT ; 6 P FILLR X'24',40 NO. ; J P FILLR X'3C',40 5. ; f P FNL ; P FNL ; P FILLR X'5D',40 ] ; P FILLR X'4E',40 N ; P FNL ; P FNL ; P FILLR X'45',40 E ; P FILLR X'5
0x3c7318…3c74ac Dummy {f00=0x0142, f01=0x0190, f02=»LINK VOX17L ; P FMEND < P* < " PVOX17L FRMT < , P FILLR '+',2 < @ , P FMEL '99E-99E-99',GTDATO POSTERINGSDATO < T P FILLR ' ',6 < P FLINK FLBNR < P FILLR ' ',8 < 2 P FMEL 'B*.***.***.**9E,99',GTDUPF(CBIN4) BELOB < P FILLR '*',2 <
0x3c74ac…3c7640 Dummy {f00=0x0142, f01=0x0190, f02=» P FLINK VOX18L = P FMEND = P* = ( PVOX18L FRMT = 2 P FILLR '2',2 = F P FILLR ' ',17 = Z * P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GSWBCD6 = p * P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GSWBCD7 = P FMEND = P* = P EJECT = P* = . P* F
0x3c7640…3c77d4 (2, 378) Dummy {f00=0x0142, f01=0x0190, f02=»AFST02, C = d 2 P BAFST01,BAFST02,BAFST08,BAFST08,BAFST02, C > P BAFST12 > H P* > Z P* > d PKVIT03 FRMT > n P FILLR '+',2 > P FLINK BSUB04 > P FLINK BSUB05 > P FMEND > P* > P EJECT > P* > " P* FORMA
0x3c77d4…3c7968 Dummy {f00=0x0142, f01=0x0190, f02=»KAFST02, C > n P KAFST12 ? P* ? 4 P* ? > PKAFST00 FRMT ? H P FMEND ? ^ P* ? t P* ? ~ < PKAFST01 FRMT TRANS 01-06 ? P FLINK BAFST01 ? P FLINK SKAF01 LINE NR ? P
0x3c7968…3c7afc Dummy {f00=0x0142, f01=0x0190, f02=» SKAF01 LINE NR ? P FMEND @ P* @ . P @ 8 : PKAFST12 FRMT TRANS 12 @ @ P FLINK BAFST12 @ ~ P FLINK SKAF01 LINE NR @ P FMEND @ P* @ P* @ : PKAFST03 FRMT
0x3c7afc…3c7c90 Dummy {f00=0x0142, f01=0x0190, f02=» HEADER @ h P FLINK BSUB06 A P FBF TTKORTFL,KLAB31 A * 2 P FMEL 'XX.XXPP',GTDUPF(CBIN7) VAL.DATE, DD.MM A F PKLAB31 A | > P FMEL 'BXX',GTDUPF(CBIN11) PALIGNINGS$R A $ P FCOPY TT16TXT RENTE/GEBYR/INDB A ( P FLINK BSUB07 CPR/CI
0x3c7c90…3c7e24 Dummy {f00=0x0142, f01=0x0190, f02=»AFST04L A P FMEND B P* B PKAFST04L FRMT B ( 8 P FLINK BSUB01 HEADER B > < P FLINK BSUB06 BETART/DATO B z P FBF TTKORTFL,KLAB40 B 2 P FMEL 'XX.XXPP',GTDUPF(CBIN7) VAL DATE, DD.MM B
0x3c7e24…3c7fb8 Dummy {f00=0x0142, f01=0x0190, f02=»CIR B j P FB KLAB42 C PKLAB41 C P FILLR ' ',3 C , 4 P FMEL 'B**',GTDUPF(CBIN10) FORF.AAR - CPR, BSKAT C @ PKLAB42 C x F P FLINK BSUB07 CPR/CIR-BELOB-LINIENR C P FMEND C P* C PSKAF01 FRMT C P FBF
0x3c7fb8…3c814c Dummy {f00=0x0142, f01=0x0190, f02=»SLD SALDO C r PSKAF03 D " P FMEL 'B99.',TTKTLIN NEW LINE D " P FMEL '9',TTKTCHK CHECK DIGIT D F P FB SKAF05 D l PSKAF02 D ~ P FMEL '99B',TTKTLIN D PSKAF05 D P FMEND D P* D P EJECT D P* D . P* VARIOUS FORMATS FOR 'KO
0x3c814c…3c82e0 Dummy {f00=0x0142, f01=0x018e, f02=»L FRMT D P FILLR '+',2 E P FMEL 'BB99.99.99',GTDATO E " P FILLR ' ',43 E D & P FMEL '*.***.***.**9.99-',TTKTSLD E Z P FILLR ' ',2 E P FCOPY ='TRP ' E P FMEND E P EJECT E P* E $ P* FORMATS FOR TALLY ROLL E P* E
0x3c82e0…3c8474 (2, 379) Dummy {f00=0x0143, f01=0x0190, f02=» P* F @ PFTBXTA FTABLE TAFMT01,TAFMT02,TAFMT02,TAFMT04,TAFMT05, C F P VOX15,TAFMT07 F R P* F j PTAFMT01 FRMT F t P FSL F P FNL F P FNL F P FILLR '*',1 F P FILLR ' ',1 F P FMEND F P* F PTAFMT02 FRMT F P FLINK T
0x3c8474…3c8608 Dummy {f00=0x0143, f01=0x0190, f02=»D6 F p P FLINK TAFMT07 G P FMEND G P* G . PTAFMT04 FRMT G 8 P FILLR '+',2 G L , P FMEL 'Z.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) G ` P FCOPY TTDBKRM G P FMEND G P* G PTAFMT05 FRMT G P FILLR '+',2 G & P FMEL 'Z.ZZZ.ZZZ.ZZ9.99-',GSWBCD6
0x3c8608…3c879c Dummy {f00=0x0143, f01=0x4152, f02=» G P FNL H P FMEND H P EJECT H " P* H 8 ( P* FORMATS FOR GENERAL PRINTER H B P* H n PFTBGP FTABLE FMTFMT H x P* H P* H P EJECT H P* H 2 P* VARIOUS FORMATS FOR GENERAL PRINTER H P* H PFTBXGP F
0x3c879c…3c8930 Dummy {f00=0x0143, f01=0x2008, f02=» I P* CAN NOT BE IDENTIFIED BY TRANSTYPE (OR GTREGDEX) ' P* ' L PFTBXX FTABLE ' V P* ' n P* ' x P END ' @ ' & z P* & PFTBTA FTABLE & P* & P* & P EJECT & P* & ( P* FORMATS
0x3c8930…3c8ac4 Dummy {f00=0x0143, f01=0x0000, f02=»
[…0x3…]
0x3c8f80…3c9114 (2, 380) Opaque[0x194]
0x3c9114…3c92a8 # DirEnt {nam=»DIV805«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2868, f03=0x0000}
0x3c9114…3c92a8 IdxSect {
0x3c9114…3c92a8 f00 = 0x0143 // 0x3c9114 @0x0
0x3c9114…3c92a8 f01 = 0x0014 // 0x3c9116 @0x2
0x3c9114…3c92a8 gno = [ // 0x3c9118 @0x4
0x3c9114…3c92a8 [0x00]: C0x0143.0x1.0
0x3c9114…3c92a8 [0x01]: C0x0143.0x2.0
0x3c9114…3c92a8 [0x02]: C0x0143.0x3.0
0x3c9114…3c92a8 [0x03]: C0x0144.0x0.0
0x3c9114…3c92a8 [0x04]: C0x0144.0x1.0
0x3c9114…3c92a8 [0x05]: C0x0144.0x2.0
0x3c9114…3c92a8 [0x06]: C0x0144.0x3.0
0x3c9114…3c92a8 [0x07]: C0x0145.0x0.0
0x3c9114…3c92a8 [0x08]: C0x0145.0x1.0
0x3c9114…3c92a8 [0x09]: C0x0145.0x2.0
0x3c9114…3c92a8 ]
0x3c9114…3c92a8 }
0x3c92a8…3c943c Dummy {f00=0x0143, f01=0x0190, f02=» P IDENT DIV805 03.01.XXX.1 P DDUM KMD08 & P PDIV D P ENTRY FRMTJT Z P ENTRY FRMXJT p P ENTRY FRMTTA P ENTRY FRMXTA P ENTRY FRMTVO P ENTRY FRMTKV P ENTRY FRMXVO P ENTRY FRMTKT
0x3c943c…3c95d0 Dummy {f00=0x0143, f01=0x0190, f02=» PROC 0 P CALL FMOVE,GTSTRFMT,FTBJT(GTREGDEX) P RET B P PEND V P* l PFRMXJT PROC XJTDEX v ( P CALL FMOVE,GTSTRFMT,FTBXJT(XJTDEX) P RET P PEND P* PFRMTTA PROC 0 P CALL FMOV
0x3c95d0…3c9764 Dummy {f00=0x0143, f01=0x0190, f02=»XTA(XTADEX) x P RET P PEND P* . PFRMTVO PROC 8 0 P CALL FMOVE,GTSTRFMT,FTBVO(GTREGDEX) L P RET P PEND P* PFRMXVO PROC XVODEX ( P CALL FMOVE,GTSTRFMT,FTBXVO(XVODEX) P RET P P
0x3c9764…3c98f8 Dummy {f00=0x0143, f01=0x018e, f02=» 0 P CALL FMOVE,GTSTRFMT,FTBKT(GTREGDEX) P RET < P PEND P P* f PFRMXKT PROC XKTDEX p ( P CALL FMOVE,GTSTRFMT,FTBXKT(XKTDEX) P RET P PEND P* PFRMTGP PROC ( P CALL FMOVE,GTSTRFMT,FTB
0x3c98f8…3c9a8c Dummy {f00=0x0143, f01=0x0190, f02=» j P RET P PEND P* " P* , P* 6 P EJECT @ P* V P* FORMATS FOR JOURNAL ` P* @ PFTBJT FTABLE JTFMT01,JTFMT02,JTFMT03,JTFMT04,JTFMT02, C 2 P JTFMT01,JTFMT02,JTFMT08,JTFMT08,JTFMT02, C P
0x3c9a8c…3c9c20 Dummy {f00=0x0143, f01=0x0190, f02=» LINE 1 z P FEOR 2 P FLINK JTSUB04 LINE 2 6 P FMEND l P* PJTFMT02 FRMT P FLINK JTFMT02L P FMEND P* PJTFMT02L FRMT 2 P FLINK JTSUBST
0x3c9c20…3c9db4 (2, 381) Dummy {f00=0x0143, f01=0x0190, f02=» FEOR P FILLR ' ',8 F P FMEL 'X',GTDUPF(CBIN6) RE$ 2 P FILLR ' ',2 | P FLINK JTSUB06 FOR TRANS 10 P FLINK JTSUB30 ARKIV KNT.NR P FILLR ' ',15 P FMEND
0x3c9db4…3c9f48 Dummy {f00=0x0143, f01=0x0190, f02=» START INF p P FILLR ' ',9 $ P FCOPY TT16TXT RATE/RENTE/GEBYR 4 2 P FLINK JTSUB06 CPR/CIR 0 P FLINK JTSUB08 VALUE P FEOR P FILLR ' ',2 P FILLR '
0x3c9f48…3ca0dc Dummy {f00=0x0143, f01=0x0190, f02=»ZZ',GTDUPF(CBIN7) VALGR z F P FMEL 'BBZ',GTDUPF(CBIN8) BETALINGSFORM BFO 6 8 P FLINK JTSUB30 ARK KONTO NR P FILLR ' ',2 8 P FMEL 'XX',GTDUPF(CBIN11) PALIGNIN
0x3ca0dc…3ca270 Dummy {f00=0x0143, f01=0x0190, f02=»ND P* PJTFMT04 FRMT P FLINK JTFMT04L ( P FMEND @ P* N PJTFMT04L FRMT X P FLINK JTSUBST START INF n P FILLR ' ',15 2 P FLINK JTSUB06 CPR/CIR 0 P FLINK JTSUB08
0x3ca270…3ca404 Dummy {f00=0x0143, f01=0x0190, f02=» D P FMEL 'ZZ.ZZ.ZZ',GTDUPF(CBIN7) VALOR P FILLR ' ',3 L 6 P FLINK JTSUB30 ARK KNT NR h B P FMEL 'BBBZZ',GTDUPF(CBIN10) F$R F P FMEL 'BBZZ',GTDUPF(CBI
0x3ca404…3ca598 Dummy {f00=0x0143, f01=0x0190, f02=»GTDUPF(CBIN13) OPK z P FMEND 0 P* F PJTFMT08 FRMT P P FLINK JTFMT08L d P FMEND | P* PJTFMT08L FRMT 4 P FLINK JTSUBST START INF 2 P FLINK JTSUB01
0x3ca598…3ca72c Dummy {f00=0x0143, f01=0x0190, f02=» LINE 3 z P FMEND P* 6 PJTFMT12 FRMT @ P FLINK JTFMT12L T P FMEND l P* z PJTFMT12L FRMT 4 P FLINK JTSUBST START INF 8 P FLINK JTSUB05 REG KONTO NR
0x3ca72c…3ca8c0 Dummy {f00=0x0143, f01=0x0190, f02=» FLINK JTSUB08 VALUE P FEOR 2 P FILLR ' ',2 @ 2 P FMEL 'BZZZZZZZZZZ',GTDUPF(CBIN2) DIVERSE TEXT T P FILLR ' ',16 P FMEND P* 4 PJTSUBST FRMT START INF P FILLR ' ',2
0x3ca8c0…3caa54 (2, 382) Dummy {f00=0x0143, f01=0x0190, f02=» TYPE b P FLINK FLBNR P FMEND " P* 8 : PJTSUB01 FRMT LINE 1,- 1,5,6 B P FLINK JTSUB05 CPR/CIR P FLINK JTSUB06 REG-KONTO-NR 0 P FLINK JTSUB08 VALUE P FMEND
0x3caa54…3cabe8 Dummy {f00=0x0143, f01=0x0190, f02=»ZZ.ZZ.ZZ',GTDUPF(CBIN7) V.DATO B P FMEL 'BBX',GTDUPF(CBIN6) RE$ & D P FMEL 'BBX',GTDUPF(CBIN8) BFO l P FLINK JTSUB30 0 P FMEL 'XXXXXXE-XXXX',GTDUPF(CBIN10) YD.MODT ( P F
0x3cabe8…3cad7c Dummy {f00=0x0143, f01=0x018e, f02=» FMEL 'B999V99V999E-99B',GTDUPF(CBIN1) P FMEND 4 P* J 2 PJTSUB06 FRMT CPR/CIR T P FBT BCPR,JTLAB06 ( P FMEL 'XE-XXE-XXE-XXB',GTDUPF(CBIN2) P FB JTLAB08 PJTLAB06 P FBT BLEV,
0x3cad7c…3caf10 Dummy {f00=0x0143, f01=0x018e, f02=» PJTLAB08 P FMEND P* * P* 4 8 PJTSUB08 FRMT VALUE AND D/K > 6 P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) z P FCOPY TTDBKRM P FMEND P* PJTSUB10 FRMT LEVERAND
0x3caf10…3cb0a4 Dummy {f00=0x0143, f01=0x0190, f02=» 4 P FMEL 'BBZZZVZZVZZZE-ZZ',GTDUPF(CBIN9) P FMEND < P* J 6 PJTSUB31 FRMT LINE 3 - 8 T P FILLR ' ',2 F P FMEL 'ZZ.ZZ.ZZ',GTDUPF(CBIN12) FAKT DATO D P FMEL 'BZZZ
0x3cb0a4…3cb238 Dummy {f00=0x0143, f01=0x018e, f02=»L 'BZZZZ',GTDUPF(CBIN15) TXT NR D P FMEL 'BZZ',GTDUPF(CBIN16) OMR NR < D P FMEL 'BZZ.ZZ.ZZ',GTDUPF(CBIN18) PER FRA D P FMEL 'BZZ.ZZ.ZZ',GTDUPF(CBIN19) PER
0x3cb238…3cb3cc Dummy {f00=0x0143, f01=0x0190, f02=» 0 P* VARIOUS FORMATS FOR JOURNAL TAPE P* < @ PFTBXJT FTABLE XJTF01,XJTF02,XJTF03,XJTF04,XJTF05,XJTF06, C F 2 P XJTF07,FMTFMT,XJTF09,XJTF10,XJTF11,VOX15, C P XJTF13,XJTF14,VOFMT02 P* PXJTF01 FRMT KVITTERING
0x3cb3cc…3cb560 Dummy {f00=0x0143, f01=0x018e, f02=» P FLINK XJTF02L P FMEND P* ( PXJTF02L FRMT 2 P FLINK FLBNR F P FILLR ' ',2 Z P FCOPY ='KONTOKORT' n P FBF GTSLDFLG,XJTF02EX & P FMEL 'B*.***.***.**9.99-',TTKTSLD PXJTF02EX P FMEND P* PXJTF03 FRMT
0x3cb560…3cb6f4 (2, 383) Dummy {f00=0x0144, f01=0x0190, f02=» P FMEND PXJTF05 FRMT P FLINK XJTF05L * P FMEND @ P* N P* X PXJTF05L FRMT b P FILLR ' ',2 v P FILLR '*',50 P FEOR P FILLR ' ',2 P FTEXT 'VERSNR ' P FCOPY ='DAGS-DATO' P FILLR ' ',2
0x3cb6f4…3cb888 Dummy {f00=0x0144, f01=0x0190, f02=» P FCOPY GTTESTMK P FMEL '99.99.999.9',CVERSNR P FILLR ' ',2 D P FMEL '99E-99E-99',CMASKDAT X P FILLR ' ',3 | P FMEL '99E-99E-99',GTDATO P FILLR ' ',3 P FMEL '999',GTMSK P FILLR ' ',7 P FMEL '***99',TTSTLB
0x3cb888…3cba1c Dummy {f00=0x0144, f01=0x0190, f02=» P FILLR ' ',2 $ P FMEL '999V99V999E-99B',TVERSUR $ P FMEL '999V99V999E-99B',TTCASHAC @ $ P FMEL 'ZZZ.ZZZ.ZZ9.ZZ-',TTSTCASH h P FEOR P FILLR ' ',2 P FILLR '*',40 P FMEND P* PXJTF06 FRMT P FLINK XJTF06L
0x3cba1c…3cbbb0 Dummy {f00=0x0144, f01=0x018e, f02=»LUKNING' P FILLR ' ',30 P FEOR & P FILLR ' ',2 4 P FCOPY ='T[LLER' H P FILLR ' ',10 ` P FCOPY ='DEBET' v P FILLR ' ',12 P FCOPY ='KREDIT' P FMEND P* PXJTF07 FRMT P FLINK XJTF07L P FMEND
0x3cbbb0…3cbd44 Dummy {f00=0x0144, f01=0x0190, f02=» 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(GSWBIN5,CBIN1) P FMEND > P* L PXJTF09 FRMT V P FCOPY =' START TEST' j P FMEND P* PXJTF10 FRMT P FCOPY =' SLUT TEST' P FMEND P* PXJTF11 FRMT P FILLR ' '
0x3cbd44…3cbed8 Dummy {f00=0x0144, f01=0x018e, f02=» P* PXJTF13L FRMT P FLINK JTSUB05 REG KNT NO & * P FMEL 'BZZZ',GTDUPF(CBIN2) COUNTER NO H 2 P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) VALUE v P FILLR ' ',2 P FCOPY ='ADM ' $ P FMEL 'BZZ',GTDUPF(CBIN5) ADM NO P FMEND
0x3cbed8…3cc06c Dummy {f00=0x0144, f01=0x0190, f02=» P* PFMTFMT FRMT P FLINK FMTFMTL " P FMEND 8 P* F PFMTFMTL FRMT P P FILLR ' ',2 d P FTEXT 'DIVERSE FORMATER' x P FMEND P EJECT P* : P* FORMATS FOR VOUCHER 'BILAG AFSTEMPLING' P*
0x3cc06c…3cc200 Dummy {f00=0x0144, f01=0x0190, f02=» T 2 P BAFST12,BAFST40,BAFST41,BAFST42,BAFST45, C 2 P BAFST46,BAFST47,BAFST48,BAFST49,BAFST50, C > & P BAFST51,BAFST52,BAFST53,BAFST54 t P* P* PBAFST01 FRMT TRANS 01-06 P FLINK BAFST01L P FMEND P* PBAFS
0x3cc200…3cc394 (2, 384) Dummy {f00=0x0144, f01=0x0190, f02=»B',GTDUPF(CBIN3) BKO @ P FMEL 'ZZ.ZZ.ZZB',GTDUPF(CBIN7) BET/VALORDATO P FB B1LAB2 ` PB1LAB1 r " P FMEL 'B**B',GTDUPF(CBIN3) BKO PB1LAB2 < P FLINK JTSUB06 CPR-CIR-NR @ P FLINK BSUB0
0x3cc394…3cc528 Dummy {f00=0x0144, f01=0x0190, f02=»RANS 02-05-07-10 b P FLINK BAFST02L P FMEND 0 P* > PBAFST02L FRMT H 8 P FLINK BSUB01 HEADER ^ P FILLR ' ',1 8 P FMEL '******E-****',GTDUPF(CBIN2) CPR/CIR TRANS 10 P FILLR '*',3 P FBT TTKOR
0x3cc528…3cc6bc Dummy {f00=0x0144, f01=0x0190, f02=» P* P* < PBAFST08 FRMT TRANS 08-09 P FLINK BAFST08L P FMEND t P* PBAFST08L FRMT 8 P FLINK BSUB01 HEADER $ P FMEL 'BBB**B',GTDUPF(CBIN3) BKO P F
0x3cc6bc…3cc850 Dummy {f00=0x0144, f01=0x018e, f02=»LAB2 z 2 P FMEL 'BBZZ.ZZ.ZZBBB',GTDUPF(CBIN12) FAKTDATO ! P FB B8LAB5 ! B PB8LAB2 ! T . P FMEL 'ZZZZ9999.99B',GTDUPF(CBIN14) LEVNR ! b PB8LAB5 ! P FLINK JTSUB10 LEVERAND. ! > P FLINK BSUB02 REGKONTO-BELOB ! P
0x3cc850…3cc9e4 Dummy {f00=0x0144, f01=0x0190, f02=» P FILLR '+',2 " P FCOPY GTTESTMK " > P FCOPY TTCYM CYKLE-MARKERING " 8 & P FMEL '99.99.99B',GTDATO POST DATO " z > P FMEL '999B',GTMSK MASKINNR " P FLINK FLBNR " B P FCOPY
0x3cc9e4…3ccb78 Dummy {f00=0x0144, f01=0x018e, f02=»B999',TTCNTNR TAELLER-NR " 2 P FMEL 'BZZZZZZZZZZ',GTDUPF(CBIN2) DIVERSE TEXT # 0 P FBT TTKORTFL,B12LAB1 # f P FILLR '*',13 # PB12LAB1 # @ P FLINK BSUB02 REGKONTO-BELOB # P FMEND # P* #
0x3ccb78…3ccd0c Dummy {f00=0x0144, f01=0x0190, f02=» # PBAFST04 FRMT BILAG TRANS 4 $ P FLINK BSUB10 $ , P FLINK BSUB12 $ B P FLINK BSUB13 $ X P FMEND $ n P* $ | P* $ PBAFST40 FRMT $ P FMEND $ P* $ PBAFST41 FRMT $ P FMEND $ PBAFST42 FRMT $ P FMEND $ P* $
0x3ccd0c…3ccea0 Dummy {f00=0x0144, f01=0x0190, f02=»FST48 FRMT $ P FMEND % P* % PBAFST49 FRMT % * P FMEND % > P* % L PBAFST50 FRMT % V P FMEND % j P* % x PBAFST51 FRMT % P FMEND % P* % PBAFST52 FRMT % P FMEND % P* % PBAFST53 FRMT % P FMEND % P* % PBA
0x3ccea0…3cd034 (2, 385) Dummy {f00=0x0144, f01=0x018e, f02=» '+',2 % P FCOPY GTTESTMK & > P FCOPY TTCYM CYKLE-MARKERING & & & P FMEL '99.99.99B',GTDATO POST DATO & h > P FMEL '999B',GTMSK MASKINNR & P FLINK FLBNR & B P FCOPY TTSUPMRK
0x3cd034…3cd1c8 Dummy {f00=0x0144, f01=0x0190, f02=» & PBSUB02 FRMT ' B P FMEL 'B999.99.999.99B',GTDUPF(CBIN1) REGKONTONR ' < P FMEL '*.***.***.**9.99-',GTDUPF(CBIN4) BELOB ' d B P FCOPY TTDBKRM DEBET/KREDIT-MARK ' P FILLR ' ',1 ' P
0x3cd1c8…3cd35c Dummy {f00=0x0144, f01=0x0190, f02=»ATO POSTERINGSDATO ' r P FCOPY CKMDNAM ( & : P FMEL 'B999B',GTMSK MASKINNR ( < " P FMEL '99B',GTDUPF(CBIN3) BKO ( z P FMEND ( P* ( P* ( PBSUB05 FRMT ( P FLINK FLBNR ( > P FMEL 'B*.*
0x3cd35c…3cd4f0 Dummy {f00=0x0144, f01=0x0190, f02=» FMEND ( P* ) P* ) PBSUB06 FRMT ) * " P FMEL 'B99B',GTDUPF(CBIN3) BKO ) @ P FBT TTKORTFL,B6LAB1 ) f P FCOPY TT07TXT ) P FILLR ' ',1 ) . P FMEL 'ZZ.ZZ.ZZB',GTDUPF(CBIN7) VAL. DATO ) PB6LAB1 ) P FMEND ) P* )
0x3cd4f0…3cd684 Dummy {f00=0x0144, f01=0x0190, f02=»B*.***.***.**9.99-',GTDUPF(CBIN4) BELOB ) D P FCOPY TTDBKRM DEBET/KREDIT-MARK * 0 P FILLR ' ',1 * x P FLINK SKAF01 LINE NR * P FMEND * P* * PBSUB10 FRMT * P FILLR '+',2 * P FCOPY GTTESTMK TEST M
0x3cd684…3cd818 Dummy {f00=0x0144, f01=0x0190, f02=» BKO * v P FMEND + P* + PBSUB11 FRMT + $ $ P FMEL 'XX',GTDUPF(CBIN11) P]L]R + 8 2 P FMEL 'E-9999999999B',GTDUPF(CBIN2) DEBITOR NR + ` , P FMEL 'XX.XXPP',GTDUPF(CBIN7) VALOERDATO + & P FMEL 'BXB',GTDUPF(CBIN12) RTE/GEB + P FMEND + P* + P
0x3cd818…3cd9ac Dummy {f00=0x0144, f01=0x0190, f02=»TDUPF(CBIN10) FORFALDS]R + PB12LAB6 , 2 P FMEL 'E-9999999999B',GTDUPF(CBIN2) DEBITORNR , 0 , P FMEL 'XX.XXPP',GTDUPF(CBIN7) VALOERDATO , f P FILLR ' ',3 , P FMEND , P* , PBSUB13 FRMT , 2 P FMEL '*.***.***.**9.99-',GTDUPF(CBIN4) VALUE ,
0x3cd9ac…3cdb40 Dummy {f00=0x0144, f01=0x0190, f02=»L '****9',TTLBNR , P FB FLBNR20 - PFLBNR10 - , P FMEL '****9',GTLBNR - < PFLBNR20 - X P FMEND - h P* - v P EJECT - P* - * P* VARIOUS FORMATS FOR VOUCHER - P* - : PFTBXVO FTABLE FMTFMT,VOFMT02,VOFMT02,BAXF04,BAXF05, C -
0x3cdb40…3cdcd4 (2, 386) Dummy {f00=0x0144, f01=0x0190, f02=» - PVOFMT02 FRMT TOTAL IN CYCLE . P FLINK VOFMT02L . , P FMEND . D P* . R PVOFMT02L FRMT . P FILLR '+',2 . r P FBF TTCY1FLG,VOLAB02 . P FCOPY ='ARKIV' . P FLINK JTSUB30 . PVOLAB02 . P FILLR ' ',4 . P FCOPY GSWSTR9 .
0x3cdcd4…3cde68 Dummy {f00=0x0144, f01=0x018e, f02=»NK BAXF05L . P FMEND / P* / PBAXF05 FRMT / * P FILLR '+',2 / > P FLINK BAXF05L / R P FMEND / h P* / v PBAXF05L FRMT / P FLINK BSUB04 / P FEOR / P FILLR '0',2 / P FLINK BSUB05 / P FMEND / P* / PBAXF06 FRMT /
0x3cde68…3cdffc Dummy {f00=0x0144, f01=0x018e, f02=» / P FILLR '0',2 0 P FEOR 0 P FLINK KVIT03 0 * P FMEND 0 @ P* 0 N PVOSUM07 FRMT SUMBILAG 0 X P FLINK VOSUM07L 0 v P FMEND 0 P* 0 PVOSUM07L FRMT 0 P FILLR '+',2 0 P FMEL '999B',GTMSK MASKINNR 0 ( P FMEL 'B99.99.99B',G
0x3cdffc…3ce190 Dummy {f00=0x0144, f01=0x0190, f02=» 0 | & P FMEL '*.***.***.**9,99+',GTSUMCNT 1 P FILLR ' ',2 1 2 P FMEND 1 F P* 1 T PVOX08 FRMT 1 ^ P FLINK VOX08L 1 p P FMEND 1 P* 1 PVOX08L FRMT 1 P FILLR '+',2 1 P FCOPY GTTESTMK 1 P FMEL '999',GTMSK 1 P FMEL 'BB99.99.9
0x3ce190…3ce324 Dummy {f00=0x0144, f01=0x018e, f02=» P FCOPY GSWSTR9 2 P FILLR ' ',2 2 P FCOPY GSWSTR20 TEXT 2 . P FEOR 2 J P FILLR '2',2 2 X P FILLR '*',60 2 l P FILLR '*',8 2 P FEOR 2 P FILLR '4',2 2 P FCOPY ='KONTONR' 2 P FILLR ' ',6 2 P FCOPY ='T[LLER' 2 P FILLR ' '
0x3ce324…3ce4b8 Dummy {f00=0x0144, f01=0x0190, f02=» P* 3 PVOX09 FRMT 3 P FLINK VOX09L 3 P FMEND 3 6 P* 3 D PVOX09L FRMT 3 N P FILLR '2',2 3 b ( P FMEL 'XXXVXXVXXX.XX',GTDUPF(CBIN1) 3 v P FILLR ' ',4 3 P FMEL '99',GTWBCD1 3 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) NETTO 3 >
0x3ce4b8…3ce64c Dummy {f00=0x0144, f01=0x0190, f02=»MEND 3 P* 4 PVOX10 FRMT 4 P FLINK VOX10L 4 ( P FMEND 4 > P* 4 L PVOX10L FRMT 4 V P FILLR '2',2 4 j P FMEL 'ZZ',GTWBCD1 4 ~ 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) 4 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(GSWBIN5,CBIN2) 4 6 P F
0x3ce64c…3ce7e0 Dummy {f00=0x0144, f01=0x0190, f02=» 4 PVOX11L FRMT 5 P FILLR '4',2 5 P FTEXT 'TOTAL' 5 0 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) 5 F 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTREGF(CBIN2) 5 z 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTREGF(CBIN1) 5 P FEOR 5 P FILLR '4',2 5 P FTE
0x3ce7e0…3ce974 (2, 387) Dummy {f00=0x0145, f01=0x018e, f02=»ZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(CBIN8,CBIN1) 5 P FEOR 6 . P FILLR '2',2 6 < P FTEXT 'KOR' 6 P P FILLR ' ',19 6 d 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(CBIN7,CBIN2) 6 z 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(CBIN7,CBIN1) 6 P FMEND 6 P* 6 PVOX12
0x3ce974…3ceb08 Dummy {f00=0x0145, f01=0x0190, f02=» P FILLR ' ',1 7 P FTEXT ' PRIMO' 7 * P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTSTCASH 7 0 P FILLR ' ',34 7 ^ P FEOR 7 t P FILLR '2',2 7 P FTEXT 'BEV ' 7 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) 7 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBI
0x3ceb08…3cec9c Dummy {f00=0x0145, f01=0x0190, f02=»ZZ.ZZZ.ZZ9.99-',TTCASH 7 P FILLR ' ',34 8 P FMEND 8 4 P* 8 B PVOX13 FRMT 8 L P FLINK VOX13L 8 ^ P FMEND 8 t P* 8 PVOX13L FRMT 8 P FILLR ' ',2 8 P FCOPY GTTESTMK 8 P FMEL '999B',GTMSK 8 P FMEL 'B99.99.99',GTDATO 8 P F
0x3cec9c…3cee30 Dummy {f00=0x0145, f01=0x0190, f02=»LR '2',2 8 P FILLR '*',56 9 P FEOR 9 & P FILLR '4',2 9 4 P FCOPY ='T[LLER' 9 H P FILLR ' ',4 9 ` P FCOPY ='KONTONR' 9 t P FILLR ' ',10 9 P FCOPY ='BEV.PERIODE' 9 P FILLR ' ',12 9 P FCOPY ='SALDO' 9 P FILLR ' ',1 9 P
0x3cee30…3cefc4 Dummy {f00=0x0145, f01=0x0190, f02=»Z',GTWBCD1 9 P FILLR ' ',4 : . P FMEL 'XXXVXXVXXX.XX',CBACC(GSWBIN3,CBIN1) : & 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',CBACC(GSWBIN3,CBIN2) : X 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',CBACC(GSWBIN3,CBIN3) : P FMEND : P* : PVOX15 FRMT : P FILLR '2',2 :
0x3cefc4…3cf158 Dummy {f00=0x0145, f01=0x0190, f02=»X16L FRMT : P FILLR X'24',40 NO. ; P FILLR X'3C',40 5. ; . P FNL ; H P FNL ; T P FILLR X'5D',40 ] ; ` P FILLR X'4E',40 N ; z P FNL ; P FNL ; P FILLR X'45',40 E ; P FILLR X'53',40 S ; P FNL ; P FNL ; P FILLR X'5B',40
0x3cf158…3cf2ec Dummy {f00=0x0145, f01=0x0190, f02=» ; P FILLR '+',2 < , P FMEL '99E-99E-99',GTDATO POSTERINGSDATO < P FILLR ' ',6 < L P FLINK FLBNR < ` P FILLR ' ',8 < t 2 P FMEL 'B*.***.***.**9E,99',GTDUPF(CBIN4) BELOB < P FILLR '*',2 < P FILLR ' ',3 < 4 P FMEL 'ZZ999999',GTDUPF(CBIN2) CHE
0x3cf2ec…3cf480 Dummy {f00=0x0145, f01=0x0190, f02=» FRMT < P FILLR '2',2 = P FILLR ' ',17 = " * P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GSWBCD6 = 8 * P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GSWBCD7 = f P FMEND = P* = P EJECT = P* = . P* FORMATS FOR EXTRA 'KVITTERING' = ( P* (MOSTLY
0x3cf480…3cf614 (2, 388) Dummy {f00=0x0145, f01=0x018e, f02=»T02, C = j P BAFST12 > P* > " P* > , PKVIT03 FRMT > 6 P FILLR '+',2 > J P FLINK BSUB04 > ^ P FLINK BSUB05 > t P FMEND > P* > P EJECT > P* > " P* FORMATS FOR KONTOKORT > P* > @ PFTBKT FTABLE KAFST0
0x3cf614…3cf7a8 Dummy {f00=0x0145, f01=0x018e, f02=» > P* ? PKAFST00 FRMT ? P FMEND ? ( P* ? > P* ? H < PKAFST01 FRMT TRANS 01-06 ? R P FLINK BAFST01 ? P FLINK SKAF01 LINE NR ? P FMEND ? P* ? P* ? : PKAFST02 FRMT
0x3cf7a8…3cf93c Dummy {f00=0x0145, f01=0x0190, f02=» P @ : PKAFST12 FRMT TRANS 12 @ P FLINK BAFST12 @ J P FLINK SKAF01 LINE NR @ h P FMEND @ P* @ P* @ : PKAFST03 FRMT TRANS 03 @ P FLINK KAFST03L @ P F
0x3cf93c…3cfad0 Dummy {f00=0x0145, f01=0x0190, f02=»TFL,KLAB31 @ 2 P FMEL 'XX.XXPP',GTDUPF(CBIN7) VAL.DATE, DD.MM A PKLAB31 A H > P FMEL 'BXX',GTDUPF(CBIN11) PALIGNINGS$R A V $ P FCOPY TT16TXT RENTE/GEBYR/INDB A ( P FLINK BSUB07 CPR/CIR/BELOB/LINIENR A P FMEND A P* A
0x3cfad0…3cfc64 Dummy {f00=0x0145, f01=0x0190, f02=»T A 8 P FLINK BSUB01 HEADER B < P FLINK BSUB06 BETART/DATO B F P FBF TTKORTFL,KLAB40 B 2 P FMEL 'XX.XXPP',GTDUPF(CBIN7) VAL DATE, DD.MM B PKLAB40 B P FBF TTASKAT,KLAB41 B 0 P FMEL
0x3cfc64…3cfdf8 Dummy {f00=0x0145, f01=0x0190, f02=» ',3 B 4 P FMEL 'B**',GTDUPF(CBIN10) FORF.AAR - CPR, BSKAT C PKLAB42 C D F P FLINK BSUB07 CPR/CIR-BELOB-LINIENR C R P FMEND C P* C PSKAF01 FRMT C P FBF CKTFLAG,SKAF02 C P FBT GTSLDFLG,SKAF04 C P
0x3cfdf8…3cff8c Dummy {f00=0x0145, f01=0x0190, f02=» NEW LINE C | " P FMEL '9',TTKTCHK CHECK DIGIT D P FB SKAF05 D 8 PSKAF02 D J P FMEL '99B',TTKTLIN D X PSKAF05 D t P FMEND D P* D P EJECT D P* D . P* VARIOUS FORMATS FOR 'KONTOKORT' D P* D PFTBXKT FTABLE XKTTRP D
0x3cff8c…3d0120 Dummy {f00=0x0145, f01=0x0190, f02=»,GTDATO D ~ P FILLR ' ',43 E & P FMEL '*.***.***.**9.99-',TTKTSLD E & P FILLR ' ',2 E P P FCOPY ='TRP ' E d P FMEND E z P EJECT E P* E $ P* FORMATS FOR TALLY ROLL E P* E PFTBTA FTABLE FMTFMT E P* E P* E
0x3d0120…3d02b4 (2, 389) Dummy {f00=0x0145, f01=0x018e, f02=»FMT04,TAFMT05, C E h P VOX15,TAFMT07 F P* F 4 PTAFMT01 FRMT F > P FSL F R P FNL F ^ P FNL F j P FILLR '*',1 F v P FILLR ' ',1 F P FMEND F P* F PTAFMT02 FRMT F P FLINK TAFMT02L F P FMEND F P* F PTAFMT02L FRMT
0x3d02b4…3d0448 Dummy {f00=0x0145, f01=0x0190, f02=» PTAFMT04 FRMT G P FILLR '+',2 G , P FMEL 'Z.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) G , P FCOPY TTDBKRM G P FMEND G r P* G PTAFMT05 FRMT G P FILLR '+',2 G & P FMEL 'Z.ZZZ.ZZZ.ZZ9.99-',GSWBCD6 G P FILLR ' ',1 G P FMEND G P* G P
0x3d0448…3d05dc Dummy {f00=0x0145, f01=0x411e, f02=» P* H ( P* FORMATS FOR GENERAL PRINTER H P* H : PFTBGP FTABLE FMTFMT H D P* H ` P* H j P EJECT H t P* H 2 P* VARIOUS FORMATS FOR GENERAL PRINTER H P* H PFTBXGP FTABLE FMTFMT H P* H P* H P* H P
0x3d05dc…3d0770 Dummy {f00=0x0145, f01=0x2008, f02=» I P* CAN NOT BE IDENTIFIED BY TRANSTYPE (OR GTREGDEX) ' P* ' L PFTBXX FTABLE ' V P* ' n P* ' x P END ' @ ' & z P* & PFTBTA FTABLE & P* & P* & P EJECT & P* & ( P* FORMATS
0x3d0770…3d0904 Dummy {f00=0x0145, f01=0x0000, f02=»
[…0x3…]
0x3d0dc0…3d0f54 (2, 390) Opaque[0x194]
0x3d0f54…3d10e8 # DirEnt {nam=»DIV525«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x28b8, f03=0x0000}
0x3d0f54…3d10e8 IdxSect {
0x3d0f54…3d10e8 f00 = 0x0145 // 0x3d0f54 @0x0
0x3d0f54…3d10e8 f01 = 0x0014 // 0x3d0f56 @0x2
0x3d0f54…3d10e8 gno = [ // 0x3d0f58 @0x4
0x3d0f54…3d10e8 [0x00]: C0x0145.0x3.0
0x3d0f54…3d10e8 [0x01]: C0x0146.0x0.0
0x3d0f54…3d10e8 [0x02]: C0x0146.0x1.0
0x3d0f54…3d10e8 [0x03]: C0x0146.0x2.0
0x3d0f54…3d10e8 [0x04]: C0x0146.0x3.0
0x3d0f54…3d10e8 [0x05]: C0x0147.0x0.0
0x3d0f54…3d10e8 [0x06]: C0x0147.0x1.0
0x3d0f54…3d10e8 [0x07]: C0x0147.0x2.0
0x3d0f54…3d10e8 [0x08]: C0x0147.0x3.0
0x3d0f54…3d10e8 [0x09]: C0x0148.0x0.0
0x3d0f54…3d10e8 ]
0x3d0f54…3d10e8 }
0x3d10e8…3d127c Dummy {f00=0x0145, f01=0x0190, f02=» P IDENT DIV525 03.01.XXX.1 P DDUM KMD08 & P PDIV D P ENTRY FRMTJT Z P ENTRY FRMXJT p P ENTRY FRMTTA P ENTRY FRMXTA P ENTRY FRMTVO P ENTRY FRMTKV P ENTRY FRMXVO P ENTRY FRMTKT
0x3d127c…3d1410 Dummy {f00=0x0145, f01=0x0190, f02=» PROC 0 P CALL FMOVE,GTSTRFMT,FTBJT(GTREGDEX) P RET B P PEND V P* l PFRMXJT PROC XJTDEX v ( P CALL FMOVE,GTSTRFMT,FTBXJT(XJTDEX) P RET P PEND P* PFRMTTA PROC 0 P CALL FMOV
0x3d1410…3d15a4 Dummy {f00=0x0145, f01=0x0190, f02=»XTA(XTADEX) x P RET P PEND P* . PFRMTVO PROC 8 0 P CALL FMOVE,GTSTRFMT,FTBVO(GTREGDEX) L P RET P PEND P* PFRMXVO PROC XVODEX ( P CALL FMOVE,GTSTRFMT,FTBXVO(XVODEX) P RET P P
0x3d15a4…3d1738 Dummy {f00=0x0145, f01=0x018e, f02=» 0 P CALL FMOVE,GTSTRFMT,FTBKT(GTREGDEX) P RET < P PEND P P* f PFRMXKT PROC XKTDEX p ( P CALL FMOVE,GTSTRFMT,FTBXKT(XKTDEX) P RET P PEND P* PFRMTGP PROC ( P CALL FMOVE,GTSTRFMT,FTB
0x3d1738…3d18cc Dummy {f00=0x0145, f01=0x0190, f02=» j P RET P PEND P* " P* , P* 6 P EJECT @ P* V P* FORMATS FOR JOURNAL ` P* @ PFTBJT FTABLE JTFMT01,JTFMT02,JTFMT03,JTFMT04,JTFMT02, C 2 P JTFMT01,JTFMT02,JTFMT08,JTFMT08,JTFMT02, C P
0x3d18cc…3d1a60 Dummy {f00=0x0145, f01=0x0190, f02=» LINE 1 z P FEOR 2 P FLINK JTSUB04 LINE 2 6 P FMEND l P* PJTFMT02 FRMT P FLINK JTFMT02L P FMEND P* PJTFMT02L FRMT 2 P FLINK JTSUBST
0x3d1a60…3d1bf4 (2, 391) Dummy {f00=0x0146, f01=0x0190, f02=» FEOR P FILLR ' ',8 F P FMEL 'X',GTDUPF(CBIN6) RE$ 2 P FILLR ' ',2 | P FLINK JTSUB06 FOR TRANS 10 P FLINK JTSUB30 ARKIV KNT.NR P FILLR ' ',15 P FMEND
0x3d1bf4…3d1d88 Dummy {f00=0x0146, f01=0x0190, f02=» START INF p P FILLR ' ',13 $ P FCOPY TT16TXT RATE/RENTE/GEBYR 6 2 P FLINK JTSUB06 CPR/CIR ^ 0 P FLINK JTSUB08 VALUE P FEOR P FILLR ' ',2 P FILLR
0x3d1d88…3d1f1c Dummy {f00=0x0146, f01=0x0190, f02=»Z.ZZ',GTDUPF(CBIN7) VALGR | F P FMEL 'BBZ',GTDUPF(CBIN8) BETALINGSFORM BFO 8 8 P FLINK JTSUB30 ARK KONTO NR P FILLR ' ',2 8 P FMEL 'XX',GTDUPF(CBIN11) PALIGN
0x3d1f1c…3d20b0 Dummy {f00=0x0146, f01=0x018e, f02=»MEND P* PJTFMT04 FRMT P FLINK JTFMT04L * P FMEND B P* P PJTFMT04L FRMT Z P FLINK JTSUBST START INF p P FILLR ' ',16 2 P FLINK JTSUB06 CPR/CIR 0 P FLINK JTSUB08
0x3d20b0…3d2244 Dummy {f00=0x0146, f01=0x0190, f02=» D P FMEL 'ZZ.ZZ.ZZ',GTDUPF(CBIN7) VALOR P FILLR ' ',3 P 6 P FLINK JTSUB30 ARK KNT NR l B P FMEL 'BBBZZ',GTDUPF(CBIN10) F$R F P FMEL 'BBZZ',GTDUPF
0x3d2244…3d23d8 Dummy {f00=0x0146, f01=0x0190, f02=»ZB',GTDUPF(CBIN13) OPK ~ P FMEND 4 P* J PJTFMT08 FRMT T P FLINK JTFMT08L h P FMEND P* PJTFMT08L FRMT 4 P FLINK JTSUBST START INF 2 P FLINK JTSUB01
0x3d23d8…3d256c Dummy {f00=0x0146, f01=0x018e, f02=»UB31 LINE 3 ~ P FMEND $ P* : PJTFMT12 FRMT D P FLINK JTFMT12L X P FMEND p P* ~ PJTFMT12L FRMT 4 P FLINK JTSUBST START INF 8 P FLINK JTSUB05 REG KONTO N
0x3d256c…3d2700 Dummy {f00=0x0146, f01=0x0190, f02=» 0 P FLINK JTSUB08 VALUE P FEOR 8 P FILLR ' ',2 F 2 P FMEL 'BZZZZZZZZZZ',GTDUPF(CBIN2) DIVERSE TEXT Z P FILLR ' ',16 P FMEND P* 4 PJTSUBST FRMT START INF P FILLR ' '
0x3d2700…3d2894 (2, 392) Dummy {f00=0x0146, f01=0x0190, f02=»TRANS, TYPE h P FLINK FLBNR P FMEND ( P* > : PJTSUB01 FRMT LINE 1,- 1,5,6 H P FILLR ' ',1 P FLINK JTSUB05 CPR/CIR P FLINK JTSUB06 REG-KONTO-NR 0 P FLINK JTSUB08 VALUE
0x3d2894…3d2a28 Dummy {f00=0x0146, f01=0x0190, f02=»CBIN3) BKO ~ * P FMEL 'BZZ.ZZ.ZZ',GTDUPF(CBIN7) V.DATO B P FMEL 'BBX',GTDUPF(CBIN6) RE$ @ D P FMEL 'BBX',GTDUPF(CBIN8) BFO P FLINK JTSUB30 0 P FMEL 'XXXXXXE-XXXX',GTDUPF(
0x3d2a28…3d2bbc Dummy {f00=0x0146, f01=0x0190, f02=» REG KNT NR l 6 P FMEL 'B999E-999E-99E-99B',GTDUPF(CBIN1) P FMEND P P* f 2 PJTSUB06 FRMT CPR/CIR p P FBT BCPR,JTLAB06 ( P FMEL 'BBBX.XX.XX.XX',GTDUPF(CBIN2) P FB JTLAB08
0x3d2bbc…3d2d50 Dummy {f00=0x0146, f01=0x0190, f02=».XX.XX.XX',GTDUPF(CBIN2) PJTLAB08 P FMEND 0 P* F P* P 8 PJTSUB08 FRMT VALUE AND D/K Z 6 P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) P FCOPY TTDBKRM P FMEND P*
0x3d2d50…3d2ee4 Dummy {f00=0x0146, f01=0x0190, f02=» ARK KNT NR v 6 P FMEL 'BBZZZE-ZZZE-ZZE-ZZ',GTDUPF(CBIN9) P FMEND Z P* h 6 PJTSUB31 FRMT LINE 3 - 8 r P FILLR ' ',2 F P FMEL 'ZZ.ZZ.ZZ',GTDUPF(CBIN12) FAKT DA
0x3d2ee4…3d3078 Dummy {f00=0x0146, f01=0x018e, f02=» LEV NR Z D P FMEL 'BZZZZ',GTDUPF(CBIN15) TXT NR D P FMEL 'BZZ',GTDUPF(CBIN16) OMR NR Z D P FMEL 'BZZ.ZZ.ZZ',GTDUPF(CBIN18) PER FRA D P FMEL 'BZZ.ZZ.ZZ',GTD
0x3d3078…3d320c Dummy {f00=0x0146, f01=0x0190, f02=» P* P EJECT P* 0 P* VARIOUS FORMATS FOR JOURNAL TAPE & P* Z @ PFTBXJT FTABLE XJTF01,XJTF02,XJTF03,XJTF04,XJTF05,XJTF06, C d 2 P XJTF07,FMTFMT,XJTF09,XJTF10,XJTF11,VOX15, C P XJTF13,XJTF14,VOFMT02 P* P
0x3d320c…3d33a0 Dummy {f00=0x0146, f01=0x0190, f02=»TOKORT P FILLR ' ',2 P FLINK XJTF02L " P FMEND 8 P* F PXJTF02L FRMT P P FLINK FLBNR d P FILLR ' ',2 x P FCOPY ='KONTOKORT' P FBF GTSLDFLG,XJTF02EX & P FMEL 'B*.***.***.**9.99-',TTKTSLD PXJTF02EX P FMEND
0x3d33a0…3d3534 (2, 393) Dummy {f00=0x0146, f01=0x018e, f02=»OSUM07 P FCOPY =' SUM' P FMEND $ PXJTF05 FRMT 2 P FLINK XJTF05L F P FMEND P* j P* t PXJTF05L FRMT ~ P FILLR ' ',2 P FILLR '*',50 P FEOR P FILLR ' ',2 P FTEXT 'VERSNR ' P FCOPY ='DAGS-
0x3d3534…3d36c8 Dummy {f00=0x0146, f01=0x0190, f02=» P FEOR P FILLR ' ',2 P FCOPY GTTESTMK & P FMEL '99.99.999.9',CVERSNR > P FILLR ' ',2 b P FMEL '99E-99E-99',CMASKDAT v P FILLR ' ',3 P FMEL '99E-99E-99',GTDATO P FILLR ' ',3 P FMEL '999',GTMSK P FILLR ' '
0x3d36c8…3d385c Dummy {f00=0x0146, f01=0x0190, f02=»RIMO KASSE ' f P FEOR P FILLR ' ',2 " & P FMEL '999E-999E-99.99BB',TVERSUR 6 & P FMEL '999E-999E-99.99BB',TTCASHAC ` $ P FMEL 'ZZZ.ZZZ.ZZ9.ZZ-',TTSTCASH P FEOR P FILLR ' ',2 P FILLR '*',40 P FMEND P* PXJTF06
0x3d385c…3d39f0 Dummy {f00=0x0146, f01=0x0190, f02=» FILLR ' ',2 P FCOPY ='KASSELUKNING' P FILLR ' ',30 2 P FEOR H P FILLR ' ',2 V P FCOPY ='T[LLER' j P FILLR ' ',10 P FCOPY ='DEBET' P FILLR ' ',12 P FCOPY ='KREDIT' P FMEND P* PXJTF07 FRMT
0x3d39f0…3d3b84 Dummy {f00=0x0146, f01=0x0190, f02=»Z9.99-',TTACC(GSWBIN5,CBIN2) z 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(GSWBIN5,CBIN1) $ P FMEND ^ P* l PXJTF09 FRMT v P FCOPY =' START TEST' P FMEND P* PXJTF10 FRMT P FCOPY =' SLUT TEST' P FMEND P*
0x3d3b84…3d3d18 Dummy {f00=0x0146, f01=0x0190, f02=» P FLINK XJTF13L P FMEND P* ( PXJTF13L FRMT 2 P FLINK JTSUB05 REG KNT NO F * P FMEL 'BZZZ',GTDUPF(CBIN2) COUNTER NO h 2 P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) VALUE P FILLR ' ',2 P FCOPY ='ADM ' $ P FMEL 'BZZ',GTDU
0x3d3d18…3d3eac Dummy {f00=0x0146, f01=0x0190, f02=»'99',GTWBCD1 P FMEND P* " PFMTFMT FRMT , P FLINK FMTFMTL @ P FMEND V P* d PFMTFMTL FRMT n P FILLR ' ',2 P FTEXT 'DIVERSE FORMATER' P FMEND P EJECT P* : P* FORMATS FOR VOUCHER
0x3d3eac…3d4040 Dummy {f00=0x0146, f01=0x0190, f02=»T08,BAFST01, C r 2 P BAFST12,BAFST40,BAFST41,BAFST42,BAFST45, C 2 P BAFST46,BAFST47,BAFST48,BAFST49,BAFST50, C N & P BAFST51,BAFST52,BAFST53,BAFST54 P* P* PBAFST01 FRMT TRANS 01-10 P FLINK BAFST01L P FMEND
0x3d4040…3d41d4 (2, 394) Dummy {f00=0x0146, f01=0x0190, f02=» P FB B1LAB2 PB1LAB1 P FILLR ' ',4 ( PB1LAB2 < < P FLINK JTSUB06 CPR-CIR-NR J @ P FLINK BSUB02 REGKONTO-BELOB P FMEND P* P* @ PBAFST02 FRMT
0x3d41d4…3d4368 Dummy {f00=0x0146, f01=0x018e, f02=» BSUB01 HEADER P FILLR ' ',14 . P FBT TTKORTFL,B2LAB1 D P FILLR ' ',13 ` PB2LAB1 v @ P FLINK BSUB02 REGKONTO-BELOB P FMEND P* PBAFST06 FRMT TRANS 6 P F
0x3d4368…3d44fc Dummy {f00=0x0146, f01=0x0190, f02=» PB6LB02 P FLINK JTSUB06 P FBT TTKORTFL,B6LAB1 ( P FILLR ' ',7 D 2 P FMEL 'XX.XX.XX.XXXX',GTDUPF(CBIN10) YD.MODT. X PB6LAB1 P FLINK BSUB02 P FMEND P* < PBAFST08 FRMT TRANS 08-09
0x3d44fc…3d4690 Dummy {f00=0x0146, f01=0x0190, f02=» TTKORTFL,B8LB1 P FILLR ' ',4 ! P FB B8LAB5 ! , PB8LB1 ! > ( P FMEL 'PPPX.XX.XX.XX',GTDUPF(CBIN2) ! L P FBZ GTUSED(CBIN13),B8LAB1 ! x , P FMEL 'BZZZZZZZZB',GTDUPF(CBIN13) FAKTNR ! P FB B8LAB5 ! PB8LAB1 ! P FILLR ' ',10 ! PB8LAB5 !
0x3d4690…3d4824 Dummy {f00=0x0146, f01=0x0190, f02=»MEND ! P* " P* " PBAFST12 FRMT TRANS 12 " P FLINK BAFST12L " > P FMEND " V P* " d PBAFST12L FRMT " n P FILLR '+',2 " P FCOPY GTTESTMK " > P FCOPY TTCYM CYKLE-MARKERING " > P FMEL
0x3d4824…3d49b8 Dummy {f00=0x0146, f01=0x0190, f02=» B P FCOPY TTSUPMRK SUPPLEMENTS-MARK # < P FMEL '99',GTREGNR TRANSTYPE-NR # J < P FMEL 'B999',TTCNTNR TAELLER-NR # 6 P FMEL 'BXX.XX.XX.XXXX',GTDUPF(CBIN2) DIVERSE TEXT # P FBT
0x3d49b8…3d4b4c Dummy {f00=0x0146, f01=0x0190, f02=» FMEND # P* $ P* $ PBAFST03 FRMT BILAG TRANS 3 $ & P FLINK BSUB10 $ J P FLINK BSUB11 $ ` P FLINK BSUB13 $ v P FMEND $ P* $ PBAFST04 FRMT BILAG TRANS 4 $ P FLINK BSUB10 $ P FLINK BSUB12 $ P FLINK BSUB13 $
0x3d4b4c…3d4ce0 Dummy {f00=0x0146, f01=0x0190, f02=»MEND $ P* % PBAFST45 FRMT % P FMEND % * P* % 8 PBAFST46 FRMT % B P FMEND % V P* % d PBAFST47 FRMT % n P FMEND % P* % PBAFST48 FRMT % P FMEND % P* % PBAFST49 FRMT % P FMEND % P* % PBAFST50 FRMT % P F
0x3d4ce0…3d4e74 (2, 395) Dummy {f00=0x0147, f01=0x0190, f02=» % P* & PBAFST54 FRMT & P FMEND & & P* & 4 P* & > P* & H 8 PBSUB01 FRMT HEADER & R P FILLR '+',2 & P FCOPY GTTESTMK & > P FCOPY TTCYM CYKLE-MARKERING & > P
0x3d4e74…3d5008 Dummy {f00=0x0147, f01=0x0190, f02=»SDATO & Z B P FCOPY TTSUPMRK SUPPLEMENTS-MARK ' < P FMEL '99',GTREGNR TRANSTYPE-NR ' T P FILLR ' ',1 ' P FMEND ' P* ' P ' PBSUB02 FRMT ' B P FMEL 'B999.999.99.99B',G
0x3d5008…3d519c Dummy {f00=0x0147, f01=0x018e, f02=» DEBET/KREDIT-MARK ' l P FILLR ' ',1 ( " P FMEND ( > P* ( T P* ( ^ PBSUB04 FRMT ( h P FCOPY GTTESTMK ( ~ P FCOPY TTCYM ( @ P FMEL '99.99.99B',GTDATO POSTERINGSDATO ( P FCOPY CKMDNAM ( : P
0x3d519c…3d5330 Dummy {f00=0x0147, f01=0x0190, f02=» PBSUB05 FRMT ) P FLINK FLBNR ) > P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) BELOB ) . B P FCOPY TTDBKRM DEBET/KREDIT-MARK ) p P FILLR ' ',1 ) P FMEND ) P* ) P* ) PBSUB06 FRMT ) "
0x3d5330…3d54c4 Dummy {f00=0x0147, f01=0x0190, f02=»BIN7) VAL. DATO ) v PB6LS1 * P FMEND * & P* * < P* * F PBSUB07 FRMT * P P FILLR ' ',1 * f < P FLINK JTSUB06 CPR/CIR-NR * z < P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) BELOB * D P FCOPY
0x3d54c4…3d5658 Dummy {f00=0x0147, f01=0x0190, f02=» PBSUB10 FRMT + P FILLR '+',2 + P FCOPY GTTESTMK TEST MARK + , P FMEL '999B',GTMSK MASKINNR + N P FLINK FLBNR + r & P FMEL 'B99.99.99',GTDATO POSTDATO + P FMEL 'B99.',GTREGNR + " P FMEL 'XX.',GTDUPF(CBIN3) BKO + P FMEND + P* +
0x3d5658…3d57ec Dummy {f00=0x0147, f01=0x0190, f02=»MEL 'BXB',GTDUPF(CBIN12) RTE/GEB + P FMEND , ( P* , 6 PBSUB12 FRMT , @ P FBF TTASKAT,B12LAB5 , T $ P FMEL 'XB',GTDUPF(CBIN11) REST]R , p P FB B12LAB6 , PB12LAB5 , * P FMEL 'PXB',GTDUPF(CBIN10) FORFALDS]R , PB12LAB6 , P FLINK JTSUB06
0x3d57ec…3d5980 Dummy {f00=0x0147, f01=0x0190, f02=»B13LB01 , P FILLR ' ',3 - PB13LB01 - $ 2 P FMEL '*.***.***.**9.99-',GTDUPF(CBIN4) VALUE - 4 P FCOPY TTDBKRM - j P FILLR ' ',1 - P FMEND - P* - PFLBNR FRMT EKSP LB. NR. - P FBT GTLOKSPG,FLBNR10 - P FMEL '****9',TTLBNR - P F
0x3d5980…3d5b14 (2, 396) Dummy {f00=0x0147, f01=0x018e, f02=» VARIOUS FORMATS FOR VOUCHER - P* . $ : PFTBXVO FTABLE FMTFMT,VOFMT02,VOFMT02,BAXF04,BAXF05, C . . * P BAXF06,VOSUM07,VOX08,VOX09,VOX10, C . l ( P VOX11,VOX12,VOX13,VOX14,VOX15, C . P VOX16,VOX17,VOX18 . P* . P* . PVOFMT02 FRMT TOTA
0x3d5b14…3d5ca8 Dummy {f00=0x0147, f01=0x0190, f02=» P FCOPY ='ARKIV' / P FLINK JTSUB30 / PVOLAB02 / 2 P FILLR ' ',4 / B P FCOPY GSWSTR9 / V & P FMEL '*.***.***.**9.99+',TTCYKTOT / l P FILLR ' ',2 / P FMEND / P* / PBAXF04 FRMT / P FLINK BAFST03 / P FLINK BAXF05L / P FMEND
0x3d5ca8…3d5e3c Dummy {f00=0x0147, f01=0x0190, f02=»4 / P FEOR 0 P FILLR '0',2 0 P FLINK BSUB05 0 , P FMEND 0 B P* 0 P PBAXF06 FRMT 0 Z P FLINK BAXF06L 0 n P FMEND 0 P* 0 PBAXF06L FRMT 0 P FLINK BAFST03 0 P FEOR 0 P FILLR '0',2 0 P FEOR 0 P FILLR '0',2 0
0x3d5e3c…3d5fd0 Dummy {f00=0x0147, f01=0x0190, f02=» PVOSUM07L FRMT 1 P FILLR '+',2 1 P FMEL '999B',GTMSK MASKINNR 1 . ( P FMEL 'B99.99.99B',GTDATO EKSP.LB.NR 1 R P FMEL '****9',GTSUMST 1 ~ P FCOPY ='-' 1 P FLINK FLBNR 1 P FILLR ' ',1 1 P FCOPY ='TOTAL ' 1 & P FMEL '*.***.***.**9
0x3d5fd0…3d6164 Dummy {f00=0x0147, f01=0x0190, f02=» FRMT 1 P FILLR '+',2 2 P FCOPY GTTESTMK 2 " P FMEL '999',GTMSK 2 : P FMEL 'BB99.99.99',GTDATO 2 T P FMEL 'BBZ999',CKMDNR 2 v P FMEL 'BB****9',TTSTLBNR 2 P FTEXT ' - ' 2 P FLINK FLBNR 2 P FILLR ' ',2 2 P FCOPY GSWSTR9 2 P F
0x3d6164…3d62f8 Dummy {f00=0x0147, f01=0x0190, f02=» FILLR '4',2 2 P FCOPY ='KONTONR' 3 P FILLR ' ',6 3 . P FCOPY ='T[LLER' 3 B P FILLR ' ',9 3 Z P FTEXT 'NETTO' 3 n P FILLR ' ',12 3 P FCOPY ='DEBET' 3 P FILLR ' ',12 3 P FCOPY ='KREDIT' 3 P FMEND 3 P* 3 PVOX09 FRMT 3
0x3d62f8…3d648c Dummy {f00=0x0147, f01=0x0190, f02=»ILLR ' ',4 3 P FMEL '99',GTWBCD1 4 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) NETTO 4 , > P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',C12ACC(GSWBIN5,CBIN2) DEBET 4 f > P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',C12ACC(GSWBIN5,CBIN1) KREDIT 4 P FMEND 4 P* 4 PVOX10
0x3d648c…3d6620 Dummy {f00=0x0147, f01=0x0190, f02=».ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) 4 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(GSWBIN5,CBIN2) 5 ( 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(GSWBIN5,CBIN1) 5 b P FMEND 5 P* 5 PVOX11 FRMT 5 P FLINK VOX11L 5 P FMEND 5 P* 5 PVOX11L FRMT 5 P
0x3d6620…3d67b4 (2, 397) Dummy {f00=0x0147, f01=0x0190, f02=») 5 f 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTREGF(CBIN1) 6 P FEOR 6 > P FILLR '4',2 6 L P FTEXT 'SUPL ' 6 ` 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN5) 6 v 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(CBIN8,CBIN2) 6 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(CB
0x3d67b4…3d6948 Dummy {f00=0x0147, f01=0x018e, f02=»CBIN2) 6 f 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(CBIN7,CBIN1) 7 P FMEND 7 F P* 7 T PVOX12 FRMT 7 ^ P FLINK VOX12L 7 p P FMEND 7 P* 7 PVOX12L FRMT 7 P FILLR '4',2 7 $ P FMEL '999E-999E-99.99',TTCASHAC 7 P FILLR ' ',1 7 P FTEXT
0x3d6948…3d6adc Dummy {f00=0x0147, f01=0x0190, f02=» 7 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) 8 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN5) 8 < 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN6) 8 p P FEOR 8 P FILLR '2',2 8 P FTEXT 'ULTIMO' 8 ( P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTCASH 8
0x3d6adc…3d6c70 Dummy {f00=0x0147, f01=0x0190, f02=»LR ' ',2 8 P FCOPY GTTESTMK 9 P FMEL '999B',GTMSK 9 ( P FMEL 'B99.99.99',GTDATO 9 B P FILLR ' ',2 9 b P FCOPY ='BEHOLDNINGST[LLERE' 9 v P FILLR ' ',2 9 P FCOPY GSWSTR20 9 P FILLR ' ',3 9 P FEOR 9 P FILLR '2',2 9 P FILLR '*',5
0x3d6c70…3d6e04 Dummy {f00=0x0147, f01=0x0190, f02=» FCOPY ='BEV.PERIODE' 9 P FILLR ' ',12 : P FCOPY ='SALDO' : 4 P FILLR ' ',1 : L P FMEND : d P* : r PVOX14 FRMT : | P FLINK VOX14L : P FMEND : P* : PVOX14L FRMT : P FILLR '2',2 : P FMEL 'ZZ',GTWBCD1 : P FILLR ' '
0x3d6e04…3d6f98 Dummy {f00=0x0147, f01=0x0190, f02=».ZZZ.ZZ9.99-',CBACC(GSWBIN3,CBIN3) : P FMEND ; * P* ; 8 PVOX15 FRMT ; B P FILLR '2',2 ; T P FCOPY GSWSTR20 ; h P FMEND ; P* ; PVOX16 FRMT ; P FILLR ' ',2 ; P FLINK VOX16L ; P FMEND ; P* ; PVOX16L FRMT ; P FILLR X
0x3d6f98…3d712c Dummy {f00=0x0147, f01=0x0190, f02=»NL ; P FILLR X'45',40 E < P FILLR X'53',40 S < $ P FNL < > P FNL < J P FILLR X'5B',40 [ < V P FILLR X'5C',40 OE < p P FMEND < P* < PVOX17 FRMT < P FLINK VOX17L < P FMEND < P* < PVOX17L FRMT < P FILLR '+',2 < ,
0x3d712c…3d72c0 Dummy {f00=0x0147, f01=0x0190, f02=»,GTDUPF(CBIN4) BELOB < v P FILLR '*',2 = P FILLR ' ',3 = 0 4 P FMEL 'ZZ999999',GTDUPF(CBIN2) CHECKNR(DIV.TXT) = D P FILLR ' ',8 = | P FMEND = P* = PVOX18 FRMT = P FLINK VOX18L = P FMEND = P* = PVOX18L FRMT = P FILLR '2',2
0x3d72c0…3d7454 (2, 398) Dummy {f00=0x0147, f01=0x0190, f02=»* = P EJECT > P* > . P* FORMATS FOR EXTRA 'KVITTERING' > " ( P* (MOSTLY AS NORMAL 'BILAG' > T P* > : PFTBKV FTABLE BAFST01,BAFST02,KVIT03,KVIT03,BAFST02, C > 2 P BAFST06,BAFST02,BAFST08,BAFST08,BAFST01, C > P BAFST12
0x3d7454…3d75e8 Dummy {f00=0x0147, f01=0x0190, f02=» EJECT > P* ? " P* FORMATS FOR KONTOKORT ? P* ? F @ PFTBKT FTABLE KAFST01,KAFST02,KAFST03,KAFST04,KAFST00, C ? P 2 P KAFST06,KAFST00,KAFST01,KAFST09,KAFST01, C ? P KAFST12 ? P* ? P* ? PKAFST00 F
0x3d75e8…3d777c Dummy {f00=0x0147, f01=0x0190, f02=»ST01 ? ~ P FLINK SKAF01 LINE NR @ P FMEND @ * P* @ @ P* @ J : PKAFST02 FRMT TRANS 02 @ T P FLINK BAFST02 @ P FLINK SKAF01 LINE NR @ P FMEND @ P* @ PKAFST06 FRMT TRANS 6 @
0x3d777c…3d7910 Dummy {f00=0x0147, f01=0x0190, f02=»1 @ P FMEND A P* A P A " : PKAFST12 FRMT TRANS 12 A * P FLINK BAFST12 A h P FLINK SKAF01 LINE NR A P FMEND A P* A P* A : PKAFST03 FRMT TRANS 03 A
0x3d7910…3d7aa4 Dummy {f00=0x0147, f01=0x0190, f02=»RANS 04 A b P FLINK BAFST04 B P FLINK SKAF01 B & P FMEND B < P* B R PSKAF01 FRMT B P FBF CKTFLAG,SKAF02 B p P FBT GTSLDFLG,SKAF04 B P FILLR ' ',13 B P FB SKAF03 B PSKAF04 B , P FMEL '*.***.***.**9.99-',TTKTSLD SALDO B
0x3d7aa4…3d7c38 Dummy {f00=0x0147, f01=0x0190, f02=»9B',TTKTLIN B PSKAF05 C P FMEND C " P* C 0 P EJECT C : P* C H . P* VARIOUS FORMATS FOR 'KONTOKORT' C R P* C PFTBXKT FTABLE XKTTRP C P* C PXKTTRP FRMT C P FLINK XKTTRPL C P FMEND C P* C PXKTTRPL FRMT C
0x3d7c38…3d7dcc Dummy {f00=0x0147, f01=0x0190, f02=» P FCOPY ='TRP ' D P FMEND D P EJECT D ( P* D > $ P* FORMATS FOR TALLY ROLL D H P* D p PFTBTA FTABLE FMTFMT D z P* D P* D P EJECT D P* D . P* VARIOUS FORMATS FOR TALLY ROLL D P* D P* D @ P
0x3d7dcc…3d7f60 Dummy {f00=0x0147, f01=0x0190, f02=»NL D P FNL E P FILLR '*',1 E P FILLR ' ',1 E * P FMEND E > P* E L PTAFMT02 FRMT E V P FLINK TAFMT02L E j P FMEND E P* E PTAFMT02L FRMT E P FILLR '0',2 E P FCOPY GSWSTR9 E & P FMEL '*.***.***.**9.99+B',GSWBCD6 E P FLI
0x3d7f60…3d80f4 (2, 399) Dummy {f00=0x0148, f01=0x0190, f02=» TTDBKRM E P FMEND F P* F PTAFMT05 FRMT F ( P FILLR '+',2 F < & P FMEL 'Z.ZZZ.ZZZ.ZZ9.99-',GSWBCD6 F P P FILLR ' ',1 F z P FMEND F P* F PTAFMT07 FRMT F P FNL F P FNL F P FNL F P FNL F P FNL F P FNL F P FNL F
0x3d80f4…3d8288 Dummy {f00=0x0148, f01=0x40bc, f02=» F P* G P EJECT G P* G 2 P* VARIOUS FORMATS FOR GENERAL PRINTER G * P* G ` PFTBXGP FTABLE FMTFMT G j P* G P* G P* G P END G @ G NL F P FNL F P FNL F P FNL F P FNL F P FNL F P FNL F
0x3d8288…3d841c Dummy {f00=0x0148, f01=0x2008, f02=» H P* CAN NOT BE IDENTIFIED BY TRANSTYPE (OR GTREGDEX) ' P* ' L PFTBXX FTABLE ' V P* ' n P* ' x P END ' @ ' & z P* & PFTBTA FTABLE & P* & P* & P EJECT & P* & ( P* FORMATS
0x3d841c…3d85b0 Dummy {f00=0x0148, f01=0x0000, f02=»
[…0x4…]
0x3d8c00…3d8d94 (2, 400) Opaque[0x194]
0x3d8d94…3d8f28 # DirEnt {nam=»DIV743«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2908, f03=0x0000}
0x3d8d94…3d8f28 IdxSect {
0x3d8d94…3d8f28 f00 = 0x0148 // 0x3d8d94 @0x0
0x3d8d94…3d8f28 f01 = 0x0014 // 0x3d8d96 @0x2
0x3d8d94…3d8f28 gno = [ // 0x3d8d98 @0x4
0x3d8d94…3d8f28 [0x00]: C0x0148.0x1.0
0x3d8d94…3d8f28 [0x01]: C0x0148.0x2.0
0x3d8d94…3d8f28 [0x02]: C0x0148.0x3.0
0x3d8d94…3d8f28 [0x03]: C0x0149.0x0.0
0x3d8d94…3d8f28 [0x04]: C0x0149.0x1.0
0x3d8d94…3d8f28 [0x05]: C0x0149.0x2.0
0x3d8d94…3d8f28 [0x06]: C0x0149.0x3.0
0x3d8d94…3d8f28 [0x07]: C0x014a.0x0.0
0x3d8d94…3d8f28 [0x08]: C0x014a.0x1.0
0x3d8d94…3d8f28 [0x09]: C0x014a.0x2.0
0x3d8d94…3d8f28 ]
0x3d8d94…3d8f28 }
0x3d8f28…3d90bc Dummy {f00=0x0148, f01=0x0190, f02=» P IDENT DIV743 03.01.XXX.1 P DDUM KMD08 & P PDIV D P ENTRY FRMTJT Z P ENTRY FRMXJT p P ENTRY FRMTTA P ENTRY FRMXTA P ENTRY FRMTVO P ENTRY FRMTKV P ENTRY FRMXVO P ENTRY FRMTKT
0x3d90bc…3d9250 Dummy {f00=0x0148, f01=0x0190, f02=» PROC 0 P CALL FMOVE,GTSTRFMT,FTBJT(GTREGDEX) P RET B P PEND V P* l PFRMXJT PROC XJTDEX v ( P CALL FMOVE,GTSTRFMT,FTBXJT(XJTDEX) P RET P PEND P* PFRMTTA PROC 0 P CALL FMOV
0x3d9250…3d93e4 Dummy {f00=0x0148, f01=0x0190, f02=»XTA(XTADEX) x P RET P PEND P* . PFRMTVO PROC 8 0 P CALL FMOVE,GTSTRFMT,FTBVO(GTREGDEX) L P RET P PEND P* PFRMXVO PROC XVODEX ( P CALL FMOVE,GTSTRFMT,FTBXVO(XVODEX) P RET P P
0x3d93e4…3d9578 Dummy {f00=0x0148, f01=0x018e, f02=» 0 P CALL FMOVE,GTSTRFMT,FTBKT(GTREGDEX) P RET < P PEND P P* f PFRMXKT PROC XKTDEX p ( P CALL FMOVE,GTSTRFMT,FTBXKT(XKTDEX) P RET P PEND P* PFRMTGP PROC ( P CALL FMOVE,GTSTRFMT,FTB
0x3d9578…3d970c Dummy {f00=0x0148, f01=0x0190, f02=» j P RET P PEND P* " P* , P* 6 P EJECT @ P* V P* FORMATS FOR JOURNAL ` P* @ PFTBJT FTABLE JTFMT01,JTFMT02,JTFMT03,JTFMT04,JTFMT02, C 2 P JTFMT01,JTFMT02,JTFMT08,JTFMT08,JTFMT02, C P
0x3d970c…3d98a0 Dummy {f00=0x0148, f01=0x0190, f02=» LINE 1 z P FEOR 2 P FLINK JTSUB04 LINE 2 6 P FMEND l P* PJTFMT02 FRMT P FLINK JTFMT02L P FMEND P* PJTFMT02L FRMT 2 P FLINK JTSUBST
0x3d98a0…3d9a34 (2, 401) Dummy {f00=0x0148, f01=0x0190, f02=» FEOR P FILLR ' ',8 F P FMEL 'X',GTDUPF(CBIN6) RE$ 2 P FILLR ' ',2 | P FLINK JTSUB06 FOR TRANS 10 P FLINK JTSUB30 ARKIV KNT.NR P FILLR ' ',15 P FMEND
0x3d9a34…3d9bc8 Dummy {f00=0x0148, f01=0x0190, f02=» START INF p P FILLR ' ',9 $ P FCOPY TT16TXT RATE/RENTE/GEBYR 4 2 P FLINK JTSUB06 CPR/CIR 0 P FLINK JTSUB08 VALUE P FEOR P FILLR ' ',2 P FILLR '
0x3d9bc8…3d9d5c Dummy {f00=0x0148, f01=0x0190, f02=»ZZ',GTDUPF(CBIN7) VALGR z F P FMEL 'BBZ',GTDUPF(CBIN8) BETALINGSFORM BFO 6 8 P FLINK JTSUB30 ARK KONTO NR P FILLR ' ',2 8 P FMEL 'XX',GTDUPF(CBIN11) PALIGNIN
0x3d9d5c…3d9ef0 Dummy {f00=0x0148, f01=0x0190, f02=»ND P* PJTFMT04 FRMT P FLINK JTFMT04L ( P FMEND @ P* N PJTFMT04L FRMT X P FLINK JTSUBST START INF n P FILLR ' ',15 2 P FLINK JTSUB06 CPR/CIR 0 P FLINK JTSUB08
0x3d9ef0…3da084 Dummy {f00=0x0148, f01=0x0190, f02=» D P FMEL 'ZZ.ZZ.ZZ',GTDUPF(CBIN7) VALOR P FILLR ' ',3 L 6 P FLINK JTSUB30 ARK KNT NR h B P FMEL 'BBBZZ',GTDUPF(CBIN10) F$R F P FMEL 'BBZZ',GTDUPF(CBI
0x3da084…3da218 Dummy {f00=0x0148, f01=0x0190, f02=»GTDUPF(CBIN13) OPK z P FMEND 0 P* F PJTFMT08 FRMT P P FLINK JTFMT08L d P FMEND | P* PJTFMT08L FRMT 4 P FLINK JTSUBST START INF 2 P FLINK JTSUB01
0x3da218…3da3ac Dummy {f00=0x0148, f01=0x0190, f02=» LINE 3 z P FMEND P* 6 PJTFMT12 FRMT @ P FLINK JTFMT12L T P FMEND l P* z PJTFMT12L FRMT 4 P FLINK JTSUBST START INF 8 P FLINK JTSUB05 REG KONTO NR
0x3da3ac…3da540 Dummy {f00=0x0148, f01=0x0190, f02=» FLINK JTSUB08 VALUE P FEOR 2 P FILLR ' ',2 @ 2 P FMEL 'BZZZZZZZZZZ',GTDUPF(CBIN2) DIVERSE TEXT T P FILLR ' ',16 P FMEND P* 4 PJTSUBST FRMT START INF P FILLR ' ',2
0x3da540…3da6d4 (2, 402) Dummy {f00=0x0148, f01=0x0190, f02=» TYPE b P FLINK FLBNR P FMEND " P* 8 : PJTSUB01 FRMT LINE 1,- 1,5,6 B P FLINK JTSUB05 CPR/CIR P FLINK JTSUB06 REG-KONTO-NR 0 P FLINK JTSUB08 VALUE P FMEND
0x3da6d4…3da868 Dummy {f00=0x0148, f01=0x0190, f02=»ZZ.ZZ.ZZ',GTDUPF(CBIN7) V.DATO B P FMEL 'BBX',GTDUPF(CBIN6) RE$ & D P FMEL 'BBX',GTDUPF(CBIN8) BFO l P FLINK JTSUB30 0 P FMEL 'XXXXXXE-XXXX',GTDUPF(CBIN10) YD.MODT ( P F
0x3da868…3da9fc Dummy {f00=0x0148, f01=0x0190, f02=» FMEL 'B999E-999E-99E-99B',GTDUPF(CBIN1) P FMEND 6 P* L 2 PJTSUB06 FRMT CPR/CIR V P FBT BCPR,JTLAB06 ( P FMEL 'XE-XXE-XXE-XXB',GTDUPF(CBIN2) P FB JTLAB08 PJTLAB06 P FBT BLE
0x3da9fc…3dab90 Dummy {f00=0x0148, f01=0x018e, f02=» PJTLAB08 P FMEND P* * P* 4 8 PJTSUB08 FRMT VALUE AND D/K > 6 P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) z P FCOPY TTDBKRM P FMEND P* PJTSUB10 FRMT LEVERAND
0x3dab90…3dad24 Dummy {f00=0x0148, f01=0x0190, f02=» 6 P FMEL 'BBZZZE-ZZZE-ZZE-ZZ',GTDUPF(CBIN9) P FMEND > P* L 6 PJTSUB31 FRMT LINE 3 - 8 V P FILLR ' ',2 F P FMEL 'ZZ.ZZ.ZZ',GTDUPF(CBIN12) FAKT DATO D P FMEL 'BZ
0x3dad24…3daeb8 Dummy {f00=0x0148, f01=0x0190, f02=»MEL 'BZZZZ',GTDUPF(CBIN15) TXT NR D P FMEL 'BZZ',GTDUPF(CBIN16) OMR NR > D P FMEL 'BZZ.ZZ.ZZ',GTDUPF(CBIN18) PER FRA D P FMEL 'BZZ.ZZ.ZZ',GTDUPF(CBIN19) P
0x3daeb8…3db04c Dummy {f00=0x0148, f01=0x0190, f02=» 0 P* VARIOUS FORMATS FOR JOURNAL TAPE P* < @ PFTBXJT FTABLE XJTF01,XJTF02,XJTF03,XJTF04,XJTF05,XJTF06, C F 2 P XJTF07,FMTFMT,XJTF09,XJTF10,XJTF11,VOX15, C P XJTF13,XJTF14,VOFMT02 P* PXJTF01 FRMT KVITTERING
0x3db04c…3db1e0 Dummy {f00=0x0148, f01=0x018e, f02=» P FLINK XJTF02L P FMEND P* ( PXJTF02L FRMT 2 P FLINK FLBNR F P FILLR ' ',2 Z P FCOPY ='KONTOKORT' n P FBF GTSLDFLG,XJTF02EX & P FMEL 'B*.***.***.**9.99-',TTKTSLD PXJTF02EX P FMEND P* PXJTF03 FRMT
0x3db1e0…3db374 (2, 403) Dummy {f00=0x0149, f01=0x0190, f02=» P FMEND PXJTF05 FRMT P FLINK XJTF05L * P FMEND @ P* N P* X PXJTF05L FRMT b P FILLR ' ',2 v P FILLR '*',50 P FEOR P FILLR ' ',2 P FTEXT 'VERSNR ' P FCOPY ='DAGS-DATO' P FILLR ' ',2
0x3db374…3db508 Dummy {f00=0x0149, f01=0x0190, f02=» P FCOPY GTTESTMK P FMEL '99.99.999.9',CVERSNR P FILLR ' ',2 D P FMEL '99E-99E-99',CMASKDAT X P FILLR ' ',3 | P FMEL '99E-99E-99',GTDATO P FILLR ' ',3 P FMEL '999',GTMSK P FILLR ' ',7 P FMEL '***99',TTSTLB
0x3db508…3db69c Dummy {f00=0x0149, f01=0x0190, f02=» P FILLR ' ',2 $ P FMEL '999E-99999E-99BB',TVERSUR & P FMEL '999E-99999E-99BB',TTCASHAC @ $ P FMEL 'ZZZ.ZZZ.ZZ9.ZZ-',TTSTCASH j P FEOR P FILLR ' ',2 P FILLR '*',40 P FMEND P* PXJTF06 FRMT P FLINK XJTF06L
0x3db69c…3db830 Dummy {f00=0x0149, f01=0x0190, f02=»SELUKNING' P FILLR ' ',30 P FEOR ( P FILLR ' ',2 6 P FCOPY ='T[LLER' J P FILLR ' ',10 b P FCOPY ='DEBET' x P FILLR ' ',12 P FCOPY ='KREDIT' P FMEND P* PXJTF07 FRMT P FLINK XJTF07L P FMEND
0x3db830…3db9c4 Dummy {f00=0x0149, f01=0x0190, f02=» 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(GSWBIN5,CBIN1) P FMEND > P* L PXJTF09 FRMT V P FCOPY =' START TEST' j P FMEND P* PXJTF10 FRMT P FCOPY =' SLUT TEST' P FMEND P* PXJTF11 FRMT P FILLR ' '
0x3db9c4…3dbb58 Dummy {f00=0x0149, f01=0x018e, f02=» P* PXJTF13L FRMT P FLINK JTSUB05 REG KNT NO & * P FMEL 'BZZZ',GTDUPF(CBIN2) COUNTER NO H 2 P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) VALUE v P FILLR ' ',2 P FCOPY ='ADM ' $ P FMEL 'BZZ',GTDUPF(CBIN5) ADM NO P FMEND
0x3dbb58…3dbcec Dummy {f00=0x0149, f01=0x0190, f02=» P* PFMTFMT FRMT P FLINK FMTFMTL " P FMEND 8 P* F PFMTFMTL FRMT P P FILLR ' ',2 d P FTEXT 'DIVERSE FORMATER' x P FMEND P EJECT P* : P* FORMATS FOR VOUCHER 'BILAG AFSTEMPLING' P*
0x3dbcec…3dbe80 Dummy {f00=0x0149, f01=0x0190, f02=» T 2 P BAFST12,BAFST40,BAFST41,BAFST42,BAFST45, C 2 P BAFST46,BAFST47,BAFST48,BAFST49,BAFST50, C > & P BAFST51,BAFST52,BAFST53,BAFST54 t P* P* PBAFST01 FRMT TRANS 01-06 P FLINK BAFST01L P FMEND P* PBAFS
0x3dbe80…3dc014 (2, 404) Dummy {f00=0x0149, f01=0x0190, f02=» r P FILLR ' ',6 @ P FMEL 'ZZ.ZZ.ZZB',GTDUPF(CBIN7) BET/VALORDATO P FB B1LAB2 ` PB1LAB1 r " P FMEL '**B',GTDUPF(CBIN3) BKO PB1LAB2 < P FLINK JTSUB06 CPR-CIR-NR @ P FLINK BSUB0
0x3dc014…3dc1a8 Dummy {f00=0x0149, f01=0x0190, f02=»RANS 02-05-07-10 b P FLINK BAFST02L P FMEND 0 P* > PBAFST02L FRMT H 8 P FLINK BSUB01 HEADER ^ P FILLR ' ',1 8 P FMEL '******E-****',GTDUPF(CBIN2) CPR/CIR TRANS 10 P FILLR '*',2 P FBT TTKOR
0x3dc1a8…3dc33c Dummy {f00=0x0149, f01=0x0190, f02=» P* P* < PBAFST08 FRMT TRANS 08-09 P FLINK BAFST08L P FMEND t P* PBAFST08L FRMT 8 P FLINK BSUB01 HEADER $ P FMEL 'BB**B',GTDUPF(CBIN3) BKO P F
0x3dc33c…3dc4d0 Dummy {f00=0x0149, f01=0x018e, f02=»LAB2 z 2 P FMEL 'BBZZ.ZZ.ZZBBB',GTDUPF(CBIN12) FAKTDATO ! P FB B8LAB5 ! B PB8LAB2 ! T . P FMEL 'ZZZZ9999.99B',GTDUPF(CBIN14) LEVNR ! b PB8LAB5 ! P FLINK JTSUB10 LEVERAND. ! > P FLINK BSUB02 REGKONTO-BELOB ! P
0x3dc4d0…3dc664 Dummy {f00=0x0149, f01=0x018e, f02=» P FLINK BSUB01 " < P FMEL '999',TTCNTNR TAELLER-NR " 2 P FMEL 'BZZZZZZZZZZ',GTDUPF(CBIN2) DIVERSE TEXT " Z P FBT TTKORTFL,B12LAB1 " P FILLR '*',13 " PB12LAB1 " @ P FLINK BSUB02 REGKONT
0x3dc664…3dc7f8 Dummy {f00=0x0149, f01=0x0190, f02=» P FLINK BSUB13 # P FMEND # P* # ( PBAFST04 FRMT BILAG TRANS 4 # 2 P FLINK BSUB10 # V P FLINK BSUB12 # l P FLINK BSUB13 # P FMEND # P* # P* # PBAFST40 FRMT # P FMEND # P* # PBAFST41 FRMT # P FMEND # P
0x3dc7f8…3dc98c Dummy {f00=0x0149, f01=0x0190, f02=»T47 FRMT # P FMEND $ P* $ PBAFST48 FRMT $ ( P FMEND $ < P* $ J PBAFST49 FRMT $ T P FMEND $ h P* $ v PBAFST50 FRMT $ P FMEND $ P* $ PBAFST51 FRMT $ P FMEND $ P* $ PBAFST52 FRMT $ P FMEND $ P* $ PBAFS
0x3dc98c…3dcb20 Dummy {f00=0x0149, f01=0x018e, f02=» HEADER $ p P FILLR '+',2 % P FCOPY GTTESTMK % 8 > P FCOPY TTCYM CYKLE-MARKERING % P 4 P FMEL 'B999.999.99.99B',GTDUPF(CBIN1) REGKONTONR % * P FMEL '99.99.99',GTDATO POSTERINGSDATO % B P FCOPY T
0x3dcb20…3dccb4 (2, 405) Dummy {f00=0x0149, f01=0x018e, f02=» > P FMEL 'B999B',GTMSK MASKINNR & P FMEND & F P* & P & f PBSUB02 FRMT & n P FILLR ' ',1 & < P FMEL '*.***.***.**9.99-',GTDUPF(CBIN4) BELOB & B P FCOPY TTDBKRM DEB
0x3dccb4…3dce48 Dummy {f00=0x0149, f01=0x0190, f02=» P FCOPY TTCYM ' @ P FMEL '99.99.99B',GTDATO POSTERINGSDATO ' P FCOPY CKMDNAM ' : P FMEL 'B999B',GTMSK MASKINNR ' r " P FMEL '99B',GTDUPF(CBIN3) BKO ' P FMEND ' P* ' P* ' PBSUB05
0x3dce48…3dcfdc Dummy {f00=0x0149, f01=0x0190, f02=» DEBET/KREDIT-MARK ' l P FILLR ' ',1 ( " P FMEND ( 6 P* ( L P* ( V PBSUB06 FRMT ( ` " P FMEL 'B99B',GTDUPF(CBIN3) BKO ( v P FBT TTKORTFL,B6LAB1 ( P FCOPY TT07TXT ( P FILLR ' ',1 ( . P FMEL 'ZZ.ZZ.ZZB',GTDUPF(CBIN7) VAL. D
0x3dcfdc…3dd170 Dummy {f00=0x0149, f01=0x0190, f02=» CPR/CIR-NR ( v < P FMEL 'B*.***.***.**9.99-',GTDUPF(CBIN4) BELOB ) & D P FCOPY TTDBKRM DEBET/KREDIT-MARK ) f P FILLR ' ',1 ) P FLINK SKAF01 LINE NR ) P FMEND ) P* ) PBSUB10 F
0x3dd170…3dd304 Dummy {f00=0x0149, f01=0x018e, f02=»'B99B',GTREGNR ) P FLINK FLBNR * P FMEL 'B999',GTMSK MASKINNR * * " P FMEL 'BXXB',GTDUPF(CBIN3) BKO * N P FMEND * t P* * PBSUB11 FRMT * $ P FMEL 'XXB',GTDUPF(CBIN11) P]L]R * , P FMEL 'XX.XXPP',GTDUPF(CBIN7) VALOERDATO * & P FMEL 'BXB',GTDU
0x3dd304…3dd498 Dummy {f00=0x0149, f01=0x0190, f02=» P FB B12LAB6 + PB12LAB5 + ( P FMEL 'XX',GTDUPF(CBIN10) FORFALDS]R + ( PB12LAB6 + T P FILLR ' ',2 + d , P FMEL 'XX.XXPP',GTDUPF(CBIN7) VALOERDATO + x P FILLR ' ',2 + P FMEND + P* + PBSUB13 FRMT + 2 P FMEL '*.***.***.**9.99-',GTDUPF
0x3dd498…3dd62c Dummy {f00=0x0149, f01=0x018e, f02=»BNR10 + P FMEL '****9',TTLBNR , P FB FLBNR20 , * PFLBNR10 , > P FMEL '****9',GTLBNR , N PFLBNR20 , j P FMEND , z P* , P EJECT , P* , * P* VARIOUS FORMATS FOR VOUCHER , P* , : PFTBXVO FTABLE FMTFMT,VOFMT02,VOFMT02,B
0x3dd62c…3dd7c0 Dummy {f00=0x0149, f01=0x0190, f02=» , z P* - P* - PVOFMT02 FRMT TOTAL IN CYCLE - P FLINK VOFMT02L - @ P FMEND - X P* - f PVOFMT02L FRMT - p P FILLR '+',2 - P FBF TTCY1FLG,VOLAB02 - P FCOPY ='ARKIV' - P FLINK JTSUB30 - PVOLAB02 - P FILLR ' ',4 -
0x3dd7c0…3dd954 (2, 406) Dummy {f00=0x0149, f01=0x018e, f02=» '+',2 - P FLINK BAXF04L . P FMEND . $ P* . 2 PBAXF04L FRMT . < P FCOPY GTTESTMK TEST MARK . P P FLINK JTSUB06 . r & P FMEL 'B99.99.99',GTDATO POSTDATO . P FILLR ' ',1 . P FLINK FLBNR . P FMEL 'B999',GTMSK MASKINNR . " P FMEL 'BXX
0x3dd954…3ddae8 Dummy {f00=0x0149, f01=0x0190, f02=» P FILLR '+',2 / P FLINK BAXF05L / P FMEND / . P* / < PBAXF05L FRMT / F P FLINK BSUB04 / Z P FEOR / p P FILLR '0',2 / ~ P FLINK BSUB05 / P FMEND / P* / PBAXF06 FRMT / P FLINK BAXF06L / P FMEND / P* / PBAXF06
0x3ddae8…3ddc7c Dummy {f00=0x0149, f01=0x0190, f02=» P FMEND 0 P* 0 PVOSUM07 FRMT SUMBILAG 0 P FLINK VOSUM07L 0 : P FMEND 0 R P* 0 ` PVOSUM07L FRMT 0 j P FILLR '+',2 0 P FMEL '999B',GTMSK MASKINNR 0 ( P FMEL 'B99.99.99B',GTDATO EKSP.LB.NR 0 P FMEL '****9',GTSUMST 0 P FCOPY
0x3ddc7c…3dde10 Dummy {f00=0x0149, f01=0x0190, f02=» 0 P FMEND 1 P* 1 PVOX08 FRMT 1 P FLINK VOX08L 1 2 P FMEND 1 H P* 1 V PVOX08L FRMT 1 ` P FILLR '+',2 1 t P FCOPY GTTESTMK 1 P FMEL '999',GTMSK 1 P FMEL 'BB99.99.99',GTDATO 1 P FMEL 'BBZ999',CKMDNR 1 P FMEL 'BB****9
0x3dde10…3ddfa4 Dummy {f00=0x0149, f01=0x0190, f02=»TEXT 1 P FEOR 2 P FILLR '2',2 2 P FILLR '*',60 2 . P FILLR '*',8 2 D P FEOR 2 X P FILLR '4',2 2 f P FCOPY ='KONTONR' 2 z P FILLR ' ',6 2 P FCOPY ='T[LLER' 2 P FILLR ' ',9 2 P FTEXT 'NETTO' 2 P FILLR ' ',12 2 P FCOPY =
0x3ddfa4…3de138 Dummy {f00=0x0149, f01=0x0190, f02=» P* 3 PVOX09L FRMT 3 P FILLR '2',2 3 " ( P FMEL 'XXXE-XXXXXE-XX',GTDUPF(CBIN1) 3 6 P FILLR ' ',4 3 b P FMEL '99',GTWBCD1 3 v 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) NETTO 3 > P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',C12ACC(GSWBIN5,CBIN2) DEBET 3
0x3de138…3de2cc Dummy {f00=0x0149, f01=0x018e, f02=»MEND 3 P* 4 PVOX10L FRMT 4 P FILLR '2',2 4 * P FMEL 'ZZ',GTWBCD1 4 > 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) 4 X 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(GSWBIN5,CBIN2) 4 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(GSWBIN5,CBIN1) 4 P FMEND 4
0x3de2cc…3de460 Dummy {f00=0x0149, f01=0x0190, f02=» 4 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) 5 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTREGF(CBIN2) 5 < 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTREGF(CBIN1) 5 p P FEOR 5 P FILLR '4',2 5 P FTEXT 'SUPL ' 5 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN5)
0x3de460…3de5f4 (2, 407) Dummy {f00=0x014a, f01=0x0190, f02=»ILLR '2',2 5 P FTEXT 'KOR' 6 P FILLR ' ',19 6 & 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(CBIN7,CBIN2) 6 < 4 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',TTACC(CBIN7,CBIN1) 6 t P FMEND 6 P* 6 PVOX12 FRMT 6 P FLINK VOX12L 6 P FMEND 6 P* 6 PVOX1
0x3de5f4…3de788 Dummy {f00=0x014a, f01=0x018e, f02=».ZZZ.ZZ9.99-',TTSTCASH 6 P FILLR ' ',34 7 P FEOR 7 4 P FILLR '2',2 7 B P FTEXT 'BEV ' 7 V 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN4) 7 l 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN5) 7 0 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GTDUPF(CBIN6) 7 P
0x3de788…3de91c Dummy {f00=0x014a, f01=0x0190, f02=» P* 8 PVOX13 FRMT 8 P FLINK VOX13L 8 P FMEND 8 6 P* 8 D PVOX13L FRMT 8 N P FILLR ' ',2 8 b P FCOPY GTTESTMK 8 v P FMEL '999B',GTMSK 8 P FMEL 'B99.99.99',GTDATO 8 P FILLR ' ',2 8 P FCOPY ='BEHOLDNINGST[LLERE' 8 P FILLR '
0x3de91c…3deab0 Dummy {f00=0x014a, f01=0x0190, f02=»,2 8 P FCOPY ='T[LLER' 9 P FILLR ' ',4 9 " P FCOPY ='KONTONR' 9 6 P FILLR ' ',10 9 P P FCOPY ='BEV.PERIODE' 9 f P FILLR ' ',12 9 P FCOPY ='SALDO' 9 P FILLR ' ',1 9 P FMEND 9 P* 9 PVOX14 FRMT 9 P FLINK VOX14L 9
0x3deab0…3dec44 Dummy {f00=0x014a, f01=0x0190, f02=»BACC(GSWBIN3,CBIN1) 9 x 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',CBACC(GSWBIN3,CBIN2) : 6 P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',CBACC(GSWBIN3,CBIN3) : V P FMEND : P* : PVOX15 FRMT : P FILLR '2',2 : P FCOPY GSWSTR20 : P FMEND : P* : PVOX16 FRMT
0x3dec44…3dedd8 Dummy {f00=0x014a, f01=0x0190, f02=»0 5. : P FNL ; P FNL ; P FILLR X'5D',40 ] ; $ P FILLR X'4E',40 N ; > P FNL ; X P FNL ; d P FILLR X'45',40 E ; p P FILLR X'53',40 S ; P FNL ; P FNL ; P FILLR X'5B',40 [ ; P FILLR X'5C',40 OE ; P FMEND ; P* ; P
0x3dedd8…3def6c Dummy {f00=0x014a, f01=0x0190, f02=»INGSDATO ; p P FILLR ' ',6 < P FLINK FLBNR < $ P FILLR ' ',8 < 8 2 P FMEL 'B*.***.***.**9E,99',GTDUPF(CBIN4) BELOB < L P FILLR '*',2 < P FILLR ' ',3 < 4 P FMEL 'ZZ999999',GTDUPF(CBIN2) CHECKNR(DIV.TXT) < P FILLR ' ',8 < P FMEND < P* <
0x3def6c…3df100 Dummy {f00=0x014a, f01=0x0190, f02=»L 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GSWBCD6 < * P FMEL 'BBZZZ.ZZZ.ZZZ.ZZ9.99-',GSWBCD7 = * P FMEND = X P* = f P EJECT = p P* = ~ . P* FORMATS FOR EXTRA 'KVITTERING' = ( P* (MOSTLY AS NORMAL 'BILAG' = P* = : PFTBKV FTABLE BAFST01,BAF
0x3df100…3df294 (2, 408) Dummy {f00=0x014a, f01=0x0190, f02=» FRMT = P FILLR '+',2 > P FLINK BSUB04 > " P FLINK BSUB05 > 8 P FMEND > N P* > P EJECT > f P* > | " P* FORMATS FOR KONTOKORT > P* > @ PFTBKT FTABLE KAFST01,KAFST02,KAFST03,KAFST04,KAFST00, C > 2 P KAFST01,KAFS
0x3df294…3df428 Dummy {f00=0x014a, f01=0x0190, f02=»* > P* ? < PKAFST01 FRMT TRANS 01-06 ? P FLINK BAFST01 ? T P FLINK SKAF01 LINE NR ? r P FMEND ? P* ? P* ? : PKAFST02 FRMT TRANS 02 ? P FLINK B
0x3df428…3df5bc Dummy {f00=0x014a, f01=0x0190, f02=»2 ? P FLINK BAFST12 @ P FLINK SKAF01 LINE NR @ ( P FMEND @ F P* @ P* @ f : PKAFST03 FRMT TRANS 03 @ p P FLINK BAFST03 @ P FLINK SKAF01 @ P FMEND @ P* @ P* @ : PKAFST04 FRM
0x3df5bc…3df750 Dummy {f00=0x014a, f01=0x0190, f02=»RMT @ P FBF CKTFLAG,SKAF02 A P FBT GTSLDFLG,SKAF04 A ( P FILLR ' ',13 A D P FB SKAF03 A Z PSKAF04 A l , P FMEL '*.***.***.**9.99-',TTKTSLD SALDO A z PSKAF03 A " P FMEL 'B99.',TTKTLIN NEW LINE A " P FMEL '9',TTKTCHK CHECK DIGIT A P FB
0x3df750…3df8e4 Dummy {f00=0x014a, f01=0x0190, f02=» FORMATS FOR 'KONTOKORT' A ~ P* B PFTBXKT FTABLE XKTTRP B * P* B F PXKTTRP FRMT B P P FLINK XKTTRPL B d P FMEND B z P* B PXKTTRPL FRMT B P FILLR '+',2 B P FMEL 'BB99.99.99',GTDATO B P FILLR ' ',43 B & P FMEL '*.***.***.**9.9
0x3df8e4…3dfa78 Dummy {f00=0x014a, f01=0x018e, f02=»OLL B t P* C PFTBTA FTABLE FMTFMT C P* C 2 P* C < P EJECT C F P* C T . P* VARIOUS FORMATS FOR TALLY ROLL C ^ P* C P* C @ PFTBXTA FTABLE TAFMT01,TAFMT02,TAFMT02,TAFMT04,TAFMT05, C C P VOX15,TAFMT07 C P* C
0x3dfa78…3dfc0c Dummy {f00=0x014a, f01=0x0190, f02=» C P FLINK TAFMT02L D P FMEND D P* D . PTAFMT02L FRMT D 8 P FILLR '0',2 D N P FCOPY GSWSTR9 D b & P FMEL '*.***.***.**9.99+B',GSWBCD6 D x P FLINK TAFMT07 D P FMEND D P* D PTAFMT04 FRMT D P FILLR '+',2 D , P FMEL 'Z.ZZZ.ZZZ
0x3dfc0c…3dfda0 Dummy {f00=0x014a, f01=0x0190, f02=»Z9.99-',GSWBCD6 D ~ P FILLR ' ',1 E P FMEND E , P* E : PTAFMT07 FRMT E D P FNL E X P FNL E d P FNL E p P FNL E | P FNL E P FNL E P FNL E P FMEND E P EJECT E P* E ( P* FORMATS FOR GENERAL PRINTER E P*
0x3dfda0…3dff34 (2, 409) Dummy {f00=0x014a, f01=0x405a, f02=» E PFTBXGP FTABLE FMTFMT F P* F $ P* F . P* F 8 P END F B@ F V
0x3dff34…3e00c8 Dummy {f00=0x014a, f01=0x2008, f02=» G P* CAN NOT BE IDENTIFIED BY TRANSTYPE (OR GTREGDEX) ' P* ' L PFTBXX FTABLE ' V P* ' n P* ' x P END ' @ ' & z P* & PFTBTA FTABLE & P* & P* & P EJECT & P* & ( P* FORMATS
0x3e00c8…3e025c Dummy {f00=0x014a, f01=0x0000, f02=»
[…0x5…]
0x3e0a40…3e0bd4 (2, 410) Opaque[0x194]
0x3e0bd4…3e0d68 # DirEnt {nam=»SL525 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2958, f03=0x0000}
0x3e0bd4…3e0d68 IdxSect {
0x3e0bd4…3e0d68 f00 = 0x014a // 0x3e0bd4 @0x0
0x3e0bd4…3e0d68 f01 = 0x0006 // 0x3e0bd6 @0x2
0x3e0bd4…3e0d68 gno = [ // 0x3e0bd8 @0x4
0x3e0bd4…3e0d68 [0x00]: C0x014a.0x3.0
0x3e0bd4…3e0d68 [0x01]: C0x014b.0x0.0
0x3e0bd4…3e0d68 [0x02]: C0x014b.0x1.0
0x3e0bd4…3e0d68 ]
0x3e0bd4…3e0d68 }
0x3e0d68…3e0efc Dummy {f00=0x014a, f01=0x0190, f02=» PNOKEY EQU X'FF' PBSPKY1 EQU X'87' PCANKY1 EQU X'91' 4 PMACKY1 EQU X'95' L PEORKY1 EQU X'90' d PFTABKY1 EQU X'8B' | PBTABKY1 EQU X'83' PDUPKY1 EQU X'A2' PSLUTKY1 EQU X'A3' PREGKY1 EQU X'A1' PCOPKY1 EQU X'F
0x3e0efc…3e1090 Dummy {f00=0x014a, f01=0x0190, f02=»Y1 EQU X'FF' PCY2KY1 EQU X'FF' PCYCKY1 EQU X'89' , PINVKY1 EQU X'82' D PKONKY1 EQU X'85' PKVITKY1 EQU X'86' t PSUPLKY1 EQU X'84' PSUMKY1 EQU X'81' PADMKY1 EQU X'A0' PDIVKY1 EQU X'FF' PHBOGKY1 EQU X'80'
0x3e1090…3e1224 Dummy {f00=0x014a, f01=0x0190, f02=»SKY1 EQU X'81' PDELKY1 EQU X'82' PCL1KY1 EQU X'89' . PCL2KY1 EQU X'8A' F PCL3KY1 EQU X'8B' ^ POUTKY1 EQU X'A0' v P* PBSPKY2 EQU X'C7' PCANKY2 EQU X'D1' PEORKY2 EQU X'D0' PMACKY2 EQU X'D5' PFTABKY2 EQU X'CB
0x3e1224…3e13b8 Dummy {f00=0x014a, f01=0x0190, f02=»GKY2 EQU X'E1' PADMKY2 EQU X'E0' PSPGKY2 EQU X'FF' . PKONKY2 EQU X'C5' F PKVITKY2 EQU X'C6' ^ P* x < PSPKTAB1 KTAB BSPKY1,CANKY1,NOKEY,EORKY1,NOKEY,MACKY1, C > P FTABKY1,BTABKY1,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C & P CO
0x3e13b8…3e154c Dummy {f00=0x014a, f01=0x0190, f02=»MKY1, C ` 8 P ADMKY1,CYCKY1,DIVKY1,HBOGKY1,DEBPKY1,REMKY1,TRSEL P* L < PSPKTAB2 KTAB BSPKY1,CANKY1,NOKEY,EORKY1,NOKEY,MACKY1, C V > P FTABKY1,BTABKY1,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C & P COPKY1,DUPKY1,EDTKY1,SLUTKY1, C . P KREK
0x3e154c…3e16e0 Dummy {f00=0x014a, f01=0x0190, f02=»Y1,DEBPKY1,REMKY1,TRSEL t P* 0 PSPKTAB3 KTAB FTBKY1,BTBKY1,INSKY1,DELKY1, C * " P CL1KY1,CL2KY1,CL3KY1,OUTKY1 ^ P* > PSPKTAB12 KTAB BSPKY2,CANKY2,NOKEY,EORKY2,NOKEY,MACKY2, C 2 P FTABKY2,BTABKY2,NOKEY,NOKEY,NOKEY,NOKEY, C 2 P
0x3e16e0…3e1874 (2, 411) Dummy {f00=0x014b, f01=0x0190, f02=»ANKY2,NOKEY,EORKY2,NOKEY,MACKY2, C z 2 P FTABKY2,BTABKY2,NOKEY,NOKEY,NOKEY,NOKEY, C , 2 P NOKEY,NOKEY,NOKEY,DUPKY2,EDTKY2,SLUTKY2, C b 0 P KREKY2,REGKY2,ADMKY2,SPGKY2,KONKY2,KVITKY2 P* * P* INQUIRY KEYTABLES (SPKEY=3) P*
0x3e1874…3e1a08 Dummy {f00=0x014b, f01=0x0190, f02=»KEY,NOKEY,NOKEY,SLUTKY1, C . P NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C $ " P NOKEY,INVKY1,KONKY1,KVITKY1 V P* | < PSPKTAB23 KTAB BSPKY1,NOKEY,CANKY1,NOKEY,NOKEY,MACKY1, C . P NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C . P NOKEY,NOKEY,NO
0x3e1a08…3e1b9c Dummy {f00=0x014b, f01=0x0190, f02=»ADMKY1 P* P* : PSPFTBERR FTABLE ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C " , P ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C ` , P ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C , P ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C , P ERRDSK,ERRFMT,ERRFMT,E
0x3e1b9c…3e1d30 Dummy {f00=0x014b, f01=0x0190, f02=»T5,MSFMT6, C ` P MSFMT7,MSFMT8,MSFMT9 P* 4 P* > PERRFMT FRMT H P FSL P FCOPY ='FEJL ' h P FMEL 'ZZ9',GSWBCD4 ERRORNR. P FMEND P* PERRDSK FRMT P FSL P FMEL '99B',GTWBCD2 P FCOPY GSWSTR9
0x3e1d30…3e1ec4 Dummy {f00=0x014b, f01=0x0190, f02=» PMSFMT2 FRMT P FSL P FCOPY ='LINIE NR' ( P FILLR '.',1 D P FMEND Z P* h PMSFMT3 FRMT r P FSL P FTEXT ='NY SIDE. ' P FMEND P* PMSFMT4 FRMT P FSL P FBF TTSUMFLG,FMT4END P FTA
0x3e1ec4…3e2058 Dummy {f00=0x014b, f01=0x018e, f02=»T P FSL P FCOPY ='BILAG' P FMEND . P* < PMSFMT6 FRMT F P FSL Z P FCOPY ='KONTOKORT' f P FMEND P* PMSFMT7 FRMT P FSL P FCOPY TTINF1 P FMEND P* PMSFMT8 FRMT P FSL P
0x3e2058…3e21ec Dummy {f00=0x014b, f01=0x4020, f02=» P FMEND P* @ ILAG' P FMEND . P* < PMSFMT6 FRMT F P FSL Z P FCOPY ='KONTOKORT' f P FMEND P* PMSFMT7 FRMT P FSL P FCOPY TTINF1 P FMEND P* PMSFMT8 FRMT P FSL P
0x3e21ec…3e2380 Dummy {f00=0x014b, f01=0x2008, f02=» * ERRFMT FRMT FSL , " FMEL 'ZZ9B',GTWBCD1 FILE NR. 8 FCOPY ERRTXT ^ " FMEL 'BZZ9',GTWBCD2 ERRORNR. t FCOPY =X'07' FMEND @ 8SPKTAB2 KTAB BSPKY1,CANKY1,NOKEY,MACKY1,NOKEY,EORKY1, C D ? FT
0x3e2380…3e2514 (2, 412) Dummy {f00=0x014b, f01=0x0190, f02=» PKTUP TAB 1 UP P TUP P ( PTSTTAB TEST TAB OUTPUT 0 P BE READIN OK P P BL READIN NOT FOUND f * P BOFL SETCREAD EMPTY COMPULSORY FIELD P* P* P* CONDITIONAL TABULATION P* P PERF SPTCHK P C
0x3e2514…3e26a8 Dummy {f00=0x014b, f01=0x0002, f02=» P
0x3e26a8…3e283c Dummy {f00=0x014b, f01=0x00c2, f02=» PRT KM167 PRT KM255 PRT KM259 ( PRT KM269 : PRT KM461L L PRT KM461R ^ PRT KM787 p PRT KM791 PRT KM975 PRT KM999 $ASG2 ONFIG PEND P$TLK2 PTLK U,M PSCR /7D
0x3e283c…3e29d0 Dummy {f00=0x014b, f01=0x2008, f02=» KM167 PRT KM255 PRT KM259 ( PRT KM269 : PRT KM461L L PRT KM461R ^ PRT KM787 p PRT KM791 PRT KM975 PRT KM999 $ASG2 ONFIG PEND P$TLK2 PTLK U,M PSCR /7D
0x3e29d0…3e2b64 Dummy {f00=0x014b, f01=0x0190, f02=» , P MOVE SPBINW1,='0' INDICATE NO CLEARING 2 P MOVE SPBINW2,='0' SET INDEX TO SEARCHED FIELD 4 < P GETFLD 0,SPBINW2,SPBINW3 SEARCH FOR EMPTY COMP. FIELDS j ( P BOFL KENT10 EMPTY COMP. FIELD FOUND & P TSTCTL 2 LOOK IF COMPULSORY FIELD P BZ KENT
0x3e2b64…3e2cf8 Dummy {f00=0x014b, f01=0x0190, f02=»KEY DEPRESSED n P RET P* " & P* EMPTY COMPULSORY FIELD FOUND , P* V PKENT10 ` 6 P GETFLD 0,SPBINW3,SPBINW2 GET THE COMPULSORY FIELD n P EJECT PERRPRT * P CBE SPBINW2,='16',KEDIT JUMP IF EDIT * P CBE SPBINW2,='4',CANC
0x3e2cf8…3e2e8c Dummy {f00=0x014b, f01=0x0190, f02=» P MOVE SPBINW2,=X'40' P XSTAT KEYB,SPBINW3 $ " P CBNE SPBINW2,SPBINW3,ERRPRT20 @ P TIMEOUT f & P EDWRT SCREEN,ERAFMT ERASE SCREEN x P B ERRC20 PERRPRT20 P CBE SPBINW4,='0',ERRC20 P PERF BELL ( P MOVE SPBINW3,=X'1
0x3e2e8c…3e3020 Dummy {f00=0x014b, f01=0x018e, f02=» SCREEN,SPFTBERR(SPBINW4) P TBF SPKEYFLG,SPERRRET " P* @ P* READ AFTER ERROR J P* h PERREAD r ( P SETCUR SET CURSOR AT THE BEGINNING P OF THE CURRENT FIELD PERR100 * P MOVE SPBINW3,=W'14' REQUESTED LENGTH " P
0x3e3020…3e31b4 (2, 413) Opaque[0x194]
0x3e31b4…3e3348 # DirEnt {nam=»SL167 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2970, f03=0x0000}
0x3e31b4…3e3348 IdxSect {
0x3e31b4…3e3348 f00 = 0x014b // 0x3e31b4 @0x0
0x3e31b4…3e3348 f01 = 0x0006 // 0x3e31b6 @0x2
0x3e31b4…3e3348 gno = [ // 0x3e31b8 @0x4
0x3e31b4…3e3348 [0x00]: C0x014b.0x2.0
0x3e31b4…3e3348 [0x01]: C0x014b.0x3.0
0x3e31b4…3e3348 [0x02]: C0x014c.0x0.0
0x3e31b4…3e3348 ]
0x3e31b4…3e3348 }
0x3e3348…3e34dc Dummy {f00=0x014b, f01=0x0190, f02=» PNOKEY EQU X'FF' PBSPKY1 EQU X'87' PCANKY1 EQU X'91' 4 PMACKY1 EQU X'95' L PEORKY1 EQU X'90' d PFTABKY1 EQU X'8B' | PBTABKY1 EQU X'83' PDUPKY1 EQU X'A2' PSLUTKY1 EQU X'A3' PREGKY1 EQU X'A1' PCOPKY1 EQU X'F
0x3e34dc…3e3670 Dummy {f00=0x014b, f01=0x0190, f02=»Y1 EQU X'FF' PCY2KY1 EQU X'FF' PCYCKY1 EQU X'89' , PINVKY1 EQU X'FF' D PKONKY1 EQU X'85' PKVITKY1 EQU X'86' t PSUPLKY1 EQU X'82' PSUMKY1 EQU X'81' PADMKY1 EQU X'A0' PDIVKY1 EQU X'84' PHBOGKY1 EQU X'80'
0x3e3670…3e3804 Dummy {f00=0x014b, f01=0x0190, f02=»SKY1 EQU X'81' PDELKY1 EQU X'82' PCL1KY1 EQU X'89' . PCL2KY1 EQU X'8A' F PCL3KY1 EQU X'8B' ^ POUTKY1 EQU X'A0' v P* PBSPKY2 EQU X'C7' PCANKY2 EQU X'D1' PEORKY2 EQU X'D0' PMACKY2 EQU X'D5' PFTABKY2 EQU X'CB
0x3e3804…3e3998 Dummy {f00=0x014b, f01=0x0190, f02=»GKY2 EQU X'E1' PADMKY2 EQU X'E0' PSPGKY2 EQU X'FF' . PKONKY2 EQU X'C5' F PKVITKY2 EQU X'C6' ^ P* x < PSPKTAB1 KTAB BSPKY1,CANKY1,NOKEY,EORKY1,NOKEY,MACKY1, C > P FTABKY1,BTABKY1,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C & P CO
0x3e3998…3e3b2c Dummy {f00=0x014b, f01=0x0190, f02=»MKY1, C ` 8 P ADMKY1,CYCKY1,DIVKY1,HBOGKY1,DEBPKY1,REMKY1,TRSEL P* L < PSPKTAB2 KTAB BSPKY1,CANKY1,NOKEY,EORKY1,NOKEY,MACKY1, C V > P FTABKY1,BTABKY1,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C & P COPKY1,DUPKY1,EDTKY1,SLUTKY1, C . P KREK
0x3e3b2c…3e3cc0 Dummy {f00=0x014b, f01=0x0190, f02=»Y1,DEBPKY1,REMKY1,TRSEL t P* 0 PSPKTAB3 KTAB FTBKY1,BTBKY1,INSKY1,DELKY1, C * " P CL1KY1,CL2KY1,CL3KY1,OUTKY1 ^ P* > PSPKTAB12 KTAB BSPKY2,CANKY2,NOKEY,EORKY2,NOKEY,MACKY2, C 2 P FTABKY2,BTABKY2,NOKEY,NOKEY,NOKEY,NOKEY, C 2 P
0x3e3cc0…3e3e54 (2, 414) Dummy {f00=0x014b, f01=0x0190, f02=»ANKY2,NOKEY,EORKY2,NOKEY,MACKY2, C z 2 P FTABKY2,BTABKY2,NOKEY,NOKEY,NOKEY,NOKEY, C , 2 P NOKEY,NOKEY,NOKEY,DUPKY2,EDTKY2,SLUTKY2, C b 0 P KREKY2,REGKY2,ADMKY2,SPGKY2,KONKY2,KVITKY2 P* * P* INQUIRY KEYTABLES (SPKEY=3) P*
0x3e3e54…3e3fe8 Dummy {f00=0x014b, f01=0x0190, f02=»KEY,NOKEY,NOKEY,SLUTKY1, C . P NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C $ " P NOKEY,INVKY1,KONKY1,KVITKY1 V P* | < PSPKTAB23 KTAB BSPKY1,NOKEY,CANKY1,NOKEY,NOKEY,MACKY1, C . P NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C . P NOKEY,NOKEY,NO
0x3e3fe8…3e417c Dummy {f00=0x014b, f01=0x0190, f02=»ADMKY1 P* P* : PSPFTBERR FTABLE ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C " , P ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C ` , P ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C , P ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C , P ERRDSK,ERRFMT,ERRFMT,E
0x3e417c…3e4310 Dummy {f00=0x014b, f01=0x0190, f02=»T5,MSFMT6, C ` P MSFMT7,MSFMT8,MSFMT9 P* 4 P* > PERRFMT FRMT H P FSL P FCOPY ='FEJL ' h P FMEL 'ZZ9',GSWBCD4 ERRORNR. P FMEND P* PERRDSK FRMT P FSL P FMEL '99B',GTWBCD2 P FCOPY GSWSTR9
0x3e4310…3e44a4 Dummy {f00=0x014b, f01=0x0190, f02=» PMSFMT2 FRMT P FSL P FCOPY ='LINIE NR' ( P FILLR '.',1 D P FMEND Z P* h PMSFMT3 FRMT r P FSL P FTEXT ='NY SIDE. ' P FMEND P* PMSFMT4 FRMT P FSL P FBF TTSUMFLG,FMT4END P FTA
0x3e44a4…3e4638 Dummy {f00=0x014b, f01=0x018e, f02=»T P FSL P FCOPY ='BILAG' P FMEND . P* < PMSFMT6 FRMT F P FSL Z P FCOPY ='KONTOKORT' f P FMEND P* PMSFMT7 FRMT P FSL P FCOPY TTINF1 P FMEND P* PMSFMT8 FRMT P FSL P
0x3e4638…3e47cc Dummy {f00=0x014b, f01=0x4020, f02=» P FMEND P* @ ILAG' P FMEND . P* < PMSFMT6 FRMT F P FSL Z P FCOPY ='KONTOKORT' f P FMEND P* PMSFMT7 FRMT P FSL P FCOPY TTINF1 P FMEND P* PMSFMT8 FRMT P FSL P
0x3e47cc…3e4960 Dummy {f00=0x014b, f01=0x2008, f02=» * ERRFMT FRMT FSL , " FMEL 'ZZ9B',GTWBCD1 FILE NR. 8 FCOPY ERRTXT ^ " FMEL 'BZZ9',GTWBCD2 ERRORNR. t FCOPY =X'07' FMEND @ 8SPKTAB2 KTAB BSPKY1,CANKY1,NOKEY,MACKY1,NOKEY,EORKY1, C D ? FT
0x3e4960…3e4af4 (2, 415) Dummy {f00=0x014c, f01=0x018e, f02=» ( ( , ( < H ( X d ( t ( ( ( ( (
0x3e4af4…3e4c88 Dummy {f00=0x014c, f01=0x0190, f02=» " $ B99.99.99Z $ " > & N 99 " n ( ~ B999.99999.99B " *.***.***.**9.99-H " &
0x3e4c88…3e4e1c Dummy {f00=0x014c, f01=0x0190, f02=»99B " 99B " 0 ( @ L $ B*.***.***.**9.99- l " & & ( B99B " &
0x3e4e1c…3e4fb0 Dummy {f00=0x014c, f01=0x0190, f02=» B*.***.***.**9.99- " & , & : $ H ( V b & + r & 999B " $ B99.99.99* " BXX. "
0x3e4fb0…3e5144 Dummy {f00=0x014c, f01=0x0190, f02=» " BXB " 0 ( ( 8 D & 0 T XX d " v & XX " E-9999999999B9 " XX.XXPP9 "
0x3e5144…3e52d8 Dummy {f00=0x014c, f01=0x018e, f02=» & ****9 " 6 & F ****9 T " j ( z * " m " " " " " " "
0x3e52d8…3e546c Dummy {f00=0x014c, f01=0x0190, f02=» ( $ ( 0 < & + L & Z ARKIV j $ $ . & & *.***.***.**9.99+- " & (
0x3e546c…3e5600 Dummy {f00=0x014c, f01=0x0190, f02=»$ & & 0 $ * ( : F $ V ( f r $ & & 0 & 0 & 0 & 0 $ ( $
0x3e5600…3e5794 (2, 416) Opaque[0x194]
0x3e5794…3e5928 # DirEnt {nam=»SL787 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2988, f03=0x0000}
0x3e5794…3e5928 IdxSect {
0x3e5794…3e5928 f00 = 0x014c // 0x3e5794 @0x0
0x3e5794…3e5928 f01 = 0x0006 // 0x3e5796 @0x2
0x3e5794…3e5928 gno = [ // 0x3e5798 @0x4
0x3e5794…3e5928 [0x00]: C0x014c.0x1.0
0x3e5794…3e5928 [0x01]: C0x014c.0x2.0
0x3e5794…3e5928 [0x02]: C0x014c.0x3.0
0x3e5794…3e5928 ]
0x3e5794…3e5928 }
0x3e5928…3e5abc Dummy {f00=0x014c, f01=0x0190, f02=» PNOKEY EQU X'FF' PBSPKY1 EQU X'87' PCANKY1 EQU X'91' 4 PMACKY1 EQU X'95' L PEORKY1 EQU X'90' d PFTABKY1 EQU X'8B' | PBTABKY1 EQU X'83' PDUPKY1 EQU X'A2' PSLUTKY1 EQU X'A3' PREGKY1 EQU X'A1' PCOPKY1 EQU X'F
0x3e5abc…3e5c50 Dummy {f00=0x014c, f01=0x0190, f02=»Y1 EQU X'FF' PCY2KY1 EQU X'FF' PCYCKY1 EQU X'89' , PINVKY1 EQU X'82' D PKONKY1 EQU X'85' PKVITKY1 EQU X'86' t PSUPLKY1 EQU X'88' PSUMKY1 EQU X'81' PADMKY1 EQU X'A0' PDIVKY1 EQU X'84' PHBOGKY1 EQU X'80'
0x3e5c50…3e5de4 Dummy {f00=0x014c, f01=0x0190, f02=»SKY1 EQU X'81' PDELKY1 EQU X'82' PCL1KY1 EQU X'89' . PCL2KY1 EQU X'8A' F PCL3KY1 EQU X'8B' ^ POUTKY1 EQU X'A0' v P* PBSPKY2 EQU X'C7' PCANKY2 EQU X'D1' PEORKY2 EQU X'D0' PMACKY2 EQU X'D5' PFTABKY2 EQU X'CB
0x3e5de4…3e5f78 Dummy {f00=0x014c, f01=0x0190, f02=»GKY2 EQU X'E1' PADMKY2 EQU X'E0' PSPGKY2 EQU X'FF' . PKONKY2 EQU X'C5' F PKVITKY2 EQU X'C6' ^ P* x < PSPKTAB1 KTAB BSPKY1,CANKY1,NOKEY,EORKY1,NOKEY,MACKY1, C > P FTABKY1,BTABKY1,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C & P CO
0x3e5f78…3e610c Dummy {f00=0x014c, f01=0x0190, f02=»MKY1, C ` 8 P ADMKY1,CYCKY1,DIVKY1,HBOGKY1,DEBPKY1,REMKY1,TRSEL P* L < PSPKTAB2 KTAB BSPKY1,CANKY1,NOKEY,EORKY1,NOKEY,MACKY1, C V > P FTABKY1,BTABKY1,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C & P COPKY1,DUPKY1,EDTKY1,SLUTKY1, C . P KREK
0x3e610c…3e62a0 Dummy {f00=0x014c, f01=0x0190, f02=»Y1,DEBPKY1,REMKY1,TRSEL t P* 0 PSPKTAB3 KTAB FTBKY1,BTBKY1,INSKY1,DELKY1, C * " P CL1KY1,CL2KY1,CL3KY1,OUTKY1 ^ P* > PSPKTAB12 KTAB BSPKY2,CANKY2,NOKEY,EORKY2,NOKEY,MACKY2, C 2 P FTABKY2,BTABKY2,NOKEY,NOKEY,NOKEY,NOKEY, C 2 P
0x3e62a0…3e6434 (2, 417) Dummy {f00=0x014c, f01=0x0190, f02=»ANKY2,NOKEY,EORKY2,NOKEY,MACKY2, C z 2 P FTABKY2,BTABKY2,NOKEY,NOKEY,NOKEY,NOKEY, C , 2 P NOKEY,NOKEY,NOKEY,DUPKY2,EDTKY2,SLUTKY2, C b 0 P KREKY2,REGKY2,ADMKY2,SPGKY2,KONKY2,KVITKY2 P* * P* INQUIRY KEYTABLES (SPKEY=3) P*
0x3e6434…3e65c8 Dummy {f00=0x014c, f01=0x0190, f02=»KEY,NOKEY,NOKEY,SLUTKY1, C . P NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C $ " P NOKEY,INVKY1,KONKY1,KVITKY1 V P* | < PSPKTAB23 KTAB BSPKY1,NOKEY,CANKY1,NOKEY,NOKEY,MACKY1, C . P NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C . P NOKEY,NOKEY,NO
0x3e65c8…3e675c Dummy {f00=0x014c, f01=0x0190, f02=»ADMKY1 P* P* : PSPFTBERR FTABLE ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C " , P ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C ` , P ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C , P ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C , P ERRDSK,ERRFMT,ERRFMT,E
0x3e675c…3e68f0 Dummy {f00=0x014c, f01=0x0190, f02=»T5,MSFMT6, C ` P MSFMT7,MSFMT8,MSFMT9 P* 4 P* > PERRFMT FRMT H P FSL P FCOPY ='FEJL ' h P FMEL 'ZZ9',GSWBCD4 ERRORNR. P FMEND P* PERRDSK FRMT P FSL P FMEL '99B',GTWBCD2 P FCOPY GSWSTR9
0x3e68f0…3e6a84 Dummy {f00=0x014c, f01=0x0190, f02=» PMSFMT2 FRMT P FSL P FCOPY ='LINIE NR' ( P FILLR '.',1 D P FMEND Z P* h PMSFMT3 FRMT r P FSL P FTEXT ='NY SIDE. ' P FMEND P* PMSFMT4 FRMT P FSL P FBF TTSUMFLG,FMT4END P FTA
0x3e6a84…3e6c18 Dummy {f00=0x014c, f01=0x018e, f02=»T P FSL P FCOPY ='BILAG' P FMEND . P* < PMSFMT6 FRMT F P FSL Z P FCOPY ='KONTOKORT' f P FMEND P* PMSFMT7 FRMT P FSL P FCOPY TTINF1 P FMEND P* PMSFMT8 FRMT P FSL P
0x3e6c18…3e6dac Dummy {f00=0x014c, f01=0x4020, f02=» P FMEND P* @ ILAG' P FMEND . P* < PMSFMT6 FRMT F P FSL Z P FCOPY ='KONTOKORT' f P FMEND P* PMSFMT7 FRMT P FSL P FCOPY TTINF1 P FMEND P* PMSFMT8 FRMT P FSL P
0x3e6dac…3e6f40 Dummy {f00=0x014c, f01=0x2008, f02=» * ERRFMT FRMT FSL , " FMEL 'ZZ9B',GTWBCD1 FILE NR. 8 FCOPY ERRTXT ^ " FMEL 'BZZ9',GTWBCD2 ERRORNR. t FCOPY =X'07' FMEND @ 8SPKTAB2 KTAB BSPKY1,CANKY1,NOKEY,MACKY1,NOKEY,EORKY1, C D ? FT
0x3e6f40…3e70d4 (2, 418) Dummy {f00=0x014c, f01=0x0190, f02=» L % & & SALDO & $ L & 0 & & @ ( & N & Z $ L & j ( & z & & 2 & ZZ & " L & & & XXXE-XXXXXE-XX & " t I & "
0x3e70d4…3e7268 Dummy {f00=0x014c, f01=0x0190, f02=» & 2 & & ' ( ' ' ( & ' 8 $ ' F ( ' V ' b & $ ' r & < ' & < ' & < ' & ] ' & N ' & N ' & N ' & E ' & S ' & S '
0x3e7268…3e73fc Dummy {f00=0x014c, f01=0x018e, f02=» 99E-99E-99 ' " ( & ( & $ ( 4 & ( D B*.***.***.**9E,99 ( R " ( t & * ( & ( ZZ999999 ( " ( & ( ( ( ( $ ( ( (
0x3e73fc…3e7590 Dummy {f00=0x014c, f01=0x018e, f02=» ( p " ) ( ) * ) $ " p ) 4 " u ) B " ) P " ) ^ " u ) l " p ) z " u ) " x ) " x ) " u ) " ~ ) ( ) ) & + ) $ )
0x3e7590…3e7724 Dummy {f00=0x014c, f01=0x0190, f02=» ) " * " * " * $ " * 2 ( * @ * L ( * * h $ p * x $ * ( * * $ u * $ * ( * * $ ~ * $ *
0x3e7724…3e78b8 Dummy {f00=0x014c, f01=0x0190, f02=»PZ * " + BXX + " + . & + > $ + L ( + + h $ + x ( + + $ + $ + & + XX.XXPPZ + " + & +
0x3e78b8…3e7a4c Dummy {f00=0x014c, f01=0x018e, f02=» $ , ( , , & , 0 & , @ & , P & , ^ ! *.***.***.**9.99-. , l " ! , " B99. , " " , # 9 , " # , & , $ 99B ,
0x3e7a4c…3e7be0 Dummy {f00=0x014c, f01=0x018e, f02=» , ( BB99.99.99 - " ( - " & - 2 ) *.***.***.**9.99-. - @ " ) - b & - r * TRP - $ * - ( - * + - " m - ( - * , - " - - " . -
0x3e7be0…3e7d74 (2, 419) Opaque[0x194]
0x3e7d74…3e7f08 # DirEnt {nam=»KEY525«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x29a0, f03=0x0000}
0x3e7d74…3e7f08 IdxSect {
0x3e7d74…3e7f08 f00 = 0x014d // 0x3e7d74 @0x0
0x3e7d74…3e7f08 f01 = 0x0002 // 0x3e7d76 @0x2
0x3e7d74…3e7f08 gno = [ // 0x3e7d78 @0x4
0x3e7d74…3e7f08 [0x00]: C0x014d.0x0.0
0x3e7d74…3e7f08 ]
0x3e7d74…3e7f08 }
0x3e7f08…3e809c Dummy {f00=0x014d, f01=0x0190, f02=» PNOKEY EQU X'FF' PBSPKY1 EQU X'87' PCANKY1 EQU X'91' 4 PMACKY1 EQU X'95' L PEORKY1 EQU X'90' d PFTABKY1 EQU X'8B' | PBTABKY1 EQU X'83' PDUPKY1 EQU X'A2' PSLUTKY1 EQU X'A3' PREGKY1 EQU X'A1' PCOPKY1 EQU X'F
0x3e809c…3e8230 Dummy {f00=0x014d, f01=0x0190, f02=»Y1 EQU X'FF' PCY2KY1 EQU X'FF' PCYCKY1 EQU X'89' , PINVKY1 EQU X'82' D PKONKY1 EQU X'85' PKVITKY1 EQU X'86' t PSUPLKY1 EQU X'84' PSUMKY1 EQU X'81' PADMKY1 EQU X'A0' PDIVKY1 EQU X'FF' PHBOGKY1 EQU X'80'
0x3e8230…3e83c4 Dummy {f00=0x014d, f01=0x0190, f02=»SKY1 EQU X'81' PDELKY1 EQU X'82' PCL1KY1 EQU X'89' . PCL2KY1 EQU X'8A' F PCL3KY1 EQU X'8B' ^ POUTKY1 EQU X'A0' v P* PBSPKY2 EQU X'C7' PCANKY2 EQU X'D1' PEORKY2 EQU X'D0' PMACKY2 EQU X'D5' PFTABKY2 EQU X'CB
0x3e83c4…3e8558 Dummy {f00=0x014d, f01=0x4086, f02=»GKY2 EQU X'E1' PADMKY2 EQU X'E0' PSPGKY2 EQU X'FF' . PKONKY2 EQU X'C5' F PKVITKY2 EQU X'C6' ^ P* x@ v P* PBSPKY2 EQU X'C7' PCANKY2 EQU X'D1' PEORKY2 EQU X'D0' PMACKY2 EQU X'D5' PFTABKY2 EQU X'CB
0x3e8558…3e86ec Dummy {f00=0x014d, f01=0x2008, f02=» * ERRFMT FRMT FSL , " FMEL 'ZZ9B',GTWBCD1 FILE NR. 8 FCOPY ERRTXT ^ " FMEL 'BZZ9',GTWBCD2 ERRORNR. t FCOPY =X'07' FMEND @ 8SPKTAB2 KTAB BSPKY1,CANKY1,NOKEY,MACKY1,NOKEY,EORKY1, C D ? FT
0x3e86ec…3e8880 Dummy {f00=0x014d, f01=0x4174, f02=» | * & OD-KOM & F H & ^ & - n & K ~ * & i 0000899 0 * & * & @ A B
0x3e8880…3e8a14 (2, 420) Opaque[0x194]
0x3e8a14…3e8ba8 # DirEnt {nam=»KEY167«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x29a8, f03=0x0000}
0x3e8a14…3e8ba8 IdxSect {
0x3e8a14…3e8ba8 f00 = 0x014d // 0x3e8a14 @0x0
0x3e8a14…3e8ba8 f01 = 0x0002 // 0x3e8a16 @0x2
0x3e8a14…3e8ba8 gno = [ // 0x3e8a18 @0x4
0x3e8a14…3e8ba8 [0x00]: C0x014d.0x1.0
0x3e8a14…3e8ba8 ]
0x3e8a14…3e8ba8 }
0x3e8ba8…3e8d3c Dummy {f00=0x014d, f01=0x0190, f02=» PNOKEY EQU X'FF' PBSPKY1 EQU X'87' PCANKY1 EQU X'91' 4 PMACKY1 EQU X'95' L PEORKY1 EQU X'90' d PFTABKY1 EQU X'8B' | PBTABKY1 EQU X'83' PDUPKY1 EQU X'A2' PSLUTKY1 EQU X'A3' PREGKY1 EQU X'A1' PCOPKY1 EQU X'F
0x3e8d3c…3e8ed0 Dummy {f00=0x014d, f01=0x0190, f02=»Y1 EQU X'FF' PCY2KY1 EQU X'FF' PCYCKY1 EQU X'89' , PINVKY1 EQU X'FF' D PKONKY1 EQU X'85' PKVITKY1 EQU X'86' t PSUPLKY1 EQU X'82' PSUMKY1 EQU X'81' PADMKY1 EQU X'A0' PDIVKY1 EQU X'84' PHBOGKY1 EQU X'80'
0x3e8ed0…3e9064 Dummy {f00=0x014d, f01=0x0190, f02=»SKY1 EQU X'81' PDELKY1 EQU X'82' PCL1KY1 EQU X'89' . PCL2KY1 EQU X'8A' F PCL3KY1 EQU X'8B' ^ POUTKY1 EQU X'A0' v P* PBSPKY2 EQU X'C7' PCANKY2 EQU X'D1' PEORKY2 EQU X'D0' PMACKY2 EQU X'D5' PFTABKY2 EQU X'CB
0x3e9064…3e91f8 Dummy {f00=0x014d, f01=0x4086, f02=»GKY2 EQU X'E1' PADMKY2 EQU X'E0' PSPGKY2 EQU X'FF' . PKONKY2 EQU X'C5' F PKVITKY2 EQU X'C6' ^ P* x@ v P* PBSPKY2 EQU X'C7' PCANKY2 EQU X'D1' PEORKY2 EQU X'D0' PMACKY2 EQU X'D5' PFTABKY2 EQU X'CB
0x3e91f8…3e938c Dummy {f00=0x014d, f01=0x2008, f02=» * ERRFMT FRMT FSL , " FMEL 'ZZ9B',GTWBCD1 FILE NR. 8 FCOPY ERRTXT ^ " FMEL 'BZZ9',GTWBCD2 ERRORNR. t FCOPY =X'07' FMEND @ 8SPKTAB2 KTAB BSPKY1,CANKY1,NOKEY,MACKY1,NOKEY,EORKY1, C D ? FT
0x3e938c…3e9520 Dummy {f00=0x014d, f01=0x40c2, f02=» : F IDENT D:GB20 TRA 3.2 79-07-11 O111 01.05.XXX.1 D:GB20 B D:GB20G T * & L h $ @ = J @ [
0x3e9520…3e96b4 (2, 421) Opaque[0x194]
0x3e96b4…3e9848 # DirEnt {nam=»KEY787«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x29b0, f03=0x0000}
0x3e96b4…3e9848 IdxSect {
0x3e96b4…3e9848 f00 = 0x014d // 0x3e96b4 @0x0
0x3e96b4…3e9848 f01 = 0x0002 // 0x3e96b6 @0x2
0x3e96b4…3e9848 gno = [ // 0x3e96b8 @0x4
0x3e96b4…3e9848 [0x00]: C0x014d.0x2.0
0x3e96b4…3e9848 ]
0x3e96b4…3e9848 }
0x3e9848…3e99dc Dummy {f00=0x014d, f01=0x0190, f02=» PNOKEY EQU X'FF' PBSPKY1 EQU X'87' PCANKY1 EQU X'91' 4 PMACKY1 EQU X'95' L PEORKY1 EQU X'90' d PFTABKY1 EQU X'8B' | PBTABKY1 EQU X'83' PDUPKY1 EQU X'A2' PSLUTKY1 EQU X'A3' PREGKY1 EQU X'A1' PCOPKY1 EQU X'F
0x3e99dc…3e9b70 Dummy {f00=0x014d, f01=0x0190, f02=»Y1 EQU X'FF' PCY2KY1 EQU X'FF' PCYCKY1 EQU X'89' , PINVKY1 EQU X'82' D PKONKY1 EQU X'85' PKVITKY1 EQU X'86' t PSUPLKY1 EQU X'88' PSUMKY1 EQU X'81' PADMKY1 EQU X'A0' PDIVKY1 EQU X'84' PHBOGKY1 EQU X'80'
0x3e9b70…3e9d04 Dummy {f00=0x014d, f01=0x0190, f02=»SKY1 EQU X'81' PDELKY1 EQU X'82' PCL1KY1 EQU X'89' . PCL2KY1 EQU X'8A' F PCL3KY1 EQU X'8B' ^ POUTKY1 EQU X'A0' v P* PBSPKY2 EQU X'C7' PCANKY2 EQU X'D1' PEORKY2 EQU X'D0' PMACKY2 EQU X'D5' PFTABKY2 EQU X'CB
0x3e9d04…3e9e98 Dummy {f00=0x014d, f01=0x4086, f02=»GKY2 EQU X'E1' PADMKY2 EQU X'E0' PSPGKY2 EQU X'FF' . PKONKY2 EQU X'C5' F PKVITKY2 EQU X'C6' ^ P* x@ v P* PBSPKY2 EQU X'C7' PCANKY2 EQU X'D1' PEORKY2 EQU X'D0' PMACKY2 EQU X'D5' PFTABKY2 EQU X'CB
0x3e9e98…3ea02c Dummy {f00=0x014d, f01=0x2008, f02=» * ERRFMT FRMT FSL , " FMEL 'ZZ9B',GTWBCD1 FILE NR. 8 FCOPY ERRTXT ^ " FMEL 'BZZ9',GTWBCD2 ERRORNR. t FCOPY =X'07' FMEND @ 8SPKTAB2 KTAB BSPKY1,CANKY1,NOKEY,MACKY1,NOKEY,EORKY1, C D ? FT
0x3ea02c…3ea1c0 Dummy {f00=0x014d, f01=0x0190, f02=» | * & K * & H * & v * & - * & K * & i
0x3ea1c0…3ea354 (2, 422) Opaque[0x194]
0x3ea354…3ea4e8 # DirEnt {nam=»REMLEV«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x18b0, f03=0x0000}
0x3ea354…3ea4e8 IdxSect {
0x3ea354…3ea4e8 f00 = 0x00c5 // 0x3ea354 @0x0
0x3ea354…3ea4e8 f01 = 0x0014 // 0x3ea356 @0x2
0x3ea354…3ea4e8 gno = [ // 0x3ea358 @0x4
0x3ea354…3ea4e8 [0x00]: C0x00c5.0x2.0
0x3ea354…3ea4e8 [0x01]: C0x00ca.0x2.0
0x3ea354…3ea4e8 [0x02]: C0x00d0.0x0.0
0x3ea354…3ea4e8 [0x03]: C0x00d0.0x1.0
0x3ea354…3ea4e8 [0x04]: C0x00fd.0x3.0
0x3ea354…3ea4e8 [0x05]: C0x00fe.0x0.0
0x3ea354…3ea4e8 [0x06]: C0x00fe.0x1.0
0x3ea354…3ea4e8 [0x07]: C0x010c.0x0.0
0x3ea354…3ea4e8 [0x08]: C0x0111.0x0.0
0x3ea354…3ea4e8 [0x09]: C0x0111.0x1.0
0x3ea354…3ea4e8 ]
0x3ea354…3ea4e8 }
0x3ea4e8…3ea67c Dummy {f00=0x00c5, f01=0x0190, f02=» P IDENT REMLEV 03.01.XXX.1 P DDUM KMD08 & P PDIV : P ENTRY LEVOPR H P ENTRY LEVRD ^ P ENTRY LEVWRT r P ENTRY VARRD P ENTRY IDXINS P ENTRY IDXGET P ENTRY VARINT P ENTRY LEVDEL P ENTRY IDXDEL
0x3ea67c…3ea810 Dummy {f00=0x00c5, f01=0x018e, f02=»PCLRN P EXT RAREAD P EXT RAWRIT " P EXT RADEL 6 P EXT SETKEY H P EXT SPERR P EXT SPLIN8 n P EXT ABORT P INCLUDE EQUATE P EJECT LEVOPR PROC , P**************************************** P* * P
0x3ea810…3ea9a4 Dummy {f00=0x00c5, f01=0x018e, f02=» P* . P***************************************** OPR000 @ P MOVE SPKEY,CBIN2 N , P MOVE GTLEVDAT,CMASKDAT SET CURRENT DATE h MOVE GSWSTR9,=C'VEDLIGEH.' SET SPPROMPT SET GTDYFLG 1. TIME $ PERF FMTREM,CBIN3 ATTACH
0x3ea9a4…3eab38 Dummy {f00=0x00c5, f01=0x0190, f02=» ( $ PERF IDXGET,GTLEVNR,GSWBIN4,GSWBIN5 P GSWBIN5 - LEVINDX 0 P GSWBIN4 - INDEX L P BERR OPRNOK DISKERROR f P BNOK OPR020 NOT FOUND P PERF LEVRD FOUND P BNOK OPRNOK POPR015 FOUND, DISPLAY INFO P CLEAR GTSWFLAG
0x3eab38…3eaccc Dummy {f00=0x00c5, f01=0x0190, f02=» NOT FOUND, DISPLAY BLANKS P CLEAR GTSWFLAG $ CLEAR GTDYFLG < PERF FMTREM,CBIN3 R PERF SPCLRA l $ IB SPBINW2,OPR000,OPR000,OPR030 B OPR020 & POPR030 LEV INFO KEYED IN, INSERT P* FIELD CHECK 2 P*
0x3eaccc…3eae60 Dummy {f00=0x00c5, f01=0x0190, f02=»OPR040, C r " P OPR040,OPR035,OPR035,OPR040 P B OPR040 8 POPR035 J P CBG GTLEVGI,=D'0',OPR040 OK X P MOVE SPBINW4,=W'5' | P PERF SPERR NOK P B OPR015 POPR040 ( $ PERF IDXGET,GTLEVNR,GSWBIN4,GSWBIN5 BERR OPROK
0x3eae60…3eaff4 (2, 423) Dummy {f00=0x00ca, f01=0x0190, f02=» CREATE NEW " PERF IDXINS INSERT NEW INDEX BNOK OPR000 < PERF LEVWRT P BNOK OPR070 d P PERF VARINT x * P PERF VARWRT WRITE VAR-LEV-INFORMATION BNOK OPR070 B OPR000 NEW LEV INSERTED POPR070 SOMETHI
0x3eaff4…3eb188 Dummy {f00=0x00ca, f01=0x018e, f02=» OK | P RET OPROK P PERF SETKEY & P CMP CBIN0,CBIN0 : RET R PEND ^ P EJECT l z LEVDEL PROC P MOVE SPKEY,CBIN2 DEL000 MOVE GSWSTR9,=C'SLETNING ' SET SPPROMPT
0x3eb188…3eb31c Dummy {f00=0x00ca, f01=0x0190, f02=» p B DEL000 PDEL010 LOOK FOR NO ( $ PERF IDXGET,GTLEVNR,GSWBIN4,GSWBIN5 6 P BERR DELNOK ERROR b P BNOK DEL000 NOT FOUND | FOUND CHECK IF DELETION ALLOWED & ! I.E. REFERENCES TO TRANSFILE ? P OK, MAY BE DE
0x3eb31c…3eb4b0 Dummy {f00=0x00ca, f01=0x0190, f02=»G 4 P CBG GTTRKEY,CBIN0,DEL030 ANY TRANS REFERENCE ? P CLEAR GTSWFLAG NO B PDEL030 P CLEAR GTDYFLG j P SET GTSPGFLG P PERF FMTREM,CBIN3 P PERF SPCLRN P CLEAR GTSPGFLG $ P IB SPBINW2,DEL000,DEL000,DEL050 P B D
0x3eb4b0…3eb644 Dummy {f00=0x00ca, f01=0x0190, f02=»ET PDELOK P PERF SETKEY P CMP CBIN0,CBIN0 , RET D PEND P ^ P EJECT f PLEVRD PROC t P********** P* . P* READ AND UNPACK LEVERAND INFORMATION " P* FOR LEVERAND NO GTLEVNR P* P****
0x3eb644…3eb7d8 Dummy {f00=0x00ca, f01=0x0190, f02=» PLEVR010 $ P SET CLEVFLG RESERVE LEV-BUFFER ( P PERF IDXGET,GTLEVNR,GSWBIN4,GSWBIN5 < P GSWBIN5 - LEV INDX h P GSWBIN4 - INDEX P BERR LEVRNOK DISK ERROR P BNOK LEVRNOK NOT FOUND P FOUND P READ LEV & P MOV
0x3eb7d8…3eb96c Dummy {f00=0x00ca, f01=0x0190, f02=»K P* UNPACK LEV INFO & ! MOVE GSWBCD7,GTLEVNR STORE LEVNR ( 0 P PERF XCOP,GTLEVNR,=W'0',=W'6',CLEVBUF,=W'0' R CBE GTLEVNR,GSWBCD7,LEVR030 P MOVE GTLEVNR,GSWBCD7 NOT CORRECT RECORD B LEVRNOK LEVR030 2 P
0x3eb96c…3ebb00 Dummy {f00=0x00ca, f01=0x0190, f02=»W'20',CLEVBUF,=W'68' v 2 P PERF XCOP,GTLEVPNR,=W'0',=W'3',CLEVBUF,=W'88' 4 P PERF XCOP,GTLEVPDI,=W'0',=W'13',CLEVBUF,=W'91' R 4 P PERF XCOP,GTLEVBFO,=W'0',=W'1',CLEVBUF,=W'104' 2 P PERF XCOP,GTLEVGI,=W'0',=W'4',CLEVBUF,=W'105' 4 P PERF XCOP,GTLEV
0x3ebb00…3ebc94 (2, 424) Dummy {f00=0x00d0, f01=0x0190, f02=» LEVROK " CLEAR CLEVFLG RELEASE BUFFER CMP CBIN0,CBIN0 OK < RET X * d LEVRNOK n " CLEAR CLEVFLG RELEASE BUFFER ~ CMP CBIN1,CBIN0 NOK P RET P PEND P EJECT P* PLEVWRT PROC **
0x3ebc94…3ebe28 Dummy {f00=0x00d0, f01=0x0190, f02=»* LEVW000 & ! TBF CLEVFLG,LEVW010 BUFFER FREE? DELAY CBIN2 NO, WAIT D b B LEVW000 j | LEVW010 $ SET CLEVFLG RESERVE LEV BUFFER * PACK LEV INFO P MOVE CLEVBUF,CBLANKS 0 P PERF XCOP,CLEVBUF
0x3ebe28…3ebfbc Dummy {f00=0x00d0, f01=0x0190, f02=» ` 2 P PERF XCOP,CLEVBUF,=W'68',=W'20',GTLEVBY,=W'0' 2 P PERF XCOP,CLEVBUF,=W'88',=W'3',GTLEVPNR,=W'0' > 4 P PERF XCOP,CLEVBUF,=W'91',=W'13',GTLEVPDI,=W'0' t 4 P PERF XCOP,CLEVBUF,=W'104',=W'1',GTLEVBFO,=W'0' 2 P PERF XCOP,CLEVBUF,=W'105',=W'4',GTL
0x3ebfbc…3ec150 Dummy {f00=0x00d0, f01=0x018e, f02=»3',GTLEVDAT,=W'1' r * WRITE ( $ PERF IDXGET,GTLEVNR,GSWBIN4,GSWBIN5 . GSWBIN5 LEV INDX Z GSWBIN4 INDEX v BERR LEVWNOK DISK ERROR BNOK LEVWNOK NOT FOUND FOUND , ' PERF RAWRIT,DK08,=D'8',CLEVBUF,GSWBIN5
0x3ec150…3ec2e4 Dummy {f00=0x00d0, f01=0x0190, f02=» LEVWNOK " CLEAR CLEVFLG RELEASE BUFFER CMP CBIN1,CBIN0 NOK > P RET Z P PEND f P EJECT t P* PLEVINT PROC P********** P* ( P* INITIATE STAM INFORMATION FOR P* LEVERAND NR GTLEVNR
0x3ec2e4…3ec478 Dummy {f00=0x00d0, f01=0x0190, f02=»GTLEVPNR,=D'0' P MOVE GTLEVPDI,CBLANKS P MOVE GTLEVBFO,=D'0' 4 P MOVE GTLEVGI,=D'0' P P MOVE GTLEVALT,=D'0' l P MOVE GTLEVDAT,CMASKDAT P RET P PEND P EJECT P* PLEVSPG PROC 0 P**************************
0x3ec478…3ec60c Dummy {f00=0x00d0, f01=0x0190, f02=»**************** t PLSPG000 P MOVE GSWSTR9,='FORESPG. ' ( P SET SPPROMPT J P SET GTSPGFLG 1. TIME ` P SET GTDYFLG FORESPG ~ $ P PERF FMTREM,CBIN3 ATTACH FORMAT P PERF SPCLRA WRITE ON SCREEN & P IB SPBINW2,LSPGOK,LSPGOK,LSPG010
0x3ec60c…3ec7a0 Dummy {f00=0x00d0, f01=0x0190, f02=» P BERR LSPGNOK DISK ERROR P BNOK LSPGNOK NOT FOUND $ P* LEV NR GTLEVNR FOUND D P PERF LEVRD READ STAMINFO b P BNOK LSPGNOK " P PERF VARRD READ VARIABLE INFO P BNOK LSPGNOK PLSPG015 P CLEAR GTSWFLAG P CLEAR GTD
0x3ec7a0…3ec934 (2, 425) Dummy {f00=0x00d0, f01=0x0190, f02=»PG100 OK CONTINUE TO VARIABLE INFO P TBT GTVDUFLG,LSPG200 , $ P PERF FMTREM,CBIN4 VARIABLE INFO J P PERF SPCLRN r ( P IB SPBINW2,LSPG015,LSPG015,LSPG200 P B LSPG100 PLSPG200 ( P CBE GTTRKEY,CBIN0,LSPG500 NO TRANS P* READ T
0x3ec934…3ecac8 Dummy {f00=0x00d0, f01=0x0190, f02=»LSPG500 P PERF GETNXT GET NEXT LEVNR P BNOK LSPG000 4 P B LSPG010 J PLSPGNOK PLSPGOK l P RET z P PEND P* P EJECT PLEVPRT PROC P* P********** P* P* PRINT LEVERANDS P*
0x3ecac8…3ecc5c Dummy {f00=0x00d0, f01=0x018e, f02=»FMTREM,CBIN6 P PERF SPCLRA ( P IB SPBINW2,LPRTRET,LPRTRET,LPRT010 ( PLPRT010 T P* PRINT HEADER d P CBG GTPRTFRA,=D'0',LPRT020 ~ $ P MOVE GTPRTFRA,=D'19' FIRST LEV PLPRT020 $ P CBNL GTPRTTIL,GTPRTFRA,LPRT030 0 P MOVE
0x3ecc5c…3ecdf0 Dummy {f00=0x00d0, f01=0x0190, f02=» r P CLEAR GTDYFLG NOT VAR INFO PLPRT040 , P TBF GTLPFLG,LPRT045 < " P EDWRT DSHCLP,FFEED FORM FEED X PLPRT045 ~ , P MOVE GSWBCD6,GTPRTDAT GTPRTDAT: DDMMYY P PERF CHDATO , P MOVE GTPRTDAT,GSWBCD7 GTPRTDAT: YYMMDD 2 P MOVE
0x3ecdf0…3ecf84 Dummy {f00=0x00d0, f01=0x0190, f02=»NOT FOUND , P MOVE GSWBCD6,GTLEVDAT GTLEVDAT: DDMMYY P PERF CHDATO GSWBCD7: YYMMDD B " P CBL GSWBCD7,GTPRTDAT,LPRT100 f P TBF GTDYFLG,LPRT080 P PERF VARRD P BNOK LPRT100 PLPRT080 P* FLIP FLOP FOR LINEFEEDS P TBT
0x3ecf84…3ed118 Dummy {f00=0x00d0, f01=0x0190, f02=»PRT095 P EDWRT DSHCGP,FLEVPRT GTP P B LPRT100 0 PLPRT095 B P EDWRT DSHCLP,FLEVPRT LP R P* r PLPRT100 TO NEXT | P PERF SPLIN8,CBIN0,CBIN0 P TESTIO KEYB " P BOK LPRT110 OK: KEYBORD INPUT P CALL ABORT,KEYB P
0x3ed118…3ed2ac Dummy {f00=0x00d0, f01=0x018e, f02=» PLPRT150 P PERF GETNXT P BNOK LPRTRET FINISH , P B LPRT050 READ NEXT H P* d PLPRTRET n P RET ~ P PEND P EJECT P* PVARRD PROC ********** * . ** READ AND UNPACK VARIABLE INFORMATION
0x3ed2ac…3ed440 Dummy {f00=0x00d0, f01=0x0190, f02=» l DELAY CBIN2 NO WAIT B VARR000 $ 6 VARR010 > $ SET CVARFLG RESERVE VAR BUFFER N ( $ PERF IDXGET,GTLEVNR,GSWBIN4,GSWBIN5 v GSWBIN5 LEV INDEX GSWBIN4 INDEX BERR VARRNOK DISK ERROR BNOK VARRNOK
0x3ed440…3ed5d4 (2, 426) Dummy {f00=0x00fd, f01=0x0190, f02=»GSWBIN4,GSWBIN5 p BNOK VARRNOK * UNPACK VAR INFO . & P MOVE GSWBCD7,GTLEVNR STORE LEVNR L 2 P PERF XCOP,GTLEVNR,=W'0',=W'6',CVARBUF,=W'0' v P CBE GTLEVNR,GSWBCD7,VARR030 , P MOVE GTLEVNR,GSWBCD7 NOT CORRECT RECORD B VARRN
0x3ed5d4…3ed768 Dummy {f00=0x00fd, f01=0x0190, f02=»GTREGF(CBIN10),GSWBCD7 UDB DATO 0 P PERF XCOP,GSWBCD7,=W'0',=W'7',CVARBUF,=W'9' ( * P MOVE GTREGF(CBIN11),GSWBCD7 UDB BELOB 2 P PERF XCOP,GSWBCD7,=W'0',=W'7',CVARBUF,=W'16' ( P MOVE GTREGF(CBIN12),GSWBCD7 UDB ]TD 2 P PERF XCOP,GSWBCD7,=W'0',=W'
0x3ed768…3ed8fc Dummy {f00=0x00fd, f01=0x0190, f02=»REGF(CBIN15),GSWBCD7 VENT KREDIT . P MOVE GTREGF(CBIN16),GSWBCD7 SKYLDIGT BEL. ( & P ADD GTREGF(CBIN16),GTREGF(CBIN14) Z P MOVE GSWBCD7,=D'1' SET SIGN 2 P PERF XCOP,GSWBCD7,=W'4',=W'3',CVARBUF,=W'37' * P MOVE GTREGF(CBIN13),GSWBCD7 VAL DATO
0x3ed8fc…3eda90 Dummy {f00=0x00fd, f01=0x0190, f02=»* VARRNOK ! " CLEAR CVARFLG RELEASE BUFFER ! CMP CBIN1,CBIN0 NOK ! @ P RET ! P PEND ! h P EJECT ! v P* ! VARWRT PROC ! ********** ! * ! 2 -* PACK AND WRITE VARIABLE INFORMATION FOR ! * LEVERAND NO GT
0x3eda90…3edc24 Dummy {f00=0x00fd, f01=0x018e, f02=» B VARW000 " " VARW010 " SET CVARFLG RESERVE BUFFER " . $ * PACK VARIABLE INFORMATION " R P MOVE CVARBUF,CBLANKS " z 2 P PERF XCOP,CVARBUF,=W'0',=W'6',GTLEVNR,=W'0' " * P MOVE GSWBCD7,GTREGF(CBIN10) UDB DATO " 0 P PERF XCOP,C
0x3edc24…3eddb8 Dummy {f00=0x00fd, f01=0x018e, f02=» ( P MOVE GSWBCD7,GTREGF(CBIN12) UDB ]TD # 2 P PERF XCOP,CVARBUF,=W'16',=W'7',GSWBCD7,=W'0' # 0 , P MOVE GSWBCD7,GTREGF(CBIN14) VENT DEBET # f 2 P PERF XCOP,CVARBUF,=W'23',=W'7',GSWBCD7,=W'0' # , P MOVE GSWBCD7,GTREGF(CBIN15) VENT KREDIT # 2 P PERF XCOP,C
0x3eddb8…3edf4c Dummy {f00=0x00fd, f01=0x0190, f02=» # ` 2 P PERF XCOP,CVARBUF,=W'47',=W'2',GTTRKEY,=W'0' $ * WRITE $ > ( $ PERF IDXGET,GTLEVNR,GSWBIN4,GSWBIN5 $ R GSWBIN5 LEV INDEX $ ~ GSWBIN4 INDEX $ BERR VARWNOK DISK ERROR $ P BNOK VARWNOK NOT FOUND $ FOUND $ , P P
0x3edf4c…3ee0e0 Dummy {f00=0x00fd, f01=0x0190, f02=»BIN0,CBIN0 OK $ RET % * % " VARWNOK % , " CLEAR CVARFLG RELEASE BUFFER % < CMP CBIN1,CBIN0 NOK % b RET % ~ PEND % P EJECT % P* % VARINT PROC % ********** % * % $ * INITIATE VARIABLE INFO FOR %
0x3ee0e0…3ee274 (2, 427) Dummy {f00=0x00fe, f01=0x0190, f02=»BIN12),=D'0' UDB ]TD % * P MOVE GTREGF(CBIN14),=D'0' VENT DEBET & * P MOVE GTREGF(CBIN15),=D'0' VENT KREDIT & J ( P MOVE GTREGF(CBIN13),=D'0' VAL DATO & x & ! MOVE GTTRKEY,=W'0' TRANS POINTER & RET & PEND & P EJECT & & & " ID
0x3ee274…3ee408 Dummy {f00=0x00fe, f01=0x0190, f02=» FOR & j * A GIVE LEVNO. ' * ' $ 0 ,* IF FOUND - CONDITION REGISTER IS SET TO OK ' . , '* INDX INDEX IN INDEXFILE ' b " * LEVDEX INDEX LEV ' * ' : 5* IF NOT FOUND - CONDITION REGISTER IS SET TO NOK = 1 ' 2 -*
0x3ee408…3ee59c Dummy {f00=0x00fe, f01=0x0190, f02=» = 2 ' ` * INDEX 0 ( * LEVDEX =0 ( * * ( J 0 ,******************************************** ( T MOVE GSWBIN5,CBIN0 GROUP ( MOVE GSWBIN4,CBIN0 RECORD ( IGET010 ( P ADD GSWBIN4,=W'48' ( ( $ ADD GSWBIN5,CBI
0x3ee59c…3ee730 Dummy {f00=0x00fe, f01=0x0190, f02=» ( Z 8 4 CBL CIXINDX(GSWBIN5),LEVNR,IGET010 KNTNO < MASTER ? ) P B IGET030 TRY NEXT ) D PIGET020 NOT FOUND ) ` & " MOVE INDX,CIXFREE PLACE TO INSERT ) | MOVE LEVDEX,CBIN0 ) CMP CBIN1,CBIN0 NOK ) RET ) ) PIGET030 GROUP FOUND )
0x3ee730…3ee8c4 Dummy {f00=0x00fe, f01=0x018e, f02=»FREE? ) t P DELAY CBIN2 NO, WAIT * P B IGET100 * , PIGET105 * > P SET CIDXFLG RESERVE BUFFER * N IGET110 * r ADD GSWBIN4,CBIN1 * P MOVE GSWBIN5,CBIN7 SIZE * MOVE CIXBUF,CBLANKS * 2 P PERF RAREAD,DK07,=D'7',CIXBUF,GSWBIN5,GSWBIN4 *
0x3ee8c4…3eea58 Dummy {f00=0x00fe, f01=0x0190, f02=» * d $ CBE GSWBCD7,LEVNR,IGET200 FOUND + * % CBG GSWBCD7,LEVNR,IGETNOK1 NOT FOUND + 0 B IGET110 LOOK AT NEXT + ^ PIGET200 FOUND + ~ MOVE INDX,GSWBIN4 SET INDEX + P MOVE GSWBIN1,CBIN5 + . P XCOPY GSWBIN5,CBIN0,CBIN2,CIXBUF,GSWBIN1 + & P
0x3eea58…3eebec Dummy {f00=0x00fe, f01=0x0190, f02=»ETNOK1 + MOVE LEVDEX,CBIN0 , & " MOVE INDX,GSWBIN4 PLACE TO INSERT , ( " P CLEAR CIDXFLG RELEASE BUFFER , R CMP CBIN1,CBIN0 NOK , x RET , PIGET300 SET COND = ERR , MOVE LEVDEX,CBIN0 , MOVE INDX,CBIN0 , " P CLEAR CIDXFLG RELEASE
0x3eebec…3eed80 Dummy {f00=0x00fe, f01=0x0190, f02=»* INSERT GTLEVNR IN INDEXFILE , * - * ********** - 4 ( $ PERF IDXGET,GTLEVNR,GSWBIN4,GSWBIN5 - F GSWBIN5 LEV INDEX - r GSWBIN4 INDEX - BERR XINSNOK DISK ERROR - BOK XINSNOK ALREADY PRESENT - * NOT FOUND, INSERT -
0x3eed80…3eef14 (2, 428) Dummy {f00=0x00fe, f01=0x0190, f02=»FREE,CIXLAST,XINSNOK NO ROOM - P SET CIDXFLG . $ . ) MOVE GSWBIN8,GSWBIN4 PLACE FOR INSERTION . 8 P MOVE GSWBIN1,CBIN7 . j 2 P PERF RAREAD,DK07,=D'7',CIXBUF,GSWBIN1,CIXFREE . 0 P PERF XCOP,GSWBIN7,=W'0',=W'2',CIXBUF,=W'5' . ( # MOVE GSWBIN4,CIXFREE ST
0x3eef14…3ef0a8 Dummy {f00=0x00fe, f01=0x0190, f02=»BL GSWBIN4,GSWBIN8,XINS200 ALL MOVED? . NO. / . MOVE GSWBIN1,CBIN7 / < 2 . PERF RAREAD,DK07,=D'7',CIXBUF,GSWBIN1,GSWBIN4 / X BNOK XINSNOK / ADD GSWBIN4,CBIN1 / * & PERF RAWRIT,DK07,=D'7',CIXBUF,GSWBIN4 / BNOK XINSNOK / $ PERF
0x3ef0a8…3ef23c Dummy {f00=0x00fe, f01=0x0190, f02=»DEX / p 0 + PERF XCOP,CIXBUF,=W'0',=W'5',GTLEVNR,=W'1' 0 0 + PERF XCOP,CIXBUF,=W'5',=W'2',GSWBIN7,=W'0' 0 @ * & PERF RAWRIT,DK07,=D'7',CIXBUF,GSWBIN8 0 t . P MOVE GSWBIN4,GSWBIN8 PLACE FOR INSERTION 0 P PERF RESTIX 0 " CLEAR CIDXFLG RELEASE BUFFER 0
0x3ef23c…3ef3d0 Dummy {f00=0x00fe, f01=0x0190, f02=» P PEND 1 P* 1 P EJECT 1 1 * 1 2 PSETIDX PROC 1 : * %************************************* 1 N * 1 | , (* INITIATE MASTER INDEX FOR LEV-REGISTER 1 , (* IF INDEX EMPTY, SET UP ALL ENTRIES AND 1 * INITIATE SPECIAL ENTRIES 1
0x3ef3d0…3ef564 Dummy {f00=0x00fe, f01=0x0190, f02=»********************** 1 2 MOVE GSWBIN4,CBIN1 2 & P MOVE GSWBIN5,=W'7' 2 B MOVE CIXBUF,CBLANKS 2 ^ 2 P PERF RAREAD,DK07,=D'7',CIXBUF,GSWBIN5,GSWBIN4 2 z ( P CBE GTWBCD1,=D'4',SIDX005 NO DATA ? 2 MOVE GSWBIN5,CBIN0 2 @ ; MATCH CIXBUF,GS
0x3ef564…3ef6f8 Dummy {f00=0x00fe, f01=0x0190, f02=»PY GSWBCD7,CBIN2,CBIN5,CIXBUF,GSWBIN5 GET 1. LEV 2 . P CBNE GSWBCD7,=D'1',SIDX005 IF NOT LEVNR 1 3 8 B SIDX100 3 j " PSIDX005 INITIATE INDEX FILE 3 | , P* INITIATE INDEX FILE WITH BLANK ENTRIES 3 P MOVE GSWBIN4,CBIN0 3 PSIDX050 3 P ADD GSWBI
0x3ef6f8…3ef88c Dummy {f00=0x00fe, f01=0x0190, f02=»X 3 ^ * P PERF RAWRIT,DK07,=D'7',CIXBUF,GSWBIN4 4 P BOK SIDX050 4 8 * OK, FIRST LEV = 0000000000 4 L ( #* LOOP THROUGH INDEX FILE TO SET UP 4 p ( #* MASTER INDEX IN CORE, AND TO FIND 4 * SIZE OF INDEX FILE 4 PSIDX100 4 MOVE CIXLAST,CBIN0
0x3ef88c…3efa20 Dummy {f00=0x00fe, f01=0x0190, f02=» PERF RAREAD,DK07,=D'7',CIXBUF,GSWBIN5,GSWBIN4 READ RECORD 4 , P CBE GTWBCD1,=D'4',SIDX130 FILE EXPANDED 5 B . ) CBE GTWBCD1,=D'10',SIDX130 END OF DEVICE 5 r MOVE GSWBIN5,CBIN0 5 4 / MATCH CIXBUF,GSWBIN5,CBIN2,CBLANKS,CBIN0,CBIN2 5 BE SIDX130 FIRS
0x3efa20…3efbb4 (2, 429) Dummy {f00=0x010c, f01=0x0190, f02=»FREE ENTRY 5 t & " SUB GSWBIN4,CBIN1 LAST USED ENTRY 6 P CBE GSWBIN4,CBIN0,SIDX140 6 < P MOVE GSWBIN5,CBIN7 6 ^ MOVE CIXBUF,CBLANKS 6 z 2 P PERF RAREAD,DK07,=D'7',CIXBUF,GSWBIN5,GSWBIN4 6 PSIDX140 6 PERF RESTIX 6 P PERF INITIX 6 RET
0x3efbb4…3efd48 Dummy {f00=0x010c, f01=0x0190, f02=»* GTLEVNR, IN 6 ( #* INDEXFILE, STAM, AND VAR FILE 7 * 7 F ********** 7 P * 7 b ( $ PERF IDXGET,GTLEVNR,GSWBIN4,GSWBIN5 7 l GSWBIN5 LEV INDX 7 GSWBIN4 INDEX 7 BERR XDELNOK DISK ERROR 7 BNOK XDELNOK NOT FOUND
0x3efd48…3efedc Dummy {f00=0x010c, f01=0x0190, f02=»EL010 7 P SET CIDXFLG RESERVE BUFFER 8 . * PERF RADEL,DK08,GSWBIN5 DELETE STAMRECORD 8 2 . * PERF RADEL,DK09,GSWBIN5 DELETE VAR RECORD 8 d * 8 & ! MOVE GSWBIN7,GSWBIN5 KEEP LEVDEX 8 XDEL100 8 * & ADD GSWBIN4,CBIN1 NEXT RECORD TO MOVE 8 " P
0x3efedc…3f0070 Dummy {f00=0x010c, f01=0x0190, f02=»NOK 8 $ SUB GSWBIN4,CBIN1 WHERE TO MOVE 9 * & PERF RAWRIT,DK07,=D'7',CIXBUF,GSWBIN4 9 4 BNOK XDELNOK 9 b PERF RESTIX 9 x ADD GSWBIN4,CBIN1 9 B XDEL100 9 * 9 XDEL200 INSERT NEW FREE 9 SUB CIXFREE,CBIN1 9 MOVE CIXB
0x3f0070…3f0204 Dummy {f00=0x010c, f01=0x018e, f02=»E 9 | PERF RESTIX : " CLEAR CIDXFLG RELEASE BUFFER : CMP CBIN0,CBIN0 OK : D RET : ` * : l XDELNOK : v " CLEAR CIDXFLG RELEASE BUFFER : CMP CBIN1,CBIN0 NOK : P RET : P PEND : P* : P EJECT : : RESTIX
0x3f0204…3f0398 Dummy {f00=0x010c, f01=0x0190, f02=» : ` ; ( # MOVE GSWBIN3,GSWBIN4 FIND GROUP NO ; P ADD GSWBIN3,=W'47' ; < * P DIV GSWBIN3,=W'48' GSWBIN3 = GROUP NO ; X P SUB CIXFREE,CBIN1 LAST USED ; * P CBE GSWBIN4,CIXFREE,RIX090 LAST USED ; " P ADD CIXFREE,CBIN1 FIRST FREE ; 2 . CBE GSWBI
0x3f0398…3f052c Dummy {f00=0x010c, f01=0x0190, f02=»N4 ; ~ * % BNE RIXOK FINISHIF NOT LAST IN GROUP < & ! MOVE GSWBIN5,CBIN0 LAST IN GROUP < 8 $ MOVE GSWBCD7,=D'1' SET SIGN = + < b : P XCOPY GSWBCD7,CBIN2,CBIN5,CIXBUF,GSWBIN5 GET LAST NO < " MOVE CIXINDX(GSWBIN3),GSWBCD7 < B RIXOK < PRIX090 <
0x3f052c…3f06c0 Dummy {f00=0x010c, f01=0x0190, f02=»OVE GSWBCD7,=D'1' SET SIGN = + < . P XCOPY GSWBCD7,CBIN2,CBIN5,CIXBUF,GSWBIN5 = & 4 / MOVE CIXINDX(GSWBIN3),GSWBCD7 SET MASTER INDEX = X " RIX120 SET REMAINING INDICES = P CBG CIXLAST,CBIN0,RIX135 = PRIX125 = P ADD GSWBIN5,CBIN1 = P MOVE GS
0x3f06c0…3f0854 (2, 430) Dummy {f00=0x0111, f01=0x0190, f02=»,=D'4',RIX155 FILE EXPANDED = P B RIX125 > $ RIX130 > 6 P SUB GSWBIN5,CBIN1 > D 2 P MOVE CIXLAST,GSWBIN5 LAST ENTRY IN INDEX FILE > ^ PRIX135 > P MOVE GSWBIN5,CIXLAST > P ADD GSWBIN5,=W'47' > " P DIV GSWBIN5,=W'48' LAST GROUP > RIX140
0x3f0854…3f09e8 Dummy {f00=0x0111, f01=0x0190, f02=» PRIX150 ? P ADD GSWBIN5,CBIN1 ? PRIX155 ? , & P MOVE CIXBUF,CBLANKS CLEAR BUFFER ? : P MOVE GSWBIN1,CBIN0 ? d 8 P XCOPY CIXBUF,CBIN5,CBIN2,GSWBIN5,GSWBIN1 SET INDEX ? * P PERF RAWRIT,DK07,=D'7',CIXBUF,GSWBIN5 ? P BOK RIX150 ? P B RIX130
0x3f09e8…3f0b7c Dummy {f00=0x0111, f01=0x0190, f02=»********** ? r * @ P* SET UP INDEXFILE 1. TIME @ * P* CHECK IF SYSTEM DEFINED ENTRIES @ > ( P* ARE PRESENT, ELSE INSERT THEM @ l * @ . P* NEXT 15 RECORDS, LEV 1-15, POINTS TO @ * P* DIFFERENT SYSTEM DEFINED LISTS, @ P*
0x3f0b7c…3f0d10 Dummy {f00=0x0111, f01=0x0190, f02=»XGET,GTLEVNR,GSWBIN4,GSWBIN5 @ P GSWBIN5 LEV INDEX A $ P GSWBIN4 INDEX A B P BERR INITNOK DISK ERROR A & P BNOK INIT100 NOT FOUND, INITIATE A | P B INITOK A P* A PINIT100 A ( P* INSERT SYSTEM DEFINED ENTRIES A P CBG GTLEV
0x3f0d10…3f0ea4 Dummy {f00=0x0111, f01=0x0190, f02=»F LEVWRT A P PERF VARINT B P PERF VARWRT B $ P BNOK INIT200 B 8 PINIT150 B N P ADD GTLEVNR,=D'1' B ^ P B INIT100 B x P* B PINIT200 B P PERF IDXDEL B P B INIT150 B P* B PINITNOK B P CMP CBIN1,CBIN0 NOK B P RET B
0x3f0ea4…3f1038 Dummy {f00=0x0111, f01=0x018e, f02=» B | RET C PEND C C " P EJECT C * P* C 8 PGETNXT PROC C B & P********************************* C V P* C * P* GET LEVNR FOR LEV FOLLOWING GTLEVNR C P* C & P********************************* C ( P PERF IDXGET,GTLEVNR,GSWBIN4
0x3f1038…3f11cc Dummy {f00=0x0111, f01=0x0190, f02=» P DELAY CBIN2 D P B GNXT100 D PGNXT110 D * P SET CIDXFLG D : P ADD GSWBIN4,CBIN1 D N " P CBNL GSWBIN4,CIXFREE,GNXTNOK D h P MOVE GSWBIN1,CBIN7 D P MOVE CIXBUF,CBLANKS D 2 P PERF RAREAD,DK07,=D'7',CIXBUF,GSWBIN1,GSWBIN4 D P BNOK GNXTNO
0x3f11cc…3f1360 Dummy {f00=0x0111, f01=0x0190, f02=» RET D PGNXTNOK E P CLEAR CIDXFLG E P CMP CBIN1,CBIN0 E 2 P RET E J P PEND E V P EJECT E d PCHDATO PROC E r P********** E P* E & P* CHANGES GSWBCD6 (DDMMYY) TO E P* GSWBCD7 (YYMMDD) E P* E P********** E P
0x3f1360…3f14f4 (2, 431) Dummy {f00=0x0111, f01=0x0190, f02=» 0 P PERF XCOP,GSWBCD7,=W'4',=W'1',GSWBCD6,=W'6' F P RET F 8 P PEND F D P EJECT F R P* F ` , PXCOP PROC TO,$TOPNT,$SIZE,FROM,$FROMPNT F j P PLIT $TOPNT F P PLIT $SIZE F P PLIT $FROMPNT F P* F P* FUNCTION XCOPY: F @ P* TH
0x3f14f4…3f1688 Dummy {f00=0x0111, f01=0x0190, f02=»S $SIZE F P* G 2 P MOVE GSWBIN1,$TOPNT START OF RECEIVING FIELD G P MOVE GSWBIN4,$SIZE LENGTH G P 2 P MOVE GSWBIN5,$FROMPNT START OF SENDING FIELD G r * P XCOPY TO,GSWBIN1,GSWBIN4,FROM,GSWBIN5 G P RET G P PEND G G P EJECT G $ PFL
0x3f1688…3f181c Dummy {f00=0x0111, f01=0x0190, f02=»9999999',GTLEVNR G P FILLR ' ',14 H P FMEL '99E-99E-99',GTLEVDAT H . P FNL H R P FILLR ' ',18 H ^ P FCOPY GTLEVNVN H t P FNL H P FILLR ' ',18 H P FCOPY GTLEVADR H P FNL H P FILLR ' ',18 H P FCOPY GTLEVBY H P FNL H
0x3f181c…3f19b0 Dummy {f00=0x0111, f01=0x0190, f02=»L '9',GTLEVBFO H P FILLR ' ',2 I P FMEL 'XXXXXXX',GTLEVGI I * P FILLR ' ',2 I J P FMEL 'XXXXXXXXXX',GTLEVALT I ^ P FNL I P FNL I P FBF GTDYFLG,FLEV190 I P FNL I P FILLR ' ',18 I & P FMEL '99E-99E-99',GTREGF(CBIN10) I , P FMEL
0x3f19b0…3f1b44 Dummy {f00=0x0111, f01=0x0190, f02=» FILLR ' ',18 I & P FMEL '99E-99E-99',GTREGF(CBIN13) J P FILLR ' ',8 J @ , P FMEL 'BZZZVZZZVZZ9E,99-',GTREGF(CBIN14) J T P FNL J P FILLR ' ',34 J , P FMEL 'BZZZVZZZVZZ9E,99-',GTREGF(CBIN15) J P FNL J P FILLR ' ',34 J , P FMEL 'BZZZVZZZV
0x3f1b44…3f1cd8 Dummy {f00=0x0111, f01=0x40be, f02=»0 J | P FNL K PFLEV200 K P FMEND K & P* K 4 P* K > P* K H PFFEED FRMT K R P FILLR '1',2 K d P FMEND K x P* K P* K P* K P* K P END K @ K ',GTREGF(CBIN15) J P FNL J P FILLR ' ',34 J , P FMEL 'BZZZVZZZV
0x3f1cd8…3f1e6c Dummy {f00=0x0111, f01=0x2008, f02=» L
0x3f1e6c…3f2000 Dummy {f00=0x0111, f01=0x0190, f02=»Y P _$ SZ Q V P V Q W Q 7 Y P._6 & Q 9d! )0 + P 7 Y Z $ _ : V ) 0 | !0 | " TV *V &V : V S W P 9 S W _ V P W T V E + : & 6 | [
0x3f2000…3f2194 (2, 432) Opaque[0x194]
0x3f2194…3f2328 # DirEnt {nam=»KMD08T«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x29d8, f03=0x0000}
0x3f2194…3f2328 IdxSect {
0x3f2194…3f2328 f00 = 0x014e // 0x3f2194 @0x0
0x3f2194…3f2328 f01 = 0x0010 // 0x3f2196 @0x2
0x3f2194…3f2328 gno = [ // 0x3f2198 @0x4
0x3f2194…3f2328 [0x00]: C0x014e.0x3.0
0x3f2194…3f2328 [0x01]: C0x014f.0x0.0
0x3f2194…3f2328 [0x02]: C0x014f.0x1.0
0x3f2194…3f2328 [0x03]: C0x014f.0x2.0
0x3f2194…3f2328 [0x04]: C0x014f.0x3.0
0x3f2194…3f2328 [0x05]: C0x0150.0x0.0
0x3f2194…3f2328 [0x06]: C0x0150.0x1.0
0x3f2194…3f2328 [0x07]: C0x0150.0x2.0
0x3f2194…3f2328 ]
0x3f2194…3f2328 }
0x3f2328…3f24bc Dummy {f00=0x014e, f01=0x0190, f02=» P IDENT KMD08 03.01.XXX.1 < P******************************************************** & P* f 4 P* THIS IS THE MAIN MODULE FOR KMDAPLICATION p 2 P* CONTAINING THE CWB'S, TWB'S AND INITIAL P* START POINTS P* P*
0x3f24bc…3f2650 Dummy {f00=0x014e, f01=0x018e, f02=»RETAGET IFM DECENTRAL PRINT: ( P* TILF JET: TERM LA, MED TILBEHLR $ & P* STARTADRESSE 'LPGO' P < P* NDRET: CNFHC FRA BINI (16),'1','2', ....... TIL z 0 P* STRGI (16),'GA','GB',........ P* DELETED: I KBVGO:
0x3f2650…3f27e4 Dummy {f00=0x014e, f01=0x0190, f02=» P* $ P* TRANSACTION TASK TC P* 6 8 P**************************************************** @ P TERM TC | P* P CWB CB1 P CWB CB2 P CWB CB3 P CWB CB4 P CWB CB6 P DWB CD3(CB3) P DWB CD4(CB4
0x3f27e4…3f2978 Dummy {f00=0x014e, f01=0x0190, f02=» P* PFD01 DSET FC=F8 VOL 999001 PFD02 DSET FC=F9 VOL 999002 4 & PKVOUCH DSET FC=31,DEV=TV,BUFL=100 V 2 PKJTAPE DSET FC=30,DEV=TJ,BUFL=70,BUFDS=KVOUCH 2 PKTALLY DSET FC=32,DEV=TR,BUFL=30,BUFDS=KVOUCH PSCREEN DSET FC=50,BUFL=56
0x3f2978…3f2b0c Dummy {f00=0x014e, f01=0x0190, f02=» CYCLE SET x $ PDK04 DSET FC=C4 FD999004 KT PLAN PDSSOPI DSET FC=10 : PDSSOPO DSET FC=11 T PDCOMM DSET FC=61 n PKCASS DSET FC=12 PDK05 DSET FC=C5 PDK06 DSET FC=C6 PDK07 DSET FC=C7 PDK08 DSET FC=C8 PDK09 DSET
0x3f2b0c…3f2ca0 Dummy {f00=0x014e, f01=0x0190, f02=»T FC=CD TRANSACTIONS PFD03 DSET FC=FA VOL 999003 PFD04 DSET FC=FB VOL 999004 > " P FMTCTL INDS=KEYB,OUTDS=SCREEN ` P* P START REGGO P STACK 160 P EJECT P* P* P* P* DATA DIVISION P* P*
0x3f2ca0…3f2e34 (2, 433) Dummy {f00=0x014f, f01=0x0190, f02=»GO P* PDSDC DSET FC=61 $ PDSICR DSET FC=E0,DEV=II COPCMD=1 , PDSICW DSET FC=E1,DEV=IO T $ PDSVDU DSET FC=50,DEV=DY,BUFL=162 t $ PDSKBAN DSET FC=20,DEV=KA,BUFL=2 $ PDSKBSD DSET FC=40,DEV=KI,BUFL=2 P EJECT P* P*
0x3f2e34…3f2fc8 Dummy {f00=0x014f, f01=0x018e, f02=»* PDSDC DSET FC=61 PDSICR DSET FC=E0,DEV=II " $ PDSICW DSET FC=E1,DEV=IO COPCMD=1 B $ PDSGTP DSET FC=30,DEV=GP,BUFL=162 j P* P* P* LINE PRINTER P* P* P TERM LA P* P CWB CB9 P TWB TB9
0x3f2fc8…3f315c Dummy {f00=0x014f, f01=0x0190, f02=» $ PDSLP DSET FC=80,DEV=LP,BUFL=162 P EJECT , P* : P* D P* DCTASK N P* ^ P* h P TERM D0 r P* P CWB CB9 P START DC1GO PDSDC DSET FC=60 P* P EJECT P* P* 4 P* WORK AREA FOR
0x3f315c…3f32f0 Dummy {f00=0x014f, f01=0x018e, f02=» 4X'0' KEYBARD/VDU/PRINTER & PBVDU STRG 3840X'0' VDU SCREEN BUFF " ( PPCURS STRG 4X'0' CURSOR ADDR. BINARY L . PATTRIB STRG 4X'0' LAST ATTRIBUTE CHARACTER x & PCURATT STRG 4X'0' CURSOR ATTRIBUTE $ PWCC STRG 4X'0' WCC/CCC CHARACTER , PKBINH STRG 4
0x3f32f0…3f3484 Dummy {f00=0x014f, f01=0x0190, f02=» * PINTATT STRG 4X'0' INTENSITY ATTRIBUTE " POFFFLG STRG 4X'0' OFFLINE FLAG 2 PCOPNO BIN TID FOR HARDCOPY X PMISCAR STRG 44X'0' CCC,MAIN, | P MODE,KEYS,ECBDCC,ECBBLK, PSTRG2 STRG 4X'0' DK P EJECT P P******************
0x3f3484…3f3618 Dummy {f00=0x014f, f01=0x0190, f02=» PCB9 BLK P* PCNFIGD BOOL PCNFBSY BOOL 2 P* F P* CONFIGURATION DATA P P* n " PNBRKBV BIN NUMBER OF KB/VDUS x PNBRGTP BIN NUMBER OF GTPS P* : PMF1KBV STRG 32X'40C1C2C3C4C5C6C7' DV ADDRESSES KB/VDU 6 P
0x3f3618…3f37ac Dummy {f00=0x014f, f01=0x0190, f02=» ( PMF1CU STRG X'6040' CU-ADDRESS MF # 1 P* 4 > PCNFHC STRGI (16),'GA','GB','GC','GD','GE' HARDCOPY PRINTER > P FOR KB-VDU 1-16 P* PBINWK1 BIN P* 6 POFF STRGI (12)2C'TC','TD','TE','TF','TG','TH', C $ P 'TI','TJ','T
0x3f37ac…3f3940 Dummy {f00=0x014f, f01=0x0190, f02=»OWED j 0 PCKTFLAG BOOL FALSE F=NO SALDO AT ALL IN KORT . PCCLKTFLG BOOL FALSE T=KONTOKORT I KASSELUK @ 0 PCTESTFLG BOOL FALSE T=CONVERSION, TEST MODE r , PCTRVALG BOOL FALSE T: SKOVBO. F: VIBORG . PCFLT46 BOOL FALSE T=SPECIAL FIELD 46,TR=8 . P
0x3f3940…3f3ad4 (2, 434) Dummy {f00=0x014f, f01=0x0190, f02=»SMISSION j . PCCYWRTF BOOL FALSE T=DO NOT USE CYCLE SET 2 PCADM22F BOOL FALSE T=ALLOWED FUNCTION (ADM 22) B PC5MDISK BOOL FALSE T=5M DISK x * PCKASFLG BOOL TRUE T=BACKUP ON CASSETTE 4 PCSLDFLG BOOL TRUE T=GL.SALDO PRESENT(CKTFLAG=T) , PCGLREG
0x3f3ad4…3f3c68 Dummy {f00=0x014f, f01=0x0190, f02=»2 BIN '2' PCBIN3 BIN '3' PCBIN4 BIN '4' ( PCBIN5 BIN '5' > PCBIN6 BIN '6' T PCBIN7 BIN '7' j PCBIN8 BIN '8' PCBIN9 BIN '9' PCBIN10 BIN '10' PCBIN11 BIN '11' H PWEIGTH BCDI (13),'2','7','6','5','4','3','2'
0x3f3c68…3f3dfc Dummy {f00=0x014f, f01=0x0190, f02=»2 BLK P* & PCPFLG BOOL FALSE T: DISK OCCUPIED ( PCSPLITFL BOOL FALSE T: SPLIT RECORD B " PCWFLAG BOOL FALSE F=COLD START n " PCREMITFL BOOL FALSE F=NO REMIT & PCSKIFTFL BOOL FALSE T=FD CHANGING ( PCEORFLG BOOL FALSE T=END OF A RECORD
0x3f3dfc…3f3f90 Dummy {f00=0x014f, f01=0x0190, f02=»ERSION GOING ON v $ PCSWFLAG BOOL FALSE SCRATCH FLAG 2 PCSKIFTWN BOOL FALSE T=WARNING ABOUT FD CHANGE @ . PCKFLAG BOOL FALSE T=EXCL ACCESS, KNT. PLAN v P* P* P* PCBIN12 BIN '12' PCBIN13 BIN '13' PCBIN14 BIN '14'
0x3f3f90…3f4124 Dummy {f00=0x014f, f01=0x0190, f02=» '20' PCBIN21 BIN '21' PCBIN22 BIN '22' & PCBINMAX BIN '26' > P EJECT V @ P*********************************************************** d P* : P* TABLE GIVING INDEXES FOR TRANSACTIONFIELDS 4 P* FIELD NR GIV
0x3f4124…3f42b8 Dummy {f00=0x014f, f01=0x0190, f02=» : P '26','26','26','26','1','2','3','4','5','6', 1-10 C < P '7','8','9','4','11','12','10','11','12','13', 11-20 C B > P '10','11','12','13','14','15','16','1','8','9', 21-30 C < P '10','5','12','13','14','5','18','19','7','7', 31-40 C @ P '1
0x3f42b8…3f444c Dummy {f00=0x014f, f01=0x0190, f02=»','12','13','6','26','26','26','26', 61-70 C @ P '26','26','26','26','26','26','26','26','26','26', 71-80 C 4 > P '19','26','26','26','26','26','26','26','26','26' 81-90 x PCCNTDEX BINI (11), C 2 P '1','2','3','4','5','1','5','6','6','5','0'
0x3f444c…3f45e0 Dummy {f00=0x014f, f01=0x0190, f02=»N W'56' PCMAXLIN BIN W'54' PCMINLIN BIN W'2' * PCCONBUF0 STRG 398X'FF' B PCCONBUF1 STRG 398X'FF' ` PCCONBUF2 STRG 398X'FF' ~ PCCONBUF3 STRG 398X'FF' PCCONBUF4 STRG 398X'FF' PCCONBUF5 STRG 398X'FF' PCCONBUF6 STRG 398X
0x3f45e0…3f4774 (2, 435) Dummy {f00=0x014f, f01=0x0190, f02=»'TG','TH', C j $ P 'TI','TJ','TK','TL','TM','TN' P* > P EJECT H PCB4 BLK V P* f P* p P* z P* P* PCMAXTASK BIN NO OF TASKS " PCTASKNR BIN NO. OF 0PEN TASKS PCRECLGD BIN W'128' $ PCRECNR BIN PH
0x3f4774…3f4908 Dummy {f00=0x014f, f01=0x0190, f02=»NP STRG 4 PASVOL STRG 6 PASFNAME STRG 8 & PCKMDNAM STRG 6'OD-KOM' < , PCVERSNR BCD 10D'01014610' VERSION NUMBER Z PCBLANKS STRG X'2020' PCPCKBUF STRG 128 PACKBUFFER P* TEXT FOR BKO & P* ONLY RELEVANT IF EI
0x3f4908…3f4a9c Dummy {f00=0x014f, f01=0x0190, f02=» 99 0' & PCREGTAB BCDI (25,2),'01','-01', C P '02','-01', C > P '03','-01', C V P '04','-01', C n P '05','-01', C P '06','-01', C P '07','-01', C P '08','-01', C P '09','-01', C P '10','-0
0x3f4a9c…3f4c30 Dummy {f00=0x014f, f01=0x0190, f02=»'46','-01', C P '47','-01', C P '48','-01', C . P '49','-01', C F P '50','-01', C ^ P '51','-01', C v P '52','-01', C P '53','-01', C P '54','-01', C P '-01','-01' P* P EJECT P*
0x3f4c30…3f4dc4 Dummy {f00=0x014f, f01=0x0190, f02=»T: OUTPUT ON TALLY & PCTXTFLG BOOL F T: TEXTBUF OCCUPIED P* D P* N , PCCYSIZE BIN '30' MAX SIZE OF CYCLE PAGE X , PCKTLAST BIN '0' LAST RECORD USED, KTPLAN 4 PCMAXREC BIN W'1400' GIVES WARNING OF FULL REGSET * PCGLRECNR BIN '0' LAST RE
0x3f4dc4…3f4f58 Dummy {f00=0x014f, f01=0x0190, f02=»CORD v PHCDEV BIN '1' 1=GTP, 2=LP & PCREMPT1 BIN RECORDPOINTER TXTSET . PCREMPT2 BIN X , PLINES BIN '48' LINES AVAILABLE ON GTP/LP l PPAGESIZE BIN '48' PTXTKODE BCD 4D'0' PTXTTEXT STRG 22 PCTXBUF STRG 24 . PCKTINDX BC
0x3f4f58…3f50ec Dummy {f00=0x014f, f01=0x0190, f02=» STRG 128 CYSET BUFFER " PCKTBUF STRG 128 KTPLAN BUFFER . PCKTTOP BCD 4D'5' FIRST LINE KORT (DEFAULT) D : PON STRGI (12)2C'KA','KB','KC','KD','KE','KF','KG', C v P 'KH','KI','KJ','KK','KL' P EJECT P* PTB1 BLK P* P
0x3f50ec…3f5280 Dummy {f00=0x014f, f01=0x0190, f02=»USE STATE z ( PTTSUMFLG BOOL FALSE SUM ON SCREEN ? . PTTTSTFLG BOOL FALSE FIRST ENTRY IN CYKLE ? > ( PTTINVFLG BOOL FALSE INDICATE MODPOST p & PTTJTEND BOOL FALSE END OF JOURNAL * PTTEORFLG BOOL FALSE *-- END OF RECORD ( PTTSUPFLG BOOL FALSE
0x3f5280…3f5414 (2, 436) Dummy {f00=0x014f, f01=0x0190, f02=»REMOTE TERMINAL z , PTTKORTFL BOOL FALSE T: IN KONTOKORT MODE PTTASKAT BOOL FALSE T=BKO 51 H P* l PTTDKDEX BIN v " PTTSTYRDX BIN '1' HBOG/DEBP/REM PTTTROLD BIN NO OF OLD TRANS PTTASKNR BIN PTTDKBCD BCD 2 D/K VALUE $ P
0x3f5414…3f55a8 Dummy {f00=0x014f, f01=0x0190, f02=»4 LINE NR ON VOUCHER $ PTTCNTNR BCD 4 COUNTER TAELLER NR " PTTEJEDB BCD 14 TOTAL OF EJ EDB D PGTMSK BCD 6D'999' j PGTDATO BCD 8X'FFFFFFFF' PTSWBCD2 BCD 2 *-- & PTTCYM STRG 1 CYKLE MARK ON JOURNAL . PGTREGF BCDI (26),16X'F' TRANSACT
0x3f55a8…3f573c Dummy {f00=0x014f, f01=0x0190, f02=»L FALSE PGTREGFLG BOOL FALSE PGTCYFLG BOOL FALSE , PGTTFLG BOOL FALSE CLOSE ? F * PGTCLRN BOOL FALSE *-- SPCLRN OR SPCLRA h PGTTYPE2 BOOL FALSE *-- PGTTYPE3 BOOL FALSE *-- 4 PGTKASSE BOOL FALSE *-- TRUE- IN KASSE FUNCTIONS 4
0x3f573c…3f58d0 Dummy {f00=0x014f, f01=0x0190, f02=»SELECTED n * PGTMASTFL BOOL FALSE T=MASTER TERMINAL ! " PGTASUMFL BOOL FALSE T=AUTO SUM ! > " PGTSUBFLG BOOL FALSE T=SUBTOTAL ! d P* ! PGSWBIN1 BIN ! PGSWBIN2 BIN ! PGSWBIN3 BIN ! PGSWBIN4 BIN ! PGSWBIN5 BIN ! PGSWBIN6 BIN !
0x3f58d0…3f5a64 Dummy {f00=0x014f, f01=0x0190, f02=»GSWBCD7 BCD 14 ! PGTWBCD1 BCD 14 " PGTWBCD2 BCD 14 " , & PGTSTRFMT STRG 7 STRING FOR FORMATS " B P EJECT " l PGB2 BLK " z P* " P* " P* " P* " P* " PSPPROMPT BOOL FALSE " PSPCHANGE BOOL FALSE " 2 PSPDUPL BOOL FALSE TR
0x3f5a64…3f5bf8 Dummy {f00=0x014f, f01=0x0190, f02=» " PSPWARNFL BOOL FALSE T: WARNING # P* # * P* # 4 P* # > PSPBINW1 BIN # H PSPBINW2 BIN # PSPBINW3 BIN # p PSPBINW4 BIN # PSPBINW5 BIN # PSPKEY BIN '1' # ( PSPERASE BIN '0' 0:ERASE; 4:NO ERASE # PSPLINTOP BIN # PSPLINL
0x3f5bf8…3f5d8c Dummy {f00=0x014f, f01=0x018e, f02=»GSSWITCH BINI (26) # PGTUSED BINI (26) $ P* $ 2 P EJECT $ < PGB3 BLK $ J P* $ Z PPSIGNFLG BOOL FALSE $ d PBCPR BOOL FALSE T=CPR F=CIR $ " PBLEV BOOL FALSE T=LEV., F=CPR $ PGTDYFLG BOOL FALSE T=DISPLAY $ PGTSPGFLG BOOL FALSE $ 2
0x3f5d8c…3f5f20 Dummy {f00=0x014f, f01=0x0190, f02=» & PGTSUMKEY BOOL FALSE SUM INDIKATOR % " PGTNWFLG BOOL FALSE T= USE .NW % . , PGTADMFLG BOOL FALSE T= IN ADM FUNCTIONS % T * PGTLOKSPG BOOL FALSE T=LOKAL INQUIRIES % 6 PGTSLDFLG BOOL FALSE T=SALDO PRESENT. F=NOT PRESENT % 0 PGTGLSPG BOOL FALSE T=INQUIRI
0x3f5f20…3f60b4 (2, 437) Dummy {f00=0x0150, f01=0x0190, f02=» % PGTCYSUM BCD 14 & PGTREGNR BCD 3 TRANSTYPE & " PGTDBKRS BCD 2 SIGN FOR AMOUNT & > , PGTSUMST BCD 6 1. NUMBER FOR SUM FUNCTION & d , PGTSUMCNT BCD 14 COUNTER FOR SUMFUNCTION & " PGTL8TXT STRG 8 TEXT FOR LINE 8 & PSPINPUT STRG 20 & PGSWSTR
0x3f60b4…3f6248 Dummy {f00=0x0150, f01=0x0190, f02=»CYWRTF BOOL FALSE T=NO WRITE ON CYSET & , PGTCYTRPF BOOL FALSE T=TRANSPORT IN CYCLE ' . PGTVDUFLG BOOL F ' ^ P* ' v P* ' P* ' P* ' ( PGTPSELIN BIN '0' LINE NO. WHEN PAUSE ' " PGTCYIN BIN NEXT USED, CYCSET ' " PGTCYOUT BIN NEXT FREE,
0x3f6248…3f63dc Dummy {f00=0x0150, f01=0x0190, f02=»TYP BCD 4D KTPLAN TYPE ' P* ( P* ( ( P* ( 2 P* ( < P* ( F P EJECT ( P PGB5 BLK ( ^ PGTLEVNR BCD 10 ( n PGTLEVPNR BCD 4 ( PGTLEVBFO BCD 1 ( PGTLEVGI BCD 7 ( PGTLEVALT BCD 10 ( PGTLEVTKO BCD 1 ( PGTLEVNVN STRG 30 (
0x3f63dc…3f6570 Dummy {f00=0x0150, f01=0x0190, f02=» P* ) P EJECT ) PTB2 BLK ) P* ) , P* ) 6 P* ) @ P* ) J PGTDBKRC STRG 4 DEB/KRE TEXT ) T PGTTESTMK STRG 1 ) x $ PTTSUPMRK STRG 1 SUPPLEMENT MARK ) PTTSUMMRK STRG 1 SUM MARK ) PGTTEXT STRG 6 ) PTTSPARE3 STRG 1C'.' )
0x3f6570…3f6704 Dummy {f00=0x0150, f01=0x0190, f02=»T, LINIE NR ) z ( PTTKTCHK BCD 2 KONTOKORT, CHECKCIFFER * . PTTDBKRM STRG 1C'K' DEB/KRE MARK ON JOURNAL * @ $ PTT16TXT STRG 3 RENTE/GEBYR/RATE * r PTT07TXT STRG 5 BKO TEXTS * & PGTDUPF BCDI (26),16X'F' DUP FIELDS * P* * P* * P EJECT * PCD
0x3f6704…3f6898 Dummy {f00=0x0150, f01=0x0190, f02=»HOLDNINGER * x . PCTR12NR BCDI (60),12D EJ-EDB ACCOUNT NOS. + PCRELDAY BCD 4X'FFFF' + D PCCONFREC BCD 6 + ` * PC12ACC BCDI (60,2),14D EJ-EDB COUNTERS + v P* + P* + P* + PCD4 DBLK + P* + P* + P* + P* + P* + PDUMC
0x3f6898…3f6a2c Dummy {f00=0x0150, f01=0x0190, f02=»,8 + PCVOLNO BCD 6 VOLUME NUMBER , PCKMDNR BCD 6D KOMMUNE NR , , PCMASKDAT BCD 8X'FFFFFFFF' , L PCVOL STRGI (4),6 , n P* , P EJECT , PTD2 DBLK , P* , P* , P* , P* , P* , PTTINF1 STRG 14 , . PTTRECOPN BCD 6 REC
0x3f6a2c…3f6bc0 Dummy {f00=0x0150, f01=0x0190, f02=»RIMO CASH AMOUNT , ~ " PTTCASHAC BCD 12D CASH ACC. NR - " PTVERSUR BCD 12D VERSUR ACC NR - > & PTTCASH BCD 14D CURRENT CASH AMOUNT - d $ PTTLBNR BCD 6D CURRENT EKSP.LBNR - ( PTTACC BCDI (8,2),16D'0' EDB COUNTERS - , PTTGLREC BCD 6 SAVE RECORD NO, GL REGSE
0x3f6bc0…3f6d54 (2, 438) Dummy {f00=0x0150, f01=0x0190, f02=» - P ENTRY LPGO . P EXT T1GO . P EXT DCTASK . . P EXT VDUKB . B P EXT PRINT . T P EXT SWITCH . f " P EXT GETTID GET TASK IDENTITY . z ( P ENTRY OFFLNE OFFLINE START ADDRESS . P ENTRY ONLINE . P EJECT . & P DSC0 DSDC,2 DUMMY REFER
0x3f6d54…3f6ee8 Dummy {f00=0x0150, f01=0x0190, f02=»************************** . P / " PREGGO / * P B T1GO / 8 P / H P / P , P**************************************** / X P* / ( P* START ADDRESS FOR KEYBOARD TASK / , P**************************************** / PKBVGO / P ADD NBRKBV,
0x3f6ee8…3f707c Dummy {f00=0x0150, f01=0x018e, f02=» / x . P MOVE STRG2,OFF(TCT01) GET OFFLINE TASK ID 0 " P CBE STRG2,=C' ',KB050 ANY ? 0 : " P PAUSE YES, WAIT FOR RESTART 0 ` PKB050 0 P CALL VDUKB,TCT01 0 & P PERF OFFLNE BRANCH TO CREDIT CODE 0 * P B KB050 RETURN TO IBM-3270 EMULATION 0 P 0
0x3f707c…3f7210 Dummy {f00=0x0150, f01=0x0190, f02=» 2 P********************************************* 1 P 1 : PGTPGO 1 B P ADD NBRGTP,='1' 1 P P CALL GETTID,TCT01 1 h P SUB TCT01,=X'4740' 1 P MOVE PRINTER,=X'0001' 1 P* PERF CONF 1 P CALL PRINT,TCT01 1 P 1 4 P**********************
0x3f7210…3f73a4 Dummy {f00=0x0150, f01=0x0190, f02=»************ 1 l P 2 PLPGO 2 P MOVE PRINTER,=X'001' 2 ( P MOVE TCT01,=W'2' 2 F P CALL PRINT,TCT01 2 ` P 2 z P 2 4 P*********************************************** 2 P* 2 " P* START ADDRESS FOR DC-TASK 2 P* 2 & P************
0x3f73a4…3f7538 Dummy {f00=0x0150, f01=0x0190, f02=»***** 2 x P* 3 P* RESTART OFF LINE TASK 3 P* 3 < P**************************** 3 F P 3 j POFFLNE PROC 3 r 2 P MOVE STRG2,OFF(TCT01) GET OFF LINE TASK NAME 3 * P CBE STRG2,=C' ',RETOFF ANY OFFLINE ? 3 P RSTRT STRG2 YES 3 P PAUSE
0x3f7538…3f76cc Dummy {f00=0x0150, f01=0x4134, f02=»INE TASK 3 ~ P* 4 " P****************************** 4 P 4 @ PONLINE PROC 4 H 2 P MOVE GSWSTR2,ON(TTASKNR) GET ONLINE TASK NAME 4 , P CBE GSWSTR2,CBLANKS,RETON ANY ON LINE ? 4 P RSTRT GSWSTR2 YES 4 P PAUSE 4 PRETON 4 P RET 4 P PEN
0x3f76cc…3f7860 Dummy {f00=0x0150, f01=0x2008, f02=» 5 CBE GSWSTR2,CBLANKS,RETON ANY ON LINE ? 3 P RSTRT GSWSTR2 YES 3 8 P PAUSE 3 R PRETON 3 ` P RET 3 n P PEND 3 z P* 3 P 3 P END 3 @ 3 P* 2 P 2 P 2 P************************** 2 P* 2 P* RESTART ON LINE
0x3f7860…3f79f4 (2, 439) Dummy {f00=0x0150, f01=0x0190, f02=» % * & & $ * & & R * & ) & * & G & * & e & *
0x3f79f4…3f7b88 Dummy {f00=0x0150, f01=0x0190, f02=» * & ' * & ' 2 * & ' ` * & 7 ' * & U ' * & s
0x3f7b88…3f7d1c Dummy {f00=0x0150, f01=0x018e, f02=» ' t * & ( & ( @ & ' ( V & E ( f & c ( v & ( & ( & ( & ( & ( & ( & 5 ( & S ( &
0x3f7d1c…3f7eb0 Dummy {f00=0x0150, f01=0x4098, f02=» ( & ) & ) * & TCTDTETFTGTHTITJT ) ( KTLTMTN* ) V ) n ) @ ) ( & ( & ( & ( & ( & 5 ( & S ( &
0x3f7eb0…3f8044 Dummy {f00=0x0150, f01=0x40f4, f02=» : H IDENT D:CB30 TRA 4.1 80-03-07 F2 O2222 03.01.XXX.1 * D:CB30 * B D:CB30C * T * & F * h * & _ & { B * = * F * @ * & S ( &
0x3f8044…3f81d8 Dummy {f00=0x0150, f01=0x0190, f02=» : H IDENT C:CB40 TRA 4.1 80-03-07 F2 O2222 03.01.XXX.1 + C:CB40 + B C:CB40C + T * & + h * & + * & = + * & [
0x3f81d8…3f836c Dummy {f00=0x0150, f01=0x4188, f02=» + | * & OD-KOM , & F , H & , ^ & - , n & K , ~ * & i 0000899 0 , * & , * & @ A B
0x3f836c…3f8500 Dummy {f00=0x0150, f01=0x40f4, f02=» : H IDENT D:CB40 TRA 4.1 80-03-07 F2 O2222 03.01.XXX.1 - D:CB40 - B D:CB40C - T * & F 0 0 - h * & 0 - = s - F - @ - @ A B
0x3f8500…3f8694 (2, 440) Opaque[0x194]
0x3f8694…3f8828 # DirEnt {nam=»CONREM«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2a18, f03=0x0000}
0x3f8694…3f8828 IdxSect {
0x3f8694…3f8828 f00 = 0x0150 // 0x3f8694 @0x0
0x3f8694…3f8828 f01 = 0x0002 // 0x3f8696 @0x2
0x3f8694…3f8828 gno = [ // 0x3f8698 @0x4
0x3f8694…3f8828 [0x00]: C0x0150.0x3.0
0x3f8694…3f8828 ]
0x3f8694…3f8828 }
0x3f8828…3f89bc Dummy {f00=0x0150, f01=0x0190, f02=» PT; P01; PTID=TB; PTCL=TB; * PLEV=55; : P01; J PTDC=T01; V PLC=08L; f P00; v T; P01; TID=TC; TCL=TC; LEV=60; 01; PTDC=T03; PLC=01L; P01; PSCL=S04;
0x3f89bc…3f8b50 Dummy {f00=0x0150, f01=0x0190, f02=»L=S02; PSCL=S03; PSCL=S04; T; . P02; 8 TID=GA; D TCL=GA; T LEV=60; d 01; t PTDC=T05; PLC=02L; P03; PSCL=S02; PSCL=S03; PSCL=S04; T; 01; TID=D0; TCL=D0
0x3f8b50…3f8ce4 Dummy {f00=0x0150, f01=0x0006, f02=»1; PSCL=S03; PSCL=S04; T; . P02; 8 TID=GA; D TCL=GA; T LEV=60; d 01; t PTDC=T05; PLC=02L; P03; PSCL=S02; PSCL=S03; PSCL=S04; T; 01; TID=D0; TCL=D0
0x3f8ce4…3f8e78 Dummy {f00=0x0150, f01=0x2008, f02=» PSCL=S03; PSCL=S04; T; . P02; 8 TID=GA; D TCL=GA; T LEV=60; d 01; t PTDC=T05; PLC=02L; P03; PSCL=S02; PSCL=S03; PSCL=S04; T; 01; TID=D0; TCL=D0
0x3f8e78…3f900c Dummy {f00=0x0150, f01=0x40f0, f02=» : H IDENT T:AD00 TRA 4.1 80-02-06 F1 O1111 02.01.XXX.1 T:AD00 B T:AD00A " T T:DD00 D:CB90 C:CB90 h * & ` D0 * @ * & = a
0x3f900c…3f91a0 Dummy {f00=0x0150, f01=0x40bc, f02=» : H IDENT T:DD00 TRA 4.1 80-02-06 F1 O1111 02.01.XXX.1 T:DD00 B T:DD00D T DC1GO h * & D0 * x @ D0 * @ * & = a
0x3f91a0…3f9334 (2, 441) Opaque[0x194]
0x3f9334…3f94c8 # DirEnt {nam=»CONRT «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1a28, f03=0x0000}
0x3f9334…3f94c8 IdxSect {
0x3f9334…3f94c8 f00 = 0x00d1 // 0x3f9334 @0x0
0x3f9334…3f94c8 f01 = 0x0002 // 0x3f9336 @0x2
0x3f9334…3f94c8 gno = [ // 0x3f9338 @0x4
0x3f9334…3f94c8 [0x00]: C0x00d1.0x1.0
0x3f9334…3f94c8 ]
0x3f9334…3f94c8 }
0x3f94c8…3f965c Dummy {f00=0x00d1, f01=0x018e, f02=» PT; P01; PTID=TB; PTCL=TB; * PLEV=55; : P01; J PTDC=T01; V PLC=08L; f P00; v T; P01; TID=TC; TCL=TC; LEV=60; P03; PTDC=T03; PLC=01L; PTDC=T07; PLC=0
0x3f965c…3f97f0 Dummy {f00=0x00d1, f01=0x00ac, f02=» P01; PTDC=T02; PLC=02L; $ P01; 4 PSCL=S05; @ PC; P P00; Z P01; f PSCL=S01; r U; 001; TB2; P002; TC; LEV=60; P03; PTDC=T03; PLC=01L; PTDC=T07; PLC=0
0x3f97f0…3f9984 Dummy {f00=0x00d1, f01=0x2008, f02=» 01; PTDC=T02; PLC=02L; $ P01; 4 PSCL=S05; @ PC; P P00; Z P01; f PSCL=S01; r U; 001; TB2; P002; TC; LEV=60; P03; PTDC=T03; PLC=01L; PTDC=T07; PLC=0
0x3f9984…3f9b18 Dummy {f00=0x00d1, f01=0x0190, f02=» ( $ PERF IDXGET,GTLEVNR,GSWBIN4,GSWBIN5 P GSWBIN5 - LEVINDX 0 P GSWBIN4 - INDEX L P BERR OPRNOK DISKERROR f P BNOK OPR020 NOT FOUND P PERF LEVRD FOUND P BNOK OPRNOK POPR015 FOUND, DISPLAY INFO P CLEAR GTSWFLAG
0x3f9b18…3f9cac Dummy {f00=0x00d1, f01=0x0190, f02=» NOT FOUND, DISPLAY BLANKS P CLEAR GTSWFLAG $ CLEAR GTDYFLG < PERF FMTREM,CBIN3 R PERF SPCLRA l $ IB SPBINW2,OPR000,OPR000,OPR030 B OPR020 & POPR030 LEV INFO KEYED IN, INSERT P* FIELD CHECK 2 P*
0x3f9cac…3f9e40 Dummy {f00=0x00d1, f01=0x0190, f02=»OPR040, C r " P OPR040,OPR035,OPR035,OPR040 P B OPR040 8 POPR035 J P CBG GTLEVGI,=D'0',OPR040 OK X P MOVE SPBINW4,=W'5' | P PERF SPERR NOK P B OPR015 POPR040 ( $ PERF IDXGET,GTLEVNR,GSWBIN4,GSWBIN5 BERR OPROK
0x3f9e40…3f9fd4 (2, 442) Opaque[0x194]
0x3f9fd4…3fa168 # DirEnt {nam=»RGTEST«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x1e40, f03=0x0000}
0x3f9fd4…3fa168 IdxSect {
0x3f9fd4…3fa168 f00 = 0x00f2 // 0x3f9fd4 @0x0
0x3f9fd4…3fa168 f01 = 0x002a // 0x3f9fd6 @0x2
0x3f9fd4…3fa168 gno = [ // 0x3f9fd8 @0x4
0x3f9fd4…3fa168 [0x00]: C0x00f2.0x0.0
0x3f9fd4…3fa168 [0x01]: C0x0172.0x3.0
0x3f9fd4…3fa168 [0x02]: C0x0173.0x0.0
0x3f9fd4…3fa168 [0x03]: C0x0173.0x1.0
0x3f9fd4…3fa168 [0x04]: C0x0173.0x2.0
0x3f9fd4…3fa168 [0x05]: C0x0173.0x3.0
0x3f9fd4…3fa168 [0x06]: C0x0174.0x0.0
0x3f9fd4…3fa168 [0x07]: C0x0174.0x1.0
0x3f9fd4…3fa168 [0x08]: C0x0174.0x2.0
0x3f9fd4…3fa168 [0x09]: C0x0174.0x3.0
0x3f9fd4…3fa168 [0x0a]: C0x0175.0x0.0
0x3f9fd4…3fa168 [0x0b]: C0x0175.0x1.0
0x3f9fd4…3fa168 [0x0c]: C0x0179.0x2.0
0x3f9fd4…3fa168 [0x0d]: C0x0179.0x3.0
0x3f9fd4…3fa168 [0x0e]: C0x017a.0x0.0
0x3f9fd4…3fa168 [0x0f]: C0x017a.0x1.0
0x3f9fd4…3fa168 [0x10]: C0x017a.0x2.0
0x3f9fd4…3fa168 [0x11]: C0x017a.0x3.0
0x3f9fd4…3fa168 [0x12]: C0x017b.0x0.0
0x3f9fd4…3fa168 [0x13]: C0x017b.0x1.0
0x3f9fd4…3fa168 [0x14]: C0x017b.0x2.0
0x3f9fd4…3fa168 ]
0x3f9fd4…3fa168 }
0x3fa168…3fa2fc Dummy {f00=0x00f2, f01=0x0190, f02=»d" x 2CR jI D S BD ] D d ^D n PD v D D ^D .D f z 3
0x3fa2fc…3fa490 Dummy {f00=0x00f2, f01=0x0190, f02=» P 8 2 0 F 1 d TC V Z
0x3fa490…3fa624 Dummy {f00=0x00f2, f01=0x0190, f02=» B % 0
0x3fa624…3fa7b8 Dummy {f00=0x00f2, f01=0x0190, f02=» Z 8 6
0x3fa7b8…3fa94c Dummy {f00=0x00f2, f01=0x0190, f02=»
[…0x1…]
0x3faae0…3fac74 (2, 443) Dummy {f00=0x0172, f01=0x0190, f02=»
[…0x3…]
0x3fb130…3fb2c4 Dummy {f00=0x0172, f01=0x0190, f02=» { B P P.6000
0x3fb2c4…3fb458 Dummy {f00=0x0172, f01=0x0190, f02=» 0000899 0 @ A B E F G H I P Q R S T F 0 0 0 s x 0
0x3fb458…3fb5ec Dummy {f00=0x0172, f01=0x0190, f02=»
0x3fb5ec…3fb780 Dummy {f00=0x0172, f01=0x0190, f02=» KAKBKCKDKEKFKGKHKIKJKKKL ^ E q0 1 s
0x3fb780…3fb914 (2, 444) Dummy {f00=0x0173, f01=0x0190, f02=» F 0 0 0 0 0 0 0 0 #0 &0 * + , R
0x3fb914…3fbaa8 Dummy {f00=0x0173, f01=0x0190, f02=» B L t
0x3fbaa8…3fbc3c Dummy {f00=0x0173, f01=0x0190, f02=» 0 0 0 V 0 0 0 0 0 0 0 0 # % C c
0x3fbc3c…3fbdd0 Dummy {f00=0x0173, f01=0x0190, f02=» K
0x3fbdd0…3fbf64 Dummy {f00=0x0173, f01=0x0190, f02=» 0 0 0 0 . " < < 0 v0 x { < 6 8 h 0 0 0 2 0 0 0 0 0 0 $0 *0 1 4 0 d" f/ . 0jI A I a I QYI q I "" d" ? 0
0x3fbf64…3fc0f8 Dummy {f00=0x0173, f01=0x0190, f02=» 4 A 1 qT 2 _ _$J (K ,@ A A Az1 q 2 _I Ao Ay Ay ) Ao Ap Ap A A _ A 1 q? 2 _ @ @ @ @ @ @ @ @ @ @ A. A. A. Ao0 0 Aq Az
0x3fc0f8…3fc28c Dummy {f00=0x0173, f01=0x0190, f02=» Ao A+ Ai 8_ AP Ao A+ Ac AoA 6H ! AoP ! Ao+ A+ Ay Am Ao PH AP Ap Ay Ay@
0x3fc28c…3fc420 Dummy {f00=0x0173, f01=0x0190, f02=»Ao Ao 4 A Ai l Ao Ap " J AoD# Ao 0 A _^0 4 Ab A Ao Ao AoI A| Ap "
0x3fc420…3fc5b4 (2, 445) Dummy {f00=0x0173, f01=0x0190, f02=» " _#I M % Ao W Ay% Ao W Ay Ay 0 4 A 8 1 q A 6 "
0x3fc5b4…3fc748 Dummy {f00=0x0173, f01=0x0190, f02=» " Ao( 0 I 6 W Ao Ao Ap Aon0 A _ 0 0 4 I V APH AX H )2 # !"#$%&'()*+,-W.2 .. ...... ... W 8 A 2 !"#?/A I # A A 1 q 6
0x3fc748…3fc8dc Dummy {f00=0x0173, f01=0x0190, f02=» 11 __ Ao A @ @ ?/?0 ?/A @ C <1 <1 <1A 1 qA 2 112_0I Ap Ap Aq N Ap A(I A A A A 2 3445674444_ _>K A'0 S Q0 A' A& d A& A( A
0x3fc8dc…3fca70 Dummy {f00=0x0173, f01=0x0190, f02=» T I ! As AE h PeH M A6 A h T/ A-b b " Ap X A( A ?8 " Ap ?9 A 1 qH 6 _ _ @ _ A _ @ W Aq _V <9 #A <9W <9 #A <9W A(A @ ?
0x3fca70…3fcc04 Dummy {f00=0x0173, f01=0x0190, f02=»<?; H 2 =>?@ABCDEFGHIJKL_92 MMM@MMMMMMMMMJKL_O ?; ?; ?; A 1 q ?; '?; ?; Ay A 1 q Ay?;I 2C 8N@ A 1 q 6 _ A I W * I , ( Aq W , ( At - A}30 T R P
0x3fcc04…3fcd98 Dummy {f00=0x0173, f01=0x0190, f02=»A @ ?; @ @ A.?;H H A ?O?;C <PC <PC 8P@ A 1 q 6 _ A @ I W * I , ( Aq W , ( At - A}3$ R P _S A2 A1A A3( @ A.I A * Au A2 0
0x3fcd98…3fcf2c Dummy {f00=0x0173, f01=0x0190, f02=».?/I UH A 1 q@ 6 AA W?A 0W8H 4H 0 * 0 K 1 0 0 0 0 0 ?/I A 2W @ ?/A A A Az1 q 2 R_ @ @ ?/ 3?/ 4?/I O A Ao A~ 1 q Ao86 _A A ?/I A 1 q_
0x3fcf2c…3fd0c0 Dummy {f00=0x0173, f01=0x0190, f02=» 6_D AP 5 6A 1 qY A ?/A 0 1 qx ) A "! A{ 1 qj@ 1 qp A +W A _ @ W I *I &I A A4A W A @ A. 7 W H /I + AyA 1 q 6 _ Ay Wo 8Wk Wg 9Wc 2W_ :W[ ;WW0 * $ 0 0
0x3fd0c0…3fd254 (2, 446) Dummy {f00=0x0173, f01=0x0190, f02=» 0 4 0 Ap4 H 0 _ A A * H Ap Aq A( Ap A& A( AoH A ( BH Ap A @ @ @ 4 0 4 0 4 0 a 4 ! Aq T C T 4
0x3fd254…3fd3e8 Dummy {f00=0x0173, f01=0x0190, f02=» A( A' A$ A H A& 6 = _ A( A' A D Ap A%T Ap Ap E _] E _aJ QW A( A&A TU A$ Aq T+! As) AE h P At XC A @ 0 W _ A( A$ D As A$ _ A( T T
0x3fd3e8…3fd57c Dummy {f00=0x0173, f01=0x0190, f02=» ]^^ ] ^ ^ ^ u U g 6 P [ ] a c - R V Z W G M S Y [ a N e O N A 3 r 5
0x3fd57c…3fd710 Dummy {f00=0x0173, f01=0x0190, f02=» + m ] ~ I v f X t K j u S e d ! 3 5 M T M F / { D
0x3fd710…3fd8a4 Dummy {f00=0x0173, f01=0x0190, f02=»RE SUMKVITTRP ADM ARKIVBILAGDEBETFEJL KLAR SALD0SALDOSLUTDZ300 KVITDAG NREJ EDBKREDITLBNR T[LLERKONTONRKORREKT DIVERSETOTAL EKS.LBNRBEREGNINGDAGS-DATOKONTOKORTMASKIN NRPOST-DATOSTART SUMSUBTOTAL CPR/CIR/NRREGKONTONR SLUT TEST FRA/TIL-NRBEV.PERIODECHECKCIFF
0x3fd8a4…3fda38 Dummy {f00=0x0173, f01=0x0190, f02=»LET PERIODE EJ-EDB T[LLER DISKETTE SKIFT BEHOLDNINGST[LLEREUDSKRIFT AF TEKSTFILVERSUR KONTONR REMIT VERSURKONTONR KASSEKONTONR PRIMO KASSE %9BX999BBZXXZZ99999BB**B9BBBXBBZBXBBXXBZZZZ9ZZZ9999999BB**BB99.B999B99BBBZBBBZZBXX.BZZZ****9***999999
0x3fda38…3fdbcc Dummy {f00=0x0173, f01=0x0190, f02=»ZZZZZZZ.ZZ.ZZB99E-99E-99B99.99.99BBB99.99.9999.99.999.9BZZZZZZZZBBBZZZZZZZZZZ******E-****99999999E-99XXXXXXE-XXXXXXXXXXXXE-XXZZZZ9999.99BZZZZZZZZE-ZZZZZZZZZZZE-9BBZZ.ZZ.ZZBBBE-9999999999BXXX.XXXXX.XXBTTTTTTTTTTTTX-XE-XXE-XXE-XXBB999.99.999.99BBXXX.XX.XXX.XXBTTTTTT
0x3fdbcc…3fdd60 Dummy {f00=0x0173, f01=0x0190, f02=»*.**9.99-B999.99.999.99BBBZ.ZZZ.ZZZ.ZZ9.99-*.***.***.**9.99+BB*.***.***.**9.99-B*.***.***.**9E,99B999E-99E-999E-99BBBZZZE-ZZE-ZZZE-ZZTTTVTTTVTTTVTT9V99-ZZZVZZZVZZZVZZ9V99-BTTTVTTTVTTTVTT9V99-BBZZZ.ZZZ.ZZZ.ZZ9.99-
0x3fdd60…3fdef4 (2, 447) Dummy {f00=0x0173, f01=0x0190, f02=»1 A[ Aa qW qJ qv q q q qk qz q] q` ql q qK qt q qu qe q~ q qm q qd qy qn qQ q q qs qN Aj AW qb qi qS + q< 2 Q; QS QT qh qV q qq q> q< q A: q qq q qq * A7 B AEQ qO AG +QO Q$ Q% + qf qPQQ q* qr q
0x3fdef4…3fe088 Dummy {f00=0x0173, f01=0x0190, f02=» RGE AN ? qD Z Q 2 QX QX 0 QP q5 Q Q 1 Ad q> 0 0 q9 Q Q qOQQ qR q; q} q Q qO qO AT QQ AB A= Q AB qG Q QD QM +Q4 QM A< Ag AP QI qD
0x3fe088…3fe21c Dummy {f00=0x0173, f01=0x0190, f02=»Q9 Q QX QX + Q qOQ. Q $ < ] N E S [ AFQ 2 Q 1 qh Q8 * * qV + A> q+ QL Q- Q Q Q Q@ Q* Q + Q qOQ. Q q*Q QQ A=Q Q> A^ =Q Q> Q
0x3fe21c…3fe3b0 Dummy {f00=0x0173, f01=0x0190, f02=» Q Q A^ AR qj A^ AA qD QM Q Q Q QC Q: QA qR q* q: Q qr q+ +Q2 qO QR * Q, +Q Q3 Q A0 qO APQK 2Q QE QX QX Q Q Q@
0x3fe3b0…3fe544 Dummy {f00=0x0173, f01=0x0190, f02=» 1 Al Q2 A Q -Q 1 Ad Q AM q3 Q9 QW Q Q/ Q Q q+Q: Q + Q qOQ. Q Q Q7 * qV qh q^ Q* Q Q Q q[ Ac AM AD Q9 QV AI QV QV qD qhQ&
0x3fe544…3fe6d8 Dummy {f00=0x0173, f01=0x0190, f02=»AM d Q Q9 Q Q. Ak 2 * 4 AL AM A] AD qG * A? AQ FRA Q# TIL Q# qI Ad Ak Ah A8 A` A9 AX A; A? qD A= Ac AM AC Q9 QU qD A= A_
0x3fe6d8…3fe86c Dummy {f00=0x0173, f01=0x0190, f02=»qr q: Q Q+ Q q+ Q Q 4QJ PRIMOQX 2 BEV QX QX QX 2 ULTIMOQX + Q Q4 Q' Q) - qO 2 * * 4 AM AL NETTO A@ AJ 4 TOTALQX QX QX 4 SUPL QX QX QX 2 KOR Q
0x3fe86c…3fea00 Dummy {f00=0x0173, f01=0x0190, f02=» Ak A5 AM AD e Q + Q= QU qD qG * AQ Q# AZ l Q; AY m Q: q3 n QF AO o Q QB qI * VERSNR AS AV AU AQ Q5 Q2 Q2 Q Q An QN QN QH
0x3fea00…3feb94 (2, 448) Dummy {f00=0x0174, f01=0x0190, f02=»q(q%qLq q q q q.q'q q q q q q q q q q(q$q q q,q q q>q=q q q q q q q q q q q q q q q q q q q q " $ & ( * , . 0 2 4 6 8 : < > @ B D F H J L N P R
0x3feb94…3fed28 Dummy {f00=0x0174, f01=0x0190, f02=» ( 1 : D N Y d o z # 7 * L0 v0 w0 x0 y0 z0 {0 |0 }0 ~0 0 0 0 0 0 0 0
0x3fed28…3feebc Dummy {f00=0x0174, f01=0x0190, f02=» y ! - 9 E Q ] i u " 3 D U f w % ? ' |
0x3feebc…3ff050 Dummy {f00=0x0174, f01=0x0190, f02=» c h m r w | % . 7 @ I S ] h s ~ + ; L ] n ! 7
0x3ff050…3ff1e4 Dummy {f00=0x0174, f01=0x0190, f02=» 1 2 4 E 5 y 6 7 8 : S ; < C L G U W [ ? a @ W@ Y@ [@ i@ @ @ @& @0 C 1 E 4 GR7,Gn7 f fd & + P _ d f #0 0T & ! T P & ! X T C d O$ OZ S, Y ( x P Y * L x y Wz
0x3ff1e4…3ff378 Dummy {f00=0x0174, f01=0x0190, f02=» [ Y * X Y , R X X C & C C ( [ B Ph9 R^9 N& X !@PP X X * b ) Y * Y , X , R x X *YvP y X " x Y X " T Y _ N _ B U C Q C DK K K K L8N4NBLh X X * $" ~_> @ Y X * J _R X
0x3ff378…3ff50c Dummy {f00=0x0174, f01=0x0190, f02=» y _< X # X * y S X 1 1 X !@T X $ " P y _ x T N M X H X X * , )$ P _ : O$ ' Y fh OZ y x C y X C C X ( [ x Tf B Nf9 R 9 N& X ! T N _` y C
0x3ff50c…3ff6a0 Dummy {f00=0x0174, f01=0x0190, f02=» X !@X y C _d y C C X !? x P Q( B y " y $ c [T C _$ _ N y _6 M x X@ X R X # S C _. B ]d P C Q8X8_H x XD @ Y c C y XR X x R O M x X X # S _ B N C R : +
0x3ff6a0…3ff834 (2, 449) Dummy {f00=0x0174, f01=0x0190, f02=» Y . : fh f f " f $ : [j 2! Y " [ f [ f k: [j X "T X [T S [` [j f X [f O [R [ ' f ! Y 0T V [ k: : [j 2' f R P P X ' ' d X _
0x3ff834…3ff9c8 Dummy {f00=0x0174, f01=0x0190, f02=» W W W W W [j Y ( Y 09H Y * Y 4 Y 2 Y 69h Q X :h Y 0 S W U X Q T W Y 0 S T a2 ` [j 9H Y * R W W R ` X 0 X +" X *9h P( P P Y +W^ Rd Y + RV S WL T RV R W> Q W Y + U
0x3ff9c8…3ffb5c Dummy {f00=0x0174, f01=0x0190, f02=» RF : X 0 :H* [r : X 2T Y 2 : C 1 B ] ` : R X +! U 9K Y ( Y + S T [j9H Y * 2 Y ( Y + f 4 0 fN 6 2 : C ( [ C : C B _, _ X R S, P S B _R ( [ X D
0x3ffb5c…3ffcf0 Dummy {f00=0x0174, f01=0x0190, f02=»s s sPrjsPr0U0V0V0s U"s W W X 0Q T T Y ( Y *P ` q@ S X <' X X qv [j X *# X ( " Qp " P X 0P: Vp_` " P4 T YV [ WT " P Y 0] Y (_t " X _. `l X *# P B 1 `lW " P X X$ C : X *! P
0x3ffcf0…3ffe84 Dummy {f00=0x0174, f01=0x0190, f02=» [j Y . X ( X ." PV X 0RzT$ Y *P U :H [r T K T s&W s X . X 2QH Y *T2 s : " P$ X 0U X *# P P T " T : Y . YV Y ( rj [j Y *T " T ! 1 W ! ) s : [j r sv Y *T V : s Z s : [j V
0x3ffe84…400018 Dummy {f00=0x0174, f01=0x0190, f02=») Y (W X *:h Pl Pf P P X P< X WZ X ! X $" P<Q X (# P2 X # :! R$W X X T$ @ Y (W Y , YVW Yt Y ( rj : X *:h X (! # P X & V L TbW X , X 0P@ X T, X *:h XF XL X (!@T @ Y ( X , Y t X 0 l X _r X (
0x400018…4001ac Dummy {f00=0x0174, f01=0x0190, f02=» Y X (P Z Y X (P X [ 8 Y 0 X 2P X 0V _z Y ( " T Y ( : 8 Z f 8 V Y 8 : " P X & V ( P X : : X "0P $ T W %T : : Y ( X $ Y X " Y X & Y X < Y @ : Y : [j X : X (
0x4001ac…400340 Dummy {f00=0x0174, f01=0x0190, f02=»T W s ! P =H s Z X *! T" X y 4 @ X (T y 6W4 X y 6W, @ X (P W" X & V D ! P @ W X [rW Y ( : X , Y X $ Y X &T Y Y Y WD V $:H D Y D :H Y ! P V Y f W Y ! P fVW V Y Z V Y
0x400340…4004d4 (2, 450) Dummy {f00=0x0174, f01=0x0190, f02=» Q W ' Y : W f^ V r [j Y Y Y < V E d B X _ v : C C ` : C ` :( R : V E V D ' $ T ( W [ P d X =' V W V Y =P [ : ] ] ^ a2/ ^W
0x4004d4…400668 Dummy {f00=0x0174, f01=0x0190, f02=» : @ P ( [ _ A a2 " A 2 f f ]D 2 A f ]D ( [ P V I @ % A d & # T : Y _ a2 ] f &P C a / _ a2 ] a /
0x400668…4007fc Dummy {f00=0x0174, f01=0x0190, f02=»d f f V d 2 ;B P4 J T f ^x ( d& [ W< / _2 ^x ( [ W f & F : ( [ d f V G 9h ' d W ` _ a2 a a az P f / W a2 az f / W a2 a C C W
0x4007fc…400990 Dummy {f00=0x0174, f01=0x0190, f02=» Wj f a2 a W a2 ^ ( 1W C C C ( [ ' Pb a I "%@P "% P& B C C 4 "5 # B P B P B 5 P C P B % P C + b d a2 ` q `n C `J C B B P C
0x400990…400b24 Dummy {f00=0x0174, f01=0x0190, f02=» C f : B T T T V : 2 ' W 2 6 2 @ X" T # ' ?D h`W"' #? hJ ;D:B " : _ f C : : a2 a fN P C W $0 P C a : "!@P ") # B C B % C C : fN#0 T &
0x400b24…400cb8 Dummy {f00=0x0174, f01=0x0190, f02=»T 0P(W$ 8 C S W C C 0 P C ;a 6 4 ZH T : 49d_Z B@5 @ 8 @N ' @ d P ( z= #0 T B 'W B B " Pc c PP Lc R R _ R _ # Q R V
0x400cb8…400e4c Dummy {f00=0x0174, f01=0x0190, f02=»dndndne f d f k:h h jFm6n n e e e e e d e e q t t t$tBt s f,f(f2f4 W V 7 P [ P W dR V X _ e, 9c Dc f fN Q c W jF :aW _B( 2 P V W8 _ 2 # ;B V T / W V P L , V 2
0x400e4c…400fe0 Dummy {f00=0x0174, f01=0x0190, f02=» V % V E @ X' T 2 % 7_ 2 # L. f 2" &] Y $! 6P Q $ T 9B d _ _ 6 @ X" T 7 $ V P [ W _ c d h V & d Hd* 'W 'W '_6 @ H D L :l:d:h f W W
0x400fe0…401174 (2, 451) Dummy {f00=0x0174, f01=0x0190, f02=»f6 E V $ W D V Lf> , Wn 6 2 h`W " P " # hJ ;b WF " ;d# _ [ v [ [ f [ Z Z : :B , (Vj ; [ [ f z ;AV$ Z H # h ; f : & Z 4 h
0x401174…401308 Dummy {f00=0x0174, f01=0x0190, f02=» : ( :A ( @ X" P [ :;H 2 P ;h hT : g* ; V Y : 2! : 6 2 h`W& " # hJ;b ; : ;f" #?_" W " T & T + : * & !@P `1` P j Q [ ; 8 V
0x401308…40149c Dummy {f00=0x0174, f01=0x0190, f02=» Q P # W " <! =# T6W = Z P _ V ^< `_@ R Q <# =_ P :" P * U P 1`! T "# 9e! # K : P8" T * & : * & !`P :J +_ +Q j _0 , V W R V W R XV W 1 ^ _0
0x40149c…401630 Dummy {f00=0x0174, f01=0x0190, f02=» :$0#0;b l P P PN P 0 - P: V W Z _ 4 V W Q P ) P 9_ &" ! 9 : & P Q k ,^ , < k # ; [ _n' d V W V 4! P < X 4 9d $ & ! R + :
0x401630…4017c4 Dummy {f00=0x0174, f01=0x0190, f02=» T 9d! T 7 V Y P _$ SZ Q V P V Q W Q 7 Y P._6 & Q 9d! )0 + P 7 Y Z $ _ : V ) " TV *V &V : V S W P 9 S W _ V P W T V E + : & [ [ [
0x4017c4…401958 Dummy {f00=0x0174, f01=0x0190, f02=» [ P p h V H )_ p n _X z R z ! P 1` { V (9h T W z 9e! I Z ! : 4 P 9 59D_ " P P [ ! :d" 5 : " Tz *V &V PP= ;@ R P W ;a=a P " R & R V T
0x401958…401aec Dummy {f00=0x0174, f01=0x0190, f02=» " ! ! R 2` { z " P ! R 2` { 1 ! { [ Z p j Q p n P _ T { [ p p [ Q@ [ p h { R [ _ p h p n Z ! Z $ Z %_N [ Q* p h p j R [ Z { p h z 9e! W Z : V I _
0x401aec…401c80 Dummy {f00=0x0174, f01=0x0190, f02=» gg++ L s fNfdh s h fZf s r v r r s s s s s<rjsFr0s&slslsZs s q 6 r8 K K K K V K : f qP q@ q f^ V r r8 r V Z P 2 " T W "@T '?W "? Hq " K :e J
0x401c80…401e14 (2, 452) Dummy {f00=0x0175, f01=0x0190, f02=» [ : V R (Q V : f f : qP J P v I < : J Qf : P 4 ! TV_ K sdWJ s"W +_ s< s8 K W. _& X `lW X & `h J K : V : 1 r sv : ! P ! P ! P !
0x401e14…401fa8 Dummy {f00=0x0175, f01=0x0190, f02=» q : { : uz u: PX 9 _ uz [ uz Z : R" P $ 1T Y W 5 _$ : uz $ R W R # P W ) V E uB WV uz [ uB : Z !0P. 4 R :d" 8 R
0x401fa8…40213c Dummy {f00=0x0175, f01=0x0190, f02=» fN $ : 2 & >A >A 2 $ f & V D 9a 9 V @ 4W @ Z T W X R V 8 P , _ =B R ?H 8R0;AV ( _ X @ 9 X ( 9 8 ? X Q , V ( - 4T
0x40213c…4022d0 Dummy {f00=0x0175, f01=0x0190, f02=»TTT W !**T * [ R !FFP !EET W Ixz 6 * B Z 9 ! ; *Xt 8 ! Dxj 0P Wn 0W8 Wf :T& *W, FP . :T Z ! XBW *X& FW@ :P # U 1 w@ !00T ; sf _ 9P F " X6# ; W )0_: J R( Z R 4! P ;)0 9U ? Z
0x4022d0…402464 Dummy {f00=0x0175, f01=0x0190, f02=» tX. PT*AXYZ9& >A >A 2 $ f & V D 9a 9 V @ 4W @ Z T W X R V 8 P , _ =B R ?H 8R0;AV ( _ X @ 9 X ( 9 8 ? X Q , V ( - 4T
0x402464…4025f8 Dummy {f00=0x0175, f01=0x0190, f02=» B 6 : >H I H ! At ! Av @ H A A @ 6 ^^ A _+H A 0 P @ H A _H A A 90 Ap 0 0 @ @ 4 @ 4 H H 0 @ H H ) A { 0 0 0 0 0
0x4025f8…40278c Dummy {f00=0x0175, f01=0x0190, f02=»p Ap Av Av Ap% Ao Ap 4 H 3 I *H &@ A Ay @ ) A 4 4 H -I )I %H ! A A2 A.@ 4 4 I gI - T T I ! A A H ) A A @ W ( K 7A A Wo Tr
0x40278c…402920 Dummy {f00=0x0175, f01=0x0190, f02=» 4 ( ! A ,( ! A ( ! A 4 6 8 gtW I I A A A W W I I A A3 A W W H %I # A 0 W W W H AoW}W H uI ) AoS@ @ @ 0 0 AP
0x402920…402ab4 (2, 453) Dummy {f00=0x0175, f01=0x0190, f02=» H & " @ W Ao Ao Ao Ao Ap A @ 6 A _7@ @ _s% A Ap A I @ 4 A. A. Ao Ao@ @ @ @ 0 4 I KI A A Ao A W&0
0x402ab4…402c48 Dummy {f00=0x0175, f01=0x0190, f02=» As W 0 0 4 4 I A A/A Ap AoWk A I A.@ H 0 @ @ # A ) A Au 0 0 0 I K 4 I )I A A ! A W !W @
0x402c48…402ddc Dummy {f00=0x0175, f01=0x0190, f02=» ! A} I $ , A- a q A- h @ " b _[b A b f A $ Aq T K Ap_ A b $ Aq TQI @ Ap % T6$ #@ @
0x402ddc…402f70 Dummy {f00=0x0175, f01=0x0190, f02=»A 4 # A Ar_ # A At_ # A As_) Aq_04 0 0 I 2 " &W ' I 0 0 P A 4 0 4 0 0 0 4 1 q 4 1 q 4 I @ # A Wt A 6 !,,,3V A WR A WG A W< A W10 _f
0x402f70…403104 Dummy {f00=0x0175, f01=0x0190, f02=»q% As 4 I '0 0 A< 0 0 A 4 0 0 4 I 0 T50 ! A ) A S# A M # A S ! A : WF0 % A W. A W 0 0 4 _M 4 0 6 %W4 AAW- A W AjW AfW A W A W A
0x403104…403298 Dummy {f00=0x0175, f01=0x0190, f02=» a q8 A % A % A 0 W # A 0 4 A 0 0 4 ? ( : _ ] ~ g S m . Q $ j t I F 5 M 3 e / D ! #
0x403298…40342c Dummy {f00=0x0175, f01=0x0190, f02=»TTTTTTTTTTTTT9- A Q QZ QY Q GQ Q ,Q A Q A Q$ A Q A6Q ! ' - 4 < E0 V0 X0 Z0 0 ^0 `0 b0 d0 f > * &
0x40342c…4035c0 Dummy {f00=0x0175, f01=0x0190, f02=» 6 ( W T T| TrH A T_ H V TLH H T> T4 T*H & T W W W W 4 4 6 FRTWT0 0 0 H 0 H !0 H 0 0 0 H 0 0 W 0
0x4035c0…403754 (2, 454) Dummy {f00=0x0179, f01=0x0190, f02=»I A H 0 , Aq0 _ 4 T' Aq% As 4 A< A 4 A 4 H 0 _ A A$ Ar T 1 q @ W @ 4 0 4 H I F@ @ 0 0 @ A<
0x403754…4038e8 Dummy {f00=0x0179, f01=0x0190, f02=» A A A A 4 A 4 A A 4 A A 4 @ A 8 I 6 `0 0 WU0 WL6 0 W 0 6 $0 W$0 W 0 W 0 W 0 W 0 : 0 P : _ 0 A A 0 P A W@6 0 a a W 0 a a W 0 a a
0x4038e8…403a7c Dummy {f00=0x0179, f01=0x0190, f02=» 2 WE0 ! A A H A ( 2 A 4 A K0 _M0 W 0 W 0 W 0 W 0 W 0 W 0 W 0 8 : ; A 8 7 MM>MM>:>>>:>:? A I I W 1 q 1 A W 1 q 1 A W ? A 0 T b ! A- A A ? A Wh0 ) A ?
0x403a7c…403c10 Dummy {f00=0x0179, f01=0x0190, f02=» W ! A A 0 1 q H 0 A 6 0# a W 0# a W 0# a 6 A 8 2 _I - A A ! A A 0 0 2 A 4 ! A A ! A ? 0 0 ! A ? 4 1 q 4 A 0 1 q !
0x403c10…403da4 Dummy {f00=0x0179, f01=0x0190, f02=» W 0# a 4 A 0 1 q 4 4 0 w ` 5 b ? J S 0 ~ I t K e :
0x403da4…403f38 Dummy {f00=0x0179, f01=0x0190, f02=»IDE. QY q q q q q q q q q q q q q q q q q q q q q q q q q q q q q qLq q q q q q q q q q & . :@ J@< 4 j P T 0 ! A ? 4 1 q 4 A 0 1 q !
0x403f38…4040cc Dummy {f00=0x0179, f01=0x0190, f02=» ^ R V Z % A {% A k! A ) A _ A Ao I ! AoF Apb A A A , A| A| ! Ao A 4 Ap A b # A}$% Ap A b # A % Ap W A Az4 # A} % Ap
0x4040cc…404260 Dummy {f00=0x0179, f01=0x0190, f02=» A 4 4 ! Ao A 4 4 0 ! A W A 6 A 6 ) 4 K W8J W2 A 'W A " _?J CW 4 # A BH @ W+H @ ( ? 2 r
0x404260…4043f4 (2, 455) Dummy {f00=0x0179, f01=0x0190, f02=» 6 8?? 6 ? A ? 6 ? $ A _ A ? A ? I ? A ? A ? % A ,A A R A A 9 @ ? @ ? ? A 8 A 8 I # A W!% A W Ay A ? ! A ! A
0x4043f4…404588 Dummy {f00=0x0179, f01=0x0190, f02=» + A " ]h A b ) A C A b ! Ao#% A ! Ap W ! Aq W I A ? ? ! A ! A ? b b b b b b = A ? % A "
0x404588…40471c Dummy {f00=0x0179, f01=0x0190, f02=» Ap % Ao A}: A A ?) A :) A " % Ap ! Ao ? A ? A A I A ? A ? A ? A A A ? A A % A 6! A A ? 8*( H ?+ < ?
0x40471c…4048b0 Dummy {f00=0x0179, f01=0x0190, f02=» A A |% A / A A % A A # A @ W @ < A ? A ? A A ) A A ! A ! A < ? A _ A A ! A A ? A T2 8*( H ?+ A ? ? A ? A A A 9, A ? A A ?- A A A I
0x4048b0…404a44 Dummy {f00=0x0179, f01=0x0190, f02=» " ? A ? Aq Ap b b Ap A At$ A{" W A Az? # A ) ? A ? # A )
0x404a44…404bd8 Dummy {f00=0x0179, f01=0x0190, f02=» A| ) Ao A| A| W ( W A W AtW AuW AwWy # A AoWg A W`H ! A Ao A W:H Ao A I A,W $ 4 A9 Ay Ap A 4 A8 Ap Aq A 4
0x404bd8…404d6c Dummy {f00=0x0179, f01=0x0190, f02=» A A 4 - e % ^ V r y ; V ( @ L m t ] g y D W E _ ) / E ^ ] < = T Y d5151 52 0
0x404d6c…404f00 Dummy {f00=0x0179, f01=0x0190, f02=» *0 ,0 .0 00 30 60 ; R R W A W AtW AuW AwWy # A AoWg A W`H ! A Ao A W:H Ao A I A,W $ 4 A9 Ay Ap A 4 A8 Ap Aq A 4
0x404f00…405094 (2, 456) Dummy {f00=0x017a, f01=0x0190, f02=» P & & D H L1 q 4 1 q 4 1 q 4 BE]RBFOBKOMTBOMRTXTVALTNR A-ADRLINIE POST. PRIMO BRILLEBET-ARTDEBITORRTE/GEBHOVEDBOGLEVKONTOLINIE NRLEVERAND SIDE 51-2SIDE 51-3SIDE 53-2SIDE 53-3 NORMALPOSTFEJL FORMATYDELSESMODT REMITTERINGPER FRA PER TILFAKTNR FAKTDATOTTX
0x405094…405228 Dummy {f00=0x017a, f01=0x0190, f02=» Q . Q Q Q[ Q @Q Q Q Q] Q] QF Q Q: Q; Q: Q
0x405228…4053bc Dummy {f00=0x017a, f01=0x0190, f02=»D q AZ q q q q Q SALDOOVERF q AZ q q q q A A A A q q q q A q q Q A q AZ q A q q q q A A A A q q q q A A q q q Q Q Q
0x4053bc…405550 Dummy {f00=0x017a, f01=0x0190, f02=» S Q: T Q X Q A q AZ AY A P Q; Q Q: R Q: A> AM KONTROLSUM A Q; QF Q q A q AZ A A5 A U Q; V Q: W Q:
0x405550…4056e4 Dummy {f00=0x017a, f01=0x0190, f02=» L QZ N Q; O Q; q AO q Y Q^ q $Q A M/P-NR q AZ AY q q A q q q A q A q q q q < GL. SALDO A CHECK p QF Q Q q AT A Q q &Q A A
0x4056e4…405878 Dummy {f00=0x017a, f01=0x0190, f02=» A q q q A q q q A q A A q q q q q 0Q SD-INCASSO q AY A q M Q A A q q q F]R RE] REM OPK q q q q 5Q DEBITORINDB q AY A q Q A A q q
0x405878…405a0c Dummy {f00=0x017a, f01=0x0190, f02=» q q q q q q q q $ * 0 7 > E L T d m v $ ) 4 D T d t
0x405a0c…405ba0 Dummy {f00=0x017a, f01=0x0190, f02=» x 6 q q A q q q A q A A q q q q q 0Q SD-INCASSO q AY A q M Q A A q q q F]R RE] REM OPK q q q q 5Q DEBITORINDB q AY A q Q A A q q
0x405ba0…405d34 (2, 457) Dummy {f00=0x017a, f01=0x0190, f02=» K Z t I ? < A A A 1 q 2 _ @ $ A @ 1 q 6 _ _=H ! Ao j As _cf ( Tj ( 3 As A$ As _ As _ A$ As < A
0x405d34…405ec8 Dummy {f00=0x017a, f01=0x0190, f02=» S" M ! A$ _4 * A A{ A ? A$ As < j j A j d S As TR ? ( As T1 A$ As T b _ @ ? H ( 0
0x405ec8…40605c Dummy {f00=0x017a, f01=0x0190, f02=» 0 1 q A$P @ _ @ 4 " ! Ao , _' ( W H 0 _ A A$ As Tp Apj " ; A ' _N Apj @ 4 @
0x40605c…4061f0 Dummy {f00=0x017a, f01=0x0190, f02=»ph P0j " Ao_ ^F _,4 A$ As A h P 7 W8 h T P A$ As 4 A @ C Tl Te T^A 1 q 6 II _0 Ap
0x4061f0…406384 Dummy {f00=0x017a, f01=0x0190, f02=» T( A h T 1 q 4 A A A A 4 Ap A A A 6 K?$ _ A( A A 1 q 6 _F J _N A( P A _^ A 4 A( A sW A( A W A( 4 A( A A$ Aq TD! As>
0x406384…406518 Dummy {f00=0x017a, f01=0x0190, f02=» h P A A$h P A _ + A W9 ! A$ A- A$d m q _ A 0 1 q Td T`_ TO TK A.m q T1 I A A h T 4
0x406518…4066ac Dummy {f00=0x017a, f01=0x0190, f02=» A A 0% P A A A 4 4 A 0 4 A h T A. 4 4 0 $ # A A h Px A h T] $ H A-h T2 b 1 q
0x4066ac…406840 Dummy {f00=0x017a, f01=0x0190, f02=» 1 q 4 % s p 8 # e ) K 5 M f / & c X Q t 4 x X !5 ' BFODFH0002CSSF DATAS[TDFH3504DISCFEJL TRANSMIT TERMINATE DATATRANSMISSION `
0x406840…4069d4 (2, 458) Dummy {f00=0x017a, f01=0x0190, f02=» AZ AM A q Q9 Q A CSSN PS=Q ,NAME=Q A BRUGERNAVN Q KENDEORD QZ % , 3 < E O0 `0 b0 d
0x4069d4…406b68 Dummy {f00=0x017a, f01=0x0190, f02=» I F A2 A1H 2I . ( " ) Ao # A 9! A 3! A -! A H # Ap Ap T@ H A H A 6 @ A @ @ 4 Ap A 4 H (H I
0x406b68…406cfc Dummy {f00=0x017a, f01=0x0190, f02=» A 9 6 - Ao W + Ao " 'I #I # A~ W 4 A 4 2 , ) Ao A W ) Ap A W ) Aq A
0x406cfc…406e90 Dummy {f00=0x017a, f01=0x0190, f02=» A < ? C 8 A < A ApW 6 W A T W A T A P A W ! A W ! A W ) A ! A ) A u) Ap ! A e! A V) A UWL) A ) A ;) A ) A +! A
0x406e90…407024 Dummy {f00=0x017a, f01=0x0190, f02=» A A 4 0 P W W AzH Az A4 A. A.@ @ 4 ! Ao? a q 0 0& P A 4 4 Ao0' Q P I
0x407024…4071b8 Dummy {f00=0x017a, f01=0x0190, f02=» T Aq Ap Ap"4 " I ( 0' 0) Q P 4 4 I "0' 0 Q P Aq 4 4 0* P Q I 0 4 I 0+ Q P 4 @ A T I
0x4071b8…40734c Dummy {f00=0x017a, f01=0x0190, f02=» _U _&I $I 0 W 0 0 0 @ 4 A I 0 W 0 0 0 @ @ 4 @ A T I T W 0 A} " W I T"! As#W A} Q T XDA A I
0x40734c…4074e0 Dummy {f00=0x017a, f01=0x0190, f02=» < As8 b ! A _H A-b < A-b A-b A|8 A}> Ay8 _ C < A h h T b
0x4074e0…407674 (2, 459) Dummy {f00=0x017a, f01=0x0190, f02=» M A0h T A, Ay Ay_ h < A,? 3 ? A h T A ? A h T f I Ap A$ T`f ! A$ A-h d
0x407674…407808 Dummy {f00=0x017a, f01=0x0190, f02=» o | d T ? m 5 M & ) v # = K X D { / . 0 < d!& FD&01GEBRATRTEASSIGN DISCFEJL ! & 0 F V999PPP A QY Q
0x407808…40799c Dummy {f00=0x017a, f01=0x0190, f02=» ^ R V Z A A A @ Ap H A W @ A W A A,@ I A. @ W I W I ( A 6 _E A W @ _%_XA 4 A 6 Ldr _p A @ _NK ( @ _e$ 0 0 A _ I 0
0x40799c…407b30 Dummy {f00=0x017a, f01=0x0190, f02=» 4 4 T ? T W 4 T 4 T 4 T ! A W 4 T 4 T W T W T W 4 2 TeWo T]Wg TUW_ TO 4 I D A 4 I 4 A 4 I $ A 4 H 4 4
0x407b30…407cc4 Dummy {f00=0x017a, f01=0x0190, f02=» 6 4 A 4 A 4 0, _ 0- 0 ? H A 0 A- @ A 0 A 1 q 6 _M A d j@ 6 %_| A- # A } Ap _ A
0x407cc4…407e58 Dummy {f00=0x017a, f01=0x0190, f02=»< ) Ao Ao I # Ao f A A 0 1 q 6 _ A d K " 4 0 A 0- 1 q 6 _I Ay % T_?0- &< " #- Ao Ay0
0x407e58…407fec Dummy {f00=0x017a, f01=0x0190, f02=» Ap A$ ) Aq h ! As/ * A- A b I ) >I 0 A 1 q 6 _!_ ? As+ W% +< * W 0 A 1 q 6 _ _ Ao @ A$ ) Aq T I As8 AE h P A-b
0x407fec…408180 Dummy {f00=0x017a, f01=0x0190, f02=» A -@ W'+ Ao! Ap Ay % & .K WL * A 1 q 6 _ _ @ ? A ? @ W I A /? I ,_ 0 0 _ ApA " 0 _ $ A 0 Ao+ Ao) A AX 0 1 2 A.@ A ?! Ay?"
0x408180…408314 (2, 460) Dummy {f00=0x017b, f01=0x0190, f02=» T 3 T 3 T 3 4 A% ) Ap 4 Ap Tj Ap T^ Ap TR Ap TF Ap T: Ap T. Ap T" Ap T Ap T Ap 4 " 0- Ao % _ 0- &4 4 4 4 4 4 4 4 4 @ 0(
0x408314…4084a8 Dummy {f00=0x017b, f01=0x0190, f02=» 8 H X h u % X K 4 0 j / M F 3 $ f X t T K & +
0x4084a8…40863c Dummy {f00=0x017b, f01=0x0190, f02=»SN08ZZZZZZZZ9 Q AN ? q A ? q A OK ? q A Q AS Q2 AH f Q START VOLUME= DATASET= Q AU Q Ak g Q Ai h Q AQ QZ A QY A A
0x40863c…4087d0 Dummy {f00=0x017b, f01=0x0190, f02=» # / 1 R = * 2 X K 4 0 j / M F 3 $ f X t T K & +
0x4087d0…408964 Dummy {f00=0x017b, f01=0x0190, f02=» . " & *1 q 4 I ? @ Ap A Aq 6 _&! Ap A q{W q{W H 0 _ A A A. Au T ! Asu) A{ @ W ! Aoe 6 I@ qo " A6 q!W q W @ Ap q{ ApW A qo@
0x408964…408af8 Dummy {f00=0x017b, f01=0x0190, f02=» w A A ( ]H 0 _ A A Au T?! A{9 @ XH 0 _ A Au T @ _x@ 4 @ @ 4 A-h T f 4 4 j j ) A Ao@ 4 j
0x408af8…408c8c Dummy {f00=0x017b, f01=0x0190, f02=» K A D l ADRBY FILNR ]R DATONAVNKODE:N[STE TEKST TEKST:VEDL. -DISTR FAKTURAGIRONR POSTNR ALT.ADR TEKSTFILBET.FORM LEVERAND REG.KNT. SKYLDIGT UDB. ]TD KREDITNOTATEKST OPL FRA/TIL NR FRA/TIL-NR:PRINTENHED?SIDSTE UDB UDSKRIFT
0x408c8c…408e20 Dummy {f00=0x017b, f01=0x0190, f02=»9999999999XXE-XXE-XXXXXXXXXXXXBXXXXXXXXXXZZVZZVZZ9E,99-ZZZVZZZVZZ9E,99- BEL B VAL RDATO A QY A A A Q A A Q2 A Q - Q A A # Q A A A Q2 A A Q^ A Q_ Q_ A
0x408e20…408fb4 (2, 461) Dummy {f00=0x017b, f01=0x0190, f02=» A A Q_ A Q2 Qb A Qb A q Q2 A q Qb A q Qb A q Qb A A5 Q_ Q_ Q_ A A @ A @ A QZ A @
0x408fb4…409148 Dummy {f00=0x017b, f01=0x0190, f02=» & , 2 8 ? F M T d m v 0 2 * 4 ? M 0 ? G D g u 1 @ B R Q2 A A Q^ A Q_ Q_ A
0x409148…4092dc Dummy {f00=0x017b, f01=0x0190, f02=» ! 0 V A A A 6 _$ RyT Ts@ @ 2 _ @ @ 2 _ 6 W # Ao A _M R%T T _ T T _ _ 4 4 A A A 6 CC _ R. & A " @ @ A
0x4092dc…409470 Dummy {f00=0x017b, f01=0x0190, f02=» W{ A A A A A A A A A A A A A A A A A A A A A! A A A" Ap A A A#@ 4 @ 4 H 0 _ A A A A A A A A A A A A A A A A A A A A A A A!A A A"A
0x409470…409604 Dummy {f00=0x017b, f01=0x0190, f02=» A A A A 6 YY _ RMTK TG TC@ @ 2 _ I 2 _ 2 _ r_W4 I H A 6 # Ao A , A @ A ! Ap @ H 1 q " [ T3 $ &H T I A W @ I 1 q W 1 q
0x409604…409798 Dummy {f00=0x017b, f01=0x0190, f02=» W Ap A A A A A A A A A A A A A A A Ap A A A A A A @ 4 @ 4 H 0 _ A A A A A A A A A A A A A
0x409798…40992c Dummy {f00=0x017b, f01=0x0190, f02=»4 Ao Ao Ao Ao Ao Ao A 4 A " ! Ao W 4 A H 0 _ A Av T[ Ap j " &_@ j @ 4 @ 4 @
0x40992c…409ac0 Dummy {f00=0x017b, f01=0x0190, f02=» Av T< _8 A A A A A A Av @ 4 @ 4 A Av ! As1 h P Apj ) Ap W+ j Av X& A Av ! As#! A{
0x409ac0…409c54 (2, 462) Dummy {f00=0x017b, f01=0x0190, f02=» , - Av TK Av T: _8 A A A Av @ 4 @ 4 A A : 4 A T Apj W Apj " . Av
0x409c54…409de8 Dummy {f00=0x017b, f01=0x0190, f02=» R'T W*# A $ T P T Ap_ _ 4 4 RRP H 0 _ A , 3 Av T Ap A A A @ 4 @ 4 Ap A A A A A A A A A 4 j 4 4 l 4
0x409de8…409f7c Dummy {f00=0x017b, f01=0x0190, f02=» SLETNING VEDLIGEH. XXXXXXX9999999999XXXXXXXXXXBZZZVZZZVZZ9E,99- Q2 QZ Q2 Q Q QY Q[ A Q2 Q Q Q2 Q Q Q 0 0 !0 #
0x409f7c…40a110 Dummy {f00=0x017b, f01=0x0190, f02=» . BET-ARTN $ .* & 0 $ * > & N / XX d " /* v & / & & 0 DEBITORN $ 0* 1 POST. $ 1* $
0x40a110…40a2a4 Dummy {f00=0x017b, f01=0x0190, f02=» |* & $ * $ * * $ * : & J 3 RTE/GEBN X $ 3* p & 4 DEB $ 4* & 5 BFO $ 5* & $ * $
0x40a2a4…40a438 Dummy {f00=0x017b, f01=0x0190, f02=» & SD-INCASSOB $ v* & * & 8 8 CPR/CIR/NR F $ 8* ` & p 9 BET-ARTS ~ $ 9* & $ * & M : XX " :* N & :
0x40a438…40a5cc Dummy {f00=0x017b, f01=0x0190, f02=» & & $ ~* & 0 $ * > & N & F]R RE] REM OPK & z $ |* & $ * $ * $ w* ( = * & >
0x40a5cc…40a760 Dummy {f00=0x017b, f01=0x018e, f02=» $ * & $ ~* " & 2 $ * @ & P & ^ $ w* l ( | @ d & & & A 99 " A* L B BRILLER $ B* C
0x40a760…40a8f4 (2, 463) Opaque[0x194]
0x40a8f4…40aa88 # DirEnt {nam=»CONRST«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x21f0, f03=0x0000}
0x40a8f4…40aa88 IdxSect {
0x40a8f4…40aa88 f00 = 0x010f // 0x40a8f4 @0x0
0x40a8f4…40aa88 f01 = 0x0002 // 0x40a8f6 @0x2
0x40a8f4…40aa88 gno = [ // 0x40a8f8 @0x4
0x40a8f4…40aa88 [0x00]: C0x010f.0x2.0
0x40a8f4…40aa88 ]
0x40a8f4…40aa88 }
0x40aa88…40ac1c Dummy {f00=0x010f, f01=0x014c, f02=» T; P01; TID=TC; TCL=TC; * LEV=60; : 01; J PTDC=T03; V PLC=01L; f P01; v PSCL=S04; T; 01; TID=D0; TCL=D0; LEV=60; 00; P00; PC; P00; P01
0x40ac1c…40adb0 Dummy {f00=0x010f, f01=0x2008, f02=» P01; TID=TC; TCL=TC; * LEV=60; : 01; J PTDC=T03; V PLC=01L; f P01; v PSCL=S04; T; 01; TID=D0; TCL=D0; LEV=60; 00; P00; PC; P00; P01
0x40adb0…40af44 Dummy {f00=0x010f, f01=0x018e, f02=» r P MODE,KEYS,ECBDCC,ECBBLK, PSTRG2 STRG 4X'0' DK , P EJECT H P V P**************************** ^ P* ( P* COMMON WORK BLOCK FOR ALL TASKS P* . P***************************************** P PCB9 BLK
0x40af44…40b0d8 Dummy {f00=0x010f, f01=0x0190, f02=» p PNBRGTP BIN NUMBER OF GTPS P* * : PMF1KBV STRG 32X'40C1C2C3C4C5C6C7' DV ADDRESSES KB/VDU 4 6 PMF1GTP STRG 32X'C8C94A4B4C4D4E4F' DV ADDRESSES GTP r H P* THE LENGTH OR PLACE OF THE CONFIG DATA ABOVE SHOULD NOT BE CHANGED P* ( PMF1CU
0x40b0d8…40b26c Dummy {f00=0x010f, f01=0x0190, f02=» P* PBINWK1 BIN P* 6 POFF STRGI (12)2C'TC','TD','TE','TF','TG','TH', C * $ P 'TI','TJ','TK','TL','TM','TN' d P EJECT P* CWB 1 COMMON P* P* PCB1 BLK . PCBKOFLG BOOL TRUE T=ALL BKO-CODES ALLOWED 0 PCK
0x40b26c…40b400 Dummy {f00=0x010f, f01=0x018e, f02=»ST MODE l , PCTRVALG BOOL FALSE T: SKOVBO. F: VIBORG . PCFLT46 BOOL FALSE T=SPECIAL FIELD 46,TR=8 @ . PCFLT48 BOOL FALSE T=SPECIAL FIELD 48,TR=3 r , PCKTAUTO BOOL TRUE T=ASK KORT AFTER TR 4 2 PCDCFLAG BOOL TRUE T=INCLUDES DATATRANSMISSION .
0x40b400…40b594 (2, 464) Opaque[0x194]
0x40b594…40b728 # DirEnt {nam=»KMREMT«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1a30, f03=0x0000}
0x40b594…40b728 IdxSect {
0x40b594…40b728 f00 = 0x00d1 // 0x40b594 @0x0
0x40b594…40b728 f01 = 0x0004 // 0x40b596 @0x2
0x40b594…40b728 gno = [ // 0x40b598 @0x4
0x40b594…40b728 [0x00]: C0x00d1.0x2.0
0x40b594…40b728 [0x01]: C0x00d3.0x1.0
0x40b594…40b728 ]
0x40b594…40b728 }
0x40b728…40b8bc Dummy {f00=0x00d1, f01=0x018e, f02=» PPRT KMREMT PPRT CONRT PMES REMIT TEST ( PASG 2,NO > PSCR N PLED KMD08,/S Z P!!CH $$EJECT$$ $$ n P!!DL 67,68 FD03,FD04 P!!DL 72,94 TERM KA P!!DL 95,112 TERM GA P!!DL 113,128 TERM LA P!!DL 129,140 TERM
0x40b8bc…40ba50 Dummy {f00=0x00d1, f01=0x0190, f02=» P!!RE 210,$$FALSE$$TRUE$$ DC P!!RE 214,$$TRUE$$FALSE$$ ( & P!!RE 248,$$FALSE$$TRUE$$ TEXT REG H $ P!!RE 249,$$FALSE$$TRUE$$ LEV REG r P!!DL 283 $ PCFLAG BINI (12),X'0059',X'0064' P!!RE 316,$$128$$80$$ P!!RE 324,$$OD-KOM$$P.6000$
0x40ba50…40bbe4 Dummy {f00=0x00d1, f01=0x0190, f02=» P!!DL 678 DUMMY T:IO P!!DL 689,707 KBVGO $ P!!DL 708,723 GTPGO > P!!DL 724,735 LPGO X P!!DL 736,748 DC1GO r & P!!DL 749,766 RESTART OFFLINE TASK P!!EN PASG 2,LP0F PNOD C PTRA /S PINC DIVFMT PINC RG
0x40bbe4…40bd78 Dummy {f00=0x00d1, f01=0x018e, f02=»P$$ | P!!CH $$SL461$$SLCOP$$ P!!EN * PTRA /S,NL 6 PNOD R H PINC SUBAPL V PNOD R h PINC RGFRMT v PNOD R PINC KTOPR PINC KTPLN PINC ADM6 PNOD R PINC RGSUB1 PINC RGSUB2 PINC DKSUBS
0x40bd78…40bf0c Dummy {f00=0x00d1, f01=0x0084, f02=» PTLK U,4K LKE M PKPF /L,RGTEST " PSCR 8 2 PMES $PDISC M=M:9.2P,MU=M:9.2P,A=RGTEST,C=CONRT D P$ASG2 z PNOD R PINC KTOPR PINC KTPLN PINC ADM6 PNOD R PINC RGSUB1 PINC RGSUB2 PINC DKSUBS
0x40bf0c…40c0a0 Dummy {f00=0x00d1, f01=0x2008, f02=» U,4K LKE M PKPF /L,RGTEST " PSCR 8 2 PMES $PDISC M=M:9.2P,MU=M:9.2P,A=RGTEST,C=CONRT D P$ASG2 z PNOD R PINC KTOPR PINC KTPLN PINC ADM6 PNOD R PINC RGSUB1 PINC RGSUB2 PINC DKSUBS
0x40c0a0…40c234 (2, 465) Dummy {f00=0x00d3, f01=0x0190, f02=» LEVROK " CLEAR CLEVFLG RELEASE BUFFER CMP CBIN0,CBIN0 OK < RET X * d LEVRNOK n " CLEAR CLEVFLG RELEASE BUFFER ~ CMP CBIN1,CBIN0 NOK P RET P PEND P EJECT P* PLEVWRT PROC **
0x40c234…40c3c8 Dummy {f00=0x00d3, f01=0x0190, f02=»* LEVW000 & ! TBF CLEVFLG,LEVW010 BUFFER FREE? DELAY CBIN2 NO, WAIT D b B LEVW000 j | LEVW010 $ SET CLEVFLG RESERVE LEV BUFFER * PACK LEV INFO P MOVE CLEVBUF,CBLANKS 0 P PERF XCOP,CLEVBUF
0x40c3c8…40c55c Dummy {f00=0x00d3, f01=0x0190, f02=» ` 2 P PERF XCOP,CLEVBUF,=W'68',=W'20',GTLEVBY,=W'0' 2 P PERF XCOP,CLEVBUF,=W'88',=W'3',GTLEVPNR,=W'0' > 4 P PERF XCOP,CLEVBUF,=W'91',=W'13',GTLEVPDI,=W'0' t 4 P PERF XCOP,CLEVBUF,=W'104',=W'1',GTLEVBFO,=W'0' 2 P PERF XCOP,CLEVBUF,=W'105',=W'4',GTL
0x40c55c…40c6f0 Dummy {f00=0x00d3, f01=0x018e, f02=»3',GTLEVDAT,=W'1' r * WRITE ( $ PERF IDXGET,GTLEVNR,GSWBIN4,GSWBIN5 . GSWBIN5 LEV INDX Z GSWBIN4 INDEX v BERR LEVWNOK DISK ERROR BNOK LEVWNOK NOT FOUND FOUND , ' PERF RAWRIT,DK08,=D'8',CLEVBUF,GSWBIN5
0x40c6f0…40c884 Dummy {f00=0x00d3, f01=0x0190, f02=» LEVWNOK " CLEAR CLEVFLG RELEASE BUFFER CMP CBIN1,CBIN0 NOK > P RET Z P PEND f P EJECT t P* PLEVINT PROC P********** P* ( P* INITIATE STAM INFORMATION FOR P* LEVERAND NR GTLEVNR
0x40c884…40ca18 Dummy {f00=0x00d3, f01=0x0190, f02=»GTLEVPNR,=D'0' P MOVE GTLEVPDI,CBLANKS P MOVE GTLEVBFO,=D'0' 4 P MOVE GTLEVGI,=D'0' P P MOVE GTLEVALT,=D'0' l P MOVE GTLEVDAT,CMASKDAT P RET P PEND P EJECT P* PLEVSPG PROC 0 P**************************
0x40ca18…40cbac Dummy {f00=0x00d3, f01=0x0190, f02=»**************** t PLSPG000 P MOVE GSWSTR9,='FORESPG. ' ( P SET SPPROMPT J P SET GTSPGFLG 1. TIME ` P SET GTDYFLG FORESPG ~ $ P PERF FMTREM,CBIN3 ATTACH FORMAT P PERF SPCLRA WRITE ON SCREEN & P IB SPBINW2,LSPGOK,LSPGOK,LSPG010
0x40cbac…40cd40 Dummy {f00=0x00d3, f01=0x0190, f02=» P BERR LSPGNOK DISK ERROR P BNOK LSPGNOK NOT FOUND $ P* LEV NR GTLEVNR FOUND D P PERF LEVRD READ STAMINFO b P BNOK LSPGNOK " P PERF VARRD READ VARIABLE INFO P BNOK LSPGNOK PLSPG015 P CLEAR GTSWFLAG P CLEAR GTD
0x40cd40…40ced4 (2, 466) Opaque[0x194]
0x40ced4…40d068 # DirEnt {nam=»KMREMP«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2b10, f03=0x0000}
0x40ced4…40d068 IdxSect {
0x40ced4…40d068 f00 = 0x0158 // 0x40ced4 @0x0
0x40ced4…40d068 f01 = 0x0002 // 0x40ced6 @0x2
0x40ced4…40d068 gno = [ // 0x40ced8 @0x4
0x40ced4…40d068 [0x00]: C0x0158.0x2.0
0x40ced4…40d068 ]
0x40ced4…40d068 }
0x40d068…40d1fc Dummy {f00=0x0158, f01=0x0190, f02=» PMES REMIT TEST PSCR PLED KMD08,/S & P!!DL 73,74 FD03,FD04 : P!!DL 195 V 0 PMF1KBV STRG 32X'C1C2C3C4C5C6C750' DEV. ADR. f P!!DL 201 ( PCNFHC STRGI (16),'GA','GA','GB',' ' P!!DL 206,207 " POFF STRGI (12)2C'TC',' ',' '
0x40d1fc…40d390 Dummy {f00=0x0158, f01=0x0190, f02=»RE 221,$$FALSE$$TRUE$$ DC P!!RE 225,$$TRUE$$FALSE$$ " P!!DL 314 ***** B * PCTRANBUF STRG 2300 BUFFER=2*1150 ***** X P!!RE 327,$$128$$80$$ P!!RE 335,$$OD-KOM$$P.6000$$ , P!!RE 336,$$01014610$$03029991$$ VERSION P!!DL 392,393 "
0x40d390…40d524 Dummy {f00=0x0158, f01=0x0190, f02=»C RGSUBS PINC KMDIO PINC RGSUB3 " PNOD R 4 PINC SCREEN B PINC SUBAPL T PNOD R f PINC RGFRMT t PNOD R PINC KTOPR PINC KTPLN PLED ADM6,/S : P!!CH $$GSWBIN2,=W'504'$$GSWBIN2,=W'2300'$$ REQ.LENGTH
0x40d524…40d6b8 Dummy {f00=0x0158, f01=0x013c, f02=»RGSTRT PNOD R PINC REMFMT PINC REMTXT . PINC REMLEV @ PASG 2,LP0F R PTLK U,4K d PINC PRT t PINC VDUPRT PINC START PINC TB3270 P$INCGEN LKE M PKPF /L,RGLOAD PSCR 4 PMES $PDISC M=M
0x40d6b8…40d84c Dummy {f00=0x0158, f01=0x2008, f02=» PNOD R PINC REMFMT PINC REMTXT . PINC REMLEV @ PASG 2,LP0F R PTLK U,4K d PINC PRT t PINC VDUPRT PINC START PINC TB3270 P$INCGEN LKE M PKPF /L,RGLOAD PSCR 4 PMES $PDISC M=M
0x40d84c…40d9e0 Dummy {f00=0x0158, f01=0x40bc, f02=» : H IDENT T:DD00 TRA 4.1 80-02-06 F1 O1111 02.01.XXX.1 T:DD00 B T:DD00D T DC1GO h * & D0 * x @ D0 * @ * & = a
0x40d9e0…40db74 (2, 467) Opaque[0x194]
0x40db74…40dd08 # DirEnt {nam=»CONRS2«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x21f8, f03=0x0000}
0x40db74…40dd08 IdxSect {
0x40db74…40dd08 f00 = 0x010f // 0x40db74 @0x0
0x40db74…40dd08 f01 = 0x0002 // 0x40db76 @0x2
0x40db74…40dd08 gno = [ // 0x40db78 @0x4
0x40db74…40dd08 [0x00]: C0x010f.0x3.0
0x40db74…40dd08 ]
0x40db74…40dd08 }
0x40dd08…40de9c Dummy {f00=0x010f, f01=0x018e, f02=» T; P01; TID=TC; TCL=TC; * LEV=60; : 01; J PTDC=T03; V PLC=01L; f P01; v PSCL=S04; PT; P03; TID=KA; TCL=KA; LEV=60; 01; PTDC=T04; PLC=01L; P03;
0x40de9c…40e030 Dummy {f00=0x010f, f01=0x011a, f02=» PTDC=T05; PLC=02L; P03; $ PSCL=S02; 0 PSCL=S03; @ PSCL=S04; P T; ` 01; j TID=D0; v TCL=D0; LEV=60; 00; P00; PC; P00; P01; PSCL=S01; U; 001; TB
0x40e030…40e1c4 Dummy {f00=0x010f, f01=0x2008, f02=» T05; PLC=02L; P03; $ PSCL=S02; 0 PSCL=S03; @ PSCL=S04; P T; ` 01; j TID=D0; v TCL=D0; LEV=60; 00; P00; PC; P00; P01; PSCL=S01; U; 001; TB
0x40e1c4…40e358 Dummy {f00=0x010f, f01=0x0190, f02=» D0 D0 * $ ( 8 8 ! TB2
0x40e358…40e4ec Dummy {f00=0x010f, f01=0x0190, f02=»
[…0x1…]
0x40e680…40e814 (2, 468) Opaque[0x194]
0x40e814…40e9a8 # DirEnt {nam=»OBDIR «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2ee0, f03=0x0000}
0x40e814…40e9a8 IdxSect {
0x40e814…40e9a8 f00 = 0x0177 // 0x40e814 @0x0
0x40e814…40e9a8 f01 = 0x0006 // 0x40e816 @0x2
0x40e814…40e9a8 gno = [ // 0x40e818 @0x4
0x40e814…40e9a8 [0x00]: C0x0177.0x0.0
0x40e814…40e9a8 [0x01]: C0x0178.0x0.0
0x40e814…40e9a8 [0x02]: C0x0178.0x1.0
0x40e814…40e9a8 ]
0x40e814…40e9a8 }
0x40e9a8…40eb3c Dummy {f00=0x0177, f01=0x000c, f02=» $$$TRAM REPL00 SETKEYT TXTOPRT ` TXTPAKR V TXTPRT TXTUNP + ABORT FMTREMT RAREAD RAWRIT9 SPCLRA2 SPCLRN1 SPLIN8 T:DELA T:EDWR T:TESTE T:WAITT LEVOPR LEVPRT V LEVRD " LEVSPGI LEVWRTV SETIDXP VARINT VARRD
0x40eb3c…40ecd0 Dummy {f00=0x0177, f01=0x0190, f02=» `START DCTASK P I:EVA0 GTRBUF DCGETM RLRBUF EMULA VDUKB ERASE ICREAD DCINP DC1INQN : DC2INQ R KEYCNV REQTIM SETCUR WCHAR DISPL TASCII TRPAN TRPFN I:RT1 ERASUA ERASUPT LIOLON L
0x40ecd0…40ee64 Dummy {f00=0x0177, f01=0x0190, f02=» EMULA DC1INQ ICREAD ` REQTIM GTRBUF DCGETM UPDATE RFMDUP SNBUSYK VDUPRT DCINP LINHON LSAVON ATMASB LINHOFC SNBUSY DCGETM | REQTIM~ GTRBUF $ RLRBUF $ TEBCDI LSAVOF TASCII U
0x40ee64…40eff8 Dummy {f00=0x0177, f01=0x0190, f02=» TASCIIK TEBCDI @ KEYCNV ( RGMAIN $$$TRAM FUNCT " INITRGT TRINP TRPAGE hADM BELLIhCYK DIVTR ENTER FMSTYR FRMTSP0 KORTX KVIT LSTINT MODPT PACKCLR SETDEBI SETKREP SPCA SPCLRA SPCLRN SPCN SPERR
0x40eff8…40f18c Dummy {f00=0x0177, f01=0x0190, f02=» CNFWRT ] CONFRDC } CONFWRN CONRDX T1GO TCONFR 6 TCONFWS a hADM ASGVOLC CLBEH CLEDB CLEJ CLSVOL LAMPOF LAMPONF MASK RAREADS RAWRITA RGA1200 RGADM RGREAD2 RSTORE1 SETIDX SETMK SKIFT SOPRD SPCLRAC SPCLRNE SPLIN8O STRTWRO T:ATTFO T:DSC0 T:D
0x40f18c…40f320 Dummy {f00=0x0177, f01=0x0190, f02=» RADEL [ RAREAD1 b RAWRIT RGREADB RSTORED SQREAD SQWRITR LAMPON MASKU PACKCLD PACKSTT SETDEBR SETKRER SPERR T:ASSII T:DELAB T:DSC0R T:DSC1R T:READS T:RREA T:RWRII T:WRITA T:XSTA WRITJTP SCREEN K $$$TRAS BELLF
0x40f320…40f4b4 (2, 469) Dummy {f00=0x0178, f01=0x0190, f02=»2C SPCHK3S SPCHK4 SPCHK5P SPCHK6? SPCHK7C SPTCHKF T:DISPL T:DSC1C T:DUPLR T:DYKI T:EDFLA T:EDWR0 T:ERASR T:GETAC T:GETCS T:GETF T:NKI T:PRINK T:SETCK T:TBWDH T:TDOWS T:TFWDC T:THOMP T:TLDO T:TLEF T:TRIGA T:TSTC0 T:TUP T:UPDFT T:XSTAT TRGFRMT
0x40f4b4…40f648 Dummy {f00=0x0178, f01=0x0190, f02=»RMTKTM F FRMTKV2 < FRMTTAX FRMTVO ( FRMXGP d FRMXJTF FRMXKTM P FRMXTAT FRMXVO 2 FMOVE n DIV461 2 2 $$$TRA FRMTGPV Z FRMTJTF FRMTKTM F FRMTKV2 < FRMTTAX FRMTVO ( FRMXGP d FRMXJTF FRMXKTM P FRMXTAT FRMXVO 2 FMOVE
0x40f648…40f7dc Dummy {f00=0x0178, f01=0x0190, f02=» P FRMXTAT FRMXVO 2 FMOVE n DIV259 # 2 2 $$$TRA FRMTGPV Z FRMTJTF FRMTKTM F FRMTKV2 < FRMTTAX FRMTVO ( FRMXGP d FRMXJTF FRMXKTM P FRMXTAT FRMXVO 2 FMOVE n DIV525 U 2 2 $$$TRA FRMTGPV Z FRMTJTF F
0x40f7dc…40f970 Dummy {f00=0x0178, f01=0x0190, f02=»$$TRA FRMTGPV Z FRMTJTF FRMTKTM F FRMTKV2 < FRMTTAX FRMTVO ( FRMXGP d FRMXJTF FRMXKTM P FRMXTAT FRMXVO 2 FMOVE n DIV805 2 2 $$$TRA FRMTGPV Z FRMTJTF FRMTKTM F FRMTKV2 < FRMTTAX FRMTVO ( FRMXGP d FRMXJTF FRMXKTM
0x40f970…40fb04 Dummy {f00=0x0178, f01=0x0190, f02=»PCHK2S SPCHK3E SPCHK4 SPCHK5S , SPCHK6C } SPCHK7K SPTCHK7 CRKJK KKCHS KTPLAN PACKCL T:GETCK ,KMDIO $$$TRA CLEAR8D CRKJA a CRVO0 i EDATNR GRASPV. LINOPT WCHECK WRITFDV WRITID WRITJTL WRITVOH q W
0x40fb04…40fc98 Dummy {f00=0x0178, f01=0x0190, f02=» T:WAITA RGADM F F $$$TRAS hADM W ADMRETN BCKUP CLBEH 3 CLEDB CLEJL LAMPOFA LAMPONS RGA120I RGADM SKIFT I SLUTIDT f SOPRD STRTID / STRTWRA TCLOSEB TR2GENB WAHEADB WALINE 8 ZEROA ABORT ADM600A ASGVOLR
0x40fc98…40fe2c Dummy {f00=0x0178, f01=0x0190, f02=»GC KORTS KTOPR KTPRT KVITC LEVDELA LEVOPRC LEVPRTK LEVSPGE LSTINTF MODPN ONLINER PACKCL RADEL RAREADV RAWRITP RGREADR SETDEBS SETKREK SLUTK SPCLRAW SPCLRNA SPINF1C SPLIN8K SQWRITE SUBTOTFhSUM T:ATTFN T:DELAC T:DSC0R T:DSC1R T:EDWRR T:KIR T:WAITS TCONFRK T
0x40fe2c…40ffc0 Dummy {f00=0x0178, f01=0x0190, f02=»IVTR ENTER FMTNXTX KKCH Q KKTRP KORTK KVITV LSTINTF ? MODPK SUBTOTP hSUM % ABORT CLEAR88 CRVON CYOUT EMPTYTE FLDTSTF FRMTKT FRMTKVQ FRMXKT FRMXSP FRMXTA FRMXVOF GRASPVK LINOPTO SETDEBM SETKREC SLUT8 SPCHK5C SPCLRAP SPERR SPINF1F SPLIN8F
0x40ffc0…410154 (2, 470) Dummy {f00=0x0178, f01=0x0190, f02=» FLDTSTS SLUTM SUMWRT1 UPDA12 UPDAKK FRMTJTS FRMTVOA FRMXTA0 KTPLANF PACKST SPERR SPINF8 WRITFD WRITJT WRITVOS WTALLYM d h PRGSUB2 v $$$TRAS PACKCL H PACKST CYTRP EMPTYTT i s RGSUB3 x $$$TR
0x410154…4102e8 Dummy {f00=0x0178, f01=0x0190, f02=»A T:DSC0O T:DSC1L T:EDWRC T:WAITC >ADM6 ~ $$$TRA ADM600M CHNGDKD EXCHAN- SENDRC2 SIGNOFX V SIGNON STRTRC TERMINE . TRNOK WJDCS ADMRETM ASGVOLD BCKUP CLSVOL GETBIT2 LAMPOFO LAMPONG RAREAD RAWRIT SLUTIDI SOP
0x4102e8…41047c Dummy {f00=0x0178, f01=0x0190, f02=» ADM600 ADMRETM ZKTPLN $$$TRAP KTPLAN RESTMKS SETMK RAREADP T:DELAA >KTPLND $$$TRAP KTPLAN SETMK KTOPR $$$TRAO KTOPR KTPRT g ADMRETO FRMXTAA KTPLAN0
0x41047c…410610 Dummy {f00=0x0178, f01=0x0190, f02=»TOPR KTPRT ADMRETO @REMFMT $$$TRAM FMTREM T:ATTFM REMLEV $$$TRA IDXDELL IDXGETV IDXINSD INITIX2 0 LEVDELX LEVOPR LEVPRT V LEVRD " LEVSPGI LEVWRTV SETIDXP VARINT VARRD
0x410610…4107a4 Dummy {f00=0x0178, f01=0x40b8, f02=» $$$TRAM REPL00 SETKEYT TXTOPRT ` TXTPAKR V TXTPRT TXTUNP + ABORT FMTREMT RAREAD RAWRIT9 SPCLRA2 SPCLRN1 SPLIN8 T:DELA T:EDWR T:TESTE T:WAITT LEVOPR LEVPRT V LEVRD " LEVSPGI LEVWRTV SETIDXP VARINT VARRD
0x4107a4…410938 Dummy {f00=0x0178, f01=0x0190, f02=» TC * & T , , ( - N , ( = " $ & ( * , . ~ , ( M 0 2 4 6 8 : < > ] : H IDENT T:DTC0 TRA 4.2
0x410938…410acc Dummy {f00=0x0178, f01=0x0190, f02=» l " * * : H IDENT T:AKA0 TRA 4.2 80-04-16 F2 O2222 03.01.XXX.1 < T:AKA0 z T:AKA0A . * T:DKA0 D:CB90 C:CB90 D:TB90 Z:TB90 * & @ * &
0x410acc…410c60 Dummy {f00=0x0178, f01=0x0190, f02=» * KA * y > : H IDENT T:DKA0 TRA 4.2 80-04-16 F2 O2222 03.01.XXX.1 P T:DKA0 T:DKA0D REENKA KBVGO * & KA @ * *
0x410c60…410df4 (2, 471) Opaque[0x194]
0x410df4…410f88 # DirEnt {nam=»TEST «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1840, f03=0x0000}
0x410df4…410f88 IdxSect {
0x410df4…410f88 f00 = 0x00c2 // 0x410df4 @0x0
0x410df4…410f88 f01 = 0x0004 // 0x410df6 @0x2
0x410df4…410f88 gno = [ // 0x410df8 @0x4
0x410df4…410f88 [0x00]: C0x00c2.0x0.0
0x410df4…410f88 [0x01]: C0x00c2.0x3.0
0x410df4…410f88 ]
0x410df4…410f88 }
0x410f88…41111c Dummy {f00=0x00c2, f01=0x0190, f02=» IDXINS PROC ********** * * & !* INSERT GTLEVNR IN INDEXFILE 4 * ^ ********** h ( $ PERF IDXGET,GTLEVNR,GSWBIN4,GSWBIN5 z GSWBIN5 LEV INDEX GSWBIN4 INDEX BERR XINSNOK DISK ERROR BOK XINSN
0x41111c…4112b0 Dummy {f00=0x00c2, f01=0x0190, f02=»IT | B XINS000 XINS010 ( $ CBG CIXFREE,CIXLAST,XINSNOK NO ROOM , . ) MOVE GSWBIN8,GSWBIN4 PLACE FOR INSERTION X ( # MOVE GSWBIN4,CIXFREE START OF LOOP & ! ADD CIXFREE,CBIN1 NEW FIRST FREE * XINS100 * % SUB GSWBIN4,C
0x4112b0…411444 Dummy {f00=0x00c2, f01=0x0190, f02=»K07,=D'7',CIXBUF,GSWBIN1,GSWBIN4 BNOK XINSNOK ( ADD GSWBIN4,CBIN1 > * & PERF RAWRIT,DK07,=D'7',CIXBUF,GSWBIN4 X BNOK XINSNOK $ PERF RESTIX RESET MASTER INDEX SUB GSWBIN4,CBIN1 B XINS100 * XINS200 (
0x411444…4115d8 Dummy {f00=0x00c2, f01=0x0190, f02=»=W'0' j MOVE GSWBIN1,CBIN7 * & PERF RAWRIT,DK07,=D'7',CIXBUF,GSWBIN8 * " CLEAR CIDXFLG RELEASE BUFFER X CMP CBIN0,CBIN0 OK ~ RET XINSNOK " CLEAR CIDXFLG RELEASE BUFFER CMP CBIN1,CBIN0 NOK RET PEN
0x4115d8…41176c Dummy {f00=0x00c2, f01=0x0190, f02=»DEXFILE, STAM, AND VAR FILE * $ ********** . * @ ( $ PERF IDXGET,GTLEVNR,GSWBIN4,GSWBIN5 J GSWBIN5 LEV INDX v GSWBIN4 INDEX BERR XDELNOK DISK ERROR BNOK XDELNOK NOT FOUND * FOUND XDEL00
0x41176c…411900 Dummy {f00=0x00c2, f01=0x0190, f02=»BIN5 DELETE STAMRECORD | . * PERF RADEL,DK09,GSWBIN5 DELETE VAR RECORD * P & ! MOVE GSWBIN7,GSWBIN5 KEEP LEVDEX Z XDEL100 * & ADD GSWBIN4,CBIN1 NEXT RECORD TO MOVE " CBNL GSWBIN4,CISFREE,XDEL200 MOVE GSWBIN1,CBIN7 LENGTH 2
0x411900…411a94 (2, 472) Dummy {f00=0x00c2, f01=0x0190, f02=»=D'7',CIXBUF,GSWBIN4 ~ BNOK XDELNOK PERF RESTIX 2 ADD GSWBIN4,CBIN1 F B XDEL100 ` * r XDEL200 INSERT NEW FREE | SUB CIXFREE,CBIN1 MOVE CIXBUF,CBLANKS 0 + PERF XCOP,CIXBUF,=W'5',=W'2',GSWBIN7,=W'0' * &
0x411a94…411c28 Dummy {f00=0x00c2, f01=0x40a0, f02=»MP CBIN0,CBIN0 OK RET * & XDELNOK 0 " CLEAR CIDXFLG RELEASE BUFFER @ CMP CBIN1,CBIN0 NOK f RET PEND @ UB CIXFREE,CBIN1 MOVE CIXBUF,CBLANKS 0 + PERF XCOP,CIXBUF,=W'5',=W'2',GSWBIN7,=W'0' * &
0x411c28…411dbc Dummy {f00=0x00c2, f01=0x2008, f02=» ,CBIN0 OK RET * & XDELNOK 0 " CLEAR CIDXFLG RELEASE BUFFER @ CMP CBIN1,CBIN0 NOK f RET PEND @ UB CIXFREE,CBIN1 MOVE CIXBUF,CBLANKS 0 + PERF XCOP,CIXBUF,=W'5',=W'2',GSWBIN7,=W'0' * &
0x411dbc…411f50 Dummy {f00=0x00c2, f01=0x0190, f02=» P 8 2 0 F 1 d x TC , 2 T ` z l T z T b ^ L * ~ * n n TC
0x411f50…4120e4 Dummy {f00=0x00c2, f01=0x0190, f02=» % 0
0x4120e4…412278 Dummy {f00=0x00c2, f01=0x0190, f02=»
[…0x2…]
0x4125a0…412734 (2, 473) Opaque[0x194]
0x412734…4128c8 # DirEnt {nam=»REORG «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1a70, f03=0x0000}
0x412734…4128c8 IdxSect {
0x412734…4128c8 f00 = 0x00d3 // 0x412734 @0x0
0x412734…4128c8 f01 = 0x0002 // 0x412736 @0x2
0x412734…4128c8 gno = [ // 0x412738 @0x4
0x412734…4128c8 [0x00]: C0x00d3.0x2.0
0x412734…4128c8 ]
0x412734…4128c8 }
0x4128c8…412a5c Dummy {f00=0x00d3, f01=0x0190, f02=» MES * REORG OBJECT LIBRARY INC START & INC PRT 8 INC VDUPRT H INC TB3270 Z INC RGMAIN l INC RGMND ~ INC RGSTRT INC DKSUBS INC SCREEN INC RGFRMT INC DIVFMT INC DIV461 INC DIV167
0x412a5c…412bf0 Dummy {f00=0x00d3, f01=0x012e, f02=»RGSUBS INC RGSUB1 INC RGSUB2 INC RGSUB3 2 INC ADM6 D INC ADM6D T INC KTPLN f INC KTPLND x INC KTOPR INC KTOPRD INC REMFMT INC REMLEV INC REMTXT DEL /OB KPF /O SCR
0x412bf0…412d84 Dummy {f00=0x00d3, f01=0x2008, f02=» INC RGSUB1 INC RGSUB2 INC RGSUB3 2 INC ADM6 D INC ADM6D T INC KTPLN f INC KTPLND x INC KTOPR INC KTOPRD INC REMFMT INC REMLEV INC REMTXT DEL /OB KPF /O SCR
0x412d84…412f18 Dummy {f00=0x00d3, f01=0x40be, f02=» : H IDENT T:DLA0 TRA 4.2 80-03-28 F2 O2222 03.01.XXX.1 T:DLA0 B T:DLA0D T LPGOA h , ( LA @ * * x @ * & * & = a
0x412f18…4130ac Dummy {f00=0x00d3, f01=0x40f0, f02=» : H IDENT T:AD00 TRA 4.2 80-03-28 F2 O2222 03.01.XXX.1 T:AD00 B T:AD00A " T T:DD00 D:CB90 C:CB90 h * & ` D0 * @ * & = a
0x4130ac…413240 Dummy {f00=0x00d3, f01=0x40bc, f02=» : H IDENT T:DD00 TRA 4.2 80-03-28 F2 O2222 03.01.XXX.1 T:DD00 B T:DD00D T DC1GO h * & D0 * x @ D0 * @ * & = a
0x413240…4133d4 (2, 474) Opaque[0x194]
0x4133d4…413568 # DirEnt {nam=»DC82 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x18e0, f03=0x0000}
0x4133d4…413568 IdxSect {
0x4133d4…413568 f00 = 0x00c7 // 0x4133d4 @0x0
0x4133d4…413568 f01 = 0x0004 // 0x4133d6 @0x2
0x4133d4…413568 gno = [ // 0x4133d8 @0x4
0x4133d4…413568 [0x00]: C0x00c7.0x0.0
0x4133d4…413568 [0x01]: C0x00cb.0x2.0
0x4133d4…413568 ]
0x4133d4…413568 }
0x413568…4136fc Dummy {f00=0x00c7, f01=0x0190, f02=» & ! IDENT DCTSK REL 1.2 78-11-30 KST ENTRY DCTSK . P EJECT B P P P X > P********************************************************** ` P* P* CONDITIONAL ASSEMBLY P* & P********************************* P P
0x4136fc…413890 Dummy {f00=0x00c7, f01=0x0190, f02=»X EQU 0 PMGTP EQU 0 PEBCDIC EQU 1 " P EJECT 6 P* D P* N P* EQUATES X P* n P* x P* " P* COMMON EQU FOR ECB HANDLING P* P PECBBA EQU 2 PECBRL EQU 4 PECBEL EQU 6 PECBRC EQ
0x413890…413a24 Dummy {f00=0x00c7, f01=0x018e, f02=»* PDIS EQU 20 P* PECB1 EQU -DIS-8 & PECB2 EQU ECB1-DIS > PECB3 EQU ECB2-DIS X PECB4 EQU ECB3-DIS r PECB5 EQU ECB4-DIS P* PECBDC EQU ECB1 PECBDCT EQU ECB2 PECBVDU EQU ECB3 PECBKB EQU ECB4
0x413a24…413bb8 Dummy {f00=0x00c7, f01=0x0190, f02=» PCREBAS EQU A13 ECB P* P* ( P* TCA REL. ADDRESSES 2 P* N PTCT01 EQU 0 X PPRINTER EQU TCT01+2 l ( PBVDU EQU PRINTER+2 VDU SCREEN BUFFER 0 PPCURS EQU BVDU+1920 CURSOR ADDRESS , BINARY * PATTRIB EQU PCURS+2 LAST ATTRIBUT
0x413bb8…413d4c Dummy {f00=0x00c7, f01=0x0190, f02=»NCNT EQU KBINH+2 LINE COUNTER 0 PDCLENG EQU LINCNT+2 DC READ EFFECTIVE LENGTH & . PDCADDR EQU DCLENG+2 DC SUBTERMINAL ADDRESS Z PTCTGPL EQU DCADDR+2 , PINTATT EQU TCTGPL+2 INTENSITY ATTRIBUTE $ POFFFLG EQU INTATT+2 OFFLINE FLAG PLOCK EQU
0x413d4c…413ee0 Dummy {f00=0x00c7, f01=0x018e, f02=»PNO+2 CREDIT ECB:S BASE ADDRESS & PVDUT.A EQU CRE+2 T:A BASE ADDRESS ( , PCCC EQU VDUT.A+2 COPY COMMAND CHARACTER R P EJECT P* P* * PLBVDU EQU 1920 1920 CHAR DISPLAY 6344 " PLPAGE EQU 48 LINES ON ONE PAGE * PLLINE EQU 80 80
0x413ee0…414074 (2, 475) Dummy {f00=0x00cb, f01=0x0190, f02=» & PTCADDR EQU /2D20 TCS & TCP ASCII P XIF . P EJECT : P* H P* R P* DC TASK P* n P* x PDCTSK EQU * P LDKL A1,TCADDR & P LDKL A8,ECBDCX ECB DC FOR DC TASK P ST A1,ECBCW,A8 $ P LDK A7,/B7 TRANSFER PAR
0x414074…414208 Dummy {f00=0x00cb, f01=0x40f2, f02=»RETURN CODE | P ANKL A1,/2000 P RB(NZ) DCT100 STATUS CHANGE * , P LDK A7,/A2 MESSAGE: RELEASE READ BUFFER N P LKM ~ P DATA 1 P RB DCT100 P* P* PECBDCX DATA /60,0,0,0,0,0 END @ DK A7,/B7 TRANSFER PAR
0x414208…41439c Dummy {f00=0x00cb, f01=0x2008, f02=» NT DCTSK REL 1.2 78-11-30 KST ENTRY DCTSK . END B@ N 3
0x41439c…414530 Dummy {f00=0x00cb, f01=0x0190, f02=» ( # % F # & $ # & # . & ADM # > $ & # R & # b ' BEHOLDNINGST[LLERE # p $ ' # & # ( NR # $ ( # & # ) KONTONRI # $ ) #
0x414530…4146c4 Dummy {f00=0x00cb, f01=0x0190, f02=»& # & $ & $ & $ * & $ : , 99999999E-99 $ L " , $ h & $ x & $ & $ & $ - TTT.TTT.TTT.TT9.99- $ " - $ $ $ ( $
0x4146c4…414858 Dummy {f00=0x00cb, f01=0x0190, f02=» & % 1 KONTONRO % $ 1 % * & % : 2 SALD0 % H $ 2 % ^ & % n & % | & % 3 99999999E-99 % " 3 % & % 4 TTT.TTT.TTT.TT9.99- % " 4
0x414858…4149ec Dummy {f00=0x00cb, f01=0x0190, f02=»TONR REMIT % ~ $ 7 & & & " 8 KONTONRK & 0 $ 8 & H & & X & & f 9 99999999E-99 & x " 9 & ( & : & & 9 & ; DISKETTE SKIFT & $ ; & & &
0x4149ec…414b80 Dummy {f00=0x00cb, f01=0x0190, f02=»( & > ' & 1 ' ? KASSELUKNING ' ( $ ? ' D & ' T & ' b @ ZZ ' p " @ ' & ' & ' & ' A KONTONRK ' $ A ' & ' B BEL '
0x414b80…414d14 (2, 476) Opaque[0x194]
0x414d14…414ea8 # DirEnt {nam=»KEYCOP«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1900, f03=0x0000}
0x414d14…414ea8 IdxSect {
0x414d14…414ea8 f00 = 0x00c8 // 0x414d14 @0x0
0x414d14…414ea8 f01 = 0x0002 // 0x414d16 @0x2
0x414d14…414ea8 gno = [ // 0x414d18 @0x4
0x414d14…414ea8 [0x00]: C0x00c8.0x0.0
0x414d14…414ea8 ]
0x414d14…414ea8 }
0x414ea8…41503c Dummy {f00=0x00c8, f01=0x0190, f02=» PNOKEY EQU X'FF' PBSPKY1 EQU X'87' PCANKY1 EQU X'91' 4 PMACKY1 EQU X'95' L PEORKY1 EQU X'90' d PFTABKY1 EQU X'8B' | PBTABKY1 EQU X'83' PDUPKY1 EQU X'A2' PSLUTKY1 EQU X'A3' PREGKY1 EQU X'A1' PCOPKY1 EQU X'F
0x41503c…4151d0 Dummy {f00=0x00c8, f01=0x0190, f02=»Y1 EQU X'FF' PCY2KY1 EQU X'FF' PCYCKY1 EQU X'89' , PINVKY1 EQU X'FF' D PKONKY1 EQU X'85' PKVITKY1 EQU X'86' t PSUPLKY1 EQU X'82' PSUMKY1 EQU X'81' PADMKY1 EQU X'A0' PDIVKY1 EQU X'84' PHBOGKY1 EQU X'80'
0x4151d0…415364 Dummy {f00=0x00c8, f01=0x0190, f02=»BKY1 EQU X'87' PINSKY1 EQU X'81' PDELKY1 EQU X'82' . PCL1KY1 EQU X'89' F PCL2KY1 EQU X'8A' ^ PCL3KY1 EQU X'8B' v POUTKY1 EQU X'A0' P* PBSPKY2 EQU X'C7' PCANKY2 EQU X'D1' PEORKY2 EQU X'D0' PMACKY2 EQU X'D5'
0x415364…4154f8 Dummy {f00=0x00c8, f01=0x40c4, f02=»EKY2 EQU X'D2' PREGKY2 EQU X'E1' PADMKY2 EQU X'E0' . PSPGKY2 EQU X'FF' F PKONKY2 EQU X'FF' ^ PKVITKY2 EQU X'C6' v PONKY2 EQU X'D9' PCOPKY2 EQU X'C5' @ PCANKY2 EQU X'D1' PEORKY2 EQU X'D0' PMACKY2 EQU X'D5'
0x4154f8…41568c Dummy {f00=0x00c8, f01=0x2008, f02=» * ERRFMT FRMT FSL , " FMEL 'ZZ9B',GTWBCD1 FILE NR. 8 FCOPY ERRTXT ^ " FMEL 'BZZ9',GTWBCD2 ERRORNR. t FCOPY =X'07' FMEND @ 8SPKTAB2 KTAB BSPKY1,CANKY1,NOKEY,MACKY1,NOKEY,EORKY1, C D ? FT
0x41568c…415820 Dummy {f00=0x00c8, f01=0x0190, f02=»THE PICTURE Z P* P MOVE SPERASE,=W'0' & P MOVE SPLINTOP,=W'1' WHOLE SCREEN : P MOVE SPLINLOW,=W'0' d P PERF SCREEN,=W'2' P RET P PEND PSPCLRN PROC P* D P* SPCLRN - CLEAR NO VARIABLE FIELDS BEFORE HANDLING TH
0x415820…4159b4 (2, 477) Opaque[0x194]
0x4159b4…415b48 # DirEnt {nam=»SLCOP «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1920, f03=0x0000}
0x4159b4…415b48 IdxSect {
0x4159b4…415b48 f00 = 0x00c9 // 0x4159b4 @0x0
0x4159b4…415b48 f01 = 0x0004 // 0x4159b6 @0x2
0x4159b4…415b48 gno = [ // 0x4159b8 @0x4
0x4159b4…415b48 [0x00]: C0x00c9.0x0.0
0x4159b4…415b48 [0x01]: C0x00c9.0x1.0
0x4159b4…415b48 ]
0x4159b4…415b48 }
0x415b48…415cdc Dummy {f00=0x00c9, f01=0x0190, f02=» < PSPKTAB1 KTAB BSPKY1,CANKY1,NOKEY,EORKY1,NOKEY,MACKY1, C > P FTABKY1,BTABKY1,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C D & P COPKY1,DUPKY1,EDTKY1,SLUTKY1, C . P KREKY1,REGKY2,LISTKY1,SBTKY1,SPGKY1, C < P CY1KY1,CY2KY1,INVKY1,KONKY1,KVITKY1,
0x415cdc…415e70 Dummy {f00=0x00c9, f01=0x0190, f02=»CANKY1,NOKEY,EORKY1,NOKEY,MACKY1, C | > P FTABKY1,BTABKY1,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C , & P COPKY1,DUPKY1,EDTKY1,SLUTKY1, C n . P KREKY1,REGKY2,LISTKY1,SBTKY1,SPGKY1, C < P CY1KY1,CY2KY1,INVKY1,KONKY1,KVITKY1,SUPLKY1,SUMKY1, C <
0x415e70…416004 Dummy {f00=0x00c9, f01=0x0190, f02=» d " P CL1KY1,CL2KY1,CL3KY1,OUTKY1 P* . > PSPKTAB12 KTAB BSPKY2,CANKY2,NOKEY,EORKY2,NOKEY,MACKY2, C 8 2 P FTABKY2,BTABKY2,NOKEY,NOKEY,NOKEY,NOKEY, C z 2 P NOKEY,NOKEY,COPKY2,DUPKY2,EDTKY2,SLUTKY2, C 6 P KREKY2,REGKY2,ADMKY2,SPGKY2,KONK
0x416004…416198 Dummy {f00=0x00c9, f01=0x0190, f02=»NOKEY, C l 2 P NOKEY,NOKEY,NOKEY,DUPKY2,EDTKY2,SLUTKY2, C 6 P KREKY2,REGKY2,ADMKY2,SPGKY2,KONKY2,KVITKY2,ONKY2 H P* * P* INQUIRY KEYTABLES (SPKEY=3) P* < PSPKTAB13 KTAB BSPKY1,NOKEY,CANKY1,NOKEY,NOKEY,MACKY1, C . P NO
0x416198…41632c Dummy {f00=0x00c9, f01=0x0190, f02=» C j " P NOKEY,INVKY1,KONKY1,KVITKY1 P* 2 < PSPKTAB23 KTAB BSPKY1,NOKEY,CANKY1,NOKEY,NOKEY,MACKY1, C < . P NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C | . P NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY, C . P NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,NOKEY,
0x41632c…4164c0 Dummy {f00=0x00c9, f01=0x0190, f02=»FMT,ERRFMT, C h , P ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C , P ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C F , P ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C v , P ERRDSK,ERRFMT,ERRFMT,ERRFMT,ERRFMT, C 2 P ERRFMT,ERRFMT,ERRFMT,ERRFMT,ERRFMT WARNINGS
0x4164c0…416654 (2, 478) Dummy {f00=0x00c9, f01=0x0190, f02=»RFMT FRMT P FSL P FCOPY ='FEJL ' P FMEL 'ZZ9',GSWBCD4 ERRORNR. 6 P FMEND Z P* h PERRDSK FRMT r P FSL P FMEL '99B',GTWBCD2 P FCOPY GSWSTR9 P FMEL '99',GTWBCD1 P FMEND P* PMSFMT1 FRMT
0x416654…4167e8 Dummy {f00=0x00c9, f01=0x0190, f02=»R '.',1 P FMEND P* PMSFMT3 FRMT ( P FSL < P FTEXT ='NY SIDE. ' H P FMEND d P* r PMSFMT4 FRMT | P FSL P FBF TTSUMFLG,FMT4END P FTAB 15 P FCOPY GTL8TXT P FINP 23 P FMEL 'ZZZZZVZZ9,99+',GT
0x4167e8…41697c Dummy {f00=0x00c9, f01=0x4164, f02=»T6 FRMT P FSL P FCOPY ='KONTOKORT' P FMEND 8 P* F PMSFMT7 FRMT P P FSL d P FCOPY TTINF1 p P FMEND P* PMSFMT8 FRMT P FSL P FCOPY ='DISKETTE SKIFT ' P FILLR X'07',1 P FMEND P*
0x41697c…416b10 Dummy {f00=0x00c9, f01=0x2008, f02=» * ERRFMT FRMT FSL , " FMEL 'ZZ9B',GTWBCD1 FILE NR. 8 FCOPY ERRTXT ^ " FMEL 'BZZ9',GTWBCD2 ERRORNR. t FCOPY =X'07' FMEND @ 8SPKTAB2 KTAB BSPKY1,CANKY1,NOKEY,MACKY1,NOKEY,EORKY1, C D ? FT
0x416b10…416ca4 Dummy {f00=0x00c9, f01=0x0190, f02=» IB SPBINW3,UPD400,SETCREAD,ERRPRINT P B UPD400 , P* > P* OK AFTER APPL CONTROL H " P* UNCONDITIONAL DISPLAYING j P* PUPD260 2 P UPDFLD 1,SPINPUT UPDATE FIELD WITH DISPLAYING PUPD300 4 P CBE SPBINW1,='0',UPD350 SKI
0x416ca4…416e38 Dummy {f00=0x00c9, f01=0x0190, f02=»D360 * P MOVE SPBINW1,SPBINW2 STORE KEY VALUE $ P MOVE SPBINW4,=W'26' SET MESSAGE : P PERF SPERR b ( P CBNE SPBINW2,CBIN2,UPD360 KOR-KEY ? v , P MOVE SPBINW2,SPBINW1 RESET OLD KEYVALUE PUPD360 $ P* JUMP ON FUNCTION KEY INDEX P
0x416e38…416fcc Dummy {f00=0x00c9, f01=0x0190, f02=»KCOPY,DUMMY,DUMMY,KENTER , P SUB SPBINW2,=W'14' ADJUST EOI-KEY INDEX PDUMMY P PRETUR ^ P RET l P* x PUPD400 8 P CBE SPBINW4,='2',UPD260 JUMP IF UNCONDITIONAL DISPL 0 P UPDFLD 0,SPINPUT UPDATE FIELD DISPL. COND. P B UPD30
0x416fcc…417160 Dummy {f00=0x00c9, f01=0x0190, f02=» $ PKTBWD TABULATION 1 STEP BACKW. P TBWD 0 P B TSTTAB > P* P " PKTHOME TAB. TO HOME POSITION Z P THOME P B TSTTAB P* ( PKTLDOWN TAB. TO FIRST ON NEXT LINE P TLDOWN P B TSTTAB P* PKTLEFT
0x417160…4172f4 (2, 479) Opaque[0x194]
0x4172f4…417488 # DirEnt {nam=»KM173 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1848, f03=0x0000}
0x4172f4…417488 IdxSect {
0x4172f4…417488 f00 = 0x00c2 // 0x4172f4 @0x0
0x4172f4…417488 f01 = 0x0004 // 0x4172f6 @0x2
0x4172f4…417488 gno = [ // 0x4172f8 @0x4
0x4172f4…417488 [0x00]: C0x00c2.0x1.0
0x4172f4…417488 [0x01]: C0x00d0.0x2.0
0x4172f4…417488 ]
0x4172f4…417488 }
0x417488…41761c Dummy {f00=0x00c2, f01=0x0190, f02=» PPRT KM173 PPRT C173 * PMES LYNGBY-T]RB[K KOMMUNE, REMITTERING & PASG 2,NO T PSCR d PLED KMD08,/S p P!!CH $$DCTASK$$DCTSK$$ P!!DL 67,68 FD03,FD04 P!!DL 72,94 TERM KA P!!DL 95,112 TERM GA P!!DL 113,128 TERM LA
0x41761c…4177b0 Dummy {f00=0x00c2, f01=0x018e, f02=» r P!!DL 188 PMF1CU STRG X'E6C6' CU ADR P!!DL 190 : * PCNFHC STRGI (16),' ' HARDCOPY PRINTER J P!!DL 195,196 x POFF STRGI (12)2C' ' P!!RE 202,$$FALSE$$TRUE$$ BKO ( P!!RE 203,$$FALSE$$TRUE$$ SALDO KORT $ P!!RE 209,$$TRUE$
0x4177b0…417944 Dummy {f00=0x00c2, f01=0x0190, f02=» l & P!!RE 248,$$FALSE$$TRUE$$ TEXT REG $ P!!RE 249,$$FALSE$$TRUE$$ LEV REG 2 P!!DL 283 Z , PCFLAG BINI (12),X'0011',X'0078',X'0012' j P!!RE 316,$$128$$80$$ P!!RE 324,$$OD-KOM$$LY-T] $$ 0 P!!RE 325,$$01014610$$%VER%REL%MOD$$ VERSION
0x417944…417ad8 Dummy {f00=0x00c2, f01=0x0190, f02=» PON STRGI (12)2C' ' P!!DL 665,666 ENTRY $ P!!DL 668 > P!!DL 671,674 N P!!DL 689,707 KBVGO b P!!DL 708,723 GTPGO | P!!DL 724,735 LPGO & P!!DL 758,762 RESTART OFFLINE TASK P!!EN PASG 2,LP0F PNOD C PTR
0x417ad8…417c6c Dummy {f00=0x00c2, f01=0x018e, f02=»REEN,/S P!!CH $$KEY461$$KEYCOP$$ P!!CH $$SL461$$SLCOP$$ 0 P!!EN N PTRA /S,NL Z PNOD R l PINC SUBAPL z PNOD R PINC RGFRMT PNOD R PINC KTOPR PINC KTPLN PINC ADM6 PNOD R PINC RGSUB1
0x417c6c…417e00 Dummy {f00=0x00c2, f01=0x00ca, f02=» PNOD R PINC REMLEV PTLK U,4K ( PINC DCTSK 8 P$INCGEN J LKE M Z PKPF /L,RGLOAD h PSCR ~ 2 PMES $PDISC M=M:9.2P,MU=M:9.2P,A=RGLOAD,C=C173 P$ASG2 PINC KTPLN PINC ADM6 PNOD R PINC RGSUB1
0x417e00…417f94 (2, 480) Dummy {f00=0x00d0, f01=0x2008, f02=»
0x417f94…418128 Dummy {f00=0x00d0, f01=0x0190, f02=»
[…0x2…]
0x418450…4185e4 Dummy {f00=0x00d0, f01=0x0190, f02=» TCTDTETFTGTHTITJTKTLTMTN* F _ & { B P
0x4185e4…418778 Dummy {f00=0x00d0, f01=0x0190, f02=» RAVNS. 7 0000899 0
0x418778…41890c Dummy {f00=0x00d0, f01=0x0190, f02=» 0 s x 0
0x41890c…418aa0 Dummy {f00=0x00d0, f01=0x0190, f02=»
0x418aa0…418c34 (2, 481) Opaque[0x194]
0x418c34…418dc8 # DirEnt {nam=»C173 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1f98, f03=0x0000}
0x418c34…418dc8 IdxSect {
0x418c34…418dc8 f00 = 0x00fc // 0x418c34 @0x0
0x418c34…418dc8 f01 = 0x0002 // 0x418c36 @0x2
0x418c34…418dc8 gno = [ // 0x418c38 @0x4
0x418c34…418dc8 [0x00]: C0x00fc.0x3.0
0x418c34…418dc8 ]
0x418c34…418dc8 }
0x418dc8…418f5c Dummy {f00=0x00fc, f01=0x018e, f02=» T; P01; TID=TC; TCL=TC; * LEV=60; : P02; J PTDC=T03; V PLC=01L; f PTDC=T07; v PLC=01L; P02; PSCL=S04; PSCL=S06; PT; P01; PTID=TD; PTCL=TC; PLEV=60; P
0x418f5c…4190f0 Dummy {f00=0x00fc, f01=0x014a, f02=» PTID=TE; TCL=TC; LEV=60; ( P02; 8 PTDC=T03; D PLC=01R; T PTDC=T07; d PLC=01R; t P00; PT; P01; PTID=D0; PTCL=D0; PLEV=60; P00; P00; PC; P00; P01;
0x4190f0…419284 Dummy {f00=0x00fc, f01=0x2008, f02=» TID=TE; TCL=TC; LEV=60; ( P02; 8 PTDC=T03; D PLC=01R; T PTDC=T07; d PLC=01R; t P00; PT; P01; PTID=D0; PTCL=D0; PLEV=60; P00; P00; PC; P00; P01;
0x419284…419418 Dummy {f00=0x00fc, f01=0x0190, f02=»0 0 2 0 0 0 0 0 0 $0 *0 1 4 0 wP ^0 / 1nJ A J a J QUJ q J "" &wP 0 ? 0 4 0 0 4 0 q 4 0 q 4 0 q 4 0 q 4 0 q 4 0 q 4 0 q 4 0 q 4 0 q 4 0 q 4 0 q 4 A
0x419418…4195ac Dummy {f00=0x00fc, f01=0x0190, f02=»Ap A A _ A 1 q= 2 _ @ @ @ @ @ @ @ @ @ @ A. A. A. Ao0 0 Aq Az Ao Ap " Ao. ! Ao A+ Ai Z
0x4195ac…419740 Dummy {f00=0x00fc, f01=0x0190, f02=» 6H ! AoP ! Ao+ A+ Ay Am Ao PH AP Ap Ay Ay@ @ A/ A 4 4 ? " Ao Ao_ Ao
0x419740…4198d4 (2, 482) Opaque[0x194]
0x4198d4…419a68 # DirEnt {nam=»KM379 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2148, f03=0x0000}
0x4198d4…419a68 IdxSect {
0x4198d4…419a68 f00 = 0x010a // 0x4198d4 @0x0
0x4198d4…419a68 f01 = 0x0004 // 0x4198d6 @0x2
0x4198d4…419a68 gno = [ // 0x4198d8 @0x4
0x4198d4…419a68 [0x00]: C0x010a.0x1.0
0x4198d4…419a68 [0x01]: C0x010a.0x2.0
0x4198d4…419a68 ]
0x4198d4…419a68 }
0x419a68…419bfc Dummy {f00=0x010a, f01=0x0190, f02=» PPRT KM379 PPRT C379 & PMES RAVNSBORG KOMMUNE, REMITTERING & PASG 2,NO P PSCR ` PLED KMD08,/S l P!!CH $$DCTASK$$DCTSK$$ P!!DL 67,68 FD03,FD04 P!!DL 72,94 TERM KA P!!DL 95,112 TERM GA P!!DL 113,128 TERM LA
0x419bfc…419d90 Dummy {f00=0x010a, f01=0x0190, f02=» P!!DL 188 PMF1CU STRG X'F3D3' CU ADR P!!DL 190 6 * PCNFHC STRGI (16),' ' HARDCOPY PRINTER F P!!DL 195,196 t POFF STRGI (12)2C' ' P!!RE 202,$$FALSE$$TRUE$$ BKO ( P!!RE 203,$$FALSE$$TRUE$$ SALDO KORT $ P!!RE 209,$$TRUE$$FAL
0x419d90…419f24 Dummy {f00=0x010a, f01=0x0190, f02=» & P!!RE 248,$$FALSE$$TRUE$$ TEXT REG $ P!!RE 249,$$FALSE$$TRUE$$ LEV REG . P!!DL 283 V PCFLAG BINI (12),X'0059' f P!!RE 316,$$128$$80$$ P!!RE 324,$$OD-KOM$$RAVNS.$$ 0 P!!RE 325,$$01014610$$%VER%REL%MOD$$ VERSION ( P!!RE 381,$$20$
0x419f24…41a0b8 Dummy {f00=0x010a, f01=0x0190, f02=» P!!DL 689,707 KBVGO P!!DL 708,723 GTPGO P!!DL 724,735 LPGO 8 & P!!DL 758,762 RESTART OFFLINE TASK R P!!EN | PASG 2,LP0F PNOD C PTRA /S PINC DIV167 PINC RGADM PNOD R PINC RGSUBS PINC KMDIO
0x41a0b8…41a24c Dummy {f00=0x010a, f01=0x0190, f02=»/S,NL PNOD R PINC SUBAPL PNOD R . PINC RGFRMT < PNOD R N PINC KTOPR PINC KTPLN n PINC ADM6 PNOD R PINC RGSUB1 PINC RGSUB2 PINC DKSUBS PNOD R PINC RGMAIN PINC RGSTRT PNO
0x41a24c…41a3e0 Dummy {f00=0x010a, f01=0x006a, f02=» PKPF /L,RGLOAD PSCR 2 PMES $PDISC M=M:9.2P,MU=M:9.2P,A=RGLOAD,C=C379 * P$ASG2 ` PINC KTPLN n PINC ADM6 PNOD R PINC RGSUB1 PINC RGSUB2 PINC DKSUBS PNOD R PINC RGMAIN PINC RGSTRT PNO
0x41a3e0…41a574 (2, 483) Dummy {f00=0x010a, f01=0x2008, f02=»
0x41a574…41a708 Dummy {f00=0x010a, f01=0x0190, f02=» @g ]h { _n } 2 P V W< _ 2 # ;B i V T / W V P L , V 2P " 2 P V D ! R T V P V W V P _ 8^t Dg 2 ! 9BP V T 0jW V P D $ V 6 V % V E @ X' T 2 % 7
0x41a708…41a89c Dummy {f00=0x010a, f01=0x0190, f02=» V P W _ g* h0 l V & ht Hg 'W 'W '_6 @ H D L :l:d:h j W W P W 6 2# l W4 @ V Ej"" T> ; [ # lt:H 2 T Z L Lj D V, W # lt Lj E V $ W D V
0x41a89c…41aa30 Dummy {f00=0x010a, f01=0x0190, f02=» Z : | :B , (V ; [ [ j Z H (;AR H & | z ;AV: Z H # | | l ; 6 | j : & | & Z 4 l : Z 4 " 2@P : [ [ j & @ V! P | Z
0x41aa30…41abc4 Dummy {f00=0x010a, f01=0x0190, f02=»l~ : k ; V Y : 2! : 6 2 l W& " # lt;b ; : ;f" #?_" W | # | " T & T + : * & !@P `1` P o Q [ ; 8 V W Q P [ ! X # P 4
0x41abc4…41ad58 Dummy {f00=0x010a, f01=0x0190, f02=»V ^< `_@ R Q <# =_ P :" P * U P 1`! T "# 9e! # K : #0 | P8" T * & : * & !`P :J +_ +Q o _0 , V W R V W R XV W 1 ^ _0 R W ( V W
0x41ad58…41aeec Dummy {f00=0x010a, f01=0x0190, f02=» 0 - P: V W Z _ 4 V W Q P ) P 9_ &" ! 9 : & P Q p, ,^ , < p4 # ; [ _n' d V W V 4! P < S S S X 4 9d * & ! R + : V W R 4 0R Y
0x41aeec…41b080 Dummy {f00=0x010a, f01=0x0190, f02=»Y P _$ SZ Q V P V Q W Q 7 Y P._6 & Q 9d! )0 + P 7 Y Z $ _ : V ) 0 | !0 | " TV *V &V : V S W P 9 S W _ V P W T V E + : & 6 | [
0x41b080…41b214 (2, 484) Opaque[0x194]
0x41b214…41b3a8 # DirEnt {nam=»C379 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2140, f03=0x0000}
0x41b214…41b3a8 IdxSect {
0x41b214…41b3a8 f00 = 0x010a // 0x41b214 @0x0
0x41b214…41b3a8 f01 = 0x0002 // 0x41b216 @0x2
0x41b214…41b3a8 gno = [ // 0x41b218 @0x4
0x41b214…41b3a8 [0x00]: C0x010a.0x0.0
0x41b214…41b3a8 ]
0x41b214…41b3a8 }
0x41b3a8…41b53c Dummy {f00=0x010a, f01=0x018c, f02=» T; P01; TID=TC; TCL=TC; * LEV=60; : P03; J PTDC=T03; V PLC=01L; f PTDC=T07; v PLC=01L; PTDC=T06; PLC=02L; P01; PSCL=S04; PT; P01; PTID=D0; PTCL=D0; P
0x41b53c…41b6d0 Dummy {f00=0x010a, f01=0x2008, f02=» P01; TID=TC; TCL=TC; * LEV=60; : P03; J PTDC=T03; V PLC=01L; f PTDC=T07; v PLC=01L; PTDC=T06; PLC=02L; P01; PSCL=S04; PT; P01; PTID=D0; PTCL=D0; P
0x41b6d0…41b864 Dummy {f00=0x010a, f01=0x0190, f02=» Y 0] Y (_z P P T0 " X _@ " P" c X *# P B 1 c W | " P X X( C : X *! P P T | P c C W @ X (T W X y 6 Y ( : X (;n rx w Fw wzV xRx x~w w w v V.W W w V x Y . Y ,W Y . X
0x41b864…41b9f8 Dummy {f00=0x010a, f01=0x0190, f02=» *# P P T " T : " | Y . Zt Y ( w Y *T " T ! 1 W ! ) w : wz x Y *T W" : w [ w : V Y " X .9H $ x P & X ( " Q Y +Q R " P W " U Y Y , " Q " | X . X 0R P" X *:h P
0x41b9f8…41bb8c Dummy {f00=0x010a, f01=0x0190, f02=»R$W Z Y T$ @ Y (W Y , ZtW Z Y ( w : X *:h X (! # P X & V L TbW X , X 0P@ Y T, X *:h XF XL X (!@T @ Y ( X , Y t X 0 l Z _r X ( P Y (_ P. Y P Y 8 W" X 8 X $ Wh_ " P X ( T X & V
0x41bb8c…41bd20 Dummy {f00=0x010a, f01=0x0190, f02=» Y ( : 8 [ j 8 V Y 8 : " P X & V ( P Y : : Y "0P $ T W %T : : Y ( X $ Y X " Y X & Y X < Y @ : Y : X : X ( T X & V H " V Y : X $ X : : X Y " X Y $ X Y & X @W X < Y =
0x41bd20…41beb4 (2, 485) Opaque[0x194]
0x41beb4…41c048 # DirEnt {nam=»KM805 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2158, f03=0x0000}
0x41beb4…41c048 IdxSect {
0x41beb4…41c048 f00 = 0x010a // 0x41beb4 @0x0
0x41beb4…41c048 f01 = 0x0004 // 0x41beb6 @0x2
0x41beb4…41c048 gno = [ // 0x41beb8 @0x4
0x41beb4…41c048 [0x00]: C0x010a.0x3.0
0x41beb4…41c048 [0x01]: C0x010b.0x0.0
0x41beb4…41c048 ]
0x41beb4…41c048 }
0x41c048…41c1dc Dummy {f00=0x010a, f01=0x0190, f02=» PPRT KM805 PPRT C805 ( PMES BR NDERSLEV KOMMUNE, REMITTERING & PASG 2,NO R PSCR b PLED KMD08,/S n P!!DL 67,68 FD03,FD04 P!!DL 184 4 PMF1KBV STRG 32X'C1C2C3C4C5C6C750' DV ADR KB/VDU P!!DL 188 PMF1CU STRG X'6E4E'
0x41c1dc…41c370 Dummy {f00=0x010a, f01=0x0190, f02=» ' t P!!RE 202,$$FALSE$$TRUE$$ BKO ( P!!RE 203,$$FALSE$$TRUE$$ SALDO KORT . $ P!!RE 209,$$TRUE$$FALSE$$ CKTAUTO Z P!!RE 210,$$FALSE$$TRUE$$ DC $ P!!RE 213,$$FALSE$$TRUE$$ 5M DISK ( P!!RE 214,$$TRUE$$FALSE$$ DISK BACKUP & P!!RE 239,$$FAL
0x41c370…41c504 Dummy {f00=0x010a, f01=0x0190, f02=» (12),X'0051',X'0068',X'0064' P!!RE 316,$$128$$80$$ & , P!!RE 324,$$6'OD-KOM$$12X'42525C4E442E$$ B 0 P!!RE 325,$$01014610$$%VER%REL%MOD$$ VERSION r ( P!!RE 372,$$1400$$10000$$ NO OF REG. " P!!RE 381,$$20$$200$$ LEV INDEX P!!RE 386,$$5$$1$
0x41c504…41c698 Dummy {f00=0x010a, f01=0x0190, f02=» PINC DIV805 PINC RGADM PNOD R ( PINC RGSUBS 6 PINC KMDIO H PNOD R Z PINC RGSUB3 h PLED SCREEN,/S z P!!CH $$KEY461$$KEYCOP$$ P!!CH $$SL461$$SLCOP$$ P!!EN PTRA /S,NL PNOD R PINC SUBAPL
0x41c698…41c82c Dummy {f00=0x010a, f01=0x017c, f02=»C RGSUB2 PINC DKSUBS PNOD R " PINC RGMAIN 0 PINC RGSTRT B PNOD R T PINC REMFMT b PINC REMTXT t PNOD R PINC REMLEV PTLK U,4K PINC PRT PINC VDUPRT PINC START PINC TB3270 P$INCGEN
0x41c82c…41c9c0 Dummy {f00=0x010a, f01=0x2008, f02=» PINC DKSUBS PNOD R " PINC RGMAIN 0 PINC RGSTRT B PNOD R T PINC REMFMT b PINC REMTXT t PNOD R PINC REMLEV PTLK U,4K PINC PRT PINC VDUPRT PINC START PINC TB3270 P$INCGEN
0x41c9c0…41cb54 (2, 486) Dummy {f00=0x010b, f01=0x0190, f02=» ZERO EDIT BUFFER OVFL EDIT PICTURE OVERFLOW "ALLOCATION ERR AT INITIALIZATION ILLEGAL INSTRUCTION ADDRESS ILLEGAL FORMAT CODE NO FIX BUFFER ALLOCATED FIX BUFFER NOT ALLOWED ILLEGAL CONTROL CODE ILLEGAL INDEX VALUE FORMAT CONDITIONS CHANGED ILLEGA
0x41cb54…41cce8 Dummy {f00=0x010b, f01=0x0190, f02=»; NO REENTER POINT W 9 " R 0 1 Y : ;a V P V P W f I <a R 9a V : : } @ 8P ( _" @ P @ Pj Pf V $ $T$ D BR V T D P T D @PL E @W . @ .P$ 0 $ $P BT , D E @
0x41cce8…41ce7c Dummy {f00=0x010b, f01=0x0190, f02=» : TB( : A A E A 8 V A TB( ( A 8 @ V P ( R W :
0x41ce7c…41d010 Dummy {f00=0x010b, f01=0x0190, f02=» POINT W 9 " R 0 1 Y : ;a V P V P W f I <a R 9a V : } @ 8P ( _" @ P @ P P V $ $T D R V T D P T D P f f
0x41d010…41d1a4 Dummy {f00=0x010b, f01=0x0190, f02=» "! A @ @ @ P ( V R V W Z T _" = T W , 9a @ P @ P @ A A 8 A "V # ( A P UW T A P
0x41d1a4…41d338 Dummy {f00=0x010b, f01=0x0190, f02=»_ NO! A A A A A A A A A A A A A A 2P A A , < + - ; : ( h . (X " , A L A L @ A A _T 2 X ,T 2 X ) A A . ; : @ P
0x41d338…41d4cc Dummy {f00=0x010b, f01=0x0190, f02=» T @ A @ A @ A @ A @ A @ A @ A @ A P p W @ T @ Z @ A W W 0 A W A A @ W @ A @ A _x A PZ @ & 0 P P P @R
0x41d4cc…41d660 Dummy {f00=0x010b, f01=0x0190, f02=» B "T" @ A @ A @ A @ A W @ T @ W @ @ @ R >a A A @ A @ A P p W @ T @ Z A @ 8 @ A ` A @ R V ;a Q _ .1 @
0x41d660…41d7f4 (2, 487) Opaque[0x194]
0x41d7f4…41d988 # DirEnt {nam=»C805 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2508, f03=0x0000}
0x41d7f4…41d988 IdxSect {
0x41d7f4…41d988 f00 = 0x0128 // 0x41d7f4 @0x0
0x41d7f4…41d988 f01 = 0x0002 // 0x41d7f6 @0x2
0x41d7f4…41d988 gno = [ // 0x41d7f8 @0x4
0x41d7f4…41d988 [0x00]: C0x0128.0x1.0
0x41d7f4…41d988 ]
0x41d7f4…41d988 }
0x41d988…41db1c Dummy {f00=0x0128, f01=0x018e, f02=» T; P01; TID=TC; TCL=TC; * LEV=60; : P02; J PTDC=T03; V PLC=01L; f PTDC=T07; v PLC=01L; P01; PSCL=S04; PT; P01; PTID=TD; PTCL=TC; PLEV=60; P02; PTDC=
0x41db1c…41dcb0 Dummy {f00=0x0128, f01=0x0190, f02=» P01; PTDC=T02; PLC=03L; $ P01; 4 PSCL=S05; @ PT; P P02; Z PTID=KA; f PTCL=KA; v PLEV=60; P01; PTDC=T04; PLC=02L; P03; PSCL=S02; PSCL=S03; PSCL=S04; PT; P
0x41dcb0…41de44 Dummy {f00=0x0128, f01=0x0174, f02=»S03; PSCL=S04; PT; P01; & PTID=LA; 2 PTCL=LA; B PLEV=60; R P00; b P04; n PSCL=S02; z PSCL=S03; PSCL=S04; PSCL=S05; PT; P01; PTID=D0; PTCL=D0; PLEV=60; P00;
0x41de44…41dfd8 Dummy {f00=0x0128, f01=0x2008, f02=» PSCL=S04; PT; P01; & PTID=LA; 2 PTCL=LA; B PLEV=60; R P00; b P04; n PSCL=S02; z PSCL=S03; PSCL=S04; PSCL=S05; PT; P01; PTID=D0; PTCL=D0; PLEV=60; P00;
0x41dfd8…41e16c Dummy {f00=0x0128, f01=0x0190, f02=»P W % W N T O , Q '~ B ! PT W : N P Z ,J P Q N P D + % _ ) N + N PP %WF O + : T W ,J P * P H + ) _ O V N _ P $# P _ : . HX
0x41e16c…41e300 Dummy {f00=0x0128, f01=0x0190, f02=» * O : O 1R Q 9_R + : _ * , %^ + + + + O . - HX + V UX : N # P + N N + , Q, N V V N P () ) : P _@ Z: _H U V N , P R O : + N - O
0x41e300…41e494 (2, 488) Opaque[0x194]
0x41e494…41e628 # DirEnt {nam=»KT805 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x00f0, f03=0x0000}
0x41e494…41e628 IdxSect {
0x41e494…41e628 f00 = 0x0007 // 0x41e494 @0x0
0x41e494…41e628 f01 = 0x0004 // 0x41e496 @0x2
0x41e494…41e628 gno = [ // 0x41e498 @0x4
0x41e494…41e628 [0x00]: C0x0007.0x2.0
0x41e494…41e628 [0x01]: C0x0007.0x3.0
0x41e494…41e628 ]
0x41e494…41e628 }
0x41e628…41e7bc Dummy {f00=0x0007, f01=0x0190, f02=» PPRT KT805 PPRT C805T ( PMES BR NDERSLEV KOMMUNE, REMITTERING ( PASG 2,NO T PSCR d PLED KMD08,/S p P!!DL 67,68 FD03,FD04 P!!IL 70 P REENTER REENTC P!!RE 71,$$256$$300$$ P!!IL 87 P REENTER REENKA
0x41e7bc…41e950 Dummy {f00=0x0007, f01=0x0190, f02=» 4 PMF1KBV STRG 32X'C1C2C3C4C5C6C750' DV ADR KB/VDU P!!DL 188 < PMF1CU STRG X'6E4E' CU ADR L P!!DL 190 n 4 PCNFHC STRGI (16),'GA','LA',' ' HARDCOPY PRINTER ~ P!!DL 195,196 " POFF STRGI (12)2C'TD','TE',' ' P!!RE 202,$$FALSE$$TRUE$$
0x41e950…41eae4 Dummy {f00=0x0007, f01=0x0190, f02=» 213,$$FALSE$$TRUE$$ 5M DISK ( P!!RE 214,$$TRUE$$FALSE$$ DISK BACKUP $ & P!!RE 239,$$FALSE$$TRUE$$ CREMITFLG P & P!!RE 248,$$FALSE$$TRUE$$ TEXT REG z $ P!!RE 249,$$FALSE$$TRUE$$ LEV REG P!!DL 283 , PCFLAG BINI (12),X'0051',X'0068',X'0064'
0x41eae4…41ec78 Dummy {f00=0x0007, f01=0x0190, f02=»,$$1400$$10000$$ NO OF REG. " P!!RE 381,$$20$$200$$ LEV INDEX $ P!!RE 386,$$5$$1$$ KORT LINE J P!!DL 389,390 n & PON STRGI (12)2C' ','KA','KB',' ' P!!IL 664 P ENTRY REENTC P!!IL 665 P ENTRY REENKA P!!IL 666 P
0x41ec78…41ee0c Dummy {f00=0x0007, f01=0x0190, f02=»ENTC PROC P RET P PEND PREENKA , PREENGA : PREENLA H PREEND0 V P B REENKA d P!!EN v PNOD C PTRA /S PINC DIV805 PINC RGADM PNOD PINC RGSUBS PINC KMDIO PNOD PINC RGSUB3
0x41ee0c…41efa0 Dummy {f00=0x0007, f01=0x0190, f02=»C SUBAPL PNOD PINC RGFRMT PNOD . PINC KTOPR : PINC KTPLN L PINC ADM6 ^ PNOD n PINC RGSUB1 z PINC RGSUB2 PINC DKSUBS PNOD PINC RGMAIN PINC RGSTRT PNOD PINC REMFMT PINC REMTXT
0x41efa0…41f134 (2, 489) Dummy {f00=0x0007, f01=0x0030, f02=».2D,MU=M:9.2D,A=RGLOAD,C=C805T P$ASG2 &
0x41f134…41f2c8 Dummy {f00=0x0007, f01=0x2008, f02=» :9.2D,A=RGLOAD,C=C805T P$ASG2 &
0x41f2c8…41f45c Dummy {f00=0x0007, f01=0x0190, f02=»$OPT MOVE TO VARIABLE " P TO ALLOW INSTR.S CMP AND IB & P CMP SPBINW2,='0' "SPERR" ENTRY ? D P BE ERRPRINT YES ! n P . P TBT SPPROMPT,ENTIRE JUMP IF ENTIRE FORMAT P SHOULD BE DISPLAYED P* P* ONLY VARIABLE FIELDS
0x41f45c…41f5f0 Dummy {f00=0x0007, f01=0x0190, f02=»FROM 1 AND UP j P THOME P B CONT $ P* 4 PCLEARS > 8 P ERASE 5,SPLINTOP,SPLINLOW ERASE SOME FROM 1 AND UP L P B CONT P P* P* DISPLAY ENTIRE FORMAT P* PENTIRE 8 P IB SPBINW2,ECLRA,ECLRS,ECLRN JUMP O
0x41f5f0…41f784 Dummy {f00=0x0007, f01=0x0190, f02=» IN MEMORY P B ECLRN P* $ P* CLEAR SOME VARIABLES . P* P PECLRS Z 6 P ERASE 6,SPLINTOP,SPLINLOW CLEAR SOME FIELDS FROM h P 1 AND UP IN MEMORY P* & P* CLEAR NO VARIABLES IN MEMORY P* PECLRN
0x41f784…41f918 Dummy {f00=0x0007, f01=0x0190, f02=»P,SPLINLOW ~ P B CONT PECLRN2 " P DISPLAY 2,SPLINTOP,SPLINLOW 0 P B CONT T PECLRN3 d P DISPLAY 3,SPLINTOP,SPLINLOW r P B CONT PECLRN4 P DISPLAY 4,SPLINTOP,SPLINLOW P B CONT P PCONT & P GETABX SP
0x41f918…41faac Dummy {f00=0x0007, f01=0x0190, f02=»ION b P BZ SETCREAD JUMP IF FOUND " P BL KTHOME POSITION NOT FOUND . P* T P* COMPULSORY FIELD FOUND ^ P* & P MOVE SPBINW4,SPBINW3 CHANGE INDEX P B CONT5 SEARCH AGAIN P* P P* & P* SET CURSOR AND READ
0x41faac…41fc40 Dummy {f00=0x0007, f01=0x018e, f02=»DISPLAY r P* PREADIN P* SET FLAG IF AUTODUP ( P* USES VERIF-FIELD J P MOVE SPBINW2,=W'3' h P MOVE SPBINW1,=W'1' P TSTCTL 6 P BOK DYKIN P SET GTADUPFL P B DYK20 P* PDYKIN P IB SP
0x41fc40…41fdd4 (2, 490) Opaque[0x194]
0x41fdd4…41ff68 # DirEnt {nam=»KMREMF«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x02b8, f03=0x0000}
0x41fdd4…41ff68 IdxSect {
0x41fdd4…41ff68 f00 = 0x0015 // 0x41fdd4 @0x0
0x41fdd4…41ff68 f01 = 0x0004 // 0x41fdd6 @0x2
0x41fdd4…41ff68 gno = [ // 0x41fdd8 @0x4
0x41fdd4…41ff68 [0x00]: C0x0015.0x3.0
0x41fdd4…41ff68 [0x01]: C0x0016.0x0.0
0x41fdd4…41ff68 ]
0x41fdd4…41ff68 }
0x41ff68…4200fc Dummy {f00=0x0015, f01=0x018e, f02=» PPRT KMREMF PPRT CONRF PMES REMIT TEST ( PASG 2,NO > PSCR N PLED KMD08,/S Z P!!CH $$EJECT$$ $$ n P!!DL 67,68 FD03,FD04 P!!DL 72,94 TERM KA P!!DL 95,112 TERM GA P!!DL 113,128 TERM LA P!!DL 129,140 TERM
0x4200fc…420290 Dummy {f00=0x0015, f01=0x0190, f02=» P!!RE 210,$$FALSE$$TRUE$$ DC P!!RE 214,$$TRUE$$FALSE$$ ( & P!!RE 248,$$FALSE$$TRUE$$ TEXT REG H $ P!!RE 249,$$FALSE$$TRUE$$ LEV REG r P!!DL 283 $ PCFLAG BINI (12),X'0059',X'0064' P!!RE 316,$$128$$80$$ P!!RE 324,$$OD-KOM$$P.6000$
0x420290…420424 Dummy {f00=0x0015, f01=0x0190, f02=» P!!DL 678 DUMMY T:IO P!!DL 689,707 KBVGO $ P!!DL 708,723 GTPGO > P!!DL 724,735 LPGO X P!!DL 736,748 DC1GO r & P!!DL 749,766 RESTART OFFLINE TASK P!!EN PASG 2,LP0F PNOD C PTRA /S PINC DIVFMT PINC RG
0x420424…4205b8 Dummy {f00=0x0015, f01=0x0190, f02=» x P!!CH $$SL461$$SLCOP$$ P!!EN & PTRA /S,NL 2 PNOD D PINC SUBAPL P PNOD b PINC RGFRMT n PNOD PINC KTOPR PINC KTPLN PINC ADM6 PNOD PINC RGSUB1 PINC RGSUB2 PINC DKSUBS PNOD
0x4205b8…42074c Dummy {f00=0x0015, f01=0x0080, f02=»$INCGEN LKE M PKPF /L,RGTEST PSCR 4 2 PMES $PDISC M=M:9.2P,MU=M:9.2P,A=RGTEST,C=CONRF @ P$ASG2 vNOD PINC KTOPR PINC KTPLN PINC ADM6 PNOD PINC RGSUB1 PINC RGSUB2 PINC DKSUBS PNOD
0x42074c…4208e0 Dummy {f00=0x0015, f01=0x2008, f02=» LKE M PKPF /L,RGTEST PSCR 4 2 PMES $PDISC M=M:9.2P,MU=M:9.2P,A=RGTEST,C=CONRF @ P$ASG2 vNOD PINC KTOPR PINC KTPLN PINC ADM6 PNOD PINC RGSUB1 PINC RGSUB2 PINC DKSUBS PNOD
0x4208e0…420a74 (2, 491) Dummy {f00=0x0016, f01=0x0190, f02=»2C SPCHK3S SPCHK4 SPCHK5P SPCHK6? SPCHK7C SPTCHKF T:DISPL T:DSC1C T:DUPLR T:DYKI T:EDFLA T:EDWR0 T:ERASR T:GETAC T:GETCS T:GETF T:NKI T:PRINK T:SETCK T:TBWDH T:TDOWS T:TFWDC T:THOMP T:TLDO T:TLEF T:TRIGA T:TSTC0 T:TUP T:UPDFT T:XSTAT TRGFRMT
0x420a74…420c08 Dummy {f00=0x0016, f01=0x002e, f02=» ! !0"8"@"H"P$ $8$H$P$X$`$h$p$x$ $ $
0x420c08…420d9c Dummy {f00=0x0016, f01=0x0190, f02=»g 2CR jI D g BD q D x ^D PD D D ^D .D f z 3
0x420d9c…420f30 Dummy {f00=0x0016, f01=0x0190, f02=» P 8 2 0 F 1 d TC V Z
0x420f30…4210c4 Dummy {f00=0x0016, f01=0x0190, f02=» B % 0
0x4210c4…421258 Dummy {f00=0x0016, f01=0x0190, f02=» Z 8 6
0x421258…4213ec Dummy {f00=0x0016, f01=0x0190, f02=»
[…0x1…]
0x421580…421714 (2, 492) Opaque[0x194]
0x421714…4218a8 # DirEnt {nam=»CONRF «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x02c8, f03=0x0000}
0x421714…4218a8 IdxSect {
0x421714…4218a8 f00 = 0x0016 // 0x421714 @0x0
0x421714…4218a8 f01 = 0x0002 // 0x421716 @0x2
0x421714…4218a8 gno = [ // 0x421718 @0x4
0x421714…4218a8 [0x00]: C0x0016.0x1.0
0x421714…4218a8 ]
0x421714…4218a8 }
0x4218a8…421a3c Dummy {f00=0x0016, f01=0x018e, f02=» T; P01; TID=TC; TCL=TC; * LEV=60; : P03; J PTDC=T03; V PLC=01L; f PTDC=T05; v PLC=01L; PTDC=T04; PLC=02L; P01; PSCL=S04; PT; P01; PTID=TD; PTCL=TC; P
0x421a3c…421bd0 Dummy {f00=0x0016, f01=0x002e, f02=» U; 001; TB2; P002; &TC; * LEV=60; : P03; J PTDC=T03; V PLC=01L; f PTDC=T05; v PLC=01L; PTDC=T04; PLC=02L; P01; PSCL=S04; PT; P01; PTID=TD; PTCL=TC; P
0x421bd0…421d64 Dummy {f00=0x0016, f01=0x2008, f02=» 001; TB2; P002; &TC; * LEV=60; : P03; J PTDC=T03; V PLC=01L; f PTDC=T05; v PLC=01L; PTDC=T04; PLC=02L; P01; PSCL=S04; PT; P01; PTID=TD; PTCL=TC; P
0x421d64…421ef8 Dummy {f00=0x0016, f01=0x0190, f02=» 0000899 0 @ A B E F G H I P Q R S T F 0 0 0 s x 0
0x421ef8…42208c Dummy {f00=0x0016, f01=0x0190, f02=»
0x42208c…422220 Dummy {f00=0x0016, f01=0x0190, f02=» KAKBKCKDKEKFKGKHKIKJKKKL ^ E q0 1 s
0x422220…4223b4 (2, 493) Opaque[0x194]
0x4223b4…422548 # DirEnt {nam=»C805T «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x00d8, f03=0x0000}
0x4223b4…422548 IdxSect {
0x4223b4…422548 f00 = 0x0006 // 0x4223b4 @0x0
0x4223b4…422548 f01 = 0x0002 // 0x4223b6 @0x2
0x4223b4…422548 gno = [ // 0x4223b8 @0x4
0x4223b4…422548 [0x00]: C0x0006.0x3.0
0x4223b4…422548 ]
0x4223b4…422548 }
0x422548…4226dc Dummy {f00=0x0006, f01=0x018e, f02=» T; P01; PTID=TB; PTCL=TB; * PLEV=55; : P01; J PTDC=T01; V PLC=08L; f P00; v T; P01; TID=TC; TCL=TC; LEV=60; P02; PTDC=T03; PLC=01L; PTDC=T07; PLC=0
0x4226dc…422870 Dummy {f00=0x0006, f01=0x018e, f02=» PLC=02L; PTDC=T06; PLC=02L; $ P00; 4 T; @ P01; J PTID=TE; V TCL=TC; f LEV=60; v P01; PTDC=T02; PLC=03L; P01; PSCL=S05; PT; P02; PTID=KA; PTCL=KA; PLEV=
0x422870…422a04 Dummy {f00=0x0006, f01=0x0190, f02=» PTID=GA; PTCL=GA; PLEV=60; $ P01; 4 PTDC=T05; @ PLC=02L; P P03; ` PSCL=S02; l PSCL=S03; | PSCL=S04; PT; P01; PTID=LA; PTCL=LA; PLEV=60; P00; P04; PSCL=S02;
0x422a04…422b98 Dummy {f00=0x0006, f01=0x0064, f02=» PC; P00; P01; PSCL=S01; * U; : 001; D TB2; P P003; ` PSCL=S02; l PSCL=S03; | PSCL=S04; PT; P01; PTID=LA; PTCL=LA; PLEV=60; P00; P04; PSCL=S02;
0x422b98…422d2c Dummy {f00=0x0006, f01=0x2008, f02=» C; P00; P01; PSCL=S01; * U; : 001; D TB2; P P003; ` PSCL=S02; l PSCL=S03; | PSCL=S04; PT; P01; PTID=LA; PTCL=LA; PLEV=60; P00; P04; PSCL=S02;
0x422d2c…422ec0 Dummy {f00=0x0006, f01=0x0190, f02=»
0x422ec0…423054 (2, 494) Opaque[0x194]
0x423054…4231e8 # DirEnt {nam=»RUNOBX«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x00e0, f03=0x0000}
0x423054…4231e8 IdxSect {
0x423054…4231e8 f00 = 0x0007 // 0x423054 @0x0
0x423054…4231e8 f01 = 0x0002 // 0x423056 @0x2
0x423054…4231e8 gno = [ // 0x423058 @0x4
0x423054…4231e8 [0x00]: C0x0007.0x0.0
0x423054…4231e8 ]
0x423054…4231e8 }
0x4231e8…42337c Dummy {f00=0x0007, f01=0x0190, f02=» SCR INC KMD08 INC PRT " INC START 2 INC VDUPRT D INC TB3270 V INC RGMAIN h INC RGMND z INC RGSTRT INC DKSUBS INC SCREEN INC RGFRMT INC DIVFMT INC DIV461 INC DIV167
0x42337c…423510 Dummy {f00=0x0007, f01=0x011e, f02=»SUBS INC RGSUB1 INC RGSUB2 INC RGSUB3 0 INC ADM6 B INC ADM6D R INC KTPLN d INC KTPLND v INC KTOPR INC KTOPRD INC REMFMT INC REMLEV INC REMTXT ASG 3,DK POB RUN OBX
0x423510…4236a4 Dummy {f00=0x0007, f01=0x2008, f02=» INC RGSUB1 INC RGSUB2 INC RGSUB3 0 INC ADM6 B INC ADM6D R INC KTPLN d INC KTPLND v INC KTOPR INC KTOPRD INC REMFMT INC REMLEV INC REMTXT ASG 3,DK POB RUN OBX
0x4236a4…423838 Dummy {f00=0x0007, f01=0x018e, f02=» J F IDENT START REL 2.1*79-10-20 870150540210 J F " LINHONK LINHOF ATMASB LSAVOF LSAVON EMULA LIOLON LIOLOFC VDUKB R . * DCTASK DC1INQN DC2INQ REQTIM ICWRTE@ , ( , ( !
0x423838…4239cc Dummy {f00=0x0007, f01=0x0190, f02=» , ( , ( 4 , ( d , ( , ( , ( !
0x4239cc…423b60 Dummy {f00=0x0007, f01=0x018e, f02=»CGETM , ( _ ( ( RLRBUF > EMULA P VDUKB b , ( { B _ C ( : t , ( O . V P ! ERASE , ( O
0x423b60…424800 (3, 0) DirGranule ((3, 0)) {
0x423b60…424800 DirEnt {nam=»DK3270«, typ=» «, f00=0x0000, f01=0x0000, f02=0x1838, f03=0x0000}
0x423b60…424800 DirEnt {nam=»DATDIV«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1888, f03=0x0000}
0x423b60…424800 DirEnt {nam=»KMD08 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1fa8, f03=0x0000}
0x423b60…424800 DirEnt {nam=»START «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2178, f03=0x0000}
0x423b60…424800 DirEnt {nam=»VDUPRT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2d10, f03=0x0000}
0x423b60…424800 DirEnt {nam=»PRT «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x24c8, f03=0x0000}
0x423b60…424800 DirEnt {nam=»TB3270«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x26d8, f03=0x0000}
0x423b60…424800 DirEnt {nam=»/OBJCT«, typ=»OB«, f00=0x0000, f01=0x0000, f02=0x2b40, f03=0x0000}
0x423b60…424800 DirEnt {nam=»TEST «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2b00, f03=0x0000}
0x423b60…424800 DirEnt {nam=»OBDIR «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0050, f03=0x0000}
0x423b60…424800 DirEnt {nam=»A:3270«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0030, f03=0x0000}
0x423b60…424800 DirEnt {nam=»C267 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x24e8, f03=0x0000}
0x423b60…424800 DirEnt {nam=»A:267 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0018, f03=0x0000}
0x423b60…424800 DirEnt {nam=»TEMP «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2a38, f03=0x0000}
0x423b60…424800 }
0x424800…424994 (3, 1) Opaque[0x194]
0x424994…424b28 # DirEnt {nam=»DATDIV«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1888, f03=0x0000}
0x424994…424b28 IdxSect {
0x424994…424b28 f00 = 0x00c4 // 0x424994 @0x0
0x424994…424b28 f01 = 0x0006 // 0x424996 @0x2
0x424994…424b28 gno = [ // 0x424998 @0x4
0x424994…424b28 [0x00]: C0x00c4.0x1.0
0x424994…424b28 [0x01]: C0x00c4.0x2.0
0x424994…424b28 [0x02]: C0x00ec.0x3.0
0x424994…424b28 ]
0x424994…424b28 }
0x424b28…424cbc Dummy {f00=0x00c4, f01=0x0190, f02=» 2 P IDENT DATDIV 2.2DK 1 79-11-16 870150540220 P : L P************************************************************************ B P* F P* D A T D I V : DATA DIVISION FOR IBM-3270 EMULATION PACKAGE. B P* THIS MODULE AL
0x424cbc…424e50 Dummy {f00=0x00c4, f01=0x0190, f02=»************************ d P P* ( ( P* INCLUDES DECENTRALT PRINT + LP 2 P EJECT ^ P DDIV l P* z P* KB/VDU TERMINAL P* P TERM KA P* P CWB CB1 P TWB TB1 P* P START KBVGO P*
0x424e50…424fe4 Dummy {f00=0x00c4, f01=0x018e, f02=»=162 t $ PDSKBAN DSET FC=20,DEV=KA,BUFL=2 $ PDSKBSD DSET FC=40,DEV=KI,BUFL=2 4 P EJECT P* j P* GTP TERMINAL t P* P TERM GA P* P CWB CB1 P TWB TB1 P* P START GTPGO P* PDSDC DSET FC
0x424fe4…425178 Dummy {f00=0x00c4, f01=0x018e, f02=» P* P* LINE PRINTER P* ( P* 2 P TERM LA < P* L P CWB CB1 V P TWB TB1 f P* v P START LPGO P* PDSDC DSET FC=61 PDSICR DSET FC=E0,DEV=II $ PDSICW DSET FC=E1,DEV=IO COPCMD=1 $ PDSLP DSET
0x425178…42530c Dummy {f00=0x00c4, f01=0x0190, f02=» P* P CWB CB1 P START DC1GO " PDSDC DSET FC=60 6 P* N P EJECT X P* f P* p 4 P* WORK AREA FOR KEYBOARD AND DISPLAY TASKS z P* P* PTB1 BLK P* & PTCT01 BIN 4X'0' TID AND STACKBASE *
0x42530c…4254a0 Dummy {f00=0x00c4, f01=0x0190, f02=»TRIB STRG 4X'0' LAST ATTRIBUTE CHARACTER & PCURATT STRG 4X'0' CURSOR ATTRIBUTE 0 $ PWCC STRG 4X'0' WCC/CCC CHARACTER Z , PKBINH STRG 4X'0' KEYBOARD INHIBIT INDIC. PLINCNT STRG 4X'0' . PDCLENG STRG 4X'0' DC READ EFFECTIVE LENGTH PICWORK STR
0x4254a0…425634 (3, 2) Dummy {f00=0x00c4, f01=0x0190, f02=»MISCAR STRG 44X'0' CCC,MAIN, P MODE,KEYS,ECBDCC,ECBBLK, $ P RDMORE H PSTRG2 STRG 4X'0' DK Z P EJECT v P P************** P* ( P* COMMON WORK BLOCK FOR ALL TASKS P* . P**************************************
0x425634…4257c8 Dummy {f00=0x00c4, f01=0x0190, f02=»NBRKBV BIN NUMBER OF KB/VDUS PNBRGTP BIN NUMBER OF GTPS & P* H : PMF1KBV STRG 32X'40C1C2C3C4C5C6C7' DV ADDRESSES KB/VDU R 6 PMF1GTP STRG 32X'C8C94A4B4C4D4E4F' DV ADDRESSES GTP H P* THE LENGTH OR PLACE OF THE CONFIG DATA ABOVE SHOULD NOT BE C
0x4257c8…42595c Dummy {f00=0x00c4, f01=0x0190, f02=»INTER V P FOR KB-VDU 1-16 P* ( PBINWK1 BIN 2 P PDIV D P* R P* P* f P ENTRY KBVGO p P ENTRY GTPGO P ENTRY DC1GO P ENTRY LPGO P EXT VDUKB P EXT PRINT P EXT DCTASK P EXT SWITCH
0x42595c…425af0 Dummy {f00=0x00c4, f01=0x0190, f02=»JECT & P DSC0 DSDC,2 DUMMY REFERENCE T:IO P 6 , P**************************************** > P* n ( P* START ADDRESS FOR KEYBOARD TASK x P* , P**************************************** P PKBVGO P ADD NBRKBV,='1'
0x425af0…425c84 Dummy {f00=0x00c4, f01=0x0190, f02=»KB050 P CALL VDUKB,TCT01 ( P* PERF OFFLNE BRANCH TO CREDIT CODE ( * P B KB050 RETURN TO IBM-3270 EMULATION T P EJECT P P 2 P********************************************* P* . P* START ADDRESS FOR GENERAL PRINTER TA
0x425c84…425e18 Dummy {f00=0x00c4, f01=0x0190, f02=»01 P SUB TCT01,=X'4740' P MOVE PRINTER,=X'0001' & P* PERF CONF D P CALL PRINT,TCT01 X P r P z P P 4 P************************************************ P* * P* START ADDRESS FOR LINE PRINTER TASK P*
0x425e18…425fac Dummy {f00=0x00c4, f01=0x412e, f02=» CALL PRINT,TCT01 P P EJECT " P 0 P 8 4 P*********************************************** @ P* x " P* START ADDRESS FOR DC-TASK P* & P********************************* P PDC1GO P CALL DCTASK,MF1CU
0x425fac…426140 Dummy {f00=0x00c4, f01=0x2008, f02=» * END @ * $ * . GP1 BLK 8 * H GPAREA STRG 2000 R EJECT j PDIV x * * ENTRY KBGO ENTRY VDUGO ENTRY GTPGO * EXT VDUKB EXT VDTASK E
0x426140…4262d4 (3, 3) Dummy {f00=0x00ec, f01=0x0190, f02=» n * & * & : * & h * & * & ; * & Y
0x4262d4…426468 Dummy {f00=0x00ec, f01=0x0190, f02=» | * & * & H * & v * & + * & I * & g
0x426468…4265fc Dummy {f00=0x00ec, f01=0x0190, f02=» * & ( * & V * & * & 9 * & W
0x4265fc…426790 Dummy {f00=0x00ec, f01=0x0190, f02=» j * & * & 6 * & d * & ) * & G * & e
0x426790…426924 Dummy {f00=0x00ec, f01=0x0190, f02=» x * & * & D * & r * & 7 * & U * & s
0x426924…426ab8 Dummy {f00=0x00ec, f01=0x418a, f02=» * & $ * & R * & ' * & E * & c *
0x426ab8…426c4c Dummy {f00=0x00ec, f01=0x4102, f02=» L H IDENT D:TB10 TRA 4.2 80-04-10 F1 O1111 2.2DK 1 79-11-16 87015054022 D:TB10 T D:TB10T f * & B z * & = B @ *
0x426c4c…426de0 Dummy {f00=0x00ec, f01=0x4120, f02=» L H IDENT C:CB10 TRA 4.2 80-04-10 F1 O1111 2.2DK 1 79-11-16 87015054022 C:CB10 T C:CB10C f * & @ JKLM z * & NO `@GAGBGCGDGEGFGFGFGF = GFGFGFGFGFGFGF L
0x426de0…426f74 (3, 4) Opaque[0x194]
0x426f74…427108 # DirEnt {nam=»KMD08 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1fa8, f03=0x0000}
0x426f74…427108 IdxSect {
0x426f74…427108 f00 = 0x00fd // 0x426f74 @0x0
0x426f74…427108 f01 = 0x0010 // 0x426f76 @0x2
0x426f74…427108 gno = [ // 0x426f78 @0x4
0x426f74…427108 [0x00]: C0x00fd.0x1.0
0x426f74…427108 [0x01]: C0x00fd.0x2.0
0x426f74…427108 [0x02]: C0x00fe.0x2.0
0x426f74…427108 [0x03]: C0x0106.0x2.0
0x426f74…427108 [0x04]: C0x0106.0x3.0
0x426f74…427108 [0x05]: C0x0108.0x1.0
0x426f74…427108 [0x06]: C0x0108.0x2.0
0x426f74…427108 [0x07]: C0x0109.0x3.0
0x426f74…427108 ]
0x426f74…427108 }
0x427108…42729c Dummy {f00=0x00fd, f01=0x0190, f02=» P IDENT KMD08 03.01.XXX.1 < P******************************************************** & P* f 4 P* THIS IS THE MAIN MODULE FOR KMDAPLICATION p 2 P* CONTAINING THE CWB'S, TWB'S AND INITIAL P* START POINTS P* P*
0x42729c…427430 Dummy {f00=0x00fd, f01=0x0190, f02=»RETAGET IFM DECENTRAL PRINT: ( P* TILF JET: TERM LA, MED TILBEHLR $ & P* STARTADRESSE 'LPGO' P < P* NDRET: CNFHC FRA BINI (16),'1','2', ....... TIL z 0 P* STRGI (16),'GA','GB',........ P* DELETED: I KBVGO:
0x427430…4275c4 Dummy {f00=0x00fd, f01=0x018e, f02=» $ P* TRANSACTION TASK TC P* 0 8 P**************************************************** : P TERM TC v P* P CWB CB1 P CWB CB2 P CWB CB3 P CWB CB4 P CWB CB6 P DWB CD3(CB3) P DWB CD4(CB4)
0x4275c4…427758 Dummy {f00=0x00fd, f01=0x0190, f02=» P* PFD01 DSET FC=F8 VOL 999001 PFD02 DSET FC=F9 VOL 999002 0 & PKVOUCH DSET FC=31,DEV=TV,BUFL=100 R 2 PKJTAPE DSET FC=30,DEV=TJ,BUFL=70,BUFDS=KVOUCH | 2 PKTALLY DSET FC=32,DEV=TR,BUFL=30,BUFDS=KVOUCH PSCREEN DSET FC=50,BUFL=56
0x427758…4278ec Dummy {f00=0x00fd, f01=0x0190, f02=»LE SET t $ PDK04 DSET FC=C4 FD999004 KT PLAN PDSSOPI DSET FC=10 6 PDSSOPO DSET FC=11 P PDCOMM DSET FC=61 j PKCASS DSET FC=12 PDK05 DSET FC=C5 GL REGSET " PDK06 DSET FC=C6 TEXT REGISTER " PDK07 DSET FC=C7 INDEX REGISTER " P
0x4278ec…427a80 Dummy {f00=0x00fd, f01=0x0190, f02=»UFL=162 v & PDSHCLP DSET FC=80,DEV=LP,BUFL=162 PFD03 DSET FC=FA VOL 999003 : PFD04 DSET FC=FB VOL 999004 " P FMTCTL INDS=KEYB,OUTDS=SCREEN ~ P START REGGO P STACK 256 P EJECT P* P* P* P* DATA DIVISION
0x427a80…427c14 (3, 5) Dummy {f00=0x00fd, f01=0x0190, f02=»* P START KBVGO P* PDSDC DSET FC=61 ( $ PDSICR DSET FC=E0,DEV=II COPCMD=1 @ PDSICW DSET FC=E1,DEV=IO h $ PDSVDU DSET FC=50,DEV=DY,BUFL=162 $ PDSKBAN DSET FC=20,DEV=KA,BUFL=2 $ PDSKBSD DSET FC=40,DEV=KI,BUFL=2 P EJECT
0x427c14…427da8 Dummy {f00=0x00fd, f01=0x0190, f02=» START GTPGO P* PDSDC DSET FC=61 PDSICR DSET FC=E0,DEV=II 6 $ PDSICW DSET FC=E1,DEV=IO COPCMD=1 V $ PDSGTP DSET FC=30,DEV=GP,BUFL=162 ~ P* P EJECT P* P* LINE PRINTER P* P* P TERM LA P*
0x427da8…427f3c Dummy {f00=0x00fd, f01=0x0190, f02=»W DSET FC=E1,DEV=IO COPCMD=1 $ PDSLP DSET FC=80,DEV=LP,BUFL=162 $ P L P* T P* ^ P* DCTASK h P* x P* P TERM D0 P* P CWB CB9 P START DC1GO PDSDC DSET FC=60 P* P EJECT P* P*
0x427f3c…4280d0 Dummy {f00=0x00fd, f01=0x018e, f02=»KBASE t * PPRINTER STRG 4X'0' KEYBARD/VDU/PRINTER & PBVDU STRG 3840X'0' VDU SCREEN BUFF < ( PPCURS STRG 4X'0' CURSOR ADDR. BINARY f . PATTRIB STRG 4X'0' LAST ATTRIBUTE CHARACTER & PCURATT STRG 4X'0' CURSOR ATTRIBUTE $ PWCC STRG 4X'0' WCC/CCC CHA
0x4280d0…428264 Dummy {f00=0x00fd, f01=0x0190, f02=» PICWORK STRG 4X'0' * PINTATT STRG 4X'0' INTENSITY ATTRIBUTE " POFFFLG STRG 4X'0' OFFLINE FLAG L PCOPNO BIN TID FOR HARDCOPY r PMISCAR STRG 44X'0' CCC,MAIN, P MODE,KEYS,ECBDCC,ECBBLK, PSTRG2 STRG 4X'0' DK P EJECT P
0x428264…4283f8 Dummy {f00=0x00fd, f01=0x0190, f02=»************* t P PCB9 BLK P* . PCNFIGD BOOL 8 PCNFBSY BOOL L P* ` P* CONFIGURATION DATA j P* " PNBRKBV BIN NUMBER OF KB/VDUS PNBRGTP BIN NUMBER OF GTPS P* : PMF1KBV STRG 32X'40C1C2C3C4C5C6C7' DV
0x4283f8…42858c Dummy {f00=0x00fd, f01=0x0190, f02=»D NOT BE CHANGED P* ( PMF1CU STRG X'6040' CU-ADDRESS MF # 1 " P* N > PCNFHC STRGI (16),'GA','GB','GC','GD','GE' HARDCOPY PRINTER X P FOR KB-VDU 1-16 P* PBINWK1 BIN P* 6 POFF STRGI (12)2C'TC','TD','TE','TF','TG','TH',
0x42858c…428720 Dummy {f00=0x00fd, f01=0x0190, f02=» FALSE T=ALL BKO-CODES ALLOWED 0 PCKTFLAG BOOL FALSE F=NO SALDO AT ALL IN KORT & . PCCLKTFLG BOOL FALSE T=KONTOKORT I KASSELUK Z 0 PCTESTFLG BOOL FALSE T=CONVERSION, TEST MODE , PCTRVALG BOOL FALSE T: SKOVBO. F: VIBORG . PCFLT46 BOOL FALSE T=SPEC
0x428720…4288b4 (3, 6) Dummy {f00=0x00fe, f01=0x0190, f02=» FALSE T=INCLUDES DATATRANSMISSION . PCCYWRTF BOOL FALSE T=DO NOT USE CYCLE SET * 2 PCADM22F BOOL FALSE T=ALLOWED FUNCTION (ADM 22) PC5MDISK BOOL FALSE T=5M DISK * PCKASFLG BOOL TRUE T=BACKUP ON CASSETTE 4 PCSLDFLG BOOL TRUE T=GL.SALDO PRESENT
0x4288b4…428a48 Dummy {f00=0x00fe, f01=0x0190, f02=»CBIN1 BIN '1' PCBIN2 BIN '2' PCBIN3 BIN '3' , PCBIN4 BIN '4' B PCBIN5 BIN '5' X PCBIN6 BIN '6' n PCBIN7 BIN '7' PCBIN8 BIN '8' PCBIN9 BIN '9' PCBIN10 BIN '10' PCBIN11 BIN '11' H PWEIGTH BCDI (13),'
0x428a48…428bdc Dummy {f00=0x00fe, f01=0x0190, f02=»* P EJECT PCB2 BLK P* ( & PCPFLG BOOL FALSE T: DISK OCCUPIED 2 ( PCSPLITFL BOOL FALSE T: SPLIT RECORD " PCWFLAG BOOL FALSE F=COLD START " PCREMITFL BOOL FALSE F=NO REMIT & PCSKIFTFL BOOL FALSE T=FD CHANGING ( PCEORFLG BO
0x428bdc…428d70 Dummy {f00=0x00fe, f01=0x0190, f02=»CCONVFLG BOOL FALSE T=CONVERSION GOING ON $ PCSWFLAG BOOL FALSE SCRATCH FLAG 2 2 PCSKIFTWN BOOL FALSE T=WARNING ABOUT FD CHANGE Z . PCKFLAG BOOL FALSE T=EXCL ACCESS, KNT. PLAN , PCTEXTFLG BOOL FALSE T=TEXT REG. PRESENT 0 PCSTRKFLG BOOL FALSE T=
0x428d70…428f04 Dummy {f00=0x00fe, f01=0x0190, f02=»14 BIN '14' PCBIN15 BIN '15' PCBIN16 BIN '16' , PCBIN17 BIN '17' D PCBIN18 BIN '18' PCBIN19 BIN '19' t PCBIN20 BIN '20' PCBIN21 BIN '21' PCBIN22 BIN '22' PCBINMAX BIN '26' P EJECT @ P**************
0x428f04…429098 Dummy {f00=0x00fe, f01=0x0190, f02=» FIELD NR GIVES DISPLACEMENT IN TABLE P* . @ P************************************************************ 8 PCFLTDEX BINI (90), C | : P '26','26','26','26','1','2','3','4','5','6', 1-10 C < P '7','8','9','4','11','12','10','11','12','13',
0x429098…42922c Dummy {f00=0x00fe, f01=0x0190, f02=» C Z @ P '18','14','20','21','22','17','12','15','10','1', 41-50 C 6 P '2','3','4','2','3','4','5','6','7','8', 51-60 C N > P '9','10','11','12','13','6','26','26','26','26', 61-70 C @ P '26','26','26','26','26','26','26','26','26','26', 71-80 C
0x42922c…4293c0 Dummy {f00=0x00fe, f01=0x0190, f02=»'6','5','0' n P* 8 PCFLAG BINI (12),X'8800',X'0800' TASK DEPENDENT FLAGS P* Z P EJECT d PCB3 BLK r P* P* PCTWBIN1 BIN PCTWBIN2 BIN PCVOUTOP BIN W'56' PCMAXLIN BIN W'54' PCMINLIN BIN W'2'
0x4293c0…429554 (3, 7) Dummy {f00=0x0106, f01=0x0190, f02=»398X'FF' PCCONBUF5 STRG 398X'FF' PCCONBUF6 STRG 398X'FF' . PCCONBUF7 STRG 398X'FF' L PCCONBUF8 STRG 398X'FF' j PCTRANBUF STRG 698 8 PCTID STRGI (12),2C'TC','TD','TE','TF','TG','TH', C $ P 'TI','TJ','TK','TL','TM','TN' P*
0x429554…4296e8 Dummy {f00=0x0106, f01=0x018e, f02=»O. OF 0PEN TASKS PCRECLGD BIN W'128' $ PCRECNR BIN PHYSICAL RECORD NR. 2 PCCONBUF9 STRG 398X'FF' Z & PCRECBCD BCD 6D LOGICAL RECORD NR. x PCEDATNR BCD 4 DATASET NR. PSOPINP STRG 4 PASVOL STRG 6 PASFNAME STRG 8 PCKMD
0x4296e8…42987c Dummy {f00=0x0106, f01=0x0190, f02=» P* TEXT FOR BKO & P* ONLY RELEVANT IF EITHER $ ( P* CBKOFLG=F (CHECK BKO) OR N , P* CKTFLAG=F (NOT SALDO IN KT.) z PCTTXT07 STRG 13'00008 C P 99 0' & PCREGTAB BCDI (25,2),'01','-01', C P
0x42987c…429a10 Dummy {f00=0x0106, f01=0x0190, f02=» P '08','-01', C P '09','-01', C P '10','-01', C 8 P '12','-01', C P P '40','-01', C h P '41','-01', C P '42','-01', C P '45','-01', C P '46','-01', C P '47','-01', C P '48','-01', C
0x429a10…429ba4 Dummy {f00=0x0106, f01=0x018e, f02=»-01', C P '-01','-01' P* & P EJECT 0 PCB6 BLK > P* N ( PCCYPFLG BOOL FALSE CYSET OCCUPIED ? X * PC167FLG BOOL FALSE T=KMD167 (HVIDOVRE) $ PCTALLY BOOL F T: OUTPUT ON TALLY & PCTXTFLG BOOL F T: TEXTBUF OCCUPIED , PCLEV
0x429ba4…429d38 Dummy {f00=0x0106, f01=0x0190, f02=» d , PCCYSIZE BIN '30' MAX SIZE OF CYCLE PAGE , PCKTLAST BIN '0' LAST RECORD USED, KTPLAN 8 4 PCMAXREC BIN W'1400' GIVES WARNING OF FULL REGSET h * PCGLRECNR BIN '0' LAST RECNR, GL REGSET & PCKTMAX BIN '21' MAX SIZE KONTOPLAN * PCIXLAST BIN LAS
0x429d38…429ecc Dummy {f00=0x0106, f01=0x0190, f02=»NDX BCDI (7),14D KNT.PLAN MASTER INDEX 0 PCIXINDX BCDI (20),14D IDX.FILE MASTER INDEX . PCTXBUF STRG 24 b " PCIXBUF STRG 8 IDX.FILE BUFFER x PCCYBUF STRG 128 CYSET BUFFER " PCKTBUF STRG 128 KTPLAN BUFFER . PCKTTOP BCD 4D'5' FIRST LINE KORT
0x429ecc…42a060 Dummy {f00=0x0106, f01=0x0190, f02=»', C ` P 'KH','KI','KJ','KK','KL' P EJECT 0 P* > PTB1 BLK H " PTTCY1FLG BOOL FALSE IN CYCLE? X " PTTCY2FLG BOOL FALSE IN STABEL? ~ PTTLSTFLG BOOL FALSE $ PTTPSEFLG BOOL FALSE PAUSE STATE ( PTTSUMFLG BOOL FALSE SUM ON SCREE
0x42a060…42a1f4 (3, 8) Dummy {f00=0x0106, f01=0x0190, f02=»NAL r * PTTEORFLG BOOL FALSE *-- END OF RECORD ( PTTSUPFLG BOOL FALSE SUPPLEMENT POST : , PTTSMALL BOOL FALSE *-- SMALL GIRO KVIT? f & PTTR11FLG BOOL FALSE T: KASSE CLOSE * PTREMFLG BOOL FALSE T= REMOTE TERMINAL , PTTKORTFL BOOL FALSE T: IN
0x42a1f4…42a388 Dummy {f00=0x0106, f01=0x0190, f02=»N NO OF OLD TRANS PTTASKNR BIN PTTDKBCD BCD 2 D/K VALUE . $ PTTARKSAV BCD 12 SAVED ARK KT NR N & PTTCYKTOT BCD 14 SAVED CYKLE TOTAL v & PTTCYKPOS BCD 4 SAVED CYKLE LINE NR $ PTTLINNR BCD 4 LINE NR ON VOUCHER $ PTTCNTNR BCD 4 COUNTER
0x42a388…42a51c Dummy {f00=0x0106, f01=0x0190, f02=» & PTTCYM STRG 1 CYKLE MARK ON JOURNAL . PGTREGF BCDI (26),16X'F' TRANSACTION FIELDS . P EJECT ` PGB1 BLK n P* ~ P* PGTEXFLAG BOOL FALSE PGTADUPFL BOOL FALSE PGTAUTODP BOOL FALSE PGTREGFLG BOOL FALSE PGTCYFL
0x42a51c…42a6b0 Dummy {f00=0x0106, f01=0x018e, f02=»3 BOOL FALSE *-- 4 PGTKASSE BOOL FALSE *-- TRUE- IN KASSE FUNCTIONS ! 4 PGTSLUTFL BOOL TRUE FALSE: SLUT KEY IS SIMULATED ! P ( PGTDIVTR BOOL FALSE T: DIVERSE TRANS ! . PGTTRSEL BOOL FALSE T: TRANSACTION SELECTED ! * PGTMASTFL BOOL FALSE T=MASTER TERMI
0x42a6b0…42a844 Dummy {f00=0x0106, f01=0x018e, f02=» PGSWBIN3 BIN " PGSWBIN4 BIN " PGSWBIN5 BIN " , PGSWBIN6 BIN " @ PGSWBCD1 BCD 14 " T PGSWBCD2 BCD 14 " j PGSWBCD3 BCD 6 " PGSWBCD4 BCD 6D " PGSWBCD5 BCD 6 " PGSWBCD6 BCD 14 " PGSWBCD7 BCD 14 " PGTWBCD1 BCD 14 " PGTWB
0x42a844…42a9d8 Dummy {f00=0x0106, f01=0x0190, f02=» " PSPPROMPT BOOL FALSE # PSPCHANGE BOOL FALSE # $ 2 PSPDUPL BOOL FALSE TRUE: FIELD HAS BEEN DUPPED # @ 2 PSPME BOOL FALSE FALSE: NO CHECK FOR ME FIELDS # v 0 PSPKEYFLG BOOL TRUE FALSE NO KOR-KEY IN SPERR # " PSPWARNFL BOOL FALSE T: WARNING # P*
0x42a9d8…42ab6c Dummy {f00=0x0106, f01=0x0190, f02=»N '1' # ( PSPERASE BIN '0' 0:ERASE; 4:NO ERASE $ PSPLINTOP BIN $ : PSPLINLOW BIN $ N " PGTCLASS BIN '1' TERMINAL CLASS $ b $ PGTREGDEX BIN '0' TRANSTYPE INDEX $ ( PGTDFLIN BIN '27' DEFAULT LINE NUMBER $ PGSSWITCH BINI (26) $ PGTUSED BINI (26) $
0x42ab6c…42ad00 Dummy {f00=0x0106, f01=0x0190, f02=»T=LEV., F=CPR $ PGTDYFLG BOOL FALSE T=DISPLAY % PGTSPGFLG BOOL FALSE % : 2 PGTKORTFL BOOL FALSE T=KONTO FOUND IN KONTOPLAN % V & PGTTESTFL BOOL FALSE T=IN TEST MODE % $ PGTSWFLAG BOOL FALSE SCRATCH FLAG % & PGTSUMKEY BOOL FALSE SUM INDIKATOR % " P
0x42ad00…42ae94 (3, 9) Dummy {f00=0x0108, f01=0x0190, f02=»DFLG BOOL FALSE T=SALDO PRESENT. F=NOT PRESENT % 0 PGTGLSPG BOOL FALSE T=INQUIRIES ON GL REGSET & 6 P* & j P* & t PGTPPOIN BIN & ~ PGTPAGE BIN & PGTRETUR BIN & PGTSUM BCD 14 & PGTANTAL BCD 4 & PGTCYSUM BCD 14 & PGTREGNR BCD 3 TR
0x42ae94…42b028 Dummy {f00=0x0108, f01=0x018e, f02=»CTION & n " PGTL8TXT STRG 8 TEXT FOR LINE 8 ' PSPINPUT STRG 35 ' 4 PGSWSTR1 STRG 1 ' L PGSWSTR2 STRG 2 ' b PGSWSTR9 STRG 9 ' x PGSWSTR20 STRG 20 ' P* ' P EJECT ' P* ' PGB4 BLK ' , PGTCYWRTF BOOL FALSE T=NO WRITE ON CYSET ' , P
0x42b028…42b1bc Dummy {f00=0x0108, f01=0x0190, f02=» ' j " PGTCYIN BIN NEXT USED, CYCSET ( " PGTCYOUT BIN NEXT FREE, CYCSET ( . PGTRECNR BIN SPG. RECORD NO. ( T " PGTLBNR BCD 6D SPG. EKSP.LB.NO. ( x ( PGTLBNRIN BCD 6D EKSP.LB.NR ASKED FOR ( PGTKTTYP BCD 4D KTPLAN TYPE ( P* ( P* ( P* (
0x42b1bc…42b350 Dummy {f00=0x0108, f01=0x0190, f02=» ( p & PGTTTPFLG BOOL TRUE T=TTP,F=NO TTP ) PGTGTPFLG BOOL FALSE T=GTP ) 2 PGTLPFLG BOOL FALSE T=LP ) T P* ) t P* ) ~ P ) P ) & PGTHCDEV BIN HARDCOPY 1=GTP, 2=LP ) PGTLINE BIN CURRENT LINE ) PGSWBIN7 BIN ) PGSWBIN8 BIN )
0x42b350…42b4e4 Dummy {f00=0x0108, f01=0x0190, f02=»LEVTKO BCD 2 ) PGTLEVDAT BCD 8 OPRET DATO * PGTTXTTKO BCD 4 TEXT KODE * 6 PGTLEVNVN STRG 30 * V PGTLEVADR STRG 32 * n PGTLEVBY STRG 20 * PGTLEVPDI STRG 13 * PGTLEVTXT STRG 22 * PGTPRTDAT BCD 8 PRINT DATO * PGTPRTFRA BCD 12 LEV FRA
0x42b4e4…42b678 Dummy {f00=0x0108, f01=0x0190, f02=»T * v PGTTESTMK STRG 1 + $ PTTSUPMRK STRG 1 SUPPLEMENT MARK + " PTTSUMMRK STRG 1 SUM MARK + J PGTTEXT STRG 6 + j PTTSPARE3 STRG 1C'.' + PTCONBUF STRG 398X'FF' + & PTTCYKST BCD 4 1. LINE CYCLE/STABEL + $ PTTKTSLD BCD 14 KONTOKORT, SALDO +
0x42b678…42b80c Dummy {f00=0x0108, f01=0x0190, f02=» $ PTT16TXT STRG 3 RENTE/GEBYR/RATE , PTT07TXT STRG 5 BKO TEXTS , , & PGTDUPF BCDI (26),16X'F' DUP FIELDS , L P* , v P* , P EJECT , PCD3 DBLK , P* , P* , P* , P* , P* , PDUMCD3 STRG 10 , PCMASK BCDI (12),4D , &
0x42b80c…42b9a0 Dummy {f00=0x0108, f01=0x0190, f02=» , * PC12ACC BCDI (60,2),14D EJ-EDB COUNTERS - P* - 6 P* - @ P - J P* - R PCD4 DBLK - P* - l P* - v P* - P* - P* - PDUMCD4 BINI (4) - . PCBEH BINI (12,2) FIRST AND SIZE OF BEHLDN. - . PCTR12 BINI (12,2) FIRST AND SIZE
0x42b9a0…42bb34 (3, 10) Dummy {f00=0x0108, f01=0x0190, f02=» - v PCVOL STRGI (4),6 . P* . P EJECT . * PTD2 DBLK . 8 P* . H P* . R P* . P* . f P* . p PTTINF1 STRG 14 . z . PTTRECOPN BCD 6 REC. NO. FOR OPEN OR CLOSE . * PTTRECCHN BCD 6 REC. NO. FOR FD CHANGE . $ PTTSTLBNR BCD 6D FIRST EK
0x42bb34…42bcc8 Dummy {f00=0x0108, f01=0x0190, f02=»CASH BCD 14D CURRENT CASH AMOUNT . $ PTTLBNR BCD 6D CURRENT EKSP.LBNR / ( ( PTTACC BCDI (8,2),16D'0' EDB COUNTERS / P , PTTGLREC BCD 6 SAVE RECORD NO, GL REGSET / | P* / P* / P* / P* / P PDIV / P ENTRY REGGO / P ENTRY KBVGO /
0x42bcc8…42be5c Dummy {f00=0x0108, f01=0x0190, f02=» EXT SWITCH / " P EXT GETTID GET TASK IDENTITY 0 ( P ENTRY OFFLNE OFFLINE START ADDRESS 0 : P ENTRY ONLINE 0 f P 0 | & P DSC0 DSDC,2 DUMMY REFERENCE T:IO 0 , P**************************************** 0 P* 0 P* START OF REGISTRATION 0
0x42be5c…42bff0 Dummy {f00=0x0108, f01=0x0190, f02=»**************************** 0 P* 1 $ ( P* START ADDRESS FOR KEYBOARD TASK 1 . , P**************************************** 1 Z PKBVGO 1 P ADD NBRKBV,='1' 1 P CALL GETTID,TCT01 1 P SUB TCT01,=X'4B40' 1 * P* PERF CONF READ & CONVERT CONFIG
0x42bff0…42c184 Dummy {f00=0x0108, f01=0x0190, f02=»SE YES, WAIT FOR RESTART 1 PKB050 2 " P CALL VDUKB,TCT01 2 0 & P PERF OFFLNE BRANCH TO CREDIT CODE 2 J * P B KB050 RETURN TO IBM-3270 EMULATION 2 t P 2 P 2 P 2 2 P********************************************* 2 P* 2 . P* START ADDR
0x42c184…42c318 Dummy {f00=0x0108, f01=0x0190, f02=»1' 2 P CALL GETTID,TCT01 3 P SUB TCT01,=X'4740' 3 $ P MOVE PRINTER,=X'0001' 3 @ P* PERF CONF 3 ^ P CALL PRINT,TCT01 3 r P 3 P 3 P 3 4 P************************************************ 3 P* 3 * P* START ADDRESS FOR LINE PRINTER T
0x42c318…42c4ac Dummy {f00=0x0108, f01=0x0190, f02=»T01,=W'2' 3 P CALL PRINT,TCT01 4 P 4 , P 4 4 4 P*********************************************** 4 < P* 4 t " P* START ADDRESS FOR DC-TASK 4 ~ P* 4 & P********************************* 4 P 4 PDC1GO 4 P CALL DCTASK,MF1CU 4 P
0x42c4ac…42c640 Dummy {f00=0x0108, f01=0x018e, f02=»**************************** 4 P 5 $ POFFLNE PROC 5 , 2 P MOVE STRG2,OFF(TCT01) GET OFF LINE TASK NAME 5 @ * P CBE STRG2,=C' ',RETOFF ANY OFFLINE ? 5 v P RSTRT STRG2 YES 5 P PAUSE 5 PRETOFF 5 P RET 5 P PEND 5 P* 5 P 5 P 5
0x42c640…42c7d4 (3, 11) Dummy {f00=0x0109, f01=0x40f8, f02=» P 6 PONLINE PROC 6 2 P MOVE GSWSTR2,ON(TTASKNR) GET ONLINE TASK NAME 6 , P CBE GSWSTR2,CBLANKS,RETON ANY ON LINE ? 6 V P RSTRT GSWSTR2 YES 6 P PAUSE 6 PRETON 6 P RET 6 P PEND 6 P* 6 P 6 P END 6 @ 6
0x42c7d4…42c968 Dummy {f00=0x0109, f01=0x2008, f02=» 7 CBE GSWSTR2,CBLANKS,RETON ANY ON LINE ? 3 P RSTRT GSWSTR2 YES 3 8 P PAUSE 3 R PRETON 3 ` P RET 3 n P PEND 3 z P* 3 P 3 P END 3 @ 3 P* 2 P 2 P 2 P************************** 2 P* 2 P* RESTART ON LINE
0x42c968…42cafc Dummy {f00=0x0109, f01=0x0190, f02=» 4 F IDENT T:DUPL P,REL=4.2,791116,870136940420 T:DUPLK T:DUPX < T:DUPLK V T:GRFC j I:EVA0 | T:RNOK T:ROK T:DUPX , ( HB X T:LOFS , (
0x42cafc…42cc90 Dummy {f00=0x0109, f01=0x4046, f02=» : CT OV ` 0@ B
0x42cc90…42ce24 Dummy {f00=0x0109, f01=0x4136, f02=» 4 F IDENT T:GETC P,REL=4.2,791116,870136940420 T:GETCK < T:GETCK N T:GRFC b I:EVA0 t , ( @ 2' R P P X I:RT1 , ( ' ' X _ X ' _ X '? ; _
0x42ce24…42cfb8 Dummy {f00=0x0109, f01=0x411a, f02=» 4 F IDENT T:GETA P,REL=4.2,791116,870136940420 T:GETAK < T:GETAK N T:GRFC b I:EVA0 t T:RNOK T:ROK , ( H X ' X ! T:RCR H
0x42cfb8…42d14c Dummy {f00=0x0109, f01=0x4104, f02=» 4 F IDENT T:TSTC P,REL=4.2,791116,870136940420 T:TSTCK < T:TSTCK N T:GRFC b , ( @ X " 9b! X :c 2" t T:RTES $ H @ % , 4 @ 0,/8
0x42d14c…42d2e0 Dummy {f00=0x0109, f01=0x0190, f02=» 4 F IDENT T:TFWD P,REL=4.2,791116,870136940420 D @ T:TLEFK T:TRIG T:TLDO T:TDOW T:TUP T:TFWD T:TBWD T:THOMC < T:TLEFK T:TRIG T:TLDO T:TDOW T:TUP T:TFWD T:TBWD
0x42d2e0…42d474 (3, 12) Opaque[0x194]
0x42d474…42d608 # DirEnt {nam=»START «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2178, f03=0x0000}
0x42d474…42d608 IdxSect {
0x42d474…42d608 f00 = 0x010b // 0x42d474 @0x0
0x42d474…42d608 f01 = 0x0022 // 0x42d476 @0x2
0x42d474…42d608 gno = [ // 0x42d478 @0x4
0x42d474…42d608 [0x00]: C0x010b.0x3.0
0x42d474…42d608 [0x01]: C0x010c.0x1.0
0x42d474…42d608 [0x02]: C0x010d.0x1.0
0x42d474…42d608 [0x03]: C0x010d.0x2.0
0x42d474…42d608 [0x04]: C0x010d.0x3.0
0x42d474…42d608 [0x05]: C0x010e.0x0.0
0x42d474…42d608 [0x06]: C0x010e.0x1.0
0x42d474…42d608 [0x07]: C0x010e.0x2.0
0x42d474…42d608 [0x08]: C0x010e.0x3.0
0x42d474…42d608 [0x09]: C0x010f.0x0.0
0x42d474…42d608 [0x0a]: C0x010f.0x1.0
0x42d474…42d608 [0x0b]: C0x0111.0x2.0
0x42d474…42d608 [0x0c]: C0x0122.0x0.0
0x42d474…42d608 [0x0d]: C0x0125.0x1.0
0x42d474…42d608 [0x0e]: C0x0125.0x2.0
0x42d474…42d608 [0x0f]: C0x0125.0x3.0
0x42d474…42d608 [0x10]: C0x0126.0x0.0
0x42d474…42d608 ]
0x42d474…42d608 }
0x42d608…42d79c Dummy {f00=0x010b, f01=0x0190, f02=» 2 P IDENT START REL 2.1*79-10-20 870150540210 P : P =1, ODD BUFFER ADDRESS B P REL 2.1 79-05-23 d P =2, 6234 LAMPS P REL 2.1 79-05-23 P =3, UNDEFINED LABEL P REL 2.1 79-05-23 . P =4, CURSOR STOPS AT L
0x42d79c…42d930 Dummy {f00=0x010b, f01=0x0190, f02=»******************************************* ~ P* 4 H P* S T A R T : MODULE HANDLING KEYBOARD INPUT.KEYBOARD INITIATED > H P* MESSAGES ADDRESSED TO THE MAIN FRAME ARE COMPOSED B P* AND SENT BY USING ROUTINES IN MO
0x42d930…42dac4 Dummy {f00=0x010b, f01=0x0190, f02=» P EJECT P* P* P* ENTRY PARAMETERS * P* D P* N P* X P ENTRY LINHON,LINHOF,ATMASB b P ENTRY LSAVOF,LSAVON P ENTRY EMULA & P ENTRY LIOLON TURN ON OFFLINE LAMP ( P ENTRY LIOLOF TURN OFF OFFLINE LAMP
0x42dac4…42dc58 Dummy {f00=0x010b, f01=0x0190, f02=»R r P ENTRY ICWRTE P* P* * P* 4 P* EXTERNAL REFERENSES > P* ` P* j P* t P EXTRN DCINP ~ P EXTRN DCGETM P EXTRN ICREAD P EXTRN GTRBUF P EXTRN RLRBUF P EXTRN ERASE VDUPRT P E
0x42dc58…42ddec Dummy {f00=0x010b, f01=0x0190, f02=» P* 0 P EXTRN KEYCNV KEY CONVERSION IF NOT PTS 6272 P EXTRN TASCII F P* , P EXTRN I:EVA0 CREDIT EVALUATION ROUTINE f & P EXTRN I:RT1 RETURN TO CREDIT CODE P EJECT P P > P******************************************
0x42ddec…42df80 Dummy {f00=0x010b, f01=0x0190, f02=»KB6272 EQU 0 IF PTS 6272 (6236) IS NOT USED YOU MUST USE 'KEYCNV' 0 P USE THE KEY CONVERSION TABLE IN 'TB3270' J 0 PKEYLST EQU 0 KEY LOCK STATUS SAVED IN 'KEYS' ~ POFLIN EQU 1 . PDCLIN EQU 1 NUMBER OF MAIN FRAMES (1 OR 2) PPFX EQU 1
0x42df80…42e114 (3, 13) Dummy {f00=0x010c, f01=0x0190, f02=»OPY LOCK IF := 1 P EJECT P* & P* 0 P* EQUATES : P* P PRSET EQU /B2 RESET KEY Z " P* COMMON EQU FOR ECB HANDLING x P* P PECBBA EQU 2 PECBRL EQU 4 PECBEL EQU 6 PECBRC EQU 8 PECBCW EQ
0x42e114…42e2a8 Dummy {f00=0x010c, f01=0x0190, f02=» P* PECBDC EQU -DIS-14 P IFT DCLIN=2 , P IFT COPCMD=1 @ PECBDC2 EQU ECBDC-DIS V PECBICR EQU ECBDC2-DIS r PECBICW EQU ECBICR-DIS P XIF P IFT DCLIN=2 P IFF COPCMD=1 PECBDC2 EQU ECBDC-DIS PECBICW E
0x42e2a8…42e43c Dummy {f00=0x010c, f01=0x0190, f02=»IF P IFF DCLIN=2 P IFF COPCMD=1 PECBICW EQU ECBDC-DIS 4 P XIF P PECBVDU EQU ECBICW-DIS PECBKB EQU ECBVDU-DIS z PECBSD EQU ECBKB-DIS P EJECT P* P* " P* BASE ADDRESS FOR TCA AND ECB P* PTCAB
0x42e43c…42e5d0 Dummy {f00=0x010c, f01=0x0190, f02=»T01+2 ( PBVDU EQU PRINTER+2 VDU SCREEN BUFFER 0 PPCURS EQU BVDU+1920 CURSOR ADDRESS , BINARY : * PATTRIB EQU PCURS+2 LAST ATTRIBUTE CHAR n PCURATT EQU ATTRIB+2 & PWCC EQU CURATT+2 WCC/CCC CHARACTER . PKBINH EQU WCC+2 KEYBOARD INHIBIT INDIC
0x42e5d0…42e764 Dummy {f00=0x010c, f01=0x0190, f02=»NTERTASK COMM p , PINTATT EQU ICWORK+2 INTENSITY ATTRIBUTE $ POFFFLG EQU INTATT+2 OFFLINE FLAG F ( PCOPNO EQU OFFFLG+2 HARDCOPY TASK ID n * PCCC EQU COPNO+2 COPY COMMAND CHARACTER PMAIN EQU CCC+2 MAIN FRAME & PMODE EQU MAIN+2 INSERT MODE SW
0x42e764…42e8f8 Dummy {f00=0x010c, f01=0x0190, f02=»PLE WAIT &C n 4 PRDMORE EQU ECBBLK+10 BRANCH ADDRESS NEXT READ KB P EJECT L PNULL EQU /7F NULL CHARACTER Z PDUPCH EQU /7B ~ PFMCH EQU /60 * PLBVDU EQU 1920 1920 CHAR DISPLAY 6344 " PLPAGE EQU 48 LINES ON ONE PAGE * PLLINE EQU 80
0x42e8f8…42ea8c Dummy {f00=0x010c, f01=0x0190, f02=»RGTP EQU NBRKBV+2 NUMBER OF GTPS P* ( 2 PMF1KBV EQU NBRGTP+2 DV ADDRESSES KB/VDU MF #1 2 2 PMF1GTP EQU MF1KBV+16 DV ADDRESSES GTPS MF # 1 h P IFT DCLIN=2 PMF2KBV EQU MF1GTP+16 PMF2GTP EQU MF2KBV+16 P XIF P EJECT P*
0x42ea8c…42ec20 Dummy {f00=0x010c, f01=0x0190, f02=»CHAR " P DATA CHAR # P DATA CHAR $ " P DATA CHAR % 6 P DATA CHAR & J P DATA CHAR ' ^ P DATA CHAR ( r P DATA CHAR ) P DATA CHAR * P DATA CHAR + P DATA NUM , DK P DATA NUM - P DATA NUM . P DATA CH
0x42ec20…42edb4 (3, 14) Dummy {f00=0x010d, f01=0x0190, f02=» P DATA NUM 6 P DATA NUM 7 P DATA NUM 8 , P DATA NUM 9 @ P DATA CHAR : T P DATA CHAR ; h P DATA CHAR < | P DATA CHAR = P DATA CHAR > P DATA CHAR ? P* P DATA CHAR E' P DATA CHAR A P DATA CH
0x42edb4…42ef48 Dummy {f00=0x010d, f01=0x0190, f02=»A CHAR I P DATA CHAR J P DATA CHAR K $ P DATA CHAR L 8 P DATA CHAR M L P DATA CHAR N ` P DATA CHAR O t P* P DATA CHAR P P DATA CHAR Q P DATA CHAR R P DATA CHAR S P DATA CHAR T P DATA CHAR U
0x42ef48…42f0dc Dummy {f00=0x010d, f01=0x0190, f02=»K SLASH P DATA CHAR ] P DATA CHAR CIRCOMFLEX $ P DATA CHAR UNDERLINE B P* ^ $ P DATA RETURN /60 CANNOT BE USED h P DATA CHAR LOWER CASE P DATA CHAR P DATA CHAR P DATA CHAR P DATA CHAR P DATA CHAR P
0x42f0dc…42f270 Dummy {f00=0x010d, f01=0x0190, f02=» P DATA CHAR P* P IFT KEYLST=1 $ P DATA KEYL KEYLOCK : P DATA KEYL T P DATA KEYL f P DATA KEYL x P DATA KEYL P DATA KEYL P DATA KEYL P DATA KEYL P XIF P IFF KEYLST=1 P DATA RETURN P
0x42f270…42f404 Dummy {f00=0x010d, f01=0x0190, f02=» P XIF P DATA CHAR LOWER CASE X P DATA CHAR 0 P DATA CHAR B ( P DATA RETURN /7B-/7F CANNOT BE USED T P DATA RETURN P DATA RETURN P DATA RETURN P DATA RETURN P* P IFT PAX=1 P DATA PAEX P XIF
0x42f404…42f598 Dummy {f00=0x010d, f01=0x0190, f02=»OP) r P DATA PA410 P DATA PA410 P DATA PA410 4 P DATA PA410 H P DATA PA410 P DATA PA410 p P DATA CLEAR P IFT PFX=1 P DATA PFEX P XIF P IFF PFX=1 P DATA RETURN P XIF P DATA PF 1
0x42f598…42f72c Dummy {f00=0x010d, f01=0x0190, f02=» P DATA PF 9 P DATA PF 10 P DATA PF 11 * P DATA PF 12 > . P DATA RETURN /99-/A4 RESERVED FOR PF13-24 R P DATA RETURN P DATA RETURN P DATA RETURN P DATA RETURN P DATA RETURN P DATA RETURN P* P D
0x42f72c…42f8c0 Dummy {f00=0x010d, f01=0x018e, f02=» DATA CRLEFT P DATA CRRIGT P DATA CRDOWN ( P DATA BAKTAB < P DATA TAB P P DATA CRNL b P DATA RDHOME t P DATA ERINPT P DATA EREOF P* P IFT IN:DL=1 P DATA INSERT P DATA DELETE P XIF P IFF I
0x42f8c0…42fa54 (3, 15) Dummy {f00=0x010d, f01=0x0190, f02=» P IFT OFLIN=1 P DATA OFLINE P XIF 0 P IFF OFLIN=1 < P DATA RETURN P P XIF d P IFT DCLIN=2 p P DATA MFCHGE P XIF P IFF DCLIN=2 P DATA RETURN P XIF P DATA RETURN P DATA RETURN P DATA ZE
0x42fa54…42fbe8 Dummy {f00=0x010d, f01=0x0190, f02=»OWER CASE P - W (BECAUSE OF KEYLOCK) P DATA LCASPW , P DATA LCASPW @ P DATA LCASPW T P DATA LCASPW h P DATA LCASPW | P DATA LCASPW P DATA LCASPW P EJECT B P*************************************************************
0x42fbe8…42fd7c Dummy {f00=0x010d, f01=0x0190, f02=»QU * P CF A14,I:EVA0 & P LDR* A1,A9 POLL & SELECT ADDRESS " P LDKL A8,ECBDC L P ADR A8,CREBAS b P ST A1,ECBCW,A8 x $ P LDK A7,/B7 TRANSFER PARAMETERS P LKM P DATA 1 PDCT100 EQU * . P LDK A7,/80 TEST IF ANY MESSAGE
0x42fd7c…42ff10 Dummy {f00=0x010d, f01=0x018e, f02=»A14,DCGETM P LD A4,ECBBA,A8 " P CF A14,RLRBUF RELEASE BUFFER * P RB DCT100 P P EJECT b P* p P* z ( P* SUBROUTINE ACTIVATED BY ALL TASKS P* P* PEMULA EQU * " P ADR A8,CREBAS GET ECB ADDRESS $ P ST A1,ECB
0x42ff10…4300a4 Dummy {f00=0x010d, f01=0x018e, f02=» : P***************************************************** P* B P* VDUKB L P* ` " P* MAIN MODULE FOR KEYBOARD VDU j P* < P******************************************************** PVDUKB EQU * P CF A14,I:EVA0 & P LDR
0x4300a4…430238 Dummy {f00=0x010d, f01=0x0190, f02=» P ST A13,-2,A14 $ P SUKL A14,4 UPDATE STACK POINTER P CM OFFFLG,TCABAS B * P CF A14,LIOLOF TURN OFF OFF LINE LAMP P XIF P P EJECT B P************************************************************** P* , P* TRANSFER
0x430238…4303cc Dummy {f00=0x010d, f01=0x0190, f02=»BAS REL TASK NO " P AD A4,6,CREBAS 'CB1' ADDRESS & P LC A1,MF1KBV-1,A4 GET DV-ADDRESS > P ANK A1,/FF h P LDKL A8,ECBDC | P CF A14,EMULA P P IFT DCLIN=2 B P*************************************************************
0x4303cc…430560 Dummy {f00=0x010d, f01=0x018e, f02=» P & P LC A1,MF2KBV-1,A4 GET DV ADDRESS P ANK A1,/FF 6 P LDKL A8,ECBDC2 J P CF A14,EMULA b P XIF x P EJECT PVDU080 EQU * P CF A14,ERASE ERASE SCREEN P P LDK A1,1 P LDKL A1,LBVDU+1 6 P ST A1,CURATT,
0x430560…4306f4 (3, 16) Dummy {f00=0x010d, f01=0x018e, f02=» P* RELATIVE POS IN ECBBLK PKB EQU 2 $ PDC1 EQU 4 4 P IFT DCLIN=2 F P IFT COPCMD=1 Z PDC2 EQU 6 p PICR EQU 8 PECBBS EQU 4 P XIF P IFT DCLIN=2 P IFF COPCMD=1 PDC2 EQU 6 PECBBS EQU 3 P XIF
0x4306f4…430888 Dummy {f00=0x010d, f01=0x018e, f02=» PECBBS EQU 2 P XIF P* ( P LDK A1,ECBBS 2 P ST A1,ECBBLK,TCABAS H PVDU100 EQU * d P LD A1,ECBBLK+DC1,TCABAS x P RF(NZ) VDU110 PENDING 0 P CF A14,DC1INQ TEST IF ANY MESSAGE, NO WAIT PVDU110 EQU * P IFT DCLIN
0x430888…430a1c Dummy {f00=0x010d, f01=0x0190, f02=» PVDU120 EQU * P IFT COPCMD=1 P LD A1,ECBBLK+ICR,TCABAS 2 P RF(NZ) VDU125 PENDING R P LDKL A3,ICWORK BUFFER p P ADR A3,TCABAS ADDRESS P LDK A6,2 REQ LENGTH P CF A14,ICREAD P ST A8,ECBBLK+ICR,TCABAS P XIF
0x430a1c…430bb0 Dummy {f00=0x010d, f01=0x0190, f02=» EQU * P LDKL A7,ECBBLK ! P ADR A7,TCABAS ! & P LKM ! < P DATA 7 MULTIPLE WAIT ! H P CW A8,ECBBLK+KB,TCABAS ! f $ P RF(E) KBINP INPUT FROM KEYBOARD ! P IFT COPCMD=1 ! P CW A8,ECBBLK+ICR,TCABAS ! ( P RF(E) BUFCOP SEND BUFFER TO PRINTER
0x430bb0…430d44 Dummy {f00=0x010d, f01=0x018e, f02=» EJECT ! P* " P* READ KEYBOARD WITH NO WAIT " P* " < PRDKBNW EQU * " F P LDKL A8,ECBKB " Z P ADR A8,CREBAS " p P LDK A7,1 " " P ST A7,ECBRL,A8 REQ LENGTH = 1 " * P ST A7,ECBCW,A8 INDICATE NOT POWER OFF " P ST A8,ECBBLK+KB,TCABAS "
0x430d44…430ed8 Dummy {f00=0x010d, f01=0x0190, f02=» P ST A8,ECBBLK+DC1,TCABAS # PDC1I20 EQU * # $ P LDK A1,0 # 8 P CF A14,REQTIM # J P LDK A7,0 # ` PDC1I30 EQU * # r P LKM # P DATA 1 # P RTN A14 # PDC2INQ EQU * # P IFT DCLIN=2 # P LDKL A8,ECBDC2 # P ADR A8,CREBAS # P
0x430ed8…43106c Dummy {f00=0x010d, f01=0x0190, f02=»K # t P* $ PBUFCOP EQU * $ P CM ECBBLK+ICR,TCABAS $ ( P LDKL A3,BVDU BUFFER $ F P ADR A3,TCABAS ADDRESS $ b P IFT COPL=1 $ P* $ P* CHECK IF COPY LOCK $ P* $ P LCR A2,A3 $ P ANK A2,/18 $ P XRK A2,/10 $ P RB(Z) V
0x43106c…431200 Dummy {f00=0x010d, f01=0x0190, f02=»ID $ v P LDKL A6,LBVDU REQ LENGTH % P CF A14,ICWRTE % , P LD A1,KBINH,TCABAS % B ( P ANK A1,/E NOT INHIBITED ANY LONGER % ^ P ST A1,KBINH,TCABAS % P RB VDU100 % P XIF % P EJECT % P** KEYBOARD INPUT % P* % PKBINP EQU * %
0x431200…431394 (3, 17) Dummy {f00=0x010e, f01=0x0190, f02=»05 EQU * % $ P LDK A7,4 RESET KEYBOARD BUFFER & P LKM & 8 P DATA 1 & D P RB VDU100 & T PKBIN10 EQU * & f P LD A1,KBINH,TCABAS & z , P ANK A1,1 RESETTING BY 'RESET' ALLOWED ? & P RB(NZ) KBIN05 NO & ( P LC* A2,ECBBA,A8 GET INPUT CHARACTER &
0x431394…431528 Dummy {f00=0x010e, f01=0x0190, f02=»RESET KEY ? & ~ P RF(Z) KBIN20 NO ' P CWK A2,RSET RESET KEY ? ' , P RB(NE) KBIN05 NO ' L PKBIN20 EQU * ' f $ P LDR A5,A2 COPY INPUT CHARACTER ' z P SUK A5,/20 INDEX ' P RB(N) VDU100 ILLEGAL CHAR ' P CWK A5,/A7 ' P RB(G) VDU100 ILLEGAL
0x431528…4316bc Dummy {f00=0x010e, f01=0x0190, f02=» ' ^ P ADR A5,A5 TO KEY TABLE ( P* ( ( P LDKL A8,ECBVDU ( 2 P ADR A8,CREBAS ( J P LD A1,RDMORE,TCABAS ( ` P RF(Z) KBIN30 ( | P* ( P CFR A14,A1 ( P ABL VDU100 ( P* ( PKBIN30 EQU * ( : P CFI A14,KEYTAB,A5 BRANCH TO RESPECTIV
0x4316bc…431850 Dummy {f00=0x010e, f01=0x0190, f02=» P LDK A7,0 ) P LDKL A8,ECBDC ) P IFT DCLIN=2 ) , P LD A1,MAIN,TCABAS ) @ P RF(NZ) DCAB05 ) Z P XIF ) p P CM ECBBLK+DC1,TCABAS ) | P IFT DCLIN=2 ) P RF DCAB10 ) PDCAB05 EQU * ) P CM ECBBLK+DC2,TCABAS ) P LDKL A8,ECBDC2 )
0x431850…4319e4 Dummy {f00=0x010e, f01=0x0190, f02=»T TIMER ) P* A1 = TIME OUT VALUE * P* A8 = ECB ADDRESS * . P* * H PREQTIM EQU * * R P ST A1,ECBCW,A8 * f P LDK A7,/B9 * ~ P LKM * P DATA 1 * P RTN A14 * P EJECT * P * P* * P* * > P********************************
0x4319e4…431b78 Dummy {f00=0x010e, f01=0x0190, f02=» P* + PRETURN RTN A14 + P EJECT + $ P* + 2 < P******************************************************* + < P* + | P* CRLEFT + P* + 6 P* THIS MODULE MOVES THE CURSOR ONE POS TO LEFT + P* + < P********************************
0x431b78…431d0c Dummy {f00=0x010e, f01=0x0190, f02=»L050 NOT LEFTMOST POS + P LDKL A2,LBVDU-1 , PCRL050 RF CRH100 , 6 P* , N < P******************************************************** , X P* , P* CRRIGT , P* , < P* THIS MODULE MOVES THE CURSOR ONE POS. TO THE RIGHT , P* , <
0x431d0c…431ea0 Dummy {f00=0x010e, f01=0x0190, f02=»CURS,TCABAS GET CURSOR BINARY , P ADK A2,1 - & P CWK A2,LBVDU END OF BUFFER? - 8 P RF(L) CRR050 NO - P LDK A2,0 - t PCRR050 RF CRH100 - P EJECT - P* - @ P*********************************************************** - P* - P* CR
0x431ea0…432034 (3, 18) Dummy {f00=0x010e, f01=0x0190, f02=»******************** - h P* . PCRDOWN EQU * . & & P LD A2,PCURS,TCABAS GET CURSOR POS . : P ADKL A2,LLINE . d P CWK A2,LBVDU LAST LINE? . z P RF(L) CRD050 NO . P SUKL A2,LBVDU . PCRD050 RF CRH100 . P* . B P******************************
0x432034…4321c8 Dummy {f00=0x010e, f01=0x018e, f02=»****************************************************** . P* / > PCRUP EQU * / H * P LD A2,PCURS,TCABAS GET CURSOR BINARY / Z P SUKL A2,LLINE / P RF(NN) CRU050 UPMOST LINE / P ADKL A2,LBVDU / PCRU050 RF CRH100 / P EJECT / P* / : P**
0x4321c8…43235c Dummy {f00=0x010e, f01=0x0190, f02=» / : P****************************************************** 0 P* 0 F PCRHOME EQU * 0 P P LDK A2,0 0 d PCRH100 EQU * 0 v * P ST A2,PCURS,TCABAS GET CURSOR BINARY 0 P CF A14,ATMASB UPDATE ATTRIB 0 " P CF A14,SETCUR DISPLAY CURSOR 0 P RTN A
0x43235c…4324f0 Dummy {f00=0x010e, f01=0x0190, f02=»OR IN FIRST UNPROTECTED POS ON NEW LINE 0 P* 1 0 : P***************************************************** 1 : P* 1 x PCRNL EQU * 1 & P LD A2,PCURS,TCABAS GET CURSOR POS 1 P ADKL A2,LLINE NEXT LINE 1 P CWK A2,LBVDU 1 P RF(L) CRN050 1
0x4324f0…432684 Dummy {f00=0x010e, f01=0x0190, f02=»F(N) CRN120 1 P ADKL A1,LLINE 2 P RB CRN100 2 * 2 PCRN120 ST A1,PCURS,TCABAS STORE CURSOR ADDRESS 2 < P EJECT 2 r P 2 F P****************************************************************** 2 P LDR A2,A1 2 . P CF A14,ATMASB SEARCH ATTRIBUTE BACK
0x432684…432818 Dummy {f00=0x010e, f01=0x0190, f02=»CURS,TCABAS CURSOR ON ATTRIBUTE ?? 2 P RF(NE) CRN150 NO!! 3 * ( P CWK A2,1919 LAST SCREEN POSITION?? 3 F P RF(NE) CRN140 NO!! 3 r PCRN130 LDKL A2,-1 3 PCRN140 ADK A2,1 3 P ST A2,PCURS,TCABAS 3 ( PCRN150 CF A14,SETCUR POSITION CURSOR 3 P
0x432818…4329ac Dummy {f00=0x010e, f01=0x0190, f02=»******************************** 3 | P* 4 ( P* TAB 4 2 P* 4 @ 2 P* MOVE THE CURSOR TO THE FIRST CHAR. LOCATION 4 J ( P* OF THE NEXT UNPROTECTED DATA FIELD 4 P* 4 8 P**************************************************** 4 P* 4 2 P* A1=END OF
0x4329ac…432b40 Dummy {f00=0x010e, f01=0x0190, f02=»CTGR 4 P* 5 PTAB EQU * 5 P LDK A5,1 5 ( & P LD A2,PCURS,TCABAS GET CURSOR POS 5 : * PTAB100 CF A14,ATMASF SEARCH ATTRIBUTE 5 d P CWK A1,0 END OF BUFFER? 5 P RF(G) TAB300 YES 5 P ADK A2,1 5 " PTAB150 ANK A3,/10 UNPROTECTED? 5 P RF(
0x432b40…432cd4 (3, 19) Dummy {f00=0x010e, f01=0x0190, f02=»14 5 PTAB300 LDK A2,0 6 , P CWK A1,3 ATTRIBUTE IN LAST POSITION ?? 6 " P EJECT 6 R < P******************************************************** 6 ` P RF(NE) TAB350 NO!! 6 ( P ANK A5,1 WHOLE BUFFER CONTROLLED ?? 6 P RB(Z) TAB200 YES!! 6 P SUR
0x432cd4…432e68 Dummy {f00=0x010e, f01=0x0190, f02=»NK A5,1 WHOLE BUFF. CONTROLED? 6 P RF(G) TAB400 NO 7 & 0 P RB TAB200 ALL PROT. OR NON-FORMATTED BUFF. 7 > PTAB400 LDK A5,0 7 r P RB TAB100 7 P EJECT 7 P* 7 @ P*********************************************************** 7 P* 7 P* DUP
0x432e68…432ffc Dummy {f00=0x010e, f01=0x0190, f02=» BUFFER AND A STANDARD 7 p ( P* TAB KEY OPERATION TO BE PERFORMED 8 P* 8 J @ P************************************************************ 8 T P* 8 PDUP EQU * 8 & P LD A1,MODE,TCABAS INSERT MODE ?? 8 6 P ABL(NZ) ERROR FUNCTION NOT ALLOWED IN INS
0x432ffc…433190 Dummy {f00=0x010e, f01=0x0190, f02=»TAB 8 P RTN A14 9 P EJECT 9 P* 9 * @ P*********************************************************** 9 4 P* 9 x P* FIELD MARK 9 P* 9 @ P* OPERATION OF THIS KEY CAUSES A UNIQUE CHARACTER CODE 9 < P* TO BE ENTERED IN THE D
0x433190…433324 Dummy {f00=0x010e, f01=0x0190, f02=»************** 9 d P* : PFLDMRK EQU * : $ P LD A1,MODE,TCABAS INSERT MODE?? : 4 6 P ABL(NZ) ERROR FUNCTION NOT ALLOWED IN INSERT MODE : P LDK A2,FMCH : 2 P LD A3,ECBKB+ECBBA,CREBAS GET KB BUFFER ADDR. : P SCR A2,A3 : P CF A14,NUM : P R
0x433324…4334b8 Dummy {f00=0x010e, f01=0x0190, f02=»* : P* READY HOME KEY ; 8 P* OPERATION OF THIS KEY CAUSES THE CURSOR TOBE ; ( : P* POSITIONED AT THE FIRST UNPROTECTED CHARACTER ; d P* ON THE SCREEN ; P* ; < P******************************************************** ;
0x4334b8…43364c Dummy {f00=0x010e, f01=0x0190, f02=»2,/7F ; P CWK A2,/20 < P RF(NL) RDH10 < " P ANK A2,/10 < 8 $ P ABL(Z) CRHOME UNPROTECTED FIELD < L PRDH10 CM PCURS,TCABAS < t , P CF A14,TAB SEARCH 1ST UNPROTECTED FIELD < P RTN A14 < P EJECT < P* < : P******************************
0x43364c…4337e0 Dummy {f00=0x010e, f01=0x0190, f02=»EXT PRECIDING UNPROTECTED DATA FIELD < P* = , 8 P**************************************************** = 6 P* = r P* A2=CURSOR BINARY ADDRESS = | P* A3=CHARACTER = PBAKTAB EQU * = P LDK A5,1 = & P LD A2,PCURS,TCABAS GET CURSOR POS = " P CF
0x4337e0…433974 (3, 20) Dummy {f00=0x010e, f01=0x018e, f02=»E) BAK400 YES = P SUK A2,1 > ( PBAK100 CWK A2,0 UPPER LEFTMOST POS? > ( P RF(E) BAK400 YES > T PBAK200 SUK A2,1 > n $ P CF A14,ATMASB SEARCH ATTRIBUTE > @ P************************************************************ > P SUK A1,1 > P RF(
0x433974…433b08 Dummy {f00=0x010e, f01=0x0190, f02=» P RF BAK300 ? PBAK250 EQU * ? > P********************************************************* ? * P ANK A3,/10 PROTECTED? ? l P RB(NE) BAK100 YES ? P ADK A2,1 ? PBAK300 ST A2,PCURS,TCABAS ? P CF A14,SETCUR SET CURSOR ? P RTN A14 ? *
0x433b08…433c9c Dummy {f00=0x010e, f01=0x0190, f02=» BUFF CHAR. ? ~ P CWK A3,/1F ATTRIBUTE CHAR? @ P RB(G) BAK200 NO @ 8 P ANK A3,/10 PROTECTED? @ P P RB(NE) BAK200 YES @ n . P ST A3,ATTRIB,TCABAS UPDATE NEW ATTRIBUTE @ P ST A2,CURATT,TCABAS @ D P**************************************************
0x433c9c…433e30 Dummy {f00=0x010e, f01=0x0190, f02=» P* A > P********************************************************* A P* A P P* CHAR A Z P* A h : P* ALPHABETIC AND SPECIAL CHAR UPDATING AND DISPLAYING A r P* A > P********************************************************* A P* A PLC
0x433e30…433fc4 Dummy {f00=0x010e, f01=0x0190, f02=»CURS,TCABAS GET CURSOR POS A . P LD A3,CURATT,TCABAS GET ATTRIBUTE ADDRESS B " P CWR A2,A3 CURSOR ON ATTRIB? B T P RF(E) CHA300 YES B x 2 PCHA100 LD A3,ATTRIB,TCABAS GET ATTRIBUTE CHAR B P LDR A4,A3 B " P ANK A4,/10 PROTECTRED FIELD? B P RF(NE)
0x433fc4…434158 Dummy {f00=0x010e, f01=0x0190, f02=» POS B l P EJECT C D P*************************************************************** C P* C b & P* Z E R O : 3 TRIPLE ZERO KEY C l ( P* Z E R O : 2 DOUBLE ZERO KEY C P* C 6 P************************************************* C P C
0x434158…4342ec Dummy {f00=0x010e, f01=0x018e, f02=»SPLAY CHARACTER C P D PZERO:2 EQU * D P LDK A1,X'30' CHARACTER ZERO D 4 8 P SC* A1,ECBKB+ECBBA,CREBAS STORE CHARACTER IN BUFFER D X " P CF A14,NUM DISPLAY CHARACTER D " P CF A14,NUM DISPLAY CHARACTER D P RTN A14 RETURN D P* D > P******
0x4342ec…434480 Dummy {f00=0x010e, f01=0x0190, f02=» D > P********************************************************** E P* E J PNUMCOM EQU * E T P LDK A2,/2C E h P SC* A2,ECBKB+ECBBA,CREBAS E | P* E PNUM EQU * E & P LD A2,PCURS,TCABAS GET CURSOR POS E . P LD A3,CURATT,TCABAS GET ATTRIBUTE A
0x434480…434614 (3, 21) Dummy {f00=0x010f, f01=0x0190, f02=»DR A4,A3 E P ANK A4,/10 PROTECTED FIELD? F P RF(E) ANCOMM NO F 4 , PNUM200 ABL ERROR NOT ALLOWED DISPLAY POS F L P EJECT F | P* F > P********************************************************** F P* F P* ANCOMM F P* F < P* COMMON SUBMO
0x434614…4347a8 Dummy {f00=0x010f, f01=0x0190, f02=» F V P* G PANCOMM EQU * G " P LC* A4,ECBKB+ECBBA,CREBAS =1 G & PANC005 EQU * G L P LDKL A6,BVDU G ` P ADR A6,TCABAS G v P ADR A6,A2 G P G & P LD A1,MODE,TCABAS INSERT MODE ?? G P RF(NZ) ANC010 YES!! G P SCR A4,A6 UPDATE VDU BUFF G
0x4347a8…43493c Dummy {f00=0x010f, f01=0x0190, f02=»0 YES G P SUR A6,A2 BVDU START ADDR. H P ADR A6,A5 ATTRIB. POS H 2 , P LD A3,ATTRIB,TCABAS GET ATTRIBUTE CHAR H P P ORK A3,1 MDT-BIT ON H P SCR A3,A6 H PANC100 EQU * H P IFT IN:DL=1 =3 H & P LD A1,MODE,TCABAS INSERT MODE ?? H P RF(
0x43493c…434ad0 Dummy {f00=0x010f, f01=0x0190, f02=» NO!! H $ P SCR A4,A7 STORE INPUT CHARACTER I P XIF =3 I 6 PANC120 EQU * I H P I 2 P LDK A5,/2B CURSOR NOT MOVED BEFORE DISPLAYING I d P LD A1,ECBVDU+ECBBA,CREBAS I P SC A5,1,A1 =1 I P LDK A5,/1E I P ADK A1,2 NEXT POS I ( P SCR
0x434ad0…434c64 Dummy {f00=0x010f, f01=0x0190, f02=»NTENSIFIED DISPLAYING? I P RF(Z) ANC150 YES J P LDK A2,/20 LOAD SPACE J 8 P RF ANC250 NON DISPLAYING J V ( PANC150 LDK A5,/1F SET HIGH INTENSITY J x P SCR A5,A1 STORE IN BUFFER J ( PANC200 LDR A2,A4 UPDATE A2 WITH CHAR J 0 PANC250 CF A14,WCHAR DI
0x434c64…434df8 Dummy {f00=0x010f, f01=0x0190, f02=»NE) ANC255 J P LDKL A2,0 K PANC255 EQU * K $ P ST A2,PCURS,TCABAS K 8 " P CF A14,GBUFFC GET BUFFER CHAR K T P CWK A3,/1F ATTRIBUTE CHAR? K z P RF(G) ANC300 NO K P K ( P CF A14,TAB SKIP TO NEXT UNPROTECTED K PANC300 EQU * K P LD A1,ECB
0x434df8…434f8c Dummy {f00=0x010f, f01=0x0190, f02=»F A14,SETCUR POSITION CURSOR TO 1:ST POS. NEXT LINE K PANC350 EQU * L < P RTN A14 L P P IFT IN:DL=1 L ` P EJECT L t P L 8 P*************************************************** L P* L < P* DELETE CHARACTER AT CURSOR POSITION. SHIFT CARACTERS
0x434f8c…435120 Dummy {f00=0x010f, f01=0x0190, f02=» L PDELETE EQU * M P LDKL A6,-1 M & P LD A2,PCURS,TCABAS CURSOR ADDRESS M 0 ( PDEL:10 ADK A6,80 END OF LINE POINTER M Z . P CWR A6,A2 LAST POSITION ON CURRENT LINE?? M $ P RB(L) DEL:10 NO!! TRY NEXT LINE M P M * P CF A14,S:ATT SEARCH ATTRIBUTE F
0x435120…4352b4 (3, 22) Dummy {f00=0x010f, f01=0x0190, f02=»:20 YES!! M P SUK A2,1 SKIP ATTRIBUTE N P LDR A6,A2 N 2 PDEL:20 LDR A2,A6 N D P N P N d P LDK A1,BVDU N l * P ADR A1,TCABAS ABSOLUTE BUFFER ADDRESS N P ADR A2,A1 END OF FIELD/LINE N ( P AD A1,PCURS,TCABAS CURSOR POSITION N P N . PDE
0x4352b4…435448 Dummy {f00=0x010f, f01=0x018e, f02=»IT N v * P SCR A3,A1 SHIFT CHARACTER 1 POS. LEFT O P ADK A1,1 O 8 " P RB DEL:30 GET NEXT CHARACTER O J P O p P O x * PDEL:40 LDK A3,NULL+/80 NULL CHARACTER O * P SCR A3,A2 STORE AT END OF FIELD/LINE O " P LD A3,ATTRIB,TCABAS ATTRIBUTE O $ P ORK A
0x435448…4355dc Dummy {f00=0x010f, f01=0x0190, f02=» O h P RF(E) INS:60 YES!!! P P ADKL A1,BVDU P $ . P ADR A1,TCABAS ABSOLUTE ATTRIBUTE ADDRESS P : " P SCR A3,A1 SAVE NEW ATTRIBUTE P l & P RF INS:60 DISPLAY MODIFIED FIELD P P EJECT P P P B P******************************************************
0x4355dc…435770 Dummy {f00=0x010f, f01=0x018e, f02=»N TO THE RIGHT P f P* Q 8 P**************************************************** Q P Q PINSERT EQU * Q d $ P IM MODE,TCABAS SET INSERT MODE Q x . P CF A14,LIOLON TURN ON "INSERT MODE" LAMP Q P RTN A14 Q P Q P Q PINS:10 LDR A6,A7 Q
0x435770…435904 Dummy {f00=0x010f, f01=0x0190, f02=» P R P R 0 PINS:20 CF A14,S:ATT SEARCH ATTRIBUTE FORWARD R P R H P R P P SUK A1,2 ATTRIBUTE FOUND ?? R X P RF(Z) INS:30 NO!! R | P SUK A2,1 R P R PINS:30 ADR A2,TCABAS R 6 P ADK A2,BVDU ADD BUFFER DISPLACEMENT IN WORK-BLOCK R . P C
0x435904…435a98 Dummy {f00=0x010f, f01=0x0190, f02=»A2 GET CHARACTER R P ORK A3,/80 SET MODIFIED BIT S * P SCR A3,A2 SHIFT CHAR ONE POS TO RIGHT S < P SUK A2,1 S j " P RB INS:40 GET NEXT CHARACTER S | P S P S ( PINS:50 ORKL A9,/80 SET MODIFIED BIT S . P SCR A9,A6 SAVE INPUT CHARACTER IN BUFFER
0x435a98…435c2c Dummy {f00=0x010f, f01=0x0190, f02=»,TCABAS CURSOR POSITION S P RB ANC252 T P XIF T 2 P EJECT T > P T L > P********************************************************** T T P* T 4 P* SEARCH FIRST NULL CHARACTER AFTER CURSOR POS T P* T : P**************************************
0x435c2c…435dc0 Dummy {f00=0x010f, f01=0x0190, f02=»ET CHARACTER T & P ANK A3,/7F MASK AWAY MODIFIED BIT U P CWK A3,NULL NULL CHARACTER U > P RF(E) S:NU20 YES!! U b P ADK A1,1 U ~ * P RB S:NU10 CHECK NEXT BUFFER CHARACTER U P U * PS:NU20 LDR A2,A1 ADDRESS OF FIRST NULL U PS:NU30 RTN A14 U
0x435dc0…435f54 (3, 23) Dummy {f00=0x0111, f01=0x0190, f02=»M ATTENTION KEY WHICH CAUSES AN I/O OPERATION U $ P* AND GENERATE AN AID CHARACTER V 6 P* V ^ > P********************************************************* V h P* V PCANCEL EQU * V PPA2 EQU * V P LDK A2,/2E CANCEL POS V PCAN100 EQU * V
0x435f54…4360e8 Dummy {f00=0x0111, f01=0x0190, f02=»D AND TRANSMIT V z P RTN A14 W P* W & P W 0 P IFT PAX=1 W 8 P W J P* W R P* W F P* PROGRAM ATTENTION KEY IS PRESSED AND NUMBER WILL BE INSERTED TO W f : P* DEFINE ONE OF THE FUNCTIONS UNDER PA1.CANCEL OR PA3 W P* W P* W PPAEX E
0x4360e8…43627c Dummy {f00=0x0111, f01=0x0190, f02=»CHECK IF NUM.1-3 W P RF(L) PFERR ILLEGAL CHAR. X P SUK A2,/2 CHECK IF NUM.1-3 X : P RF(G) PFERR ILLEGAL CHAR. X ^ P RF(Z) PA3 X P ADK A2,1 X P RB(Z) PA2 X P RF PA1 X & P RTN A14 RETURN TO MAIN READ LOOP X P X P XIF X P EJE
0x43627c…436410 Dummy {f00=0x0111, f01=0x0190, f02=» RB CAN100 X P* Y P* Y $ P* PA3 PROGRAM ATTENTION KEY Y & P* Y N P* Y X PPA3 EQU * Y b P LDK A2,/2B PA3 POS Y t P RB CAN100 Y P* Y P* PA4 - PA10 (ALFASKOP) Y P* Y PPA410 EQU * Y P SUK A2,/20 Y P RB CAN200
0x436410…4365a4 Dummy {f00=0x0111, f01=0x0190, f02=»OGRAM FUNCTION KEY WHICH CAUSES AN I/O OPERATION Y < P* AND GENERATE AN AID CHARACTER FOLLOWED BY AN SBA ORDER Z 8 8 P* ATTRIBUTE ADDRESS AND TEXT FOR EACH MODIFIED FIELD Z x P* NULLS ARE SUPRESSED Z P* Z > P********************************************
0x4365a4…436738 Dummy {f00=0x0111, f01=0x0190, f02=» Z n . P CF A14,LINHON TURN ON "KEYBOARD INHIBIT" [ . P CF A14,TRPF AID+MODIFIED FIELDS+TRANSMIT [ : PENT200 EQU * [ l P RTN A14 [ P* [ P [ P IFT PFX=1 [ P [ P* [ P* [ F P* PROGRAM FUNCTION KEY IOS PRESSED AND NUMBER WILL BE IN
0x436738…4368cc Dummy {f00=0x0111, f01=0x0190, f02=»NXT [ PPFEXA EQU * P CM RDMORE,TCABAS P SUK A2,/30 LEGAL CHAR ? : , P RF(L) PFERR ILLEGAL,GO TO ERR.HANDLING Z & P RF(Z) PF0 FIRST NUM. 0 GO TO PF0 P SUK A2,/1 FIRST NUM. 1 ? P RF(G) PFERR ILLEGAL NUM. P LDKL A1,PF1A
0x4368cc…436a60 Dummy {f00=0x0111, f01=0x018e, f02=»ING l P SUK A2,/2 LEGAL NUM ? ] , P RF(G) PFERR ILLEGAL GO TO ERR.HANDLING ] * P ADK A2,/3C PF10-12 POS ] Z P RB ENT100 ] z P ] PPF0 EQU * ] P LDKL A1,PF0A ] PPFNXT EQU * ] P ST A1,RDMORE,TCABAS ] P RTN A14 ] PPF0A EQU * ]
0x436a60…436bf4 (3, 24) Dummy {f00=0x0122, f01=0x0190, f02=» ] x , P RF(G) PFERR ILLEGAL GO TO ERR.HANDLING ^ P ADK A2,/39 PF1-9 POS ^ 8 P RB ENT100 ^ V P XIF ^ h PPFERR EQU * ^ t * P CF A14,ERROR GO TO ERR-HANDLING RUTIN ^ $ P RTN A14 GO TO MAIN READ MODULE ^ P ^ P ^ PPF EQU * ^ P SUK A2,/5
0x436bf4…436d88 Dummy {f00=0x0122, f01=0x0190, f02=» P* OFLINE _ < P* THE OFFLINE SWITCH "OFFFLG" IS SET = 1 AND _ 8 P* A BRANCH IS MADE BACK TO CREDIT PROGRAM _ T P* _ B P************************************************************* _ POFLINE EQU * _ P CF A14,CLEAR _
0x436d88…436f1c Dummy {f00=0x0122, f01=0x018e, f02=»F A14,DCABOR ABORT REQUEST NOT CURRENT MF _ P XIF ` 2 P IFT OFLIN=1 ` > 6 P LDK A1,0 DV ADDRESS ::= 0MESSAGES TO VDU IGNORED ` R P LDKL A8,ECBDC MF # 1 ` & P CF A14,EMULA TRANSFER PARAMETERS ` P IFT DCLIN=2 ` P LDKL A8,ECBDC2 MF # 2 ` & P C
0x436f1c…4370b0 Dummy {f00=0x0122, f01=0x018e, f02=» ( P CF A14,LIOLON TURN ON OFFLINE LAMP a & P IM OFFFLG,TCABAS SET OFFLINE FLAG a 0 $ P ADKL A14,4 SKIP ONE STACK LEVEL a Z * P LD A13,2,A14 RELOAD REGISTERS A12-A13 a P LD A12,4,A14 a $ P ADKL A14,4 UPDATE STACK POINTER a * P ABL I:RT1 RETURN TO "OFFL
0x4370b0…437244 Dummy {f00=0x0122, f01=0x0190, f02=» a R P* b P* MAINFRAME CHANGE b H P* THE SWITCH 'MAIN' IS CHANGED, AND THE APPROPRIATE 'SYSTEM' LAMP b , P* IS TTURNED ON b x P* b J P********************************************************************* b P* b PMFCHGE EQU * b
0x437244…4373d8 Dummy {f00=0x0122, f01=0x018e, f02=»D A1,MAIN,TCABAS b P XRK A1,1 c P RF(NZ) MFCH10 c * P CF A14,LMF1ON c @ P RF MFCH90 c V PMFCH10 EQU * c h P CF A14,LMF2ON c | PMFCH90 EQU * c P ST A1,MAIN,TCABAS c P RTN A14 c P XIF c P EJECT c P* c < P********************
0x4373d8…43756c Dummy {f00=0x0122, f01=0x018e, f02=» c X 8 P* AND GENERATE AN AID CHARACTER. THE ENTIRE DISPLAY d : P* BUFFER IS CLEARED TO NULLS AND CURSOR IS LOCATED IN d D P* HOME POS d P* d < P******************************************************** d P* d PCLEAR EQU * d P LDK A2,/2D
0x43756c…437700 Dummy {f00=0x0122, f01=0x0190, f02=» d j & P CF A14,ERASE ERASE ENTIRE SCREEN e P RTN A14 e 2 P EJECT e B P* e P @ P************************************************************ e Z P* e P* EREOF e P* e P* ERASE TO END OF FIELD e P* e @ P****************************
0x437700…437894 (3, 25) Dummy {f00=0x0125, f01=0x018e, f02=»3,/10 UNPROTECTED? e P RF(E) ERE100 YES f P ABL ERROR f 4 PERE100 LD A2,PCURS,TCABAS f F P f h ( P************************ 77.06.01 f p P f 2 P CW A2,CURATT,TCABAS STANDING ON ATTRIBUTE ?? f * P ABL(E) ERROR YES!! TURN ON ERROR LAMP f P
0x437894…437a28 Dummy {f00=0x0125, f01=0x0190, f02=» P RF(G) ERE200 NO g PERE160 LDR A1,A2 g P LD A3,PCURS,TCABAS g 4 PERE170 EQU * g P P LDKL A4,BVDU g d P ADR A4,TCABAS g z P ADR A4,A3 g 0 P CF A14,ERASUA ERASE AND REPLASE WITH NULLS g ( P CF A14,DISPL DISPLAY ERASED SCREEN g P* g
0x437a28…437bbc Dummy {f00=0x0125, f01=0x0190, f02=»RMATTED SCREEN g ~ P h P ADK A2,BVDU h . P ADR A2,TCABAS ABSOLUTE ATTRIBUTE ADDRESS h 2 P LCR A1,A2 GET ATTRIBUTE h d P ORK A1,1 SET MDT BIT h P SCR A1,A2 h PERE180 EQU * h P RTN A14 h ( PERE200 CWK A2,LBVDU-1 END OF BUFFER? h P RF(
0x437bbc…437d50 Dummy {f00=0x0125, f01=0x0190, f02=» A2,0 WRAP AROUND. h P RB ERE150 i P EJECT i , P* i : < P******************************************************** i D P* i P* ERINPT i P* i : P* CLEARS ALL UNPROTECTED CHARACTER LOCATIONS TO NULLS i : P* AND REPOSITIONS THE CURSOR TO TH
0x437d50…437ee4 Dummy {f00=0x0125, f01=0x0190, f02=» P* j PERINPT EQU * j ( P CF A14,ERASUP ERASE ALL UNPROTECTED j " P CF A14,DISPL j N P LD A2,PCURS,TCABAS j d P CF A14,ATMASB j > P********************************************************* j P SUK A1,1 j $ P RF(Z) ERI:10 NO ATTRIBUTE FOU
0x437ee4…438078 Dummy {f00=0x0125, f01=0x0190, f02=»************************************************** j P ADK A2,1 k : P k L PERI:10 EQU * k T P ST A2,PCURS,TCABAS k h P RTN A14 k P EJECT k P* k @ P************************************************************ k P* k P* ERROR k
0x438078…43820c Dummy {f00=0x0125, f01=0x0190, f02=» P* l PERROR EQU * l ( P CF A14,LERRON TURN ON 'ERROR' LAMP l " P LD A5,KBINH,TCABAS l N 4 P ORK A5,4 BIT 13:=1,ERROR HANDLING.RESET ALLOWED l j P ST A5,KBINH,TCABAS l P l P* l P* TURN ON SOUND ALARM l P* l P l P LDKL
0x43820c…4383a0 Dummy {f00=0x0125, f01=0x0190, f02=»C A7,1,A2 l P LDK A7,X'07' BELL CHARACTER m P SC A7,2,A2 m 6 P LDK A7,3 REQUESTED LENGTH m J P ST A7,ECBRL,A8 m l P LDK A7,X'86' SOUND ALARM m P LKM m P DATA 1 m P m P RTN A14 m P IFT KEYLST=1 m P EJECT m F P**********
0x4383a0…438534 (3, 26) Dummy {f00=0x0125, f01=0x0190, f02=»EY LOCK VALUE /70-/77 m ~ P* n F P****************************************************************** n ( P* n r PKEYL EQU * n | & P SUK A2,/78 GET NEG KEY LOCK VALUE n " P LD A3,KEYS,TCABAS OLD STATUS n P LDK A4,/10 n PKEYL10 EQU * n P S
0x438534…4386c8 Dummy {f00=0x0125, f01=0x0190, f02=» LDR A2,A2 WAS OFF n & P RF(NZ) KEYL99 NOW OFF, NO CHANGE o P RF KEYL30 NOW ON o D PKEYL20 EQU * WAS ON o ^ P LDR A2,A2 o z $ P RF(Z) KEYL99 NOW ON, NO CHANGE o PKEYL30 EQU * CHANGE o P LD A3,KEYS,TCABAS o P XRR A3,A4 CHANGE STATUS o (
0x4386c8…43885c Dummy {f00=0x0125, f01=0x0190, f02=»OCK, BIT ON = LOCK ON o ` * P* A4 = KEYLOCK CHANGED, LAYOUT AS A3 p ( P* A2 = 1, IF CHANGED TO OFF ELSE 0 p L P* p x * P* INSERT USER ROUTINE BELOW THIS LINE p P* p PKEYL99 EQU * p P RTN A14 p P XIF p P EJECT p P* p < P******
0x43885c…4389f0 Dummy {f00=0x0125, f01=0x0190, f02=»**************************** p t P* q $ PLON EQU /B7 q . PLOF EQU /B8 q B P IFT KB6272=1 q V PLMF1 EQU /20 q l PLMF2 EQU /10 q PLIOL EQU 8 q PLINH EQU 4 q PLERR EQU 2 q PLSAV EQU 1 q P XIF q P IFF KB6272=1 q PLMF1 EQU 0
0x4389f0…438b84 Dummy {f00=0x0125, f01=0x0190, f02=»F1ON LDK A3,LMF1 q P RF LMPON r PLMF1OF LDK A3,LMF1 r * P RF LMPOF r D PLMF2ON LDK A3,LMF2 r V P RF LMPON r p PLMF2OF LDK A3,LMF2 r P RF LMPOF r PLIOLON LDK A3,LIOL r P RF LMPON r PLIOLOF LDK A3,LIOL r P RF LMPOF r PLI
0x438b84…438d18 Dummy {f00=0x0125, f01=0x018e, f02=» LDK A3,LERR r P RF LMPOF s PLSAVON LDK A3,LSAV s & P RF LMPON s @ PLSAVOF LDK A3,LSAV s R P RF LMPOF s l P* s ~ PLMPON LDK A7,LON s P RF SDISP s PLMPOF LDK A7,LOF s P RF SDISP s P EJECT s P s P* s < P************
0x438d18…438eac Dummy {f00=0x0125, f01=0x0190, f02=» < P******************************************************** t P* t D PSDISP EQU * t N P LDKL A8,ECBSD t b P ADR A8,CREBAS t x P ST A3,ECBCW,A8 t P LKM t P DATA 1 t P RTN A14 t P EJECT t P* t < P******************************
0x438eac…439040 Dummy {f00=0x0125, f01=0x0190, f02=»* t < P******************************************************** u P* u J " P* A2=CURSOR BINARY ADDRESS u T $ P* A1=BUFFER SCANNING PARAM. u z . P* 0=ATTRIB FOUND 1=END OF BUFFER LEFT u ( P* 2= ATTRIBUTE IN LAST POSITION u P* u
0x439040…4391d4 (3, 27) Dummy {f00=0x0125, f01=0x0190, f02=»G) ASB10 NO u PASB08 ST A3,ATTRIB,TCABAS v , P ST A2,CURATT,TCABAS CURSOR ON ATTRIBUTE v 6 P RTN A14 v f PASB10 CWK A2,0 END OF BUFFER v v P RF(E) ASB20 YES v P SUK A2,1 v P RB ASB05 NEXT v PASB20 EQU * v P EJECT v P v 6 P****
0x4391d4…439368 Dummy {f00=0x0125, f01=0x0190, f02=» CF A14,GBUFFC GET CHARACTER v P CWK A3,/1F ATTRIBUTE ??? w $ P RB(NG) ASB08 YES!!! w F P SUR A2,A2 FIRST SCREEN POS. w b 2 P********************************************* w P w P LDK A1,1 END BUFFER LEFT w P CM ATTRIB,TCABAS w P LDKL A7
0x439368…4394fc Dummy {f00=0x0125, f01=0x0190, f02=»******************************** w x P* x ( P* ATMASF x 2 P* x F : P* SEARCH FOR ATTRIBUTE CHAR. FORWARDS AND MASK IT x P P* x > P********************************************************* x P* x P* A3=CHARACTER x " P* A2=CURSO
0x4394fc…439690 Dummy {f00=0x0125, f01=0x0190, f02=»BUFF POS x z P* y P y P y " PS:ATT EQU * y * P LD A7,ATTRIB,TCABAS y > P LD A8,CURATT,TCABAS y Z , P CF A14,ATMASF SEARCH ATTRIBUTE FORWARD y v P ST A7,ATTRIB,TCABAS y P ST A8,CURATT,TCABAS y P RTN A14 y P y PATMASF EQU * y
0x439690…439824 Dummy {f00=0x0125, f01=0x0190, f02=»********************************************************** y , P CWK A2,LBVDU-1 EOB +ATTRIB IN LAST POS z B @ P************************************************************ z r P RF(NE) ASF08 NO z P LDK A1,3 z PASF08 ST A3,ATTRIB,TCABAS z , P ST A2
0x439824…4399b8 Dummy {f00=0x0125, f01=0x0190, f02=» z P RTN A14 { PASF20 ADK A2,1 { P RB ASF05 { . P EJECT { @ P* { N 6 P************************************************** { X P* { P* GBUFFC { P* { 6 P* GET VDU BUFFER CHAR WHICH IS INDICATED BY CURSOR { P* { 6 P**************
0x4399b8…439b4c Dummy {f00=0x0125, f01=0x0190, f02=»QU * { P LDK A3,0 | P LDKL A4,BVDU | " P ADR A4,TCABAS GET VDU BUFFER | 4 P ADR A4,A2 | Z & P LCR A3,A4 GET CHARACTER IN BUFF. | l P RTN A14 | P EJECT | P* | @ P************************************************************ | P* |
0x439b4c…439ce0 Dummy {f00=0x0125, f01=0x0190, f02=»CUTING | b $ P* A COMMAND. BIT 14=1 IN KBINH } 2 P* 2- A PA-KEY OPERATION IS IN PROCESS PRIOR TO } 6 < P* INITIATION OF A COMMAND FOR A DEVICE WITH AN ATTACHED } l " P* KEYBOARD. BIT 14=1 IN KBINH } * P* 3- ERRORSITUATION. BIT 14=1 IN KBINH } P* } :
0x439ce0…439e74 (3, 28) Dummy {f00=0x0126, f01=0x0190, f02=»************************************* } z P* ~ . PRESET EQU * ~ 8 & P CM MODE,TCABAS RESET INSERT MODE ~ L * P CF A14,LIOLOF TURN OFF "INSERT" LAMP ~ v & P CM KBINH,TCABAS RESSTORE KEYBOARD ~ ( P CF A14,LERROF TURN OFF 'ERROR' LAMP ~ 4 P CF A14,LINHOF
0x439e74…43a008 Dummy {f00=0x0126, f01=0x0190, f02=»*************** ~ ` P* 4 P* C O P Y : COPY CONTENTS IN VDU BUFFER ON " $ P* HARDCOPY DEVICE Z P* @ P************************************************************ P PCOPY EQU * P LD A5,COPNO,TCABAS P A
0x43a008…43a19c Dummy {f00=0x0126, f01=0x0190, f02=»WRITE ADDRESSED WAIT | P EJECT P* * $ P* WRITE INTERTASK COMMUNICATION 4 P* P* A3 = BUFFER ADDRESS f P* A4 = ORDER P* A5 = "TO-TID" P* A6 = REQ LENGTH P* PICWRTE EQU * P LDKL A8,ECBICW P ADR A8,
0x43a19c…43a330 Dummy {f00=0x0126, f01=0x4078, f02=»NGTH z P ST A3,ECBBA,A8 P LDR A7,A4 ORDER $ P LKM < P DATA 1 H P RTN A14 X P END h@ tESS f P* A4 = ORDER P* A5 = "TO-TID" P* A6 = REQ LENGTH P* PICWRTE EQU * P LDKL A8,ECBICW P ADR A8,
0x43a330…43a4c4 Dummy {f00=0x0126, f01=0x2008, f02=» A7,/B7 TRANSFER PARAMETERS LKM , DATA 1 8 CF A14,ERASE ERASE SCREEN H 0 ,EM100 CF A14,TRPF TRANSMIT, PROGRAM FUNCTION j RB EM100 AGAIN * * END START @ 4,2,A13 ADR A14,A13 LOAD STACK
0x43a4c4…43a658 Dummy {f00=0x0126, f01=0x0190, f02=» *9h P( P P Y +W^ Y + WL T LW> Q W Y + U Q P W W Y ( C X *! P V L ! X 0 Y 8 z P Y 0 X 0 X 2] X 8 Y 0 z : X 0 :H* : X 2T Y 2 : C 1 B ]
0x43a658…43a7ec Dummy {f00=0x0126, f01=0x0190, f02=» C : C B _, _ X * ` P < B _R ( X D D : K + Q 2 P. P8 l ( B X # V : _0 _> P x t @ @ 6 ` b b T W W X 0Q Y ( Y *P
0x43a7ec…43a980 Dummy {f00=0x0126, f01=0x0190, f02=» 0] Y (_r " X _& X *# P B 1 W " P X X$ C : X *! P C W @ X (T W X y 6 Y ( : X (;n z P x t , 6 6 ` 4 4 J T Y .W Y . X ( X ." PV X 0RzT$ Y *P U :H . K
0x43a980…43ab14 (3, 29) Opaque[0x194]
0x43ab14…43aca8 # DirEnt {nam=»VDUPRT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2d10, f03=0x0000}
0x43ab14…43aca8 IdxSect {
0x43ab14…43aca8 f00 = 0x0168 // 0x43ab14 @0x0
0x43ab14…43aca8 f01 = 0x0018 // 0x43ab16 @0x2
0x43ab14…43aca8 gno = [ // 0x43ab18 @0x4
0x43ab14…43aca8 [0x00]: C0x0168.0x2.0
0x43ab14…43aca8 [0x01]: C0x0168.0x3.0
0x43ab14…43aca8 [0x02]: C0x0169.0x0.0
0x43ab14…43aca8 [0x03]: C0x0169.0x1.0
0x43ab14…43aca8 [0x04]: C0x0169.0x2.0
0x43ab14…43aca8 [0x05]: C0x0169.0x3.0
0x43ab14…43aca8 [0x06]: C0x016a.0x0.0
0x43ab14…43aca8 [0x07]: C0x016a.0x1.0
0x43ab14…43aca8 [0x08]: C0x016a.0x2.0
0x43ab14…43aca8 [0x09]: C0x016a.0x3.0
0x43ab14…43aca8 [0x0a]: C0x016b.0x0.0
0x43ab14…43aca8 [0x0b]: C0x016b.0x1.0
0x43ab14…43aca8 ]
0x43ab14…43aca8 }
0x43aca8…43ae3c Dummy {f00=0x0168, f01=0x0190, f02=» 2 P IDENT VDUPRT 2.1DK 1 79-10-20 870150540210 P : P =1,ODD BUFFER ADDRESS B P REL 2.1 79-05-23 b P =2,KEYBOARD LAMPS ~ P REL 2.1 79-05-23 " P =3, TRANSMIT BUFFER LENGTH P REL 2.1 79-05-23 F P****************
0x43ae3c…43afd0 Dummy {f00=0x0168, f01=0x0190, f02=» MAIN FRAME, AND DISPLAYING THEM ON . P* THE VDU ( PTS 6344 ) . : P* l H P******************************************************************** v P* P* P EJECT P* P* P* ENTRIES
0x43afd0…43b164 Dummy {f00=0x0168, f01=0x018e, f02=»NTIRE SCREEN | $ P ENTRY SETCUR CURSOR POSITIONING ( P ENTRY ERASUP ERASE ALL UNPROTECTED < & P ENTRY DISPL DISPLAY MODIFIED DATA h . P ENTRY ERASUA ERASE UNPROTECTED TO ADDRESS . P ENTRY WCHAR WRITE ONE CHAR IN CURSOR POS P ENTRY UPDATE
0x43b164…43b2f8 Dummy {f00=0x0168, f01=0x0190, f02=» P* P* EXTERNALS P* " P* , P EXTRN LINHON,LINHOF START 6 P EXTRN LSAVON,LSAVOF START X P EXTRN ATMASB z P EXTRN EMULA P EXTRN REQTIM P EXTRN ICWRTE P* P EXTRN SNBUSY PRT P* * P EXTRN I:E
0x43b2f8…43b48c Dummy {f00=0x0168, f01=0x0190, f02=»********************************** r P* * ( P* CONDITIONAL ASSEMBLY PARAMETERS 4 P* ` 2 P********************************************** j P 2 POFLIN EQU 1 OFFLINE HANDLING POSSIBLE IF ::= 1 , PDCLIN EQU 1 NUMBER OF MAIN FRAMES (1-2)
0x43b48c…43b620 Dummy {f00=0x0168, f01=0x0190, f02=»BUFFER LENGTH IN WORDS x 2 PTBUFNR EQU 2 NUMBER OF TRANSMIT BUFFERS (1-5) 8 PCOPCMD EQU 1 COPY COMMAND (ONLY TO PRINTER) IF := 1 T & PEBCDIC EQU 1 ASCII = 0,EBCDIC = 1 P* P* EQUATES P* P* * PTIMDC EQU 300 DC TIME OUT VALU
0x43b620…43b7b4 (3, 30) Dummy {f00=0x0168, f01=0x018e, f02=»DMES EQU /7D END MESSAGE CHAR " PFORMFD EQU /7C FORM FEED CHAR & PDUPCH EQU /7B L PFMCH EQU /60 b P EJECT v P* P* P* EQUATES P* " P* COMMON EQU FOR ECB HANDLING P* P PECBBA EQU 2 PECBR
0x43b7b4…43b948 Dummy {f00=0x0168, f01=0x018e, f02=» P* ECB REL. ADDRESSES P* $ P* . PDIS EQU 20 8 P* J PECBDC EQU -DIS-14 T P IFT DCLIN=2 n P IFT COPCMD=1 PECBDC2 EQU ECBDC-DIS PECBICR EQU ECBDC2-DIS PECBICW EQU ECBICR-DIS P XIF P IFT DCLIN=2
0x43b948…43badc Dummy {f00=0x0168, f01=0x0190, f02=» PECBICR EQU ECBDC-DIS PECBICW EQU ECBICR-DIS $ P XIF B P IFF DCLIN=2 N P IFF COPCMD=1 b PECBICW EQU ECBDC-DIS x P XIF PECBVDU EQU ECBICW-DIS PECBKB EQU ECBVDU-DIS PECBSD EQU ECBKB-DIS P EJECT P*
0x43badc…43bc70 Dummy {f00=0x0168, f01=0x0190, f02=»A REL. ADDRESSES P* PTCT01 EQU 0 " PPRINTER EQU TCT01+2 6 ( PBVDU EQU PRINTER+2 VDU SCREEN BUFFER R 0 PPCURS EQU BVDU+1920 CURSOR ADDRESS , BINARY ~ * PATTRIB EQU PCURS+2 LAST ATTRIBUTE CHAR PCURATT EQU ATTRIB+2 & PWCC EQU CURA
0x43bc70…43be04 Dummy {f00=0x0168, f01=0x0190, f02=»T+2 DC READ EFFECTIVE LENGTH 2 PICWORK EQU DCLENG+2 WORK FIELD INTERTASK COMM $ , PINTATT EQU ICWORK+2 INTENSITY ATTRIBUTE Z $ POFFFLG EQU INTATT+2 OFFLINE FLAG ( PCOPNO EQU OFFFLG+2 HARDCOPY TASK ID * PCCC EQU COPNO+2 COPY COMMAND CHARACTER
0x43be04…43bf98 Dummy {f00=0x0168, f01=0x0190, f02=»2 ECB ADDRESS LAST READ DC 2 PECBBLK EQU ECBDCC+2 ECBS FOR MULTIPLE WAIT &C " 4 PRDMORE EQU ECBBLK+10 BRANCH ADDRESS NEXT READ KB X P EJECT P P* P* * PLBVDU EQU 1920 1920 CHARACTER DISPLAY " PLPAGE EQU 48 LINES ON ONE PAGE
0x43bf98…43c12c Dummy {f00=0x0168, f01=0x0190, f02=»ADDRESSES x P* " PNBRKBV EQU 0 NUMBER OF KB/VDUS & PNBRGTP EQU NBRKBV+2 NUMBER OF GTPS B P* l 2 PMF1KBV EQU NBRGTP+2 DV ADDRESSES KB/VDU MF #1 v 2 PMF1GTP EQU MF1KBV+16 DV ADDRESSES GTPS MF # 1 P IFT DCLIN=2 PMF2KBV EQU MF1GTP+
0x43c12c…43c2c0 Dummy {f00=0x0168, f01=0x018e, f02=»********** Z P* P* INPUT FROM DC P* 4 8 P**************************************************** > P* z P* RELATIVE POS IN ECBBLK PKB EQU 2 PDC1 EQU 4 PDC2 EQU 6 P* PDCINP EQU * & P CF A14,GTRBUF GET
0x43c2c0…43c454 (3, 31) Dummy {f00=0x0169, f01=0x0190, f02=» P XIF P IFT DCLIN=2 P LD A1,MAIN,TCABAS $ P CW A8,ECBBLK+DC2,TCABAS > P RF(E) DCIN20 MF # 2 ^ P CM ECBBLK+DC1,TCABAS z P LDR A1,A1 P RF(NZ) DCIN90 WRONG MF P RF DCIN30 PDCIN20 EQU * P CM ECBBLK+DC2,TCABAS
0x43c454…43c5e8 Dummy {f00=0x0169, f01=0x0190, f02=»F(NZ) DCIN90 P XIF ( P LD A1,ECBEL,A8 EFFECTIVE DC-LENGTH P ST A1,DCLENG,TCABAS L P h P p P LD A5,KBINH,TCABAS x . P ORK A5,3 BIT 14,15:= 1. TOTALLY DISABLED . P* KEYBOARD. BIT 15 = 0 AFTER DISPLAYING. P ST A5,KBINH,TCA
0x43c5e8…43c77c Dummy {f00=0x0169, f01=0x0190, f02=»F A14,DISPL P LD A2,PCURS,TCABAS P CF A14,ATMASB 0 P F P N P* V P LD A2,KBINH,TCABAS ` P ANK A2,1 BIT 15 = 0? | P RF(Z) DCIN60 P LD A2,KBINH,TCABAS . P ANK A2,/E BIT 15:=0 KEYBOARD NOT TOTALLY P* INHIBI
0x43c77c…43c910 Dummy {f00=0x0169, f01=0x0190, f02=» CF A14,LINHOF TURN OFF 'KEYBOARD INHIBIT' P LD A2,KBINH,TCABAS 2 , P ANK A2,4 BITS 14,15:=0 RESTORE KEYBOARD N P ST A2,KBINH,TCABAS ~ P RF DCIN95 PDCIN90 EQU * P LD A8,ECBDCC,TCABAS P LD A4,ECBBA,A8 P CF A14,RLRBUF
0x43c910…43caa4 Dummy {f00=0x0169, f01=0x0190, f02=» A1,0 P CF A14,REQTIM P LDK A7,/82 READ, WAIT $ ( P CM ECBCW,A8 NO TIME OUT SUPERVISION B P LDKL A1,RBUFL+RBUFL n P ST A1,ECBRL,A8 REQ LENGTH P ST A4,ECBBA,A8 P LKM P DATA 1 P RTN A14 P EJECT > P**********
0x43caa4…43cc38 Dummy {f00=0x0169, f01=0x0190, f02=»************************ n P* PRLINK EQU RBUFL+RBUFL+2 * P* J PRBUF EQU * T P DATA *+2 POINTER FIRST FREE f P IFF RBUFNR=1 P DATA *+RLINK P RES RBUFL P IFF RBUFNR=2 P DATA *+RLINK P RES RBUFL P I
0x43cc38…43cdcc Dummy {f00=0x0169, f01=0x0190, f02=»ATA 0 END OF CHAIN P RES RBUFL P* , P* 6 PTLINK EQU TBUFL+TBUFL+2 @ P* ` PTBUF EQU * j P DATA *+2 POINTER FIRST FREE | P IFF TBUFNR=1 P DATA *+TLINK P RES TBUFL P IFF TBUFNR=2 P DATA *+TLINK
0x43cdcc…43cf60 Dummy {f00=0x0169, f01=0x0190, f02=» P XIF P DATA 0 END OF CHAIN P RES TBUFL 0 P* B P* L P* GET WRITE BUFFER V P* p PGTWBUF EQU * z P LDKL A5,TBUF P CF A14,GETBUF P LDR A7,A4 P LDR A12,A4 P ADK A7,2 SKIP P LDKL A9,2 FOR D
0x43cf60…43d0f4 (3, 32) Dummy {f00=0x0169, f01=0x018e, f02=» PGETBUF EQU * P LDR* A4,A5 P RF(Z) GETB50 NO BUFFER FREE 0 P LDR* A3,A4 T P STR A3,A5 h P ADK A4,2 SKIP LINK z P RTN A14 PGETB50 EQU * P LKM P DATA 0 SWITCH TASK P RB GETBUF P* P* RELEASE
0x43d0f4…43d288 Dummy {f00=0x0169, f01=0x0190, f02=» P LDR* A3,A2 P RF(Z) RELB20 P LDR A2,A3 . P RB RELB10 @ PRELB20 EQU * R P STR A4,A2 f P CMR A4 x P RTN A14 P* PRLWBUF EQU * P LDKL A2,TBUF P RB RELB05 P EJECT P* P* " P* STORE
0x43d288…43d41c Dummy {f00=0x0169, f01=0x0190, f02=» PPDCCH EQU * P CWK A9,TBUFL+TBUFL =3 P RF(G) PDCCHR OVERFLOW < P SCR A2,A7 Z PPDCCH1 EQU * l P ADK A7,1 P ADKL A9,1 PPDCCHR RTN A14 P* P* P* STORE ATTENTION ID FROM A2 P* P* PPA
0x43d41c…43d5b0 Dummy {f00=0x0169, f01=0x0190, f02=»,A7 P ANK A2,/FF & P RF(NZ) GDCC:1 NOT NULL CHARACTER $ P LDK A2,/7F LOAD NULL CHARACTER J PGDCC:1 EQU * r P RB PDCCH1 P EJECT P* P* . P* GET BUFFER ADDRESS TO A1 FROM DC BUFFER P* P* PGETADR C
0x43d5b0…43d744 Dummy {f00=0x0169, f01=0x0190, f02=»/3F P ORR A1,A2 P RTN A14 P EJECT . P* < P* F " P* WRITE MESSAGE TO MAIN FRAME P P* v & P* ON EXIT A1 CONTAINS RETURN CODE P* P* PDCWRTE EQU * P LDKL A8,ECBDC P IFT DCLIN=2 P LD A7,MAIN,
0x43d744…43d8d8 Dummy {f00=0x0169, f01=0x0190, f02=»F A14,REQTIM P ST A9,ECBRL,A8 REQ LENGTH $ P ST A12,ECBBA,A8 BUFFER ADDRESS 6 P LD A7,KBINH,TCABAS ^ 8 P ORK A7,2 BIT 14 :=1 DISABLE KEYBOARD.RESET ALLOWED z P ST A7,KBINH,TCABAS P LDK A7,/86 PDC100 EQU * P LKM P D
0x43d8d8…43da6c Dummy {f00=0x0169, f01=0x0190, f02=» LD A7,KBINH,TCABAS ( P ANK A7,/D BIT 14:=0 ALLIWE KEYBOARD P ST A7,KBINH,TCABAS H . P CF A14,LINHOF TURN OFF "KEYBOARD INHIBIT d . P CF A14,LSAVOF TURN OFF "SYSTEM AVAILABLE" P* * P LDK A7,/04 RESET KEYBOARD ECB BUFFER P LDKL A8
0x43da6c…43dc00 Dummy {f00=0x0169, f01=0x0190, f02=»STEM AVAILABLE' v P RTN A14 P EJECT ( P* 6 P* @ ( P* STORE CURSOR ADDRESS IN DC BUFFER J P* v P* PCURSA LD A1,PCURS,TCABAS P RF BUFADR P* P* ( P* STORE BUFFER ADDRESS IN DC BUFFER P* P*
0x43dc00…43dd94 (3, 33) Dummy {f00=0x0169, f01=0x0190, f02=»RT TO ASCII z P CF A14,PDCCH P LDR A2,A1 * P ANK A2,/3F < P LC A2,TASCII,A2 P P CF A14,PDCCH h P RTN A14 ~ P EJECT P* P* 2 P* GET MODIFIED DATA FROM DISPLAY IMAGE BUFFER P* P* A3=BUFFER POSITION BIN
0x43dd94…43df28 Dummy {f00=0x0169, f01=0x0190, f02=»UFFER POINTER @ P************************************************************ & P ADKL A4,1919 LAST SCREEN POSITION Z P LCR A2,A4 GET CHARACTER . P LDKL A4,BVDU RELOAD FIRST BUFFER POSITION P ADR A4,TCABAS P P LDR A1,A2 P A
0x43df28…43e0bc Dummy {f00=0x0169, f01=0x0190, f02=»RD100 CWK A3,LBVDU P RF(NL) RDMODE ALL EXAMINED P LCR A2,A4 GET CHAR > P ADK A3,1 Z P ADK A4,1 l @ P************************************************************ ~ PRD105 EQU * @ P**************************************************
0x43e0bc…43e250 Dummy {f00=0x0169, f01=0x0190, f02=» STORE NULL ~ * P CF A14,PDCCH STORE CHAR IN DC BUFFER ! P RB RD100 ! B PRD200 ANK A2,1 CHECK MDT BIT ! T P RF(NZ) RD300 MODIFIED FIELD ! x PRD210 CWK A3,LBVDU ! P RF(NL) RDMODE ALL EXAMINED ! P LCR A2,A4 ! P ADK A3,1 ! P ADK A4,1
0x43e250…43e3e4 Dummy {f00=0x0169, f01=0x018e, f02=»****** 78-05-11 ! ^ * P CWK A3,LBVDU ALL BUFFER EXAMINED ??? " P RF(NL) RDMODE YES!! " F F P******************************************************** 78-05-11 " b P RB RD200 ATTRIBUTE FOUND " PRD300 LDK A2,SBA " " P CF A14,PDCCH SBA TO DC BUFFER "
0x43e3e4…43e578 Dummy {f00=0x0169, f01=0x0190, f02=» P* # 4 P* UPDATE VIDEO DISPLAY BUFFER IMAGE BY THE DATA # P* # F P* RECEIVED FROM THE DC LINE # P P* # t P* # ~ " P* A7=DC RECEIVE BUFFER POINTER # P* A8=DC ECB ADDRESS # ( P* A9=DC BUFFER INDEX, INITIALLY ZERO # P* # P* A3=DIS
0x43e578…43e70c Dummy {f00=0x0169, f01=0x0190, f02=»,ECBDCC,TCABAS # & P LD A7,ECBBA,A8 DC BUFFER ADDRESS $ $ P SUR A9,A9 RESET DC BUFFER INDEX $ @ 0 P CF A14,GDCCH GET FIRST CHAR FROM DC BUFFER $ h P CWK A2,ESC SHOULD BE ESCAPE $ P RF(NE) UPDEND NOT ESCAPE $ " P CF A14,GDCCH GET COMMAND CODE $ P
0x43e70c…43e8a0 Dummy {f00=0x0169, f01=0x0190, f02=»ERASE ALL UNPROTECTED $ P IFT COPCMD=1 % P CWK A2,/37 % 4 P ABL(E) UPD600 COPY COMMAND % H P XIF % l $ P RF UPDEND INVALID COMMAND CODE % x P EJECT % P* % P* WRITE COMMAND % P* % PUPD100 EQU * % ( P CF A14,PWCC PROCESS WCC F
0x43e8a0…43ea34 (3, 34) Dummy {f00=0x0169, f01=0x0190, f02=»DK A5,1 INDICATE WCC, IC OR RA % P RF UPD220 & & P* & 8 P* ERASE/WRITE COMMAND & B P* & ` PUPD120 EQU * & j P CF A14,ERASE ERASE SCREEN & ~ P RF UPD200 & P* & P* ERASE ALL UNPROTECTED & P* & PUPD140 EQU * & ( P CF A14,ERASUP
0x43ea34…43ebc8 Dummy {f00=0x0169, f01=0x018e, f02=» & " PUPD200 CF A14,PWCC PROCESS WCC ' $ P LDK A5,1 INDICATE WCC, IC OR RA ' . P EJECT ' V P* ' d P* ' n " P* PROCESS DATA FROM DC BUFFER ' x P* ' P* ' , PUPD210 LDK A3,0 START FROM POSITION ZERO ' P LDKL A4,BVDU ' P ADR A4,TCABAS '
0x43ebc8…43ed5c Dummy {f00=0x0169, f01=0x0190, f02=» P CWK A2,/20 ( P RF(L) UPD300 ORDER ( PUPD230 EQU * ( 4 P ORK A2,/80 SET DISPLAY BIT ( H PUPD240 EQU * ( l ( P LDK A5,0 INDICATE NOT WCC, IC OR RA ( P CWK A3,LBVDU ( & P RF(E) UPD260 END OF VIDEO BUFFER ( PUPD250 EQU * ( $ P SCR A2,
0x43ed5c…43eef0 Dummy {f00=0x0169, f01=0x0190, f02=» A4,TCABAS ( P RB UPD250 ) PUPD300 EQU * ) $ : P******************************************* 78-08-15 ) 8 , P CWK A3,LBVDU END OF DISPLAY BUFFER ??? ) v P RF(NE) UPD302 NO!!! ) $ P SUR A3,A3 FIRST SCREEN POSITION ) P LDKL A4,BVDU ) " P ADR A4,
0x43eef0…43f084 Dummy {f00=0x0169, f01=0x0190, f02=»E) UPD320 START FIELD ) P CWK A2,/11 * $ P RF(E) UPD340 SET BUFFER ADDRESS * 2 P CWK A2,/13 * Z P RF(E) UPD360 INSERT CURSOR * n P CWK A2,/09 * P RF(E) UPD400 PROGRAM TAB * P CWK A2,/14 * $ P RF(E) UPD500 REPEAT TO ADDRESS * P CWK
0x43f084…43f218 Dummy {f00=0x0169, f01=0x0190, f02=» P RB UPD230 + PUPD305 CWK A2,/19 + P RF(NE) UPD310 + 0 P LDK A2,ENDMES END MESSAGE + F P RB UPD230 + h PUPD310 EQU * + z P CWK A2,/0A + P RF(NE) UPD315 + P LDK A2,NEWLIN NEW LINE + P RB UPD230 + PUPD315 EQU * + P CWK A2,/1
0x43f218…43f3ac Dummy {f00=0x0169, f01=0x0190, f02=»0 NULL CHARACTER ??? + & P RF(NE) UPDEND NO!! ILLEGAL ORDER , " P LDK A2,/7F PTS NULL CHARACTER , F P RB UPD230 , l P , ~ @ P************************************************************ , P* , P* RELEASE RECEIVE BUFFER , P* , * P********
0x43f3ac…43f540 Dummy {f00=0x0169, f01=0x0190, f02=» P RTN A14 - P EJECT - P* - " P* - , P* START FIELD ORDER - 6 P* - R * PUPD320 CF A14,GDCCH GET ATTRIBUTE CHAR - P LC A2,TEBCDI,A2 - * P LDR A1,A2 COMPOSE PTS ATTRIBUTE CHAR - P ANK A1,1 - P SRL A2,1 - P ANK A2,/1E - P
0x43f540…43f6d4 (3, 35) Dummy {f00=0x016a, f01=0x0190, f02=»U - " P RB(NL) UPDEND INVALID ADDRESS . P LDR A3,A1 . 0 P LDR A4,A3 . B P ADKL A4,BVDU . T P ADR A4,TCABAS . j P RB UPD220 . P* . P* INSERT CURSOR . P* . 0 PUPD360 ST A3,PCURS,TCABAS SET NEW CURSOR POS . $ P LDK A5,1 INDICATE WCC
0x43f6d4…43f868 Dummy {f00=0x016a, f01=0x018e, f02=»TER WCC, IC OR RA . | 0 P LDK A1,NULL+/80 FILL CURRENT FIELD BY NULLS / PUPD410 EQU * / N P LDK A5,0 / b P CWK A3,LBVDU / t P RB(NL) UPD210 END OF BUFFER / P LCR A2,A4 / P ADK A3,1 / P ANK A2,/7F / P CWK A2,/20 / P RF(L) UPD415
0x43f868…43f9fc Dummy {f00=0x016a, f01=0x0190, f02=» $ P RB(Z) UPD220 UNPROTECTED FIELD 0 PUPD430 EQU * 0 , P LDK A5,0 0 @ P CWK A3,LBVDU 0 R * P ABL(NL) UPD210 END OF DISPLAY BUFFER 0 h P LCR A2,A4 0 P ADK A3,1 0 P ADK A4,1 0 P ANK A2,/7F 0 P CWK A2,/20 0 P RB(L) UPD420 0
0x43f9fc…43fb90 Dummy {f00=0x016a, f01=0x0190, f02=»VDU 0 " P RB(NL) UPDEND INVALID ADDRESS 1 * P CF A14,GDCCH GET CHAR TO BE REPEATED 1 2 $ P LDK A5,1 INDICATE WCC, IC OR RA 1 ` " P ORK A2,/80 INDICATE MODIFIED 1 P 1 B P**************************************************** 78-07-02 1 P 1 2 P CWR
0x43fb90…43fd24 Dummy {f00=0x016a, f01=0x0190, f02=»*** 78-07-02 1 ^ P 2 PUPD510 CWK A3,LBVDU 2 $ P RF(L) UPD520 NOT END OF SCREEN 2 : P LDK A3,0 2 b P LDKL A4,BVDU WRAP AROUND 2 t P ADR A4,TCABAS 2 PUPD520 CWR A3,A1 2 $ P ABL(E) UPD220 ALL CHAR REPEATED 2 P 2 F P********************
0x43fd24…43feb8 Dummy {f00=0x016a, f01=0x018e, f02=»2 2 R P 3 P SCR A2,A4 3 P ADK A3,1 3 $ P ADK A4,1 3 6 P RB UPD510 NEXT POSITION 3 H P* 3 h " P* ERASE UNPROTECTED TO ADDRESS 3 r P* 3 ( PUPD540 CF A14,GETADR GET END ADDRESS 3 P CWK A3,LBVDU 3 " P RB(NL) UPDEND INVALID ADDRESS 3 0
0x43feb8…44004c Dummy {f00=0x016a, f01=0x0190, f02=» 3 P* 4 PUPD600 EQU * 4 P LD A1,PRINTER,TCABAS 4 & 4 P ABL(Z) UPDEND COPYCOMMAND NOT SUPPORTED FOR VDU 4 D P ADK A7,1 4 | P BYPASS CCC 4 " P CF A14,GDCCH GET FROM DEVICE 4 P IFT EBCDIC=1 4 & P LC A2,TEBCDI,A2 CONVERT TO EBCDIC 4
0x44004c…4401e0 Dummy {f00=0x016a, f01=0x0190, f02=»TCABAS 4 ~ P RF(NZ) UPD602 5 P LDK A4,MF2KBV-1 MF # 2 READ 5 $ P XIF 5 H P IFT COPCMD=1 5 T PUPD602 EQU * 5 j P ADR A4,A3 CONFIG TABLE -1 5 ~ & P LD A5,NBRKBV,A3 NUMBER OF KB/VDUS 5 ( P ADR A4,A5 LAST KB/VDU CONFIGURATED 5 PUPD604 EQU * 5 $
0x4401e0…440374 (3, 36) Dummy {f00=0x016a, f01=0x0190, f02=»BL UPDEND NO MATCH 5 P* 6 PUPD610 EQU * 6 $ P LDKL A8,ECBICW 6 8 P ADR A8,CREBAS 6 P P LKM 6 f 0 P DATA 10 ABORT LAST REQUEST IF NOT COMPLETED 6 r & P ADKL A5,/4B40 TASKID FROM DEVICE 6 $ P LD A2,-4,CREBAS GET OWN TASKID 6 & P ST A2,ICWORK,TC
0x440374…440508 Dummy {f00=0x016a, f01=0x0190, f02=»AS BUFFER ADDRESS 6 " P CF A14,ICWRTE WRITE INTERTASK 7 P ABL UPDEND 7 @ P XIF 7 T P EJECT 7 ` P* 7 n P* 7 x & P* PROCESS WRITE CONTROL CHARACTER 7 P* 7 * P* ONLY RESET MDT BIT IS TAKEN CARE OF 7 P* 7 P* 7 PPWCC CF A14,GDCC
0x440508…44069c Dummy {f00=0x016a, f01=0x0190, f02=»NTER,TCABAS 7 P RF(NZ) PWCC1 8 P LDR A10,A7 8 * P LDKL A8,ECBVDU 8 > P ADR A8,CREBAS 8 V P LD A2,ECBBA,A8 8 l P LDK A7,/2B 8 P SC A7,1,A2 =1 8 P LDK A7,/07 BELL =1 8 P SC A7,2,A2 =1 8 P SC A7,3,A2 =1 8 P LDK A7,4 8
0x44069c…440830 Dummy {f00=0x016a, f01=0x018e, f02=»* 8 P LD A2,WCC,TCABAS 9 P ANK A2,1 9 $ P RF(NZ) RESMDT RESET ALL MDT 9 6 PPWCC10 RTN A14 NO ACTION 9 Z P* 9 z P* 9 P* RESET ALL MDT BITS 9 P* 9 P* 9 PRESMDT LDK A3,0 9 P LDKL A4,BVDU 9 P ADR A4,TCABAS 9 PRESM10
0x440830…4409c4 Dummy {f00=0x016a, f01=0x0190, f02=» P LCR A2,A4 : P ANK A2,/FE RESET MDT : P SCR A2,A4 : 4 PRESM20 ADK A3,1 : F P ADK A4,1 : ^ P RB RESM10 : p P EJECT : P* : P* : P* ERASE ENTIRE SCREEN : P* : P* : PERASE LDK A3,0 : P LDKL A4,BVDU : P ADR A
0x4409c4…440b58 Dummy {f00=0x016a, f01=0x0190, f02=»DK A4,1 : P RB ERAS20 ; , PERAS25 CM PCURS,TCABAS RESET CURSOR POS ; " P LDKL A1,LBVDU+1 ; R 0 P ST A1,CURATT,TCABAS INDICATE UNFORM. SCREEN ; j P CM ATTRIB,TCABAS ; , P LD A1,PRINTER,TCABAS CHECK DEVISE TYPE ; ( P RF(NZ) ERAEND PRINTER, NOT DISP
0x440b58…440cec Dummy {f00=0x016a, f01=0x0190, f02=» A7,'1' ERASE CONTROL CHAR ; P LD A1,ECBBA,A8 =1 < " P SC A7,1,A1 =1 < > P LDK A7,2 < V " P ST A7,ECBRL,A8 REQ LENGTH = 2 < h P LDK A7,/86 WRITE < P LKM < P DATA 1 < P LD A8,-2,A14 < " P LDR* A7,A14 RESTORE A7 AND A8 < PERAEND R
0x440cec…440e80 Dummy {f00=0x016a, f01=0x0190, f02=»CABAS SET KEYBOARD RESTORE BIT < 2 P SUR A1,A1 INDICATE ATT IN LAST SCREEN POS DK = & P LDK A3,0 = P LDKL A4,BVDU = n P ADR A4,TCABAS = 0 P CM PCURS,TCABAS FIND FIRST UNPROTECTED POS = H P**********************************************************
0x440e80…441014 (3, 37) Dummy {f00=0x016a, f01=0x018e, f02=»S!! WE GOT IT!! = 0 P LDK A1,1 ATTRIBUTE NOT IN LAST SCREEN POS. > < P******************************************************** > L PERASU1 CWK A3,LBVDU > P RF(NL) ERASU2 > P LCR A2,A4 GET CHAR > P ANK A2,/7F > P ADK A3,1 > P ADK A4,
0x441014…4411a8 Dummy {f00=0x016a, f01=0x0190, f02=» * P ST A3,PCURS,TCABAS SET NEW CURSOR POS ? P LDR A1,A1 ? 2 0 P RF(Z) ERASU3 ATTRIBUTE IN LAST SCREEN POS. ? D PERASU2 LDK A3,0 ? x P LDKL A4,BVDU ? P ADR A4,TCABAS ? P RF ERASU4 ? PERASU3 EQU * ? P LDR A3,A3 ? 6 P RF(Z) ERASU4 UNPROT
0x4411a8…44133c Dummy {f00=0x016a, f01=0x0190, f02=»0 ? P LDK A6,NULL+/80 ERASE CHAR @ P RF ERAS35 @ . P EJECT @ @ P* @ N P* @ X . P* ERASE UNPROTECTED TO ADDRESS GIVEN IN A1 @ b P* @ P* @ * PERASUA LDK A6,NULL+/80 ERASE CHARACTER @ $ P ******************* 78-09-11 @ " P CWK A3,LB
0x44133c…4414d0 Dummy {f00=0x016a, f01=0x0190, f02=» ADDRESS @ r P A 8 PERAS:1 LDR A3,A3 START IN FIRST SCREEN POSITION ??? A P RF(NZ) ERAS35 NO!! A V ( P LC A2,1919,A4 LAST BUFFER CHARACTER A r P ANK A2,/7F A ( P CWK A2,/20 ATTRIBUTE CHARACTER ??? A P RF(NL) ERAS35 NO!!! A P ANK A2,/10 A
0x4414d0…441664 Dummy {f00=0x016a, f01=0x0190, f02=» $ P ******************** 78-09-11 B PERAS30 CWK A3,LBVDU B , $ P RF(L) ERAS33 NOT END OF SCREEN B H P LDK A3,0 B p P LDKL A4,BVDU WRAP AROUND B P ADR A4,TCABAS B PERAS33 EQU * B P CWR A3,A1 B ( P RB(E) ERAEND ALL UNPROTECTED ERASED B
0x441664…4417f8 Dummy {f00=0x016a, f01=0x018e, f02=»2,NULL B P RF(Z) ERAS40 ALREADY NULL C " P SCR A6,A4 STORE MODIFIED NULL C 0 PERAS40 ADK A3,1 C V P ADK A4,1 C n P RB ERAS30 C PERAS50 ADK A3,1 C P ADK A4,1 C P ANK A2,/10 C " P RF(NZ) ERAS60 PROTECTED FIELD C P LC A2,-1,A4 C
0x4417f8…44198c Dummy {f00=0x016a, f01=0x0190, f02=» C P LDKL A4,BVDU WRAP AROUND D P ADR A4,TCABAS D * PERAS65 CWR A3,A1 D @ ( P RB(E) ERAEND ALL UNPROTECTED ERASED D X PERAS70 EQU * D P LCR A2,A4 D P ANK A2,/7F D P CWK A2,/20 D " P RB(L) ERAS50 ATTRIBUTE FOUND D P ADK A3,1 D
0x44198c…441b20 Dummy {f00=0x016a, f01=0x0190, f02=» D P* E * PTRPA CF A14,GTWBUF GET TRANSMIT BUFFER E PTRPA10 CF A14,PAID STORE AID E @ PTRANS EQU * E d P CF A14,DCWRTE WRITE MESSAGE E x PTR050 EQU * E " P RTN A14 TRANSMISSION TROUBLE E PTRRTN RTN A14 E P EJECT E P* E P* E
0x441b20…441cb4 (3, 38) Dummy {f00=0x016a, f01=0x0190, f02=»PF10 CF A14,PAID STORE AID E & P CF A14,CURSA STORE CURSOR ADDRESS F " P CF A14,RDMOD READ MODIFIED F L " P RB TRANS SEND MODIFIED FIELDS F p P EJECT F P* F P* F $ P* DISPLAY MODIFIED FIELDS ON VDU F P* F P* F P* A3=VDU POSITION F
0x441cb4…441e48 Dummy {f00=0x016a, f01=0x018e, f02=»PUT CHAR COUNTER F P* G P* G " PDISPL LDKL A8,ECBVDU G , P ADR A8,CREBAS G H * P LDKL A1,/101 START FROM LINE 1 POS 1 G ^ P ST A1,ECBCW,A8 G 8 P SUR A10,A10 RESET COUNT FOR INTENSIFIED DISPLAYING G P LDK A3,0 G P LDKL A4,BVDU G P
0x441e48…441fdc Dummy {f00=0x016a, f01=0x0190, f02=» G N 6 P LC A2,1919,A4 CHECK IF ATTRIBUTE IN LAST POSITION H P ANK A2,/7F H B P CWK A2,/1F ATTRIBUTE ??? H V P RF(G) DIS100 NO!!! H x P H P ANK A2,6 H P XRK A2,6 H > P ST A2,INTATT,TCABAS CHECK DISPLAY/NONDISPLAY INFORMATION H P RF(Z)
0x441fdc…442170 Dummy {f00=0x016a, f01=0x0190, f02=»*************** H PDIS100 EQU * I P CWK A9,LLINE I , " P RF(L) DIS110 NOT END OF LINE I B $ P CF A14,DISLIN DISPLAY THIS LINE I h . P CF A14,INTCHK CHECK IF LOW/HIGH INTENSITY I PDIS110 EQU * I P CWK A3,LBVDU I P RF(NL) DIS900 ALL SCANNED I
0x442170…442304 Dummy {f00=0x016a, f01=0x0190, f02=»IT I t P J > P************************************************ 78-08-15 J PDIS115 EQU * J T " P ANK A2,/7F RESET DISPLAY BIT J h P SCR A2,A4 J P ADK A3,1 J P ADK A4,1 J P ADK A7,1 J P ADKL A9,1 J P CWK A2,/20 J P RF(L) DIS20
0x442304…442498 Dummy {f00=0x016a, f01=0x0190, f02=» LDK A2,/39 J PDIS120 CWK A2,/7E K P RF(NE) DIS121 K . P LDK A2,/35 K D PDIS121 CWK A2,/7C K X P RF(NE) DIS122 K r P LDK A2,/3C K PDIS122 EQU * K 4 P SC A2,-1,A7 STORE CHAR IN DISPLAY OUTPUT BUFFER K P RB DIS100 K PDIS200 ANK A2,
0x442498…44262c Dummy {f00=0x016a, f01=0x0190, f02=» ANK A2,4 K P RF(Z) DIS205 HIGH INTENSITY L P LDK A2,/1E LOW INTENSITY L 6 P RF DIS206 L X PDIS205 EQU * L j P LDK A2,/1F HIGH L ~ PDIS206 EQU * L * P SC A2,-1,A7 STORE INTENSITY CHARACTER L " P ADKL A10,1 INCREMENT COUNTER L P ADK A7,1
0x44262c…4427c0 Dummy {f00=0x016a, f01=0x018e, f02=» EQU * L P CWK A3,LBVDU M P RF(NL) DIS900 ALL DISPLAYED M $ P LCR A2,A4 M H > P************************************************* 78-08-15 M Z P M " P CF A14,SET:M SET MODIFIED BIT M P M > P************************************************ 78-08
0x4427c0…442954 (3, 39) Dummy {f00=0x016b, f01=0x0190, f02=» M P ADKL A9,1 N P CWK A2,/20 N " P RB(L) DIS200 ATTRIBUTE FOUND N . P RB DIS210 N T P EJECT N f P* N t P* N ~ P* POSITION THE CURSOR N P* N P* N PSETCUR EQU * N PDIS900 LDK A1,2 REQ LENGTH N PDIS905 ST A1,ECBRL,A8 N
0x442954…442ae8 Dummy {f00=0x016b, f01=0x0190, f02=»DIS910 CWK A1,LLINE N P RF(L) DIS920 O P ADS A2,ECBCW,A8 O 2 P SUKL A1,LLINE O J P RB DIS910 O ` PDIS920 ADS A1,ECBCW,A8 O r $ P LDK A7,/8B SET CURSOR AND WRITE O P LKM O P DATA 1 O 0 P CM INTATT,TCABAS CLEAR INTENSITY ATTRIBUTE O P
0x442ae8…442c7c Dummy {f00=0x016b, f01=0x0190, f02=»BBA,A8 O P CF A14,RFMDUP P 0 P SC A2,3,A1 STORE CHAR IN VDU OUTPUT BUFFER P $ P LDK A1,4 P X P RB DIS905 REQ LENGTH = 3 P j P* P J P********************************************************************* P P* P 8 P* REPLACE FM & DUP WITH
0x442c7c…442e10 Dummy {f00=0x016b, f01=0x0190, f02=»******* P R P* Q PRFMDUP EQU * Q P CWK A2,DUPCH Q . P RF(NE) RFMD10 Q D P LDK A2,/2A DUP Q Z PRFMD10 EQU * Q r P CWK A2,FMCH Q P RF(NE) RFMD20 Q P LDK A2,/3B Q PRFMD20 EQU * Q P RTN A14 Q P EJECT Q P* Q P* Q (
0x442e10…442fa4 Dummy {f00=0x016b, f01=0x018e, f02=»,LLINE LINE LENGTH Q P ADR A9,A9 DOUBLE IT R P LDKL A2,' ' SPACES R 6 PSPAC10 SCR A2,A7 =1 R R P SC A2,1,A7 =1 R n P ADK A7,2 R P SUKL A9,2 R P RB(P) SPAC10 R $ P LDK A2,0 CLEAR A2=CHAR REGISTER R & P LDK A5,0 RESET MODIFIED INDICAT
0x442fa4…443138 Dummy {f00=0x016b, f01=0x0190, f02=» P* S P* S ( P* DISPLAY LINE IF ANY MODIFICATIONS S P* S D P* S N > P************************************************* 78-08-15 S X P S PDISLIN EQU * S P LDR A7,A5 S $ P ANK A5,/80 ANY MODIFICATIONS ?? S " P RF(Z) DISL10 NO MODIFIC
0x443138…4432cc Dummy {f00=0x016b, f01=0x0190, f02=»A10 ADD NR OF INTENSITY CHARACTERS S PDIS:10 EQU * T * < P*********************************************** 78-08-15 T > " P ST A1,ECBRL,A8 SET REQ LENGTH T ~ P T P T $ P LDK A7,/8B SET CURSOR AND WRITE T P LKM T P DATA 1 T P EJECT T P T
0x4432cc…443460 Dummy {f00=0x016b, f01=0x0190, f02=» T d P* OF THE LINE U P* U H P******************************************************************* U ( P U t $ P LD A1,ECBCW,A8 CURSOR POSITION U | P ANK A1,X'FF' COLUMN NUMBER U $ P* SUK A1,81 LAST POSITION ??? DK U " P SUK A1,80 LAST POSITION
0x443460…4435f4 (3, 40) Dummy {f00=0x016b, f01=0x0190, f02=»D A1,ECBBA,A8 BUFFER ADRESS U , P LDK A2,X'2B' DONT MOVE CURSOR ONE LINE V $ P SC A2,1,A1 =1 V T * P LDKL A2,X'1420' FAST OUTPUT OF SPACES V l P SC A2,3,A1 =1 V P SRL A2,8 =1 V P SC A2,2,A1 =1 V P LDK A2,84 REQUESTED LENGTH V P ST
0x4435f4…443788 Dummy {f00=0x016b, f01=0x0190, f02=»CBCW+1,A8 POS 1 ON NEXT LINE V P LDKL A2,/100 W $ * P ADS A2,ECBCW,A8 INCREMENT LINE NUMBER W : $ P RB SPACES PUT SPACES TO BUFFER W h P W P EJECT W P W P W D P**************************************************************** W P* W > P
0x443788…44391c Dummy {f00=0x016b, f01=0x018e, f02=»************************************************************** W P X F , PINTCHK SUR A10,A10 RESET INTENSITY COUNT X N 0 P LD A2,INTATT,TCABAS GET INTENSITY ATTRIBUTE X ~ P RF(Z) INTRTN NON DISPLAY X $ P ANK A2,X'4' HIGH INTENSITY ??? X P RF(Z) INT:1
0x44391c…443ab0 Dummy {f00=0x016b, f01=0x0190, f02=» X l P Y 8 PINT:20 SCR A2,A7 SAVE INTENSITY CHARACTER IN BUFFER Y & P ADK A7,1 INCREMENT BUFFER POINTER Y L * P ADKL A10,1 INTENSITY COUNT Y v PINTRTN RTN A14 RETURN Y P* Y P EJECT Y P Y D P**************************************
0x443ab0…443c44 Dummy {f00=0x016b, f01=0x4190, f02=»**************************************************** Y P Z < PSET:M CWK A2,/20 Z D & P RF(L) SET:M2 ATTRIBUTE CHARACTER Z P CWK A2,/7F Z & P RF(E) SET:M2 UNMODIFIED ATTRIBUTE Z P CWK A2,/FF Z ( P RF(NE) SET:M1 NOT NULL OR ATTRIBUTE Z ( P ORK
0x443c44…443dd8 Dummy {f00=0x016b, f01=0x2008, f02=» [ NT DUMMY END @ (
0x443dd8…443f6c Dummy {f00=0x016b, f01=0x0190, f02=» 0 1 ! 4! R 6 0! W 0! W 0! $2 _, 4 6 0!V W 0!V W 0!V 4 0 1 4 4 % L% B! ) : q I ! q* rb { { ! q 4 r b # | % r b # % r W
0x443f6c…444100 Dummy {f00=0x016b, f01=0x0190, f02=» ! q 4 4 0 ! = 6 6 4 K W&J W! t W " t _+J .W 4 # *H @ , W H @ , ( , ? 2 r !"#$ %&%%%%%'%%%%%%%%%%%%%%%$%%%%%$%%%%%%%$%%%%$$($$$$$$$$%)*% +, -./0123456789:;<%%% =>?@ABCDEFGH
0x444100…444294 (3, 41) Opaque[0x194]
0x444294…444428 # DirEnt {nam=»PRT «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x24c8, f03=0x0000}
0x444294…444428 IdxSect {
0x444294…444428 f00 = 0x0126 // 0x444294 @0x0
0x444294…444428 f01 = 0x000c // 0x444296 @0x2
0x444294…444428 gno = [ // 0x444298 @0x4
0x444294…444428 [0x00]: C0x0126.0x1.0
0x444294…444428 [0x01]: C0x0126.0x3.0
0x444294…444428 [0x02]: C0x0127.0x0.0
0x444294…444428 [0x03]: C0x012f.0x1.0
0x444294…444428 [0x04]: C0x0164.0x3.0
0x444294…444428 [0x05]: C0x0165.0x0.0
0x444294…444428 ]
0x444294…444428 }
0x444428…4445bc Dummy {f00=0x0126, f01=0x0190, f02=» 2 P IDENT PRT REL 2.1*800222NJ 870150540210 P : P =1, ODD BUFFER ADDRESS B P REL 2.1 79-05-23 d N P************************************************************************* P* F P* P R T : MODULE PRINTING MAIN FRAME MES
0x4445bc…444750 Dummy {f00=0x0126, f01=0x0190, f02=»ULE l P* J P********************************************************************** P* d 2 P* [NDRINGER IFM DECENTRAL PRINT 800222 NJ n P* LPGAE 48 = > 52 P* LPLIN ADDED P* COPY111 FUBAR P*
0x444750…4448e4 Dummy {f00=0x0126, f01=0x0190, f02=» P ENTRY ICREAD P* P* ( P* EXTERNAL PARAMETERS 2 P* P P* Z ( P EXTRN UPDATE UPDATE BUFFER CONTENTS d ( P EXTRN RFMDUP REPLACE FM & DUP CHARS P EXTRN GTRBUF P EXTRN DCGETM P EXTRN RELBUF P EXTRN DC1
0x4448e4…444a78 Dummy {f00=0x0126, f01=0x0190, f02=» START P* EJECT P* $ 6 P************************************************* . P* h ( P* CONDITIONAL ASSEMBLY PARAMETERS r P* . P***************************************** P 2 POFLIN EQU 1 OFFLINE HANDLING POSSIBLE
0x444a78…444c0c Dummy {f00=0x0126, f01=0x0190, f02=» P* P* * PTIMDC EQU 300 DC TIME OUT VALUE: 30 S PESC EQU /1B J PSBA EQU /11 ^ PNULL EQU /7F NULL CHARACTER r & PNEWLIN EQU /7E NEW LINE CHARACTER $ PENDMES EQU /7D END MESSAGE CHAR " PFORMFD EQU /7C FORMFEED CHAR.
0x444c0c…444da0 Dummy {f00=0x0126, f01=0x0190, f02=»OR ECB HANDLING P* P " PECBBA EQU 2 * PECBRL EQU 4 > PECBEL EQU 6 R PECBRC EQU 8 f PECBCW EQU 10 z P* P* P* CREDIT USED EQU P* P* P* ECB REL. ADDRESSES P* P* PDIS EQU
0x444da0…444f34 (3, 42) Dummy {f00=0x0126, f01=0x0190, f02=» IFF DCLIN=2 PECBICR EQU ECBDC-DIS P XIF 0 P IFT COPCMD=1 < PECBICW EQU ECBICR-DIS R PECBPR EQU ECBICW-DIS p P XIF P IFF COPCMD=1 PECBPR EQU ECBICR-DIS P XIF P* P* " P* BASE ADDRESS FOR TCA AND ECB
0x444f34…4450c8 Dummy {f00=0x0126, f01=0x0190, f02=»QU 0 NUMBER OF KB/VDUS & PNBRGTP EQU NBRKBV+2 NUMBER OF GTPS P* H 2 PMF1KBV EQU NBRGTP+2 DV ADDRESSES KB/VDU MF #1 R 2 PMF1GTP EQU MF1KBV+16 DV ADDRESSES GTPS MF # 1 P IFT DCLIN=2 PMF2KBV EQU MF1GTP+16 PMF2GTP EQU MF2KBV+16
0x4450c8…44525c Dummy {f00=0x0126, f01=0x0190, f02=» EQU PRINTER+2 VDU SCREEN BUFFER 0 PPCURS EQU BVDU+1920 CURSOR ADDRESS , BINARY ( * PATTRIB EQU PCURS+2 LAST ATTRIBUTE CHAR PCURATT EQU ATTRIB+2 & PWCC EQU CURATT+2 WCC/CCC CHARACTER . PKBINH EQU WCC+2 KEYBOARD INHIBIT INDICATOR $ PLINCNT
0x44525c…4453f0 Dummy {f00=0x0126, f01=0x018e, f02=» , PINTATT EQU ICWORK+2 INTENSITY ATTRIBUTE $ POFFFLG EQU INTATT+2 OFFLINE FLAG 4 ( PCOPNO EQU OFFFLG+2 HARDCOPY TASK ID * PCCC EQU COPNO+2 COPY COMMAND CHARACTER PMAIN EQU CCC+2 MAIN FRAME & PMODE EQU MAIN+2 INSERT MODE SWITCH $ PKEYS E
0x4453f0…445584 Dummy {f00=0x0126, f01=0x0190, f02=» 4 PRDMORE EQU ECBBLK+10 BRANCH ADDRESS NEXT READ KB P* < : PPRBUSY EQU -2 PRINTER BUSY. OCCUPIES BOOLEAN VARAIBLE F P* EJECT P P* P* * PLBVDU EQU 1920 1920 CHARACTER DISPLAY " PLPAGE EQU 52 LINES ON ONE PAGE :
0x445584…445718 Dummy {f00=0x0126, f01=0x018e, f02=» FOR LP x P* P P " P EJECT * PPRINT EQU * 8 P CF A14,I:EVA0 L & P LDR TCABAS,A9 LOAD ASSEM TCA BASE b P LDR* A4,TCABAS REL TASK NO " P AD A4,6,CREBAS 'CB1' ADDRESS P 6 P******************************************
0x445718…4458ac Dummy {f00=0x0126, f01=0x0190, f02=» P P LC A1,MF1GTP-1,A4 P ANK A1,/FF * P LDKL A8,ECBDC > P CF A14,EMULA T P IFT DCLIN=2 j 6 P************************************************* ~ P* , P* TRANSFER PARAMETER FOR MAIN-FRAME #2 P* 6 P************
0x4458ac…445a40 Dummy {f00=0x0126, f01=0x0190, f02=»A TRANSFER PARAMETER P XIF P* EJECT ( P* > P* RELATIVE POS IN ECBBLK H PICR EQU 2 h PDC1 EQU 4 z PDC2 EQU 6 P* P IFF DCLIN=2 P LDK A1,2 P XIF P IFT DCLIN=2 P LDK A1,3 P XIF
0x445a40…445bd4 (3, 43) Dummy {f00=0x0127, f01=0x0190, f02=» 0 P CF A14,DC1INQ TEST IF ANY MESSAGE, NO WAIT PPRI110 EQU * 8 P IFT DCLIN=2 L P LD A1,ECBBLK+DC2,TCABAS ` P RF(NZ) PRI120 PENDING 6 P CF A14,DC2INQ TEST IF ANY MESSAGE MF # 2, NO WAIT P XIF PPRI120 EQU * P LD A1,ECBBLK+IC
0x445bd4…445d68 Dummy {f00=0x0127, f01=0x018e, f02=» * P CF A14,ICREAD READ INTERTASK NO WAIT P ST A8,ECBBLK+ICR,TCABAS 2 PPRI150 EQU * R P LDKL A7,ECBBLK f P ADR A7,TCABAS ~ P LKM P DATA 7 MULTIPLE WAIT P CW A8,ECBBLK+ICR,TCABAS & P RF(E) ICRINP INPUT FROM INTERTASK : P
0x445d68…445efc Dummy {f00=0x0127, f01=0x0190, f02=» P* P* READ INTERTASK, NOWAIT P* . P* A3 = BUFFER ADDRESS 8 P* A6 = REQ LENGTH V P* p PICREAD EQU * z P LDKL A8,ECBICR P ADR A8,CREBAS P LDKL A1,-1 P CF A14,REQTIM P ST A6,ECBRL,A8 REQ LENGTH P
0x445efc…446090 Dummy {f00=0x0127, f01=0x0190, f02=»**************************************************************** P* H P* INPUT FROM DC R P* j 8 P**************************************************** t P* PDCINP EQU * ( P CF A14,ICABOR ABORT INTERTASK READ P LDR A7,A7
0x446090…446224 Dummy {f00=0x0127, f01=0x018e, f02=»ILL BE DESTROYED IN 'UPDATE' PDCIN10 EQU * $ & P CF A14,GTRBUF GET RECEIVE BUFFER 8 P LD A8,ECBDCC,TCABAS b P CF A14,DCGETM READ MESSAGE ~ P IFF DCLIN=2 P CM ECBBLK+DC1,TCABAS P XIF P IFT DCLIN=2 P CW A8,ECBBLK+DC2,TC
0x446224…4463b8 Dummy {f00=0x0127, f01=0x018e, f02=» P XIF PDCIN30 EQU * $ P LD A1,ECBEL,A8 EFFECTIVE LENGTH $ . P ST A1,DCLENG,TCABAS SAVE IT IN SAVE AREA L P ~ 2 P CF A14,UPDATE MOVE FROM DC TO PRINTER BUFFER; P IFT COPCMD=1 P LD A1,ICWORK,TCABAS P RF(NZ) DCIN90 COPY COMMAN
0x4463b8…44654c Dummy {f00=0x0127, f01=0x0190, f02=» r PDCIN90 EQU * P CF A14,SNBUSY P RTN A14 2 P* EJECT B P* X P* ABORT INTERTASK READ b P* PICABOR EQU * P LDK A7,0 P CM ECBBLK+ICR,TCABAS P LDKL A8,ECBICR P ADR A8,CREBAS P LKM P
0x44654c…4466e0 Dummy {f00=0x0127, f01=0x0190, f02=»CR,TCABAS P * P LDK A1,X'38' PRINT BIT, 80 CHAR./LINE 4 P ST A1,CCC,TCABAS SAVE AS COPY CONTROL CHARACTER H * P CF A14,COPY PRINT ON HARDCOPY DEVICE P LD A1,ICWORK,TCABAS ( P RB(NZ) DCIN10 TAKE CARE OF DC INPUT P RB PRI100 P
0x4466e0…446874 (3, 44) Dummy {f00=0x012f, f01=0x0190, f02=»LINE LENGTHS /40, 64 AND 80 CHARS x P* * P* 4 PCOPY LDKL A8,ECBPR > P ADR A8,CREBAS PRINTER ECB X P LD A7,ECBBA,A8 z P SUR A3,A3 =1 P SC A3,0,A7 =1 P SC A3,1,A7 =1 " P ADK A7,2 PRINt BUFFER ADDRESS " P SUR A9,A9
0x446874…446a08 Dummy {f00=0x012f, f01=0x0190, f02=») COP100 START PRINTER BIT SET PCOPRTN RTN A14 & PCOP100 EQU * < P LD A2,CCC,TCABAS P P ANK A2,/30 j , P ABL(Z) COP111 NL DETERMINES LINE LENGTH ~ P SRL A2,4 P LDK A6,0 $ P LC A6,LINLEN,A2 GET LINE LENGTH PCOP110 CWR A9,
0x446a08…446b9c Dummy {f00=0x012f, f01=0x0190, f02=»OP300 PRINT LAST LINE P LCR A2,A4 " P ANK A2,/7F RESET DISPLAY BIT 0 P SCR A2,A4 V P CWK A2,/20 h P RF(NL) COP130 | PCOP123 EQU * P ANK A2,6 P XRK A2,6 P RF(Z) COP150 , PCOP125 LDK A2,/20 REPLACE ATTR BY SPACE
0x446b9c…446d30 Dummy {f00=0x012f, f01=0x0190, f02=» RF(NE) COP141 P LDK A2,/39 PCOP141 CWK A2,/7E * P RF(NE) COP142 D P LDK A2,/35 Z PCOP142 EQU * n P CF A14,RFMDUP FM OR DUP ? . PCOP143 CWK A2,/61 LOWER CASE CHARACTER ?? P RF(L) COP144 NO!! P SUK A2,/20 PCOP1
0x446d30…446ec4 Dummy {f00=0x012f, f01=0x0190, f02=»STEAD OF TEXT v P SCR A2,A7 P ADK A3,1 ( P ADK A4,1 : P ADK A7,1 L P ADKL A9,1 ^ P CWR A9,A6 p P RF(L) COP160 ( P CF A14,PRLINE LINE FULL : PRINT IT PCOP160 LCR A2,A4 P ANK A2,/7F P CWK A2,/20 P RB(
0x446ec4…447058 Dummy {f00=0x012f, f01=0x0190, f02=» P* P* 6 P* THE FIRST INSTR. ORIGINALLY HAD LABEL 'COP200'. P* R P* PCOP111 EQU * f P LC A2,COPNO,TCABAS LP/GP ? z P CW A2,/47 P RF(E) COP202 P CWK A9,LPLIN P RF COP203 PCOP202 EQU * P CWK A
0x447058…4471ec Dummy {f00=0x012f, f01=0x0190, f02=»P220 CWK A3,LBVDU " P RF(NL) COP300 PRINT LAST LINE P LCR A2,A4 @ P ANK A2,/7F R P SCR A2,A4 RESET DISPLAY BIT f P CWK A2,/20 P RF(NL) COP230 ( PCOP223 ANK A2,/6 ATTRIBUTE CHARACTER P XRK A2,6 " P RF(Z) COP250 PROTECTE
0x4471ec…447380 Dummy {f00=0x012f, f01=0x018e, f02=»PLACED BY SPACE x PCOP240 EQU * P CWK A2,/7B , P RF(NE) COP241 @ P LDK A2,/2A V PCOP241 SCR A2,A7 j P ADK A3,1 P ADK A4,1 P ADK A7,1 P CWK A2,NEWLIN & P RB(E) COP210 NL CHAR: PRINT LINE P CWK A2,ENDMES
0x447380…447514 (3, 45) Dummy {f00=0x0164, f01=0x0190, f02=» f P SCR A2,A7 P ADK A3,1 P ADK A4,1 , P ADK A7,1 > P ADKL A9,1 P P CWR A9,A6 b P RF(L) COP260 t ( P CF A14,PRLINE LINE FULL : PRINT IT PCOP260 LCR A2,A4 P ANK A2,/7F P CWK A2,/20 " P RB(L) COP223 ATTR
0x447514…4476a8 Dummy {f00=0x0164, f01=0x0190, f02=» PRINT LAST LINE P ABL COPRTN P* EJECT , P* B P* L P* PRINT ONE LINE ON PRINTER V P* z ( P* A9=NUMBER OF CHAR IN PRINT BUFFER P* P* 4 PPRLINE IM LINCNT,TCABAS COUNT NBR OF PRINTLINES " P RF(N) PRL10
0x4476a8…44783c Dummy {f00=0x0164, f01=0x0190, f02=»A7,ECBBA,A8 6 P********************* LP 400 SUPPORT ********* DK 4 P LC A2,COPNO,TCABAS 1. CHAR FROM RUNNING TASK DK N P CW A2,/47 GTP ? DK & P RF(E) PRL105 YES, NORMAL PRINT DK ( P LC A2,2,A7 GET FORMCONTROL CHAR DK $ P ANK A2,/7F REMO
0x44783c…4479d0 Dummy {f00=0x0164, f01=0x0190, f02=»O FORMFEED DK | P LDK A7,2 DK ! & P ST A7,ECBRL,A8 REQ LENGTH = 2 DK ! , P LDK A7,/86 STD WRITE ! V P LKM ! t P DATA 1 DK ! P LD A7,ECBBA,A8 DK DK ! P LDK A2,/2B NO-SPACE DK ! P SC A2,1,A7 DK ! P LDK A7,LPAGE DK ! P NGR
0x4479d0…447b64 Dummy {f00=0x0164, f01=0x018e, f02=»P400 SUPPORT DK ! v ( P LC A2,2,A7 GET FIRST CHAR IN BUFFER " P ANK A2,/7F " D PPRL106 EQU * DK " X P CWK A2,FORMFD " p P RF(NE) PRL200 NOT FORM FEED " P LDK A2,/20 " $ P SC A2,2,A7 REPLACE LF BY SPACE " P " PPRL110 EQU * " " P LD A1
0x447b64…447cf8 Dummy {f00=0x0164, f01=0x0190, f02=» " r P LKM # P DATA 1 # P ADK A1,1 COUNT LINES # $ P RB(N) PRL120 # B P LDK A7,LPAGE # X P NGR A7,A7 # n , P ST A7,LINCNT,TCABAS RESET LINE COUNTER # 0 PPRL200 ADKL A9,2 ADJUST LENGTH FOR BUFFER CW # P ST A9,ECBRL,A8 REQ LENGTH # PPR
0x447cf8…447e8c Dummy {f00=0x0164, f01=0x4190, f02=» # P SCR A9,A7 =1 $ P SC A9,1,A7 =1 $ $ P ADK A7,2 RESTORE BUFFER ADDRESS $ 6 P RTN A14 $ ^ P* EJECT $ n P* $ P* $ P* SET STATUS NOT BUSY FOR DC $ P* $ P* $ PSNBUSY EQU * $ P LD A8,ECBDCC,TCABAS $ P CM ECBC
0x447e8c…448020 Dummy {f00=0x0164, f01=0x2008, f02=» % IDENT PRT END "@ 6
0x448020…4481b4 (3, 46) Dummy {f00=0x0165, f01=0x0190, f02=»
0x4481b4…448348 Dummy {f00=0x0165, f01=0x0190, f02=»nNGALA " $ & F & $ , ( 0 4 ( 0 0 - 0 _ 0 ! 0 ! 0 0 4%lX %* G@K@ $ $ $ 8 V G 9h ' . W
0x448348…4484dc Dummy {f00=0x0165, f01=0x0190, f02=» 39#$;< '()*+,-! 2 d P _B B 'W ( b Wj & W ^ ( 1W C C C ( b ' Pb I "%@P "% P& B C C 4 "5 # B P B P B 5 P C
0x4484dc…448670 Dummy {f00=0x0165, f01=0x0190, f02=» ( b ' P I : % Y C & R V C : B T T T V : 2 ' W 2 6 2 @ " T # ' ?D W"' #? ;D:B " : _ C : : &
0x448670…448804 Dummy {f00=0x0165, f01=0x0190, f02=» W V Q 0W Q W Q W R 4 ! P T 0P(W$ 8 C S W C C 0 P C ;a 6 4 ZH T : 49d_Z B@5 @ 8 @N ' @ d P ( z= #0 T B 'W B B "
0x448804…448998 Dummy {f00=0x0165, f01=0x0190, f02=» & 1 P 1_ , @ - R T U :B@ ' d x 4 ~ z $ $ 2 2 l . 2 2 h B W V 7 P ^ P W V X _ 9c D | Q W :aW _B
0x448998…448b2c Dummy {f00=0x0165, f01=0x0190, f02=» V P V ^ W V _ 8^n D 2 ! 9B V T W V P D $ V 6 V % V E @ ' T 2 % 7_ 2 # L 2" &] Y $! 6P Q $ T 9B ^ _ _ 6 @ " T 7 $ V P ^ W _ H .
0x448b2c…448cc0 Dummy {f00=0x0165, f01=0x0190, f02=» " T> ; [ # :H 2 T Z L L D V, W # L E V $ W D V L , Wn 6 2 W " P " # ;b WF " ;d# _ [ v [ Z Z : :B , (Vj ; [ [
0x448cc0…448e54 (3, 47) Opaque[0x194]
0x448e54…448fe8 # DirEnt {nam=»TB3270«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x26d8, f03=0x0000}
0x448e54…448fe8 IdxSect {
0x448e54…448fe8 f00 = 0x0136 // 0x448e54 @0x0
0x448e54…448fe8 f01 = 0x0004 // 0x448e56 @0x2
0x448e54…448fe8 gno = [ // 0x448e58 @0x4
0x448e54…448fe8 [0x00]: C0x0136.0x3.0
0x448e54…448fe8 [0x01]: C0x013a.0x2.0
0x448e54…448fe8 ]
0x448e54…448fe8 }
0x448fe8…44917c Dummy {f00=0x0136, f01=0x0190, f02=» 2 P IDENT TB3270 2.1DK 1 79-05-23 870150540210 4 P***** SPECIAL SCANDINAVIAN ALPHABET ****** : F P****************************************************************** r P* : P* CONVERSION TABLES FOR IBM 3270 EMULATION PACKKAGE P*
0x44917c…449310 Dummy {f00=0x0136, f01=0x018e, f02=»RY TASCII P ENTRY TEBCDI P ENTRY KEYCNV ( P* > P H P* CONDITIONAL ASSEMBLIES P P* r PKB6272 EQU 0 | P* P EJECT P* P* 4 P* TABLE FOR CONVERSION OF EBCDIC 6 BIT INTERNAL P* P* CODE TO
0x449310…4494a4 Dummy {f00=0x0136, f01=0x0190, f02=» * P DATA /4849,/232E,/3C28,/2B21 /08-/0F * P DATA /264A,/4B4C,/4D4E,/4F50 /10-/17 2 * P DATA /5152,/245D,/2A29,/3B5E /18-/1F ` * P DATA /2D2F,/5354,/5556,/5758 /20-/27 * P DATA /595A,/402C,/255F,/3E3F /28-/2F ( P DATA /3031,/3233,/3435,/3637
0x4494a4…449638 Dummy {f00=0x0136, f01=0x0190, f02=»OM ASCII TO EBCDIC r P* 4 P* USED TO GET BINARY VALUES FROM THE EBCDIC CODE $ P* * P* INVALID CODES ARE CONVERTED TO ZEROS f P* P* PTEBCDIC EQU * P DATA 0,0,0,0 /00-/07 P DATA 0,0,0,0 /08-/0F P DATA 0,0,0,0
0x449638…4497cc Dummy {f00=0x0136, f01=0x0190, f02=»A,/5A6C,/507D 20-27 ( P DATA /4D5D,/5C4E,/6B60,/4B61 28-2F ( P DATA /F0F1,/F2F3,/F4F5,/F6F7 30-37 H ( P DATA /F8F9,/7A5E,/4C7E,/6E6F 38-3F t ( P DATA /6AC1,/C2C3,/C4C5,/C6C7 40-47 ( P DATA /C8C9,/D1D2,/D3D4,/D5D6 48-4F ( P DATA /D7D8,/D9E
0x4497cc…449960 Dummy {f00=0x0136, f01=0x0190, f02=»394,/9596 68-6F | ( P DATA /9798,/99A2,/A3A4,/A5A6 70-77 ( P DATA /A7A8,/A900,/0000,/0000 78-7F D P DE p P EJECT ~ P* 4 P* TRANSLATION OF FUNCTON KEYS & LOWER CASE P - W P* PKEYCNV EQU * P IFF KB6272=1 P CWK A
0x449960…449af4 (3, 48) Dummy {f00=0x013a, f01=0x0190, f02=»10 EQU * P CWK A2,/80 P RF(L) KEYC99 $ P DB : P CWK A2,/C0 DK H P RF(L) KEYC50 DK ` & P LDK A2,/7F KEYSWITCH 2 (C0-FF) DK z P RF KEYC99 DK PKEYC50 EQU * DK P DE P SUK A2,/80 P LC A2,KBCVTB,A2
0x449af4…449c88 Dummy {f00=0x013a, f01=0x4184, f02=»C,/B5A7 /80-/87 z * P DATA /A87F,/A98C,/7F7F,/7F7F /88-/8F * P DATA /ABB2,/AAB1,/7F8B,/AEAD /90-/97 F * P DATA /AFB6,/7F7F,/7F7F,/7F7F /98-/9F t * P DATA /7F7F,/B3A5,/7F7F,/7F7F /A0-/A7 * P DATA /7F7F,/7F7F,/7F7F,/7F7F /A8-/AF * P DATA /303
0x449c88…449e1c Dummy {f00=0x013a, f01=0x2008, f02=» A @ aP x (@ :P T P> H D ! P P T P P T #P 'P +W AT M SQ T H D !A( aT y }P Q P PP WF T W P P P P H D ! $ 1 d I d _ d sP w
0x449e1c…449fb0 Dummy {f00=0x013a, f01=0x0190, f02=» TC 8 ` | h j f T B TC * * L TB2 6 B %
0x449fb0…44a144 Dummy {f00=0x013a, f01=0x0190, f02=» B Z 8 6
0x44a144…44a2d8 Dummy {f00=0x013a, f01=0x0190, f02=»
[…0x2…]
0x44a600…44a794 (3, 49) Opaque[0x194]
0x44a794…44a928 # DirEnt {nam=»/OBJCT«, typ=»OB«, f00=0x0000, f01=0x0000, f02=0x2b40, f03=0x0000}
0x44a794…44a928 IdxSect {
0x44a794…44a928 f00 = 0x015a // 0x44a794 @0x0
0x44a794…44a928 f01 = 0x003c // 0x44a796 @0x2
0x44a794…44a928 gno = [ // 0x44a798 @0x4
0x44a794…44a928 [0x00]: C0x015a.0x0.0
0x44a794…44a928 [0x01]: C0x015a.0x1.0
0x44a794…44a928 [0x02]: C0x015a.0x2.0
0x44a794…44a928 [0x03]: C0x015a.0x3.0
0x44a794…44a928 [0x04]: C0x015b.0x0.0
0x44a794…44a928 [0x05]: C0x015b.0x1.0
0x44a794…44a928 [0x06]: C0x015b.0x2.0
0x44a794…44a928 [0x07]: C0x015b.0x3.0
0x44a794…44a928 [0x08]: C0x015c.0x0.0
0x44a794…44a928 [0x09]: C0x015c.0x1.0
0x44a794…44a928 [0x0a]: C0x015c.0x2.0
0x44a794…44a928 [0x0b]: C0x015c.0x3.0
0x44a794…44a928 [0x0c]: C0x015d.0x0.0
0x44a794…44a928 [0x0d]: C0x0161.0x0.0
0x44a794…44a928 [0x0e]: C0x0161.0x1.0
0x44a794…44a928 [0x0f]: C0x0161.0x2.0
0x44a794…44a928 [0x10]: C0x0161.0x3.0
0x44a794…44a928 [0x11]: C0x0162.0x0.0
0x44a794…44a928 [0x12]: C0x0162.0x1.0
0x44a794…44a928 [0x13]: C0x0162.0x2.0
0x44a794…44a928 [0x14]: C0x0162.0x3.0
0x44a794…44a928 [0x15]: C0x0163.0x0.0
0x44a794…44a928 [0x16]: C0x0163.0x1.0
0x44a794…44a928 [0x17]: C0x0152.0x2.0
0x44a794…44a928 [0x18]: C0x0152.0x3.0
0x44a794…44a928 [0x19]: C0x0152.0x1.0
0x44a794…44a928 [0x1a]: C0x0153.0x0.0
0x44a794…44a928 [0x1b]: C0x0152.0x0.0
0x44a794…44a928 [0x1c]: C0x0153.0x1.0
0x44a794…44a928 [0x1d]: C0x0126.0x2.0
0x44a794…44a928 ]
0x44a794…44a928 }
0x44a928…44aabc Dummy {f00=0x015a, f01=0x40d4, f02=» 4 F IDENT DEFDOC P,REL=4.2,791116,870136940420 DEFDOCK < DEFDOCK N T:FDSP b I:EVA0 t T:IO2 $ H @ 1,A8 $ P LDK A7,X'1B'+X'80' ORDER + WAIT P
0x44aabc…44ac50 Dummy {f00=0x015a, f01=0x4106, f02=» 4 F IDENT FMOVE P,REL=4.2,791116,870136940420 FMOVE < FMOVE L I:EVA0 ^ I:EVA5 p , ( B & + P I:RT1 _ P ( @ P
0x44ac50…44ade4 Dummy {f00=0x015a, f01=0x40c2, f02=» 4 F IDENT TYPET P,REL=4.2,791116,870136940420 TYPET < TYPET L I:EVA0 ^ I:RT1 p ( $ D ;d # + @ ND @
0x44ade4…44af78 Dummy {f00=0x015a, f01=0x40f2, f02=» 4 F IDENT ICLEAR P,REL=4.2,791116,870136940420 ICLEARK < ICLEARK N I:EVA0 b I:RT1 t , ( @ #0 0T ' ' _ T $ @
0x44af78…44b10c Dummy {f00=0x015a, f01=0x4112, f02=» 4 F IDENT EMPTYT P,REL=4.2,791116,870136940420 EMPTYTK < EMPTYTK N I:EVA0 b , ( @ #0 0T & ! T t I:RT1 , ( P & ! X T C T T !P <
0x44b10c…44b2a0 Dummy {f00=0x015a, f01=0x0190, f02=» 4 F IDENT T:STIN P,REL=4.2,791116,870136940420 STRIN1K < STRIN1K N T:STEV b , ( @ X x & Y " X R W t T:RNOK T:LOFSN , ( P _ Y $ I:EVA0
0x44b2a0…44b434 (3, 50) Dummy {f00=0x015a, f01=0x410c, f02=» u R W V R W V I:MOV . T:GRFC > , ( % _ " D $ D P T:ROK & " @ X $ X y & 8 4 R W 'P [ eP gW2 wR {W V R W V @
0x44b434…44b5c8 Dummy {f00=0x015a, f01=0x0190, f02=» 4 F IDENT T:STOU P,REL=4.2,791116,870136940420 STROU1K < STROU1K N T:STEV b T:LOFS t * & @ X x & Y " I:EVA0 T:LOPS , ( !0P <! , (
0x44b5c8…44b75c Dummy {f00=0x015a, f01=0x40f4, f02=» h T:DUPX T:GRFC , ( y & Y $ 8 " X X , T:ROK T:RNOK l $ x ( y $ ~ 4 0 1P< ;T( AT GW$ WP cW mW wP R W V, @ !0P <! , (
0x44b75c…44b8f0 Dummy {f00=0x015a, f01=0x40ea, f02=» 4 F IDENT T:STEV P,REL=4.2,791116,870136940420 T:STEVK < T:STEVK N T:GRFC b I:EVA0 t , ( H Y Y & ( : & @ PSTEERR ABL I:ERR2 ILLEGAL TY
0x44b8f0…44ba84 Dummy {f00=0x015a, f01=0x0190, f02=» 4 F IDENT T:EDFL P,REL=4.2,791116,870136940420 T:EDFLK < T:EDFLK N T:PM1 b T:PM2 r T:CASP , ( I Y ( x P Y * , ( x y W X " T:DUPX
0x44ba84…44bc18 Dummy {f00=0x015a, f01=0x018e, f02=» V X ( x C T:CSEG * T:SCUW < , ( ( Y * X Y , N , ( X X C & C C ~ , ( ( B P 9 T:IOERC , ( R 9 X !@
0x44bc18…44bdac Dummy {f00=0x015a, f01=0x0190, f02=» , ( K _ _ B U C Q C T:CLR1N 4 T:CLR2 F , ( i @ D X X * X , ( $" ~_> @ Y X * _R X !@ , ( XX y X # x V y X X , ( * P P 1 _
0x44bdac…44bf40 Dummy {f00=0x015a, f01=0x415e, f02=» X 1 1 X x , ( ? !@T X $ " P y _ T:CLIT@ H T:EKEY Z , ( _ x T X H X l $ { X * , )$ P _ : H D !T P l )Wz 9 UP m l yV* Ph R^ PP +P ET YU cQ m z o |
0x44bf40…44c0d4 (3, 51) Dummy {f00=0x015a, f01=0x0190, f02=» 4 F IDENT T:DYKI P,REL=4.2,791116,870136940420 J F " T:DYKIK T:PM1 T:PM2 T:CLR1 T:CLIT T:CLR2 T:IOER@ T:EKEY T:BELLC < T:DYKIK I:EVA7@ , ( @ ' Y y , ( x C y X C C
0x44c0d4…44c268 Dummy {f00=0x015a, f01=0x0190, f02=» T:CLRD * & } _` y C Q " T , ( X ! X X ! x D , ( Y Y _ X "@P B R y t , ( C B P 9 V _F9 V X ! , ( T X !@X y C _d y C C T
0x44c268…44c3fc Dummy {f00=0x015a, f01=0x0190, f02=» c C _$ _ T:CLR2 b T:SCUW 4 , ( U y _6 x X@ X X F , ( s # C _. B ]d P v , ( C Q X8_H x XD @ Y c , ( C y XR X x
0x44c3fc…44c590 Dummy {f00=0x015a, f01=0x0190, f02=»:CLIT T:LOFS I:EVA0 " * & H ( 4 T:LOPSN b T:CLMI t , ( ! ( : B C T:PM1 D T:GRFC , ( ; _J + . X 9 V ! P ,
0x44c590…44c724 Dummy {f00=0x015a, f01=0x40a8, f02=» : | H D ! ! D z ]Tf e iR o F yT } Q T 0 P R P V 8 4 VV T #P 'Q( W P Q8 0 7 @ QV WP V @ C T:PM1 D T:GRFC , ( ; _J + . X 9 V ! P ,
0x44c724…44c8b8 Dummy {f00=0x015a, f01=0x018e, f02=» 4 F IDENT T:UPDF P,REL=4.2,791116,870136940420 T:UPDFK < T:UPDFK N T:GRFCN b T:LOFSC t I:EVA0 , ( @ 2! Y " T:LOPS I:MOV , ( A
0x44c8b8…44ca4c Dummy {f00=0x015a, f01=0x402a, f02=» =T P @ &136940420 T:UPDFK < T:UPDFK N T:GRFCN b T:LOFSC t I:EVA0 , ( @ 2! Y " T:LOPS I:MOV , ( A
0x44ca4c…44cbe0 Dummy {f00=0x015a, f01=0x0190, f02=» 4 F IDENT T:DUPL P,REL=4.2,791116,870136940420 T:DUPLK T:DUPX < T:DUPLK V T:GRFC j I:EVA0 | T:RNOK T:ROK T:DUPX , ( HB X T:LOFS , (
0x44cbe0…44cd74 (3, 52) Dummy {f00=0x015a, f01=0x4046, f02=» : CT OV ` 0@ B
0x44cd74…44cf08 Dummy {f00=0x015a, f01=0x4136, f02=» 4 F IDENT T:GETC P,REL=4.2,791116,870136940420 T:GETCK < T:GETCK N T:GRFC b I:EVA0 t , ( @ 2' R P P X I:RT1 , ( ' ' X _ X ' _ X '? ; _
0x44cf08…44d09c Dummy {f00=0x015a, f01=0x411a, f02=» 4 F IDENT T:GETA P,REL=4.2,791116,870136940420 T:GETAK < T:GETAK N T:GRFC b I:EVA0 t T:RNOK T:ROK , ( H X ' X ! T:RCR H
0x44d09c…44d230 Dummy {f00=0x015a, f01=0x4104, f02=» 4 F IDENT T:TSTC P,REL=4.2,791116,870136940420 T:TSTCK < T:TSTCK N T:GRFC b , ( @ X " 9b! X :c 2" t T:RTES $ H @ % , 4 @ 0,/8
0x44d230…44d3c4 Dummy {f00=0x015a, f01=0x0190, f02=» 4 F IDENT T:TFWD P,REL=4.2,791116,870136940420 D @ T:TLEFK T:TRIG T:TLDO T:TDOW T:TUP T:TFWD T:TBWD T:THOMC < T:TLEFK T:TRIG T:TLDO T:TDOW T:TUP T:TFWD T:TBWD
0x44d3c4…44d558 Dummy {f00=0x015a, f01=0x4110, f02=» T:TABE , ( ? 2 Y 69h Q X :h Y 0 W T:SCR2 F T:TABC X T:TABN j * & ] U X Q W Y 0 | w 8 4 W W W W W W !W IQ YW ]U eQ kW x
0x44d558…44d6ec Dummy {f00=0x015a, f01=0x018e, f02=» 4 F IDENT T:DISP P,REL=4.2,791116,870136940420 T:PRINK T:DISP T:ERAS < T:PRINK ^ T:FDSP r T:EDWIC T:GRFCC T:GTIP , ( D 9H Y * T:DISP T:ERAS
0x44d6ec…44d880 Dummy {f00=0x015a, f01=0x0190, f02=» , ( U Y +W Y + W , ( s T W Q W Y + 8 , ( U Q P W W h T:TABC , ( @ Y ( C X *! T:RNOK I:RT1 , ( P V
0x44d880…44da14 (3, 53) Dummy {f00=0x015b, f01=0x4106, f02=» X 0 :H* : X 2T T:EDIO , ( ' Y 2 : C 1 B ] 2 G : b H D ! 0 W !W GP( KP QP YW^ ] . i oWL sT w { }W> Q W U x ( $ Q P W W P %T J @
0x44da14…44dba8 Dummy {f00=0x015b, f01=0x0190, f02=» 4 F IDENT T:GETF P,REL=4.2,791116,870136940420 T:GETFK T:GTIT T:GTIP < T:GETFK ^ T:TABC r * & X +! U 9K Y ( Y + T:TABN T:GTIT $ T:GRFC T:GTIP 4 , (
0x44dba8…44dd3c Dummy {f00=0x015b, f01=0x4032, f02=» $ U Z @ .0 T:GETFK T:GTIT T:GTIP < T:GETFK ^ T:TABC r * & X +! U 9K Y ( Y + T:TABN T:GTIT $ T:GRFC T:GTIP 4 , (
0x44dd3c…44ded0 Dummy {f00=0x015b, f01=0x0190, f02=» 4 F IDENT T:REWR P,REL=4.2,791116,870136940420 ! . * T:REWRK T:SCUW T:CLRD T:IOWR T:CASP ! < T:IOWR ! n T:CSEG ! T:SCUW ! , ( C ( C : ! T:CLRD . ! T:REWRK 4 ! , (
0x44ded0…44e064 Dummy {f00=0x015b, f01=0x4156, f02=» X D D : K ! I:EVA3L " & I:EPIC " 8 , ( } $ + Q 2 P P " J T:LOPS " z , ( ( B X # V " I:EVA0 " I:ECPY " I:EVI " , ( :
0x44e064…44e1f8 Dummy {f00=0x015b, f01=0x0190, f02=» 4 F IDENT T:DEDT P,REL=4.2,791116,870136940420 # . * T:TABCK T:TABD T:TABE T:TABN T:SCR2 # < I:EVNON # n I:ESKI # I:EVA0T # I:EBRI # I:EBRBR # I:EBR # , ( #
0x44e1f8…44e38c Dummy {f00=0x015b, f01=0x0190, f02=» # p T:DSL $ T:TABCK & $ T:TABD * $ 4 T:TABE . $ H , ( ! W W X 0Q $ T:EDWI $ I:EVT $ * & ; Y ( Y *P $ I:EDSKL $ T:GRFC $ * & W
0x44e38c…44e520 Dummy {f00=0x015b, f01=0x0190, f02=»_` " P T $ $ , ( &W " P Y 0] Y (_t % " T:EDWF % R * ( " X _. ( X *# P B % d , ( 1 (W " P X X$ C % T:SCR2 % T:SCUR % * & : X *! P
0x44e520…44e6b4 (3, 54) Dummy {f00=0x015b, f01=0x4080, f02=» )W -W 5Q 9 = IP Qp P P: Vp P4 T WT P P W % P P )W 1T 5W & J R & j@ & |
0x44e6b4…44e848 Dummy {f00=0x015b, f01=0x0190, f02=» 4 F IDENT T:ENLI P,REL=4.2,791116,870136940420 ' T:DNL T:DSL ' < I:EVNO ' R I:ECPY ' d I:EPIC ' v I:ETXTL ' I:ETAB ' I:EBRI ' I:EBRB ' I:EBR ' * & '
0x44e848…44e9dc Dummy {f00=0x015b, f01=0x0190, f02=» ' I:ESKI ( $ T:DSL & ( 6 T:GRFC ( H T:DNL 4 ( Z , ( ! " Y . Y ,W " ( l , ( 9 Y . X ( X ." P X 0R T Y * ( T:WRDY ( , ( Y P U :H $ K (
0x44e9dc…44eb70 Dummy {f00=0x015b, f01=0x4136, f02=» 0U X * ( p , ( # P P T " T : ) T:ENINL ) @ , ( H Y . , Y ( " Y ) R * & *T " T ! 1 W ! ) * : ) H D ! 4 # & 3W IPV ORz QT$ YP _U {T W QH T2 P$ U P ) P T
0x44eb70…44ed04 Dummy {f00=0x015b, f01=0x0190, f02=» 4 F IDENT T:EINP P,REL=4.2,791116,870136940420 * " T:PKI T:PINP T:TKI T:TINP * < T:PKI * b T:PINP * t T:GRFC` * I:ETAB * I:EVIN * , ( I Y *T : * I:ECTR * T:EVO
0x44ed04…44ee98 Dummy {f00=0x015b, f01=0x0190, f02=» * h , ( Q & X ( " Q Y +Q R " + , ( q P W " U Y , " Q X . X 0 + 8 , ( R P X *:h P P ) Y (W X + h , ( *:h P P P P + , ( P W X ! X $" P Q X ( + , ( # P X
0x44ee98…44f02c Dummy {f00=0x015b, f01=0x0190, f02=» - Y ( : X *:h X (! # P X + , ( K & V L T W X , X 0P , , , ( k T X *:h XF XL X (!@T @ , , ( Y ( X , Y t X 0 l _r X ( , , ( P Y (_ P , T:WRDY , , ( @
0x44f02c…44f1c0 Dummy {f00=0x015b, f01=0x0190, f02=» ' X (P X ( , T:CLMI - . , ( E P 8 Y 0 X 2P X - @ , ( c 0V _z Y ( " T Y ( : - p I:EVA0C - , ( $ 8 8 V Y 8 : - , ( " P X & V ( P : :
0x44f1c0…44f354 (3, 55) Dummy {f00=0x015b, f01=0x0190, f02=» X : - r , ( X ( T X & V H " V . T:CLDY . B ( $ = Y : X $ X : : . T H D !@@ T OP aQv iQ kR qP sW yU } h Q Rv P P P4 W . H D ! Pl Pf P P P< WZ P< Q P2 R$ W
0x44f354…44f4e8 Dummy {f00=0x015b, f01=0x4052, f02=» uT P P P T . d W T 'T 9V / T / <@ / N $ = Y : X $ X : : . T H D !@@ T OP aQv iQ kR qP sW yU } h Q Rv P P P4 W . H D ! Pl Pf P P P< WZ P< Q P2 R$ W
0x44f4e8…44f67c Dummy {f00=0x015b, f01=0x0190, f02=» 4 F IDENT T:ENIN P,REL=4.2,791116,870136940420 0 T:ENINK T:ENI T:EVOU 0 < T:ENINK 0 T:ENI 0 p , ( X Y " X Y $ X Y & X @W X 0 T:LOFS 0 , ( ! < Y = " 0 I:EGTBC 0 * &
0x44f67c…44f810 Dummy {f00=0x015b, f01=0x0190, f02=» T:WRDY 1 , ( W X & V D ! P @ W X 1 , ( W Y ( : X , Y X $ Y 1 F , ( X &T Y Y Y W V $ 1 v , ( :H D Y D :H Y ! P V 1 I:EVA0 1 I:EVA1 1 , ( Y
0x44f810…44f9a4 Dummy {f00=0x015b, f01=0x4110, f02=» Q : 2' " P T 1 I:EVA3 2 . I:EPIC 2 @ , ( mD W : N : 2 R H D ! W CT IW SP a mT" }T W4 W, P W" P W W T WD 2 ( $ P W )P /W A X aP gT qW 2 2
0x44f9a4…44fb38 Dummy {f00=0x015b, f01=0x413a, f02=» 4 F IDENT T:SETC P,REL=4.2,791116,870136940420 3 T:SETCK T:SCUR 3 < T:SETCK 3 V T:GRFC 3 j T:EDWI 3 | T:RCTS 3 T:SCUR 3 , ( A C 3 T:WRDY 3 X
0x44fb38…44fccc Dummy {f00=0x015b, f01=0x40d8, f02=» 4 F IDENT T:CLMI P,REL=4.2,791116,870136940420 4 T:CLMIK 4 < T:CLMIK 4 N , ( "0P ' Q W ' 4 b ! Y : 4 P Q W 4 ( 4 @ 4 P SCR A2,OP2A CLEAR LOOP P ADKL OP2A,1
0x44fccc…44fe60 Dummy {f00=0x015b, f01=0x0190, f02=» 4 F IDENT T:ATTF P,REL=4.2,791116,870136940420 5 J F " T:ATTFK T:DETF T:ROK T:RNOK T:RCR T:RCTS T:RTES@ T:GRFC T:WRDYC 5 < T:CLDY 5 T:DETF 5 T:ATTFK 5 I:EVA6A 5 I:FFSN 5 , ( W V
0x44fe60…44fff4 (3, 56) Dummy {f00=0x015b, f01=0x40f6, f02=» B 5 t T:RNOK < 6 T:GRFC @ 6 ( T:WRDYC H 6 < T:EDIOA 6 P * & ; X _ v : C C 6 b T:CLDY 6 $ Y @ : C : 6 @ W @ 6 l 6 @ 6
0x44fff4…450188 Dummy {f00=0x015b, f01=0x0190, f02=» 4 F IDENT T:LSEG P,REL=4.2,791116,870136940420 7 & " T:LOFSK T:LOPS T:LSEG T:CSEG 7 < T:LSEG 7 f T:CSEG 7 z , ( ( R : V E V D ' 7 , ( ! $ T ( W P 7 I:RT1 7 T:LOFSK
0x450188…45031c Dummy {f00=0x015b, f01=0x4010, f02=» f 7 @ 8 SEG P,REL=4.2,791116,870136940420 7 & " T:LOFSK T:LOPS T:LSEG T:CSEG 7 < T:LSEG 7 f T:CSEG 7 z , ( ( R : V E V D ' 7 , ( ! $ T ( W P 7 I:RT1 7 T:LOFSK
0x45031c…4504b0 Dummy {f00=0x015b, f01=0x413c, f02=» 4 F IDENT T:DC00 P,REL=4.2,791116,870136940420 9 DCREADK DCWRTE DCEXCH 9 < T:FDS0C 9 ^ DCREADK 9 p T:DCR1 9 DCWRTE 9 T:DCW1 9 DCEXCH 9 T:DCE1 9 , ( I$
0x4504b0…450644 Dummy {f00=0x015b, f01=0x416e, f02=» 4 F IDENT T:DMI0 P,REL=4.2,791116,870136940420 : " IREAD IRNEXT IRWRIT IINSY : < IREAD : b T:FDS0C : t T:IRE1 : IRNEXT : T:IRN1 : IRWRIT : T:IRW1@ : , ( I$
0x450644…4507d8 Dummy {f00=0x015b, f01=0x40a0, f02=» 4 F IDENT T:ASS0 P,REL=4.2,791116,870136940420 ; ASSIGNK ; < ASSIGNK ; N T:ASSI ; b @ ; t ; @ ; ********** ~ 2 P* * 2 P* CREDIT ASSEMBLER SUBROUTINE E
0x4507d8…45096c Dummy {f00=0x015b, f01=0x40a0, f02=» 4 F IDENT T:IAS0 P,REL=4.2,791116,870136940420 < IASSGNK < < IASSGNK < N T:IASS < b @ < t < @ < ************ ~ 2 P* * 2 P* CREDIT ASSEMBLER SUBROU
0x45096c…450b00 Dummy {f00=0x015b, f01=0x40ee, f02=» 4 F IDENT T:DMR0 P,REL=4.2,791116,870136940420 = RREAD RWRITE = < T:FDS0 = T RREAD = f T:RRE1 = x RWRITE = T:RWR1 = $ I = = @ = TACK POINTER P*
0x450b00…450c94 (3, 57) Dummy {f00=0x015c, f01=0x40a0, f02=» 4 F IDENT T:SWI0 P,REL=4.2,791116,870136940420 > SWITCHK > < T:SWIT > N SWITCHK > ` @ > t > @ > MBLER SUBROUTINE ENTRIES * . P* * . P******************
0x450c94…450e28 Dummy {f00=0x015c, f01=0x40d0, f02=» 4 F IDENT T:TEI0 P,REL=4.2,791116,870136940420 ? TESTIOK ABORT ? < T:TEST ? T TESTIOK ? f T:ABOR ? z ABORT ? H ? ? @ ? * . P******************
0x450e28…450fbc Dummy {f00=0x015c, f01=0x40d4, f02=» 4 F IDENT T:CLO0 P,REL=4.2,791116,870136940420 @ SETTIMK GETTIM @ < T:SETT @ V SETTIMK @ h T:GETT @ | GETTIM @ H @ @ @ @ * . P******************
0x450fbc…451150 Dummy {f00=0x015c, f01=0x409c, f02=» 4 F IDENT T:DEL0 P,REL=4.2,791116,870136940420 A DELAY A < T:DELA A L DELAY A ^ @ A p A @ A ASSEMBLER SUBROUTINE ENTRIES * . P* * . P******************
0x451150…4512e4 Dummy {f00=0x015c, f01=0x40a0, f02=» 4 F IDENT T:GTI0 P,REL=4.2,791116,870136940420 B GETTIDK B < T:GETI B N GETTIDK B ` @ B t B @ B MBLER SUBROUTINE ENTRIES * . P* * . P******************
0x4512e4…451478 Dummy {f00=0x015c, f01=0x0190, f02=» 4 F IDENT T:DC P,REL=4.2,791116,870136940420 C 6 2 T:DCREK T:DCR1 T:DCWR T:DCW1 T:DCEX T:DCE1 C < T:DCREK C v T:FDSP C T:DCR1 C T:DCWR C T:DCW1 C T:EDION C , ( @@ / W
0x451478…45160c Dummy {f00=0x015c, f01=0x40c0, f02=» , ( 7 ' / C D , ( Q$ C D 4 & " k &P C & C : D d V W V 1 V D D @ D T:DCW1 C T:EDION C , ( @@ / W
0x45160c…4517a0 Dummy {f00=0x015c, f01=0x0190, f02=» 4 F IDENT T:DMI P,REL=4.2,791116,870136940420 E F B T:IREAK T:IRE1 T:IRNE T:IRN1 T:IRWR T:IRW1 T:IINSL T:INS1 E < T:IREAK E T:FDSPA E T:IRE1 E T:IO2 E T:IRNE E T:IRN1 E , ( @H
0x4517a0…451934 (3, 58) Dummy {f00=0x015c, f01=0x4110, f02=» / E T:INS1 6 F & I:EVA0 F : , ( 3B / F L , ( M &P C : F | & " i C : C : F H p H ' ` 9 ` K ` F F
0x451934…451ac8 Dummy {f00=0x015c, f01=0x0190, f02=» 4 F IDENT T:ASSI P,REL=4.2,791116,870136940420 G T:ASSIK G < , ( G N T:ASSIK & G ~ T:CSEG G , ( ! @ P ( _ G T:FDSP G I:EVA0 G , ( A ? A
0x451ac8…451c5c Dummy {f00=0x015c, f01=0x40b0, f02=» P V I @ $ % A G I:RT1 H ( , ( & # T : Y H 8 _ H h ` +P k P T H z H @ H @ P ( _ G T:FDSP G I:EVA0 G , ( A ? A
0x451c5c…451df0 Dummy {f00=0x015c, f01=0x0190, f02=» 4 F IDENT T:IASS P,REL=4.2,791116,870136940420 I T:IASSK I < T:IASSK I N , ( @ I b T:CSEG I T:FDSP I , ( ! P ( _ A I I:EVA0 I , ( ! = @ " A
0x451df0…451f84 Dummy {f00=0x015c, f01=0x409a, f02=» I , ( P V I @ % A & J $ # T : Y _ J 8 p !P Y i y P T J ` J @ J G I T:FDSP I , ( ! P ( _ A I I:EVA0 I , ( ! = @ " A
0x451f84…452118 Dummy {f00=0x015c, f01=0x0190, f02=» 4 F IDENT T:ASG0 P,REL=4.2,791116,870136940420 K ASSGN K < , ( K L ASSGN & K | T:CSEGA K , ( ! @ P ( _ K T:FDSPA K I:EVA0 K , ( A ? @ A "
0x452118…4522ac Dummy {f00=0x015c, f01=0x4096, f02=» * & $ P V I @ $ % A L * & & # T : Y _ L 2 ` +P [ s P T L ` L @ L GA K , ( ! @ P ( _ K T:FDSPA K I:EVA0 K , ( A ? @ A "
0x4522ac…452440 Dummy {f00=0x015c, f01=0x018e, f02=» 4 F IDENT T:DMR P,REL=4.2,791116,870136940420 M & " T:RREAK T:RRE1 T:RWRI T:RWR1 M < T:RREAK M f T:FDSP M z T:RRE1 M I:EVA0 M T:STCW M , ( A &P C M T:IO2 M T
0x452440…4525d4 (3, 59) Dummy {f00=0x015c, f01=0x402e, f02=» 6 + 6 N F N @ N *
0x4525d4…452768 Dummy {f00=0x015c, f01=0x40c4, f02=» 4 F IDENT T:SWI P,REL=4.2,791116,870136940420 O T:SWITK O < T:SWITK O N T:CSEG O b I:RT1 O t & " ( O O @ O EQU * P LDK A7,0 " P SU PP,CSB,TCA GET RELATIVE PP
0x452768…4528fc Dummy {f00=0x015c, f01=0x416a, f02=» 4 F IDENT T:TEI P,REL=4.2,791116,870136940420 P T:TESTK T:ABOR P < T:TESTK P V T:FDSP P j I:RT1 P | T:ABOR P * & @ "R V I P T:KIAA P , ( ( T _& @
0x4528fc…452a90 Dummy {f00=0x015c, f01=0x4138, f02=» 4 F IDENT T:CLO P,REL=4.2,791116,870136940420 Q T:SETTK T:GETT Q < T:SETTK Q V I:EVA0 Q j T:CSEG Q | I:RT1 Q * & @ ( Q T:GETT Q , ( (
0x452a90…452c24 Dummy {f00=0x015c, f01=0x40ee, f02=» 4 F IDENT T:DEL P,REL=4.2,791116,870136940420 R T:DELAK R < T:DELAK R N I:EVA0 R b T:CSEG R t I:RT1 R * & @ ( R R R @ R P ABL I:ERR ERROR P
0x452c24…452db8 Dummy {f00=0x015c, f01=0x40c2, f02=» 4 F IDENT T:MSK0 P,REL=4.2,791116,870136940420 S MASKY S < MASKY S L I:EVA0 S ^ I:RT1 S p ( $ D V S S @ S RF(NZ) MSK010 NOT BINARY P XIF P $ P LD WK2,STKB,TCA
0x452db8…452f4c Dummy {f00=0x015c, f01=0x0190, f02=» 6 F IDENT T:SCD P,REL=4.2,791211,870136940420 T:ACTVK T:PAUS T:RSTR > T:ACTVK ` , ( 2 ;B P J t P:BAS I:NTPB T:CSEGN , ( ! T (
0x452f4c…4530e0 Dummy {f00=0x015c, f01=0x4090, f02=» W & F : I:RT1 " u ( 2 ( P4 #T + ` CW< M ` _W V z@ J t P:BAS I:NTPB T:CSEGN , ( ! T (
0x4530e0…453274 (3, 60) Dummy {f00=0x015c, f01=0x0190, f02=» 6 F IDENT T:USE P,REL=4.2,791213,870136940420 T:USE T:UERR > T:USE V I:EVA0 h * & 2 & >A >A 2 $ z P:MTABA , ( & V D 9a 9 V , ( =D @ W @ ( T W
0x453274…453408 Dummy {f00=0x015c, f01=0x417e, f02=» 9 8 z , ( ? X Q , V , ( ( - 4T J , ( V 5 ( W V P z , ( W U V X 9T I T:UERR > I:RT0 9
0x453408…45359c Dummy {f00=0x015c, f01=0x0190, f02=» 8 F IDENT T:UNUS P,REL=4.2,791229,870136940420 T:UNUSK @ T:UNUSK R , ( 2 ' >A >A 2 $ V f P:MTAB , ( ! L ;a ; R @ ( 8 ? , ( ? X Q ( V )<B
0x45359c…453730 Dummy {f00=0x015c, f01=0x4024, f02=»RD KQ. @ 791229,870136940420 T:UNUSK @ T:UNUSK R , ( 2 ' >A >A 2 $ V f P:MTAB , ( ! L ;a ; R @ ( 8 ? , ( ? X Q ( V )<B
0x453730…4538c4 Dummy {f00=0x015c, f01=0x408c, f02=» 4 F IDENT T:EXIT P,REL=4.2,791116,870136940420 Z T:EXITK Z < T:EXITK Z N ( Z b Z v@ Z z P REL #1,76-06-15 P* P ENTRY T:EXIT P* PT:EXIT LKM P DATA 3 P* P END
0x4538c4…453a58 Dummy {f00=0x015c, f01=0x40e2, f02=» 4 F IDENT T:GTCW P,REL=4.2,791116,870136940420 [ GETCW [ < T:FDSP [ L GETCW [ ^ I:EVA0 [ p T:GTCW [ I:RT1 [ $ I [ [ @ [ DATA ITEM ADDRESS " P CF PS,T:GTC
0x453a58…453bec Dummy {f00=0x015c, f01=0x40c2, f02=» 4 F IDENT T:GTID P,REL=4.2,791116,870136940420 T:GETIK < T:GETIK N I:EVA0 b I:RT1 t $ @ V G 9h ' @ 1,OP2A STORE FOR USER P SRL WK1,8 P SCR WK1,OP2A P
0x453bec…453d80 Dummy {f00=0x015c, f01=0x0190, f02=» 6 F IDENT T:IO P,REL=4.2,791229,870136940420 J F " T:WRITK T:READ T:KIY T:NKI T:EDWR T:DSC0 T:DSC1@ T:DSC2 T:EDWEC > F B T:EDWF T:EDWIN T:EDIO T:XSTA T:WAIT@ T:IO1 T:IO2 T:IO3 T:IO4 F B T:FDS0 T:FDSP, T:STCW T:GDSP T:GTCW T:KIPR
0x453d80…453f14 (3, 61) Dummy {f00=0x015d, f01=0x0190, f02=» r I:EVA0 T:READ 2 $ * & ! P / W 8 T:DSC0 F f T:DSC1@ X z , ( = / W C C W , ( [ C C J ' W 781"&$ 39 T:DSC2 , ( {
0x453f14…4540a8 Dummy {f00=0x015d, f01=0x0190, f02=»SEGW T:MWAID , ( ( W , ( W ^ P , ( ( , ( 1W C C C ( T:IO1 T:IO2 T
0x4540a8…45423c Dummy {f00=0x015d, f01=0x0190, f02=»P B l , ( q 5 P C P B % P C I:RT1 < T:EDWR L I:EDW ` , ( + p T:EDWEC T:EDWF , ( C C B B P C T:EDWIN
0x45423c…4543d0 Dummy {f00=0x015d, f01=0x0190, f02=» I:EVA7 , ( : % Y , ( ) C & R V C F , ( G : B T v T:FDS0 x T:FDSP, T:GDSP , ( e T T V : 2 ' W
0x4543d0…454564 Dummy {f00=0x015d, f01=0x0190, f02=»;D:B " : v , ( _ C : I:EVA2 F , ( : P C X , ( W $0 P C : " , ( !@P ") # B C B % C C T:STCW < , ( ; :
0x454564…4546f8 Dummy {f00=0x015d, f01=0x0190, f02=» 4 ! P , ( T 0P W 8 C S W C C , , ( 0 P C ;a 6 4 ZH , ( T : 49d_Z B@5 @ 8 , ( @N ' @ d P ( T:GTCW J , ( 9
0x4546f8…45488c Dummy {f00=0x015d, f01=0x0190, f02=» _ R _ # Q R , ( V > _V ' P _d P 0 , ( & 1 P 1_ , @ ` , ( - R T U :B@ ' d T:KIAA , T:KIAC@ . $
0x45488c…454a20 Dummy {f00=0x015d, f01=0x413e, f02=» W W 7Pb H D ! ; P GP MP& gP mP wP P P J P P P H D ! 9R ?V ]T gT oT W T W" P W P @ P ET d H D ! W W W > P( W$ W P T OT WW { , PP ( $ R R
0x454a20…454bb4 (3, 62) Dummy {f00=0x0161, f01=0x0190, f02=» 4 F IDENT T:KIA P,REL=4.2,791116,870136940420 f T:KIA T:NKIA f < T:KIA f T T:NKIA f f T:ABUF f z T:KIPR f , ( W 6 V :a f , ( ' ( ( f T:LSEG
0x454bb4…454d48 Dummy {f00=0x0161, f01=0x018e, f02=» K V 6V ( - f , ( _ : J 7 J V W J g " , ( :A V 6V $ - _ * g R , ( + : D T E D :A D g , ( ;A 9A Q 5 U _ 5 g T:KIAAC g T:KIAC g , (
0x454d48…454edc Dummy {f00=0x0161, f01=0x40c0, f02=» g f , ( @ m D V ( 2 C C h _, h 8 H D !r W ^ - 2 IT MP Y V V T> Q U ! R /P 7P ?W h J [R ]P h h @ h 9A Q 5 U _ 5 g T:KIAAC g T:KIAC g , (
0x454edc…455070 Dummy {f00=0x0161, f01=0x408e, f02=» 4 F IDENT T:ABUF P,REL=4.2,791116,870136940420 i T:ABUFK i < M i N T:ABUFK i d i x@ i IA SAVEAREA x EJECT END @
0x455070…455204 Dummy {f00=0x0161, f01=0x4104, f02=» 4 F IDENT WRITEL P,REL=4.2,791116,870136940420 j WRITELK j < WRITELK j N T:FDS0 j b I:EVA0 j t , ( D / C j $ &P C & C j !P j 0 j @ j
0x455204…455398 Dummy {f00=0x0161, f01=0x0190, f02=» 6 F IDENT I:NTP P,REL=4.2,791211,870136940420 B > I:TRC I:NTP I:NTPA I:NTPB I:NTPR I:RT0 I:RT1 I:RT2 I:RST > I:MOV I:ADD I:SUB I:CMP I:MUL * & T I:D
0x455398…45552c Dummy {f00=0x0161, f01=0x0190, f02=» I:XCP I:EDS , ( - I:TRC N I:RST B ` I:NTPA B r I:NTPB F T:LSEG , ( ? W V 7 P I:NTP r I:NTPR r , ( ]
0x45552c…4556c0 Dummy {f00=0x0161, f01=0x0190, f02=» I:RT1 I:RT0 , ( @ Q W :aW _B( , , ( 2 P V W T:BAT , ( _ 2 # ;B V T "W V P , ( L , V 2P " 2 P V * & D
0x4556c0…455854 (3, 63) Dummy {f00=0x0161, f01=0x0190, f02=» D j P:MTAB , ( o $ V 6 V % V E @ , ( & &' T 2 % 7_ 2 L T:CAT | , ( # L ( 2" &] , ( Y $! 6P Q $ T 9B , ( _ _ 6 @ & &"
0x455854…4559e8 Dummy {f00=0x0161, f01=0x410e, f02=» C H J 'W 'W '_6 H D ! @ , $ ! # % ' ) + ; L H D ! = H ? R A T UP ]P i r L Q W W P W8 T W P P l < 8 R #T )P [T aW T P Q T T P KW QW C V @
0x4559e8…455b7c Dummy {f00=0x0161, f01=0x0190, f02=» 4 F IDENT I:EVA P,REL=4.2,791116,870136940420 p J F " I:EVA0K I:EVA1 I:EVA2 I:EVA3 I:EVA5 I:EVA6 I:EVA7L I:EVB I:EVI p < I:FML I:EVTO p P:MTAB p , ( :l:d:h p I:EVA2 p I:EVA1 p
0x455b7c…455d10 Dummy {f00=0x0161, f01=0x0190, f02=» 9 # W @ $ E " T ; [ p , ( W # :H 2 T Z L q , , ( @ w L D V W # q , ( L E V $ W D V q I:EVA0K q , ( @ L , W 6 2 W " q , (
0x455d10…455ea4 Dummy {f00=0x0161, f01=0x0190, f02=» Z Z : q , ( 3 :B , (V ; [ [ r $ , ( @ S z ;AV Z H # r T , ( s ; : & Z 4 r , ( : Z 4 r , ( " 2@P : [ [
0x455ea4…456038 Dummy {f00=0x0161, f01=0x0190, f02=» * r , ( : ( :A ( @ & s , ( / " P [ :;H 2 P ;h s : I:EVI l s j , ( B O : ; V Y : 2 s | I:EVB ~ s , ( o ! : 6 2 *W " s , ( # ;b
0x456038…4561cc Dummy {f00=0x0161, f01=0x404a, f02=» P WF CVj _V$ s P 1P KP W& s t 4@ t F :;H 2 P ;h s : I:EVI l s j , ( B O : ; V Y : 2 s | I:EVB ~ s , ( o ! : 6 2 *W " s , ( # ;b
0x4561cc…456360 Dummy {f00=0x0161, f01=0x415e, f02=» 4 F IDENT I:CMP P,REL=4.2,791116,870136940420 w I:CMP w < I:CMP w L , ( P " T * & : * & w ^ I:CPA w , ( ! !`P :J +_ +Q w , ( A _0 , V W R V w & " _
0x456360…4564f4 (3, 64) Dummy {f00=0x0161, f01=0x4168, f02=» 4 F IDENT I:CPA P,REL=4.2,791116,870136940420 x I:CPA x < I:CPA x L * & R W x ^ , ( ( V W Q P W ! W V x , ( ? P , V W Q P W $ W V x * & _ P T V
0x4564f4…456688 Dummy {f00=0x0161, f01=0x018e, f02=» 4 F IDENT I:MOV P,REL=4.2,791116,870136940420 y I:MOV I:MVC y < I:MOV y R I:MVC y d , ( $0#0;b P P P P y v , ( ! 0 - P V W Z _ y , ( A 4 V W Q P ) P 9_ &" y , (
0x456688…45681c Dummy {f00=0x0161, f01=0x0190, f02=» y f , ( V 4! P < z , ( X 4 9d $ & ! R + : z 8 , ( V W R 4 0R Y z h , ( ! 7 Y& P Z,;D 9_8 8 _< z , ( A V W YL T 9 : &9d z , ( a ! +
0x45681c…4569b0 Dummy {f00=0x0161, f01=0x40ea, f02=»7 Y P _6 & Q 9d! )0 + z ( $ P 7 Y Z $ _ : { ( H D ! P P PN P +P: MQ OP WP oP sQ { R R R { T 0 , +P mP T P SZ P Q Q P. P { { @ { : &9d z , ( a ! +
0x4569b0…456b44 Dummy {f00=0x0161, f01=0x0190, f02=» 4 F IDENT I:MUL P,REL=4.2,791116,870136940420 | I:MUL I:SH1L | < I:MUL | T , ( V ) " T *V &V | f , ( ! : V S W P 9 S W _ | , ( A V P W T V E + | , ( a : &
0x456b44…456cd8 Dummy {f00=0x0161, f01=0x0190, f02=» | ~ , ( P Z P [ 9a Z } , ( $" T 9d! P P [ Z w } N I:ADD } ~ , ( [ P V H )_ } , ( _X z R z ! P 1` { } , ( / V (9h T W z
0x456cd8…456e6c Dummy {f00=0x0161, f01=0x405c, f02=» @ TV %V 3P CV OW PP P6 P( P X R 'P aP oP sP } ~ F@ ~ X
0x456e6c…457000 Dummy {f00=0x0161, f01=0x0190, f02=» 4 F IDENT I:DIV P,REL=4.2,791116,870136940420 I:DIV I:SH1R < I:DIV T , ( " T *V &V f ! P = , ( ' ;@ R P W ;a , ( G =a P " R & R V
0x457000…457194 (3, 65) Dummy {f00=0x0161, f01=0x0190, f02=» [ $ [ [ I:SUB & * & QD 6 , ( z " ! ! R 2` { z d , ( " P ! R 2` { 1 ! { [ I:CPA I:SH1L , ( Z Q
0x457194…457328 Dummy {f00=0x0161, f01=0x0190, f02=» n , ( q Z ! Z $ * & P Z %_N [ Q > * & R [ Z { l , ( z 9e! W Z I:SH1R , ( : V I _ , " -! 9H
0x457328…4574bc Dummy {f00=0x0161, f01=0x4020, f02=»W v @ Z ! Z $ * & P Z %_N [ Q > * & R [ Z { l , ( z 9e! W Z I:SH1R , ( : V I _ , " -! 9H
0x4574bc…457650 Dummy {f00=0x0161, f01=0x40d0, f02=» 4 F IDENT I:NTF P,REL=4.2,791116,870136940420 I:NTFAK < I:NTFAK N , ( Z H D & H b $ ! D % [ ( 8 @ P P END ,PS P LDR* OP2A,WK1 P LD
0x457650…4577e4 Dummy {f00=0x0161, f01=0x0190, f02=» 4 F IDENT I:EDT P,REL=4.2,791116,870136940420 F B I:EDT I:EDW I:ED1 I:EDSK I:EVT I:ETAB I:EXITL I:ETXT I:ECPY < D @ I:ECTR I:ESL I:ENL I:EOR I:ECW I:ECWC I:EFIL` I:EFLA I:SCB I:FFSN , ( !! gg++
0x4577e4…457978 Dummy {f00=0x0161, f01=0x0190, f02=» I:EGTB I:EVI I:EVA3 * I:EVA0 < * & AUT N I:EVNO | I:EPICV I:ESKI I:EBRI: I:EBRB I:EBR * & Q T
0x457978…457b0c Dummy {f00=0x0161, f01=0x0190, f02=» 6 K K K | I:EDT I:ED1 . I:EDW @ , ( K V K : R I:EVA6 , ( T R B " V , ( V Z P 2 " T W , ( "@T
0x457b0c…457ca0 Dummy {f00=0x0161, f01=0x0190, f02=» [ Z P $ z I:EXITL l , ( U [ V 7_ Z . , ( u $ Z 7 Z Z P ^ I:FFSN , ( @ $ : V P:BAS * & R (Q V : &
0x457ca0…457e34 (3, 66) Dummy {f00=0x0162, f01=0x0190, f02=» Q : P | I:ECTR I:ESL 0 I:ENL ( B , ( 4 ! T _ K W W +_ T I:EOR > T:EDWF I:ECW H , ( + K W _& X (W T:EDWE I:ECWC R
0x457e34…457fc8 Dummy {f00=0x0162, f01=0x40c4, f02=» > g l i H k 2 m ( s u : : P ~ H D ! T W T W 9 OP y P R Q P Qf P TV f WJ : $ ! $ #W + > / : 9W. GW eV n @ K W _& X (W T:EDWE I:ECWC R
0x457fc8…45815c Dummy {f00=0x0162, f01=0x0190, f02=» 4 F IDENT I:EDTE P,REL=4.2,791116,870136940420 D @ I:EKIHK I:EINH I:EVIN I:EBRI I:EBRB I:EBR I:ESKI I:EVNOC < I:EGTD I:EGTB I:EKIHK I:EINH I:ETAB I:EVIN , ( @ : ! P
0x45815c…4582f0 Dummy {f00=0x0162, f01=0x4144, f02=» : ! )P9H # T &W I:EBR j " I:EBRB n 4 , ( Y &" :I : : P & H I:ESKI x I:EVNOC I:EGTD I:EGTB & " y _ &X _ : : : : 8 4 P P 'P -
0x4582f0…458484 Dummy {f00=0x0162, f01=0x40e0, f02=» 4 F IDENT I:EDS P,REL=4.2,791116,870136940420 I:EDS < I:EDS L I:EVS2 ^ I:ED1 p , ( : { : & @ IN STRING " P CF PS,I:ED1 EDIT OF S
0x458484…458618 Dummy {f00=0x0162, f01=0x0190, f02=» 4 F IDENT I:STR P,REL=4.2,791116,870136940420 $ I:INS I:DLT I:MCH I:CPY I:XCP < I:DLT d I:EVS1 v I:MCH , ( @ P 9 _ , ( @ [ , ( ; Z
0x458618…4587ac Dummy {f00=0x0162, f01=0x418e, f02=»W ) l I:EVS2 , ( V E I:CPY N I:XCP ` , ( W [ : r , ( Z !0P 4 R :d" 8 R ! :DW , ( ! 9 R R Y, : I:M
0x4587ac…458940 Dummy {f00=0x0162, f01=0x4148, f02=» 4 F IDENT I:EVS P,REL=4.2,791116,870136940420 I:EVS1K I:EVS2 < I:EVA0 V , ( A jP kT h I:EVS1K 8 , ( T : & 9! " : $ : I:EVA2 I:EVS2 =
0x458940…458ad4 (3, 67) Dummy {f00=0x0162, f01=0x0190, f02=» 4 F IDENT I:ADS P,REL=4.2,791116,870136940420 u I:ADD I:SUB u < I:ADD u R I:SUB u d , ( W " T & T + : u v I:CPA u , ( ! * & !@P `1` P Q u " ? [ ; u
0x458ad4…458c68 Dummy {f00=0x0162, f01=0x418e, f02=» T u l , ( R R ` ; <( v , ( Q P # W " <! =# T W = Z v < , ( P _ V ^< `_@ v l , ( R Q <# =_ P :" P * U v , ( 5 P 1`! T "# 9e! # K v U :
0x458c68…458dfc Dummy {f00=0x0162, f01=0x0190, f02=» 4 F IDENT I:EPIC P,REL=4.2,791116,870136940420 I:EPICK < I:EPICK N I:EVA0 b : + t [ [ < , ( ! !AAP !TTT W !**T * [ R A !FFP !EE
0x458dfc…458f90 Dummy {f00=0x0162, f01=0x0190, f02=» *W FP . :T Z ! XBW *X& I:SCB 0 * & @ W :P # U 1 p !00T ; @ , ( _ 9P F " X6# ; W n )0_: , ( J R Z R 4! P ;)0 , ( 9U ? Z ] 49d
0x458f90…459124 Dummy {f00=0x0162, f01=0x4118, f02=» !-- z ;$# + ^" _( " T tX. PT*AXYZ9 $ H D ! ` %P +T /W 5T ?R EP KT OW S P Wn W8 Wf J H D ! T& W, P T W F W@ P U T P W R( R P U ; ?U mW qW
0x459124…4592b8 Dummy {f00=0x0162, f01=0x018e, f02=» J F IDENT START REL 2.1*79-10-20 870150540210 J F " LINHONK LINHOF ATMASB LSAVOF LSAVON EMULA LIOLON LIOLOFC VDUKB R . * DCTASK DC1INQN DC2INQ REQTIM ICWRTE@ , ( , ( !
0x4592b8…45944c Dummy {f00=0x0162, f01=0x0190, f02=» , ( , ( 4 , ( d , ( , ( , ( !
0x45944c…4595e0 Dummy {f00=0x0162, f01=0x018e, f02=»CGETM , ( _ ( ( RLRBUFV > EMULA P VDUKB b , ( { B _ C ( : t , ( O . V P ! ERASE , ( O
0x4595e0…459774 (3, 68) Dummy {f00=0x0162, f01=0x018e, f02=» , ( P P _J C DC1INQN : 8 , ( 1 C W ( L DC2INQ R | , ( Q : O ," 2 X N , ( q N ! O _ O B P B P KEYCNV , (
0x459774…459908 Dummy {f00=0x0162, f01=0x0190, f02=» REQTIM , ( ( : C ( : : N V , ( W N R W N P H , ( / R W N PV W O x SETCUR , ( O : N P R , ( m PR P_ O
0x459908…459a9c Dummy {f00=0x0162, f01=0x0190, f02=»% Q _ _6 N z , ( { V - : N ` V , ( - : P " V " H J , ( ) O : N U P z , ( I P P R W # O , ( i : Y2# 6 ,
0x459a9c…459c30 Dummy {f00=0x0162, f01=0x0190, f02=» j , ( $ P v N T 9 , ( N P N + 9 N P <! : , ( ' T = + V E % # P & j WCHAR , ( G P W % N T , ( @ e O Q B ! PT ,
0x459c30…459dc4 Dummy {f00=0x0162, f01=0x0190, f02=» O j , ( : T W P , ( P H + ) _ : DISPL j , ( # O N _ P $# P z TASCII TRPAN , ( A _ : . H : , ( ] O
0x459dc4…459f58 Dummy {f00=0x0162, f01=0x0190, f02=»R l , ( Q <_8 O : O 1R Q 9_R , ( : _ < I:RT1 l , ( O | , ( D$ - H : , ( 1 N # P N N
0x459f58…45a0ec Dummy {f00=0x0162, f01=0x0190, f02=» Z: _H " N P R , ( O : N - O 0 , ( B + I I C ( : ` LIOLON LIOLOFC LINHONK LINHOF , ( W W W W W W W W
0x45a0ec…45a280 Dummy {f00=0x0162, f01=0x0190, f02=» Q O O : | , ( I P _ ]$ O , ( i O : N O : L , ( Q T O O : | , ( R : _* 0 : O , ( O : N
0x45a280…45a414 (3, 69) Dummy {f00=0x0162, f01=0x0190, f02=» d H D ! ! # % ' ) + - / 1 3 5 7 9 ; = ? H D ! A C E G I K M O Q S U W Y [ ] _ l H D ! a c e g i k m o q s u w y { } H D !
0x45a414…45a5a8 Dummy {f00=0x0162, f01=0x0190, f02=» P H D ! X x H | H D ! X H D ! 8 $ 2 X 0 H D ! ! # % ' )
0x45a5a8…45a73c Dummy {f00=0x0162, f01=0x0190, f02=» 9W I q P P P P V W6 R #W& 1R 7W AV H D !HC GW Q . eR oR . P T T T Q P T Q D H D ! !V ; AU GP( OP U . YP [R _W { P T P> H D ! P P T P !P +T
0x45a73c…45a8d0 Dummy {f00=0x0162, f01=0x411e, f02=» W( R6 P Q0 W R" Q t H D ! R Q % 9P = I M SQ, 0 H D !$ sP P . P R W, W, W$ W$ W W W W W W | < 8 W W W W 3 9Q IP W { Q T R
0x45a8d0…45aa64 Dummy {f00=0x0162, f01=0x0190, f02=» J F IDENT VDUPRT 2.1DK 1 79-10-20 870150540210 D @ TRPFY TRPAY ERASE SETCUR ERASUPA DISPL ERASUAL WCHAR UPDATE R , ( RFMDUP DCINP RLRBUF DCGETM GTRBUF DCINP , ( O N T B O N
0x45aa64…45abf8 Dummy {f00=0x0162, f01=0x018e, f02=» N " P N " O N " P SNBUSY $ , ( [@ N " O W B 6 DCGETM | f REQTIM` z , ( y : C C C ( :
0x45abf8…45ad8c Dummy {f00=0x0162, f01=0x0190, f02=» f , ( $ _ Q = : $ : <" T TEBCDI 8 , ( $ _ $ H !?9F $ H "? J , ( % : , N / z , ( %1 O ( $ B P N ' O LSAVOF , ( %QH
0x45ad8c…45af20 Dummy {f00=0x0162, f01=0x0190, f02=»% !`P V 0 !`P X $ , ( % _ " T V 0 !` V _ , UPDATE % , ( $ % $ %r_J : O B p , ( & $ T $ 1P 5P ?P , ( &% 7 W N W , ( &E
0x45af20…45b0b4 (3, 70) Dummy {f00=0x0163, f01=0x0190, f02=» & P P P P T |_X , ( & T }_b T ~_l T 0_v 0 , ( & T _ B $ : $ H ` , ( ' ! :a" _ $ ^, _ , ( '# O _ T ^ 0 " , ( 'C R 1 _ " X
0x45b0b4…45b248 Dummy {f00=0x0163, f01=0x018e, f02=» &Z N & $ H , ( ' V L 1P Y & ICWRTE: P * & ' ( K@ V O b , ( ' & $ H O " P N T , ( ( B + I I I C , ( (; ( N
0x45b248…45b3dc Dummy {f00=0x0163, f01=0x0190, f02=» , ( ( N T ; 1 B E C ERASUPA( 4 , ( ( ( : : O H , ( ( O P " R V 0" x , ( ( ^ " O P W P ERASUAL)$ , ( ) W R
0x45b3dc…45b570 Dummy {f00=0x0163, f01=0x0190, f02=» " Q _< R | TRPAY) , ( ) X 0" Z0 _" $ $ . TRPFY) ^ DISPL) p , ( EP) % : : $ $ %l % _ , ( ) C P " , ( ) Q " 2 O P PR
0x45b570…45b704 Dummy {f00=0x0163, f01=0x0190, f02=» ] r , ( *{ _r PR V 0 " 1 SETCUR * B , ( * ZJ_, C N C V , ( * PR C P_ C ( O WCHAR* RFMDUP * , ( * : B E _D {T * `
0x45b704…45b898 Dummy {f00=0x0163, f01=0x018e, f02=» + E l , ( +[ E :h E T C ( C , ( +{ C _ N P " P W = < , ( + : R P T - : l + : H D ! $ | TT 3% 7) GP YP iW u$ $ $ $ P $ P $ Q $ T %EP %qW H D ! *% P % VD%
0x45b898…45ba2c Dummy {f00=0x0163, f01=0x4146, f02=» H D ! & T & T '-T"'CR ' P ' R ' )$' P ( P4( T.(OT (eT ( V ( T(( R ( V H D ! ) P ) W ) P )#WB)+R )7T.)CV")GTZ)SW )YR )oR )sP ) T ) R ) + ) Q P H D !Z * Pv* + * R * +,* + * V *#+ *7R$*CT *KT *ST *eP *iP *mW * R * +, D @ P * V * + * R * * * T * T +1PD
0x45ba2c…45bbc0 Dummy {f00=0x0163, f01=0x8190, f02=» J F IDENT PRT REL 2.1*79-10-20 870150540210 SNBUSYK PRINT ICREAD R PRINT r I:EVA0 EMULA , ( @ . V P ! DC1INQ , ( O O N T N
0x45bbc0…45bd54 (3, 71) Dummy {f00=0x0163, f01=0x8190, f02=» C n GTRBUF DCGETM , ( y ( : P O W 2 UPDATE b , ( @ O B O N T N t , ( O : O ( : , ( O 8 O N Z_ (@P , (
0x45bd54…45bee8 Dummy {f00=0x0163, f01=0x818e, f02=» RFMDUP , ( S X }T 9 ~T 5 aR , ( q = _X = R F , ( 0" ZZ_" pR v , ( V 0" 1 V " 2 P W X , ( {T * = ~X@ }P , (
0x45bee8…45c07c Dummy {f00=0x0163, f01=0xc162, f02=» f , ( Q ( Z 0 O ( SNBUSYK 8 , ( q B : C ( L : | H D !,u )T 3T A ` UP| ] ~ P WF T T )R - $ H D ! 7 CV IP4 MW YT aT mR R $ R
0x45c07c…45c210 Dummy {f00=0x0163, f01=0x0190, f02=» J F IDENT TB3270 2.1DK 1 79-05-23 870150540210 TASCIIK TEBCDI KEYCNV R TASCIIK t , ( ABCDEFGHI#.<(+!&JKLMNOPQR$]*);^ TEBCDI @ , ( ! -/STUVWXYZ@,%_>?0123456789:[ '=" , ( A
0x45c210…45c3a4 Dummy {f00=0x0163, f01=0x4126, f02=»EYCNV , ( , ( pR wQ PW R R W @ , ( H : p , ( 01234567 ! 89 $ R Q W R R W
0x45c3a4…45c538 Dummy {f00=0x0163, f01=0x0190, f02=» J F IDENT PRT REL 2.1*800222NJ 870150540210 SNBUSYK PRINT ICREAD R PRINT r I:EVA0 EMULA , ( @ . V P ! DC1INQ , ( O O N T N
0x45c538…45c6cc Dummy {f00=0x0163, f01=0x0190, f02=» C n GTRBUF DCGETM , ( y ( : P O W 2 UPDATE b , ( @ O B O N T N t , ( O : O ( : , ( O 8 O N Z_ (@P , (
0x45c6cc…45c860 Dummy {f00=0x0163, f01=0x018e, f02=» RFMDUP , ( S X }T 9 ~T 5 aR , ( q = _X = R F , ( 0" ZZ_" N @ GP W v , ( pR V 0" 1 V , ( " 2 P W X {T * = , (
0x45c860…45c9f4 (3, 72) Dummy {f00=0x0152, f01=0x0190, f02=» f , ( Q " |T 1 ] C ( B , ( q + ] 4 O W " |T 8 , ( ] N C ( Z 4 O h SNBUSYK , ( ( B : C ( : H D !,u )T 3T
0x45c9f4…45cb88 Dummy {f00=0x0152, f01=0x4052, f02=» 4 0 W T P* R 4 / 4 9R OP2 [T, W. T" <@ N " |T 8 , ( ] N C ( Z 4 O h SNBUSYK , ( ( B : C ( : H D !,u )T 3T
0x45cb88…45cd1c Dummy {f00=0x0152, f01=0x2008, f02=» L = KMD12 DATE = 80 02 13 1216PACK NBR = 0001 ^
0x45cd1c…45ceb0 Dummy {f00=0x0152, f01=0x0190, f02=» 4 F IDENT T:REWR P,REL=4.2,791116,870136940420 ! . * T:REWRK T:SCUW T:CLRD T:IOWR T:CASP ! < T:IOWR ! n T:CSEG ! T:SCUW ! , ( C ( C : ! T:CLRD . ! T:REWRK 4 ! , (
0x45ceb0…45d044 Dummy {f00=0x0152, f01=0x4156, f02=» X D D : K ! I:EVA3L " & I:EPIC " 8 , ( } $ + Q 2 P P " J T:LOPS " z , ( ( B X # V " I:EVA0 " I:ECPY " I:EVI " , ( :
0x45d044…45d1d8 Dummy {f00=0x0152, f01=0x0190, f02=» 4 F IDENT T:DEDT P,REL=4.2,791116,870136940420 # . * T:TABCK T:TABD T:TABE T:TABN T:SCR2 # < I:EVNON # n I:ESKI # I:EVA0T # I:EBRI # I:EBRBR # I:EBR # , ( #
0x45d1d8…45d36c Dummy {f00=0x0152, f01=0x0190, f02=» # p T:DSL $ T:TABCK & $ T:TABD * $ 4 T:TABE . $ H , ( ! W W X 0Q $ T:EDWI $ I:EVT $ * & ; Y ( Y *P $ I:EDSKL $ T:GRFC $ * & W
0x45d36c…45d500 Dummy {f00=0x0152, f01=0x0190, f02=»_` " P T $ $ , ( &W " P Y 0] Y (_t % " T:EDWF % R * ( " X _. ( X *# P B % d , ( 1 (W " P X X$ C % T:SCR2 % T:SCUR % * & : X *! P
0x45d500…45d694 (3, 73) Dummy {f00=0x0152, f01=0x4080, f02=» )W -W 5Q 9 = IP Qp P P: Vp P4 T WT P P W % P P )W 1T 5W & J R & j@ & |
0x45d694…45d828 Dummy {f00=0x0152, f01=0x0190, f02=» 4 F IDENT T:ENLI P,REL=4.2,791116,870136940420 ' T:DNL T:DSL ' < I:EVNO ' R I:ECPY ' d I:EPIC ' v I:ETXTL ' I:ETAB ' I:EBRI ' I:EBRB ' I:EBR ' * & '
0x45d828…45d9bc Dummy {f00=0x0152, f01=0x0190, f02=» ' I:ESKI ( $ T:DSL & ( 6 T:GRFC ( H T:DNL 4 ( Z , ( ! " Y . Y ,W " ( l , ( 9 Y . X ( X ." P X 0R T Y * ( T:WRDY ( , ( Y P U :H $ K (
0x45d9bc…45db50 Dummy {f00=0x0152, f01=0x4136, f02=» 0U X * ( p , ( # P P T " T : ) T:ENINL ) @ , ( H Y . , Y ( " Y ) R * & *T " T ! 1 W ! ) * : ) H D ! 4 # & 3W IPV ORz QT$ YP _U {T W QH T2 P$ U P ) P T
0x45db50…45dce4 Dummy {f00=0x0152, f01=0x0190, f02=» 4 F IDENT T:EINP P,REL=4.2,791116,870136940420 * " T:PKI T:PINP T:TKI T:TINP * < T:PKI * b T:PINP * t T:GRFC` * I:ETAB * I:EVIN * , ( I Y *T : * I:ECTR * T:EVO
0x45dce4…45de78 Dummy {f00=0x0152, f01=0x0190, f02=» * h , ( Q & X ( " Q Y +Q R " + , ( q P W " U Y , " Q X . X 0 + 8 , ( R P X *:h P P ) Y (W X + h , ( *:h P P P P + , ( P W X ! X $" P Q X ( + , ( # P X
0x45de78…45e00c Dummy {f00=0x0152, f01=0x0190, f02=» - Y ( : X *:h X (! # P X + , ( K & V L T W X , X 0P , , , ( k T X *:h XF XL X (!@T @ , , ( Y ( X , Y t X 0 l _r X ( , , ( P Y (_ P , T:WRDY , , ( @
0x45e00c…45e1a0 Dummy {f00=0x0152, f01=0x0190, f02=» ' X (P X ( , T:CLMI - . , ( E P 8 Y 0 X 2P X - @ , ( c 0V _z Y ( " T Y ( : - p I:EVA0C - , ( $ 8 8 V Y 8 : - , ( " P X & V ( P : :
0x45e1a0…45e334 (3, 74) Dummy {f00=0x0152, f01=0x411e, f02=» W( R6 P Q0 W R" Q t H D ! R Q % 9P = I M SQ, 0 H D !$ sP P . P R W, W, W$ W$ W W W W W W | < 8 W W W W 3 9Q IP W { Q T R
0x45e334…45e4c8 Dummy {f00=0x0152, f01=0x2008, f02=»
0x45e4c8…45e65c Dummy {f00=0x0152, f01=0x0190, f02=» x * & * & D * & r * & 7 * & U * & s
0x45e65c…45e7f0 Dummy {f00=0x0152, f01=0x4188, f02=» * & $ * & R * & ' * & E * & c *
0x45e7f0…45e984 Dummy {f00=0x0152, f01=0x40fe, f02=» L H IDENT D:TB10 TRA 4.2 80-04-10 F1 O1111 REL 2.2 79-11-16 87015054022 D:TB10 T D:TB10T f * & > z * & = > @ *
0x45e984…45eb18 Dummy {f00=0x0152, f01=0x4120, f02=» L H IDENT C:CB10 TRA 4.2 80-04-10 F1 O1111 REL 2.2 79-11-16 87015054022 C:CB10 T C:CB10C f * & @ JKLM z * & NO `@ = L
0x45eb18…45ecac Dummy {f00=0x0152, f01=0x40d2, f02=» L H IDENT D:CB10 TRA 4.2 80-04-10 F1 O1111 REL 2.2 79-11-16 87015054022 D:CB10 T D:CB10C f * & " $ & z F " @ = L
0x45ecac…45ee40 Dummy {f00=0x0152, f01=0x0190, f02=» L H IDENT DATDIV TRA 4.2 80-04-10 F1 O1111 REL 2.2 79-11-16 87015054022 DC1GO GTPGO KBVGO T $$$TRAT p DC1GO * GTPGO KBVGO * & DCTASKT GETTIDA PRINT T:DSC00 VDUKB
0x45ee40…45efd4 (3, 75) Dummy {f00=0x0153, f01=0x0190, f02=» X : - r , ( X ( T X & V H " V . T:CLDY . B ( $ = Y : X $ X : : . T H D !@@ T OP aQv iQ kR qP sW yU } h Q Rv P P P4 W . H D ! Pl Pf P P P< WZ P< Q P2 R$ W
0x45efd4…45f168 Dummy {f00=0x0153, f01=0x4052, f02=» uT P P P T . d W T 'T 9V / T / <@ / N $ = Y : X $ X : : . T H D !@@ T OP aQv iQ kR qP sW yU } h Q Rv P P P4 W . H D ! Pl Pf P P P< WZ P< Q P2 R$ W
0x45f168…45f2fc Dummy {f00=0x0153, f01=0x0190, f02=» 4 F IDENT T:ENIN P,REL=4.2,791116,870136940420 0 T:ENINK T:ENI T:EVOU 0 < T:ENINK 0 T:ENI 0 p , ( X Y " X Y $ X Y & X @W X 0 T:LOFS 0 , ( ! < Y = " 0 I:EGTBC 0 * &
0x45f2fc…45f490 Dummy {f00=0x0153, f01=0x0190, f02=» T:WRDY 1 , ( W X & V D ! P @ W X 1 , ( W Y ( : X , Y X $ Y 1 F , ( X &T Y Y Y W V $ 1 v , ( :H D Y D :H Y ! P V 1 I:EVA0 1 I:EVA1 1 , ( Y
0x45f490…45f624 Dummy {f00=0x0153, f01=0x4110, f02=» Q : 2' " P T 1 I:EVA3 2 . I:EPIC 2 @ , ( mD W : N : 2 R H D ! W CT IW SP a mT" }T W4 W, P W" P W W T WD 2 ( $ P W )P /W A X aP gT qW 2 2
0x45f624…45f7b8 Dummy {f00=0x0153, f01=0x413a, f02=» 4 F IDENT T:SETC P,REL=4.2,791116,870136940420 3 T:SETCK T:SCUR 3 < T:SETCK 3 V T:GRFC 3 j T:EDWI 3 | T:RCTS 3 T:SCUR 3 , ( A C 3 T:WRDY 3 X
0x45f7b8…45f94c Dummy {f00=0x0153, f01=0x40d8, f02=» 4 F IDENT T:CLMI P,REL=4.2,791116,870136940420 4 T:CLMIK 4 < T:CLMIK 4 N , ( "0P ' Q W ' 4 b ! Y : 4 P Q W 4 ( 4 @ 4 P SCR A2,OP2A CLEAR LOOP P ADKL OP2A,1
0x45f94c…45fae0 Dummy {f00=0x0153, f01=0x0190, f02=» 4 F IDENT T:ATTF P,REL=4.2,791116,870136940420 5 J F " T:ATTFK T:DETF T:ROK T:RNOK T:RCR T:RCTS T:RTES@ T:GRFC T:WRDYC 5 < T:CLDY 5 T:DETF 5 T:ATTFK 5 I:EVA6A 5 I:FFSN 5 , ( W V
0x45fae0…45fc74 (3, 76) Dummy {f00=0x0152, f01=0x0190, f02=» , ( ( N T ; 1 B E C ERASUPA( 4 , ( ( ( : : O H , ( ( O P " R V 0" x , ( ( ^ " O P W P ERASUAL)$ , ( ) W R
0x45fc74…45fe08 Dummy {f00=0x0152, f01=0x0190, f02=» " Q _< R | TRPAY) , ( ) X 0" Z0 _" $ $ . TRPFY) ^ DISPL) p , ( EP) % : : $ $ %l % _ , ( ) C P " , ( ) Q " 2 O P PR
0x45fe08…45ff9c Dummy {f00=0x0152, f01=0x0190, f02=» ] r , ( *{ _r PR V 0 " 1 SETCUR * B , ( * ZJ_, C N C V , ( * PR C P_ C ( O WCHAR* RFMDUP * , ( * : B E _D {T * `
0x45ff9c…460130 Dummy {f00=0x0152, f01=0x018e, f02=» + E l , ( +[ E :h E T C ( C , ( +{ C _ N P " P W = < , ( + : R P T - : l + : H D ! $ | TT 3% 7) GP YP iW u$ $ $ $ P $ P $ Q $ T %EP %qW H D ! *% P % VD%
0x460130…4602c4 Dummy {f00=0x0152, f01=0x4146, f02=» H D ! & T & T '-T"'CR ' P ' R ' )$' P ( P4( T.(OT (eT ( V ( T(( R ( V H D ! ) P ) W ) P )#WB)+R )7T.)CV")GTZ)SW )YR )oR )sP ) T ) R ) + ) Q P H D !Z * Pv* + * R * +,* + * V *#+ *7R$*CT *KT *ST *eP *iP *mW * R * +, D @ P * V * + * R * * * T * T +1PD
0x4602c4…460458 Dummy {f00=0x0152, f01=0x2008, f02=»
0x460458…4605ec Dummy {f00=0x0152, f01=0x0190, f02=» P H D ! X x H | H D ! X H D ! 8 $ 2 X 0 H D ! ! # % ' )
0x4605ec…460780 Dummy {f00=0x0152, f01=0x0190, f02=» 9W I q P P P P V W6 R #W& 1R 7W AV H D !HC GW Q . eR oR . P T T T Q P T Q D H D ! !V ; AU GP( OP U . YP [R _W { P T P> H D ! P P T P !P +T
0x460780…460914 (3, 77) Dummy {f00=0x0153, f01=0x40f6, f02=» B 5 t T:RNOK < 6 T:GRFC @ 6 ( T:WRDYC H 6 < T:EDIOA 6 P * & ; X _ v : C C 6 b T:CLDY 6 $ Y @ : C : 6 @ W @ 6 l 6 @ 6
0x460914…460aa8 Dummy {f00=0x0153, f01=0x0190, f02=» 4 F IDENT T:LSEG P,REL=4.2,791116,870136940420 7 & " T:LOFSK T:LOPS T:LSEG T:CSEG 7 < T:LSEG 7 f T:CSEG 7 z , ( ( R : V E V D ' 7 , ( ! $ T ( W P 7 I:RT1 7 T:LOFSK
0x460aa8…460c3c Dummy {f00=0x0153, f01=0x4010, f02=» f 7 @ 8 SEG P,REL=4.2,791116,870136940420 7 & " T:LOFSK T:LOPS T:LSEG T:CSEG 7 < T:LSEG 7 f T:CSEG 7 z , ( ( R : V E V D ' 7 , ( ! $ T ( W P 7 I:RT1 7 T:LOFSK
0x460c3c…460dd0 Dummy {f00=0x0153, f01=0x413c, f02=» 4 F IDENT T:DC00 P,REL=4.2,791116,870136940420 9 DCREADK DCWRTE DCEXCH 9 < T:FDS0C 9 ^ DCREADK 9 p T:DCR1 9 DCWRTE 9 T:DCW1 9 DCEXCH 9 T:DCE1 9 , ( I$
0x460dd0…460f64 Dummy {f00=0x0153, f01=0x416e, f02=» 4 F IDENT T:DMI0 P,REL=4.2,791116,870136940420 : " IREAD IRNEXT IRWRIT IINSY : < IREAD : b T:FDS0C : t T:IRE1 : IRNEXT : T:IRN1 : IRWRIT : T:IRW1@ : , ( I$
0x460f64…4610f8 Dummy {f00=0x0153, f01=0x40a0, f02=» 4 F IDENT T:ASS0 P,REL=4.2,791116,870136940420 ; ASSIGNK ; < ASSIGNK ; N T:ASSI ; b @ ; t ; @ ; ********** ~ 2 P* * 2 P* CREDIT ASSEMBLER SUBROUTINE E
0x4610f8…46128c Dummy {f00=0x0153, f01=0x40a0, f02=» 4 F IDENT T:IAS0 P,REL=4.2,791116,870136940420 < IASSGNK < < IASSGNK < N T:IASS < b @ < t < @ < ************ ~ 2 P* * 2 P* CREDIT ASSEMBLER SUBROU
0x46128c…461420 Dummy {f00=0x0153, f01=0x40ee, f02=» 4 F IDENT T:DMR0 P,REL=4.2,791116,870136940420 = RREAD RWRITE = < T:FDS0 = T RREAD = f T:RRE1 = x RWRITE = T:RWR1 = $ I = = @ = TACK POINTER P*
0x461420…4615b4 (3, 78) Dummy {f00=0x0126, f01=0x0190, f02=» , ( ( N T ; 1 B E C ERASUPA( 4 , ( ( ( : : O H , ( ( O P " R V 0" x , ( ( ^ " O P W P ERASUAL)$ , ( ) W R
0x4615b4…461748 Dummy {f00=0x0126, f01=0x0190, f02=» " Q _< R | TRPAY) , ( ) X 0" Z0 _" $ $ . TRPFY) ^ DISPL) p , ( EP) % : : $ $ %l % _ , ( ) C P " , ( ) Q " 2 O P PR
0x461748…4618dc Dummy {f00=0x0126, f01=0x0190, f02=» ] r , ( *{ _r PR V 0 " 1 SETCUR * B , ( * ZJ_, C N C V , ( * PR C P_ C ( O WCHAR* RFMDUP * , ( * : B E _D {T * `
0x4618dc…461a70 Dummy {f00=0x0126, f01=0x018e, f02=» + E l , ( +[ E :h E T C ( C , ( +{ C _ N P " P W = < , ( + : R P T - : l + : H D ! $ | TT 3% 7) GP YP iW u$ $ $ $ P $ P $ Q $ T %EP %qW H D ! *% P % VD%
0x461a70…461c04 Dummy {f00=0x0126, f01=0x4146, f02=» H D ! & T & T '-T"'CR ' P ' R ' )$' P ( P4( T.(OT (eT ( V ( T(( R ( V H D ! ) P ) W ) P )#WB)+R )7T.)CV")GTZ)SW )YR )oR )sP ) T ) R ) + ) Q P H D !Z * Pv* + * R * +,* + * V *#+ *7R$*CT *KT *ST *eP *iP *mW * R * +, D @ P * V * + * R * * * T * T +1PD
0x461c04…461d98 Dummy {f00=0x0126, f01=0x2008, f02=»
0x461d98…461f2c Dummy {f00=0x0126, f01=0x0190, f02=» P H D ! X x H | H D ! X H D ! 8 $ 2 X 0 H D ! ! # % ' )
0x461f2c…4620c0 Dummy {f00=0x0126, f01=0x0190, f02=» 9W I q P P P P V W6 R #W& 1R 7W AV H D !HC GW Q . eR oR . P T T T Q P T Q D H D ! !V ; AU GP( OP U . YP [R _W { P T P> H D ! P P T P !P +T
0x4620c0…462254 (3, 79) Opaque[0x194]
0x462254…4623e8 # DirEnt {nam=»TEST «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2b00, f03=0x0000}
0x462254…4623e8 IdxSect {
0x462254…4623e8 f00 = 0x0158 // 0x462254 @0x0
0x462254…4623e8 f01 = 0x0002 // 0x462256 @0x2
0x462254…4623e8 gno = [ // 0x462258 @0x4
0x462254…4623e8 [0x00]: C0x0158.0x0.0
0x462254…4623e8 ]
0x462254…4623e8 }
0x4623e8…46257c Dummy {f00=0x0158, f01=0x006a, f02=» PRT C267 ASM START ASM VDUPRT & ASM PRT 8 ASM TB3270 H ASG /E0,TY10 Z
0x46257c…462710 Dummy {f00=0x0158, f01=0x2008, f02=» C267 ASM START ASM VDUPRT & ASM PRT 8 ASM TB3270 H ASG /E0,TY10 Z
0x462710…4628a4 Dummy {f00=0x0158, f01=0x2008, f02=» COMBINATIONS ARE VALID: " HMES 1 A,A+AU,A+AOUT,A+AU+AOUT ( " HMES 2 C,C+CU,C+COUT,C+CU+COUT N " HMES 3 M,M+MU,M+MOUT,M+MU+MOUT t HMES 4 FC : HMES ANY COMBINATION OF ALTERNATIVE 1,2 AND 3 IS VALID, 0 HMES AND AT LEAST ONE OF THEM MUS
0x4628a4…462a38 Dummy {f00=0x0158, f01=0x2008, f02=» PT; P01; PTID=LA; " PTCL=LA; 2 PLEV=60; B P00; R P04; ^ PSCL=S02; j PSCL=S03; z PSCL=S04; PSCL=S05; PT; P01; PTID=D0; PTCL=D0; PLEV=60; P00; P00; P
0x462a38…462bcc Dummy {f00=0x0158, f01=0x0190, f02=»P WH . A & A 0R 9Q 0 A & :B ._" A & " . A x 0R$ 9U AR FQ 0:D A x ._* 'T .:H_ A x " A A 4 T A A " , "! R _U .WV A : A " 9d
0x462bcc…462d60 Dummy {f00=0x0158, f01=0x0190, f02=» " | ( A( z( A " A @ P A ( A " ! 1 Q (P _ # # H A " A A 4 4 @ I T A A A T A T @ : + j [ [
0x462d60…462ef4 (3, 80) Opaque[0x194]
0x462ef4…463088 # DirEnt {nam=»OBDIR «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0050, f03=0x0000}
0x462ef4…463088 IdxSect {
0x462ef4…463088 f00 = 0x0002 // 0x462ef4 @0x0
0x462ef4…463088 f01 = 0x0008 // 0x462ef6 @0x2
0x462ef4…463088 gno = [ // 0x462ef8 @0x4
0x462ef4…463088 [0x00]: C0x0002.0x2.0
0x462ef4…463088 [0x01]: C0x0002.0x3.0
0x462ef4…463088 [0x02]: C0x0003.0x0.0
0x462ef4…463088 [0x03]: C0x0003.0x1.0
0x462ef4…463088 ]
0x462ef4…463088 }
0x463088…46321c Dummy {f00=0x0002, f01=0x000c, f02=»800415 EMULA DC1INQ ICREAD ` REQTIM GTRBUF DCGETM UPDATE RFMDUP SNBUSYK GTRBUF $ RLRBUF $ TEBCDI LSAVOF TASCII UPDATE % ICWRTE: ERASE(r ERASUPA( ERASUAL)$ TRPAY) TRPFY) DISPL) SETCUR *
0x46321c…4633b0 Dummy {f00=0x0002, f01=0x0190, f02=» HDEFDOC 800415 DEFDOCK T:FDSP I:EVA0 T:IO2 FFMOVE 800415 FMOVE I:EVA0 I:EVA5 I:RT1 ( <TYPET 800415 TYPET I:EVA0 I:RT1 >ICLEAR 800415 ICLEARK I:EVA0 I:RT1
0x4633b0…463544 Dummy {f00=0x0002, f01=0x0190, f02=»SN I:EVA0 T:LOPS T:CLMI I:MOV T:GRFC T:ROK zT:STOU 800415 STROU1K T:STEV T:LOFS I:EVA0 T:LOPS T:DUPX T:GRFC T:ROK T:RNOK @T:STEV 800415 T:STEVK T:GRFC I:EVA0 & T:ED
0x463544…4636d8 Dummy {f00=0x0002, f01=0x0190, f02=» T:CLR2 T:CLIT@ T:EKEY T:DYKI 800415 T:DYKIK I:EVA7@ T:CSEGW T:CASP T:CLRD T:EKEY T:RCR T:IOER@ F T:CLR1 T T:CLR2 b T:SCUW T:BELLC T:IOWR T:CLIT T:LOFS I:EVA0 T:LOPSN T:CLMI T:PM1
0x4636d8…46386c Dummy {f00=0x0002, f01=0x0190, f02=» T:RCTS P zT:DUPL 800415 T:DUPLK T:GRFC I:EVA0 T:RNOK T:ROK T:DUPX T:LOFS T:LOPSC I:MOV ` HT:GETC 800415 T:GETCK T:GRFC I:EVA0 I:RT1 < ZT:GETA 800415 T:GETAK T:GRFC
0x46386c…463a00 Dummy {f00=0x0002, f01=0x0190, f02=» T:TLEFK T:TRIG T:TLDO T:TDOW T:TUP T:TFWD T:TBWD T:THOMC " T:GRFC T:TABE T:SCR2 T:TABC T:TABN x T:DISP 800415 T:PRINK T:FDSP T:EDWIC T:GRFCC T:GTIP T:DISP T:ERAS " T:GTIT
0x463a00…463b94 (3, 81) Dummy {f00=0x0002, f01=0x0190, f02=»:GTIT $ T:GRFC T:GTIP 4 I:EVA0 I:EVA2 Z T:REWR ! 800415 T:IOWR T:CSEG T:SCUW T:CLRD . T:REWRK 4 T:CASP R T:LOFS I:EVA3L I:EPIC T:LOPS I:EVA0 I:ECPY I:EVI ,T:DEDT # 800415 I:EVN
0x463b94…463d28 Dummy {f00=0x0002, f01=0x0190, f02=» * T:TABE . T:EDWI I:EVT I:EDSKL T:GRFC T:ENIN T:LOPS T:EDWF T:SCR2 T:SCUR T:TABN H T:RCR R T:ENLI ' 800415 I:EVNO I:ECPY I:EPIC I:ETXTL I:ETAB I:EBRI I:EBRB I:EBR I:EOR I:EXIT I:ECW
0x463d28…463ebc Dummy {f00=0x0002, f01=0x0190, f02=»EINP * 800415 T:PKI T:PINP T:GRFC` I:ETAB I:EVIN I:ECTR T:EVOU T:TINP . T:TKI . T:ENIN T:ENI I:EXIT T:WRDY T:CLMI I:EVA0C T:CLDY T T:ENIN 0 800415 T:ENINK T:ENI T:LOFS I:EGTBC T:W
0x463ebc…464050 Dummy {f00=0x0002, f01=0x0190, f02=»DWI T:RCTS T:SCUR T:WRDY & ,T:CLMI 4 800415 T:CLMIK ( T:ATTF 5 800415 T:DETF T:ATTFK I:EVA6A I:FFSN T:ROK ( T:RCR * I:RT1 T:RCTS 6 T:RTES@ : T:RNOK < T:GRFC @ T:WRDYC H T:EDIOA T:C
0x464050…4641e4 Dummy {f00=0x0002, f01=0x0190, f02=»DS0C DCREADK T:DCR1 DCWRTE T:DCW1 DCEXCH T:DCE1 ~T:DMI0 : 800415 IREAD T:FDS0C T:IRE1 IRNEXT T:IRN1 IRWRIT T:IRW1@ IINSY T:INS1 6T:ASS0 ; 800415 ASSIGNK T:ASSI
0x4641e4…464378 Dummy {f00=0x0002, f01=0x0190, f02=» 6T:SWI0 > 800415 T:SWIT SWITCHK JT:TEI0 ? 800415 T:TEST TESTIOK T:ABOR ABORT LT:CLO0 @ 800415 T:SETT SETTIMK T:GETT GETTIM 4T:DEL0 A 800415 T:DELA DELAY
0x464378…46450c Dummy {f00=0x0002, f01=0x0190, f02=»:DCW1 T:EDION T:IO2 T:DCEX & T:DCE1 * I:EVA0L T:DMI E 800415 T:IREAK T:FDSPA T:IRE1 T:IO2 T:IRNE T:IRN1 T:IRWR T:IRW1 $ T:STCW T:IO1 T:IINSL 2 T:INS1 6 I:EVA0 RT:ASSI G 8004
0x46450c…4646a0 Dummy {f00=0x0002, f01=0x0190, f02=»:RT1 PT:ASG0 K 800415 ASSGN & T:CSEGA T:FDSPA I:EVA0 I:RT1 ~T:DMR M 800415 T:RREAK T:FDSP T:RRE1 I:EVA0 T:STCW T:IO2 T:RWRI $ T:RWR1 ( T:IO1 F >T:SWI O 800415 T:SWITK T
0x4646a0…464834 (3, 82) Dummy {f00=0x0003, f01=0x0190, f02=»0415 T:SETTK I:EVA0 T:CSEG I:RT1 T:GETT 6 HT:DEL R 800415 T:DELAK I:EVA0 T:CSEG I:RT1 <T:MSK0 S 800415 MASKY I:EVA0 I:RT1 zT:SCD T 800415 T:ACTVK P:BAS I:NTPB T
0x464834…4649c8 Dummy {f00=0x0003, f01=0x0190, f02=»:RT0 D RT:UNUS X 800415 T:UNUSK P:MTAB T:CSEG I:RT1 T:UERR ,T:EXIT Z 800415 T:EXITK PT:GTCW [ 800415 T:FDSP GETCW I:EVA0 T:GTCW I:RT1 >T:GTID 800415 T:GETIK
0x4649c8…464b5c Dummy {f00=0x0003, f01=0x0190, f02=»2 T:XSTA T:WAIT@ T:CSEGW T:MWAID T:IO1 T:IO2 T:IO3 T:IO4 $ T:IORE 8 I:RT1 T:EDWR I:EDW T:EDWEC T:EDWF T:EDWIN T:EDIO T:KIPR I:EVA7 T:FDS0 x T:FDSP, T:GDSP P:MTABN I:EVTO I:FML
0x464b5c…464cf0 Dummy {f00=0x0003, f01=0x0190, f02=» T:LSEG T:IORE T:KIAAC T:KIAC ,T:ABUF i 800415 T:ABUFK @WRITEL j 800415 WRITELK T:FDS0 I:EVA0 0 0I:NTP k 800415 I:MOV I:ADD I:SUB I:CMP I:MUL I:DIV I:EDT I:CPY I:INS I:DLT
0x464cf0…464e84 Dummy {f00=0x0003, f01=0x0190, f02=»T1 I:RT0 T:BAT T:PAT P:MTAB T:CAT I:EVB C V I:EVA p 800415 P:MTAB I:EVA2 I:EVA1 I:EVA3 $ I:EVA6 ( I:EVA5 . I:EVA7L 2 I:EVA0K T:LOFS T:LOPS I:FML I:EVTO * I:EVI l I:EVB ~ 2I:CMP
0x464e84…465018 Dummy {f00=0x0003, f01=0x0190, f02=» VI:MUL z 800415 I:MUL I:MOV I:NTFA I:SUB I:ADD I:SH1L X hI:DIV } 800415 I:DIV I:MOV I:NTFAL I:SUB I:CPA I:SH1L I:ADD I:SH1R ,I:NTF 800415 I:NTFAK 8 I:EDT 8004
0x465018…4651ac Dummy {f00=0x0003, f01=0x0190, f02=»:EBRB I:EBR I:EINH I:EKIH I:EDSK x I:EDT I:ED1 I:EDW I:EVA6 I:EFLA 2 T:LSEGS I:EXITL l I:FFSN P:BAS I:ETAB I:ETXT I:ECPY I:ECTR I:ESL I:ENL ( I:EOR > T:EDWF I:ECW H T:EDWE I:ECWC R I
0x4651ac…465340 Dummy {f00=0x0003, f01=0x0190, f02=»BR j I:EBRB n I:ESKI I:EVNOC I:EGTD I:EGTB <I:EDS 800415 I:EDS I:EVS2 I:ED1 & nI:STR 800415 I:DLT I:EVS1 I:MCH I:INS p I:EVS2 I:CPY I:XCP I:MVC LI:EVS 80
0x465340…4654d4 (3, 83) Dummy {f00=0x0003, f01=0x0190, f02=» 800415 I:EPICK I:EVA0 I:SCB `START 800415 DCTASK P I:EVA0 GTRBUF DCGETM RLRBUFV EMULA VDUKB ERASE ICREAD DCINP DC1INQN : DC2INQ R KEYCNV REQTIM SETCUR WCHAR DISPL TASCII TRPAN
0x4654d4…465668 Dummy {f00=0x0003, f01=0x0190, f02=» VDUPRT 800415 DCINP LINHON LSAVON ATMASB LINHOFC SNBUSY DCGETM | REQTIM` GTRBUF $ RLRBUF $ TEBCDI LSAVOF TASCII UPDATE % ICWRTE: ERASE(r ERASUPA( ERASUAL)$ TRPAY) TRPFY) DISPL) SETCUR *
0x465668…4657fc Dummy {f00=0x0003, f01=0x4072, f02=» I:EVA0 EMULA DC1INQ ICREAD ` REQTIM GTRBUF DCGETM UPDATE RFMDUP SNBUSYK GTRBUF $ RLRBUF $ TEBCDI LSAVOF TASCII UPDATE % ICWRTE: ERASE(r ERASUPA( ERASUAL)$ TRPAY) TRPFY) DISPL) SETCUR *
0x4657fc…465990 Dummy {f00=0x0003, f01=0x0190, f02=» O N T B O N - O N N " P N " O N " P N " O W B p : C C C ( :] f ( P _@ C ( : P O W O o x O N T N O
0x465990…465b24 Dummy {f00=0x0003, f01=0x0190, f02=»Z R _ 0" 1 V " 2 P4 W X }T 9 ~T 5 aR = _X = R 0" ZZ_" pR [ Vb 0" 1 V " 2 P. W X {T * = ~X@ }P* [ = R 0" ZT_" Z Z O R 0
0x465b24…465cb8 Dummy {f00=0x0003, f01=0x0190, f02=» O N T B O N - O N N " P N " O N " P N " O W B p : C C C ( :] f ( P _@ C ( : P O W O o x O N T N O
0x465cb8…465e4c Dummy {f00=0x0003, f01=0x0190, f02=»Z R _ 0" 1 V " 2 P4 W X }T 9 ~T 5 aR = _X = R 0" ZZ_" pR [ Vb 0" 1 V " 2 P. W X {T * = ~X@ }P* [ = R 0" ZT_" Z Z O R 0
0x465e4c…465fe0 Dummy {f00=0x0003, f01=0x0190, f02=» O N T B O N - O N N " P N " O N " P N " O W B p : C C C ( :] f ( P _@ C ( : P O W O o x O N T N O
0x465fe0…466174 (3, 84) Opaque[0x194]
0x466174…466308 # DirEnt {nam=»A:3270«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0030, f03=0x0000}
0x466174…466308 IdxSect {
0x466174…466308 f00 = 0x0001 // 0x466174 @0x0
0x466174…466308 f01 = 0x0012 // 0x466176 @0x2
0x466174…466308 gno = [ // 0x466178 @0x4
0x466174…466308 [0x00]: C0x0001.0x2.0
0x466174…466308 [0x01]: C0x0001.0x3.0
0x466174…466308 [0x02]: C0x0002.0x0.0
0x466174…466308 [0x03]: C0x0002.0x1.0
0x466174…466308 [0x04]: C0x0003.0x3.0
0x466174…466308 [0x05]: C0x0004.0x0.0
0x466174…466308 [0x06]: C0x0004.0x1.0
0x466174…466308 [0x07]: C0x0004.0x2.0
0x466174…466308 [0x08]: C0x0004.0x3.0
0x466174…466308 ]
0x466174…466308 }
0x466308…46649c Dummy {f00=0x0001, f01=0x0190, f02=» @] CR r 4 @ P a KA n $ , KA @ * * 0 a
0x46649c…466630 Dummy {f00=0x0001, f01=0x0190, f02=» a LA n $ , LA @ * * ` D0 n $ D0 * "
0x466630…4667c4 Dummy {f00=0x0001, f01=0x0190, f02=»
[…0x4…]
0x466e14…466fa8 Dummy {f00=0x0001, f01=0x0190, f02=»kKGAGBGB " $ & F & $ , ( 0 4 ( 0 0 - 0 _ 0 ! 0 ! 0 0 4%lY %* G@K@ $ $ $ 8 V G 9h ' . W
0x466fa8…46713c Dummy {f00=0x0001, f01=0x0190, f02=» 39#$;< '()*+,-! 2 d P _B B 'W ( Wj & W ^ ( 1W C C C ( ' Pb I "%@P "% P& B C C 4 "5 # B P B P B 5 P C
0x46713c…4672d0 Dummy {f00=0x0001, f01=0x0190, f02=» ( ' P I : % Y C & R V C : B T T T V : 2 ' W 2 6 2 @ " T # ' ?D W"' #? ;D:B " : _ C : : &
0x4672d0…467464 Dummy {f00=0x0001, f01=0x0190, f02=» W V Q 0W Q W Q W R 4 ! P T 0P(W$ 8 C S W C C 0 P C ;a 6 4 ZH T : 49d_Z B@5 @ 8 @N ' @ d P ( z= #0 T B 'W B B "
0x467464…4675f8 Dummy {f00=0x0001, f01=0x0190, f02=» & 1 P 1_ , @ - R T U :B@ ' d x 4 ~ z $ $ 2 2 l . 2 2 h B W V 7 P P W V X _ 9c D | Q W :aW _B
0x4675f8…46778c Dummy {f00=0x0001, f01=0x0190, f02=» V P V W V _ 8^n D 2 ! 9B V T W V P D $ V 6 V % V E @ ' T 2 % 7_ 2 # L 2" &] Y $! 6P Q $ T 9B ^ _ _ 6 @ " T 7 $ V P W _ H .
0x46778c…467920 Dummy {f00=0x0001, f01=0x0190, f02=» " T> ; [ # :H 2 T Z L L D V, W # L E V $ W D V L , Wn 6 2 W " P " # ;b WF " ;d# _ [ v [ Z Z : :B , (Vj ; [ [
0x467920…467ab4 (3, 86) Dummy {f00=0x0002, f01=0x0190, f02=»P : [ [ & @ ! P [ 6 [ Z 7 Z 7 : ( :A ( @ " P [ :;H 2 P ;h : ; V Y : 2! : 6 2 W& " # ;b ; : ;f" #?_" P8"
0x467ab4…467c48 Dummy {f00=0x0002, f01=0x0190, f02=» R W ( V W Q P W ! W V P , V W Q P W $ W V P T V W Z :$0#0;b P P PN P 0 - P: V W Z _ 4 V W Q P ) P 9_ &" ! 9 : & P Q ( ,^ , < 0
0x467c48…467ddc Dummy {f00=0x0002, f01=0x0190, f02=» V W R 4 0R Y 7 Y& P Z,;D 9_8 8 _< V W YL T 9 : &9d! + P & T 9d! T 7 V Y P _$ SZ Q V P V Q W Q 7 Y P._6 & Q 9d! )0 + P 7 Y Z $ _ : V ) " TV
0x467ddc…467f70 Dummy {f00=0x0002, f01=0x0190, f02=» [ [ $ [ [ >h [ [ ~ ~ Z PP [ 9a Z $" T 9d! P6 P( [ Z w [ P V H )_ _X z R z ! P 1` { V (9h T W z 9e! I Z ! : 4 P 9 59D_ " P P [ ! :d"
0x467f70…468104 Dummy {f00=0x0002, f01=0x0190, f02=»T W V E + : V & [ [ [ [ $ [ [ ~ ~ z " ! ! R 2` { z " P ! R 2` { 1 ! { [ Z Q P _ T { [ [ Q@ [ { R [ _
0x468104…468298 Dummy {f00=0x0002, f01=0x0190, f02=» _ , " -! 9H X" ,9 -9d_ Z H D & H D % [ ( !! gg++ L 4 P 6 > 2 @"* @ ( 0 t j ` 0 6 | K K K K V K :
0x468298…46842c Dummy {f00=0x0002, f01=0x0190, f02=» J " J _Z Z [ Z P [ V 7_ Z Z 7 Z Z P : V R (Q V : : J P v I < : J Qf : P 4 ! TV_ K WJ fW +
0x46842c…4685c0 Dummy {f00=0x0002, f01=0x0190, f02=» ! P ! P W : ! )P9H # T &W &" :I : 6 : P & _ &X _ : : : : : { : ~ PX 9 _ [ Z : R" P $ 1T Y W 5 _$ :
0x4685c0…468754 (3, 87) Dummy {f00=0x0002, f01=0x0190, f02=» R ! :DW ! 9 R R Y, : : jP kT T : & 9! " : $ : $ : W " T & T + : * & !@P `1` P Q [ ; 8 V W Q P [ ! X # P 4
0x468754…4688e8 Dummy {f00=0x0002, f01=0x0190, f02=»_ V ^< `_@ R Q <# =_ P :" P * U P 1`! T "# 9e! # K : : + [ [ < !AAP !TTT W !**T * [ R !FFP !EET W I# 6 * B Z 9 ! ; *Xt 8 ! D# 0P Wn 0W8 Wf :T& *W, FP . :T
0x4688e8…468a7c Dummy {f00=0x0002, f01=0x0190, f02=» 9U ? Z ] 49d_. _BU ; :X _ _ z 9d! ) ^ _ ,_ 8 _ : W 8W " 8 !++P !-- z ;$# + ^" _( T tX. PT*AXYZ9(p(p(p(p(p(p(p(p(p(p(p(p( ( ( (p( ( ( ( ( ( ( ( ( ( (p(p(p(p(p(p(p(p(p(p(p(p(p(p(p(p(p(p(p(p(p(p(p(p(p(p(p(p(p
0x468a7c…468c10 Dummy {f00=0x0002, f01=0x0190, f02=»* * * * * * * * * * & & & & & & & & & & & & *^' & & & ( '~'2' +l+ ) )b, ' ' , * & & & ( ( ( & & & (j(j(j(j(j(j(j(j & C ( ( Q -b B Q _ C ( : O + . V P ! %^ UX O + O O N T & N
0x468c10…468da4 Dummy {f00=0x0002, f01=0x0190, f02=» ," 2 X N , N ! O _ O B P B P ( _ N ! b Yb N ! P & Z Y & % N P % # % O ( : C ( : : N V W6 N R W& N P R W N PV W O , W : N
0x468da4…468f38 Dummy {f00=0x0002, f01=0x0190, f02=»% X _ % Q _ _6 N + { V - ( '~ : N + ` V - ( : P " V " '" O '~ : N , U P( P , P R W # O W : , Y2# 6 O O _@ P w N N P N $ T $ P> + 0 w ( 0 w ( ( : , w
0x468f38…4690cc Dummy {f00=0x0002, f01=0x0190, f02=»P W % W N T O , Q '~ B ! PT W : N P Z ,J P Q N P D + % _ ) N + N PP %WF O + : T W ,J P * P H + ) _ O V N _ P $# P _ : . HX
0x4690cc…469260 Dummy {f00=0x0002, f01=0x0190, f02=» * O : O 1R Q 9_R + : _ * , %^ + + + + O . - HX + V UX : N # P + N N + , Q, N V V N P () ) : P _@ Z: _H U V N , P R O : + N - O
0x469260…4693f4 (3, 88) Dummy {f00=0x0003, f01=0x0190, f02=» Q O O : P _ , ]$ O O : N ,` O : , Q T O O : R : _* 0 : O + O + + : N + & C C C ( : Q -b O N TT B O N - O + +
0x4693f4…469588 Dummy {f00=0x0003, f01=0x0190, f02=» O : O 1R Q 9_R : _ %^ O . - H : N # P N N Q N N P () ) : P _@ Z: _H N P R O : N - O
0x469588…46971c Dummy {f00=0x0003, f01=0x0190, f02=» Q O O : P _ , ]$ O O : N ,` O : , Q T O O : R : _* 0 : O + O + + : N + & C C C ( : O N T B O N - O + +
0x46971c…4698b0 Dummy {f00=0x0003, f01=0x0190, f02=» O : O 1R Q 9_R : _ %^ O . - H : N # P N N Q N N P () ) : P _@ Z: _H N P R O : N - O
0x4698b0…469a44 Dummy {f00=0x0003, f01=0x0190, f02=» Q O O : P _ , ]$ O O : N ,` O : , Q T O O : R : _* 0 : O + O + + : N + & C C C ( : O N T B O N - O + +
0x469a44…469bd8 Dummy {f00=0x0003, f01=0x0190, f02=» O : O 1R Q 9_R : _ %^ O . - H : N # P N N Q N N P () ) : P _@ Z: _H N P R O : N - O
0x469bd8…469d6c Dummy {f00=0x0003, f01=0x0190, f02=» Q O O : P _ , ]$ O O : N ,` O : , Q T O O : R : _* 0 : O + O + + : N + & C C C ( : O N T B O N - O + +
0x469d6c…469f00 Dummy {f00=0x0003, f01=0x0190, f02=» O : O 1R Q 9_R : _ %^ O . - H : N # P N N Q N N P () ) : P _@ Z: _H N P R O : N - O
0x469f00…46a094 (3, 89) Dummy {f00=0x0004, f01=0x0190, f02=» Q O O : P _ , ]$ O O : N ,` O : , Q T O O : R : _* 0 : O + O + + : N + & C C C ( : O N T B O N - O + +
0x46a094…46a228 Dummy {f00=0x0004, f01=0x0190, f02=» O : O 1R Q 9_R : _ %^ O . - H : N # P N N Q N N P () ) : P _@ Z: _H N P R O : N - O
0x46a228…46a3bc Dummy {f00=0x0004, f01=0x0190, f02=» Q O O : P _ , ]$ O O : N ,` O : , Q T O O : R : _* 0 : O + O + + : N + & C C C ( : O N T B O N - O + +
0x46a3bc…46a550 Dummy {f00=0x0004, f01=0x0190, f02=» O : O 1R Q 9_R : _ %^ O . - H : N # P N N Q N N P () ) : P _@ Z: _H N P R O : N - O
0x46a550…46a6e4 Dummy {f00=0x0004, f01=0x0190, f02=» Q O O : P _ , ]$ O O : N ,` O : , Q T O O : R : _* 0 : O + O + + : N + & C C C ( : O N T B O N - O + +
0x46a6e4…46a878 Dummy {f00=0x0004, f01=0x0190, f02=» O : O 1R Q 9_R : _ %^ O ? H~ . - H : N # P N N Q N N P () ) : P _@ Z: _H N P R O : N - O
0x46a878…46aa0c Dummy {f00=0x0004, f01=0x0190, f02=» Q O O : P _ , ]$ O O : N ,` O : , Q T O O : R : _* 0 : O + O + + : N + & C C C ( : O N T B O N - O + +
0x46aa0c…46aba0 Dummy {f00=0x0004, f01=0x0190, f02=» O : O 1R Q 9_R : _ %^ O ? H~ . - H : N # P N N Q N N P () ) : P _@ Z: _H N P R O : N - O
0x46aba0…46ad34 (3, 90) Dummy {f00=0x0004, f01=0x0190, f02=» Q O O : P _ , ]$ O O : N ,` O : , Q T O O : R : _* 0 : O + O + + : N + & C C C ( : O N T B O N - O + +
0x46ad34…46aec8 Dummy {f00=0x0004, f01=0x0190, f02=» O : O 1R Q 9_R : _ %^ O ? H~ . - H : N # P N N Q N N P () ) : P _@ Z: _H N P R O : N - O
0x46aec8…46b05c Dummy {f00=0x0004, f01=0x0190, f02=» Q O O : P _ , ]$ O O : N ,` O : , Q T O O : R : _* 0 : O + O + + : N + & C C C ( : O N T B O N - O + +
0x46b05c…46b1f0 Dummy {f00=0x0004, f01=0x0190, f02=» O : O 1R Q 9_R : _ %^ O ? H~ . - H : N # P N N Q N N P () ) : P _@ Z: _H N P R O : N - O
0x46b1f0…46b384 Dummy {f00=0x0004, f01=0x0190, f02=» Q O O : P _ , ]$ O O : N ,` O : , Q T O O : R : _* 0 : O + O + + : N + & C C C ( : O N T B O N - O + +
0x46b384…46b518 Dummy {f00=0x0004, f01=0x0190, f02=» O : O 1R Q 9_R : _ %^ O ? H~ . - H : N # P N N Q N N P () ) : P _@ Z: _H N P R O : N - O
0x46b518…46b6ac Dummy {f00=0x0004, f01=0x0190, f02=» Q O O : P _ , ]$ O O : N ,` O : , Q T O O : R : _* 0 : O + O + + : N + & C C C ( : O N T B O N - O + +
0x46b6ac…46b840 Dummy {f00=0x0004, f01=0x0190, f02=» O : O 1R Q 9_R : _ %^ O ? H~ . - H : N # P N N Q N N P () ) : P _@ Z: _H N P R O : N - O
0x46b840…46b9d4 (3, 91) Dummy {f00=0x0004, f01=0x0190, f02=» Q O O : P _ , ]$ O O : N ,` O : , Q T O O : R : _* 0 : O + O + + : N + & C C C ( : O N T B O N - O + +
0x46b9d4…46bb68 Dummy {f00=0x0004, f01=0x0190, f02=» O : O 1R Q 9_R : _ %^ O ? H~ . - H : N # P N N Q N N ?~ Q : - 4P 0 5 :( _ - (P _ ) 1 : ?~_ Q = :
0x46bb68…46bcfc Dummy {f00=0x0004, f01=0x0190, f02=» ( : + : N W :f"? HX Q "? HX Q : 0 !`P VD 0 !`P X Q _ " T V" 0 !` V _ Q RX_J : O B Q T Q 1P 5P$ ?P$ 7 T W T N W UXW U W T V
0x46bcfc…46be90 Dummy {f00=0x0004, f01=0x0190, f02=» ~_l T 0_v T _ B Q : Q HX ! :a" _ Q ^, _ O _ T" ^ 0 " R 1 _ " X S8 0 " Z _ Q ^ Q * P R S@ 1 _ Q ^ V S@ N S Q HX V L 1P Y
0x46be90…46c024 Dummy {f00=0x0004, f01=0x0190, f02=» " T : ^ 0"`T 0" 1 _ V 1 _ O O O N T( ; 1 B E C ( : : O O P " R V 0" ^ " O P W P WB R T. P " V"" TZ P " Q
0x46c024…46c1b8 Dummy {f00=0x0004, f01=0x0190, f02=» Q| Q RR Rt_ C W P " Q " 2 O Pv Xl PR X Xl V 0 X " 1 R$ X4 }T 9 ~T 5 |T < ] _R" 2 O P " P W ] _r PR X V 0 X " 1 ZJ_, C N C PR C
0x46c1b8…46c34c Dummy {f00=0x0004, f01=0x0190, f02=» R C ( B ! PV$ B + E E :h E T C ( C C _ N P " P W = : R P T - : : ABCDEFGHI#.<(+!&JKLMNOPQR$]*);^-/STUVWXYZ@,%_>?0123456789:[ '=" @O JZlP}M] Nk`Ka z^L~noj
0x46c34c…46c4e0 Dummy {f00=0x0004, f01=0x0190, f02=» 0123456789 . V P ! %^ O O N T & N T Z* ( P| ZH_@ & C C ( : Z P O WF Q -b O B O R N T N O Z : O ( : O
0x46c4e0…46c674 (3, 92) Dummy {f00=0x0004, f01=0x0190, f02=»2 P4 W X }T 9 ~T 5 W aR = _X = R [ 0" ZZ_" N @ GP W pR [ [j Vb 0" 1 V " 2 P. W X {T * = ~X@ }P* [j = R [ 0" ZT_" Z [ Z O R 4 O B N @ G
0x46c674…46c808 Dummy {f00=0x0004, f01=0x0190, f02=» B : C ( :( R : V E V D ' $ T ( W P . X =' V W V Y =P : _@ & C C ( : P O W Q -b O B O R N T N O : O ( : O
0x46c808…46c99c Dummy {f00=0x0004, f01=0x0190, f02=» * & * & L * & - z * & K * & i * &
0x46c99c…46cb30 Dummy {f00=0x0004, f01=0x0190, f02=» * & , * & Z * & ; * & Y * & w
0x46cb30…46ccc4 Dummy {f00=0x0004, f01=0x0190, f02=» n * & * & : * & + h * & I * & g * &
0x46ccc4…46ce58 Dummy {f00=0x0004, f01=0x0190, f02=» | * & * & H * & 9 v * & W * & u * &
0x46ce58…46cfec Dummy {f00=0x0004, f01=0x0190, f02=» * & ( * & ) V * & G * & e * &
0x46cfec…46d180 Dummy {f00=0x0004, f01=0x0190, f02=» j * & * & 6 * & 7 d * & U * & s * &
0x46d180…46d314 (3, 93) Opaque[0x194]
0x46d314…46d4a8 # DirEnt {nam=»C267 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x24e8, f03=0x0000}
0x46d314…46d4a8 IdxSect {
0x46d314…46d4a8 f00 = 0x0127 // 0x46d314 @0x0
0x46d314…46d4a8 f01 = 0x0002 // 0x46d316 @0x2
0x46d314…46d4a8 gno = [ // 0x46d318 @0x4
0x46d314…46d4a8 [0x00]: C0x0127.0x1.0
0x46d314…46d4a8 ]
0x46d314…46d4a8 }
0x46d4a8…46d63c Dummy {f00=0x0127, f01=0x018e, f02=» PT; P03; PTID=KA; PTCL=KA; * PLEV=60; : P01; J PTDC=T01; V PLC=01L; f P03; v PSCL=S02; PSCL=S03; PSCL=S04; PT; P02; PTID=GA; PTCL=GA; PLEV=60; P01; PTDC=
0x46d63c…46d7d0 Dummy {f00=0x0127, f01=0x00fc, f02=» PLEV=60; P00; P04; $ PSCL=S02; 0 PSCL=S03; @ PSCL=S04; P PSCL=S05; ` PT; p P01; z PTID=D0; PTCL=D0; PLEV=60; P00; P00; PC; P00; P01; PSCL=S01; PTDC=
0x46d7d0…46d964 Dummy {f00=0x0127, f01=0x2008, f02=» LEV=60; P00; P04; $ PSCL=S02; 0 PSCL=S03; @ PSCL=S04; P PSCL=S05; ` PT; p P01; z PTID=D0; PTCL=D0; PLEV=60; P00; P00; PC; P00; P01; PSCL=S01; PTDC=
0x46d964…46daf8 Dummy {f00=0x0127, f01=0x2008, f02=» PT; P01; PTID=LA; " PTCL=LA; 2 PLEV=60; B P00; R P04; ^ PSCL=S02; j PSCL=S03; z PSCL=S04; PSCL=S05; PT; P01; PTID=D0; PTCL=D0; PLEV=60; P00; P00; P
0x46daf8…46dc8c Dummy {f00=0x0127, f01=0x0190, f02=»P WH . A & A 0R 9Q 0 A & :B ._" A & " . A x 0R$ 9U AR FQ 0:D A x ._* 'T .:H_ A x " A A 4 T A A " , "! R _U .WV A : A " 9d
0x46dc8c…46de20 Dummy {f00=0x0127, f01=0x0190, f02=» " | ( A( z( A " A @ P A ( A " ! 1 Q (P _ # # H A " A A 4 4 @ I T A A A T A T @ : + j [ [
0x46de20…46dfb4 (3, 94) Opaque[0x194]
0x46dfb4…46e148 # DirEnt {nam=»A:267 «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0018, f03=0x0000}
0x46dfb4…46e148 IdxSect {
0x46dfb4…46e148 f00 = 0x0000 // 0x46dfb4 @0x0
0x46dfb4…46e148 f01 = 0x0002 // 0x46dfb6 @0x2
0x46dfb4…46e148 gno = [ // 0x46dfb8 @0x4
0x46dfb4…46e148 [0x00]: C0x0000.0x3.0
0x46dfb4…46e148 ]
0x46dfb4…46e148 }
0x46e148…46e2dc Dummy {f00=0x0000, f01=0x0156, f02=» PRT A:267 PRT C267 MES SKOVBO, ONLY 3270 & LED DATDIV,/S D !!DL 122 Z " PMF1CU STRG X'6B4B' CU ADDRESS j !!DL 124 ( PCNFHC STRGI (16),'GA','GB','GB',' ' P!!DL 193 P MOVE TCT01,=W'3' !!EN TRA /S
0x46e2dc…46e470 Dummy {f00=0x0000, f01=0x2008, f02=» A:267 PRT C267 MES SKOVBO, ONLY 3270 & LED DATDIV,/S D !!DL 122 Z " PMF1CU STRG X'6B4B' CU ADDRESS j !!DL 124 ( PCNFHC STRGI (16),'GA','GB','GB',' ' P!!DL 193 P MOVE TCT01,=W'3' !!EN TRA /S
0x46e470…46e604 Dummy {f00=0x0000, f01=0x0190, f02=» P a b KA J KA @ * * +j * 0 a GA J GA @
0x46e604…46e798 Dummy {f00=0x0000, f01=0x0190, f02=» J LA @ * * +j +. ` D0 J D0 * +j +< V f f ( TB2
0x46e798…46e92c Dummy {f00=0x0000, f01=0x0190, f02=»
[…0x1…]
0x46eac0…46ec54 (3, 95) Opaque[0x194]
0x46ec54…46ede8 # DirEnt {nam=»TEMP «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2a38, f03=0x0000}
0x46ec54…46ede8 IdxSect {
0x46ec54…46ede8 f00 = 0x0151 // 0x46ec54 @0x0
0x46ec54…46ede8 f01 = 0x0022 // 0x46ec56 @0x2
0x46ec54…46ede8 gno = [ // 0x46ec58 @0x4
0x46ec54…46ede8 [0x00]: C0x0151.0x3.0
0x46ec54…46ede8 [0x01]: C0x0153.0x2.0
0x46ec54…46ede8 [0x02]: C0x0153.0x3.0
0x46ec54…46ede8 [0x03]: C0x0154.0x0.0
0x46ec54…46ede8 [0x04]: C0x0154.0x1.0
0x46ec54…46ede8 [0x05]: C0x0154.0x3.0
0x46ec54…46ede8 [0x06]: C0x0157.0x2.0
0x46ec54…46ede8 [0x07]: C0x0157.0x3.0
0x46ec54…46ede8 [0x08]: C0x0158.0x1.0
0x46ec54…46ede8 [0x09]: C0x0159.0x2.0
0x46ec54…46ede8 [0x0a]: C0x0159.0x3.0
0x46ec54…46ede8 [0x0b]: C0x0163.0x2.0
0x46ec54…46ede8 [0x0c]: C0x0163.0x3.0
0x46ec54…46ede8 [0x0d]: C0x0164.0x0.0
0x46ec54…46ede8 [0x0e]: C0x0164.0x1.0
0x46ec54…46ede8 [0x0f]: C0x0164.0x2.0
0x46ec54…46ede8 [0x10]: C0x0167.0x0.0
0x46ec54…46ede8 ]
0x46ec54…46ede8 }
0x46ede8…46ef7c Dummy {f00=0x0151, f01=0x0190, f02=» 2 P IDENT START REL 2.1*79-10-20 870150540210 P : P =1, ODD BUFFER ADDRESS B P REL 2.1 79-05-23 d P =2, 6234 LAMPS P REL 2.1 79-05-23 P =3, UNDEFINED LABEL P REL 2.1 79-05-23 . P =4, CURSOR STOPS AT L
0x46ef7c…46f110 Dummy {f00=0x0151, f01=0x0190, f02=»******************************************* ~ P* 4 H P* S T A R T : MODULE HANDLING KEYBOARD INPUT.KEYBOARD INITIATED > H P* MESSAGES ADDRESSED TO THE MAIN FRAME ARE COMPOSED B P* AND SENT BY USING ROUTINES IN MO
0x46f110…46f2a4 Dummy {f00=0x0151, f01=0x0190, f02=» P * EJECT P* P* * P* ENTRY PARAMETERS 4 P* N P* X P* b P ENTRY LINHON,LINHOF,ATMASB l P ENTRY LSAVOF,LSAVON P ENTRY EMULA & P ENTRY LIOLON TURN ON OFFLINE LAMP ( P ENTRY LIOLOF TURN OFF OFFLINE
0x46f2a4…46f438 Dummy {f00=0x0151, f01=0x0190, f02=»QUEST TIMER | P ENTRY ICWRTE P* * P* 4 P* > P* EXTERNAL REFERENSES H P* j P* t P* ~ P EXTRN DCINP P EXTRN DCGETM P EXTRN ICREAD P EXTRN GTRBUF P EXTRN RLRBUF P EXTRN ERASE VDUPRT
0x46f438…46f5cc Dummy {f00=0x0151, f01=0x018e, f02=»RN ERASUP P* 0 P EXTRN KEYCNV KEY CONVERSION IF NOT PTS 6272 P EXTRN TASCII P P* f , P EXTRN I:EVA0 CREDIT EVALUATION ROUTINE p & P EXTRN I:RT1 RETURN TO CREDIT CODE P * EJECT P P > P**********************
0x46f5cc…46f760 Dummy {f00=0x0151, f01=0x0190, f02=» P P* F PKB6272 EQU 0 IF PTS 6272 (6236) IS NOT USED YOU MUST USE 'KEYCNV' 0 P USE THE KEY CONVERSION TABLE IN 'TB3270' ` 0 PKEYLST EQU 0 KEY LOCK STATUS SAVED IN 'KEYS' POFLIN EQU 1 . PDCLIN EQU 1 NUMBER OF MAIN FRAMES (1 OR 2)
0x46f760…46f8f4 (3, 96) Dummy {f00=0x0153, f01=0x018e, f02=»1 ^ PCOPL EQU 1 COPY LOCK IF := 1 P * EJECT . P* F P* P P* EQUATES Z P* p PRSET EQU /B2 RESET KEY z " P* COMMON EQU FOR ECB HANDLING P* P PECBBA EQU 2 PECBRL EQU 4 PECBEL EQU 6
0x46f8f4…46fa88 Dummy {f00=0x0153, f01=0x018e, f02=» P* P* PDIS EQU 20 P* * PECBDC EQU -DIS-14 4 P IFT DCLIN=2 N P IFT COPCMD=1 b PECBDC2 EQU ECBDC-DIS x PECBICR EQU ECBDC2-DIS PECBICW EQU ECBICR-DIS P XIF P IFT DCLIN=2 P IFF COPCMD=1 PEC
0x46fa88…46fc1c Dummy {f00=0x0153, f01=0x018e, f02=» PECBICW EQU ECBICR-DIS P XIF " P IFF DCLIN=2 . P IFF COPCMD=1 B PECBICW EQU ECBDC-DIS X P XIF t PECBVDU EQU ECBICW-DIS PECBKB EQU ECBVDU-DIS PECBSD EQU ECBKB-DIS P * EJECT P* P* " P* BASE
0x46fc1c…46fdb0 Dummy {f00=0x0153, f01=0x0190, f02=» P* PTCT01 EQU 0 PPRINTER EQU TCT01+2 " ( PBVDU EQU PRINTER+2 VDU SCREEN BUFFER > 0 PPCURS EQU BVDU+1920 CURSOR ADDRESS , BINARY j * PATTRIB EQU PCURS+2 LAST ATTRIBUTE CHAR PCURATT EQU ATTRIB+2 & PWCC EQU CURATT+2 WCC/CCC CHARACT
0x46fdb0…46ff44 Dummy {f00=0x0153, f01=0x0190, f02=»E LENGTH l 2 PICWORK EQU DCLENG+2 WORK FIELD INTERTASK COMM , PINTATT EQU ICWORK+2 INTENSITY ATTRIBUTE F $ POFFFLG EQU INTATT+2 OFFLINE FLAG v ( PCOPNO EQU OFFFLG+2 HARDCOPY TASK ID * PCCC EQU COPNO+2 COPY COMMAND CHARACTER PMAIN EQU CCC+2 M
0x46ff44…4700d8 Dummy {f00=0x0153, f01=0x0190, f02=»EAD DC l 2 PECBBLK EQU ECBDCC+2 ECBS FOR MULTIPLE WAIT &C 4 PRDMORE EQU ECBBLK+10 BRANCH ADDRESS NEXT READ KB D P * EJECT | PNULL EQU /7F NULL CHARACTER PDUPCH EQU /7B PFMCH EQU /60 * PLBVDU EQU 1920 1920 CHAR DISPLAY 6344
0x4700d8…47026c Dummy {f00=0x0153, f01=0x0190, f02=» n P* " PNBRKBV EQU 0 NUMBER OF KB/VDUS & PNBRGTP EQU NBRKBV+2 NUMBER OF GTPS 8 P* b 2 PMF1KBV EQU NBRGTP+2 DV ADDRESSES KB/VDU MF #1 l 2 PMF1GTP EQU MF1KBV+16 DV ADDRESSES GTPS MF # 1 P IFT DCLIN=2 PMF2KBV EQU MF1GTP+16 P
0x47026c…470400 Dummy {f00=0x0153, f01=0x0190, f02=»YTAB EQU * P DATA CHAR SPACE P DATA CHAR ! * P DATA CHAR " > P DATA CHAR # R P DATA CHAR $ f P DATA CHAR % z P DATA CHAR & P DATA CHAR ' P DATA CHAR ( P DATA CHAR ) P DATA CHAR * P DATA CHAR + P D
0x470400…470594 (3, 97) Dummy {f00=0x0153, f01=0x0190, f02=»M 2 P DATA NUM 3 P DATA NUM 4 P DATA NUM 5 4 P DATA NUM 6 H P DATA NUM 7 P DATA NUM 8 p P DATA NUM 9 P DATA CHAR : P DATA CHAR ; P DATA CHAR < P DATA CHAR = P DATA CHAR > P DATA CHAR ?
0x470594…470728 Dummy {f00=0x0153, f01=0x0190, f02=» P DATA CHAR F P DATA CHAR G P DATA CHAR H , P DATA CHAR I @ P DATA CHAR J T P DATA CHAR K h P DATA CHAR L | P DATA CHAR M P DATA CHAR N P DATA CHAR O P* P DATA CHAR P P DATA CHAR Q P DATA CHAR
0x470728…4708bc Dummy {f00=0x0153, f01=0x0190, f02=»CHAR Y P DATA CHAR Z P DATA CHAR [ " P DATA CHAR BACK SLASH 6 P DATA CHAR ] T P DATA CHAR CIRCOMFLEX h P DATA CHAR UNDERLINE P* $ P DATA RETURN /60 CANNOT BE USED P DATA CHAR LOWER CASE P DATA CHAR P DAT
0x4708bc…470a50 Dummy {f00=0x0153, f01=0x0190, f02=» P DATA CHAR P DATA CHAR P DATA CHAR ( P DATA CHAR : P DATA CHAR L P* ^ P IFT KEYLST=1 h P DATA KEYL KEYLOCK ~ P DATA KEYL P DATA KEYL P DATA KEYL P DATA KEYL P DATA KEYL P DATA KEYL P DAT
0x470a50…470be4 Dummy {f00=0x0153, f01=0x018e, f02=»TURN P DATA RETURN P DATA RETURN P DATA RETURN 4 P XIF H P DATA CHAR LOWER CASE X T P DATA CHAR t P DATA CHAR ( P DATA RETURN /7B-/7F CANNOT BE USED P DATA RETURN P DATA RETURN P DATA RETURN P DATA RE
0x470be4…470d78 Dummy {f00=0x0153, f01=0x018e, f02=» P DATA PA2 P DATA PA3 & P DATA PA410 PA4 - PA10 (ALFASKOP) ( P DATA PA410 R P DATA PA410 f P DATA PA410 z P DATA PA410 P DATA PA410 P DATA PA410 P DATA CLEAR P IFT PFX=1 P DATA PFEX P XIF
0x470d78…470f0c Dummy {f00=0x0153, f01=0x0190, f02=» P DATA PF 5 P DATA PF 6 P DATA PF 7 ( P DATA PF 8 : P DATA PF 9 L P DATA PF 10 ^ P DATA PF 11 r P DATA PF 12 . P DATA RETURN /99-/A4 RESERVED FOR PF13-24 P DATA RETURN P DATA RETURN P DATA RETURN P
0x470f0c…4710a0 Dummy {f00=0x0153, f01=0x018e, f02=»RETURN P DATA RETURN P DATA ENTER " P DATA CRUP 6 P DATA CRLEFT H P DATA CRRIGT P DATA CRDOWN p P DATA BAKTAB P DATA TAB P DATA CRNL P DATA RDHOME P DATA ERINPT P DATA EREOF P* P IFT I
0x4710a0…471234 (3, 98) Dummy {f00=0x0154, f01=0x0190, f02=» P DATA RESET P DATA DUP P DATA FLDMRK * P DATA COPY > P IFT OFLIN=1 P P DATA OFLINE d P XIF x P IFF OFLIN=1 P DATA RETURN P XIF P IFT DCLIN=2 P DATA MFCHGE P XIF P IFF DCLIN=2 P DATA RE
0x471234…4713c8 Dummy {f00=0x0154, f01=0x0190, f02=» P DATA RETURN P DATA RETURN P* 0 6 P DATA LCASPW LOWER CASE P - W (BECAUSE OF KEYLOCK) : P DATA LCASPW t P DATA LCASPW P DATA LCASPW P DATA LCASPW P DATA LCASPW P DATA LCASPW P DATA LCASPW P B P
0x4713c8…47155c Dummy {f00=0x0154, f01=0x0190, f02=»***************************************** | P 2 PDCTASK EQU * : P CF A14,I:EVA0 N & P LDR* A1,A9 POLL & SELECT ADDRESS d P LDKL A8,ECBDC P ADR A8,CREBAS P ST A1,ECBCW,A8 $ P LDK A7,/B7 TRANSFER PARAMETERS P LKM P D
0x47155c…4716f0 Dummy {f00=0x0154, f01=0x0190, f02=»VE BUFFER x P LDKL A8,ECBDC P ADR A8,CREBAS ( P CF A14,DCGETM > P LD A4,ECBBA,A8 T " P CF A14,RLRBUF RELEASE BUFFER l P RB DCT100 P * EJECT P* P* ( P* SUBROUTINE ACTIVATED BY ALL TASKS P* P*
0x4716f0…471884 Dummy {f00=0x0154, f01=0x0190, f02=»S r P LKM P DATA 1 P RTN A14 & P * EJECT 6 P* N : P***************************************************** X P* P* VDUKB P* " P* MAIN MODULE FOR KEYBOARD VDU P* < P**************************
0x471884…471a18 Dummy {f00=0x0154, f01=0x018e, f02=»FLIN=1 P P 4 P STR A12,A14 SAVE REGISTERS A12-A13 ON A14 STACK P ST A13,-2,A14 V $ P SUKL A14,4 UPDATE STACK POINTER l P CM OFFFLG,TCABAS * P CF A14,LIOLOF TURN OFF OFF LINE LAMP P XIF P P * EJECT B P
0x471a18…471bac Dummy {f00=0x0154, f01=0x0190, f02=» B P************************************************************* P J P LDR* A4,TCABAS REL TASK NO R " P AD A4,6,CREBAS 'CB1' ADDRESS v & P LC A1,MF1KBV-1,A4 GET DV-ADDRESS P ANK A1,/FF P LDKL A8,ECBDC P CF A14,EMULA P
0x471bac…471d40 Dummy {f00=0x0154, f01=0x0190, f02=»N-FRAME #2 r P* B P************************************************************* P b & P LC A1,MF2KBV-1,A4 GET DV ADDRESS j P ANK A1,/FF P LDKL A8,ECBDC2 P CF A14,EMULA P XIF P * EJECT PVDU080 EQU *
0x471d40…471ed4 (3, 99) Dummy {f00=0x0154, f01=0x0190, f02=»EEN b P CF A14,LMF1ON , P CM MAIN,TCABAS INDICATE MAIN-FRAME # 1 " P * EJECT R P* j P* RELATIVE POS IN ECBBLK t PKB EQU 2 PDC1 EQU 4 P IFT DCLIN=2 P IFT COPCMD=1 PDC2 EQU 6 PICR EQU 8 PECBB
0x471ed4…472068 Dummy {f00=0x0154, f01=0x0190, f02=» P IFT COPCMD=1 PICR EQU 6 PECBBS EQU 3 , P XIF @ P IFF DCLIN=2 L P IFF COPCMD=1 ` PECBBS EQU 2 v P XIF P* P LDK A1,ECBBS P ST A1,ECBBLK,TCABAS PVDU100 EQU * P LD A1,ECBBLK+DC1,TCABAS P R
0x472068…4721fc Dummy {f00=0x0154, f01=0x0190, f02=»2,TCABAS P RF(NZ) VDU120 PENDING 6 P CF A14,DC2INQ TEST IF ANY MESSAGE MF # 2, NO WAIT . P XIF h PVDU120 EQU * t P IFT COPCMD=1 P LD A1,ECBBLK+ICR,TCABAS P RF(NZ) VDU125 PENDING P LDKL A3,ICWORK BUFFER P ADR A3,TCABAS
0x4721fc…472390 Dummy {f00=0x0154, f01=0x0190, f02=»A1,ECBBLK+KB,TCABAS P RF(NZ) VDU150 PENDING ! ( P CF A14,RDKBNW READ KEYBOARD NO WAIT ! : PVDU150 EQU * ! f P LDKL A7,ECBBLK ! z P ADR A7,TCABAS ! P LKM ! P DATA 7 MULTIPLE WAIT ! P CW A8,ECBBLK+KB,TCABAS ! $ P RF(E) KBINP INPUT FRO
0x472390…472524 Dummy {f00=0x0154, f01=0x0190, f02=»CBDCC,TCABAS SAVE ECB ADDRESS FOR CURRENT READ ! P CF A14,DCINP INPUT FROM DC " 6 P RB VDU100 " Z P * EJECT " l P* " P* READ KEYBOARD WITH NO WAIT " P* " PRDKBNW EQU * " P LDKL A8,ECBKB " P ADR A8,CREBAS " P LDK A7,1 "
0x472524…4726b8 Dummy {f00=0x0154, f01=0x0190, f02=» P* # P* TEST IF ANY MESSAGE DC # P* # . PDC1INQ EQU * # 8 P LDKL A8,ECBDC # L P ADR A8,CREBAS # b P ST A8,ECBBLK+DC1,TCABAS # x PDC1I20 EQU * # P LDK A1,0 # P CF A14,REQTIM # P LDK A7,0 # PDC1I30 EQU * # P LKM # P D
0x4726b8…47284c Dummy {f00=0x0154, f01=0x0190, f02=»ABAS # | P RB DC1I20 $ P XIF $ P IFT COPCMD=1 $ * P * EJECT $ @ P* $ X " P* SEND BUFFER TO PRINTER TASK $ b P* $ PBUFCOP EQU * $ P CM ECBBLK+ICR,TCABAS $ P LDKL A3,BVDU BUFFER $ P ADR A3,TCABAS ADDRESS $ P IFT COP
0x47284c…4729e0 Dummy {f00=0x0154, f01=0x018e, f02=»T COPY $ ~ P XIF % P IFT COPCMD=1 % 0 P LDK A4,/8B ORDER: WRITE ADDRESSED WITH WAIT % 0 P LD A5,ICWORK,TCABAS TASK ID % d P LDKL A6,LBVDU REQ LENGTH % P CF A14,ICWRTE % P LD A1,KBINH,TCABAS % ( P ANK A1,/E NOT INHIBITED ANY LONGER % P
0x4729e0…472b74 (3, 100) Dummy {f00=0x0154, f01=0x018e, f02=» P CM ECBBLK+KB,TCABAS & P LD A2,ECBCW,A8 & P RF(Z) KBIN05 POWER OFF & 8 P LD A2,ECBRC,A8 & X P RF(0) KBIN10 & p PKBIN05 EQU * & $ P LDK A7,4 RESET KEYBOARD BUFFER & P LKM & P DATA 1 & P RB VDU100 & PKBIN10 EQU * & P LD
0x472b74…472d08 Dummy {f00=0x0154, f01=0x0190, f02=» & j P IFF KB6272=1 =5 ' & P CF A14,KEYCNV CONVERT KEY CODE =5 ' " P XIF =5 ' L P LD A1,KBINH,TCABAS ' ^ " P ANK A1,6 MUST BE RESET KEY ? ' z P RF(Z) KBIN20 NO ' P CWK A2,RSET RESET KEY ? ' P RB(NE) KBIN05 NO ' PKBIN20 EQU * ' $ P L
0x472d08…472e9c Dummy {f00=0x0154, f01=0x0190, f02=»GAL CHAR ' ~ 4 P CF A14,DCABOR ABORT DC-READ TO ENABLE DC-WRITE ( P LDR A7,A7 ( H 6 P ABL(NZ) VDU100 DC COMPLETED, TAKE CARE OF MESSAGE ( Z P ADR A5,A5 TO KEY TABLE ( P* ( P LDKL A8,ECBVDU ( P ADR A8,CREBAS ( P LD A1,RDMORE,TCABAS ( P
0x472e9c…473030 Dummy {f00=0x0154, f01=0x0190, f02=»CTIVE INPUT HANDLER ( n P ABL VDU100 ) P * EJECT ) 0 P* ) H & P* ABORT DC-REQUEST TO ENABLE WRITE ) R P* ) | PDCABOR EQU * ) P LDK A7,0 ) P LDKL A8,ECBDC ) P IFT DCLIN=2 ) P LD A1,MAIN,TCABAS ) P RF(NZ) DCAB05 ) P X
0x473030…4731c4 Dummy {f00=0x0154, f01=0x018e, f02=»,ECBDC2 ) PDCAB10 EQU * * P XIF * $ P ADR A8,CREBAS * 0 P LKM * F P DATA 10 * R P RTN A14 * b P * EJECT * r P* * P* SET REQUEST TIMER * P* A1 = TIME OUT VALUE * P* A8 = ECB ADDRESS * P* * PREQTIM EQU * * P S
0x4731c4…473358 Dummy {f00=0x0154, f01=0x0190, f02=» > P********************************************************** + P* + F P* RETURN + P P* + ` B P************************************************************** + j P* + PRETURN RTN A14 + P * EJECT + P* + < P**********************
0x473358…4734ec Dummy {f00=0x0154, f01=0x0190, f02=» P* , < P******************************************************* , P* , N PCRLEFT EQU * , X * P LD A2,PCURS,TCABAS GET CURSOR BINARY , l P SUK A2,1 , $ P RF(NN) CRL050 NOT LEFTMOST POS , P LDKL A2,LBVDU-1 , PCRL050 RF CRH100 , P* ,
0x4734ec…473680 Dummy {f00=0x0154, f01=0x0190, f02=»E CURSOR ONE POS. TO THE RIGHT , v P* - & < P******************************************************** - 0 P* - p P* A3=CHARACTER - z P* - PCRRIGT EQU * - * P LD A2,PCURS,TCABAS GET CURSOR BINARY - P ADK A2,1 - P CWK A2,LBVDU END OF BUFFE
0x473680…473814 (3, 101) Dummy {f00=0x0157, f01=0x0190, f02=»********************************* - v P* . * P* CRDOWN . 4 P* . D < P* THE MODULE MOVES THE CURSOR TO NEXT ROW. SAME COLUMN. . N P* . @ P************************************************************ . P* . PCRDOWN EQU * . & P LD A2,PCURS,T
0x473814…4739a8 Dummy {f00=0x0157, f01=0x018e, f02=»F CRH100 . P* / B P************************************************************** / P* / ` P* CRUP / j P* / x ( P* MOVE CURSOR ONE LINE UP. SAME COL. / P* / B P************************************************************** / P* / P
0x4739a8…473b3c Dummy {f00=0x0157, f01=0x0190, f02=» / PCRU050 RF CRH100 0 P * EJECT 0 P* 0 8 : P****************************************************** 0 B P* 0 P* CRHOME 0 P* 0 P* HOME POSITIONING OF CURSOR 0 P* 0 : P******************************************************
0x473b3c…473cd0 Dummy {f00=0x0157, f01=0x018e, f02=» UPDATE ATTRIB 0 " P CF A14,SETCUR DISPLAY CURSOR 1 P RTN A14 1 < P * EJECT 1 L P* 1 d : P***************************************************** 1 n P* 1 P* CRNL 1 P* 1 2 P* CURSOR IN FIRST UNPROTECTED POS ON NEW LINE 1 P* 1
0x473cd0…473e64 Dummy {f00=0x0157, f01=0x0190, f02=» P ADKL A2,LLINE NEXT LINE 2 P CWK A2,LBVDU 2 $ P RF(L) CRN050 2 : P LDK A2,0 WRAP AROUND 2 P P* 2 n P* COMPUTE LEFTMOST POS 2 x P* 2 PCRN050 LDK A1,0 2 PCRN100 SUKL A2,LLINE 2 P RF(N) CRN120 2 P ADKL A1,LLINE 2 P RB CRN1
0x473e64…473ff8 Dummy {f00=0x0157, f01=0x0190, f02=»************************** 2 h P LDR A2,A1 3 " . P CF A14,ATMASB SEARCH ATTRIBUTE BACKWARDS 3 4 P SUK A1,1 3 f $ P RF(Z) CRN130 NO ATTRIBUTE FOUND 3 x P ANK A3,/10 3 P RF(NZ) TAB PROTECTED FIELD 3 . P CW A2,PCURS,TCABAS CURSOR ON ATTRIBUTE ?? 3
0x473ff8…47418c Dummy {f00=0x0157, f01=0x018e, f02=»DK A2,1 3 P ST A2,PCURS,TCABAS 4 ( PCRN150 CF A14,SETCUR POSITION CURSOR 4 , P RTN A14 4 X H P******************************************************************* 4 h P * EJECT 4 P* 4 8 P**************************************************
0x47418c…474320 Dummy {f00=0x0157, f01=0x0190, f02=» 4 j P* 5 8 P**************************************************** 5 P* 5 N 2 P* A1=END OF BUFFER PAREM. 0=EOB NOT REACHED 5 X P* 2=EOB 5 P* 3=ATTRIB. IN EOB POS 5 P* A2=CURSOR BINARY ADDRESS 5 P* A3=CHARACTGR 5 P* 5 PTAB EQ
0x474320…4744b4 (3, 102) Dummy {f00=0x0157, f01=0x018e, f02=»UFFER? 5 ~ P RF(G) TAB300 YES 6 P ADK A2,1 6 ( " PTAB150 ANK A3,/10 UNPROTECTED? 6 : P RF(E) TAB200 YES 6 ` P RB TAB100 NEXT ATTRIB. 6 z PTAB200 ST A2,PCURS,TCABAS 6 & P CF A14,SETCUR DISPLAY NEW CURSOR 6 P RTN A14 6 PTAB300 LDK A2,0 6
0x4744b4…474648 Dummy {f00=0x0157, f01=0x0190, f02=» 6 V P RF(NE) TAB350 NO!! 7 ( P ANK A5,1 WHOLE BUFFER CONTROLLED ?? 7 $ P RB(Z) TAB200 YES!! 7 P P SUR A5,A5 7 l P RB TAB150 CHECK ATTRIBUTE 7 PTAB350 EQU * 7 < P******************************************************** 7 $ P ANK A5,1 WHOLE BU
0x474648…4747dc Dummy {f00=0x0157, f01=0x0190, f02=» P * EJECT 8 P* 8 @ P*********************************************************** 8 & P* 8 j P* DUP 8 t P* 8 P* DUPLICATE KEY 8 : P* OPERATION OF THIS KEY CAUSES A UNIQUE CHARACTER CODE 8 : P* TO BE ENTERED INTO THE DISPLAY BUFFE
0x4747dc…474970 Dummy {f00=0x0157, f01=0x0190, f02=»** 8 V P* 9 PDUP EQU * 9 & P LD A1,MODE,TCABAS INSERT MODE ?? 9 & 6 P ABL(NZ) ERROR FUNCTION NOT ALLOWED IN INSERT MODE 9 P P LDK A2,DUPCH 9 0 P LD A3,ECBKB+ECBBA,CREBAS GET KB BUFF. ADDR. 9 P SCR A2,A3 9 P CF A14,NUM 9 P CF A14,TAB 9
0x474970…474b04 Dummy {f00=0x0157, f01=0x0190, f02=» FIELD MARK 9 P* : @ P* OPERATION OF THIS KEY CAUSES A UNIQUE CHARACTER CODE : " < P* TO BE ENTERED IN THE DISPLAY BUFFER IN ADDITION : f , P* TO THE DC CHARACTER TRANSMITTED : P* : > P****************************************
0x474b04…474c98 Dummy {f00=0x0157, f01=0x0190, f02=»NSERT MODE : h P LDK A2,FMCH ; 2 P LD A3,ECBKB+ECBBA,CREBAS GET KB BUFFER ADDR. ; & P SCR A2,A3 ; P CF A14,NUM ; n P RTN A14 ; P * EJECT ; P* ; > P********************************************************** ; P* ; P*
0x474c98…474e2c Dummy {f00=0x0157, f01=0x0190, f02=» THE FIRST UNPROTECTED CHARACTER ; z P* ON THE SCREEN < ( P* < F < P******************************************************** < P P* < PRDHOME LDKL A4,BVDU < & P ADR A4,TCABAS VDU BUFFER ADDRESS < , P LC A2,1919,A4 GET LAST SCREEN CHARACTER
0x474e2c…474fc0 Dummy {f00=0x0157, f01=0x018e, f02=»CM PCURS,TCABAS < , P CF A14,TAB SEARCH 1ST UNPROTECTED FIELD = P RTN A14 = H P * EJECT = X P* = p : P***************************************************** = z P* = P* BAKTAB = P* = 6 P* MOVE THE CURSOR TO THE FIRST CHARACTER LOC
0x474fc0…475154 (3, 103) Dummy {f00=0x0158, f01=0x0190, f02=» P* > P* A2=CURSOR BINARY ADDRESS > P* A3=CHARACTER > 0 PBAKTAB EQU * > F P LDK A5,1 > Z & P LD A2,PCURS,TCABAS GET CURSOR POS > l " P CF A14,GBUFFC GET BUFF CHAR. > P CWK A3,/1F ATTRIB. CHAR? > P RF(NG) BAK100 YES > " P CWK A2,0 UPPER
0x475154…4752e8 Dummy {f00=0x0158, f01=0x0190, f02=»BAK200 SUK A2,1 > $ P CF A14,ATMASB SEARCH ATTRIBUTE ? @ P************************************************************ ? @ P SUK A1,1 ? P RF(Z) BAK400 NO ATTRIBUTE ? 4 P RF(N) BAK250 ATTRIBUTE FOUND. NOT IN LAST POS. ? 0 P SUR A2,A2 ATTRIBUTE FOU
0x4752e8…47547c Dummy {f00=0x0158, f01=0x0190, f02=» A3,/10 PROTECTED? ? P RB(NE) BAK100 YES @ P ADK A2,1 @ 4 PBAK300 ST A2,PCURS,TCABAS @ F P CF A14,SETCUR SET CURSOR @ h P RTN A14 @ * PBAK400 SUK A5,1 WHOLE BUFF CONTROLLED? @ P RB(NZ) BAK300 YES @ ( P LDKL A2,LBVDU-1 END BUFFER ADDRESS @
0x47547c…475610 Dummy {f00=0x0158, f01=0x018e, f02=»B(NE) BAK200 YES @ . P ST A3,ATTRIB,TCABAS UPDATE NEW ATTRIBUTE A P ST A2,CURATT,TCABAS A J D P*************************************************************** A f P RB BAK200 A D P**************************************************************** A P
0x475610…4757a4 Dummy {f00=0x0158, f01=0x0190, f02=» A : P* ALPHABETIC AND SPECIAL CHAR UPDATING AND DISPLAYING B P* B F > P********************************************************* B P P* B PLCASPW EQU * B , P SUK A2,/50 CONVERT TO LOWER CASE P - W B P SC* A2,ECBKB+ECBBA,CREBAS B P* B
0x4757a4…475938 Dummy {f00=0x0158, f01=0x018e, f02=»TTRIB? B z P RF(E) CHA300 YES C 2 PCHA100 LD A3,ATTRIB,TCABAS GET ATTRIBUTE CHAR C ( P LDR A4,A3 C ^ " P ANK A4,/10 PROTECTRED FIELD? C p P RF(NE) CHA300 YES C PCHA200 LDR A4,A3 C P ANK A4,/8 NUMERIC FIELD? C P RF(E) ANCOMM NO C , PCHA300
0x475938…475acc Dummy {f00=0x0158, f01=0x0190, f02=» P* D & P* Z E R O : 3 TRIPLE ZERO KEY D ( P* Z E R O : 2 DOUBLE ZERO KEY D 8 P* D d 6 P************************************************* D n P D PZERO:3 EQU * D P LDK A1,X'30' CHARACTER ZERO D 8 P SC* A1,ECBKB+ECBBA,CREBAS STORE
0x475acc…475c60 Dummy {f00=0x0158, f01=0x0190, f02=»1,ECBKB+ECBBA,CREBAS STORE CHARACTER IN BUFFER D " P CF A14,NUM DISPLAY CHARACTER E 6 " P CF A14,NUM DISPLAY CHARACTER E P RTN A14 RETURN E P* E > P********************************************************** E P* E P* NUM E P* E " P
0x475c60…475df4 (3, 104) Dummy {f00=0x0159, f01=0x0190, f02=» E P LDK A2,/2C F P SC* A2,ECBKB+ECBBA,CREBAS F P* F > PNUM EQU * F H & P LD A2,PCURS,TCABAS GET CURSOR POS F Z . P LD A3,CURATT,TCABAS GET ATTRIBUTE ADDRESS F $ P CWR A2,A3 CURSOR ON ATTRIBUTE? F P RF(E) NUM200 YES F 2 PNUM100 LD A3,ATT
0x475df4…475f88 Dummy {f00=0x0159, f01=0x0190, f02=» ALLOWED DISPLAY POS F | P * EJECT G P* G 4 > P********************************************************** G > P* G P* ANCOMM G P* G < P* COMMON SUBMODULE FOR ALPHANUMERIC CHAR. DISPLAYING AND G P* UPDATING G P* G > P********
0x475f88…47611c Dummy {f00=0x0159, f01=0x0190, f02=» * G P LDKL A6,BVDU H P ADR A6,TCABAS H P ADR A6,A2 H 6 P H H & P LD A1,MODE,TCABAS INSERT MODE ?? H P P RF(NZ) ANC010 YES!! H z P SCR A4,A6 UPDATE VDU BUFF H * PANC010 LDR A7,A6 SAVE CURSOR POSITION H P LD A5,CURATT,TCABAS H ( P CWK A
0x47611c…4762b0 Dummy {f00=0x0159, f01=0x018e, f02=»,ATTRIB,TCABAS GET ATTRIBUTE CHAR H P ORK A3,1 MDT-BIT ON I * P SCR A3,A6 I F PANC100 EQU * I X P IFT IN:DL=1 =3 I l & P LD A1,MODE,TCABAS INSERT MODE ?? I P RF(Z) ANC120 NO!! I 0 P LCR A1,A7 GET CHARACTER AT CURSOR POSITION I P ANK A1,/7F
0x4762b0…476444 Dummy {f00=0x0159, f01=0x018e, f02=» I P J 2 P LDK A5,/2B CURSOR NOT MOVED BEFORE DISPLAYING J P LD A1,ECBVDU+ECBBA,CREBAS J F P SC A5,1,A1 =1 J j P LDK A5,/1E J P ADK A1,2 NEXT POS J ( P SCR A5,A1 LOW INT, STORE IN BUFFER J P LDR A6,A3 J $ P ANK A3,/4 STANDARD DISPLA
0x476444…4765d8 Dummy {f00=0x0159, f01=0x018e, f02=» P RF ANC250 NON DISPLAYING K ( PANC150 LDK A5,/1F SET HIGH INTENSITY K & P SCR A5,A1 STORE IN BUFFER K R ( PANC200 LDR A2,A4 UPDATE A2 WITH CHAR K t 0 PANC250 CF A14,WCHAR DISPLAY CHAR AND CURSOR K & P LD A2,PCURS,TCABAS GET CURSOR POS K P ADK A2,1
0x4765d8…47676c Dummy {f00=0x0159, f01=0x0190, f02=» " P CF A14,GBUFFC GET BUFFER CHAR L P CWK A3,/1F ATTRIBUTE CHAR? L * P RF(G) ANC300 NO L N P L f ( P CF A14,TAB SKIP TO NEXT UNPROTECTED L n PANC300 EQU * L P LD A1,ECBCW,A8 CONTROL WORD L P ANK A1,X'FF' LINE POSITION L ( P SUK A1,80 LAST PO
0x47676c…476900 Dummy {f00=0x0159, f01=0x0190, f02=» RTN A14 L P IFT IN:DL=1 M P * EJECT M $ P M < 8 P*************************************************** M D P* M < P* DELETE CHARACTER AT CURSOR POSITION. SHIFT CARACTERS M . P* AT SAME LINE ONE POSITION TO THE LEFT M P* M @ P**
0x476900…476a94 (3, 105) Dummy {f00=0x0159, f01=0x0190, f02=»RSOR ADDRESS M z ( PDEL:10 ADK A6,80 END OF LINE POINTER N . P CWR A6,A2 LAST POSITION ON CURRENT LINE?? N @ $ P RB(L) DEL:10 NO!! TRY NEXT LINE N r P N * P CF A14,S:ATT SEARCH ATTRIBUTE FORWARD N P SUK A1,2 ATTRIBUTE FOUND ?? N P RF(Z) DEL:20 NO!! N
0x476a94…476c28 Dummy {f00=0x0159, f01=0x0190, f02=»L:20 LDR A2,A6 N P O P O P LDK A1,BVDU O & * P ADR A1,TCABAS ABSOLUTE BUFFER ADDRESS O : P ADR A2,A1 END OF FIELD/LINE O h ( P AD A1,PCURS,TCABAS CURSOR POSITION O P O . PDEL:30 CWR A2,A1 ALL CHARACTERS SHIFTED ?? O P RF(E) DEL:40 YES!! O
0x476c28…476dbc Dummy {f00=0x0159, f01=0x0190, f02=» " P RB DEL:30 GET NEXT CHARACTER P P P * P P 2 * PDEL:40 LDK A3,NULL+/80 NULL CHARACTER P : * P SCR A3,A2 STORE AT END OF FIELD/LINE P h " P LD A3,ATTRIB,TCABAS ATTRIBUTE P $ P ORK A3,1 SET MODIFIED FIELD BIT P P P 2 P LD A1,CURATT,TCABAS CURRENT
0x476dbc…476f50 Dummy {f00=0x0159, f01=0x0190, f02=» ABSOLUTE ATTRIBUTE ADDRESS P " P SCR A3,A1 SAVE NEW ATTRIBUTE Q $ & P RF INS:60 DISPLAY MODIFIED FIELD Q J P * EJECT Q t P Q B P************************************************************** Q P* Q @ P* INSERT CHARACTER AT CURSOR POSIT
0x476f50…4770e4 Dummy {f00=0x0159, f01=0x0190, f02=»********************** Q r P R PINSERT EQU * R & $ P IM MODE,TCABAS SET INSERT MODE R : . P CF A14,LIOLON TURN ON "INSERT MODE" LAMP R b P RTN A14 R P R P R PINS:10 LDR A6,A7 R P LDR A9,A4 R ( P CWK A5,LBVDU+1 UNFORMATTED SCREEN?? R
0x4770e4…477278 Dummy {f00=0x0159, f01=0x0190, f02=» R d P S P S P SUK A1,2 ATTRIBUTE FOUND ?? S P RF(Z) INS:30 NO!! S < P SUK A2,1 S V P S h PINS:30 ADR A2,TCABAS S p 6 P ADK A2,BVDU ADD BUFFER DISPLACEMENT IN WORK-BLOCK S . P CF A14,S:NULL SEARCH FIRST NULL CHARACTER S . PINS:40 CWR A2,A6
0x477278…47740c Dummy {f00=0x0159, f01=0x0190, f02=» A3,A2 SHIFT CHAR ONE POS TO RIGHT S P SUK A2,1 T * " P RB INS:40 GET NEXT CHARACTER T < P T b P T j ( PINS:50 ORKL A9,/80 SET MODIFIED BIT T r . P SCR A9,A6 SAVE INPUT CHARACTER IN BUFFER T . P IM PCURS,TCABAS INCREMENT CURSOR POSITION T PINS:60
0x47740c…4775a0 Dummy {f00=0x0159, f01=0x0190, f02=» EJECT T P U > P********************************************************** U P* U ` 4 P* SEARCH FIRST NULL CHARACTER AFTER CURSOR POS U j P* U : P****************************************************** U P U PS:NULL EQU * U P L
0x4775a0…477734 (3, 106) Dummy {f00=0x0163, f01=0x0190, f02=» U n P CWK A3,NULL NULL CHARACTER V P RF(E) S:NU20 YES!! V , P ADK A1,1 V H * P RB S:NU10 CHECK NEXT BUFFER CHARACTER V Z P V * PS:NU20 LDR A2,A1 ADDRESS OF FIRST NULL V PS:NU30 RTN A14 V P * EJECT V P* V > P******************
0x477734…4778c8 Dummy {f00=0x0163, f01=0x0190, f02=»N V $ P* AND GENERATE AN AID CHARACTER W P* W 2 > P********************************************************* W < P* W ~ PCANCEL EQU * W PPA2 EQU * W P LDK A2,/2E CANCEL POS W PCAN100 EQU * W $ P LC A2,TASCII,A2 GET ASCII CODE W P
0x4778c8…477a5c Dummy {f00=0x0163, f01=0x0190, f02=» P X P IFT PAX=1 X P X P* X & P* X 0 F P* PROGRAM ATTENTION KEY IS PRESSED AND NUMBER WILL BE INSERTED TO X : : P* DEFINE ONE OF THE FUNCTIONS UNDER PA1.CANCEL OR PA3 X P* X P* X PPAEX EQU * X P LDKL A1,PAEXA X P ST A1,RDM
0x477a5c…477bf0 Dummy {f00=0x0163, f01=0x0190, f02=» CHAR. X | P SUK A2,/2 CHECK IF NUM.1-3 Y P RF(G) PFERR ILLEGAL CHAR. Y 2 P RF(Z) PA3 Y T P ADK A2,1 Y f P RB(Z) PA2 Y x P RF PA1 Y & P RTN A14 RETURN TO MAIN READ LOOP Y P Y P XIF Y P * EJECT Y P Y P* Y & P* P
0x477bf0…477d84 Dummy {f00=0x0163, f01=0x0190, f02=» $ P* PA3 PROGRAM ATTENTION KEY Z P* Z , P* Z 6 PPA3 EQU * Z @ P LDK A2,/2B PA3 POS Z R P RB CAN100 Z n P* Z P* PA4 - PA10 (ALFASKOP) Z P* Z PPA410 EQU * Z P SUK A2,/20 Z P RB CAN200 Z P * EJECT Z P*
0x477d84…477f18 Dummy {f00=0x0163, f01=0x0190, f02=» CAUSES AN I/O OPERATION Z t < P* AND GENERATE AN AID CHARACTER FOLLOWED BY AN SBA ORDER [ 8 P* ATTRIBUTE ADDRESS AND TEXT FOR EACH MODIFIED FIELD [ ` P* NULLS ARE SUPRESSED [ P* [ > P********************************************************* [ P*
0x477f18…4780ac Dummy {f00=0x0163, f01=0x0190, f02=»URN ON "KEYBOARD INHIBIT" [ . P CF A14,TRPF AID+MODIFIED FIELDS+TRANSMIT " PENT200 EQU * T P RTN A14 h P* x P P IFT PFX=1 P P* P* F P* PROGRAM FUNCTION KEY IOS PRESSED AND NUMBER WILL BE INSERTED TO 0 P* DEFI
0x4780ac…478240 Dummy {f00=0x0163, f01=0x0190, f02=» P CM RDMORE,TCABAS ] P SUK A2,/30 LEGAL CHAR ? ] " , P RF(L) PFERR ILLEGAL,GO TO ERR.HANDLING ] B & P RF(Z) PF0 FIRST NUM. 0 GO TO PF0 ] r P SUK A2,/1 FIRST NUM. 1 ? ] P RF(G) PFERR ILLEGAL NUM. ] P LDKL A1,PF1A ] P RF PFNXT ] P
0x478240…4783d4 (3, 107) Dummy {f00=0x0163, f01=0x0190, f02=»EGAL NUM ? ] , P RF(G) PFERR ILLEGAL GO TO ERR.HANDLING ^ P ADK A2,/3C PF10-12 POS ^ B P RB ENT100 ^ b P ^ t PPF0 EQU * ^ | P LDKL A1,PF0A ^ PPFNXT EQU * ^ P ST A1,RDMORE,TCABAS ^ P RTN A14 ^ PPF0A EQU * ^ P CM RDMORE,TCABAS
0x4783d4…478568 Dummy {f00=0x0163, f01=0x0190, f02=»AL GO TO ERR.HANDLING ^ ~ P ADK A2,/39 PF1-9 POS _ P RB ENT100 _ < P XIF _ N PPFERR EQU * _ Z * P CF A14,ERROR GO TO ERR-HANDLING RUTIN _ n $ P RTN A14 GO TO MAIN READ MODULE _ P _ P _ PPF EQU * _ P SUK A2,/5C _ P RB ENT100 _
0x478568…4786fc Dummy {f00=0x0163, f01=0x0190, f02=» < P* THE OFFLINE SWITCH "OFFFLG" IS SET = 1 AND ` 8 P* A BRANCH IS MADE BACK TO CREDIT PROGRAM ` D P* ` B P************************************************************* ` POFLINE EQU * ` P CF A14,CLEAR ` POFLI05 EQU * `
0x4786fc…478890 Dummy {f00=0x0163, f01=0x0190, f02=»RT REQUEST NOT CURRENT MF ` ~ P XIF a " P IFT OFLIN=1 a . 6 P LDK A1,0 DV ADDRESS ::= 0MESSAGES TO VDU IGNORED a B P LDKL A8,ECBDC MF # 1 a | & P CF A14,EMULA TRANSFER PARAMETERS a P IFT DCLIN=2 a P LDKL A8,ECBDC2 MF # 2 a & P CF A14,EMULA TRAN
0x478890…478a24 Dummy {f00=0x0163, f01=0x0190, f02=» TURN ON OFFLINE LAMP a & P IM OFFFLG,TCABAS SET OFFLINE FLAG b $ P ADKL A14,4 SKIP ONE STACK LEVEL b H * P LD A13,2,A14 RELOAD REGISTERS A12-A13 b p P LD A12,4,A14 b $ P ADKL A14,4 UPDATE STACK POINTER b * P ABL I:RT1 RETURN TO "OFFLINE" PROGRAM b
0x478a24…478bb8 Dummy {f00=0x0163, f01=0x0190, f02=» b P* MAINFRAME CHANGE c H P* THE SWITCH 'MAIN' IS CHANGED, AND THE APPROPRIATE 'SYSTEM' LAMP c " P* IS TTURNED ON c n P* c J P********************************************************************* c P* c PMFCHGE EQU * c P CF A1
0x478bb8…478d4c Dummy {f00=0x0163, f01=0x018e, f02=»TCABAS c P XRK A1,1 d P RF(NZ) MFCH10 d P CF A14,LMF1ON d 6 P RF MFCH90 d L PMFCH10 EQU * d ^ P CF A14,LMF2ON d r PMFCH90 EQU * d P ST A1,MAIN,TCABAS d P RTN A14 d P XIF d P * EJECT d P* d < P********************
0x478d4c…478ee0 Dummy {f00=0x0163, f01=0x018e, f02=» d X 8 P* AND GENERATE AN AID CHARACTER. THE ENTIRE DISPLAY e : P* BUFFER IS CLEARED TO NULLS AND CURSOR IS LOCATED IN e D P* HOME POS e P* e < P******************************************************** e P* e PCLEAR EQU * e P LDK A2,/2D
0x478ee0…479074 (3, 108) Dummy {f00=0x0164, f01=0x0190, f02=» e j & P CF A14,ERASE ERASE ENTIRE SCREEN f P RTN A14 f 2 P * EJECT f B P* f Z @ P************************************************************ f d P* f P* EREOF f P* f P* ERASE TO END OF FIELD f P* f @ P******************
0x479074…479208 Dummy {f00=0x0164, f01=0x0190, f02=» P ANK A3,/10 UNPROTECTED? g P RF(E) ERE100 YES g $ P ABL ERROR g > PERE100 LD A2,PCURS,TCABAS g P P g r ( P************************ 77.06.01 g z P g 2 P CW A2,CURATT,TCABAS STANDING ON ATTRIBUTE ?? g * P ABL(E) ERROR YES!! TURN ON ERROR LA
0x479208…47939c Dummy {f00=0x0164, f01=0x0190, f02=»CHAR g z P RF(G) ERE200 NO h PERE160 LDR A1,A2 h $ P LD A3,PCURS,TCABAS h < PERE170 EQU * h X P LDKL A4,BVDU h l P ADR A4,TCABAS h P ADR A4,A3 h 0 P CF A14,ERASUA ERASE AND REPLASE WITH NULLS h ( P CF A14,DISPL DISPLAY ERASED SCREEN h
0x47939c…479530 Dummy {f00=0x0164, f01=0x0190, f02=»180 UNFORMATTED SCREEN h P i P ADK A2,BVDU i & . P ADR A2,TCABAS ABSOLUTE ATTRIBUTE ADDRESS i : P LCR A1,A2 GET ATTRIBUTE i l P ORK A1,1 SET MDT BIT i P SCR A1,A2 i PERE180 EQU * i P RTN A14 i ( PERE200 CWK A2,LBVDU-1 END OF BUFFER? i
0x479530…4796c4 Dummy {f00=0x0164, f01=0x0190, f02=» P LDK A2,0 WRAP AROUND. j P RB ERE150 j " P * EJECT j 4 P* j L < P******************************************************** j V P* j P* ERINPT j P* j : P* CLEARS ALL UNPROTECTED CHARACTER LOCATIONS TO NULLS j : P* AND REPOSITION
0x4796c4…479858 Dummy {f00=0x0164, f01=0x0190, f02=»************* j f P* k PERINPT EQU * k ( P CF A14,ERASUP ERASE ALL UNPROTECTED k 4 P CF A14,DISPL k ` P LD A2,PCURS,TCABAS k v P CF A14,ATMASB k > P********************************************************* k P SUK A1,1 k $ P RF(Z) ERI:1
0x479858…4799ec Dummy {f00=0x0164, f01=0x0190, f02=»* k > P********************************************************** l P ADK A2,1 l L P l ^ PERI:10 EQU * l f P ST A2,PCURS,TCABAS l z P RTN A14 l P * EJECT l P* l @ P************************************************************ l
0x4799ec…479b80 Dummy {f00=0x0164, f01=0x0190, f02=»*********************** l l P* m PERROR EQU * m * ( P CF A14,LERRON TURN ON 'ERROR' LAMP m > P LD A5,KBINH,TCABAS m j 4 P ORK A5,4 BIT 13:=1,ERROR HANDLING.RESET ALLOWED m P ST A5,KBINH,TCABAS m P m P* m P* TURN ON SOUND ALARM m
0x479b80…479d14 (3, 109) Dummy {f00=0x0164, f01=0x0190, f02=»CONTROL CHARACTER m P SC A7,1,A2 n P LDK A7,X'07' BELL CHARACTER n . P SC A7,2,A2 n R P LDK A7,3 REQUESTED LENGTH n f P ST A7,ECBRL,A8 n P LDK A7,X'86' SOUND ALARM n P LKM n P DATA 1 n P n P RTN A14 n P IFT KEYLST=1 n
0x479d14…479ea8 Dummy {f00=0x0164, f01=0x0190, f02=»ET IN 'KEYS' n x , P* ON ENTRY A2 = KEY LOCK VALUE /70-/77 o P* o D F P****************************************************************** o N P* o PKEYL EQU * o & P SUK A2,/78 GET NEG KEY LOCK VALUE o " P LD A3,KEYS,TCABAS OLD STATUS o P LDK
0x479ea8…47a03c Dummy {f00=0x0164, f01=0x0190, f02=» o t P RF(NZ) KEYL20 WAS ON p P LDR A2,A2 WAS OFF p & & P RF(NZ) KEYL99 NOW OFF, NO CHANGE p @ P RF KEYL30 NOW ON p j PKEYL20 EQU * WAS ON p P LDR A2,A2 p $ P RF(Z) KEYL99 NOW ON, NO CHANGE p PKEYL30 EQU * CHANGE p P LD A3,KEYS,TCABAS
0x47a03c…47a1d0 Dummy {f00=0x0164, f01=0x0190, f02=»EW STATUS, RIGHTMOST BIT = RIGHTMOST LOCK, BIT ON = LOCK ON p * P* A4 = KEYLOCK CHANGED, LAYOUT AS A3 q D ( P* A2 = 1, IF CHANGED TO OFF ELSE 0 q r P* q * P* INSERT USER ROUTINE BELOW THIS LINE q P* q PKEYL99 EQU * q P RTN A14 q P XIF
0x47a1d0…47a364 Dummy {f00=0x0164, f01=0x0190, f02=»* q P* r < P******************************************************** r P* r T PLON EQU /B7 r ^ PLOF EQU /B8 r r P IFT KB6272=1 r PLMF1 EQU /20 r PLMF2 EQU /10 r PLIOL EQU 8 r PLINH EQU 4 r PLERR EQU 2 r PLSAV EQU 1 r
0x47a364…47a4f8 Dummy {f00=0x0164, f01=0x0190, f02=» =2 r PLSAV EQU 8 =2 s P XIF s " PLMF1ON LDK A3,LMF1 s . P RF LMPON s H PLMF1OF LDK A3,LMF1 s Z P RF LMPOF s t PLMF2ON LDK A3,LMF2 s P RF LMPON s PLMF2OF LDK A3,LMF2 s P RF LMPOF s PLIOLON LDK A3,LIOL s P RF LMPON s
0x47a4f8…47a68c Dummy {f00=0x0164, f01=0x0190, f02=»RRON LDK A3,LERR s P RF LMPON t PLERROF LDK A3,LERR t * P RF LMPOF t D PLSAVON LDK A3,LSAV t V P RF LMPON t p PLSAVOF LDK A3,LSAV t P RF LMPOF t P* t PLMPON LDK A7,LON t P RF SDISP t PLMPOF LDK A7,LOF t P RF SDISP t
0x47a68c…47a820 Dummy {f00=0x0164, f01=0x0190, f02=»* t $ P* SIGNAL DISPLAY MONITOR REQUEST u P* u 2 < P******************************************************** u < P* u | PSDISP EQU * u P LDKL A8,ECBSD u P ADR A8,CREBAS u P ST A3,ECBCW,A8 u P LKM u P DATA 1 u P RTN A14 u
0x47a820…47a9b4 (3, 110) Dummy {f00=0x0164, f01=0x0190, f02=» : P* SEARCH FOR ATTRIBUTE CHAR BACKWARDS AND MASK IT v P* v B < P******************************************************** v L P* v " P* A2=CURSOR BINARY ADDRESS v $ P* A1=BUFFER SCANNING PARAM. v . P* 0=ATTRIB FOUND 1=END OF BUFFER
0x47a9b4…47ab48 Dummy {f00=0x0164, f01=0x0190, f02=»UFFC GET BUFFER CHAR v P CWK A3,/1F ATTRIB. CHAR. w P RF(G) ASB10 NO w > PASB08 ST A3,ATTRIB,TCABAS w V , P ST A2,CURATT,TCABAS CURSOR ON ATTRIBUTE w x P RTN A14 w PASB10 CWK A2,0 END OF BUFFER w P RF(E) ASB20 YES w P SUK A2,1 w P R
0x47ab48…47acdc Dummy {f00=0x0164, f01=0x0190, f02=»1,2 ATTRIBUTE IN LAST POS. w & P LDKL A2,1919 LAST BUFFER POSITION x " P CF A14,GBUFFC GET CHARACTER x L P CWK A3,/1F ATTRIBUTE ??? x p P RB(NG) ASB08 YES!!! x P SUR A2,A2 FIRST SCREEN POS. x 2 P********************************************* x P
0x47acdc…47ae70 Dummy {f00=0x0164, f01=0x0190, f02=»REEN x d P RTN A14 y P * EJECT y P* y 4 < P******************************************************** y > P* y ~ P* ATMASF y P* y : P* SEARCH FOR ATTRIBUTE CHAR. FORWARDS AND MASK IT y P* y > P**************************
0x47ae70…47b004 Dummy {f00=0x0164, f01=0x0190, f02=»ARAM. y v . P* 0=ATTRIB FOUND 2=END OF BUFFER RIGHT z " P* A3=ATTRIB IN LAST BUFF POS z @ P* z f P z p P z x PS:ATT EQU * z P LD A7,ATTRIB,TCABAS z P LD A8,CURATT,TCABAS z , P CF A14,ATMASF SEARCH ATTRIBUTE FORWARD z P ST A7,ATTRI
0x47b004…47b198 Dummy {f00=0x0164, f01=0x0190, f02=»UFFC GET BUFFER CHAR z P CWK A3,/1F ATTRIB CHAR? { P RF(G) ASF10 NO { < @ P************************************************************ { T , P CWK A2,LBVDU-1 EOB +ATTRIB IN LAST POS { @ P************************************************************ {
0x47b198…47b32c Dummy {f00=0x0164, f01=0x0190, f02=» { ( PASF10 CWK A2,LBVDU-1 END OF BUFFER? | P RF(L) ASF20 NO | 4 P LDK A1,2 | L P RTN A14 | ^ PASF20 ADK A2,1 | n P RB ASF05 | P * EJECT | P* | 6 P************************************************** | P* | P* GBUFFC |
0x47b32c…47b4c0 Dummy {f00=0x0164, f01=0x0190, f02=» P* } P* A2=CURSOR BINARY ADDR } P* A3=CHARACTER } . P* } D P* } N PGBUFFC EQU * } X P LDK A3,0 } l P LDKL A4,BVDU } ~ " P ADR A4,TCABAS GET VDU BUFFER } P ADR A4,A2 } & P LCR A3,A4 GET CHARACTER IN BUFF. } P RTN A14 } P *
0x47b4c0…47b654 (3, 111) Dummy {f00=0x0167, f01=0x0190, f02=»* RESET 'KEYBOARD INHIBIT' IN FOLLOWING SITUATIONS: } 8 P* 1- A DEVICE WITH AN ATTACHED KEYBOARD IS EXECUTING ~ < $ P* A COMMAND. BIT 14=1 IN KBINH ~ x 2 P* 2- A PA-KEY OPERATION IS IN PROCESS PRIOR TO ~ < P* INITIATION OF A COMMAND FOR A DEVICE WITH AN AT
0x47b654…47b7e8 Dummy {f00=0x0167, f01=0x0190, f02=» RESETTING ALLOWED DURING ~ t $ P* UPDATE AND DISPLAY SITUATION. " P* J @ P*********************************************************** T P* PRESET EQU * & P CM MODE,TCABAS RESET INSERT MODE * P CF A14,LIOLOF TURN OFF "INSERT" LAMP
0x47b7e8…47b97c Dummy {f00=0x0167, f01=0x0190, f02=»AMP d P RTN A14 P * EJECT P 4 P < D P*************************************************************** D P* 4 P* C O P Y : COPY CONTENTS IN VDU BUFFER ON $ P* HARDCOPY DEVICE P* @ P********
0x47b97c…47bb10 Dummy {f00=0x0167, f01=0x0190, f02=» LDKL A3,BVDU BUFFER P ADR A3,TCABAS ADDRESSS P LDKL A6,LBVDU REQ LENGTH > , P LDK A4,/8B ORDER = WRITE ADDRESSED WAIT ` P * EJECT P* $ P* WRITE INTERTASK COMMUNICATION P* P* A3 = BUFFER ADDRESS P* A4 =
0x47bb10…47bca4 Dummy {f00=0x0167, f01=0x40f6, f02=» P LDKL A1,-1 * P CF A14,REQTIM NO TIME OUT SUPERVISION P ST A5,ECBCW,A8 TO TASK ID F P ST A6,ECBRL,A8 REQ LENGTH h P ST A3,ECBBA,A8 P LDR A7,A4 ORDER P LKM P DATA 1 P RTN A14 P END @ ESS P* A4 =
0x47bca4…47be38 Dummy {f00=0x0167, f01=0x2008, f02=» A7,/B7 TRANSFER PARAMETERS LKM , DATA 1 8 CF A14,ERASE ERASE SCREEN H 0 ,EM100 CF A14,TRPF TRANSMIT, PROGRAM FUNCTION j RB EM100 AGAIN * * END START @ 4,2,A13 ADR A14,A13 LOAD STACK
0x47be38…47bfcc Dummy {f00=0x0167, f01=0x0000, f02=»
[…0x1…]