6288_de-DE

liliconcom

Verketten Sie Kontrollkästchenlisten<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />

Wie füge ich Listen zusammen?

nw = Neues Fenster ("Spalten auswählen", << Modal,

       H-Listenfeld (

  V-Listenfeld (

  WH = Checkbox ({WbSpdA, WbSpdS, WbLngthA, RwndTenA, RwndTenS, P11, P12, P15, P16, IG11, IG16, P21, P22, P25,

  P26, IG21, IG26, WH1A, WH1S, WH2A, WH2S, WH3A, WH3S, WH4A, WH4S, WH5A, WH5S, WH6A, WH6S,

  WH7A, WH7S, WH8A, WH8S, WH9A, WH9S, WH10A, WH10S, WH11A, WH11S, WH12A, WH12S, WH13A, WH13S,

  WH1M, WH2M, WH3M, WH4M, WH5M, WH6M, WH7M, WH8M, WH9M, WH10M, WH11M, WH12M, WH12M, WH13M, Z1LHA,

  Z1LHS, Z1BHA, Z1BHS, Z1RHA, Z1RHS, Z2LHA, Z2LHS, Z2BHA, Z2BHS, Z2RHA, Z2RHS, Z3LHA, Z3LHS,

  Z3BHA, Z3BHS, Z3RHA, Z3RHS, Z4LHA, Z4LHS, Z4BHA, Z4BHS, Z4RHA, Z4RHS, Z5LHA, Z5LHS, Z5BHA,

  Z5BHS, Z5RHA, Z5RHS}))

  Z1 = Kontrollkästchen ({Z1COTT, Z1COTP, Z1COTC, Z1COBT, Z1COBW, Z1COBA, Z1CDTT, Z1CDTW, Z1CDTA, Z1CDBT, Z1CDBW)

  Z1CDBA, Z1GOTT, Z1GOTP, Z1GOTC, Z1GOBT, Z1GOBW, Z1GOBA, Z1GDTT, Z1GDTW, Z1GDTA, Z1GDBT,

  Z1GDBW, Z1GDBA, Z1IOTT, Z1IOTP, Z1IOTC, Z1IOBT, Z1IOBW, Z1IOBA, Z1IDTT, Z1IDTW, Z1IDTA,

  Z1IDBT, Z1IDBW, Z1IDBA, Z1SOTT, Z1SOTP, Z1SOTC, Z1SOBT, Z1SOBW, Z1SOBA, Z1SDTT, Z1SDTW,

  Z1SDTA, Z1SDBT, Z1SDBW, Z1SDBA, Z1SVP, Z1IG1, Z1IG2, Z1SVS, Z1JP, Z1CWT, Z1GWT, Z1IWT, Z1SWT}),

  Z2 = Kontrollkästchen ({Z2COTT, Z2COTP, Z2COTC, Z2COBT, Z2COBW, Z2COBA, Z2CDTT, Z2CDTW, Z2CDTA, Z2CDBT, Z2CDBW,

  Z2CDBA, Z2GOTT, Z2GOTP, Z2GOTC, Z2GOBT, Z2GOBW, Z2GOBA, Z2GDTT, Z2GDTW, Z2GDTA, Z2GDBT,

  Z2GDBW, Z2GDBA, Z2IOTT, Z2IOTP, Z2IOTC, Z2IOBT, Z2IOBW, Z2IOBA, Z2IDTT, Z2IDTW, Z2IDTA,

  Z2IDBT, Z2IDBW, Z2IDBA, Z2SOTT, Z2SOTP, Z2SOTC, Z2SOBT, Z2SOBW, Z2SOBA, Z2SDTT, Z2SDTW,

  Z2SDTA, Z2SDBT, Z2SDBW, Z2SDBA, Z2SVP, Z2IG1, Z2IG2, Z2SVS, Z2JP, Z2CWT, Z2GWT, Z2IWT, Z2SWT}),

  Z3 = Kontrollkästchen ({Z3COTT, Z3COTP, Z3COTC, Z3COBT, Z3COBW, Z3COBA, Z3CDTT, Z3CDTW, Z3CDTA, Z3CDBT, Z3CDBW,

  Z3CDBA, Z3GOTT, Z3GOTP, Z3GOTC, Z3GOBT, Z3GOBW, Z3GOBA, Z3GDTT, Z3GDTW, Z3GDTA, Z3GDBT,

  Z3GDBW, Z3GDBA, Z3IOTT, Z3IOTP, Z3IOTC, Z3IOBT, Z3IOBW, Z3IOBA, Z3IDTT, Z3IDTW, Z3IDTA,

  Z3IDBT, Z3IDBW, Z3IDBA, Z3SOTT, Z3SOTP, Z3SOTC, Z3SOBT, Z3SOBW, Z3SOBA, Z3SDTT, Z3SDTW,

  Z3SDTA, Z3SDBT, Z3SDBW, Z3SDBA, Z3SVP, Z3IG1, Z3IG2, Z3SVS, Z3JP, Z3CWT, Z3GWT, Z3IWT, Z3SWT}),

  Z4 = Kontrollkästchen ({Z4COTT, Z4COTP, Z4COTC, Z4COBT, Z4COBW, Z4COBA, Z4CDTT, Z4CDTW, Z4CDTA, Z4CDBT, Z4CDBW,

  Z4CDBA, Z4GOTT, Z4GOTP, Z4GOTC, Z4GOBT, Z4GOBW, Z4GOBA, Z4GDTT, Z4GDTW, Z4GDTA, Z4GDBT,

  Z4GDBW, Z4GDBA, Z4IOTT, Z4IOTP, Z4IOTC, Z4IOBT, Z4IOBW, Z4IOBA, Z4IDTT, Z4IDTW, Z4IDTA,

  Z4IDBT, Z4IDBW, Z4IDBA, Z4SOTT, Z4SOTP, Z4SOTC, Z4SOBT, Z4SOBW, Z4SOBA, Z4SDTT, Z4SDTW,

  Z4SDTA, Z4SDBT, Z4SDBW, Z4SDBA, Z4SVP, Z4IG1, Z4IG2, Z4SVS, Z4JP, Z4CWT, Z4GWT, Z4IWT, Z4SWT}),

  Z5 = Kontrollkästchen ({Z5COTT, Z5COTP, Z5COTC, Z5COBT, Z5COBW, Z5COBA, Z5CDTT, Z5CDTW, Z5CDTA, Z5CDBT, Z5CDBW,

  Z5CDBA, Z5GOTT, Z5GOTP, Z5GOTC, Z5GOBT, Z5GOBW, Z5GOBA, Z5GDTT, Z5GDTW, Z5GDTA, Z5GDBT,

  Z5GDBW, Z5GDBA, Z5IOTT, Z5IOTP, Z5IOTC, Z5IOBT, Z5IOBW, Z5IOBA, Z5IDTT, Z5IDTW, Z5IDTA,

  Z5IDBT, Z5IDBW, Z5IDBA, Z5SOTT, Z5SOTP, Z5SOTC, Z5SOBT, Z5SOBW, Z5SOBA, Z5SDTT, Z5SDTW,

  Z5SDTA, Z5SDBT, Z5SDBW, Z5SDBA, Z5SVP, Z5IG1, Z5IG2, Z5SVS, Z5JP, Z5CWT, Z5GWT, Z5IWT, Z5SWT}),

  Schaltflächenfeld ("OK"), Schaltflächenfeld ("Abbrechen"),

  )

);

Wie bekomme ich eine einzelne Liste der ausgewählten Felder im Format:

'text1, text2, text3 ...., textN'

an einen SP-SQL-Aufruf übergeben werden?

Vielen Dank,

Tim Hall

Re: Verketten Sie Kontrollkästchenlisten

Dies könnte ein wenig sauberer sein.  Verwendet INSERTINTO, um Listen zu verketten.

nw = Neues Fenster ( "Spalten auswählen" .

    << Modal .

    H Listenfeld (

        V Listenfeld (

            WH = Kontrollkästchen (

                { WbSpdA . WbSpdS . WbLngthA . RwndTenA . RndTenS . P11 . P12 . P15 . P16 . IG11 . IG16 . P21 . P22 . P25 . P26 . IG21 . IG26 .

                WH1A . WH1S . WH2A . WH2S . WH3A . WH3S . WH4A . WH4S . WH5A . WH5S . WH6A . WH6S . WH7A . WH7S . WH8A . WH8S . WH9A . WH9S .

                WH10A . WH10S . WH11A . WH11S . WH12A . WH12S . WH13A . WH13S . WH1M . WH2M . WH3M . WH4M . WH5M . WH6M . WH7M . WH8M . WH9M .

                WH10M . WH11M . WH12M . WH13M . Z1LHA . Z1LHS . Z1BHA . Z1BHS . Z1RHA . Z1RHS . Z2LHA . Z2LHS . Z2BHA . Z2BHS . Z2RHA . Z2RHS .

                Z3LHA . Z3LHS . Z3BHA . Z3BHS . Z3RHA . Z3RHS . Z4LHA . Z4LHS . Z4BHA . Z4BHS . Z4RHA . Z4RHS . Z5LHA . Z5LHS . Z5BHA . Z5BHS .

                Z5RHA . Z5RHS }

            )

        ) .

        Z1 = Kontrollkästchen (

            { Z1COTT . Z1COTP . Z1COTC . Z1COBT . Z1COBW . Z1COBA . Z1CDTT . Z1CDTW . Z1CDTA . Z1CDBT . Z1CDBW . Z1CDBA . Z1GOTT . Z1GOTP .

            Z1GOTC . Z1GOBT . Z1GOBW . Z1GOBA . Z1GDTT . Z1GDTW . Z1GDTA . Z1GDBT . Z1GDBW . Z1GDBA . Z1IOTT . Z1IOTP . Z1IOTC . Z1IOBT .

            Z1IOBW . Z1IOBA . Z1IDTT . Z1IDTW . Z1IDTA . Z1IDBT . Z1IDBW . Z1IDBA . Z1SOTT . Z1SOTP . Z1SOTC . Z1SOBT . Z1SOBW . Z1SOBA .

            Z1SDTT . Z1SDTW . Z1SDTA . Z1SDBT . Z1SDBW . Z1SDBA . Z1SVP . Z1IG1 . Z1IG2 . Z1SVS . Z1JP . Z1CWT . Z1GWT . Z1IWT . Z1SWT }

        ) .

        Z2 = Kontrollkästchen (

            { Z2COTT . Z2COTP . Z2COTC . Z2COBT . Z2COBW . Z2COBA . Z2CDTT . Z2CDTW . Z2CDTA . Z2CDBT . Z2CDBW . Z2CDBA . Z2GOTT . Z2GOTP .

            Z2GOTC . Z2GOBT . Z2GOBW . Z2GOBA . Z2GDTT . Z2GDTW . Z2GDTA . Z2GDBT . Z2GDBW . Z2GDBA . Z2IOTT . Z2IOTP . Z2IOTC . Z2IOBT .

            Z2IOBW . Z2IOBA . Z2IDTT . Z2IDTW . Z2IDTA . Z2IDBT . Z2IDBW . Z2IDBA . Z2SOTT . Z2SOTP . Z2SOTC . Z2SOBT . Z2SOBW . Z2SOBA .

            Z2SDTT . Z2SDTW . Z2SDTA . Z2SDBT . Z2SDBW . Z2SDBA . Z2SVP . Z2IG1 . Z2IG2 . Z2SVS . Z2JP . Z2CWT . Z2GWT . Z2IWT . Z2SWT }

        ) .

        Z3 = Kontrollkästchen (

            { Z3COTT . Z3COTP . Z3COTC . Z3COBT . Z3COBW . Z3COBA . Z3CDTT . Z3CDTW . Z3CDTA . Z3CDBT . Z3CDBW . Z3CDBA . Z3GOTT . Z3GOTP .

            Z3GOTC . Z3GOBT . Z3GOBW . Z3GOBA . Z3GDTT . Z3GDTW . Z3GDTA . Z3GDBT . Z3GDBW . Z3GDBA . Z3IOTT . Z3IOTP . Z3IOTC . Z3IOBT .

            Z3IOBW . Z3IOBA . Z3IDTT . Z3IDTW . Z3IDTA . Z3IDBT . Z3IDBW . Z3IDBA . Z3SOTT . Z3SOTP . Z3SOTC . Z3SOBT . Z3SOBW . Z3SOBA .

            Z3SDTT . Z3SDTW . Z3SDTA . Z3SDBT . Z3SDBW . Z3SDBA . Z3SVP . Z3IG1 . Z3IG2 . Z3SVS . Z3JP . Z3CWT . Z3GWT . Z3IWT . Z3SWT }

        ) .

        Z4 = Kontrollkästchen (

            { Z4COTT . Z4COTP . Z4COTC . Z4COBT . Z4COBW . Z4COBA . Z4CDTT . Z4CDTW . Z4CDTA . Z4CDBT . Z4CDBW . Z4CDBA . Z4GOTT . Z4GOTP .

            Z4GOTC . Z4GOBT . Z4GOBW . Z4GOBA . Z4GDTT . Z4GDTW . Z4GDTA . Z4GDBT . Z4GDBW . Z4GDBA . Z4IOTT . Z4IOTP . Z4IOTC . Z4IOBT .

            Z4IOBW . Z4IOBA . Z4IDTT . Z4IDTW . Z4IDTA . Z4IDBT . Z4IDBW . Z4IDBA . Z4SOTT . Z4SOTP . Z4SOTC . Z4SOBT . Z4SOBW . Z4SOBA .

            Z4SDTT . Z4SDTW . Z4SDTA . Z4SDBT . Z4SDBW . Z4SDBA . Z4SVP . Z4IG1 . Z4IG2 . Z4SVS . Z4JP . Z4CWT . Z4GWT . Z4IWT . Z4SWT }

        ) .

        Z5 = Kontrollkästchen (

            { Z5COTT . Z5COTP . Z5COTC . Z5COBT . Z5COBW . Z5COBA . Z5CDTT . Z5CDTW . Z5CDTA . Z5CDBT . Z5CDBW . Z5CDBA . Z5GOTT . Z5GOTP .

            Z5GOTC . Z5GOBT . Z5GOBW . Z5GOBA . Z5GDTT . Z5GDTW . Z5GDTA . Z5GDBT . Z5GDBW . Z5GDBA . Z5IOTT . Z5IOTP . Z5IOTC . Z5IOBT .

            Z5IOBW . Z5IOBA . Z5IDTT . Z5IDTW . Z5IDTA . Z5IDBT . Z5IDBW . Z5IDBA . Z5SOTT . Z5SOTP . Z5SOTC . Z5SOBT . Z5SOBW . Z5SOBA .

            Z5SDTT . Z5SDTW . Z5SDTA . Z5SDBT . Z5SDBW . Z5SDBA . Z5SVP . Z5IG1 . Z5IG2 . Z5SVS . Z5JP . Z5CWT . Z5GWT . Z5IWT . Z5SWT }

        ) .

        Button Box ( "OK" .

            wh_list = wh << ausgewählt werden () ;

            z1_list = z1 << ausgewählt werden () ;

            z2_list = z2 << ausgewählt werden () ;

            z3_list = z3 << ausgewählt werden () ;

            z4_list = z4 << ausgewählt werden () ;

            z5_list = z5 << ausgewählt werden () ;

         ) .

        Button Box ( "Stornieren" ) .

    )

) ;

all_list = {} ;

einfügen in ( all_list . wh_list ) ;

einfügen in ( all_list . z1_list ) ;

einfügen in ( all_list . z2_list ) ;

einfügen in ( all_list . z3_list ) ;

einfügen in ( all_list . z4_list ) ;

einfügen in ( all_list . z5_list ) ;

Re: Verketten Sie Kontrollkästchenlisten

Vielleicht haben Sie so etwas im Sinn?

Clear Log();

flatten = function({item_list}, {Default Local},
    result = {};
    if(N Items(item_list) > 0, 
        for(i = 1, i <= N Items(item_list), i++,
            subitem = item_list;
            if(!Is List(subitem),
                insert into(result, subitem),
                t = recurse(subitem);                
                insert into(result, t);
            );                            
        );
    );
    result;
);

callback = function({},
    b = Eval List({Z1 << get selected, Z2 << get selected, 
        Z3 << get selected, Z4 << get selected});
    items = flatten(b);
    if(N Items(items) > 1,
        sql = "SELECT $VARS FROM TABLE";
        x = concat items(items, ", ");
        sql = munger(sql, 1, "$VARS", x);
        show(sql);        
    );
);

w = New Window("Choose Columns",
    V List Box(        
        H List Box(
            Panel Box("Z1",
                Z1 = Check Box({"Z1a", "Z1b", "Z1c", "Z1d", "Z1e", "Z1f"})
            ),
            Spacer Box(<< Size(30, 0)),
            Panel Box("Z2",
                Z2 = Check Box({"Z2a", "Z2b", "Z2c", "Z2d", "Z2e", "Z2f"})
            ),
            Spacer Box(<< Size(30, 0)),
            Panel Box("Z3",
                Z3 = Check Box({"Z3a", "Z3b", "Z3c", "Z3d", "Z3e", "Z3f"})
            ),
            Spacer Box(<< Size(30, 0)),
            Panel Box("Z4",
                Z4 = Check Box({"Z4a", "Z4b", "Z4c", "Z4d", "Z4e", "Z4f"})
            )                
        ),
        Spacer Box(<< Size(0, 20)),
        Button Box("Print selected", callback);    
    )
);