Merge and aggregate datasets: Difference between revisions
Harbour: minor fix for multiple values
(Harbour: allow multiple INSERT values) |
(Harbour: minor fix for multiple values) |
||
Line 800:
<syntaxhighlight lang="xbase">
#xcommand INSERT INTO <table> ( <uField1>[, <uFieldN> ] ) VALUE ( <uVal1>[, <uValN> ] ) => ;▼
<table>->(dbAppend()); <table>-><uField1> := <uVal1> [; <table>-><uFieldN> := <uValN> ]▼
#xcommand INSERT INTO <table> ( <uFieldList,...> ) VALUES ( <uValList1,...> ) [, ( <uValListN,...> )] => ;
INSERT INTO <table> ( <uFieldList> ) VALUE ( <uValList1> ) ;
[; INSERT INTO <table> ( <uFieldList> ) VALUE ( <uValListN> )]
▲#xcommand INSERT INTO <table> ( <uField1>[, <uFieldN> ] ) VALUE ( <uVal1>[, <uValN> ] ) => ;
▲ <table>->(dbAppend()); <table>-><uField1> := <uVal1> [; <table>-><uFieldN> := <uValN> ]
PROCEDURE Main()
Line 822 ⟶ 821:
vStruct := {{"patient_id", "n", 8, 0}, {"visit_date", "d", 10, 0}, {"score", "n", 8, 1}}
dbCreate( "visit", vStruct,, .T., "visit" )
INSERT INTO visit (patient_id, visit_date, score)
INSERT INTO visit (patient_id, visit_date, score)
INSERT INTO visit (patient_id, visit_date, score)
INSERT INTO visit (patient_id, visit_date)
INSERT INTO visit (patient_id, score)
INSERT INTO visit (patient_id, visit_date)
INSERT INTO visit (patient_id, visit_date, score)
INSERT INTO visit (patient_id, visit_date, score)
INDEX ON patient_id TO visit_id
Line 847 ⟶ 846:
ENDDO
INSERT INTO report (patient_id, n, sum_score, avg_score, max_date) ;
ENDDO
|