Apparently screenman use is a dark art.... Or at least there isn't
that much collective experience with it.

Anyway, here is some more information:
At times, I experience a crash when I try to launch the screenman form
with the option described before.  Here is the information I get from
^XTER after the crash:

Process ID:  32352  (32352)
                                                          FEB 24, 2006 07:38:11

Username:                               Process Name:
UCI/VOL: [UCI,VOL]                      :
$ZA:                                    $ZB:   -
Current $IO: /dev/pts/3                 Current $ZIO: /dev/pts/3^79^10
CPU time:                               Page Faults:
Direct I/O:                             Buffered I/O:
$ZE= D1^XQ1, Undefined local variable: DIC,150373850,-%GTM-E-UNDEF
$ZE= D1^XQ1, Undefined local variable: DIC,150373850,-%GTM-E-UNDEF
D1 S:DIC["(" DIC=U_DIC Q
Last Global Ref: ^DIC(19,10071,36)

Which symbol? >

Here is the entire symbol table:


$DEVICE=
$ECODE=,M6,Z150373850,
$ESTACK=5
$ETRAP=D UNWIND^ZU
$QUIT=0
$STACK=6
$STACK(000)=-dir
$STACK(000,"ECODE")=
$STACK(000,"MCODE")=GTM$DMOD
$STACK(000,"PLACE")=^GTM$DMOD
$STACK(001)=DO
$STACK(001,"ECODE")=
$STACK(001,"MCODE")= D DIC G:DA=-1 KILL S XQZ="DR,DDSFILE,DDSFILE(1)",XQW=39 D S
ET
$STACK(001,"PLACE")=C+1^XQ1
$STACK(002)=DO
$STACK(002,"ECODE")=
$STACK(002,"MCODE")= W ! K DIC S XQZ="DIC,DIC(0),DIC(""A""),DIC(""B""),DIC(""S""
),DIC(""W""),D",XQW=29 D SET,D1
$STACK(002,"PLACE")=DIC+1^XQ1
$STACK(003)=DO
$STACK(003,"ECODE")=,M6,Z150373850,
$STACK(003,"MCODE")=D1 S:DIC["(" DIC=U_DIC Q
$STACK(003,"PLACE")=D1^XQ1
$STACK(004)=DO
$STACK(004,"ECODE")=
$STACK(004,"MCODE")=        D ^%ZTER K %ZT S XUERF="" ; Capture symbol table fir
st!
$STACK(004,"PLACE")=ERR2+16^ZU
$X $Y=79 10
$ZV=GT.M V4.4-004 Linux x86
%ZT("^XUTL("XQ",$J)")=
%ZTER11B=-
%ZTER11I=0
%ZTER11N=1
%ZTER11S=
%ZTER11Z=0
%ZTERCNT=35
%ZTERH1=60320
%ZTERROR=
%ZTERRT=^%ZTER(1,60320,1,1)
%ZTERSUB=%ZTER11S)
%ZTERVAP=%ZT(
%ZTERVAR=%ZTERVAR
%ZTERZE=D1^XQ1, Undefined local variable: DIC,150373850,-%GTM-E-UNDEF
DUZ("0")=@
DUZ("1")=
DUZ("2")=69
DUZ("AG")=O
DUZ("AUTO")=1
DUZ("BUF")=1
DUZ("LANG")=1
IO("0")=/dev/pts/3
IO("1","/dev/pts/3")=
IO("ERROR")=
IO("HOME")=38^/dev/pts/3
IO("ZIO")=/dev/pts/3
IOST("0")=9
XQXFLG("GUI")=^
^XUTL("XQ",$J,"DUZ")=73
^XUTL("XQ",$J,"DUZ(0)")=@
^XUTL("XQ",$J,"DUZ(1)")=
^XUTL("XQ",$J,"DUZ(2)")=69
^XUTL("XQ",$J,"DUZ(AG)")=O
^XUTL("XQ",$J,"DUZ(AUTO)")=1
^XUTL("XQ",$J,"DUZ(BUF)")=1
^XUTL("XQ",$J,"DUZ(LANG)")=1
^XUTL("XQ",$J,"IO")=/dev/pts/3
^XUTL("XQ",$J,"IOBS")=$C(8)
^XUTL("XQ",$J,"IOF")=#,$C(27,91,50,74,27,91,72)
^XUTL("XQ",$J,"IOM")=80
^XUTL("XQ",$J,"ION")=GTM-UNIX-TELNET
^XUTL("XQ",$J,"IOS")=38
^XUTL("XQ",$J,"IOSL")=24
^XUTL("XQ",$J,"IOST")=C-VT100
^XUTL("XQ",$J,"IOST(0)")=9
^XUTL("XQ",$J,"IOT")=VTRM
^XUTL("XQ",$J,"IOXY")=W $C(27,91)_((DY+1))_$C(59)_((DX+1))_$C(72)
^XUTL("XQ",$J,"T")=3
^XUTL("XQ",$J,"XQM")=10025
^XUTL("XQ",$J,"XQVOL")=VOL
^XUTL("XQ",$J,"XQW")=
^XUTL("XQ",$J,0)=3060224.073807
^XUTL("XQ",$J,1)=10025P10025^ADAM^Adam^^M^1^^^^^^^199^y
^XUTL("XQ",$J,2)=10067P10025^TMG SEQUEL IMPORT MENU^Import Demographics from Seq
uel^^M^^^^^^^^199^y
^XUTL("XQ",$J,3)=10071P10025^TMG SEQUEL IMPORT SETTINGS^Sequel Import Settings^^
C^^^^^^^^199^y
$ZE= D1^XQ1, Undefined local variable: DIC,150373850,-%GTM-E-UNDEF

D1 S:DIC["(" DIC=U_DIC Q

Last Global Ref: ^DIC(19,10071,36)

Which symbol? >


So apparently DIC is not defined. So I go back and look at the DIC
variables descriptions inside the OPED screenman menu option editor.
For DIC it says:
 ^DIC is the FileMan look up and edit utility.  The Variable DIC
is used to specify the file that is to be used.  It is set to a file
number, 19, for instance specifies the Option File, or an explicit
global root in the form ^GLOBAL( or ^GLOBAL(19,.  It is required.

First of all, this is INCORRECT.  If I try to enter 22711 or
^TMG(22711,  I get rejected by the menu editor, which then tells me to
Enter the global reference for DIC, WITHOUT the "^".

I thought that perhaps the record in the OPTION file (my menu option)
was corrupted, so I created a second one with similar data values -->
same response.

Can anyone help?

Kevin



On 2/22/06, Kevin Toppenberg <[EMAIL PROTECTED]> wrote:
> I have, in the past, made a screen man form to edit some fields for a file.
> I wanted to repeat this to edit some settings for my demographics
> upload project.
> I have followed the screenman tutorial, and can now run the screenman
> form from menu option DDS RUN A FORM, either by calling this option
> directly, or by navigating: fileman->other->screenman->run a form
> At this point, it asks me for the file, then the form name, then
> starting page number, then to select the record to edit.  This all
> works find.
>
> I now want to be able to launch this from a menu option.  So I have
> created this option entry:
>
> NUMBER: 10071
>   NAME: TMG SEQUEL IMPORT SETTINGS
>   MENU TEXT: Sequel Import Settings
>   TYPE: ScreenMan
>   CREATOR: TOPPENBERG,KEVIN S
>   PACKAGE: MEDICAL GROUP OF GREENEVILLE
>   DELEGABLE: YES
>   DR{DDS}: [TMG UPDATE SETTINGS]
>   DDSFILE: 22711
>   DDSPAGE: 1
>   UPPERCASE MENU TEXT: SEQUEL IMPORT SETTINGS
>
>
> I have verified the file number 22711 is correct, and the name of the
> form I can run is TMG UPDATE SETTINGS, and the spelling is correct.
>
> But when I try to launch the screenman form by selecting this menu
> option, the screen just flashes and takes me back to the menu listing
> of menu options.
>
> Any ideas what I am doing wrong?
>
> Kevin
>


-------------------------------------------------------
This SF.Net email is sponsored by xPML, a groundbreaking scripting language
that extends applications into web and mobile media. Attend the live webcast
and join the prime developer group breaking into this new coding territory!
http://sel.as-us.falkag.net/sel?cmd=lnk&kid0944&bid$1720&dat1642
_______________________________________________
Hardhats-members mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/hardhats-members

Reply via email to