Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Details |  All
Print Page as PDF
Sub-Field: 9002270.61

Package: Third Party Tracking

AO PVT-INS POSTING(#9002270.06)-->9002270.61

Sub-Field: 9002270.61


Information

Parent File Name Number Package
AO PVT-INS POSTING(#9002270.06) FACILITY 9002270.61 Third Party Tracking

Details

Field # Name Loc Type Details
.01 FACILITY 0;1 POINTER TO LOCATION FILE (#9999999.06) LOCATION(#9999999.06)

  • INPUT TRANSFORM:  S DINUM=X Q
  • LAST EDITED:  MAY 30, 1990
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  9002270.61^B
    1)= S ^ABPAPOST(DA(1),"F","B",$E(X,1,30),DA)=""
    2)= K ^ABPAPOST(DA(1),"F","B",$E(X,1,30),DA)
.02 DATE EXPORT CREATED 0;2 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAY 30, 1990
.03 BEGINNING CLAIM DATE 0;3 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
.04 ENDING CLAIM DATE 0;4 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
.05 NUMBER OF NEW INSURERS ADDED 0;5 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 30, 1990
  • HELP-PROMPT:  Type a Number between 0 and 999999, 0 Decimal Digits
.06 NUMBER OF NEW PATIENTS ADDED 0;6 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
  • HELP-PROMPT:  Type a Number between 0 and 999999, 0 Decimal Digits
.07 NUMBER OF NEW CLAIMS ADDED 0;7 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X
  • HELP-PROMPT:  Type a Number between 0 and 999999, 0 Decimal Digits
1 NEW INSURERS ADDED I;0 POINTER Multiple #9002270.611 9002270.611
2 NEW PATIENTS ADDED P;0 POINTER Multiple #9002270.612 9002270.612
Info |  Details |  All