MCPcopy Create free account
hub / github.com/FirebirdSQL/firebird / gen_store

Function gen_store

src/gpre/languages/pas.cpp:2935–2957  ·  view source on GitHub ↗

Source from the content-addressed store, hash-verified

2933//
2934
2935static void gen_store( const act* action, int column)
2936{
2937 const gpre_req* request = action->act_request;
2938 gen_compile(action, column);
2939 if (action->act_error || (action->act_flags & ACT_sql))
2940 {
2941 make_ok_test(action, request, column);
2942 column += INDENT;
2943 if (action->act_error)
2944 begin(column);
2945 }
2946
2947 // Initialize any blob fields
2948
2949 TEXT name[MAX_REF_SIZE];
2950 const gpre_port* port = request->req_primary;
2951 for (const ref* reference = port->por_references; reference; reference = reference->ref_next)
2952 {
2953 const gpre_fld* field = reference->ref_field;
2954 if (field->fld_flags & FLD_blob)
2955 printa(column, "%s := gds__blob_null;\n", gen_name(name, reference, true));
2956 }
2957}
2958
2959
2960//____________________________________________________________

Callers 1

PAS_actionFunction · 0.70

Calls 5

gen_compileFunction · 0.70
make_ok_testFunction · 0.70
beginFunction · 0.70
printaFunction · 0.70
gen_nameFunction · 0.70

Tested by

no test coverage detected