IBCEP5C ;ALB/TMP - EDI UTILITIES for provider ID ;02-NOV-00
Source file <IBCEP5C.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| COMBOK(IBFILE,IBDAT,IBALL,IBF) | ; Generic ask if conflict, should id rec still
; be added? ; IBFILE = 355.9 or 355.91 for the file being edited ; IBDAT = var ptr prov ien (355.9) ^ pc to check ^ ; ins co ien or *ALL* ^ care unit or *N/A* ^ ; form type code ^ care type code ^ prov id type ptr ; IBALL = flag: ; 0 = Individual entry selected - check for existing ALL entry ; 1 = 'ALL' selected - check for existing individual ones ; IBF = 1 if deleting from ins co-related options, "" ; from provider-related options ; Returns 1 if ok to continue, 0 if not |
|
| CAREUN | ;Called from NEWID^IBCEP5B to check for existing record combination
|
|
| DEL(IBFILE,IBDA,IBF) | ; Delete prov specific ID's
; IBFILE = 355.9 or 355.91 for the file ; IBDA = ien of entry in file IBFILE ; IBF = 1 if deleting from ins co-related options, "" ; from prov-related options |
|
| DELQ | ||
| CUCHK(IBDA,IB0) | ;Called from CHG^IBCEP5B to check for existing combination
; during edit ; IBDA = the ien of the record being edited ; IB0 = Proposed changed 0 node of the entry in the file ; FUNCTION RETURNS 0 if no duplicate found, 1 if record already exists |
| 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 |
|
