Write Transaction Map

Code example:

import SCC_FILE_PARSER:UTIL:FieldCalculationAbstract;
import SCC_FILE_PARSER:MODEL:Results:ResultsField;
import SCC_FILE_PARSER:MODEL:Results:ResultsRecord;
import SCC_FILE_PARSER:MODEL:Results:ResultsCollection;
import SCC_FILE_PARSER:UTIL:Exception:FileParserException;

/**
  *  class WriteTranMap
  *
  *  @version 1.0
  *  @author Campus Solutions	
  *
  *  Module: Recruiting and Admissions / Common App.
  *  Description: 
  */
class WriteTranMap extends SCC_FILE_PARSER:UTIL:FieldCalculationAbstract
   /* public methods */
   method WriteTranMap();
   method calculateValue(&ResultsFieldIn As 
SCC_FILE_PARSER:MODEL:Results:ResultsField, &ResultsCollectionIn 
As SCC_FILE_PARSER:MODEL:Results:ResultsCollection) Returns any;
private
   method GetFileData();
   instance string &WriteTranMapOut;
   instance SCC_FILE_PARSER:MODEL:Results:ResultsField &ResultsField;
   instance SCC_FILE_PARSER:MODEL:Results:ResultsCollection &ResultsCollection;
   instance SCC_FILE_PARSER:MODEL:Results:ResultsField &SccTempIdField;
end-class;
method WriteTranMap
   %Super = create SCC_FILE_PARSER:UTIL:FieldCalculationAbstract();
end-method;
method calculateValue
   /+ &ResultsFieldIn as SCC_FILE_PARSER:MODEL:Results:ResultsField, +/
   /+ &ResultsCollectionIn as SCC_FILE_PARSER:MODEL:Results:ResultsCollection +/
   /+ Returns Any +/
   /+ Extends/implements 
SCC_FILE_PARSER:UTIL:FieldCalculationAbstract.CalculateValue +/
   &ResultsCollection = &ResultsCollectionIn;
   &ResultsField = &ResultsFieldIn;
   %This.GetFileData();
   Return &WriteTranMapOut;
end-method;
method GetFileData
   Local string &TransAcCd;
   Local integer &SccTempIdIn;
   &TransAcCd = "AAWS_FP_ADMAPPLS";
   SQLExec("SELECT SCC_TEMP_ID FROM PS_SCC_STG_CTRS", &SccTempIdIn);
   SQLExec("INSERT INTO PS_SCC_SL_TRNMAP (SCC_TEMP_ID,SCC_TRANSAC_CD) 
VALUES (:1,:2)", &SccTempIdIn, &TransAcCd);
   &WriteTranMapOut = " ";
end-method;