Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: BPSRPC02

Package: E Claims Management Engine

Routine: BPSRPC02


Information

BPSRPC02 ;AITC/PD - ECME TAS RPC - Extract Txn Data;7/30/2018

Source Information

Source file <BPSRPC02.m>

Call Graph

Call Graph

Call Graph Total: 12

Package Total Call Graph
E Claims Management Engine 6 $$INSPAID1^BPSOS03  EXTRACT^BPSRPC04  ($$BILL,$$COLLECTD,$$DRGCLNAM,$$INSNAM,$$REFRELDT,$$RXRELDT)^BPSRPT6  ($$FORMAT,$$RXST)^BPSSCRU2  $$TOUCHED^BPSUTIL  $$DRUGDIE^BPSUTIL1  
Kernel 4 ($$FMTE,$$HTFM,$$NOW)^XLFDT  ENCODE^XLFJSON  $$NS^XUAF4  $$KSP^XUPARAM  
Outpatient Pharmacy 1 $$MWC^PSOBPSU2  
VA FileMan 1 $$GET1^DIQ  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
E Claims Management Engine 2 BPS TAS CLAIM DATA EXTRACT  BPSRPC01  

Entry Points

Name Comments DBIA/ICR reference
EXTRACT(RESULT,ARGS) ; RPC: BPS TAS CLAIM DATA EXTRACT
; Extract the data for a specific Txn IEN
JSON ; Prepare JSON file
; Transform the BPSTMP1 array into JSON format
REFORMAT ; Reformat BPSTMP array
; Reformat BPSTMP array into BPSTMP1 to transform to JSON format
; BPSTMP1 will regroup fields by FHIR Resource
MSGSET(TYP,MSG) ;return error or informational message
; RSLT - storage location, passed by ref.
; TYP - message type
; MSG - text
LOG(SVARRY) ; create log in ^XTMP('BPSTAS-LOG-'_'+$h')
; SVARRY - name of array to save, e.g. "RCVAL" or "ARG"
FHIR ; Get FHIR Resource for field

External References

Name Field # of Occurrence
$$INSPAID1^BPSOS03 EXTRACT+130
EXTRACT^BPSRPC04 EXTRACT+22
$$BILL^BPSRPT6 EXTRACT+93
$$COLLECTD^BPSRPT6 EXTRACT+97
$$DRGCLNAM^BPSRPT6 EXTRACT+71
$$INSNAM^BPSRPT6 EXTRACT+128
$$REFRELDT^BPSRPT6 EXTRACT+191
$$RXRELDT^BPSRPT6 EXTRACT+190
$$FORMAT^BPSSCRU2 EXTRACT+111
$$RXST^BPSSCRU2 EXTRACT+194
$$TOUCHED^BPSUTIL EXTRACT+186
$$DRUGDIE^BPSUTIL1 EXTRACT+70
$$GET1^DIQ EXTRACT+23, EXTRACT+30, EXTRACT+33, EXTRACT+36, EXTRACT+39, EXTRACT+42, EXTRACT+45, EXTRACT+48, EXTRACT+51, EXTRACT+54
, EXTRACT+57, EXTRACT+60, EXTRACT+63, EXTRACT+66, EXTRACT+69, EXTRACT+79, EXTRACT+83, EXTRACT+84, EXTRACT+86, EXTRACT+92
, EXTRACT+94, EXTRACT+95, EXTRACT+96, EXTRACT+98, EXTRACT+100, EXTRACT+101, EXTRACT+102, EXTRACT+104, EXTRACT+114, EXTRACT+115
, EXTRACT+125, EXTRACT+126, EXTRACT+127, EXTRACT+133, EXTRACT+135, EXTRACT+137, EXTRACT+139, EXTRACT+143, EXTRACT+144, EXTRACT+146
, EXTRACT+147, EXTRACT+148, EXTRACT+149, EXTRACT+154, EXTRACT+155, EXTRACT+162, EXTRACT+169, EXTRACT+172, EXTRACT+183, EXTRACT+187
$$MWC^PSOBPSU2 EXTRACT+117
$$FMTE^XLFDT EXTRACT+84, EXTRACT+98, EXTRACT+162, EXTRACT+187
$$HTFM^XLFDT LOG+6
$$NOW^XLFDT LOG+6
ENCODE^XLFJSON JSON+2
$$NS^XUAF4 EXTRACT+73
$$KSP^XUPARAM EXTRACT+73

Used in RPC

RPC Name Call Tags
BPS TAS CLAIM DATA EXTRACT EXTRACT

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ
^PSRX - [#52] GET1^DIQ
^BPSC - [#9002313.02] GET1^DIQ
^BPSTL - [#9002313.57] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BPSC - [#9002313.02] EXTRACT+110
^BPSTL - [#9002313.57] EXTRACT+21
^TMP("JSERR" JSON+2, JSON+3
^TMP("JSON" EXTRACT+17
^XTMP( LOG+4, LOG+7*, LOG+9, LOG+10*, LOG+11*, LOG+13*

Label References

Name Line Occurrences
JSON EXTRACT+22
LOG EXTRACT+18
MSGSET JSON+4
REFORMAT EXTRACT+208

Naked Globals

Name Field # of Occurrence
^("$H" LOG+10*
^("$I" LOG+10*
^("COUNT" LOG+9*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
A LOG+2~, LOG+6*, LOG+7, LOG+11*, LOG+13*
ARGS EXTRACT~
ARGS("BPS59" EXTRACT+19
ARGS("LOG" EXTRACT+18
BPS57 EXTRACT+12~, EXTRACT+19*, EXTRACT+20, EXTRACT+21, EXTRACT+22, EXTRACT+23, EXTRACT+30, EXTRACT+33, EXTRACT+36, EXTRACT+39
, EXTRACT+42, EXTRACT+45, EXTRACT+48, EXTRACT+51, EXTRACT+54, EXTRACT+57, EXTRACT+60, EXTRACT+63, EXTRACT+69, EXTRACT+92
, EXTRACT+94, EXTRACT+95, EXTRACT+96, EXTRACT+98, EXTRACT+100, EXTRACT+101, EXTRACT+102, EXTRACT+104, EXTRACT+114, EXTRACT+115
, EXTRACT+125, EXTRACT+126, EXTRACT+127, EXTRACT+133, EXTRACT+135, EXTRACT+137, EXTRACT+143, EXTRACT+144, EXTRACT+146, EXTRACT+147
, EXTRACT+148, EXTRACT+149, EXTRACT+154, EXTRACT+155, EXTRACT+162, EXTRACT+172, EXTRACT+183, EXTRACT+186, EXTRACT+187
BPS59 EXTRACT+12~, EXTRACT+23*, EXTRACT+128, EXTRACT+194
BPSCNT EXTRACT+12~, JSON+6*, JSON+7*, JSON+8, REFORMAT+4*, REFORMAT+12*, REFORMAT+13
BPSDFN EXTRACT+12~, EXTRACT+39*, EXTRACT+139
BPSDRG EXTRACT+12~, EXTRACT+69*, EXTRACT+70
BPSDRGCLID EXTRACT+12~, EXTRACT+70*, EXTRACT+71
BPSDRGCLNM EXTRACT+12~, EXTRACT+71*, EXTRACT+103
BPSECME EXTRACT+12~, EXTRACT+109*, EXTRACT+110*, EXTRACT+111*, EXTRACT+112
BPSFHIR EXTRACT+13~, REFORMAT+9*, REFORMAT+10
>> BPSFHIR1 REFORMAT+8*, REFORMAT+9, REFORMAT+10*, REFORMAT+11*, REFORMAT+13
BPSFLD EXTRACT+13~, REFORMAT+3*, REFORMAT+5*, REFORMAT+7, REFORMAT+10, REFORMAT+13
BPSI EXTRACT+13~, REFORMAT+9*
BPSLST EXTRACT+13~, EXTRACT+42*
BPSPC EXTRACT+13~, EXTRACT+33*, EXTRACT+79, EXTRACT+83, EXTRACT+84, EXTRACT+86, EXTRACT+106, EXTRACT+169
BPSPC1 EXTRACT+13~, EXTRACT+106*, EXTRACT+108*, EXTRACT+109, EXTRACT+110
BPSPOS EXTRACT+13~, EXTRACT+48*, EXTRACT+109, EXTRACT+110, EXTRACT+130
BPSPR EXTRACT+13~, EXTRACT+54*, EXTRACT+96, EXTRACT+108
BPSPRV EXTRACT+13~, EXTRACT+66*
BPSPTID EXTRACT+13~, EXTRACT+139*, EXTRACT+140*, EXTRACT+141
BPSRC EXTRACT+13~, EXTRACT+36*, EXTRACT+130
BPSRDT EXTRACT+14~, EXTRACT+190*, EXTRACT+191*, EXTRACT+193
BPSRF EXTRACT+14~, EXTRACT+45*, EXTRACT+93, EXTRACT+97, EXTRACT+117, EXTRACT+190, EXTRACT+191
BPSRJC EXTRACT+14~, EXTRACT+156*, EXTRACT+159
BPSRJDATA EXTRACT+14~, EXTRACT+155*, EXTRACT+156, EXTRACT+157
BPSRJE EXTRACT+14~, EXTRACT+157*, EXTRACT+160
BPSRJF EXTRACT+14~, EXTRACT+154*, EXTRACT+155, EXTRACT+158
BPSRJN EXTRACT+14~, EXTRACT+158*, EXTRACT+159, EXTRACT+160
BPSRX EXTRACT+14~, EXTRACT+30*, EXTRACT+66, EXTRACT+93, EXTRACT+97, EXTRACT+117, EXTRACT+190, EXTRACT+191
BPSRXACT EXTRACT+14~, EXTRACT+57*, EXTRACT+120, EXTRACT+121, EXTRACT+122
BPSRXACT1 EXTRACT+15~, EXTRACT+119*, EXTRACT+120*, EXTRACT+121*, EXTRACT+122*, EXTRACT+123
BPSSQ EXTRACT+15~, EXTRACT+60*, EXTRACT+93, EXTRACT+97, EXTRACT+179, EXTRACT+180, EXTRACT+181
BPSSTATUS EXTRACT+15~, EXTRACT+63*, EXTRACT+145, EXTRACT+151, EXTRACT+165, EXTRACT+166, EXTRACT+197, EXTRACT+198, EXTRACT+199, EXTRACT+200
, EXTRACT+201, EXTRACT+202
BPSSTR EXTRACT+15~, EXTRACT+51*
BPSTMP EXTRACT+15~
BPSTMP( REFORMAT+5, REFORMAT+7, REFORMAT+13
BPSTMP("BIN" EXTRACT+94*
BPSTMP("BillNumber" EXTRACT+93*
BPSTMP("BilledAmount" EXTRACT+92*
BPSTMP("ClaimID" EXTRACT+95*, EXTRACT+96*
BPSTMP("ClosedByUser" EXTRACT+83*, EXTRACT+88*
BPSTMP("ClosedDate" EXTRACT+84*, EXTRACT+85*, EXTRACT+89*
BPSTMP("ClosedReason" EXTRACT+86*, EXTRACT+90*
BPSTMP("CollectedAmount" EXTRACT+97*
BPSTMP("CompletedDate" EXTRACT+98*, EXTRACT+99*
BPSTMP("DispensingFee" EXTRACT+100*
BPSTMP("DispensingFeePaid" EXTRACT+101*
BPSTMP("Division" EXTRACT+102*
BPSTMP("DrugClass" EXTRACT+103*
BPSTMP("DrugName" EXTRACT+104*
BPSTMP("ECMENumber" EXTRACT+112*
BPSTMP("ElapseTimeInSeconds" EXTRACT+114*
BPSTMP("Eligibility" EXTRACT+115*, EXTRACT+116*
BPSTMP("FillLocation" EXTRACT+117*
BPSTMP("FillType" EXTRACT+123*
BPSTMP("GroupID" EXTRACT+125*
BPSTMP("IngredientCost" EXTRACT+126*
BPSTMP("IngredientCostPaid" EXTRACT+127*
BPSTMP("InsuranceName" EXTRACT+128*
BPSTMP("InsurancePaidAmount" EXTRACT+130*, EXTRACT+131*
BPSTMP("MultipleRejects" EXTRACT+133*, EXTRACT+134*, EXTRACT+135*
BPSTMP("NDC" EXTRACT+137*
BPSTMP("OpenClosed" EXTRACT+79*, EXTRACT+80*, EXTRACT+82
BPSTMP("PatientID" EXTRACT+141*
BPSTMP("PatientName" EXTRACT+143*
BPSTMP("PatientPayAmount" EXTRACT+144*
BPSTMP("PayerResponse" EXTRACT+145*
BPSTMP("Prescriber" EXTRACT+146*
BPSTMP("PrescriberID" EXTRACT+147*
BPSTMP("Quantity" EXTRACT+148*
BPSTMP("Refill" EXTRACT+149*
BPSTMP("RejectCode" EXTRACT+159*
BPSTMP("RejectExplanation" EXTRACT+160*
BPSTMP("Rejected" EXTRACT+151*, EXTRACT+152*
BPSTMP("ReleasedDate" EXTRACT+162*, EXTRACT+163*
BPSTMP("ReturnStatus" EXTRACT+166*, EXTRACT+167*, EXTRACT+174*
BPSTMP("ReversalMethod" EXTRACT+169*, EXTRACT+170*, EXTRACT+175*
BPSTMP("ReversalReason" EXTRACT+172*, EXTRACT+176*
BPSTMP("RxCOB" EXTRACT+178*, EXTRACT+179*, EXTRACT+180*, EXTRACT+181*
BPSTMP("RxNumber" EXTRACT+183*
BPSTMP("SiteName" EXTRACT+184*
BPSTMP("SiteNumber" EXTRACT+185*
BPSTMP("Touched" EXTRACT+186*, EXTRACT+204*
BPSTMP("TransactionDate" EXTRACT+187*, EXTRACT+188*
BPSTMP("TransactionStatus" EXTRACT+194*
BPSTMP("TransactionType" EXTRACT+206*
BPSTMP1 EXTRACT+15~
BPSTMP1("Bundle" REFORMAT+13*
BPSVASITE EXTRACT+15~, EXTRACT+73*, EXTRACT+184, EXTRACT+185
BPSX EXTRACT+15~, EXTRACT+192*, EXTRACT+193*, EXTRACT+194
C LOG+2~, LOG+9*, LOG+10, LOG+11, LOG+13
MSG MSGSET~, MSGSET+5
ND LOG+2~, LOG+3*, LOG+4, LOG+7, LOG+9, LOG+10, LOG+11, LOG+13
RESP1 EXTRACT+15~, EXTRACT+196*, EXTRACT+197*, EXTRACT+198*, EXTRACT+199*, EXTRACT+200*, EXTRACT+201*, EXTRACT+203*, EXTRACT+205*, EXTRACT+206
RESULT EXTRACT~, EXTRACT+17*, JSON+2, JSON+4, JSON+5, JSON+7, JSON+8, MSGSET+4, MSGSET+5
SVARRY LOG~, LOG+13
TYP MSGSET~, MSGSET+5

Marked Items

Name Field # of Occurrence
$T( LOG+6
$T(FHIR+BPSI REFORMAT+9
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All