| Don,
>Does the form appear asking for the document, note, or whatever?
Yes, it does. When I invoked Gold G and the form appeared, I invoked
VMS and the following form displayed..
Include a VMS File
VMS file name: [linitda]test.txt
Right after I press <enter>, it just simply exit from A1 , don't even
have any access violation or the like....
>Does using the /NOCUSTOM qualifier fix the problem, for instance?
No, it doesn't.
The following is the a1trace.log that I invoked Gold % to trace what
happended, it seems that something related to editor buffer. BTW, I used EDT as
an editor.
Any advice would be welcome. Many thanks in advance.
Best regards,
Linitda
-----------------------------------------------------------------
! %OA-I-LOGFUN, Function: OA$SCP_DISPATCH .IF $TRA_MESS == "1" THEN OA$TRA_SET MESS
43 ! %OA-I-LOGFUN, Function: OA$TRA_SET MESS
44 ! %OA-I-LOGFUN, Function: OA$SCP_DISPATCH .IF SYMBOL == "1" THEN OA$TRA_SET SYMBOL
45 ! OA$FLD_RTN: return field-contents
46 ! OA$FMS_RTN: Returned "1" from field "SYMBOL" (15) on page 1
49 ! %OA-I-LOGFUN, Function: OA$TRA_SET SYMBOL
50 ! %OA-I-LOGFUN, Function: OA$SCP_DISPATCH .IF IO == "1" THEN OA$TRA_SET IO
51 ! OA$FLD_RTN: return field-contents
53 ! OA$FMS_RTN: Returned "1" from field "IO" (16) on page 1
54 ! GET Symbol: IO
54 ! Value: 1
55 ! GET Symbol: "1"
56 ! Value: 1
57 ! %OA-I-LOGFUN, Function: OA$TRA_SET IO
58 ! %OA-I-LOGFUN, Function: OA$SCP_DISPATCH .IF TERM == "1" THEN OA$TRA_SET TERM
59 ! OA$FLD_RTN: return field-contents
61 ! OA$FMS_RTN: Returned "0" from field "TERM" (17) on page 1
62 ! GET Symbol: TERM
62 ! Value: 0
63 ! GET Symbol: "1"
64 ! Value: 1
65 ! %OA-I-LOGFUN, Function: OA$SCP_DISPATCH .IF ALL == "1" THEN OA$TRA_SET ALL
66 ! OA$FLD_RTN: return field-contents
68 ! OA$FMS_RTN: Returned "1" from field "ALL" (13) on page 1
69 ! GET Symbol: ALL
69 ! Value: 1
70 ! GET Symbol: "1"
71 ! Value: 1
72 ! %OA-I-LOGFUN, Function: OA$TRA_SET ALL
73 ! %OA-I-LOGFUN, Function: OA$SCP_DISPATCH .IF SCRIPT == "1" THEN OA$TRA_SET SCRIPT
74 ! OA$FLD_RTN: return field-contents
75 ! OA$FMS_RTN: Returned "1" from field "SCRIPT" (3) on page 1
76 ! GET Symbol: SCRIPT
77 ! Value: 1
78 ! GET Symbol: "1"
78 ! Value: 1
80 ! %OA-I-LOGFUN, Function: OA$TRA_SET SCRIPT
81 ! OA$FRM_DISPATCH: End Dispatch TRACEARG
81 !
82 ! ----------- CURRENT FORM INFORMATION ------------
82 ! CURRENT FIELD INDEX = 3
83 ! FORM DSAB WORKSPACE PRIOR_DSAB
84 ! TRACEARG 002E7D88 0006510E 002E75E0
84 ! OA$EDIT 002E75E0 000650B4 002E67A8
85 ! EMC 002E67A8 0006503C 00000000
86 ! %OA-I-LOGFUN, Function: CLOSE_PRIOR
87 ! OA$FRM_CLOSE: Closing TRACEARG
87 ! OA$FLO_ALL_NDISP: Undisplay all workspaces
98 ! %OA-I-LOGFUN, Function: FORM EDTGMEN
99 ! OA$FRM_DISPATCH: Dispatching EDTGMEN
100 !
100 ! ----------- CURRENT FORM INFORMATION ------------
101 ! CURRENT FIELD INDEX = 0
101 ! FORM DSAB WORKSPACE PRIOR_DSAB
102 ! OA$EDIT 002E75E0 000650B4 002E67A8
103 ! EMC 002E67A8 0006503C 00000000
105 ! OA$FRM_OPEN: Starting EDTGMEN
106 ! OA$FMS_OPEN: Opening form "EDTGMEN" (002E74C8)
106 ! OA$FLO_OPEN_FORM: Opening form - EDTGMEN
107 ! in SYS$SYSDEVICE:[ALLIN1.LIB_ENGLISH]OAFORM.FLB;
129 ! %OA-I-LOGFUN, Function: OA$FORM_MENU
130 ! OA$FLD_PUT: 0
131 ! OA$FLD_PRE_PROCESS: -- 00065078
132 ! OA$FLD_GET_FIELD-- 0
133 ! OA$FMS_GET: Getting user input from field "CHOICE" (0) on page 1
135 ! OA$FLO_DISPW: Displaying OA$EDIT (000650B4)
136 ! OA$FLO_DISPW: Displaying EDTGMEN (00065078)
vms{CR}
151 ! OA$FMS_GET_KEYPAD: Key value {CR} "CHOICE" (0) on page 1
152 ! %OA-I-LOGFUN, Function: OA$FLD_DONE
152 ! OA$FLD_DONE: 0
153 ! OA$FLD_POST_PROCESS: -- 00065078
153 ! OA$FLD_RTN: return field-contents
155 ! OA$FMS_RTN: Returned "vms " from field "CHOICE" (0) on page 1
157 ! OA$FLD_PUT: 0
159 ! %OA-I-LOGFUN, Function: CHECK_DISKQUOTA
162 ! %OA-I-LOGFUN, Function: OA$SCP_DISPATCH .IF OA$STATUS == "1" THEN FORM EDTGETVMS\IFEXIT\COPY #VMSFILE "EDITOR_BUFFER"
163 ! [SCP/TRACE] .IF OA$STATUS == "1" THEN FORM EDTGETVMS\IFEXIT\COPY #VMSFILE "EDITOR_BUFFER" << Form= EDTGMEN
164 ! GET Symbol: OA$STATUS
165 ! Value: 1
166 ! GET Symbol: "1"
166 ! Value: 1
168 ! [SCP/TRACE] FORM EDTGETVMS\IFEXIT\COPY #VMSFILE "EDITOR_BUFFER" << Form= EDTGMEN
169 ! %OA-I-LOGFUN, Function: FORM EDTGETVMS
169 ! OA$FRM_DISPATCH: Dispatching EDTGETVMS
170 !
170 ! ----------- CURRENT FORM INFORMATION ------------
171 ! CURRENT FIELD INDEX = 0
171 ! FORM DSAB WORKSPACE PRIOR_DSAB
172 ! EDTGMEN 002E74C8 00065078 002E75E0
173 ! OA$EDIT 002E75E0 000650B4 002E67A8
174 ! EMC 002E67A8 0006503C 00000000
174 ! OA$FRM_OPEN: Starting EDTGETVMS
175 ! OA$FMS_OPEN: Opening form "EDTGETVMS" (002E7928)
176 ! OA$FLO_OPEN_FORM: Opening form - EDTGETVMS
176 ! in SYS$SYSDEVICE:[ALLIN1.LIB_ENGLISH]OAFORM.FLB;
184 ! %OA-I-LOGFUN, Function: OA$FORM_ARG
185 ! %OA-I-LOGFUN, Function: GET OA$DISPLAY=OA$_EDTGETVMS_ENT_FILE_ED
187 ! GET Symbol: OA$DISPLAY=OA$_EDTGETVMS_ENT_FILE_ED
188 ! Value: Enter filename or press EXIT for editor
189 ! OA$FLD_PRE_PROCESS: -- 00065096
190 ! GET Symbol: #VMSFILE
190 ! Value:
191 ! OA$FLD_GET_FIELD-- 0
191 ! OA$FMS_GET: Getting user input from field "VMSFILE" (0) on page 1
193 ! OA$FLO_NDISP: Undisplaying OA$EDIT (000650B4)
195 ! OA$FLO_NDISP: Undisplaying EDTGMEN (00065078)
195 ! OA$FLO_DISPW: Displaying EDTGETVMS (00065096)
! Enter filename or press EXIT for editor
[ALLIN1.SOURCES]A1LINK.COM{CR}
204 ! OA$FMS_GET_KEYPAD: Key value {CR} "VMSFILE" (0) on page 1
205 ! %OA-I-LOGFUN, Function: OA$FLD_DONE
205 ! OA$FLD_DONE: 0
207 ! OA$FMS_RTN: Returned "[ALLIN1.SOURCES]A1LINK.COM " from field "VMSFILE" (0) on page 1
208 ! GET Symbol: OA$DIR_PARSE:"OAUSER:*.*"
209 ! Value:
216 ! OA$FLD_POST_PROCESS: -- 00065096
216 ! OA$FLD_RTN: return field-contents
218 ! OA$FMS_RTN: Returned "[ALLIN1.SOURCES]A1LINK.COM " from field "VMSFILE" (0) on page 1
219 ! OA$FRM_DISPATCH: End Dispatch EDTGETVMS
219 !
220 ! ----------- CURRENT FORM INFORMATION ------------
220 ! CURRENT FIELD INDEX = 0
221 ! FORM DSAB WORKSPACE PRIOR_DSAB
222 ! EDTGETVMS 002E7928 00065096 002E74C8
222 ! EDTGMEN 002E74C8 00065078 002E75E0
223 ! OA$EDIT 002E75E0 000650B4 002E67A8
224 ! EMC 002E67A8 0006503C 00000000
225 ! %OA-I-LOGFUN, Function: IFEXIT
226 ! %OA-I-LOGFUN, Function: COPY #VMSFILE "EDITOR_BUFFER"
227 ! GET Symbol: #VMSFILE
227 ! Value: [ALLIN1.SOURCES]A1LINK.COM
228 ! GET Symbol: "EDITOR_BUFFER"
228 ! Value: EDITOR_BUFFER
242 ! Text DSAB Name: TXT$LIST Requests : OPEN
244 ! Text DSAB Name: TXT$LIST Requests : GET_NEXT
245 ! Text DSAB Name: TXT$LIST Requests : GET_NEXT
248 ! %OA-I-LOGERROR, %SYSTEM-F-ACCVIO, access violation, reason mask=00, virtual address=0000001C, PC=0058DE55, PSL=03C00004
250 ! %OA-I-LOGERROR, %SYSTEM-F-ACCVIO, access violation, reason mask=00, virtual address=0000001C, PC=0058DE55, PSL=03C00004
252 ! %OA-I-LOGERROR, %SYSTEM-F-ACCVIO, access violation, reason mask=00, virtual address=0000001C, PC=0058DE55, PSL=03C00004
254 ! %OA-I-LOGERROR, %SYSTEM-F-ACCVIO, access violation, reason mask=00, virtual address=0000001C, PC=0058DE55, PSL=03C00004
256 ! %OA-I-LOGERROR, %SYSTEM-F-ACCVIO, access violation, reason mask=00, virtual address=0000001C, PC=0058DE55, PSL=03C00004
257 ! %OA-I-LOGERROR, %OA-W-EDTFAILURE, Error detected from editor
259 ! %OA-I-LOGERROR, -SYSTEM-F-ACCVIO, access violation, reason mask=00, virtual address=0000001C, PC=0058DE55, PSL=03C00004
260 ! OA$FRM_CLOSE: Closing EDTGETVMS
261 ! %OA-I-LOGERROR, %OA-W-EDTFAILURE, Error detected from editor
263 ! %OA-I-LOGERROR, -SYSTEM-W-EXQUOTA, exceeded quota
263 ! OA$FRM_DISPATCH: End Dispatch OA$EDIT EDIT "[.MSG]ZUBZFI4LI.TXT ","",,"EDT"/MODE=UPDATE
266 !
266 ! ----------- CURRENT FORM INFORMATION ------------
267 ! CURRENT FIELD INDEX = 0
267 ! FORM DSAB WORKSPACE PRIOR_DSAB
268 ! EDTGMEN 002E74C8 00065078 002E75E0
268 ! OA$EDIT 002E75E0 000650B4 002E67A8
269 ! EMC 002E67A8 0006503C 00000000
270 ! %OA-I-LOGFUN, Function: GET OA$FUNCTION="SET_MENU " #PREV_DEFAULT
271 ! %OA-I-LOGFUN, Function: SET_MENU DEFAULT
272 ! GET Symbol: OA$FUNCTION="SET_MENU " #PREV_DEFAULT
273 ! Value: SET_MENU DEFAULT
274 ! GET Symbol: #PREV_DEFAULT=""
274 ! Value:
279 ! OA$FRM_CLOSE: Closing EDTGMEN
279 ! OA$FRM_CLOSE: Closing EDTGMEN
280 ! OA$FRM_DISPATCH: End Dispatch MAIN
281 !
282 ! ----------- CURRENT FORM INFORMATION ------------
282 ! CURRENT FIELD INDEX = 0
283 ! FORM DSAB WORKSPACE PRIOR_DSAB
283 ! OA$EDIT 002E75E0 000650B4 002E67A8
284 ! EMC 002E67A8 0006503C 00000000
288 ! OA$FLO_ALL_NDISP: Undisplay all workspaces
293 ! %OA-I-LOGSTOP, Ending ALL-IN-1
|