IBCEP5D ;ALB/JEH - EDI UTILITIES - for State License ;29-MAR-01
Source file <IBCEP5D.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| EN | ;Add/edit state and license number
 | 
|
| STALIC | ;Add/edit file 200 field 54.1 multiple,state(.01) and license#(1) - DBIA 224
 | 
|
| STATQ | ;
 | 
|
| GETLIC(IBPRV) | ; Get license # for provider in file 200 IBPRV
 ; Pass IBPRV by reference to retrieve #'s by state ; IBPRV(state ien)=id ; Returns 0 if no license # found  | 
|
| EDIT(IBFILE,IBFLD,IB0,IBOLD,IBIEN,IBCK1) | ; Generic edit flds
 | 
|
| EDITQ | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| FileNo | Call Tags | 
|---|---|
| ^VA(200 - [#200] | Classic Fileman Calls | 
| ^IBA(355.9 - [#355.9] | GET1^DID | 
| ^IBA(355.93 - [#355.93] | GET1^DIQ | 
| ^IBE(355.97 - [#355.97] | GET1^DIQ | 
| ^DIC(36 - [#36] | Classic Fileman Calls |