- XU8P369 ;BP/BDT - Set Read Time Out; 10/24/06
- ;;8.0;KERNAL;**369**; JUL 10, 1995;Build 27
- Q
- POST ; Set READ TIMEOUT for the HL LOGICAL LINK NODE of "XUMF FORUM" to 600
- N FDA
- S FDA(1,870,"?+1,",.01)="XUMF FORUM"
- S FDA(1,870,"?+1,",200.04)=600
- D UPDATE^DIE("","FDA(1)")
- Q
- --- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HXU8P369 286 printed Feb 18, 2025@23:33:46 Page 2
- XU8P369 ;BP/BDT - Set Read Time Out; 10/24/06
- +1 ;;8.0;KERNAL;**369**; JUL 10, 1995;Build 27
- +2 QUIT
- POST ; Set READ TIMEOUT for the HL LOGICAL LINK NODE of "XUMF FORUM" to 600
- +1 NEW FDA
- +2 SET FDA(1,870,"?+1,",.01)="XUMF FORUM"
- +3 SET FDA(1,870,"?+1,",200.04)=600
- +4 DO UPDATE^DIE("","FDA(1)")
- +5 QUIT