{
    "content": [
        {
            "type": "text",
            "text": "# Business::FraudDetect (perldoc)\n\n## NAME\n\nBusiness::FraudDetect - A cohort to Business::OnlinePayment\n\n## SYNOPSIS\n\nmy %processorinfo = ( frauddetection => 'preCharge',\nmaximumfraudscore => 500,\npreChargeid => '1000000000000001',\npreChargesecurity1 => 'abcdef0123',\npreChargesecurity2 => '3210fedcba',\n)\nmy $transaction = new Business::OnlinePayment($processor, %processorinfo);\n$transaction->content(\ntype       => 'Visa',\namount     => '49.95',\ncardnumber => '1234123412341238',\nexpiration => '0100',\nname       => 'John Q Doe',\n);\n$transaction->submit();\nif($transaction->issuccess()) {\nprint \"Card processed successfully: \".$transaction->authorization().\"\\n\";\n} else {\nprint \"Card was rejected: \".$transaction->errormessage().\"\\n\";\n}\n\n## DESCRIPTION\n\nThis is a module that adds functionality to Business::OnlinePayment. See\nBusiness::OnlinePayment.\n\n## Sections\n\n- **NAME**\n- **SYNOPSIS**\n- **DESCRIPTION**\n- **METHODS**\n- **AUTHORS**\n- **DISCLAIMER**\n- **SEE ALSO**\n\nUse structuredContent.sections for detailed options, examples, and full documentation.\n"
        }
    ],
    "structuredContent": {
        "command": "Business::FraudDetect",
        "section": "",
        "mode": "perldoc",
        "summary": "Business::FraudDetect - A cohort to Business::OnlinePayment",
        "synopsis": "my %processorinfo = ( frauddetection => 'preCharge',\nmaximumfraudscore => 500,\npreChargeid => '1000000000000001',\npreChargesecurity1 => 'abcdef0123',\npreChargesecurity2 => '3210fedcba',\n)\nmy $transaction = new Business::OnlinePayment($processor, %processorinfo);\n$transaction->content(\ntype       => 'Visa',\namount     => '49.95',\ncardnumber => '1234123412341238',\nexpiration => '0100',\nname       => 'John Q Doe',\n);\n$transaction->submit();\nif($transaction->issuccess()) {\nprint \"Card processed successfully: \".$transaction->authorization().\"\\n\";\n} else {\nprint \"Card was rejected: \".$transaction->errormessage().\"\\n\";\n}",
        "tldr_summary": null,
        "tldr_examples": [],
        "tldr_source": null,
        "flags": [],
        "examples": [],
        "see_also": [],
        "section_outline": [
            {
                "name": "NAME",
                "lines": 2,
                "subsections": []
            },
            {
                "name": "SYNOPSIS",
                "lines": 22,
                "subsections": []
            },
            {
                "name": "DESCRIPTION",
                "lines": 26,
                "subsections": []
            },
            {
                "name": "METHODS",
                "lines": 3,
                "subsections": []
            },
            {
                "name": "AUTHORS",
                "lines": 5,
                "subsections": []
            },
            {
                "name": "DISCLAIMER",
                "lines": 4,
                "subsections": []
            },
            {
                "name": "SEE ALSO",
                "lines": 2,
                "subsections": []
            }
        ],
        "sections": {
            "NAME": {
                "content": "Business::FraudDetect - A cohort to Business::OnlinePayment\n",
                "subsections": []
            },
            "SYNOPSIS": {
                "content": "my %processorinfo = ( frauddetection => 'preCharge',\nmaximumfraudscore => 500,\npreChargeid => '1000000000000001',\npreChargesecurity1 => 'abcdef0123',\npreChargesecurity2 => '3210fedcba',\n)\nmy $transaction = new Business::OnlinePayment($processor, %processorinfo);\n$transaction->content(\ntype       => 'Visa',\namount     => '49.95',\ncardnumber => '1234123412341238',\nexpiration => '0100',\nname       => 'John Q Doe',\n);\n$transaction->submit();\n\nif($transaction->issuccess()) {\nprint \"Card processed successfully: \".$transaction->authorization().\"\\n\";\n} else {\nprint \"Card was rejected: \".$transaction->errormessage().\"\\n\";\n}\n",
                "subsections": []
            },
            "DESCRIPTION": {
                "content": "This is a module that adds functionality to Business::OnlinePayment. See\nBusiness::OnlinePayment.\n\nThe user instantiates a Business::OnlinePayment object per usual, adding in three processor\ndirectives\n\n*   frauddetection\n\nWhich Fraud Detection module to use.\n\n*   maximumfraudscore\n\nFraudDetection drivers are expected to return a numeric \"risk\" factor, this parameter allows\nyou to set the threshold to reject the transaction based on that risk. Higher numbers are\n\"riskier\" transactions.\n\n*   other driver-specific parameters.\n\nConsult the specific Fraud Detection module you intend to use for its required parameters.\n\nThe $tx->submit() method is overridden to interpose a FraudDetection phase. A subordinate object\nis created using the same content as the parent OnlinePayment object, and a *Fraud Detect*\naction is run against that subordinate object. If the resulting fraud score is less than or\nequal to the maximumrisk parameter, the parent transaction will be allowed to proceed.\nOtherwise, a failure state will exist with a suitable error message.\n",
                "subsections": []
            },
            "METHODS": {
                "content": "This module provides no new methods. It does, however override the submit method to interpose an\nadditional Fraud Detection phase.\n",
                "subsections": []
            },
            "AUTHORS": {
                "content": "Original author: Lawrence Statton <lawrence@cluon.com>\n\nCurrent maintainer: Ivan Kohler <ivan-bop@420.am> as part of the Business::OnlinePayment\ndistribution.\n",
                "subsections": []
            },
            "DISCLAIMER": {
                "content": "THIS SOFTWARE IS PROVIDED \"AS IS\" AND WITHOUT ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING,\nWITHOUT LIMITATION, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR\nPURPOSE.\n",
                "subsections": []
            },
            "SEE ALSO": {
                "content": "Business::OnlinePayment, http://perl.business/onlinepayment\n",
                "subsections": []
            }
        }
    }
}