5 thoughts on “MOM Pt. 002: Custom NETSOL Sign-On Screen

  1. Hi,
    When I submit SYS2.CNTL(TK4-LOGO), i get a CC of 8 on the ASM step.

    Do you have any clue how to overcome this?

    Here is some snips from the log:

    13.27.02 JOB 80 $HASP373 TK4MLOGO STARTED – INIT 1 – CLASS A – SYS TK4-
    13.27.02 JOB 80 IEF403I TK4MLOGO – STARTED – TIME=13.27.02
    13.27.02 JOB 80 IEFACTRT – Stepname Procstep Program Retcode
    13.27.02 JOB 80 TK4MLOGO CLEANUP IDCAMS RC= 0000
    13.27.02 JOB 80 TK4MLOGO COMP COPY IEBCOPY RC= 0000
    13.27.02 JOB 80 TK4MLOGO COPY IEBCOPY RC= 0000
    13.27.03 JOB 80 TK4MLOGO UPDATE IEBUPDTE RC= 0000
    13.27.08 JOB 80 TK4MLOGO ASM IFOX00 RC= 0008
    13.27.08 JOB 80 IEF404I TK4MLOGO – ENDED – TIME=13.27.08
    13.27.08 JOB 80 $HASP395 TK4MLOGO ENDED

    IEF236I ALLOC. FOR TK4MLOGO ASM
    IEF237I 148 ALLOCATED TO SYSLIB
    IEF237I 148 ALLOCATED TO
    IEF237I 148 ALLOCATED TO
    IEF237I 248 ALLOCATED TO
    IEF237I VIO ALLOCATED TO SYSUT1
    IEF237I VIO ALLOCATED TO SYSUT2
    IEF237I VIO ALLOCATED TO SYSUT3
    IEF237I JES2 ALLOCATED TO SYSPRINT
    IEF237I VIO ALLOCATED TO SYSPUNCH
    IEF237I JES2 ALLOCATED TO SYSIN
    IEF142I TK4MLOGO ASM – STEP WAS EXECUTED – COND CODE 0008
    IEF285I SYS1.UMODMAC KEPT *——362
    IEF285I VOL SER NOS= MVSRES.
    IEF285I SYS2.MACLIB KEPT *——–0
    IEF285I VOL SER NOS= MVSRES.
    IEF285I SYS1.MACLIB KEPT *——–0
    IEF285I VOL SER NOS= MVSRES.
    IEF285I SYS1.AMODGEN KEPT *——–4
    IEF285I VOL SER NOS= MVSDLB.
    IEF285I SYS20041.T132702.RA000.TK4MLOGO.R0000002 DELETED *—-2,870
    IEF285I SYS20041.T132702.RA000.TK4MLOGO.R0000003 DELETED *——121
    IEF285I SYS20041.T132702.RA000.TK4MLOGO.R0000004 DELETED *——-32
    IEF285I JES2.JOB00080.SO0109 SYSOUT
    IEF285I SYS20041.T132702.RA000.TK4MLOGO.R0000005 PASSED *——267
    IEF285I JES2.JOB00080.SI0104 SYSIN
    IEF373I STEP /ASM / START 20041.1327 7824K FREE

    35 IFO209 ADDRESSABILITY ERROR- BASE AND DISPLACEMENT CANNOT BE RESOLVE
    41 IFO209 ADDRESSABILITY ERROR- BASE AND DISPLACEMENT CANNOT BE RESOLVE
    44 IFO209 ADDRESSABILITY ERROR- BASE AND DISPLACEMENT CANNOT BE RESOLVE
    48 IFO209 ADDRESSABILITY ERROR- BASE AND DISPLACEMENT CANNOT BE RESOLVE
    51 IFO209 ADDRESSABILITY ERROR- BASE AND DISPLACEMENT CANNOT BE RESOLVE
    56 IFO209 ADDRESSABILITY ERROR- BASE AND DISPLACEMENT CANNOT BE RESOLVE
    65 IFO209 ADDRESSABILITY ERROR- BASE AND DISPLACEMENT CANNOT BE RESOLVE
    66 IFO209 ADDRESSABILITY ERROR- BASE AND DISPLACEMENT CANNOT BE RESOLVE
    72 IFO209 ADDRESSABILITY ERROR- BASE AND DISPLACEMENT CANNOT BE RESOLVE
    NUMBER OF STATEMENTS FLAGGED IN THIS ASSEMBLY = 25
    HIGHEST SEVERITY WAS 8
    OPTIONS FOR THIS ASSEMBLY
    ALIGN, ALOGIC, BUFSIZE(STD), DECK, ESD, FLAG(0), LINECOUNT(55), LIST, NOMCALL,
    NOMLOGIC, NONUMBER, NOOBJECT, NORENT, RLD, NOSTMT, NOLIBMAC, NOTERMINAL, NOTES
    SYSPARM()
    WORK FILE BUFFER SIZE/NUMBER =19066/ 1
    TOTAL RECORDS READ FROM SYSTEM INPUT 3
    TOTAL RECORDS READ FROM SYSTEM LIBRARY 24303
    TOTAL RECORDS PUNCHED 267
    TOTAL RECORDS PRINTED 9498
    ******EOF-TTR=00D301************ BOTTOM OF DATA ***********1250520-BYTES********

    1. Hi Keith

      Sorry for the delay, somehow I was not getting any notification of your comment. It’s almost been a year since I’ve done this and I can’t really make out the error from your log.

      Did you double check your formatting and also the code blocks to echo the screen? Editing this is very tricky and the errors are hard to spot.

      I’m afraid I can’t help more than that 🙁

      Kind regards,
      – Kevin

Leave a Reply

Your email address will not be published. Name, email and website not required.