summaryrefslogtreecommitdiffstats
path: root/sca-cpp/trunk/samples/loan-python/loan-approval.py
diff options
context:
space:
mode:
Diffstat (limited to 'sca-cpp/trunk/samples/loan-python/loan-approval.py')
-rw-r--r--sca-cpp/trunk/samples/loan-python/loan-approval.py77
1 files changed, 0 insertions, 77 deletions
diff --git a/sca-cpp/trunk/samples/loan-python/loan-approval.py b/sca-cpp/trunk/samples/loan-python/loan-approval.py
deleted file mode 100644
index 3951f16eeb..0000000000
--- a/sca-cpp/trunk/samples/loan-python/loan-approval.py
+++ /dev/null
@@ -1,77 +0,0 @@
-# Licensed to the Apache Software Foundation (ASF) under one
-# or more contributor license agreements. See the NOTICE file
-# distributed with this work for additional information
-# regarding copyright ownership. The ASF licenses this file
-# to you under the Apache License, Version 2.0 (the
-# "License"); you may not use this file except in compliance
-# with the License. You may obtain a copy of the License at
-#
-# http://www.apache.org/licenses/LICENSE-2.0
-#
-# Unless required by applicable law or agreed to in writing,
-# software distributed under the License is distributed on an
-# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
-# KIND, either express or implied. See the License for the
-# specific language governing permissions and limitations
-# under the License.
-
-# Loan approval service implementation
-import uuid
-import sys
-from util import *
-from loan import *
-
-loansId = ("loans", "1234")
-
-# Return the list of loans
-def loans(cache):
- l = cache("get", loansId)
- if l is None:
- return ()
- return l
-
-# Post a new loan request
-def post(collection, item, cache):
- id = str(uuid.uuid1())
- loans = cons(cons(id, cdr(item)), loans(cache))
- cache("put", loansId, loans)
- return (id,)
-
-# Return the person currently processing a loan request
-def processor(l):
- if approver(l) is not None:
- return approver(l)
- return assessor(l)
-
-# Return a list of loans that match a given criteria
-def get(r, cache):
- # All the loans
- if r == ():
- return loans(cache)
- # Loans that need approval
- if car(r) == "needApproval":
- return filter(lambda l: (amount(l) >= 10000 or risk(l) == "high") and approval(l) is None, loans(cache))
- # Loans that need a risk assessment
- if car(r) == "needAssessment":
- return filter(lambda : amount(l) < 10000 and risk(l) is None, loans(cache))
- # Loans currently under approval
- if car(r) == "underApproval":
- return filter(lambda l: approver(l) is not None, loans(cache))
- # Loans currently under assessment
- if car(r) == "underAssessment":
- return filter(lambda l: assessor(l) is not None, loans(cache))
- # Loan requests that are unassigned
- if car(r) == "unassigned":
- return filter(lambda l: processor(l) is None, loans(cache))
- # Loan requests that are assigned and getting processed
- if car(r) == "assigned":
- return filter(lambda l: processor(l) == cadr(r), loans(cache))
- # Approved loans
- if car(r) == "approved":
- return filter(lambda l: approval(l) == true, loans(cache))
- # Denied loans
- if car(r) == "denied":
- return filter(lambda l: approval(l) == false, loans(cache))
- # A particular loan
- return filter(lambda l: id(l) == r, loans(cache))
-