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 |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: RCTASFH

Package: Accounts Receivable

Routine: RCTASFH


Information

RCTASFH ;AITC/CJE - Receive FHIR message for ePayments 835 EFT/ERA

Source Information

Source file <RCTASFH.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Kernel 5 $$EC^%ZOSV  ^%ZTER  ($$DT,$$FMADD,$$NOW)^XLFDT  ENCODE^XLFJSON  $$PROD^XUPROD  
Accounts Receivable 2 $$SUMEFT^RCDPESR3  FILERR^RCTASFH1  
Toolkit 1 $$GET^XPAR  
VA FileMan 1 (FILE,UPDATE)^DIE  

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: 1

Package Total Caller Graph
Accounts Receivable 1 RCTAS 835EFT  

Entry Points

Name Comments DBIA/ICR reference
POST(RESULT,ARG) ;Entry point to receive 835 EFT message from ARG array
; Input: ARG
ERRET ; return here after error
EXIT ; Common exit point
PARSEEFT(ARG) ; Parse the incomming EFT Message
; Get the following fields that are needed to file the deposit info and the EFT detail
FHRTFM(FHRDATE,TIME) ; Convert FHIR date to FileMan format
; Inputs FHRDATE - FHIR date/time in FHIR format
; TIME - Boolean flag to say if time should be included in the output
VALID(ARG) ; Check for error conditions before filing. If invalid set return error code.
; Inputs : ARG - Arguments passed from VistALink containing JSON name value pairs.
; RETURNS : 1 - Message is valid
; 0^Error Description - Message is invalid
GENERR(TYPE) ; Generate error in ^TMP("DIERR",$J) for testing purposes
ERR ; Error trap for parsing message.
MRGTMP(ARG) ; For DEV/TEST system only save the data to ^XTMP
LOGFAIL(RCID) ; Log lock failure to XTMP for tuning purposes

External References

Name Field # of Occurrence
$$EC^%ZOSV ERR+2
^%ZTER ERR+5
FILE^DIE PARSEEFT+146
UPDATE^DIE PARSEEFT+96, PARSEEFT+129
$$SUMEFT^RCDPESR3 PARSEEFT+144
FILERR^RCTASFH1 PARSEEFT+66, PARSEEFT+107, PARSEEFT+133, PARSEEFT+137
$$DT^XLFDT PARSEEFT+127, LOGFAIL+3
$$FMADD^XLFDT LOGFAIL+6
$$NOW^XLFDT PARSEEFT+92
ENCODE^XLFJSON POST+8, ERRET+3
$$GET^XPAR PARSEEFT+36
$$PROD^XUPROD PARSEEFT+42

Used in RPC

RPC Name Call Tags
RCTAS 835EFT POST

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^RCY(344 - [#344] PARSEEFT+72
^RCY(344.3 - [#344.3] PARSEEFT+61, PARSEEFT+70, PARSEEFT+76, PARSEEFT+77, PARSEEFT+81, PARSEEFT+82, PARSEEFT+103, PARSEEFT+110, PARSEEFT+134, PARSEEFT+147
, ERR+6, ERR+8
^TMP("DIERR" PARSEEFT+80!, PARSEEFT+98, PARSEEFT+113!, PARSEEFT+131, PARSEEFT+142!, GENERR+1*, GENERR+2*, GENERR+3*, GENERR+4*, GENERR+5*
^TMP("RCD835" POST+5!, ERRET+1, EXIT+1!, ERR+4*
^XTMP( LOGFAIL+5, LOGFAIL+7*, LOGFAIL+8*
^ZZCJE("EFT835" MRGTMP+3, MRGTMP+4*

Label References

Name Line Occurrences
$$FHRTFM PARSEEFT+49, PARSEEFT+88
$$PARSEEFT POST+10
$$VALID PARSEEFT+51
EXIT POST+6
GENERR PARSEEFT+97, PARSEEFT+130
LOGFAIL PARSEEFT+67, PARSEEFT+108
MRGTMP PARSEEFT+46

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AMOUNT PARSEEFT+33~, PARSEEFT+55*, PARSEEFT+120, PARSEEFT+121
ARG POST~, POST+6, POST+10, PARSEEFT~, PARSEEFT+46, PARSEEFT+51, PARSEEFT+66, PARSEEFT+107, PARSEEFT+133, PARSEEFT+137
, VALID~, MRGTMP~, MRGTMP+4
ARG("payer-identifier-value" PARSEEFT+117, VALID+7
ARG("payer-name" PARSEEFT+116
ARG("paymentnotice-amount" PARSEEFT+55
ARG("paymentnotice-created" PARSEEFT+85
ARG("paymentnotice-payment-identifier-value" PARSEEFT+54
ARG("paymentnotice-paymentdate" PARSEEFT+48
ARG("paymentnotice-pncdepositnumber" PARSEEFT+50, VALID+5
ARG("paymentnotice-pnctrackingnumber" PARSEEFT+128
D FHRTFM+3~, FHRTFM+5*, FHRTFM+6*, FHRTFM+7, FHRTFM+13, FHRTFM+15
DATE PARSEEFT+33~
DEBIT PARSEEFT+33~, PARSEEFT+121*, PARSEEFT+122
>> DILOCKTM PARSEEFT+82
ERRMSG PARSEEFT+33~, PARSEEFT+38*, PARSEEFT+64*, PARSEEFT+65, PARSEEFT+66, PARSEEFT+76*, PARSEEFT+98*, PARSEEFT+101*, PARSEEFT+105, PARSEEFT+107
, PARSEEFT+131, PARSEEFT+132*, PARSEEFT+133, PARSEEFT+136, PARSEEFT+137
ERROR PARSEEFT+33~, PARSEEFT+59*, PARSEEFT+64*, PARSEEFT+65, PARSEEFT+76*, PARSEEFT+98*, PARSEEFT+101*, PARSEEFT+105, PARSEEFT+132*, PARSEEFT+136
ERRSTAT PARSEEFT+33~, PARSEEFT+39*, PARSEEFT+64*, PARSEEFT+65, PARSEEFT+66, PARSEEFT+67, PARSEEFT+76*, PARSEEFT+98*, PARSEEFT+101*, PARSEEFT+105
, PARSEEFT+107, PARSEEFT+108, PARSEEFT+131, PARSEEFT+132*, PARSEEFT+136
FDA PARSEEFT+33~, PARSEEFT+113!, PARSEEFT+142!
FDA( PARSEEFT+87*, PARSEEFT+88*, PARSEEFT+89*, PARSEEFT+90*, PARSEEFT+91*, PARSEEFT+92*, PARSEEFT+93*, PARSEEFT+94*, PARSEEFT+95*, PARSEEFT+115*
, PARSEEFT+116*, PARSEEFT+117*, PARSEEFT+118*, PARSEEFT+120*, PARSEEFT+122*, PARSEEFT+124*, PARSEEFT+125*, PARSEEFT+126*, PARSEEFT+127*, PARSEEFT+128*
, PARSEEFT+144*, PARSEEFT+145*
FDATE PARSEEFT+33~
FHRDATE PARSEEFT+33~, PARSEEFT+48*, PARSEEFT+49, PARSEEFT+85*, PARSEEFT+88, FHRTFM~, FHRTFM+5
GLBO POST+2~, POST+4*, POST+7, POST+8, ERRET+2, ERRET+3
IENS PARSEEFT+33~, PARSEEFT+84*, PARSEEFT+89, PARSEEFT+90, PARSEEFT+91, PARSEEFT+92, PARSEEFT+93, PARSEEFT+94, PARSEEFT+95, PARSEEFT+113!
, PARSEEFT+114*, PARSEEFT+115, PARSEEFT+116, PARSEEFT+117, PARSEEFT+118, PARSEEFT+120, PARSEEFT+122, PARSEEFT+124, PARSEEFT+125, PARSEEFT+126
, PARSEEFT+127, PARSEEFT+128, PARSEEFT+142!, PARSEEFT+143*, PARSEEFT+144, PARSEEFT+145
IENS(1 PARSEEFT+83*, PARSEEFT+87, PARSEEFT+100, PARSEEFT+139
>> IrisTestCase PARSEEFT+44
>> IrisTestCase("IEN3443" PARSEEFT+102*, PARSEEFT+149
>> IrisTestCase("IENS34431" PARSEEFT+139*, PARSEEFT+149
J MRGTMP+1~, MRGTMP+3*
KEY3 PARSEEFT+106~, PARSEEFT+109*, PARSEEFT+110, ERR+1~, ERR+7*, ERR+8
LCNT PARSEEFT+33~, PARSEEFT+59*, PARSEEFT+60*
LTRUE PARSEEFT+33~, PARSEEFT+59*, PARSEEFT+60, PARSEEFT+62*, PARSEEFT+64
PURGE LOGFAIL+1~, LOGFAIL+6*, LOGFAIL+7
RCCODE ERR+1~, ERR+2*, ERR+3*, ERR+4
RCDATE LOGFAIL+1~
RCDDAT PARSEEFT+34~, PARSEEFT+49*, PARSEEFT+70, PARSEEFT+90, PARSEEFT+126
RCDEPNO PARSEEFT+34~, PARSEEFT+50*, PARSEEFT+70, PARSEEFT+89
>> RCDPTT PARSEEFT+43
RCDUP PARSEEFT+34~, PARSEEFT+72*
RCID LOGFAIL~, LOGFAIL+2, LOGFAIL+8
RCKEY LOGFAIL+1~, LOGFAIL+4*, LOGFAIL+5, LOGFAIL+7, LOGFAIL+8
RCKEY2 LOGFAIL+1~
RCLOCKTM PARSEEFT+34~, PARSEEFT+36*, PARSEEFT+37*, PARSEEFT+61, PARSEEFT+76
RCODE PARSEEFT+34~, PARSEEFT+51*, PARSEEFT+52
RCTDA PARSEEFT+34~, PARSEEFT+59*, PARSEEFT+70*, PARSEEFT+73*, PARSEEFT+75, PARSEEFT+76, PARSEEFT+100*, PARSEEFT+101, PARSEEFT+102, PARSEEFT+109
, PARSEEFT+115, PARSEEFT+134, PARSEEFT+143, PARSEEFT+144, PARSEEFT+147, ERR+7
RCTRACE PARSEEFT+34~, PARSEEFT+54*, PARSEEFT+67, PARSEEFT+97, PARSEEFT+108, PARSEEFT+118, PARSEEFT+130
RCTT PARSEEFT+34~, PARSEEFT+40*, PARSEEFT+43*, PARSEEFT+97, PARSEEFT+130
RCUNIT PARSEEFT+34~, PARSEEFT+40*, PARSEEFT+44*, PARSEEFT+102, PARSEEFT+139, PARSEEFT+149
RCX PARSEEFT+34~, PARSEEFT+59*, PARSEEFT+81*, PARSEEFT+82*, PARSEEFT+83, PARSEEFT+109, ERR+7
RDID LOGFAIL+1~
RESULT POST~
RESULT(1 POST+8*, ERRET+3*
RETURN POST+2~, POST+10*, ERRET+1*, ERRET+2, FHRTFM+3~, FHRTFM+7*, FHRTFM+13*, FHRTFM+15*, FHRTFM+16
SH MRGTMP+1~, MRGTMP+2*, MRGTMP+3*, MRGTMP+4, LOGFAIL+1~
T FHRTFM+3~, FHRTFM+5*, FHRTFM+9*, FHRTFM+10*, FHRTFM+11*, FHRTFM+12, FHRTFM+15
TIME FHRTFM~, FHRTFM+4*, FHRTFM+8
TODAY LOGFAIL+1~, LOGFAIL+3*, LOGFAIL+4, LOGFAIL+6, LOGFAIL+7
TYPE GENERR~, GENERR+3, GENERR+4
U PARSEEFT+70, PARSEEFT+72
X PARSEEFT+34~, VALID+4~, VALID+5*, VALID+6, VALID+7*, VALID+8
Z PARSEEFT+34~, PARSEEFT+59*, PARSEEFT+70*, PARSEEFT+72, PARSEEFT+73
Z0 PARSEEFT+34~, PARSEEFT+70*, PARSEEFT+72
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Used in RPC |  Global Variables Directly Accessed |  Label References |  Local Variables  | All