Fórum NUMERO MÁXIMO DE PARAMETROS EXCEDITO EM FUCTION NO DELPHI #449832

estou desenvolvendo um web service com datasnap para fazer a interação de aplicação desktop com dispositivo movel(adroid).
Encontrei um problema com a quantidade de parametros(argumentos) do metodo que implementei para alimentar um tabela. Eu nem sabia que havia um limite de paramentros. Existe outra maneira de passar esses valores, com arrays por exemplo? Alguém pode me ajudar?

segue o Codigo em questão :

function TServerMethods1.InsertCOMUNICANTE(COMU_COD_PESS: integer; COMU_NOME,
COMU_NASC, COMU_IDADE, COMU_GEN, COMU_GRAU_PAREN, COMU_PERI_CONV,
COMU_TIPO_CONV, COMU_TEL, COMU_CEL, COMU_CONT, COMU_END, COMU_REF,
COMU_GEORREF, COMU_LATITUDE, COMU_LONGITUDE, COMU_CICA_BCG_NUM,
COMU_CICA_BCG_DIAM, COMU_FORMA_CLIN, COMU_CLASS_OPERA, COMU_PRES_LES,
COMU_NUM_LES, COMU_SORO_ELISA, COMU_SORO_DO, COMU_SORO_CUT_OFF,
COMU_SORO_DATA, COMU_SORO_LOCAL, COMU_SORO_TECN_RESP, COMU_DIAGN_MOLE,
COMU_CASO_NOVO_OPC, COMU_CASO_NOVO_NUM, COMU_OBS: String;
out Error: String): Boolean;
var
Comm:TDBXCommand;
begin
Result:=false;
DBcon.Open;
Comm:=DbCon.DBXConnection.CreateCommand;
Comm.CommandType:=TDBXCommandTypes.DbxSQL;
Comm.Text:=Format(''Insert Into COMUNICANTE(COMU_COD_PESS,COMU_NOME,COMU_NASC,COMU_IDADE,COMU_GEN,COMU_GRAU_PAREN,''+
''COMU_PERI_CONV,COMU_TIPO_CONV,COMU_TEL,COMU_CEL,COMU_CONT,COMU_END,COMU_REF,COMU_GEORREF,COMU_LATITUDE,COMU_LONGITUDE,''+
''COMU_CICA_BCG_NUM,COMU_CICA_BCG_DIAM,COMU_FORMA_CLIN,COMU_CLASS_OPERA,COMU_PRES_LES,COMU_NUM_LES,COMU_SORO_ELISA,''+
''COMU_SORO_DO,COMU_SORO_CUT_OFF,COMU_SORO_DATA,COMU_SORO_LOCAL,COMU_SORO_TECN_RESP,COMU_DIAGN_MOLE,COMU_CASO_NOVO_OPC,COMU_CASO_NOVO_NUM,''+
''COMU_OBS)values(''''%d'''',''''%s'''',''''%s'''',''''%s'''',''''%s'''',''''%s'''',''''%s'''',''''%s'''',''''%s'''',''''%s'''',''''%s'''',''''%s'''',''''%s'''',''''%s'''',''''%s'''',''''%s'''',''''%s'''',''''%s''''''+
'',''''%s'''',''''%s'''',''''%s'''',''''%s'''',''''%s'''',''''%s'''',''''%s'''',''''%s'''',''''%s'''',''''%s'''',''''%s'''',''''%s'''',''''%s'''',''''%s'''')'',
[COMU_COD_PESS,COMU_NOME,COMU_NASC,COMU_IDADE,COMU_GEN,COMU_GRAU_PAREN,
COMU_PERI_CONV,COMU_TIPO_CONV,COMU_TEL,COMU_CEL,COMU_CONT,COMU_END,COMU_REF,COMU_GEORREF,COMU_LATITUDE,COMU_LONGITUDE,
COMU_CICA_BCG_NUM,COMU_CICA_BCG_DIAM,COMU_FORMA_CLIN,COMU_CLASS_OPERA,COMU_PRES_LES,COMU_NUM_LES,COMU_SORO_ELISA,
COMU_SORO_DO,COMU_SORO_CUT_OFF,COMU_SORO_DATA,COMU_SORO_LOCAL,COMU_SORO_TECN_RESP,COMU_DIAGN_MOLE,COMU_CASO_NOVO_OPC,COMU_CASO_NOVO_NUM,
COMU_OBS]);
if not Comm.IsPrepared then
Comm.Prepare;
try
Comm.ExecuteUpdate;
Comm.Free;
Result:=true;
except on E:Exception do
Error:=E.Message;
end;
end;