IBCEP5 ;ALB/TMP - EDI UTILITIES for provider ID ;29-SEP-00
Source file <IBCEP5.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ; -- main entry point for IBCE PRV MAINT
|
|
EN1 | ; Entrypoint for non-VA provider ID maintenance hook
|
|
HDR | ; -- header code
|
|
INIT | ; -- init variables and list array
|
|
AGAIN | ||
INITQ | ||
BLD | ; Build initial display
; Assumes IBPRV = the variable ptr for prov id file (355.9) ; IBINS = the ien of the ins co or if null, ALL is assumed ; IBSLEV = 1 to display only provider default ids ; = 2 to display all provider/insurance co ids |
|
BLDQ | ||
HELP | ; -- help code
|
|
EXIT | ; -- exit code
|
|
EXPND | ; -- expand code
|
|
SEL(IBDA,MANY) | ; Select from provider id list
; IBDA is passed by reference and IBDA(1) returned containing ; ien's of the provider id records selected (file 355.9). ; If > 1 entry can be selected, MANY is set to 1 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^ORD(101 - [#101] | FIND1^DIC |
^IBA(355.93 - [#355.93] | GET1^DIQ |