|
|
In reference to the article:
I have been testing the above procedure and can not
get it to function correctly. I have placed Message Fields on a Test
Sign On Screen that was copied from QDSIGNON. The fields reference Message
Descriptions in a Message File. Per the referenced article, the goal is to
be able to dynamically change the Message Descriptions in the Message File and
have then reflect on the Sign On Screen WITHOUT having to recompile the DSPF or
end and start the QINTER subsystem.
I am finding the changes will not take place unless
I recompile the DSPF and restart QINTER.
Any ideas on what I am doing wrong ?
William N. Harrell, Jr.
1015 Climbing Rose Turn Cary, North Carolina 27511 |
BEGIN:VCARD VERSION:2.1 N:Harrell, Jr.;William;N. FN:William N. Harrell, Jr. ORG:Time Warner Cable TEL;HOME;VOICE:919 854 9813 ADR;HOME:;;1015 Climbing Rose Turn;Cary;North Carolina;27511 LABEL;HOME;ENCODING=QUOTED-PRINTABLE:1015 Climbing Rose Turn=0D=0ACary, North Carolina 27511 URL:http://home.nc.rr.com/wharrell EMAIL;PREF;INTERNET:wharrell@nc.rr.com REV:20010316T172328Z END:VCARD
midrange.com
5769PW1 V4R2M0 980228 SEU SOURCE LISTING
03/16/01 12:24:32 PAGE 1
SOURCE FILE . . . . . . . TO320/QDDSSRC
MEMBER . . . . . . . . . TWCSIGNON
SEQNBR*...+... 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7
...+... 8 ...+... 9 ...+... 0
10 A*%%TS SD 20010316 111937 WNHARR REL-V4R2M0 5769-PW1
03/16/01
20 A*%%EC
03/16/01
30 A DSPSIZ(24 80 *DS3)
03/16/01
40 A* START OF SPECIFICATIONS ******************************
50 A* *
60 A* PHYSICAL FILE MEMBER NAME: QDSIGNON *
70 A* *
80 A* END OF SPECIFICATIONS ********************************
90 A*
100 A*
110
A**************************************************************************
120 A* Sign On
*
130 A* System . . . . . :
XXXXXXXX *
140 A* Subsystem . . . . :
XXXXXXXXXX *
150 A* Display . . . . . :
XXXXXXXXXX *
160 A*
*
170 A* User . . . . . . . . . . . . . . ___________
*
180 A* Password . . . . . . . . . . . .
*
190 A* Program/procedure . . . . . . . . ___________
*
200 A* Menu . . . . . . . . . . . . . . ___________
*
210 A* Current library . . . . . . . . . ___________
*
220 A*
*
230 A*
*
240 A*
*
250 A*
*
260 A*
*
270 A*
*
280 A*
*
290 A*
*
300 A*
*
310 A* (C) COPYRIGHT IBM CORP.
19XX, 19YY.*
320
A**************************************************************************
330 A*
340 A*
|--------|---------|---------|---------|---------|---------|---------|--
350 A* 1 10 20 30 40 50 60
70
360 A*
370 A***********************************************************
380 A* *
390 A* RECORD FORMAT -- NAME: SIGNON *
400 A* FUNCTION: SIGN ON DISPLAY *
410 A* INDICATORS USED: 01 02 *
420 A* FUNCTION KEYS USED: NONE *
430 A* NUMBER OF I/O FIELDS: 11 *
440 A* KEYWORDS USED: DSPATR CHGINPDFT CLEAR *
450 A* CHECK *
460 A* *
470 A***********************************************************
480 A*
490 A R SIGNON
03/16/01
500 A*%%TS SD 20010316 111937 WNHARR REL-V4R2M0 5769-PW1
03/16/01
510 A CLEAR
03/16/01
520 A BLINK
03/16/01
530 A 1 23' Sign On
' 03/16/01
5769PW1 V4R2M0 980228 SEU SOURCE LISTING
03/16/01 12:24:32 PAGE 2
SOURCE FILE . . . . . . . TO320/QDDSSRC
MEMBER . . . . . . . . . TWCSIGNON
SEQNBR*...+... 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7
...+... 8 ...+... 9 ...+... 0
540 A DSPATR(HI)
03/16/01
550 A 2 48'System . . . . . :'
03/16/01
560 A SYSNAME 8A O 2 70
03/16/01
570 A 3 48'Subsystem . . . . :'
03/16/01
580 A SBSNAME 10A O 3 70
03/16/01
590 A 4 48'Display . . . . . :'
03/16/01
600 A DEVNAME 10A O 4 70
03/16/01
610 A USERID 10A B 14 69
03/16/01
620 A 01 PASSWRD 10A I 15 69DSPATR(ND)
03/16/01
630 A PROGRAM 10A B 16 69CHECK(LC)
03/16/01
640 A DSPATR(ND)
03/16/01
650 A MENU 10A B 17 69CHECK(LC)
03/16/01
660 A DSPATR(ND)
03/16/01
670 A CURLIB 10A B 18 69CHECK(LC)
03/16/01
680 A DSPATR(ND)
03/16/01
690 A 02 QSNERROR 80A O 24 1DSPATR(HI)
03/16/01
700 A COPYRIGHT 40A O 24 40DSPATR(HI)
03/16/01
710 A UBUFFER 128A H
03/16/01
720 A 2 1'TIME'
03/16/01
730 A 2 6'WARNER'
03/16/01
740 A 2 13'CABLE'
03/16/01
750 A 3 1'RALEIGH'
03/16/01
760 A 3 9'DIVISION'
03/16/01
770 A 18 48'PPV SPECIALS'
03/16/01
780 A DSPATR(UL)
03/16/01
790 A COLOR(GRN)
03/16/01
800 A 22 2'Option 2: Billing System &
Pay per- 03/16/01
810 A View'
03/16/01
820 A 18 2'Information Services
Support Line' 03/16/01
830 A 19 2'919-573-7090'
03/16/01
840 A 20 2'Option 1: Phones, PCs,
Lan' 03/16/01
850 A 21
2'raleigh.helpdesk@twcable.com ' 03/16/01
860 A 23 2'billing.help@twcable.com'
03/16/01
870 A 20 48MSGCON(025 MSG2001
*LIBL/QDSIGNON) 03/16/01
880 A 21 48MSGCON(025 MSG2002
*LIBL/QDSIGNON) 03/16/01
890 A 22 48MSGCON(025 MSG2003
*LIBL/QDSIGNON) 03/16/01
900 A 23 48'$'
03/16/01
910 A 23 50MSGCON(005 MSG2004
*LIBL/QDSIGNON) 03/16/01
920 A 4 1'WE'
03/16/01
930 A 4 4'BRING'
03/16/01
940 A 4 10'YOUR'
03/16/01
950 A 4 15'WORLD'
03/16/01
960 A 4 21'HOME'
03/16/01
970 A 14 58'User . . :'
03/16/01
980 A 15 58'Password :'
03/16/01
990 A 7 8'*'
03/16/01
1000 A 8 8'*'
03/16/01
1010 A 9 8'*'
03/16/01
1020 A 10 8'*'
03/16/01
1030 A 11 8'*'
03/16/01
1040 A 6
8'**********************************- 03/16/01
1050 A
********************************' 03/16/01
1060 A 7 73'*'
03/16/01
5769PW1 V4R2M0 980228 SEU SOURCE LISTING
03/16/01 12:24:32 PAGE 3
SOURCE FILE . . . . . . . TO320/QDDSSRC
MEMBER . . . . . . . . . TWCSIGNON
SEQNBR*...+... 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7
...+... 8 ...+... 9 ...+... 0
1070 A 8 73'*'
03/16/01
1080 A 9 73'*'
03/16/01
1090 A 10 73'*'
03/16/01
1100 A 11 73'*'
03/16/01
1110 A 12
8'**********************************- 03/16/01
1120 A
********************************' 03/16/01
1130 A 7 10MSGCON(062 MSG0001
*LIBL/QDSIGNON) 03/16/01
1140 A 8 10MSGCON(062 MSG0002
*LIBL/QDSIGNON) 03/16/01
1150 A 9 10MSGCON(062 MSG0003
*LIBL/QDSIGNON) 03/16/01
1160 A 10 10MSGCON(062 MSG0004
*LIBL/QDSIGNON) 03/16/01
1170 A 11 10MSGCON(062 MSG0005
*LIBL/QDSIGNON) 03/16/01
* * * * E N D O F S O U R C E * * * *
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.
