Skip to main content

I cannot see how to retrieve information returned from a script into my basic program. For example:
SCRIPT  = 'width = Field(WindowPos(0),",",3)'
CALL WIN.COMSUB(SCRIPT)
how do I get the returned information back into my Unidata basic program?

I cannot see how to retrieve information returned from a script into my basic program. For example:
SCRIPT  = 'width = Field(WindowPos(0),",",3)'
CALL WIN.COMSUB(SCRIPT)
how do I get the returned information back into my Unidata basic program?

      CALL WIN.EVAL('SystemMetrics(1):"*":SystemMetrics(0):"*":WindowPos(0):"*":Get(Columns):"*":Get(Lines):"*":Version:"*":Seri
al:"*":Get(Font):"*":Get(ExtraLineSpace)',SYSMET)
      DEPTH = FIELD(SYSMET,'*',1) ; WIDTH = FIELD(SYSMET,'*',2) ; WINDOWPOS = FIELD(SYSMET,'*',3) ; NCOLUMNS = FIELD(SYSMET,'*',
4) ; NLINES = FIELD(SYSMET,'*',5) ; VERSION = FIELD(SYSMET,'*',6) ; SERIAL = FIELD(SYSMET,'*',7) ; FONT = FIELD(SYSMET,'*',8) ;
XTRALINE = FIELD(SYSMET,'*',9)

I cannot see how to retrieve information returned from a script into my basic program. For example:
SCRIPT  = 'width = Field(WindowPos(0),",",3)'
CALL WIN.COMSUB(SCRIPT)
how do I get the returned information back into my Unidata basic program?

Hi Kevin,

There's a supplied subroutine WIN.LICINFO which retreives the licese information from the PC. This show how it can be done.

David

Terms & ConditionsAccessibility statement