• Program execution problem Rev1

    From Robert Baer@21:1/5 to Robert Baer on Mon Aug 31 21:32:55 2020
    This is a multi-part message in MIME format.
    Robert Baer wrote:
    R.Wieser wrote:
    Robert,

       Notice the program stops at line 530 for no good reason,
    and all files are closed.

    Under QBasic 'end' terminates the program.  Are you sure you didn't mean
    'end if' there ?
    * In one iteration of the program, that is what was intended..


    (That all the files are closed could easily be part of PDS'es clean-up
    activities before actually terminating)

    in a section of the program, 6 statement lines got executed
    in 1,3,5,2,4,6

    As you have not posted the involved code and I (we) do not have any
    kind of
    mind-reading capabilities there is nothing I (we) can say about that.

       One would think that a more regimented, line-numbered
    program would behave.

    It certainly enables you to write goto-enabled spagetti code (as in:
    unreadable/trackable code).   Why do you think most languages dropped the >> 'goto' and/or strongly advice you NOT to use it ?  :-)


    Basic bug-hunting most often boils down to isolating the problem by
    removing
    everything that does /not/ make the problem disappear (and sometimes
    replacing variable and/or human input by fixed stuff).   If you're lucky >> you're left with a single line. :-)
    * Now THAT would be rather nice..do my taxes in one line...


    Regards,
    Rudy Wieser


    Program (highly revised) listing attached.
    Partial copy of output:
    <h2 id="A:"><B>A:</B></h2>

    READSJ
    COPYSJ
    &nbsp; &nbsp;able
    &nbsp; &nbsp;<a
    href="downhole-measurements.html?find=able">Downhole Measurements</a>

    READSJ 'above' record GONE
    READSJ
    COPYSJ
    &nbsp; &nbsp;
    &nbsp; &nbsp;absorbers
    &nbsp; &nbsp;<a href="vendor-profile.html?find=absorbers">Vendor Profile</a>

    READSJ 'absorbing' record GONE
    READSJ
    COPYSJ
    &nbsp; &nbsp;
    &nbsp; &nbsp;absorption
    &nbsp; &nbsp;<a
    href="downhole-measurements.html?find=absorption">Downhole Measurements</a>
    &nbsp; &nbsp;<a href="https://www.hamamatsu.com/resources/pdf/etd/PMT_handbook_v3aE.pdf?find=absorption">Photomultiplier
    Tubes Basics</a>

    READSJ 'accelerate' record GONE
    READSJ
    COPYSJ
    &nbsp; &nbsp;
    &nbsp; &nbsp;accelerator
    &nbsp; &nbsp;<a href="downhole-measurements.html?find=accelerator">Downhole Measurements</a>

    **END COPY**

    So there are two problems:
    1) NO "debug" output from the git-go
    FOR LWD = 1 TO 164 'LWD keyword file size
    GOSUB READIKW '**NO "READIKW" PRINTOUT

    2) Skips every other SJ keyword.

    Comments?
    Thanks.





    JyBTQVZFIk5MV0QuQkFTIixBICAgICAgICAnbW9kIGNvcHkgb2Ygb3JpZ2luYWwNCiAgJw0K DQogIENMUw0KICAnIFN0YXJ0IG91dHB1dCBmaWxlIGFzIG5vdCB0aGVyZS4uLg0KICBPUEVO ICJMV0RuZHguVFhUIiBGT1IgQVBQRU5EIEFTICMzDQogIENMT1NFICMzDQogIEtJTEwgIkxX RG5keC5UWFQiDQogIERJTSBTSiQoMTApDQogIE9QRU4gIkxXRFNPUlQuVFhUIiBGT1IgSU5Q VVQgQVMgIzENCiAgIE9QRU4gInNqLmh0bSIgRk9SIElOUFVUIEFTICMyICAgICAgICAgICAg J2NvcHkgb2Ygc3ViamVjdC1pbmRleC5odG1sKG9yaWdpbmFsKQ0KICAgT1BFTiAiTFdEbmR4 LlRYVCIgRk9SIE9VVFBVVCBBUyAjMw0KICAnDQogICBGT1IgU0pJID0gMSBUTyAyOTcNCiAg ICBMSU5FIElOUFVUICMyLCBTJDogUFJJTlQgIzMsIFMkICAgICAgICAgJ2NvcHkgdG8gZmly c3QgdXNlZnVsIGVudHJ5DQogICBORVhUIFNKSQ0KICAgUVQkID0gQ0hSJCgzMik6IFRSVUUg PSAoMSA9IDEpDQogICAnICAgICAgIDMgY2FzZXM6DQogICAnIGNhc2UgMzogSUtXJCA+IFNK JCAgcmVhZCBTSiByZWNvcmQgYXQgc3RhcnR1cCB1bnRpbCBjYXNlIDEgb3IgY2FzZSAyOyBj b3B5IFNKIHJlY29yZHMgb25seQ0KICAgJyBjYXNlIDI6IElLVyQgPSBTSiQgIHdyaXRlIElL VyByZWNvcmQsIHRoZW4gd3JpdGUgU0ogcmVjb3JkDQogICAnIGNhc2UgMTogSUtXJCA8IFNK JCAgd3JpdGUgSUtXIHJlY29yZHMgb25seQ0KICAgJyBUeXBpY2FsIFNKIHJlY29yZHMgIChT SiBmb3IgU3ViSmVjdCBpbmRleCkNCiAgICcgICAgJm5ic3A7ICZuYnNwOw0KICAgJyAgICAm bmJzcDsgJm5ic3A7YWN0aXZlDQogICAnICAgICZuYnNwOyAmbmJzcDs8YSBocmVmPSJpbmRl eC5odG1sP2ZpbmQ9YWN0aXZlIj5JbmRleDwvYT4NCiAgICcgICAgJm5ic3A7ICZuYnNwOzxh IGhyZWY9InZlbmRvci1wcm9maWxlLmh0bWw/ZmluZD1hY3RpdmUiPlZlbmRvciBQcm9maWxl PC9hPg0KICAgJzxicj48L2gzPiAgICAgICAgICAgICAgICAgICAgICcqU0ogcmVhZCBuZWVk cyB0byBza2lwIG92ZXIgdGhpcyBzdHVmZg0KICAgJyAgICAgICAgICAgICAgICAgICAgICAg ICAgICAgICcqDQogICAnPGgyIGlkPSJCOiI+PEI+Qjo8L0I+PC9oMj4gICAgJyoNCiAgICc8 aDM+ICAgICAgICAgICAgICAgICAgICAgICAgICAnKg0KICAgJyAgICAmbmJzcDsgJm5ic3A7 DQogICAnICAgICZuYnNwOyAmbmJzcDthZGRlZA0KICAgJyAgICAmbmJzcDsgJm5ic3A7PGEg aHJlZj0idGVjaG5pY2FsLWFzcGVjdHMuaHRtbD9maW5kPWFkZGVkIj5UZWNobmljYWwgQXNw ZWN0czwvYT4NCiAgICc8YnI+DQogICAnKiogTm90ZSBlbmQgb2YgU0ogcmVjb3JkczoNCiAg ICc8YnI+PC9oMz4NCiAgICcgICAgICAgICAgICAgIDwhLS0NCiAgICcqKg0KICAnDQogICBG T1IgTFdEID0gMSBUTyAxNjQgICAgICAnTFdEIGtleXdvcmQgZmlsZSBzaXplDQogICAgR09T VUIgUkVBRElLVyAgICAgICAnZ2V0IG5ldyBrZXl3b3JkIGZvciBpbnNlcnQgYW5kIG1ha2Ug SUtXIHJlY29yZA0KICAgIEdPU1VCIFJFQURTSiAgICAgICAgJ05vdyByZWFkIFNKIHJlY29y ZCBhcnJheQ0KICAgJ0Fzc3VtZSBJS1ckPlNKS1ckIHNvIENBU0UzICAnZG8gbm90IHRyeSBv dGhlciBjb25kaXRpb25zDQoNCiAgICBTRUxFQ1QgQ0FTRSBUUlVFDQogICAgQ0FTRSAoSUtX JCA+IFNKS1ckKQ0KICAgICAgU1RBUlRTSiA9IDE6IEdPU1VCIENPUFlTSg0KICAgICAgR09T VUIgUkVBRFNKICAgICAgJ21heSBoYXZlIG5ldyBJS1ckLFNKS1ckIHJlbGF0aW9uc2hpcA0K ICAgIENBU0UgKElLVyQgPSBTSktXJCkNCiAgICAgIEdPU1VCIENPUFlJS1cgICAgICdubyA8 YnI+Li4gc28gY2FuIGFwcGVuZCBTSiByZWNvcmQgYXJyYXkNCiAgICAgIFNUQVJUU0ogPSAz OiBHT1NVQiBDT1BZU0ogJ3NqKDMuLmVuZCkNCiAgICBDQVNFIChJS1ckIDwgU0pLVyQpDQog ICAgICBHT1NVQiBDT1BZSUtXOiBQUklOVCAjMywgIjxicj4iDQogICAgRU5EIFNFTEVDVA0K ICAgTkVYVCBMV0QNCiAgIFBSSU5UICJBRlRFUiBORVhUIExXRCwgTFdEPSI7IExXRA0KICAg Q0xPU0UgICAgICAnem9uZSBpcyBsYXN0IFNKOyA0NDUxIGxpbmVzDQogICBTWVNURU0NCg0K ICAgRU5EICAgICAgICAgICdzaG91bGQgbmV2ZXIgZ2V0IGhlcmUNCg0KUkVBRElLVzogICAg ICAgICAnUmVhZCBuZXcgSUtXIGtleXdvcmQsIG1ha2UgSUtXIHJlY29yZA0KICAgICAgICAg J1BSSU5UICMzLCAiUkVBRElLVyINCiAgICBMSU5FIElOUFVUICMxLCBJS1ckICAgICdnZXQg bmV3IGtleXdvcmQgZm9yIGluc2VydCBhbmQgbWFrZSBJS1cgcmVjb3JkDQogICAgSUtXMSQg PSAiICAgICZuYnNwOyAmbmJzcDsiDQogICAgSUtXMiQgPSAiICAgICZuYnNwOyAmbmJzcDsi ICsgSUtXJA0KICAgIElLVzMkID0gIiAgICAmbmJzcDsgJm5ic3A7PGEgaHJlZj0iICsgUVQk ICsgIkRyaWxsaW5nLVNlcnZpY2VzLVRlY2hub2xvZ3kuaHRtbD9maW5kPSIgKyBJS1ckICsg UVQkDQogICAgSUtXMyQgPSBJS1czJCArICI+RHJpbGxpbmcgU2VydmljZXMgVGVjaG5vbG9n eSBkb3dubG9hZDwvYT4iDQogICAgJyAgIElLVzQkID0gIjxicj4iICBkb25lIGVsc2V3aGVy ZQ0KUkVUVVJODQoNCkNPUFlJS1c6ICAgICAgICAgJ0NvcHkgSUtXIHJlY29yZA0KICAgICAg ICAgIFBSSU5UICMzLCAiQ09QWUlLVyINCiAgICBQUklOVCAjMywgSUtXMSQ6IFBSSU5UICMz LCBJS1cyJDogUFJJTlQgIzMsIElLVzMkDQpSRVRVUk4NCg0KUkVBRFNKOiAgICAgICAgICdS ZWFkIG5ldyBTSiByZWNvcmQgYXJyYXkNCiAgICAgICAgICBQUklOVCAjMywgIlJFQURTSiIN CiAgICBGT1IgU0ogPSBTVEFSVFNKIFRPIDEwDQogICAgIExJTkUgSU5QVVQgIzIsIFNKJChT Sik6IElGIElOU1RSKFNKJChTSiksICI8IS0tIikgVEhFTiBHT1NVQiBFTkRJS1cgJ2F0IGVu ZCBTSiByZWNvcmRzLCB0byBjb3B5IGJhbGFuY2Ugb2YgZmlsZQ0KICAgICBJRiBTSiA9IDIg VEhFTiBTSktXJCA9IE1JRCQoU0okKFNKKSwgMTgpICAgJ1NKIGtleXdvcmQNCiAgICAgSUYg TUlEJChTSiQoU0opLCAxLCA0KSA9ICI8YnI+IiBUSEVOIEVYSVQgRk9SDQogICAgTkVYVCBT SiAgICAgICAgICAgICAnaGF2ZSBmdWxsIFNKIHJlY29yZCBhcnJheSwgYnV0IG1vdmUgcmVh ZCBwb2ludGVyIGlmIGFsZmEgY2hhbmdlDQogICAgICAgICAnUFJJTlQgIzMsICJFTkQgRk9S IFNKOiI7IFNKOyAiU0okKFNKKT0iOyBTSiQoU0opOyAiSUtXJD0iOyBJS1ckLCAiU0pLVyQ9 IjsgU0pLVyQ7ICIgTFdEID0gIjsgTFdEDQogICAgSUYgU0okKFNKKSA9ICI8YnI+PC9oMz4i IFRIRU4gRk9SIE5VQ0hSID0gMSBUTyAzOiBMSU5FIElOUFVUICMyLCBTSiQ6IE5FWFQgTlVD SFIgICAgICdza2lwIHRvIG5leHQgYWxmYSBjaGFyYWN0ZXINClJFVFVSTg0KDQpDT1BZU0o6 ICAgICAgICAgJ0NvcHkgU0ogcmVjb3JkIGFycmF5DQogICAgICAgICAgUFJJTlQgIzMsICJD T1BZU0oiDQogICAgRk9SIFNKID0gMSBUTyAxMA0KICAgICBQUklOVCAjMywgU0okKFNKKTog SUYgU0ogPSAyIFRIRU4gU0pLVyQgPSBNSUQkKFNKJChTSiksIDE4KSAgICdTSiBrZXl3b3Jk DQogICAgIElGIE1JRCQoU0okKFNKKSwgMSwgNCkgPSAiPGJyPiIgVEhFTiBFWElUIEZPUg0K ICAgIE5FWFQgU0ogICAgICAgICAgICAgJ2hhdmUgZnVsbCBTSiByZWNvcmQgYXJyYXksIGJ1 dCBtb3ZlIHJlYWQgcG9pbnRlciBpZiBhbGZhIGNoYW5nZQ0KICAgICAgICAgJ1BSSU5UICMz LCAiRU5EIEZPUiBTSjoiOyBTSjsgIlNKJChTSik9IjsgU0okKFNKKTsgIklLVyQ9IjsgSUtX JCwgIlNKS1ckPSI7IFNKS1ckOyAiIExXRCA9ICI7IExXRA0KICAgIElGIFNKJChTSikgPSAi PGJyPjwvaDM+IiBUSEVOIEZPUiBOVUNIUiA9IDEgVE8gMzogTElORSBJTlBVVCAjMiwgU0ok OiBORVhUIE5VQ0hSICAgICAnc2tpcCB0byBuZXh0IGFsZmEgY2hhcmFjdGVyDQpSRVRVUk4N Cg0KRU5ESUtXOg0KICAgICAgICAgIFBSSU5UICMzLCAiRU5ESUtXIg0KICAgIEVKJCA9ICIi OiBXSElMRSBFSiQgPD4gIjwvaHRtbD4iOiBMSU5FIElOUFVUICMyLCBFSiQ6IFBSSU5UICMz LCBFSiQ6IFdFTkQgICAgICAgICdjb3B5IGJhbGFuY2Ugb2YgZmlsZQ0KICAgIENMT1NFDQog ICAgU1lTVEVNDQpSRVRVUk4NCg0KDQoNCg==

    --- SoupGate-Win32 v1.05
    * Origin: fsxNet Usenet Gateway (21:1/5)
  • From R.Wieser@21:1/5 to All on Tue Sep 1 10:02:26 2020
    Robert,

    GOSUB READIKW '**NO "READIKW" PRINTOUT

    Well duh! You commented that line out. :-)

    2) Skips every other SJ keyword

    Your main loop (for lwd = 1 to 164) contains *three* 'gosub readjs' calls.
    My guess is that it goes wrong there. You might try to move the first one /above/ the 'for' loop.

    Comments?

    A few.

    No indication of the used basic variant. That makes it hard to even do a syntax check on the code.

    No (samples of) the datafiles, meaning that I (we) cannot run that code and spot where it goes wrong.

    No attempt to simplify the code (using dummy datafiles or even static data) (making it easier to spot where it goes wrong)


    "Writing programs is easy. Just let your cat walk over the keyboard a few times and you're done.
    The hard part is to figure out what/where it goes wrong when it does
    something else than you expected."

    Regards,
    Rudy Wieser

    --- SoupGate-Win32 v1.05
    * Origin: fsxNet Usenet Gateway (21:1/5)