According to the IBM website, UOLOGIN must be a globally cataloged subroutine with two arguments.
First argument is a return value. If set to zero, login is rejected and error code 80011 is returned. Second argument is input to the subroutine and contains the application name. Example: SUBROUTINE UOLOGIN( RETURN.VALUE, APPLIC.NAME ) IF APPLIC.NAME = "SOMETHING" THEN RETURN.VALUE = 0 END ELSE RETURN.VALUE = 1 END RETURN END N.B., I haven't tested this. The document references "software version 6.x". Might only work on UniData. Steve Johnson FXA Group Ltd. Bangkok ------- u2-users mailing list [email protected] To unsubscribe please visit http://listserver.u2ug.org/
