IBCNSP1 ;ALB/AAS - INSURANCE MANAGEMENT - policy actions ;05-MAY-2015
Source file <IBCNSP1.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EA | ; -- Edit all
|
|
| EAQ | ; Edit All Exit
|
|
| AB | ; -- Annual Benefits
|
|
| ABQ | ||
| BU | ; -- Benefits Used
|
|
| BUQ | ||
| IT | ; -- edit insurance type info from patient policy and plan edit
|
|
| ITQ | ; Edit Insurance Type Exit
|
|
| IT1 | ; -- edit insurance type info from patient policy
|
|
| ITEDIT(IBCPOL,IBCDFN) | ;Edit insurance type info once you have plan (IBCPOL)
; IBCDFN = the ifn of the policy multiple for pt in ^DPT, node .312 ; only defined for editing via patient policy |
|
| ITEDITQ | ||
| ED | ; -- Edit effective dates
|
|
| EDQ | ||
| VC | ; -- Verify Coverage
|
|
| SU | ; -- Subscriber Update
|
|
| SUQ | ||
| IC | ; -- Insurance Contact Information
|
|
| AI | ; -- Add ins. verification entry
|
|
| PIDEF(IBREL,FLD,IBDFN,SPDEF) | ; Function to return patient file defaults
; Called from input template IBCN PATIENT INSURANCE ; IBREL = value from 2.312,4.03 field (PT. RELATIONSHIP - HIPAA) ; FLD = field# in file 2.312 ; IBDFN = patient ien to file 2 ; SPDEF = spouse default flag =1 if this field should be defaulted ; when the spouse is the policy holder |
|
| PIDEFX | ;
|
|
| ASK(QUES,DEFLT) | ; Function to ask Yes/No Question
; Returns 1 (yes), 0 (no, up-arrow, or timeout) |
|
| ASKX | ;
|
|
| EDIT(IBDFN,IBCDFN,IBQUIT) | ; Main call to edit data in 2.312 pat ins subfile
; IBDFN - patient DFN ; IBCDFN - ien for patient insurance policy in subfile 2.312 ; IBQUIT - Output variable. Pass by reference. Will be set to 1 if ; the user entered an up-arrow, timed-out, or deleted the ; 2.312 subfile entry by entering "@" at the .01 field ; |
|
| EDITX | ;
|
|
| UPDCLM(IBDFN,IBCDFN) | ; Update the Insurance nodes of claims that are still editable
|
|
| UPDCLMX | ;
|
|
| PRELCNV(CODE,FLG) | ; conversion between X12, NCPDP and VistA pt. relationship codes
; CODE - code for pt. relationship to convert ; FLG - 0 for X12 -> VistA conversion, 1 for VistA -> X12 conversion, 2 - for VistA -> NCPDP conversion ; returns converted code for pt. relationship, or null if no match found |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^DIE - [#.402] | FIND1^DIC |
| ^DPT - [#2] | EXTERNAL^DILFD |
| ^IBA(355.3 - [#355.3] | Classic Fileman Calls |
