PSBO ;BIRMINGHAM/EFC - BCMA OUTPUTS ;03/06/16 3:06pm
Source file <PSBO.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| RPC(RESULTS,PSBTYPE,PSBDFN,PSBSTRT,PSBSTOP,PSBINCL,PSBDEV,PSBSORT,PSBOI,PSBWLOC,PSBWSORT,PSBFUTR,PSBORDNM,PSBRCRI,PSBLIST,PSBPST,PSBTR,PSBDIV,PSBSIFL,PSBCLINORD,PSB21,PSB22,PSB23,PSB24,PSB25,PSBCLLST) | ;
 | 
|
| XQ(PSBTYPE) | ; Called via Kernel Menus
 | 
|
| DQ(PSBRPT) | ; Dequeue report from Taskman
 | 
|
| IOM() | ; Returns good margin or not
 | 
|
| VAL(PSBFLDS) | ; Validate that fields in PSBFLDS are filled in
 | 
|
| SETUP | ; Setup parameters for the report in PSBRPT
 | 
|
| WRAP(X,Y,Z) | ; Quick text wrap
 | 
|
| PRNEFF(PSBEIECMT,PSBIEN) | ;Check for PRN Error comment
 | 
|
| FILTERCO | ; rebuild TMP using needed recs and remove clinics not wanted
 | 
|
| CLIN(RPTARR,DFNLST) | ;Build DFN list of patient orders per Clinics selected
 ; Input: RPTARR - Report request array from file 53.69. (required) ; DFNLST - pass by ref array name if array needed and not ; a tmp global pass a 1. (optional) ; default is TMP global ; DFNLST - array of DFN's only  | 
|
| QUERY(GLB,ROOT,RPSTOPDT,RPTAR,DFNAR) | ;Loops thru global xref via $Query
 ; for qualifying recs to find DFN's  | 
|
| BLDTMP(ARR) | ;Build Tmp global for DFN's to be included on the report
 | 
|
| CLINIC(CL) | ;Is this a Clinic order that would show on the VDL in CO mode also?
 | 
| 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 | 
  | 
| RPC Name | Call Tags | 
|---|---|
| PSB REPORT | RPC | 
| FileNo | Call Tags | 
|---|---|
| ^ORD(101.24 - [#101.24] | FIND1^DIC, GET1^DIQ | 
| ^SC - [#44] | GET1^DIQ | 
| ^PSB(53.69 - [#53.69] | Classic Fileman Calls, FIELD^DID, GET1^DIQ, GET^DDSVAL, VAL^DIE |