Re: Aubit4gl-discuss Digest, Vol 350, Issue 1

rodrigue Timma <[email protected]>
Newsgroups gmane.comp.lang.4gl.aubit.general
Message-ID <CAPn9dqNs=1XhU9prtR3pi7cGgAgDF7Vtk=HwRz_OOczP+sJ9hg@mail.gmail.com>
hi daniel
find below the code,
il's as you say  but  the same problem remain :
function  state_list()
 define p_state ARRAY[60] OF RECORD LIKE state.*
 define idx int
 DECLARE c_states CURSOR WITH HOLD FOR SELECT *
                                            FROM state
    LET idx = 1
    FOREACH c_states INTO p_state[idx].*
  LET idx = idx + 1
    END FOREACH

 CALL ui.Interface.loadToolbar("125")
 OPEN WINDOW w_state AT 8,8
        WITH FORM "state_list"

 DISPLAY "code" TO txx_code
    DISPLAY "nom" TO txx_nom
 CALL set_count(idx)
    DISPLAY ARRAY p_state TO s_state.*


    LET idx = arr_curr()

end function

thks for your help


2016-01-13 6:17 GMT+01:00 <[email protected]>:

> Send Aubit4gl-discuss mailing list submissions to
>         [email protected]
>
> To subscribe or unsubscribe via the World Wide Web, visit
>         https://lists.sourceforge.net/lists/listinfo/aubit4gl-discuss
> or, via email, send a message with subject or body 'help' to
>         [email protected]
>
> You can reach the person managing the list at
>         [email protected]
>
> When replying, please edit your Subject line so it is more specific
> than "Re: Contents of Aubit4gl-discuss digest..."
>
>
> Today's Topics:
>
>    1. Re: Problem with fcompile in 64 Bits (Mike Aubury)
>    2. Re: No column name in grid (Daniel Kroker)
>    3. Re: Aubit4gl-discuss Digest, Vol 349,     Issue 1/No column name
>       in grid (rodrigue Timma)
>
>
> ----------------------------------------------------------------------
>
> Message: 1
> Date: Tue, 12 Jan 2016 06:18:01 +0000
> From: Mike Aubury <[email protected]>
> Subject: Re: [Aubit4gl-discuss] Problem with fcompile in 64 Bits
> To: Carlos Alberto Correa Fayad <[email protected]>
> Cc: source <[email protected]>
> Message-ID:
>         <CAGAq4WHEV=
> [email protected]>
> Content-Type: text/plain; charset=UTF-8
>
> Aubit4GL should work on 64 bit - i've used it many times ;)
> Is it possible that its form specific ?
>
> Try running with A4GL_DEBUG=ALL set - and see if the debug.out shows
> anything useful ?
> If you can also send the output from "aubit-config -a" ?
>
> On 12 January 2016 at 03:52, Carlos Alberto Correa Fayad
> <[email protected]> wrote:
> > Hi,
> >
> > I migrating to 64 Bits. When use 4glpc is necesary -lm flag, for example
> >
> > 4glpc -n -V -lm program1.4gl program2.c -o program3.4ae
> >
> > and work fine.
> >
> > But when use fcompile
> >
> > fcompile form1.per
> >
> > this error "Unable to write data".
> >
> > Sorry, but no have more data
> >
> > Thanks for help
> >
> > Carlos
> >
> >
> ------------------------------------------------------------------------------
> > Site24x7 APM Insight: Get Deep Visibility into Application Performance
> > APM + Mobile APM + RUM: Monitor 3 App instances at just $35/Month
> > Monitor end-to-end web transactions and take corrective actions now
> > Troubleshoot faster and improve end-user experience. Signup Now!
> > http://pubads.g.doubleclick.net/gampad/clk?id=267308311&iu=/4140
> > _______________________________________________
> > Aubit4gl-discuss mailing list
> > [email protected]
> > https://lists.sourceforge.net/lists/listinfo/aubit4gl-discuss
> >
>
>
>
> ------------------------------
>
> Message: 2
> Date: Tue, 12 Jan 2016 10:02:35 +0100
> From: Daniel Kroker <[email protected]>
> Subject: Re: [Aubit4gl-discuss] No column name in grid
> To: [email protected]
> Message-ID: <[email protected]>
> Content-Type: text/plain; charset="windows-1252"
>
> Hi
>
> please try:
>
> DATABASE or_db
> LAYOUT
>   VBOX
>    GRID(HIDDEN)
> {
> [code              ] [nom                                       ]
> }
> END
> TABLE
> {
> [a0                ] [f000                                      ]
> [a0                ] [f000                                      ]
> [a0                ] [f000                                      ]
> [a0                ] [f000                                      ]
> [a0                ] [f000                                      ]
> [a0                ] [f000                                      ]
> [a0                ] [f000                                      ]
> }
> END
> END
> TABLES
> state
> ATTRIBUTES
> LABEL code = FORMONLY.txx_code;
> LABEL nom = FORMONLY.txx_nom;
>
> a0 = state.code;
> f000 = state.sname;
> INSTRUCTIONS
> DELIMITERS " "
> SCREEN RECORD s_state[7](state.*)
>
> And then you can say in your 4gl code:
>
> DISPLAY "code" TO FORMONLY.txx_code
> DISPLAY "nom" TO FORMONLY.txx_nom
>
> I hope this helps you
>
> best regards
> Daniel
>
> Am 12.01.2016 um 07:12 schrieb rodrigue Timma:
> > Good morning
> > i have a problem to show columns in my grid, no columns appear and
> > this is my .per
> > DATABASE or_db
> > LAYOUT
> > TABLE
> > {
> >  code                 nom
> > [a0                ] [f000                                      ]
> > [a0                ] [f000                                      ]
> > [a0                ] [f000                                      ]
> > [a0                ] [f000                                      ]
> > [a0                ] [f000                                      ]
> > [a0                ] [f000                                      ]
> > [a0                ] [f000                                      ]
> > }
> > END
> > TABLES
> > state
> > ATTRIBUTES
> > a0 = state.code;
> > f000 = state.sname;
> > INSTRUCTIONS
> > DELIMITERS " "
> > SCREEN RECORD s_state[7](state.*)
> > and my .4gl code :
> > define p_state ARRAY[60] OF RECORD LIKE state.*
> >  define idx int
> >  DECLARE c_states CURSOR WITH HOLD FOR SELECT *
> >                                             FROM state
> >     LET idx = 1
> >     FOREACH c_states INTO p_state[idx].*
> >   LET idx = idx + 1
> >     END FOREACH
> >
> >  CALL ui.Interface.loadToolbar("125")
> >  OPEN WINDOW w_state AT 8,8
> >         WITH FORM "state_list" ATTRIBUTE(border)
> >     CALL set_count(idx)
> >     DISPLAY ARRAY p_state TO s_state.*
> >     LET idx = arr_curr()
> > As you can see in my attached document there are  no column's name
> > Please help thks
> >
> >
> >
> ------------------------------------------------------------------------------
> > Site24x7 APM Insight: Get Deep Visibility into Application Performance
> > APM + Mobile APM + RUM: Monitor 3 App instances at just $35/Month
> > Monitor end-to-end web transactions and take corrective actions now
> > Troubleshoot faster and improve end-user experience. Signup Now!
> > http://pubads.g.doubleclick.net/gampad/clk?id=267308311&iu=/4140
> >
> >
> > _______________________________________________
> > Aubit4gl-discuss mailing list
> > [email protected]
> > https://lists.sourceforge.net/lists/listinfo/aubit4gl-discuss
> -------------- next part --------------
> An HTML attachment was scrubbed...
>
> ------------------------------
>
> Message: 3
> Date: Wed, 13 Jan 2016 06:17:06 +0100
> From: rodrigue Timma <[email protected]>
> Subject: Re: [Aubit4gl-discuss] Aubit4gl-discuss Digest, Vol 349,
>         Issue 1/No column name in grid
> To: [email protected]
> Message-ID:
>         <
> CAPn9dqNj0udP_AivTX7NAKZfshzajJh1V78qOY7-_k_LHornPg@mail.gmail.com>
> Content-Type: text/plain; charset="utf-8"
>
> Hi
>
> i have tried your code  :
> <<
> DATABASE or_db
> LAYOUT
> VBOX
> GRID(HIDDEN)
> {
> [code ] [nom ]
> }
> END
> TABLE
> {
> [a0 ] [f000 ]
> [a0 ] [f000 ]
> [a0 ] [f000 ]
> [a0 ] [f000 ]
> [a0 ] [f000 ]
> [a0 ] [f000 ]
> [a0 ] [f000 ]
> }
> END
> END
> TABLES
> state
> ATTRIBUTES
> LABEL code = FORMONLY.txx_code;
> LABEL nom = FORMONLY.txx_nom;
>
> a0 = state.code;
> f000 = state.sname;
> INSTRUCTIONS
> DELIMITERS " "
> SCREEN RECORD s_state[7](state.*)
>
> And then you can say in your 4gl code:
>
> DISPLAY "code" TO FORMONLY.txx_code
> DISPLAY "nom" TO FORMONLY.txx_nom
> >>
>
> it doesn't work, i am on Windows 8
>
> Please helps
>
> Thks
>
> 2016-01-12 7:12 GMT+01:00 <[email protected]
> >:
>
> > Send Aubit4gl-discuss mailing list submissions to
> >         [email protected]
> >
> > To subscribe or unsubscribe via the World Wide Web, visit
> >         https://lists.sourceforge.net/lists/listinfo/aubit4gl-discuss
> > or, via email, send a message with subject or body 'help' to
> >         [email protected]
> >
> > You can reach the person managing the list at
> >         [email protected]
> >
> > When replying, please edit your Subject line so it is more specific
> > than "Re: Contents of Aubit4gl-discuss digest..."
> >
> >
> > Today's Topics:
> >
> >    1. Re: Menu in VDC (Daniel Kroker)
> >    2. Problem with fcompile in 64 Bits (Carlos Alberto Correa Fayad)
> >    3. No column name in grid (rodrigue Timma)
> >
> >
> > ----------------------------------------------------------------------
> >
> > Message: 1
> > Date: Wed, 30 Dec 2015 17:04:07 +0100
> > From: Daniel Kroker <[email protected]>
> > Subject: Re: [Aubit4gl-discuss] Menu in VDC
> > To: [email protected]
> > Message-ID: <[email protected]>
> > Content-Type: text/plain; charset="windows-1252"
> >
> > Hi,
> >
> > there is a bug at the moment. We will fix it with the next VDC Update.
> > In the VDC under "Options" You can set the option "Main Menu: Pulldown"
> > to change the xml tree to the menu.
> >
> > Am 28.12.2015 um 16:44 schrieb rodrigue Timma:
> > >
> > > hi All,
> > >
> > > I'm new in aubit4gl, vdc
> > >
> > > and I have some problems  :
> > >
> > > i have downloaded aubit demo samples,
> > >
> > > i want to customize it to create classic  start application menu(file
> > > menu) but it look like it doesn't work.
> > >
> > > the menu remains in tree form.
> > >
> > >
> > > i use de 4st file  :
> > >
> > > <StyleList>
> > > <Style name="*" >
> > > <StyleAttribute name="startMenuPosition" value="menu" />
> > > </Style>
> > > </StyleList>
> > >
> > > and 4sm :
> > >
> > > <StartMenu text ="Stores Demo">
> > > <StartMenuGroup text ="Store">
> > >  <StartMenuCommand text ="Customer" exec =".\d4_main.exe CUST" />
> > >  <StartMenuCommand text ="Orders" exec =".\d4_main.exe ORDE" />
> > >  <StartMenuCommand text ="Stock" exec =".\d4_main.exe STOC" />
> > >  <StartMenuCommand text ="Reports" exec =".\d4_main.exe REPO" />
> > > </StartMenuGroup>
> > > <StartMenuGroup text ="Store2">
> > >  <StartMenuCommand text ="Customer" exec =".\d4_main.exe CUST" />
> > >  <StartMenuCommand text ="Orders" exec =".\d4_main.exe ORDE" />
> > >  <StartMenuCommand text ="Stock" exec =".\d4_main.exe STOC" />
> > >  <StartMenuCommand text ="Reports" exec =".\d4_main.exe REPO" />
> > > </StartMenuGroup>
> > > </StartMenu>
> > >
> > >
> > > in  the 4sm file, i thought menu Store and Stroe2  would be in the
> > > same level  but It is not the case; i suppose it's a problem
> > >
> > > Finally,
> > >
> > > 1- is it possible to build a menu  dynamically from  database ?
> > >
> > > 2- do i need something else than aubit4gl VDC  to build client/server
> > > application with report ?
> > >
> > > Find attached my source file
> > >
> > > Thank you very much for your time and your help
> > >
> > >
> > >
> > >
> >
> ------------------------------------------------------------------------------
> > >
> > >
> > > _______________________________________________
> > > Aubit4gl-discuss mailing list
> > > [email protected]
> > > https://lists.sourceforge.net/lists/listinfo/aubit4gl-discuss
> >
> > --
> > Mit freundlichen Gr??en
> > Daniel Kroker
> >
> > VENTAS AG                            20+ Jahre ERP-Erfahrung!
> > Web: www.ventas.de
> > Fon: 040 / 32 33 34 0
> > Fax: 040 / 32 33 34 38
> > Firmensitz: Mittelweg 144, 20148 Hamburg, Deutschland
> > Registergericht: Hamburg, HRB 80 297 Ust.IdNr.: DE118686712
> > Vorstandsvorsitzender: Dipl. Ing. Alain Siverly
> > Aufsichtsratsvorsitzender: Dr. Olaf Rehme
> >
> > -------------- next part --------------
> > An HTML attachment was scrubbed...
> >
> > ------------------------------
> >
> > Message: 2
> > Date: Tue, 12 Jan 2016 04:52:28 +0100
> > From: "Carlos Alberto Correa Fayad" <[email protected]>
> > Subject: [Aubit4gl-discuss] Problem with fcompile in 64 Bits
> > To: source <[email protected]>
> > Message-ID:
> >
> >
> <trinity-3c50161a-77d2-4b8e-a3b5-420d508710e6-1452570748088@3capp-mailcom-lxa07
> > >
> >
> > Content-Type: text/plain; charset="us-ascii"
> >
> > An HTML attachment was scrubbed...
> >
> > ------------------------------
> >
> > Message: 3
> > Date: Tue, 12 Jan 2016 07:12:40 +0100
> > From: rodrigue Timma <[email protected]>
> > Subject: [Aubit4gl-discuss] No column name in grid
> > To: [email protected]
> > Message-ID:
> >         <CAPn9dqP0rt1mDDbpdaE2R7k6uz69w17LvQP-vOk=
> > [email protected]>
> > Content-Type: text/plain; charset="utf-8"
> >
> > Good morning
> > i have a problem to show columns in my grid, no columns appear and this
> is
> > my .per
> >
> > DATABASE or_db
> > LAYOUT
> > TABLE
> > {
> >  code                 nom
> > [a0                ] [f000                                      ]
> > [a0                ] [f000                                      ]
> > [a0                ] [f000                                      ]
> > [a0                ] [f000                                      ]
> > [a0                ] [f000                                      ]
> > [a0                ] [f000                                      ]
> > [a0                ] [f000                                      ]
> > }
> > END
> > TABLES
> > state
> > ATTRIBUTES
> > a0 = state.code;
> > f000 = state.sname;
> > INSTRUCTIONS
> > DELIMITERS " "
> > SCREEN RECORD s_state[7](state.*)
> >
> > and my .4gl code :
> >
> > define p_state ARRAY[60] OF RECORD LIKE state.*
> >  define idx int
> >  DECLARE c_states CURSOR WITH HOLD FOR SELECT *
> >                                             FROM state
> >     LET idx = 1
> >     FOREACH c_states INTO p_state[idx].*
> >   LET idx = idx + 1
> >     END FOREACH
> >
> >  CALL ui.Interface.loadToolbar("125")
> >  OPEN WINDOW w_state AT 8,8
> >         WITH FORM "state_list" ATTRIBUTE(border)
> >     CALL set_count(idx)
> >     DISPLAY ARRAY p_state TO s_state.*
> >     LET idx = arr_curr()
> >
> > As you can see in my attached document there are  no column's name
> >
> > Please help thks
> > -------------- next part --------------
> > An HTML attachment was scrubbed...
> > -------------- next part --------------
> > A non-text attachment was scrubbed...
> > Name: Capture.PNG
> > Type: image/png
> > Size: 9548 bytes
> > Desc: not available
> >
> > ------------------------------
> >
> >
> >
> ------------------------------------------------------------------------------
> > Site24x7 APM Insight: Get Deep Visibility into Application Performance
> > APM + Mobile APM + RUM: Monitor 3 App instances at just $35/Month
> > Monitor end-to-end web transactions and take corrective actions now
> > Troubleshoot faster and improve end-user experience. Signup Now!
> > http://pubads.g.doubleclick.net/gampad/clk?id=267308311&iu=/4140
> >
> > ------------------------------
> >
> > _______________________________________________
> > Aubit4gl-discuss mailing list
> > [email protected]
> > https://lists.sourceforge.net/lists/listinfo/aubit4gl-discuss
> >
> >
> > End of Aubit4gl-discuss Digest, Vol 349, Issue 1
> > ************************************************
> >
> -------------- next part --------------
> An HTML attachment was scrubbed...
>
> ------------------------------
>
>
> ------------------------------------------------------------------------------
> Site24x7 APM Insight: Get Deep Visibility into Application Performance
> APM + Mobile APM + RUM: Monitor 3 App instances at just $35/Month
> Monitor end-to-end web transactions and take corrective actions now
> Troubleshoot faster and improve end-user experience. Signup Now!
> http://pubads.g.doubleclick.net/gampad/clk?id=267308311&iu=/4140
>
> ------------------------------
>
> _______________________________________________
> Aubit4gl-discuss mailing list
> [email protected]
> https://lists.sourceforge.net/lists/listinfo/aubit4gl-discuss
>
>
> End of Aubit4gl-discuss Digest, Vol 350, Issue 1
> ************************************************
>

------------------------------------------------------------------------------
Site24x7 APM Insight: Get Deep Visibility into Application Performance
APM + Mobile APM + RUM: Monitor 3 App instances at just $35/Month
Monitor end-to-end web transactions and take corrective actions now
Troubleshoot faster and improve end-user experience. Signup Now!
http://pubads.g.doubleclick.net/gampad/clk?id=267308311&iu=/4140

_______________________________________________
Aubit4gl-discuss mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/aubit4gl-discuss
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.